node.module 17 KB
Newer Older
Dries's avatar
 
Dries committed
1
2
<?php

Dries's avatar
   
Dries committed
3
4
5
6
7
class Node {
  function Node($node) {
    global $user;
    $this->userid = $node[userid] ? $node[userid] : $user->userid;
    $this->title = $node[title];
8
    $this->attributes = $node[attributes];
Dries's avatar
   
Dries committed
9
10
11
    $this->timestamp = $node[timestamp] ? $node[timestamp] : time();
  }
}
Dries's avatar
 
Dries committed
12

Dries's avatar
   
Dries committed
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
function node_help() {
  global $mod;
 ?>
  <P>Todo.</P>
 <?php

  if ($mod == "node") {
    foreach (module_list() as $name) {
      if (module_hook($name, "status") && $name != "node") {
        print "<H3>". ucfirst($name) ." type</H3>";
        print module_invoke($name, "help");
      }
    }
  }
}

Dries's avatar
   
Dries committed
29
function node_perm() {
Dries's avatar
   
Dries committed
30
  return array("administer nodes", "access content", "post content");
Dries's avatar
   
Dries committed
31
32
}

Dries's avatar
   
Dries committed
33
function node_conf_options() {
Dries's avatar
   
Dries committed
34
  $output .= form_select("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), "The default maximum number of nodes to display on the main page.");
Dries's avatar
   
Dries committed
35
36
37
  return $output;
}

Dries's avatar
CHANGES    
Dries committed
38
function node_conf_filters() {
Dries's avatar
   
Dries committed
39
40
  $output .= form_select("Enable HTML tags", "filter_html", variable_get("filter_html", 0), array("Disabled", "Enabled"), "Allow HTML and PHP tags in user-contributed content.");
  $output .= form_textfield("Allowed HTML tags", "allowed_html", variable_get("allowed_html", "<A><B><BLOCKQUOTE><DD><DL><DT><I><LI><OL><U><UL>"), 64, 128, "If enabled, optionally specify tags which should not be stripped.  'STYLE' attributes, 'ON' attributes and unclosed tags are always stripped.");
Dries's avatar
CHANGES    
Dries committed
41
  $output .= "<HR>";
Dries's avatar
   
Dries committed
42
  $output .= form_select("Enable link tags", "filter_link", variable_get("filter_link", 0), array("Disabled", "Enabled"), "Substitute special [[link]] tags.");
Dries's avatar
CHANGES    
Dries committed
43
44
45
46
47
48
49
50
51
52
53
54
  $output .= "<HR>";
  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
55
56
57
58
59
  $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
60
61
62
63
64
65
function node_filter($text) {
  if (variable_get("filter_html", 0)) $text = node_filter_html($text);
  if (variable_get("filter_link", 0)) $text = node_filter_link($text);
  return $text;
}

Dries's avatar
Dries committed
66
67
function node_cron() {
  db_query("UPDATE node SET status = '". node_status("posted") ."', timestamp_posted = '' WHERE timestamp_posted > 0 AND timestamp_posted < ". time());
Dries's avatar
   
Dries committed
68
69
  db_query("UPDATE node SET status = '". node_status("queued") ."', timestamp_queued = '' WHERE timestamp_queued > 0 AND timestamp_queued < ". time());
  db_query("UPDATE node SET status = '". node_status("dumped") ."', timestamp_hidden = '' WHERE timestamp_hidden > 0 AND timestamp_hidden < ". time());
Dries's avatar
Dries committed
70
71
}

Dries's avatar
   
Dries committed
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
function node_link($context) {

  if ($context == "admin" && user_access("administer nodes")) {
    $links[] = "<a href=\"admin.php?mod=node\">content</a>";
  }

  if ($context[0] && $context[1]) {
    $node = $context[1];
    if ($node->body) {
      $links[] = "<a href=\"node.php?id=". $node->nid ."\">". t("read more") ."</a>";
    }
    if ($node->comment) {
      $links[] = "<a href=\"node.php?id=". $node->nid ."\">". format_plural(node_get_comments($node->nid), "comment", "comments") ."</a>";
    }
  }

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

function node_links($nid, $type) {
Dries's avatar
   
Dries committed
92
93
  global $op;

Dries's avatar
   
Dries committed
94
  $link[] = ($op == "view") ? "view node" : "<A HREF=\"node.php?id=$nid\">view node</A>";
Dries's avatar
   
Dries committed
95
96
97
98
99
100
101
102
  $link[] = ($op == "content") ? "edit content" : "<A HREF=\"admin.php?mod=node&type=$type&op=content&id=$nid\">edit content</A>";
  $link[] = ($op == "option") ? "edit options" : "<A HREF=\"admin.php?mod=node&op=option&id=$nid\">edit options</A>";
  $link[] = ($op == "status") ? "edit status" : "<A HREF=\"admin.php?mod=node&op=status&id=$nid\">edit status</A>";
  $link[] = ($op == "attribute") ? "edit attribute" : "<A HREF=\"admin.php?mod=node&op=attribute&id=$nid\">edit attributes</A>";
  $link[] = ($op == "delete") ? "delete node" : "<A HREF=\"admin.php?mod=node&op=delete&id=$nid\">delete node</A>";
  return $link;
}

Dries's avatar
   
Dries committed
103
function node_overview($query) {
Dries's avatar
   
Dries committed
104
  global $user;
Dries's avatar
 
Dries committed
105

106
  $color = array("#ffffff", "#e5e5e5");
Dries's avatar
   
Dries committed
107
  $query = node_query($query ? $query : 0);
Dries's avatar
Dries committed
108

Dries's avatar
   
Dries committed
109
  $result = db_query("SELECT n.*, u.userid FROM node n LEFT JOIN users u ON n.author = u.id $query[1] LIMIT 50");
Dries's avatar
 
Dries committed
110

Dries's avatar
   
Dries committed
111
  $output .= status($query[0]);
Dries's avatar
 
Dries committed
112
  $output .= "<TABLE BORDER=\"1\" CELLPADDING=\"2\" CELLSPACING=\"2\">\n";
Dries's avatar
Dries committed
113
114
  $output .= " <TR><TH>title</TH><TH>type</TH><TH>status</TH><TH>meta attributes</TH><TH>author</TH><TH>date</TH></TR>\n";

Dries's avatar
 
Dries committed
115
  while ($node = db_fetch_object($result)) {
Dries's avatar
   
Dries committed
116
    $bg = $color[$i++ % sizeof($color)];
Dries's avatar
Dries committed
117

118
    $output .= " <TR BGCOLOR=\"$bg\"><TD><A HREF=\"node.php?id=$node->nid\">". check_output($node->title) ."</A></TD><TD ALIGN=\"center\">$node->type</TD><TD>". node_status($node->status) ."</TD><TD>". check_output($node->attributes) ."</TD><TD>". format_username($node->userid) ."</TD><TD>". format_date($node->timestamp, "small") ."</TD></TR>\n";
Dries's avatar
   
Dries committed
119
    $output .= " <TR BGCOLOR=\"$bg\"><TD ALIGN=\"right\" COLSPAN=\"6\"><SMALL>". implode(", ", node_links($node->nid, $node->type)) ."</SMALL></TD>\n";
Dries's avatar
 
Dries committed
120
121
122
123
124
125
  }
  $output .= "</TABLE>\n";

  return $output;
}

Dries's avatar
Dries committed
126
127
128
function node_edit_option($id) {
  global $user;

129
  $node = node_get_object(array("nid" => $id));
Dries's avatar
 
Dries committed
130

Dries's avatar
   
Dries committed
131
  $form .= form_item("Title", check_output($node->title));
Dries's avatar
   
Dries committed
132
  $form .= form_item("Operations", implode("<br />", node_links($node->nid, $node->type)));
Dries's avatar
   
Dries committed
133
134
  $form .= form_select("Comment", "comment", $node->comment, node_comment_status(), "Allow users to post comments to this node.");
  $form .= form_select("Promote", "promote", $node->promote, node_promote_status(), "Promote this node on the main page.");
Dries's avatar
Dries committed
135
136
137
  $form .= form_textfield("Moderate", "moderate", $node->moderate, 35, 255, t("A comma-seperated list of the moderators their usernames."));
  $form .= form_hidden("nid", $node->nid);
  $form .= form_submit("Save node");
Dries's avatar
 
Dries committed
138

Dries's avatar
   
Dries committed
139
  return form("admin.php?mod=node&id=$node->nid", $form);
Dries's avatar
 
Dries committed
140
141
}

Dries's avatar
Dries committed
142
function node_edit_attribute($id) {
Dries's avatar
   
Dries committed
143
  global $user;
Dries's avatar
 
Dries committed
144

145
  $node = node_get_object(array("nid" => $id));
Dries's avatar
 
Dries committed
146

Dries's avatar
   
Dries committed
147
  $form .= form_item("Title", check_output($node->title));
Dries's avatar
   
Dries committed
148
  $form .= form_item("Operations", implode("<br />", node_links($node->nid, $node->type)));
Dries's avatar
   
Dries committed
149
  $form .= form_textfield("Attributes", "attributes", $node->attributes, 64, 128, "A comma-seperated list of attributes.  Example: 'Software, Webserver, Apache'.");
Dries's avatar
   
Dries committed
150
151
  $form .= form_hidden("nid", $node->nid);
  $form .= form_submit("Save node");
Dries's avatar
 
Dries committed
152

Dries's avatar
   
Dries committed
153
  return form("admin.php?mod=node&id=$node->nid", $form);
Dries's avatar
 
Dries committed
154
155
}

Dries's avatar
Dries committed
156
157
158
159
160
function node_edit_status($id) {
  global $REQUEST_URI;

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

Dries's avatar
   
Dries committed
161
  $form .= form_item("Title", check_output($node->title));
Dries's avatar
   
Dries committed
162
  $form .= form_item("Operations", implode("<br />", node_links($node->nid, $node->type)));
Dries's avatar
Dries committed
163
164
165
166
167
168
169
170
171
172
  $form .= form_select("Current status", "status", $node->status, node_status($node->type));
  $form .= form_textfield("Automatically post document", "timestamp_posted", ($node->timestamp_posted ? format_date($node->timestamp_posted) : ""), 30, 55, "The date at which your document will be automatically posted.  Leave empty if you don't want to schedule this document, or fill out a string containing an English date format.  Example input: '". date("j F Y G:i") ."', '". date("m/d/y H:i") ."', '". date("F j, Y H:i") ."', ...");
  $form .= form_textfield("Automatically queue document", "timestamp_queued", ($node->timestamp_queued ? format_date($node->timestamp_queued) : ""), 30, 55, "The date at which your document will be automatically queued.  Leave empty if you don't want to schedule this document, or fill out a string containing an English date format.  Example input: '". date("j F Y G:i") ."', '". date("m/d/y H:i") ."', '". date("F j, Y H:i") ."', ...");
  $form .= form_textfield("Automatically hide document", "timestamp_hidden", ($node->timestamp_hidden ? format_date($node->timestamp_hidden) : ""), 30, 55, "The date at which your document will be automatically hidden.  Leave empty if you don't want to schedule this document, or fill out a string containing an English date format.  Example input: '". date("j F Y G:i") ."', '". date("m/d/y H:i") ."', '". date("F j, Y H:i") ."', ...");
  $form .= form_hidden("nid", $node->nid);
  $form .= form_submit("Save node");

  return form($REQUEST_URI, $form);
}

Dries's avatar
   
Dries committed
173
174
175
176
177
178
179
180
181
182
function node_edit_content($edit, $type) {
  $edit[type] = $type;
  return node_invoke($edit, "form");
}

function node_save_content($edit, $type) {
  $edit[type] = $type;
  return node_invoke($edit, "save");
}

Dries's avatar
 
Dries committed
183
function node_delete($id) {
Dries's avatar
   
Dries committed
184
  return (node_del(array("nid" => $id)) ? "node has been deleted." : "failed to delete node: set node status to 'dumped' first.");
Dries's avatar
 
Dries committed
185
186
}

Dries's avatar
   
Dries committed
187
function node_query($type = -1) {
Dries's avatar
Dries committed
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
  $queries[] = array("all nodes: recent additions", "ORDER BY n.timestamp DESC");
  $queries[] = array("all nodes: status set to 'posted'", "WHERE n.status = '". node_status("posted") ."' ORDER BY n.timestamp DESC");
  $queries[] = array("all nodes: status set to 'queued'", "WHERE n.status = '". node_status("queued") ."' ORDER BY n.timestamp DESC");
  $queries[] = array("all nodes: status set to 'dumped'", "WHERE n.status = '". node_status("dumped") ."' ORDER BY n.timestamp DESC");
  $queries[] = array("all nodes: scheduled to be posted", "WHERE n.timestamp_posted > 0 ORDER BY n.timestamp DESC");
  $queries[] = array("all nodes: scheduled to be queued", "WHERE n.timestamp_queued > 0 ORDER BY n.timestamp DESC");
  $queries[] = array("all nodes: scheduled to be hidden", "WHERE n.timestamp_hidden > 0 ORDER BY n.timestamp DESC");

  foreach (module_list() as $name) {
    if (module_hook($name, "user")) {
      $queries[] = array("$name: recent additions", "WHERE n.type = '$name' ORDER BY n.timestamp DESC");
      $queries[] = array("$name: status set to 'posted'", "WHERE n.type = '$name' AND n.status = '". node_status("posted") ."' ORDER BY n.timestamp DESC");
      $queries[] = array("$name: status set to 'queued'", "WHERE n.type = '$name' AND n.status = '". node_status("queued") ."' ORDER BY n.timestamp DESC");
      $queries[] = array("$name: status set to 'dumped'", "WHERE n.type = '$name' AND n.status = '". node_status("dumped") ."' ORDER BY n.timestamp DESC");
      $queries[] = array("$name: scheduled to be posted", "WHERE n.type = '$name' AND n.timestamp_posted > 0 ORDER BY n.timestamp DESC");
      $queries[] = array("$name: scheduled to be queued", "WHERE n.type = '$name' AND n.timestamp_queued > 0 ORDER BY n.timestamp DESC");
      $queries[] = array("$name: scheduled to be hidden", "WHERE n.type = '$name' AND n.timestamp_hidden > 0 ORDER BY n.timestamp DESC");
    }
  }

Dries's avatar
   
Dries committed
208
  return ($type < 0 ? $queries : $queries[$type]);
Dries's avatar
   
Dries committed
209
210
}

Dries's avatar
   
Dries committed
211
212
213
function node_listing($queries) {
  global $mod;
  foreach ($queries as $key=>$array) {
Dries's avatar
   
Dries committed
214
    $output .= "<LI><A HREF=\"admin.php?mod=$mod&query=$key\">$array[0]</A></LI>\n";
Dries's avatar
   
Dries committed
215
216
217
218
  }
  return "<OL>$output</OL>\n";
}

Dries's avatar
   
Dries committed
219
220
221
222
223
224
225
226
227
228
function node_setting() {
  global $REQUEST_URI;

  $threshold_post = array(1 => 1, 2 => 2, 3 => 3, 4 => 4, 5 => 5, 6 => 6, 7 => 7, 8 => 8, 9 => 9, 10 => 10, 11 => 11, 12 => 12, 13 => 13, 14 => 14, 15 => 15, 20 => 20, 25 => 25, 30 => 30, 35 => 35, 40 => 40, 45 => 45, 50 => 50, 60 => 60, 70 => 70, 80 => 80, 90 => 90, 100 => 100);
  $threshold_dump = array(-1 => -1, -2 => -2, -3 => -3, -4 => -4, -5 => -5, -6 => -6, -7 => -7, -8 => -8, -9 => -9, -10 => -10, -11 => -11, -12 => -12, -13 => -13, -14 => -14, -15 => -15, -20 => -20, -25 => -25, -30 => -30);
  $threshold_expire = array(1 => 1, 2 => 2, 3 => 3, 4 => 4, 5 => 5, 6 => 6, 7 => 7, 8 => 8, 9 => 9, 10 => 10, 11 => 11, 12 => 12, 13 => 13, 14 => 14, 15 => 15, 20 => 20, 25 => 25, 30 => 30, 35 => 35, 40 => 40, 45 => 45, 50 => 50, 60 => 60, 70 => 70, 80 => 80, 90 => 90, 100 => 100);

  foreach (module_list() as $name) {
    if (module_hook($name, "user")) {
      $form .= "<H3>Default settings for $name nodes</H3>";
Dries's avatar
Dries committed
229
230
231
232
233
234
235
      $form .= form_select(t("Comment"), $name ."_comment", variable_get($name ."_comment", 0), node_comment_status(), "By default, allow or dissallow users to post comments in this category.");
      $form .= form_select(t("Promote"), $name ."_promote", variable_get($name ."_promote", 0), node_promote_status(), "By default, promote new submissions in this category to the front page.");
      $form .= form_select(t("Status"), $name ."_status", variable_get($name ."_status", node_status("queued")), node_status($name), "What to do with new submissions in this category?");
      $form .= form_select(t("Post threshold"), $name ."_post", variable_get($name ."_post", 4), $threshold_post, "If new submissions are subject to moderation, select a post threshold.");
      $form .= form_select(t("Dump threshold"), $name ."_dump", variable_get($name ."_dump", -2), $threshold_dump, "If new submissions are subject to moderation, select a dump threshold.");
      $form .= form_select(t("Expiration threshold"), $name ."_expire", variable_get($name ."_expire", 8), $threshold_expire, "If new submissions are subject to moderation, select a expiration threshold.");
      $form .= form_textfield("Moderate", $name ."_moderate", variable_get($name ."_moderate", ""), 35, 255, "A comma-seperated list of the moderators' usernames.");
Dries's avatar
   
Dries committed
236
237
238
239
240
241
242
243
244
    }
  }

  $form .= form_submit("Save settings");
  $form .= form_submit("Reset to defaults");

  return form($REQUEST_URI, $form);
}

Dries's avatar
Dries committed
245
246
247
248
249
250
251
function node_admin_save($edit) {
  if (isset($edit[status])) {
    $edit[timestamp_posted] = (strtotime($edit[timestamp_posted]) > time()) ? strtotime($edit[timestamp_posted]) : 0;
    $edit[timestamp_queued] = (strtotime($edit[timestamp_queued]) > time()) ? strtotime($edit[timestamp_queued]) : 0;
    $edit[timestamp_hidden] = (strtotime($edit[timestamp_hidden]) > time()) ? strtotime($edit[timestamp_hidden]) : 0;
    node_save($edit, array(status, timestamp_posted, timestamp_queued, timestamp_hidden));
  }
252
253
  else if (isset($edit[attributes])) {
    node_save($edit, array(attributes));
Dries's avatar
Dries committed
254
255
256
257
258
259
  }
  else {
    node_save($edit, array(comment, moderate, promote));
  }
}

Dries's avatar
   
Dries committed
260
function node_module_find() {
Dries's avatar
Dries committed
261
262
263
264
265
266
267
268
269
270
  global $REQUEST_URI;

  foreach (module_list() as $name) {
    if (module_hook($name, "user")) {
      $options .= "<OPTION VALUE=\"$name\">$name</OPTION>\n";
    }
  }

  $output .= "<FORM ACTION=\"$REQUEST_URI\" METHOD=\"POST\">\n";
  $output .= " <INPUT SIZE=\"50\" VALUE=\"". check_form($keys) ."\" NAME=\"keys\" TYPE=\"text\">\n";
Dries's avatar
   
Dries committed
271
  $output .= " <SELECT NAME=\"type\">$options</SELECT>\n";
Dries's avatar
Dries committed
272
273
274
275
276
277
278
  $output .= " <INPUT TYPE=\"submit\" VALUE=\"Search\">\n";
  $output .= "</FORM>\n";

  return $output;
}


Dries's avatar
   
Dries committed
279
280
function node_edit($node) {
  $output .= form_item("Title", $node->title);
Dries's avatar
   
Dries committed
281
  $output .= form_item("Operations", implode("<br />", node_links($node->nid, $node->type)));
Dries's avatar
   
Dries committed
282
  return $output;
Dries's avatar
Dries committed
283
284
}

Dries's avatar
 
Dries committed
285
function node_admin() {
Dries's avatar
   
Dries committed
286
  global $op, $id, $edit, $query, $type, $keys;
Dries's avatar
   
Dries committed
287

Dries's avatar
   
Dries committed
288
  if (user_access("administer nodes")) {
Dries's avatar
   
Dries committed
289
290
291
292
293

    foreach (module_list() as $name) {
      if (module_hook($name, "status") && $name != "node") {
        $link[] = "<A HREF=\"admin.php?mod=node&type=$name&op=add\">add $name</A>";
      }
Dries's avatar
Dries committed
294
295
    }

Dries's avatar
   
Dries committed
296
297
298
299
300
301
302
303
304
305
306
307
308
309
310
311
312
313
314
315
316
317
318
319
320
321
322
323
324
325
326
327
328
329
330
331
332
333
    print "<SMALL>". implode(" | ", $link) ." | <A HREF=\"admin.php?mod=node&op=default\">node settings</A> | <A HREF=\"admin.php?mod=node&op=listing\">node listings</A> | <A HREF=\"admin.php?mod=node&op=search\">search node</A> | <A HREF=\"admin.php?mod=node\">overview</A> | <A HREF=\"admin.php?mod=node&op=help\">help</A></SMALL><HR>\n";

    $id = check_input($edit[nid] ? $edit[nid] : $id);

    switch ($op) {
      case "add":
        print module_invoke($type, "form");
        break;
      case "help":
        print node_help();
        break;
      case "search":
        print node_module_find($id);
        print search_data($keys, $type);
        break;
      case "status":
        print node_edit_status($id);
        break;
      case "option":
        print node_edit_option($id);
        break;
      case "attribute":
        print node_edit_attribute($id);
        break;
      case "content":
        print node_edit_content(node_get_array(array("nid" => $id)), $type);
        break;
      case "default":
        print node_setting();
        break;
      case "delete":
        print status(node_delete($id));
        print node_overview($query);
        break;
      case "listing":
        print node_listing(node_query());
        break;
      case "Save settings":
Dries's avatar
   
Dries committed
334
        print status(system_save($edit));
Dries's avatar
   
Dries committed
335
336
337
338
339
340
341
342
343
344
345
346
347
348
349
350
351
352
353
354
355
356
357
358
359
360
361
362
        print node_setting();
        break;
      case "Reset to defaults":
        print status(conf_default($edit));
        print node_setting();
        break;
      case "Save node":
        print node_admin_save($edit);
        print node_overview($query);
        break;
      case "edit":
        print node_edit(node_get_object(array("nid" => $id)));
        break;
      case "view":
        print node_module_view(node_get_array(array("nid" => $id)), $type);
        break;
      case "Preview":
        print node_edit_content($edit, $type);
        break;
      case "Submit":
         print status(node_save_content($edit, $type));
        // fall through:
      default:
        print node_overview($query);
    }
  }
  else {
    print message_access();
Dries's avatar
 
Dries committed
363
364
365
366
  }
}

?>