Ferreteria/archive/menu.php: Difference between revisions

From Woozle Writes Code
Jump to navigation Jump to search
(2010-10-07 revision)
m (15 revisions imported: moving this project here)
 
(8 intermediate revisions by one other user not shown)
Line 1: Line 1:
==Examples==
Shows a set of toggles. Library code currently does not properly highlight active options.
<php>
global $vgPage;
$vgPage->UseHTML();
$objPage = new clsWikiFormatter($vgPage);
$objSection = new clsWikiSection_std_page($objPage,'Orders',3);
//$objSection->ArgsToKeep(array('show','page','id'));
$objSection->PageKeys(array('page','id'));
//$objSection->ToggleAdd('edit','edit the list of groups','edit.ctg');
$objLink = $objSection->AddLink_local(new clsWikiSectionLink_keyed(array('show.pulled'=>TRUE),'pulled'));
  $objLink->Popup('show pulled orders');
$objLink = $objSection->AddLink_local(new clsWikiSectionLink_keyed(array('show.shut'=>TRUE),'shut'));
  $objLink->Popup('show orders which have been closed');
$objLink = $objSection->AddLink_local(new clsWikiSectionLink_keyed(array('show.open'=>TRUE),'open'));
  $objLink->Popup('show orders which have not been completed');
$out = $objSection->Render();
/* check the flags */
if ($vgPage->Arg('show.open')) {
// ...and so on
</php>
Example from [[WorkFerret]] -- adds links like this: '''do''': [invoice] [new] | '''view''': [invoiced]
<php>
$arOpts = array('context'=>'session','do'=>NULL);
$objPage = new clsWikiFormatter($vgPage);
$objSection = new clsWikiSection_std_page($objPage,'Sessions',3);
$objSection->PageKeys(array('page','id','show.invoiced')); // add "show.invoiced" to the list of page-identifiers
$objLink = $objSection->AddLink(new clsWikiSection_section('do'));
$objLink = $objSection->AddLink_local(new clsWikiSectionLink_option($arOpts,'invc','do','invoice'));
  $objLink->Popup('create an invoice');
$objLink = $objSection->AddLink_local(new clsWikiSectionLink_option($arOpts,'new','do'));
  $objLink->Popup('create/edit new session');
$objLink = $objSection->AddLink(new clsWikiSection_section('view'));
$objLink = $objSection->AddLink_local(new clsWikiSectionLink_keyed(array(),'invoiced','show.invoiced'));
  $objLink->Popup('show invoiced sessions');
$out = $objSection->Render();
</php>
==Source==
<php><?php
<php><?php
/*
/*
LIBRARY: menu.php - a few classes for managing menus
  LIBRARY: menu.php - a few classes for managing menus
HISTORY:
  REQUIRES: richtext.php
  2009-08-09 Extracted from SpecialVbzAdmin.php
  HISTORY:
  2009-11-04 clsArgs
    2009-08-09 Extracted from SpecialVbzAdmin.php
  2010-02-20 clsWikiSection::SectionAdd(), ::ToggleAdd()
    2009-11-04 clsArgs
  2010-04-06  
    2010-02-20 clsWikiSection::SectionAdd(), ::ToggleAdd()
    * General reconciliation with edited non-dev version
    2010-04-06  
    * Done earlier but not logged here:
      * General reconciliation with edited non-dev version
      clsWikiSection::ArgsToAdd() (ported from other copy of menu.php)
      * Done earlier but not logged here:
      clsAdminTable, clsAdminData, clsAdminData_Logged, clsAdminEvents, clsAdminEvent
clsWikiSection::ArgsToAdd() (ported from other copy of menu.php)
  2010-10-06
clsAdminTable, clsAdminData, clsAdminData_Logged, clsAdminEvents, clsAdminEvent
    Reconciling with dev:
    2010-06-17 StartEvent() / FinishEvent() now keep the event ID in $this->idEvent
    * Minor improvements; split() is deprecated; small bugfixes
    2010-10-06
  2010-10-07 reconstructed clsDataSet::_AdminLink(), which apparently got lost during reconciliation
      Reconciling with dev:
      * Minor improvements; split() is deprecated; small bugfixes
    2010-10-07 reconstructed clsDataSet::_AdminLink(), which apparently got lost during reconciliation
    2010-10-17 Expanded SpecialPageApp::Args() to allow returning a limited set of arguments
    2013-01-04 clsDataSet isn't in this file, so why is the note about clsDataSet::_AdminLink() here?
    2013-06-02 fixed Values_forLink() - toggles on as well as off now
    2013-06-06 rework of menu link classes complete -- working now
  BUGS:
    2010-09-13 When there are multiple toggles, they don't preserve each other's states
      http://wiki.vbz.net/Special:VbzAdmin/page:order/id:4263/receipt -- "email" cancels out "receipt"
    2012-05-27 lots of tweaks and fixes and some new classes to replace old ones; see code comments
    2012-07-08 explicit prepping of mw.menus module
*/
*/
clsLibMgr::Add('mw.menus', KFP_MW_LIB.'/richtext.php',__FILE__,__LINE__);
  clsLibMgr::AddClass('clsHTML', 'mw.menus');
  clsLibMgr::AddClass('clsWikiText', 'mw.menus');
if (!defined('KS_CHAR_URL_ASSIGN')) {
    define('KS_CHAR_URL_ASSIGN',':'); // default
}
//if (!function_exists('clsMenu::WikiText')) {
//if (!function_exists('clsMenu::WikiText')) {
class clsMenu {
class clsMenu {
Line 23: Line 89:
     protected $Action;
     protected $Action;
     protected $Selected;
     protected $Selected;
    protected $isSubActive;


     public function __construct($iWikiPage) {
     public function __construct($iWikiPage) {
    $this->Page = $iWikiPage;
$this->Page = $iWikiPage;
$this->isSubActive = FALSE;
     }
     }
     public function WikiText($iAction) {
     public function WikiText($iAction) {
    $this->Action = $iAction;
$this->Action = $iAction;
    if (isset($this->AllNodes[$iAction])) {
if (isset($this->AllNodes[$iAction])) {
        $this->AllNodes[$iAction]->Activate();
    $this->AllNodes[$iAction]->Activate();
    }
    $this->isSubActive = TRUE;
    $out = $this->WikiText_SubMenu($iAction);
}
    return $out;
$out = $this->WikiText_SubMenu($iAction);
return $out;
     }
     }
     public function WikiText_SubMenu($iAction) {
     public function WikiText_SubMenu($iAction) {
    $out = NULL;
$out = NULL;
    foreach ($this->SubNodes as $objNode) {
foreach ($this->SubNodes as $objNode) {
        if (!is_null($out)) {
    if (!is_null($out)) {
        $out .= ' | ';
$out .= ' | ';
        }
    }
        $out .= $objNode->WikiText($iAction);
    $out .= $objNode->WikiText($iAction);
    }
}
    return $out;
return $out;
     }
     }
     public function Add(clsMenuNode $iNode) {
     public function Add(clsMenuNode $iNode) {
    $this->SubNodes[$iNode->Name] = $iNode;
$this->SubNodes[$iNode->Name] = $iNode;
    $this->Root()->AllNodes[$iNode->Name] = $iNode;
$this->Root()->AllNodes[$iNode->Name] = $iNode;
    $iNode->Parent = $this;
$iNode->Parent = $this;
     }
     }
     protected function Root() {
     protected function Root() {
    return $this;
return $this;
     }
     }
     protected function Activate() {    }   // do nothing
     protected function Activate() {    } // do nothing
     public function Execute() {
     public function Execute() {
    if (isset($this->Selected)) {
if (isset($this->Selected)) {
        $out = $this->Selected->DoAction();
    $out = $this->Selected->DoAction();
    } else {
} else {
        $out = NULL;
    $out = NULL;
}
return $out;
     }
     }
     return $out;
     /*----
      RETURNS: TRUE if the current input has activated a sub-menu
    */
    public function IsSubMenuActive() {
return $this->isSubActive;
     }
     }
}
}
Line 72: Line 147:


     public function __construct($iText, $iDo) {
     public function __construct($iText, $iDo) {
    $this->Name = $iDo;
$this->Name = $iDo;
    $this->Text = $iText;
$this->Text = $iText;
    $this->DoSpec = $iDo;
$this->DoSpec = $iDo;
     }
     }
     public function Root() {
     public function Root() {
    return $this->Parent->Root();
return $this->Parent->Root();
     }
     }
     abstract public function DoAction();
     abstract public function DoAction();
     protected function Activate() {
     protected function Activate() {
    $this->IsActive = TRUE;
$this->IsActive = TRUE;
    $this->Parent->Activate();
$this->Parent->Activate();
     }
     }
     public function WikiText($iAction) {
     public function WikiText($iAction) {
    $wtSelf = $this->Root()->Page;
$wtSelf = $this->Root()->Page;
    $wtItem = "[[$wtSelf/page".KS_CHAR_URL_ASSIGN."{$this->DoSpec}|{$this->Text}]]";
$wtItem = "[[$wtSelf/page".KS_CHAR_URL_ASSIGN."{$this->DoSpec}|{$this->Text}]]";
//   if ($iAction == $this->DoSpec) {
// if ($iAction == $this->DoSpec) {
    if ($this->IsActive) {
if ($this->IsActive) {
        $out = "'''$wtItem'''";
    $out = "'''$wtItem'''";
        $this->Root()->Selected = $this;
    $this->Root()->Selected = $this;
    } else {
} else {
        $out = $wtItem;
    $out = $wtItem;
    }
}
    return $out;
return $out;
     }
     }
}
}
Line 100: Line 175:
class clsMenuRow extends clsMenuNode {
class clsMenuRow extends clsMenuNode {
     public function DoAction() {
     public function DoAction() {
    $out = "<br>'''{$this->Text}''': ";
$out = "<br>'''{$this->Text}''': ";
    $out .= $this->WikiText_SubMenu($this->Root()->Action);
$out .= $this->WikiText_SubMenu($this->Root()->Action);
    return $out;
return $out;
     }
     }
}
}
Line 115: Line 190:
// Possibly this should be in a separate library
// Possibly this should be in a separate library
// 2010-02-20 ok, this is kind of stupid; just the usual array syntax is simple enough. Is any code using this?
// 2010-02-20 ok, this is kind of stupid; just the usual array syntax is simple enough. Is any code using this?
//   Currently ruling out SpecialVbzAdmin...
// Currently ruling out SpecialVbzAdmin...


class clsArgs {
class clsArgs {
Line 121: Line 196:


     public function __construct(array $iPairs=NULL) {
     public function __construct(array $iPairs=NULL) {
    if (!is_null($iPairs)) {
if (!is_null($iPairs)) {
        foreach ($iPairs as $key=>$val) {
    foreach ($iPairs as $key=>$val) {
        $this->Add($key,$val);
$this->Add($key,$val);
        }
    }
    }
}
     }
     }


     public function Add($iName, $iValue=NULL) {
     public function Add($iName, $iValue=NULL) {
    $this->arArgs[$iName] = $iValue;
$this->arArgs[$iName] = $iValue;
     }
     }
     public function Value($iName, $iValue=NULL) {
     public function Value($iName, $iValue=NULL) {
    if (!is_null($iValue)) {
if (!is_null($iValue)) {
        $this->arArgs[$iName] = $iValue;
    $this->arArgs[$iName] = $iValue;
    }
}
    if (isset($this->arArgs[$iName])) {
if (isset($this->arArgs[$iName])) {
        return $this->arArgs[$iName];
    return $this->arArgs[$iName];
    } else {
} else {
        return NULL;
    return NULL;
    }
}
     }
     }
}
}
// link-data functions
// link-data functions
/*----
  RETURNS: the part of the path *after* the specialpage name
  USED BY: SelfURL(), which is used by clsWikiSection:ActionAdd()
*/
function SelfLink_Path(array $iData) {
function SelfLink_Path(array $iData) {
     $out = '';
     $fp = '';
     foreach ($iData AS $key => $val) {
     foreach ($iData AS $key => $val) {
    if ($val !== FALSE) {
if ($val !== FALSE) {
        if ($val === TRUE) {
    if ($val === TRUE) {
        $out .= '/'.$key;
$fp .= '/'.$key;
        } else {
    } else {
        $out .= '/'.$key.KS_CHAR_URL_ASSIGN.$val;
$fp .= '/'.$key.KS_CHAR_URL_ASSIGN.$val;
        }
    }
    }
}
     }
     }
    $out = $fp;
     return $out;
     return $out;
}
}
function SelfLink_WT(array $iData,$iShow) {
function SelfLink_WT(array $iData,$iShow) {
     if (is_null($iShow)) {
     if (is_null($iShow)) {
    return NULL;
return NULL;
     } else {
     } else {
    $strPath = SelfLink_Path($iData);
$strPath = SelfLink_Path($iData);
    return '[[{{FULLPAGENAME}}'.$strPath.'|'.$iShow.']]';
return '[[{{FULLPAGENAME}}'.$strPath.'|'.$iShow.']]';
     }
     }
}
}
/* 2010-10-01 NEED TO KNOW who uses this, so I can fix it
function SelfLink_HTML(array $iData,$iShow,$iPopup=NULL) {
function SelfLink_HTML(array $iData,$iShow,$iPopup=NULL) {
     if (is_null($iShow)) {
     if (is_null($iShow)) {
    return NULL;
return NULL;
     } else {
     } else {
    $strPath = SelfLink_Path($iData);
$strPath = SelfLink_Path($iData);
    $htPopup = is_null($iPopup)?'':(' title="'.$iPopup.'"');
$htPopup = is_null($iPopup)?'':(' title="'.$iPopup.'"');
    return '<a href="'.$strPath.'"'.$htPopup.'>'.$iShow.'</a>';
return '<a href="'.$strPath.'"'.$htPopup.'>'.$iShow.'</a>';
     }
     }
}
}
*/
//}
//}
/* ####
  FUTURE: This could eventually be split into a general page-type and one
    which uses page/id for most pages
    Also, the different RichText classes are now dependent on their creator
      (e.g. this class) to pass them the right kind of base URL. Not sure
      how to fix the conceptual model.
*/
class SpecialPageApp extends SpecialPage {
class SpecialPageApp extends SpecialPage {
    // DYNAMIC
    protected $args; // URL arguments as an array
    private $arKeep; // arguments to preserve (in every menu item) from the current page
    private $arAdd; // arguments to add to every menu item
     protected $objRT_HTML,$objRT_Wiki;
     protected $objRT_HTML,$objRT_Wiki;


     public function __construct($iName) {
     public function __construct($iName='') {
    global $wgTitle,$wgUser;
//global $wgScriptPath;
    global $vgPage,$vgUserName;
global $vgMWLibPfx;
global $wgTitle,$wgUser;
global $vgUserName;
 
parent::__construct($iName);
// $vgPage = $this;
$vgUserName = $wgUser->getName();
$mwoTitleMe = $this->getTitle();
 
$wpBase = $this->BaseURL();
$wkBase = $mwoTitleMe->getPrefixedText();


     parent::__construct($iName);
$this->objRT_HTML = new clsHTML($wpBase);
    $vgPage = $this;
// $this->objRT_HTML = new clsHTML();
     $vgUserName = $wgUser->getName();
$this->objRT_Wiki = new clsWikiText($wkBase); // OMGkluge
    $objTitleMe = $this->getTitle();
$this->InitArKeep();
    $strFullName = $objTitleMe->getPrefixedText();
    }
     $this->objRT_HTML = new clsHTML($strFullName);
     /*----
    $this->objRT_Wiki = new clsWikiText($strFullName);
      PURPOSE: For some reason, parent::execute() resets $vgPage -- so we need to set it after that.
$vgPage was originally being set in __construct(), but that was getting overwritten.
      FUTURE: Make an application-object to hold $vgPage as a property, instead of having $vgPage as a global.
    */
    public function execute( $subPage ) {
global $vgPage;
 
parent::execute($subPage);
$vgPage = $this;
     }
    /*----
      RETURNS: URL of basic Special page with no URL arguments
    */
    public function BaseURL() {
$mwoTitle = $this->getTitle();
$wp = $mwoTitle->getFullURL();
return $wp;
    }
     protected function InitArKeep() {
$this->arKeep = array('page','id');
     }
     }
     public function UseHTML() {
     public function UseHTML() {
    global $vgOut;
global $vgOut;


    $vgOut = $this->objRT_HTML;
$vgOut = $this->objRT_HTML;
     }
     }
     public function UseWiki() {
     public function UseWiki() {
    global $vgOut;
global $vgOut;


    $vgOut = $this->objRT_Wiki;
$vgOut = $this->objRT_Wiki;
     }
     }
/*
     public function RichTextObj() {
     public function RichTextObj() {
    return $vgOut;
return $vgOut;
     }
     }
*/
    /*----
    ACTION: Parses variable arguments from the URL
      The URL is formatted as a series of arguments /arg:val/arg:val/..., so that we can always refer directly
to any particular item as a wiki page title while also not worrying about hierarchy/order.
An arg can also appear without a val (/arg/...), in which case it is treated as a flag set to TRUE.
    */
     protected function GetArgs($par) {
     protected function GetArgs($par) {
 
$args_raw = preg_split('/\//',$par);
/*
foreach($args_raw as $arg_raw) {
PURPOSE: Parses variable arguments from the URL
    if (strpos($arg_raw,KS_CHAR_URL_ASSIGN) !== FALSE) {
  The URL is formatted as a series of arguments /arg=val/arg=val/..., so that we can always refer directly
list($key,$val) = preg_split('/'.KS_CHAR_URL_ASSIGN.'/',$arg_raw);
    to any particular item as a wiki page title while also not worrying about hierarchy/order.
$this->args[$key] = $val;
*/
    } else {
//    $args_raw = split('/',$par);    // split() is deprecated
$this->args[$arg_raw] = TRUE;
    $args_raw = preg_split('/\//',$par);
    }
    foreach($args_raw as $arg_raw) {
}
        if (strpos($arg_raw,KS_CHAR_URL_ASSIGN) !== FALSE) {
      //        list($key,$val) = split(KS_CHAR_URL_ASSIGN,$arg_raw);    // split() is deprecated
        list($key,$val) = preg_split('/'.KS_CHAR_URL_ASSIGN.'/',$arg_raw);
        $this->args[$key] = $val;
        } else {
        $this->args[$arg_raw] = TRUE;
        }
     }
     }
    /*----
      RETURNS: array of all arguments found in URL,
or just the arguments listed in $iList
    */
    public function Args(array $iList=NULL) {
if (is_array($iList)) {
    foreach ($iList as $name) {
$arOut[$name] = $this->Arg($name);
    }
    return $arOut;
} else {
    return $this->args;
}
     }
     }
     /*----
     /*----
       RETURNS: Value of a single argument passed to this page in its URL
       RETURNS: value of single specified argument from URL
      HISTORY:
2012-02-26 changed default return from FALSE to NULL
  NULL is easier to test for.
     */
     */
     public function Arg($iName) {
     public function Arg($iName) {
    if (isset($this->args[$iName])) {
if (isset($this->args[$iName])) {
        return $this->args[$iName];
    return $this->args[$iName];
     } else {
} else {
        return FALSE;
    return NULL;
}
    }
 
    /*====
      SECTION: link generation
      HISTORY:
2011-03-30 adapted from clsWikiSection to SpecialPageApp
    */
    public function ArgsToKeep(array $iKeep) {
$this->arKeep = $iKeep;
    }
    public function ArgsToAdd(array $iAdd) {
$this->arAdd = $iAdd;
     }
    public function ArrayCheck(array $iarCheck) {
if (is_array($this->arAdd)) {
    $arOut = array_unique(array_merge($iarCheck,$this->arAdd));
} else {
    $arOut = $iarCheck;
}
return $arOut;
     }
     }
    public function SelfArray() {
$arLink = array();
if (is_array($this->arKeep)) {
    foreach ($this->arKeep as $key) {
$arLink[$key] = $this->Arg($key);
    }
}
return $this->ArrayCheck($arLink);
     }
     }
     /*----
     /*----
      RETURNS: Array of all the arguments passed to the current page in its URL
    */
    public function Args() {
    return $this->args;
    }
    /*=====
       RETURNS: Just the path after the page name, not the whole wiki title
       RETURNS: Just the path after the page name, not the whole wiki title
      USED BY: $this->SelfURL()
     */
     */
     private function SelfLink_Path(array $iAdd) {
     private function SelfLink_Path(array $iAdd) {
    $arData = $this->args;
$arData = $this->args;
    foreach ($iAdd AS $key => $val) {
foreach ($iAdd AS $key => $val) {
        $arData[$key] = $val;   // override any matching keys
    $arData[$key] = $val; // override any matching keys
}
return SelfLink_Path($arData);
     }
     }
     return SelfLink_Path($arData);
     /*----
      USED BY: clsWikiSection::ActionAdd
    */
    public function SelfURL(array $iAdd=NULL,$iClear=TRUE) {
$arAddSave = $this->arAdd;
$this->arAdd = $iAdd;
$arLink = $this->SelfArray();
// this looks OK
//echo 'ARLINK:<pre>'.print_r($arLink,TRUE).'</pre>';
$wpPath = $this->SelfURL_calc($arLink,$iClear);
// problem happens there ^
//echo 'WPPATH=['.$wpPath.']';
$this->arAdd = $arAddSave;
return $wpPath;
     }
     }
     /*=====
     /*----
      NOTE: This has only been tested with SpecialPages; in theory it could be used on regular pages
    */
    static public function URL_fromArray(array $iArgs) {
global $wgTitle;
global $wgScriptPath;
 
$strPath = SelfLink_Path($iArgs); // the part after the page name
return $wgScriptPath.'/'.$wgTitle->getPrefixedText().$strPath;
    }
    /*----
       RETURNS: Relative path, ready for use in an href
       RETURNS: Relative path, ready for use in an href
      USED BY: clsWikiSection:ActionAdd()
      HISTORY:
2011-03-30 renamed from SelfURL() to SelfURL_calc()
2012-02-24 dropped use of $wgScriptPath, because it doesn't work with MW1.18; rewrote path calculation.
     */
     */
     public function SelfURL(array $iAdd=NULL,$iClear=FALSE) {
     protected function SelfURL_calc(array $iAdd=NULL,$iClear=FALSE) {
    global $wgTitle, $wgScriptPath;
global $wgTitle;


    if (is_array($iAdd)) {
if (is_array($iAdd)) {
        if ($iClear) {
    if ($iClear) {
        $strPath = SelfLink_Path($iAdd);
$strPath = SelfLink_Path($iAdd);
        } else {
    } else {
        $strPath = $this->SelfLink_Path($iAdd);
$strPath = $this->SelfLink_Path($iAdd);
        }
    }
    } else {
} else {
        $strPath = '';
    $strPath = '';
}
//$wpPrefix = $wgTitle->getPrefixedText();
//$wpPrefix = $this->getName();
$mwoTitle = $this->getTitle();
$wpPrefix = $mwoTitle->getFullURL();
return $wpPrefix.$strPath;
    }
    // DEPRECATED
    public function SelfLink_WT(array $iAdd, $iShow) {
$arData = $this->args;
foreach ($iAdd AS $key => $val) {
    $arData[$key] = $val; // override any matching keys
}
$out = SelfLink_WT($arData,$iShow);
return $out;
    }
/* 2010-10-01 NEED TO KNOW who uses this, so I can fix it
    public function SelfLink_HTML(array $iAdd, $iShow, $iClear=FALSE, $iPopup=NULL) {
$urlPath = $this->SelfURL($iAdd,$iClear);
$htPopup = is_null($iPopup)?'':(' title="'.$iPopup.'"');
$out = '<a href="'.$urlPath.'"'.$htPopup.'>'.$iShow.'</a>';
return $out;
     }
     }
     return $wgScriptPath.'/'.$wgTitle->getPrefixedText().$strPath;
*/
    /*----
      USED BY: VbzAdminOrder.DoSetup()
    */
     public function SelfLink(array $iAdd, $iShow, $iPopup=NULL) {
global $vgOut;
 
$arData = $this->args;
foreach ($iAdd AS $key => $val) {
    $arData[$key] = $val; // override any matching keys
}
$out = $vgOut->SelfLink($arData,$iShow,$iPopup);
return $out;
     }
     }
     public function SelfLink_WT(array $iAdd, $iShow) {
    /*----
    $arData = $this->args;
      ACTION: Displays a mini-menu from a list of possible values
    foreach ($iAdd AS $key => $val) {
      INPUT:
        $arData[$key] = $val;   // override any matching keys
$iArgName: name of argument whose value changes with each choice
$iValues: array containing prefix-delimited list of data for each choice:
  iValue[URL value] = "\display value\popup text"
    */
     public function SelfLinkMenu($iArgName,array $iValues,$iCur=NULL) {
global $vgOut;
 
$strCur = (is_null($iCur))?$this->Arg($iArgName):$iCur;
 
$objStr = new xtString;
$strArg = $iArgName;
$out = '';
foreach ($iValues as $strURL => $xtData) {
    $objStr->Value = $xtData;
    $arVal = $objStr->Xplode();
    $strDisp = $arVal[0];
    $strPop = $arVal[1];
    $arAdd[$strArg] = $strURL;
    $isSel = ($strURL == $strCur);
    $out .= $vgOut->Selected($isSel,'[ '.$this->SelfLink($arAdd,$strDisp,$strPop).' ]');
}
return $out;
     }
     }
     $out = SelfLink_WT($arData,$iShow);
     /*----
    return $out;
      INPUT:
iarClassNames: array of names of classes to load
    */
    public function RegObjs(array $iarClassNames) {
foreach ($iarClassNames as $strCls) {
    $tbl = $this->DB()->Make($strCls);
    $strAct = $tbl->ActionKey();
    $arTbls[$strAct] = $tbl;
}
$this->arTbls = $arTbls;
     }
     }
     public function SelfLink_HTML(array $iAdd, $iShow, $iClear=FALSE, $iPopup=NULL) {
     /*----
    $urlPath = $this->SelfURL($iAdd,$iClear);
      ACTION: handles arguments embedded in the URL
    $htPopup = is_null($iPopup)?'':(' title="'.$iPopup.'"');
      REQUIRES: classes must be registered in $this->arTbls (use $this->RegObjs())
    $out = '<a href="'.$urlPath.'"'.$htPopup.'>'.$iShow.'</a>';
      HISTORY:
    return $out;
2011-10-15 moved here from SpecialVbzAdmin.php and renamed from doAdminLookup() to HandlePageArgs()
    */
    protected function HandlePageArgs() {
if (isset($this->args['page'])) {
    $page = $this->args['page'];
} else {
    $page = NULL;
}
 
$idObj = NULL;
$doObj = FALSE;
$doNew = FALSE;
if (!is_null($page)) {
    if (isset($this->args['id'])) {
$doObj = TRUE;
$idObj = $this->args['id'];
if ($idObj == 'new') {
// an ID of NULL tells GetItem() to create a new object rather than loading an existing record
    $idObj = NULL;
    $doNew = TRUE;
}
    }
}
$this->page = $page;
$this->doObj = $doObj;
$this->idObj = $idObj;
 
$tbl = NULL;
$obj = NULL;
if (array_key_exists($page,$this->arTbls)) {
    $tbl = $this->arTbls[$page];
    if ($doObj) {
$obj = $tbl->GetItem($idObj);
if (!$doNew && $obj->IsNew()) {
    $out = '<b>Internal Error</b>: Record was expected, but none found. Check the URL.';
    $out .= '<ul>';
    $out .= '<li><b>requested ID</b>: '.$idObj;
    global $sql;
    $out .= '<li><b>SQL used</b>: '.$sql;
    $out .= '<li><b>Table class</b>: '.get_class($tbl);
    $out .= '<li><b>Record class</b>: '.get_class($obj);
    $out .= '</ul>';
 
    echo $out; $out=NULL;
    throw new exception('Expected record was not found.');
}
 
if (method_exists($obj,'PageTitle')) {
    $this->SetTitle($obj->PageTitle());
}
    } else {
if (method_exists($tbl,'PageTitle')) {
    $this->SetTitle($tbl->PageTitle());
}
    }
}
$this->tbl = $tbl;
$this->obj = $obj;
     }
     }
}
}
/*==========
/*==========
   DATA CLASSES
| FORM CLASSES
| Trying not to be too ambitious at first, but eventually could be separate library file
*/
class clsWikiFormatter {
    private $mwoPage;
 
    public function __construct(SpecialPageApp $iPage) {
$this->mwoPage = $iPage;
    }
    public function Page() {
return $this->mwoPage;
    }
}
/*%%%%
   PURPOSE: revised clsWikiSection, taking into account usability lessons learned
    and implementing a more flexible link design.
*/
*/
class clsAdminTable extends clsTable {
class clsWikiSection2 {
     public function ActionKey($iName=NULL) {
    private $objFmt; // page-formatter object
     if (!is_null($iName)) {
    private $arMenu; // array of menu objects
        $this->ActionKey = $iName;
    private $arPage; // page keys array
    private $strTitle; // title of section - for display
    private $intLevel; // indentation level of section
 
     public function __construct(clsWikiFormatter $iFmt,$iTitle,$iLevel=2) {
$this->objFmt = $iFmt;
$this->strTitle = $iTitle;
$this->intLevel = $iLevel;
$this->arMenu = NULL;
$this->arPage = NULL;
    }
    /*----
      ACTION: set the list of keys that represent the current page spec.
Preserving these keys will keep the user on the current page even if other data changes.
    */
    public function PageKeys(array $arKeys=NULL) {
if (!is_null($arKeys)) {
    $this->arPage = $arKeys;
}
return $this->arPage;
    }
    /*----
      RETURNS: array representing page-defining data (but not all URL values)
    */
     public function PageData($iKey=NULL) {
$arArgs = $this->PageVals();
 
if (is_null($iKey)) {
    // return array of values for all the keys that identify the page
    foreach ($this->arPage as $idx => $key) {
if (array_key_exists($key,$arArgs)) {
    // 2012-05-27 this seems to happen when a key is defined but not used in some circumstance
    $arOut[$key] = $arArgs[$key];
}
    }
    return $arOut;
} else {
    return NzArray($arArgs,$iKey);
}
    }
    public function PageVals() {
$objPage = $this->objFmt->Page();
return $objPage->Args();
    }
    public function AddLink(clsWikiSectionWidget $iLink) {
$this->arMenu[] = $iLink; // add Link to list of Links
$iLink->Section($this); // pass Link a pointer back to $this
return $iLink;
    }
    /*----
      PURPOSE: add a link to do something on the current page -- preserve page-significant data
    */
    public function AddLink_local(clsWikiSectionLink_base $iLink) {
$this->AddPageDefaults_toLink($iLink);
$this->AddLink($iLink);
return $iLink;
    }
    /*----
      PURPOSE: add a link that preserves all other URL data (preserves the state of the page)
    */
    public function AddLink_state(clsWikiSectionLink $iLink) {
$this->AddPageValues_toLink($iLink);
$this->AddLink($iLink);
return $iLink;
    }
    public function AddPageDefaults_toLink(clsWikiSectionLink_base $iLink) {
$iLink->Values_default($this->PageData());
    }
    public function AddPageValues_toLink(clsWikiSectionLink $iLink) {
$iLink->Values_default($this->PageVals());
    }
    public function Render() {
$tag = 'h'.$this->intLevel;
$title = $this->strTitle;
$out = "\n<div class=\"mw-content-ltr\"><$tag>";
if (is_array($this->arMenu)) {
    $arMenu = array_reverse($this->arMenu); // right-alignment reverses things
    foreach ($arMenu as $objLink) {
$out .= $objLink->Render();
    }
}
$out .= "\n$title</$tag></div>";
return $out;
     }
     }
     return $this->ActionKey;
     public function FormOpen() {
$oForm = new clsWikiSectionForm($this->PageData());
return $oForm->Render();
     }
     }
}
}
class clsAdminData extends clsDataSet {
class clsWikiSection_std_page extends clsWikiSection2 {
//=====
     public function __construct(clsWikiFormatter $iFmt,$iTitle,$iLevel=2) {
// STATIC section
parent::__construct($iFmt,$iTitle,$iLevel);
     public static function _AdminLink(clsDataSet $iThis,$iText=NULL,$iPopup=NULL,array $iarArgs=NULL) {
$this->PageKeys(array('page','id'));
     global $vgOut;
    }
}
/*%%%%
  PURPOSE: abstract handler for stuff that might go in the action/link area of a section header
*/
abstract class clsWikiSectionWidget {
     protected $objSect; // section object
    private $strPopup; // popup text (if any)


     $txtShow = is_null($iText)?($iThis->ID):$iText;
     /*----
     if (isset($iThis->Table->ActionKey)) {
      ACTION: render the link
        $strKey = $iThis->Table->ActionKey;
    */
    } else {
    abstract public function Render();
        $strKey = $iThis->Table->Name();
 
    public function Popup($iPopup=NULL) {
if (!is_null($iPopup)) {
    $this->strPopup = $iPopup;
}
return $this->strPopup;
     }
    public function Section(clsWikiSection2 $iSection=NULL) {
if (!is_null($iSection)) {
    $this->objSect = $iSection;
}
return $this->objSect;
     }
     }


     $arLink = $iarArgs;
}
     $arLink = array(
abstract class clsWikiSectionLink_base extends clsWikiSectionWidget {
      'page'    => $strKey,
     protected $arData; // key:value pairs to always include in link
      'id'        => $iThis->KeyValue());
 
    $out = $vgOut->SelfLink($arLink,$txtShow,$iPopup);
     public function __construct(array $iarData) {
    return $out;
$this->arData = $iarData;
     }
     }
//=====
    /*----
// DYNAMIC section
      RETURNS: URL for this link
     public function AdminLink($iText=NULL,$iPopup=NULL,$iArArgs=NULL) {
    */
    $out = self::_AdminLink($this,$iText,$iPopup,$iArArgs);
     public function SelfURL() {
    return $out;
global $vgOut;
/*
    global $vgOut;


    $txtShow = is_null($iText)?($this->ID):$iText;
$ar = $this->Values_forLink();
    if (isset($this->Table->ActionKey)) {
return $vgOut->SelfURL($ar);
        $strKey = $this->Table->ActionKey;
    } else {
        $strKey = $this->Table->Name();
     }
     }


     $arLink = array(
     abstract protected function Values_forLink();
       'page'    => $strKey,
    /*----
      'id'        => $this->KeyValue());
       ACTION: sets a bunch of values to be used as defaults
    $out = $vgOut->SelfLink($arLink,$txtShow,$iPopup);
if there is not already a value for each key.
    return $out;
    */
    public function Values_default(array $iarValues) {
foreach ($iarValues as $key => $val) {
    $this->arData[$key] = NzArray($this->arData,$key,$val);
}
    }
    public function Values(array $iValues=NULL) {
if (!is_null($iValues)) {
    $this->arData = $iValues;
}
return $this->arData;
    }
    public function Value($iKey,$iVal=NULL) {
if (!is_null($iVal)) {
    $this->arData[$iKey] = $iVal;
}
return $this->arData[$iKey];
    }
}
/*%%%%
  PURPOSE: handles a single action-link (e.g. [edit]) on a section header
  TODO: This should be renamed; it's a particular type of link, possibly obsolete.
*/
*/
abstract class clsWikiSectionLink extends clsWikiSectionLink_base {
    protected $strDisp; // text to display
    /*----
      INPUT:
iarData = list of URL values to always preserve
iDisp = text to display
    */
    public function __construct(array $iarData,$iDisp) {
parent::__construct($iarData);
$this->strDisp = $iDisp;
$this->objSect = NULL;
$this->strPopup = NULL;
$this->isActive = FALSE;
    }
    protected function DisplayText() {
return $this->strDisp;
     }
     }
}
    /*----
abstract class clsAdminData_Logged extends clsAdminData {
      RETURNS: TRUE if the current URL causes this link to be selected
     abstract protected function Events();       // RETURNS a clsAdminEvents object
May also return a value rather than TRUE/FALSE.
     public function StartEvent(array $iarArgs) {
    */
    $arArgs = $iarArgs;
     abstract public function Selected();
    $arArgs['type'] = $this->Table->ActionKey;
    /*----
    $arArgs['id'] = $this->KeyValue();       // was: $this->ID
      RETURNS: array of link's values, adjusted as needed for link behavior
    return $this->Events()->StartEvent($arArgs);
i.e. if link should toggle OFF, then the appropriate array value
is set FALSE.
      VERSION: removes key from link if it is currently active
This originally just returned $this->Values()
It may be that this class should do that, and we need
  a clsWikiSectionLink_toggle to do what this one does now.
    */
     protected function Values_forLink() {
$ar = $this->Values();
 
$key = $this->Key();
$ar[$key] = !$this->Selected();
     
return $ar;
     }
     }
     public function FinishEvent($iEvent,array $iarArgs=NULL) {
    /*----
    $this->Events()->FinishEvent($iEvent,$iarArgs);
      ACTION: render the link
    */
     public function Render() {
 
$ftURL = $this->SelfURL();
 
$htPopup = htmlspecialchars($this->strPopup);
$htDispl = htmlspecialchars($this->DisplayText());
 
$isActive = $this->Selected();
$htFmtOpen = $isActive?'<b>':'';
$htFmtShut = $isActive?'</b>':'';
 
// $out = '<div class="mw-content-ltr"><span class="editsection">';
$out = '<span class="editsection">';
$out .= $htFmtOpen.'[';
$out .= '<a href="'.$ftURL.'" title="'.$htPopup.'">'.$htDispl.'</a>';
$out .= ']'.$htFmtShut;
// $out .= '</span></div>';
$out .= '</span>';
 
return $out;
     }
     }
}
}
/*==========
/*%%%%
EVENT LOGGING
  PURPOSE: handles links that have a "key", i.e. a particular identifying piece of data.
This was written to work with FinanceFerret, but should be compatible with standard event tables.
    Default behavior is to treat this like a toggle.
   Any app-specific code should be moved out into descendant classes.
   DEPRECATED - use clsWikiSectionLink_option
*/
*/
class clsAdminEvents extends clsAdminTable {
class clsWikiSectionLink_keyed extends clsWikiSectionLink {
     public function __construct($iDB) {
    protected $strKey;
    assert('is_object($iDB)');
 
    // these defaults are all overridable - must match actual event table schema
    /*----
    parent::__construct($iDB);
      INPUT:
      $this->Name('event');
iarData: not sure... other stuff to always appear in URL, probably
      $this->KeyName('ID');
iDisp: text to display for link
      $this->ClassSng('clsAdminEvent');   // override parent
iKey: key to look up in URL to see if link is activated
      $this->ActionKey('event');
    */
     public function __construct(array $iarData,$iDisp,$iKey=NULL) {
parent::__construct($iarData,$iDisp);
$this->strKey = is_null($iKey)?$iDisp:$iKey;
$this->isSelected = NULL;
     }
     }
     public function ListPage() {
     public function Key($iKey=NULL) {
    global $wgOut;
if (!is_null($iKey)) {
 
    $this->strKey = $iKey;
    $objRow = $this->GetData(NULL,NULL,'ID DESC');
}
    if ($objRow->hasRows()) {
return $this->strKey;
        $out = $objRow->AdminRows();
    } else {
        $out = 'No events logged yet.';
     }
     }
     $wgOut->addWikiText($out,TRUE);
     public function Selected() {
$key = $this->Key();
$val = $this->objSect->PageData($key);
return $val;
     }
     }
     /*-----
}
      RETURNS: event arguments translated into field names for use in Insert()
/*%%%%
       NOTE: Shouldn't this method be static?
  PURPOSE: handles a form within a section.
    Right now, it actually just handles the opening form tag.
  USAGE: created internally by section object; not added to list
*/
class clsWikiSectionForm extends clsWikiSectionLink_base {
     /*----
       ACTION: render the form
     */
     */
     private function CalcSQL($iArgs) {
     public function Render() {
    if (is_null($iArgs)) {
$out = '<form method=post action="'.$this->SelfURL().'">';
        return NULL;
return $out."\n";
    } else {
        foreach ($iArgs as $key=>$val) {
        switch ($key) {
          case 'descr':
            $sqlKey = 'Descr';
            $sqlVal = SQLValue($val);
            break;
          case 'notes':
            $sqlKey = 'Notes';
            $sqlVal = SQLValue($val);
            break;
          case 'type':
            $sqlKey = 'ModType';
            $sqlVal = SQLValue($val);
            break;
          case 'id':
            $sqlKey = 'ModIndex';
            $sqlVal = SQLValue($val);    // can be NULL
            break;
          case 'where':
            $sqlKey = 'EvWhere';
            $sqlVal = SQLValue($val);
            break;
          case 'code':
            $sqlKey = 'Code';
            $sqlVal = SQLValue($val);
            break;
          case 'error':
            $sqlKey = 'isError';
            $sqlVal = SQLValue($val);
            break;
          case 'severe':
            $sqlKey = 'isSevere';
            $sqlVal = SQLValue($val);
            break;
        }
        $arIns[$sqlKey] = $sqlVal;
        }
        return $arIns;
     }
     }
    protected function Values_forLink() {
return $this->Values();
     }
     }
    /*-----
}
      ACTION: Logs an event from specs in an array
/*%%%%
      INPUT: Array containing any of the following elements:
  PURPOSE: handles a group of links where only one link in the group can be activated at one time
     'descr': description of event
     If no group key is specified, each link acts like a toggle.
    'type': type of event (one of the kType* class constants)
  USAGE: added by caller
     'id': ID of row in table corresponding to event type
*/
    'where': location in code where event is taking place (usually __METHOD__ will do)
class clsWikiSectionLink_option extends clsWikiSectionLink_base {
    'code': event code unique to type
    protected $sLKey; // link key
    'error' (value ignored): if present, event represents an error
    protected $sGKey; // link group key
    'severe' (value ignored): if present, event represents a severe error
    protected $sDi0; // display when not activated
    protected $sDi1; // display when activated
     /*----
      INPUT:
iarData: other stuff to always appear in URL, regardless of section's menu state
iLinkKey: value that the group should be set to when this link is activated
iGroupKey: group's identifier string in URL (.../iGroupKey:iLinkKey/...)
  if NULL, then there is no group key, and presence of link key (.../iLinkKey/...) is a flag
iDispOff: text to display when link is not activated - defaults to iLinkKey
iDispOn: text to display when link is activated - defaults to iDispOff
     */
     */
     public function StartEvent(array $iArgs) {
     public function __construct(array $iarData,$iLinkKey,$iGroupKey=NULL,$iDispOff=NULL,$iDispOn=NULL) {
    global $vgUserName;
parent::__construct($iarData);
 
$this->sGKey = $iGroupKey;
    $arIns = $this->CalcSQL($iArgs);
$this->sLKey = $iLinkKey;
    if (empty($arIns)) {
$this->sDi0 = is_null($iDispOff)?$iLinkKey:$iDispOff;
        return NULL;
$this->sDi1 = is_null($iDispOn)?$this->sDi0:$iDispOn;
     } else {
    }
        $arIns['WhenStarted'] = 'NOW()';
    protected function LinkKey() {
        $arIns['WhoNetwork'] = SQLValue($_SERVER['REMOTE_ADDR']);
return $this->sLKey;
        $arIns['WhoAdmin'] = SQLValue($vgUserName);
     }
     //echo '<pre>'.print_r($arIns,TRUE).'</pre>'; die();
    protected function GroupKey() {
        $ok = $this->Insert($arIns);
return $this->sGKey;
        if ($ok) {
    }
        return $this->objDB->NewID(__METHOD__);
    protected function HasGroup() {
        } else {
return !is_null($this->GroupKey());
        return NULL;
     }
        }
    protected function GroupVal() {
$gk = $this->GroupKey(); // key for link's group
return $this->objSect->PageData($gk); // return group's current value
     }
     }
    public function Selected() {
$lk = $this->LinkKey(); // key for this link
if ($this->HasGroup()) {
    $gv = $this->GroupVal(); // current group value
    return ($gv==$lk); // does group value match link key?
} else {
    return $this->objSect->PageData($lk); // return TRUE iff link key exists in URL
}
     }
     }
     public function FinishEvent($iEvent,array $iArgs=NULL) {
     protected function DisplayText() {
    if (is_array($iArgs)) {
if ($this->Selected()) {
        $arUpd = $this->CalcSQL($iArgs);
    return $this->sDi1;
        //$arUpd = array_merge($arUpd,$iArgs);
} else {
    return $this->sDi0;
}
     }
     }
     $arUpd['WhenFinished'] = 'NOW()';
     /*----
    $this->Update($arUpd,'ID='.$iEvent);
      RETURNS: array of link's values, adjusted as needed for link behavior
i.e. if link should toggle OFF, then the appropriate array value
is set FALSE.
      VERSION:
if there is a group key:
  if selected, sets group key FALSE to remove it from URL
  if NOT selected, sets group key to link key
if there is NO group key:
  if selected, sets link key FALSE to remove it from URL
  if NOT selected, sets link key TRUE to put it in the URL
    */
    protected function Values_forLink() {
$ar = $this->Values();
 
$lk = $this->LinkKey();
if ($this->HasGroup()) {
    $gk = $this->GroupKey();
    if ($this->Selected()) {
$ar[$gk] = FALSE;
    } else {
$ar[$gk] = $lk;
    }
} else {
    $ar[$lk] = !$this->Selected();
}
     
return $ar;
     }
     }
}
class clsAdminEvent extends clsAdminData {
     /*----
     /*----
       ASSUMES: there are rows (caller should check this)
       ACTION: render the link
     */
     */
     public function AdminRows() {
     public function Render() {
    $htUnknown = '<span style="color: #888888;">?</span>';
    $out = "{|";
    $out .= "\n|-\n! ID || Start || Finish || Who/How || Where";
//        $out .= "\n|-\n!    || colspan=5 | Description";
    $isOdd = TRUE;
    $strDateLast = NULL;
    $objRow = $this;
    while ($objRow->NextRow()) {
        $wtStyle = $isOdd?'background:#ffffff;':'background:#eeeeee;';
        $isOdd = !$isOdd;


        $row = $objRow->Row;
$ftURL = $this->SelfURL();


        $strSysUser    = $row['WhoAdmin'];
$htPopup = htmlspecialchars($this->Popup());
        $strVbzUser    = $row['WhoSystem'];
$htDispl = htmlspecialchars($this->DisplayText());
        $strMachine    = $row['WhoNetwork'];
        $htSysUser    = is_null($strSysUser)?$htUnknown:$strSysUser;
        $htMachine    = is_null($strMachine)?$htUnknown:$strMachine;
        $htVbzUser    = is_null($strVbzUser)?$htUnknown:$strVbzUser;


        $ftDescr    = $row['Descr'];
$isActive = $this->Selected();
        $strNotes    = $row['Notes'];
$htFmtOpen = $isActive?'<b>':'';
$htFmtShut = $isActive?'</b>':'';


        $id        = $row['ID'];
// $out = '<div class="mw-content-ltr"><span class="editsection">';
        $strWhenSt    = $row['WhenStarted'];
$out = '<span class="editsection">';
        $strWhenFi    = $row['WhenFinished'];
$out .= $htFmtOpen.'[';
        $strWhere    = $row['EvWhere'];
$out .= '<a href="'.$ftURL.'" title="'.$htPopup.'">'.$htDispl.'</a>';
        $htWho        = $htVbzUser.'/'.$htSysUser.'@'.$htMachine;
$out .= ']'.$htFmtShut;
        $strParams    = $row['Params'];
// $out .= '</span></div>';
$out .= '</span>';


        $dtWhenSt    = strtotime($strWhenSt);
return $out;
        $dtWhenFi    = strtotime($strWhenFi);
        $strDate    = date('Y-m-d',empty($dtWhenSt)?$dtWhenFi:$dtWhenSt);
        $strTimeSt = empty($dtWhenSt)?'':date('H:i',$dtWhenSt);
        $strTimeFi = empty($dtWhenFi)?'':date('H:i',$dtWhenFi);
        if ($strDate != $strDateLast) {
        $strDateLast = $strDate;
        $out .= "\n|- style=\"background: #444466; color: #ffffff;\"\n| colspan=5 | '''$strDate'''";
        }
       
        $out .= "\n|- style=\"$wtStyle\"";
        $out .= "\n| $id || $strTimeSt || $strTimeFi || $htWho || <small>$strWhere</small>";
        if (!empty($ftDescr)) {
        $out .= "\n|- style=\"$wtStyle\"";
        $out .= "\n|    || colspan=5 | '''What''': $ftDescr";
        }
        if (!empty($strParams)) {
        $out .= "\n|- style=\"$wtStyle\"";
        $out .= "\n|    || colspan=5 | '''Params''': $strParams";
        }
        if (!empty($strNotes)) {
        $out .= "\n|- style=\"$wtStyle\"";
        $out .= "\n|    || colspan=5 | '''Notes''': ''$strNotes''";
        }
     }
     }
     $out .= "\n|}";
}
    return $out;
/*%%%%
  PURPOSE: handles links that express possible values of a single key
  DEPRECATED: Does anything use this successfully?
    clsWikiSectionLink_option is a rewrite to provide the same functionality.
*/
class clsWikiSectionLink_choice extends clsWikiSectionLink_keyed {
     public function Selected() {
$key = $this->Key();
$valPage = parent::Selected();
$valLink = $this->Value($key);
return $valPage == $valLink;
     }
     }
}
}
 
/*%%%%
/*==========
  PURPOSE: handles link-area subsections (static text)
| FORM CLASSES
| Trying not to be too ambitious at first, but eventually could be separate library file
*/
*/
class clsWikiFormatter {
class clsWikiSection_section extends clsWikiSectionWidget {
     private $mwoPage;
     protected $strDisp;


     public function __construct(SpecialPageApp $iPage) {
     public function __construct($iDisp) {
     $this->mwoPage = $iPage;
$this->strDisp = $iDisp;
     }
    public function Render() {
$out = '<span class="editsection">';
$out .= '| <b>'.$this->strDisp.'</b>:';
$out .= '</span>';
return $out;
     }
     }
     public function Page() {
}
     return $this->mwoPage;
 
/*
class clsWikiSectionLink_bool {
     public function __construct(array $iarData,$iDisp=NULL,$iPopup=NULL,$iKey=NULL) {
     public function Selected($iOn=NULL) {
if (!is_null($iOn)) {
    $isActive = !empty($arLink['active']) || $arLink['isdef'];
}
return NzArray($this->arData,'active');
     }
     }
}
}
*/
class clsWikiSection {
class clsWikiSection {
     // STATIC
     // STATIC
Line 542: Line 1,047:


     // DYNAMIC
     // DYNAMIC
     private $strName;   // short name for header text
     private $strName; // short name for header text
     private $strDescr;   // longer description for popups
     private $strDescr; // longer description for popups
     private $intLevel;   // level of header; defaults to 2
     private $intLevel; // level of header; defaults to 2
     private $objFmt;   // page-formatter object
     private $objFmt; // page-formatter object
     private $arMenu;   // menu entries
     private $arMenu; // menu entries
     private $arKeep;   // arguments to preserve (in every menu item) from the current page  
     private $arKeep; // arguments to preserve (in every menu item) from the current page  
     private $arAdd;   // arguments to add to every menu item
     private $arAdd; // arguments to add to every menu item


     public function __construct(clsWikiFormatter $iFmt,$iName,$iDescr=NULL,$iLevel=2,array $iMenu=NULL) {
     public function __construct(clsWikiFormatter $iFmt,$iName,$iDescr=NULL,$iLevel=2,array $iMenu=NULL) {
    $this->objFmt = $iFmt;
$this->objFmt = $iFmt;
    $this->strName = $iName;
$this->strName = $iName;
    $this->strDescr = is_null($iDescr)?$iName:$iDescr;
$this->strDescr = is_null($iDescr)?$iName:$iDescr;
    $this->intLevel = $iLevel;
$this->intLevel = $iLevel;
    $this->arMenu = $iMenu;
$this->arMenu = $iMenu;
    $this->arKeep = self::$arKeepDefault;
$this->arKeep = self::$arKeepDefault;
     }
     }
/*
2011-03-30 who is using these?
2011-10-17 ArgsToKeep() and ArgsToAdd() were being used by SpecialWorkFerret clsWFSession.SectionHdr(); checking to see if actually needed...
  no, they aren't -- DEPRECATED -- use $vgPage-> functions instead.
     public function ArgsToKeep(array $iKeep) {
     public function ArgsToKeep(array $iKeep) {
    $this->arKeep = $iKeep;  
$this->arKeep = $iKeep;
     }
     }
     public function ArgsToAdd(array $iAdd) {
     public function ArgsToAdd(array $iAdd) {
    $this->arAdd = $iAdd;
$this->arAdd = $iAdd;
     }
     }
     protected function ArrayCheck(array $iarCheck) {
     protected function ArrayCheck(array $iarCheck) {
    if (is_array($this->arAdd)) {
if (is_array($this->arAdd)) {
        $arOut = array_unique(array_merge($iarCheck,$this->arAdd));
    $arOut = array_unique(array_merge($iarCheck,$this->arAdd));
    } else {
} else {
        $arOut = $iarCheck;
    $arOut = $iarCheck;
}
return $arOut;
    }
    public function SelfURL() {
$arLink = $this->SelfArray();
$objPage = $this->objFmt->Page();
$wpPath = $objPage->SelfURL($arLink,TRUE);
return $wpPath;
     }
     }
     return $arOut;
     public function SelfArray() {
$objPage = $this->objFmt->Page();
if (is_array($this->arKeep)) {
    foreach ($this->arKeep as $key) {
$arLink[$key] = $objPage->Arg($key);
    }
}
return $this->ArrayCheck($arLink);
     }
     }
*/
     /*-----
     /*-----
    PURPOSE: Add an action link to the menu
      PURPOSE: Add an action link to the menu
      USED BY: any admin page that adds an action link to a section (e.g. "edit")
      INPUT;
iDisp = text to display (usually short, preferably one word)
iActive = TRUE shows the item as selected, FALSE shows it normally; default is to attempt to detect the state
iKey = key to use in URL. If this is an array, then it is passed directly to SelfURL(), overriding any existing values.
      HISTORY:
2010-11-07 added array option for iKey
     */
     */
    public function SelfArray() {
    $objPage = $this->objFmt->Page();
    if (is_array($this->arKeep)) {
        foreach ($this->arKeep as $key) {
        $arLink[$key] = $objPage->Arg($key);
        }
    }
    return $this->ArrayCheck($arLink);
    }
    public function SelfURL() {
    $arLink = $this->SelfArray();
    $objPage = $this->objFmt->Page();
    $wpPath = $objPage->SelfURL($arLink,TRUE);
    return $wpPath;
    }
     public function ActionAdd($iDisp,$iPopup=NULL,$iActive=NULL,$iKey=NULL,$iIsDefault=FALSE) {
     public function ActionAdd($iDisp,$iPopup=NULL,$iActive=NULL,$iKey=NULL,$iIsDefault=FALSE) {
    $strPopup = is_null($iPopup)?($iDisp.' '.$this->strDescr):$iPopup;
$strPopup = is_null($iPopup)?($iDisp.' '.$this->strDescr):$iPopup;


    $objPage = $this->objFmt->Page();
$objPage = $this->objFmt->Page();
    $arLink = $this->ArrayCheck($this->SelfArray());
$arLink = $objPage->ArrayCheck($objPage->SelfArray());


    $strKey = is_null($iKey)?$iDisp:$iKey;
if (is_array($iKey)) {
    $arLink['do'] = $strKey;
    $wpPath = $objPage->SelfURL($iKey,TRUE);
    $arLink = $this->ArrayCheck($arLink);
    $isActive = is_null($iActive)?FALSE:$iActive;
    $wpPath = $objPage->SelfURL($arLink,TRUE);
} else {
    $isActive = is_null($iActive)?($objPage->Arg('do')==$strKey):$iActive;
    $strKey = is_null($iKey)?$iDisp:$iKey;
    $arLink['do'] = $strKey;
    $arLink = $objPage->ArrayCheck($arLink);
    $wpPath = $objPage->SelfURL($arLink,TRUE);
    $isActive = is_null($iActive)?($objPage->Arg('do')==$strKey):$iActive;
}


    $arEntry = array(
$arEntry = array(
      'type'   => 'action',
  'type' => 'action',
      'path'   => $wpPath,
  'path' => $wpPath,
      'popup'   => $strPopup,
  'popup' => $strPopup,
      'displ'   => $iDisp,
  'displ' => $iDisp,
      'active'   => $isActive,
  'active' => $isActive,
      'isdef'   => $iIsDefault
  'isdef' => $iIsDefault
      );
  );
    $this->arMenu[] = $arEntry;
$this->arMenu[] = $arEntry;
     }
     }
    /*----
      ACTION: adds a static-text separator to the section menu
      FUTURE: Rename this to SepAdd or DividerAdd
    */
     public function SectionAdd($iDisp) {
     public function SectionAdd($iDisp) {
    $arEntry = array(
$arEntry = array(
      'type'   => 'section',
  'type' => 'section',
      'displ'   => $iDisp
  'displ' => $iDisp
      );
  );
    $this->arMenu[] = $arEntry;
$this->arMenu[] = $arEntry;
     }
     }
     public function ToggleAdd($iDisp,$iPopup=NULL,$iKey=NULL) {
     public function ToggleAdd($iDisp,$iPopup=NULL,$iKey=NULL) {
    $strPopup = is_null($iPopup)?($iDisp.' '.$this->strDescr):$iPopup;
$strPopup = is_null($iPopup)?($iDisp.' '.$this->strDescr):$iPopup;
    $strKey = is_null($iKey)?$iDisp:$iKey;
$strKey = is_null($iKey)?$iDisp:$iKey;


    $objPage = $this->objFmt->Page();
$objPage = $this->objFmt->Page();
    $arLink = $this->SelfArray();
$arLink = $objPage->SelfArray();
$isActive = $objPage->Arg($strKey); // active state is indicated by presence of key
$arLink[$strKey] = !$isActive;


    $isActive = $objPage->Arg($strKey);   // active state is indicated by presence of key
$arLink = $objPage->ArrayCheck($arLink);
    $arLink[$strKey] = !$isActive;
$wpPath = $objPage->SelfURL($arLink,TRUE);
    $arLink = $this->ArrayCheck($arLink);
//echo '<pre>'.print_r($arLink,TRUE).'</pre>';
    $wpPath = $objPage->SelfURL($arLink,TRUE);
//echo 'WPPATH=['.$wpPath.']';


    $arEntry = array(
$arEntry = array(
      'type'   => 'toggle',
  'type' => 'toggle',
      'path'   => $wpPath,
  'path' => $wpPath,
      'popup'   => $strPopup,
  'popup' => $strPopup,
      'displ'   => $iDisp,
  'displ' => $iDisp,
      'active'   => $isActive
  'active' => $isActive
       );
  );
    $this->arMenu[] = $arEntry;
$this->arMenu[] = $arEntry;
    }
    /*----
      PURPOSE: More flexible section link type
      INPUT:
$iDisp = text to display
$iArgs = arguments for link
$iPopup = text for tooltip (optional)
       HISTORY:
2011-01-02 Created to allow section commands to link to new-record-creation pages
    */
    public function CommandAdd($iDisp,array $iArgs,$iPopup=NULL) {
$objPage = $this->objFmt->Page();
$wpPath = $objPage->SelfURL($iArgs);
$arEntry = array(
  'type' => 'action',
  'path' => $wpPath,
  'popup' => $iPopup,
  'displ' => $iDisp,
  'isdef' => FALSE // I've forgotten what this does, but there's a warning if it's not set
  );
$this->arMenu[] = $arEntry;
     }
     }
     public function Generate() {
     public function Generate() {
    $out = '<h'.$this->intLevel.'>';
$out = '<h'.$this->intLevel.'>';
    if (is_array($this->arMenu)) {
if (is_array($this->arMenu)) {
        $arMenu = array_reverse($this->arMenu);   // right-alignment reverses things
    $arMenu = array_reverse($this->arMenu); // right-alignment reverses things
        foreach ($arMenu as $arLink) {
    foreach ($arMenu as $arLink) {
        $strType = $arLink['type'];
$strType = $arLink['type'];
        switch ($strType) {
switch ($strType) {
          case 'action':
  case 'action':
            $htPath = $arLink['path'];
    $htPath = $arLink['path'];
            $htPopup = $arLink['popup'];
    $htPopup = $arLink['popup'];
            $htDispl = $arLink['displ'];
    $htDispl = $arLink['displ'];
            $isActive = !empty($arLink['active']) || $arLink['isdef'];
    $isActive = !empty($arLink['active']) || $arLink['isdef'];
            $htFmtOpen = $isActive?'<b>':'';
    $htFmtOpen = $isActive?'<b>':'';
            $htFmtShut = $isActive?'</b>':'';
    $htFmtShut = $isActive?'</b>':'';
            $out .= '<span class="editsection">';
    $out .= '<span class="editsection">';
            $out .= $htFmtOpen.'[';
    $out .= $htFmtOpen.'[';
            $out .= '<a href="'.$htPath.'" title="'.$htPopup.'">'.$htDispl.'</a>';
    $out .= '<a href="'.$htPath.'" title="'.$htPopup.'">'.$htDispl.'</a>';
            $out .= ']'.$htFmtShut;
    $out .= ']'.$htFmtShut;
            $out .= '</span>';
    $out .= '</span>';
            break;
    break;
          case 'toggle':
  case 'toggle':
            $htPath = $arLink['path'];
    $htPath = $arLink['path'];
            $htPopup = $arLink['popup'];
    $htPopup = $arLink['popup'];
            $htDispl = $arLink['displ'];
    $htDispl = $arLink['displ'];
            $isActive = !empty($arLink['active']);
    $isActive = !empty($arLink['active']);
            $htFmtOpen = $isActive?'<b>':'';
    $htFmtOpen = $isActive?'<b>':'';
            $htFmtShut = $isActive?'</b>':'';
    $htFmtShut = $isActive?'</b>':'';
            $out .= '<span class="editsection">';
    $out .= '<span class="editsection">';
            $out .= $htFmtOpen.'[';
    $out .= $htFmtOpen.'[';
            $out .= '<a href="'.$htPath.'" title="'.$htPopup.'">'.$htDispl.'</a>';
    $out .= '<a href="'.$htPath.'" title="'.$htPopup.'">'.$htDispl.'</a>';
            $out .= ']'.$htFmtShut;
    $out .= ']'.$htFmtShut;
            $out .= '</span>';
    $out .= '</span>';
            break;
    break;
          case 'section':
  case 'section':
            $htDispl = $arLink['displ'];
    $htDispl = $arLink['displ'];
            $out .= '<span class="editsection">';
    $out .= '<span class="editsection">';
            $out .= '| <b>'.$htDispl.'</b>:';
    $out .= '| <b>'.$htDispl.'</b>:';
            $out .= '</span>';
    $out .= '</span>';
            break;
    break;
        }
}
        }
    }
    }
}
    $out .= '<span class="mw-headline">'.$this->strName.'</span></h'.$this->intLevel.'>';
$out .= '<span class="mw-headline">'.$this->strName.'</span></h'.$this->intLevel.'>';
    return $out;
return $out;
     }
     }
     public function FormOpen() {
     public function FormOpen() {
    $out = '<form method=post action="'.$this->SelfURL().'">';
$objPage = $this->objFmt->Page();
    return $out;
$url = $objPage->SelfURL();
$out = '<form method=post action="'.$url.'">';
return $out;
     }
     }
}
}
 
class clsWikiAdminSection { // DEPRECATED; use clsWikiFormatter / clsWikiSection
// This class is DEPRECATED; replacing with clsWikiFormatter / clsWikiSection
class clsWikiAdminSection {
     private $strTitle;
     private $strTitle;
     private $strDescr;
     private $strDescr;
Line 701: Line 1,251:


     public function __construct($iTitle, $iDescr=NULL, array $iKeep=NULL) {
     public function __construct($iTitle, $iDescr=NULL, array $iKeep=NULL) {
    global $vgPage;
global $vgPage;


    $this->strTitle = $iTitle;
$this->strTitle = $iTitle;
    $this->strDescr = is_null($iDescr)?$iTitle:$iDescr;
$this->strDescr = is_null($iDescr)?$iTitle:$iDescr;
    $this->arKeep = is_null($iKeep)?(self::$arKeepDefault):$iKeep;
$this->arKeep = is_null($iKeep)?(self::$arKeepDefault):$iKeep;
    $this->doEdit = $vgPage->Arg('edit');
$this->doEdit = $vgPage->Arg('edit');
    //$this->htPath = $vgPage->SelfURL(array('edit'=>!$this->doEdit));
//$this->htPath = $vgPage->SelfURL(array('edit'=>!$this->doEdit));
    $this->htPath = $vgPage->SelfURL();
$this->htPath = $vgPage->SelfURL();
     }
     }
     public function HeaderHtml(array $iMenu=NULL) {
     public function HeaderHtml(array $iMenu=NULL) {
    $out = '<h2>';
$out = '<h2>';
    if (is_array($iMenu)) {
if (is_array($iMenu)) {
        foreach ($iMenu as $arLink) {
    foreach ($iMenu as $arLink) {
        $htPath = $arLink['path'];
$htPath = $arLink['path'];
        $htPopup = $arLink['popup'];
$htPopup = $arLink['popup'];
        $htDispl = $arLink['displ'];
$htDispl = $arLink['displ'];
        $isActive = !empty($arLink['active']);
$isActive = !empty($arLink['active']);
        $out .= '<span class="editsection">';
$out .= '<span class="editsection">';
        if ($isActive) {  $out .= '<b>'; }
if ($isActive) {  $out .= '<b>'; }
        $out .= '[';
$out .= '[';
        if ($isActive) {  $out .= '</b>'; }
if ($isActive) {  $out .= '</b>'; }
        $out .= '<a href="'.$htPath.'" title="'.$htPopup.'">'.$htDispl.'</a>';
$out .= '<a href="'.$htPath.'" title="'.$htPopup.'">'.$htDispl.'</a>';
        if ($isActive) {  $out .= '<b>'; }
if ($isActive) {  $out .= '<b>'; }
        $out .= ']';
$out .= ']';
        if ($isActive) {  $out .= '</b>'; }
if ($isActive) {  $out .= '</b>'; }
        $out .= '</span> ';
$out .= '</span> ';
        }
    }
    } else {
} else {
        $out = '';
    $out = '';
    }
}
    $out .= '<span class="mw-headline">'.$this->strTitle.'</span></h2>';
$out .= '<span class="mw-headline">'.$this->strTitle.'</span></h2>';
    return $out;
return $out;
     }
     }
     public function HeaderHtml_OLD() {
     public function HeaderHtml_OLD() {
    $out = '<h2>';
$out = '<h2>';
    if (!$this->doEdit) {
if (!$this->doEdit) {
      $out .= '<span class="editsection">[<a href="'.$this->htPath.'" title="Edit '.$this->strDescr.'">edit</a>]</span> ';
  $out .= '<span class="editsection">[<a href="'.$this->htPath.'" title="Edit '.$this->strDescr.'">edit</a>]</span> ';
    }
}
    $out .= '<span class="mw-headline">'.$this->strTitle.'</span></h2>';
$out .= '<span class="mw-headline">'.$this->strTitle.'</span></h2>';
    return $out;
return $out;
     }
     }
     public function HeaderHtml_Edit(array $iMenu=NULL) {
     public function HeaderHtml_Edit(array $iMenu=NULL) {
    global $vgPage;
global $vgPage;


    if (is_array($this->arKeep)) {
if (is_array($this->arKeep)) {
        foreach ($this->arKeep as $key) {
    foreach ($this->arKeep as $key) {
        $arLink[$key] = $vgPage->Arg($key);
$arLink[$key] = $vgPage->Arg($key);
        }
    }
    }
}


    $arLink['edit'] = TRUE;
$arLink['edit'] = TRUE;
    $wpPathEd = $vgPage->SelfURL($arLink,TRUE);
$wpPathEd = $vgPage->SelfURL($arLink,TRUE);


    $arLink['edit'] = FALSE;
$arLink['edit'] = FALSE;
    $wpPathVw = $vgPage->SelfURL($arLink,TRUE);
$wpPathVw = $vgPage->SelfURL($arLink,TRUE);


    // generate standard part of menu:
// generate standard part of menu:
    $arMenu = array(
$arMenu = array(
      array(
  array(
        'path'   => $wpPathEd,
    'path' => $wpPathEd,
        'popup'   => 'edit '.$this->strDescr,
    'popup' => 'edit '.$this->strDescr,
        'displ'   => 'edit',
    'displ' => 'edit',
        'active'   => $this->doEdit),
    'active' => $this->doEdit),
      array(
  array(
        'path'   => $wpPathVw,
    'path' => $wpPathVw,
        'popup'   => 'view '.$this->strDescr,
    'popup' => 'view '.$this->strDescr,
        'displ'   => 'view',
    'displ' => 'view',
        'active'   => !$this->doEdit));
    'active' => !$this->doEdit));


    if (is_array($iMenu)) {
if (is_array($iMenu)) {
        $arMenu = array_merge($arMenu,$iMenu);   // append passed menu
    $arMenu = array_merge($arMenu,$iMenu); // append passed menu
    }
}


    return $this->HeaderHtml($arMenu);
return $this->HeaderHtml($arMenu);
     }
     }
     public function FormOpen() {
     public function FormOpen() {
    if ($this->doEdit) {
if ($this->doEdit) {
        $out = '<form method=post action="'.$this->htPath.'">';
    $out = '<form method=post action="'.$this->htPath.'">';
    } else {
} else {
        $out = NULL;
    $out = NULL;
    }
}
    return $out;
return $out;
     }
     }
}
}
Line 795: Line 1,345:
     $path = $wgScriptPath . '/extensions/tabber/';
     $path = $wgScriptPath . '/extensions/tabber/';
     $htmlHeader = '<script type="text/javascript" src="'.$path.'tabber.js"></script>'
     $htmlHeader = '<script type="text/javascript" src="'.$path.'tabber.js"></script>'
        . '<link rel="stylesheet" href="'.$path.'tabber.css" TYPE="text/css" MEDIA="screen">'
    . '<link rel="stylesheet" href="'.$path.'tabber.css" TYPE="text/css" MEDIA="screen">'
        . '<div class="tabber">';
    . '<div class="tabber">';
     $wgOut->addHTML($htmlHeader);
     $wgOut->addHTML($htmlHeader);
}
}

Latest revision as of 16:42, 22 May 2022

Examples

Shows a set of toggles. Library code currently does not properly highlight active options. <php> global $vgPage;

$vgPage->UseHTML();

$objPage = new clsWikiFormatter($vgPage);

$objSection = new clsWikiSection_std_page($objPage,'Orders',3); //$objSection->ArgsToKeep(array('show','page','id')); $objSection->PageKeys(array('page','id')); //$objSection->ToggleAdd('edit','edit the list of groups','edit.ctg'); $objLink = $objSection->AddLink_local(new clsWikiSectionLink_keyed(array('show.pulled'=>TRUE),'pulled')); $objLink->Popup('show pulled orders'); $objLink = $objSection->AddLink_local(new clsWikiSectionLink_keyed(array('show.shut'=>TRUE),'shut')); $objLink->Popup('show orders which have been closed'); $objLink = $objSection->AddLink_local(new clsWikiSectionLink_keyed(array('show.open'=>TRUE),'open')); $objLink->Popup('show orders which have not been completed'); $out = $objSection->Render();


/* check the flags */ if ($vgPage->Arg('show.open')) { // ...and so on </php> Example from WorkFerret -- adds links like this: do: [invoice] [new] | view: [invoiced] <php> $arOpts = array('context'=>'session','do'=>NULL); $objPage = new clsWikiFormatter($vgPage);

$objSection = new clsWikiSection_std_page($objPage,'Sessions',3); $objSection->PageKeys(array('page','id','show.invoiced')); // add "show.invoiced" to the list of page-identifiers

$objLink = $objSection->AddLink(new clsWikiSection_section('do')); $objLink = $objSection->AddLink_local(new clsWikiSectionLink_option($arOpts,'invc','do','invoice')); $objLink->Popup('create an invoice'); $objLink = $objSection->AddLink_local(new clsWikiSectionLink_option($arOpts,'new','do')); $objLink->Popup('create/edit new session'); $objLink = $objSection->AddLink(new clsWikiSection_section('view')); $objLink = $objSection->AddLink_local(new clsWikiSectionLink_keyed(array(),'invoiced','show.invoiced')); $objLink->Popup('show invoiced sessions');

$out = $objSection->Render(); </php>

Source

<php><?php /* 

 LIBRARY: menu.php - a few classes for managing menus
 REQUIRES: richtext.php
 HISTORY:
   2009-08-09 Extracted from SpecialVbzAdmin.php
   2009-11-04 clsArgs
   2010-02-20 clsWikiSection::SectionAdd(), ::ToggleAdd()
   2010-04-06 
     * General reconciliation with edited non-dev version
     * Done earlier but not logged here:

clsWikiSection::ArgsToAdd() (ported from other copy of menu.php) clsAdminTable, clsAdminData, clsAdminData_Logged, clsAdminEvents, clsAdminEvent 

   2010-06-17 StartEvent() / FinishEvent() now keep the event ID in $this->idEvent
   2010-10-06
     Reconciling with dev:
     * Minor improvements; split() is deprecated; small bugfixes
   2010-10-07 reconstructed clsDataSet::_AdminLink(), which apparently got lost during reconciliation
   2010-10-17 Expanded SpecialPageApp::Args() to allow returning a limited set of arguments
   2013-01-04 clsDataSet isn't in this file, so why is the note about clsDataSet::_AdminLink() here?
   2013-06-02 fixed Values_forLink() - toggles on as well as off now
   2013-06-06 rework of menu link classes complete -- working now
 BUGS:
   2010-09-13 When there are multiple toggles, they don't preserve each other's states
     http://wiki.vbz.net/Special:VbzAdmin/page:order/id:4263/receipt -- "email" cancels out "receipt"
   2012-05-27 lots of tweaks and fixes and some new classes to replace old ones; see code comments
   2012-07-08 explicit prepping of mw.menus module
  • /

clsLibMgr::Add('mw.menus', KFP_MW_LIB.'/richtext.php',__FILE__,__LINE__); 

 clsLibMgr::AddClass('clsHTML', 'mw.menus');
 clsLibMgr::AddClass('clsWikiText', 'mw.menus');

if (!defined('KS_CHAR_URL_ASSIGN')) { 

   define('KS_CHAR_URL_ASSIGN',':');	// default

}

//if (!function_exists('clsMenu::WikiText')) { class clsMenu { 

   public $Page;
   private $SubNodes;
   private $AllNodes;
   protected $Action;
   protected $Selected;
   protected $isSubActive;

   public function __construct($iWikiPage) {

$this->Page = $iWikiPage; $this->isSubActive = FALSE; 

   }
   public function WikiText($iAction) {

$this->Action = $iAction; if (isset($this->AllNodes[$iAction])) { $this->AllNodes[$iAction]->Activate(); $this->isSubActive = TRUE; } $out = $this->WikiText_SubMenu($iAction); return $out; 

   }
   public function WikiText_SubMenu($iAction) {

$out = NULL; foreach ($this->SubNodes as $objNode) { if (!is_null($out)) { $out .= ' | '; } $out .= $objNode->WikiText($iAction); } return $out; 

   }
   public function Add(clsMenuNode $iNode) {

$this->SubNodes[$iNode->Name] = $iNode; $this->Root()->AllNodes[$iNode->Name] = $iNode; $iNode->Parent = $this; 

   }
   protected function Root() {

return $this; 

   }
   protected function Activate() {    }	// do nothing
   public function Execute() {

if (isset($this->Selected)) { $out = $this->Selected->DoAction(); } else { $out = NULL; } return $out; 

   }
   /*----
     RETURNS: TRUE if the current input has activated a sub-menu
   */
   public function IsSubMenuActive() {

return $this->isSubActive; 

   }

}

abstract class clsMenuNode extends clsMenu { 

   public $Name;
   protected $Text;
   protected $DoSpec;
   public $Parent;
   protected $IsActive;

   public function __construct($iText, $iDo) {

$this->Name = $iDo; $this->Text = $iText; $this->DoSpec = $iDo; 

   }
   public function Root() {

return $this->Parent->Root(); 

   }
   abstract public function DoAction();
   protected function Activate() {

$this->IsActive = TRUE; $this->Parent->Activate(); 

   }
   public function WikiText($iAction) {

$wtSelf = $this->Root()->Page; $wtItem = "[[$wtSelf/page".KS_CHAR_URL_ASSIGN."{$this->DoSpec}|{$this->Text}]]"; // if ($iAction == $this->DoSpec) { if ($this->IsActive) { $out = "$wtItem"; $this->Root()->Selected = $this; } else { $out = $wtItem; } return $out; 

   }

}

class clsMenuRow extends clsMenuNode { 

   public function DoAction() {

$out = "
{$this->Text}: "; $out .= $this->WikiText_SubMenu($this->Root()->Action); return $out; 

   }

}

class clsMenuItem extends clsMenuNode { 

   public function DoAction() {

// later: actually implement menu item action 

   }

}

// A way of passing a variable number of options to a function // Possibly this should be in a separate library // 2010-02-20 ok, this is kind of stupid; just the usual array syntax is simple enough. Is any code using this? // Currently ruling out SpecialVbzAdmin...

class clsArgs { 

   private $arArgs;

   public function __construct(array $iPairs=NULL) {

if (!is_null($iPairs)) { foreach ($iPairs as $key=>$val) { $this->Add($key,$val); } } 

   }

   public function Add($iName, $iValue=NULL) {

$this->arArgs[$iName] = $iValue; 

   }
   public function Value($iName, $iValue=NULL) {

if (!is_null($iValue)) { $this->arArgs[$iName] = $iValue; } if (isset($this->arArgs[$iName])) { return $this->arArgs[$iName]; } else { return NULL; } 

   }

} // link-data functions /*---- 

 RETURNS: the part of the path *after* the specialpage name
 USED BY: SelfURL(), which is used by clsWikiSection:ActionAdd()
  • /

function SelfLink_Path(array $iData) { 

   $fp = ;
   foreach ($iData AS $key => $val) {

if ($val !== FALSE) { if ($val === TRUE) { $fp .= '/'.$key; } else { $fp .= '/'.$key.KS_CHAR_URL_ASSIGN.$val; } } 

   }
   $out = $fp;
   return $out;

} function SelfLink_WT(array $iData,$iShow) { 

   if (is_null($iShow)) {

return NULL; 

   } else {

$strPath = SelfLink_Path($iData); return ''.$iShow.''; 

   }

} /* 2010-10-01 NEED TO KNOW who uses this, so I can fix it function SelfLink_HTML(array $iData,$iShow,$iPopup=NULL) { 

   if (is_null($iShow)) {

return NULL; 

   } else {

$strPath = SelfLink_Path($iData); $htPopup = is_null($iPopup)?:(' title="'.$iPopup.'"'); return '<a href="'.$strPath.'"'.$htPopup.'>'.$iShow.'</a>'; 

   }

}

  • /

//} /* #### 

 FUTURE: This could eventually be split into a general page-type and one
   which uses page/id for most pages
   Also, the different RichText classes are now dependent on their creator
     (e.g. this class) to pass them the right kind of base URL. Not sure
     how to fix the conceptual model.
  • /

class SpecialPageApp extends SpecialPage { 

   // DYNAMIC
   protected $args;	// URL arguments as an array
   private $arKeep;	// arguments to preserve (in every menu item) from the current page 
   private $arAdd;	// arguments to add to every menu item
   protected $objRT_HTML,$objRT_Wiki;

   public function __construct($iName=) {

//global $wgScriptPath; global $vgMWLibPfx; global $wgTitle,$wgUser; global $vgUserName;

parent::__construct($iName); // $vgPage = $this; $vgUserName = $wgUser->getName(); $mwoTitleMe = $this->getTitle();

$wpBase = $this->BaseURL(); $wkBase = $mwoTitleMe->getPrefixedText();

$this->objRT_HTML = new clsHTML($wpBase); // $this->objRT_HTML = new clsHTML(); $this->objRT_Wiki = new clsWikiText($wkBase); // OMGkluge $this->InitArKeep(); 

   }
   /*----
     PURPOSE: For some reason, parent::execute() resets $vgPage -- so we need to set it after that.

$vgPage was originally being set in __construct(), but that was getting overwritten. 

     FUTURE: Make an application-object to hold $vgPage as a property, instead of having $vgPage as a global.
   */
   public function execute( $subPage ) {

global $vgPage;

parent::execute($subPage); $vgPage = $this; 

   }
   /*----
     RETURNS: URL of basic Special page with no URL arguments
   */
   public function BaseURL() {

$mwoTitle = $this->getTitle(); $wp = $mwoTitle->getFullURL(); return $wp; 

   }
   protected function InitArKeep() {

$this->arKeep = array('page','id'); 

   }
   public function UseHTML() {

global $vgOut;

$vgOut = $this->objRT_HTML; 

   }
   public function UseWiki() {

global $vgOut;

$vgOut = $this->objRT_Wiki; 

   }

/* 

   public function RichTextObj() {

return $vgOut; 

   }
  • /
   /*----
   ACTION: Parses variable arguments from the URL
     The URL is formatted as a series of arguments /arg:val/arg:val/..., so that we can always refer directly

to any particular item as a wiki page title while also not worrying about hierarchy/order. An arg can also appear without a val (/arg/...), in which case it is treated as a flag set to TRUE. 

   */
   protected function GetArgs($par) {

$args_raw = preg_split('/\//',$par); foreach($args_raw as $arg_raw) { if (strpos($arg_raw,KS_CHAR_URL_ASSIGN) !== FALSE) { list($key,$val) = preg_split('/'.KS_CHAR_URL_ASSIGN.'/',$arg_raw); $this->args[$key] = $val; } else { $this->args[$arg_raw] = TRUE; } } 

   }
   /*----
     RETURNS: array of all arguments found in URL,

or just the arguments listed in $iList 

   */
   public function Args(array $iList=NULL) {

if (is_array($iList)) { foreach ($iList as $name) { $arOut[$name] = $this->Arg($name); } return $arOut; } else { return $this->args; } 

   }
   /*----
     RETURNS: value of single specified argument from URL
     HISTORY:

2012-02-26 changed default return from FALSE to NULL NULL is easier to test for. 

   */
   public function Arg($iName) {

if (isset($this->args[$iName])) { return $this->args[$iName]; } else { return NULL; } 

   }

   /*====
     SECTION: link generation
     HISTORY:

2011-03-30 adapted from clsWikiSection to SpecialPageApp 

   */
   public function ArgsToKeep(array $iKeep) {

$this->arKeep = $iKeep; 

   }
   public function ArgsToAdd(array $iAdd) {

$this->arAdd = $iAdd; 

   }
   public function ArrayCheck(array $iarCheck) {

if (is_array($this->arAdd)) { $arOut = array_unique(array_merge($iarCheck,$this->arAdd)); } else { $arOut = $iarCheck; } return $arOut; 

   }
   public function SelfArray() {

$arLink = array(); if (is_array($this->arKeep)) { foreach ($this->arKeep as $key) { $arLink[$key] = $this->Arg($key); } } return $this->ArrayCheck($arLink); 

   }
   /*----
     RETURNS: Just the path after the page name, not the whole wiki title
     USED BY: $this->SelfURL()
   */
   private function SelfLink_Path(array $iAdd) {

$arData = $this->args; foreach ($iAdd AS $key => $val) { $arData[$key] = $val; // override any matching keys } return SelfLink_Path($arData); 

   }
   /*----
     USED BY: clsWikiSection::ActionAdd
   */
   public function SelfURL(array $iAdd=NULL,$iClear=TRUE) {

$arAddSave = $this->arAdd; $this->arAdd = $iAdd; $arLink = $this->SelfArray(); // this looks OK

//echo 'ARLINK:

'.print_r($arLink,TRUE).'

';

$wpPath = $this->SelfURL_calc($arLink,$iClear); // problem happens there ^ //echo 'WPPATH=['.$wpPath.']'; $this->arAdd = $arAddSave; return $wpPath; 

   }
   /*----
     NOTE: This has only been tested with SpecialPages; in theory it could be used on regular pages
   */
   static public function URL_fromArray(array $iArgs) {

global $wgTitle; global $wgScriptPath;

$strPath = SelfLink_Path($iArgs); // the part after the page name return $wgScriptPath.'/'.$wgTitle->getPrefixedText().$strPath; 

   }
   /*----
     RETURNS: Relative path, ready for use in an href
     USED BY: clsWikiSection:ActionAdd()
     HISTORY:

2011-03-30 renamed from SelfURL() to SelfURL_calc() 2012-02-24 dropped use of $wgScriptPath, because it doesn't work with MW1.18; rewrote path calculation. 

   */
   protected function SelfURL_calc(array $iAdd=NULL,$iClear=FALSE) {

global $wgTitle;

if (is_array($iAdd)) { if ($iClear) { $strPath = SelfLink_Path($iAdd); } else { $strPath = $this->SelfLink_Path($iAdd); } } else { $strPath = ; } //$wpPrefix = $wgTitle->getPrefixedText(); //$wpPrefix = $this->getName(); $mwoTitle = $this->getTitle(); $wpPrefix = $mwoTitle->getFullURL(); return $wpPrefix.$strPath; 

   }
   // DEPRECATED
   public function SelfLink_WT(array $iAdd, $iShow) {

$arData = $this->args; foreach ($iAdd AS $key => $val) { $arData[$key] = $val; // override any matching keys } $out = SelfLink_WT($arData,$iShow); return $out; 

   }

/* 2010-10-01 NEED TO KNOW who uses this, so I can fix it 

   public function SelfLink_HTML(array $iAdd, $iShow, $iClear=FALSE, $iPopup=NULL) {

$urlPath = $this->SelfURL($iAdd,$iClear); $htPopup = is_null($iPopup)?:(' title="'.$iPopup.'"'); $out = '<a href="'.$urlPath.'"'.$htPopup.'>'.$iShow.'</a>'; return $out; 

   }
  • /
   /*----
     USED BY: VbzAdminOrder.DoSetup()
   */
   public function SelfLink(array $iAdd, $iShow, $iPopup=NULL) {

global $vgOut;

$arData = $this->args; foreach ($iAdd AS $key => $val) { $arData[$key] = $val; // override any matching keys } $out = $vgOut->SelfLink($arData,$iShow,$iPopup); return $out; 

   }
   /*----
     ACTION: Displays a mini-menu from a list of possible values
     INPUT:

$iArgName: name of argument whose value changes with each choice $iValues: array containing prefix-delimited list of data for each choice: iValue[URL value] = "\display value\popup text" 

   */
   public function SelfLinkMenu($iArgName,array $iValues,$iCur=NULL) {

global $vgOut;

$strCur = (is_null($iCur))?$this->Arg($iArgName):$iCur;

$objStr = new xtString; $strArg = $iArgName; $out = ; foreach ($iValues as $strURL => $xtData) { $objStr->Value = $xtData; $arVal = $objStr->Xplode(); $strDisp = $arVal[0]; $strPop = $arVal[1]; $arAdd[$strArg] = $strURL; $isSel = ($strURL == $strCur); $out .= $vgOut->Selected($isSel,'[ '.$this->SelfLink($arAdd,$strDisp,$strPop).' ]'); } return $out; 

   }
   /*----
     INPUT:

iarClassNames: array of names of classes to load 

   */
   public function RegObjs(array $iarClassNames) {

foreach ($iarClassNames as $strCls) { $tbl = $this->DB()->Make($strCls); $strAct = $tbl->ActionKey(); $arTbls[$strAct] = $tbl; } $this->arTbls = $arTbls; 

   }
   /*----
     ACTION: handles arguments embedded in the URL
     REQUIRES: classes must be registered in $this->arTbls (use $this->RegObjs())
     HISTORY:

2011-10-15 moved here from SpecialVbzAdmin.php and renamed from doAdminLookup() to HandlePageArgs() 

   */
   protected function HandlePageArgs() {

if (isset($this->args['page'])) { $page = $this->args['page']; } else { $page = NULL; }

$idObj = NULL; $doObj = FALSE; $doNew = FALSE; if (!is_null($page)) { if (isset($this->args['id'])) { $doObj = TRUE; $idObj = $this->args['id']; if ($idObj == 'new') { // an ID of NULL tells GetItem() to create a new object rather than loading an existing record $idObj = NULL; $doNew = TRUE; } } } $this->page = $page; $this->doObj = $doObj; $this->idObj = $idObj;

$tbl = NULL; $obj = NULL; if (array_key_exists($page,$this->arTbls)) { $tbl = $this->arTbls[$page]; if ($doObj) { $obj = $tbl->GetItem($idObj); if (!$doNew && $obj->IsNew()) { $out = 'Internal Error: Record was expected, but none found. Check the URL.';

$out .= '

    '; $out .= '
  • requested ID: '.$idObj; global $sql; $out .= '
  • SQL used: '.$sql; $out .= '
  • Table class: '.get_class($tbl); $out .= '
  • Record class: '.get_class($obj); $out .= '

';

echo $out; $out=NULL; throw new exception('Expected record was not found.'); }

if (method_exists($obj,'PageTitle')) { $this->SetTitle($obj->PageTitle()); } } else { if (method_exists($tbl,'PageTitle')) { $this->SetTitle($tbl->PageTitle()); } } } $this->tbl = $tbl; $this->obj = $obj; 

   }

}

/*========== | FORM CLASSES | Trying not to be too ambitious at first, but eventually could be separate library file

  • /

class clsWikiFormatter { 

   private $mwoPage;

   public function __construct(SpecialPageApp $iPage) {

$this->mwoPage = $iPage; 

   }
   public function Page() {

return $this->mwoPage; 

   }

} /*%%%% 

 PURPOSE: revised clsWikiSection, taking into account usability lessons learned
   and implementing a more flexible link design.
  • /

class clsWikiSection2 { 

   private $objFmt;	// page-formatter object
   private $arMenu;	// array of menu objects
   private $arPage;	// page keys array
   private $strTitle;	// title of section - for display
   private $intLevel;	// indentation level of section

   public function __construct(clsWikiFormatter $iFmt,$iTitle,$iLevel=2) {

$this->objFmt = $iFmt; $this->strTitle = $iTitle; $this->intLevel = $iLevel; $this->arMenu = NULL; $this->arPage = NULL; 

   }
   /*----
     ACTION: set the list of keys that represent the current page spec.

Preserving these keys will keep the user on the current page even if other data changes. 

   */
   public function PageKeys(array $arKeys=NULL) {

if (!is_null($arKeys)) { $this->arPage = $arKeys; } return $this->arPage; 

   }
   /*----
     RETURNS: array representing page-defining data (but not all URL values)
   */
   public function PageData($iKey=NULL) {

$arArgs = $this->PageVals();

if (is_null($iKey)) { // return array of values for all the keys that identify the page foreach ($this->arPage as $idx => $key) { if (array_key_exists($key,$arArgs)) { // 2012-05-27 this seems to happen when a key is defined but not used in some circumstance $arOut[$key] = $arArgs[$key]; } } return $arOut; } else { return NzArray($arArgs,$iKey); } 

   }
   public function PageVals() {

$objPage = $this->objFmt->Page(); return $objPage->Args(); 

   }
   public function AddLink(clsWikiSectionWidget $iLink) {

$this->arMenu[] = $iLink; // add Link to list of Links $iLink->Section($this); // pass Link a pointer back to $this return $iLink; 

   }
   /*----
     PURPOSE: add a link to do something on the current page -- preserve page-significant data
   */
   public function AddLink_local(clsWikiSectionLink_base $iLink) {

$this->AddPageDefaults_toLink($iLink); $this->AddLink($iLink); return $iLink; 

   }
   /*----
     PURPOSE: add a link that preserves all other URL data (preserves the state of the page)
   */
   public function AddLink_state(clsWikiSectionLink $iLink) {

$this->AddPageValues_toLink($iLink); $this->AddLink($iLink); return $iLink; 

   }
   public function AddPageDefaults_toLink(clsWikiSectionLink_base $iLink) {

$iLink->Values_default($this->PageData()); 

   }
   public function AddPageValues_toLink(clsWikiSectionLink $iLink) {

$iLink->Values_default($this->PageVals()); 

   }
   public function Render() {

$tag = 'h'.$this->intLevel; $title = $this->strTitle;

$out = "\n

<$tag>";

if (is_array($this->arMenu)) { $arMenu = array_reverse($this->arMenu); // right-alignment reverses things foreach ($arMenu as $objLink) { $out .= $objLink->Render(); } }

$out .= "\n$title</$tag>

";

return $out; 

   }
   public function FormOpen() {

$oForm = new clsWikiSectionForm($this->PageData()); return $oForm->Render(); 

   }

} class clsWikiSection_std_page extends clsWikiSection2 { 

   public function __construct(clsWikiFormatter $iFmt,$iTitle,$iLevel=2) {

parent::__construct($iFmt,$iTitle,$iLevel); $this->PageKeys(array('page','id')); 

   }

} /*%%%% 

 PURPOSE: abstract handler for stuff that might go in the action/link area of a section header
  • /

abstract class clsWikiSectionWidget { 

   protected $objSect;	// section object
   private $strPopup;	// popup text (if any)

   /*----
     ACTION: render the link
   */
   abstract public function Render();

   public function Popup($iPopup=NULL) {

if (!is_null($iPopup)) { $this->strPopup = $iPopup; } return $this->strPopup; 

   }
   public function Section(clsWikiSection2 $iSection=NULL) {

if (!is_null($iSection)) { $this->objSect = $iSection; } return $this->objSect; 

   }

} abstract class clsWikiSectionLink_base extends clsWikiSectionWidget { 

   protected $arData;	// key:value pairs to always include in link

   public function __construct(array $iarData) {

$this->arData = $iarData; 

   }
   /*----
     RETURNS: URL for this link
   */
   public function SelfURL() {

global $vgOut;

$ar = $this->Values_forLink(); return $vgOut->SelfURL($ar); 

   }

   abstract protected function Values_forLink();
   /*----
     ACTION: sets a bunch of values to be used as defaults

if there is not already a value for each key. 

   */
   public function Values_default(array $iarValues) {

foreach ($iarValues as $key => $val) { $this->arData[$key] = NzArray($this->arData,$key,$val); } 

   }
   public function Values(array $iValues=NULL) {

if (!is_null($iValues)) { $this->arData = $iValues; } return $this->arData; 

   }
   public function Value($iKey,$iVal=NULL) {

if (!is_null($iVal)) { $this->arData[$iKey] = $iVal; } return $this->arData[$iKey]; 

   }

} /*%%%% 

 PURPOSE: handles a single action-link (e.g. [edit]) on a section header
 TODO: This should be renamed; it's a particular type of link, possibly obsolete.
  • /

abstract class clsWikiSectionLink extends clsWikiSectionLink_base { 

   protected $strDisp;	// text to display

   /*----
     INPUT:

iarData = list of URL values to always preserve iDisp = text to display 

   */
   public function __construct(array $iarData,$iDisp) {

parent::__construct($iarData); $this->strDisp = $iDisp; $this->objSect = NULL; $this->strPopup = NULL; $this->isActive = FALSE; 

   }
   protected function DisplayText() {

return $this->strDisp; 

   }
   /*----
     RETURNS: TRUE if the current URL causes this link to be selected

May also return a value rather than TRUE/FALSE. 

   */
   abstract public function Selected();
   /*----
     RETURNS: array of link's values, adjusted as needed for link behavior

i.e. if link should toggle OFF, then the appropriate array value is set FALSE. 

     VERSION: removes key from link if it is currently active

This originally just returned $this->Values() It may be that this class should do that, and we need a clsWikiSectionLink_toggle to do what this one does now. 

   */
   protected function Values_forLink() {

$ar = $this->Values();

$key = $this->Key(); $ar[$key] = !$this->Selected();

return $ar; 

   }
   /*----
     ACTION: render the link
   */
   public function Render() {

$ftURL = $this->SelfURL();

$htPopup = htmlspecialchars($this->strPopup); $htDispl = htmlspecialchars($this->DisplayText());

$isActive = $this->Selected(); $htFmtOpen = $isActive?'':; $htFmtShut = $isActive?'':;

// $out = '

';

$out = ''; $out .= $htFmtOpen.'['; $out .= '<a href="'.$ftURL.'" title="'.$htPopup.'">'.$htDispl.'</a>'; $out .= ']'.$htFmtShut;

// $out .= '

';

$out .= '';

return $out; 

   }

} /*%%%% 

 PURPOSE: handles links that have a "key", i.e. a particular identifying piece of data.
   Default behavior is to treat this like a toggle.
 DEPRECATED - use clsWikiSectionLink_option
  • /

class clsWikiSectionLink_keyed extends clsWikiSectionLink { 

   protected $strKey;

   /*----
     INPUT:

iarData: not sure... other stuff to always appear in URL, probably iDisp: text to display for link iKey: key to look up in URL to see if link is activated 

   */
   public function __construct(array $iarData,$iDisp,$iKey=NULL) {

parent::__construct($iarData,$iDisp); $this->strKey = is_null($iKey)?$iDisp:$iKey; $this->isSelected = NULL; 

   }
   public function Key($iKey=NULL) {

if (!is_null($iKey)) { $this->strKey = $iKey; } return $this->strKey; 

   }
   public function Selected() {

$key = $this->Key(); $val = $this->objSect->PageData($key); return $val; 

   }

} /*%%%% 

 PURPOSE: handles a form within a section.
   Right now, it actually just handles the opening form tag.
 USAGE: created internally by section object; not added to list
  • /

class clsWikiSectionForm extends clsWikiSectionLink_base { 

   /*----
     ACTION: render the form
   */
   public function Render() {

$out = '<form method=post action="'.$this->SelfURL().'">'; return $out."\n"; 

   }
   protected function Values_forLink() {

return $this->Values(); 

   }

} /*%%%% 

 PURPOSE: handles a group of links where only one link in the group can be activated at one time
   If no group key is specified, each link acts like a toggle.
 USAGE: added by caller
  • /

class clsWikiSectionLink_option extends clsWikiSectionLink_base { 

   protected $sLKey;	// link key
   protected $sGKey;	// link group key
   protected $sDi0;	// display when not activated
   protected $sDi1;	// display when activated
   /*----
     INPUT:

iarData: other stuff to always appear in URL, regardless of section's menu state iLinkKey: value that the group should be set to when this link is activated iGroupKey: group's identifier string in URL (.../iGroupKey:iLinkKey/...) if NULL, then there is no group key, and presence of link key (.../iLinkKey/...) is a flag iDispOff: text to display when link is not activated - defaults to iLinkKey iDispOn: text to display when link is activated - defaults to iDispOff 

   */
   public function __construct(array $iarData,$iLinkKey,$iGroupKey=NULL,$iDispOff=NULL,$iDispOn=NULL) {

parent::__construct($iarData); $this->sGKey = $iGroupKey; $this->sLKey = $iLinkKey; $this->sDi0 = is_null($iDispOff)?$iLinkKey:$iDispOff; $this->sDi1 = is_null($iDispOn)?$this->sDi0:$iDispOn; 

   }
   protected function LinkKey() {

return $this->sLKey; 

   }
   protected function GroupKey() {

return $this->sGKey; 

   }
   protected function HasGroup() {

return !is_null($this->GroupKey()); 

   }
   protected function GroupVal() {

$gk = $this->GroupKey(); // key for link's group return $this->objSect->PageData($gk); // return group's current value 

   }
   public function Selected() {

$lk = $this->LinkKey(); // key for this link if ($this->HasGroup()) { $gv = $this->GroupVal(); // current group value return ($gv==$lk); // does group value match link key? } else { return $this->objSect->PageData($lk); // return TRUE iff link key exists in URL } 

   }
   protected function DisplayText() {

if ($this->Selected()) { return $this->sDi1; } else { return $this->sDi0; } 

   }
   /*----
     RETURNS: array of link's values, adjusted as needed for link behavior

i.e. if link should toggle OFF, then the appropriate array value is set FALSE. 

     VERSION:

if there is a group key: if selected, sets group key FALSE to remove it from URL if NOT selected, sets group key to link key if there is NO group key: if selected, sets link key FALSE to remove it from URL if NOT selected, sets link key TRUE to put it in the URL 

   */
   protected function Values_forLink() {

$ar = $this->Values();

$lk = $this->LinkKey(); if ($this->HasGroup()) { $gk = $this->GroupKey(); if ($this->Selected()) { $ar[$gk] = FALSE; } else { $ar[$gk] = $lk; } } else { $ar[$lk] = !$this->Selected(); }

return $ar; 

   }
   /*----
     ACTION: render the link
   */
   public function Render() {

$ftURL = $this->SelfURL();

$htPopup = htmlspecialchars($this->Popup()); $htDispl = htmlspecialchars($this->DisplayText());

$isActive = $this->Selected(); $htFmtOpen = $isActive?'':; $htFmtShut = $isActive?'':;

// $out = '

';

$out = ''; $out .= $htFmtOpen.'['; $out .= '<a href="'.$ftURL.'" title="'.$htPopup.'">'.$htDispl.'</a>'; $out .= ']'.$htFmtShut;

// $out .= '

';

$out .= '';

return $out; 

   }

} /*%%%% 

 PURPOSE: handles links that express possible values of a single key
 DEPRECATED: Does anything use this successfully?
   clsWikiSectionLink_option is a rewrite to provide the same functionality.
  • /

class clsWikiSectionLink_choice extends clsWikiSectionLink_keyed { 

   public function Selected() {

$key = $this->Key(); $valPage = parent::Selected(); $valLink = $this->Value($key); return $valPage == $valLink; 

   }

} /*%%%% 

 PURPOSE: handles link-area subsections (static text)
  • /

class clsWikiSection_section extends clsWikiSectionWidget { 

   protected $strDisp;

   public function __construct($iDisp) {

$this->strDisp = $iDisp; 

   }
   public function Render() {

$out = ''; $out .= '| '.$this->strDisp.':'; $out .= ''; return $out; 

   }

}

/* class clsWikiSectionLink_bool { 

   public function __construct(array $iarData,$iDisp=NULL,$iPopup=NULL,$iKey=NULL) {
   public function Selected($iOn=NULL) {

if (!is_null($iOn)) { $isActive = !empty($arLink['active']) || $arLink['isdef']; } return NzArray($this->arData,'active'); 

   }

}

  • /

class clsWikiSection { 

   // STATIC
   public static $arKeepDefault = array('page','id');

   // DYNAMIC
   private $strName;	// short name for header text
   private $strDescr;	// longer description for popups
   private $intLevel;	// level of header; defaults to 2
   private $objFmt;	// page-formatter object
   private $arMenu;	// menu entries
   private $arKeep;	// arguments to preserve (in every menu item) from the current page 
   private $arAdd;	// arguments to add to every menu item

   public function __construct(clsWikiFormatter $iFmt,$iName,$iDescr=NULL,$iLevel=2,array $iMenu=NULL) {

$this->objFmt = $iFmt; $this->strName = $iName; $this->strDescr = is_null($iDescr)?$iName:$iDescr; $this->intLevel = $iLevel; $this->arMenu = $iMenu; $this->arKeep = self::$arKeepDefault; 

   }

/* 2011-03-30 who is using these? 2011-10-17 ArgsToKeep() and ArgsToAdd() were being used by SpecialWorkFerret clsWFSession.SectionHdr(); checking to see if actually needed... 

 no, they aren't -- DEPRECATED -- use $vgPage-> functions instead.
   public function ArgsToKeep(array $iKeep) {

$this->arKeep = $iKeep; 

   }
   public function ArgsToAdd(array $iAdd) {

$this->arAdd = $iAdd; 

   }
   protected function ArrayCheck(array $iarCheck) {

if (is_array($this->arAdd)) { $arOut = array_unique(array_merge($iarCheck,$this->arAdd)); } else { $arOut = $iarCheck; } return $arOut; 

   }
   public function SelfURL() {

$arLink = $this->SelfArray(); $objPage = $this->objFmt->Page(); $wpPath = $objPage->SelfURL($arLink,TRUE); return $wpPath; 

   }
   public function SelfArray() {

$objPage = $this->objFmt->Page(); if (is_array($this->arKeep)) { foreach ($this->arKeep as $key) { $arLink[$key] = $objPage->Arg($key); } } return $this->ArrayCheck($arLink); 

   }
  • /
   /*-----
     PURPOSE: Add an action link to the menu
     USED BY: any admin page that adds an action link to a section (e.g. "edit")
     INPUT;

iDisp = text to display (usually short, preferably one word) iActive = TRUE shows the item as selected, FALSE shows it normally; default is to attempt to detect the state iKey = key to use in URL. If this is an array, then it is passed directly to SelfURL(), overriding any existing values. 

     HISTORY:

2010-11-07 added array option for iKey 

   */
   public function ActionAdd($iDisp,$iPopup=NULL,$iActive=NULL,$iKey=NULL,$iIsDefault=FALSE) {

$strPopup = is_null($iPopup)?($iDisp.' '.$this->strDescr):$iPopup;

$objPage = $this->objFmt->Page(); $arLink = $objPage->ArrayCheck($objPage->SelfArray());

if (is_array($iKey)) { $wpPath = $objPage->SelfURL($iKey,TRUE); $isActive = is_null($iActive)?FALSE:$iActive; } else { $strKey = is_null($iKey)?$iDisp:$iKey; $arLink['do'] = $strKey; $arLink = $objPage->ArrayCheck($arLink); $wpPath = $objPage->SelfURL($arLink,TRUE); $isActive = is_null($iActive)?($objPage->Arg('do')==$strKey):$iActive; }

$arEntry = array( 'type' => 'action', 'path' => $wpPath, 'popup' => $strPopup, 'displ' => $iDisp, 'active' => $isActive, 'isdef' => $iIsDefault ); $this->arMenu[] = $arEntry; 

   }
   /*----
     ACTION: adds a static-text separator to the section menu
     FUTURE: Rename this to SepAdd or DividerAdd
   */
   public function SectionAdd($iDisp) {

$arEntry = array( 'type' => 'section', 'displ' => $iDisp ); $this->arMenu[] = $arEntry; 

   }
   public function ToggleAdd($iDisp,$iPopup=NULL,$iKey=NULL) {

$strPopup = is_null($iPopup)?($iDisp.' '.$this->strDescr):$iPopup; $strKey = is_null($iKey)?$iDisp:$iKey;

$objPage = $this->objFmt->Page();

$arLink = $objPage->SelfArray(); $isActive = $objPage->Arg($strKey); // active state is indicated by presence of key $arLink[$strKey] = !$isActive;

$arLink = $objPage->ArrayCheck($arLink); $wpPath = $objPage->SelfURL($arLink,TRUE);

//echo '

'.print_r($arLink,TRUE).'

';

//echo 'WPPATH=['.$wpPath.']';

$arEntry = array( 'type' => 'toggle', 'path' => $wpPath, 'popup' => $strPopup, 'displ' => $iDisp, 'active' => $isActive ); $this->arMenu[] = $arEntry; 

   }
   /*----
     PURPOSE: More flexible section link type
     INPUT:

$iDisp = text to display $iArgs = arguments for link $iPopup = text for tooltip (optional) 

     HISTORY:

2011-01-02 Created to allow section commands to link to new-record-creation pages 

   */
   public function CommandAdd($iDisp,array $iArgs,$iPopup=NULL) {

$objPage = $this->objFmt->Page(); $wpPath = $objPage->SelfURL($iArgs); $arEntry = array( 'type' => 'action', 'path' => $wpPath, 'popup' => $iPopup, 'displ' => $iDisp, 'isdef' => FALSE // I've forgotten what this does, but there's a warning if it's not set ); $this->arMenu[] = $arEntry; 

   }
   public function Generate() {

$out = '<h'.$this->intLevel.'>'; if (is_array($this->arMenu)) { $arMenu = array_reverse($this->arMenu); // right-alignment reverses things foreach ($arMenu as $arLink) { $strType = $arLink['type']; switch ($strType) { case 'action': $htPath = $arLink['path']; $htPopup = $arLink['popup']; $htDispl = $arLink['displ']; $isActive = !empty($arLink['active']) || $arLink['isdef']; $htFmtOpen = $isActive?'':; $htFmtShut = $isActive?'':; $out .= ''; $out .= $htFmtOpen.'['; $out .= '<a href="'.$htPath.'" title="'.$htPopup.'">'.$htDispl.'</a>'; $out .= ']'.$htFmtShut; $out .= ''; break; case 'toggle': $htPath = $arLink['path']; $htPopup = $arLink['popup']; $htDispl = $arLink['displ']; $isActive = !empty($arLink['active']); $htFmtOpen = $isActive?'':; $htFmtShut = $isActive?'':; $out .= ''; $out .= $htFmtOpen.'['; $out .= '<a href="'.$htPath.'" title="'.$htPopup.'">'.$htDispl.'</a>'; $out .= ']'.$htFmtShut; $out .= ''; break; case 'section': $htDispl = $arLink['displ']; $out .= ''; $out .= '| '.$htDispl.':'; $out .= ''; break; } } } $out .= ''.$this->strName.'</h'.$this->intLevel.'>'; return $out; 

   }
   public function FormOpen() {

$objPage = $this->objFmt->Page(); $url = $objPage->SelfURL(); $out = '<form method=post action="'.$url.'">'; return $out; 

   }

} class clsWikiAdminSection { // DEPRECATED; use clsWikiFormatter / clsWikiSection 

   private $strTitle;
   private $strDescr;
   private $doEdit;
   private $arKeep;
   //private $htPath;
   public static $arKeepDefault = array('page','id');

   public function __construct($iTitle, $iDescr=NULL, array $iKeep=NULL) {

global $vgPage;

$this->strTitle = $iTitle; $this->strDescr = is_null($iDescr)?$iTitle:$iDescr; $this->arKeep = is_null($iKeep)?(self::$arKeepDefault):$iKeep; $this->doEdit = $vgPage->Arg('edit'); //$this->htPath = $vgPage->SelfURL(array('edit'=>!$this->doEdit)); $this->htPath = $vgPage->SelfURL(); 

   }
   public function HeaderHtml(array $iMenu=NULL) {

$out = '

'; if (is_array($iMenu)) { foreach ($iMenu as $arLink) { $htPath = $arLink['path']; $htPopup = $arLink['popup']; $htDispl = $arLink['displ']; $isActive = !empty($arLink['active']); $out .= ''; if ($isActive) { $out .= ''; } $out .= '['; if ($isActive) { $out .= ''; } $out .= '<a href="'.$htPath.'" title="'.$htPopup.'">'.$htDispl.'</a>'; if ($isActive) { $out .= ''; } $out .= ']'; if ($isActive) { $out .= ''; } $out .= ' '; } } else { $out = ; } $out .= ''.$this->strTitle.'

';

return $out; 

   }
   public function HeaderHtml_OLD() {

$out = '

'; if (!$this->doEdit) { $out .= '[<a href="'.$this->htPath.'" title="Edit '.$this->strDescr.'">edit</a>] '; } $out .= ''.$this->strTitle.'

';

return $out; 

   }
   public function HeaderHtml_Edit(array $iMenu=NULL) {

global $vgPage;

if (is_array($this->arKeep)) { foreach ($this->arKeep as $key) { $arLink[$key] = $vgPage->Arg($key); } }

$arLink['edit'] = TRUE; $wpPathEd = $vgPage->SelfURL($arLink,TRUE);

$arLink['edit'] = FALSE; $wpPathVw = $vgPage->SelfURL($arLink,TRUE);

// generate standard part of menu: $arMenu = array( array( 'path' => $wpPathEd, 'popup' => 'edit '.$this->strDescr, 'displ' => 'edit', 'active' => $this->doEdit), array( 'path' => $wpPathVw, 'popup' => 'view '.$this->strDescr, 'displ' => 'view', 'active' => !$this->doEdit));

if (is_array($iMenu)) { $arMenu = array_merge($arMenu,$iMenu); // append passed menu }

return $this->HeaderHtml($arMenu); 

   }
   public function FormOpen() {

if ($this->doEdit) { $out = '<form method=post action="'.$this->htPath.'">'; } else { $out = NULL; } return $out; 

   }

} // TABBED CONTENTS /* 

 NOTES: There's probably a better way of doing this (e.g. using the same code used by the User Preferences page), but for now
   this uses the Tabber extension.
  • /

function TabsOpen() { 

   global $wgScriptPath,$wgOut;

   $path = $wgScriptPath . '/extensions/tabber/';
   $htmlHeader = '<script type="text/javascript" src="'.$path.'tabber.js"></script>'

. '<link rel="stylesheet" href="'.$path.'tabber.css" TYPE="text/css" MEDIA="screen">'

. '

'; 
   $wgOut->addHTML($htmlHeader);

} function TabsShut() { 

   global $wgOut;
$wgOut->addHTML('

');

} function TabOpen($iName) { 

   global $wgOut;

$wgOut->addHTML('

');

} function TabShut() { 

   global $wgOut;
$wgOut->addHTML('

');

}</php>

Retrieved from "https://wooz.dev/mw/index.php?title=Ferreteria/archive/menu.php&oldid=1566"