book.module 21.2 KB
Newer Older
Dries's avatar
   
Dries committed
1
<?php
2
// $Id$
Dries's avatar
   
Dries committed
3

Dries's avatar
   
Dries committed
4
5
6
function book_node($field) {
  global $user;

Dries's avatar
   
Dries committed
7
  $info["name"] = t("book page");
Dries's avatar
   
Dries committed
8
  $info["description"] = t("A book is a collaborative writing effort: users can collaborate writing the pages of the book, positioning the pages in the right order, and reviewing or modifying pages previously written.  So when you have some information to share or when you read a page of the book and you didn't like it, or if you think a certain page could have been written better, you can do something about it.");
Dries's avatar
   
Dries committed
9
10
11
12
13

  return $info[$field];
}

function book_access($op, $node) {
Dries's avatar
   
Dries committed
14
  global $user;
Dries's avatar
   
Dries committed
15
16

  if ($op == "view") {
Dries's avatar
   
Dries committed
17
18
19
20
21
22
23
24
    /*
    ** Everyone can access all published book pages whether these pages
    ** are still waiting for approval or not.  We might not always want
    ** to display pages that are waiting for approval, but we take care
    ** of that problem in the book_view() function.
    */

    return $node->status;
Dries's avatar
   
Dries committed
25
26
  }

Dries's avatar
   
Dries committed
27
  if ($op == "create") {
Dries's avatar
   
Dries committed
28
29
30
31
32
33
    /*
    ** Only registered users can create book pages.  Given the nature
    ** of the book module this is considered to be a good/safe idea.
    */

    return $user->uid;
Dries's avatar
   
Dries committed
34
35
36
  }

  if ($op == "update") {
Dries's avatar
   
Dries committed
37
    /*
Dries's avatar
   
Dries committed
38
39
40
41
42
43
44
    ** Only registered users can update book pages.  Given the nature
    ** of the book module this is considered to be a good/safe idea.
    ** One can only upate a book page if there are no suggested updates
    ** of that page waiting for approval, when it is not a PHP-page and
    ** as long as the "create new revision"-bit is set.  That is, only
    ** updates that don't overwrite the current or pending information
    ** are allowed.
Dries's avatar
   
Dries committed
45
    */
Dries's avatar
   
Dries committed
46
47

    return $user->uid && !$node->moderate && !$node->format && $node->revision;
Dries's avatar
   
Dries committed
48
  }
Dries's avatar
   
Dries committed
49
50
}

Dries's avatar
   
Dries committed
51
function book_save($op, $node) {
Dries's avatar
   
Dries committed
52
  global $user, $REQUEST_URI;
Dries's avatar
   
Dries committed
53
54
55
56
57
58

  if ($op == "approve") {
    return array("status" => 1);
  }

  if ($op == "create") {
Dries's avatar
   
Dries committed
59
    return array("format", "moderate" => 1, "parent", "promote" => 0, "status" => 1, "weight");
Dries's avatar
   
Dries committed
60
61
62
63
64
65
66
  }

  if ($op == "decline") {
    return array("status" => 0);
  }

  if ($op == "update") {
Dries's avatar
   
Dries committed
67
    if (strstr($REQUEST_URI, "module.php?mod=node&op=edit")) {
Dries's avatar
   
Dries committed
68
      /*
Dries's avatar
   
Dries committed
69
70
      ** If a regular user updates a book page, we always create a new
      ** revision.  All new revisions have to be approved (moderation)
Dries's avatar
   
Dries committed
71
      ** and are not promoted by default.  See also: book_load().
Dries's avatar
   
Dries committed
72
73
      */

Dries's avatar
   
Dries committed
74
      return array("created" => time(), "format", "moderate" => 1, "parent", "promote" => 0, "score" => 0, "status" => 1, "users" => "", "revisions", "votes" => 0, "weight");
Dries's avatar
   
Dries committed
75
    }
Dries's avatar
   
Dries committed
76
    else if (user_access("adminster nodes")) {
Dries's avatar
   
Dries committed
77
      /*
Dries's avatar
   
Dries committed
78
79
80
81
82
      ** If a node administrator updates a book page, we don't create a
      ** new revision unless we are explicitly instructed to. If a node
      ** administrator updates a book page using the "update this book
      ** page"-link (like regular users do) then he'll be treated as a
      ** regular user.
Dries's avatar
   
Dries committed
83
84
      */

Dries's avatar
   
Dries committed
85
      return array("format", "parent", "weight");
Dries's avatar
   
Dries committed
86
87
88
89
90
    }
  }

}

Dries's avatar
   
Dries committed
91
function book_link($type, $node = 0, $main = 0) {
Dries's avatar
   
Dries committed
92
93
  if ($type == "page" && user_access("access content")) {
    $links[] = "<a href=\"module.php?mod=book\">". t("collaborative book") ."</a>";
Dries's avatar
   
Dries committed
94
  }
Dries's avatar
   
Dries committed
95

Dries's avatar
   
Dries committed
96
97
98
99
  if ($type == "admin" && user_access("administer nodes")) {
    $links[] = "<a href=\"admin.php?mod=book\">". t("collaborative book") ."</a>";
  }

Dries's avatar
   
Dries committed
100
  if ($type == "node" && $node->type == "book" && book_access("update", $node)) {
Dries's avatar
   
Dries committed
101
102
103
    $links[] = "<a href=\"module.php?mod=node&op=edit&id=$node->nid\">". t("update this book page") ."</a>";
  }

Dries's avatar
   
Dries committed
104
  return $links ? $links : array();
Dries's avatar
   
Dries committed
105
106
}

Dries's avatar
   
Dries committed
107
function book_load($node) {
Dries's avatar
   
Dries committed
108
109
  global $user, $REQUEST_URI;

Dries's avatar
   
Dries committed
110
  $book = db_fetch_object(db_query("SELECT format, parent, weight FROM book WHERE nid = '$node->nid'"));
Dries's avatar
   
Dries committed
111
112

  if (strstr($REQUEST_URI, "module.php?mod=node&op=edit")) {
Dries's avatar
   
Dries committed
113

Dries's avatar
   
Dries committed
114
115
116
117
118
119
120
    /*
    ** If a user is about to update a book page, we overload some
    ** fields to reflect the changes.  We use the $REQUEST_URI to
    ** dectect this as we don't want to interfer with updating a
    ** book page through the admin pages.  See also: book_save().
    */

Dries's avatar
   
Dries committed
121
122
123
124
125
126
127
128
    if ($user->uid) {
      $book->uid = $user->uid;
      $book->name = $user->name;
    }
    else {
      $book->uid = 0;
      $book->name = "";
    }
Dries's avatar
   
Dries committed
129
  }
Dries's avatar
   
Dries committed
130

Dries's avatar
   
Dries committed
131
132
133
134
135
  /*
  ** We set the revision field to indicate that we have to create
  ** a new revision when updating this book page.  We enable this
  ** always such that the "update this book page"-links appear.
  */
Dries's avatar
   
Dries committed
136

Dries's avatar
   
Dries committed
137
  $book->revision = 1;
Dries's avatar
   
Dries committed
138

Dries's avatar
   
Dries committed
139
  return $book;
Dries's avatar
   
Dries committed
140
141
}

Dries's avatar
   
Dries committed
142
function book_insert($node) {
Dries's avatar
   
Dries committed
143
144
145
146
147
148
  if (!user_access("administer nodes")) {
    $node->format = 0;
    $node->weight = 0;
  }

  db_query("INSERT INTO book (nid, format, parent, weight) VALUES ('$node->nid', '$node->format', '$node->parent', '$node->weight')");
Dries's avatar
   
Dries committed
149
}
Dries's avatar
   
Dries committed
150

Dries's avatar
   
Dries committed
151
function book_update($node) {
Dries's avatar
   
Dries committed
152
153
154
155
156
157
  if (!user_access("administer nodes")) {
    $node->format = 0;
    $node->weight = 0;
  }

  db_query("UPDATE book SET format = '$node->format', parent = '$node->parent', weight = '$node->weight' WHERE nid = '$node->nid'");
Dries's avatar
   
Dries committed
158
}
Dries's avatar
   
Dries committed
159

160
function book_delete(&$node) {
Dries's avatar
   
Dries committed
161
  db_query("DELETE FROM book WHERE nid = '$node->nid'");
Dries's avatar
   
Dries committed
162
163
}

164
function book_form(&$node, &$help, &$error) {
Dries's avatar
   
Dries committed
165
  global $user, $op;
Dries's avatar
   
Dries committed
166
167

  $output .= form_select(t("Parent"), "parent", $node->parent, book_toc(), t("The parent subject or category the page belongs in."));
Dries's avatar
   
Dries committed
168

Dries's avatar
   
Dries committed
169
170
171
172
173
174
175
176
177
  if ($node->format) {
    if ($op != t("Preview")) {
      $node->body = addslashes($node->body);
    }
  }
  else {
    if ($node->teaser) {
      $output .= form_textarea(t("Teaser"), "teaser", $node->teaser, 60, 5, $error["teaser"]);
    }
Dries's avatar
   
Dries committed
178
179
180
  }

  $output .= form_textarea(t("Body"), "body", $node->body, 60, 20, t("Allowed HTML tags") .": ". htmlspecialchars(variable_get("allowed_html", "")));
Dries's avatar
   
Dries committed
181
182
183
  $output .= form_textarea(t("Log message"), "history", $node->history, 60, 5, t("An explanation of the additions or updates being made to help the group understand your motivations."));

  if (user_access("administer nodes")) {
Dries's avatar
   
Dries committed
184
185
    $output .= form_select(t("Weight"), "weight", $node->weight, array(0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30), t("The heavier pages will sink and the lighter pages will be positioned nearer the top."));
    $output .= form_select("Type", "format", $node->format, array(0 => "HTML / text", 1 => "PHP"));
Dries's avatar
   
Dries committed
186
187
188
189
190
191
192
  }
  else {

    /*
    ** Carry out some explanation or submission guidelines:
    */

Dries's avatar
   
Dries committed
193
194
    $help = book_node("description");

Dries's avatar
   
Dries committed
195
196
197
198
199
200
201
202
203
204
205
    /*
    ** If a regular user updates a book page, we create a new revision
    ** authored by that user:
    */

    $output .= form_hidden("revision", 1);
  }

  return $output;
}

Dries's avatar
   
Dries committed
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
function book_node_link($node = 0) {
  global $user, $op, $edit;

  if ($node->type != "book") {

    if ($edit["nid"]) {
      $node = node_load(array("nid" => $edit["nid"]));
    }

    if ($op == t("Add to book outline")) {
      db_query("INSERT INTO book (nid, parent, weight) VALUES ('$node->nid', '". check_query($edit["parent"]) ."', '". check_query($edit["weight"]) ."')");
      $output .= status(t("added the node to the book."));
    }

    if ($op == t("Update book outline")) {
      db_query("UPDATE book SET parent = '". check_query($edit["parent"]) ."', weight = '". check_query($edit["weight"]) ."' WHERE nid = '$node->nid'");
      $output .= status(t("updated the book outline."));
    }

    if ($op == t("Remove from book outline")) {
      db_query("DELETE FROM book WHERE nid = '$node->nid'");
      $output .= status(t("removed the node form the book."));
    }

    $output .= "<h3>". t("Edit book outline") ."</h3>";

    if ($edit["nid"]) {
      $page = db_fetch_object(db_query("SELECT * FROM book WHERE nid = '$node->nid'"));

      $output .= form_select(t("Parent"), "parent", $page->parent, book_toc(), t("The parent subject or category the page belongs in."));
      $output .= form_select(t("Weight"), "weight", $page->weight, array(0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30), t("The heavier pages will sink and the lighter pages will be positioned nearer the top."));

      if ($page->nid) {
        $output .= form_submit(t("Update book outline"));
        $output .= form_submit(t("Remove from book outline"));
      }
      else {
        $output .= form_submit(t("Add to book outline"));
      }

    }
    else {
      $output .= form_submit(t("Edit book outline"));
    }

    $output .= form_hidden("nid", $node->nid);

    return form($output, "post", "admin.php?mod=book&op=outline");
  }
}

Dries's avatar
   
Dries committed
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
/*
** Return the the most recent revision that matches the specified
** conditions.
*/

function book_revision_load($page, $conditions = array()) {

  $revisions = array_reverse(node_revision_list($page));

  foreach ($revisions as $revision) {

    /*
    ** Extract the specified revision:
    */

    $node = node_revision_load($page, $revision);

    /*
    ** Check to see if the conditions are met:
    */

    $status = 1;

    foreach ($conditions as $key => $value) {
      if ($node->$key != $value) {
        $status = 0;
      }
    }

    if ($status) {
      return $node;
    }
  }
}

/*
** Return the path (call stack) to a certain book page.
*/

Dries's avatar
   
Dries committed
296
function book_location($node, $nodes = array()) {
Dries's avatar
   
Dries committed
297
  $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 WHERE n.nid = '$node->parent'"));
Dries's avatar
   
Dries committed
298
299
300
301
302
303
304
  if ($parent->title) {
    $nodes = book_location($parent, $nodes);
    array_push($nodes, $parent);
  }
  return $nodes;
}

Dries's avatar
   
Dries committed
305
306
307
308
309
310
311
312
function book_body($node) {
  global $theme, $op;

  if ($node->format == 1) {
    /*
    ** Make sure only authorized users can preview PHP pages.
    */

Dries's avatar
   
Dries committed
313
314
315
316
317
318
319
    if ($op == t("Preview")) {
      if (user_access("adminster nodes")) {
        $node->body = stripslashes($node->body);  // see also book_form()
      }
      else {
        return;
      }
Dries's avatar
   
Dries committed
320
321
322
323
324
325
326
327
    }

    ob_start();
    eval($node->body);
    $output = ob_get_contents();
    ob_end_clean();
  }
  else {
Dries's avatar
   
Dries committed
328
    $output = check_output(filter($node->body), 1);
Dries's avatar
   
Dries committed
329
330
331
332
333
  }

  return $output;
}

Dries's avatar
   
Dries committed
334
function book_view($node, $main = 0) {
Dries's avatar
   
Dries committed
335
336
337
338
  global $theme, $mod;

  /*
  ** Always display the most recently approved revision of a node
Dries's avatar
   
Dries committed
339
340
  ** (if any) unless we have to display this page in the context of
  ** the moderation queue.
Dries's avatar
   
Dries committed
341
342
343
  */

  if ($node->moderate && $mod != "queue") {
Dries's avatar
   
Dries committed
344
345
346
347
348
    $revision = book_revision_load($node, array("moderate" => 0, "status" => 1));

    if ($revision) {
      $node = $revision;
    }
Dries's avatar
   
Dries committed
349
350
  }

Dries's avatar
   
Dries committed
351
352
353
354
355
356
357
  /*
  ** Extract the page body.  If body is dynamic (using PHP code), the body
  ** will be generated.
  */

  $node->body = book_body($node);

Dries's avatar
   
Dries committed
358
359
360
361
362
  /*
  ** Display the node.  If not displayed on the main page, we render
  ** the node as a page in the book with extra links to the previous
  ** and the next page.
  */
Dries's avatar
   
Dries committed
363

Dries's avatar
   
Dries committed
364
365
  if ($main) {
    $theme->node($node, $main);
Dries's avatar
   
Dries committed
366
  }
Dries's avatar
   
Dries committed
367
  else {
Dries's avatar
   
Dries committed
368
369
370
371
    /*
    ** Construct the "next" and "previous" links:
    */

Dries's avatar
   
Dries committed
372
    if ($node->nid && $node->parent) {
373
374
      $next = db_fetch_object(db_query("SELECT n.nid, n.title FROM node n LEFT JOIN book b ON n.nid = b.nid WHERE n.status = 1 AND b.parent = '$node->parent' AND (b.weight > '$node->weight' OR (b.weight = '$node->weight' AND n.title > '". check_query($node->title) ."')) AND (n.moderate = 0 OR n.revisions != '') ORDER BY b.weight ASC, n.title ASC"));
      $prev = db_fetch_object(db_query("SELECT n.nid, n.title FROM node n LEFT JOIN book b ON n.nid = b.nid WHERE n.status = 1 AND b.parent = '$node->parent' AND (b.weight < '$node->weight' OR (b.weight = '$node->weight' AND n.title < '". check_query($node->title) ."')) AND (n.moderate = 0 OR n.revisions != '') ORDER BY b.weight DESC, n.title DESC"));
Dries's avatar
   
Dries committed
375
    }
Dries's avatar
   
Dries committed
376

Dries's avatar
   
Dries committed
377
    $output .= "<table border=\"0\" cellpadding=\"1\" cellspacing=\"1\" width=\"100%\">";
Dries's avatar
   
Dries committed
378

Dries's avatar
   
Dries committed
379
380
    if ($node->title) {
      foreach (book_location($node) as $level) {
Dries's avatar
   
Dries committed
381
        $location .= "$indent <a href=\"node.php?id=$level->nid\">$level->title</a><br />";
Dries's avatar
   
Dries committed
382
383
        $indent .= "-";
      }
Dries's avatar
   
Dries committed
384

Dries's avatar
   
Dries committed
385
      $output .= " <tr><td colspan=\"3\">$location</td></tr>";
Dries's avatar
   
Dries committed
386
387
      $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>". sprintf(t("Last updated by %s on %s"), format_name($node), format_date($node->created)) ."</i></small> " : "") ."</td></tr>";
Dries's avatar
   
Dries committed
388
    }
Dries's avatar
   
Dries committed
389

Dries's avatar
   
Dries committed
390
    if ($node->body) {
Dries's avatar
   
Dries committed
391
      $output .= " <tr><td colspan=\"3\"><br />$node->body</td></tr>";
Dries's avatar
   
Dries committed
392
    }
Dries's avatar
   
Dries committed
393

Dries's avatar
   
Dries committed
394
    if ($node->nid) {
Dries's avatar
   
Dries committed
395
      $output .= " <tr><td colspan=\"3\"><br />". book_tree($node->nid) ."</td></tr>";
Dries's avatar
   
Dries committed
396
    }
Dries's avatar
   
Dries committed
397

Dries's avatar
   
Dries committed
398
399
400
    $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>";
    $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>";
Dries's avatar
   
Dries committed
401
402
    $output .= " <tr><td colspan=\"3\"><hr /></td></tr>";
    $output .= " <tr><td colspan=\"3\" align=\"right\"><div style=\"margin: 10 10 10 10;\">". $theme->links(link_node($node, $main)) ."</div></td></tr>";
Dries's avatar
   
Dries committed
403
    $output .= "</table>";
Dries's avatar
   
Dries committed
404

Dries's avatar
   
Dries committed
405
406
    $theme->box(t("Handbook"), $output);
  }
Dries's avatar
   
Dries committed
407
408
}

Dries's avatar
   
Dries committed
409
function book_toc($parent = "", $indent = "", $toc = array()) {
Dries's avatar
   
Dries committed
410

Dries's avatar
   
Dries committed
411
412
413
414
  /*
  ** Select all child nodes:
  */

Dries's avatar
   
Dries committed
415
  $result = db_query("SELECT n.nid, n.title FROM node n LEFT JOIN book b ON n.nid = b.nid WHERE n.status = 1 AND b.parent = '$parent' AND (n.moderate = 0 OR n.revisions != '') ORDER BY b.weight");
Dries's avatar
   
Dries committed
416
417

  /*
Dries's avatar
   
Dries committed
418
419
  ** If the user is an administrator, add the root node; only
  ** administrators can start new books.
Dries's avatar
   
Dries committed
420
  */
Dries's avatar
   
Dries committed
421

Dries's avatar
   
Dries committed
422
  if (user_access("administer nodes")) {
Dries's avatar
   
Dries committed
423
    $toc[0] = "<root>";
Dries's avatar
   
Dries committed
424
425
  }

Dries's avatar
   
Dries committed
426
427
428
429
  /*
  ** Build the table of contents:
  */

Dries's avatar
   
Dries committed
430
  while ($node = db_fetch_object($result)) {
Dries's avatar
   
Dries committed
431
432
    $toc[$node->nid] = "$indent $node->title";
    $toc = book_toc($node->nid, "$indent-", $toc);
Dries's avatar
   
Dries committed
433
  }
Dries's avatar
   
Dries committed
434

Dries's avatar
   
Dries committed
435
436
437
  return $toc;
}

Dries's avatar
Dries committed
438
function book_tree($parent = "", $depth = 0) {
Dries's avatar
   
Dries committed
439

Dries's avatar
   
Dries committed
440
  if ($depth < 3) {
Dries's avatar
   
Dries committed
441

Dries's avatar
   
Dries committed
442
443
444
445
    /*
    ** Select all child nodes and render them into a table of contents:
    */

Dries's avatar
   
Dries committed
446
   $result = db_query("SELECT n.nid FROM node n LEFT JOIN book b ON n.nid = b.nid WHERE b.parent = '$parent' AND (n.moderate = 0 OR n.revisions != '') ORDER BY b.weight, n.title");
Dries's avatar
   
Dries committed
447

Dries's avatar
   
Dries committed
448
449
450
     while ($page = db_fetch_object($result)) {
       // load the node:
       $node = node_load(array("nid" => $page->nid));
Dries's avatar
   
Dries committed
451

Dries's avatar
   
Dries committed
452
453
       // take the most recent approved revision:
       if ($node->moderate) {
Dries's avatar
   
Dries committed
454
         $node = book_revision_load($node, array("moderate" => 0, "status" => 1));
Dries's avatar
   
Dries committed
455
       }
Dries's avatar
   
Dries committed
456

Dries's avatar
   
Dries committed
457
458
459
       if ($node) {
         // output the content:
         $output .= "<li><a href=\"node.php?id=$node->nid\">". check_output($node->title) ."</a></li>";
Dries's avatar
   
Dries committed
460

Dries's avatar
   
Dries committed
461
462
463
         // build the sub-tree of each child:
         $output .= book_tree($node->nid, $depth + 1);
       }
Dries's avatar
   
Dries committed
464
465
466
     }

     $output = "<ul>$output</ul>";
Dries's avatar
   
Dries committed
467

Dries's avatar
   
Dries committed
468
  }
Dries's avatar
   
Dries committed
469

Dries's avatar
   
Dries committed
470
471
472
  return $output;
}

Dries's avatar
   
Dries committed
473
function book_render() {
Dries's avatar
   
Dries committed
474
  global $theme;
Dries's avatar
Dries committed
475

476
  $result = db_query("SELECT n.nid FROM node n LEFT JOIN book b ON n.nid = b.nid WHERE b.parent = 0 AND n.status = 1 AND (n.moderate = 0 OR n.revisions != '') ORDER BY b.weight");
Dries's avatar
   
Dries committed
477

Dries's avatar
   
Dries committed
478
479
480
481
482
483
  while ($page = db_fetch_object($result)) {
    // load the node:
    $node = node_load(array("nid" => $page->nid));

    // take the most recent approved revision:
    if ($node->moderate) {
Dries's avatar
   
Dries committed
484
      $node = book_revision_load($node, array("moderate" => 0, "status" => 1));
Dries's avatar
   
Dries committed
485
486
    }

Dries's avatar
   
Dries committed
487
488
    if ($node) {
      // output the content:
Dries's avatar
   
Dries committed
489
      $output .= "<dt><a href=\"node.php?id=$node->nid\">". check_output($node->title) ."</a></dt><dd>". book_body($node) ."<br /><br /></dd>";
Dries's avatar
   
Dries committed
490
    }
Dries's avatar
   
Dries committed
491
492
493
  }

  $theme->header();
Dries's avatar
   
Dries committed
494
  $theme->box(t("Handbook"), "<dl>$output</dl>");
Dries's avatar
   
Dries committed
495
496
497
498
499
500
  $theme->footer();
}

function book_page() {
  global $op, $id, $theme;

Dries's avatar
   
Dries committed
501
  if (user_access("access content")) {
Dries's avatar
   
Dries committed
502
503
    switch ($op) {
      case "feed":
Dries's avatar
   
Dries committed
504
        print book_export_html($id, $depth = 1);
Dries's avatar
   
Dries committed
505
506
507
        break;
      default:
        book_render();
Dries's avatar
   
Dries committed
508
509
510
511
512
513
514
    }
  }
  else {
    $theme->header();
    $theme->box(t("Access denied"), message_access());
    $theme->footer();
  }
Dries's avatar
   
Dries committed
515
516
}

Dries's avatar
   
Dries committed
517
function book_export_html($id = "", $depth = 1) {
Dries's avatar
   
Dries committed
518
  $result = db_query("SELECT n.nid FROM node n LEFT JOIN book b ON n.nid = b.nid WHERE n.status = 1 AND n.nid = '". check_input($id) ." AND (n.moderate = 0 OR n.revisions != '')'");
Dries's avatar
   
Dries committed
519

Dries's avatar
   
Dries committed
520
521
522
  while ($page = db_fetch_object($result)) {
    // load the node:
    $node = node_load(array("nid" => $page->nid));
Dries's avatar
   
Dries committed
523

Dries's avatar
   
Dries committed
524
525
    // take the most recent approved revision:
    if ($node->moderate) {
Dries's avatar
   
Dries committed
526
      $node = book_revision_load($node, array("moderate" => 0, "status" => 1));
Dries's avatar
   
Dries committed
527
528
    }

Dries's avatar
   
Dries committed
529
530
531
    if ($node) {
      // output the content:
      $output .= "<h$depth>". check_output($node->title) ."</h$depth>";
Dries's avatar
   
Dries committed
532

Dries's avatar
   
Dries committed
533
      if ($node->body) {
Dries's avatar
   
Dries committed
534
        $output .= "<ul>". book_body($node) ."</ul>";
Dries's avatar
   
Dries committed
535
      }
Dries's avatar
   
Dries committed
536
    }
Dries's avatar
   
Dries committed
537
  }
Dries's avatar
   
Dries committed
538

Dries's avatar
   
Dries committed
539
540
541
542
543
544
  $output .= book_export_html_recursive($id, $depth);

  return $output;
}

function book_export_html_recursive($parent = "", $depth = 1) {
Dries's avatar
   
Dries committed
545
  $result = db_query("SELECT n.nid FROM node n LEFT JOIN book b ON n.nid = b.nid WHERE n.status = 1 AND b.parent = '$parent' AND (n.moderate = 0 OR n.revisions != '') ORDER BY b.weight");
Dries's avatar
   
Dries committed
546

Dries's avatar
   
Dries committed
547
548
549
550
551
552
  while ($page = db_fetch_object($result)) {
    // load the node:
    $node = node_load(array("nid" => $page->nid));

    // take the most recent approved revision:
    if ($node->moderate) {
Dries's avatar
   
Dries committed
553
      $node = book_revision_load($node, array("moderate" => 0, "status" => 1));
Dries's avatar
   
Dries committed
554
555
    }

Dries's avatar
   
Dries committed
556
557
558
    if ($node) {
      // output the content:
      $output .= "<h$depth>". check_output($node->title) ."</h$depth>";
Dries's avatar
   
Dries committed
559

Dries's avatar
   
Dries committed
560
      if ($node->body) {
Dries's avatar
   
Dries committed
561
        $output .= "<ul>". book_body($node) ."</ul>";
Dries's avatar
   
Dries committed
562
      }
Dries's avatar
   
Dries committed
563

Dries's avatar
   
Dries committed
564
565
      $output .= book_export_html_recursive($node->nid, $depth + 1);
    }
Dries's avatar
   
Dries committed
566
  }
Dries's avatar
   
Dries committed
567

Dries's avatar
   
Dries committed
568
569
  return $output;
}
Dries's avatar
   
Dries committed
570

Dries's avatar
   
Dries committed
571
572
573
574
575
576
577
578
579
580
581
582
583
584
585
586
587
588
589
590
591
592
593
594
595
596
597
598
function book_admin_view_line($node, $depth = 0) {

  /*
  ** Extract the revision number:
  */

  if ($list = node_revision_list($node)) {
    $revision = end($list);
  }
  else {
    $revision = 0;
  }

  /*
  ** Diplay the book page:
  */

  $output .= "<tr>";
  $output .= " <td><div style=\"padding-left: ". (25 * $depth) ."px;\"><a href=\"node.php?id=$node->nid\">". check_output($node->title) ."</a></div></td>";
  $output .= " <td align=\"center\">$revision</td>";
  $output .= " <td><a href=\"admin.php?mod=node&op=edit&id=$node->nid\">". t("edit page") ."</td>";
  $output .= " <td><a href=\"admin.php?mod=node&op=delete&id=$node->nid\">". t("delete page") ."</td>";
  $output .= "</tr>";

  return $output;
}

function book_admin_view_book($nid, $depth = 1) {
Dries's avatar
   
Dries committed
599
600
  $weight = array(0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30);

Dries's avatar
   
Dries committed
601
  $result = db_query("SELECT n.nid FROM node n LEFT JOIN book b ON n.nid = b.nid WHERE b.parent = '$nid' ORDER BY b.weight, n.title");
Dries's avatar
   
Dries committed
602
603
604

  while ($node = db_fetch_object($result)) {
    $node = node_load(array("nid" => $node->nid));
Dries's avatar
   
Dries committed
605
606
    $output .= book_admin_view_line($node, $depth);
    $output .= book_admin_view_book($node->nid, $depth + 1);
Dries's avatar
   
Dries committed
607
608
609
610
611
612
613
614
615
616
617
618
  }

  return $output;
}

function book_admin_view($nid, $depth = 0) {

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

  $output .= "<h3>". check_output($node->title) ."</h3>";
  $output .= "<table border=\"1\" cellpadding=\"2\" cellspacing=\"2\">";
  $output .= " <tr><th>title</th><th>rev</th><th colspan=\"2\">operations</th></tr>";
Dries's avatar
   
Dries committed
619
620
  $output .= book_admin_view_line($node);
  $output .= book_admin_view_book($nid);
Dries's avatar
   
Dries committed
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
646
647
648
649
650
651
652
653
654
655
656
657
658
659
660
661
662
663
664
665
666
667
668
669
670
  $output .= "</table>";

  return $output;
}

function book_admin_orphan() {

  $result = db_query("SELECT n.nid, n.title, b.parent FROM node n LEFT JOIN book b ON n.nid = b.nid WHERE n.type = 'book'");

  while ($page = db_fetch_object($result)) {
    $pages[$page->nid] = $page;
  }

  $output .= "<table border=\"1\" cellpadding=\"2\" cellspacing=\"2\">";
  $output .= " <tr><th>title</th><th colspan=\"2\">operations</th></tr>";
  foreach ($pages as $nid => $node) {
    if ($node->parent && empty($pages[$node->parent])) {
      $output .= "<tr><td><a href=\"node.php?id=$node->nid\">". check_output($node->title) ."</a></td><td><a href=\"admin.php?mod=node&op=edit&id=$node->nid\">". t("edit page") ."</td><td><a href=\"admin.php?mod=node&op=delete&id=$node->nid\">". t("delete page") ."</td>";
    }
  }
  $output .= "</table>";

  return $output;
}

function book_admin_links() {
  $result = db_query("SELECT n.nid, n.title FROM node n LEFT JOIN book b ON n.nid = b.nid WHERE b.parent = 0 ORDER BY b.weight, n.title");

  while ($book = db_fetch_object($result)) {
    $links[] = "<a href=\"admin.php?mod=book&op=view&id=$book->nid\">". t("book") .": <i>". check_output($book->title) ."</i></a>";
  }

  return $links;
}

function book_admin() {
  global $id, $op;

  if (user_access("administer nodes")) {

    /*
    ** Compile a list of the administrative links:
    */

    $links = book_admin_links();
    $links[] = "<a href=\"admin.php?mod=book&op=orphan\">". t("orphan pages") ."</a>";

    print "<small>". implode(" &middot; ", $links) ."</small><hr />";

    switch ($op) {
Dries's avatar
   
Dries committed
671
672
673
674
675
676
      case t("Edit book outline"):
      case t("Add to book outline"):
      case t("Remove from book outline"):
      case t("Update book outline"):
        print book_node_link();
        break;
Dries's avatar
   
Dries committed
677
678
679
680
681
682
683
684
685
686
687
      case "orphan":
        print book_admin_orphan();
        break;
      case "view":
        print book_admin_view($id);
        break;
      default:
    }
  }
}

Dries's avatar
   
Dries committed
688
?>