Diff for /parser3/src/www/htdocs/Attic/index.html between versions 1.464 and 1.485

version 1.464, 2001/11/05 10:56:46 version 1.485, 2001/11/21 08:26:56
Line 1 Line 1
 @main[]  @main[]
 ^status[]  ^tappend2[]
 <hr>  #^badvsnprintf[]
   #^badoracequoting[]
   #^badconstructors[]
   #^xloadwrongtable[]
   #^xsetwrongtable[]
   #^if($form:test){y}{n}
   #^tablecolumnerror[]
   #^roll[]
   #^cookie2[]
   #^tableset[]
   #^math:PI.format{%.30f}
 #^xchildren[]  #^xchildren[]
 #^thashforeach3[]  #^thashforeach3[]
 #^thashforeach2[]  #^thashforeach2[]
Line 54 Line 64
 #^mail[]  #^mail[]
 #^exec[]  #^exec[]
 #^fori[]  #^fori[]
 ^tconnect[]  #^tconnect[]
 ^xslt[]  #^xslt[]
 #^xml[]  #^xml[]
 #^header[]  #^header[]
 <hr>  <hr>
 ^status[]  
 OK  OK
   
 @status[]  @tappend2[]
 $c[$status:sql.cache]  $t[^table::set{a        b}]^t.append{1  2}$t.a
 <table border=1>  
 <tr>  @badvsnprintf[]
         <td colspan=3>  ^connect[zzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzz]{
         sql.cache  }
         </td>  
 </tr>  
         <td>url</td>  @badoracequoting[]
         <td>time</td>  $SQL.connect-string[oracle://webspb:webpwd@mts?NLS_LANG=RUSSIAN_AMERICA.CL8MSWIN1251&NLS_DATE_FORMAT=YYYY-MM-DD HH24:MI:SS]
 ^c.menu{  ^connect[$SQL.connect-string]{
 <tr>  ^void:sql{delete from paf}
         <td>$c.url</td>  ^void:sql{insert into paf values (1, '$form:text')}
         <td>$c.time</td>  $paf[^table::sql{select * from paf}]
 </tr>  ^paf.menu{
 }          $paf.id: ^untaint{$paf.block}<hr>
 </table>  
   
 $c[$status:stylesheet.cache]  
 <table border=1>  
 <tr>  
         <td colspan=3>  
         stylesheet.cache  
         </td>  
 </tr>  
         <td>file</td>  
         <td>time</td>  
 ^c.menu{  
 <tr>  
         <td>$c.file</td>  
         <td>$c.time</td>  
 </tr>  
 }  
 </table>  
   
 $c[$status:charset.cache]  
 <table border=1>  
 <tr>  
         <td colspan=3>  
         charset.cache  
         </td>  
 </tr>  
         <td>file</td>  
 ^c.menu{  
 <tr>  
         <td>$c.file</td>  
 </tr>  
 }  }
 </table>  <hr>
   
   
   ^rem{
   $news[^table::sql{select description from news}[$.limit(3)]]
   ^news.menu{
           ^untaint{$news.description}<hr>
   
   }
   <hr>
   }
   
   $tables[^table::sql{select table_name from user_tables}]
   ^tables.menu{
   $tables.table_name<br>
   }
   
   }
   <hr>
   $env:PATH
   
   @badconstructors[]
   $bred[^string::length[]]
   $bred[^response::clear[]]
   $bred[^int::int[]]
   
   
   @xloadwrongtable[]
   $constr[^xdoc::load[wrongtable.xml]]
   
   @xsetwrongtable[]
   $constr[^xdoc::set{<?xml version="1.0" encoding="windows-1251z" ?>
   <block-list>^untaint[as-is]{$constructor}</block-list>}]
   
   
   @tablecolumnerror[]
   $t[^table::set{a}]
   $t.$a
   
   @roll[]
   #$date[^date::set(1970;1;2)]
   #^date.roll[month](-1)
   $date[^date::set(2038;1;1)]
   ^date.roll[month](+1)
   $date.year  $date.month  $date.day
   
   @cookie2[]
   #=$cookie:clientType[$.value[test]]=<br>
   =$cookie:clientType=<br>
   
   
   @tableset[]
   $a[^table::set{a
   1
   2}]
   ^eval(100\$a)
   
   
   
   @zzz[]
   
   
 @xchildren[]  
 $constructor[  $constructor[
 <block1 name="main_srvr" type="0" label="Основное тело" />  <block1 name="main_srvr" type="0" label="Основное тело" />
 <block2 name="main_srvr2" type="0" label="Основное тело" />  <block2 name="main_srvr2" type="0" label="Основное тело" />
Line 238  $hash[^hf.hash[]] Line 275  $hash[^hf.hash[]]
   
 @tcounter[]  @tcounter[]
 ^tcounterone[$DB_HOME]  ^tcounterone[$DB_HOME]
 #other root:  other root:
 #^tcounterone[${DB_HOME}2]  ^tcounterone[${DB_HOME}2]
 #again, first:  again, first:
 #^tcounterone[$DB_HOME]  ^tcounterone[$DB_HOME]
   
 @tcounterone[DB_HOME]  @tcounterone[DB_HOME]
 $counter[^hashfile::open[$DB_HOME;counter]]  $counter[^hashfile::open[$DB_HOME;counter]]
Line 294  paf=$hf.paf Line 331  paf=$hf.paf
 $a  $a
 $xdoc[^xdoc::create[doc]]  $xdoc[^xdoc::create[doc]]
 $doc[$xdoc.documentElement]  $doc[$xdoc.documentElement]
 $name[^doc.appendChild[^xdoc.createElement{name}]]  $name[^doc.appendChild[^xdoc.createElement[name]]]
 $text[^name.appendChild[^xdoc.createTextNode{петросян&nbsp^;co}]]  $text[^name.appendChild[^xdoc.createTextNode[петросян&coz]]]
 ^untaint[as-is]{=$text.nodeValue=}  ^untaint[as-is]{=$text.nodeValue=}
   
 @domedit[]  @domedit[]
Line 556  $a.status|$a.stderr<hr> Line 593  $a.status|$a.stderr<hr>
   
 @xdata[]  @xdata[]
 #$response:content-type[$.value[text/html] $.charset[windows-1251]]  #$response:content-type[$.value[text/html] $.charset[windows-1251]]
 $xdoc[^xdoc::load[input.xml]]  $xdoc[^xdoc::set{<?xml version="1.0" encoding="windows-1251"?>
   <!--DOCTYPE people SYSTEM "D:\Y\parser3project\parser3\src\www\htdocs\people.dtd"-->
   
   <people>
           <man id="1" имя="word слово">
                   <name>P&#171^;AF        B</name>
           </man>
                   <man id="2">
                           <name>ПИФ^taint[&]</name>
                   </man>
   </people>
   }]
   
 @xml[]  @xml[]
 ^xdata[]  ^xdata[]
Line 617  by id: Line 665  by id:
 }  }
   
 @show-xdoc2[xdoc]  @show-xdoc2[xdoc]
 ^xdoc.save[save.xml;  ^xdoc.save[out/save.xml;
 #       $.encoding[windows-1251]  #       $.encoding[windows-1251]
         $.method[xml]          $.method[xml]
 ]  ]
Line 625  $file[^xdoc.file[ Line 673  $file[^xdoc.file[
 #       $.encoding[windows-1251]  #       $.encoding[windows-1251]
         $.method[html]          $.method[html]
 ]]  ]]
 ^file.save[text;save_file.html]  ^file.save[text;out/save_file.html]
 <pre>^taint[^xdoc.string[]]  <pre>^taint[html][^xdoc.string[]]
 #       $.encoding[windows-1251]  #       $.encoding[windows-1251]
 #       $.method[html]  #       $.method[html]
 #]]  #]]

Removed from v.1.464  
changed lines
  Added in v.1.485


E-mail: