--- parser3/src/www/htdocs/Attic/index.html 2001/08/07 13:23:33 1.260 +++ parser3/src/www/htdocs/Attic/index.html 2001/08/28 09:39:30 1.282 @@ -1,5 +1,93 @@ @USE t.p +dtf.p + +@main[] +^tfilemove[] +#^treplace[] +#^measuretest[] +#^savetest[] +#^oratestinsert[] +#^oratestread[] +#^process_check[] +#^ffcheck[]^[xxx] + +#$ORIGINS(1) +#^list[] +#^tests[] +#^func(0)
+ +@tfilemove[] +^file:move[a/a;b/b] + +@treplace[] +$шило-на-мыло[^table::set{a b +шило мыло +}] +$строка[бывает шило в задице] +^строка.replace[$шило-на-мыло]
+ +@measuretest[] +$im[^image::measure[mm2.jpg]] +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[/../cgi-bin/bbssi.pl; @@ -21,7 +109,39 @@ 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)
@@ -1633,7 +1753,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}
@@ -1653,8 +1773,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