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_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
  $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
?>