Diff for /parser3/www/htdocs/Attic/index.html between versions 1.96 and 1.121

version 1.96, 2002/08/08 09:35:23 version 1.121, 2002/08/21 10:52:49
Line 1 Line 1
 #@USE  @USE
 #t.p  /derived.p
   
 @auto[filespec]  @auto[filespec]
 $selffilespec[$filespec]  $selffilespec[$filespec]
 #$form:here  #$form:here
 #$request:charset[UTF-8]  #$request:charset[UTF-8]
 #$response:charset[windows-1251]  #$response:charset[windows-1251]
   #$request:charset[windows-1251]
   #$response:charset[UTF-8]
 #$response:content-type[$.value[text/html]$.charset[$response:charset]]  #$response:content-type[$.value[text/html]$.charset[$response:charset]]
   
 #@postprocess[body]  #@postprocess[body]
Line 17  $selffilespec[$filespec] Line 19  $selffilespec[$filespec]
 #^a.format[%.10u]  #^a.format[%.10u]
 #$result[111]  #$result[111]
 #^f[a]  #^f[a]
 ^connect[mysql://mdm:4b833ljq@db-mysql/mdm]{  #^connect[mysql://mdm:4b833ljq@db-mysql/mdm]{
 #       ^int:sql{select news_id from news where news_id=-1}[  #       ^int:sql{select news_id from news where news_id=-1}[
 ##      $.default{2}  ##      $.default{2}
 #       ]<br>  #       ]<br>
   #    ^hash::sql{bad}
 #    ^string:sql{select news_id from news where news_id=-1}[$.default{2}]  #    ^string:sql{select news_id from news where news_id=-1}[$.default{2}]
 #       ^file::load[text;^string:sql{select '^^hello[]' }]  #       ^file::load[text;^string:sql{select 'from sql server' }]
 #       ^string:sql{select '^^hello[]' }] $ORIGINS(1)  #       ^string:sql{select '^^hello[]' }] $ORIGINS(1)
 #       ^process{       ^^h[]}  #       ^process{       ^^h[]}
         ^process{^string:sql{select '1  #       ^process{^string:sql{select '1
         ^^hello[]' }]   }  #       ^^hello[]' }]   }
 #    $f[^file::load[text;piece.p]]      ^process{$f.text}  #}
         $ORIGINS(1)  
   
 }  
 #^eval(2)  #^eval(2)
 #^tcrashlocaljunctionsv2[]  #^tcrashlocaljunctionsv2[]
 #^tcrashlocaljunctions[]  #^tcrashlocaljunctions[]
Line 80  $selffilespec[$filespec] Line 80  $selffilespec[$filespec]
 #^precisionProblem[]  #^precisionProblem[]
 #^xpath[]  #^xpath[]
 #^ttablesetlang[]  #^ttablesetlang[]
 #^mail3[]  
 #^ttime[]  #^ttime[]
 #^tupper[]  #^tupper[]
 #^treplace[]  #^treplace[]
Line 144  $selffilespec[$filespec] Line 143  $selffilespec[$filespec]
 #^tif[]  #^tif[]
 #^image[]  #^image[]
 #^mail2[]  #^mail2[]
 #^cookie[]  
 #^response[]  #^response[]
 #^regexp2[]  #^regexp2[]
 #^ttablerem[]  #^ttablerem[]
Line 196  $selffilespec[$filespec] Line 194  $selffilespec[$filespec]
 #^sergestrandef[]  #^sergestrandef[]
 #^tstdin[]  #^tstdin[]
 #^tfind[]  #^tfind[]
 #^calendar[]  
 #^mimet[]  #^mimet[]
 #^cgit[]  #^cgit[]
 #^joinlimit[]  #^joinlimit[]
Line 205  $selffilespec[$filespec] Line 202  $selffilespec[$filespec]
 #^sendtests[]  #^sendtests[]
 #^wwrapperpass[]  #^wwrapperpass[]
 #^badpos[]  #^badpos[]
   #^processtest[]
   #^mail3[]
   #^mail4[]
   #^datesaving[]
   #^badconstructor[]
   #^calendar[]
   #^monthdays(8)
   #^xdoctypetest[]
   #^xtabletest[]
   #^staticstest[]
   #^staticstest2[]
   #^rbodytest[]
   #^cookie[]
   #^cookieexpirestest[]
   #^postest[]
   #^voidpostest[]
   #^virtualtest[]
   ^badcolumntest[]
 <hr>  <hr>
 OK  OK
   
   @badcolumntest[]
   $table[^table::load[ext.cfg]]
   $table.b
   
   
   @virtualtest[]
   $derived[^derived::create[derived create actual param]]
   ^derived.test[]
   
   
   @voidpostest[]
   $s[]
   ^s.pos[$nothing]
   
   @postest[]
   $s[$nothing]
   ^s.pos[$nothing]
   
   @cookieexpirestest[]
   #$cookie:exptest[1]
   #$cookie:exptest[$.value[2] $.expires(+1)]
   $response:xxxx[^date::now(+10)]
   $response:yyy[$.value[^date::now(+20)]]
   $response:yyy[$.value[vvv] $.aaaa[^date::now(+20)]]
   
   @rbodytest[]
   $request:body=
   <form method=post>
   <input type=submit name=paf value=123>
   </form>
   
   @staticstest2[]
   ^$derived:derived_var=$derived:derived_var<br>
   ^$derived:a=$derived:a<br>
   $derived:a[changed] ^$derived:a=$derived:a<br>
   $derived:derived_var[changed] 
   ^$derived:derived_var=$derived:derived_var<br>
   
   @staticstest[]
   $derived[^derived::create[]]
   ^derived.test[]
   <hr>
   ^$derived.a=$derived.a<br>
   ^$derived.x=$derived.x<br>
   <hr>
   ^if($derived is derived){derived is derived}{error: derived is not derived}<br>
   ^if($derived is table){derived is table}{error:derived is not table}<br>
   <hr>
   ^^eval(^$derived)=^eval($derived)<br>
   ^^if(^$derived)=^if($derived){y}{n}<br>
   
   
   @xdoctypetest[]
   $xdoc[^xdoc::create[x]]
   ^if($xdoc is xdoc){y}{n}
   
   @xtabletest[]
   $xtableo[^xtable::create[]]
   ^if($xtableo is table){y}{n}
   #^xtableo.columns[]
   
   @monthdays[month]
   $from[^date::create(2000;$month;1)]
   $to[^date::create($from)] ^to.roll[month](+1)
   $result($to-$from)
   
   @badconstructor[]
   ^date::now[]
   
   @datesaving[]
   $now[^date::now[]]
   $now.daylightsaving<br>
   $now.yearday<br>
   #
   $date[^date::create(2002;1;3)]
   $date.daylightsaving<br>
   $date.yearday
   
   @mail4[]
   ^mail:send[
           $.from[paf@mail.design.ru]
           $.to[paf@mail.design.ru]
           $.subject[^taint[uri][москва]=2]
           $.text[^taint[uri][москва]=]
           $.html{<a href=http://there.ru/?city=^taint[uri][Москва]>link</a>}
   ]
   @processtest[]
       $f[^file::load[text;piece.p]]       ^process{$f.text}
           $ORIGINS(1)
   
   
 @badpos[]  @badpos[]
 $s[123]  $s[123]
Line 1208  $t[^table::set{^untaint{^taint[$a-tab-b] Line 1313  $t[^table::set{^untaint{^taint[$a-tab-b]
   
 @mail3[]  @mail3[]
 ^mail:send[  ^mail:send[
         $.from[Александр Петросян <paf@design.ru>]          $.from[Александр Петросян <paf@mail.design.ru>]
         $.to[Александр Петросян <paf@design.ru>]          $.to[Александр Петросян <paf@mail.design.ru>]
         $.subject[проверка4]          $.subject[проверка2]
         $.body[          $.body[
                 $.text[                  $.text[
                         $.content-type[$.value[text/plain] $.charset[windows-1251]]                          $.content-type[$.value[text/plain] $.charset[windows-1251]]
                         $.body[проверка]                          $.body[проверка^taint[uri][москва]=]
                 ]                  ]
                 $.attachment[                  $.attachment[
                         $.value[^file::load[text;index.html]]                          $.value[^file::load[text;index.html]]
Line 1674  $abc[abc] Line 1779  $abc[abc]
   
 @calendar[]  @calendar[]
 $year(2002)  $year(2002)
 $month(8)  $month(12)
 ${year}-${month}:<br>  ${year}-${month}:<br>
 $week_days[^date:calendar[rus]($year;$month)]  $week_days[^date:calendar[rus]($year;$month)]
 <pre>  <pre>
 ^week_days.menu{^for[wday](0;6){^if($week_days.$wday){$week_days.$wday;&nbsp^;&nbsp^;} }=$week_days.week=<br>}  ^week_days.menu{^for[wday](0;6){^if($week_days.$wday){$week_days.$wday;&nbsp^;&nbsp^;} }=$week_days.week,$week_days.year=<br>}
 </pre>  </pre>
   
 @thash[]  @thash[]
Line 1723  $response:body[^pict.gif[]] Line 1828  $response:body[^pict.gif[]]
 ]  ]
   
 @cookie[]  @cookie[]
 $env:HTTP_COOKIE<br>  #$env:HTTP_COOKIE<br>
   
 #$cookie:переменная[test тест ТЕСТ2]  #$cookie:переменная[test тест ТЕСТ2]
 =$cookie:переменная=<br>  =$cookie:переменная=<br>

Removed from v.1.96  
changed lines
  Added in v.1.121


E-mail: