taxonomy.module 51.5 KB
Newer Older
Dries's avatar
 
Dries committed
1
<?php
Kjartan's avatar
Kjartan committed
2
// $Id$
Dries's avatar
 
Dries committed
3

Dries's avatar
 
Dries committed
4 5 6 7 8
/**
 * @file
 * Enables the organization of content into categories.
 */

Dries's avatar
 
Dries committed
9 10 11
/**
 * Implementation of hook_perm().
 */
Kjartan's avatar
Kjartan committed
12
function taxonomy_perm() {
Dries's avatar
 
Dries committed
13
  return array('administer taxonomy');
Kjartan's avatar
Kjartan committed
14
}
Dries's avatar
 
Dries committed
15

Dries's avatar
 
Dries committed
16 17 18 19 20 21 22 23 24 25 26
/**
 * Implementation of hook_link().
 *
 * This hook is extended with $type = 'taxonomy terms' to allow themes to
 * print lists of terms associated with a node. Themes can print taxonomy
 * links with:
 *
 * if (module_exist('taxonomy')) {
 *   $this->links(taxonomy_link('taxonomy terms', $node));
 * }
 */
Dries's avatar
 
Dries committed
27
function taxonomy_link($type, $node = NULL) {
Dries's avatar
 
Dries committed
28
  if ($type == 'taxonomy terms' && $node != NULL) {
Kjartan's avatar
 
Kjartan committed
29
    $links = array();
Dries's avatar
 
Dries committed
30
    if (array_key_exists('taxonomy', $node)) {
Dries's avatar
 
Dries committed
31 32
      foreach ($node->taxonomy as $tid) {
        $term = taxonomy_get_term($tid);
Dries's avatar
 
Dries committed
33
        $links[] = l($term->name, 'taxonomy/term/'. $term->tid);
Dries's avatar
 
Dries committed
34 35 36 37
      }
    }
    else {
      foreach (taxonomy_node_get_terms($node->nid) as $term) {
Dries's avatar
 
Dries committed
38
        $links[] = l($term->name, 'taxonomy/term/'. $term->tid);
Dries's avatar
 
Dries committed
39
      }
Dries's avatar
 
Dries committed
40 41 42
    }
    return $links;
  }
Kjartan's avatar
Kjartan committed
43 44
}

Dries's avatar
 
Dries committed
45 46 47
/**
 * Implementation of hook_menu().
 */
Dries's avatar
 
Dries committed
48
function taxonomy_menu($may_cache) {
Dries's avatar
 
Dries committed
49
  $items = array();
Dries's avatar
 
Dries committed
50

Dries's avatar
 
Dries committed
51 52 53 54
  if ($may_cache) {
    $items[] = array('path' => 'admin/taxonomy', 'title' => t('categories'),
      'callback' => 'taxonomy_admin',
      'access' => user_access('administer taxonomy'));
55

Dries's avatar
 
Dries committed
56 57
    $items[] = array('path' => 'admin/taxonomy/list', 'title' => t('list'),
      'type' => MENU_DEFAULT_LOCAL_TASK, 'weight' => -10);
58

Dries's avatar
 
Dries committed
59 60 61 62 63
    $items[] = array('path' => 'admin/taxonomy/add/vocabulary', 'title' => t('add vocabulary'),
      'callback' => 'taxonomy_admin',
      'access' => user_access('administer taxonomy'),
      'type' => MENU_LOCAL_TASK);

64 65 66 67 68 69 70 71 72 73 74 75 76 77 78
    $items[] = array('path' => 'admin/taxonomy/edit/vocabulary', 'title' => t('edit vocabulary'),
      'callback' => 'taxonomy_admin',
      'access' => user_access('administer taxonomy'),
      'type' => MENU_CALLBACK);

    $items[] = array('path' => 'admin/taxonomy/add/term', 'title' => t('add term'),
      'callback' => 'taxonomy_admin',
      'access' => user_access('administer taxonomy'),
      'type' => MENU_CALLBACK);

    $items[] = array('path' => 'admin/taxonomy/edit/term', 'title' => t('edit term'),
      'callback' => 'taxonomy_admin',
      'access' => user_access('administer taxonomy'),
      'type' => MENU_CALLBACK);

Dries's avatar
 
Dries committed
79 80 81 82
    $items[] = array('path' => 'taxonomy/term', 'title' => t('taxonomy term'),
      'callback' => 'taxonomy_term_page',
      'access' => user_access('access content'),
      'type' => MENU_CALLBACK);
Steven Wittens's avatar
Steven Wittens committed
83 84 85 86 87

    $items[] = array('path' => 'taxonomy/autocomplete', 'title' => t('autocomplete taxonomy'),
      'callback' => 'taxonomy_autocomplete',
      'access' => user_access('access content'),
      'type' => MENU_CALLBACK);
Dries's avatar
 
Dries committed
88
  }
Dries's avatar
Dries committed
89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104
  else {
    if (is_numeric(arg(2))) {
      $items[] = array('path' => 'admin/taxonomy/' . arg(2), 'title' => t('add term'),
        'callback' => 'taxonomy_admin',
        'access' => user_access('administer taxonomy'),
        'type' => MENU_CALLBACK);

      $items[] = array('path' => 'admin/taxonomy/' . arg(2) . '/list', 'title' => t('list'),
        'type' => MENU_DEFAULT_LOCAL_TASK, 'weight' => -10);

      $items[] = array('path' => 'admin/taxonomy/' . arg(2) . '/add/term', 'title' => t('add term'),
        'callback' => 'taxonomy_admin',
        'access' => user_access('administer taxonomy'),
        'type' => MENU_LOCAL_TASK);
    }
  }
Dries's avatar
 
Dries committed
105

Dries's avatar
 
Dries committed
106 107
  return $items;
}
Dries's avatar
 
Dries committed
108

Kjartan's avatar
Kjartan committed
109
function taxonomy_form_vocabulary($edit = array()) {
110
  $form .= form_textfield(t('Vocabulary name'), 'name', $edit['name'], 60, 64, t('The name for this vocabulary.  Example: "Topic".'), NULL, TRUE);
111 112
  // Prepend extra vocabulary form elements.
  $form .= implode('', module_invoke_all('taxonomy', 'form pre', 'vocabulary', $edit));
Dries's avatar
 
Dries committed
113
  $form .= form_textarea(t('Description'), 'description', $edit['description'], 60, 5, t('Description of the vocabulary; can be used by modules.'));
114
  $form .= form_textfield(t('Help text'), 'help', $edit['help'], 60, 255, t('Instructions to present to the user when choosing a term.'));
115
  $form .= form_checkboxes(t('Types'), 'nodes', $edit['nodes'], node_get_types(), t('A list of node types you want to associate with this vocabulary.'), NULL, TRUE);
116
  $form .= form_radios(t('Hierarchy'), 'hierarchy', $edit['hierarchy'], array(t('Disabled'), t('Single'), t('Multiple')), t('Allows <a href="%help-url">a tree-like hierarchy</a> between terms of this vocabulary.', array('%help-url' => url('admin/help/taxonomy', NULL, NULL, 'hierarchy'))));
Dries's avatar
Dries committed
117 118 119
  $form .= form_checkbox(t('Related terms'), 'relations', 1, $edit['relations'], t('Allows <a href="%help-url">related terms</a> in this vocabulary.', array('%help-url' => url('admin/help/taxonomy', NULL, NULL, 'related-terms'))));
  $form .= form_checkbox(t('Free tagging'), 'tags', 1, $edit['tags'], t('Content is categorized by typing terms instead of choosing from a list.'));
  $form .= form_checkbox(t('Multiple select'), 'multiple', 1, $edit['multiple'], t('Allows nodes to have more than one term from this vocabulary (always true for free tagging).'));
Dries's avatar
 
Dries committed
120
  $form .= form_checkbox(t('Required'), 'required', 1, $edit['required'], t('If enabled, every node <strong>must</strong> have at least one term in this vocabulary.'));
Dries's avatar
 
Dries committed
121
  $form .= form_weight(t('Weight'), 'weight', $edit['weight'], 10, t('In listings, the heavier vocabularies will sink and the lighter vocabularies will be positioned nearer the top.'));
122 123
  // Append extra vocabulary form elements.
  $form .= implode('', module_invoke_all('taxonomy', 'form post', 'vocabulary', $edit));
Dries's avatar
 
Dries committed
124
  $form .= form_submit(t('Submit'));
Dries's avatar
 
Dries committed
125

Dries's avatar
 
Dries committed
126 127 128
  if ($edit['vid']) {
    $form .= form_submit(t('Delete'));
    $form .= form_hidden('vid', $edit['vid']);
Dries's avatar
 
Dries committed
129 130
  }

Kjartan's avatar
Kjartan committed
131 132
  return form($form);
}
Kjartan's avatar
Kjartan committed
133

134
function taxonomy_save_vocabulary(&$edit) {
Dries's avatar
Dries committed
135 136
  $edit['nodes'] = ($edit['nodes']) ? $edit['nodes'] : array();
  $edit['weight'] = ($edit['weight']) ? $edit['weight'] : 0;
137
  $edit['tags'] = ($edit['tags']) ? $edit['tags'] : 0;
Dries's avatar
 
Dries committed
138

Dries's avatar
Dries committed
139
  $data = array('name' => $edit['name'], 'description' => $edit['description'], 'help' => $edit['help'], 'multiple' => $edit['multiple'], 'required' => $edit['required'], 'hierarchy' => $edit['hierarchy'], 'relations' => $edit['relations'], 'tags' => $edit['tags'], 'weight' => $edit['weight'],  'module' => isset($edit['module']) ? $edit['module'] : 'taxonomy');
Dries's avatar
 
Dries committed
140
  if ($edit['vid'] && $edit['name']) {
Dries's avatar
 
Dries committed
141
    db_query('UPDATE {vocabulary} SET '. _taxonomy_prepare_update($data) .' WHERE vid = %d', $edit['vid']);
Dries's avatar
 
Dries committed
142 143 144 145
    db_query("DELETE FROM {vocabulary_node_types} WHERE vid = %d", $edit['vid']);
    foreach ($edit['nodes'] as $type) {
      db_query("INSERT INTO {vocabulary_node_types} (vid, type) VALUES (%d, '%s')", $edit['vid'], $type);
    }
Dries's avatar
 
Dries committed
146
    module_invoke_all('taxonomy', 'update', 'vocabulary', $edit);
147
    $status = SAVED_UPDATED;
Dries's avatar
 
Dries committed
148
  }
Dries's avatar
 
Dries committed
149
  else if ($edit['vid']) {
150
    $status = taxonomy_del_vocabulary($edit['vid']);
Kjartan's avatar
Kjartan committed
151 152
  }
  else {
Dries's avatar
 
Dries committed
153
    $data['vid'] = $edit['vid'] = db_next_id('{vocabulary}_vid');
Dries's avatar
 
Dries committed
154
    db_query('INSERT INTO {vocabulary} '. _taxonomy_prepare_insert($data, 1) .' VALUES '. _taxonomy_prepare_insert($data, 2));
Dries's avatar
 
Dries committed
155 156 157
    foreach ($edit['nodes'] as $type) {
      db_query("INSERT INTO {vocabulary_node_types} (vid, type) VALUES (%d, '%s')", $edit['vid'], $type);
    }
Dries's avatar
 
Dries committed
158
    module_invoke_all('taxonomy', 'insert', 'vocabulary', $edit);
159
    $status = SAVED_NEW;
Kjartan's avatar
Kjartan committed
160
  }
Dries's avatar
 
Dries committed
161 162

  cache_clear_all();
Dries's avatar
 
Dries committed
163

164
  return $status;
Kjartan's avatar
Kjartan committed
165
}
Dries's avatar
 
Dries committed
166

Kjartan's avatar
Kjartan committed
167
function taxonomy_del_vocabulary($vid) {
Dries's avatar
 
Dries committed
168 169
  $vocabulary = taxonomy_get_vocabulary($vid);

Dries's avatar
 
Dries committed
170
  db_query('DELETE FROM {vocabulary} WHERE vid = %d', $vid);
Dries's avatar
 
Dries committed
171
  db_query('DELETE FROM {vocabulary_node_types} WHERE vid = %d', $vid);
Dries's avatar
 
Dries committed
172
  $result = db_query('SELECT tid FROM {term_data} WHERE vid = %d', $vid);
Kjartan's avatar
Kjartan committed
173 174
  while ($term = db_fetch_object($result)) {
    taxonomy_del_term($term->tid);
Dries's avatar
 
Dries committed
175
  }
Dries's avatar
 
Dries committed
176

Dries's avatar
 
Dries committed
177
  module_invoke_all('taxonomy', 'delete', 'vocabulary', $vocabulary);
Dries's avatar
 
Dries committed
178

Dries's avatar
 
Dries committed
179 180
  cache_clear_all();

181
  return SAVED_DELETED;
Dries's avatar
 
Dries committed
182 183 184 185 186
}

function _taxonomy_confirm_del_vocabulary($vid) {
  $vocabulary = taxonomy_get_vocabulary($vid);

187 188
  $extra  = form_hidden('type', 'vocabulary');
  $extra .= form_hidden('vid', $vid);
189
  $extra .= form_hidden('name', $vocabulary->name);
190 191

  $output = theme('confirm',
192
                  t('Are you sure you want to delete the vocabulary %title?', array('%title' => theme('placeholder', $vocabulary->name))),
193 194 195 196 197 198
                  'admin/taxonomy',
                  t('Deleting a vocabulary will delete all the terms in it. This action cannot be undone.'),
                  t('Delete'),
                  t('Cancel'),
                  $extra);
  return $output;
Kjartan's avatar
Kjartan committed
199
}
Dries's avatar
 
Dries committed
200

Kjartan's avatar
Kjartan committed
201
function taxonomy_form_term($edit = array()) {
Dries's avatar
 
Dries committed
202
  $vocabulary_id = isset($edit['vid']) ? $edit['vid'] : arg(4);
Kjartan's avatar
Kjartan committed
203
  $vocabulary = taxonomy_get_vocabulary($vocabulary_id);
Dries's avatar
 
Dries committed
204

205
  $form = form_textfield(t('Term name'), 'name', $edit['name'], 60, 64, t('The name for this term.  Example: "Linux".'), NULL, TRUE);
206 207
  // Prepend extra term form elements.
  $form .= implode('', module_invoke_all('taxonomy', 'form pre', 'term', $edit));
Dries's avatar
 
Dries committed
208
  $form .= form_textarea(t('Description'), 'description', $edit['description'], 60, 5, t('A description of the term.'));
Dries's avatar
 
Dries committed
209

Kjartan's avatar
Kjartan committed
210
  if ($vocabulary->hierarchy) {
Dries's avatar
 
Dries committed
211 212
    $parent = array_keys(taxonomy_get_parents($edit['tid']));
    $children = taxonomy_get_tree($vocabulary_id, $edit['tid']);
Dries's avatar
 
Dries committed
213

Dries's avatar
 
Dries committed
214
    // A term can't be the child of itself, nor of its children.
Dries's avatar
 
Dries committed
215 216 217
    foreach ($children as $child) {
      $exclude[] = $child->tid;
    }
Dries's avatar
 
Dries committed
218
    $exclude[] = $edit['tid'];
Dries's avatar
 
Dries committed
219

Kjartan's avatar
Kjartan committed
220
    if ($vocabulary->hierarchy == 1) {
221
      $form .= _taxonomy_term_select(t('Parent'), 'parent', $parent, $vocabulary_id, l(t('Parent term'), 'admin/help/taxonomy', NULL, NULL, 'parent') .'.', 0, '<'. t('root') .'>', $exclude);
Dries's avatar
 
Dries committed
222
    }
Kjartan's avatar
Kjartan committed
223
    elseif ($vocabulary->hierarchy == 2) {
224
      $form .= _taxonomy_term_select(t('Parents'), 'parent', $parent, $vocabulary_id, l(t('Parent terms'), 'admin/help/taxonomy', NULL, NULL, 'parent') .'.', 1, '<'. t('root') .'>', $exclude);
Dries's avatar
 
Dries committed
225
    }
Kjartan's avatar
Kjartan committed
226
  }
Dries's avatar
 
Dries committed
227

228
  if ($vocabulary->relations) {
Dries's avatar
 
Dries committed
229
    $form .= _taxonomy_term_select(t('Related terms'), 'relations', array_keys(taxonomy_get_related($edit['tid'])), $vocabulary_id, NULL, 1, '<'. t('none') .'>', array($edit['tid']));
230 231
  }

232
  $form .= form_textarea(t('Synonyms'), 'synonyms', implode("\n", taxonomy_get_synonyms($edit['tid'])), 60, 5, t('<a href="%help-url">Synonyms</a> of this term, one synonym per line.', array('%help-url' => url('admin/help/taxonomy', NULL, NULL, 'synonyms'))));
Dries's avatar
 
Dries committed
233
  $form .= form_weight(t('Weight'), 'weight', $edit['weight'], 10, t('In listings, the heavier terms will sink and the lighter terms will be positioned nearer the top.'));
234 235
  // Append extra term form elements.
  $form .= implode('', module_invoke_all('taxonomy', 'form post', 'term', $edit));
Dries's avatar
 
Dries committed
236 237
  $form .= form_hidden('vid', $vocabulary->vid);
  $form .= form_submit(t('Submit'));
Kjartan's avatar
Kjartan committed
238

Dries's avatar
 
Dries committed
239 240 241
  if ($edit['tid']) {
    $form .= form_submit(t('Delete'));
    $form .= form_hidden('tid', $edit['tid']);
Dries's avatar
 
Dries committed
242
  }
243 244 245
  else {
    $form .= form_hidden('destination', $_GET['q']);
  }
Dries's avatar
 
Dries committed
246

Kjartan's avatar
Kjartan committed
247 248
  return form($form);
}
Dries's avatar
 
Dries committed
249

250
function taxonomy_save_term(&$edit) {
Dries's avatar
 
Dries committed
251 252
  if ($edit['tid'] && $edit['name']) {
    $data = array('name' => $edit['name'], 'description' => $edit['description'], 'weight' => $edit['weight']);
Dries's avatar
 
Dries committed
253

Dries's avatar
 
Dries committed
254
    db_query('UPDATE {term_data} SET '. _taxonomy_prepare_update($data) .' WHERE tid = %d', $edit['tid']);
Dries's avatar
 
Dries committed
255
    module_invoke_all('taxonomy', 'update', 'term', $edit);
256
    $status = SAVED_UPDATED;
Kjartan's avatar
Kjartan committed
257
  }
Dries's avatar
 
Dries committed
258 259
  else if ($edit['tid']) {
    return taxonomy_del_term($edit['tid']);
Kjartan's avatar
Kjartan committed
260 261
  }
  else {
Dries's avatar
 
Dries committed
262 263
    $edit['tid'] = db_next_id('{term_data}_tid');
    $data = array('tid' => $edit['tid'], 'name' => $edit['name'], 'description' => $edit['description'], 'vid' => $edit['vid'], 'weight' => $edit['weight']);
Dries's avatar
 
Dries committed
264
    db_query('INSERT INTO {term_data} '. _taxonomy_prepare_insert($data, 1) .' VALUES '. _taxonomy_prepare_insert($data, 2));
Dries's avatar
 
Dries committed
265
    module_invoke_all('taxonomy', 'insert', 'term', $edit);
266
    $status = SAVED_NEW;
Kjartan's avatar
Kjartan committed
267
  }
Dries's avatar
 
Dries committed
268

Dries's avatar
 
Dries committed
269 270 271
  db_query('DELETE FROM {term_relation} WHERE tid1 = %d OR tid2 = %d', $edit['tid'], $edit['tid']);
  if ($edit['relations']) {
    foreach ($edit['relations'] as $related_id) {
Kjartan's avatar
Kjartan committed
272
      if ($related_id != 0) {
Dries's avatar
 
Dries committed
273
        db_query('INSERT INTO {term_relation} (tid1, tid2) VALUES (%d, %d)', $edit['tid'], $related_id);
Dries's avatar
 
Dries committed
274
      }
Kjartan's avatar
Kjartan committed
275
    }
Kjartan's avatar
Kjartan committed
276
  }
Dries's avatar
 
Dries committed
277

Dries's avatar
 
Dries committed
278 279
  db_query('DELETE FROM {term_hierarchy} WHERE tid = %d', $edit['tid']);
  if (!isset($edit['parent'])) {
280
    $edit['parent'] = array(0);
Kjartan's avatar
Kjartan committed
281
  }
Dries's avatar
 
Dries committed
282 283
  if (is_array($edit['parent'])) {
    foreach ($edit['parent'] as $parent) {
284 285 286 287 288 289 290 291
      if (is_array($parent)) {
        foreach ($parent as $tid) {
          db_query('INSERT INTO {term_hierarchy} (tid, parent) VALUES (%d, %d)', $edit['tid'], $tid);
        }
      }
      else {
        db_query('INSERT INTO {term_hierarchy} (tid, parent) VALUES (%d, %d)', $edit['tid'], $parent);
      }
Dries's avatar
 
Dries committed
292
    }
Kjartan's avatar
Kjartan committed
293
  }
Dries's avatar
 
Dries committed
294

Dries's avatar
 
Dries committed
295 296 297
  db_query('DELETE FROM {term_synonym} WHERE tid = %d', $edit['tid']);
  if ($edit['synonyms']) {
    foreach (explode ("\n", str_replace("\r", '', $edit['synonyms'])) as $synonym) {
Dries's avatar
 
Dries committed
298
      if ($synonym) {
Dries's avatar
 
Dries committed
299
        db_query("INSERT INTO {term_synonym} (tid, name) VALUES (%d, '%s')", $edit['tid'], chop($synonym));
Dries's avatar
 
Dries committed
300
      }
Kjartan's avatar
Kjartan committed
301
    }
Dries's avatar
 
Dries committed
302
  }
Dries's avatar
 
Dries committed
303

Dries's avatar
 
Dries committed
304 305
  cache_clear_all();

306
  return $status;
Kjartan's avatar
Kjartan committed
307
}
Dries's avatar
 
Dries committed
308

Kjartan's avatar
Kjartan committed
309
function taxonomy_del_term($tid) {
310 311 312 313 314 315 316 317 318 319 320 321 322 323
  $tids = array($tid);
  while ($tids) {
    $children_tids = $orphans = array();
    foreach ($tids as $tid) {
      // See if any of the term's children are about to be become orphans:
      if ($children = taxonomy_get_children($tid)) {
        foreach ($children as $child) {
          // If the term has multiple parents, we don't delete it.
          $parents = taxonomy_get_parents($child->tid);
          if (count($parents) == 1) {
            $orphans[] = $child->tid;
          }
        }
      }
Dries's avatar
 
Dries committed
324

325
      $term = taxonomy_get_term($tid);
Dries's avatar
 
Dries committed
326

327 328 329 330 331
      db_query('DELETE FROM {term_data} WHERE tid = %d', $tid);
      db_query('DELETE FROM {term_hierarchy} WHERE tid = %d', $tid);
      db_query('DELETE FROM {term_relation} WHERE tid1 = %d OR tid2 = %d', $tid, $tid);
      db_query('DELETE FROM {term_synonym} WHERE tid = %d', $tid);
      db_query('DELETE FROM {term_node} WHERE tid = %d', $tid);
Dries's avatar
 
Dries committed
332

333
      module_invoke_all('taxonomy', 'delete', 'term', $term);
334
      drupal_set_message(t('Deleted term %name.', array('%name' => theme('placeholder', $term->name))));
335
    }
Dries's avatar
 
Dries committed
336

337 338
    $tids = $orphans;
  }
Dries's avatar
 
Dries committed
339

Dries's avatar
 
Dries committed
340
  cache_clear_all();
Dries's avatar
 
Dries committed
341 342 343 344 345
}

function _taxonomy_confirm_del_term($tid) {
  $term = taxonomy_get_term($tid);

346 347
  $extra  = form_hidden('type', 'term');
  $extra .= form_hidden('tid', $tid);
Dries's avatar
 
Dries committed
348

349
  $output = theme('confirm',
350
                  t('Are you sure you want to delete the term %title?', array('%title' => theme('placeholder', $term->name))),
351 352 353 354 355
                  'admin/taxonomy',
                  t('Deleting a term will delete all its children if there are any. This action cannot be undone.'),
                  t('Delete'),
                  t('Cancel'),
                  $extra);
356 357

  return $output;
Kjartan's avatar
Kjartan committed
358
}
Dries's avatar
 
Dries committed
359

Dries's avatar
 
Dries committed
360 361 362
/**
 * Generate a tabular listing of administrative functions for vocabularies.
 */
Kjartan's avatar
Kjartan committed
363
function taxonomy_overview() {
Dries's avatar
Dries committed
364 365
  $vid = arg(2);

366
  // Show all vocabularies, and a "view terms" link to the pagers.
Dries's avatar
Dries committed
367
  if (!$vid) {
368
    $header = array(t('Name'), t('Type'), array('data' => t('Operations'), 'colspan' => '2'));
Dries's avatar
Dries committed
369 370
    $vocabularies = taxonomy_get_vocabularies();
    foreach ($vocabularies as $vocabulary) {
371 372
      $types = array();
      foreach ($vocabulary->nodes as $type) {
373
        $node_type = node_get_name($type);
374 375
        $types[] = $node_type ? $node_type : $type;
      }
Dries's avatar
Dries committed
376
      $rows[] = array(check_plain($vocabulary->name), implode(', ', $types), l(t('edit vocabulary'), "admin/taxonomy/edit/vocabulary/$vocabulary->vid"), l(t('edit terms'), "admin/taxonomy/$vocabulary->vid"));
Dries's avatar
Dries committed
377 378 379
    }

    if (!$rows) {
380
      $rows[] = array(array('data' => t('No categories available.'), 'colspan' => '4', 'class' => 'message'));
Dries's avatar
Dries committed
381 382
    }
  }
Dries's avatar
 
Dries committed
383

384
  // Show the vocabulary's terms with a pager.
Dries's avatar
Dries committed
385
  else {
386 387 388
    $destination = drupal_get_destination();

    $header = array(t('Name'), t('Operations'));
Dries's avatar
Dries committed
389
    $vocabulary = taxonomy_get_vocabulary($vid);
390

Dries's avatar
Dries committed
391 392 393 394 395 396 397 398 399 400
    drupal_set_title(check_plain($vocabulary->name));
    $start_from      = $_GET['page'] ? $_GET['page'] : 0;
    $total_entries   = 0;  // total count for pager
    $page_increment  = 25; // number of tids per page
    $displayed_count = 0;  // number of tids shown

    $tree = taxonomy_get_tree($vocabulary->vid);
    foreach ($tree as $term) {
      $total_entries++; // we're counting all-totals, not displayed
      if (($start_from && ($start_from * $page_increment) >= $total_entries) || ($displayed_count == $page_increment)) { continue; }
401
      $rows[] = array(_taxonomy_depth($term->depth) . ' ' . l(check_plain($term->name), "taxonomy/term/$term->tid"), l(t('edit'), "admin/taxonomy/edit/term/$term->tid", array(), $destination));
Dries's avatar
Dries committed
402 403 404 405 406 407
      $displayed_count++; // we're counting tids displayed
    }

    if (!$rows) {
      $rows[] = array(array('data' => t('No terms available.'), 'colspan' => '2'));
    }
Dries's avatar
 
Dries committed
408

Dries's avatar
Dries committed
409 410
    $GLOBALS['pager_page_array'][] = $start_from;  // FIXME
    $GLOBALS['pager_total'][] = intval($total_entries / $page_increment) + 1; // FIXME
411

Dries's avatar
Dries committed
412 413
    if ($total_entries >= $page_increment) {
      $rows[] = array(array('data' => theme('pager', NULL, $page_increment), 'colspan' => '2'));
Dries's avatar
Dries committed
414
    }
Dries's avatar
 
Dries committed
415 416
  }

Dries's avatar
Dries committed
417
  return theme('table', $header, $rows, array('id' => 'taxonomy'));
Kjartan's avatar
Kjartan committed
418 419
}

Dries's avatar
 
Dries committed
420 421 422
/**
 * Generate a form element for selecting terms from a vocabulary.
 */
Dries's avatar
 
Dries committed
423
function taxonomy_form($vid, $value = 0, $help = NULL, $name = 'taxonomy') {
Dries's avatar
 
Dries committed
424
  $vocabulary = taxonomy_get_vocabulary($vid);
425
  $help = ($help) ? $help : $vocabulary->help;
Kjartan's avatar
Kjartan committed
426 427 428 429
  if ($vocabulary->required) {
    $blank = 0;
  }
  else {
Dries's avatar
 
Dries committed
430
    $blank = '<'. t('none') .'>';
Kjartan's avatar
Kjartan committed
431
  }
Dries's avatar
 
Dries committed
432

433
  return _taxonomy_term_select(check_plain($vocabulary->name), $name, $value, $vid, $help, intval($vocabulary->multiple), $blank);
Kjartan's avatar
Kjartan committed
434
}
Dries's avatar
 
Dries committed
435

436
/**
437 438 439
 * Generate a set of options for selecting a term from all vocabularies. Can be
 * passed to form_select.
 */
Dries's avatar
Dries committed
440
function taxonomy_form_all($free_tags = 0) {
441 442 443
  $vocabularies = taxonomy_get_vocabularies();
  $options = array();
  foreach ($vocabularies as $vid => $vocabulary) {
Dries's avatar
Dries committed
444
    if ($vocabulary->tags && !$free_tags) { continue; }
445 446 447 448 449 450 451 452 453 454 455
    $tree = taxonomy_get_tree($vid);
    $options[$vocabulary->name] = array();
    if ($tree) {
      foreach ($tree as $term) {
        $options[$vocabulary->name][$term->tid] = _taxonomy_depth($term->depth, '-') . $term->name;
      }
    }
  }
  return $options;
}

Dries's avatar
 
Dries committed
456 457 458 459 460 461
/**
 * Return an array of all vocabulary objects.
 *
 * @param $type
 *   If set, return only those vocabularies associated with this node type.
 */
Dries's avatar
 
Dries committed
462
function taxonomy_get_vocabularies($type = NULL) {
Kjartan's avatar
Kjartan committed
463
  if ($type) {
464
    $result = db_query(db_rewrite_sql("SELECT v.vid, v.*, n.type FROM {vocabulary} v LEFT JOIN {vocabulary_node_types} n ON v.vid = n.vid WHERE n.type = '%s' ORDER BY v.weight, v.name", 'v', 'vid'), $type);
Kjartan's avatar
Kjartan committed
465 466
  }
  else {
467
    $result = db_query(db_rewrite_sql('SELECT v.*, n.type FROM {vocabulary} v LEFT JOIN {vocabulary_node_types} n ON v.vid = n.vid ORDER BY v.weight, v.name', 'v', 'vid'));
Kjartan's avatar
Kjartan committed
468
  }
Dries's avatar
 
Dries committed
469

Kjartan's avatar
Kjartan committed
470
  $vocabularies = array();
Dries's avatar
 
Dries committed
471
  $node_types = array();
Kjartan's avatar
Kjartan committed
472
  while ($voc = db_fetch_object($result)) {
Dries's avatar
 
Dries committed
473 474 475 476
    $node_types[$voc->vid][] = $voc->type;
    unset($voc->type);
    $voc->nodes = $node_types[$voc->vid];
    $vocabularies[$voc->vid] = $voc;
Dries's avatar
 
Dries committed
477
  }
Dries's avatar
 
Dries committed
478

Kjartan's avatar
Kjartan committed
479 480
  return $vocabularies;
}
Dries's avatar
 
Dries committed
481

Dries's avatar
 
Dries committed
482 483 484
/**
 * Generate a form for selecting terms to associate with a node.
 */
Dries's avatar
 
Dries committed
485
function taxonomy_node_form($type, $node = '', $help = NULL, $name = 'taxonomy') {
Dries's avatar
Dries committed
486
  if (!array_key_exists('taxonomy', $node)) {
Kjartan's avatar
Kjartan committed
487
    if ($node->nid) {
Dries's avatar
Dries committed
488
      $terms = taxonomy_node_get_terms($node->nid);
Kjartan's avatar
Kjartan committed
489 490
    }
    else {
Dries's avatar
Dries committed
491
      $terms = array();
Dries's avatar
 
Dries committed
492
    }
Kjartan's avatar
Kjartan committed
493 494 495 496
  }
  else {
    $terms = $node->taxonomy;
  }
Dries's avatar
 
Dries committed
497

498
  $c = db_query(db_rewrite_sql("SELECT v.*, n.type FROM {vocabulary} v INNER JOIN {vocabulary_node_types} n ON v.vid = n.vid WHERE n.type = '%s' ORDER BY v.weight, v.name", 'v', 'vid'), $type);
Kjartan's avatar
Kjartan committed
499
  while ($vocabulary = db_fetch_object($c)) {
Dries's avatar
Dries committed
500 501 502 503 504 505 506 507 508 509 510 511 512 513
    if ($vocabulary->tags) {
      $typed_terms = array();
      foreach ($terms as $term) {
        if ($term->vid == $vocabulary->vid) {

          // Commas and quotes in terms are special cases, so encode 'em.
          if (preg_match('/,/', $term->name) || preg_match('/"/', $term->name)) {
            $term->name = '"'.preg_replace('/"/', '""', $term->name).'"';
          }

          $typed_terms[] = $term->name;
        }
      }
      $typed_string = implode(', ', $typed_terms) . (array_key_exists('tags', $terms) ? $terms['tags'][$vocabulary->vid] : NULL);
514
      $result[] = form_autocomplete($vocabulary->name, "$name][tags][". $vocabulary->vid, $typed_string, 60, 100, 'taxonomy/autocomplete/'. $vocabulary->vid, t('A comma-separated list of terms describing this content (Example: funny, bungie jumping, "Company, Inc.").'), NULL, ($vocabulary->required ? TRUE : FALSE));
Dries's avatar
Dries committed
515 516 517 518 519
    }
    else {
      $ntterms = array_key_exists('taxonomy', $node) ? $terms : array_keys($terms);
      $result[] = taxonomy_form($vocabulary->vid, $ntterms, $help, $name);
    }
Dries's avatar
 
Dries committed
520
  }
Kjartan's avatar
Kjartan committed
521 522
  return $result ? $result : array();
}
Dries's avatar
 
Dries committed
523

Dries's avatar
 
Dries committed
524 525 526 527
/**
 * Find all terms associated to the given node, within one vocabulary.
 */
function taxonomy_node_get_terms_by_vocabulary($nid, $vid, $key = 'tid') {
528
  $result = db_query(db_rewrite_sql('SELECT t.tid, t.* FROM {term_data} t, {term_node} r WHERE t.tid = r.tid AND t.vid = %d AND r.nid = %d ORDER BY weight', 't', 'tid'), $vid, $nid);
Kjartan's avatar
Kjartan committed
529 530 531
  $terms = array();
  while ($term = db_fetch_object($result)) {
    $terms[$term->$key] = $term;
Dries's avatar
 
Dries committed
532
  }
Kjartan's avatar
Kjartan committed
533 534 535
  return $terms;
}

Dries's avatar
 
Dries committed
536
/**
537
 * Find all terms associated to the given node, ordered by vocabulary and term weight.
Dries's avatar
 
Dries committed
538 539
 */
function taxonomy_node_get_terms($nid, $key = 'tid') {
Kjartan's avatar
Kjartan committed
540
  static $terms;
Dries's avatar
 
Dries committed
541

Dries's avatar
 
Dries committed
542
  if (!isset($terms[$nid])) {
543
    $result = db_query('SELECT t.* FROM {term_node} r INNER JOIN {term_data} t ON r.tid = t.tid INNER JOIN {vocabulary} v ON t.vid = v.vid WHERE r.nid = %d ORDER BY v.weight, t.weight, t.name', $nid);
Kjartan's avatar
Kjartan committed
544
    $terms[$nid] = array();
Dries's avatar
 
Dries committed
545
    while ($term = db_fetch_object($result)) {
Kjartan's avatar
Kjartan committed
546
      $terms[$nid][$term->$key] = $term;
Dries's avatar
 
Dries committed
547 548
    }
  }
Kjartan's avatar
Kjartan committed
549 550
  return $terms[$nid];
}
Dries's avatar
 
Dries committed
551

Dries's avatar
Dries committed
552 553 554 555 556 557 558 559 560 561 562 563 564 565 566 567 568
/**
 * Make sure incoming vids are free tagging enabled.
 */
function taxonomy_node_validate(&$node) {
  if ($node->taxonomy) {
    $terms = $node->taxonomy;
    if ($terms['tags']) {
      foreach ($terms['tags'] as $vid => $vid_value) {
        $vocabulary = taxonomy_get_vocabulary($vid);
        if (!$vocabulary->tags) {
          form_set_error("taxonomy[tags][$vid", t('The %name vocabulary can not be modified in this way.', array('%name' => theme('placeholder', $vocabulary->name))));
        }
      }
    }
  }
}

Dries's avatar
 
Dries committed
569 570 571
/**
 * Save term associations for a given node.
 */
Kjartan's avatar
Kjartan committed
572
function taxonomy_node_save($nid, $terms) {
573
  taxonomy_node_delete($nid);
Dries's avatar
Dries committed
574 575 576 577 578 579 580 581 582 583 584 585 586 587 588 589 590 591 592 593 594 595 596 597 598 599 600 601 602 603 604 605 606

  // Free tagging vocabularies do not send their tids in the form,
  // so we'll detect them here and process them independently.
  if ($terms['tags']) {
    $typed_input = $terms['tags'];
    unset($terms['tags']);

    foreach ($typed_input as $vid => $vid_value) {
      // This regexp allows the following types of user input:
      // this, "somecmpany, llc", "and ""this"" w,o.rks", foo bar
      $regexp = '%(?:^|,\ *)("(?>[^"]*)(?>""[^"]* )*"|(?: [^",]*))%x';
      preg_match_all($regexp, $vid_value, $matches);
      $typed_terms = $matches[1];

      foreach ($typed_terms as $typed_term) {
        // If a user has escaped a term (to demonstrate that it is a group,
        // or includes a comma or quote character), we remove the escape
        // formatting so to save the term into the DB as the user intends.
        $typed_term = str_replace('""', '"', preg_replace('/^"(.*)"$/', '\1', $typed_term));
        $typed_term = trim($typed_term);
        if ($typed_term == "") { continue; }

        // See if the term exists in the chosen vocabulary
        // and return the tid, otherwise, add a new record.
        $possibilities = taxonomy_get_term_by_name($typed_term);
        $typed_term_tid = NULL; // tid match if any.
        foreach ($possibilities as $possibility) {
          if ($possibility->vid == $vid) {
            $typed_term_tid = $possibility->tid;
          }
        }

        if (!$typed_term_tid) {
607 608 609
          $edit = array('vid' => $vid, 'name' => $typed_term);
          $status = taxonomy_save_term($edit);
          $typed_term_tid = $edit['tid'];
Dries's avatar
Dries committed
610 611 612 613 614 615
        }

        db_query('INSERT INTO {term_node} (nid, tid) VALUES (%d, %d)', $nid, $typed_term_tid);
      }
    }
  }
Dries's avatar
 
Dries committed
616

617
  if (is_array($terms)) {
Dries's avatar
 
Dries committed
618
    foreach ($terms as $term) {
619 620 621 622 623 624 625
      if (is_array($term)) {
        foreach ($term as $tid) {
          if ($tid) {
            db_query('INSERT INTO {term_node} (nid, tid) VALUES (%d, %d)', $nid, $tid);
          }
        }
      }
626
      else if ($term) {
Dries's avatar
 
Dries committed
627
        db_query('INSERT INTO {term_node} (nid, tid) VALUES (%d, %d)', $nid, $term);
628
      }
Dries's avatar
 
Dries committed
629 630
    }
  }
Kjartan's avatar
Kjartan committed
631
}
Dries's avatar
 
Dries committed
632

Dries's avatar
 
Dries committed
633 634 635
/**
 * Remove associations of a node to its terms.
 */
Kjartan's avatar
Kjartan committed
636
function taxonomy_node_delete($nid) {
Dries's avatar
 
Dries committed
637
  db_query('DELETE FROM {term_node} WHERE nid = %d', $nid);
Kjartan's avatar
Kjartan committed
638
}
Dries's avatar
 
Dries committed
639

Dries's avatar
 
Dries committed
640 641 642 643
/**
 * Find all term objects related to a given term ID.
 */
function taxonomy_get_related($tid, $key = 'tid') {
Kjartan's avatar
Kjartan committed
644
  if ($tid) {
Dries's avatar
 
Dries committed
645
    $result = db_query('SELECT t.*, tid1, tid2 FROM {term_relation}, {term_data} t WHERE (t.tid = tid1 OR t.tid = tid2) AND (tid1 = %d OR tid2 = %d) AND t.tid != %d ORDER BY weight, name', $tid, $tid, $tid);
Kjartan's avatar
Kjartan committed
646 647 648
    $related = array();
    while ($term = db_fetch_object($result)) {
      $related[$term->$key] = $term;
Dries's avatar
 
Dries committed
649
    }
Kjartan's avatar
Kjartan committed
650
    return $related;
Dries's avatar
 
Dries committed
651
  }
Kjartan's avatar
Kjartan committed
652 653
  else {
    return array();
Dries's avatar
 
Dries committed
654
  }
Kjartan's avatar
Kjartan committed
655
}
Dries's avatar
 
Dries committed
656

Dries's avatar
 
Dries committed
657 658 659 660
/**
 * Find all parents of a given term ID.
 */
function taxonomy_get_parents($tid, $key = 'tid') {
Kjartan's avatar
Kjartan committed
661
  if ($tid) {
662
    $result = db_query(db_rewrite_sql('SELECT t.tid, t.* FROM {term_hierarchy} h, {term_data} t WHERE h.parent = t.tid AND h.tid = %d ORDER BY weight, name', 't', 'tid'), $tid);
Kjartan's avatar
Kjartan committed
663 664 665
    $parents = array();
    while ($parent = db_fetch_object($result)) {
      $parents[$parent->$key] = $parent;
Dries's avatar
 
Dries committed
666
    }
Kjartan's avatar
Kjartan committed
667
    return $parents;
Dries's avatar
 
Dries committed
668
  }
Kjartan's avatar
Kjartan committed
669 670 671 672
  else {
    return array();
  }
}
Dries's avatar
 
Dries committed
673

Dries's avatar
 
Dries committed
674 675 676 677
/**
 * Find all ancestors of a given term ID.
 */
function taxonomy_get_parents_all($tid) {
Dries's avatar
 
Dries committed
678 679 680 681 682 683 684 685 686 687 688 689
  $parents = array();
  if ($tid) {
    $parents[] = taxonomy_get_term($tid);
    $n = 0;
    while ($parent = taxonomy_get_parents($parents[$n]->tid)) {
      $parents = array_merge($parents, $parent);
      $n++;
    }
  }
  return $parents;
}

Dries's avatar
 
Dries committed
690 691 692 693
/**
 * Find all children of a term ID.
 */
function taxonomy_get_children($tid, $vid = 0, $key = 'tid') {
Kjartan's avatar
Kjartan committed
694
  if ($vid) {
695
    $result = db_query(db_rewrite_sql('SELECT t.* FROM {term_hierarchy} h, {term_data} t WHERE t.vid = %d AND h.tid = t.tid AND h.parent = %d ORDER BY weight, name', 't', 'tid'), $vid, $tid);
Dries's avatar
 
Dries committed
696
  }
Kjartan's avatar
Kjartan committed
697
  else {
698
    $result = db_query(db_rewrite_sql('SELECT t.* FROM {term_hierarchy} h, {term_data} t WHERE h.tid = t.tid AND parent = %d ORDER BY weight, name', 't', 'tid'), $tid);
Kjartan's avatar
Kjartan committed
699 700 701 702 703 704 705
  }
  $children = array();
  while ($term = db_fetch_object($result)) {
    $children[$term->$key] = $term;
  }
  return $children;
}
Dries's avatar
 
Dries committed
706

Dries's avatar
 
Dries committed
707 708 709 710 711 712 713 714 715 716 717 718 719
/**
 * Create a hierarchical representation of a vocabulary.
 *
 * @param $vid
 *   Which vocabulary to generate the tree for.
 *
 * @param $parent
 *   The term ID under which to generate the tree. If 0, generate the tree
 *   for the entire vocabulary.
 *
 * @param $depth
 *   Internal use only.
 *
Dries's avatar
 
Dries committed
720 721 722
 * @param $max_depth
 *   The number of levels of the tree to return. Leave NULL to return all levels.
 *
Dries's avatar
 
Dries committed
723 724 725 726 727
 * @return
 *   An array of all term objects in the tree. Each term object is extended
 *   to have "depth" and "parents" attributes in addition to its normal ones.
 */
function taxonomy_get_tree($vid, $parent = 0, $depth = -1, $max_depth = NULL) {
Dries's avatar
 
Dries committed
728
  static $children, $parents, $terms;
Dries's avatar
 
Dries committed
729

Kjartan's avatar
Kjartan committed
730
  $depth++;
Dries's avatar
 
Dries committed
731

Dries's avatar
 
Dries committed
732 733 734 735
  // We cache trees, so it's not CPU-intensive to call get_tree() on a term
  // and its children, too.
  if (!isset($children[$vid])) {
    $children[$vid] = array();
Dries's avatar
 
Dries committed
736

737
    $result = db_query(db_rewrite_sql('SELECT t.tid, t.*, parent FROM {term_data} t, {term_hierarchy} h WHERE t.tid = h.tid AND t.vid = %d ORDER BY weight, name', 't', 'tid'), $vid);
Dries's avatar
 
Dries committed
738
    while ($term = db_fetch_object($result)) {
Dries's avatar
 
Dries committed
739 740 741
      $children[$vid][$term->parent][] = $term->tid;
      $parents[$vid][$term->tid][] = $term->parent;
      $terms[$vid][$term->tid] = $term;
Dries's avatar
 
Dries committed
742 743
    }
  }
Dries's avatar
 
Dries committed
744

Dries's avatar
 
Dries committed
745
  $max_depth = (is_null($max_depth)) ? count($children[$vid]) : $max_depth;
Dries's avatar
Dries committed
746 747 748 749 750 751 752 753 754 755 756 757
  if ($children[$vid][$parent]) {
    foreach ($children[$vid][$parent] as $child) {
      if ($max_depth > $depth) {
        $terms[$vid][$child]->depth = $depth;
        // The "parent" attribute is not useful, as it would show one parent only.
        unset($terms[$vid][$child]->parent);
        $terms[$vid][$child]->parents = $parents[$vid][$child];
        $tree[] = $terms[$vid][$child];

        if ($children[$vid][$child]) {
          $tree = array_merge($tree, taxonomy_get_tree($vid, $child, $depth, $max_depth));
        }
Dries's avatar
 
Dries committed
758
      }
Dries's avatar
 
Dries committed
759
    }
Kjartan's avatar
Kjartan committed
760
  }
Dries's avatar
 
Dries committed
761

Dries's avatar
 
Dries committed
762
  return $tree ? $tree : array();
Kjartan's avatar
Kjartan committed
763
}
Dries's avatar
 
Dries committed
764

Dries's avatar
 
Dries committed
765 766 767
/**
 * Return an array of synonyms of the given term ID.
 */
Kjartan's avatar
Kjartan committed
768 769
function taxonomy_get_synonyms($tid) {
  if ($tid) {
Dries's avatar
 
Dries committed
770
    $result = db_query('SELECT name FROM {term_synonym} WHERE tid = %d', $tid);
Kjartan's avatar
Kjartan committed
771
    while ($synonym = db_fetch_array($result)) {
Dries's avatar
 
Dries committed
772
      $synonyms[] = $synonym['name'];
Dries's avatar
 
Dries committed
773
    }
Kjartan's avatar
Kjartan committed
774
    return $synonyms ? $synonyms : array();
Dries's avatar
 
Dries committed
775
  }
Kjartan's avatar
Kjartan committed
776 777
  else {
    return array();
Dries's avatar
 
Dries committed
778
  }
Kjartan's avatar
Kjartan committed
779
}
Dries's avatar
 
Dries committed
780

Dries's avatar
 
Dries committed
781 782 783 784 785
/**
 * Return the term object that has the given string as a synonym.
 */
function taxonomy_get_synonym_root($synonym) {
  return db_fetch_object(db_query("SELECT * FROM {term_synonym} s, {term_data} t WHERE t.tid = s.tid AND s.name = '%s'", $synonym));
Kjartan's avatar
Kjartan committed
786
}
Dries's avatar
 
Dries committed
787

Dries's avatar
 
Dries committed
788 789 790
/**
 * Given a term id, count the number of published nodes in it.
 */
Dries's avatar
 
Dries committed
791
function taxonomy_term_count_nodes($tid, $type = 0) {
Kjartan's avatar
Kjartan committed
792
  static $count;
Dries's avatar
 
Dries committed
793

Dries's avatar
 
Dries committed
794 795 796
  if (!isset($count[$type])) {
    // $type == 0 always evaluates true is $type is a string
    if (is_numeric($type)) {
797
      $result = db_query(db_rewrite_sql('SELECT t.tid, COUNT(n.nid) AS c FROM {term_node} t INNER JOIN {node} n ON t.nid = n.nid WHERE n.status = 1 GROUP BY t.tid'));
Dries's avatar
 
Dries committed
798 799
    }
    else {
800
      $result = db_query(db_rewrite_sql("SELECT t.tid, COUNT(n.nid) AS c FROM {term_node} t, {node} n WHERE t.nid = n.nid AND n.status = 1 AND n.type = '%s' GROUP BY t.tid"), $type);
Dries's avatar
 
Dries committed
801
    }
Kjartan's avatar
Kjartan committed
802
    while ($term = db_fetch_object($result)) {
Dries's avatar
 
Dries committed
803
      $count[$type][$term->tid] = $term->c;
Dries's avatar
 
Dries committed
804 805 806
    }
  }

Kjartan's avatar
Kjartan committed
807
  foreach (_taxonomy_term_children($tid) as $c) {
Dries's avatar
 
Dries committed
808
    $children_count += taxonomy_term_count_nodes($c, $type);
Kjartan's avatar
Kjartan committed