book.module 31.3 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

  return $info[$field];
}

Dries's avatar
 
Dries committed
13 14 15 16
function book_perm() {
  return array("maintain books");
}

Dries's avatar
 
Dries committed
17
function book_access($op, $node) {
Dries's avatar
 
Dries committed
18
  global $user;
Dries's avatar
 
Dries committed
19 20

  if ($op == "view") {
Dries's avatar
 
Dries committed
21 22 23 24 25 26 27 28
    /*
    ** 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
29 30
  }

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

Dries's avatar
 
Dries committed
37
    return user_access("maintain books");
Dries's avatar
 
Dries committed
38 39 40
  }

  if ($op == "update") {
Dries's avatar
 
Dries committed
41
    /*
Dries's avatar
 
Dries committed
42 43
    ** Only registered users can update book pages.  Given the nature
    ** of the book module this is considered to be a good/safe idea.
Dries's avatar
 
Dries committed
44
    ** One can only update a book page if there are no suggested updates
Dries's avatar
 
Dries committed
45 46 47 48
    ** 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
49
    */
Dries's avatar
 
Dries committed
50

Dries's avatar
 
Dries committed
51
    return user_access("maintain books") && !$node->moderate && !$node->format && $node->revision;
Dries's avatar
 
Dries committed
52
  }
Dries's avatar
 
Dries committed
53 54
}

Dries's avatar
 
Dries committed
55
function book_link($type, $node = 0, $main = 0) {
Dries's avatar
 
Dries committed
56 57 58

  $links = array();

Dries's avatar
 
Dries committed
59
  if ($type == "page" && user_access("access content")) {
60
    $links[] = l(t("books"), "book", array("title" => t("Read and contribute to the collaborative books.")));
Dries's avatar
 
Dries committed
61 62
  }

Dries's avatar
 
Dries committed
63 64 65 66
  if ($type == "node" && $node->type == "book") {
    if (book_access("update", $node)) {
      $links[] = l(t("edit this page"), "node/edit/$node->nid", array("title" => t("Suggest an update for this book page.")));
    }
Dries's avatar
 
Dries committed
67 68 69
    if (!$main) {
      $links[] = l(t("printer-friendly version"), "book/print/$node->nid", array("title" => t("Show a printer-friendly version of this book page and its sub-pages.")));
    }
Dries's avatar
 
Dries committed
70 71
  }

Dries's avatar
 
Dries committed
72 73
  if ($type == "system") {
    if (user_access("maintain books")) {
Dries's avatar
 
Dries committed
74
      menu("node/add/book", t("book page"), "node_page", 0);
Dries's avatar
 
Dries committed
75 76
    }
    if (user_access("administer nodes")) {
Dries's avatar
 
Dries committed
77
      menu("admin/node/book", t("books"), "book_admin", 4);
78
      menu("admin/node/book/orphan", t("orphan pages"), "book_admin_orphan", 8);
Dries's avatar
 
Dries committed
79
      menu("admin/node/book/help", t("help"), "book_help_page", 9);
Dries's avatar
 
Dries committed
80 81 82

      $result = db_query("SELECT n.nid, n.title FROM {node} n INNER JOIN {book} b ON n.nid = b.nid WHERE b.parent = 0 ORDER BY b.weight, n.title");
      while ($book = db_fetch_object($result)) {
Dries's avatar
 
Dries committed
83
        menu("admin/node/book/$book->nid", t("'%title' book", array("%title" => $book->title)), "book_admin");
Dries's avatar
 
Dries committed
84
      }
Dries's avatar
 
Dries committed
85
    }
Dries's avatar
 
Dries committed
86 87 88
    if (user_access("access content")) {
      menu("book", t("books"), "book_page", 0, 1);
    }
Dries's avatar
 
Dries committed
89 90
  }

Dries's avatar
 
Dries committed
91
  return $links;
Dries's avatar
 
Dries committed
92 93
}

Dries's avatar
 
Dries committed
94
function book_load($node) {
Dries's avatar
 
Dries committed
95
  global $user;
Dries's avatar
 
Dries committed
96

Dries's avatar
 
Dries committed
97
  $book = db_fetch_object(db_query("SELECT format, parent, weight, log FROM {book} WHERE nid = %d", $node->nid));
Dries's avatar
 
Dries committed
98

Dries's avatar
 
Dries committed
99
  if (strstr(request_uri(), "node/edit")) {
Dries's avatar
 
Dries committed
100

Dries's avatar
 
Dries committed
101 102
    /*
    ** If a user is about to update a book page, we overload some
103
    ** fields to reflect the changes.  We use the request URI to
Dries's avatar
 
Dries committed
104
    ** dectect this as we don't want to interfer with updating a
Dries's avatar
 
Dries committed
105
    ** book page through the admin pages.
Dries's avatar
 
Dries committed
106 107
    */

Dries's avatar
 
Dries committed
108 109 110 111 112 113 114 115
    if ($user->uid) {
      $book->uid = $user->uid;
      $book->name = $user->name;
    }
    else {
      $book->uid = 0;
      $book->name = "";
    }
Dries's avatar
 
Dries committed
116
  }
Dries's avatar
 
Dries committed
117

Dries's avatar
 
Dries committed
118 119 120
  /*
  ** We set the revision field to indicate that we have to create
  ** a new revision when updating this book page.  We enable this
Dries's avatar
 
Dries committed
121
  ** always such that the "edit this page"-links appear.
Dries's avatar
 
Dries committed
122
  */
Dries's avatar
 
Dries committed
123

Dries's avatar
 
Dries committed
124
  $book->revision = 1;
Dries's avatar
 
Dries committed
125

Dries's avatar
 
Dries committed
126
  return $book;
Dries's avatar
 
Dries committed
127 128
}

Dries's avatar
 
Dries committed
129
function book_insert($node) {
Dries's avatar
 
Dries committed
130
  db_query("INSERT INTO {book} (nid, format, parent, weight, log) VALUES (%d, %d, %d, %d, '%s')", $node->nid, $node->format, $node->parent, $node->weight, $node->log);
Dries's avatar
 
Dries committed
131
}
Dries's avatar
 
Dries committed
132

Dries's avatar
 
Dries committed
133
function book_update($node) {
Dries's avatar
 
Dries committed
134
  db_query("UPDATE {book} SET format = %d, parent = %d, weight = %d, log = '%s' WHERE nid = %d", $node->format, $node->parent, $node->weight, $node->log, $node->nid);
Dries's avatar
 
Dries committed
135
}
Dries's avatar
 
Dries committed
136

137
function book_delete(&$node) {
Dries's avatar
 
Dries committed
138
  db_query("DELETE FROM {book} WHERE nid = %d", $node->nid);
Dries's avatar
 
Dries committed
139 140
}

141
function book_validate(&$node) {
142
  if ($node->format && user_access("create php content")) {
143 144 145 146 147 148
    // Do not filter PHP code, do not auto-extract a teaser
    $node->teaser = $node->body;
  }
  else {
    $node->format = 0;
  }
Dries's avatar
 
Dries committed
149

150 151 152 153 154 155
  // Set default values for non administrators:
  if (!user_access("administer nodes")) {
    $node->format = 0;
    $node->weight = 0;
    $node->revision = 1;
  }
Dries's avatar
 
Dries committed
156 157
}

158
function book_form(&$node, &$help, &$error) {
Dries's avatar
 
Dries committed
159
  global $user;
Dries's avatar
 
Dries committed
160

Dries's avatar
 
Dries committed
161
  $op = $_POST["op"];
162
  $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
163

164 165 166 167
  if (function_exists("taxonomy_node_form")) {
    $output .= implode("", taxonomy_node_form("book", $node));
  }

Dries's avatar
 
Dries committed
168
  $output .= form_textarea(t("Body"), "body", $node->body, 60, 20, form_allowed_tags_text());
169
  $output .= form_textarea(t("Log message"), "log", $node->log, 60, 5, t("An explanation of the additions or updates being made to help the group understand your motivations."));
Dries's avatar
 
Dries committed
170 171

  if (user_access("administer nodes")) {
Dries's avatar
 
Dries committed
172
    $output .= form_weight(t("Weight"), "weight", $node->weight, 15, t("The heavier pages will sink and the lighter pages will be positioned nearer the top."));
Dries's avatar
 
Dries committed
173
    if (user_access("create php content")) {
Dries's avatar
 
Dries committed
174
      $output .= form_radios("Type", "format", $node->format, array(0 => "HTML / text", 1 => "PHP"));
Dries's avatar
 
Dries committed
175
    }
Dries's avatar
 
Dries committed
176 177 178 179 180 181 182
  }
  else {

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

Dries's avatar
 
Dries committed
183 184
    $help = book_node("description");

Dries's avatar
 
Dries committed
185 186 187 188 189 190 191 192 193 194 195
    /*
    ** 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
196
function book_node_link($node = 0) {
Dries's avatar
 
Dries committed
197 198 199 200
  global $user;

  $op = $_POST["op"];
  $edit = $_POST["edit"];
Dries's avatar
 
Dries committed
201 202 203 204 205 206 207 208

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

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

    if ($op == t("Add to book outline")) {
Dries's avatar
 
Dries committed
209
      db_query("INSERT INTO {book} (nid, parent, weight) VALUES (%d, %d, %d)", $node->nid, $edit["parent"], $edit["weight"]);
Dries's avatar
 
Dries committed
210 211 212 213
      $output .= status(t("added the node to the book."));
    }

    if ($op == t("Update book outline")) {
Dries's avatar
 
Dries committed
214
      db_query("UPDATE {book} SET parent = %d, weight = %d WHERE nid = %d", $edit["parent"], $edit["weight"], $node->nid);
Dries's avatar
 
Dries committed
215 216 217 218
      $output .= status(t("updated the book outline."));
    }

    if ($op == t("Remove from book outline")) {
Dries's avatar
 
Dries committed
219
      db_query("DELETE FROM {book} WHERE nid = %d", $node->nid);
Dries's avatar
 
Dries committed
220 221 222
      $output .= status(t("removed the node form the book."));
    }

Dries's avatar
 
Dries committed
223
    $output .= "<h3>". t("Edit book outline for node <i>%booktitle</i>", array("%booktitle" => $node->title)) ."</h3>";
Dries's avatar
 
Dries committed
224 225

    if ($edit["nid"]) {
Dries's avatar
 
Dries committed
226
      $page = db_fetch_object(db_query("SELECT * FROM {book} WHERE nid = %d", $node->nid));
Dries's avatar
 
Dries committed
227 228

      $output .= form_select(t("Parent"), "parent", $page->parent, book_toc(), t("The parent subject or category the page belongs in."));
Dries's avatar
 
Dries committed
229
      $output .= form_weight(t("Weight"), "weight", $node->weight, 15, t("The heavier pages will sink and the lighter pages will be positioned nearer the top."));
Dries's avatar
 
Dries committed
230 231 232 233 234 235 236 237 238 239 240 241 242 243 244 245

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

Dries's avatar
 
Dries committed
246
    return form($output, "post", url("admin/node/book"));
Dries's avatar
 
Dries committed
247 248 249
  }
}

Dries's avatar
 
Dries committed
250 251 252 253 254 255 256 257 258 259 260 261 262 263 264 265 266 267 268 269 270 271 272 273 274 275 276 277 278 279 280 281 282 283 284 285 286 287
/*
** 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
288
function book_location($node, $nodes = array()) {
Dries's avatar
 
Dries committed
289
  $parent = db_fetch_object(db_query("SELECT n.nid, n.title, b.parent FROM {node} n INNER JOIN {book} b ON n.nid = b.nid WHERE n.nid = %d", $node->parent));
Dries's avatar
 
Dries committed
290 291 292 293 294 295 296
  if ($parent->title) {
    $nodes = book_location($parent, $nodes);
    array_push($nodes, $parent);
  }
  return $nodes;
}

Dries's avatar
 
Dries committed
297
function book_location_down($node, $nodes = array()) {
Dries's avatar
 
Dries committed
298
  $last_direct_child = db_fetch_object(db_query("SELECT n.nid, n.title, b.parent FROM {node} n INNER JOIN {book} b ON n.nid = b.nid WHERE b.parent = %d ORDER BY b.weight DESC, n.title DESC", $node->nid));
Dries's avatar
 
Dries committed
299 300 301 302 303 304 305 306
  if ($last_direct_child) {
    array_push($nodes, $last_direct_child);
    $nodes = book_location_down($last_direct_child, $nodes);
  }
  return $nodes;
}

function book_prev($node) {
Dries's avatar
 
Dries committed
307 308 309 310 311
  // if the parent is zero, we are at the start of a book so there is no previous
  if ($node->parent == 0) {
    return NULL;
  }

Dries's avatar
 
Dries committed
312
  // previous on the same level
Dries's avatar
 
Dries committed
313
  $direct_above = db_fetch_object(db_query("SELECT n.nid, n.title FROM {node} n INNER JOIN {book} b ON n.nid = b.nid WHERE b.parent = %d AND n.status = 1 AND (n.moderate = 0 OR n.revisions != '') AND (b.weight < %d OR (b.weight = %d AND n.title < '%s')) ORDER BY b.weight DESC, n.title DESC", $node->parent, $node->weight, $node->weight, $node->title));
Dries's avatar
 
Dries committed
314 315 316
  if ($direct_above) {
    // get last leaf of $above
    $path = book_location_down($direct_above);
Dries's avatar
 
Dries committed
317 318

    return $path ? (count($path) > 0 ? array_pop($path) : NULL) : $direct_above;
Dries's avatar
 
Dries committed
319 320 321
  }
  else {
    // direct parent
Dries's avatar
 
Dries committed
322
    $prev = db_fetch_object(db_query("SELECT n.nid, n.title FROM {node} n INNER JOIN {book} b ON n.nid = b.nid WHERE n.nid = %d AND n.status = 1 AND (n.moderate = 0 OR n.revisions != '')", $node->parent));
Dries's avatar
 
Dries committed
323 324 325 326 327 328
    return $prev;
  }
}

function book_next($node) {
  // get first direct child
Dries's avatar
 
Dries committed
329
  $child = db_fetch_object(db_query("SELECT n.nid, n.title FROM {node} n INNER JOIN {book} b ON n.nid = b.nid WHERE b.parent = %d AND n.status = 1 AND (n.moderate = 0 OR n.revisions != '') ORDER BY b.weight ASC, n.title ASC", $node->nid));
Dries's avatar
 
Dries committed
330 331 332 333
  if ($child) {
    return $child;
  }

Dries's avatar
 
Dries committed
334
  // no direct child: get next for this level or any parent in this book
Dries's avatar
 
Dries committed
335
  array_push($path = book_location($node), $node); // path to root node including this one
Dries's avatar
 
Dries committed
336 337
  // loop through nodes to book root, starting with this node
  while (($leaf = array_pop($path)) && count($path)) {
Dries's avatar
 
Dries committed
338
    $next = db_fetch_object(db_query("SELECT n.nid, n.title FROM {node} n INNER JOIN {book} b ON n.nid = b.nid WHERE b.parent = %d AND n.status = 1 AND (n.moderate = 0 OR n.revisions != '') AND (b.weight > %d OR (b.weight = %d AND n.title > '%s')) ORDER BY b.weight ASC, n.title ASC", $leaf->parent, $leaf->weight, $leaf->weight, $leaf->title));
Dries's avatar
 
Dries committed
339 340 341 342 343 344
    if ($next) {
      return $next;
    }
  }
}

Dries's avatar
 
Dries committed
345
function book_content($node) {
Dries's avatar
 
Dries committed
346
  $op = $_POST["op"];
Dries's avatar
 
Dries committed
347

Dries's avatar
 
Dries committed
348 349
  /*
  ** Always display the most recently approved revision of a node
Dries's avatar
 
Dries committed
350 351
  ** (if any) unless we have to display this page in the context of
  ** the moderation queue.
Dries's avatar
 
Dries committed
352 353
  */

Dries's avatar
 
Dries committed
354
  if ($op != t("Preview") && $node->moderate && arg(0) != "queue") {
Dries's avatar
 
Dries committed
355 356 357 358 359
    $revision = book_revision_load($node, array("moderate" => 0, "status" => 1));

    if ($revision) {
      $node = $revision;
    }
Dries's avatar
 
Dries committed
360 361
  }

Dries's avatar
 
Dries committed
362 363 364 365 366
  /*
  ** Extract the page body.  If body is dynamic (using PHP code), the body
  ** will be generated.
  */

Dries's avatar
 
Dries committed
367 368 369 370 371 372 373 374 375 376 377 378 379 380 381
  if ($node->format == 1) {
    // Make sure only authorized users can preview PHP pages.
    if ($op == t("Preview") && !user_access("create php content")) {
      return;
    }

    ob_start();
    eval($node->body);
    $node->teaser = $node->body = ob_get_contents();
    ob_end_clean();
  }
  else {
    $node->teaser = check_output($node->teaser);
    $node->body = check_output($node->body);
  }
Dries's avatar
 
Dries committed
382

Dries's avatar
 
Dries committed
383 384 385 386 387
  return $node;
}

function book_view($node, $main = 0) {
  $node = book_content($node);
Dries's avatar
 
Dries committed
388 389 390 391 392
  /*
  ** 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
393

Dries's avatar
 
Dries committed
394
  if ($main) {
Dries's avatar
 
Dries committed
395
    print theme("node", $node, $main);
Dries's avatar
 
Dries committed
396
  }
Dries's avatar
 
Dries committed
397
  else {
Dries's avatar
 
Dries committed
398 399 400
    if ($node->moderate) {
      $node->body = $node->body . "<div class=\"log\"><div class=\"title\">". t("Log") .":</div>$node->log</div>";
    }
Dries's avatar
 
Dries committed
401 402
    // Add the navigation and the breadcrumb if we view a page
    if (arg(1) == "view") {
Dries's avatar
 
Dries committed
403
      $node = book_navigation($node);
Dries's avatar
 
Dries committed
404
      // Print the breadcrumb
Dries's avatar
 
Dries committed
405
      print theme("breadcrumb", $node->breadcrumb);
Dries's avatar
 
Dries committed
406
    }
Dries's avatar
 
Dries committed
407
    // Print the node
Dries's avatar
 
Dries committed
408
    print theme("node", $node, $main);
Dries's avatar
 
Dries committed
409 410 411 412 413
  }
}

function book_show($node, $cid) {

Dries's avatar
 
Dries committed
414
  if (node_access("view", $node)) {
Dries's avatar
 
Dries committed
415

Dries's avatar
 
Dries committed
416
    if ($node->type == "book") {
Dries's avatar
 
Dries committed
417
      book_view($node, 0);
Dries's avatar
 
Dries committed
418 419
    }
    else {
Dries's avatar
 
Dries committed
420

Dries's avatar
 
Dries committed
421 422
      if (module_hook($node->type, "content")) {
        $node = node_invoke($node, "content");
Dries's avatar
 
Dries committed
423

Dries's avatar
 
Dries committed
424 425 426
        /*
        ** Add the book navigation if the node is in the book.
        */
Dries's avatar
 
Dries committed
427

Dries's avatar
 
Dries committed
428
        $book = db_fetch_object(db_query("SELECT * FROM {book} WHERE nid = %d", $node->nid));
Dries's avatar
 
Dries committed
429

Dries's avatar
 
Dries committed
430 431 432 433 434 435
        if ($book) {
          foreach ($book as $key => $value) {
            $node->$key = $value;
          }
          $node = book_navigation($node);
        }
Dries's avatar
 
Dries committed
436

Dries's avatar
 
Dries committed
437 438 439
        /*
        ** make $node->type a book. This is for the links.
        */
Dries's avatar
 
Dries committed
440

Dries's avatar
 
Dries committed
441
        $node->type = "book";
Dries's avatar
 
Dries committed
442

Dries's avatar
 
Dries committed
443 444 445
        /*
        ** View the node
        */
Dries's avatar
 
Dries committed
446 447
        print theme("breadcrumb", $node->breadcrumb);
        print theme("node", $node, 0);
Dries's avatar
 
Dries committed
448 449 450 451 452 453 454 455 456 457
      }
      else {

        /*
        ** We can't get the content of the node and just view the node.
        ** We don't add breadcrums or links.
        */
        node_view($node, 0);
      }
    }
Dries's avatar
 
Dries committed
458 459 460 461
    if (function_exists("comment_render") && $node->comment) {
      comment_render($node, $cid);
    }

Dries's avatar
 
Dries committed
462
    /*
Dries's avatar
 
Dries committed
463
    ** Update the history table, stating that this user viewed this node.
Dries's avatar
 
Dries committed
464
    */
Dries's avatar
 
Dries committed
465 466 467
    node_tag_new($node->nid);
  }
}
Dries's avatar
 
Dries committed
468

Dries's avatar
 
Dries committed
469
function book_navigation($node) {
Dries's avatar
 
Dries committed
470

Dries's avatar
 
Dries committed
471
    $path = book_location($node);
Dries's avatar
 
Dries committed
472

Dries's avatar
 
Dries committed
473 474 475 476 477 478 479 480 481
    /*
    ** Construct the breadcrumb:
    */

    $node->breadcrumb = ""; // Overwrite the trail with a book trail.
    $node->breadcrumb[] = l(t("Home"), "");
    $node->breadcrumb[] = l(t("Books"), "book");
    foreach ($path as $level) {
      $node->breadcrumb[] = l($level->title, "book/view/$level->nid");
Dries's avatar
 
Dries committed
482
    }
Dries's avatar
 
Dries committed
483

Dries's avatar
 
Dries committed
484 485 486
    /*
    ** Construct the "next" and "previous" links:
    */
Dries's avatar
 
Dries committed
487

Dries's avatar
 
Dries committed
488 489 490
    if ($node->nid) {
      $prev = book_prev($node);
      $next = book_next($node);
491 492
    }

Dries's avatar
 
Dries committed
493
    if ($node->nid) {
Dries's avatar
 
Dries committed
494
      $output .= "<div class=\"book\">";
Dries's avatar
 
Dries committed
495 496 497
      $output .= "<div class=\"tree\">". book_tree($node->nid) ."</div>";
      if ($prev) {
        $links .= "<div class=\"prev\">";
Dries's avatar
 
Dries committed
498
        $links .= l(t("previous"), "book/view/$prev->nid", array("title" => t("View the previous page in this book.")));
Dries's avatar
 
Dries committed
499 500 501 502 503
        $links .= "</div>";
        $titles .= "<div class=\"prev\">$prev->title</div>";
      }
      if ($next) {
        $links .= "<div class=\"next\">";
Dries's avatar
 
Dries committed
504
        $links .= l(t("next"), "book/view/$next->nid", array("title" => t("View the next page in this book.")));
Dries's avatar
 
Dries committed
505 506 507
        $links .= "</div>";
        $titles .= "<div class=\"next\">$next->title</div>";
      }
Dries's avatar
 
Dries committed
508 509 510
      else {
        $links .= "<div class=\"next\">&nbsp;</div>"; // make an empty div to fill the space
      }
Dries's avatar
 
Dries committed
511 512
      if ($node->parent) {
        $links .= "<div class=\"up\">";
Dries's avatar
 
Dries committed
513
        $links .= l(t("up"), "book/view/$node->parent", array("title" => t("View this page's parent section.")));
Dries's avatar
 
Dries committed
514 515 516 517
        //if ($node->parent != $path[0]->nid) {
        //  $links .= " | ";
        //  $links .= l(t("index"), "node/view/".$path[0]->nid."", array("title" => t("View this book's table of contents.")));
        //}
Dries's avatar
 
Dries committed
518 519 520 521 522 523
        $links .= "</div>";
      }
      $output .= "<div class=\"nav\">";
      $output .= "<div class=\"links\">$links</div>";
      $output .= "<div class=\"titles\">$titles</div>";
      $output .= "</div>";
Dries's avatar
 
Dries committed
524
      $output .= "</div>";
Dries's avatar
 
Dries committed
525
    }
Dries's avatar
 
Dries committed
526 527
    $node->body = $node->body.$output;
  return $node;
Dries's avatar
 
Dries committed
528
}
Dries's avatar
 
Dries committed
529

Dries's avatar
 
Dries committed
530 531 532 533 534 535 536 537 538 539 540 541
function book_toc_recurse($nid, $indent, $toc, $children) {

  if ($children[$nid]) {
    foreach ($children[$nid] as $foo => $node) {
      $toc[$node->nid] = "$indent $node->title";
      $toc = book_toc_recurse($node->nid, "$indent--", $toc, $children);
    }
  }

  return $toc;
}

Dries's avatar
 
Dries committed
542
function book_toc($parent = 0, $indent = "", $toc = array()) {
Dries's avatar
 
Dries committed
543

Dries's avatar
 
Dries committed
544
  $result = db_query("SELECT n.nid, n.title, b.parent FROM {node} n INNER JOIN {book} b ON n.nid = b.nid WHERE n.status = '1' ORDER BY b.weight, n.title");
Dries's avatar
 
Dries committed
545

Dries's avatar
 
Dries committed
546
  while ($node = db_fetch_object($result)) {
Dries's avatar
 
Dries committed
547 548 549 550
    if (!$children[$node->parent]) {
      $children[$node->parent] = array();
    }
    array_push($children[$node->parent], $node);
Dries's avatar
 
Dries committed
551
  }
Dries's avatar
 
Dries committed
552 553

  /*
Dries's avatar
 
Dries committed
554 555
  ** If the user is an administrator, add the root node; only
  ** administrators can start new books.
Dries's avatar
 
Dries committed
556
  */
Dries's avatar
 
Dries committed
557

Dries's avatar
 
Dries committed
558
  if (user_access("administer nodes")) {
Dries's avatar
 
Dries committed
559
    $toc[0] = "<". t("root") .">";
Dries's avatar
 
Dries committed
560 561
  }

Dries's avatar
 
Dries committed
562
  /*
Dries's avatar
 
Dries committed
563
  ** Iterate root book nodes:
Dries's avatar
 
Dries committed
564 565
  */

Dries's avatar
 
Dries committed
566
  $toc = book_toc_recurse($parent, $indent, $toc, $children);
Dries's avatar
 
Dries committed
567

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

Dries's avatar
 
Dries committed
571

Dries's avatar
 
Dries committed
572
function book_tree_recurse($nid, $depth, $children) {
Dries's avatar
 
Dries committed
573

Dries's avatar
 
Dries committed
574
  if ($depth > 0) {
Dries's avatar
 
Dries committed
575 576
    if ($children[$nid]) {
      foreach ($children[$nid] as $foo => $node) {
Dries's avatar
 
Dries committed
577
        $output .= "<li>";
Dries's avatar
 
Dries committed
578
        $output .= l($node->title, "book/view/$node->nid");
Dries's avatar
 
Dries committed
579 580 581
        if ($tree = book_tree_recurse($node->nid, $depth - 1, $children)) {
          $output .= "<ul>$tree</ul>";
        }
Dries's avatar
 
Dries committed
582
        $output .= "</li>";
Dries's avatar
 
Dries committed
583 584
      }
    }
Dries's avatar
 
Dries committed
585 586 587 588 589
  }

  return $output;
}

Dries's avatar
 
Dries committed
590

Dries's avatar
 
Dries committed
591 592
function book_tree($parent = 0, $depth = 3) {

Dries's avatar
 
Dries committed
593
  $result = db_query("SELECT n.nid, n.title, b.parent FROM {node} n INNER JOIN {book} b ON n.nid = b.nid WHERE n.status = '1' AND n.moderate = '0' ORDER BY b.weight, n.title");
Dries's avatar
 
Dries committed
594

Dries's avatar
 
Dries committed
595 596 597 598
  while ($node = db_fetch_object($result)) {
    $list = $children[$node->parent] ? $children[$node->parent] : array();
    array_push($list, $node);
    $children[$node->parent] = $list;
Dries's avatar
 
Dries committed
599
  }
Dries's avatar
 
Dries committed
600

Dries's avatar
 
Dries committed
601 602
  $output = book_tree_recurse($parent, $depth, $children);
  $output = "<ul>$output</ul>";
Dries's avatar
 
Dries committed
603

Dries's avatar
 
Dries committed
604 605 606
  return $output;
}

Dries's avatar
 
Dries committed
607

Dries's avatar
 
Dries committed
608
function book_render() {
Dries's avatar
 
Dries committed
609

Dries's avatar
 
Dries committed
610
  $result = db_query("SELECT n.nid FROM {node} n INNER JOIN {book} b ON n.nid = b.nid WHERE b.parent = 0 AND n.status = 1 AND (n.moderate = 0 OR n.revisions IS NOT NULL) ORDER BY b.weight, n.title");
Dries's avatar
 
Dries committed
611

Dries's avatar
 
Dries committed
612 613 614 615
  while ($page = db_fetch_object($result)) {
    // load the node:
    $node = node_load(array("nid" => $page->nid));

Dries's avatar
 
Dries committed
616
    if ($node) {
Dries's avatar
 
Dries committed
617 618
      // take the most recent approved revision, extract the page and check output:
      $node = book_content($node);
Dries's avatar
 
Dries committed
619
      // output the content:
Dries's avatar
 
Dries committed
620
      $output .= "<div class=\"book\">";
Dries's avatar
 
Dries committed
621
      $output .= "<div class=\"title\">". l($node->title, "book/view/$node->nid") ."</div>";
Dries's avatar
 
Dries committed
622
      $output .= "<div class=\"body\">". $node->body ."</div>";
Dries's avatar
 
Dries committed
623
      $output .= "</div>";
Dries's avatar
 
Dries committed
624
    }
Dries's avatar
 
Dries committed
625 626
  }

Dries's avatar
 
Dries committed
627
  drupal_set_title(t("Books"));
Dries's avatar
 
Dries committed
628
  print theme("header");
Dries's avatar
 
Dries committed
629
  print $output;
Dries's avatar
 
Dries committed
630
  print theme("footer");
Dries's avatar
 
Dries committed
631 632 633
}

function book_page() {
Dries's avatar
 
Dries committed
634

Dries's avatar
 
Dries committed
635
  if (user_access("access content")) {
Dries's avatar
 
Dries committed
636
    switch (arg(1)) {
Dries's avatar
 
Dries committed
637
      case "view":
Dries's avatar
 
Dries committed
638
        $node = node_load(array("nid" => arg(2)));
Dries's avatar
 
Dries committed
639
        print theme("header");
Dries's avatar
 
Dries committed
640
        book_show($node, arg(3));
Dries's avatar
 
Dries committed
641
        print theme("footer");
Dries's avatar
 
Dries committed
642
        break;
Dries's avatar
 
Dries committed
643
      case "print":
Dries's avatar
 
Dries committed
644
        print book_print(arg(2), $depth = 1);
Dries's avatar
 
Dries committed
645 646 647
        break;
      default:
        book_render();
Dries's avatar
 
Dries committed
648 649 650
    }
  }
  else {
Dries's avatar
 
Dries committed
651
    drupal_set_title(t("Access denied"));
Dries's avatar
 
Dries committed
652
    print theme("header");
Dries's avatar
 
Dries committed
653
    print message_access();
Dries's avatar
 
Dries committed
654
    print theme("footer");
Dries's avatar
 
Dries committed
655
  }
Dries's avatar
 
Dries committed
656 657
}

658
function book_print($id = "", $depth = 1) {
Dries's avatar
 
Dries committed
659
  global $base_url;
660
  $result = db_query("SELECT n.nid FROM {node} n INNER JOIN {book} b ON n.nid = b.nid WHERE n.status = 1 AND n.nid = %d AND (n.moderate = 0 OR n.revisions IS NOT NULL) ORDER BY b.weight, n.title", $id);
Dries's avatar
 
Dries committed
661

Dries's avatar
 
Dries committed
662 663 664
  while ($page = db_fetch_object($result)) {
    // load the node:
    $node = node_load(array("nid" => $page->nid));
Dries's avatar
 
Dries committed
665

Dries's avatar
 
Dries committed
666 667
    if ($node) {
      // output the content:
Dries's avatar
 
Dries committed
668 669 670
      if (module_hook($node->type, "content")) {
        $node = node_invoke($node, "content");
      }
Dries's avatar
 
Dries committed
671
      $output .= "<h1 id=\"$node->nid\" name=\"$node->nid\" class=\"book-h$depth\">$node->title</h1>";
Dries's avatar
 
Dries committed
672

Dries's avatar
 
Dries committed
673
      if ($node->body) {
Dries's avatar
 
Dries committed
674
        $output .= $node->body;
Dries's avatar
 
Dries committed
675
      }
Dries's avatar
 
Dries committed
676
    }
Dries's avatar
 
Dries committed
677
  }
Dries's avatar
 
Dries committed
678

679
  $output .= book_print_recurse($id, $depth);
Dries's avatar
 
Dries committed
680

Dries's avatar
 
Dries committed
681 682 683 684 685 686
  $html = "<html><head><title>$node->title</title>";
  $html .= "<base href=\"$base_url/\" />";
  $html .= "<style type=\"text/css\">\n@import url(misc/print.css);\n</style>";
  $html .= "</head><body>". $output ."</body></html>";

  return $html;
Dries's avatar
 
Dries committed
687 688
}

689
function book_print_recurse($parent = "", $depth = 1) {
Dries's avatar
 
Dries committed
690
  $result = db_query("SELECT n.nid FROM {node} n INNER JOIN {book} b ON n.nid = b.nid WHERE n.status = 1 AND b.parent = '$parent' AND (n.moderate = 0 OR n.revisions IS NOT NULL) ORDER BY b.weight, n.title");
Dries's avatar
 
Dries committed
691

Dries's avatar
 
Dries committed
692 693 694 695 696 697
  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
698
      $node = book_revision_load($node, array("moderate" => 0, "status" => 1));
Dries's avatar
 
Dries committed
699 700
    }

Dries's avatar
 
Dries committed
701 702
    if ($node) {
      // output the content:
Dries's avatar
 
Dries committed
703 704 705
      if (module_hook($node->type, "content")) {
        $node = node_invoke($node, "content");
      }
Dries's avatar
 
Dries committed
706
      $output .= "<h1 id=\"$node->nid\" name=\"$node->nid\" class=\"book-h$depth\">$node->title</h1>";
Dries's avatar
 
Dries committed
707

Dries's avatar
 
Dries committed
708
      if ($node->body) {
Dries's avatar
 
Dries committed
709
        $output .= "<ul>". $node->body ."</ul>";
Dries's avatar
 
Dries committed
710
      }
Dries's avatar
 
Dries committed
711

712
      $output .= book_print_recurse($node->nid, $depth + 1);
Dries's avatar
 
Dries committed
713
    }
Dries's avatar
 
Dries committed
714
  }
Dries's avatar
 
Dries committed
715

Dries's avatar
 
Dries committed
716 717
  return $output;
}
Dries's avatar
 
Dries committed
718

Dries's avatar
 
Dries committed
719 720
function book_admin_view_line($node, $depth = 0) {

Dries's avatar
 
Dries committed
721
  $row = array("<div style=\"padding-left: ". (25 * $depth) ."px;\">". form_textfield(NULL, "$node->nid][title", $node->title, 64, 255) ."</div>", form_weight(NULL, "$node->nid][weight", $node->weight), l(t("view node"), "node/view/$node->nid"), l(t("edit node"), "admin/node/edit/$node->nid"), l(t("delete node"), "admin/node/delete/$node->nid"));
Dries's avatar
 
Dries committed
722 723

  return $row;
Dries's avatar
 
Dries committed
724 725 726
}

function book_admin_view_book($nid, $depth = 1) {
Dries's avatar
 
Dries committed
727
  $result = db_query("SELECT n.nid FROM {node} n INNER JOIN {book} b ON n.nid = b.nid WHERE b.parent = %d ORDER BY b.weight, n.title", $nid);
Dries's avatar
 
Dries committed
728 729 730

  while ($node = db_fetch_object($result)) {
    $node = node_load(array("nid" => $node->nid));
Dries's avatar
 
Dries committed
731 732
    $rows[] = book_admin_view_line($node, $depth);
    $rows = array_merge($rows, book_admin_view_book($node->nid, $depth + 1));
Dries's avatar
 
Dries committed
733 734
  }

Dries's avatar
 
Dries committed
735
  return $rows;
Dries's avatar
 
Dries committed
736 737 738 739
}

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

Dries's avatar
 
Dries committed
740 741
  if ($nid) {
    $node = node_load(array("nid" => $nid));
Dries's avatar
 
Dries committed
742

Dries's avatar
 
Dries committed
743
    $output .= "<h3>$node->title</h3>";
Dries's avatar
 
Dries committed
744

Dries's avatar
 
Dries committed
745 746 747
    $header = array(t("title"), t("weight"), array("data" => t("operations"), "colspan" => 3));
    $rows[] = book_admin_view_line($node);
    $rows = array_merge($rows, book_admin_view_book($nid));
Dries's avatar
 
Dries committed
748

Dries's avatar
 
Dries committed
749
    $output .= theme("table", $header, $rows);
Dries's avatar
 
Dries committed
750
    $output .= form_submit(t("Save book pages"));
Dries's avatar
 
Dries committed
751

Dries's avatar
 
Dries committed
752 753
    return form($output);
  }
Dries's avatar
 
Dries committed
754 755 756 757
}

function book_admin_save($nid, $edit = array()) {

Dries's avatar
 
Dries committed
758 759
  if ($nid) {
    $book = node_load(array("nid" => $nid));
Dries's avatar
 
Dries committed
760

Dries's avatar
 
Dries committed
761 762 763 764
    foreach ($edit as $nid => $value) {
      /*
      ** Check to see whether the title needs updating:
      */
Dries's avatar
 
Dries committed
765

Dries's avatar
 
Dries committed
766
      $title = db_result(db_query("SELECT title FROM {node} WHERE nid = %d", $nid));
Dries's avatar
 
Dries committed
767
      if ($title != $value["title"]) {
Dries's avatar
 
Dries committed
768
        db_query("UPDATE {node} SET title = '%s' WHERE nid = %d", $value["title"], $nid);
Dries's avatar
 
Dries committed
769
      }
Dries's avatar
 
Dries committed
770

Dries's avatar
 
Dries committed
771 772 773
      /*
      ** Check to see whether the weight needs updating:
      */
Dries's avatar
 
Dries committed
774

Dries's avatar
 
Dries committed
775
      $weight = db_result(db_query("SELECT weight FROM {book} WHERE nid = %d", $nid));
Dries's avatar
 
Dries committed
776
      if ($weight != $value["weight"]) {
Dries's avatar
 
Dries committed
777
        db_query("UPDATE {book} SET weight = %d WHERE nid = %d", $value["weight"], $nid);
Dries's avatar
 
Dries committed
778
      }
Dries's avatar
 
Dries committed
779 780
    }

Dries's avatar
 
Dries committed
781 782
    $message = t("updated book '%title'", array("%title" => $book->title));
    watchdog("special", $message);
Dries's avatar
 
Dries committed
783

Dries's avatar
 
Dries committed
784 785
    return $message;
  }
Dries's avatar
 
Dries committed
786 787 788 789
}

function book_admin_orphan() {

Dries's avatar
 
Dries committed
790
  $result = db_query("SELECT n.nid, n.title, n.status, b.parent FROM {node} n INNER JOIN {book} b ON n.nid = b.nid WHERE n.type = 'book'");
Dries's avatar
 
Dries committed
791 792 793 794 795

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

Dries's avatar
 
Dries committed
796
  if ($pages) {
Dries's avatar
 
Dries committed
797 798
    $output .= "<h3>Orphan pages</h3>";
    $header = array(t("title"), t("weight"), array("data" => t("operations"), "colspan" => 3));
Dries's avatar
 
Dries committed
799 800
    foreach ($pages as $nid => $node) {
      if ($node->parent && empty($pages[$node->parent])) {
Dries's avatar
 
Dries committed
801 802
        $rows[] = book_admin_view_line($node, $depth);
        $rows = array_merge($rows, book_admin_view_book($node->nid, $depth + 1));
Dries's avatar
 
Dries committed
803
      }
Dries's avatar
 
Dries committed
804
    }
Dries's avatar
 
Dries committed
805
    $output .= theme("table", $header, $rows);
Dries's avatar
 
Dries committed
806 807
  }

Dries's avatar
 
Dries committed
808 809 810
  print theme("header");
  print $output;
  print theme("footer");
Dries's avatar
 
Dries committed
811 812 813 814 815 816
}

function book_admin_links() {
}

function book_admin() {
Dries's avatar
 
Dries committed
817 818
  $op = $_POST["op"];
  $edit = $_POST["edit"];
Dries's avatar
 
Dries committed
819 820

  if (user_access("administer nodes")) {
Dries's avatar
 
Dries committed
821
    if (empty($op)) {
Dries's avatar
 
Dries committed
822
      $op = arg(3);
Dries's avatar
 
Dries committed
823 824
    }

Dries's avatar
 
Dries committed
825
    switch ($op) {
Dries's avatar
 
Dries committed
826 827 828 829
      case t("Edit book outline"):
      case t("Add to book outline"):
      case t("Remove from book outline"):
      case t("Update book outline"):
Dries's avatar
 
Dries committed
830
        $output = book_node_link();
Dries's avatar
 
Dries committed
831
        break;
Dries's avatar
 
Dries committed
832
      case "orphan":
Dries's avatar
 
Dries committed
833
        $output = book_admin_orphan();
Dries's avatar
 
Dries committed
834
        break;
835
      case t("Save book pages"):
Dries's avatar
 
Dries committed
836
        $output = status(book_admin_save(arg(3), $edit));
Dries's avatar
 
Dries committed
837
        // fall through:
Dries's avatar
 
Dries committed
838
      default:
Dries's avatar
 
Dries committed
839
        $output .= book_admin_view(arg(3));
Dries's avatar
 
Dries committed
840 841
        break;
    }
Dries's avatar
 
Dries committed
842 843 844 845 846 847 848 849
    print theme("header");
    print $output;
    print theme("footer");
  }
  else {
    print theme("header");
    print message_access();
    print theme("footer");
Dries's avatar
 
Dries committed
850 851 852
  }
}

Dries's avatar
 
Dries committed
853
function book_help($section = "admin/help#book") {
Dries's avatar
 
Dries committed
854
  $output = "";
855

Dries's avatar
 
Dries committed
856
  switch ($section) {
Dries's avatar
 
Dries committed
857
    case 'admin/help#book':
858
      $output .= "<p>The book organises content into a nested hierarchical structure. It is particularly good for manuals, Frequently Asked Questions (FAQs) and the like, allowing you to have chapters, sections, etc.</p>";
Dries's avatar
 
Dries committed
859 860
      $output .= "<p>A book is simply a collection of nodes that have been linked together. These nodes are usually of type <i>book page</i>, but you can insert nodes of any type into a book outline. Every node in the book has a <i>parent</i> node which  \"contains\" it. This is how book.module establishes its hierarchy. At any given level in the hierarchy, a book can contain many nodes. All these sibling nodes are sorted according to the <i>weight</i> that you give them.</p>";
      $output .= "<p>A book page is a special node type that allows you to embed PHP within the body of the page. This capability is only offerred to administrators, since malicious users could abuse this power. In addiiton, book pages contain a <i>log message</i> field which helps your users understand the motivation behind an edit of a book page. Each edited version of a book page is stored as a new revision of a node. This capability makes it easy to revert to an old version of a page, should that be desirable.</p>";
Dries's avatar
 
Dries committed
861 862
      $output .= "<p>Like other node types, book submissions and edits may be subject to moderation, depending on your configuration.  Similarly, books use %permissions to determine who may read and write to them. Only administrators are allowed to create new books, which are really just nodes whose parent is <i>&lt;root&gt;</i>. To include an existing node in your book, click on the \"administer\"-link in that node.  At the bottom of this administration page, click on the <i>edit book outline</i> button. This enables you to place the node wherever you'd like within the book hierarchy. To add a new node into your book, use the %create link.</p>";
      $output .= "<p>Administrators may review the hierarchy of their books by clicking on the %collaborative-book link in the adminstration pages. There, nodes may be edited, reorganized, removed from book, and deleted. This behavior may change in the future. When a parent node is deleted, it may leave behind child nodes.  These nodes are now <i>orphans</i>. Administrators should periodically %orphans-book and reaffiliate those pages as desired. Finally, administrators may also %export-book to a single, flat HTML page which is suitable for printing.</p>";
Dries's avatar
 
Dries committed
863 864
      $output .= "<h3>Maintaining a FAQ using a collaborative book</h3>";
      $output .= "<p>Collaborative books let you easily set up a Frequently Asked Questions (FAQ) section on your web site. The main benefit is that you don't have to write all the questions/answers by yourself - let the community do it for you!</p>";
Dries's avatar
 
Dries committed
865
      $output .= "<p>In order to set up the FAQ, you have to create a new book which will hold all your content. To do so, click on the %create link. Give it a thoughtful title, and body. A title like \"Estonia Travel - FAQ\" is nice. You may always edit these fields later. You will probably want to designate <i>&lt;root&gt;</i> as the parent of this page. Leave the <i>log message</i> and <i>type</i> fields blank for now. After you have submitted this book page, you are ready to begin filling up your book with questions that are frequently asked.</p>";
866
      $output .= "<p>Whenever you come across a post which you want to include in your FAQ, click on the <i>administer</i> link. Then click on the <i>edit book outline</i> button at the bottom of the page. Then place the relevant post wherever is most appropriate in your book by selecting a <i>parent</i>. Books are quite flexible. They can have sections like <i>Flying to Estonia</i>, <i>Eating in Estonia</i> and so on. As you get more experienced with the book module, you can reorganize posts in your book so that it stays organized.</p>";
867 868
      $output .= "<p>Notes:</p><ul><li>Any comments attached to those relevant posts which you designate as book pages will also be transported into your book. This is a great feature, since much wisdom is shared via comments. Remember that all future comments and edits will automatically be reflected in your book.</li><li>You may wish to edit the title of posts when adding them to your FAQ. This is done on the same page as the <i>Edit book outline</i> button. Clear titles improve navigability enormously.</li><li>Book pages may come from any content type (blog, story, page, etc.). If you are creating a post solely for inclusion in your book, then use the %create link.</li><li>If you don't see the <i>administer</i> link, then you probably have insufficient %permissions.</li><li>If you want to get really fancy, note that books are one of the few content types which allow raw PHP in their <i>body</i>. So you've got lots of geeky possibilities there.</li></ul>";
      $output = t($output, array("%permissions" => l(t("permissions"), "admin/user/permission"), "%create" => l(t("submit content") ." &raquo; ". t("book page"), "node/add/book"), "%collaborative-book" => l(t("collaborative book"), "admin/node/book"), "%orphans-book" => l(t("review their books for orphans"), "admin/node/book/orphan"), "%export-book" => l(t("export their books"), "book/print")));
Dries's avatar
 
Dries committed
869
      break;
Dries's avatar
 
Dries committed
870
    case 'admin/system/modules#description':
Dries's avatar
 
Dries committed
871
      $output = t("Allows users to collaboratively author a book.");
Dries's avatar
 
Dries committed
872 873
      break;
    case 'admin/node/book':
Dries's avatar
 
Dries committed
874
      $output = t("The book module offers a mean to organize content, authored by many users, in an online manual, outline or FAQ.");
Dries's avatar
 
Dries committed
875 876
      break;
    case 'admin/node/book/orphan':
Dries's avatar
 
Dries committed
877
      $output = t("Pages in a book are like a tree. As pages are edited, reorganized and removed, child pages might be left with no link to the rest of the book.  Such pages are refered to as 'orphan pages'.  On this page, administrators can review their books for orphans and reattach those pages as desired.");
Dries's avatar
 
Dries committed
878 879 880 881
      break;

  }

Dries's avatar
 
Dries committed
882
  return $output;
883
}
Dries's avatar
 
Dries committed
884 885 886 887 888 889

function book_help_page() {
  print theme("header");
  print book_help();
  print theme("footer");
}
Dries's avatar
 
Dries committed
890
?>