|
|
| version 1.89, 2002/08/07 07:28:26 | 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 183 $selffilespec[$filespec] | Line 192 $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[] | #^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[] | |
| #^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[] | |
| $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 534 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 339 $s[^for[i](0;999){фрагмент }] | Line 647 $s[^for[i](0;999){фрагмент }] |
| @text[] | @text[] |
| ^mail:send[ | ^mail:send[ |
| $.from[paf] | $.from[paf] |
| $.to[] | $.to[paf] |
| $.text[ | $.text[ |
| $.value[this is text value] | $.value[this is text value] |
| ] | ] |
| Line 1182 $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 1648 $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 1689 $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 1763 $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= ...} |