book.module 13.1 KB
Newer Older
Dries's avatar
 
Dries committed
1 2 3
<?php

$module = array("find" => "book_find",
Dries's avatar
 
Dries committed
4
                "type" => "book_type",
Dries's avatar
 
Dries committed
5
                "page" => "book_page",
Dries's avatar
 
Dries committed
6
                "user" => "book_user",
Dries's avatar
 
Dries committed
7 8
                "admin" => "book_admin",
                "export" => "book_export");
Dries's avatar
 
Dries committed
9

Dries's avatar
 
Dries committed
10 11 12 13 14 15 16 17 18 19 20 21
class Book {
  function Book($nid, $userid, $title, $body, $parent, $weight, $timestamp) {
    $this->nid = $nid;
    $this->userid = $userid;
    $this->title = $title;
    $this->body = $body;
    $this->parent = $parent;
    $this->weight = $weight;
    $this->timestamp = $timestamp;
  }
}

Dries's avatar
 
Dries committed
22 23 24 25
function book_status() {
  return array(dumped, expired, queued, posted);
}

Dries's avatar
 
Dries committed
26 27 28 29 30 31 32 33 34
function book_location($node, $nodes = array()) {
  $parent = db_fetch_object(db_query("SELECT n.nid, n.title, b.parent FROM node n LEFT JOIN book b ON n.nid = b.nid AND n.lid = b.lid WHERE n.nid = '$node->parent'"));
  if ($parent->title) {
    $nodes = book_location($parent, $nodes);
    array_push($nodes, $parent);
  }
  return $nodes;
}

Dries's avatar
 
Dries committed
35 36 37 38
function book_type() {
  return array("book", t("book page"));
}

Dries's avatar
 
Dries committed
39
function book_view($node, $page = 1) {
Dries's avatar
 
Dries committed
40 41
  global $theme;

Dries's avatar
 
Dries committed
42 43 44 45 46 47 48
  if ($node->nid && $node->parent) {
    $next = db_fetch_object(db_query("SELECT n.nid, n.title FROM node n LEFT JOIN book b ON n.nid = b.nid AND n.lid = b.lid WHERE b.parent = '$node->parent' AND b.weight > '$node->weight' ORDER BY b.weight ASC"));
    $prev = db_fetch_object(db_query("SELECT n.nid, n.title FROM node n LEFT JOIN book b ON n.nid = b.nid AND n.lid = b.lid WHERE b.parent = '$node->parent' AND b.weight < '$node->weight' ORDER BY b.weight DESC"));
  }

  $output .= "<TABLE BORDER=\"0\" CELLPADDING=\"0\" CELLSPACING=\"0\" WIDTH=\"100%\">\n";

Dries's avatar
 
Dries committed
49
  if ($node->title) {
Dries's avatar
 
Dries committed
50 51 52 53 54 55 56 57
    foreach (book_location($node) as $level) {
      $location .= "$indent <A HREF=\"node.php?id=$level->nid\">$level->title</A><BR>";
      $indent .= "-";
    }

    $output .= " <TR><TD COLSPAN=\"2\">$location</TD><TD ALIGN=\"right\">". node_control($node) ."</TD></TR>\n";
    $output .= " <TR><TD COLSPAN=\"3\"><HR></TD</TR>";
    $output .= " <TR><TD COLSPAN=\"3\"><B><BIG>". check_output($node->title) ."</BIG></B>". ($node->body ? "<BR><SMALL><I>Last updated by ". format_username($node->userid) ." on ". format_date($node->timestamp) ."</I></SMALL> " : "") ."</TD></TR>\n";
Dries's avatar
 
Dries committed
58
  }
Dries's avatar
 
Dries committed
59

Dries's avatar
 
Dries committed
60
  if ($node->body) {
Dries's avatar
 
Dries committed
61
    $output .= " <TR><TD COLSPAN=\"3\"><BR>". check_output($node->body, 1) ."</TD></TR>";
Dries's avatar
 
Dries committed
62 63
  }

Dries's avatar
 
Dries committed
64 65 66 67 68 69
  $output .= " <TR><TD COLSPAN=\"3\"><BR>". book_tree($node->nid) ."</TD</TR>";
  $output .= " <TR><TD COLSPAN=\"3\"><HR></TD</TR>";
  $output .= " <TR><TD ALIGN=\"left\" WIDTH=\"33%\">". ($prev ? "<A HREF=\"node.php?id=$prev->nid\">". t("previous") ."</A>" : t("previous")) ."</TD><TD ALIGN=\"center\" WIDTH=\"34%\"><A HREF=\"module.php?mod=book\">index</A></TD><TD ALIGN=\"right\" WIDTH=\"33%\">". ($next ? "<A HREF=\"node.php?id=$next->nid\">". t("next") ."</A>" : t("next")) ."</TD></TR>\n";
  $output .= " <TR><TD ALIGN=\"left\" WIDTH=\"33%\">". ($prev ? "<SMALL>". check_output($prev->title) ."</SMALL>" : "&nbsp;") ."</TD><TD ALIGN=\"center\" WIDTH=\"34%\">". ($node->parent ? "<A HREF=\"node.php?id=$node->parent\">". t("up") ."</A>" : t("up")) ."</TD><TD ALIGN=\"right\" WIDTH=\"33%\">". ($next ? "<SMALL>". check_output($next->title) ."</SMALL>" : "&nbsp;") ."</TD></TR>\n";
  $output .= "</TABLE>\n";

Dries's avatar
 
Dries committed
70
  if ($page) $theme->header();
Dries's avatar
Dries committed
71
  $theme->box(t("Book"), $output);
Dries's avatar
 
Dries committed
72
  if ($page) $theme->footer();
Dries's avatar
 
Dries committed
73 74 75
}

function book_find($keys) {
Dries's avatar
 
Dries committed
76
  global $status, $user;
Dries's avatar
 
Dries committed
77
  $find = array();
Dries's avatar
 
Dries committed
78
  $result = db_query("SELECT n.*, u.userid FROM node n LEFT JOIN book b ON n.nid = b.nid AND n.lid = b.lid LEFT JOIN users u ON n.author = u.id WHERE n.type = 'book' AND n.status = '$status[posted]' AND (n.title LIKE '%". check_input($keys) ."%' OR b.body LIKE '%". check_input($keys) ."%') ORDER BY n.timestamp DESC LIMIT 20");
Dries's avatar
 
Dries committed
79 80 81 82 83 84
  while ($node = db_fetch_object($result)) {
    array_push($find, array("title" => check_output($node->title), "link" => (user_access($user, "book") ? "admin.php?mod=book&op=edit&id=$node->nid" : "node.php?id=$node->nid"), "user" => $node->userid, "date" => $node->timestamp));
  }
  return $find;
}

Dries's avatar
 
Dries committed
85
function book_toc($parent = 0, $indent = "", $toc = array()) {
Dries's avatar
 
Dries committed
86
  global $status;
Dries's avatar
 
Dries committed
87
  $result = db_query("SELECT n.*, b.* FROM node n LEFT JOIN book b ON n.nid = b.nid AND n.lid = b.lid WHERE n.type = 'book' AND n.status = '$status[posted]' AND b.parent = '$parent' ORDER BY b.weight");
Dries's avatar
 
Dries committed
88
  while ($node = db_fetch_object($result)) {
Dries's avatar
 
Dries committed
89 90 91
    $toc[$node->nid] = "$indent $node->title";
    if ($node->pid) $toc = book_toc($node->pid, "$indent-", $toc);
    $toc = book_toc($node->nid, "$indent-", $toc);
Dries's avatar
 
Dries committed
92 93 94 95
  }
  return $toc;
}

Dries's avatar
 
Dries committed
96
function book_form($edit = array()) {
Dries's avatar
 
Dries committed
97
  global $allowed_html, $PHP_SELF, $REQUEST_URI, $user;
Dries's avatar
 
Dries committed
98

Dries's avatar
 
Dries committed
99
  $output .= "<FORM ACTION=\"$REQUEST_URI\" METHOD=\"post\">\n";
Dries's avatar
 
Dries committed
100 101

  $output .= "<B>". t("Author") .":</B><BR>\n";
Dries's avatar
 
Dries committed
102
  $output .= "<INPUT TYPE=\"hidden\" NAME=\"edit[userid]\" VALUE=\"$edit[userid]\">\n";
Dries's avatar
 
Dries committed
103 104
  $output .= format_username(($edit[userid] ? $edit[userid] : $user->userid)) ."<P>\n";

Dries's avatar
 
Dries committed
105 106 107 108
  if ($edit[pid]) {
    $node = node_get_object("nid", $edit[pid]);
    $output .= "<B>". t("Parent") .":</B><BR>\n";
    $output .= "<A HREF=\"node.php?id=$node->id\">". check_output($node->title) ."</A><P>\n";
Dries's avatar
 
Dries committed
109
    $output .= "<INPUT TYPE=\"hidden\" NAME=\"edit[parent]\" VALUE=\"$edit[parent]\">\n";
Dries's avatar
 
Dries committed
110
    $output .= "<SMALL><I>". t("The parent subject or category the page belongs in.") ."</I></SMALL><P>\n";
Dries's avatar
 
Dries committed
111 112 113
  }
  else {
    $output .= "<B>". t("Parent") .":</B><BR>\n";
Dries's avatar
 
Dries committed
114
    foreach (book_toc() as $key=>$value) $options2 .= "<OPTION VALUE=\"$key\"". ($edit[parent] == $key ? " SELECTED" : "") .">". check_select($value) ."</OPTION>";
Dries's avatar
 
Dries committed
115 116
    if (user_access($user, "book")) $options2 .= "<OPTION VALUE=\"0\"". ($edit[parent] == 0 ? " SELECTED" : "") .">&nbsp;</OPTION>";
    $output .= "<SELECT NAME=\"edit[parent]\">$options2</SELECT><BR>\n";
Dries's avatar
 
Dries committed
117
    $output .= "<SMALL><I>". t("The parent subject or category the page belongs in.") ."</I></SMALL><P>\n";
Dries's avatar
 
Dries committed
118
  }
Dries's avatar
 
Dries committed
119 120 121 122 123 124 125 126

  $output .= "<B>". t("Subject") .":</B><BR>\n";
  $output .= "<INPUT TYPE=\"text\" NAME=\"edit[title]\" SIZE=\"50\" MAXLENGTH=\"128\" VALUE=\"". check_textfield($edit[title]) ."\"><P>\n";

  $output .= "<B>". t("Content") .":</B><BR>\n";
  $output .= "<TEXTAREA WRAP=\"virtual\" COLS=\"50\" ROWS=\"10\" NAME=\"edit[body]\" MAXLENGTH=\"20\">". check_textarea($edit[body]) ."</TEXTAREA><BR>\n";
  $output .= "<SMALL><I>". t("Allowed HTML tags") .": ". htmlspecialchars($allowed_html) .".</I></SMALL><P>\n";

Dries's avatar
 
Dries committed
127 128 129
  $output .= "<B>". t("Log message") .":</B><BR>\n";
  $output .= "<TEXTAREA WRAP=\"virtual\" COLS=\"50\" ROWS=\"5\" NAME=\"edit[log]\" MAXLENGTH=\"20\">". check_textarea($edit[log]) ."</TEXTAREA><BR>\n";
  $output .= "<SMALL><I>". t("An explanation of the additions or updates being made to help the group understand your motivations.") ."</I></SMALL><P>\n";
Dries's avatar
 
Dries committed
130

Dries's avatar
 
Dries committed
131 132
  if (user_access($user, "book")) {
    $output .= "<B>". t("Weight") .":</B><BR>\n";
Dries's avatar
 
Dries committed
133 134
    for ($count = 0; $count < 25; $count++) $options3 .= "<OPTION VALUE=\"$count\"". ($edit[weight] == $count ? " SELECTED" : "") .">$count</OPTION>";
    $output .= "<SELECT NAME=\"edit[weight]\">$options3</SELECT><BR>\n";
Dries's avatar
 
Dries committed
135 136 137 138 139 140 141 142 143 144 145 146 147 148 149
    $output .= "<SMALL><I>". t("The heavier nodes will sink and the lighter nodes will be positioned nearer the top.") ."</I></SMALL><P>\n";
  }

  if (!$edit) {
    $output .= "<INPUT TYPE=\"submit\" NAME=\"op\" VALUE=\"". t("Preview") ."\">\n";
  }
  else if (!$edit[title]) {
    $output .= "<FONT COLOR=\"red\">". t("Warning: you did not supply a title.") ."</FONT><P>\n";
    $output .= "<INPUT TYPE=\"submit\" NAME=\"op\" VALUE=\"". t("Preview") ."\">\n";
  }
  else {
    $output .= "<INPUT TYPE=\"submit\" NAME=\"op\" VALUE=\"". t("Preview") ."\">\n";
    $output .= "<INPUT TYPE=\"submit\" NAME=\"op\" VALUE=\"". t("Submit") ."\">\n";
  }

Dries's avatar
 
Dries committed
150
  $output .= "<INPUT TYPE=\"hidden\" NAME=\"edit[pid]\" VALUE=\"$edit[pid]\">\n";
Dries's avatar
 
Dries committed
151
  $output .= "<INPUT TYPE=\"hidden\" NAME=\"edit[nid]\" VALUE=\"$edit[nid]\">\n";
Dries's avatar
 
Dries committed
152

Dries's avatar
 
Dries committed
153 154 155 156 157 158
  $output .= "</FORM>\n";

  return $output;
}

function book_save($edit) {
Dries's avatar
 
Dries committed
159
  node_save(array_diff(array_merge($edit, array(nid => $edit[nid], type => "book")), array(userid => $edit[userid])));
Dries's avatar
 
Dries committed
160 161
}

Dries's avatar
Dries committed
162
function book_tree($parent = "", $depth = 0) {
Dries's avatar
 
Dries committed
163
  global $PHP_SELF, $status;
Dries's avatar
 
Dries committed
164

Dries's avatar
Dries committed
165 166 167 168 169 170 171 172 173 174
  if (($depth < 3) || ($PHP_SELF == "/admin.php")) {
    $result = db_query("SELECT n.*, b.* FROM node n LEFT JOIN book b ON n.nid = b.nid AND n.lid = b.lid WHERE n.type = 'book' AND n.status = '$status[posted]' AND b.parent = '$parent' ORDER BY b.weight");
    $output .= "<UL>";
    while ($node = db_fetch_object($result)) {
      $output .= "<LI><A HREF=\"node.php?id=$node->nid\">". check_output($node->title) ."</A>";
      if ($PHP_SELF == "/admin.php") $output .= " <SMALL>(weight: $node->weight/$node->parent, status: $node->status) (<A HREF=\"admin.php?mod=book&op=edit&id=$node->nid\">edit</A>)</SMALL>\n";
      if ($node->pid) $output .= book_tree($node->pid, $depth + 1);
      $output .= book_tree($node->nid, $depth + 1);
    }
    $output .= "</UL>";
Dries's avatar
 
Dries committed
175
  }
Dries's avatar
 
Dries committed
176 177 178
  return $output;
}

Dries's avatar
 
Dries committed
179 180
function book_list($query = array()) {
  return node_overview($query);
Dries's avatar
 
Dries committed
181 182
}

Dries's avatar
 
Dries committed
183 184
function book_query($type = "") {
  global $status;
Dries's avatar
 
Dries committed
185
  $queries =  array(array("recent book pages", "WHERE n.type = 'book' ORDER BY n.timestamp DESC"), array("posted book pages", "WHERE n.type = 'book' AND n.status = '$status[posted]' ORDER BY n.timestamp DESC"), array("queued book pages", "WHERE n.type = 'book' AND n.status = '$status[queued]' ORDER BY n.timestamp DESC"), array("dumped book pages", "WHERE n.type = 'book' AND n.status = '$status[dumped]' ORDER BY n.timestamp DESC"));
Dries's avatar
 
Dries committed
186 187 188
  return ($queries[$type] ? $queries[$type] : $queries);
}

Dries's avatar
 
Dries committed
189
function book_admin() {
Dries's avatar
 
Dries committed
190 191 192
  global $op, $id, $edit, $mod, $keys, $type, $user;

  print "<SMALL><A HREF=\"admin.php?mod=book&op=add\">add new page</A> | <A HREF=\"admin.php?mod=book&op=listing\">book listing</A> | <A HREF=\"admin.php?mod=book&op=search\">search book</A> | <A HREF=\"admin.php?mod=book\">list overview</A> | <A HREF=\"admin.php?mod=book&op=tree\">tree overview</A></SMALL><HR>\n";
Dries's avatar
 
Dries committed
193

Dries's avatar
 
Dries committed
194
  $type = $type ? $type : 0;
Dries's avatar
 
Dries committed
195 196 197 198 199 200 201 202

  switch ($op) {
    case "add":
      print book_form();
      break;
    case "edit":
      print book_form(node_get_array(nid, $id));
      break;
Dries's avatar
 
Dries committed
203
    case "listing":
Dries's avatar
 
Dries committed
204
      print node_listing(book_query());
Dries's avatar
 
Dries committed
205
      break;
Dries's avatar
 
Dries committed
206
    case "search":
Dries's avatar
 
Dries committed
207 208
      print search_form($keys);
      print search_data($keys, $mod);
Dries's avatar
 
Dries committed
209
      break;
Dries's avatar
 
Dries committed
210 211 212
    case "tree":
      print book_tree();
      break;
Dries's avatar
 
Dries committed
213
    case t("Preview"):
Dries's avatar
 
Dries committed
214
      book_view(new Book(($edit[nid] ? $edit[nid] : -1), ($edit[userid] ? $edit[userid] : $user->userid), $edit[title], $edit[body], $edit[parent], $edit[weight], ($edit[timestamp] ? $edit[timestamp] : time())), 0);
Dries's avatar
 
Dries committed
215 216 217 218
      print book_form($edit);
      break;
    case t("Submit"):
      book_save($edit);
Dries's avatar
 
Dries committed
219
      // fall through:
Dries's avatar
 
Dries committed
220
    default:
Dries's avatar
 
Dries committed
221
      print book_list(book_query($type));
Dries's avatar
 
Dries committed
222 223 224
  }
}

Dries's avatar
Dries committed
225 226 227
function book_page() {
  global $status, $theme;

Dries's avatar
Dries committed
228
  $result = db_query("SELECT n.*, b.* FROM node n LEFT JOIN book b ON n.nid = b.nid AND n.lid = b.lid WHERE b.parent = 0 AND n.status = $status[posted] ORDER BY b.weight");
Dries's avatar
Dries committed
229 230

  while ($node = db_fetch_object($result)) {
Dries's avatar
- typo  
Dries committed
231
    $output .= "<DT><A HREF=\"node.php?id=$node->nid\">". check_output($node->title) ."</A></DT><DD>". check_output($node->body, 1) ."<BR><BR></DD>";
Dries's avatar
Dries committed
232 233 234 235 236
  }

  $theme->header();
  $theme->box(t("Book"), "<DL>$output</DL>");
  $theme->footer();
Dries's avatar
 
Dries committed
237 238
}

Dries's avatar
 
Dries committed
239 240 241 242 243 244 245 246
function book_update($id) {
  global $status;

  if ($node = node_get_object("nid", $id)) {
    if ($node->status != $status[posted]) {
      return t("You can only update accepted pages: pages that are still queued or already expired can not be updated.");
    }
    else if (db_result(db_query("SELECT COUNT(nid) FROM node WHERE pid = '$node->nid' AND status = '$status[queued]'"))) {
Dries's avatar
 
Dries committed
247
      return t("There is already an update for this node in the queue: we can only process one update at once.");
Dries's avatar
 
Dries committed
248 249 250 251 252 253 254
    }
    else {
      return book_form(array(nid => -1, pid => $id, title => $node->title, body => $node->body, parent => $node->parent));
    }
  }
}

Dries's avatar
 
Dries committed
255 256 257
function book_user() {
  global $edit, $id, $op, $theme, $user;

Dries's avatar
 
Dries committed
258
  $title = t("Submit");
Dries's avatar
 
Dries committed
259

Dries's avatar
 
Dries committed
260 261
  switch($op) {
    case "update":
Dries's avatar
 
Dries committed
262
      $theme->box($title, book_update($id));
Dries's avatar
 
Dries committed
263 264 265
      break;
    case t("Preview"):
      book_view(new Book(($edit[nid] ? $edit[nid] : -1), $user->userid, $edit[title], $edit[body], $edit[parent], $edit[weight], ($edit[timestamp] ? $edit[timestamp] : time())), 0);
Dries's avatar
 
Dries committed
266
      $theme->box($title, book_form($edit));
Dries's avatar
 
Dries committed
267 268 269
      break;
    case t("Submit"):
      book_save($edit);
Dries's avatar
 
Dries committed
270
      $theme->box($title, t("Thank you for your submission."));
Dries's avatar
 
Dries committed
271 272
      break;
    default:
Dries's avatar
 
Dries committed
273
      $theme->box($title, book_form());
Dries's avatar
 
Dries committed
274 275 276
  }
}

Dries's avatar
 
Dries committed
277 278 279 280 281 282 283 284 285 286 287 288 289 290 291 292 293 294 295 296
function book_export_html($parent = "", $depth = 0) {
  global $status;

  $result = db_query("SELECT n.*, b.* FROM node n LEFT JOIN book b ON n.nid = b.nid AND n.lid = b.lid WHERE n.type = 'book' AND n.status = '$status[posted]' AND b.parent = '$parent' ORDER BY b.weight");

  while ($node = db_fetch_object($result)) {
    $output .= "<H$depth>". check_output($node->title) ."</H$depth>";
    if ($node->body) $output .= check_output($node->body, 1);
    if ($node->pid) $output .= book_export_html($node->pid, $depth + 1);
    $output .= book_export_html($node->nid, $depth + 1);
  }
  return $output;
}

function book_export($uri) {
  if ($uri[2] == "book") {
    print book_export_html($uri[3], $depth = 1);
  }
}

Dries's avatar
 
Dries committed
297
?>