extensions/BlogThis/default.php

   1 <?php
   2 /*
   3 Extension Name: BlogThis
   4 Extension Url: http://lussumo.com/addons/index.php?PostBackAction=AddOn&AddOnID=364
   5 Description: Blog page built from any comments from any discussions chosen.
   6 Version: 1.14
   7 Author: Andrew Miller (Spode)
   8 Author Url: http://www.thinkabouttech.com
   9 */
  10
  11 /*
  12 Based on the original "Blog" extension by Ziyad (MySchizoBuddy) Saeed.
  13 */
  14
  15 //Permissions
  16 // Can blog/unblog any comment.
  17 $Context->Configuration['PERMISSION_CANBLOGALL'] = '0';
  18 // Can blog/unblog own comments.
  19 $Context->Configuration['PERMISSION_CANBLOGTHIS'] = '0';
  20 // Allow HTML in BlogThis profile?
  21 $Context->Configuration['PERMISSION_BLOGPROFILEHTML'] = '0';
  22
  23 // Blog Path
  24 $BlogPath = dirname(__FILE__);
  25
  26 // Libraries
  27 include($BlogPath . '/library/Function.BlogThis.php');
  28 include($BlogPath . '/library/Control.BlogThis.php');
  29 include($BlogPath . '/library/PostBackControl.BlogForm.php');
  30
  31 // BlogThis Preferences
  32 if( !array_key_exists('BLOG_TAB_NAME', $Configuration)) {AddConfigurationSetting($Context, 'BLOG_TAB_NAME', 'Blog');}
  33 if( !array_key_exists('BLOG_TAB_POSITION', $Configuration)) {AddConfigurationSetting($Context, 'BLOG_TAB_POSITION', '1');}
  34 if( !array_key_exists('BLOG_ADSENSE', $Configuration)) {AddConfigurationSetting($Context, 'BLOG_ADSENSE', '0');}
  35 if( !array_key_exists('BLOG_SOCIALBOOKMARKS_DIGG', $Configuration)) {AddConfigurationSetting($Context, 'BLOG_SOCIALBOOKMARKS_DIGG', '0');}
  36 if( !array_key_exists('BLOG_SOCIALBOOKMARKS_DELICIOUS', $Configuration)) {AddConfigurationSetting($Context, 'BLOG_SOCIALBOOKMARKS_DELICIOUS', '0');}
  37 if( !array_key_exists('BLOG_SOCIALBOOKMARKS_STUMBLE', $Configuration)) {AddConfigurationSetting($Context, 'BLOG_SOCIALBOOKMARKS_STUMBLE', '0');}
  38 if( !array_key_exists('BLOG_SOCIALBOOKMARKS_TECHNORATI', $Configuration)) {AddConfigurationSetting($Context, 'BLOG_SOCIALBOOKMARKS_TECHNORATI', '0');}
  39 if( !array_key_exists('BLOG_PER_PAGE', $Configuration)) {AddConfigurationSetting($Context, 'BLOG_PER_PAGE', '10');}
  40 if( !array_key_exists('BLOG_WORD_LIMIT', $Configuration)) {AddConfigurationSetting($Context, 'BLOG_WORD_LIMIT', '0');}
  41 if( !array_key_exists('BLOG_DATE', $Configuration)) {AddConfigurationSetting($Context, 'BLOG_DATE', 'jS F, Y');}
  42 if( !array_key_exists('BLOG_TITLE', $Configuration)) {AddConfigurationSetting($Context, 'BLOG_TITLE', 'My Blog');}
  43 if( !array_key_exists('BLOG_PROFILETEXT', $Configuration)) {AddConfigurationSetting($Context, 'BLOG_PROFILETEXT', '1');}
  44 if( !array_key_exists('BLOG_FULLNAME', $Configuration)) {AddConfigurationSetting($Context, 'BLOG_FULLNAME', '0');}
  45
  46 //Install BlogThis
  47 if      (!array_key_exists('BLOGTHIS', $Configuration) || @$_GET['UpgradeBlogThis'])
  48         {
  49         //check to see if the column exists in the database
  50         $query = "SHOW COLUMNS FROM `".$Configuration['DATABASE_TABLE_PREFIX']."Comment` LIKE 'BlogThis';";
  51         $result = $Context->Database->Execute($query,'','','An error occured checking for the existence of the BlogThis field.');
  52         $result = $Context->Database->GetRow($result);
  53
  54         //BlogThis field doesn't exist!
  55         if      (!$result)
  56                 {
  57                 $query = "ALTER TABLE `".$Configuration['DATABASE_TABLE_PREFIX']."Comment` ADD `BlogThis` TINYINT(1) DEFAULT 0 NOT NULL ;";
  58                 $result = $Context->Database->Execute($query,'','','An error occured adding the BlogThis field - does your database user have the correct priviliges?.');
  59                 }
  60
  61         $query = "SHOW COLUMNS FROM `".$Configuration['DATABASE_TABLE_PREFIX']."User` LIKE 'ProfileText';";
  62         $result = $Context->Database->Execute($query,'','','An error occured checking for the existence of the ProfileText field.');
  63         $result = $Context->Database->GetRow($result);
  64
  65
  66         if      (!$result)
  67                 {
  68                 $query = "ALTER TABLE `".$Configuration['DATABASE_TABLE_PREFIX']."User` ADD `ProfileText` TEXT;";
  69                 $result = $Context->Database->Execute($query,'','','An error occured adding the ProfileText field - does your database user have the correct priviliges?.');
  70                 }
  71
  72         //Add configurations
  73         AddConfigurationSetting($Context, 'BLOGTHIS', '1');
  74         }
  75
  76 $DatabaseColumns['Comment']['BlogThis'] = 'BlogThis';
  77 $DatabaseColumns['User']['ProfileText'] = 'ProfileText';
  78
  79 //if the user has permission, add the blogthis buttons
  80 if      ($Context->Session->User->Permission('PERMISSION_CANBLOGTHIS') || $Context->Session->User->Permission('PERMISSION_CANBLOGALL'))
  81         {
  82         $Context->AddToDelegate("CommentGrid", "PostCommentOptionsRender", "AddBlogThis");
  83
  84         //As they can Blog, also enable ability to modify blog profile
  85         if ($Context->Configuration['BLOG_PROFILETEXT'])
  86                 {
  87                 $Context->AddToDelegate("IdentityForm", "PreCustomInputsRender", "AddModifyProfile");
  88                 $Context->AddToDelegate("UserManager", "PreIdentityUpdate", "AddProfileText");
  89                 }
  90         }
  91
  92 //Add tab to main menu
  93 if      (isset($Menu))
  94         {
  95         $Menu->AddTab($Configuration['BLOG_TAB_NAME'], 'Blog', GetUrl($Configuration, 'extension.php', '', '', '', '',  'PostBackAction=Blog'), '', $Context->Configuration['BLOG_TAB_POSITION']);
  96         }
  97
  98 //Add stylesheet for the user account page
  99 if      ($Context->SelfUrl == 'account.php')
 100         {
 101         $Head->AddStyleSheet( 'extensions/BlogThis/theme/accountstyle.css');
 102         }
 103
 104 //Show Blog User Profiles
 105 if ($Context->Configuration['BLOG_PROFILETEXT'])
 106         {
 107         $Context->AddToDelegate("Account", "PostProfileRender", "AddProfileDetails");
 108         }
 109
 110 //add text link for viewing blog posts
 111 $Context->AddToDelegate("Account", "PostProfileRender", "AddViewBlogPosts");
 112
 113 //UnBlog/Blog a post, assuming correct permissions and on the right page
 114 if      (in_array($Context->SelfUrl, array("comments.php")) && ($Context->Session->User->Permission('PERMISSION_CANBLOGTHIS') || $Context->Session->User->Permission('PERMISSION_CANBLOGALL')))
 115         {
 116
 117         if (ForceIncomingString('PostBackAction', '') == 'BlogThis') {$blogvalue = 1;}
 118         if (ForceIncomingString('PostBackAction', '') == 'UnBlogThis') {$blogvalue = 0;}
 119
 120         $cmid = ForceIncomingString('BlogCommentID', '');
 121
 122         if      (($cmid) && isset($blogvalue))
 123                 {
 124                 $sql = $Context->ObjectFactory->NewContextObject($Context, 'SqlBuilder');
 125                 $sql->SetMainTable('Comment','c');
 126                 $sql->AddFieldNameValue('BlogThis', $blogvalue, 0);
 127                 $sql->AddWhere('c', 'CommentID', '', FormatStringForDatabaseInput($cmid), '=');
 128
 129                 //stops people without permission blogging other people's posts
 130                 if ($Context->Session->User->Permission('PERMISSION_CANBLOGTHIS') && !$Context->Session->User->Permission('PERMISSION_CANBLOGALL'))
 131                         {
 132                         $sql->AddWhere('c', 'AuthUserID', '', $Context->Session->UserID, '=');
 133                         }
 134
 135                 $result = $Context->Database->Update ($sql, '', '' , 'Could not change the Blogged/UnBlogged status of the comment.');
 136
 137                 //if it returns 0, either the user doesn't have permission, or something odd is going on!
 138                 if ($result)
 139                         {
 140                         $Context->AddToDelegate("CommentGrid", "PreRender", "DisplaySuccess");
 141                         }
 142                 else
 143                         {
 144                         $Context->AddToDelegate("CommentGrid", "PreRender", "DisplayFail");
 145                         }
 146                 }
 147         }
 148
 149 //If this is the "Blog" page, display the blog grid
 150
 151 if      ($Context->SelfUrl == 'extension.php' && ForceIncomingString('PostBackAction', '') == 'Blog')
 152         {
 153         $Head->AddStyleSheet( 'extensions/BlogThis/theme/style.css');
 154         $Head->BodyId = 'Blog';
 155
 156         //changes current tab to Blog
 157         if (isset($Menu)) $Menu->CurrentTab = 'Blog';
 158
 159         $Context->PageTitle = $Context->Configuration['BLOG_TITLE'];
 160         $Blog = $Context->ObjectFactory->NewContextObject($Context, 'Blog');
 161         $Page->AddRenderControl($Blog, $Configuration['CONTROL_POSITION_BODY_ITEM']);
 162         }
 163
 164 //Settings panel for BlogThis
 165 if      (($Context->SelfUrl == 'settings.php') && $Context->Session->User->Permission('PERMISSION_CHANGE_APPLICATION_SETTINGS'))
 166         {
 167         $BlogForm = $Context->ObjectFactory->NewContextObject($Context, 'BlogForm');
 168         $Page->AddRenderControl($BlogForm, $Configuration["CONTROL_POSITION_BODY_ITEM"]);
 169         $ExtensionOptions = $Context->GetDefinition('ExtensionOptions');
 170         $Panel->AddList($ExtensionOptions);
 171         $Panel->AddListItem($ExtensionOptions, $Context->GetDefinition('BlogSettings'), GetUrl($Context->Configuration, 'settings.php', '', '', '', '', 'PostBackAction=Blog'));
 172         }
 173
 174 //this was added in for compatibility with FeedPublisher and now FeedThis
 175 //The url /search.php?PostBackAction=Search&Type=Comments&BlogSearch=1&Feed=RSS2 is used in FeedPublisher. FeedThis works automatically.
 176 $Context->AddToDelegate("CommentManager", "SearchBuilder_PostWhere", "Search_AddQuery");
 177
 178 //Adds the "Start a blog post" link
 179 $Context->AddToDelegate("Panel", "PostStartButtonRender", "AddStartBlog");
 180
 181 //Add extra bits to post page
 182 if      (($Context->SelfUrl == 'post.php') && ($Context->Session->User->Permission('PERMISSION_CANBLOGALL') || $Context->Session->User->Permission('PERMISSION_CANBLOGTHIS')))
 183         {
 184         $Head->AddStyleSheet('extensions/BlogThis/theme/post.css');
 185         $Context->AddToDelegate("DiscussionForm", "DiscussionForm_PostButtonsRender", "AddBlogTick");
 186         $Context->AddToDelegate("DiscussionForm", "PostSaveDiscussion", "PostBlogThis");
 187         }
 188
 189 ?>