--- parser3/src/www/htdocs/Attic/index.html 2001/09/01 14:23:42 1.288
+++ parser3/src/www/htdocs/Attic/index.html 2001/11/05 10:43:00 1.463
@@ -1,1873 +1,619 @@
-@USE
-t.p
-dtf.p
-
@main[]
-^tresult[]
-#^voidtest[]
-#^ttext[]
-#^tdoubledefault[]
+^status[]
+
+#^xchildren[]
+#^thashforeach3[]
+#^thashforeach2[]
+#^thashforeach[]
+#^thashdelete[]
+#^connect[mysql://user:pass@cd.rinet.ru/db]{^void:sql{z} }
+#^tappend[]
+#^sappend[]
+#^eval(10\3)
+#^tform[]
+#^formattest[]
+#^filelist[]
+#^connect[mysql://user:pass@host]{ }
+#^безнадёжна_попытка_поправить_непоправимое[]
+#^tcache[]
+#^thashfileexp[]
+#^tcounter[]
+#^tablehash[]
+#j^hashfile[]
+#^formclass[]
+#^hren[]
+#^domedit[]
+#^domxslt[]
+#^lsplit2[]
+#^faceesize[]
+#^imageresize[]
+#^ifassignhash[]
#^tintdefault[]
-#^t3partycookie[]
-#^t3partycookie[]
-#^tcookie[]
-#^tfilemove[]
-#^treplace[]
-#^measuretest[]
-#^savetest[]
-#^oratestinsert[]
-#^oratestread[]
-#^process_check[]
-#^ffcheck[]^[xxx]
+#$response:status[404]
+#^ifpasshash[]
+#^movedir[]
+#^replace[]
+#^set[]
+#^hash[]
+#$t[^methresult[]] ->$t
+#^terror[]
+#^ssave[]
+#^calendar[]
+#^thash[]
+#^tdef[]
+#^ford[]
+#^tif[]
+#^image[]
+#^mail2[]
+#^cookie[]
+#^response[]
+#^regexp2[]
+#^ttablerem[]
+#^pcre[]
+#^regexp[]
+#^mail[]
+#^exec[]
+#^fori[]
+^tconnect[]
+^xslt[]
+#^xml[]
+#^header[]
+
+^status[]
+OK
-#$ORIGINS(1)
-#^list[]
-#^tests[]
-#^func(0)
-
-@tresult[]
-44
-$result[]
-
-@voidtest[]
-#$var[123x]
-^var.int(4)
-
-@ttext[]
-$картинка[^image::load[/i/commons_22_prev.gif]]
-^картинка.font[ ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyzАБВГДЕЖЗИЙКЛМНОПРСТУФХЦЧШЩЪЫЬЭЮЯабвгдежзийклмнопрстуфхцчшщъыьэюя0123456789-+=!\"%:,.^^^;<>?@()[]'&*/^$;/i/font.gif](14;9)
-0;10)[привет]
-
-^картинка.text(10;10)[ ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijkl]
-^картинка.text(10;30)[mnopqrstuvwxyzАБВГДЕЖЗИЙКЛМНОПРСТУФХЦЧШЩЪЫЬЭЮЯ]
-^картинка.text(10;50)[абвгдежзийклмнопрстуфхцчшщъыьэюя0123456789]
-^картинка.text(10;70)[!-+=!\"%:,.^^^;<>?@()[]'&*/^$!]
-
-
-$response:body[^картинка.gif[]]
-
-@tdoubledefault[]
-$a[123.6x]
-#^a.double[]
-^a.double(999)
+@status[]
+$c[$status:sql.cache]
+
+
+ |
+ sql.cache
+ |
+
+ url |
+ time |
+^c.menu{
+
+ | $c.url |
+ $c.time |
+
+}
+
+
+$c[$status:stylesheet.cache]
+
+
+ |
+ stylesheet.cache
+ |
+
+ file |
+ time |
+^c.menu{
+
+ | $c.file |
+ $c.time |
+
+}
+
+
+
+@xchildren[]
+$constructor[
+
+
+]
+$constr[^xdoc::set{
+^untaint[as-is]{$constructor}}]
-@tintdefault[]
-$a[123x]
-#^a.int[]
-^a.int(999)
-
-@t3partycookie2[]
-#z
z
-z
z
-
-@t3partycookie[]
-z
z
-
-@tcookie[]
-$response:P3P[policyref="http://parser3/w3c/paf.xml"]
-$cookie:test[$form:x^math:random(100)]
-$env:HTTP_COOKIE
-get:$cookie:test
-#
+$children[$constr.documentElement.childNodes]
+^if($children){
+^for[i](1;^children._count[]){
+ $node[$children.$i]
+ $node.nodeName
+}
+}
+
+
+@thashforeach3[]
+$h[
+ $.a[1]
+ $.b[2]
+]
+$c[^table::set{a
+^h.foreach[key;value]{$value
+}}]
+$c.a
+
+@thashforeach2[]
+$h[
+ $.a[1]
+ $.b[2]
+]
+$c[
+^h.foreach[key;value]{
+ $.$key[$value]
+}
+]
+$c.b
+
+@thashforeach[]
+$h[
+ $.a[1]
+ $.b[2]
+]
+^h.foreach[key;value]{
+ $key=$value
+}
-@tfilemove[]
-^file:move[a/a;b/b]
+@thashdelete[]
+$h[$.a[1] $.b[2]]
+was:
+count=^h._count[]
+b='$h.b'
-@treplace[]
-$шило-на-мыло[^table::set{a b
-шило мыло
-}]
-$строка[бывает шило в задице]
-^строка.replace[$шило-на-мыло]
+^h.delete[b]
-@measuretest[]
-$im[^image::measure[mm3.gif]]
-x:y=${im.width}:${im.height}
-
-@savetest[]
-$file[^file::load[text;index.html]]
-^file.save[binary;/some/dir/here.dat]
-OK
-
-@oratestinsert[]
-^connect[oracle://mts_admin:admin_pwd@ORACLE.PAF.OFFICE.DESIGN.RU]{
-#^void:sql{create table lobtest(test clob)}
-^void:sql{insert into lobtest values (/**test**/'бу''квы')}
-$table[^table::sql{select * from lobtest}]
-^table.menu{^table.line[] }
-}
+now:
+count=^h._count[]
+b='$h.b'
-@oratestread[]
-^connect[oracle://mts_admin:admin_pwd@ORACLE.PAF.OFFICE.DESIGN.RU]{
-^rem{
-$tables[^table::sql{select table_name from user_tables}]
-^tables.menu{
- $tables.table_name
+@sappend[]
+$test[123]
+^test.save[test]
+^test.save[append;test]
+
+@tappend[]
+$test[^table::set{a b
+a1 b1}]
+^test.save[test]
+$test[^table::set{a b
+a2 b2}]
+^test.save[append;test]
+
+
+@tform[]
+^if(def $form:new_file){y}{n}
+