|
|
| version 1.88, 2002/08/06 14:25:36 | version 1.142, 2002/09/17 10:58:24 |
|---|---|
| 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] | $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 21 $selffilespec[$filespec] | Line 24 $selffilespec[$filespec] |
| # ^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 43 $selffilespec[$filespec] | Line 55 $selffilespec[$filespec] |
| #^subjvaltest[] | #^subjvaltest[] |
| #^tableselect0[] | #^tableselect0[] |
| #^memnotest1[] | #^memnotest1[] |
| #^transparams[] | |
| #^voidparams[] | #^voidparams[] |
| #^rolls2[] | #^rolls2[] |
| #^cacheexpireschanging[] | #^cacheexpireschanging[] |
| Line 73 $selffilespec[$filespec] | Line 84 $selffilespec[$filespec] |
| #^precisionProblem[] | #^precisionProblem[] |
| #^xpath[] | #^xpath[] |
| #^ttablesetlang[] | #^ttablesetlang[] |
| #^mail3[] | |
| #^ttime[] | #^ttime[] |
| #^tupper[] | #^tupper[] |
| #^treplace[] | #^treplace[] |
| Line 136 $selffilespec[$filespec] | Line 146 $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 184 $selffilespec[$filespec] | Line 191 $selffilespec[$filespec] |
| #^tfilespec[] | #^tfilespec[] |
| #^tcrypt[] | #^tcrypt[] |
| #^cryptdocsample[] | #^cryptdocsample[] |
| #^sendtests[] | |
| #^tnormalize[] | #^tnormalize[] |
| #^xmltransformbyxdoc[] | #^xmltransformbyxdoc[] |
| #^sergestrandef[] | #^sergestrandef[] |
| #^tstdin[] | #^tstdin[] |
| #^tfind[] | #^tfind[] |
| #^calendar[] | |
| #^mimet[] | #^mimet[] |
| #^cgit[] | |
| #^joinlimit[] | #^joinlimit[] |
| ^tableclonelimit[] | #^tableclonelimit[] |
| #^transparams[] | |
| #^sendtests[] | |
| #^wwrapperpass[] | |
| #^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[] | |
| <hr> | <hr> |
| OK | OK |
| @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[] | |
| $s[123] | |
| ^s.mid(0;2) | |
| @wwrapperpass[] | |
| $h[^hash::create[]] | |
| $h.a(1) | |
| ^my_method[^if(1){$h}] | |
| работает. так и должно быть? | |
| @my_method[p] | |
| ^p._count[] | |
| @tableclonelimit[] | @tableclonelimit[] |
| $source[^table::create{a | $source[^table::create{a |
| aa | aa |
| Line 227 xx | Line 508 xx |
| #^dest.join[$source;$.limit(2)] | #^dest.join[$source;$.limit(2)] |
| #^dest.join[$source;$.offset(1)$.limit(1)] | #^dest.join[$source;$.offset(1)$.limit(1)] |
| #^dest.join[$source;$.offset(1)$.limit(2)] | #^dest.join[$source;$.offset(1)$.limit(2)] |
| ^dest.join[$source;$.offset[cur]$.limit(1)] | #^dest.join[$source;$.offset[cur]$.limit(1)] |
| ^dest.join[$source;$.limit(0)] | |
| ^dest.menu{$dest.a}[,]<br> | ^dest.menu{$dest.a}[,]<br> |
| Line 321 $s[^for[i](0;999){фрагмент }] | Line 603 $s[^for[i](0;999){фрагмент }] |
| #^normalized.match[фраг][g]{перга} | #^normalized.match[фраг][g]{перга} |
| @sendtests[] | @sendtests[] |
| #^text[] | ^text[] |
| #^html[] | #^html[] |
| #^text-n-html[] | #^text-n-html[] |
| #^file[] | #^file[] |
| #^text-n-file[] | #^text-n-file[] |
| ^text-n-html-n-file[] | #^text-n-html-n-file[] |
| #^backwardcomp[] | #^backwardcomp[] |
| @backwardcomp[] | @backwardcomp[] |
| Line 1182 $t[^table::set{^untaint{^taint[$a-tab-b] | Line 1464 $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 1648 $abc[abc] | Line 1930 $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 1689 $response:body[^pict.gif[]] | Line 1971 $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 1763 $s[abcАБВ] | Line 2046 $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= ...} |