--- parser3/src/www/htdocs/Attic/index.html 2001/08/06 12:27:46 1.258 +++ parser3/src/www/htdocs/Attic/index.html 2001/09/06 08:25:08 1.295 @@ -1,8 +1,196 @@ +@USE +t.p +dtf.p + +@main[] +^thashdefault2[] +#^tcase2[] +#^tlsplit2[] +#^tconnect[] +#^timghtmlyu[] +#^timghtml[] +#^tresult[] +#^voidtest[] +#^ttext[] +#^tdoubledefault[] +#^tintdefault[] +#^t3partycookie[] +#^t3partycookie[] +#^tcookie[] +#^tfilemove[] +#^treplace[] +#^measuretest[] +#^savetest[] +#^oratestinsert[] +#^oratestread[] +#^process_check[] +#^ffcheck[]^[xxx] + +#$ORIGINS(1) +#^list[] +#^tests[] +#^func(0)
+ +@thashdefault2[] +$hash[ + $.a[1] + $.b[2] + $._default[xx] +] +$hash.c + +@tcase2[] +$hash[ + $.1{^load[code1]} + $.2{code2} +] +$hash.1 + +@tlsplit2[] +$splitURI[^request:uri.mid(1;^request:uri.length[]-1).lsplit[/]] +OK + +@tconnect[] +#^connect[mysql://hren:pwd@hren/zz]{hren} +^connect[mysql://]{^void:sql{show tables}} + + +@timghtmlyu[] +^img[/i/commons_22_prev.gif][$.vspace(100)] +@img[filename;params] +^if(-f $filename){$thisImage[^image::measure[$filename]]^thisImage.html[$params]} + +@timghtml[] +$êàðòèíêà[^image::measure[i/commons_22_prev.gif]] +#$hash[$.alt[222]] +#^timghtml-nested[$hash] +^timghtml-nested[$.alt[222]] + +@timghtml-nested[params] +^êàðòèíêà.html[$params] + +@tresult[] +44 +$result[] + +@voidtest[] +#$var[123x] +^var.int(4) + +@ttext[] +$êàðòèíêà[^image::load[/i/commons_22_prev.gif]] +^êàðòèíêà.font[ ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyzÀÁÂÃÄÅÆÇÈÉÊËÌÍÎÏÐÑÒÓÔÕÖרÙÚÛÜÝÞßàáâãäåæçèéêëìíîïðñòóôõö÷øùúûüýþÿ0123456789-+=!\"%:,.^^^;<>?@()[]'&*/^$;/i/font.gif](5) + +^êàðòèíêà.text(10;10)[ ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijkl] +^êàðòèíêà.text(10;30)[mnopqrstuvwxyzÀÁÂÃÄÅÆÇÈÉÊËÌÍÎÏÐÑÒÓÔÕÖרÙÚÛÜÝÞß] +^êàðòèíêà.text(10;50)[àáâãäåæçèéêëìíîïðñòóôõö÷øùúûüýþÿ0123456789] +^êàðòèíêà.text(10;70)[!-+=!\"%:,.^^^;<>?@()[]'&*/^$!] + + +$response:body[^êàðòèíêà.gif[]] + +@tdoubledefault[] +$a[123.6x] +#^a.double[] +^a.double(999) + + +@tintdefault[] +$a[123x] +#^a.int[] +^a.int(999) + +@t3partycookie2[] +#zz +zz + +@t3partycookie[] +zz + +@tcookie[] +$response:P3P[policyref="http://parser3/w3c/paf.xml"] +$cookie:test[$form:x^math:random(100)] +$env:HTTP_COOKIE
+get:$cookie:test +# + +@tfilemove[] +^file:move[a/a;b/b] + +@treplace[] +$øèëî-íà-ìûëî[^table::set{a b +øèëî ìûëî +}] +$ñòðîêà[áûâàåò øèëî â çàäèöå] +^ñòðîêà.replace[$øèëî-íà-ìûëî]
+ +@measuretest[] +$im[^image::measure[mm3.gif]] +x:y=${im.width}:${im.height}
+ +@savetest[] +$file[^file::load[text;index.html]] +^file.save[binary;/some/dir/here.dat] +OK + +@oratestinsert[] +^connect[oracle://mts_admin:admin_pwd@ORACLE.PAF.OFFICE.DESIGN.RU]{ +#^void:sql{create table lobtest(test clob)} +^void:sql{insert into lobtest values (/**test**/'áó''êâû')} +$table[^table::sql{select * from lobtest}] +^table.menu{^table.line[] } +} + +@oratestread[] +^connect[oracle://mts_admin:admin_pwd@ORACLE.PAF.OFFICE.DESIGN.RU]{ +^rem{ +$tables[^table::sql{select table_name from user_tables}] +^tables.menu{ + $tables.table_name
+} +
+} +$news[^table::sql{select * from news}[$.limit(2)]] +^rem{ +news columns:
+$news_columns[^news.columns[]] +^news_columns.menu{ + $news_columns.column
+} +
+} +news description:
+^news.menu{ +
+ $news.description +} +} + +@process_check[] +$f[^file::load[text;process.tpl]] +^process[$f.text] + +@ffcheck[] +^file:find[bug/index.html]{not found} + +@list[] +$list[^file:list[.;.*\.html^$]] +^list.menu{$list.name
} +#^list.count[] + +@func[param] +#[local] +$local(0) +^local.inc(1) +#$local($local+1) +^if($param<10){^func($param+1)} +=$local= + @bannerSSI[][code] -$code[^file::cgi[z/../cgi-bin/bbssi.pl; - $.QUERY_STRING[H=ad1.lbe.ru&pubid=91033&pg=1&vbn=26&num=1&w=-1&h=-1&r=ssi&i=http://go.bb.ru/images/onerror/bb.gif&g=http://www.bb.ru&before=
&after=
&bafter=] +$code[^file::cgi[/../cgi-bin/bbssi.pl; + $.QUERY_STRING[d=1&H=ad1.lbe.ru&pubid=91033&pg=1&vbn=26&num=1&w=-1&h=-1&r=ssi&i=http://go.bb.ru/images/onerror/bb.gif&g=http://www.bb.ru&before=
&after=
&bafter=] ]] -$result[^untaint[as-is]{$code.stderr text}] +$result[
^untaint[as-is]{$code.text}
] @bannerJS[] @@ -18,9 +206,44 @@ document.write(''); -@main[] +@tests[] +$ab(123) +${[ab]}= +
+$õýø[$.âîçðàñò(88)] $äîñòàòü[$.ïîëå[âîçðàñò]] ^õýø.[$äîñòàòü.ïîëå].format{%05d} +
+ +$ëþäè[ + $.âàñÿ[ + $.âîçðàñò(45) + ] +] +$÷åëîâåê[ + $.ïîëå[âîçðàñò] +] + +$ëþäè.âàñÿ.[$÷åëîâåê.ïîëå]
+^ëþäè.âàñÿ.[$÷åëîâåê.ïîëå].format{%010d}
+ + +
+$unsorted[^table::set{a b +1 1 +3 3 +2 2 +}] +$sorted[^unsorted.sort($unsorted.a)] +^sorted.menu{$sorted.a}[,] +
+ =^dtf:format[aaa-%Y-bbb-%m]= +
+ +#$ORIGINS(0) +^math:random(3686) +
+ #^bannerJS[] -^bannerSSI[] +#^bannerSSI[] $t[^table::set{a b 1 2 @@ -1627,7 +1850,7 @@ $tt.0
ïðèâåòïðèâåòïðèâåòïðèâåòïðèâåòïðèâåòïðèâåòïðèâåòïðèâåòïðèâåòïðèâåòïðèâåòïðèâåò321 ')} } - $ïðîâåðêà[^table::sql{select test from lotest}(6)] + $ïðîâåðêà[^table::sql{select test from lotest}[$.limit(6)]] ^ïðîâåðêà.menu{ # ^ïðîâåðêà.line[]:
^untaint[as-is]{$ïðîâåðêà.test}
# ^ïðîâåðêà.line[]:
^untaint[html]{$ïðîâåðêà.test}
@@ -1647,8 +1870,8 @@ $tt.0
}[
] }
-$cookie:reg0[$.value[8reg0]$.expires[session]] -$cookie:reg1[$.value[8reg1]$.expires[session]] +#$cookie:reg0[$.value[8reg0]$.expires[session]] +#$cookie:reg1[$.value[8reg1]$.expires[session]] $cookie:reg0 $cookie:reg1