node.module 24.3 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
9
function node_help() {
  global $mod;

  if ($mod == "node") {
    foreach (module_list() as $name) {
      if (module_hook($name, "status") && $name != "node") {
Dries's avatar
   
Dries committed
10
        print "<h3>". ucfirst($name) ." type</h3>";
Dries's avatar
   
Dries committed
11
12
13
14
15
16
        print module_invoke($name, "help");
      }
    }
  }
}

Dries's avatar
   
Dries committed
17
18
function node_access($op, $node = 0) {

Dries's avatar
   
Dries committed
19
20
  if (user_access("administer nodes")) {
    return 1;
Dries's avatar
   
Dries committed
21
  }
Dries's avatar
   
Dries committed
22
  else {
Dries's avatar
   
Dries committed
23

Dries's avatar
   
Dries committed
24
25
26
    /*
    ** Convert the node to an object if necessary:
    */
Dries's avatar
   
Dries committed
27

Dries's avatar
   
Dries committed
28
29
30
    if (is_array($node)) {
      $node = node_object($node);
    }
Dries's avatar
   
Dries committed
31

Dries's avatar
   
Dries committed
32
33
34
35
36
37
38
39
40
41
42
43
    /*
    ** Construct a function:
    */

    $function = $node->type ."_access";

    if (function_exists($function)) {
      return $function($op, $node);
    }
    else {
      return 0;
    }
Dries's avatar
   
Dries committed
44
45
46
  }
}

Dries's avatar
   
Dries committed
47
function node_perm() {
Dries's avatar
   
Dries committed
48
  return array("administer nodes", "access content", "post content");
Dries's avatar
   
Dries committed
49
50
}

Dries's avatar
   
Dries committed
51
52
53
54
55
56
57
58
59
60
61
function node_search($keys) {
  global $user;

  $result = db_query("SELECT n.nid, n.title, n.created, u.uid, u.name FROM node n LEFT JOIN users u ON n.uid = u.uid WHERE n.status = 1 AND (n.title LIKE '%$keys%' OR n.teaser LIKE '%$keys%' OR n.body LIKE '%$keys%') ORDER BY n.created DESC LIMIT 20");
  while ($node = db_fetch_object($result)) {
    $find[$i++] = array("title" => check_output($node->title), "link" => (user_access("administer nodes") ? "admin.php?mod=node&type=node&op=edit&id=$node->nid" : "node.php?id=$node->nid"), "user" => $node->name, "date" => $node->created);
  }

  return $find;
}

Dries's avatar
   
Dries committed
62
function node_conf_options() {
Dries's avatar
   
Dries committed
63
  $output .= form_select(t("Default number of nodes to display"), "default_nodes_main", variable_get("default_nodes_main", 10), array(1 => 1, 2 => 2, 3 => 3, 4 => 4, 5 =>  5, 6 => 6, 7 => 7, 8 => 8, 9 => 9, 10 => 10, 15 => 15, 20 => 20, 25 => 25, 30 => 30), t("The default maximum number of nodes to display on the main page."));
Dries's avatar
   
Dries committed
64
  $output .= form_select(t("Minimum number of words in teaser"), "minimum_teaser_size", variable_get("minimum_teaser_size", 0), array(0 => "0 words", 10 => "10 words", 25 => "25 words",  50 => "50 words", 75 => "75 words", 100 => "100 words", 125 => "125 words",  150 => "150 words", 175 => "175 words", 200 => "200 words"), t("The minimum number of words a teaser should consist of.  This can be useful to rule out submissions that do not meet the site's standards, such as short test post."));
Dries's avatar
   
Dries committed
65
66
67
  return $output;
}

Dries's avatar
CHANGES    
Dries committed
68
function node_conf_filters() {
Dries's avatar
   
Dries committed
69
  $output .= form_select(t("Enable HTML tags"), "filter_html", variable_get("filter_html", 0), array("Disabled", "Enabled"), t("Allow HTML and PHP tags in user-contributed content."));
Dries's avatar
   
Dries committed
70
  $output .= form_textfield(t("Allowed HTML tags"), "allowed_html", variable_get("allowed_html", "<a><b><blockquote><dd><dl><dt><i><li><ol><u><ul>"), 64, 128, t("If enabled, optionally specify tags which should not be stripped.  'STYLE' attributes, 'ON' attributes and unclosed tags are always stripped."));
Dries's avatar
   
Dries committed
71
  $output .= "<hr />";
Dries's avatar
   
Dries committed
72
  $output .= form_select(t("Enable link tags"), "filter_link", variable_get("filter_link", 0), array("Disabled", "Enabled"), t("Substitute special [[nodesubject|text]] tags. Your browser will display 'text', and when you click on it your browser will open the node with the subject 'nodesubject'. Please be aware that you'll need to copy the subject of the target node exactly in order to use this feature."));
Dries's avatar
   
Dries committed
73
  $output .= "<hr />";
Dries's avatar
CHANGES    
Dries committed
74
75
76
77
78
79
80
81
82
83
84
  return $output;
}

function node_filter_html($text) {
  $text = eregi_replace("([ \f\r\t\n\'\"])style=[^>]+", "\\1", $text);
  $text = eregi_replace("([ \f\r\t\n\'\"])on[a-z]+=[^>]+", "\\1", $text);
  $text = strip_tags($text, variable_get("allowed_html", ""));
  return $text;
}

function node_filter_link($text) {
Dries's avatar
   
Dries committed
85
86
87
88
89
  $src = array("/\[\[(([^\|]*?)(\|([^\|]*?))?)\]\]/e");  // [link|description]
  $dst = array(format_tag('\\2', '\\4'));                // [link|description]
  return preg_replace($src, $dst, $text);
}

Dries's avatar
CHANGES    
Dries committed
90
91
92
function node_filter($text) {
  if (variable_get("filter_html", 0)) $text = node_filter_html($text);
  if (variable_get("filter_link", 0)) $text = node_filter_link($text);
Dries's avatar
   
Dries committed
93
  return trim($text);
Dries's avatar
CHANGES    
Dries committed
94
95
}

Dries's avatar
   
Dries committed
96
function node_link($type, $node = 0) {
Dries's avatar
   
Dries committed
97

Dries's avatar
   
Dries committed
98
  if ($type == "admin" && user_access("administer nodes")) {
Dries's avatar
   
Dries committed
99
100
101
102
103
    $links[] = "<a href=\"admin.php?mod=node\">content management</a>";
  }

  if ($type == "page") {
    $links[] = "<a href=\"module.php?mod=node&op=add\">submit</a>";
Dries's avatar
   
Dries committed
104
105
  }

Dries's avatar
   
Dries committed
106
  if ($type == "node") {
Dries's avatar
   
Dries committed
107

Kjartan's avatar
Kjartan committed
108
109
110
    if ($node->links) {
      $links = $node->links;
    }
Dries's avatar
   
Dries committed
111
112

    if ($node->teaser != $node->body) {
Dries's avatar
   
Dries committed
113
114
      $links[] = "<a href=\"node.php?id=". $node->nid ."\">". t("read more") ."</a>";
    }
Dries's avatar
   
Dries committed
115

Dries's avatar
   
Dries committed
116
117
118
    if ($node->comment) {
      $links[] = "<a href=\"node.php?id=". $node->nid ."\">". format_plural(node_get_comments($node->nid), "comment", "comments") ."</a>";
    }
Dries's avatar
   
Dries committed
119
120
121
122

    if (user_access("administer nodes")) {
      $links[] = "<a href=\"admin.php?mod=node&op=edit&id=". $node->nid ."\">". t("edit") ."</a>";
    }
Dries's avatar
   
Dries committed
123
124
125
126
127
  }

  return $links ? $links : array();
}

Dries's avatar
   
Dries committed
128
function node_admin_settings($edit = array()) {
Dries's avatar
   
Dries committed
129
130
  global $op;

Dries's avatar
   
Dries committed
131
132
133
134
  if ($op == t("Save configuration")) {
    /*
    ** Save the configuration options:
    */
Dries's avatar
Dries committed
135

Dries's avatar
   
Dries committed
136
137
138
    foreach ($edit as $name => $value) {
      variable_set($name, $value);
    }
Dries's avatar
 
Dries committed
139
140
  }

Dries's avatar
   
Dries committed
141
142
143
144
  if ($op == t("Reset to defaults")) {
    /*
    ** Reset the configuration options to their default value:
    */
Dries's avatar
 
Dries committed
145

Dries's avatar
   
Dries committed
146
147
148
    foreach ($edit as $name=>$value) {
      variable_del($name);
    }
Dries's avatar
   
Dries committed
149
  }
Dries's avatar
Dries committed
150

Dries's avatar
   
Dries committed
151
  $output .= "<h3>". t("Global node settings") ."</h3>";
Dries's avatar
   
Dries committed
152
  $output .= node_conf_options();
Dries's avatar
   
Dries committed
153
154
155

  foreach (module_list() as $name) {
    if (module_hook($name, "conf_options") && module_hook($name, "node")) {
Dries's avatar
   
Dries committed
156
      $output .= "<h3>". ucfirst(module_invoke($name, "node", "name") ." settings") ."</h3>";
Dries's avatar
   
Dries committed
157
158
159
160
      $output .= module_invoke($name, "conf_options");
    }
  }

Dries's avatar
   
Dries committed
161
162
  $output .= form_submit(t("Save configuration"));
  $output .= form_submit(t("Reset to defaults"));
Dries's avatar
Dries committed
163

Dries's avatar
   
Dries committed
164
  return form($output);
Dries's avatar
   
Dries committed
165
166
}

Dries's avatar
   
Dries committed
167
function node_admin_edit($node) {
Dries's avatar
   
Dries committed
168

Dries's avatar
   
Dries committed
169
  if (is_numeric($node)) {
Dries's avatar
   
Dries committed
170
    $node = node_load(array("nid" => $node));
Dries's avatar
   
Dries committed
171
  }
Dries's avatar
   
Dries committed
172

Dries's avatar
   
Dries committed
173
174
175
  /*
  ** Edit node:
  */
Dries's avatar
   
Dries committed
176

Dries's avatar
   
Dries committed
177
  $output .= "<h3>". t("Edit") ." ". module_invoke($node->type, "node", "name") ."</h3>";
Dries's avatar
   
Dries committed
178

Dries's avatar
   
Dries committed
179
  $output .= node_form($node);
Dries's avatar
   
Dries committed
180

Dries's avatar
   
Dries committed
181
182
183
184
185
186
187
188
189
  /*
  ** Edit revisions:
  */

  if ($node->revisions) {
    $output .= "<h3>". t("Edit revisions") ."</h3>";
    $output .= "<table border=\"1\" cellpadding=\"2\" cellspacing=\"2\">";
    $output .= " <tr><th>older revisions</th><th colspan=\"3\">operations</th></tr>";
    foreach ($node->revisions as $key => $revision) {
Dries's avatar
   
Dries committed
190
      $output .= " <tr><td>". sprintf(t("revision #%d revised by %s on %s"), $key, format_name(user_load(array("uid" => $revision["uid"]))), format_date($revision["timestamp"], "small")) . ($revision["history"] ? "<br /><small>". $revision["history"] ."</small>" : "") ."</td><td><a href=\"node.php?id=$node->nid&revision=$key\">". t("view revision") ."</a></td><td><a href=\"admin.php?mod=node&op=rollback+revision&id=$node->nid&revision=$key\">". t("rollback revision") ."</a></td><td><a href=\"admin.php?mod=node&op=delete+revision&id=$node->nid&revision=$key\">". t("delete revision") ."</a></td></tr>";
Dries's avatar
   
Dries committed
191
192
193
194
    }
    $output .= "</table>";
  }

Dries's avatar
   
Dries committed
195
196
197
  /*
  ** Edit comments:
  */
Dries's avatar
   
Dries committed
198

Dries's avatar
   
Dries committed
199
  $output .= "<h3>". t("Edit comments") ."</h3>";
Dries's avatar
   
Dries committed
200

Dries's avatar
   
Dries committed
201
  $result = db_query("SELECT c.cid, c.subject, u.uid, u.name FROM comments c LEFT JOIN users u ON u.uid = c.uid WHERE lid = '". $node["nid"] ."' ORDER BY c.timestamp");
Dries's avatar
 
Dries committed
202

Dries's avatar
   
Dries committed
203
204
  $output .= "<table border=\"1\" cellpadding=\"2\" cellspacing=\"2\">";
  $output .= " <tr><th>title</th><th>author</th><th colspan=\"3\">operations</th></tr>";
Dries's avatar
   
Dries committed
205
  while ($comment = db_fetch_object($result)) {
Dries's avatar
   
Dries committed
206
    $output .= "<tr><td><a href=\"node.php?id=$node->nid&cid=$comment->cid#$comment->cid\">$comment->subject</a></td><td>". format_name($comment) ."</td><td><a href=\"node.php?id=$node->nid&cid=$comment->cid#$comment->cid\">". t("view comment") ."</a></td><td><a href=\"admin.php?mod=comment&op=edit&id=$comment->cid\">". t("edit comment") ."</a></td><td><a href=\"admin.php?mod=comment&op=delete&id=$comment->cid\">". t("delete comment") ."</a></td></tr>";
Dries's avatar
Dries committed
207
  }
Dries's avatar
   
Dries committed
208
  $output .= "</table>";
Dries's avatar
Dries committed
209

Dries's avatar
   
Dries committed
210
  return $output;
Dries's avatar
   
Dries committed
211
212
213

}

Dries's avatar
   
Dries committed
214
215
function node_admin_nodes() {
  global $query;
Dries's avatar
   
Dries committed
216

Dries's avatar
   
Dries committed
217
  $queries = array(array("ORDER BY n.created DESC", "new nodes"), array("ORDER BY n.changed DESC", "updated nodes"), array("WHERE n.status = 1 AND n.moderate = 0 ORDER BY n.nid DESC", "published nodes"), array("WHERE n.status = 0 AND n.moderate = 0 ORDER BY n.nid DESC", "non-published nodes"), array("WHERE n.status = 1 AND n.moderate = 1 ORDER BY n.nid DESC", "pending nodes"), array("WHERE n.status = 1 AND n.promote = 1 ORDER BY n.nid DESC", "promoted nodes"));
Dries's avatar
   
Dries committed
218

Dries's avatar
   
Dries committed
219
  $result = db_query("SELECT n.*, u.name, u.uid FROM node n LEFT JOIN users u ON n.uid = u.uid ". $queries[$query ? $query : 0][0] ." LIMIT 50");
Dries's avatar
   
Dries committed
220

Dries's avatar
   
Dries committed
221
222
  foreach ($queries as $key => $value) {
    $links[] = "<a href=\"admin.php?mod=node&op=nodes&query=$key\">$value[1]</a>";
Dries's avatar
Dries committed
223
224
  }

Dries's avatar
   
Dries committed
225
  $output .= "<small>". implode(" :: ", $links) ."</small><hr />";
Dries's avatar
   
Dries committed
226

Dries's avatar
   
Dries committed
227
228
229
  $output .= "<table border=\"1\" cellpadding=\"2\" cellspacing=\"2\">\n";
  $output .= " <tr><th>title</th><th>type</th><th>author</th><th>status</th><th colspan=\"2\">operations</th></tr>\n";
  while ($node = db_fetch_object($result)) {
Dries's avatar
   
Dries committed
230
    $output .= "<tr><td><a href=\"node.php?id=$node->nid\">". check_output($node->title) ."</a></td><td>$node->type</td><td nowrap=\"nowrap\">". format_name($node) ."</td><td>". ($node->status ? t("published") : t("not published")) ."</td><td nowrap=\"nowrap\"><a href=\"admin.php?mod=node&op=edit&id=$node->nid\">". t("edit node") ."</a></td><td nowrap=\"nowrap\"><a href=\"admin.php?mod=node&op=delete&id=$node->nid\">". t("delete node") ."</a></td></tr>";
Dries's avatar
   
Dries committed
231
  }
Dries's avatar
   
Dries committed
232
  $output .= "</table>";
Dries's avatar
   
Dries committed
233

Dries's avatar
   
Dries committed
234
  return $output;
Dries's avatar
Dries committed
235
236
}

Dries's avatar
   
Dries committed
237
238
239
240
241
242
243
244
245
246
247
248
/*
** Return the revision with the specified revision number.
*/

function node_revision_load($node, $revision) {
  return $node->revisions[$revision]["node"];
}

/*
** Create and return a new revision of the given node.
*/

Dries's avatar
   
Dries committed
249
250
251
function node_revision_create($node) {
  global $user;

Dries's avatar
   
Dries committed
252
253
254
255
256
  /*
  ** '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
257
  if ($node->nid && $node->revision) {
Dries's avatar
   
Dries committed
258
259
260
261
    $prev = node_load(array("nid" => $node->nid));
    $node->revisions = $prev->revisions;
    unset($prev->revisions);
    $node->revisions[] = array("uid" => $user->uid, "timestamp" => time(), "node" => $prev, "history" => $node->history);
Dries's avatar
   
Dries committed
262
263
264
265
266
  }

  return $node;
}

Dries's avatar
   
Dries committed
267
268
269
/*
** Roll-back to the revision with the specified revision number.
*/
Dries's avatar
   
Dries committed
270

Dries's avatar
   
Dries committed
271
272
function node_revision_rollback($node, $revision) {
  global $user;
Dries's avatar
   
Dries committed
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
289
290
291
292
293
294
295
296
297
298
299
300
301
302
303
304
305
306
307

  /*
  ** Extract the specified revision:
  */

  $rev = $node->revisions[$revision]["node"];

  /*
  ** Inherit all the past revisions:
  */

  $rev->revisions = $node->revisions;

  /*
  ** Save the original/current node:
  */

  $rev->revisions[] = array("uid" => $user->uid, "timestamp" => time(), "node" => $node);

  /*
  ** Remove the specified revision:
  */

  unset($rev->revisions[$revision]);

  /*
  ** Save the node:
  */

  foreach ($node as $key => $value) {
    $filter[] = $key;
  }

  node_save($rev, $filter);

Dries's avatar
   
Dries committed
308
  watchdog("special", "node: rollbacked to revision #$revision of '$node->title'");
Dries's avatar
   
Dries committed
309
310
}

Dries's avatar
   
Dries committed
311
312
313
314
315
/*
** Delete the revision with specified revision number.
*/

function node_revision_delete($node, $revision) {
Dries's avatar
   
Dries committed
316
317

  unset($node->revisions[$revision]);
Dries's avatar
   
Dries committed
318

Dries's avatar
   
Dries committed
319
  node_save($node, array("nid", "revisions"));
Dries's avatar
   
Dries committed
320
321
322
323

  watchdog("special", "node: removed revision #$revision of '$node->title'");
}

Dries's avatar
   
Dries committed
324
325
326
327
328
329
330
331
332
333
334
/*
** Return a list of all the existing revision numbers.
*/

function node_revision_list($node) {
  if (is_array($node->revisions)) {
    return array_keys($node->revisions);
  }
  else {
    return array();
  }
Dries's avatar
   
Dries committed
335
336
}

Dries's avatar
 
Dries committed
337
function node_admin() {
Dries's avatar
   
Dries committed
338
  global $op, $id, $revision, $edit;
Dries's avatar
   
Dries committed
339

Dries's avatar
   
Dries committed
340
  if (user_access("administer nodes")) {
Dries's avatar
   
Dries committed
341

Dries's avatar
   
Dries committed
342
343
344
    /*
    ** Compile a list of the administrative links:
    */
Dries's avatar
Dries committed
345

Dries's avatar
   
Dries committed
346
347
348
349
    $links[] = "<a href=\"admin.php?mod=node&op=nodes\">nodes</a>";
    $links[] = "<a href=\"admin.php?mod=node&op=search\">search content</a>";
    $links[] = "<a href=\"admin.php?mod=node&op=settings\">settings</a>";
    $links[] = "<a href=\"admin.php?mod=node&op=help\">help</a>";
Dries's avatar
   
Dries committed
350

Dries's avatar
   
Dries committed
351
    print "<small>". implode(" &middot; ", $links) ."</small><hr />";
Dries's avatar
   
Dries committed
352
353
354
355
356
357

    switch ($op) {
      case "help":
        print node_help();
        break;
      case "search":
Dries's avatar
   
Dries committed
358
        print search_type("node", "admin.php?mod=node&op=search");
Dries's avatar
   
Dries committed
359
        break;
Dries's avatar
   
Dries committed
360
361
362
363
      case t("Save configuration"):
      case t("Reset to defaults"):
      case "settings":
        print node_admin_settings($edit);
Dries's avatar
   
Dries committed
364
365
        break;
      case "edit":
Dries's avatar
   
Dries committed
366
        print node_admin_edit($id);
Dries's avatar
   
Dries committed
367
        break;
Dries's avatar
   
Dries committed
368
369
370
      case "delete":
        print node_delete(array("nid" => $id));
        break;
Dries's avatar
   
Dries committed
371
      case "rollback revision":
Dries's avatar
   
Dries committed
372
373
        print node_revision_rollback(node_load(array("nid" => $id)), $revision);
        print node_admin_edit($id);
Dries's avatar
   
Dries committed
374
375
        break;
      case "delete revision":
Dries's avatar
   
Dries committed
376
377
        print node_revision_delete(node_load(array("nid" => $id)), $revision);
        print node_admin_edit($id);
Dries's avatar
   
Dries committed
378
        break;
Dries's avatar
   
Dries committed
379
      case t("Preview"):
Dries's avatar
   
Dries committed
380
        print node_preview($edit);
Dries's avatar
   
Dries committed
381
        break;
Dries's avatar
   
Dries committed
382
      case t("Submit"):
Dries's avatar
   
Dries committed
383
384
385
386
        print node_submit($edit);
        print node_admin_nodes();
        break;
      case t("Delete"):
Dries's avatar
   
Dries committed
387
        print node_delete($edit);
Dries's avatar
   
Dries committed
388
        break;
Dries's avatar
   
Dries committed
389
      default:
Dries's avatar
   
Dries committed
390
        print node_admin_nodes();
Dries's avatar
   
Dries committed
391
392
393
394
    }
  }
  else {
    print message_access();
Dries's avatar
 
Dries committed
395
396
397
  }
}

Dries's avatar
   
Dries committed
398
399
400
401
function node_block() {
  global $theme;

  $block[0][subject] = t("Syndicate");
Dries's avatar
   
Dries committed
402
  $block[0][content] = "<div align=\"center\"><a href=\"module.php?mod=node&op=feed\"><img src=\"". $theme->image("xml.gif") ."\" width=\"36\" height=\"14\" border=\"0\" alt=\"XML\" /></a></div>\n";
Dries's avatar
   
Dries committed
403
404
405
406
407
408
  $block[0][info] = "Syndicate";

  return $block;
}

function node_feed() {
Dries's avatar
   
Dries committed
409

Dries's avatar
   
Dries committed
410
  $result = db_query("SELECT nid, type FROM node WHERE promote = '1' AND status = '1' ORDER BY created DESC LIMIT 15");
Dries's avatar
   
Dries committed
411
412

  while ($node = db_fetch_object($result)) {
Dries's avatar
   
Dries committed
413
    $item = node_load(array("nid" => $node->nid, "type" => $node->type));
Dries's avatar
   
Dries committed
414
415
416

    $link = path_uri() ."node.php?id=$item->nid";

Dries's avatar
   
Dries committed
417
    $items .= format_rss_item($item->title, $link, $item->teaser);
Dries's avatar
   
Dries committed
418
419
420
  }

  $output .= "<?xml version=\"1.0\" encoding=\"ISO-8859-1\" ?>\n";
Dries's avatar
   
Dries committed
421
  $output .= "<!DOCTYPE rss [<!ENTITY % HTMLlat1 PUBLIC \"-//W3C//ENTITIES Latin 1 for XHTML//EN\" \"http://www.w3.org/TR/xhtml1/DTD/xhtml-lat1.ent\">\n";
Dries's avatar
   
Dries committed
422
  $output .= "<rss version=\"0.91\">\n";
Dries's avatar
   
Dries committed
423
  $output .= format_rss_channel(variable_get("site_name", "drupal"), path_uri(), variable_get("site_slogan", ""), $items);
Dries's avatar
   
Dries committed
424
425
  $output .= "</rss>\n";

Dries's avatar
   
Dries committed
426
427
  header("Content-Type: text/xml");

Dries's avatar
   
Dries committed
428
429
430
431
  print $output;

}

Dries's avatar
   
Dries committed
432

Dries's avatar
   
Dries committed
433
function node_validate($node, $error = array()) {
Dries's avatar
   
Dries committed
434
435
436
437
438
439
440

  global $user;

  /*
  ** Convert the node to an object if necessary:
  */

Dries's avatar
   
Dries committed
441
  $node = node_object($node);
Dries's avatar
   
Dries committed
442
443
444
445
446

  /*
  ** Validate the title field:
  */

Dries's avatar
   
Dries committed
447
  if (isset($node->title) && $node->title == "") {
Dries's avatar
   
Dries committed
448
449
450
451
452
453
454
455
456
    $error["title"] = "<div style=\"color: red;\">". t("You have to specify a valid title.") ."</div>";
  }

  if (user_access("administer nodes")) {

    /*
    ** Setup default values if required:
    */

Dries's avatar
   
Dries committed
457
458
    if (!$node->name) {
      $node->name = $user->name;
Dries's avatar
   
Dries committed
459
460
    }

Dries's avatar
   
Dries committed
461
462
    if (!$node->created) {
      $node->created = time();
Dries's avatar
   
Dries committed
463
464
    }

Dries's avatar
   
Dries committed
465
466
    if (!$node->date) {
      $node->date = date("M j, Y g:i a", $node->created);
Dries's avatar
   
Dries committed
467
468
469
470
471
472
    }

    /*
    ** Validate the "authored by"-field:
    */

Dries's avatar
   
Dries committed
473
474
    if ($account = user_load(array("name" => $node->name))) {
      $node->uid = $account->uid;
Dries's avatar
   
Dries committed
475
476
    }
    else {
Dries's avatar
   
Dries committed
477
      $error["name"] = "<div style=\"color: red;\">". sprintf(t("The name '%s' does not exist."), $node->name) ."</div>";
Dries's avatar
   
Dries committed
478
479
480
481
482
483
    }

    /*
    ** Validate the "authored on"-field:
    */

Dries's avatar
   
Dries committed
484
485
    if (strtotime($node->date) > 1000) {
      $node->created = strtotime($node->date);
Dries's avatar
   
Dries committed
486
487
488
489
    }
    else {
      $error["date"] = "<div style=\"color: red;\">". t("You have to specifiy a valid date.") ."</div>";
    }
Dries's avatar
   
Dries committed
490
491
492
493
494

    /*
    ** Validate the "teaser"-field:
    */

Dries's avatar
   
Dries committed
495
    if ($node->teaser && count(explode(" ", $node->teaser)) < variable_get("minimum_teaser_size", 0)) {
Dries's avatar
   
Dries committed
496
497
498
      $error["teaser"] = "<div style=\"color: red;\">". t("Your teaser is too short.") ."</div>";
    }

Dries's avatar
   
Dries committed
499
500
  }

Dries's avatar
   
Dries committed
501
  return $node;
Dries's avatar
   
Dries committed
502
503
}

Dries's avatar
   
Dries committed
504

Dries's avatar
   
Dries committed
505
506
function node_form($edit) {

Dries's avatar
   
Dries committed
507
508
509
510
  /*
  ** Validate the node:
  */

Dries's avatar
   
Dries committed
511
  $edit = node_validate($edit, &$error);
Dries's avatar
   
Dries committed
512

Dries's avatar
   
Dries committed
513
514
515
516
517
518
519
520
521
  /*
  ** Get the node specific bits:
  */

  $function = $edit->type ."_form";
  if (function_exists($function)) {
    $form .= $function(&$edit, &$help, &$error);
  }

Dries's avatar
   
Dries committed
522

Dries's avatar
   
Dries committed
523
524
525
526
527
528
529
530
  /*
  ** Add the help text:
  */

  if ($help) {
    $output .= "<p>$help</p>";
  }

Dries's avatar
   
Dries committed
531
532
533
534
  $output .= "<table border=\"0\" cellpadding=\"2\" cellspacing=\"2\">";
  $output .= " <tr>";
  $output .= "  <td valign=\"top\">";

Dries's avatar
   
Dries committed
535
536
537
538
539
540
541
542
543
544
545
  /*
  ** Add the default fields:
  */

  $output .= form_textfield(t("Title"), "title", $edit->title, 60, 64, $error["title"]);

  if ($edit->body && !$edit->teaser) {
    $edit->teaser = node_teaser($edit->body);
  }

  if ($edit->teaser) {
Dries's avatar
   
Dries committed
546
    $output .= form_textarea(t("Teaser"), "teaser", $edit->teaser, 60, 5, $error["teaser"]);
Dries's avatar
   
Dries committed
547
548
549
  }

  /*
Dries's avatar
   
Dries committed
550
  ** Add the node specific fields:
Dries's avatar
   
Dries committed
551
552
  */

Dries's avatar
   
Dries committed
553
  $output .= $form;
Dries's avatar
   
Dries committed
554
555
556
557
558
559
560
561
562
563
564
565
566
567
568
569
570
571
572
573
574
575
576
577
578
579
580
581
582

  /*
  ** Add the hidden fields:
  */

  if ($edit->nid) {
    $output .= form_hidden("nid", $edit->nid);
  }

  if ($edit->uid) {
    $output .= form_hidden("uid", $edit->uid);
  }

  if ($edit->created) {
    $output .= form_hidden("created", $edit->created);
  }

  $output .= form_hidden("type", $edit->type);

  /*
  ** Add the buttons:
  */

  $output .= form_submit(t("Preview"));

  if ($edit->title && $edit->type && !$error) {
    $output .= form_submit(t("Submit"));
  }

Dries's avatar
   
Dries committed
583
  if ($edit->nid && node_access("delete", $edit)) {
Dries's avatar
   
Dries committed
584
585
586
587
588
589
590
591
    $output .= form_submit(t("Delete"));
  }

  /*
  ** Add the admin specific parts:
  */

  if (user_access("administer nodes")) {
Dries's avatar
   
Dries committed
592
593
    $output .= "</td><td valign=\"top\">";

Dries's avatar
   
Dries committed
594
595
596
    $output .= form_textfield(t("Authored by"), "name", $edit->name, 20, 25, $error["name"]);
    $output .= form_textfield(t("Authored on"), "date", $edit->date, 20, 25, $error["date"]);
    $output .= "<br />";
Dries's avatar
   
Dries committed
597
598
599
600
    $output .= form_select(t("Set public/published"), "status", $edit->status, array("Disabled", "Enabled"));
    $output .= form_select(t("Allow users comments"), "comment", $edit->comment, array("Disabled", "Enabled"));
    $output .= form_select(t("Promote to front page"), "promote", $edit->promote, array("Disabled", "Enabled"));
    $output .= form_select(t("Create new revision"), "revision", $edit->revision, array("Disabled", "Enabled"));
Dries's avatar
   
Dries committed
601
602
  }

Dries's avatar
   
Dries committed
603
604
605
606
  $output .= "  </td>";
  $output .= " </tr>";
  $output .= "</table>";

Dries's avatar
   
Dries committed
607
608
609
610
611
612
613
614
615
616
  return form($output);
}

function node_add($type) {
  global $user;

  if ($type) {
    $output = node_form(array("uid" => $user->uid, "type" => $type));
  }
  else {
Dries's avatar
   
Dries committed
617
618
    $links = array();

Dries's avatar
   
Dries committed
619

Dries's avatar
   
Dries committed
620
    foreach (module_list() as $name) {
Dries's avatar
   
Dries committed
621
622
623
624
625
      if (module_hook($name, "node") && node_access("create", array("type" => $name))) {
        $output .= "<li>";
        $output .= " <a href=\"module.php?mod=node&op=add&type=$name\">". module_invoke($name, "node", "name") ."</a>";
        $output .= " <div style=\"margin-left: 20px;\">". module_invoke($name, "node", "description") ."</div>";
        $output .= "</li>";
Dries's avatar
   
Dries committed
626
      }
Dries's avatar
   
Dries committed
627
628
    }

Dries's avatar
   
Dries committed
629
630
    $output = t("Choose the appropriate item from the list:") ."<ul>$output</ul>";

Dries's avatar
   
Dries committed
631
632
633
634
635
636
637
638
639
640
  }

  return $output;
}

function node_edit($id) {
  global $user;

  $node = node_load(array("nid" => $id));

Dries's avatar
   
Dries committed
641
642
643
644
645
646
647
648
  if (node_access("update", $node)) {
    $output = node_form($node);
  }
  else {
    $output = message_access();
  }

  return $output;
Dries's avatar
   
Dries committed
649
650
651
652
653
654
655
656
657
658
659
660
661
662
663
664
665
666
667
668
669
670
671
672
673
}

function node_preview($edit) {

  /*
  ** Load the user's name when needed:
  */

  if ($edit["name"]) {
    $user = user_load(array("name" => $edit["name"]));
    $edit["uid"] = $user->uid;
  }
  else if ($edit["uid"]) {
    $user = user_load(array("uid" => $edit["uid"]));
    $edit["name"] = $user->name;
  }

  /*
  ** Set the created time when needed:
  */

  if (empty($edit["nid"])) {
    $edit["created"] = time();
  }

Dries's avatar
   
Dries committed
674
675
676
677
678
679
680
681
  /*
  ** Apply the required filters:
  */

  foreach ($edit as $key => $value) {
    $node->$key = check_input($value);
  }

Dries's avatar
   
Dries committed
682
683
684
685
  /*
  ** Display a preview of the node:
  */

Dries's avatar
   
Dries committed
686
  node_view($node);
Dries's avatar
   
Dries committed
687
688
689
690

  return node_form($edit);
}

Dries's avatar
   
Dries committed
691
function node_submit($node) {
Dries's avatar
   
Dries committed
692
693
  global $user;

Dries's avatar
   
Dries committed
694
695
696
697
698
699
700
  /*
  ** Verify a user's submission rate and avoid duplicate nodes being
  ** inserted:
  */

  throttle("node", variable_get("max_node_rate", 900));

Dries's avatar
   
Dries committed
701
702
703
704
  /*
  ** Fixup the node when required:
  */

Dries's avatar
   
Dries committed
705
  $node = node_validate($node);
Dries's avatar
   
Dries committed
706

Dries's avatar
   
Dries committed
707
708
709
710
  /*
  ** Create a new revision when required:
  */

Dries's avatar
   
Dries committed
711
  $node = node_revision_create($node);
Dries's avatar
   
Dries committed
712

Dries's avatar
   
Dries committed
713
  if ($node->nid) {
Dries's avatar
   
Dries committed
714
715

    /*
Dries's avatar
   
Dries committed
716
717
    ** Check whether the current user has the proper access rights to
    ** perform this operation:
Dries's avatar
   
Dries committed
718
719
    */

Dries's avatar
   
Dries committed
720
721
722
723
724
725
726
727
    if (node_access("update", $node)) {

      /*
      ** Compile a list of the node fields and their default values that users
      ** and administrators are allowed to save when updating a node.
      */

      if (user_access("administer nodes")) {
Dries's avatar
   
Dries committed
728
        $fields = array("nid", "uid", "body", "comment", "created", "promote", "moderate", "revisions", "status", "teaser", "title", "type" => $node->type);
Dries's avatar
   
Dries committed
729
730
731
732
733
      }
      else {
        $fields = array("nid", "uid" => $user->uid, "body", "teaser", "title", "type" => $node->type);
      }

Dries's avatar
   
Dries committed
734
      node_save($node, array_merge($fields, module_invoke($node->type, "save", "update", $node)));
Dries's avatar
   
Dries committed
735

Dries's avatar
   
Dries committed
736
      watchdog("special", "node: updated '$node->title'");
Dries's avatar
   
Dries committed
737
      $output = t("The node has been updated.");
Dries's avatar
   
Dries committed
738
739
    }
    else {
Dries's avatar
   
Dries committed
740
741
      watchdog("warning", "node: not authorized to update node");
      $output = t("You are not authorized to update this node.");
Dries's avatar
   
Dries committed
742
743
744
745
    }

  }
  else {
Dries's avatar
   
Dries committed
746

Dries's avatar
   
Dries committed
747
    /*
Dries's avatar
   
Dries committed
748
749
    ** Check whether the current user has the proper access rights to
    ** perform this operation:
Dries's avatar
   
Dries committed
750
751
    */

Dries's avatar
   
Dries committed
752
    if (node_access("create", $node)) {
Dries's avatar
   
Dries committed
753

Dries's avatar
   
Dries committed
754
755
756
757
      /*
      ** Compile a list of the node fields and their default values that users
      ** and administrators are allowed to save when inserting a new node.
      */
Dries's avatar
   
Dries committed
758

Dries's avatar
   
Dries committed
759
760
761
762
763
764
      if (user_access("administer nodes")) {
        $fields = array("uid", "body", "comment" => 1, "promote", "moderate", "status" => 1, "teaser", "title", "type" => $node->type);
      }
      else {
        $fields = array("uid" => $user->uid, "body", "comment" => 1, "teaser", "title", "type" => $node->type);
      }
Dries's avatar
   
Dries committed
765

Dries's avatar
   
Dries committed
766
      node_save($node, array_merge($fields, module_invoke($node->type, "save", "create", $node)));
Dries's avatar
   
Dries committed
767

Dries's avatar
   
Dries committed
768
      watchdog("special", "node: added '$node->title'");
Dries's avatar
   
Dries committed
769
770
771
772
773
774
      $output = t("Thanks for your submission.");
    }
    else {
      watchdog("warning", "node: not authorized to create node");
      $output = t("You are not authorized to create this node.");
    }
Dries's avatar
   
Dries committed
775
776
777
778
779
  }

  return $output;
}

Dries's avatar
   
Dries committed
780
function node_delete($edit) {
Dries's avatar
   
Dries committed
781

Dries's avatar
   
Dries committed
782
783
784
  $node = node_load(array("nid" => $edit["nid"]));

  if (node_access("delete", $node)) {
Dries's avatar
   
Dries committed
785

Dries's avatar
   
Dries committed
786
    if ($edit["confirm"]) {
Dries's avatar
   
Dries committed
787

Dries's avatar
   
Dries committed
788
789
790
791
792
793
794
795
796
797
798
799
800
801
      /*
      ** Delete the specified node and its comments:
      */

      db_query("DELETE FROM node WHERE nid = '$node->nid'");
      db_query("DELETE FROM comments WHERE lid = '$node->nid'");

      /*
      ** Call the node specific callback (if any):
      */

      module_invoke($node->type, "delete", &$node);

      watchdog("special", "node: deleted '$node->title'");
Dries's avatar
   
Dries committed
802
803
804
      $output = t("The node has been deleted.");
    }
    else {
Dries's avatar
   
Dries committed
805
      $output .= form_item(t("Confirm deletion"), check_output($node->title));
Dries's avatar
   
Dries committed
806
807
808
809
810
      $output .= form_hidden("nid", $node->nid);
      $output .= form_hidden("confirm", 1);
      $output .= form_submit(t("Delete"));
      $output = form($output, "post", "admin.php?mod=node");
    }
Dries's avatar
   
Dries committed
811
812
  }
  else {
Dries's avatar
   
Dries committed
813
814
    watchdog("warning", "node: not authorized to remove node");
    $output = t("You are not authorized to remove this node.");
Dries's avatar
   
Dries committed
815
816
817
818
819
  }

  return $output;
}

Dries's avatar
   
Dries committed
820
function node_page() {
Dries's avatar
   
Dries committed
821
  global $op, $id, $user, $edit, $type, $theme, $meta, $date;
Dries's avatar
   
Dries committed
822
823
824

  if ($op == "feed") {
    node_feed();
Dries's avatar
   
Dries committed
825
    return;
Dries's avatar
   
Dries committed
826
  }
Dries's avatar
   
Dries committed
827

Dries's avatar
   
Dries committed
828
829
830
831
832
833
834
835
836
837
838
839
840
841
  /*
  ** Try to find a good title:
  */

  if ($type) {
    $title = ucfirst(module_invoke($type, "node", "name"));
  }
  else if ($edit["type"]) {
    $title = ucfirst(module_invoke($edit["type"], "node", "name"));
  }
  else {
    $title = t("Submission form");
  }

Dries's avatar
   
Dries committed
842
843
844
845
  $theme->header();

  switch ($op) {
    case "add":
Dries's avatar
   
Dries committed
846
      $theme->box($title, node_add($type));
Dries's avatar
   
Dries committed
847
848
      break;
    case "edit":
Dries's avatar
   
Dries committed
849
      $theme->box($title, node_edit($id));
Dries's avatar
   
Dries committed
850
851
      break;
    case t("Preview"):
Dries's avatar
   
Dries committed
852
      $theme->box($title, node_preview($edit));
Dries's avatar
   
Dries committed
853
854
      break;
    case t("Submit"):
Dries's avatar
   
Dries committed
855
      $theme->box($title, node_submit($edit));
Dries's avatar
   
Dries committed
856
      break;
Dries's avatar
   
Dries committed
857
    case t("Delete"):
Dries's avatar
   
Dries committed
858
      print node_delete($edit);
Dries's avatar
   
Dries committed
859
      break;
Dries's avatar
   
Dries committed
860
    default:
Dries's avatar
   
Dries committed
861
      $result = db_query("SELECT nid, type FROM node WHERE ". ($meta ? "attributes LIKE '%". check_input($meta) ."%' AND " : "") ." promote = '1' AND status = '1' AND created <= '". ($date > 0 ? check_input($date) : time()) ."' ORDER BY created DESC LIMIT ". ($user->nodes ? $user->nodes : variable_get("default_nodes_main", 10)));
862
      while ($node = db_fetch_object($result)) {
Dries's avatar
   
Dries committed
863
        node_view(node_load(array("nid" => $node->nid, "type" => $node->type)), 1);
864
865
      }
  }
Dries's avatar
   
Dries committed
866
867

  $theme->footer();
Dries's avatar
   
Dries committed
868
}
Dries's avatar
   
Dries committed
869

Dries's avatar
 
Dries committed
870
?>