node.module 21.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
64

  $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
65

Dries Buytaert's avatar
   
Dries Buytaert committed
66
67
68
  return $output;
}

Dries Buytaert's avatar
CHANGES    
Dries Buytaert committed
69
function node_conf_filters() {
Dries Buytaert's avatar
   
Dries Buytaert committed
70
71
  $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
72
  $output .= "<hr />";
Dries Buytaert's avatar
   
Dries Buytaert committed
73
  $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
74
  $output .= "<hr />";
Dries Buytaert's avatar
CHANGES    
Dries Buytaert committed
75
76
77
78
79
80
81
82
83
84
85
  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
86
87
88
89
90
  $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
91
92
93
94
95
96
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
97
function node_link($type, $node = 0) {
Dries Buytaert's avatar
   
Dries Buytaert committed
98

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

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

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

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

Dries Buytaert's avatar
   
Dries Buytaert committed
117
118
119
    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
120
121
122
123

    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
124
125
126
127
128
  }

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

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

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

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

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

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

Dries Buytaert's avatar
   
Dries Buytaert committed
152
  $output .= "<h3>". t("Global node settings") ."</h3>";
Dries Buytaert's avatar
   
Dries Buytaert committed
153
  $output .= node_conf_options();
Dries Buytaert's avatar
   
Dries Buytaert committed
154
155
156
157
158
159
160
161

  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
162
163
  $output .= form_submit(t("Save configuration"));
  $output .= form_submit(t("Reset to defaults"));
Dries Buytaert's avatar
Dries Buytaert committed
164

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

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

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

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

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

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

Dries Buytaert's avatar
   
Dries Buytaert committed
182
183
184
185
186
187
188
189
190
191
192
193
194
195
  /*
  ** 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) {
      $output .= " <tr><td>". sprintf(t("revision #%d by %s on %s"), $key, format_name(user_load(array("uid" => $revision["uid"]))), format_date($revision["timestamp"])) ."</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>";
    }
    $output .= "</table>";
  }

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

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

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

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

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

}

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

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

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

Dries Buytaert's avatar
   
Dries Buytaert committed
222
223
  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
224
225
  }

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

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

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

Dries Buytaert's avatar
   
Dries Buytaert committed
238
239
240
241
242
243
244
245
246
247
248
249
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
298
299
300
301
302
303
function node_revision_create($node) {
  global $user;

  if ($node->nid && $node->revision) {
    $no = node_load(array("nid" => $node->nid));
    $node->revisions = $no->revisions;
    unset($no->revisions);
    $node->revisions[] = array("uid" => $user->uid, "timestamp" => time(), "node" => $no);
  }

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

  watchdog("message", "node: rolled-back '$node->title'");
}

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

  unset($node->revisions[$revision]);
  node_save($node, array("nid", "revisions"));
}

Dries Buytaert's avatar
 
Dries Buytaert committed
304
function node_admin() {
Dries Buytaert's avatar
   
Dries Buytaert committed
305
  global $op, $id, $revision, $edit;
Dries Buytaert's avatar
   
Dries Buytaert committed
306

Dries Buytaert's avatar
   
Dries Buytaert committed
307
  if (user_access("administer nodes")) {
Dries Buytaert's avatar
   
Dries Buytaert committed
308

Dries Buytaert's avatar
   
Dries Buytaert committed
309
310
311
    /*
    ** Compile a list of the administrative links:
    */
Dries Buytaert's avatar
Dries Buytaert committed
312

Dries Buytaert's avatar
   
Dries Buytaert committed
313
314
315
316
    $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
317

Dries Buytaert's avatar
   
Dries Buytaert committed
318
    print "<small>". implode(" &middot; ", $links) ."</small><hr />";
Dries Buytaert's avatar
   
Dries Buytaert committed
319
320
321
322
323
324

    switch ($op) {
      case "help":
        print node_help();
        break;
      case "search":
Dries Buytaert's avatar
   
Dries Buytaert committed
325
        print search_type("node", "admin.php?mod=node&op=search");
Dries Buytaert's avatar
   
Dries Buytaert committed
326
        break;
Dries Buytaert's avatar
   
Dries Buytaert committed
327
328
329
330
      case t("Save configuration"):
      case t("Reset to defaults"):
      case "settings":
        print node_admin_settings($edit);
Dries Buytaert's avatar
   
Dries Buytaert committed
331
332
        break;
      case "edit":
Dries Buytaert's avatar
   
Dries Buytaert committed
333
        print node_admin_edit($id);
Dries Buytaert's avatar
   
Dries Buytaert committed
334
        break;
Dries Buytaert's avatar
   
Dries Buytaert committed
335
336
337
338
339
340
      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
341
      case t("Preview"):
Dries Buytaert's avatar
   
Dries Buytaert committed
342
        print node_preview($edit);
Dries Buytaert's avatar
   
Dries Buytaert committed
343
        break;
Dries Buytaert's avatar
   
Dries Buytaert committed
344
      case t("Submit"):
Dries Buytaert's avatar
   
Dries Buytaert committed
345
346
347
348
        print node_submit($edit);
        print node_admin_nodes();
        break;
      case t("Delete"):
Dries Buytaert's avatar
   
Dries Buytaert committed
349
        print node_delete($edit);
Dries Buytaert's avatar
   
Dries Buytaert committed
350
        break;
Dries Buytaert's avatar
   
Dries Buytaert committed
351
      default:
Dries Buytaert's avatar
   
Dries Buytaert committed
352
        print node_admin_nodes();
Dries Buytaert's avatar
   
Dries Buytaert committed
353
354
355
356
    }
  }
  else {
    print message_access();
Dries Buytaert's avatar
 
Dries Buytaert committed
357
358
359
  }
}

Dries Buytaert's avatar
   
Dries Buytaert committed
360
361
362
363
function node_block() {
  global $theme;

  $block[0][subject] = t("Syndicate");
Dries Buytaert's avatar
   
Dries Buytaert committed
364
  $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
365
366
367
368
369
370
  $block[0][info] = "Syndicate";

  return $block;
}

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

Dries Buytaert's avatar
   
Dries Buytaert committed
372
  $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
373
374

  while ($node = db_fetch_object($result)) {
Dries Buytaert's avatar
   
Dries Buytaert committed
375
    $item = node_load(array("nid" => $node->nid, "type" => $node->type));
Dries Buytaert's avatar
   
Dries Buytaert committed
376
377
378

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

Dries Buytaert's avatar
   
Dries Buytaert committed
379
    $items .= format_rss_item($item->title, $link, $item->teaser);
Dries Buytaert's avatar
   
Dries Buytaert committed
380
381
382
  }

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

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

Dries Buytaert's avatar
   
Dries Buytaert committed
390
391
392
393
  print $output;

}

Dries Buytaert's avatar
   
Dries Buytaert committed
394

Dries Buytaert's avatar
   
Dries Buytaert committed
395
function node_validate($node, $error = array()) {
Dries Buytaert's avatar
   
Dries Buytaert committed
396
397
398
399
400
401
402

  global $user;

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

Dries Buytaert's avatar
   
Dries Buytaert committed
403
  $node = node_object($node);
Dries Buytaert's avatar
   
Dries Buytaert committed
404
405
406
407
408

  /*
  ** Validate the title field:
  */

Dries Buytaert's avatar
   
Dries Buytaert committed
409
  if (isset($node->title) && $node->title == "") {
Dries Buytaert's avatar
   
Dries Buytaert committed
410
411
412
413
414
415
416
417
418
    $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
419
420
    if (!$node->name) {
      $node->name = $user->name;
Dries Buytaert's avatar
   
Dries Buytaert committed
421
422
    }

Dries Buytaert's avatar
   
Dries Buytaert committed
423
424
    if (!$node->created) {
      $node->created = time();
Dries Buytaert's avatar
   
Dries Buytaert committed
425
426
    }

Dries Buytaert's avatar
   
Dries Buytaert committed
427
428
    if (!$node->date) {
      $node->date = date("M j, Y g:i a", $node->created);
Dries Buytaert's avatar
   
Dries Buytaert committed
429
430
431
432
433
434
    }

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

Dries Buytaert's avatar
   
Dries Buytaert committed
435
436
    if ($account = user_load(array("name" => $node->name))) {
      $node->uid = $account->uid;
Dries Buytaert's avatar
   
Dries Buytaert committed
437
438
    }
    else {
Dries Buytaert's avatar
   
Dries Buytaert committed
439
      $error["name"] = "<div style=\"color: red;\">". sprintf(t("The name '%s' does not exist."), $node->name) ."</div>";
Dries Buytaert's avatar
   
Dries Buytaert committed
440
441
442
443
444
445
    }

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

Dries Buytaert's avatar
   
Dries Buytaert committed
446
447
    if (strtotime($node->date) > 1000) {
      $node->created = strtotime($node->date);
Dries Buytaert's avatar
   
Dries Buytaert committed
448
449
450
451
    }
    else {
      $error["date"] = "<div style=\"color: red;\">". t("You have to specifiy a valid date.") ."</div>";
    }
Dries Buytaert's avatar
   
Dries Buytaert committed
452
453
454
455
456
457
458
459
460

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

    if ($node->teaser && count(explode(" ", $node->teaser)) < variable_get("minimum_node_size", 0)) {
      $error["teaser"] = "<div style=\"color: red;\">". t("Your teaser is too short.") ."</div>";
    }

Dries Buytaert's avatar
   
Dries Buytaert committed
461
462
  }

Dries Buytaert's avatar
   
Dries Buytaert committed
463
  return $node;
Dries Buytaert's avatar
   
Dries Buytaert committed
464
465
}

Dries Buytaert's avatar
   
Dries Buytaert committed
466

Dries Buytaert's avatar
   
Dries Buytaert committed
467
468
function node_form($edit) {

Dries Buytaert's avatar
   
Dries Buytaert committed
469
470
471
472
  /*
  ** Validate the node:
  */

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

Dries Buytaert's avatar
   
Dries Buytaert committed
475
476
477
478
479
480
481
482
483
  /*
  ** 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
484
485
  $output .= "<div style=\"margin-right: 40px; float: left;\">";

Dries Buytaert's avatar
   
Dries Buytaert committed
486
487
488
489
490
491
492
493
  /*
  ** Add the help text:
  */

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

Dries Buytaert's avatar
   
Dries Buytaert committed
494
495
496
497
498
499
500
501
502
503
504
  /*
  ** 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
505
    $output .= form_textarea(t("Teaser"), "teaser", $edit->teaser, 60, 5, $error["teaser"]);
Dries Buytaert's avatar
   
Dries Buytaert committed
506
507
508
  }

  /*
Dries Buytaert's avatar
   
Dries Buytaert committed
509
  ** Add the node specific fields:
Dries Buytaert's avatar
   
Dries Buytaert committed
510
511
  */

Dries Buytaert's avatar
   
Dries Buytaert committed
512
  $output .= $form;
Dries Buytaert's avatar
   
Dries Buytaert committed
513
514
515
516
517
518
519
520
521
522
523
524
525
526
527
528
529
530
531
532
533
534
535
536
537
538
539
540
541

  /*
  ** 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
542
  if ($edit->nid && node_access("delete", $edit)) {
Dries Buytaert's avatar
   
Dries Buytaert committed
543
544
545
546
547
548
549
550
551
552
553
554
555
556
    $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
557
558
559
560
    $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
561
562
563
564
565
566
567
568
569
570
571
572
573
    $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
574
575
576
577
578
579
    $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
580
581
582
583
584
585
586
587
588
589
590
591
592
    }

    $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
593
594
595
596
597
598
599
600
  if (node_access("update", $node)) {
    $output = node_form($node);
  }
  else {
    $output = message_access();
  }

  return $output;
Dries Buytaert's avatar
   
Dries Buytaert committed
601
602
603
604
605
606
607
608
609
610
611
612
613
614
615
616
617
618
619
620
621
622
623
624
625
626
627
628
629
630
631
632
633
634
}

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
635
function node_submit($node) {
Dries Buytaert's avatar
   
Dries Buytaert committed
636
637
638
639
640
641
642

  global $user;

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

Dries Buytaert's avatar
   
Dries Buytaert committed
643
  $node = node_validate($node);
Dries Buytaert's avatar
   
Dries Buytaert committed
644

Dries Buytaert's avatar
   
Dries Buytaert committed
645
646
647
648
649
650
651
652
  /*
  ** Create a new revision when required:
  */

  if ($node->revision) {
    $node = node_revision_create($node);
  }

Dries Buytaert's avatar
   
Dries Buytaert committed
653
  if ($node->nid) {
Dries Buytaert's avatar
   
Dries Buytaert committed
654
655

    /*
Dries Buytaert's avatar
   
Dries Buytaert committed
656
657
    ** Check whether the current user has the proper access rights to
    ** perform this operation:
Dries Buytaert's avatar
   
Dries Buytaert committed
658
659
    */

Dries Buytaert's avatar
   
Dries Buytaert committed
660
661
662
663
664
665
666
667
    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
668
        $fields = array("nid", "uid", "body", "comment", "created", "promote", "moderate", "revisions", "status", "teaser", "title", "type" => $node->type);
Dries Buytaert's avatar
   
Dries Buytaert committed
669
670
671
672
673
674
675
676
      }
      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)));

      $output = t("The node has been updated.");
Dries Buytaert's avatar
   
Dries Buytaert committed
677
678
    }
    else {
Dries Buytaert's avatar
   
Dries Buytaert committed
679
680
      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
681
682
683
684
    }

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

Dries Buytaert's avatar
   
Dries Buytaert committed
686
    /*
Dries Buytaert's avatar
   
Dries Buytaert committed
687
688
    ** Check whether the current user has the proper access rights to
    ** perform this operation:
Dries Buytaert's avatar
   
Dries Buytaert committed
689
690
    */

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

Dries Buytaert's avatar
   
Dries Buytaert committed
693
694
695
696
      /*
      ** 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
697

Dries Buytaert's avatar
   
Dries Buytaert committed
698
699
700
701
702
703
      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
704

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

Dries Buytaert's avatar
   
Dries Buytaert committed
707
708
709
710
711
712
      $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
713
714
715
716
717
  }

  return $output;
}

Dries Buytaert's avatar
   
Dries Buytaert committed
718
function node_delete($edit) {
Dries Buytaert's avatar
   
Dries Buytaert committed
719

Dries Buytaert's avatar
   
Dries Buytaert committed
720
721
722
  $node = node_load(array("nid" => $edit["nid"]));

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

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

Dries Buytaert's avatar
   
Dries Buytaert committed
726
727
728
729
730
731
732
733
734
735
736
737
738
739
      /*
      ** 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
740
741
742
      $output = t("The node has been deleted.");
    }
    else {
Dries Buytaert's avatar
   
Dries Buytaert committed
743
      $output .= form_item(t("Confirm deletion"), check_output($node->title));
Dries Buytaert's avatar
   
Dries Buytaert committed
744
745
746
747
748
      $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
749
750
  }
  else {
Dries Buytaert's avatar
   
Dries Buytaert committed
751
752
    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
753
754
755
756
757
  }

  return $output;
}

Dries Buytaert's avatar
   
Dries Buytaert committed
758
function node_page() {
Dries Buytaert's avatar
   
Dries Buytaert committed
759
  global $op, $id, $user, $edit, $type, $theme, $meta, $date;
Dries Buytaert's avatar
   
Dries Buytaert committed
760
761
762

  if ($op == "feed") {
    node_feed();
Dries Buytaert's avatar
   
Dries Buytaert committed
763
    return;
Dries Buytaert's avatar
   
Dries Buytaert committed
764
  }
Dries Buytaert's avatar
   
Dries Buytaert committed
765
766
767
768
769
770
771
772
773
774
775
776
777
778
779
780

  $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
781
    case t("Delete"):
Dries Buytaert's avatar
   
Dries Buytaert committed
782
      print node_delete($edit);
Dries Buytaert's avatar
   
Dries Buytaert committed
783
      break;
Dries Buytaert's avatar
   
Dries Buytaert committed
784
    default:
Dries Buytaert's avatar
   
Dries Buytaert committed
785
      $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)));
786
      while ($node = db_fetch_object($result)) {
Dries Buytaert's avatar
   
Dries Buytaert committed
787
        node_view(node_load(array("nid" => $node->nid, "type" => $node->type)), 1);
788
789
      }
  }
Dries Buytaert's avatar
   
Dries Buytaert committed
790
791

  $theme->footer();
Dries Buytaert's avatar
   
Dries Buytaert committed
792
}
Dries Buytaert's avatar
   
Dries Buytaert committed
793

Dries Buytaert's avatar
 
Dries Buytaert committed
794
?>