--- parser3/www/htdocs/Attic/index.html 2002/06/25 15:08:09 1.78 +++ parser3/www/htdocs/Attic/index.html 2002/09/04 07:46:09 1.129 @@ -1,12 +1,15 @@ -#@USE -#t.p +@USE +/derived.p @auto[filespec] $selffilespec[$filespec] #$form:here -$request:charset[windows-1251] -$response:charset[windows-1251] -$response:content-type[$.value[text/html]$.charset[$response:charset]] +$request:charset[UTF-8] +#$response:charset[windows-1251] +#$request:charset[windows-1251] +#$response:charset[UTF-8] +$response:charset[empty] +#$response:content-type[$.value[text/html]$.charset[$response:charset]] #@postprocess[body] #$body @@ -18,8 +21,17 @@ $response:content-type[$.value[text/html #$result[111] #^f[a] #^connect[mysql://mdm:4b833ljq@db-mysql/mdm]{ -# ^int:sql{select news_id from news where news_id=-1}[$.default{2}]
+# ^int:sql{select news_id from news where news_id=-1}[ +## $.default{2} +# ]
+# ^hash::sql{bad} # ^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*' ; } #} #^eval(2) #^tcrashlocaljunctionsv2[] @@ -41,7 +53,6 @@ $response:content-type[$.value[text/html #^subjvaltest[] #^tableselect0[] #^memnotest1[] -#^transparams[] #^voidparams[] #^rolls2[] #^cacheexpireschanging[] @@ -71,7 +82,6 @@ $response:content-type[$.value[text/html #^precisionProblem[] #^xpath[] #^ttablesetlang[] -#^mail3[] #^ttime[] #^tupper[] #^treplace[] @@ -129,14 +139,12 @@ $response:content-type[$.value[text/html #$t[^methresult[]] ->$t #^terror[] #^ssave[] -#^calendar[] #^thash[] #^tdef[] #^ford[] #^tif[] #^image[] #^mail2[] -#^cookie[] #^response[] #^regexp2[] #^ttablerem[] @@ -183,12 +191,257 @@ $response:content-type[$.value[text/html #^tfilespec[] #^tcrypt[] #^cryptdocsample[] -#^sendtests[] #^tnormalize[] -^xmltransformbyxdoc[] +#^xmltransformbyxdoc[] +#^sergestrandef[] +#^tstdin[] +#^tfind[] +#^mimet[] +#^joinlimit[] +#^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[]
OK +@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}[,] +
+#$table[^abc.split[.;h]] +$table[^abc.split[.;hr]] +$table.0,$table.1,$table.2
+ +@delimiters[] +$a#1[1]
+$a#1=
+ + +@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= +
+ +
+ +@staticstest2[] +^$derived:derived_var=$derived:derived_var
+^$derived:a=$derived:a
+$derived:a[changed] ^$derived:a=$derived:a
+$derived:derived_var[changed] +^$derived:derived_var=$derived:derived_var
+ +@staticstest[] +$derived[^derived::create[]] +^derived.test[] +
+^$derived.a=$derived.a
+^$derived.x=$derived.x
+
+^if($derived is derived){derived is derived}{error: derived is not derived}
+^if($derived is table){derived is table}{error:derived is not table}
+
+^^eval(^$derived)=^eval($derived)
+^^if(^$derived)=^if($derived){y}{n}
+ + +@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
+$now.yearday
+# +$date[^date::create(2002;1;3)] +$date.daylightsaving
+$date.yearday + +@mail4[] +^mail:send[ + $.from[paf@mail.design.ru] + $.to[paf@mail.design.ru] + $.subject[^taint[uri][москва]=2] + $.text[^taint[uri][москва]=] + $.html{link} +] +@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[] +$source[^table::create{a +aa +bb +cc}] +^source.offset(1) +#$dest[^table::create[$source]] +$dest[^table::create[$source;$.offset(2)]] +$dest[^table::create[$source;$.limit(2)]] +$dest[^table::create[$source;$.offset(1)$.limit(1)]] +$dest[^table::create[$source;$.offset(1)$.limit(2)]] +$dest[^table::create[$source;$.offset[cur]$.limit(2)]] + +^dest.menu{$dest.a}[,]
+ +@joinlimit[] +$source[^table::create{a +aa +bb +cc}] +^source.offset(2) +$dest[^table::create{a +xx +}] +#^dest.join[$source] +#^dest.join[$source;$.offset(2)] +#^dest.join[$source;$.limit(2)] +#^dest.join[$source;$.offset(1)$.limit(1)] +#^dest.join[$source;$.offset(1)$.limit(2)] +#^dest.join[$source;$.offset[cur]$.limit(1)] +^dest.join[$source;$.limit(0)] + +^dest.menu{$dest.a}[,]
+ +@cgit[] +$f[^file::cgi[showenv.cmd]] +$f.HELLO=
+$f.CONTENT-TYPE=
+$f.content-type=
+ + +@mimet[] +$f[^file::stat[a.GIF]] +$f.content-type + + +@tfind[] +^file:find[index.html] + +@tstdin[] +$f[^file::exec[test.pl;$.stdin[проверка stdin потока]]] +
$f.text
+ +@sergestrandef[] +$sQuantity[ ] +^sQuantity.int(10) + @xmltransformbyxdoc[] $xdoc[^xdoc::set{^process{ @@ -199,12 +452,18 @@ $xdoc[^xdoc::set{^process{ }}] $sheet[^xdoc::create{ - + + + + defparam1 defparam2 + param1=
param2=
@@ -213,7 +472,7 @@ $sheet[^xdoc::create{ - test return2 + test return3 @@ -250,12 +509,12 @@ $s[^for[i](0;999){фрагмент }] #^normalized.match[фраг][g]{перга} @sendtests[] -#^text[] +^text[] #^html[] #^text-n-html[] #^file[] #^text-n-file[] -^text-n-html-n-file[] +#^text-n-html-n-file[] #^backwardcomp[] @backwardcomp[] @@ -1111,13 +1370,13 @@ $t[^table::set{^untaint{^taint[$a-tab-b] @mail3[] ^mail:send[ - $.from[Александр Петросян ] - $.to[Александр Петросян ] - $.subject[проверка4] + $.from[Александр Петросян ] + $.to[Александр Петросян ] + $.subject[проверка2] $.body[ $.text[ $.content-type[$.value[text/plain] $.charset[windows-1251]] - $.body[проверка] + $.body[проверка^taint[uri][москва]=] ] $.attachment[ $.value[^file::load[text;index.html]] @@ -1576,10 +1835,12 @@ $abc[abc] ^abc.save[abc] @calendar[] -2001;11:
-$week_days[^date:calendar[rus](2001;11)] +$year(2002) +$month(12) +${year}-${month}:
+$week_days[^date:calendar[rus]($year;$month)] 
-^week_days.menu{^for[wday](0;7){^if($week_days.$wday){$week_days.$wday; ^; ^;} }
}
+^week_days.menu{^for[wday](0;6){^if($week_days.$wday){$week_days.$wday; ^; ^;} }=$week_days.week,$week_days.year=
}
@thash[] @@ -1624,7 +1885,7 @@ $response:body[^pict.gif[]] ] @cookie[] -$env:HTTP_COOKIE
+#$env:HTTP_COOKIE
#$cookie:переменная[test тест ТЕСТ2] =$cookie:переменная=