blog.module 16 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
function blog_summary($node) {
  return $node->body;
}

Dries's avatar
   
Dries committed
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
64
65
66
67
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
68
function blog_page_user($name = 0, $date = 0) {
Dries's avatar
   
Dries committed
69
70
  global $theme, $user;

Dries's avatar
   
Dries committed
71
72
  $name = check_input($name ? $name : $user->userid);
  $date = check_input($date ? $date : time());
Dries's avatar
   
Dries committed
73

Dries's avatar
Dries committed
74
  $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
75

Dries's avatar
   
Dries committed
76
77
78
79
80
81
82
83
84
85
  $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
86
87
      }
    }
Dries's avatar
   
Dries committed
88
    $output .= "<tr><td colspan=\"2\" style=\"margin-left: 20px;\">". check_output($blog->body, 1) ."</td></tr>";
Dries's avatar
   
Dries committed
89
  }
Dries's avatar
   
Dries committed
90
  $output .= "</table>";
Dries's avatar
   
Dries committed
91
  $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
92
93

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

Dries's avatar
Dries committed
96
function blog_page_last() {
Dries's avatar
   
Dries committed
97
  global $theme;
Dries's avatar
   
Dries committed
98

Dries's avatar
Dries committed
99
  $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
100

Dries's avatar
   
Dries committed
101
  $output .= "<table border=\"0\" cellpadding=\"4\" cellspacing=\"4\">";
Dries's avatar
   
Dries committed
102
  while ($blog = db_fetch_object($result)) {
Dries's avatar
   
Dries committed
103
104
105
    $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
106

Dries's avatar
   
Dries committed
107
108
    $output .= "<tr><td><b>". check_output($blog->title) ."</b></td><td align=\"right\">". $theme->links($links) ."</td></tr>";
    $output .= "<tr><td colspan=\"2\"><div style=\"margin-left: 20px;\">". check_output($blog->body) ."</div><br /></td></tr>";
Dries's avatar
   
Dries committed
109
    unset($links);
Dries's avatar
   
Dries committed
110
  }
Dries's avatar
   
Dries committed
111
  $output .= "</table>";
Dries's avatar
   
Dries committed
112
  $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
113

Dries's avatar
   
Dries committed
114
  $theme->box(t("User blogs"), $output, "main");
Dries's avatar
   
Dries committed
115
116
117
118
119
}

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

Dries's avatar
   
Dries committed
120
121
122
123
124
  $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
125
126
127
  }
}

Dries's avatar
   
Dries committed
128
function blog_view($node, $main = 0) {
Dries's avatar
   
Dries committed
129
  global $theme;
Dries's avatar
   
Dries committed
130

Dries's avatar
   
Dries committed
131
  $theme->node($node, $main);
Dries's avatar
   
Dries committed
132
133
134
}

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

Dries's avatar
   
Dries committed
137
  if ($user->id && (user_access("administer blogs") || user_access("post blogs"))) {
Dries's avatar
   
Dries committed
138
    if ($mod == "node" || $edit[type] == "blog") {
Dries's avatar
   
Dries committed
139
      // do nothing
Dries's avatar
   
Dries committed
140
141
142
143
    }
    else if ($type == "blog") {
      $item = node_get_object(array(type => "blog", nid => $id));
      $edit["title"] = $item->title;
Dries's avatar
   
Dries committed
144
      $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
145
146
147
148
    }
    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
149
      $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
150
    }
Dries's avatar
   
Dries committed
151

Dries's avatar
   
Dries committed
152
    if ($edit["title"]) {
Dries's avatar
   
Dries committed
153
154
      $form .= blog_view(new Blog(node_preview($edit)));
    }
Dries's avatar
   
Dries committed
155

Dries's avatar
   
Dries committed
156
157
158
159
    $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
160

Dries's avatar
   
Dries committed
161
162
163
    if ($edit["nid"] > 0) {
      $form .= form_hidden("nid", $edit["nid"]);
    }
Dries's avatar
   
Dries committed
164

Dries's avatar
   
Dries committed
165
166
167
168
    if (!$edit) {
      $form .= form_submit(t("Preview"));
    }
    else if ($edit && !$edit["title"]) {
Dries's avatar
   
Dries committed
169
170
171
172
173
174
175
176
177
178
179
      $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
180

Dries's avatar
   
Dries committed
181
    return form($REQUEST_URI, $form);
Dries's avatar
   
Dries committed
182
183
  }
  else {
Dries's avatar
   
Dries committed
184
    return message_access();
Dries's avatar
   
Dries committed
185
186
187
188
189
190
  }
}

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

Dries's avatar
   
Dries committed
191
  if ($user->id && (user_access("administer blogs") || user_access("post blogs"))) {
Dries's avatar
   
Dries committed
192
193
    if ($edit["nid"]) {
      node_save($edit, array(title, body, type => "blog"));
Dries's avatar
   
Dries committed
194
195
    }
    else {
Dries's avatar
   
Dries committed
196
      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
197
    }
Dries's avatar
   
Dries committed
198
199
200
201
202
203
  }
}

function blog_edit_history($nid) {
  global $user;

Dries's avatar
   
Dries committed
204
  $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
205
206
207
208
209
210
211
212
213
214
215

  $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
216
217
  global $theme, $op, $name, $date;

Dries's avatar
   
Dries committed
218
219

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

Dries's avatar
   
Dries committed
246
247
248
}

function blog_user() {
Dries's avatar
   
Dries committed
249
  global $op, $id, $edit, $theme, $user;
Dries's avatar
   
Dries committed
250
251
252
253
254

  if (user_access("post blogs")) {
    switch ($op) {
      case "delete":
        blog_remove($id);
Dries's avatar
   
Dries committed
255
        blog_page_user($user->userid, time());
Dries's avatar
   
Dries committed
256
257
        break;
      case "edit":
Dries's avatar
   
Dries committed
258
259
        $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
260
261
        break;
      case t("Preview"):
Dries's avatar
   
Dries committed
262
        $theme->box(t("Preview Blog"), blog_form($edit), "main");
Dries's avatar
   
Dries committed
263
264
265
        break;
      case t("Submit"):
        blog_save($edit);
Dries's avatar
   
Dries committed
266
        blog_page_user($user->userid, time());
Dries's avatar
   
Dries committed
267
268
        break;
      default:
Dries's avatar
   
Dries committed
269
        $theme->box(t("Submit a blog"), blog_form($edit), "main");
Dries's avatar
   
Dries committed
270
271
272
273
274
    }
  }
}


Dries's avatar
   
Dries committed
275
function blog_link($type, $node = 0) {
Dries's avatar
   
Dries committed
276
277
278
  global $user;

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

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

Dries's avatar
   
Dries committed
287
  if ($type == "node" && $node->type == "blog") {
Dries's avatar
   
Dries committed
288
289
290
    $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
291
292
293
294
295
296
297
298
299
300
301
302
  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
303
  $block[0]["subject"] = "<a href=\"module.php?mod=blog\">". t("User blogs") ."</a>";
Dries's avatar
   
Dries committed
304
  $block[0]["content"] = $output;
Dries's avatar
   
Dries committed
305
  $block[0]["info"] = t("User blogs");
Dries's avatar
   
Dries committed
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
418
419
420
421
422
423
424
  $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;
  }
}

?>