node.module 23.4 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_node_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
70
  $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."));
  $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
93
94
95
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);
  return $text;
}

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
156
157
158
159
160

  foreach (module_list() as $name) {
    if (module_hook($name, "conf_options") && module_hook($name, "node")) {
      $output .= "<h3>". t(ucfirst(module_invoke($name, "node", "name")) ." settings") ."</h3>";
      $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 node") ."</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
230
  $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)) {
    $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=\"node.php?id=$node->nid\">view node</a></td><td nowrap=\"nowrap\"><a href=\"admin.php?mod=node&op=edit&id=$node->nid\">edit 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
      case "rollback revision":
Dries's avatar
   
Dries committed
369
370
        print node_revision_rollback(node_load(array("nid" => $id)), $revision);
        print node_admin_edit($id);
Dries's avatar
   
Dries committed
371
372
        break;
      case "delete revision":
Dries's avatar
   
Dries committed
373
374
        print node_revision_delete(node_load(array("nid" => $id)), $revision);
        print node_admin_edit($id);
Dries's avatar
   
Dries committed
375
        break;
Dries's avatar
   
Dries committed
376
      case t("Preview"):
Dries's avatar
   
Dries committed
377
        print node_preview($edit);
Dries's avatar
   
Dries committed
378
        break;
Dries's avatar
   
Dries committed
379
      case t("Submit"):
Dries's avatar
   
Dries committed
380
381
382
383
        print node_submit($edit);
        print node_admin_nodes();
        break;
      case t("Delete"):
Dries's avatar
   
Dries committed
384
        print node_delete($edit);
Dries's avatar
   
Dries committed
385
        break;
Dries's avatar
   
Dries committed
386
      default:
Dries's avatar
   
Dries committed
387
        print node_admin_nodes();
Dries's avatar
   
Dries committed
388
389
390
391
    }
  }
  else {
    print message_access();
Dries's avatar
 
Dries committed
392
393
394
  }
}

Dries's avatar
   
Dries committed
395
396
397
398
function node_block() {
  global $theme;

  $block[0][subject] = t("Syndicate");
Dries's avatar
   
Dries committed
399
  $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
400
401
402
403
404
405
  $block[0][info] = "Syndicate";

  return $block;
}

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

Dries's avatar
   
Dries committed
407
  $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
408
409

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

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

Dries's avatar
   
Dries committed
414
    $items .= format_rss_item($item->title, $link, $item->teaser);
Dries's avatar
   
Dries committed
415
416
417
  }

  $output .= "<?xml version=\"1.0\" encoding=\"ISO-8859-1\" ?>\n";
Dries's avatar
   
Dries committed
418
  $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
419
  $output .= "<rss version=\"0.91\">\n";
Dries's avatar
   
Dries committed
420
  $output .= format_rss_channel(variable_get("site_name", "drupal"), path_uri(), variable_get("site_slogan", ""), $items);
Dries's avatar
   
Dries committed
421
422
  $output .= "</rss>\n";

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

Dries's avatar
   
Dries committed
425
426
427
428
  print $output;

}

Dries's avatar
   
Dries committed
429

Dries's avatar
   
Dries committed
430
function node_validate($node, $error = array()) {
Dries's avatar
   
Dries committed
431
432
433
434
435
436
437

  global $user;

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

Dries's avatar
   
Dries committed
438
  $node = node_object($node);
Dries's avatar
   
Dries committed
439
440
441
442
443

  /*
  ** Validate the title field:
  */

Dries's avatar
   
Dries committed
444
  if (isset($node->title) && $node->title == "") {
Dries's avatar
   
Dries committed
445
446
447
448
449
450
451
452
453
    $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
454
455
    if (!$node->name) {
      $node->name = $user->name;
Dries's avatar
   
Dries committed
456
457
    }

Dries's avatar
   
Dries committed
458
459
    if (!$node->created) {
      $node->created = time();
Dries's avatar
   
Dries committed
460
461
    }

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

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

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

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

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

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

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

Dries's avatar
   
Dries committed
496
497
  }

Dries's avatar
   
Dries committed
498
  return $node;
Dries's avatar
   
Dries committed
499
500
}

Dries's avatar
   
Dries committed
501

Dries's avatar
   
Dries committed
502
503
function node_form($edit) {

Dries's avatar
   
Dries committed
504
505
506
507
  /*
  ** Validate the node:
  */

Dries's avatar
   
Dries committed
508
  $edit = node_validate($edit, &$error);
Dries's avatar
   
Dries committed
509

Dries's avatar
   
Dries committed
510
511
512
513
514
515
516
517
518
  /*
  ** Get the node specific bits:
  */

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

Dries's avatar
   
Dries committed
519

Dries's avatar
   
Dries committed
520
521
522
523
524
525
526
527
  /*
  ** Add the help text:
  */

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

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

Dries's avatar
   
Dries committed
532
533
534
535
536
537
538
539
540
541
542
  /*
  ** 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
543
    $output .= form_textarea(t("Teaser"), "teaser", $edit->teaser, 60, 5, $error["teaser"]);
Dries's avatar
   
Dries committed
544
545
546
  }

  /*
Dries's avatar
   
Dries committed
547
  ** Add the node specific fields:
Dries's avatar
   
Dries committed
548
549
  */

Dries's avatar
   
Dries committed
550
  $output .= $form;
Dries's avatar
   
Dries committed
551
552
553
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

  /*
  ** 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
580
  if ($edit->nid && node_access("delete", $edit)) {
Dries's avatar
   
Dries committed
581
582
583
584
585
586
587
588
    $output .= form_submit(t("Delete"));
  }

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

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

Dries's avatar
   
Dries committed
591
592
593
    $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
594
595
596
597
    $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
598
599
  }

Dries's avatar
   
Dries committed
600
601
602
603
  $output .= "  </td>";
  $output .= " </tr>";
  $output .= "</table>";

Dries's avatar
   
Dries committed
604
605
606
607
608
609
610
611
612
613
  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
614
615
616
617
618
619
    $links = array();

    foreach (module_list() as $name) {
      if (($info = module_invoke($name, "node", "name")) && node_access("create", array("type" => $name))) {
        $links[] = "<a href=\"module.php?mod=node&op=add&type=$name\">". t($info) ."</a>";
      }
Dries's avatar
   
Dries committed
620
621
622
623
624
625
626
627
628
629
630
631
632
    }

    $output .= sprintf(t("Submit a %s."), implode(", ", $links));
  }

  return $output;
}

function node_edit($id) {
  global $user;

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

Dries's avatar
   
Dries committed
633
634
635
636
637
638
639
640
  if (node_access("update", $node)) {
    $output = node_form($node);
  }
  else {
    $output = message_access();
  }

  return $output;
Dries's avatar
   
Dries committed
641
642
643
644
645
646
647
648
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
674
}

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();
  }

  /*
  ** Display a preview of the node:
  */

  node_view($edit);

  return node_form($edit);
}

Dries's avatar
   
Dries committed
675
function node_submit($node) {
Dries's avatar
   
Dries committed
676
677
678
679
680
681
682

  global $user;

  /*
  ** Fixup the node when required:
  */

Dries's avatar
   
Dries committed
683
  $node = node_validate($node);
Dries's avatar
   
Dries committed
684

Dries's avatar
   
Dries committed
685
686
687
688
  /*
  ** Create a new revision when required:
  */

Dries's avatar
   
Dries committed
689
  $node = node_revision_create($node);
Dries's avatar
   
Dries committed
690

Dries's avatar
   
Dries committed
691
  if ($node->nid) {
Dries's avatar
   
Dries committed
692
693

    /*
Dries's avatar
   
Dries committed
694
695
    ** Check whether the current user has the proper access rights to
    ** perform this operation:
Dries's avatar
   
Dries committed
696
697
    */

Dries's avatar
   
Dries committed
698
699
700
701
702
703
704
705
    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
706
        $fields = array("nid", "uid", "body", "comment", "created", "promote", "moderate", "revisions", "status", "teaser", "title", "type" => $node->type);
Dries's avatar
   
Dries committed
707
708
709
710
711
712
713
      }
      else {
        $fields = array("nid", "uid" => $user->uid, "body", "teaser", "title", "type" => $node->type);
      }

      node_save($node, array_merge($fields, module_invoke($node->type, "save", $node)));

Dries's avatar
   
Dries committed
714
      watchdog("special", "node: updated '$node->title'");
Dries's avatar
   
Dries committed
715
      $output = t("The node has been updated.");
Dries's avatar
   
Dries committed
716
717
    }
    else {
Dries's avatar
   
Dries committed
718
719
      watchdog("warning", "node: not authorized to update node");
      $output = t("You are not authorized to update this node.");
Dries's avatar
   
Dries committed
720
721
722
723
    }

  }
  else {
Dries's avatar
   
Dries committed
724

Dries's avatar
   
Dries committed
725
    /*
Dries's avatar
   
Dries committed
726
727
    ** Check whether the current user has the proper access rights to
    ** perform this operation:
Dries's avatar
   
Dries committed
728
729
    */

Dries's avatar
   
Dries committed
730
    if (node_access("create", $node)) {
Dries's avatar
   
Dries committed
731

Dries's avatar
   
Dries committed
732
733
734
735
      /*
      ** 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
736

Dries's avatar
   
Dries committed
737
738
739
740
741
742
      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
743

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

Dries's avatar
   
Dries committed
746
      watchdog("special", "node: added '$node->title'");
Dries's avatar
   
Dries committed
747
748
749
750
751
752
      $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
753
754
755
756
757
  }

  return $output;
}

Dries's avatar
   
Dries committed
758
function node_delete($edit) {
Dries's avatar
   
Dries committed
759

Dries's avatar
   
Dries committed
760
761
762
  $node = node_load(array("nid" => $edit["nid"]));

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

Dries's avatar
   
Dries committed
764
    if ($edit["confirm"]) {
Dries's avatar
   
Dries committed
765

Dries's avatar
   
Dries committed
766
767
768
769
770
771
772
773
774
775
776
777
778
779
      /*
      ** 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
780
781
782
      $output = t("The node has been deleted.");
    }
    else {
Dries's avatar
   
Dries committed
783
      $output .= form_item(t("Confirm deletion"), check_output($node->title));
Dries's avatar
   
Dries committed
784
785
786
787
788
      $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
789
790
  }
  else {
Dries's avatar
   
Dries committed
791
792
    watchdog("warning", "node: not authorized to remove node");
    $output = t("You are not authorized to remove this node.");
Dries's avatar
   
Dries committed
793
794
795
796
797
  }

  return $output;
}

Dries's avatar
   
Dries committed
798
function node_page() {
Dries's avatar
   
Dries committed
799
  global $op, $id, $user, $edit, $type, $theme, $meta, $date;
Dries's avatar
   
Dries committed
800
801
802

  if ($op == "feed") {
    node_feed();
Dries's avatar
   
Dries committed
803
    return;
Dries's avatar
   
Dries committed
804
  }
Dries's avatar
   
Dries committed
805
806
807
808
809
810
811
812
813
814
815
816
817
818
819
820

  $theme->header();

  switch ($op) {
    case "add":
      $theme->box(t("Node"), node_add($type));
      break;
    case "edit":
      $theme->box(t("Node"), node_edit($id));
      break;
    case t("Preview"):
      $theme->box(t("Node"), node_preview($edit));
      break;
    case t("Submit"):
      $theme->box(t("Node"), node_submit($edit));
      break;
Dries's avatar
   
Dries committed
821
    case t("Delete"):
Dries's avatar
   
Dries committed
822
      print node_delete($edit);
Dries's avatar
   
Dries committed
823
      break;
Dries's avatar
   
Dries committed
824
    default:
Dries's avatar
   
Dries committed
825
      $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)));
826
      while ($node = db_fetch_object($result)) {
Dries's avatar
   
Dries committed
827
        node_view(node_load(array("nid" => $node->nid, "type" => $node->type)), 1);
828
829
      }
  }
Dries's avatar
   
Dries committed
830
831

  $theme->footer();
Dries's avatar
   
Dries committed
832
}
Dries's avatar
   
Dries committed
833

Dries's avatar
 
Dries committed
834
?>