plugins/Newsboy.php
author Dan
Fri, 22 Feb 2008 10:46:28 -0500
changeset 6 432eed804b7f
parent 5 fed61fc8895b
child 7 c3710cbed6d0
permissions -rw-r--r--
Fixed some logic bugs with the announcement page
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
0
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
     1
<?php
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
     2
/*
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
     3
Plugin Name: Newsboy
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
     4
Plugin URI: javascript: // No URL yet, stay tuned!
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
     5
Description: Newsboy adds a news management system to Enano. It can integrate with the Feed Me plugin to provide an additional RSS feed. 
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
     6
Author: Dan Fuhry
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
     7
Version: 0.1
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
     8
Author URI: http://www.enanocms.org/
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
     9
*/
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
    10
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
    11
/*
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
    12
 * Newsboy
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
    13
 * Version 0.1
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
    14
 * Copyright (C) 2007 Dan Fuhry
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
    15
 *
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
    16
 * This program is Free Software; you can redistribute and/or modify it under the terms of the GNU General Public License
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
    17
 * as published by the Free Software Foundation; either version 2 of the License, or (at your option) any later version.
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
    18
 *
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
    19
 * This program is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
    20
 * warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for details.
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
    21
 */
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
    22
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
    23
// Insert our News namespace
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
    24
$plugins->attachHook('acl_rule_init', 'NewsBoy_namespace_setup($this);');
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
    25
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
    26
// Hook into page rendering
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
    27
$plugins->attachHook('page_not_found', 'NewsBoy_namespace_handler();');
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
    28
$plugins->attachHook('send_page_footers', 'NewsBoy_PortalLink();');
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
    29
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
    30
// String to determine page type string
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
    31
$plugins->attachHook('page_type_string_set', 'NewsBoy_set_page_string();');
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
    32
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
    33
// Attach to the Feed Me plugin, if it's loaded (if not, the feed handler simply won't get called)
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
    34
$plugins->attachHook('feed_me_request', 'NewsBoy_feed_handler($mode);');
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
    35
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
    36
function NewsBoy_namespace_setup(&$paths)
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
    37
{
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
    38
  $paths->create_namespace('NewsBoy', 'News:');
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
    39
  $paths->addAdminNode('Newsboy portal', 'Configuration', 'NewsboyConfiguration');
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
    40
  $paths->addAdminNode('Newsboy portal', 'Manage news items', 'NewsboyItemManager');
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
    41
  
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
    42
  global $db, $session, $paths, $template, $plugins; // Common objects
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
    43
  
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
    44
  $session->acl_extend_scope('read',                   'NewsBoy', $paths);
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
    45
  $session->acl_extend_scope('post_comments',          'NewsBoy', $paths);
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
    46
  $session->acl_extend_scope('edit_comments',          'NewsBoy', $paths);
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
    47
  $session->acl_extend_scope('edit_page',              'NewsBoy', $paths);
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
    48
  $session->acl_extend_scope('view_source',            'NewsBoy', $paths);
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
    49
  $session->acl_extend_scope('mod_comments',           'NewsBoy', $paths);
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
    50
  $session->acl_extend_scope('history_view',           'NewsBoy', $paths);
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
    51
  $session->acl_extend_scope('history_rollback',       'NewsBoy', $paths);
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
    52
  $session->acl_extend_scope('history_rollback_extra', 'NewsBoy', $paths);
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
    53
  $session->acl_extend_scope('protect',                'NewsBoy', $paths);
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
    54
  $session->acl_extend_scope('rename',                 'NewsBoy', $paths);
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
    55
  $session->acl_extend_scope('clear_logs',             'NewsBoy', $paths);
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
    56
  $session->acl_extend_scope('vote_delete',            'NewsBoy', $paths);
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
    57
  $session->acl_extend_scope('vote_reset',             'NewsBoy', $paths);
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
    58
  $session->acl_extend_scope('delete_page',            'NewsBoy', $paths);
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
    59
  $session->acl_extend_scope('set_wiki_mode',          'NewsBoy', $paths);
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
    60
  $session->acl_extend_scope('password_set',           'NewsBoy', $paths);
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
    61
  $session->acl_extend_scope('password_reset',         'NewsBoy', $paths);
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
    62
  $session->acl_extend_scope('mod_misc',               'NewsBoy', $paths);
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
    63
  $session->acl_extend_scope('edit_cat',               'NewsBoy', $paths);
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
    64
  $session->acl_extend_scope('even_when_protected',    'NewsBoy', $paths);
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
    65
  $session->acl_extend_scope('upload_files',           'NewsBoy', $paths);
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
    66
  $session->acl_extend_scope('upload_new_version',     'NewsBoy', $paths);
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
    67
  $session->acl_extend_scope('create_page',            'NewsBoy', $paths);
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
    68
  $session->acl_extend_scope('php_in_pages',           'NewsBoy', $paths);
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
    69
  $session->acl_extend_scope('edit_acl',               'NewsBoy', $paths);
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
    70
  
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
    71
}
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
    72
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
    73
function NewsBoy_namespace_handler()
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
    74
{
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
    75
  global $db, $session, $paths, $template, $plugins; // Common objects
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
    76
  
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
    77
  if ( defined('ENANO_FEEDBURNER_INCLUDED') )
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
    78
  {
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
    79
    $template->add_header('<link rel="alternate" title="'.getConfig('site_name').' News feed" href="'.makeUrlNS('Special', 'RSS/news', null, true).'" type="application/rss+xml" />');
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
    80
  }
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
    81
  
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
    82
  if ( $paths->namespace != 'NewsBoy' )
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
    83
    return;
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
    84
  
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
    85
  $chk = $paths->page;
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
    86
  $chk1 = substr($chk, 0, ( strlen($paths->nslist['NewsBoy']) + 8 ));
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
    87
  $chk2 = substr($chk, 0, ( strlen($paths->nslist['NewsBoy']) + 7 ));
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
    88
  
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
    89
  if ( $paths->cpage['urlname_nons'] == 'Portal' || $paths->cpage['urlname_nons'] == 'Archive' || $chk1 == $paths->nslist['NewsBoy'] . 'Archive/' || $chk2 == $paths->nslist['NewsBoy'] . 'Archive' )
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
    90
  {
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
    91
    
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
    92
    // Add admin opener Javascript function
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
    93
    $template->add_header('<!-- NewsBoy: admin panel nav function -->
4
bf5589120afb Fixed bad admin-nav function, which was rendered useless if aggressive_optimize_html is on
Dan
parents: 3
diff changeset
    94
    <enano:no-opt>
0
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
    95
    <script type="text/javascript">
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
    96
      function newsboy_open_admin()
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
    97
      {
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
    98
        if ( auth_level < USER_LEVEL_ADMIN )
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
    99
        {
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   100
          ajaxPromptAdminAuth(function(k) {
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   101
            ENANO_SID = k;
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   102
            auth_level = USER_LEVEL_ADMIN;
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   103
            var loc = String(window.location + \'\');
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   104
            window.location = append_sid(loc);
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   105
            var loc = makeUrlNS(\'Special\', \'Administration\', \'module=\' + namespace_list[\'Admin\'] + \'NewsboyItemManager\');
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   106
            if ( (ENANO_SID + \' \').length > 1 )
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   107
              window.location = loc;
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   108
          }, 9);
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   109
          return false;
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   110
        }
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   111
        var loc = makeUrlNS(\'Special\', \'Administration\', \'module=\' + namespace_list[\'Admin\'] + \'NewsboyItemManager\');
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   112
        window.location = loc;
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   113
      }
4
bf5589120afb Fixed bad admin-nav function, which was rendered useless if aggressive_optimize_html is on
Dan
parents: 3
diff changeset
   114
    </script>
bf5589120afb Fixed bad admin-nav function, which was rendered useless if aggressive_optimize_html is on
Dan
parents: 3
diff changeset
   115
    </enano:no-opt>');
0
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   116
    
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   117
    $x = getConfig('nb_portal_title');
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   118
    
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   119
    $template->tpl_strings['PAGE_NAME'] = ( $paths->cpage['urlname_nons'] == 'Portal' ) ?
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   120
          ( ( empty($x) ) ?
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   121
              'Welcome to ' . getConfig('site_name') :
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   122
              $x ) :
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   123
          'News Archive';
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   124
    
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   125
    if ( !$session->get_permissions('read') )
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   126
    {
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   127
      die_friendly('Access denied', '<div class="error-box"><b>Access to this page is denied.</b><br />This may be because you are not logged in or you have not met certain criteria for viewing this page.</div>');
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   128
    }
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   129
    
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   130
    $paths->cpage['comments_on'] = 0;
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   131
    
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   132
    $template->header();
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   133
    ( $paths->cpage['urlname_nons'] == 'Portal' ) ? NewsBoy_portal() : NewsBoy_archive();
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   134
    $template->footer();
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   135
  }
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   136
}
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   137
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   138
function NewsBoy_set_page_string()
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   139
{
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   140
  global $db, $session, $paths, $template, $plugins; // Common objects
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   141
  if ( $paths->namespace == 'NewsBoy' )
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   142
  {
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   143
    if ( $paths->cpage['urlname_nons'] == 'Portal' )
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   144
    {
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   145
      $template->namespace_string = 'portal';
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   146
      
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   147
      // block editing
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   148
      $perm_arr = Array('edit_page' => AUTH_DENY, 'view_source' => AUTH_DENY);
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   149
      $session->acl_merge_with_current($perm_arr, false, 2);
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   150
    }
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   151
    else
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   152
    {
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   153
      $template->namespace_string = 'news item';
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   154
    }
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   155
  }
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   156
}
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   157
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   158
function NewsBoy_format_title($title)
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   159
{
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   160
  $title = strtolower($title);
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   161
  $title = preg_replace('/\W/', '-', $title);
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   162
  $title = preg_replace('/([-]+)/', '-', $title);
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   163
  $title = trim($title, '-');
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   164
  return $title;
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   165
}
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   166
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   167
function NewsBoy_feed_handler($mode)
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   168
{
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   169
  global $db, $session, $paths, $template, $plugins; // Common objects
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   170
  
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   171
  if ( $mode != 'news' )
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   172
    return;
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   173
  
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   174
  $limit = ( $x = $paths->getParam(1) ) ? $x : 20;
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   175
  $limit = intval($limit);
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   176
  if ( $limit > 50 )
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   177
    $limit = 50;
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   178
  
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   179
  $title = getConfig('site_name') . ': Site news';
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   180
  
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   181
  $x = getConfig('nb_portal_title');
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   182
  $desc = ( empty($x) ) ? 'Welcome to ' . getConfig('site_name') : $x;
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   183
  
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   184
  $link = makeUrlComplete('NewsBoy', 'Portal');
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   185
  $generator = 'Enano CMS ' . enano_version() . ' - NewsBoy plugin';
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   186
  $email = getConfig('contact_email');
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   187
  
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   188
  $rss = new RSS($title, $desc, $link, $generator, $email);
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   189
  
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   190
  $sql = 'SELECT p.*, l.time_id, l.author, u.user_level,COUNT(c.comment_id) AS num_comments,t.page_text FROM '.table_prefix.'pages AS p
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   191
         LEFT JOIN '.table_prefix.'comments AS c
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   192
           ON ( c.page_id=p.urlname AND c.namespace=p.namespace )
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   193
         LEFT JOIN '.table_prefix.'logs AS l
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   194
           ON ( l.page_id=p.urlname AND l.namespace=p.namespace )
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   195
         LEFT JOIN '.table_prefix.'users AS u
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   196
           ON ( u.username=l.author )
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   197
         LEFT JOIN '.table_prefix.'page_text AS t
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   198
           ON ( t.page_id=p.urlname AND t.namespace=p.namespace )
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   199
         WHERE p.namespace=\'NewsBoy\'
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   200
           AND l.action=\'create\'
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   201
           AND p.urlname REGEXP \'^([0-9]+)$\'
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   202
           AND p.visible=1
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   203
         GROUP BY p.urlname
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   204
         ORDER BY urlname DESC
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   205
         LIMIT '.$limit.';';
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   206
  
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   207
  $q = $db->sql_unbuffered_query($sql);
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   208
  
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   209
  if ( !$q )
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   210
    $db->_die();
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   211
  
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   212
  $formatter = new NewsBoyFormatter();
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   213
  
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   214
  if ( $row = $db->fetchrow() )
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   215
  {
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   216
    do {
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   217
      
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   218
      $title = $row['name'];
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   219
      $link = makeUrlComplete('NewsBoy', $row['urlname']);
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   220
      $desc = RenderMan::render($row['page_text']);
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   221
      $time = intval($row['urlname']);
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   222
      
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   223
      $rss->add_item($title, $link, $desc, $time);
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   224
      
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   225
    } while ( $row = $db->fetchrow() );
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   226
  }
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   227
  else
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   228
  {
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   229
    $rss->add_item('Error', $link, 'No news items yet.', time());
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   230
  }
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   231
  
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   232
  echo $rss->render();
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   233
  
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   234
}
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   235
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   236
function NewsBoy_portal()
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   237
{
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   238
  global $db, $session, $paths, $template, $plugins; // Common objects
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   239
  
5
fed61fc8895b Added support for a custom template (newsboy-post.tpl) and templates to be shown before and after news content
Dan
parents: 4
diff changeset
   240
  if ( file_exists( ENANO_ROOT . "/themes/{$template->theme}/newsboy-post.tpl" ) )
fed61fc8895b Added support for a custom template (newsboy-post.tpl) and templates to be shown before and after news content
Dan
parents: 4
diff changeset
   241
  {
fed61fc8895b Added support for a custom template (newsboy-post.tpl) and templates to be shown before and after news content
Dan
parents: 4
diff changeset
   242
    $parser = $template->makeParser("newsboy-post.tpl");
fed61fc8895b Added support for a custom template (newsboy-post.tpl) and templates to be shown before and after news content
Dan
parents: 4
diff changeset
   243
  }
fed61fc8895b Added support for a custom template (newsboy-post.tpl) and templates to be shown before and after news content
Dan
parents: 4
diff changeset
   244
  else
fed61fc8895b Added support for a custom template (newsboy-post.tpl) and templates to be shown before and after news content
Dan
parents: 4
diff changeset
   245
  {
fed61fc8895b Added support for a custom template (newsboy-post.tpl) and templates to be shown before and after news content
Dan
parents: 4
diff changeset
   246
    $news_template = <<<TPLCODE
fed61fc8895b Added support for a custom template (newsboy-post.tpl) and templates to be shown before and after news content
Dan
parents: 4
diff changeset
   247
    <div class="tblholder news">
fed61fc8895b Added support for a custom template (newsboy-post.tpl) and templates to be shown before and after news content
Dan
parents: 4
diff changeset
   248
      <table border="0" cellspacing="1" cellpadding="4" style="width: 100%;">
fed61fc8895b Added support for a custom template (newsboy-post.tpl) and templates to be shown before and after news content
Dan
parents: 4
diff changeset
   249
        <tr>
fed61fc8895b Added support for a custom template (newsboy-post.tpl) and templates to be shown before and after news content
Dan
parents: 4
diff changeset
   250
          <th><a href="{LINK}" style="color: inherit;">{TITLE}</a></th>
fed61fc8895b Added support for a custom template (newsboy-post.tpl) and templates to be shown before and after news content
Dan
parents: 4
diff changeset
   251
        </tr>
fed61fc8895b Added support for a custom template (newsboy-post.tpl) and templates to be shown before and after news content
Dan
parents: 4
diff changeset
   252
        <tr>
fed61fc8895b Added support for a custom template (newsboy-post.tpl) and templates to be shown before and after news content
Dan
parents: 4
diff changeset
   253
          <td class="row3">
fed61fc8895b Added support for a custom template (newsboy-post.tpl) and templates to be shown before and after news content
Dan
parents: 4
diff changeset
   254
            {CONTENT}
fed61fc8895b Added support for a custom template (newsboy-post.tpl) and templates to be shown before and after news content
Dan
parents: 4
diff changeset
   255
          </td>
fed61fc8895b Added support for a custom template (newsboy-post.tpl) and templates to be shown before and after news content
Dan
parents: 4
diff changeset
   256
        </tr>
fed61fc8895b Added support for a custom template (newsboy-post.tpl) and templates to be shown before and after news content
Dan
parents: 4
diff changeset
   257
        <tr>
fed61fc8895b Added support for a custom template (newsboy-post.tpl) and templates to be shown before and after news content
Dan
parents: 4
diff changeset
   258
          <th class="subhead" style="font-weight: normal; font-size: 67%;">
fed61fc8895b Added support for a custom template (newsboy-post.tpl) and templates to be shown before and after news content
Dan
parents: 4
diff changeset
   259
            Posted by {USER_LINK} on {DATE}<br />
fed61fc8895b Added support for a custom template (newsboy-post.tpl) and templates to be shown before and after news content
Dan
parents: 4
diff changeset
   260
            [ {NUM_COMMENTS} comment{COMMENT_S} | {COMMENT_LINK} ]
fed61fc8895b Added support for a custom template (newsboy-post.tpl) and templates to be shown before and after news content
Dan
parents: 4
diff changeset
   261
          </th>
fed61fc8895b Added support for a custom template (newsboy-post.tpl) and templates to be shown before and after news content
Dan
parents: 4
diff changeset
   262
        </tr>
fed61fc8895b Added support for a custom template (newsboy-post.tpl) and templates to be shown before and after news content
Dan
parents: 4
diff changeset
   263
      </table>
fed61fc8895b Added support for a custom template (newsboy-post.tpl) and templates to be shown before and after news content
Dan
parents: 4
diff changeset
   264
    </div>
0
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   265
TPLCODE;
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   266
  
5
fed61fc8895b Added support for a custom template (newsboy-post.tpl) and templates to be shown before and after news content
Dan
parents: 4
diff changeset
   267
    $parser = $template->makeParserText($news_template);
fed61fc8895b Added support for a custom template (newsboy-post.tpl) and templates to be shown before and after news content
Dan
parents: 4
diff changeset
   268
  }
fed61fc8895b Added support for a custom template (newsboy-post.tpl) and templates to be shown before and after news content
Dan
parents: 4
diff changeset
   269
  
0
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   270
  /*
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   271
  $p = RenderMan::strToPageID(getConfig('main_page'));
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   272
  if ( $p[1] != 'NewsBoy' )
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   273
  {
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   274
    echo RenderMan::getPage($p[0], $p[1]);
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   275
  }
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   276
  else
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   277
  { */
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   278
    /*
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   279
    $s = $paths->nslist['NewsBoy'] . 'Announce';
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   280
    if ( isPage($s) )
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   281
    {
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   282
      $p = RenderMan::getPage('Announce', 'NewsBoy');
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   283
      echo $p;
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   284
    }
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   285
  /* } */
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   286
  
6
432eed804b7f Fixed some logic bugs with the announcement page
Dan
parents: 5
diff changeset
   287
  $announce_page_default = $paths->nslist['NewsBoy'] . 'Announce';
432eed804b7f Fixed some logic bugs with the announcement page
Dan
parents: 5
diff changeset
   288
  $s = $announce_page_default;
0
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   289
  $announce_page = getConfig('nb_announce_page');
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   290
  if ( !empty($announce_page) && isPage($announce_page) )
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   291
  {
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   292
    $s = $announce_page;
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   293
  }
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   294
  else if ( !isPage($s) )
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   295
  {
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   296
    $s = false;
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   297
  }
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   298
  if ( $s )
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   299
  {
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   300
    $stuff = RenderMan::strToPageID($s);
2
66b299fdb9ca Fixed Wicked Flea's bug (apostrophes in page title) and fixed error checking on PageUtils::createpage return
Dan
parents: 1
diff changeset
   301
    // Hackish fix to prevent the categorization button and other stuff from being displayed
66b299fdb9ca Fixed Wicked Flea's bug (apostrophes in page title) and fixed error checking on PageUtils::createpage return
Dan
parents: 1
diff changeset
   302
    $paths->pages[$s]['special'] = 1;
1
540d077b7612 Fix stupid announcement link bug; replace getPage call with PageProcessor
Dan
parents: 0
diff changeset
   303
    $page = new PageProcessor($stuff[0], $stuff[1]);
2
66b299fdb9ca Fixed Wicked Flea's bug (apostrophes in page title) and fixed error checking on PageUtils::createpage return
Dan
parents: 1
diff changeset
   304
    $content = $page->fetch_text();
66b299fdb9ca Fixed Wicked Flea's bug (apostrophes in page title) and fixed error checking on PageUtils::createpage return
Dan
parents: 1
diff changeset
   305
    $content = '?>' . RenderMan::render($content);
66b299fdb9ca Fixed Wicked Flea's bug (apostrophes in page title) and fixed error checking on PageUtils::createpage return
Dan
parents: 1
diff changeset
   306
    eval($content);
0
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   307
  }
6
432eed804b7f Fixed some logic bugs with the announcement page
Dan
parents: 5
diff changeset
   308
  else
432eed804b7f Fixed some logic bugs with the announcement page
Dan
parents: 5
diff changeset
   309
  {
432eed804b7f Fixed some logic bugs with the announcement page
Dan
parents: 5
diff changeset
   310
    $stuff = RenderMan::strToPageID($announce_page_default);
432eed804b7f Fixed some logic bugs with the announcement page
Dan
parents: 5
diff changeset
   311
  }
0
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   312
  
5
fed61fc8895b Added support for a custom template (newsboy-post.tpl) and templates to be shown before and after news content
Dan
parents: 4
diff changeset
   313
  if ( file_exists( ENANO_ROOT . "/themes/{$template->theme}/newsboy-portal-pre.tpl" ) )
fed61fc8895b Added support for a custom template (newsboy-post.tpl) and templates to be shown before and after news content
Dan
parents: 4
diff changeset
   314
  {
fed61fc8895b Added support for a custom template (newsboy-post.tpl) and templates to be shown before and after news content
Dan
parents: 4
diff changeset
   315
    $parser_pre = $template->makeParser("newsboy-portal-pre.tpl");
fed61fc8895b Added support for a custom template (newsboy-post.tpl) and templates to be shown before and after news content
Dan
parents: 4
diff changeset
   316
    echo $parser_pre->run();
fed61fc8895b Added support for a custom template (newsboy-post.tpl) and templates to be shown before and after news content
Dan
parents: 4
diff changeset
   317
  }
fed61fc8895b Added support for a custom template (newsboy-post.tpl) and templates to be shown before and after news content
Dan
parents: 4
diff changeset
   318
  else
fed61fc8895b Added support for a custom template (newsboy-post.tpl) and templates to be shown before and after news content
Dan
parents: 4
diff changeset
   319
  {
fed61fc8895b Added support for a custom template (newsboy-post.tpl) and templates to be shown before and after news content
Dan
parents: 4
diff changeset
   320
    echo '<h2>Latest news</h2>';
fed61fc8895b Added support for a custom template (newsboy-post.tpl) and templates to be shown before and after news content
Dan
parents: 4
diff changeset
   321
  }
0
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   322
    
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   323
  $q = $db->sql_unbuffered_query('SELECT p.*, COUNT(c.comment_id) AS num_comments, t.page_text, l.time_id, l.author, u.user_level FROM '.table_prefix.'pages AS p
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   324
         LEFT JOIN '.table_prefix.'comments AS c
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   325
           ON ( c.page_id=p.urlname AND c.namespace=p.namespace )
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   326
         LEFT JOIN '.table_prefix.'page_text AS t
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   327
           ON ( t.page_id=p.urlname AND t.namespace=p.namespace )
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   328
         LEFT JOIN '.table_prefix.'logs AS l
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   329
           ON ( l.page_id=p.urlname AND l.namespace=p.namespace )
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   330
         LEFT JOIN '.table_prefix.'users AS u
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   331
           ON ( u.username=l.author OR u.user_id=1 )
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   332
         WHERE p.namespace=\'NewsBoy\'
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   333
           AND l.action=\'create\'
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   334
           AND p.urlname!=\'Announce\'
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   335
           AND p.visible=1
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   336
         GROUP BY p.urlname
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   337
         ORDER BY urlname DESC;');
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   338
  if ( !$q )
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   339
    $db->_die();
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   340
  
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   341
  if ( $row = $db->fetchrow() )
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   342
  {
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   343
    $i = 0;
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   344
    do
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   345
    {
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   346
      if ( $i < 5 )
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   347
      {
2
66b299fdb9ca Fixed Wicked Flea's bug (apostrophes in page title) and fixed error checking on PageUtils::createpage return
Dan
parents: 1
diff changeset
   348
        $content = $row['page_text'];
66b299fdb9ca Fixed Wicked Flea's bug (apostrophes in page title) and fixed error checking on PageUtils::createpage return
Dan
parents: 1
diff changeset
   349
        
66b299fdb9ca Fixed Wicked Flea's bug (apostrophes in page title) and fixed error checking on PageUtils::createpage return
Dan
parents: 1
diff changeset
   350
        $trimmed = false;
66b299fdb9ca Fixed Wicked Flea's bug (apostrophes in page title) and fixed error checking on PageUtils::createpage return
Dan
parents: 1
diff changeset
   351
        if ( $pos = strpos($content, '<!--BREAK-->' ) )
66b299fdb9ca Fixed Wicked Flea's bug (apostrophes in page title) and fixed error checking on PageUtils::createpage return
Dan
parents: 1
diff changeset
   352
        {
66b299fdb9ca Fixed Wicked Flea's bug (apostrophes in page title) and fixed error checking on PageUtils::createpage return
Dan
parents: 1
diff changeset
   353
          $content = substr($content, 0, $pos);
66b299fdb9ca Fixed Wicked Flea's bug (apostrophes in page title) and fixed error checking on PageUtils::createpage return
Dan
parents: 1
diff changeset
   354
          $trimmed = true;
66b299fdb9ca Fixed Wicked Flea's bug (apostrophes in page title) and fixed error checking on PageUtils::createpage return
Dan
parents: 1
diff changeset
   355
        }
66b299fdb9ca Fixed Wicked Flea's bug (apostrophes in page title) and fixed error checking on PageUtils::createpage return
Dan
parents: 1
diff changeset
   356
        
0
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   357
        $title = htmlspecialchars($row['name']);
2
66b299fdb9ca Fixed Wicked Flea's bug (apostrophes in page title) and fixed error checking on PageUtils::createpage return
Dan
parents: 1
diff changeset
   358
        $content = RenderMan::render($content);
66b299fdb9ca Fixed Wicked Flea's bug (apostrophes in page title) and fixed error checking on PageUtils::createpage return
Dan
parents: 1
diff changeset
   359
        
66b299fdb9ca Fixed Wicked Flea's bug (apostrophes in page title) and fixed error checking on PageUtils::createpage return
Dan
parents: 1
diff changeset
   360
        if ( strlen($content) > 400 && !$trimmed )
0
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   361
        {
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   362
          $content = nb_trim_paragraph($content, 400, $trimmed);
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   363
        }
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   364
        if ( $trimmed )
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   365
        {
2
66b299fdb9ca Fixed Wicked Flea's bug (apostrophes in page title) and fixed error checking on PageUtils::createpage return
Dan
parents: 1
diff changeset
   366
          $link = ' <a href="' . makeUrlNS('NewsBoy', $row['urlname'], false, true) . '">Read more...</a>';
66b299fdb9ca Fixed Wicked Flea's bug (apostrophes in page title) and fixed error checking on PageUtils::createpage return
Dan
parents: 1
diff changeset
   367
          $content = preg_replace('/(.+?)<\/(p|ul|table|div|pre)>([\s]*?)$/Usi', '\\1' . $link . '</\\2>\\3', $content, 1);
66b299fdb9ca Fixed Wicked Flea's bug (apostrophes in page title) and fixed error checking on PageUtils::createpage return
Dan
parents: 1
diff changeset
   368
          if ( !strstr($content, $link) )
66b299fdb9ca Fixed Wicked Flea's bug (apostrophes in page title) and fixed error checking on PageUtils::createpage return
Dan
parents: 1
diff changeset
   369
          {
66b299fdb9ca Fixed Wicked Flea's bug (apostrophes in page title) and fixed error checking on PageUtils::createpage return
Dan
parents: 1
diff changeset
   370
            $content .= $link;
66b299fdb9ca Fixed Wicked Flea's bug (apostrophes in page title) and fixed error checking on PageUtils::createpage return
Dan
parents: 1
diff changeset
   371
          }
0
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   372
        }
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   373
        $user_link = nb_make_username_link($row['author'], $row['user_level']);
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   374
        $date = date('F d, Y h:i:s a', $row['urlname']);
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   375
        $num_comments = $row['num_comments'];
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   376
        $comment_s = ( $num_comments == 1 ) ? '' : 's';
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   377
        $comment_link = '<a href="' . makeUrlNS('NewsBoy', $row['urlname'], false, true) . '#do:comments" style="color: inherit;">add a comment</a>';
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   378
        $parser->assign_vars(array(
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   379
            'TITLE' => $title,
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   380
            'LINK' => makeUrlNS('NewsBoy', $row['urlname']),
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   381
            'CONTENT' => $content,
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   382
            'USER_LINK' => $user_link,
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   383
            'DATE' => $date,
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   384
            'NUM_COMMENTS' => $num_comments,
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   385
            'COMMENT_S' => $comment_s,
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   386
            'COMMENT_LINK' => $comment_link
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   387
          ));
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   388
        echo $parser->run();
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   389
      }
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   390
      else
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   391
      {
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   392
        echo '<p><a href="'.makeUrlNS('NewsBoy', 'Archive').'">Older news...</a></p>';
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   393
        break;
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   394
      }
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   395
      $i++;
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   396
    } while ( $row = $db->fetchrow() );
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   397
  }
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   398
  else
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   399
  {
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   400
    echo '<p>No news items yet.</p>';
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   401
  }
5
fed61fc8895b Added support for a custom template (newsboy-post.tpl) and templates to be shown before and after news content
Dan
parents: 4
diff changeset
   402
  if ( file_exists( ENANO_ROOT . "/themes/{$template->theme}/newsboy-portal-post.tpl" ) )
fed61fc8895b Added support for a custom template (newsboy-post.tpl) and templates to be shown before and after news content
Dan
parents: 4
diff changeset
   403
  {
fed61fc8895b Added support for a custom template (newsboy-post.tpl) and templates to be shown before and after news content
Dan
parents: 4
diff changeset
   404
    $parser_post = $template->makeParser("newsboy-portal-post.tpl");
fed61fc8895b Added support for a custom template (newsboy-post.tpl) and templates to be shown before and after news content
Dan
parents: 4
diff changeset
   405
    echo $parser_post->run();
fed61fc8895b Added support for a custom template (newsboy-post.tpl) and templates to be shown before and after news content
Dan
parents: 4
diff changeset
   406
  }
fed61fc8895b Added support for a custom template (newsboy-post.tpl) and templates to be shown before and after news content
Dan
parents: 4
diff changeset
   407
  
0
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   408
  if ( $session->user_level >= USER_LEVEL_ADMIN )
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   409
  {
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   410
    echo '<div class="tblholder" style="margin: 10px auto 0 auto; display: table;">
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   411
            <table border="0" cellspacing="1" cellpadding="4">
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   412
              <tr>
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   413
                <th>Administrative tools:</th>
3
8ae9acb2e919 Re-implement announcement link fix, blame it on my bad Hg repo management
Dan
parents: 2
diff changeset
   414
                <td class="row3" style="text-align: center;"><a style="color: inherit;" href="' . makeUrlNS($stuff[1], $stuff[0], '', true) . '#do:edit">Edit announcement &raquo;</a></td>
0
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   415
                <td class="row3" style="text-align: center;"><a style="color: inherit;" href="' . makeUrlNS('Special', 'Administration', 'module='.$paths->nslist['Admin'].'NewsboyItemManager', true) . '" onclick="newsboy_open_admin(); return false;">Portal Administration</a></td>
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   416
              </tr>
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   417
            </table>
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   418
          </div><br />';
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   419
  }
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   420
}
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   421
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   422
/**
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   423
 * Formats row data in the archive.
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   424
 * @package Enano
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   425
 * @subpackage Newsboy
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   426
 * @license GNU General Public License
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   427
 */
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   428
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   429
class NewsBoyFormatter
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   430
{
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   431
  function article_link($name, $row)
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   432
  {
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   433
    $article_link = '<a href="' . makeUrlNS('NewsBoy', $row['urlname']) . '">' . $row['name'] . '</a>';
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   434
    return $article_link;
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   435
  }
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   436
  function format_date($date, $row)
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   437
  {
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   438
    $date = date('Y-m-j g:m', intval ( $date ));
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   439
    return $date;
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   440
  }
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   441
  function format_username($x, $row)
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   442
  {
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   443
    $ul = intval($row['user_level']);
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   444
    $author = nb_make_username_link($row['author'], $ul);
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   445
    return $author;
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   446
  }
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   447
  function format_commentlink($x, $row)
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   448
  {
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   449
    $comments = '<a href="' . makeUrlNS('NewsBoy', $row['urlname']) . '#do:comments">' . $row['num_comments'] . '</a>';
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   450
    return $comments;
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   451
  }
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   452
}
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   453
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   454
function NewsBoy_archive()
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   455
{
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   456
  global $db, $session, $paths, $template, $plugins; // Common objects
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   457
  
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   458
  $lower_limit = ( isset($_GET['start']) ) ? intval($_GET['start']) : ( ( $xx = $paths->getParam(0) ) ? intval($xx) : 0 );
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   459
  $entries_per_page = 50;
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   460
  
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   461
  $row_count = $entries_per_page + 1;
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   462
  
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   463
  // Determine number of total news entries
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   464
  $q = $db->sql_query('SELECT urlname FROM '.table_prefix.'pages WHERE namespace=\'NewsBoy\' AND urlname REGEXP \'^([0-9]+)$\' AND visible=1;');
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   465
  if ( !$q )
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   466
    $db->_die();
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   467
  $r = $db->fetchrow();
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   468
  $num_total = intval($db->numrows());
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   469
  $db->free_result();
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   470
  
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   471
  if ( $lower_limit >= $num_total )
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   472
    $lower_limit = 0;
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   473
  
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   474
  $sql = 'SELECT p.*, l.time_id, l.author, u.user_level,COUNT(c.comment_id) AS num_comments FROM '.table_prefix.'pages AS p
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   475
         LEFT JOIN '.table_prefix.'comments AS c
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   476
           ON ( c.page_id=p.urlname AND c.namespace=p.namespace )
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   477
         LEFT JOIN '.table_prefix.'logs AS l
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   478
           ON ( l.page_id=p.urlname AND l.namespace=p.namespace )
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   479
         LEFT JOIN '.table_prefix.'users AS u
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   480
           ON ( u.username=l.author )
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   481
         WHERE p.namespace=\'NewsBoy\'
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   482
           AND l.action=\'create\'
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   483
           AND p.urlname REGEXP \'^([0-9]+)$\'
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   484
           AND p.visible=1
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   485
         GROUP BY p.urlname
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   486
         ORDER BY urlname DESC;';
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   487
  
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   488
  $q = $db->sql_unbuffered_query($sql);
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   489
  
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   490
  if ( !$q )
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   491
    $db->_die();
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   492
  
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   493
  $formatter = new NewsBoyFormatter();
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   494
  
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   495
  $callers = Array(
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   496
      'name' => Array($formatter, 'article_link'),
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   497
      'urlname' => Array($formatter, 'format_date'),
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   498
      'author' => Array($formatter, 'format_username'),
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   499
      'num_comments' => Array($formatter, 'format_commentlink')
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   500
    );
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   501
  
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   502
  $head = '<div class="tblholder">
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   503
          <table border="0" cellspacing="1" cellpadding="4">
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   504
            <tr>
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   505
              <th>Article</th><th>Date</th><th>Author</th><th>Comments</th>
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   506
            </tr>';
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   507
  $foot = "</table></div>";
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   508
  
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   509
  $content = paginate($q, "\n".'<tr><td class="{_css_class}">{name}</td><td class="{_css_class}">{urlname}</td><td class="{_css_class}">{author}</td><td class="{_css_class}">{num_comments}</td></tr>',
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   510
                      $num_total, makeUrlNS('NewsBoy', 'Archive/%s'), $lower_limit, 20, $callers, $head, $foot);
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   511
  echo $content;  
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   512
  
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   513
  $code = $plugins->setHook('send_page_footers');
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   514
  foreach ( $code as $cmd )
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   515
  {
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   516
    eval($cmd);
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   517
  }
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   518
  
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   519
}
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   520
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   521
function nb_make_username_link($username, $user_level)
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   522
{
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   523
  $color = '#0000AA';
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   524
  $user_level = intval($user_level);
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   525
  if ( $user_level < USER_LEVEL_MEMBER ) return $username;
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   526
  if ( $user_level >= USER_LEVEL_MOD ) $color = '#00AA00';
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   527
  if ( $user_level >= USER_LEVEL_ADMIN ) $color = '#AA0000';
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   528
  $link = '<a style="color: ' . $color . '" href="' . makeUrlNS('User', str_replace(' ', '_', $username) ) . '">' . $username . '</a>';
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   529
  return $link;
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   530
}
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   531
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   532
function NewsBoy_PortalLink()
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   533
{
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   534
  global $db, $session, $paths, $template, $plugins; // Common objects
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   535
  if ( $paths->namespace == 'NewsBoy' )
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   536
    echo '<div class="tblholder"><table border="0" style="width: 100%;" cellspacing="1" cellpadding="4"><tr><th><a style="color: inherit;" href="' . makeUrlNS('NewsBoy', 'Portal') . '">&laquo; Return to News Portal</a></th></tr></table></div><br />';
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   537
}
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   538
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   539
// Administration panel
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   540
function page_Admin_NewsboyItemManager()
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   541
{
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   542
  global $db, $session, $paths, $template, $plugins; if($session->auth_level < USER_LEVEL_ADMIN || $session->user_level < USER_LEVEL_ADMIN) { redirect(makeUrlNS('Special', 'Administration', 'noheaders', true), '', '', 0); die('Hacking attempt'); }
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   543
  
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   544
  $done = false;
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   545
  
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   546
  if ( isset( $_GET['act'] ) )
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   547
  {
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   548
    switch ( $_GET['act'] )
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   549
    {
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   550
      case 'edit':
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   551
        
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   552
        // Error list
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   553
        $errors = Array();
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   554
        
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   555
        if ( isset ( $_POST['submitting'] ) )
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   556
        {
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   557
          // Generate timestamp
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   558
          $year = intval($_POST['pub_year']);
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   559
          $month = intval($_POST['pub_month']);
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   560
          $day = intval($_POST['pub_day']);
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   561
          $hour = intval($_POST['pub_hour']);
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   562
          $minute = intval($_POST['pub_minute']);
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   563
          $second = intval($_POST['pub_second']);
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   564
          
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   565
          // Validation
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   566
          if ( $year < 1500 || $year > 10000 )
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   567
            $errors[] = 'Invalid year.';
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   568
          
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   569
          if ( $month < 1 || $month > 12 )
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   570
            $errors[] = 'Invalid month.';
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   571
          
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   572
          if ( $day < 1 || $day > 31 )
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   573
            $errors[] = 'Invalid day.';
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   574
          
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   575
          if ( $hour < 0 || $hour > 23 )
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   576
            $errors[] = 'Invalid hour.';
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   577
          
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   578
          if ( $minute < 0 || $minute > 60 )
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   579
            $errors[] = 'Invalid minute.';
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   580
          
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   581
          if ( $second < 0 || $second > 60 )
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   582
            $errors[] = 'Invalid second.';
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   583
          
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   584
          $name = $_POST['article_name'];
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   585
          $name = $db->escape($name);
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   586
          
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   587
          $author = $_POST['author'];
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   588
          $author = $db->escape($author);
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   589
          
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   590
          if ( count($errors) < 1 )
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   591
          {
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   592
            $time = mktime($hour, $minute, $second, $month, $day, $year);
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   593
          }
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   594
          
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   595
          if ( isset($paths->pages[ $paths->nslist['NewsBoy'] . $time ]) && $paths->pages[ $paths->nslist['NewsBoy'] . $time ] != $paths->pages[ $paths->nslist['NewsBoy'] . $_POST['page_id'] ] )
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   596
            $errors[] = 'You cannot have two news articles with the same publish time.';
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   597
          
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   598
          if ( count($errors) < 1 )
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   599
          {
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   600
            $publ = ( isset($_POST['published']) ) ? '1' : '0';
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   601
            $sql = 'UPDATE '.table_prefix.'pages SET name=\'' . $name . '\',visible='.$publ.',urlname=\''.$time.'\' WHERE urlname=\'' . $db->escape($_POST['page_id']) . '\' AND namespace=\'NewsBoy\';';
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   602
            $q = $db->sql_query($sql);
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   603
            
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   604
            if ( !$q )
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   605
              $db->_die();
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   606
            
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   607
            // Update author
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   608
            $q = $db->sql_query('UPDATE '.table_prefix.'logs SET author=\'' . $author . '\' WHERE page_id=\'' . $db->escape($_POST['page_id']) . '\' AND namespace=\'NewsBoy\' AND action=\'create\';');
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   609
            
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   610
            if ( !$q )
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   611
              $db->_die();
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   612
            
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   613
            // Update other tables with urlname info
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   614
            $q = $db->sql_query('UPDATE '.table_prefix.'logs SET page_id=\'' . $time . '\' WHERE page_id=\'' . $db->escape($_POST['page_id']) . '\' AND namespace=\'NewsBoy\';');
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   615
            if ( !$q )
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   616
              $db->_die();
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   617
            
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   618
            $q = $db->sql_query('UPDATE '.table_prefix.'comments SET page_id=\'' . $time . '\' WHERE page_id=\'' . $db->escape($_POST['page_id']) . '\' AND namespace=\'NewsBoy\';');
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   619
            if ( !$q )
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   620
              $db->_die();
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   621
            
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   622
            $q = $db->sql_query('UPDATE '.table_prefix.'page_text SET page_id=\'' . $time . '\' WHERE page_id=\'' . $db->escape($_POST['page_id']) . '\' AND namespace=\'NewsBoy\';');
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   623
            if ( !$q )
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   624
              $db->_die();
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   625
            
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   626
            $q = $db->sql_query('UPDATE '.table_prefix.'categories SET page_id=\'' . $time . '\' WHERE page_id=\'' . $db->escape($_POST['page_id']) . '\' AND namespace=\'NewsBoy\';');
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   627
            if ( !$q )
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   628
              $db->_die();
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   629
            
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   630
            echo '<div class="info-box">Your changes have been saved.</div>';
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   631
            
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   632
            break;
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   633
          }
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   634
        }
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   635
        
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   636
        if ( count($errors) > 0 )
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   637
          echo '<div class="warning-box">Errors encountered while saving data:<ul><li>' . implode('</li><li>', $errors) . '</li></ul></div>';
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   638
        
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   639
        // Obtain page information
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   640
        if ( !isset($paths->pages[ $paths->nslist['NewsBoy'] . $_GET['id'] ]) )
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   641
        {
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   642
          echo 'Invalid ID';
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   643
          return false;
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   644
        }
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   645
        $page_info =& $paths->pages[ $paths->nslist['NewsBoy'] . $_GET['id'] ];
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   646
        $time = intval($page_info['urlname_nons']);
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   647
        
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   648
        // Get author
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   649
        $q = $db->sql_query('SELECT author FROM '.table_prefix.'logs WHERE page_id=\'' . $db->escape($page_info['urlname_nons']) . '\' AND namespace=\'NewsBoy\' AND action=\'create\' ORDER BY time_id DESC LIMIT 1;');
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   650
        
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   651
        if ( !$q )
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   652
          $db->_die();
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   653
        
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   654
        $row = $db->fetchrow();
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   655
        $author = ( isset($row['author']) ) ? $row['author'] : '';
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   656
        if ( empty($author) )
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   657
          $author = 'Anonymous';
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   658
        
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   659
        // Set date & time
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   660
        $month  = date('n', $time);
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   661
        $year   = date('Y', $time);
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   662
        $day    = date('j', $time);
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   663
        $hour   = date('G', $time);
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   664
        $minute = date('m', $time);
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   665
        $second = date('s', $time);
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   666
        
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   667
        echo '<form id="nb_edit_form" action="'.makeUrlNS('Special', 'Administration', (( isset($_GET['sqldbg'])) ? 'sqldbg&amp;' : '') .'module='.$paths->cpage['module'] . '&act=edit').'" method="post" onsubmit="if ( !submitAuthorized ) return false;">';
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   668
        echo '<div class="tblholder">
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   669
                <table border="0" cellspacing="1" cellpadding="4">
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   670
                  <tr>
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   671
                    <th colspan="2">Editing news article</th>
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   672
                  </tr>
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   673
                  <tr>
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   674
                    <td class="row1">Article name:</td><td class="row2"><input name="article_name" value="' . htmlspecialchars($page_info['name']) . '" /></td>
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   675
                  </tr>
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   676
                  <tr>
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   677
                    <td class="row1">Published date:</td>
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   678
                    <td class="row2">
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   679
                      <input name="pub_year" type="text" size="5" value="'.$year.'" />-<select name="pub_month">';
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   680
       for ( $i = 1; $i <= 12; $i++ )
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   681
       {
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   682
         $m = "[$i] ";
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   683
         switch ( $i )
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   684
         {
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   685
           case 1:  $m .= 'January'; break;
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   686
           case 2:  $m .= 'February'; break;
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   687
           case 3:  $m .= 'March'; break;
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   688
           case 4:  $m .= 'April'; break;
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   689
           case 5:  $m .= 'May'; break;
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   690
           case 6:  $m .= 'June'; break;
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   691
           case 7:  $m .= 'July'; break;
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   692
           case 8:  $m .= 'August'; break;
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   693
           case 9:  $m .= 'September'; break;
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   694
           case 10: $m .= 'October'; break;
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   695
           case 11: $m .= 'November'; break;
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   696
           case 12: $m .= 'December'; break;
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   697
           default: $m .= 'Fuhrober'; break;
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   698
         }
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   699
         if ( $month == $i )
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   700
           echo '         <option selected="selected" value="' . $i . '">'.$m.'</option>';
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   701
         else
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   702
           echo '         <option value="' . $i . '">'.$m.'</option>';
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   703
       }
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   704
       echo '         </select>
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   705
                      <input name="pub_day" type="text" size="3" value="' . $day . '" />, time:
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   706
                      <input name="pub_hour" type="text" size="3" value="' . $hour . '" />&nbsp;:&nbsp;<input name="pub_minute" type="text" size="3" value="' . $minute . '" />&nbsp;:&nbsp;<input name="pub_second" type="text" size="3" value="' . $second . '" /><br />
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   707
                      <small>Note: Hours are in 24-hour format.</small>
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   708
                    </td>
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   709
                  </tr>
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   710
                  <!-- Inline developer blog, episode 1:
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   711
                       Right about the time I got here, I started sneezing like crazy. Must have caught it Friday night. Great... now
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   712
                       my life is officially stuck on pause for the next 3 days. I\'d swear here but (a) Mommy taught me better, and
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   713
                       (b) I wouldn\'t want to offend you hackers. (j/k)
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   714
                       
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   715
                       Oh crap. And no, I don\'t give towels with my showers.
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   716
                       
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   717
                       -Dan
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   718
                       -->
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   719
                  <tr>
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   720
                    <td class="row1">Publish article:</td><td class="row2"><label><input name="published" type="checkbox" ' . ( $page_info['visible'] == 1 ? 'checked="checked"' : '' ) . ' /> Article is published (shown to the public)</label></td>
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   721
                  </tr>
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   722
                  <tr>
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   723
                    <td class="row1">Article author:</td><td class="row2">' . $template->username_field('author', $author) . '</td></tr>
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   724
                  </tr>
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   725
                  <tr>
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   726
                    <td class="row3" style="text-align: center;" colspan="2">
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   727
                      <a href="#" onclick="var frm = document.getElementById(\'nb_edit_form\'); frm.submit(); return false;">Save changes</a>&nbsp;&nbsp;<a href="#" onclick="ajaxPage(\'' . $paths->cpage['module'] . '\');">Return to main menu</a>
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   728
                    </td>
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   729
                  </tr>
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   730
                </table>
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   731
              </div>
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   732
              <input type="hidden" name="submitting" value="yes" />
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   733
              <input type="hidden" name="page_id" value="' . $_GET['id'] . '" />';
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   734
        echo '</form>';
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   735
        $done = true;
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   736
        break;
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   737
      case 'del':
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   738
        if ( isset( $_POST['confirmed'] ) )
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   739
        {
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   740
          $page_id = $_POST['page_id'];
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   741
          $namespace = 'NewsBoy';
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   742
          
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   743
          $e = $db->sql_query('INSERT INTO '.table_prefix.'logs(time_id,date_string,log_type,action,page_id,namespace,author) VALUES('.time().', \''.date('d M Y h:i a').'\', \'page\', \'delete\', \''.$page_id.'\', \''.$namespace.'\', \''.$session->username.'\')');
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   744
          if(!$e) $db->_die('The page log entry could not be inserted.');
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   745
          $e = $db->sql_query('DELETE FROM '.table_prefix.'categories WHERE page_id=\''.$page_id.'\' AND namespace=\''.$namespace.'\'');
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   746
          if(!$e) $db->_die('The page categorization entries could not be deleted.');
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   747
          $e = $db->sql_query('DELETE FROM '.table_prefix.'comments WHERE page_id=\''.$page_id.'\' AND namespace=\''.$namespace.'\'');
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   748
          if(!$e) $db->_die('The page comments could not be deleted.');
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   749
          $e = $db->sql_query('DELETE FROM '.table_prefix.'page_text WHERE page_id=\''.$page_id.'\' AND namespace=\''.$namespace.'\'');
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   750
          if(!$e) $db->_die('The page text entry could not be deleted.');
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   751
          $e = $db->sql_query('DELETE FROM '.table_prefix.'pages WHERE urlname=\''.$page_id.'\' AND namespace=\''.$namespace.'\'');
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   752
          if(!$e) $db->_die('The page entry could not be deleted.');
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   753
          $e = $db->sql_query('DELETE FROM '.table_prefix.'files WHERE page_id=\''.$page_id.'\'');
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   754
          if(!$e) $db->_die('The file entry could not be deleted.');
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   755
          
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   756
          $result = 'This page has been deleted. Note that there is still a log of edits and actions in the database, and anyone with admin rights can raise this page from the dead unless the log is cleared. If the deleted file is an image, there may still be cached thumbnails of it in the cache/ directory, which is inaccessible to users.';
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   757
          
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   758
          echo $result . '<br />
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   759
               <br />
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   760
               <a href="#" onclick="ajaxPage(\'' . $paths->cpage['module'] . '\');">Return to Newsboy</a>';
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   761
        }
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   762
        else
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   763
        {
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   764
          echo '<form id="nb_delete_form" action="'.makeUrlNS('Special', 'Administration', (( isset($_GET['sqldbg'])) ? 'sqldbg&amp;' : '') .'module='.$paths->cpage['module'] . '&act=del').'" method="post">';
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   765
          echo '<div class="tblholder">
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   766
                  <table border="0" cellspacing="1" cellpadding="4">
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   767
                    <tr>
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   768
                      <th>Confirm deletion</th>
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   769
                     </tr>
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   770
                     <tr>
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   771
                       <td class="row1" style="text-align: center;">
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   772
                         <p>Are you sure you want to delete this news article?</p>
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   773
                       </td>
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   774
                     </tr>
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   775
                     <tr>
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   776
                       <td class="row3" style="text-align: center;">
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   777
                         <a href="#" onclick="var frm = document.getElementById(\'nb_delete_form\'); frm.submit(); return false;">Delete</a>&nbsp;&nbsp;<a href="#" onclick="ajaxPage(\'' . $paths->cpage['module'] . '\');">Cancel</a>
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   778
                       </td>
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   779
                     </tr>
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   780
                  </table>
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   781
                </div>
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   782
                <input type="hidden" name="confirmed" value="yes" />
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   783
                <input type="hidden" name="page_id" value="' . intval ( $_GET['id'] ) . '" />';
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   784
          echo '</form>';
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   785
        }
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   786
        $done = true;
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   787
        break;
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   788
      case 'create':
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   789
        
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   790
        // Error list
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   791
        $errors = Array();
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   792
        
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   793
        if ( isset ( $_POST['submitting'] ) )
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   794
        {
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   795
          // Generate timestamp
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   796
          $year = intval($_POST['pub_year']);
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   797
          $month = intval($_POST['pub_month']);
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   798
          $day = intval($_POST['pub_day']);
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   799
          $hour = intval($_POST['pub_hour']);
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   800
          $minute = intval($_POST['pub_minute']);
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   801
          $second = intval($_POST['pub_second']);
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   802
          
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   803
          // Validation
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   804
          if ( $year < 1500 || $year > 10000 )
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   805
            $errors[] = 'Invalid year.';
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   806
          
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   807
          if ( $month < 1 || $month > 12 )
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   808
            $errors[] = 'Invalid month.';
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   809
          
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   810
          if ( $day < 1 || $day > 31 )
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   811
            $errors[] = 'Invalid day.';
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   812
          
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   813
          if ( $hour < 0 || $hour > 23 )
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   814
            $errors[] = 'Invalid hour.';
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   815
          
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   816
          if ( $minute < 0 || $minute > 60 )
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   817
            $errors[] = 'Invalid minute.';
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   818
          
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   819
          if ( $second < 0 || $second > 60 )
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   820
            $errors[] = 'Invalid second.';
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   821
          
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   822
          $name = $_POST['article_name'];
2
66b299fdb9ca Fixed Wicked Flea's bug (apostrophes in page title) and fixed error checking on PageUtils::createpage return
Dan
parents: 1
diff changeset
   823
          // This is db-escaped by PageUtils
0
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   824
          
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   825
          $author = $_POST['author'];
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   826
          $author = $db->escape($author);
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   827
          
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   828
          if ( count($errors) < 1 )
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   829
          {
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   830
            $time = mktime($hour, $minute, $second, $month, $day, $year);
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   831
          }
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   832
          
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   833
          if ( isset($paths->pages[ $paths->nslist['NewsBoy'] . $time ]) && $paths->pages[ $paths->nslist['NewsBoy'] . $time ] != $paths->pages[ $paths->nslist['NewsBoy'] . $_POST['page_id'] ] )
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   834
            $errors[] = 'You cannot have two news articles with the same publish time.';
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   835
          
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   836
          if ( count($errors) < 1 )
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   837
          {
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   838
            $publ = ( isset($_POST['published']) ) ? 1 : 0;
2
66b299fdb9ca Fixed Wicked Flea's bug (apostrophes in page title) and fixed error checking on PageUtils::createpage return
Dan
parents: 1
diff changeset
   839
            
0
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   840
            $result = PageUtils::createpage( (string)$time, 'NewsBoy', $name, $publ );
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   841
            
2
66b299fdb9ca Fixed Wicked Flea's bug (apostrophes in page title) and fixed error checking on PageUtils::createpage return
Dan
parents: 1
diff changeset
   842
            if ( $result == 'good' )
66b299fdb9ca Fixed Wicked Flea's bug (apostrophes in page title) and fixed error checking on PageUtils::createpage return
Dan
parents: 1
diff changeset
   843
            {
66b299fdb9ca Fixed Wicked Flea's bug (apostrophes in page title) and fixed error checking on PageUtils::createpage return
Dan
parents: 1
diff changeset
   844
              // Set content
66b299fdb9ca Fixed Wicked Flea's bug (apostrophes in page title) and fixed error checking on PageUtils::createpage return
Dan
parents: 1
diff changeset
   845
              $content = RenderMan::preprocess_text($_POST['content'], true); // this also SQL-escapes it
66b299fdb9ca Fixed Wicked Flea's bug (apostrophes in page title) and fixed error checking on PageUtils::createpage return
Dan
parents: 1
diff changeset
   846
              
66b299fdb9ca Fixed Wicked Flea's bug (apostrophes in page title) and fixed error checking on PageUtils::createpage return
Dan
parents: 1
diff changeset
   847
              $q = $db->sql_query('UPDATE '.table_prefix.'page_text SET page_text=\'' . $content . '\' WHERE page_id=\'' . $time . '\' AND namespace=\'NewsBoy\';');
66b299fdb9ca Fixed Wicked Flea's bug (apostrophes in page title) and fixed error checking on PageUtils::createpage return
Dan
parents: 1
diff changeset
   848
              if ( !$q )
66b299fdb9ca Fixed Wicked Flea's bug (apostrophes in page title) and fixed error checking on PageUtils::createpage return
Dan
parents: 1
diff changeset
   849
                $db->_die();
66b299fdb9ca Fixed Wicked Flea's bug (apostrophes in page title) and fixed error checking on PageUtils::createpage return
Dan
parents: 1
diff changeset
   850
              
66b299fdb9ca Fixed Wicked Flea's bug (apostrophes in page title) and fixed error checking on PageUtils::createpage return
Dan
parents: 1
diff changeset
   851
              if ( $result )
66b299fdb9ca Fixed Wicked Flea's bug (apostrophes in page title) and fixed error checking on PageUtils::createpage return
Dan
parents: 1
diff changeset
   852
                echo '<div class="info-box">Your changes have been saved.</div>';
66b299fdb9ca Fixed Wicked Flea's bug (apostrophes in page title) and fixed error checking on PageUtils::createpage return
Dan
parents: 1
diff changeset
   853
              else
66b299fdb9ca Fixed Wicked Flea's bug (apostrophes in page title) and fixed error checking on PageUtils::createpage return
Dan
parents: 1
diff changeset
   854
                $errors[] = 'PageUtils::createpage returned an error.';
66b299fdb9ca Fixed Wicked Flea's bug (apostrophes in page title) and fixed error checking on PageUtils::createpage return
Dan
parents: 1
diff changeset
   855
            }
0
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   856
            else
2
66b299fdb9ca Fixed Wicked Flea's bug (apostrophes in page title) and fixed error checking on PageUtils::createpage return
Dan
parents: 1
diff changeset
   857
            {
66b299fdb9ca Fixed Wicked Flea's bug (apostrophes in page title) and fixed error checking on PageUtils::createpage return
Dan
parents: 1
diff changeset
   858
              $errors[] = 'PageUtils::createpage returned an error: ' . htmlspecialchars($result);
66b299fdb9ca Fixed Wicked Flea's bug (apostrophes in page title) and fixed error checking on PageUtils::createpage return
Dan
parents: 1
diff changeset
   859
            }
0
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   860
            
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   861
            break;
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   862
          }
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   863
        }
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   864
        
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   865
        if ( count($errors) > 0 )
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   866
          echo '<div class="warning-box">Errors encountered while preparing data:<ul><li>' . implode('</li><li>', $errors) . '</li></ul></div>';
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   867
        
2
66b299fdb9ca Fixed Wicked Flea's bug (apostrophes in page title) and fixed error checking on PageUtils::createpage return
Dan
parents: 1
diff changeset
   868
        $time = time();
0
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   869
        
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   870
        // Get author
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   871
        $author = $session->username;
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   872
        
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   873
        if ( empty($author) )
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   874
          $author = 'Anonymous';
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   875
        
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   876
        // Set date & time
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   877
        $month  = date('n', $time);
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   878
        $year   = date('Y', $time);
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   879
        $day    = date('j', $time);
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   880
        $hour   = date('G', $time);
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   881
        $minute = date('m', $time);
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   882
        $second = date('s', $time);
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   883
        
2
66b299fdb9ca Fixed Wicked Flea's bug (apostrophes in page title) and fixed error checking on PageUtils::createpage return
Dan
parents: 1
diff changeset
   884
        echo '<form id="nb_create_form" action="'.makeUrlNS('Special', 'Administration', (( isset($_GET['sqldbg'])) ? 'sqldbg&' : '') .'module='.$paths->cpage['module'] . '&act=create').'" method="post" onsubmit="if ( !submitAuthorized ) return false;">';
0
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   885
        echo '<div class="tblholder">
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   886
                <table border="0" cellspacing="1" cellpadding="4">
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   887
                  <tr>
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   888
                    <th colspan="2">Creating news article</th>
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   889
                  </tr>
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   890
                  <tr>
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   891
                    <td class="row1">Article name:</td><td class="row2"><input name="article_name" value="" /></td>
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   892
                  </tr>
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   893
                  <tr>
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   894
                    <td class="row1">Published datestamp:</td>
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   895
                    <td class="row2">
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   896
                      <input name="pub_year" type="text" size="5" value="'.$year.'" />-<select name="pub_month">';
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   897
       for ( $i = 1; $i <= 12; $i++ )
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   898
       {
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   899
         $m = "[$i] ";
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   900
         switch ( $i )
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   901
         {
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   902
           case 1:  $m .= 'January'; break;
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   903
           case 2:  $m .= 'February'; break;
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   904
           case 3:  $m .= 'March'; break;
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   905
           case 4:  $m .= 'April'; break;
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   906
           case 5:  $m .= 'May'; break;
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   907
           case 6:  $m .= 'June'; break;
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   908
           case 7:  $m .= 'July'; break;
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   909
           case 8:  $m .= 'August'; break;
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   910
           case 9:  $m .= 'September'; break;
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   911
           case 10: $m .= 'October'; break;
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   912
           case 11: $m .= 'November'; break;
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   913
           case 12: $m .= 'December'; break;
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   914
           default: $m .= 'Fuhrober'; break;
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   915
         }
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   916
         if ( $month == $i )
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   917
           echo '         <option selected="selected" value="' . $i . '">'.$m.'</option>';
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   918
         else
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   919
           echo '         <option value="' . $i . '">'.$m.'</option>';
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   920
       }
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   921
       echo '         </select>
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   922
                      <input name="pub_day" type="text" size="3" value="' . $day . '" />, time:
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   923
                      <input name="pub_hour" type="text" size="3" value="' . $hour . '" />&nbsp;:&nbsp;<input name="pub_minute" type="text" size="3" value="' . $minute . '" />&nbsp;:&nbsp;<input name="pub_second" type="text" size="3" value="' . $second . '" /><br />
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   924
                      <small>Note: Hours are in 24-hour format.</small>
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   925
                    </td>
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   926
                  </tr>
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   927
                  <tr>
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   928
                    <td class="row1">Publish article:</td><td class="row2"><label><input name="published" type="checkbox" /> Article is published (shown to the public)</label></td>
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   929
                  </tr>
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   930
                  <tr>
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   931
                    <td class="row1">Article author:</td><td class="row2">' . $template->username_field('author', $author) . '</td></tr>
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   932
                  </tr>
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   933
                  <tr>
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   934
                    <td class="row1">Initial content:<br /><small>You can always edit this later.</small></td><td class="row2"><textarea name="content" rows="15" cols="60" style="width: 100%;"></textarea></td>
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   935
                  </tr>
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   936
                  <tr>
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   937
                    <td class="row3" style="text-align: center;" colspan="2">
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   938
                      <a href="#" onclick="var frm = document.getElementById(\'nb_create_form\'); frm.submit(); return false;">Create article</a>&nbsp;&nbsp;<a href="#" onclick="ajaxPage(\'' . $paths->cpage['module'] . '\');">Return to main menu</a>
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   939
                    </td>
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   940
                  </tr>
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   941
                </table>
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   942
              </div>
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   943
              <input type="hidden" name="submitting" value="yes" />';
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   944
        echo '</form>';
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   945
        
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   946
        $done = true;
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   947
        break;
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   948
    }
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   949
  }
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   950
  
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   951
  if ( !$done )
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   952
  {
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   953
  
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   954
    // Start output
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   955
    echo '<div class="tblholder">
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   956
      <table border="0" cellspacing="1" cellpadding="4">
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   957
        <tr>
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   958
          <th>Name</th>
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   959
          <th>Date published</th>
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   960
          <th colspan="3">Actions</th>
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   961
        </tr>';
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   962
        
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   963
    $row_class = 'row2';
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   964
    
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   965
    // List existing news entries
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   966
    $q = $db->sql_query('SELECT name,urlname FROM '.table_prefix.'pages WHERE namespace="NewsBoy" AND urlname!="Announce" ORDER BY name ASC;');
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   967
    
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   968
    if ( !$q )
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   969
      $db->_die();
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   970
    
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   971
    if ( $row = $db->fetchrow($q) )
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   972
    {
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   973
      do {
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   974
        $row_class = ( $row_class == 'row1' ) ? 'row2' : 'row1';
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   975
        $ts = intval($row['urlname']);
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   976
        $date = date('F d, Y h:i a', $ts);
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   977
        $edit_url = makeUrlNS('Special', 'Administration', "module={$paths->cpage['module']}&act=edit&id={$row['urlname']}", true);
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   978
        $dele_url = makeUrlNS('Special', 'Administration', "module={$paths->cpage['module']}&act=del&id={$row['urlname']}", true);
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   979
        $page_url = makeUrlNS('NewsBoy', $row['urlname']);
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   980
        echo "<tr>
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   981
                <td class='$row_class' style='width: 50%;'>
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   982
                  {$row['name']}
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   983
                </td>
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   984
                <td class='$row_class' style='width: 40%;'>
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   985
                  $date
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   986
                </td>
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   987
                <td class='$row_class'>
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   988
                  <a href='$edit_url'>Settings</a>
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   989
                </td>
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   990
                <td class='$row_class'>
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   991
                  <a href='$page_url' onclick='window.open(this.href); return false;'>Page</a>
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   992
                </td>
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   993
                <td class='$row_class'>
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   994
                  <a href='$dele_url'>Delete</a>
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   995
                </td>
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   996
              </tr>";
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   997
      } while ( $row = $db->fetchrow($q) );
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   998
    }
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
   999
    else
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
  1000
    {
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
  1001
      echo '<tr><td class="row3" colspan="5" style="text-align: center;">No news items yet.</td></tr>';
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
  1002
    }
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
  1003
    echo '<tr><th class="subhead" colspan="5"><a href="' . makeUrlNS('Special', 'Administration', "module={$paths->cpage['module']}&act=create", true) . '" style="color: inherit;">Create new entry</a></th></tr>
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
  1004
          </table></div>';
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
  1005
    $db->free_result();
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
  1006
    
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
  1007
  }
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
  1008
  
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
  1009
}
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
  1010
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
  1011
function page_Admin_NewsboyConfiguration()
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
  1012
{
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
  1013
  global $db, $session, $paths, $template, $plugins; if($session->auth_level < USER_LEVEL_ADMIN || $session->user_level < USER_LEVEL_ADMIN) { redirect(makeUrlNS('Special', 'Administration', 'noheaders', true), '', '', 0); die('Hacking attempt'); }
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
  1014
  if ( isset($_POST['submit']) )
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
  1015
  {
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
  1016
    setConfig('nb_portal_title', $_POST['portal_name']);
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
  1017
    if ( isPage($_POST['announce_page']) )
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
  1018
      setConfig('nb_announce_page', $_POST['announce_page']);
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
  1019
    else
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
  1020
      setConfig('nb_announce_page', '');
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
  1021
    // Submit
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
  1022
    echo '<div class="info-box">Your changes have been saved.</div>';
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
  1023
  }
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
  1024
  echo '<form name="main" action="'.htmlspecialchars(makeUrl($paths->nslist['Special'].'Administration', 'module='.$paths->cpage['module'])).'" method="post">';
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
  1025
  echo '<div class="tblholder">
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
  1026
          <table border="0" cellspacing="1" cellpadding="4">
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
  1027
            <tr>
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
  1028
              <th colspan="2">
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
  1029
                Newsboy portal: General configuration
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
  1030
              </th>
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
  1031
            </tr>
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
  1032
            <tr>
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
  1033
              <td class="row2">
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
  1034
                Portal title:<br />
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
  1035
                <small>This is the text that will be shown as the page title on the<br />
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
  1036
                portal. If you don\'t enter anything here, a default will be used.</small>
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
  1037
              </td>
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
  1038
              <td class="row1"><input type="text" size="30" name="portal_name" value="' . htmlspecialchars(getConfig('nb_portal_title')) . '"></td>
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
  1039
            </tr>
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
  1040
            <tr>
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
  1041
              <td class="row2">
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
  1042
                Page to embed as announcement:<br />
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
  1043
                <small>The page you enter here will always be shown at the top of the<br />
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
  1044
                portal. The default is "' . $paths->nslist['NewsBoy'] . 'Announce".</small>
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
  1045
              </td>
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
  1046
              <td class="row1">
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
  1047
                ' . $template->pagename_field('announce_page', htmlspecialchars(getConfig('nb_announce_page'))) . '
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
  1048
              </td>
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
  1049
            </tr>
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
  1050
            <tr>
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
  1051
              <th class="subhead" colspan="2">
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
  1052
                <input type="submit" name="submit" value="Save changes" />
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
  1053
              </th>
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
  1054
            </tr>
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
  1055
          </table>
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
  1056
        </div>';
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
  1057
  echo '</form>';
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
  1058
}
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
  1059
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
  1060
/**
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
  1061
 * Trims a wad of text to the specified length.
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
  1062
 * @todo make HTML friendly (don't break tags)
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
  1063
 * @param string The text to trim
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
  1064
 * @param int The maximum length to trim the text to.
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
  1065
 * @param bool Reference. Set to true if the text was trimmed, otherwise set to false.
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
  1066
 */
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
  1067
2
66b299fdb9ca Fixed Wicked Flea's bug (apostrophes in page title) and fixed error checking on PageUtils::createpage return
Dan
parents: 1
diff changeset
  1068
function nb_trim_paragraph($text, $len = 500, &$trimmed)
0
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
  1069
{
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
  1070
  $trimmed = false;
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
  1071
  if ( strlen($text) <= $len )
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
  1072
    return $text;
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
  1073
  $trimmed = true;
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
  1074
  $text = substr($text, 0, $len);
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
  1075
  for ( $i = $len; $i > 0; $i-- )
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
  1076
  {
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
  1077
    $chr = $text{$i-1};
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
  1078
    if ( preg_match('/[\s]/', $chr) )
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
  1079
    {
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
  1080
      $text = substr($text, 0, $i - 1);
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
  1081
      $text .= '...';
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
  1082
      return $text;
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
  1083
    }
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
  1084
    $text = substr($text, 0, $i);
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
  1085
  }
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
  1086
  return $text;
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
  1087
}
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
  1088
9f29b32e5224 Initial repository population
dan@fuhry
parents:
diff changeset
  1089
?>