blog.module 15.9 KB
Newer Older
Dries's avatar
 
Dries committed
1 2 3 4 5 6 7 8 9 10
<?php

class Blog {
  function Blog($blog) {
    global $user;

    $this = new Node($blog);
    $this->title = $blog[title];
    $this->body = $blog[body];
    $this->userid = $blog[userid] ? $blog[userid] : $user->userid;
Dries's avatar
 
Dries committed
11
    $this->timestamp = $blog[timestamp] ? $blog[timestamp] : time();
Dries's avatar
 
Dries committed
12 13 14 15 16 17 18 19 20 21 22 23 24
  }
}

function blog_help() {
 ?>
  <p>Drupal's blog module allows registered users to maintain an online blog or diary.  It provides easy-to-write and easy-to-read online diaries or journals that can be filled with daily thoughts, poetry, boneless blabber, spiritual theories, intimate details, valuable experiences, cynical rants, semi-coherent comments, writing experiments, artistic babblings, critics on current facts, fresh insights, diverse dreams, chronicles and mumbling madness available for public consumption.</p>
 <?php
}

function blog_perm() {
  return array("administer blogs", "access blogs", "post blogs");
}

Dries's avatar
 
Dries committed
25 26
function blog_status() {
  return array(dumped, posted);
Dries's avatar
 
Dries committed
27 28
}

Dries's avatar
 
Dries committed
29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63
function blog_feed_user($name = 0, $date = 0) {
  global $user;

  $name = check_input($name ? $name : $user->userid);
  $date = check_input($date ? $date : time());

  $result = db_query("SELECT n.nid, n.title, n.timestamp, b.body FROM blog b LEFT JOIN node n ON b.nid = n.nid LEFT JOIN users u ON n.author = u.id WHERE u.userid = '$name' AND n.timestamp > '". ($date - 2592000) ."' ORDER BY b.lid DESC LIMIT 15");
  while ($blog = db_fetch_object($result)) {
    $items .= format_rss_item($blog->title, path_uri() ."node.php?id=$blog->nid", $blog->body);
  }

  $output .= "<?xml version=\"1.0\" encoding=\"ISO-8859-1\" ?>\n";
  $output .= "<rss version=\"0.91\">\n";
  $output .= format_rss_channel("$name's blog", path_uri() ."module.php?mod=blog&op=view&name=". urlencode($name), "$name's blog", $items);
  $output .= "</rss>\n";

  print $output;

}

function blog_feed_last() {
  $result = db_query("SELECT n.nid, n.title, n.timestamp, b.body, u.userid FROM blog b LEFT JOIN node n ON b.nid = n.nid LEFT JOIN users u ON n.author = u.id ORDER BY b.lid DESC LIMIT 15");
  while ($blog = db_fetch_object($result)) {
    $items .= format_rss_item($blog->title, path_uri() ."module.php?mod=blog&op=view&name=". urlencode($blog->userid), $blog->body);
  }

  $output .= "<?xml version=\"1.0\" encoding=\"ISO-8859-1\" ?>\n";
  $output .= "<rss version=\"0.91\">\n";
  $output .= format_rss_channel(variable_get("site_name", "drupal") .": user blogs", path_uri() ."module.php?mod=blog", "Recently updated blogs.", $items);
  $output .= "</rss>\n";

  print $output;

}

Dries's avatar
 
Dries committed
64
function blog_page_user($name = 0, $date = 0) {
Dries's avatar
 
Dries committed
65 66
  global $theme, $user;

Dries's avatar
 
Dries committed
67 68
  $name = check_input($name ? $name : $user->userid);
  $date = check_input($date ? $date : time());
Dries's avatar
 
Dries committed
69

Dries's avatar
Dries committed
70
  $result = db_query("SELECT n.nid, n.timestamp, b.body FROM blog b LEFT JOIN node n ON b.nid = n.nid LEFT JOIN users u ON n.author = u.id WHERE u.userid = '$name' AND n.timestamp > '". ($date - 2592000) ."' ORDER BY b.lid DESC LIMIT 20");
Dries's avatar
 
Dries committed
71

Dries's avatar
 
Dries committed
72 73 74 75 76 77 78 79 80 81
  $output .= "<table border=\"0\" cellpadding=\"4\" cellspacing=\"4\">";
  while ($blog = db_fetch_object($result)) {
    if ($date != date("dny", $blog->timestamp)) {
      $date = date("dny", $blog->timestamp);
      if ($user->id && $user->userid == $name) {
        $links = array("<a href=\"submit.php?mod=blog&op=edit&id=$blog->nid\">". t("edit") ."</a>");
        $output .= "<tr><td><b>". format_date($blog->timestamp, custom, "d M Y") .":</b></td><td align=\"right\">". $theme->links($links) ."</td></tr>";
      }
      else {
        $output .= "<tr><td colspan=\"2\"><b>". format_date($blog->timestamp, custom, "d M Y") .":</b></td></tr>";
Dries's avatar
 
Dries committed
82 83
      }
    }
Dries's avatar
 
Dries committed
84
    $output .= "<tr><td colspan=\"2\" style=\"margin-left: 20px;\">". check_output($blog->body, 1) ."</td></tr>";
Dries's avatar
 
Dries committed
85
  }
Dries's avatar
 
Dries committed
86
  $output .= "</table>";
Dries's avatar
 
Dries committed
87
  $output .= "<a href=\"module.php?mod=blog&op=feed&name=". urlencode($name) ."\"><img src=\"". $theme->image("xml.gif") ."\" width=\"36\" height=\"14\" align=\"right\" border=\"0\" /></a>\n";
Dries's avatar
 
Dries committed
88 89

  $theme->box(strtr(t("%a's blog"), array("%a" => $name)), $output, "main");
Dries's avatar
 
Dries committed
90 91
}

Dries's avatar
Dries committed
92
function blog_page_last() {
Dries's avatar
 
Dries committed
93
  global $theme;
Dries's avatar
 
Dries committed
94

Dries's avatar
Dries committed
95
  $result = db_query("SELECT n.nid, n.title, n.timestamp, b.body, u.userid FROM blog b LEFT JOIN node n ON b.nid = n.nid LEFT JOIN users u ON n.author = u.id ORDER BY b.lid DESC LIMIT 20");
Dries's avatar
 
Dries committed
96

Dries's avatar
 
Dries committed
97
  $output .= "<table border=\"0\" cellpadding=\"4\" cellspacing=\"4\">";
Dries's avatar
 
Dries committed
98
  while ($blog = db_fetch_object($result)) {
Dries's avatar
 
Dries committed
99 100 101
    $links[] = "<a href=\"module.php?mod=blog&op=view&name=". urlencode($blog->userid) ."\">". strtr(t("%a's blog"), array("%a" => $blog->userid)) ."</a>";
    $links[] = "<a href=\"submit.php?mod=blog&type=blog&id=$blog->nid\">". t("blog") ."</a>";
    $links[] = "<a href=\"node.php?id=$blog->nid\">". t("discuss") ."</a>";
Dries's avatar
 
Dries committed
102

Dries's avatar
 
Dries committed
103 104 105
    $output .= "<tr><td><b>$blog->title</b></td><td align=\"right\">". $theme->links($links) ."</td></tr>";
    $output .= "<tr><td colspan=\"2\"><div style=\"margin-left: 20px; margin-bottom: 2px;\">$blog->body</div></td></tr>";
    unset($links);
Dries's avatar
 
Dries committed
106
  }
Dries's avatar
 
Dries committed
107
  $output .= "</table>";
Dries's avatar
 
Dries committed
108
  $output .= "<a href=\"module.php?mod=blog&op=feed\"><img src=\"". $theme->image("xml.gif") ."\" width=\"36\" height=\"14\" align=\"right\" border=\"0\" /></a>\n";
Dries's avatar
 
Dries committed
109

Dries's avatar
 
Dries committed
110
  $theme->box(t("User blogs"), $output, "main");
Dries's avatar
 
Dries committed
111 112 113 114 115
}

function blog_remove($nid) {
  global $status, $user;

Dries's avatar
 
Dries committed
116 117 118 119 120
  $blog = node_get_object(array(nid => $nid, type => "blog"));

  if ($blog && $blog->author == $user->id) {
    node_save(array(nid => $nid), array(status => $status[dumped]));
    node_del(array(type => "blog", nid => $nid));
Dries's avatar
 
Dries committed
121 122 123
  }
}

Dries's avatar
 
Dries committed
124
function blog_view($node, $main = 0) {
Dries's avatar
 
Dries committed
125
  global $theme;
Dries's avatar
 
Dries committed
126

Dries's avatar
 
Dries committed
127
  $theme->node($node, $main);
Dries's avatar
 
Dries committed
128 129 130
}

function blog_form($edit = array()) {
Dries's avatar
 
Dries committed
131
  global $REQUEST_URI, $id, $mod, $type, $user, $theme;
Dries's avatar
 
Dries committed
132

Dries's avatar
 
Dries committed
133
  if ($user->id && (user_access("administer blogs") || user_access("post blogs"))) {
Dries's avatar
 
Dries committed
134
    if ($mod == "node" || $edit[type] == "blog") {
Dries's avatar
 
Dries committed
135
      // do nothing
Dries's avatar
 
Dries committed
136 137 138 139
    }
    else if ($type == "blog") {
      $item = node_get_object(array(type => "blog", nid => $id));
      $edit["title"] = $item->title;
Dries's avatar
 
Dries committed
140
      $edit["body"] = "<i>". $item->body ."</i> [<a href=\"module.php?mod=blog&name=". urlencode($item->userid) ."&date=$item->timestamp\">$item->userid</a>]";
Dries's avatar
 
Dries committed
141 142 143 144
    }
    else if ($type == "import") {
      $item = db_fetch_object(db_query("SELECT i.*, f.title as ftitle, f.link as flink FROM item i, feed f WHERE i.iid = '". check_input($id) ."' AND i.fid = f.fid"));
      $edit["title"] = $item->title;
Dries's avatar
 
Dries committed
145
      $edit["body"] = "<a href=\"$item->link\">$item->title</a> - <i>". check_output($item->description) ."</i> [<a href=\"$item->flink\">$item->ftitle</a>]\n";
Dries's avatar
 
Dries committed
146
    }
Dries's avatar
 
Dries committed
147

Dries's avatar
 
Dries committed
148
    if ($edit["title"]) {
Dries's avatar
 
Dries committed
149 150
      $form .= blog_view(new Blog(node_preview($edit)));
    }
Dries's avatar
 
Dries committed
151

Dries's avatar
 
Dries committed
152 153 154 155
    $form .= form_textfield(t("Subject"), "title", $edit["title"], 50, 64);
    $form .= form_textarea(t("Body"), "body", $edit["body"], 70, 15, t("Allowed HTML tags") .": ". htmlspecialchars(variable_get("allowed_html", "")));

    $form .= form_hidden("type", "blog");
Dries's avatar
 
Dries committed
156

Dries's avatar
 
Dries committed
157 158 159
    if ($edit["nid"] > 0) {
      $form .= form_hidden("nid", $edit["nid"]);
    }
Dries's avatar
 
Dries committed
160

Dries's avatar
 
Dries committed
161 162 163 164 165 166 167 168 169 170 171 172
    if ($edit && !$edit["title"]) {
      $form .= "<font color=\"red\">". t("Warning: you did not supply a subject.") ."</font><p>\n";
      $form .= form_submit(t("Preview"));
    }
    else if ($edit && !$edit["body"]) {
      $form .= "<font color=\"red\">". t("Warning: you did not supply any text.") ."</font><p>\n";
      $form .= form_submit(t("Preview"));
    }
    else {
      $form .= form_submit(t("Preview"));
      $form .= form_submit(t("Submit"));
    }
Dries's avatar
 
Dries committed
173

Dries's avatar
 
Dries committed
174
    return form($REQUEST_URI, $form);
Dries's avatar
 
Dries committed
175 176
  }
  else {
Dries's avatar
 
Dries committed
177
    return message_access();
Dries's avatar
 
Dries committed
178 179 180 181 182 183
  }
}

function blog_save($edit) {
  global $status, $user;

Dries's avatar
 
Dries committed
184
  if ($user->id && (user_access("administer blogs") || user_access("post blogs"))) {
Dries's avatar
 
Dries committed
185 186
    if ($edit["nid"]) {
      node_save($edit, array(title, body, type => "blog"));
Dries's avatar
 
Dries committed
187 188
    }
    else {
Dries's avatar
 
Dries committed
189
      node_save($edit, array(attributes => node_attributes_save("blog", $edit), author => $user->id, body, comment => variable_get("blog_comment", 0), moderate => variable_get("blog_moderate", ""), promote => variable_get("blog_promote", 0), score => 0, status => variable_get("blog_status", $status[posted]), timestamp => time(), title, type => "blog", votes => 0));
Dries's avatar
 
Dries committed
190
    }
Dries's avatar
 
Dries committed
191 192 193 194 195 196
  }
}

function blog_edit_history($nid) {
  global $user;

Dries's avatar
 
Dries committed
197
  $result = db_query("SELECT n.nid, n.title, n.timestamp, b.body FROM blog b LEFT JOIN node n ON b.nid = n.nid WHERE n.author = '". check_input($user->id) ."' AND n.nid <= '". check_input($nid) ."' ORDER BY b.lid DESC LIMIT 15");
Dries's avatar
 
Dries committed
198 199 200 201 202 203 204 205 206 207 208

  $output .= "<table cellpadding=\"3\" cellspacing=\"3\" border=\"0\" width=\"100%\">";
  while ($blog = db_fetch_object($result)) {
    $output .= "<tr><td><b>". check_output($blog->title) ."</b><br />". check_output($blog->body, 1) ."</td><td><a href=\"submit.php?mod=blog&op=edit&id=$blog->nid\">". t("edit") ."</a></td><td><a href=\"submit.php?mod=blog&op=delete&id=$blog->nid\">". t("delete") ."</a></td></tr>\n";
  }
  $output .= "</table>";

  return $output;
}

function blog_page() {
Dries's avatar
Dries committed
209 210
  global $theme, $op, $name, $date;

Dries's avatar
 
Dries committed
211 212

  if (user_access("access blogs")) {
Dries's avatar
 
Dries committed
213 214 215 216 217 218 219 220 221 222
    switch ($op) {
      case "feed":
        if ($name) {
          blog_feed_user($name, $date);
        }
        else {
          blog_feed_last();
        }
        break;
      default:
Dries's avatar
Dries committed
223
        $theme->header();
Dries's avatar
 
Dries committed
224 225 226 227 228 229
        if ($name) {
          blog_page_user($name, $date);
        }
        else {
          blog_page_last();
        }
Dries's avatar
Dries committed
230
        $theme->footer();
Dries's avatar
 
Dries committed
231 232
    }
  }
Dries's avatar
 
Dries committed
233
  else {
Dries's avatar
Dries committed
234
    $theme->header();
Dries's avatar
Dries committed
235
    $theme->box(t("Access denied"), message_access());
Dries's avatar
Dries committed
236
    $theme->footer();
Dries's avatar
 
Dries committed
237
  }
Dries's avatar
Dries committed
238

Dries's avatar
 
Dries committed
239 240 241
}

function blog_user() {
Dries's avatar
 
Dries committed
242
  global $op, $id, $edit, $theme, $user;
Dries's avatar
 
Dries committed
243 244 245 246 247

  if (user_access("post blogs")) {
    switch ($op) {
      case "delete":
        blog_remove($id);
Dries's avatar
 
Dries committed
248
        blog_page_user($user->userid, time());
Dries's avatar
 
Dries committed
249 250
        break;
      case "edit":
Dries's avatar
 
Dries committed
251 252
        $theme->box(t("Submit a blog"), blog_form(node_get_array(array("nid" => $id, "type" => "blog"))), "main");
        $theme->box(t("Older blogs"), blog_edit_history($id), "main");
Dries's avatar
 
Dries committed
253 254
        break;
      case t("Preview"):
Dries's avatar
 
Dries committed
255
        $theme->box(t("Preview Blog"), blog_form($edit), "main");
Dries's avatar
 
Dries committed
256 257 258
        break;
      case t("Submit"):
        blog_save($edit);
Dries's avatar
 
Dries committed
259
        blog_page_user($user->userid, time());
Dries's avatar
 
Dries committed
260 261
        break;
      default:
Dries's avatar
 
Dries committed
262
        $theme->box(t("Submit a blog"), blog_form($edit), "main");
Dries's avatar
 
Dries committed
263 264 265 266 267
    }
  }
}


Dries's avatar
 
Dries committed
268
function blog_link($type, $node = 0) {
Dries's avatar
 
Dries committed
269 270 271
  global $user;

  if ($type == "page" && user_access("access blogs")) {
Dries's avatar
 
Dries committed
272
    $links[] = "<a href=\"module.php?mod=blog\">". t("user blogs") ."</a>";
Dries's avatar
 
Dries committed
273 274 275
  }

  if ($type == "menu" && user_access("post blogs")) {
Dries's avatar
 
Dries committed
276
    $links[] = "<a href=\"submit.php?mod=blog\">". t("add blog entry") ."</a>";
Dries's avatar
 
Dries committed
277
    $links[] = "<a href=\"module.php?mod=blog&op=view&name=". urlencode($user->userid) ."\">". t("view your blog") ."</a>";
Dries's avatar
 
Dries committed
278 279
  }

Dries's avatar
 
Dries committed
280
  if ($type == "node" && $node->type == "blog") {
Dries's avatar
 
Dries committed
281 282 283
    $links[] = "<a href=\"module.php?mod=blog&op=view&name=". urlencode($node->userid) ."\">". strtr(t("%a's blog"), array("%a" => $node->userid)) ."</a>";
  }

Dries's avatar
 
Dries committed
284 285 286 287 288 289 290 291 292 293 294 295
  return $links ? $links : array();
}


function blog_block() {
  global $name, $date, $user, $mod;

  $result = db_query("SELECT u.userid, n.timestamp, n.title, n.nid FROM node n LEFT JOIN users u ON n.author = u.id WHERE n.type = 'blog' ORDER BY n.nid DESC LIMIT 10");
  while ($node = db_fetch_object($result)) {
    $output .= "<a href=\"module.php?mod=blog&op=view&name=". urlencode($node->userid) ."\">". check_output($node->title) ."<br />\n";
  }

Dries's avatar
 
Dries committed
296
  $block[0]["subject"] = "<a href=\"module.php?mod=blog\">". t("User blogs") ."</a>";
Dries's avatar
 
Dries committed
297
  $block[0]["content"] = $output;
Dries's avatar
 
Dries committed
298
  $block[0]["info"] = t("User blogs");
Dries's avatar
 
Dries committed
299 300 301 302 303 304 305 306 307 308 309 310 311 312 313 314 315 316 317 318 319 320 321 322 323 324 325 326 327 328 329 330 331 332 333 334 335 336 337 338 339 340 341 342 343 344 345 346 347 348 349 350 351 352 353 354 355 356 357 358 359 360 361 362 363 364 365 366 367 368 369 370 371 372 373 374 375 376 377 378 379 380 381 382 383 384 385 386 387 388 389 390 391 392 393 394 395 396 397 398 399 400 401 402 403 404 405 406 407 408 409 410 411 412 413 414 415 416 417
  $block[0]["link"] = "module.php?mod=blog";

  $date = $data ? $data : time();
  $userid = $name ? $name : $user->userid;

  if (($mod == "blog") || ($mod == "block")) {
       // Only show this block on "blog pages" and in the admin block section.
    $calendar = new BlogCalendar($userid, $date);
    $block[1]["subject"] = "<a href=\"module.php?mod=blog&name=". urlencode($userid) ."\">" . t("Browse blog") . "</a>";
    $block[1]["content"] = $calendar->display();
    $block[1]["info"] = t("Calendar to browse blogs");
  }

  return $block;
}


function blog_search($keys) {
  global $status, $user;
  $result = db_query("SELECT n.*, b.* FROM blog b LEFT JOIN node n ON n.nid = b.nid AND n.lid = b.lid WHERE (n.title LIKE '%$keys%' OR b.body LIKE '%$keys%') ORDER BY n.timestamp DESC LIMIT 20");
  while ($blog = db_fetch_object($result)) {
    $find[$i++] = array("title" => check_output($blog->title), "link" => (user_access("administer nodes") ? "admin.php?mod=node&type=blog&op=edit&id=$blog->nid" : "node.php?id=$blog->nid"), "user" => $blog->userid, "date" => $blog->timestamp);
  }
  return $find;
}

class BlogCalendar {
  var $date;
  var $userid;

  function BlogCalendar($userid, $date) {
    $this->userid = urlencode($userid);

    // Prevent future dates:
    $today = mktime(23, 59, 59, date("n", time()), date("d", time()), date("Y", time()));
    $this->date = (($date && $date <= $today) ? $date : $today);
    $this->date = mktime(23, 59, 59, date("n", $this->date), date("d", $this->date), date("Y", $this->date));
  }

  function display() {
    // Extract information from the given date:
    $month  = date("n", $this->date);
    $year = date("Y", $this->date);
    $day = date("d", $this->date);

    // Extract today's date:
    $today = mktime(23, 59, 59, date("n", time()), date("d", time()), date("Y", time()));

    // Extract the timestamp of the last day of today's month:
    $thislast = mktime(23, 59, 59, date("n", time()), date("t", time()), date("Y", time()));

    // Extract first day of the month:
    $first = date("w", mktime(0, 0, 0, $month, 1, $year));

    // Extract last day of the month:
    $last = date("t", mktime(0, 0, 0, $month, 1, $year));

    // Calculate previous and next months dates and check for shorter months (28/30 days)
    $prevmonth = mktime(23, 59, 59, $month - 1, 1, $year);
    $prev = mktime(23, 59, 59, $month - 1, min(date("t", $prevmonth), $day), $year);
    $nextmonth = mktime(23, 59, 59, $month + 1, 1, $year);
    $next = mktime(23, 59, 59, $month + 1, min(date("t", $nextmonth), $day), $year);

    // Generate calendar header:
    $output .= "\n<!-- calendar -->\n";
    $output .= "<TABLE WIDTH=\"100%\" BORDER=\"0\" CELLSPACING=\"0\" CELLPADDING=\"1\">\n";
    $output .= " <TR><TD ALIGN=\"center\" COLSPAN=\"7\"><B><A HREF=\"module.php?mod=blog&name=$this->userid&date=$prev\" STYLE=\"text-decoration: none;\">&lt;&lt;</A> &nbsp; ". date("F Y", $this->date) ." &nbsp; " . ($next <= $thislast ? "<A HREF=\"module.php?mod=blog&name=$this->userid&date=$next\" STYLE=\"text-decoration: none;\">&gt;&gt;</A>" : "&gt;&gt;") . "<B></TD></TR>\n";

    // Generate the days of the week:
    $output .= " <TR>";
    $somesunday = mktime(0, 0, 0, 3, 20, 1994);
    for ($i = 0; $i < 7; $i++) {
      $output .= "<TD ALIGN=\"center\">" . substr(ucfirst(t(date("l", $somesunday + $i * 86400))), 0, 1) . "</TD>";
    }
    $output .= "</TR>\n";

    // Initialize temporary variables:
    $nday = 1;
    $sday = $first;

    // Loop through all the days of the month:
    while ($nday <= $last) {
      // Set up blank days for first week of the month:
      if ($first) {
        $output .= " <TR><TD COLSPAN=\"$first\">&nbsp</TD>\n";
        $first = 0;
      }

      // Start every week on a new line:
      if ($sday == 0) $output .=  " <TR>\n";

      // Print one cell:
      $date = mktime(23, 59, 59, $month, $nday, $year);
      if ($date == $this->date) $output .= "  <TD ALIGN=\"center\" BGCOLOR=\"#CCCCCC\"><B>$nday</B></TD>\n";
      else if ($date > $today) $output .= "  <TD ALIGN=\"center\">$nday</TD>\n";
      else $output .= "  <TD ALIGN=\"center\"><A HREF=\"module.php?mod=blog&name=$this->userid&date=$date\" STYLE=\"text-decoration: none;\">$nday</A></TD>\n";

      // Start every week on a new line:
      if ($sday == 6) $output .=  " </TR>\n";

      // Update temporary variables:
      $sday++;
      $sday = $sday % 7;
      $nday++;
    }

    // Complete the calendar:
    if ($sday) {
      $end = 7 - $sday;
      $output .= "  <TD COLSPAN=\"$end\">&nbsp;</TD>\n </TR>\n";
    }
    $output .= "</TABLE>\n\n";

    // Return calendar:
    return $output;
  }
}

?>