--- parser3/www/htdocs/Attic/index.html 2002/06/20 13:39:57 1.70 +++ parser3/www/htdocs/Attic/index.html 2002/08/13 14:14:44 1.106 @@ -1,26 +1,32 @@ -#@USE -#t.p +@USE +/derived.p -@autoZ[] +@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] +#$response:content-type[$.value[text/html]$.charset[$response:charset]] #@postprocess[body] #$body #$result[123] -@f[a;b] - @main[] -$a(123) -^a.format[%.10u] +#$a(123) +#^a.format[%.10u] +#$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} +# ]
# ^string:sql{select news_id from news where news_id=-1}[$.default{2}] +# ^file::load[text;^string:sql{select '^^hello[]' }] +# ^string:sql{select '^^hello[]' }] $ORIGINS(1) +# ^process{ ^^h[]} +# ^process{^string:sql{select '1 +# ^^hello[]' }] } #} #^eval(2) #^tcrashlocaljunctionsv2[] @@ -42,7 +48,6 @@ $a(123) #^subjvaltest[] #^tableselect0[] #^memnotest1[] -#^transparams[] #^voidparams[] #^rolls2[] #^cacheexpireschanging[] @@ -72,7 +77,6 @@ $a(123) #^precisionProblem[] #^xpath[] #^ttablesetlang[] -#^mail3[] #^ttime[] #^tupper[] #^treplace[] @@ -130,7 +134,6 @@ $a(123) #$t[^methresult[]] ->$t #^terror[] #^ssave[] -#^calendar[] #^thash[] #^tdef[] #^ford[] @@ -181,6 +184,322 @@ $a(123) #^xdocsave[] #^div[] #^datecreatestring3[] +#^tfilespec[] +#^tcrypt[] +#^cryptdocsample[] +#^tnormalize[] +#^xmltransformbyxdoc[] +#^sergestrandef[] +#^tstdin[] +#^tfind[] +#^mimet[] +#^cgit[] +#^joinlimit[] +#^tableclonelimit[] +#^transparams[] +#^sendtests[] +#^wwrapperpass[] +#^badpos[] +#^processtest[] +#^mail3[] +#^mail4[] +#^datesaving[] +#^badconstructor[] +#^calendar[] +#^monthdays(8) +#^xdoctypetest[] +#^xtabletest[] +^staticstest[] +
+OK + +@staticstest[] +$derived[^derived::create[]] +^derived.test[] +^$derived.a=$derived.a
+^$derived.x=$derived.x
+ + +@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{ + + + + 1 2 + + +}}] +$sheet[^xdoc::create{ + + + + + + +defparam1 +defparam2 + + + + param1=
+ param2=
+ + test return + + + + test return3 + + + + + z + para1= + +
+ + + + + + + + +}] + + +$xdoc[^xdoc.transform[$sheet]] +$string[^xdoc.string[$.method[html]]] +^string.save[a] +^untaint[html]{$string} + + + +@tnormalize[] +#s состоит из 1000 фрагментов +$s[^for[i](0;999){фрагмент }] +#это займет много ресурсов +^s.match[фраг][g]{перга} +#это займет меньше ресурсов +#$normalized[^s.normalize[]] +#^normalized.match[фраг][g]{перга} + +@sendtests[] +^text[] +#^html[] +#^text-n-html[] +#^file[] +#^text-n-file[] +#^text-n-html-n-file[] +#^backwardcomp[] + +@backwardcomp[] +^mail:send[ + $.from[paf] + $.to[paf] + $.body[this is text value] +] + +@text[] +^mail:send[ + $.from[paf] + $.to[paf] + $.text[ + $.value[this is text value] + ] +] + +@html[] +^mail:send[ + $.from[paf] + $.to[paf] + $.html{this is html value ^taint[<] 10} +] + +@text-n-html[] +^mail:send[ + $.from[paf] + $.to[paf] + $.text[ + $.value[this is text value] + ] + $.html[ + $.value{this is html value ^taint[<] 10} + ] +] + +@file[] +^mail:send[ + $.from[paf] + $.to[paf] + $.file[^file::load[binary;image.jpg]] +] + +@text-n-file[] +^mail:send[ + $.from[paf] + $.to[paf] + $.text[ + $.value[this is text value] + ] + $.file[^file::load[binary;image.jpg]] +] + +@text-n-html-n-file[] +^mail:send[ + $.from[paf] + $.to[paf] + $.text[ + $.value[this is text value] + ] + $.html[ + $.COntent-type[$.value[text/html]$.charset[windows-1251xx]] + $.value{this is html value ^taint[<] 10} + ] + $.file[^file::load[binary;image.jpg]] +] + + + +@md5salt[] +1234 + +@cryptdocsample[] +$users[^table::create{name password +alice *** +bob *** +}] + +$htpasswd[^table::create[nameless]{}] +^users.menu{ + ^htpasswd.append{$users.name:^math:crypt[$users.password;^$apr1^$^md5salt[]]} +} + +^htpasswd.save[nameless;.htpasswd-parser-test] + + +@tcrypt[] +#^math:crypt[123;^$apr1^$1234567890abcdef]
+^math:crypt[123;^$apr1^$]
+ +@tfilespec[] +src=$selffilespec
+dirname=^file:dirname[$selffilespec]
+basename=^file:basename[$selffilespec]
+justname=^file:justname[$selffilespec]
+justext=^file:justext[$selffilespec]
@datecreatestring3[] $new_after[^date::now(-3)] @@ -939,13 +1258,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]] @@ -1404,10 +1723,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[]