|
|
| version 1.118, 2002/08/20 09:37:31 | version 1.155, 2002/09/24 10:24:23 |
|---|---|
| Line 1 | Line 1 |
| @USE | @USE |
| /derived.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] |
| #$request:charset[windows-1251] | $response:charset[windows-1251] |
| #$response:charset[UTF-8] | #$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 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} | # ^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}] |
| Line 30 $selffilespec[$filespec] | Line 32 $selffilespec[$filespec] |
| # ^process{ ^^h[]} | # ^process{ ^^h[]} |
| # ^process{^string:sql{select '1 | # ^process{^string:sql{select '1 |
| # ^^hello[]' }] } | # ^^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 142 $selffilespec[$filespec] | Line 147 $selffilespec[$filespec] |
| #^ford[] | #^ford[] |
| #^tif[] | #^tif[] |
| #^image[] | #^image[] |
| #^mail2[] | |
| #^response[] | #^response[] |
| #^regexp2[] | #^regexp2[] |
| #^ttablerem[] | #^ttablerem[] |
| #^pcre[] | #^pcre[] |
| #^regexp[]<hr> | #^regexp[]<hr> |
| #^mail[] | #^mail[] |
| #^exec[] | |
| #^fori[] | #^fori[] |
| #^tconnect[] | #^tconnect[] |
| #^xslt[] | #^xslt[] |
| Line 195 $selffilespec[$filespec] | Line 198 $selffilespec[$filespec] |
| #^tstdin[] | #^tstdin[] |
| #^tfind[] | #^tfind[] |
| #^mimet[] | #^mimet[] |
| #^cgit[] | |
| #^joinlimit[] | #^joinlimit[] |
| #^tableclonelimit[] | #^tableclonelimit[] |
| #^transparams[] | #^transparams[] |
| Line 216 $selffilespec[$filespec] | Line 218 $selffilespec[$filespec] |
| #^rbodytest[] | #^rbodytest[] |
| #^cookie[] | #^cookie[] |
| #^cookieexpirestest[] | #^cookieexpirestest[] |
| ^postest[] | #^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[] | |
| #^badLangAfterCatch[] | |
| #^zeroinstdin[] | |
| #^shifts[] | |
| #^jspace[] | |
| #^user-foreach-test[] | |
| #^touchittest[] | |
| #^hashselfmodification[] | |
| #^emptyTransformResult[] | |
| #^badxdoccreate[] | |
| #^if(-d "CVS"){y}{n} | |
| #^badjunctioncall[] | |
| ^russianindex[] | |
| <hr> | <hr> |
| OK | OK |
| @russianindex[] | |
| #dir with files with russian-lang names | |
| $where[dir] | |
| $dir[^file:list[$where;\.txt^$]] | |
| ^dir.menu{ | |
| <a href=$where/^untaint[uri]{$dir.name}>$dir.name</a><br> | |
| } | |
| @badjunctioncall[] | |
| ^badjunctioncallinside{code} | |
| @badjunctioncallinside[code] | |
| xx^code[] | |
| @badxdoccreate[] | |
| $xdoc[^xdoc::create[вася]] | |
| #$xdoc[^xdoc::create{<?xml version="1.0" encoding="$request:charset"?><doc>вася</doc>}] | |
| ^xdoc.firstChild.setAttribute[name;значение] | |
| ^xdoc.string[] | |
| @emptyTransformResult[] | |
| $input[^xdoc::create[docBad]] | |
| $sheet[^xdoc::create{<?xml version="1.0"?> | |
| <xsl:stylesheet xmlns:xsl="http://www.w3.org/1999/XSL/Transform" version="1.0"> | |
| <xsl:template match="doc"> | |
| output | |
| </xsl:template> | |
| </xsl:stylesheet> | |
| }] | |
| $output[^input.transform[$sheet]] | |
| $response:body[^output.file[]] | |
| @hashselfmodification[] | |
| $hash[ | |
| $.a[1] | |
| $.b[2] | |
| ] | |
| ^hash.foreach[key;value]{ | |
| # $hash.c[1] | |
| $hash.a[1] | |
| } | |
| @touchittest[][i] | |
| ^touchit[] | |
| $i | |
| @user-foreach-test[][key;value] | |
| ^user-foreach[key;value]{$key=$value<br>} | |
| @user-foreach[key;value;code] | |
| ^for[i](1;10){ | |
| $code.$key($i) | |
| $code.$value($i*2) | |
| $code | |
| } | |
| @jspace[] | |
| $a(1) | |
| ^jspace_call{^eval($a*2)} | |
| #$a(2) | |
| #$junction | |
| @jspace_call[param][a] | |
| $a[unrelcfgdfgated] | |
| $junction<br> | |
| $junction.a(2) | |
| $junction<br> | |
| @shifts[] | |
| ^eval(1<<3)<br> | |
| ^eval(8>>2)<br> | |
| #^if(1=1){y;n}<br> | |
| @zeroinstdin[] | |
| #$f[^file::exec[a.pl;$.stdin[$.shit[]]]] | |
| $f[^file::exec[a.pl;$.stdin[^file::load[binary;1z2.txt]]]] | |
| =$f.text= | |
| ^f.save[binary;1z2.out] | |
| @badLangAfterCatch[] | |
| ^try{ | |
| $a[ | |
| тут язык сменился на pass_appended | |
| ^throw[user;test] | |
| и улетело с не тем языком | |
| ] | |
| }{ | |
| $exception.handled(1) | |
| } | |
| 1 2 | |
| @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[] | @postest[] |
| $s[$nothing] | $s[$nothing] |
| ^s.pos[$nothing] | ^s.pos[$nothing] |
| Line 403 $sheet[^xdoc::create{<?xml version="1.0" | Line 705 $sheet[^xdoc::create{<?xml version="1.0" |
| <xsl:template match="people"> | <xsl:template match="people"> |
| <html> | <html> |
| <head>z</head> | <head> |
| <link type='text/xml' rel='alternate' href='/Default.vsdisco'/> | |
| z</head> | |
| para1=<xsl:copy-of select="^$param1"/> | para1=<xsl:copy-of select="^$param1"/> |
| <xsl:apply-templates/> | <xsl:apply-templates/> |
| <hr/> | <hr/> |
| Line 1803 $response:body[^pict.gif[]] | Line 2107 $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[] |
| Line 1877 $s[abcАБВ] | Line 2182 $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= ...} |