--- parser3/www/htdocs/Attic/index.html 2002/09/24 10:24:23 1.155 +++ parser3/www/htdocs/Attic/index.html 2002/11/21 09:18:19 1.177 @@ -12,9 +12,12 @@ $response:charset[windows-1251] #$response:charset[empty] #$response:content-type[$.value[text/html]$.charset[$response:charset]] -#@postprocess[body] +@postprocess[body] #$body #$result[123] +$body +
+OK @main[] #$a(123) @@ -102,7 +105,6 @@ $response:charset[windows-1251] #^if($form:test){y}{n} #^tablecolumnerror[] #^roll[] -#^cookie2[] #^tableset[] #^math:PI.format{%.30f} #^xchildren[] @@ -156,7 +158,6 @@ $response:charset[windows-1251] #^fori[] #^tconnect[] #^xslt[] -#^xml[] #^header[] #^tablehasht[] #^datecreatestring[] @@ -206,7 +207,6 @@ $response:charset[windows-1251] #^badpos[] #^processtest[] #^mail3[] -#^mail4[] #^datesaving[] #^badconstructor[] #^calendar[] @@ -220,7 +220,6 @@ $response:charset[windows-1251] #^cookieexpirestest[] #^postest[] #^voidpostest[] -#^virtualtest[] #^badcolumntest[] #^delimiters[] #^новый-split[] @@ -237,7 +236,6 @@ $response:charset[windows-1251] #^mail2[] #^exec[] #^passpost[] -#^menudelim[] #^fordelim[] #^duplicatetable2hashkey[] #^duplicatehashsqlkey[] @@ -249,17 +247,232 @@ $response:charset[windows-1251] #^zeroinstdin[] #^shifts[] #^jspace[] -#^user-foreach-test[] -#^touchittest[] #^hashselfmodification[] #^emptyTransformResult[] #^badxdoccreate[] #^if(-d "CVS"){y}{n} #^badjunctioncall[] -^russianindex[] +#^russianindex[] +#^virtualtest[] +#^xml[] +#^mail4[] +#^voidconstructorpass[] +#^$form:CLASS.a=$form:CLASS.a
+#^cookie2[] +#^menudelim[] +#^touchittest[] +#^touchittest2[] +#^opauto[] +#^trycontextt[] +#^tfor[] +#^user-foreach-test[] +#^includet[] +#^derived:includet[] +#^fortestsep[] +#^derived:inclass_process_test[] +#$derived[^derived::create[]]^derived.inclass_process_test[] +#^domorigint[] +#^junctiontest2[] +#^junctionselftest[] +#^bad-compiletosystem[] +#^steppedfor[i](1;10;2){$i } +#^file:fullpath[a.gif]
+#^file:fullpath[/abs/a.gif]
+#$form:a/$form:image-map= +#^foreachform[] +#^selectSingleoct[] +#^compilebug[] +#^badhashcreate[] +#^badsendmail[] +#^keygenedhash[]
+#
[$env:HTTP_REFERER] +#$response:Content-TypE[bad] +#^emailhead2[] +#^includet2overridedynamic[] +#^includet2overridestatic[] +#^virtualtest2[] +#^message-id-test[] +^bad-jpeg-measure[] + +@bad-jpeg-measure[] +$dir[jpg] +$file[^file:list[$dir;\.jpe?g^$]] +^file.menu{ + $image[^image::measure[$dir/$file.name]] + ^image.html[] +
+} + +@message-id-test[] +^mail:send[ + $.from[paf@mail] + $.to[paf@mail] + $.subject[test] +# $.message-id[<1@parser.ru>] + $.Message-id[<2@parser.ru>] + $.subject[проверка] + $.text[мычит!] +] + +@virtualtest2[] +$derived[^derived::create[]] +^derived.first[] + + +@includet2overridedynamic[] +includet2overridedynamic:
+shold say 'hello in some.p'
+
+$derived[^derived::create[]] +^derived.includet2override[] + +@includet2overridestatic[] +includet2overridestatic:
+shold say 'hello in derived.p'
+because in static classes there's no way to determine derived class (no virtual mech becase of no virtual table)
+
+^derived:includet2override[] + +@emailhead2[] +^mail:send[ + $.charset[koi8-r] + $.from[paf@design.ru] + $.to[paf@mail] +# $.reply-to[^taint[agat] <^taint[ag_7k@mail.ru]>] +$user[^taint[agat]] +$email[^taint[ag_7k@mail.ru]] + $.reply-to[$user $email] + $.subject[test2] +] + +@keygenedhash[] +$table[^table::create{key value +1 a +2 b +}] +$hash[^table.hash($table.key*2)] +'$hash.4.value' must be 'b' + +@badsendmail[] +^mail:send[ + $.from[hren < paf@design.ru + >] + $.to[paf@design.ru] + $.subject[test] +] + +@badhashcreate[] +$hash[ + $.ok[1] +] +$.bad[1] + +@compilebug[] +^a[]^#31= + +@selectSingleoct[] +$d[^xdoc::create[doc]] +$element[^d.selectSingle[$nothing]] + + +@foreachform[] +one
+two
+ +^form:fields.foreach[key;value]{ + $key -- $value +}[
] +
+$nameless[$form:tables.nameless] +^if(def $nameless){ + nameless table -- ^nameless.menu{$nameless.field}[,] +} +^if(def $form:imap){ +
+ IMAP $form:imap.x : $form:imap.y +} + +@steppedfor[name;from;to;step;code] +$caller.$name($from) +^while($caller.$name<=$to){ + $code + ^caller.$name.inc($step) +} + +@bad-compiletosystem[] +^process[$string:CLASS]{@a[] +} + +@junctionselftest[] +$derived[^derived::create[]]^derived.explodejunction{$tomain[tomainOK]} +^$tomain=$tomain + +@junctiontest2[] +^if($if is junction){is junction;not junction}
+^if(def $if){defined;not defined}
+ +@domorigint[] +$xdoc[^xdoc::create[вася]] +^xdoc.firstChild.setAttribute[name;значение] +$var[$xdoc.firstChild.nodeName] +^throw[paf;$var] + + +@fortestsep[][i] +^for[i](1;3){$i}[,] + +@includet[] +^include[some.p] +^included_method[2] + +@user-foreach-test[][key;value] +^user-foreach[key;value]{$key=$value
} + +@user-foreach[key;value;code] +^for[i](1;10){ + $caller.$key($i) + $caller.$value($i*2) + $code +} + + +@tfor[][i] +^for[i](1;10){ +$i +} + +@trycontextt[] +^try{ + ^trycontexttsub[] +}{ + $exception.handled(0) +} + + +@trycontexttsub[] +^bad[] + + +@opauto[] +^reada[] + + +@rusage2[]
OK +@rusage2[] +$s[$status:rusage] + +^s.tv_sec.format[%.0f].^s.tv_usec.format[%06.0f] + + +@voidconstructorpass[] +$a[$form:a] +=^form:a.int(1)= +=^a.int(1)= + + @russianindex[] #dir with files with russian-lang names $where[dir] @@ -306,19 +519,15 @@ $hash[ } @touchittest[][i] +$i[before] ^touchit[] $i +@touchittest2[] +$i[before] +^touchit[] +$i -@user-foreach-test[][key;value] -^user-foreach[key;value]{$key=$value
} - -@user-foreach[key;value;code] -^for[i](1;10){ - $code.$key($i) - $code.$value($i*2) - $code -} @jspace[] $a(1) @@ -590,7 +799,7 @@ $date.yearday ^mail:send[ $.from[paf@mail.design.ru] $.to[paf@mail.design.ru] - $.subject[^taint[uri][москва]=2] + $.subject[^taint[uri][москва=E0_+ ]=2] $.text[^taint[uri][москва]=] $.html{link} ] @@ -1733,7 +1942,7 @@ $date.year $date.month $date.day @cookie2[] #=$cookie:clientType[$.value[test]]=
-=$cookie:clientType=
+=$cookie:CLASS.clientType=
@tableset[] @@ -2201,7 +2410,7 @@ $xdoc[^xdoc::set{ +$xdoc[^xdoc::create{ @@ -2211,7 +2420,7 @@ $xdoc[^xdoc::set{^process{ПИФ^taint[&] -}}] +}] @xml[] ^xdata[]