--- parser3/src/www/htdocs/Attic/index.html 2001/10/09 08:19:30 1.372 +++ parser3/src/www/htdocs/Attic/index.html 2001/10/26 15:55:20 1.435 @@ -1,5 +1,31 @@ @main[] -^tdef[] +#^безнадёжна_попытка_поправить_непоправимое[] +#^tcache[] +#^thashfileexp[] +#^tcounter[] +#^tablehash[] +#^hashfile[] +#^formclass[] +#^hren[] +^domedit[] +#^domxslt[] +#^lsplit2[] +#^faceesize[] +#^imageresize[] +#^ifassignhash[] +#^tintdefault[] +#$response:status[404] +#^ifpasshash[] +#^movedir[] +#^replace[] +#^set[] +#^hash[]
+#$t[^methresult[]] ->$t +#^terror[] +#^ssave[] +#^calendar[] +#^thash[] +#^tdef[] #^ford[] #^tif[] #^image[] @@ -19,6 +45,243 @@ #^header[] OK +@безнадёжна_попытка_поправить_непоправимое[] +$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[cache]] +^code.cache[key](2){ + ^math:random(100) +# ^code.delete[] +} + + +@thashfileexp[] +$hf[^hashfile::open[hashfile]] +$hf.paf[$.value[крут] $.expires(3)] +paf=$hf.paf +
+$hash[^hf.hash[]] +=$hash.paf= +
+ +@tcounter[] +^tcounterone[$DB_HOME] +other root: +^tcounterone[${DB_HOME}2] +again, first: +^tcounterone[$DB_HOME] + +@tcounterone[DB_HOME] +#^hashfile:clear[$DB_HOME;counter] +$counter[^hashfile::open[$DB_HOME;counter]] +^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] +^abc.int[z] +#^abc.int(123) + +@ifassignhash[] +$h[^if(1){$.a(1);$.a(2)}] +$h.a + +@ifpasshash[] +$a[$.e[a]] +$b[$.e[b]] +^ifpasshashdest[^if(1){$a;$b}] +#$x[^if(1){$a}{$b}] +#^ifpasshashdest[$x] + +@ifpasshashdest[p] +$p.e + +@movedir[] +^file:move[a;deeper/a] + +@replace[] +$a[12^;3] +^a.replace[^table::set{from to +2^; ! +}] + + +@set[] +^setdata[] +^a.add[$b] +add:$a.3
+ +^setdata[] +^a.sub[$b] +sub2:$a.2
+sub1:$a.1
+ +^setdata[] +$c[^a.union[$b]] +union3:$c.3
+union2:$c.2
+ +^setdata[] +$c[^a.intersection[$b]] +intersection3:$c.3
+intersection2:$c.2
+ +^setdata[] +intersects:^if(^a.intersects[$b]){y;n}
+intersects2:^if(^a.intersects[ ]){y;n}
+ + +
+ +@setdata[] +$a[$.1[a1] $.2[a2]] +$b[ $.2[b2] $.3[b3]] + + +@hash[] +$h[^hash::create[$._default[123]]] +$h.paf[not kretin] +$h.paf
+=$h.that=
+ +@methresult[] +$result[^table::set{1}] + +@terror[] +^error[method z must be called with z] + +@syntax1[] +#^a[^b] + +@syntax2[] +#^a[ + +@ssave[] +$abc[abc] +^abc.save[abc] + +@calendar[] +2001;11:
+$week_days[^date:calendar[rus](2001;11)] +
+^week_days.menu{^for[wday](0;7){^if($week_days.$wday){$week_days.$wday; ^; ^;} }
} +
+ +@thash[] +$table[^table::set{id name age +1 paf 278 +2 пиф 234 +}] +$hash[^table.hash[id;^table::set[nameless]{id +name}]] +$hash.2.id $hash.2.name $hash.2.age + @tdef[] $s[0] if 0=^if($s){}{n}
@@ -26,15 +289,18 @@ if def 0=^if(def $s){y}{}

@ford[] -^for[i](0;5){$i}[!] +^for[i](0;5){$i}{($i)} @tif[] ^if[def]{y;n} @image[] $pict[^image::create(400;200)] -^pict.arc($pict.width/2;$pict.height/2;$pict.width;$pict.height;0;360;0x000000) -^pict.circle($pict.width/2;$pict.height/2;$pict.height/2-5;0x000000) +^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-10;$pict.height-10;0+10;360-10;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-10;0x0000ff) +^pict.arc($pict.width/2;$pict.height/2;$pict.height-26;$pict.height-26;0+10;360-10;0xff0000) $response:body[^pict.gif[]] @@ -55,6 +321,7 @@ $env:HTTP_COOKIE
=$cookie:переменная=
#$cookie:переменная2[test тест ТЕСТ3] =$cookie:переменная2=
+=$cookie:CLASS.переменная2=
@response[] #^if($form:reload){ @@ -63,7 +330,8 @@ $env:HTTP_COOKIE
@xslt[] ^xdata[] -^show-xdoc2[^xdoc.transform[global.xsl]] +$transformed[^xdoc.transform[global.xsl;$.param1[123/]]] +^show-xdoc2[$transformed] @regexp2[] $s[ select] @@ -134,7 +402,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] @@ -192,7 +460,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]
 #]]
+
+