|
|
| version 1.93, 2002/08/07 13:44:00 | version 1.147, 2002/09/17 16:16:16 |
|---|---|
| Line 1 | Line 1 |
| #@USE | @USE |
| #t.p | /derived.p |
| /operators.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] | $request:charset[windows-1251] |
| $response:charset[windows-1251] | |
| #$response:charset[UTF-8] | |
| #$response:charset[empty] | |
| #$response:content-type[$.value[text/html]$.charset[$response:charset]] | #$response:content-type[$.value[text/html]$.charset[$response:charset]] |
| #@postprocess[body] | #@postprocess[body] |
| Line 19 $selffilespec[$filespec] | Line 23 $selffilespec[$filespec] |
| #^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 'from sql server' }] | |
| # ^string:sql{select '^^hello[]' }] $ORIGINS(1) | |
| # ^process{ ^^h[]} | |
| # ^process{^string:sql{select '1 | |
| # ^^hello[]' }] } | |
| # ^double:sql{select '2*' ^; } | |
| #$card_sequence_expect_no(^double:sql{select 20020909131047 #card_sequence_expect_no from card_sequence}) | |
| #^card_sequence_expect_no.format[%15.f] | |
| #} | #} |
| #^eval(2) | #^eval(2) |
| #^tcrashlocaljunctionsv2[] | #^tcrashlocaljunctionsv2[] |
| Line 72 $selffilespec[$filespec] | Line 85 $selffilespec[$filespec] |
| #^precisionProblem[] | #^precisionProblem[] |
| #^xpath[] | #^xpath[] |
| #^ttablesetlang[] | #^ttablesetlang[] |
| #^mail3[] | |
| #^ttime[] | #^ttime[] |
| #^tupper[] | #^tupper[] |
| #^treplace[] | #^treplace[] |
| Line 135 $selffilespec[$filespec] | Line 147 $selffilespec[$filespec] |
| #^ford[] | #^ford[] |
| #^tif[] | #^tif[] |
| #^image[] | #^image[] |
| #^mail2[] | |
| #^cookie[] | |
| #^response[] | #^response[] |
| #^regexp2[] | #^regexp2[] |
| #^ttablerem[] | #^ttablerem[] |
| #^pcre[] | #^pcre[] |
| #^regexp[]<hr> | #^regexp[]<hr> |
| #^mail[] | #^mail[] |
| #^exec[] | |
| #^fori[] | #^fori[] |
| #^tconnect[] | #^tconnect[] |
| #^xslt[] | #^xslt[] |
| Line 188 $selffilespec[$filespec] | Line 197 $selffilespec[$filespec] |
| #^sergestrandef[] | #^sergestrandef[] |
| #^tstdin[] | #^tstdin[] |
| #^tfind[] | #^tfind[] |
| #^calendar[] | |
| #^mimet[] | #^mimet[] |
| #^cgit[] | |
| #^joinlimit[] | #^joinlimit[] |
| #^tableclonelimit[] | #^tableclonelimit[] |
| #^transparams[] | #^transparams[] |
| #^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[] | |
| #^delimiters[] | |
| #^новый-split[] | |
| #^грязные-cookie[] | |
| #^html-почта[] | |
| #^badswitchtest[] | |
| #^okswitchtest[] | |
| #^cgit[] | |
| #^ttransformsep[] | |
| #^calltest[] | |
| #^xpath3[] | |
| #^doubleliterals[] | |
| #^newxor[] | |
| #^mail2[] | |
| #^exec[] | |
| #^passpost[] | |
| #^menudelim[] | |
| #^fordelim[] | |
| #^duplicatetable2hashkey[] | |
| #^duplicatehashsqlkey[] | |
| #^longlreplace[] | |
| #^table2hash_onecolumn[] | |
| #^crossopvars[] | |
| ^three[] | |
| <hr> | <hr> |
| OK | OK |
| @crossopvars[] | |
| #^one[]<hr> | |
| ^two[]<hr> | |
| @table2hash_onecolumn[] | |
| $t[^table::create{a | |
| 1 | |
| 1 | |
| }] | |
| #^t.hash[a] | |
| #^t.hash[a;b] | |
| $h[^t.hash[a][$.distinct(1)]] | |
| $h.1.a | |
| @longlreplace[] | |
| $str1[ мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла ] | |
| $str2[ела] | |
| $str[Мама $str1 раму] | |
| ^str.replace[^table::create[nameless]{мыла $str2}] | |
| @duplicatehashsqlkey[] | |
| ^connect[mysql://mdm:4b833ljq@db-mysql/mdm]{ | |
| $t[^table::sql{select * from news}] | |
| $c[^t.columns[]] | |
| ^c.menu{$c.column}[,] | |
| $h[^hash::sql{select news_type_id, name from news}[$.distinct(1)]] | |
| } | |
| @duplicatetable2hashkey[] | |
| $t[^table::create{a b | |
| 1 2 | |
| 1 3 | |
| }] | |
| #^t.hash[a] | |
| #^t.hash[a;b] | |
| ^t.hash[a][$.distinct[1]] | |
| @menudelim[] | |
| $t[^table::create{a | |
| 1 | |
| 2 | |
| 3 | |
| 4 | |
| 5 | |
| }] | |
| ^t.menu{^if($t.a<3){}{$t.a}}[,] | |
| @fordelim[] | |
| ^for[a](0;6){^if($a<3){}{$a}}[,] | |
| @passpost[] | |
| <form method=post name="test" id="test"> | |
| <textarea name="text" cols=20 rows =6>^taint[html][1 | |
| 2 | |
| 3]</textarea><br> | |
| <input type=submit> | |
| </form> | |
| ^if(def $form:text){ | |
| $a[^file::cgi[a.pl]] | |
| $a.text|$a.status|$a.stderr<hr> | |
| } | |
| @exec[] | |
| #$a[^file::exec[a.cmd]] | |
| $a[^file::cgi[a.cmd]] | |
| $a.text|$a.status|$a.stderr<hr> | |
| @newxor[] | |
| ^eval(1!|2 #примечание()zzz | |
| |0x100)<br> | |
| #^eval(1!||2)<br> | |
| ^if(1!|1){y}{n} | |
| #@method[$bad] | |
| @doubleliterals[] | |
| #^eval(1e-10) | |
| ^eval("1e-20") | |
| @xpath3[] | |
| $constr[^xdoc::create{<?xml version="1.0" encoding="$request:charset" standalone="no"?> <constructor-data><object object_type_id="1" template_id="1" data_process_id="1" is_published="1">проверка</object> <block-list> <block name="date" type="0" label="Дата" is_hide_pub="1" data_type="1"/> <block name="content" type="0" label="Текст" is_hide_pub="1" data_type=""/> </block-list></constructor-data>}] | |
| $objectData[^constr.selectSingle[/constructor-data/object]] | |
| $objectData.nodeType<br> | |
| $objectData.firstChild.nodeValue | |
| @calltest[] | |
| ^calltest2[string] | |
| @calltest2[s] | |
| $s | |
| @ttransformsep[] | |
| $input[^xdoc::load[20020909131046.xml]] | |
| $output[^input.transform[generated.xsl]] | |
| ^output.string[] | |
| @okswitchtest[] | |
| $local[local value] | |
| ^switch[1]{ | |
| ^case[1]{1code $local} | |
| } | |
| @badswitchtest[] | |
| ^switch[1]{ | |
| ^badswitchtestcase[] | |
| } | |
| @badswitchtestcase[][local] | |
| $local[local value] | |
| ^case[1]{1code $local} | |
| @badjunction[] | |
| ^badj1[] | |
| ^badj2[] | |
| @html-почта[] | |
| $переменная[значение] | |
| ^mail:send[ | |
| $.from[paf@mail] | |
| $.to[paf@mail] | |
| $.subject[htmltest1] | |
| $.html{тест$переменная= !} | |
| ] | |
| @грязные-cookie[] | |
| $cookie:a[&] | |
| $cookie:a | |
| @новый-split[] | |
| $abc[a.b.c] | |
| #$table[^abc.split[.]] | |
| #$table[^abc.split[.;l]] | |
| #$table[^abc.split[.;v]] | |
| $table[^abc.split[.;lv]] | |
| ^table.menu{$table.piece}[,] | |
| <hr> | |
| #$table[^abc.split[.;h]] | |
| $table[^abc.split[.;hr]] | |
| $table.0,$table.1,$table.2<br> | |
| @delimiters[] | |
| $a#1[1]<br> | |
| $a#1=<br> | |
| @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] |
| ^s.mid(1;23) | ^s.mid(0;2) |
| @wwrapperpass[] | @wwrapperpass[] |
| $h[^hash::create[]] | $h[^hash::create[]] |
| Line 1200 $t[^table::set{^untaint{^taint[$a-tab-b] | Line 1490 $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 1666 $abc[abc] | Line 1956 $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; ^; ^;} }=$week_days.week=<br>} | ^week_days.menu{^for[wday](0;6){^if($week_days.$wday){$week_days.$wday; ^; ^;} }=$week_days.week,$week_days.year=<br>} |
| </pre> | </pre> |
| @thash[] | @thash[] |
| Line 1707 $response:body[^pict.gif[]] | Line 1997 $response:body[^pict.gif[]] |
| @mail2[] | @mail2[] |
| ^mail:send[ | ^mail:send[ |
| $.message-id[<6615%1@parser.ru>] | |
| $.content-type[$.value[text/plain] $.charset[windows-1251]] | $.content-type[$.value[text/plain] $.charset[windows-1251]] |
| $.from[Александр Петросян <paf@design.ru>] | $.from[Александр Петросян <paf@design.ru>] |
| $.to[Александр Петросян <paf@design.ru>] | $.to[Александр Петросян <paf@design.ru>] |
| $.subject[проверка] | $.subject[проверка проверка] |
| $.body[проверка] | $.text[проверка] |
| ] | ] |
| @cookie[] | @cookie[] |
| $env:HTTP_COOKIE<br> | #$env:HTTP_COOKIE<br> |
| #$cookie:переменная[test тест ТЕСТ2] | #$cookie:переменная[test тест ТЕСТ2] |
| =$cookie:переменная=<br> | =$cookie:переменная=<br> |
| Line 1781 $s[abcАБВ] | Line 2072 $s[abcАБВ] |
| 3] | 3] |
| ] | ] |
| @exec[] | |
| $a[^file::exec[fc.exe;;a;b]] | |
| $a.status|$a.stderr<hr> | |
| @fori[][i] | @fori[][i] |
| ^for[i](1;3){... =$i= ...} | ^for[i](1;3){... =$i= ...} |