includes/SpecialData.php

   1 <?php
   2
   3 /* You'll need to run these CREATEs :
   4
   5 CREATE TABLE data (
   6 data_cur_id INT NOT NULL ,
   7 data_revision INT NOT NULL ,
   8 data_key VARCHAR( 255 ) NOT NULL ,
   9 data_value MEDIUMTEXT NOT NULL ,
  10 INDEX ( data_cur_id ),
  11 INDEX (data_revision) ,
  12 INDEX (data_key )
  13 ) TYPE = MYISAM ;
  14
  15 CREATE TABLE data_rev (
  16 rev_cur_id INT NOT NULL ,
  17 rev_id INT NOT NULL ,
  18 rev_masterkey VARCHAR( 255 ) NOT NULL,
  19 rev_user_id INT NOT NULL ,
  20 rev_user_text VARCHAR( 255 ) NOT NULL ,
  21 rev_comment VARCHAR( 255 ) NOT NULL ,
  22 rev_time INT NOT NULL ,
  23 INDEX ( rev_cur_id) ,
  24 INDEX (rev_id),
  25 INDEX ( rev_user_id ),
  26 INDEX ( rev_masterkey )
  27 ) TYPE = MYISAM ;
  28
  29 */
  30
  31 function wfDataPreview ( &$t , &$dk )
  32         {
  33         $s = "" ;
  34         $u = explode ( "((" , $t ) ;
  35         foreach ( $u AS $x )
  36                 {
  37                 $y = explode ( "))" , $x ) ;
  38                 if ( count ( $y ) == 2 )
  39                         {
  40                         $z = explode ( "/" , $y[0] ) ;
  41                         $keyname = $z[0] ;
  42                         $isMasterKey = false ;
  43                         if ( substr ( $keyname , 0 , 1 ) == "!" )
  44                                 {
  45                                 $keyname = substr ( $keyname , 1 ) ;
  46                                 $isMasterKey = true ;
  47                                 }
  48                         if ( isset ( $dk[$keyname] ) ) $value= $dk[$keyname] ;
  49                         else $value = "" ;
  50                         if ( $isMasterKey ) $value = "<b>{$value}</b>" ;
  51                         $s .= $value . $y[1] ;
  52                         }
  53                 else $s .= $x ;
  54                 }
  55         return $s ;
  56         }
  57
  58 function wfDataView ( $dt ) # $dt = data type
  59         {
  60         if ( $dt == "" ) return ;
  61         global $wgParser, $wgTitle;
  62         global $wgOut , $wgUser ;
  63         $nsdata = 20 ;
  64         $s = "<h2>{$dt}</h2>" ;
  65
  66         # Read from source
  67         $dbr =& wfGetDB( DB_SLAVE );
  68         $sql = "SELECT * FROM cur WHERE cur_namespace={$nsdata} AND cur_title=\"{$dt}\"";
  69         $res1 = $dbr->query( $sql, "wfDataEdit" );
  70         $data = $dbr->fetchObject( $res1 ) ;
  71
  72         $sql = "SELECT * FROM data_rev WHERE rev_cur_id={$data->cur_id} GROUP BY rev_masterkey ORDER BY rev_masterkey" ;
  73         $r = $dbr->query( $sql, "wfDataEdit" );
  74         $mk = array () ;
  75         while ( ($d = $dbr->fetchObject( $r )) ) $mk[] = $d->rev_masterkey ;
  76         foreach ( $mk AS $x )
  77                 {
  78                 $s .= "<li>{$x}</li>" ;
  79                 }
  80
  81         $wgOut->AddHTML ( $s ) ;
  82         }
  83
  84 function wfDataEdit ( $dt ) # $dt = data type
  85         {
  86         if ( $dt == "" ) return ;
  87         global $wgParser, $wgTitle;
  88         global $wgOut , $wgUser ;
  89         $nsdata = 20 ;
  90         $s = "<h2>{$dt}</h2>" ;
  91
  92         if ( isset ( $_POST['revision'] ) ) $revision = $_POST['revision'] ;
  93         else if ( isset ( $_GET['revision'] ) ) $revision = $_GET['revision'] ;
  94         else $revision = "" ;
  95
  96         if ( isset ( $_POST['masterkey'] ) ) $masterkey = $_POST['masterkey'] ;
  97         else $masterkey = "" ;
  98
  99         if ( isset ( $_POST['comment'] ) ) $comment = $_POST['comment'] ;
 100         else $comment = "" ;
 101
 102         # Read form source
 103         $dbr =& wfGetDB( DB_SLAVE );
 104         $sql = "SELECT * FROM cur WHERE cur_namespace={$nsdata} AND cur_title=\"{$dt}\"";
 105         $res1 = $dbr->query( $sql, "wfDataEdit" );
 106         $data = $dbr->fetchObject( $res1 ) ;
 107
 108         # Pre-render
 109         $parserOutput = $wgParser->parse( $data->cur_text, $wgTitle, $wgOut->mParserOptions, true );
 110         $t = $parserOutput->getText() ;
 111
 112         # Read from last form
 113         if ( isset ( $_POST['dk'] ) ) $dk = $_POST['dk'] ;
 114
 115         # Store new version
 116         if ( isset ( $_POST['doit'] ) && $dk[$masterkey] )
 117                 {
 118                 # Get next revision number
 119                 $dbw =& wfGetDB( DB_MASTER ); # Maybe DB_SLAVE didn't update yet
 120                 $sql = "SELECT MAX(rev_id) AS m FROM data_rev WHERE rev_cur_id={$data->cur_id} AND rev_masterkey=\"" . $dk[$masterkey] . "\"" ;
 121                 $r = $dbw->query( $sql, "wfDataEdit" );
 122                 $newrev = $dbr->fetchObject( $r ) ;
 123                 if ( isset ( $newrev ) AND isset ( $newrev->m ) ) $newrev = $newrev->m ;
 124                 else $newrev = "" ;
 125                 if ( $newrev == "" ) $newrev = 1 ;
 126
 127                 # Generate SQL
 128                 $dbw->query( "BEGIN", "wfDataEdit" );
 129                 $sql = "INSERT INTO data_rev (rev_cur_id,rev_id,rev_masterkey,rev_user_id,rev_user_text,rev_comment,rev_time) VALUES (" .
 130                                 "\"{$data->cur_id}\"," .
 131                                 "\"{$newrev}\",".
 132                                 "\"" . $dk[$masterkey] . "\"," .
 133                                 "\"" . $wgUser->getID() . "\",".
 134                                 "\"" . $wgUser->getName() . "\",".
 135                                 "\"{$comment}\",".
 136                                 "\"" . time() . "\");" ;
 137                 $dbw->query( $sql, "wfDataEdit" );
 138
 139                 foreach ( $dk AS $k => $v )
 140                         {
 141                         $sql = "INSERT INTO data (data_cur_id,data_revision,data_key,data_value) VALUES (" .
 142                                         "\"" . $data->cur_id . "\"," .
 143                                         "\"" . $newrev . "\"," .
 144                                         "\"" . $k . "\"," .
 145                                         "\"" . $v . "\");" ;
 146                         $dbw->query( $sql, "wfDataEdit" );
 147                         }
 148                 $dbw->query( "COMMIT", "wfDataEdit" );
 149
 150                 $s .= "Action complete.<br>\n" ;
 151                 $s .= wfDataPreview ( $t , $dk ) ;
 152                 $wgOut->AddHTML ( $s ) ;
 153
 154                 return ;
 155                 }
 156
 157         # Preview
 158         if ( isset ( $_POST['preview'] ) ) $s .= wfDataPreview ( $t , $dk ) . "\n<hr>\n" ;
 159
 160         # Editing
 161         $t = explode ( "((" , $t ) ;
 162         $s .= "<form method=post href=\"index.php?title=Special:Data\">" ;
 163         foreach ( $t AS $x )
 164                 {
 165                 $y = explode ( "))" , $x ) ;
 166                 if ( count ( $y ) == 2 )
 167                         {
 168                         $z = explode ( "/" , $y[0] ) ;
 169                         $keyname = $z[0] ;
 170                         $isMasterKey = false ;
 171                         if ( substr ( $keyname , 0 , 1 ) == "!" )
 172                                 {
 173                                 $keyname = substr ( $keyname , 1 ) ;
 174                                 $isMasterKey = true ;
 175                                 }
 176
 177                         $value = "" ;
 178                         if ( isset ( $dk[$keyname] ) ) $value= $dk[$keyname] ;
 179                         if ( $isMasterKey )
 180                                 {
 181                                 $masterkey = $keyname ;
 182                                 $masterkeyvalue = $value ;
 183                                 }
 184
 185                         $input = "" ;
 186                         $name = "dk[" . $keyname . "]" ;
 187
 188                         if ( count ( $z ) == 1 ) $z[] = "line" ; # Default
 189                         $type = strtolower ( $z[1] ) ;
 190                         if ( $type == "line" ) $input = "<input type=text style=\"width:100%\" name=\"{$name}\" value=\"{$value}\"></input>" ;
 191                         else if ( $type == "multiline" ) $input = "<textarea style=\"width:100%\" name=\"{$name}\">{$value}</textarea>" ;
 192                         else if ( $type == "number" ) $input = "<input type=int width=5 name=\"{$name}\" value=\"{$value}\"></input>" ;
 193                         else if ( $type == "date" ) $input = "<input type=date width=10 name=\"{$name}\" value=\"{$value}\"></input>" ;
 194                         else if ( $type == "dropdown" )
 195                                 {
 196                                 $s .= "<select name=\"{$name}\">" ;
 197                                 foreach ( $z AS $k => $v )
 198                                         {
 199                                         if ( htmlentities ( $value ) == $v ) $default = " selected" ;
 200                                         else $default = "" ;
 201                                         if ( $k > 1 ) $s .= "<option value=\"{$v}\"{$default}>{$v}</option>\n" ;
 202                                         }
 203                                 $s .= "</select>" ;
 204                                 }
 205                         if ( $isMasterKey AND $revision != "" ) $input = "<b>{$value}</b>" ;
 206
 207                         $s .= "{$input}" ;
 208                         $s .= $y[1] ;
 209                         }
 210                 else $s .= $x ;
 211                 }
 212         $s .= "<br>Comment : <input type='test' name='comment' value='{$comment}'></input>" ;
 213         $s .= " &nbsp; <input type='hidden' name='revision' value='{$revision}'></input>" ;
 214         $s .= "<input type='hidden' name='add_data' value='1'></input>" ;
 215         if ( $masterkey ) $s .= "<input type='hidden' name='masterkey' value='{$masterkey}'></input>" ;
 216         $s .= "<input type='hidden' name='data_type' value='{$dt}'></input>" ;
 217         $s .= "<input type=submit name='doit' value=\"Do it\"></input> " ;
 218         $s .= "<input type=submit name='preview' value=\"Preview\"></input>" ;
 219         $s .= "</form>" ;
 220
 221         $wgOut->AddHTML ( $s ) ;
 222         }
 223
 224
 225 function wfSpecialData()
 226 {
 227         global $wgUseData ;
 228         if ( !$wgUseData ) return "" ;
 229
 230         global $wgOut ;
 231         if ( isset ( $_GET['data_action'] ) ) $data_action = $_GET['data_action'] ;
 232         else $data_action = "" ;
 233         if ( isset ( $_POST['add_data'] ) ) $data_action = "add_data" ;
 234         if ( isset ( $_POST['view_data'] ) ) $data_action = "view_data" ;
 235         $nsdata = 20 ;
 236
 237         $last = "<hr><a href=\"index.php?title=Special:Data\">Back to data</a>" ;
 238
 239         if ( $data_action == "" )
 240                 {
 241                 $s = "" ;
 242
 243                 $s .= "<form method=post>" ;
 244                 $s .= "Data type " ;
 245                 $dbr =& wfGetDB( DB_SLAVE );
 246                 $sql = "SELECT cur_id,cur_title FROM cur WHERE cur_namespace={$nsdata}";
 247                 $res1 = $dbr->query( $sql, "wfSpecialData" );
 248                 $s .= "<select name='data_type'>\n" ;
 249                 while ( ( $o = $dbr->fetchObject( $res1 ) ) )
 250                         {
 251                         $s .= "<option>{$o->cur_title}</option>\n" ;
 252                         }
 253                 $s .= "</select><br>\n" ;
 254                 $s .= "<input type=submit name='add_data' value=\"Add data\"></input> " ;
 255                 $s .= "<input type=submit name='view_data' value=\"View data\"></input> " ;
 256                 $s .= "<br>\nTo add a new data type <i>Stuff</i>, edit the page <i>Data:Stuff</i>." ;
 257                 $s .= "</form>" ;
 258
 259                 $wgOut->AddHTML ( $s ) ;
 260                 $last = "" ;
 261                 }
 262         else if ( $data_action == "add_data" )
 263                 {
 264                 wfDataEdit ( $_POST['data_type'] ) ;
 265                 }
 266         else if ( $data_action == "view_data" )
 267                 {
 268                 wfDataView ( $_POST['data_type'] ) ;
 269                 }
 270
 271         if ( $last ) $wgOut->AddHTML ( $last ) ;
 272
 273         return "" ;
 274         }
 275
 276 ?>