node.module 58 KB
Newer Older
Dries's avatar
   
Dries committed
1
<?php
2
// $Id$
Dries's avatar
   
Dries committed
3

Dries's avatar
   
Dries committed
4
5
6
7
8
/**
 * @file
 * The core that allows content to be submitted to the site.
 */

9
10
define('NODE_NEW_LIMIT', time() - 30 * 24 * 60 * 60);

Dries's avatar
   
Dries committed
11
12
13
14
/**
 * Implementation of hook_help().
 */
function node_help($section) {
15
  switch ($section) {
Dries's avatar
   
Dries committed
16
    case 'admin/help#node':
Dries's avatar
   
Dries committed
17
      $output = t("
Dries's avatar
   
Dries committed
18
19
20
21
22
23
24
      <h3>Nodes</h3>
      <p>The core of the Drupal system is the node. All of the contents of the system are placed in nodes, or extensions of nodes.
      A base node contains:<dl>
      <dt>A Title</dt><dd>Up to 128 characters of text that titles the node.</dd>
      <dt>A Teaser</dt><dd>A small block of text that is meant to get you interested in the rest of node. Drupal will automatically pull a small amount of the body of the node to make the teaser (To configure how long the teaser will be <a href=\"%teaser\">click here</a>). The teaser can be changed if you don't like what Drupal grabs.</dd>
      <dt>The Body</dt><dd>The main text that comprises your content.</dd>
      <dt>A Type</dt><dd>What kind of node is this? Blog, book, forum, comment, unextended, etc.</dd>
25
      <dt>An Author</dt><dd>The author's name. It will either be \"anonymous\" or a valid user. You <em>cannot</em> set it to an arbitrary value.</dd>
Dries's avatar
   
Dries committed
26
27
      <dt>Authored on</dt><dd>The date the node was written.</dd>
      <dt>Changed</dt><dd>The last time this node was changed.</dd>
28
      <dt>Sticky at top of lists</dt><dd>In listings such as the frontpage or a taxonomy overview the teasers of a selected amount of nodes is displayed. If you want to force a node to appear on the top of such a listing, you must set it to 'sticky'. This way it will float to the top of a listing, and it will not be pushed down by newer content.
Dries's avatar
   
Dries committed
29
30
      <dt>Allow user comments</dt><dd>A node can have comments. These comments can be written by other users (Read-write), or only by admins (Read-only).</dd>
      <dt>Revisions</dt><dd>Drupal has a revision system so that you can \"roll back\" to an older version of a post if the new version is not what you want.</dd>
Dries's avatar
   
Dries committed
31
      <dt>Promote to front page</dt><dd>To get people to look at the new stuff on your site you can choose to move it to the front page. The front page is configured to show the teasers from only a few of the total nodes you have on your site (To configure how many teasers <a href=\"%teaser\">click here</a>).</dd>
Dries's avatar
   
Dries committed
32
33
34
35
      <dt>In moderation queue</dt><dd>Drupal has a moderation system. If it is active, a node is in one of three states: approved and published, approved and unpublished, and awaiting approval. If you are moderating a node it should be in the moderation queue.</dd>
      <dt>Votes</dt><dd>If you are moderating a node this counts how many votes the node has gotten. Once a node gets a certain number of vote it will either be approved or dropped.
      <dt>Score</dt><dd>The score of the node is gotten by the votes it is given.</dd>
      <dt>Users</dt><dd>The list of users who have voted on a moderated node.</dd>
36
      <dt>Published</dt><dd>When using Drupal's moderation system a node remains unpublished -- unavailable to non-moderators -- until it is marked Published.</dd></dl>
37
      <p>Now that you know what is in a node, here are some of the types of nodes available.</p>", array("%teaser" => url("admin/node/configure/settings")));
Dries's avatar
   
Dries committed
38

Dries's avatar
   
Dries committed
39
40
41
      foreach (node_list() as $type) {
        $output .= '<h3>'. t('Node type: %module', array('%module' => node_invoke($type, 'node_name'))). '</h3>';
        $output .= implode("\n", module_invoke_all('help', 'node/add#'. $type));
Dries's avatar
   
Dries committed
42
      }
Dries's avatar
   
Dries committed
43

Dries's avatar
   
Dries committed
44
      return $output;
45

Dries's avatar
   
Dries committed
46
    case 'admin/modules#description':
Dries's avatar
   
Dries committed
47
      return t('The core that allows content to be submitted to the site.');
48
49
    case 'admin/node/configure':
    case 'admin/node/configure/settings':
Dries's avatar
   
Dries committed
50
      return t('Settings for the core of Drupal. Almost everything is a node so these settings will affect most of the site.');
51
    case 'admin/node':
Dries's avatar
   
Dries committed
52
      return t('Below is a list of all of the posts on your site. Other forms of content are listed elsewhere (e.g. <a href="%comments">comments</a>).<br />Clicking a title views the post, while clicking an author\'s name edits their user information.<br />Other post-related tasks are available from the menu.', array('%comments' => url('admin/comment')));
53
    case 'admin/node/search':
Dries's avatar
   
Dries committed
54
      return t('Enter a simple pattern to search for a post. This can include the wildcard character *.<br />For example, a search for "br*" might return "bread bakers", "our daily bread" and "brenda".');
55
    case 'admin/node/configure/defaults':
Dries's avatar
   
Dries committed
56
      return t('This page lets you set the defaults used during creation of nodes for all the different node types.<br /><em>comment:</em> Read/write setting for comments.<br /><em>publish:</em> Is this post publicly viewable, has it been published?<br /><em>promote:</em> Is this post to be promoted to the front page?<br /><em>moderate:</em> Does this post need approval before it can be viewed?<br /><em>sticky:</em> Is this post always visible at the top of lists?<br /><em>revision:</em> Will this post go into the revision system allowing multiple versions to be saved?');
Dries's avatar
   
Dries committed
57
58
59
  }
}

Dries's avatar
   
Dries committed
60
61
62
/**
 * Implementation of hook_cron().
 */
63
function node_cron() {
Dries's avatar
   
Dries committed
64
  db_query('DELETE FROM {history} WHERE timestamp < %d', NODE_NEW_LIMIT);
65
66
}

Dries's avatar
   
Dries committed
67
68
69
/**
 * Menu callback; presents node-specific imformation from admin/help.
 */
Dries's avatar
   
Dries committed
70
function node_help_page() {
Dries's avatar
   
Dries committed
71
  print theme('page', node_help('admin/help#node'));
Dries's avatar
   
Dries committed
72
73
74
}


Dries's avatar
   
Dries committed
75
76
77
78
79
80
81
82
83
84
85
/**
 * Gather a listing of links to nodes.
 *
 * @param $result
 *   A DB result object from a query to fetch node objects.
 * @param $title
 *   A heading for the resulting list.
 *
 * @return
 *   An HTML list suitable as content for a block.
 */
Dries's avatar
   
Dries committed
86
87
function node_title_list($result, $title = NULL) {
  while ($node = db_fetch_object($result)) {
Dries's avatar
   
Dries committed
88
    $number = module_invoke('comment', 'num_all', $node->nid);
Dries's avatar
   
Dries committed
89
    $items[] = l($node->title, "node/$node->nid", array('title' => format_plural($number, '1 comment', '%count comments')));
Dries's avatar
   
Dries committed
90
91
  }

Dries's avatar
   
Dries committed
92
  return theme('node_list', $items, $title);
Dries's avatar
   
Dries committed
93
94
}

Dries's avatar
   
Dries committed
95
96
97
/**
 * Format a listing of links to nodes.
 */
Dries's avatar
   
Dries committed
98
function theme_node_list($items, $title = NULL) {
Dries's avatar
   
Dries committed
99
  return theme('item_list', $items, $title);
Dries's avatar
   
Dries committed
100
101
}

Dries's avatar
   
Dries committed
102
103
104
/**
 * Update the 'last viewed' timestamp of the specified node for current user.
 */
Dries's avatar
   
Dries committed
105
106
107
108
function node_tag_new($nid) {
  global $user;

  if ($user->uid) {
Dries's avatar
   
Dries committed
109
    if (node_last_viewed($nid)) {
Dries's avatar
   
Dries committed
110
      db_query('UPDATE {history} SET timestamp = %d WHERE uid = %d AND nid = %d', time(), $user->uid, $nid);
Dries's avatar
   
Dries committed
111
112
    }
    else {
Dries's avatar
   
Dries committed
113
      db_query('INSERT INTO {history} (uid, nid, timestamp) VALUES (%d, %d, %d)', $user->uid, $nid, time());
Dries's avatar
   
Dries committed
114
115
116
117
    }
  }
}

Dries's avatar
   
Dries committed
118
119
120
121
/**
 * Retrieves the timestamp at which the current user last viewed the
 * specified node.
 */
Dries's avatar
   
Dries committed
122
123
function node_last_viewed($nid) {
  global $user;
Dries's avatar
   
Dries committed
124
  static $history;
Dries's avatar
   
Dries committed
125

Dries's avatar
   
Dries committed
126
127
128
129
130
  if (!isset($history[$nid])) {
    $history[$nid] = db_fetch_object(db_query("SELECT timestamp FROM {history} WHERE uid = '$user->uid' AND nid = %d", $nid));
  }

  return ($history[$nid]->timestamp ? $history[$nid]->timestamp : 0);
Dries's avatar
   
Dries committed
131
132
133
}

/**
Dries's avatar
   
Dries committed
134
 * Determines whether the supplied timestamp is newer than the user's last view
Dries's avatar
   
Dries committed
135
 * of a given node.
Dries's avatar
   
Dries committed
136
 *
Dries's avatar
   
Dries committed
137
138
139
140
 * @param $nid
 *   Node ID whose history supplies the "last viewed" timestamp.
 * @param $timestamp
 *   Time which is compared against node's "last viewed" timestamp.
Dries's avatar
   
Dries committed
141
 */
Dries's avatar
   
Dries committed
142
143
144
145
function node_is_new($nid, $timestamp) {
  global $user;
  static $cache;

Dries's avatar
Dries committed
146
  if (!isset($cache[$nid])) {
Dries's avatar
   
Dries committed
147
    if ($user->uid) {
Dries's avatar
   
Dries committed
148
      $cache[$nid] = node_last_viewed($nid);
Dries's avatar
   
Dries committed
149
150
151
152
153
154
    }
    else {
      $cache[$nid] = time();
    }
  }

155
  return ($timestamp > $cache[$nid] && $timestamp > NODE_NEW_LIMIT);
Dries's avatar
   
Dries committed
156
157
}

Dries's avatar
   
Dries committed
158
159
160
/**
 * Autogenerate a teaser for the given body text.
 */
Dries's avatar
   
Dries committed
161
162
function node_teaser($body) {

Dries's avatar
   
Dries committed
163
  $size = variable_get('teaser_length', 600);
Dries's avatar
   
Dries committed
164

Dries's avatar
   
Dries committed
165
166
167
168
169
  // find where the delimiter is in the body
  $delimiter = strpos($body, '<!--break-->');

  // If the size is zero, and there is no delimiter, we return the entire body.
  if ($size == 0 && $delimiter == 0) {
Dries's avatar
   
Dries committed
170
171
    return $body;
  }
Dries's avatar
   
Dries committed
172

173
174
175
176
177
  // If the body contains PHP code, do not split it up to prevent parse errors.
  if (strpos($body, '<?') != false) {
    return $body;
  }

Dries's avatar
   
Dries committed
178
  // If a valid delimiter has been specified, use it to chop of the teaser.
Dries's avatar
   
Dries committed
179
  if ($delimiter > 0) {
Dries's avatar
   
Dries committed
180
181
182
    return substr($body, 0, $delimiter);
  }

Dries's avatar
   
Dries committed
183
  // If we have a short body, return the entire body.
Dries's avatar
   
Dries committed
184
185
186
187
  if (strlen($body) < $size) {
    return $body;
  }

Dries's avatar
   
Dries committed
188
189
  // In some cases, no delimiter has been specified (e.g. when posting using
  // the Blogger API). In this case, we try to split at paragraph boundaries.
Dries's avatar
   
Dries committed
190
  if ($length = strpos($body, '</p>', $size)) {
Dries's avatar
   
Dries committed
191
    return substr($body, 0, $length + 4);
Dries's avatar
   
Dries committed
192
193
  }

Dries's avatar
   
Dries committed
194
  if ($length = strpos($body, '<br />', $size)) {
Dries's avatar
   
Dries committed
195
    return substr($body, 0, $length);
Dries's avatar
   
Dries committed
196
197
  }

Dries's avatar
   
Dries committed
198
  if ($length = strpos($body, '<br>', $size)) {
Dries's avatar
   
Dries committed
199
200
201
    return substr($body, 0, $length);
  }

202
  if ($length = strpos($body, "\n", $size)) {
Dries's avatar
   
Dries committed
203
    return substr($body, 0, $length);
Dries's avatar
   
Dries committed
204
205
  }

Dries's avatar
   
Dries committed
206
207
  // When even the first paragraph is too long, try to split at the end of
  // the next sentence.
Dries's avatar
   
Dries committed
208
  if ($length = strpos($body, '. ', $size)) {
Dries's avatar
   
Dries committed
209
210
211
    return substr($body, 0, $length + 1);
  }

Dries's avatar
   
Dries committed
212
  if ($length = strpos($body, '! ', $size)) {
Dries's avatar
   
Dries committed
213
214
215
    return substr($body, 0, $length + 1);
  }

Dries's avatar
   
Dries committed
216
  if ($length = strpos($body, '? ', $size)) {
Dries's avatar
   
Dries committed
217
218
219
    return substr($body, 0, $length + 1);
  }

220
221
222
223
224
225
226
227
228
229
230
231
  if ($length = strpos($body, '。', $size)) {
    return substr($body, 0, $length + 1);
  }

  if ($length = strpos($body, '、', $size)) {
    return substr($body, 0, $length + 1);
  }

  if ($length = strpos($body, '؟ ', $size)) {
    return substr($body, 0, $length + 1);
  }

Dries's avatar
   
Dries committed
232
  // If all else fails, simply truncate the string.
233
  return truncate_utf8($body, $size);
Dries's avatar
   
Dries committed
234
235
}

Dries's avatar
   
Dries committed
236

237
/**
Dries's avatar
   
Dries committed
238
239
240
 * Determines the module that defines the node type of the given node.
 *
 * @param &$node
Dries's avatar
   
Dries committed
241
 *   Either a node object, a node array, or a string containing the node type.
Dries's avatar
   
Dries committed
242
243
244
245
 * @return
 *   A string containing the name of the defining module.
 */
function node_get_module_name($node) {
Dries's avatar
   
Dries committed
246
  if (is_array($node)) {
Dries's avatar
   
Dries committed
247
    if ($pos = strpos($node['type'], '-')) {
Dries's avatar
   
Dries committed
248
      return substr($node['type'], 0, $pos);
249
250
    }
    else {
Dries's avatar
   
Dries committed
251
      return $node['type'];
Dries's avatar
   
Dries committed
252
    }
Dries's avatar
   
Dries committed
253
254
  }
  else if (is_object($node)) {
Dries's avatar
   
Dries committed
255
    if ($pos = strpos($node->type, '-')) {
Dries's avatar
   
Dries committed
256
      return substr($node->type, 0, $pos);
257
258
    }
    else {
Dries's avatar
   
Dries committed
259
260
      return $node->type;
    }
Dries's avatar
   
Dries committed
261
262
  }
  else if (is_string($node)) {
Dries's avatar
   
Dries committed
263
    if ($pos = strpos($node, '-')) {
Dries's avatar
   
Dries committed
264
      return substr($node, 0, $pos);
265
266
    }
    else {
Dries's avatar
   
Dries committed
267
268
      return $node;
    }
Dries's avatar
   
Dries committed
269
  }
Dries's avatar
   
Dries committed
270
}
Dries's avatar
   
Dries committed
271

272
/**
Dries's avatar
   
Dries committed
273
274
275
 * Get a list of all the defined node types.
 *
 * @return
Dries's avatar
   
Dries committed
276
 *   An list of all node types.
Dries's avatar
   
Dries committed
277
278
279
280
 */
function node_list() {
  $types = array();
  foreach (module_list() as $module) {
Dries's avatar
   
Dries committed
281
282
    if (module_hook($module, 'node_name')) {
      $module_types = module_invoke($module, 'node_types');
Dries's avatar
   
Dries committed
283
284
      if ($module_types) {
        foreach ($module_types as $type) {
Dries's avatar
   
Dries committed
285
          $types[] = $type;
Dries's avatar
   
Dries committed
286
        }
287
288
      }
      else {
Dries's avatar
   
Dries committed
289
        $types[] = $module;
Dries's avatar
   
Dries committed
290
291
292
293
      }
    }
  }
  return $types;
Dries's avatar
   
Dries committed
294
}
Dries's avatar
   
Dries committed
295

296
/**
Dries's avatar
   
Dries committed
297
298
299
300
301
302
303
304
305
306
 * Determine whether a node hook exists.
 *
 * @param &$node
 *   Either a node object, node array, or a string containing the node type.
 * @param $hook
 *   A string containing the name of the hook.
 * @return
 *   TRUE iff the $hook exists in the node type of $node.
 */
function node_hook(&$node, $hook) {
307
  $function = node_get_module_name($node) ."_$hook";
Dries's avatar
   
Dries committed
308
309
310
311

  return function_exists($function);
}

312
/**
Dries's avatar
   
Dries committed
313
314
315
316
317
318
319
320
321
 * Invoke a node hook.
 *
 * @param &$node
 *   Either a node object, node array, or a string containing the node type.
 * @param $hook
 *   A string containing the name of the hook.
 * @param $a2, $a3, $a4
 *   Arguments to pass on to the hook, after the $node argument.
 * @return
Dries's avatar
   
Dries committed
322
 *   The returned value of the invoked hook.
Dries's avatar
   
Dries committed
323
324
 */
function node_invoke(&$node, $hook, $a2 = NULL, $a3 = NULL, $a4 = NULL) {
325
  $function = node_get_module_name($node) ."_$hook";
Dries's avatar
   
Dries committed
326
327

  if (function_exists($function)) {
Dries's avatar
   
Dries committed
328
    return ($function($node, $a2, $a3, $a4));
Dries's avatar
   
Dries committed
329
330
331
  }
}

Dries's avatar
   
Dries committed
332
333
334
335
336
337
338
339
340
341
342
343
/**
 * Invoke a hook_nodeapi() operation in all modules.
 *
 * @param &$node
 *   Either a node object, node array, or a string containing the node type.
 * @param $op
 *   A string containing the name of the nodeapi operation.
 * @param $a3, $a4
 *   Arguments to pass on to the hook, after the $node and $op arguments.
 * @return
 *   The returned value of the invoked hooks.
 */
Dries's avatar
   
Dries committed
344
function node_invoke_nodeapi(&$node, $op, $a3 = NULL, $a4 = NULL) {
Dries's avatar
   
Dries committed
345
346
  $return = array();
  foreach (module_list() as $name) {
Dries's avatar
   
Dries committed
347
    $function = $name .'_nodeapi';
Dries's avatar
   
Dries committed
348
    if (function_exists($function)) {
Dries's avatar
   
Dries committed
349
      $result = $function($node, $op, $a3, $a4);
350
      if (is_array($result)) {
Dries's avatar
   
Dries committed
351
352
        $return = array_merge($return, $result);
      }
Steven Wittens's avatar
Steven Wittens committed
353
      else if (isset($result)) {
354
355
        $return[] = $result;
      }
Dries's avatar
   
Dries committed
356
357
358
359
360
    }
  }
  return $return;
}

Dries's avatar
   
Dries committed
361
362
363
364
365
366
367
368
369
370
371
372
/**
 * Load a node object from the database.
 *
 * @param $conditions
 *   An array of conditions to match against in the database query. Most calls
 *   will simply use array('nid' => 52).
 * @param $revision
 *   Which numbered revision to load. Defaults to the current version.
 *
 * @return
 *   A fully-populated node object.
 */
Dries's avatar
   
Dries committed
373
function node_load($conditions, $revision = -1) {
Dries's avatar
   
Dries committed
374
  // Turn the conditions into a query.
Dries's avatar
   
Dries committed
375
  foreach ($conditions as $key => $value) {
Dries's avatar
   
Dries committed
376
    $cond[] = 'n.'. check_query($key) ." = '". check_query($value) ."'";
Dries's avatar
   
Dries committed
377
378
  }

Dries's avatar
   
Dries committed
379
  // Retrieve the node.
Dries's avatar
   
Dries committed
380
  $node = db_fetch_object(db_query('SELECT n.*, u.uid, u.name, u.picture, u.data FROM {node} n INNER JOIN {users} u ON u.uid = n.uid WHERE '. implode(' AND ', $cond)));
Dries's avatar
   
Dries committed
381
  $node = drupal_unpack($node);
Dries's avatar
   
Dries committed
382

Dries's avatar
   
Dries committed
383
  // Unserialize the revisions and user data fields.
Dries's avatar
   
Dries committed
384
385
386
387
  if ($node->revisions) {
    $node->revisions = unserialize($node->revisions);
  }

Dries's avatar
   
Dries committed
388
389
  // Call the node specific callback (if any) and piggy-back the
  // results to the node or overwrite some values.
Dries's avatar
   
Dries committed
390
  if ($extra = node_invoke($node, 'load')) {
Dries's avatar
   
Dries committed
391
392
393
394
395
    foreach ($extra as $key => $value) {
      $node->$key = $value;
    }
  }

Dries's avatar
   
Dries committed
396
397
398
399
400
401
  if ($extra = node_invoke_nodeapi($node, 'load')) {
    foreach ($extra as $key => $value) {
      $node->$key = $value;
    }
  }

Dries's avatar
   
Dries committed
402
  // Return the desired revision.
403
  if ($revision != -1 && is_array($node->revisions[$revision])) {
404
   $node = $node->revisions[$revision]['node'];
Dries's avatar
   
Dries committed
405
406
  }

Dries's avatar
   
Dries committed
407
408
409
  return $node;
}

Dries's avatar
   
Dries committed
410
411
412
/**
 * Save a node object into the database.
 */
413
function node_save($node) {
Dries's avatar
   
Dries committed
414
  // Fetch fields to save to node table:
Dries's avatar
   
Dries committed
415
  $fields = node_invoke_nodeapi($node, 'fields');
Dries's avatar
   
Dries committed
416

Dries's avatar
   
Dries committed
417
  // Serialize the revisions field:
Dries's avatar
   
Dries committed
418
419
420
421
  if ($node->revisions) {
    $node->revisions = serialize($node->revisions);
  }

Dries's avatar
   
Dries committed
422
  // Apply filters to some default node fields:
Dries's avatar
   
Dries committed
423
  if (empty($node->nid)) {
Dries's avatar
   
Dries committed
424
    // Insert a new node.
Dries's avatar
   
Dries committed
425

Dries's avatar
   
Dries committed
426
    // Set some required fields:
427
428
429
    if (!$node->created) {
      $node->created = time();
    }
430
431
432
    if (!$node->changed) {
      $node->changed = time();
    }
Dries's avatar
   
Dries committed
433
    $node->nid = db_next_id('{node}_nid');
Dries's avatar
   
Dries committed
434

Dries's avatar
   
Dries committed
435
    // Prepare the query:
Dries's avatar
   
Dries committed
436
437
438
    foreach ($node as $key => $value) {
      if (in_array($key, $fields)) {
        $k[] = check_query($key);
Dries's avatar
   
Dries committed
439
440
        $v[] = $value;
        $s[] = "'%s'";
Dries's avatar
   
Dries committed
441
442
443
      }
    }

Dries's avatar
   
Dries committed
444
    $keysfmt = implode(', ', $s);
Dries's avatar
   
Dries committed
445
    // We need to quote the placeholders for the values.
Dries's avatar
   
Dries committed
446
447
    $valsfmt = "'". implode("', '", $s) ."'";

Dries's avatar
   
Dries committed
448
    // Insert the node into the database:
Dries's avatar
   
Dries committed
449
    db_query("INSERT INTO {node} (". implode(", ", $k) .") VALUES(". implode(", ", $s) .")", $v);
Dries's avatar
   
Dries committed
450

Dries's avatar
   
Dries committed
451
    // Call the node specific callback (if any):
Dries's avatar
   
Dries committed
452
453
    node_invoke($node, 'insert');
    node_invoke_nodeapi($node, 'insert');
Dries's avatar
   
Dries committed
454
455
  }
  else {
Dries's avatar
   
Dries committed
456
    // Update an existing node.
Dries's avatar
   
Dries committed
457

Dries's avatar
   
Dries committed
458
    // Set some required fields:
Dries's avatar
   
Dries committed
459
460
    $node->changed = time();

Dries's avatar
   
Dries committed
461
    // Prepare the query:
Dries's avatar
   
Dries committed
462
463
    foreach ($node as $key => $value) {
      if (in_array($key, $fields)) {
Dries's avatar
   
Dries committed
464
465
        $q[] = check_query($key) ." = '%s'";
        $v[] = $value;
Dries's avatar
   
Dries committed
466
467
      }
    }
Dries's avatar
   
Dries committed
468

Dries's avatar
   
Dries committed
469
    // Update the node in the database:
Dries's avatar
   
Dries committed
470
    db_query("UPDATE {node} SET ". implode(', ', $q) ." WHERE nid = '$node->nid'", $v);
Dries's avatar
   
Dries committed
471

Dries's avatar
   
Dries committed
472
    // Call the node specific callback (if any):
Dries's avatar
   
Dries committed
473
474
    node_invoke($node, 'update');
    node_invoke_nodeapi($node, 'update');
Dries's avatar
   
Dries committed
475
476
  }

Dries's avatar
   
Dries committed
477
  // Clear the cache so an anonymous poster can see the node being added or updated.
Dries's avatar
   
Dries committed
478
479
  cache_clear_all();

Dries's avatar
   
Dries committed
480
  // Return the node ID:
Dries's avatar
   
Dries committed
481
482
483
  return $node->nid;
}

Dries's avatar
   
Dries committed
484
485
486
487
488
489
490
491
492
493
494
495
496
/**
 * Generate a display of the given node.
 *
 * @param $node
 *   A node array or node object.
 * @param $teaser
 *   Whether to display only the teaser for the node.
 * @param $page
 *   Whether the node is being displayed by itself as a page.
 *
 * @return
 *   An HTML representation of the themed node.
 */
Dries's avatar
   
Dries committed
497
function node_view($node, $teaser = FALSE, $page = FALSE) {
Dries's avatar
   
Dries committed
498
  $node = array2object($node);
Dries's avatar
   
Dries committed
499

Dries's avatar
   
Dries committed
500
501
  // Remove the delimiter (if any) that seperates the teaser from the body.
  // TODO: this strips legitimate uses of '<!--break-->' also.
Dries's avatar
   
Dries committed
502
  $node->body = str_replace('<!--break-->', '', $node->body);
Dries's avatar
   
Dries committed
503

Dries's avatar
   
Dries committed
504
505
  // The 'view' hook can be implemented to overwrite the default function
  // to display nodes.
Dries's avatar
   
Dries committed
506
  if (node_hook($node, 'view')) {
Dries's avatar
   
Dries committed
507
    node_invoke($node, 'view', $teaser, $page);
Dries's avatar
   
Dries committed
508
509
  }
  else {
Dries's avatar
   
Dries committed
510
    $node = node_prepare($node, $teaser);
Dries's avatar
   
Dries committed
511
  }
Dries's avatar
   
Dries committed
512
513
514
515
  // Allow modules to change $node->body before viewing.
  node_invoke_nodeapi($node, 'view', $teaser, $page);

  return theme('node', $node, $teaser, $page);
Dries's avatar
   
Dries committed
516
}
Dries's avatar
   
Dries committed
517

Dries's avatar
   
Dries committed
518
519
520
/**
 * Apply filters to a node in preparation for theming.
 */
Dries's avatar
   
Dries committed
521
function node_prepare($node, $teaser = FALSE) {
Dries's avatar
   
Dries committed
522
  $node->readmore = (strlen($node->teaser) < strlen($node->body));
Dries's avatar
   
Dries committed
523
  if ($teaser == FALSE) {
524
    $node->body = check_output($node->body, $node->format);
Dries's avatar
   
Dries committed
525
526
  }
  else {
527
    $node->teaser = check_output($node->teaser, $node->format);
Dries's avatar
   
Dries committed
528
  }
Dries's avatar
   
Dries committed
529
  return $node;
Dries's avatar
   
Dries committed
530
531
}

Dries's avatar
   
Dries committed
532
533
534
/**
 * Generate a page displaying a single node, along with its comments.
 */
Dries's avatar
   
Dries committed
535
function node_show($node, $cid) {
Dries's avatar
   
Dries committed
536
  $output = node_view($node, FALSE, TRUE);
Dries's avatar
   
Dries committed
537

Dries's avatar
   
Dries committed
538
539
  if (function_exists('comment_render') && $node->comment) {
    $output .= comment_render($node, $cid);
Dries's avatar
   
Dries committed
540
541
  }

Dries's avatar
   
Dries committed
542
543
  // Update the history table, stating that this user viewed this node.
  node_tag_new($node->nid);
Dries's avatar
   
Dries committed
544

Dries's avatar
   
Dries committed
545
  return $output;
Dries's avatar
   
Dries committed
546
547
}

Dries's avatar
   
Dries committed
548
549
550
/**
 * Implementation of hook_perm().
 */
Dries's avatar
   
Dries committed
551
function node_perm() {
Dries's avatar
   
Dries committed
552
  return array('administer nodes', 'access content');
Dries's avatar
   
Dries committed
553
554
}

Dries's avatar
   
Dries committed
555
556
557
558
559
560
561
562
563
564
565
566
567
568
569
570
571
572
573
574
575
/**
 * Implementation of hook_search().
 *
 * Return the results of performing a search using the indexed search
 * for this particular type of node.
 *
 * Pass an array to the 'do_search' function which dictates what it
 * will search through, and what it will search for
 *
 * "keys"'s value is the keywords entered by the user
 *
 * "type"'s value is used to identify the node type in the search
 * index.
 *
 * "select"'s value is used to relate the data from the specific nodes
 * table to the data that the search_index table has in it, and the the
 * do_search functino will rank it.
 *
 * The select must always provide the following fields: lno, title,
 * created, uid, name, and count.
 */
Dries's avatar
   
Dries committed
576
function node_search($keys) {
Dries's avatar
   
Dries committed
577
  $find = do_search(array('keys' => $keys, 'type' => 'node', 'select' => "SELECT DISTINCT s.lno as lno, n.title as title, n.created as created, u.uid as uid, u.name as name, s.count as count FROM {search_index} s, {node} n ". node_access_join_sql() ." INNER JOIN {users} u ON n.uid = u.uid WHERE s.lno = n.nid AND s.type = 'node' AND s.word like '%' AND n.status = 1 AND ". node_access_where_sql()));
Dries's avatar
   
Dries committed
578

Dries's avatar
   
Dries committed
579
  return array(t('Matching nodes ranked in order of relevance'), $find);
Dries's avatar
   
Dries committed
580
581
}

Dries's avatar
   
Dries committed
582
/**
Dries's avatar
   
Dries committed
583
 * Menu callback; presents general node configuration options.
Dries's avatar
   
Dries committed
584
585
586
587
588
589
 */
function node_configure() {
  if ($_POST) {
    system_settings_save();
  }

Dries's avatar
   
Dries committed
590
  $output .= form_select(t('Number of posts on main page'), 'default_nodes_main', variable_get('default_nodes_main', 10), drupal_map_assoc(array(1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 15, 20, 25, 30)), t('The default maximum number of posts to display per page on overview pages such as the main page.'));
591
  $output .= form_select(t('Length of trimmed posts'), 'teaser_length', variable_get('teaser_length', 600), array(0 => t('Unlimited'), 200 => t('200 characters'), 400 => t('400 characters'), 600 => t('600 characters'), 800 => t('800 characters'), 1000 => t('1000 characters'), 1200 => t('1200 characters'), 1400 => t('1400 characters'), 1600 => t('1600 characters'), 1800 => t('1800 characters'), 2000 => t('2000 characters')), t("The maximum number of characters used in the trimmed version of a post.  Drupal will use this setting to determine at which offset long posts should be trimmed.  The trimmed version of a post is typically used as a teaser when displaying the post on the main page, in XML feeds, etc.  To disable teasers, set to 'Unlimited'. Note that this setting will only affect new or updated content and will not affect existing teasers."));
Dries's avatar
   
Dries committed
592
  $output .= form_radios(t('Preview post'), 'node_preview', variable_get('node_preview', 0), array(t('Optional'), t('Required')), t('Must users preview posts before submitting?'));
Dries's avatar
   
Dries committed
593

Dries's avatar
   
Dries committed
594
  print theme('page', system_settings_form($output));
Dries's avatar
   
Dries committed
595
596
}

Dries's avatar
   
Dries committed
597
598
599
/**
 * Retrieve the comment mode for the given node ID (none, read, or read/write).
 */
Dries's avatar
   
Dries committed
600
function node_comment_mode($nid) {
Dries's avatar
   
Dries committed
601
602
  static $comment_mode;
  if (!isset($comment_mode[$nid])) {
Dries's avatar
   
Dries committed
603
    $comment_mode[$nid] = db_result(db_query('SELECT comment FROM {node} WHERE nid = %d', $nid));
Dries's avatar
   
Dries committed
604
605
  }
  return $comment_mode[$nid];
Dries's avatar
   
Dries committed
606
607
}

Dries's avatar
   
Dries committed
608
609
610
/**
 * Implementation of hook_link().
 */
611
function node_link($type, $node = 0, $main = 0) {
Dries's avatar
   
Dries committed
612
613
  $links = array();

Dries's avatar
   
Dries committed
614
  if ($type == 'node') {
Dries's avatar
   
Dries committed
615
    if (array_key_exists('links', $node)) {
Kjartan's avatar
Kjartan committed
616
617
      $links = $node->links;
    }
Dries's avatar
   
Dries committed
618

Dries's avatar
   
Dries committed
619
    if ($main == 1 && $node->teaser && $node->readmore) {
Dries's avatar
   
Dries committed
620
      $links[] = l(t('read more'), "node/$node->nid", array('title' => t('Read the rest of this posting.'), 'class' => 'read-more'));
Dries's avatar
   
Dries committed
621
    }
Dries's avatar
   
Dries committed
622
623
  }

Dries's avatar
   
Dries committed
624
  return $links;
Dries's avatar
   
Dries committed
625
626
}

Dries's avatar
   
Dries committed
627
628
629
630
631
632
633
634
635
/**
 * Implementation of hook_menu().
 */
function node_menu() {
  $items = array();

  $items[] = array('path' => 'admin/node', 'title' => t('content'),
    'callback' => 'node_admin',
    'access' => user_access('administer nodes'));
Dries's avatar
   
Dries committed
636
637
  $items[] = array('path' => 'admin/node/overview', 'title' => t('list'),
    'type' => MENU_DEFAULT_LOCAL_TASK, 'weight' => -10);
Dries's avatar
   
Dries committed
638
639
640
641
  $items[] = array('path' => 'admin/node/configure', 'title' => t('configure'),
    'callback' => 'node_configure',
    'access' => user_access('administer nodes'),
    'type' => MENU_LOCAL_TASK);
Dries's avatar
   
Dries committed
642
643
644
645
646
647
  $items[] = array('path' => 'admin/node/configure/settings', 'title' => t('settings'),
    'type' => MENU_DEFAULT_LOCAL_TASK, 'weight' => -10);
  $items[] = array('path' => 'admin/node/configure/defaults', 'title' => t('default workflow'),
    'callback' => 'node_default_settings',
    'access' => user_access('administer nodes'),
    'type' => MENU_LOCAL_TASK);
Dries's avatar
   
Dries committed
648
649
650
651
652
653
654
655
656
657
658
659
660
661
662
663
664
665
  if (module_exist('search')) {
    $items[] = array('path' => 'admin/node/search', 'title' => t('search'),
      'callback' => 'node_admin',
      'access' => user_access('administer nodes'),
      'type' => MENU_LOCAL_TASK);
  }

  $items[] = array('path' => 'node', 'title' => t('content'),
    'callback' => 'node_page',
    'access' => user_access('access content'),
    'type' => MENU_SUGGESTED_ITEM);
  $items[] = array('path' => 'node/add', 'title' => t('create content'),
    'callback' => 'node_page',
    'access' => user_access('access content'),
    'type' => MENU_ITEM_GROUPING,
    'weight' => 1);

  if (arg(0) == 'node' && is_numeric(arg(1))) {
Dries's avatar
   
Dries committed
666
667
    $node = node_load(array('nid' => arg(1)));

Dries's avatar
   
Dries committed
668
669
    $items[] = array('path' => 'node/'. arg(1), 'title' => t('view'),
      'callback' => 'node_page',
Dries's avatar
   
Dries committed
670
      'access' => node_access('view', $node),
Dries's avatar
   
Dries committed
671
      'type' => MENU_CALLBACK);
Dries's avatar
   
Dries committed
672
673
    $items[] = array('path' => 'node/'. arg(1) .'/view', 'title' => t('view'),
        'type' => MENU_DEFAULT_LOCAL_TASK, 'weight' => -10);
Dries's avatar
   
Dries committed
674
675
    $items[] = array('path' => 'node/'. arg(1) .'/edit', 'title' => t('edit'),
      'callback' => 'node_page',
Dries's avatar
   
Dries committed
676
      'access' => node_access('update', $node),
677
      'weight' => 1,
Dries's avatar
   
Dries committed
678
      'type' => MENU_LOCAL_TASK);
679
680
681
682
683
684
685
686

    if ($node->revisions) {
      $items[] = array('path' => 'node/'. arg(1) .'/revisions', 'title' => t('revisions'),
        'callback' => 'node_page',
        'access' => user_access('administer nodes'),
        'weight' => 2,
        'type' => MENU_LOCAL_TASK);
    }
Dries's avatar
   
Dries committed
687
688
689
690
691
  }

  return $items;
}

Dries's avatar
   
Dries committed
692
693
function node_admin_edit($node) {
  if (is_numeric($node)) {
Dries's avatar
   
Dries committed
694
    $node = node_load(array('nid' => $node));
Dries's avatar
   
Dries committed
695
  }
Dries's avatar
   
Dries committed
696

Dries's avatar
   
Dries committed
697
  $output .= node_form($node);
Dries's avatar
   
Dries committed
698

Dries's avatar
   
Dries committed
699
  // Display the node form extensions:
700
  $output .= implode("\n", module_invoke_all('node_link', $node));
Dries's avatar
Dries committed
701

Dries's avatar
   
Dries committed
702
  return $output;
Dries's avatar
   
Dries committed
703
704
}

Dries's avatar
   
Dries committed
705
706
707
/**
 * Generate the content administation overview.
 */
Dries's avatar
   
Dries committed
708
function node_admin_nodes() {
Dries's avatar
   
Dries committed
709
  $filters = array(
Dries's avatar
   
Dries committed
710
711
712
713
    array(t('View posts that are new or updated'), 'ORDER BY n.changed DESC'),
    array(t('View posts that need approval'), 'WHERE n.status = 0 OR n.moderate = 1 ORDER BY n.changed DESC'),
    array(t('View posts that are promoted'), 'WHERE n.status = 1 AND n.promote = 1 ORDER BY n.changed DESC'),
    array(t('View posts that are not promoted'), 'WHERE n.status = 1 AND n.promote = 0 ORDER BY n.changed DESC'),
Dries's avatar
   
Dries committed
714
    array(t('View posts that are sticky'), 'WHERE n.status = 1 AND n.sticky = 1 ORDER BY n.changed DESC'),
Dries's avatar
   
Dries committed
715
    array(t('View posts that are unpublished'), 'WHERE n.status = 0 AND n.moderate = 0 ORDER BY n.changed DESC')
Dries's avatar
   
Dries committed
716
717
718
   );

  $operations = array(
Dries's avatar
   
Dries committed
719
720
    array(t('Approve the selected posts'), 'UPDATE {node} SET status = 1, moderate = 0 WHERE nid = %d'),
    array(t('Promote the selected posts'), 'UPDATE {node} SET status = 1, promote = 1 WHERE nid = %d'),
Dries's avatar
   
Dries committed
721
    array(t('Make the selected posts sticky'), 'UPDATE {node} SET status = 1, sticky = 1 WHERE nid = %d'),
Dries's avatar
   
Dries committed
722
723
    array(t('Demote the selected posts'), 'UPDATE {node} SET promote = 0 WHERE nid = %d'),
    array(t('Unpublish the selected posts'), 'UPDATE {node} SET status = 0 WHERE nid = %d')
Dries's avatar
   
Dries committed
724
  );
Dries's avatar
   
Dries committed
725

Dries's avatar
   
Dries committed
726
  // Handle operations:
Dries's avatar
   
Dries committed
727
728
  if (empty($_SESSION['node_overview_filter'])) {
    $_SESSION['node_overview_filter'] = 0;
Dries's avatar
   
Dries committed
729
730
  }

731
732
733
  $op = $_POST['op'];

  if ($op == t('Filter') && isset($_POST['edit']['filter'])) {
Dries's avatar
   
Dries committed
734
    $_SESSION['node_overview_filter'] = $_POST['edit']['filter'];
Dries's avatar
   
Dries committed
735
736
  }

737
  if ($op == t('Update') && isset($_POST['edit']['operation']) && isset($_POST['edit']['status'])) {
Dries's avatar
   
Dries committed
738
739
    $operation = $operations[$_POST['edit']['operation']][1];
    foreach ($_POST['edit']['status'] as $nid => $value) {
Dries's avatar
   
Dries committed
740
      if ($value) {
Dries's avatar
Dries committed
741
        db_query($operation, $nid);
Dries's avatar
   
Dries committed
742
743
744
      }
    }

Dries's avatar
   
Dries committed
745
    drupal_set_message(t('The update has been performed.'));
Dries's avatar
   
Dries committed
746
747
  }

Dries's avatar
   
Dries committed
748
  $filter = $_SESSION['node_overview_filter'];
Dries's avatar
Dries committed
749

Dries's avatar
   
Dries committed
750
  // Render filter form:
Dries's avatar
   
Dries committed
751
752
753
754
  $options = array();
  foreach ($filters as $key => $value) {
    $options[] = $value[0];
  }
Dries's avatar
   
Dries committed
755

Dries's avatar
   
Dries committed
756
  $form  = form_select(NULL, 'filter', $filter, $options);
757
  $form .= form_submit(t('Filter'));
Dries's avatar
   
Dries committed
758

Dries's avatar
   
Dries committed
759
  $output .= '<h3>'. t('Filter options') .'</h3>';
Dries's avatar
   
Dries committed
760
761
  $output .= "<div class=\"container-inline\">$form</div>";

Dries's avatar
   
Dries committed
762
  // Render operations form:
763
764
765
766
767
  $result = pager_query('SELECT n.*, u.name, u.uid FROM {node} n INNER JOIN {users} u ON n.uid = u.uid '. $filters[$filter][1], 50);

  // Make sure the update controls are disabled if we don't have any rows to select from.
  $disabled = !db_num_rows($result);

Dries's avatar
   
Dries committed
768
769
770
771
772
  $options = array();
  foreach ($operations as $key => $value) {
    $options[] = $value[0];
  }

773
774
  $form = form_select(NULL, 'operation', 0, $options, NULL, ($disabled ? 'disabled="disabled"' : ''));
  $form .= form_submit(t('Update'), 'op', ($disabled ? array('disabled' => 'disabled') : array()));
Dries's avatar
   
Dries committed
775

Dries's avatar
   
Dries committed
776
  $output .= '<h3>'. t('Update options') .'</h3>';
Dries's avatar
   
Dries committed
777
778
  $output .= "<div class=\"container-inline\">$form</div>";

Dries's avatar
   
Dries committed
779
  // Overview table:
Dries's avatar
   
Dries committed
780
  $header = array(NULL, t('Title'), t('Type'), t('Author'), t('Status'), array('data' => t('Operations'), 'colspan' => 2));
Dries's avatar
   
Dries committed
781

Dries's avatar
   
Dries committed
782
  while ($node = db_fetch_object($result)) {
Dries's avatar
   
Dries committed
783
    $rows[] = array(form_checkbox(NULL, 'status]['. $node->nid, 1, 0), l($node->title, 'node/'. $node->nid) .' '. (node_is_new($node->nid, $node->changed) ? theme_mark() : ''), node_invoke($node, 'node_name'), format_name($node), ($node->status ? t('published') : t('not published')), l(t('edit'), 'node/'. $node->nid .'/edit'), l(t('delete'), 'admin/node/delete/'. $node->nid));
Dries's avatar
   
Dries committed
784
  }
Dries's avatar
   
Dries committed
785

Dries's avatar
   
Dries committed
786
787
  if ($pager = theme('pager', NULL, 50, 0)) {
    $rows[] = array(array('data' => $pager, 'colspan' => 7));
Dries's avatar
   
Dries committed
788
  }
Dries's avatar
   
Dries committed
789

Dries's avatar
   
Dries committed
790
791
  $output .= '<h3>'. $filters[$filter][0] .'</h3>';
  $output .= theme('table', $header, $rows);
Dries's avatar
   
Dries committed
792
  return form($output);
Dries's avatar
Dries committed
793
794
}

Dries's avatar
   
Dries committed
795
796
797
/**
 * Menu callback; presents the interface for setting node defaults.
 */
Dries's avatar
   
Dries committed
798
function node_default_settings() {
Dries's avatar
   
Dries committed
799
  $op = $_POST['op'];
Dries's avatar
   
Dries committed
800
  $edit = $_POST['edit'];
Kjartan's avatar
Kjartan committed
801

Dries's avatar
   
Dries committed
802
  if ($op == t('Save configuration')) {
Dries's avatar
   
Dries committed
803
    // Save the configuration options:
804
805
806
    foreach ($edit as $name => $value) {
      variable_set($name, $value);
    }
Dries's avatar
   
Dries committed
807
    drupal_set_message(t('The content settings have been saved.'));
808
809
  }

Dries's avatar
   
Dries committed
810
  if ($op == t('Reset to defaults')) {
Dries's avatar
   
Dries committed
811
    // Reset the configuration options to their default value:
812
813
814
    foreach ($edit as $name => $value) {
      variable_del($name);
    }
Dries's avatar
   
Dries committed
815
    drupal_set_message(t('The content settings have been reset to their default values.'));
816
817
  }

Dries's avatar
   
Dries committed
818
  $header = array_merge(array(t('type')), array_keys(node_invoke_nodeapi($node, 'settings')));
Dries's avatar
   
Dries committed
819
  foreach (node_list() as $type) {
820
    $node = new StdClass();
Dries's avatar
   
Dries committed
821
822
    $node->type = $type;
    $cols = array();
Dries's avatar
   
Dries committed
823
824
    foreach (node_invoke_nodeapi($node, 'settings') as $setting) {
      $cols[] = array('data' => $setting, 'align' => 'center', 'width' => 55);
825
    }
Dries's avatar
   
Dries committed
826
    $rows[] = array_merge(array(node_invoke($node, 'node_name')), $cols);
827
  }
Kjartan's avatar
Kjartan committed
828

Dries's avatar
   
Dries committed
829
  $output .= theme('table', $header, $rows);
830

Dries's avatar
   
Dries committed
831
832
  $output .= form_submit(t('Save configuration'));
  $output .= form_submit(t('Reset to defaults'));
Kjartan's avatar
Kjartan committed
833

Dries's avatar
   
Dries committed
834
  print theme('page', form($output));
835
836
}

Dries's avatar
   
Dries committed
837
838
839
/**
 * Generates an overview table of older revisions of a node.
 */
Dries's avatar
   
Dries committed
840
function node_revision_overview($nid) {
Dries's avatar
   
Dries committed
841
842
  if (user_access('administer nodes')) {
    $node = node_load(array('nid' => $nid));
Dries's avatar
   
Dries committed
843

844
845
    drupal_set_title($node->title);

Dries's avatar
   
Dries committed
846
    if ($node->revisions) {
Dries's avatar
   
Dries committed
847
      $header = array(t('Older revisions'), array('colspan' => '3', 'data' => t('Operations')));
Dries's avatar
   
Dries committed
848
849

      foreach ($node->revisions as $key => $revision) {
850
        $rows[] = array(t('revision #%r revised by %u on %d', array('%r' => $key, '%u' => format_name(user_load(array('uid' => $revision['uid']))), '%d' => format_date($revision['timestamp'], 'small'))) . ($revision['history'] ? '<br /><small>'. $revision['history'] .'</small>' : ''), l(t('view'), "node/$node->nid", array(), "revision=$key"), l(t('rollback'), "node/$node->nid/rollback-revision/$key"), l(t('delete'), "node/$node->nid/delete-revision/$key"));
Dries's avatar
   
Dries committed
851
      }
Dries's avatar
   
Dries committed
852
      $output .= theme('table', $header, $rows);
Dries's avatar
   
Dries committed
853
854
855
856
857
858
859
    }
  }

  return $output;
}


Dries's avatar
   
Dries committed
860
861
862
/**
 * Return the revision with the specified revision number.
 */
Dries's avatar
   
Dries committed
863
function node_revision_load($node, $revision) {
Dries's avatar
   
Dries committed
864
  return $node->revisions[$revision]['node'];
Dries's avatar
   
Dries committed
865
866
}

Dries's avatar
   
Dries committed
867
868
869
/**
 * Create and return a new revision of the given node.
 */
Dries's avatar
   
Dries committed
870
871
872
function node_revision_create($node) {
  global $user;

Dries's avatar
   
Dries committed
873
874
  // "Revision" is the name of the field used to indicicate that we have to
  // create a new revision of a node.
Dries's avatar
   
Dries committed
875
  if ($node->nid && $node->revision) {
Dries's avatar
   
Dries committed
876
    $prev = node_load(array('nid' => $node->nid));
Dries's avatar
   
Dries committed
877
878
    $node->revisions = $prev->revisions;
    unset($prev->revisions);
Dries's avatar
   
Dries committed
879
    $node->revisions[] = array('uid' => $user->uid, 'timestamp' => time(), 'node' => $prev, 'history' => $node->history);
Dries's avatar
   
Dries committed
880
881
882
883
884
  }

  return $node;
}

Dries's avatar
   
Dries committed
885
886
887
/**
 * Roll back to the revision with the specified revision number.
 */
Dries's avatar
   
Dries committed
888
function node_revision_rollback($nid, $revision) {
Dries's avatar
   
Dries committed
889
  global $user;
Dries's avatar
   
Dries committed
890

Dries's avatar
   
Dries committed
891
892
  if (user_access('administer nodes')) {
    $node = node_load(array('nid' => $nid));
Dries's avatar
   
Dries committed
893

Dries's avatar
   
Dries committed
894
    // Extract the specified revision:
Dries's avatar
   
Dries committed
895
    $rev = $node->revisions[$revision]['node'];
Dries's avatar
   
Dries committed
896

Dries's avatar
   
Dries committed
897
    // Inherit all the past revisions:
Dries's avatar
   
Dries committed
898
    $rev->revisions = $node->revisions;
Dries's avatar
   
Dries committed
899

Dries's avatar
   
Dries committed
900
    // Save the original/current node:
Dries's avatar
   
Dries committed
901
    $rev->revisions[] = array('uid' => $user->uid, 'timestamp' => time(), 'node' => $node);
Dries's avatar
   
Dries committed
902

Dries's avatar
   
Dries committed
903
    // Remove the specified revision:
Dries's avatar
   
Dries committed
904
    unset($rev->revisions[$revision]);
Dries's avatar
   
Dries committed
905

Dries's avatar
   
Dries committed
906
    // Save the node:
Dries's avatar
   
Dries committed
907
908
909
    foreach ($node as $key => $value) {
      $filter[] = $key;
    }
Dries's avatar
   
Dries committed
910

Dries's avatar
   
Dries committed
911
912
    node_save($rev, $filter);

Dries's avatar
   
Dries committed
913
    drupal_set_message(t('Rolled back to revision %revision of %title', array('%revision' => "<em>#$revision</em>", '%title' => "<em>$node->title</em>")));
914
    drupal_goto('node/'. $nid .'/revisions');
Dries's avatar
   
Dries committed
915
  }
Dries's avatar
   
Dries committed
916
917
}

Dries's avatar
   
Dries committed
918
919
920
/**
 * Delete the revision with specified revision number.
 */
Dries's avatar
   
Dries committed
921
function node_revision_delete($nid, $revision) {
Dries's avatar
   
Dries committed
922
923
  if (user_access('administer nodes')) {
    $node = node_load(array('nid' => $nid));
Dries's avatar<