--- parser3/src/www/htdocs/Attic/index.html 2001/10/15 12:12:36 1.391 +++ parser3/src/www/htdocs/Attic/index.html 2001/11/05 13:35:51 1.466 @@ -1,4 +1,32 @@ @main[] +^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[] #$response:status[404] @@ -26,12 +54,316 @@ #^mail[] #^exec[] #^fori[] -#^tconnect[] -#^xslt[] +^tconnect[] +^xslt[] #^xml[] #^header[] +
+^status[] OK +@status[] +$c[$status:sql.cache] +sql.cache:
+ + + + + +^c.menu{ + + + + +} +
urltime
$c.url$c.time
+ +$c[$status:stylesheet.cache] +stylesheet.cache:
+ + + + + +^c.menu{ + + + + +} +
filetime
$c.file$c.time
+ +$c[$status:charset.cache] +charset.cache:
+ + + + +^c.menu{ + + + +} +
file
$c.file
+ + +$db_homes[$status:db.cache] +db.cache:
+^db_homes.foreach[db_home;tables]{ + + + + + + + + + +^tables.menu{ + + + + + +} +
$db_home
nametimeusers
$tables.name$tables.time$tables.users
+} + +@xchildren[] +$constructor[ + + +] + +$constr[^xdoc::set{ +^untaint[as-is]{$constructor}}] + +$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
+} + +@thashdelete[] +$h[$.a[1] $.b[2]] +was:
+count=^h._count[]
+b='$h.b'
+ +^h.delete[b] + +now:
+count=^h._count[]
+b='$h.b' + +@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} +
+ + + + +@formattest[] +$size(15.124) + +^size.format{%.2f} + +@filelist[] +$html[^file:list[.;\.html^$]] +^html.menu{ + $html.name
+} +
+ +@безнадёжна_попытка_поправить_непоправимое[] +$dom_from_disk[^xdoc::load[input.xml]] +$dom_created_in_air[^xdoc::create[doc]] +^dom_created_in_air.documentElement.appendChild[^dom_from_disk.documentElement.cloneNode(1)] +^show-xdoc2[$dom_created_in_air] + + +@tcache[] +#^hashfile:clear[cache] +$code[^hashfile::open[$DB_HOME;cache]] +^code.cache[key](2){ + ^math:random(100) +# ^code.delete[] +} + + +@thashfileexp[] +$hf[^hashfile::open[$DB_HOME;hashfile]] +$hf.paf[$.value[крут] $.expires(3)] +paf=$hf.paf +
+^hf.foreach[key;value]{ + $key=$value
+} +
+$hash[^hf.hash[]] +=$hash.paf= +
+ +@tcounter[] +^tcounterone[$DB_HOME] +other root: +^tcounterone[${DB_HOME}2] +again, first: +^tcounterone[$DB_HOME] + +@tcounterone[DB_HOME] +$counter[^hashfile::open[$DB_HOME;counter]] +#^counter.clear[] +^counter.transaction{ +# $counter.value(10) + $counter.value($counter.value+1) +# ^counter.delete[value] + $counter.value +} +
+^rem{ +$hash[^counter.hash[]] +=$hash.value= +
+} + +@tablehash[] +$productList[^table::set{id name +1 носки +2 валенки +3 ушанка +}] + +#скажем, у первого дилера +$firstPriceList[^table::set{id price +1 0.3 +3 1000 +}] + +$firstPriceHash[^firstPriceList.hash[id]] + +^productList.menu{ + продукт "$productList.name" | цена у first: $firstPriceHash.[$productList.id].price
+} + + +@hashfile[] +$hf[^hashfile::assign[hashfile]] +#$hf.paf[крут5] +paf=$hf.paf + +@formclass[] +^$form:CLASS.a=$form:CLASS.a + +@domdata[] +^if(1){ +# $a{^hren[]} +} +$a +$xdoc[^xdoc::create[doc]] +$doc[$xdoc.documentElement] +$name[^doc.appendChild[^xdoc.createElement{name}]] +$text[^name.appendChild[^xdoc.createTextNode{петросян ^;co}]] +^untaint[as-is]{=$text.nodeValue=} + +@domedit[] +^domdata[] +#$paf.nodeName
+#$doc.documentElement.nodeName
+ +^show-xnode1[$xdoc.documentElement;0;1] +
+^show-xdoc2[$xdoc] +
+ +@domxslt[] +^domdata[] +^show-xdoc2[^xdoc.transform[global.xsl;$.param1[123/]]] +
+ +@lsplit2[] +$path[/optics/] +$pathTable[^path.lsplit[/]] +^pathTable.menu{ + ^if(def $pathTable.piece){ + =$pathTable.piece= + } +} + + +@faceesize[] +$k(2) +$pict[^image::load[paf.gif]] +$small[^image::create($pict.width/$k;$pict.height/$k)] +^small.copy[$pict](0;0;$pict.width;$pict.height;0;0;$small.width;$small.height;250) +$response:body[^small.gif[]] + +@imageresize[] +$k(2) +$pict[^image::create(400*$k;200*$k)] +$pict.line-width(2) +^pict.arc($pict.width/2;$pict.height/2;$pict.width-1;$pict.height-1;0;360;0x000000) +^pict.arc($pict.width/2;$pict.height/2;$pict.width-20;$pict.height-20;0+20;360-20;0xff0000) +#^pict.arc($pict.width/2;$pict.height/2;$pict.width;$pict.height;0;360;0xff0000) +^pict.circle($pict.width/2;$pict.height/2;$pict.height/2-20;0x0000ff) +^pict.arc($pict.width/2;$pict.height/2;$pict.height-26;$pict.height-26;0+20;360-20;0xff0000) +$response:body[^pict.gif[]] + +#$small[^image::create($pict.width/$k;$pict.height/$k)] +#^small.copy[$pict](0;0;$pict.width;$pict.height;0;0) +#^small.copy[$pict](0;0;$pict.width;$pict.height;0;0;$small.width;$small.height;0) + +#$response:body[^small.gif[]] + + @tintdefault[] #$abc[abc] $abc[33] @@ -171,6 +503,7 @@ $env:HTTP_COOKIE
=$cookie:переменная=
#$cookie:переменная2[test тест ТЕСТ3] =$cookie:переменная2=
+=$cookie:CLASS.переменная2=
@response[] #^if($form:reload){ @@ -179,7 +512,8 @@ $env:HTTP_COOKIE
@xslt[] ^xdata[] -^show-xdoc2[^xdoc.transform[global.xsl;$.param1[123/]]] +$transformed[^xdoc.transform[global.xsl;$.param1[123/]]] +^show-xdoc2[$transformed] @regexp2[] $s[ select] @@ -250,7 +584,7 @@ $people[^xdoc.select[*/man]] ^show-xnodes1[$people]
#^people.0.owner.hren[] -^show-xnode1[^xdoc.select-single[*/man[2]/name];0;1]
+^show-xnode1[^xdoc.selectSingle[*/man[2]/name];0;1]
by id: ^show-xnode1[^xdoc.getElementById[1];0;1] @@ -308,7 +642,9 @@ $file[^xdoc.file[ $.method[html] ]] ^file.save[text;save_file.html] -
^taint[^xdoc.string[]]
+
^taint[^xdoc.string[]]
 #	$.encoding[windows-1251]
-#	$.method[xml]
+#	$.method[html]
 #]]
+
+