drop tagwall from trunk
Andrew Dolgov
17 years ago
parent
e0579c6d4f
commit
7e1265ede7
@ -1,19 +0,0 @@
|
||||
|
||||
Universal (X)HTML Tag Filter
|
||||
--------------------------------------------
|
||||
|
||||
<Idea,Code>
|
||||
|
||||
Juraj 'HVGE' Durech
|
||||
|
||||
hvge@cauldron.sk
|
||||
minimal-huge.host.sk
|
||||
|
||||
|
||||
<ThanxTo,Support,Respect>
|
||||
|
||||
www.designia.sk
|
||||
www.martincohen.info
|
||||
www.fczbkk.com
|
||||
|
||||
--------------------------------------------
|
||||
@ -1,43 +0,0 @@
|
||||
<?php
|
||||
/*
|
||||
* tag|wall | PHP Tag Filter|
|
||||
* ---------------------------------------------------------------------
|
||||
|
||||
Copyright (C) 2002 Juraj 'HVGE' Durech
|
||||
Copyright (C) 2002 www.designia.sk
|
||||
|
||||
This program is free software; you can redistribute it and/or modify
|
||||
it under the terms of the GNU General Public License as published by
|
||||
the Free Software Foundation; either version 2 of the License, or
|
||||
(at your option) any later version.
|
||||
|
||||
This program is distributed in the hope that it will be useful,
|
||||
but WITHOUT ANY WARRANTY; without even the implied warranty of
|
||||
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
||||
GNU General Public License for more details.
|
||||
|
||||
You should have received a copy of the GNU General Public License
|
||||
along with this program; if not, write to the Free Software
|
||||
Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
|
||||
|
||||
* ---------------------------------------------------------------------
|
||||
* tag|wall error module
|
||||
*
|
||||
* description:
|
||||
* - this is default error module.
|
||||
*/
|
||||
class FOO_error extends TW_errors
|
||||
{
|
||||
function FOO_error($options = 0)
|
||||
{
|
||||
$this->TW_errors($options);
|
||||
}
|
||||
|
||||
function add($errval, $position, $show_code, $param1=null, $param2=null )
|
||||
{
|
||||
$this->ErrorArray["TW_err_".$this->identifier++] = array($errval, $param1, $param2, $position, $show_code);
|
||||
if($errval & 0xff00) $this->IsError = 1;
|
||||
return null;
|
||||
}
|
||||
}
|
||||
?>
|
||||
@ -1,94 +0,0 @@
|
||||
<?php
|
||||
/*
|
||||
* tag|wall | PHP Tag Filter|
|
||||
* ---------------------------------------------------------------------
|
||||
|
||||
Copyright (C) 2002 Juraj 'HVGE' Durech
|
||||
Copyright (C) 2002 www.designia.sk
|
||||
|
||||
This program is free software; you can redistribute it and/or modify
|
||||
it under the terms of the GNU General Public License as published by
|
||||
the Free Software Foundation; either version 2 of the License, or
|
||||
(at your option) any later version.
|
||||
|
||||
This program is distributed in the hope that it will be useful,
|
||||
but WITHOUT ANY WARRANTY; without even the implied warranty of
|
||||
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
||||
GNU General Public License for more details.
|
||||
|
||||
You should have received a copy of the GNU General Public License
|
||||
along with this program; if not, write to the Free Software
|
||||
Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
|
||||
|
||||
* ---------------------------------------------------------------------
|
||||
* tag|wall error module
|
||||
*
|
||||
* description:
|
||||
* - this module appending automatic links and colored piece of bad code.
|
||||
*
|
||||
* - Module using following CSS classes (you must define it in your CSS stylesheet)
|
||||
*
|
||||
* .tw-err-int - internal error (in output string)
|
||||
* .tw-err-err - standard error
|
||||
* .tw-err-war - warning
|
||||
* .tw-err-com - comment
|
||||
*
|
||||
* .tw-err-int-l - internal error (in error list)
|
||||
* .tw-err-err-l - standard error
|
||||
* .tw-err-war-l - warning
|
||||
* .tw-err-com-l - comment
|
||||
|
||||
*/
|
||||
class LINK_error extends TW_errors
|
||||
{
|
||||
function LINK_error($options = 0)
|
||||
{
|
||||
$this->TW_errors($options);
|
||||
}
|
||||
|
||||
function add($errval, $position, $show_code, $param1=null, $param2=null )
|
||||
{
|
||||
$err_id = "TW_err_".$this->identifier++;
|
||||
$this->ErrorArray[$err_id] = array($errval, $param1, $param2, $position, $show_code);
|
||||
if($errval & 0xff00) $this->IsError = 1;
|
||||
|
||||
// append errors and warnings
|
||||
if(($errval & 0x0ff0) && $show_code != null )
|
||||
return '<a name="'.$err_id.'"><span class="'.$this->get_error_class($errval).'">'.$show_code.'</span></a>';
|
||||
|
||||
return null;
|
||||
}
|
||||
|
||||
// You can call this method from your project and create nice list of errors.
|
||||
//
|
||||
// $lang - error string pack
|
||||
// $mask - any combination of following masks:
|
||||
// 0xf000 - internal,
|
||||
// 0x0f00 - errors,
|
||||
// 0x00f0 - warnings,
|
||||
// 0x000f - comments
|
||||
//
|
||||
function create_list (&$lang, $mask = 0x0ff0)
|
||||
{
|
||||
$errors = $this->get_by_mask($mask);
|
||||
|
||||
$out = "<ul>";
|
||||
foreach($errors as $key => $value)
|
||||
{
|
||||
$errno = $value[TWE_ERRNO];
|
||||
$piece = '<span class="'.$this->get_error_class($errno).'">'.$value[TWE_CODE].'</span>';
|
||||
$list ='<a href="#'.$key.'">'.$this->get_error_text($key,$lang).$piece.'</a>';
|
||||
$out .= '<li class="'.$this->get_error_class($errno).'-l">'.$list.'</li>';
|
||||
}
|
||||
return $out."</ul>";
|
||||
}
|
||||
|
||||
function get_error_class ($error)
|
||||
{
|
||||
if($error&0xf000) return "tw-err-int";
|
||||
if($error&0x0f00) return "tw-err-err";
|
||||
if($error&0x00f0) return "tw-err-war";
|
||||
return "tw-err-com";
|
||||
}
|
||||
}
|
||||
?>
|
||||
@ -1,69 +0,0 @@
|
||||
<?php
|
||||
/*
|
||||
* tag|wall ver 0.1.0 | PHP Tag Filter|
|
||||
* ---------------------------------------------------------------------
|
||||
|
||||
Copyright (C) 2002 Juraj 'HVGE' Durech
|
||||
Copyright (C) 2002 www.designia.sk
|
||||
|
||||
This program is free software; you can redistribute it and/or modify
|
||||
it under the terms of the GNU General Public License as published by
|
||||
the Free Software Foundation; either version 2 of the License, or
|
||||
(at your option) any later version.
|
||||
|
||||
This program is distributed in the hope that it will be useful,
|
||||
but WITHOUT ANY WARRANTY; without even the implied warranty of
|
||||
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
||||
GNU General Public License for more details.
|
||||
|
||||
You should have received a copy of the GNU General Public License
|
||||
along with this program; if not, write to the Free Software
|
||||
Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
|
||||
|
||||
* ---------------------------------------------------------------------
|
||||
* tag|wall error module
|
||||
*
|
||||
* description:
|
||||
* - TODO: add module description
|
||||
*
|
||||
* output modifications:
|
||||
* - TODO: add your output modifications here
|
||||
*/
|
||||
class ???_error extends TW_errors
|
||||
{
|
||||
// TODO: add module depended variables here
|
||||
|
||||
// Class constructor
|
||||
// NOTE: parser calling this with his options. See twParser constructor.
|
||||
//
|
||||
function ???_error($options = 0)
|
||||
{
|
||||
// call parent class constructor
|
||||
$this->TW_errors($options);
|
||||
|
||||
// TODO: add your own module initializations here
|
||||
}
|
||||
|
||||
// You must implement your own add method.
|
||||
|
||||
function add($errval, $position, $show_code, $param1=null, $param2=null )
|
||||
{
|
||||
$err_id = "TW_err_".$this->identifier++;
|
||||
//
|
||||
// This is basic error implementation. Modify this code only if you really need it.
|
||||
//
|
||||
$this->ErrorArray[$err_id] = array($errval, $param1, $param2, $position, $show_code);
|
||||
if($errval & 0xff00) $this->IsError = 1;
|
||||
|
||||
// TODO: create your output additions here, and return it as string
|
||||
|
||||
return null;
|
||||
}
|
||||
|
||||
// TODO:
|
||||
// You can implement ohther methods here.
|
||||
// For example: special error filters, post-parsing functions for generating
|
||||
// error lists, etc...
|
||||
|
||||
}
|
||||
?>
|
||||
@ -1,60 +0,0 @@
|
||||
<?php
|
||||
// WARNING:
|
||||
//
|
||||
// All tags used in configuration must be defined in tw/tw-tags.php file too.
|
||||
//
|
||||
|
||||
$tw_paranoya_setup = array(
|
||||
|
||||
"a" => array(
|
||||
"href" => array( TW_RQ_URL ), // value is required url
|
||||
"name" => array( TW_RQ_LINK ), // value is link (link+href combination must be fixed in base)
|
||||
"title" => null,
|
||||
"target" => null,
|
||||
),
|
||||
|
||||
"hr" => null, // without attributes
|
||||
"br" => null,
|
||||
"img" => array(
|
||||
"width" => array( TW_NUM ), // 80 - default, number must be in range <60,120>
|
||||
"height"=> array( TW_NUM ),
|
||||
"src" => array( TW_RQ_URL ),
|
||||
"title" => null,
|
||||
"border"=> array( TW_RQ_NUM, 0, 0, 0),
|
||||
),
|
||||
|
||||
"p" => array(
|
||||
// null - default value (null = remove attr if value not found in case array)
|
||||
"class" => array( TW_CASE, null, array("par1","par2","par3") ),
|
||||
),
|
||||
|
||||
"b" => "strong", // tag substitution <b> -> <strong>
|
||||
"strong" => null, // new tag must be configured too
|
||||
"i" => null,
|
||||
"u" => null,
|
||||
"div" => array(
|
||||
"title" => null,
|
||||
),
|
||||
|
||||
"span" => array(
|
||||
"class" => array( TW_CASE, null, array("my-class1","my-class2","my-class3") ),
|
||||
),
|
||||
|
||||
"blockquote" => null,
|
||||
"h1" => null,
|
||||
"h2" => null,
|
||||
"h3" => null,
|
||||
|
||||
"table" => null,
|
||||
"td" => null,
|
||||
"tr" => null,
|
||||
"th" => null,
|
||||
|
||||
"ul" => null,
|
||||
"ol" => null,
|
||||
"li" => null,
|
||||
"dl" => null,
|
||||
"dt" => null,
|
||||
"dd" => null,
|
||||
);
|
||||
?>
|
||||
@ -1,471 +0,0 @@
|
||||
<?php
|
||||
/*
|
||||
* tag|wall | PHP Tag Filter |
|
||||
* ---------------------------------------------------------------------
|
||||
|
||||
Copyright (C) 2002 Juraj 'HVGE' Durech
|
||||
Copyright (C) 2002 www.designia.sk
|
||||
|
||||
This program is free software; you can redistribute it and/or modify
|
||||
it under the terms of the GNU General Public License as published by
|
||||
the Free Software Foundation; either version 2 of the License, or
|
||||
(at your option) any later version.
|
||||
|
||||
This program is distributed in the hope that it will be useful,
|
||||
but WITHOUT ANY WARRANTY; without even the implied warranty of
|
||||
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
||||
GNU General Public License for more details.
|
||||
|
||||
You should have received a copy of the GNU General Public License
|
||||
along with this program; if not, write to the Free Software
|
||||
Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
|
||||
|
||||
* ---------------------------------------------------------------------
|
||||
*/
|
||||
|
||||
/*
|
||||
* $this->pt text
|
||||
* $this->pti text index
|
||||
*/
|
||||
class TW_base // TW_lang extends this class
|
||||
{
|
||||
var $error; // error module object
|
||||
var $output; // output module object
|
||||
var $out; // output string
|
||||
|
||||
var $content_off;
|
||||
|
||||
var $tags; // relationships between tags
|
||||
var $config; // current configuration (twParser::strip_tags())
|
||||
var $config_tags; // tags in current configuration
|
||||
var $config_attr; // attributes in current configuration
|
||||
var $config_req_attr; // required attributes
|
||||
|
||||
|
||||
var $TAG;
|
||||
var $is_attributes;
|
||||
var $ATTRIBUTES; // index => array("atr","value")
|
||||
var $ATTR; // array(atr,value)
|
||||
var $VALUE;
|
||||
|
||||
/********************************************************************************************
|
||||
* BASE CONSTRUCTOR
|
||||
*/
|
||||
function TW_base()
|
||||
{
|
||||
global $tw_tag_relations;
|
||||
|
||||
$this->stack();
|
||||
$this->tags = &$tw_tag_relations;
|
||||
$this->content_off = 0;
|
||||
}
|
||||
/*
|
||||
* BASE "DESTRUCTOR" (parser call this function if end of string is rached)
|
||||
*/
|
||||
function base_end()
|
||||
{
|
||||
while( $tag = $this->stack_pop() )
|
||||
{
|
||||
$this->out .= $this->output->close( $tag );
|
||||
}
|
||||
return null;
|
||||
}
|
||||
|
||||
|
||||
/********************************************************************************************
|
||||
* TAG STACK implementation
|
||||
*/
|
||||
var $Tstack;
|
||||
|
||||
function stack() { $this->Tstack[0] = null; }
|
||||
function stack_push( $tag ) { array_unshift( $this->Tstack, $tag ); }
|
||||
function stack_pop() { return array_shift( $this->Tstack ); }
|
||||
function stack_search( $tag ) { return in_array( $tag, $this->Tstack ); }
|
||||
|
||||
function stack_top( $tag = null )
|
||||
{
|
||||
if( $tag ) return $this->Tstack[0] == $tag;
|
||||
return $this->Tstack[0];
|
||||
}
|
||||
|
||||
|
||||
|
||||
|
||||
/********************************************************************************************
|
||||
* S T A R T _ T A G _ f i l t e r <tag atr=value>
|
||||
*
|
||||
*/
|
||||
|
||||
function START_TAG_filter()
|
||||
{
|
||||
$tag = $this->TAG;
|
||||
if( $tag == null )
|
||||
{
|
||||
//###### syntax error
|
||||
return;
|
||||
}
|
||||
if( in_array($tag,$this->config_tags) )
|
||||
{
|
||||
//enabled tag
|
||||
|
||||
if(is_string($this->config_attr[$tag]))
|
||||
{
|
||||
$this->TAG = $tag = $this->config_attr[$tag];
|
||||
//tag substitution warning
|
||||
}
|
||||
|
||||
// ------- perform attribute check -----------
|
||||
|
||||
if($this->is_attributes)
|
||||
{
|
||||
if(!$this->config_attr[$tag])
|
||||
{
|
||||
$this->ATTRIBUTES = null;
|
||||
// remove attribute warning
|
||||
}
|
||||
else
|
||||
{
|
||||
foreach( $this->ATTRIBUTES as $key => $attr )
|
||||
{
|
||||
if( ! in_array($attr[0], $this->config_attr[$tag] ) )
|
||||
{
|
||||
$this->ATTRIBUTES[$key][1] = null;
|
||||
// remove attribute warning
|
||||
continue;
|
||||
}
|
||||
|
||||
// --------- perform value check -----------
|
||||
|
||||
if(($val = $attr[1])==null) continue;
|
||||
if(($cmda = &$this->config[$tag][$attr[0]])==null) continue; //null - accept all values
|
||||
switch($cmda[0] & 7)
|
||||
{
|
||||
case TW_URL:
|
||||
// V0.1.2: fixed some fatal bugs, big thanx to fczbkk
|
||||
//
|
||||
// TODO: make better url check with parse_url()
|
||||
|
||||
// $val = strtolower($val);
|
||||
if(stripos($val, "http://") === false)
|
||||
{
|
||||
if(stripos($val, "ftp://") === false)
|
||||
if(stripos($val, "email:") === false)
|
||||
if(stripos($val, "https://") === false)
|
||||
if(stripos($val, "./") === false) // local relative url
|
||||
$val = "http://".$val;
|
||||
}
|
||||
$this->ATTRIBUTES[$key][1] = $val;
|
||||
break;
|
||||
|
||||
case TW_LINK:
|
||||
//TODO: add link separator check here.
|
||||
// Do not use this attribute in config!
|
||||
break;
|
||||
|
||||
case TW_NUM:
|
||||
if( $val >= $cmda[2] && $val <= $cmda[3] ) break;
|
||||
$this->ATTRIBUTES[$key][1] = $cmda[1];
|
||||
break;
|
||||
|
||||
case TW_CASE:
|
||||
if( !in_array($val, $cmda[2]) ) $this->ATTRIBUTES[$key][1] = $cmda[1];
|
||||
break;
|
||||
}
|
||||
}
|
||||
}
|
||||
}
|
||||
// check required attributes
|
||||
if($this->config_req_attr[$tag])
|
||||
{
|
||||
if( $this->is_attributes )
|
||||
foreach( $this->config_req_attr[$tag] as $required )
|
||||
{
|
||||
$req_found = 0;
|
||||
foreach( $this->ATTRIBUTES as $val)
|
||||
if( $val[0] == $required )
|
||||
{
|
||||
$req_found = 1;
|
||||
break;
|
||||
}
|
||||
if($req_found) continue;
|
||||
|
||||
switch( $this->config[$tag][$required][0] & 7 )
|
||||
{
|
||||
case TW_LINK:
|
||||
case TW_URL:
|
||||
// error
|
||||
break;
|
||||
|
||||
default:
|
||||
$this->ATTRIBUTES[$required] = array($required, $this->config[$tag][$required][1]);
|
||||
break;
|
||||
}
|
||||
}
|
||||
else
|
||||
{
|
||||
foreach( $this->config_req_attr[$tag] as $required )
|
||||
{
|
||||
switch( $this->config[$tag][$required][0] & 7 )
|
||||
{
|
||||
case TW_LINK:
|
||||
case TW_URL:
|
||||
|
||||
// required tag error
|
||||
|
||||
break;
|
||||
|
||||
default:
|
||||
$this->ATTRIBUTES[$required] = array($required, $this->config[$tag][$required][1]);
|
||||
break;
|
||||
}
|
||||
}
|
||||
}
|
||||
|
||||
}
|
||||
// cross tag removal algorithm
|
||||
|
||||
$flag = $this->tags[$tag];
|
||||
$top = $this->stack_top();
|
||||
|
||||
if( $flag[2] != null ) // check if tag before is specified
|
||||
{
|
||||
// yes, tag before is specified, check relationship
|
||||
if(! in_array($top, $flag[2]) )
|
||||
{
|
||||
if( $flag[0] & TW_OPT )
|
||||
{
|
||||
if( $top == $tag )
|
||||
{
|
||||
// End Tag is optional and current tag is the same as last tag (on stack).
|
||||
// Close previos for XHTML compatibility and open new the same tag.
|
||||
// Return, because no manipulation with stack is required.
|
||||
$this->out .= $this->output->close( $tag );
|
||||
$this->out .= $this->output->pair( $tag, $this->ATTRIBUTES );
|
||||
return;
|
||||
}
|
||||
if( $this->stack_search($tag) )
|
||||
{
|
||||
// repair stack
|
||||
while(($top = $this->stack_pop() ) != $tag )
|
||||
{
|
||||
/*if( !($this->tags[$top][0] & TW_OPT ) )
|
||||
{
|
||||
// auto close warning
|
||||
}*/
|
||||
$this->out .= $this->output->close( $top );
|
||||
}
|
||||
$this->stack_push($tag);
|
||||
$this->out .= $this->output->close( $tag );
|
||||
$this->out .= $this->output->pair( $tag, $this->ATTRIBUTES );
|
||||
return;
|
||||
}
|
||||
}
|
||||
// <th>...<td> =>> <th>...</th><td>... (<th> & <td> they have common parent tag (<tr>) )
|
||||
if( $this->tags[$top][0] & TW_OPT )
|
||||
{
|
||||
if( $this->tags[$top][2] == $flag[2] )
|
||||
{
|
||||
$this->out .= $this->output->close( $this->stack_pop() );
|
||||
$this->out .= $this->output->pair( $tag, $this->ATTRIBUTES );
|
||||
$this->stack_push( $tag );
|
||||
return;
|
||||
}
|
||||
}
|
||||
// invalid relation between tags #######
|
||||
return;
|
||||
}
|
||||
// valid relationship
|
||||
}
|
||||
if( $flag[0] & TW_NOP )
|
||||
{
|
||||
//tag without End Tag <br />
|
||||
$this->out .= $this->output->single( $tag, $this->ATTRIBUTES );
|
||||
}
|
||||
else
|
||||
{
|
||||
//Tag with End Tag, push to stack
|
||||
if( ($top == $tag) && ($flag[0] & TW_OPT) )
|
||||
{
|
||||
// '<p><p>' => '<p></p><p>'
|
||||
$this->out .= $this->output->close( $tag );
|
||||
$this->out .= $this->output->pair( $tag, $this->ATTRIBUTES );
|
||||
return;
|
||||
}
|
||||
$this->out .= $this->output->pair( $tag, $this->ATTRIBUTES );
|
||||
$this->stack_push( $tag );
|
||||
}
|
||||
return;
|
||||
}
|
||||
else
|
||||
{
|
||||
//disabled tag (or not supported) ######
|
||||
return;
|
||||
}
|
||||
}
|
||||
|
||||
/********************************************************************************************
|
||||
* E N D _ T A G _ f i l t e r </tag>
|
||||
*
|
||||
*/
|
||||
function END_TAG_filter()
|
||||
{
|
||||
$tag = $this->TAG;
|
||||
if( $tag == null )
|
||||
{
|
||||
// </>
|
||||
if ($tag = $this->stack_pop() )
|
||||
{
|
||||
$this->out .= $this->output->close($tag);
|
||||
return;
|
||||
}
|
||||
else
|
||||
{
|
||||
// kunda underflow :)
|
||||
return;
|
||||
}
|
||||
}
|
||||
if(in_array($tag,$this->config_tags))
|
||||
{
|
||||
// enabled tag
|
||||
if(is_string($this->config_attr[$tag]))
|
||||
{
|
||||
$this->TAG = $tag = $this->config_attr[$tag];
|
||||
//tag substitution warning
|
||||
}
|
||||
|
||||
$top = $this->stack_top( $tag );
|
||||
if( $top )
|
||||
{
|
||||
$this->out .= $this->output->close( $tag );
|
||||
$this->stack_pop();
|
||||
return;
|
||||
}
|
||||
|
||||
if( $this->stack_search($tag) )
|
||||
{
|
||||
// closing cross tags
|
||||
while( ($top = $this->stack_pop()) != $tag )
|
||||
{
|
||||
/*if( !($this->tags[$top][0] & TW_OPT ) )
|
||||
{
|
||||
// auto close warning
|
||||
}*/
|
||||
$this->out .= $this->output->close( $top );
|
||||
}
|
||||
$this->out .= $this->output->close( $tag );
|
||||
}
|
||||
else
|
||||
{
|
||||
// ###### cross tag error
|
||||
return;
|
||||
}
|
||||
}
|
||||
// drop out warning
|
||||
}
|
||||
|
||||
|
||||
/*
|
||||
* THERE ARE STATE IN, OUT & NEW FUNCTIONS
|
||||
*
|
||||
*/
|
||||
|
||||
/********************************************************************************************
|
||||
* STATE T_begin '<'
|
||||
*/
|
||||
function T_begin_in()
|
||||
{
|
||||
$this->tag_position = $this->pti;
|
||||
$this->TAG = null;
|
||||
}
|
||||
|
||||
// --- MAIN TAG-FILTER FUNCTION ---
|
||||
|
||||
function T_begin_out($word)
|
||||
{
|
||||
$this->START_TAG_filter();
|
||||
}
|
||||
|
||||
/********************************************************************************************
|
||||
* STATE TC_begin '</'
|
||||
*/
|
||||
function T_Cbegin_in()
|
||||
{
|
||||
$this->tag_position = $this->pti;
|
||||
$this->TAG = null;
|
||||
}
|
||||
|
||||
// TAG CLOSE function
|
||||
//
|
||||
function T_Cbegin_out($word)
|
||||
{
|
||||
$this->END_TAG_filter();
|
||||
}
|
||||
|
||||
/********************************************************************************************
|
||||
* STATE T_gettag 'tagname'
|
||||
*/
|
||||
function T_gettag_in()
|
||||
{
|
||||
$this->is_attributes = 0;
|
||||
$this->ATTRIBUTES = null;
|
||||
return;
|
||||
}
|
||||
|
||||
function T_gettag_new($word) { $this->TAG = strtolower($word); }
|
||||
function T_gettag_out($word) { return; }
|
||||
|
||||
/********************************************************************************************
|
||||
* STATE A_begin '__atr...'
|
||||
*/
|
||||
function A_begin_in() { $this->ATTR = null; }
|
||||
function A_begin_new($word) { $this->ATTR[0] = strtolower($word); }
|
||||
function A_begin_out($word)
|
||||
{
|
||||
if( $this->is_attributes )
|
||||
{
|
||||
foreach( $this->ATTRIBUTES as $akey => $aval )
|
||||
{
|
||||
if($this->ATTR[0] == $aval[0])
|
||||
{
|
||||
// duplicate warning
|
||||
$this->ATTRIBUTES[$akey] = $aval;
|
||||
return;
|
||||
}
|
||||
}
|
||||
}
|
||||
else
|
||||
{
|
||||
$this->is_attributes = 1;
|
||||
}
|
||||
$this->ATTRIBUTES[] = $this->ATTR;
|
||||
}
|
||||
|
||||
/********************************************************************************************
|
||||
* STATE V_begin 'atr...'
|
||||
*/
|
||||
function V_begin_in() { $this->VALUE = null; }
|
||||
function V_begin_out($word) { $this->ATTR[1] = $this->VALUE; }
|
||||
|
||||
/********************************************************************************************
|
||||
* STATE VALUE1
|
||||
*/
|
||||
function VALUE1_in() { return; }
|
||||
function VALUE1_out($word) { $this->VALUE = substr($word,0,strlen($word)-1); }
|
||||
|
||||
/********************************************************************************************
|
||||
* STATE VALUE2
|
||||
*/
|
||||
function VALUE2_in() { return; }
|
||||
function VALUE2_out($word)
|
||||
{
|
||||
$this->VALUE = str_replace("\"", """, substr($word, 0, strlen($word)-1) );
|
||||
}
|
||||
/********************************************************************************************
|
||||
* STATE VALUE3
|
||||
*/
|
||||
function VALUE3_in() { return; }
|
||||
function VALUE3_out($word) { $this->VALUE = $word; }
|
||||
|
||||
|
||||
} // END class TW_base
|
||||
?>
|
||||
@ -1,183 +0,0 @@
|
||||
<?php
|
||||
/*
|
||||
* tag|wall | PHP Tag Filter |
|
||||
* ---------------------------------------------------------------------
|
||||
|
||||
Copyright (C) 2002 Juraj 'HVGE' Durech
|
||||
Copyright (C) 2002 www.designia.sk
|
||||
|
||||
This program is free software; you can redistribute it and/or modify
|
||||
it under the terms of the GNU General Public License as published by
|
||||
the Free Software Foundation; either version 2 of the License, or
|
||||
(at your option) any later version.
|
||||
|
||||
This program is distributed in the hope that it will be useful,
|
||||
but WITHOUT ANY WARRANTY; without even the implied warranty of
|
||||
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
||||
GNU General Public License for more details.
|
||||
|
||||
You should have received a copy of the GNU General Public License
|
||||
along with this program; if not, write to the Free Software
|
||||
Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
|
||||
|
||||
* ---------------------------------------------------------------------
|
||||
* TW - based on SHL Language File
|
||||
*
|
||||
* Spolocne so SHL
|
||||
* - kompatibilita s FSHL generatorom 0.4.x
|
||||
* - zakladna kostra stavoveho diagramu je spolocna
|
||||
*
|
||||
* Rozdiely voci SHL
|
||||
* - polia maju iny vyznam pretoze spracuva iny stavovy automat
|
||||
* - vsetky stavy sa volaju rekurentne
|
||||
*
|
||||
* function STATE_in() - vola sa pri vstupe do stavu (Ovplyvnuje flag PF_XIO)
|
||||
* function STATE_out() - vola sa pri opusteni stavu (_RET) (Ovplyvnuje flag PF_XIO)
|
||||
* tiez hned po navrate z rekurzie flag PF_XDONE sposobi zavolanie
|
||||
* STATE_out() a opustenie aktualneho stavu (simulovany _RET)
|
||||
* function STATE_new() - vola sa pri zmene stavu (Ovplyvnuje flag PF_XNEW)
|
||||
*/
|
||||
class TW_lang
|
||||
{
|
||||
var $states;
|
||||
var $initial_state;
|
||||
var $keywords;
|
||||
var $version;
|
||||
var $signature;
|
||||
|
||||
function TW_lang()
|
||||
{
|
||||
$this->signature = "TW";
|
||||
$this->version = "1.0";
|
||||
$this->initial_state="OUT";
|
||||
$this->states =
|
||||
array
|
||||
(
|
||||
"OUT" => array (
|
||||
array(
|
||||
"<" => array("T_tagWall",0),
|
||||
|
||||
//"&" => array("VChar",0), // validate char (currently not implemented in base)
|
||||
),
|
||||
|
||||
PF_CLEAN, // PF_CLEAN - znaky sa forwarduju na vystup
|
||||
0,0
|
||||
),
|
||||
|
||||
"T_tagWall" => array (
|
||||
array(
|
||||
"ALPHA" => array("T_begin",1), // normal tag
|
||||
"/" => array("T_Cbegin",0), // close tag
|
||||
"<" => array("T_tagWall",1), // '<<<<<<<<' fix (faster than _RET)
|
||||
"!--" => array("HTML_comment",0),
|
||||
"_ALL" => array("_RET",0), // '<?' other fixes
|
||||
),
|
||||
|
||||
PF_XDONE,
|
||||
0,0
|
||||
),
|
||||
|
||||
|
||||
"T_Cbegin" => array (
|
||||
array(
|
||||
"ALPHA" => array("T_gettag",1),
|
||||
"_ALL" => array("_RET",0),
|
||||
),
|
||||
PF_XIO | PF_XDONE, 0,0
|
||||
),
|
||||
|
||||
|
||||
"T_begin" => array (
|
||||
array(
|
||||
"ALPHA" => array("T_gettag",1),
|
||||
"_ALL" => array("_RET",0),
|
||||
),
|
||||
|
||||
PF_XIO | PF_XDONE, 0,0
|
||||
),
|
||||
|
||||
|
||||
"T_gettag" => array (
|
||||
array(
|
||||
"!ALNUM"=> array("T_in",1),
|
||||
),
|
||||
|
||||
PF_XIO | PF_XDONE | PF_XNEW, 0,0
|
||||
),
|
||||
|
||||
|
||||
"T_in" => array(
|
||||
array(
|
||||
"ALPHA" => array("A_begin",1), // char back to stream
|
||||
">" => array("_RET",0),
|
||||
"/>" => array("_RET",0), // pozor na spracovanie v T_begin
|
||||
),
|
||||
|
||||
0,0,0
|
||||
),
|
||||
|
||||
"A_begin" => array (
|
||||
array(
|
||||
"!ALPHA"=> array("V_begin",1),
|
||||
">" => array("_RET",1), // vracia string do streamu
|
||||
"/>" => array("_RET",1), // pozor na spracovanie v TAGbegin
|
||||
),
|
||||
|
||||
PF_XIO | PF_XDONE | PF_XNEW , 0,0
|
||||
),
|
||||
|
||||
// this is wide attribute=value implementation
|
||||
"V_begin" => array (
|
||||
array(
|
||||
'"' => array("VALUE1",0),
|
||||
"'" => array("VALUE2",0),
|
||||
"ALNUM" => array("VALUE3",1),
|
||||
|
||||
">" => array("_RET",1),
|
||||
"/>" => array("_RET",1),
|
||||
),
|
||||
|
||||
PF_XIO | PF_XDONE, 0,0
|
||||
),
|
||||
|
||||
// "DOUBLEQUOTED VALUE"
|
||||
"VALUE1" => array(
|
||||
array(
|
||||
'"' => array("_RET",0),
|
||||
),
|
||||
PF_XIO, 0,0
|
||||
),
|
||||
|
||||
// 'SINGLEQUOTED VALUE'
|
||||
"VALUE2" => array(
|
||||
array(
|
||||
"'" => array("_RET",0),
|
||||
),
|
||||
PF_XIO, 0,0
|
||||
),
|
||||
|
||||
// UNQUOTEDVALUE99
|
||||
"VALUE3" => array(
|
||||
array(
|
||||
/* "_" => array ("VALUE3",0), //Uncomment for better HTML4 compatibility (not recommended)
|
||||
"." => array ("VALUE3",0),
|
||||
*/
|
||||
"-" => array ("VALUE3",0),
|
||||
"!ALNUM"=> array("_RET",1),
|
||||
),
|
||||
PF_XIO, 0,0
|
||||
),
|
||||
|
||||
// all comment content will be removed
|
||||
"HTML_comment" => array(
|
||||
array(
|
||||
"-->" => array("_RET",0),
|
||||
),
|
||||
0,0,0
|
||||
),
|
||||
);
|
||||
|
||||
$this->keywords=null;
|
||||
}
|
||||
}
|
||||
?>
|
||||
@ -1,57 +0,0 @@
|
||||
<?
|
||||
/*
|
||||
* tag|wall | PHP Tag Filter|
|
||||
* ---------------------------------------------------------------------
|
||||
|
||||
Copyright (C) 2002 Juraj 'HVGE' Durech
|
||||
Copyright (C) 2002 www.designia.sk
|
||||
|
||||
This program is free software; you can redistribute it and/or modify
|
||||
it under the terms of the GNU General Public License as published by
|
||||
the Free Software Foundation; either version 2 of the License, or
|
||||
(at your option) any later version.
|
||||
|
||||
This program is distributed in the hope that it will be useful,
|
||||
but WITHOUT ANY WARRANTY; without even the implied warranty of
|
||||
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
||||
GNU General Public License for more details.
|
||||
|
||||
You should have received a copy of the GNU General Public License
|
||||
along with this program; if not, write to the Free Software
|
||||
Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
|
||||
|
||||
* ---------------------------------------------------------------------
|
||||
* tag|wall error strings
|
||||
*
|
||||
* NOTE:
|
||||
* TW not using this file directly. You can include it to your project
|
||||
* at your opinion. Then you can use method TW_errors::get_error_text()
|
||||
* for getting error texts.
|
||||
*
|
||||
* Please correct my stupid english :)
|
||||
*/
|
||||
$tw_error_strings = array(
|
||||
|
||||
// comments & tips
|
||||
TWE_OK => null,
|
||||
TWE_VERSION => "Versions: parser V %s, language V%s",
|
||||
TWE_CREDITS => "tag|wall: code Juraj Durech (hvge@cauldron.sk).",
|
||||
TWE_NOTE => "%s",
|
||||
|
||||
// warnings
|
||||
TWE_STACK_UNDERFLOW => "Stack underflow, tag '%s' was dropped out.",
|
||||
TWE_STACK_NOT_EMPTY => "There are some unclosed tags on stack.",
|
||||
TWE_UNEXPECTED_EOST => "Unexpected end of stream.",
|
||||
TWE_UNEXPECTED_QUOTE => "Unexpected quote.",
|
||||
|
||||
// errors
|
||||
TWE_SYNTAX => "HTML syntax error.",
|
||||
TWE_TOO_MANY_ATTRS => "Too many attributes in tag '%s'.",
|
||||
|
||||
// internal errors
|
||||
TWE_FILE_NOT_FOUND => "File '%s' not found.",
|
||||
TWE_BAD_SIGNATURE => "Language '%s' have bad signature '%s'.",
|
||||
TWE_LANG_NOT_FOUND => "Language '%s' not found.",
|
||||
|
||||
);
|
||||
?>
|
||||
@ -1,74 +0,0 @@
|
||||
<?php
|
||||
/*
|
||||
* tag|wall | PHP Tag Filter |
|
||||
* ---------------------------------------------------------------------
|
||||
|
||||
Copyright (C) 2002 Juraj 'HVGE' Durech
|
||||
Copyright (C) 2002 designia.sk
|
||||
|
||||
This program is free software; you can redistribute it and/or modify
|
||||
it under the terms of the GNU General Public License as published by
|
||||
the Free Software Foundation; either version 2 of the License, or
|
||||
(at your option) any later version.
|
||||
|
||||
This program is distributed in the hope that it will be useful,
|
||||
but WITHOUT ANY WARRANTY; without even the implied warranty of
|
||||
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
||||
GNU General Public License for more details.
|
||||
|
||||
You should have received a copy of the GNU General Public License
|
||||
along with this program; if not, write to the Free Software
|
||||
Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
|
||||
|
||||
* ---------------------------------------------------------------------
|
||||
* HL_DEBUG_output.php xhtml debug output module (highlight tags)
|
||||
*/
|
||||
|
||||
class HL_DEBUG_output
|
||||
{
|
||||
function HL_DEBUG_output() { return; }
|
||||
|
||||
// input: string, array()
|
||||
|
||||
function pair ($tag, &$attributes)
|
||||
{
|
||||
if($attributes == null)
|
||||
return $this->highlight( "<$tag>" );
|
||||
$attr = null;
|
||||
foreach ($attributes as $value)
|
||||
{
|
||||
if($value[1]) $attr .= ' '.$value[0].'="'.$value[1].'"';
|
||||
}
|
||||
return $this->highlight( "<$tag$attr>" );
|
||||
}
|
||||
|
||||
function single ($tag, &$attributes)
|
||||
{
|
||||
if($attributes == null)
|
||||
return $this->highlight( "<$tag />" );
|
||||
$attr = null;
|
||||
foreach ($attributes as $value)
|
||||
{
|
||||
if($value[1]) $attr .= $value[0].'="'.$value[1].'" ';
|
||||
}
|
||||
return $this->highlight( "<$tag $attr/>" );
|
||||
}
|
||||
|
||||
// template for end tags
|
||||
function close ($tag)
|
||||
{
|
||||
return $this->highlight( "</$tag>" );
|
||||
}
|
||||
|
||||
function template_end() { return null; }
|
||||
|
||||
|
||||
function highlight($string)
|
||||
{
|
||||
$string = str_replace("&","&",$string);
|
||||
return '<span style="background-color:yellow">'.str_replace("<","<",$string).'</span>';
|
||||
}
|
||||
|
||||
} //END class HTML_output
|
||||
|
||||
?>
|
||||
@ -1,67 +0,0 @@
|
||||
<?php
|
||||
/*
|
||||
* tag|wall | PHP Tag Filter |
|
||||
* ---------------------------------------------------------------------
|
||||
|
||||
Copyright (C) 2002 Juraj 'HVGE' Durech
|
||||
Copyright (C) 2002 designia.sk
|
||||
|
||||
This program is free software; you can redistribute it and/or modify
|
||||
it under the terms of the GNU General Public License as published by
|
||||
the Free Software Foundation; either version 2 of the License, or
|
||||
(at your option) any later version.
|
||||
|
||||
This program is distributed in the hope that it will be useful,
|
||||
but WITHOUT ANY WARRANTY; without even the implied warranty of
|
||||
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
||||
GNU General Public License for more details.
|
||||
|
||||
You should have received a copy of the GNU General Public License
|
||||
along with this program; if not, write to the Free Software
|
||||
Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
|
||||
|
||||
* ---------------------------------------------------------------------
|
||||
* HTML_output.php html output module
|
||||
*/
|
||||
|
||||
class HTML_output
|
||||
{
|
||||
function HTML_output() { return; }
|
||||
|
||||
// input: string, array()
|
||||
|
||||
function pair ($tag, &$attributes)
|
||||
{
|
||||
if($attributes == null)
|
||||
return "<$tag>";
|
||||
$attr = null;
|
||||
foreach ($attributes as $value)
|
||||
{
|
||||
if($value[1]) $attr .= ' '.$value[0].'="'.$value[1].'"';
|
||||
}
|
||||
return "<$tag$attr>";
|
||||
}
|
||||
|
||||
function single ($tag, &$attributes)
|
||||
{
|
||||
if($attributes == null)
|
||||
return "<$tag>";
|
||||
$attr = null;
|
||||
foreach ($attributes as $value)
|
||||
{
|
||||
if($value[1]) $attr .= ' '.$value[0].'="'.$value[1].'"';
|
||||
}
|
||||
return "<$tag$attr>";
|
||||
}
|
||||
|
||||
// template for end tags
|
||||
function close ($tag)
|
||||
{
|
||||
return "</$tag>";
|
||||
}
|
||||
|
||||
function template_end() { return null; }
|
||||
|
||||
} //END class HTML_output
|
||||
|
||||
?>
|
||||
@ -1,67 +0,0 @@
|
||||
<?php
|
||||
/*
|
||||
* tag|wall | PHP Tag Filter |
|
||||
* ---------------------------------------------------------------------
|
||||
|
||||
Copyright (C) 2002 Juraj 'HVGE' Durech
|
||||
Copyright (C) 2002 designia.sk
|
||||
|
||||
This program is free software; you can redistribute it and/or modify
|
||||
it under the terms of the GNU General Public License as published by
|
||||
the Free Software Foundation; either version 2 of the License, or
|
||||
(at your option) any later version.
|
||||
|
||||
This program is distributed in the hope that it will be useful,
|
||||
but WITHOUT ANY WARRANTY; without even the implied warranty of
|
||||
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
||||
GNU General Public License for more details.
|
||||
|
||||
You should have received a copy of the GNU General Public License
|
||||
along with this program; if not, write to the Free Software
|
||||
Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
|
||||
|
||||
* ---------------------------------------------------------------------
|
||||
* XHTML_output.php xhtml output module
|
||||
*/
|
||||
|
||||
class XHTML_output
|
||||
{
|
||||
function XHTML_output() { return; }
|
||||
|
||||
// input: string, array()
|
||||
|
||||
function pair ($tag, &$attributes)
|
||||
{
|
||||
if($attributes == null)
|
||||
return "<$tag>";
|
||||
$attr = null;
|
||||
foreach ($attributes as $value)
|
||||
{
|
||||
if($value[1]) $attr .= ' '.$value[0].'="'.$value[1].'"';
|
||||
}
|
||||
return "<$tag$attr>";
|
||||
}
|
||||
|
||||
function single ($tag, &$attributes)
|
||||
{
|
||||
if($attributes == null)
|
||||
return "<$tag />";
|
||||
$attr = null;
|
||||
foreach ($attributes as $value)
|
||||
{
|
||||
if($value[1]) $attr .= $value[0].'="'.$value[1].'" ';
|
||||
}
|
||||
return "<$tag $attr/>";
|
||||
}
|
||||
|
||||
// template for end tags
|
||||
function close ($tag)
|
||||
{
|
||||
return "</$tag>";
|
||||
}
|
||||
|
||||
function template_end() { return null; }
|
||||
|
||||
} //END class XHTML_output
|
||||
|
||||
?>
|
||||
@ -1,117 +0,0 @@
|
||||
<?php
|
||||
/*
|
||||
* tag|wall | PHP Tag Filter|
|
||||
* ---------------------------------------------------------------------
|
||||
|
||||
Copyright (C) 2002 designia.sk
|
||||
|
||||
This program is free software; you can redistribute it and/or modify
|
||||
it under the terms of the GNU General Public License as published by
|
||||
the Free Software Foundation; either version 2 of the License, or
|
||||
(at your option) any later version.
|
||||
|
||||
This program is distributed in the hope that it will be useful,
|
||||
but WITHOUT ANY WARRANTY; without even the implied warranty of
|
||||
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
||||
GNU General Public License for more details.
|
||||
|
||||
You should have received a copy of the GNU General Public License
|
||||
along with this program; if not, write to the Free Software
|
||||
Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
|
||||
|
||||
* ---------------------------------------------------------------------
|
||||
* tw-config.php
|
||||
*
|
||||
*/
|
||||
|
||||
// paths
|
||||
define ('TW_PATH', 'tw/');
|
||||
define ('TW_LANG', TW_PATH.'lang/');
|
||||
define ('TW_CACHE', TW_PATH.'tw_cache/');
|
||||
define ('TW_SETUP', TW_PATH.'filter-setup/');
|
||||
define ('TW_ERRMODULE', TW_PATH.'error/');
|
||||
define ('TW_OUTMODULE', TW_PATH.'output/');
|
||||
|
||||
// tag flags
|
||||
define ('TW_NOP', 0x0001);
|
||||
define ('TW_OPT', 0x0002);
|
||||
define ('TW_OVR', 0x0004);
|
||||
define ('TW_DUP', 0x0008);
|
||||
|
||||
// attr filter commands
|
||||
define ('TW_ALL', 0);
|
||||
define ('TW_URL', 1); // value is url
|
||||
define ('TW_LINK', 2); // value is link
|
||||
define ('TW_NUM', 3); // value must be between
|
||||
define ('TW_CASE', 4); // value must be in case of..
|
||||
define ('TW_REQ', 8); // required attribute
|
||||
|
||||
define ('TW_RQ_ALL', TW_REQ);
|
||||
define ('TW_RQ_URL', 1 | TW_REQ);
|
||||
define ('TW_RQ_LINK', 2 | TW_REQ);
|
||||
define ('TW_RQ_NUM', 3 | TW_REQ);
|
||||
define ('TW_RQ_CASE', 4 | TW_REQ);
|
||||
|
||||
if(!defined('FSHL_WITH_TW_DEFINED'))
|
||||
{
|
||||
define ('FSHL_WITH_TW_DEFINED', 1);
|
||||
|
||||
// debug modes (on - 1, off - 0)
|
||||
// only shlParser supports DEBUG modes
|
||||
define ('DEBUG_STATE', 0); // enable debug states
|
||||
define ('DEBUG_REPORT', 0); // enable parser error reports and infos
|
||||
|
||||
// fshlParser() 'option' flags (not used at this time)
|
||||
define ('P_DISABLE_RECURSION', 0x0001);
|
||||
define ('P_DISABLE_NEWLANG', 0x0002);
|
||||
define ('P_DISABLE_EXECUTE', 0x0004);
|
||||
define ('P_DISABLE_EXIT', 0x0008);
|
||||
define ('P_DEFAULT', 0x0000);
|
||||
|
||||
// F/SHL state flags
|
||||
define ('PF_VOID', 0x0000);
|
||||
define ('PF_KEYWORD', 0x0001);
|
||||
define ('PF_RECURSION', 0x0004);
|
||||
define ('PF_NEWLANG', 0x0008);
|
||||
define ('PF_EXECUTE', 0x0010); // not used
|
||||
|
||||
// TW state flags
|
||||
define ('PF_CLEAN', 0x0100);
|
||||
define ('PF_XIO', 0x0200);
|
||||
define ('PF_XDONE', 0x0400);
|
||||
define ('PF_XNEW', 0x0800);
|
||||
|
||||
// state field indexes
|
||||
define ('XL_DIAGR', 0);
|
||||
define ('XL_FLAGS', 1);
|
||||
define ('XL_CLASS', 2);
|
||||
define ('XL_DATA', 3);
|
||||
|
||||
define ('XL_DSTATE', 0);
|
||||
define ('XL_DTYPE', 1);
|
||||
|
||||
// internal and special states
|
||||
define ('P_RET_STATE', '_RET');
|
||||
define ('P_QUIT_STATE', '_QUIT');
|
||||
|
||||
// group delimiters
|
||||
$group_delimiters=array(
|
||||
|
||||
"SPACE", "!SPACE",
|
||||
"NUMBER", "!NUMBER",
|
||||
"ALPHA", "!ALPHA",
|
||||
"ALNUM", "!ALNUM",
|
||||
"HEXNUM", "!HEXNUM",
|
||||
"_ALL",
|
||||
|
||||
// TODO: Add special language depended groups here.
|
||||
// See function shlParser::isdelimiter()
|
||||
// and fshlGenerator::make_isdx(). You must
|
||||
// implement your new delimiters...
|
||||
"PHP_DELIM",
|
||||
);
|
||||
|
||||
$fshl_signatures=array("SHL","TW");
|
||||
|
||||
} //end if(!defined())
|
||||
?>
|
||||
@ -1,118 +0,0 @@
|
||||
<?php
|
||||
/*
|
||||
* tag|wall | PHP Tag Filter|
|
||||
* ---------------------------------------------------------------------
|
||||
|
||||
Copyright (C) 2002 Juraj 'HVGE' Durech
|
||||
Copyright (C) 2002 www.designia.sk
|
||||
|
||||
This program is free software; you can redistribute it and/or modify
|
||||
it under the terms of the GNU General Public License as published by
|
||||
the Free Software Foundation; either version 2 of the License, or
|
||||
(at your option) any later version.
|
||||
|
||||
This program is distributed in the hope that it will be useful,
|
||||
but WITHOUT ANY WARRANTY; without even the implied warranty of
|
||||
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
||||
GNU General Public License for more details.
|
||||
|
||||
You should have received a copy of the GNU General Public License
|
||||
along with this program; if not, write to the Free Software
|
||||
Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
|
||||
|
||||
* ---------------------------------------------------------------------
|
||||
* tw-errors.php
|
||||
*
|
||||
* This file containing basic error definitions and basic error handling class.
|
||||
*
|
||||
*/
|
||||
|
||||
// comments
|
||||
define('TWE_OK', 0x0000); // null
|
||||
define('TWE_VERSION', 0x0001); // param1=parser_version, param2=lang_version
|
||||
define('TWE_NOTE', 0x0002); // param2=note / tips / etc...
|
||||
define('TWE_CREDITS', 0x0003); // null
|
||||
|
||||
// warnings
|
||||
define('TWE_STACK_UNDERFLOW', 0x0010); // param1=tag_name
|
||||
define('TWE_STACK_NOT_EMPTY', 0x0020); // param1=tags, stack not empty
|
||||
define('TWE_UNEXPECTED_EOST', 0x0030); // unexpected end of stream (tag completed automatically)
|
||||
define('TWE_UNEXPECTED_QUOTE', 0x0040); // atr="value>...
|
||||
|
||||
// errors
|
||||
define('TWE_SYNTAX', 0x0100); // null, HTML syntax error (for future strict bases)
|
||||
define('TWE_TOO_MANY_ATTRS', 0x0200); // tag_name, too many attrs in tag ..
|
||||
|
||||
// internal errors
|
||||
define('TWE_FILE_NOT_FOUND', 0x1000); // param1 = file
|
||||
define('TWE_BAD_SIGNATURE', 0x2000); // param1 = language, param2 = signature
|
||||
define('TWE_LANG_NOT_FOUND', 0x3000); // param1 = language
|
||||
|
||||
// indexes to ErrorArray
|
||||
define('TWE_ERRNO', 0); // error value
|
||||
define('TWE_PARAM1', 1); // parameter 1
|
||||
define('TWE_PARAM2', 2); // parameter 2
|
||||
define('TWE_POSIT', 3); // position in source
|
||||
define('TWE_CODE', 4); // piece of bad code
|
||||
|
||||
class TW_errors
|
||||
{
|
||||
var $IsError;
|
||||
var $ErrorArray;
|
||||
var $identifier;
|
||||
|
||||
/* class constructor
|
||||
*/
|
||||
function TW_errors($options = 0)
|
||||
{
|
||||
$this->IsError = 0;
|
||||
$this->ErrorArray = null;
|
||||
$this->identifier = 0;
|
||||
}
|
||||
|
||||
function is_error() { return $this->IsError; }
|
||||
|
||||
function get_err_array() { return $this->ErrorArray; }
|
||||
|
||||
function get_comments() { return $this->get_by_mask(0x000f); }
|
||||
|
||||
function get_warnings() { return $this->get_by_mask(0x00f0); }
|
||||
|
||||
function get_errors() { return $this->get_by_mask(0x0f00); }
|
||||
|
||||
function get_internal() { return $this->get_by_mask(0xf000); }
|
||||
|
||||
function get_by_mask($mask)
|
||||
{
|
||||
$ErrTemp = null;
|
||||
foreach($this->ErrorArray as $key => $value)
|
||||
{
|
||||
if($value[TWE_ERRNO] & $mask) $ErrTemp[$key] = $value;
|
||||
}
|
||||
return $ErrTemp;
|
||||
}
|
||||
|
||||
/* Input:
|
||||
* id: error id,
|
||||
* lang: error_language_array
|
||||
*
|
||||
* Outupt:
|
||||
* error text or null
|
||||
*/
|
||||
function get_error_text ( $id, &$lang )
|
||||
{
|
||||
if( in_array($id, $this->ErrorArray) )
|
||||
{
|
||||
$errno = $this->ErrorArray[$id][TWE_ERRNO];
|
||||
if( in_array($errno,$lang) )
|
||||
return sprintf( $lang[$errno],
|
||||
$this->ErrorArray[$id][TWE_PARAM1],
|
||||
$this->ErrorArray[$id][TWE_PARAM2] );
|
||||
else
|
||||
return sprintf( "Please translate errno 0x%x.",$errno );
|
||||
}
|
||||
return null;
|
||||
}
|
||||
|
||||
} // END class TW_errors
|
||||
?>
|
||||
@ -1,97 +0,0 @@
|
||||
<?php
|
||||
/*
|
||||
* tag|wall | PHP Tag Filter|
|
||||
* ---------------------------------------------------------------------
|
||||
|
||||
Copyright (C) 2002 Juraj 'HVGE' Durech
|
||||
Copyright (C) 2002 www.designia.sk
|
||||
|
||||
This program is free software; you can redistribute it and/or modify
|
||||
it under the terms of the GNU General Public License as published by
|
||||
the Free Software Foundation; either version 2 of the License, or
|
||||
(at your option) any later version.
|
||||
|
||||
This program is distributed in the hope that it will be useful,
|
||||
but WITHOUT ANY WARRANTY; without even the implied warranty of
|
||||
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
||||
GNU General Public License for more details.
|
||||
|
||||
You should have received a copy of the GNU General Public License
|
||||
along with this program; if not, write to the Free Software
|
||||
Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
|
||||
|
||||
* ---------------------------------------------------------------------
|
||||
* tw-tags.php - this file contains common tag definitions and
|
||||
* relationships
|
||||
*
|
||||
* WARNING: This is not filter configuration. Relationships are used
|
||||
* for correct cross tag fixing.
|
||||
* ---------------------------------------------------------------------
|
||||
* Tag flags:
|
||||
*
|
||||
* TW_DUP - remove duplicates ( not implemented )
|
||||
* <i>...<i>:::</i></i> => <i>...:::</i>
|
||||
*
|
||||
* TW_NOP - tag without end tag
|
||||
* <br /><hr /> etc..
|
||||
*
|
||||
* TW_OPT - tag have optional end tag ( optional end tag is closed automatically )
|
||||
* <li>line1<li>line2 => <li>line1</li><li>line2</li>
|
||||
*
|
||||
* CONT.OFF - content off ( not implemented )
|
||||
* <tag>content-off<tag2>content-on</tag1></tag> => <tag><tag2>content-on</tag1></tag>
|
||||
*
|
||||
* REQ.TAG - required tag in stack
|
||||
* <ul><li>... this is correct
|
||||
* <p><li>... this is not correct, result is <p>...
|
||||
*/
|
||||
$tw_tag_relations = array(
|
||||
|
||||
// TAG FLAG CONT.OFF REQ. TAG
|
||||
|
||||
"a" => array(0, 0, null),
|
||||
"b" => array(0, 0, null),
|
||||
"blockquote"=> array(0, 0, null),
|
||||
"big" => array(0, 0, null),
|
||||
"br" => array(TW_NOP, 0, null),
|
||||
"code" => array(0, 0, null),
|
||||
"dl" => array(0, 0, null),
|
||||
"dt" => array(TW_OPT, 0, array("dl")),
|
||||
"dd" => array(TW_OPT, 0, array("dl")),
|
||||
"div" => array(0, 0, null),
|
||||
"em" => array(0, 0, null),
|
||||
"h1" => array(0, 0, null),
|
||||
"h2" => array(0, 0, null),
|
||||
"h3" => array(0, 0, null),
|
||||
"h4" => array(0, 0, null),
|
||||
"h5" => array(0, 0, null),
|
||||
"h6" => array(0, 0, null),
|
||||
"hr" => array(TW_NOP, 0, null),
|
||||
"i" => array(0, 0, null),
|
||||
"img" => array(TW_NOP, 0, null),
|
||||
"ul" => array(0, 1, null),
|
||||
"ol" => array(0, 1, null),
|
||||
"li" => array(TW_OPT, 0, array("ul","ol")),
|
||||
"object" => array(0, 1, null),
|
||||
"p" => array(TW_OPT, 0, null),
|
||||
"pre" => array(0, 0, null),
|
||||
"small" => array(0, 0, null),
|
||||
"span" => array(0, 0, null),
|
||||
"strong" => array(0, 0, null),
|
||||
"style" => array(0, 1, null),
|
||||
"sub" => array(0, 0, null),
|
||||
"sup" => array(0, 0, null),
|
||||
"table" => array(0, 1, null),
|
||||
"caption" => array(0, 0, array("table")),
|
||||
"tbody" => array(0, 0, array("table")),
|
||||
"tfoot" => array(0, 0, array("table")),
|
||||
"thead" => array(0, 0, array("table")),
|
||||
"tr" => array(TW_OPT, 1, array("table","tbody")),
|
||||
"td" => array(TW_OPT, 0, array("tr")),
|
||||
"th" => array(TW_OPT, 0, array("tr")),
|
||||
"u" => array(0, 0, null),
|
||||
|
||||
// TODO: add your specific tags here...
|
||||
|
||||
);
|
||||
?>
|
||||
@ -1,291 +0,0 @@
|
||||
<?php
|
||||
/*
|
||||
* tag|wall ver 0.1.4 | PHP Tag Filter |
|
||||
* ---------------------------------------------------------------------
|
||||
|
||||
Copyright (C) 2002 Juraj 'HVGE' Durech
|
||||
Copyright (C) 2002 designia.sk
|
||||
|
||||
This program is free software; you can redistribute it and/or modify
|
||||
it under the terms of the GNU General Public License as published by
|
||||
the Free Software Foundation; either version 2 of the License, or
|
||||
(at your option) any later version.
|
||||
|
||||
This program is distributed in the hope that it will be useful,
|
||||
but WITHOUT ANY WARRANTY; without even the implied warranty of
|
||||
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
||||
GNU General Public License for more details.
|
||||
|
||||
You should have received a copy of the GNU General Public License
|
||||
along with this program; if not, write to the Free Software
|
||||
Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
|
||||
|
||||
* ---------------------------------------------------------------------
|
||||
* tw.php
|
||||
*
|
||||
* main tag|wall parser core
|
||||
* ---------------------------------------------------------------------
|
||||
*
|
||||
*/
|
||||
define ("TW_PARSER_VERSION", "0.1.4");
|
||||
|
||||
require_once(TW_PATH."tw-tags.php");
|
||||
require_once(TW_PATH."tw-errors.php");
|
||||
|
||||
class twParser
|
||||
{
|
||||
// class variables
|
||||
var $text, $textlen, $textpos;
|
||||
var $lang, $options;
|
||||
var $output, $err, $content_off;
|
||||
|
||||
var $out;
|
||||
var $_trans, $_flags, $_data, $_delim, $_class, $_keywords;
|
||||
var $_ret,$_quit;
|
||||
|
||||
var $base, $_names;
|
||||
|
||||
|
||||
// -----------------------------------------------------------------------
|
||||
// USER LEVEL functions
|
||||
//
|
||||
|
||||
/* twParser CLASS CONSTRUCTOR
|
||||
*
|
||||
* input:
|
||||
* string $language - TW language class name ( see directory tw/lang/ )
|
||||
* int $options - parser options (not used)
|
||||
*/
|
||||
function twParser(
|
||||
$language = "TW",
|
||||
$options = P_DEFAULT
|
||||
)
|
||||
{
|
||||
$_lang = $language."_lang";
|
||||
$_base = $language."_base";
|
||||
require_once (TW_LANG."$_base.php");
|
||||
require_once (TW_CACHE."$_lang.php");
|
||||
|
||||
$this->lang = new $_lang;
|
||||
$this->base = $_base;
|
||||
$this->options = $options;
|
||||
$this->_trans = &$this->lang->trans;
|
||||
$this->_flags = &$this->lang->flags;
|
||||
$this->_delim = &$this->lang->delim;
|
||||
$this->_ret = &$this->lang->ret;
|
||||
$this->_quit = &$this->lang->quit;
|
||||
$this->_names = &$this->lang->names;
|
||||
|
||||
$this->content_off = &$this->lang->content_off;
|
||||
}
|
||||
|
||||
/* STRIP TAGS
|
||||
*
|
||||
* input:
|
||||
* string $text - input string
|
||||
* array $configuration - filter configuration array ( see files in directory tw/filter-setup/ )
|
||||
* string $output_module - output module name ( tw/output )
|
||||
* string $error_module - error module name ( tw/error )
|
||||
* int $offset - offset in $text
|
||||
*
|
||||
* output:
|
||||
* parsed string
|
||||
*/
|
||||
function strip_tags (
|
||||
$text,
|
||||
&$configuration,
|
||||
$output_module = "XHTML",
|
||||
$error_module = "FOO",
|
||||
$offset = 0
|
||||
)
|
||||
{
|
||||
// open modules
|
||||
$_err = $error_module."_error";
|
||||
require_once (TW_ERRMODULE."$_err.php");
|
||||
$this->err = new $_err( $this->options );
|
||||
|
||||
$_out = $output_module."_output";
|
||||
require_once (TW_OUTMODULE."$_out.php");
|
||||
$this->output = new $_out;
|
||||
|
||||
// parser init
|
||||
$this->text = &$text;
|
||||
$this->textlen = strlen($text);
|
||||
$this->text .= "IMNOTREALLYOPTIMISTIC";
|
||||
$this->textpos = $offset;
|
||||
$this->out = null;
|
||||
|
||||
// FSHL pointers init
|
||||
$this->lang->pt = &$this->text;
|
||||
$this->lang->pti = &$this->textpos;
|
||||
$this->lang->out = &$this->out;
|
||||
$this->lang->err = &$this->err;
|
||||
$this->lang->output = &$this->output;
|
||||
|
||||
// base init
|
||||
$base = &$this->base;
|
||||
$this->lang->$base();
|
||||
$this->lang->config_tags = array_keys($configuration);
|
||||
// load initial configuration
|
||||
foreach($configuration as $tag => $attributes)
|
||||
{
|
||||
$this->lang->config_req_attr[$tag] = null;
|
||||
if(is_array($attributes))
|
||||
{
|
||||
$this->lang->config_attr[$tag] = array_keys($configuration[$tag]);
|
||||
foreach($attributes as $attr => $command)
|
||||
{
|
||||
if( $command )
|
||||
if( $command[0] & TW_REQ ) $this->lang->config_req_attr[$tag][] = $attr;
|
||||
}
|
||||
}
|
||||
else
|
||||
{
|
||||
$this->lang->config_attr[$tag] = $attributes;
|
||||
}
|
||||
}
|
||||
$this->lang->config = &$configuration;
|
||||
|
||||
// start parser
|
||||
$this->parse_string ( $this->lang->initial_state );
|
||||
|
||||
$this->out .= $this->lang->base_end();
|
||||
$this->out .= $this->output->template_end();
|
||||
|
||||
return $this->out;
|
||||
}
|
||||
|
||||
function get_position() { return $this->textpos; }
|
||||
|
||||
function get_out() { return $this->out; }
|
||||
|
||||
// error wrapper
|
||||
|
||||
function is_error() { return $this->err->is_error(); }
|
||||
function get_err_array() { return $this->err->get_err_array(); }
|
||||
function get_comments() { return $this->err->get_by_mask(0x000f); }
|
||||
function get_warnings() { return $this->err->get_by_mask(0x00f0); }
|
||||
function get_errors() { return $this->err->get_by_mask(0x0f00); }
|
||||
function get_internal() { return $this->err->get_by_mask(0xf000); }
|
||||
function get_by_mask($mask) { return $this->err->get_by_mask($mask); }
|
||||
function get_error_text ( $id, &$lang ) { return $this->err->get_error_text ( $id, $lang ); }
|
||||
|
||||
// ---------------------------------------------------------------------------------
|
||||
// LOW LEVEL functions
|
||||
//
|
||||
|
||||
// main parser function
|
||||
//
|
||||
function parse_string ($state)
|
||||
{
|
||||
$flags = $this->_flags[$state];
|
||||
$statename_n = $this->_names[$state]."_new";
|
||||
// perform IN function if required
|
||||
if( $flags & PF_XIO )
|
||||
{
|
||||
$statename_i = $this->_names[$state]."_in";
|
||||
$statename_o = $this->_names[$state]."_out";
|
||||
$this->lang->$statename_i();
|
||||
}
|
||||
$stateword = null;
|
||||
|
||||
while( ($word = $this->getword("isd$state")) != null )
|
||||
{
|
||||
if(is_array($word))
|
||||
{
|
||||
// word is delimiter
|
||||
$newstate = $this->_trans[$state][$word[0]][XL_DSTATE];
|
||||
|
||||
// char back to stream (CB2S) if required
|
||||
if( $this->_trans[$state][$word[0]][XL_DTYPE] )
|
||||
{
|
||||
if( $newstate == $state )
|
||||
{
|
||||
// If it is the same state, CB2S flag have different significance
|
||||
// re-initialize state (call IN function)
|
||||
$stateword = null;
|
||||
if( $flags & PF_XIO ) $this->lang->$statename_i();
|
||||
continue;
|
||||
}
|
||||
$this->textpos -= strlen($word[1]);
|
||||
}
|
||||
else
|
||||
{
|
||||
$stateword .= $word[1]; // add new parsed word to stateword
|
||||
}
|
||||
if( $newstate == $this->_ret ) // newstate is _RET from recursion
|
||||
{
|
||||
// perform NEW function if required
|
||||
if( $flags & PF_XNEW ) $this->lang->$statename_n($stateword);
|
||||
// perform OUT function if required
|
||||
if( $flags & PF_XIO ) $this->lang->$statename_o($stateword);
|
||||
// return from recursion
|
||||
return;
|
||||
}
|
||||
|
||||
if( $state != $newstate ) // recursion - only if it is really new state
|
||||
{
|
||||
// perform NEW function if required
|
||||
if( $flags & PF_XNEW ) $this->lang->$statename_n($stateword);
|
||||
// recursion
|
||||
$this->parse_string($newstate);
|
||||
// perform OUT function if required and return.
|
||||
if( $flags & PF_XDONE )
|
||||
{
|
||||
if( $flags & PF_XIO ) $this->lang->$statename_o(null);
|
||||
return;
|
||||
}
|
||||
continue;
|
||||
}
|
||||
}
|
||||
else
|
||||
{
|
||||
// word is not delimiter
|
||||
if( $flags & PF_CLEAN )
|
||||
{
|
||||
if(!$this->content_off)
|
||||
$this->out .= str_replace("<",">",$word);
|
||||
}
|
||||
else
|
||||
{
|
||||
$stateword .= $word;
|
||||
}
|
||||
}
|
||||
} //END while()
|
||||
|
||||
// TODO: check this OUT
|
||||
|
||||
// perform NEW function if required
|
||||
if( $flags & PF_XNEW ) $this->lang->$statename_n($stateword);
|
||||
// perform OUT function if required and return.
|
||||
if( $flags & PF_XIO ) $this->lang->$statename_o($stateword);
|
||||
}
|
||||
|
||||
// get word from stream
|
||||
//
|
||||
function getword ($state)
|
||||
{
|
||||
$result = null;
|
||||
if($this->textpos < $this->textlen)
|
||||
{
|
||||
$del = $this->lang->$state(); // call "is delimiter" isdX function
|
||||
if($del != false)
|
||||
{
|
||||
// actual char (or sub-string) is delimiter
|
||||
$this->textpos += strlen($del[1]);
|
||||
return $del;
|
||||
}
|
||||
else
|
||||
{
|
||||
// Actual char/string is not delimiter.
|
||||
// Result word is between current position and first delimiter in stream
|
||||
$result = $this->text[$this->textpos++];
|
||||
while(($this->textpos < $this->textlen) && !$this->lang->$state())
|
||||
$result .= $this->text[$this->textpos++];
|
||||
}
|
||||
}
|
||||
return $result;
|
||||
}
|
||||
|
||||
} // END class twParser
|
||||
?>
|
||||
@ -1,177 +0,0 @@
|
||||
<?php
|
||||
/* --------------------------------------------------------------- *
|
||||
* WARNING: ALL CHANGES IN THIS FILE WILL BE LOST
|
||||
*
|
||||
* Source language file: tw/lang/TW_lang.php
|
||||
* Language version: 1.0 (Sign:TW)
|
||||
*
|
||||
* Target file: tw/tw_cache/TW_lang.php
|
||||
* Build date: Wed 20.11.2002 00:29:40
|
||||
*
|
||||
* Generator version: 0.4.1
|
||||
* --------------------------------------------------------------- */
|
||||
class TW_lang extends TW_base
|
||||
{
|
||||
var $trans,$flags,$data,$delim,$class,$keywords;
|
||||
var $version,$signature,$initial_state,$ret,$quit;
|
||||
var $pt,$pti,$generator_version;
|
||||
var $names;
|
||||
|
||||
function TW_lang ()
|
||||
{
|
||||
$this->version="1.0";
|
||||
$this->signature="TW";
|
||||
$this->generator_version="0.4.1";
|
||||
$this->initial_state=0;
|
||||
$this->trans=array(0=>array("<"=>array(0=>1,1=>0,),),1=>array("ALPHA"=>array(0=>3,1=>1,),"/"=>array(0=>2,1=>0,),"<"=>array(0=>1,1=>1,),"!--"=>array(0=>11,1=>0,),"_ALL"=>array(0=>12,1=>0,),),2=>array("ALPHA"=>array(0=>4,1=>1,),"_ALL"=>array(0=>12,1=>0,),),3=>array("ALPHA"=>array(0=>4,1=>1,),"_ALL"=>array(0=>12,1=>0,),),4=>array("!ALNUM"=>array(0=>5,1=>1,),),5=>array("ALPHA"=>array(0=>6,1=>1,),">"=>array(0=>12,1=>0,),"/>"=>array(0=>12,1=>0,),),6=>array("!ALPHA"=>array(0=>7,1=>1,),">"=>array(0=>12,1=>1,),"/>"=>array(0=>12,1=>1,),),7=>array("\""=>array(0=>8,1=>0,),"'"=>array(0=>9,1=>0,),"ALNUM"=>array(0=>10,1=>1,),">"=>array(0=>12,1=>1,),"/>"=>array(0=>12,1=>1,),),8=>array("\""=>array(0=>12,1=>0,),),9=>array("'"=>array(0=>12,1=>0,),),10=>array("-"=>array(0=>10,1=>0,),"!ALNUM"=>array(0=>12,1=>1,),),11=>array("-->"=>array(0=>12,1=>0,),),);
|
||||
$this->flags=array(0=>256,1=>1024,2=>1536,3=>1536,4=>3584,5=>0,6=>3584,7=>1536,8=>512,9=>512,10=>512,11=>0,);
|
||||
$this->delim=array(0=>array(0=>"<",),1=>array(0=>"ALPHA",1=>"/",2=>"<",3=>"!--",4=>"_ALL",),2=>array(0=>"ALPHA",1=>"_ALL",),3=>array(0=>"ALPHA",1=>"_ALL",),4=>array(0=>"!ALNUM",),5=>array(0=>"ALPHA",1=>">",2=>"/>",),6=>array(0=>"!ALPHA",1=>">",2=>"/>",),7=>array(0=>"\"",1=>"'",2=>"ALNUM",3=>">",4=>"/>",),8=>array(0=>"\"",),9=>array(0=>"'",),10=>array(0=>"-",1=>"!ALNUM",),11=>array(0=>"-->",),);
|
||||
$this->ret=12;
|
||||
$this->quit=13;
|
||||
$this->names=array(0=>"OUT",1=>"T_tagWall",2=>"T_Cbegin",3=>"T_begin",4=>"T_gettag",5=>"T_in",6=>"A_begin",7=>"V_begin",8=>"VALUE1",9=>"VALUE2",10=>"VALUE3",11=>"HTML_comment",12=>"_RET",13=>"_QUIT",);
|
||||
}
|
||||
|
||||
/* OUT */
|
||||
function isd0 ()
|
||||
{
|
||||
$c1=$this->pt[$this->pti];
|
||||
if($c1=="<")
|
||||
return array("<","<");
|
||||
return false;
|
||||
}
|
||||
|
||||
/* T_tagWall */
|
||||
function isd1 ()
|
||||
{
|
||||
$p=$this->pti;
|
||||
$c1=$this->pt[$p++];
|
||||
$c2=$c1.$this->pt[$p++];
|
||||
$c3=$c2.$this->pt[$p];
|
||||
if(stristr("eaoinltsrvdukzmcpyhjbfgxwq",$c1))
|
||||
return array("ALPHA",$c1);
|
||||
if($c1=="/")
|
||||
return array("/","/");
|
||||
if($c1=="<")
|
||||
return array("<","<");
|
||||
if($c3=="!--")
|
||||
return array("!--","!--");
|
||||
return array("_ALL",$c1);
|
||||
}
|
||||
|
||||
/* T_Cbegin */
|
||||
function isd2 ()
|
||||
{
|
||||
$c1=$this->pt[$this->pti];
|
||||
if(stristr("eaoinltsrvdukzmcpyhjbfgxwq",$c1))
|
||||
return array("ALPHA",$c1);
|
||||
return array("_ALL",$c1);
|
||||
}
|
||||
|
||||
/* T_begin */
|
||||
function isd3 ()
|
||||
{
|
||||
$c1=$this->pt[$this->pti];
|
||||
if(stristr("eaoinltsrvdukzmcpyhjbfgxwq",$c1))
|
||||
return array("ALPHA",$c1);
|
||||
return array("_ALL",$c1);
|
||||
}
|
||||
|
||||
/* T_gettag */
|
||||
function isd4 ()
|
||||
{
|
||||
$c1=$this->pt[$this->pti];
|
||||
if(!stristr("eaoinltsrvdukzmcpyhjbfgxwq0123456789",$c1))
|
||||
return array("!ALNUM",$c1);
|
||||
return false;
|
||||
}
|
||||
|
||||
/* T_in */
|
||||
function isd5 ()
|
||||
{
|
||||
$p=$this->pti;
|
||||
$c1=$this->pt[$p++];
|
||||
$c2=$c1.$this->pt[$p];
|
||||
if(stristr("eaoinltsrvdukzmcpyhjbfgxwq",$c1))
|
||||
return array("ALPHA",$c1);
|
||||
if($c1==">")
|
||||
return array(">",">");
|
||||
if($c2=="/>")
|
||||
return array("/>","/>");
|
||||
return false;
|
||||
}
|
||||
|
||||
/* A_begin */
|
||||
function isd6 ()
|
||||
{
|
||||
$p=$this->pti;
|
||||
$c1=$this->pt[$p++];
|
||||
$c2=$c1.$this->pt[$p];
|
||||
if(!stristr("eaoinltsrvdukzmcpyhjbfgxwq",$c1))
|
||||
return array("!ALPHA",$c1);
|
||||
if($c1==">")
|
||||
return array(">",">");
|
||||
if($c2=="/>")
|
||||
return array("/>","/>");
|
||||
return false;
|
||||
}
|
||||
|
||||
/* V_begin */
|
||||
function isd7 ()
|
||||
{
|
||||
$p=$this->pti;
|
||||
$c1=$this->pt[$p++];
|
||||
$c2=$c1.$this->pt[$p];
|
||||
if($c1=="\"")
|
||||
return array("\"","\"");
|
||||
if($c1=="'")
|
||||
return array("'","'");
|
||||
if(stristr("eaoinltsrvdukzmcpyhjbfgxwq0123456789",$c1))
|
||||
return array("ALNUM",$c1);
|
||||
if($c1==">")
|
||||
return array(">",">");
|
||||
if($c2=="/>")
|
||||
return array("/>","/>");
|
||||
return false;
|
||||
}
|
||||
|
||||
/* VALUE1 */
|
||||
function isd8 ()
|
||||
{
|
||||
$c1=$this->pt[$this->pti];
|
||||
if($c1=="\"")
|
||||
return array("\"","\"");
|
||||
return false;
|
||||
}
|
||||
|
||||
/* VALUE2 */
|
||||
function isd9 ()
|
||||
{
|
||||
$c1=$this->pt[$this->pti];
|
||||
if($c1=="'")
|
||||
return array("'","'");
|
||||
return false;
|
||||
}
|
||||
|
||||
/* VALUE3 */
|
||||
function isd10 ()
|
||||
{
|
||||
$c1=$this->pt[$this->pti];
|
||||
if($c1=="-")
|
||||
return array("-","-");
|
||||
if(!stristr("eaoinltsrvdukzmcpyhjbfgxwq0123456789",$c1))
|
||||
return array("!ALNUM",$c1);
|
||||
return false;
|
||||
}
|
||||
|
||||
/* HTML_comment */
|
||||
function isd11 ()
|
||||
{
|
||||
$p=$this->pti;
|
||||
$c3=$this->pt[$p++].$this->pt[$p++].$this->pt[$p];
|
||||
if($c3=="-->")
|
||||
return array("-->","-->");
|
||||
return false;
|
||||
}
|
||||
|
||||
}
|
||||
?>
|
||||
Loading…
Reference in New Issue