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

Dries Buytaert's avatar
   
Dries Buytaert 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 Buytaert's avatar
   
Dries Buytaert committed
10
        print "<h3>". ucfirst($name) ." type</h3>";
Dries Buytaert's avatar
   
Dries Buytaert committed
11
12
13
14
15
16
        print module_invoke($name, "help");
      }
    }
  }
}

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

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

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

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

Dries Buytaert's avatar
   
Dries Buytaert 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 Buytaert's avatar
   
Dries Buytaert committed
44
45
46
  }
}

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

Dries Buytaert's avatar
   
Dries Buytaert 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 Buytaert's avatar
   
Dries Buytaert committed
62
function node_conf_options() {
Dries Buytaert's avatar
   
Dries Buytaert 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 Buytaert's avatar
   
Dries Buytaert 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 Buytaert's avatar
   
Dries Buytaert committed
65
66
67
  return $output;
}

Dries Buytaert's avatar
CHANGES    
Dries Buytaert committed
68
function node_conf_filters() {
Dries Buytaert's avatar
   
Dries Buytaert 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 Buytaert's avatar
   
Dries Buytaert committed
71
  $output .= "<hr />";
Dries Buytaert's avatar
   
Dries Buytaert 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 Buytaert's avatar
   
Dries Buytaert committed
73
  $output .= "<hr />";
Dries Buytaert's avatar
CHANGES    
Dries Buytaert 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 Buytaert's avatar
   
Dries Buytaert 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 Buytaert's avatar
CHANGES    
Dries Buytaert 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 Buytaert's avatar
   
Dries Buytaert committed
96
function node_link($type, $node = 0) {
Dries Buytaert's avatar
   
Dries Buytaert committed
97

Dries Buytaert's avatar
   
Dries Buytaert committed
98
  if ($type == "admin" && user_access("administer nodes")) {
Dries Buytaert's avatar
   
Dries Buytaert 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 Buytaert's avatar
   
Dries Buytaert committed
104
105
  }

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

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

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

Dries Buytaert's avatar
   
Dries Buytaert 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 Buytaert's avatar
   
Dries Buytaert 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 Buytaert's avatar
   
Dries Buytaert committed
123
124
125
126
127
  }

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

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

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

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

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

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

Dries Buytaert's avatar
   
Dries Buytaert committed
151
  $output .= "<h3>". t("Global node settings") ."</h3>";
Dries Buytaert's avatar
   
Dries Buytaert committed
152
  $output .= node_conf_options();
Dries Buytaert's avatar
   
Dries Buytaert 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 Buytaert's avatar
   
Dries Buytaert committed
161
162
  $output .= form_submit(t("Save configuration"));
  $output .= form_submit(t("Reset to defaults"));
Dries Buytaert's avatar
Dries Buytaert committed
163

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

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

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

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

Dries Buytaert's avatar
   
Dries Buytaert committed
177
  $output .= "<h3>". t("Edit node") ."</h3>";
Dries Buytaert's avatar
   
Dries Buytaert committed
178

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

Dries Buytaert's avatar
   
Dries Buytaert 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 Buytaert's avatar
   
Dries Buytaert 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 Buytaert's avatar
   
Dries Buytaert committed
191
192
193
194
    }
    $output .= "</table>";
  }

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

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

Dries Buytaert's avatar
   
Dries Buytaert 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 Buytaert's avatar
 
Dries Buytaert committed
202

Dries Buytaert's avatar
   
Dries Buytaert 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 Buytaert's avatar
   
Dries Buytaert committed
205
  while ($comment = db_fetch_object($result)) {
Dries Buytaert's avatar
   
Dries Buytaert 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 Buytaert's avatar
Dries Buytaert committed
207
  }
Dries Buytaert's avatar
   
Dries Buytaert committed
208
  $output .= "</table>";
Dries Buytaert's avatar
Dries Buytaert committed
209

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

}

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

Dries Buytaert's avatar
   
Dries Buytaert 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 Buytaert's avatar
   
Dries Buytaert committed
218

Dries Buytaert's avatar
   
Dries Buytaert 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 Buytaert's avatar
   
Dries Buytaert committed
220

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

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

Dries Buytaert's avatar
   
Dries Buytaert 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 Buytaert's avatar
   
Dries Buytaert committed
231
  }
Dries Buytaert's avatar
   
Dries Buytaert committed
232
  $output .= "</table>";
Dries Buytaert's avatar
   
Dries Buytaert committed
233

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

Dries Buytaert's avatar
   
Dries Buytaert committed
237
238
239
function node_revision_create($node) {
  global $user;

Dries Buytaert's avatar
   
Dries Buytaert committed
240
241
242
243
244
  /*
  ** 'revision' is the name of the field used to indicicate that we
  ** have to create a new revision of a node.
  */

Dries Buytaert's avatar
   
Dries Buytaert committed
245
  if ($node->nid && $node->revision) {
Dries Buytaert's avatar
   
Dries Buytaert committed
246
247
248
249
    $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 Buytaert's avatar
   
Dries Buytaert committed
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
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
  }

  return $node;
}

function node_revision_rollback($nid, $revision) {
  global $user;

  /*
  ** Load the original/current node:
  */

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

  /*
  ** 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 Buytaert's avatar
   
Dries Buytaert committed
298
  watchdog("special", "node: rollbacked to revision #$revision of '$node->title'");
Dries Buytaert's avatar
   
Dries Buytaert committed
299
300
301
302
303
304
}

function node_revision_delete($nid, $revision) {
  $node = node_load(array("nid" => $nid));

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

Dries Buytaert's avatar
   
Dries Buytaert committed
306
  node_save($node, array("nid", "revisions"));
Dries Buytaert's avatar
   
Dries Buytaert committed
307
308
309
310
311
312

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

function node_revision_previous($node) {
  return end(array_keys($node->revisions));
Dries Buytaert's avatar
   
Dries Buytaert committed
313
314
}

Dries Buytaert's avatar
 
Dries Buytaert committed
315
function node_admin() {
Dries Buytaert's avatar
   
Dries Buytaert committed
316
  global $op, $id, $revision, $edit;
Dries Buytaert's avatar
   
Dries Buytaert committed
317

Dries Buytaert's avatar
   
Dries Buytaert committed
318
  if (user_access("administer nodes")) {
Dries Buytaert's avatar
   
Dries Buytaert committed
319

Dries Buytaert's avatar
   
Dries Buytaert committed
320
321
322
    /*
    ** Compile a list of the administrative links:
    */
Dries Buytaert's avatar
Dries Buytaert committed
323

Dries Buytaert's avatar
   
Dries Buytaert committed
324
325
326
327
    $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 Buytaert's avatar
   
Dries Buytaert committed
328

Dries Buytaert's avatar
   
Dries Buytaert committed
329
    print "<small>". implode(" &middot; ", $links) ."</small><hr />";
Dries Buytaert's avatar
   
Dries Buytaert committed
330
331
332
333
334
335

    switch ($op) {
      case "help":
        print node_help();
        break;
      case "search":
Dries Buytaert's avatar
   
Dries Buytaert committed
336
        print search_type("node", "admin.php?mod=node&op=search");
Dries Buytaert's avatar
   
Dries Buytaert committed
337
        break;
Dries Buytaert's avatar
   
Dries Buytaert committed
338
339
340
341
      case t("Save configuration"):
      case t("Reset to defaults"):
      case "settings":
        print node_admin_settings($edit);
Dries Buytaert's avatar
   
Dries Buytaert committed
342
343
        break;
      case "edit":
Dries Buytaert's avatar
   
Dries Buytaert committed
344
        print node_admin_edit($id);
Dries Buytaert's avatar
   
Dries Buytaert committed
345
        break;
Dries Buytaert's avatar
   
Dries Buytaert committed
346
347
348
349
350
351
      case "rollback revision":
        print node_revision_rollback($id, $revision);
        break;
      case "delete revision":
        print node_revision_delete($id, $revision);
        break;
Dries Buytaert's avatar
   
Dries Buytaert committed
352
      case t("Preview"):
Dries Buytaert's avatar
   
Dries Buytaert committed
353
        print node_preview($edit);
Dries Buytaert's avatar
   
Dries Buytaert committed
354
        break;
Dries Buytaert's avatar
   
Dries Buytaert committed
355
      case t("Submit"):
Dries Buytaert's avatar
   
Dries Buytaert committed
356
357
358
359
        print node_submit($edit);
        print node_admin_nodes();
        break;
      case t("Delete"):
Dries Buytaert's avatar
   
Dries Buytaert committed
360
        print node_delete($edit);
Dries Buytaert's avatar
   
Dries Buytaert committed
361
        break;
Dries Buytaert's avatar
   
Dries Buytaert committed
362
      default:
Dries Buytaert's avatar
   
Dries Buytaert committed
363
        print node_admin_nodes();
Dries Buytaert's avatar
   
Dries Buytaert committed
364
365
366
367
    }
  }
  else {
    print message_access();
Dries Buytaert's avatar
 
Dries Buytaert committed
368
369
370
  }
}

Dries Buytaert's avatar
   
Dries Buytaert committed
371
372
373
374
function node_block() {
  global $theme;

  $block[0][subject] = t("Syndicate");
Dries Buytaert's avatar
   
Dries Buytaert committed
375
  $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 Buytaert's avatar
   
Dries Buytaert committed
376
377
378
379
380
381
  $block[0][info] = "Syndicate";

  return $block;
}

function node_feed() {
Dries Buytaert's avatar
   
Dries Buytaert committed
382

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

  while ($node = db_fetch_object($result)) {
Dries Buytaert's avatar
   
Dries Buytaert committed
386
    $item = node_load(array("nid" => $node->nid, "type" => $node->type));
Dries Buytaert's avatar
   
Dries Buytaert committed
387
388
389

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

Dries Buytaert's avatar
   
Dries Buytaert committed
390
    $items .= format_rss_item($item->title, $link, $item->teaser);
Dries Buytaert's avatar
   
Dries Buytaert committed
391
392
393
  }

  $output .= "<?xml version=\"1.0\" encoding=\"ISO-8859-1\" ?>\n";
Dries Buytaert's avatar
   
Dries Buytaert committed
394
  $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 Buytaert's avatar
   
Dries Buytaert committed
395
  $output .= "<rss version=\"0.91\">\n";
Dries Buytaert's avatar
   
Dries Buytaert committed
396
  $output .= format_rss_channel(variable_get("site_name", "drupal"), path_uri(), variable_get("site_slogan", ""), $items);
Dries Buytaert's avatar
   
Dries Buytaert committed
397
398
  $output .= "</rss>\n";

Dries Buytaert's avatar
   
Dries Buytaert committed
399
400
  header("Content-Type: text/xml");

Dries Buytaert's avatar
   
Dries Buytaert committed
401
402
403
404
  print $output;

}

Dries Buytaert's avatar
   
Dries Buytaert committed
405

Dries Buytaert's avatar
   
Dries Buytaert committed
406
function node_validate($node, $error = array()) {
Dries Buytaert's avatar
   
Dries Buytaert committed
407
408
409
410
411
412
413

  global $user;

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

Dries Buytaert's avatar
   
Dries Buytaert committed
414
  $node = node_object($node);
Dries Buytaert's avatar
   
Dries Buytaert committed
415
416
417
418
419

  /*
  ** Validate the title field:
  */

Dries Buytaert's avatar
   
Dries Buytaert committed
420
  if (isset($node->title) && $node->title == "") {
Dries Buytaert's avatar
   
Dries Buytaert committed
421
422
423
424
425
426
427
428
429
    $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 Buytaert's avatar
   
Dries Buytaert committed
430
431
    if (!$node->name) {
      $node->name = $user->name;
Dries Buytaert's avatar
   
Dries Buytaert committed
432
433
    }

Dries Buytaert's avatar
   
Dries Buytaert committed
434
435
    if (!$node->created) {
      $node->created = time();
Dries Buytaert's avatar
   
Dries Buytaert committed
436
437
    }

Dries Buytaert's avatar
   
Dries Buytaert committed
438
439
    if (!$node->date) {
      $node->date = date("M j, Y g:i a", $node->created);
Dries Buytaert's avatar
   
Dries Buytaert committed
440
441
442
443
444
445
    }

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

Dries Buytaert's avatar
   
Dries Buytaert committed
446
447
    if ($account = user_load(array("name" => $node->name))) {
      $node->uid = $account->uid;
Dries Buytaert's avatar
   
Dries Buytaert committed
448
449
    }
    else {
Dries Buytaert's avatar
   
Dries Buytaert committed
450
      $error["name"] = "<div style=\"color: red;\">". sprintf(t("The name '%s' does not exist."), $node->name) ."</div>";
Dries Buytaert's avatar
   
Dries Buytaert committed
451
452
453
454
455
456
    }

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

Dries Buytaert's avatar
   
Dries Buytaert committed
457
458
    if (strtotime($node->date) > 1000) {
      $node->created = strtotime($node->date);
Dries Buytaert's avatar
   
Dries Buytaert committed
459
460
461
462
    }
    else {
      $error["date"] = "<div style=\"color: red;\">". t("You have to specifiy a valid date.") ."</div>";
    }
Dries Buytaert's avatar
   
Dries Buytaert committed
463
464
465
466
467

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

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

Dries Buytaert's avatar
   
Dries Buytaert committed
472
473
  }

Dries Buytaert's avatar
   
Dries Buytaert committed
474
  return $node;
Dries Buytaert's avatar
   
Dries Buytaert committed
475
476
}

Dries Buytaert's avatar
   
Dries Buytaert committed
477

Dries Buytaert's avatar
   
Dries Buytaert committed
478
479
function node_form($edit) {

Dries Buytaert's avatar
   
Dries Buytaert committed
480
481
482
483
  /*
  ** Validate the node:
  */

Dries Buytaert's avatar
   
Dries Buytaert committed
484
  $edit = node_validate($edit, &$error);
Dries Buytaert's avatar
   
Dries Buytaert committed
485

Dries Buytaert's avatar
   
Dries Buytaert committed
486
487
488
489
490
491
492
493
494
  /*
  ** Get the node specific bits:
  */

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

Dries Buytaert's avatar
   
Dries Buytaert committed
495
496
  $output .= "<div style=\"margin-right: 40px; float: left;\">";

Dries Buytaert's avatar
   
Dries Buytaert committed
497
498
499
500
501
502
503
504
  /*
  ** Add the help text:
  */

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

Dries Buytaert's avatar
   
Dries Buytaert committed
505
506
507
508
509
510
511
512
513
514
515
  /*
  ** 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 Buytaert's avatar
   
Dries Buytaert committed
516
    $output .= form_textarea(t("Teaser"), "teaser", $edit->teaser, 60, 5, $error["teaser"]);
Dries Buytaert's avatar
   
Dries Buytaert committed
517
518
519
  }

  /*
Dries Buytaert's avatar
   
Dries Buytaert committed
520
  ** Add the node specific fields:
Dries Buytaert's avatar
   
Dries Buytaert committed
521
522
  */

Dries Buytaert's avatar
   
Dries Buytaert committed
523
  $output .= $form;
Dries Buytaert's avatar
   
Dries Buytaert committed
524
525
526
527
528
529
530
531
532
533
534
535
536
537
538
539
540
541
542
543
544
545
546
547
548
549
550
551
552

  /*
  ** 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 Buytaert's avatar
   
Dries Buytaert committed
553
  if ($edit->nid && node_access("delete", $edit)) {
Dries Buytaert's avatar
   
Dries Buytaert committed
554
555
556
557
558
559
560
561
562
563
564
565
566
567
    $output .= form_submit(t("Delete"));
  }

  $output .= "</div>";

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

  if (user_access("administer nodes")) {
    $output .= "<div style=\"float: right;\">";
    $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 Buytaert's avatar
   
Dries Buytaert committed
568
569
570
571
    $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 Buytaert's avatar
   
Dries Buytaert committed
572
573
574
575
576
577
578
579
580
581
582
583
584
    $output .= "</div>";
  }

  return form($output);
}

function node_add($type) {
  global $user;

  if ($type) {
    $output = node_form(array("uid" => $user->uid, "type" => $type));
  }
  else {
Dries Buytaert's avatar
   
Dries Buytaert committed
585
586
587
588
589
590
    $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 Buytaert's avatar
   
Dries Buytaert committed
591
592
593
594
595
596
597
598
599
600
601
602
603
    }

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

  return $output;
}

function node_edit($id) {
  global $user;

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

Dries Buytaert's avatar
   
Dries Buytaert committed
604
605
606
607
608
609
610
611
  if (node_access("update", $node)) {
    $output = node_form($node);
  }
  else {
    $output = message_access();
  }

  return $output;
Dries Buytaert's avatar
   
Dries Buytaert committed
612
613
614
615
616
617
618
619
620
621
622
623
624
625
626
627
628
629
630
631
632
633
634
635
636
637
638
639
640
641
642
643
644
645
}

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 Buytaert's avatar
   
Dries Buytaert committed
646
function node_submit($node) {
Dries Buytaert's avatar
   
Dries Buytaert committed
647
648
649
650
651
652
653

  global $user;

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

Dries Buytaert's avatar
   
Dries Buytaert committed
654
  $node = node_validate($node);
Dries Buytaert's avatar
   
Dries Buytaert committed
655

Dries Buytaert's avatar
   
Dries Buytaert committed
656
657
658
659
  /*
  ** Create a new revision when required:
  */

Dries Buytaert's avatar
   
Dries Buytaert committed
660
  $node = node_revision_create($node);
Dries Buytaert's avatar
   
Dries Buytaert committed
661

Dries Buytaert's avatar
   
Dries Buytaert committed
662
  if ($node->nid) {
Dries Buytaert's avatar
   
Dries Buytaert committed
663
664

    /*
Dries Buytaert's avatar
   
Dries Buytaert committed
665
666
    ** Check whether the current user has the proper access rights to
    ** perform this operation:
Dries Buytaert's avatar
   
Dries Buytaert committed
667
668
    */

Dries Buytaert's avatar
   
Dries Buytaert committed
669
670
671
672
673
674
675
676
    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 Buytaert's avatar
   
Dries Buytaert committed
677
        $fields = array("nid", "uid", "body", "comment", "created", "promote", "moderate", "revisions", "status", "teaser", "title", "type" => $node->type);
Dries Buytaert's avatar
   
Dries Buytaert committed
678
679
680
681
682
683
684
      }
      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 Buytaert's avatar
   
Dries Buytaert committed
685
      watchdog("special", "node: updated '$node->title'");
Dries Buytaert's avatar
   
Dries Buytaert committed
686
      $output = t("The node has been updated.");
Dries Buytaert's avatar
   
Dries Buytaert committed
687
688
    }
    else {
Dries Buytaert's avatar
   
Dries Buytaert committed
689
690
      watchdog("warning", "node: not authorized to update node");
      $output = t("You are not authorized to update this node.");
Dries Buytaert's avatar
   
Dries Buytaert committed
691
692
693
694
    }

  }
  else {
Dries Buytaert's avatar
   
Dries Buytaert committed
695

Dries Buytaert's avatar
   
Dries Buytaert committed
696
    /*
Dries Buytaert's avatar
   
Dries Buytaert committed
697
698
    ** Check whether the current user has the proper access rights to
    ** perform this operation:
Dries Buytaert's avatar
   
Dries Buytaert committed
699
700
    */

Dries Buytaert's avatar
   
Dries Buytaert committed
701
    if (node_access("create", $node)) {
Dries Buytaert's avatar
   
Dries Buytaert committed
702

Dries Buytaert's avatar
   
Dries Buytaert committed
703
704
705
706
      /*
      ** 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 Buytaert's avatar
   
Dries Buytaert committed
707

Dries Buytaert's avatar
   
Dries Buytaert committed
708
709
710
711
712
713
      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 Buytaert's avatar
   
Dries Buytaert committed
714

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

Dries Buytaert's avatar
   
Dries Buytaert committed
717
      watchdog("special", "node: added '$node->title'");
Dries Buytaert's avatar
   
Dries Buytaert committed
718
719
720
721
722
723
      $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 Buytaert's avatar
   
Dries Buytaert committed
724
725
726
727
728
  }

  return $output;
}

Dries Buytaert's avatar
   
Dries Buytaert committed
729
function node_delete($edit) {
Dries Buytaert's avatar
   
Dries Buytaert committed
730

Dries Buytaert's avatar
   
Dries Buytaert committed
731
732
733
  $node = node_load(array("nid" => $edit["nid"]));

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

Dries Buytaert's avatar
   
Dries Buytaert committed
735
    if ($edit["confirm"]) {
Dries Buytaert's avatar
   
Dries Buytaert committed
736

Dries Buytaert's avatar
   
Dries Buytaert committed
737
738
739
740
741
742
743
744
745
746
747
748
749
750
      /*
      ** 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 Buytaert's avatar
   
Dries Buytaert committed
751
752
753
      $output = t("The node has been deleted.");
    }
    else {
Dries Buytaert's avatar
   
Dries Buytaert committed
754
      $output .= form_item(t("Confirm deletion"), check_output($node->title));
Dries Buytaert's avatar
   
Dries Buytaert committed
755
756
757
758
759
      $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 Buytaert's avatar
   
Dries Buytaert committed
760
761
  }
  else {
Dries Buytaert's avatar
   
Dries Buytaert committed
762
763
    watchdog("warning", "node: not authorized to remove node");
    $output = t("You are not authorized to remove this node.");
Dries Buytaert's avatar
   
Dries Buytaert committed
764
765
766
767
768
  }

  return $output;
}

Dries Buytaert's avatar
   
Dries Buytaert committed
769
function node_page() {
Dries Buytaert's avatar
   
Dries Buytaert committed
770
  global $op, $id, $user, $edit, $type, $theme, $meta, $date;
Dries Buytaert's avatar
   
Dries Buytaert committed
771
772
773

  if ($op == "feed") {
    node_feed();
Dries Buytaert's avatar
   
Dries Buytaert committed
774
    return;
Dries Buytaert's avatar
   
Dries Buytaert committed
775
  }
Dries Buytaert's avatar
   
Dries Buytaert committed
776
777
778
779
780
781
782
783
784
785
786
787
788
789
790
791

  $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 Buytaert's avatar
   
Dries Buytaert committed
792
    case t("Delete"):
Dries Buytaert's avatar
   
Dries Buytaert committed
793
      print node_delete($edit);
Dries Buytaert's avatar
   
Dries Buytaert committed
794
      break;
Dries Buytaert's avatar
   
Dries Buytaert committed
795
    default:
Dries Buytaert's avatar
   
Dries Buytaert committed
796
      $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)));
797
      while ($node = db_fetch_object($result)) {
Dries Buytaert's avatar
   
Dries Buytaert committed
798
        node_view(node_load(array("nid" => $node->nid, "type" => $node->type)), 1);
799
800
      }
  }
Dries Buytaert's avatar
   
Dries Buytaert committed
801
802

  $theme->footer();
Dries Buytaert's avatar
   
Dries Buytaert committed
803
}
Dries Buytaert's avatar
   
Dries Buytaert committed
804

Dries Buytaert's avatar
 
Dries Buytaert committed
805
?>