|
version 1.108, 2001/04/05 13:27:16
|
version 1.459, 2001/11/01 15:11:36
|
|
Line 1
|
Line 1
|
| @auto[] |
@main[] |
| !!$html-typo[^table:set{user html comment |
#^thashforeach[] |
| << «^; длинные user вперёд |
#^thashdelete[] |
| >> »^; |
#^connect[mysql://user:pass@cd.rinet.ru/db]{^void:sql{z} } |
| \n\n <p> !эти есть в таблице по умолчанию |
#^tappend[] |
| \n <br> !но т.к. заменяем, надо повторить. |
#^sappend[] |
| < <^; !можно этим воспользоваться, |
#^eval(10\3)<br> |
| > >^; !и что-то сделать ДО обычных замен |
#^tform[] |
| " "^; !например из << и >> |
#^formattest[] |
| & &^; !сделать ёлочки-кавычки. |
#^filelist[] |
| _  ^; |
#^connect[mysql://user:pass@host]{ } |
| ^#AB «^; windows коды ёлочек |
#^безнадёжна_попытка_поправить_непоправимое[] |
| ^#BB »^; windows коды ёлочек |
#^tcache[] |
| (c) ©^; |
^thashfileexp[] |
| ^#A9 ©^; windows (c) |
#^tcounter[] |
| }] |
#^tablehash[] |
| |
#j^hashfile[] |
| |
#^formclass[] |
| |
#^hren[] |
| |
#^domedit[] |
| |
#^domxslt[] |
| |
#^lsplit2[] |
| |
#^faceesize[] |
| |
#^imageresize[] |
| |
#^ifassignhash[] |
| |
#^tintdefault[] |
| |
#$response:status[404] |
| |
#^ifpasshash[] |
| |
#^movedir[] |
| |
#^replace[] |
| |
#^set[] |
| |
#^hash[]<hr> |
| |
#$t[^methresult[]] ->$t |
| |
#^terror[] |
| |
#^ssave[] |
| |
#^calendar[] |
| |
#^thash[] |
| |
#^tdef[] |
| |
#^ford[] |
| |
#^tif[] |
| |
#^image[] |
| |
#^mail2[] |
| |
#^cookie[] |
| |
#^response[] |
| |
#^regexp2[] |
| |
#^ttablerem[] |
| |
#^pcre[] |
| |
#^regexp[]<hr> |
| |
#^mail[] |
| |
#^exec[] |
| |
#^fori[] |
| |
#^tconnect[] |
| |
#^xslt[] |
| |
#^xml[] |
| |
#^header[] |
| |
OK |
| |
|
| |
@thashforeach[] |
| |
$h[ |
| |
$.a[1] |
| |
$.b[2] |
| |
] |
| |
^h.foreach[key;value]{ |
| |
$key=$value<br> |
| |
} |
| |
|
| @dump[t] |
@thashdelete[] |
| ^t.menu{$n<BR>} |
$h[$.a[1] $.b[2]] |
| <HR> |
was:<br> |
| @func[n] |
count=^h._count[] <br> |
| $n |
b='$h.b' <br> |
| @twop[a;b] |
|
| ($a,$b) |
^h.delete[b] |
| |
|
| @post-process[data] |
now:<br> |
| (<BR>$data)<BR> |
count=^h._count[] <br> |
| #^data.match[1][g]{X} |
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} |
| |
<form method="post" enctype="multipart/form-data"> |
| |
<input type="file" name="new_file" /> |
| |
<input type=submit> |
| |
</input> |
| |
|
| @mt[s;m] |
@formattest[] |
| $m ^if(^s.match[$:m][i]){matches}{do not match} $s<BR> |
$size(15.124) |
| |
|
| @main[] |
^size.format{%.2f} |
| ^connect[$SQL.connect-string]{ |
|
| $random_age(^random:generate(10000)) |
@filelist[] |
| $shit[^taint[our's]] |
$html[^file:list[.;\.html^$]] |
| $paf[^table:sql{insert into paf (name, age) values ('$shit', $random_age)}(1;4)] |
^html.menu{ |
| $paf[^table:sql{select * from paf}(1;4)] |
$html.name<br> |
| <table border=1> |
} |
| <tr><td>id</td><td>name</td><td>age</td></tr> |
<hr> |
| ^paf.menu{<tr><td>$id</td><td>$name</td><td>$age</td></tr>} |
|
| </table> |
@безнадёжна_попытка_поправить_непоправимое[] |
| } |
$dom_from_disk[^xdoc::load[input.xml]] |
| |
$dom_created_in_air[^xdoc::create[doc]] |
| <HR> |
^dom_created_in_air.documentElement.appendChild[^dom_from_disk.documentElement.cloneNode(1)] |
| |
^show-xdoc2[$dom_created_in_air] |
| $with-cr[^table:set{a b |
|
| ^taint[<1 |
|
| 2>] 3 |
|
| }] |
|
| "$with-cr.a"<BR> |
|
| <HR> |
|
| ^if(def $form:s){ |
|
| $form:s<BR> |
|
| ^form:s.match[!][g]{<b>!</b>}<BR> |
|
| <HR> |
|
| } |
|
| |
|
| $r[1223] |
|
| ^^"$r".match[2][]{(^$match)}=^r.match[2][]{($match)}<BR> |
|
| ^^"$r".match[2][i]{(^$match)}=^r.match[2][i]{($match)}<BR> |
|
| ^^"$r".match[2][g]{(^$match)}=^r.match[2][g]{($match)}<BR> |
|
| ^^"$r".match[2+][g]{(^$match)}=^r.match[2+][g]{($match)}<BR> |
|
| <HR> |
|
| $s[abcЯ] |
|
| $sm[^s.match[(.)][g]] |
|
| ^^"$s".match[(.)][g]:<BR> |
|
| ^sm.menu{ |
|
| ^line[]:<BR> |
|
| ^$pre-match=$pre-match<BR> |
|
| ^$match=$match<BR> |
|
| ^$post-match=$post-match<BR> |
|
| ^$1=$1<BR> |
|
| } |
|
| <HR> |
|
| $sm[^s.match[(.)][]] |
|
| ^^"$s".match[(.)][]:<BR> |
|
| ^sm.menu{ |
|
| ^line[]:<BR> |
|
| ^$pre-match=$pre-match<BR> |
|
| ^$match=$match<BR> |
|
| ^$post-match=$post-match<BR> |
|
| ^$1=$1<BR> |
|
| } |
|
| <HR> |
|
| ^mt[$s;я] |
|
| ^mt[$s;b] |
|
| ^mt[$s;^^b] |
|
| ^mt[$s;^^a] |
|
| ^mt[$s;x] |
|
| |
|
| <HR> |
|
| |
|
| $dest[^table:set[nameless]{ |
|
| $form:d11 d12 d13 |
|
| d21 d22 d23 |
|
| }] |
|
| $src[^table:set{a b c d |
|
| |
|
| s1 s2 s3 s4 |
|
| |
@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 |
| |
<hr> |
| |
^hf.foreach[key;value]{ |
| |
$key=$value<br> |
| |
} |
| |
<hr> |
| |
$hash[^hf.hash[]] |
| |
=$hash.paf= |
| |
<hr> |
| |
|
| |
@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 |
| |
} |
| |
<hr> |
| |
^rem{ |
| |
$hash[^counter.hash[]] |
| |
=$hash.value= |
| |
<hr> |
| |
} |
| |
|
| |
@tablehash[] |
| |
$productList[^table::set{id name |
| |
1 носки |
| |
2 валенки |
| |
3 ушанка |
| }] |
}] |
| 1:<BR>^dest.menu{$0!$1!$2!$3!<BR>} |
|
| ^dest.join[$src] |
#скажем, у первого дилера |
| 2:<BR>^dest.menu{$0!$1!$2!$3!<BR>} |
$firstPriceList[^table::set{id price |
| |
1 0.3 |
| <HR> |
3 1000 |
| $dest[^table:set{a b c |
|
| d11 d12 d13 |
|
| d21 d22 d23 |
|
| }] |
}] |
| $src[^table:set{a b c d |
|
| s1 s2 s3 s4 |
$firstPriceHash[^firstPriceList.hash[id]] |
| |
|
| |
^productList.menu{ |
| |
продукт "$productList.name" | цена у first: $firstPriceHash.[$productList.id].price<br> |
| |
} |
| |
|
| |
|
| |
@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<br> |
| |
#$doc.documentElement.nodeName<br> |
| |
|
| |
^show-xnode1[$xdoc.documentElement;0;1] |
| |
<hr> |
| |
^show-xdoc2[$xdoc] |
| |
<hr> |
| |
|
| |
@domxslt[] |
| |
^domdata[] |
| |
^show-xdoc2[^xdoc.transform[global.xsl;$.param1[123/]]] |
| |
<hr> |
| |
|
| |
@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^; ! |
| }] |
}] |
| ^dest.join[$src] |
|
| ^dest.menu{$a!$b!$c!<BR>} |
|
| |
|
| <HR> |
|
| ^^random:generate(10)=^random:generate(10)<BR> |
@set[] |
| |
^setdata[] |
| |
^a.add[$b] |
| |
add:$a.3<br> |
| |
|
| |
^setdata[] |
| |
^a.sub[$b] |
| |
sub2:$a.2<br> |
| |
sub1:$a.1<br> |
| |
|
| |
^setdata[] |
| |
$c[^a.union[$b]] |
| |
union3:$c.3<br> |
| |
union2:$c.2<br> |
| |
|
| |
^setdata[] |
| |
$c[^a.intersection[$b]] |
| |
intersection3:$c.3<br> |
| |
intersection2:$c.2<br> |
| |
|
| |
^setdata[] |
| |
intersects:^if(^a.intersects[$b]){y;n}<br> |
| |
intersects2:^if(^a.intersects[ ]){y;n}<br> |
| |
|
| |
|
| <HR> |
<hr> |
| $t[^table:load[/test.cfg]] |
|
| $t{ |
@setdata[] |
| ^menu{$a!$b!$c<BR>} |
$a[$.1[a1] $.2[a2]] |
| <HR> |
$b[ $.2[b2] $.3[b3]] |
| ^append{x y z} |
|
| ^menu{$a!$b!$c<BR>} |
|
| <HR> |
@hash[] |
| ^flip[] |
$h[^hash::create[$._default[123]]] |
| ^menu{$0!$1!$2!$3<BR>} |
$h.paf[not kretin] |
| <HR> |
$h.paf<br> |
| } |
=$h.that=<br> |
| |
|
| $a[vasya,fedya,kolya] |
@methresult[] |
| ^^"$a".lsplit[,]=$as[^a.lsplit[,]]$as.0|$as.1|$as.2|$as.3<BR> |
$result[^table::set{1}] |
| ^^"$a".rsplit[,]=$as[^a.rsplit[,]]$as.0|$as.1|$as.2|$as.3<BR> |
|
| ^^a.pos(sy]="^a.pos[sy]"<BR> |
@terror[] |
| ^^a.pos[zsy]="^a.pos[zsy]"<BR> |
^error[method z must be called with z] |
| ^^a.left(3)="^a.left(3)"<BR> |
|
| ^^a.right(3)="^a.right(3)"<BR> |
@syntax1[] |
| ^^a.mid(1;3)="^a.mid(1;3)"<BR> |
#^a[^b] |
| <HR> |
|
| ^^twop[a;]=^twop[a;]<BR> |
@syntax2[] |
| ^$request:browser.type=$request:browser.type<BR> |
#^a[ |
| ^$request:browser.version=$request:browser.version<BR> |
|
| |
@ssave[] |
| $tf[^file:load[test.zip;abc.zip;image/gif]] |
$abc[abc] |
| #$response:body[$tf] |
^abc.save[abc] |
| |
|
| ^$tf.name=$tf.name<BR> |
@calendar[] |
| ^$tf.size=$tf.size<BR> |
2001;11:<br> |
| ^$tf.mime-type=$tf.mime-type<BR> |
$week_days[^date:calendar[rus](2001;11)] |
| ^$tf.text:<BR> |
<pre> |
| $tf.text<HR> |
^week_days.menu{^for[wday](0;7){^if($week_days.$wday){$week_days.$wday; ^; ^;} }<br>} |
| <HR> |
</pre> |
| ^file:find[test.cfg]<BR> |
|
| ^file:find[tes.cfg]{not found}<BR> |
@thash[] |
| <HR> |
$table[^table::set{id name age |
| |
1 paf 278 |
| $t[^table:set{n |
2 пиф 234 |
| 3 |
|
| 01.3 |
|
| 1.2 |
|
| 2 |
|
| }] |
}] |
| $t{^locate[n;2z]^found{$n}{not found}}<BR> |
$hash[^table.hash[id;^table::set[nameless]{id |
| $t{^locate[n;3]^found{found:$n}{not found}}<BR> |
name}]] |
| ^$t:<BR> |
$hash.2.id $hash.2.name $hash.2.age |
| ^dump[$t] |
|
| ^t.sort($n) |
@tdef[] |
| ^^t.sort(^$n):<BR> |
$s[0] |
| ^dump[$t] |
if 0=^if($s){}{n}<br> |
| ^t.sort{^:func($n)} |
if def 0=^if(def $s){y}{}<br> |
| ^^t.sort{^^:func(^$n)}:<BR> |
<hr> |
| ^dump[$t] |
|
| ^t.sort{$n} |
|
| ^^t.sort{^$n}:<BR> |
|
| ^dump[$t] |
|
| ^t.sort{$n}[desc] |
|
| ^^t.sort{^$n}[desc]:<BR> |
|
| ^dump[$t] |
|
| <HR> |
|
| |
|
| ^if(-f index.html){y}{n}<BR> |
|
| ^taint[html-typo;не знаю |
|
| я ничего |
|
| |
|
| <<слово длинное>> |
|
| |
|
| (c) by Я |
|
| ]<HR> |
|
| $t[^table:load[/test.cfg]] |
|
| ^process[@b[] |
|
| f |
|
| ] |
|
| ^b[]<BR> |
|
| |
|
| ^$t.a=$t.a<BR> |
@ford[] |
| ^t.offset[2] |
^for[i](0;5){$i}{($i)} |
| #$r[^t.record[]] |
|
| #^$r.a=$r.a<BR> |
|
| |
|
| ^$request:uri=$request:uri<BR> |
|
| ^$env:PATH_INFO=$env:PATH_INFO<BR> |
|
| ^$env:REMOTE_ADDR=$env:REMOTE_ADDR<BR> |
|
| |
|
| ^rem{ |
@tif[] |
| $response:body[] |
^if[def]{y;n} |
| $response:location[http://parser3/123] |
|
| } |
|
| |
|
| |
@image[] |
| |
$pict[^image::create(400;200)] |
| |
^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[]] |
| |
|
| <HR> |
|
| ^^auto_test[]:<BR> |
|
| <ol> |
|
| ^auto_test[] |
|
| </ol> |
|
| <HR> |
|
| |
|
| ^${cookie:вот}=${cookie:вот}?<BR> |
|
| ^${cookie:вот}=${cookie:вот}?<BR> |
|
| ^$request:query=$request:query<BR> |
|
| ^$request:uri=$request:uri<BR> |
|
| |
|
| <form method=post> |
|
| <table border=1 width=250><tr><td>$form:name</td></tr></table> |
|
| <textarea name=name rows=5 cols=40>^untaint[html]{^default[$form:name;Пробный текст: А.Ф._Петросян <<Жизнь в Аду>> |
|
| нажми Submit]}</textarea><BR> |
|
| <input type=submit> |
|
| </form> |
|
| |
|
| <HR> |
|
| $свойства_когда_пьян[ |
@mail2[] |
| $цвет_глаз[красный] |
^mail:send[ |
| |
$.content-type[$.value[text/plain] $.charset[windows-1251]] |
| |
$.from[Александр Петросян <paf@design.ru>] |
| |
$.to[Александр Петросян <paf@design.ru>] |
| |
$.subject[проверка] |
| |
$.body[проверка] |
| ] |
] |
| $вася[ |
|
| $свойства[$свойства_когда_пьян] |
@cookie[] |
| |
$env:HTTP_COOKIE<br> |
| |
|
| |
#$cookie:переменная[test тест ТЕСТ2] |
| |
=$cookie:переменная=<br> |
| |
#$cookie:переменная2[test тест ТЕСТ3] |
| |
=$cookie:переменная2=<br> |
| |
=$cookie:CLASS.переменная2=<br> |
| |
|
| |
@response[] |
| |
#^if($form:reload){ |
| |
$response:refresh[$.value[0] $.url[./t.html?uri=$env:SERVER_NAME]] |
| |
#} |
| |
|
| |
@xslt[] |
| |
^xdata[] |
| |
$transformed[^xdoc.transform[global.xsl;$.param1[123/]]] |
| |
^show-xdoc2[$transformed] |
| |
|
| |
@regexp2[] |
| |
$s[ select] |
| |
$s[^s.match[^^\s*][]{!}] |
| |
$s |
| |
|
| |
@header[] |
| |
$response:refresh[ |
| |
$.value[0] |
| |
$.url[http://design.ru?a=^taint[123]] |
| ] |
] |
| |
|
| $кусок_имени_поля[ства] |
@ttablerem[] |
| ^$кусок_имени_поля=$кусок_имени_поля<BR> |
$table[^table::load[a.cfg]] |
| ^$вася.свой^$кусок_имени_поля.цвет_глаз=$вася.свой$кусок_имени_поля.цвет_глаз |
^table.menu{$table.a} |
| <HR> |
|
| <form method=post enctype=multipart/form-data> |
@tconnect[] |
| <input name=photo type=file> |
^connect[mysql://test:test@paf/test?charset=cp1251_koi8&compress=1&timeout=1&named_pipe=1]{ |
| <input type=submit> |
$tables[^table::sql{show tables}] |
| </form> |
#$cols[^tables.columns[]] |
| |
#$cols.column |
| |
^tables.menu{ |
| |
$tables.[Tables_in_test]<br> |
| |
} |
| |
} |
| |
|
| |
@pcre[] |
| |
$s[1 2] |
| |
^s.match[\s;ig]{!} |
| |
#^s.match[\d;ig]{!} |
| |
|
| |
|
| |
@regexp[] |
| |
$s[abcАБВ] |
| |
^if(^s.match[б][i]){y}{n} |
| |
|
| |
@mail[] |
| |
#$ORIGINS(1) |
| |
^mail:send[ |
| |
$.from[paf@design.ru] |
| |
$.to[paf@design.ru] |
| |
$.body[1 |
| |
|
| |
2 |
| |
|
| |
|
| |
3] |
| |
] |
| |
|
| |
@exec[] |
| |
$a[^file::exec[fc.exe;;a;b]] |
| |
$a.status|$a.stderr<hr> |
| |
|
| |
@fori[][i] |
| |
^for[i](1;3){... =$i= ...} |
| |
|
| |
@xdata[] |
| |
#$response:content-type[$.value[text/html] $.charset[windows-1251]] |
| |
$xdoc[^xdoc::load[input.xml]] |
| |
|
| |
@xml[] |
| |
^xdata[] |
| |
|
| |
^show-xdoc2[$xdoc]<hr> |
| |
#^show-xnode1[$xdoc]<hr> |
| |
$people[^xdoc.select[*/man]] |
| |
#^show1[] |
| |
^show-xnodes1[$people]<hr> |
| |
#^people.0.owner.hren[] |
| |
|
| |
^show-xnode1[^xdoc.selectSingle[*/man[2]/name];0;1]<hr> |
| |
|
| |
by id: |
| |
^show-xnode1[^xdoc.getElementById[1];0;1] |
| <hr> |
<hr> |
| ^if($form:photo){ |
|
| <pre> |
|
| ^$form:photo.name='$form:photo.name' |
|
| ^$form:photo.size='$form:photo.size' |
|
| ^$form:photo.text='$form:photo.text' |
|
| ^form:photo.save[paf.txt] |
|
| </pre> |
|
| } |
|
| |
|
| #todo proper! untaint $response:refresh[$value[2] $content[url=http://design.ru]] |
|
| |
|
| |
|
| @default[test;def] |
|
| $result[^if(^test.length[]){$test}{$def}] |
|
| |
|
| @exception[origin;source;comment;type;code] |
|
| <body bgcolor=black> |
|
| <font color=white> |
|
| ERROR: |
|
| ^if(def $source){$origin '$source'} |
|
| ${comment}. |
|
| ^if(def $type){type=$type} |
|
| ^if(def $code){code=$code} |
|
| |
|
| @auto_test[] |
|
| ^BASE.auto_test[] |
|
| <li>${request:uri}! |
|
| |
|
| |
|
| |
@show1[array] |
| |
^for[i](0;^array._count[]-1){ |
| |
$x[$array.$i] |
| |
$x.firstChild.nodeValue: |
| |
$pattributes[$x.parentNode.attributes] |
| |
^if(^pattributes._count[]){ |
| |
$pattributes.id.name=$pattributes.id.nodeValue |
| |
} |
| |
<br> |
| |
} |
| |
|
| |
@show-xnodes1[array][i] |
| |
^for[i](0;^array._count[]-1){ |
| |
^show-xnode1[$array.$i;0;1] |
| |
} |
| |
|
| |
@show-xnode1[x;level;single][l] |
| |
^if(def $x){ |
| |
^for[l](0;$level-1){ ^; ^; ^; ^;} |
| |
^if($x.nodeType == $xnode:ELEMENT_NODE){ |
| |
<^;$x.nodeName |
| |
$pairs[$x.attributes] |
| |
^if(def $pairs){ |
| |
$names[^pairs._keys[]] |
| |
^names.menu{ $names.key="$pairs.[$names.key].nodeValue"} |
| |
} |
| |
>^; |
| |
}{ |
| |
[$x.nodeType] |
| |
} |
| |
|
| |
^if(def $x.nodeValue){$x.nodeValue}<br> |
| |
^show-xnode1[$x.firstChild]($level+1) |
| |
^if(!$single){ |
| |
^show-xnode1[$x.nextSibling]($level) |
| |
} |
| |
|
| |
^if($x.nodeType == $xnode:ELEMENT_NODE){ |
| |
^for[l](0;$level-1){ ^; ^; ^; ^;}<^;/$x.nodeName>^;<br> |
| |
} |
| |
} |
| |
|
| |
@show-xdoc2[xdoc] |
| |
^xdoc.save[save.xml; |
| |
# $.encoding[windows-1251] |
| |
$.method[xml] |
| |
] |
| |
$file[^xdoc.file[ |
| |
# $.encoding[windows-1251] |
| |
$.method[html] |
| |
]] |
| |
^file.save[text;save_file.html] |
| |
<pre>taint[^xdoc.string[]] |
| |
# $.encoding[windows-1251] |
| |
# $.method[html] |
| |
#]] |
| |
</pre> |
| |
|
![[BACK]](/cvsweb/icons/back.gif){kind=icon}
Return to index.html CVS log ![[TXT]](/cvsweb/icons/text.gif){kind=icon}
![[DIR]](/cvsweb/icons/dir.gif){kind=icon}
Up to [parser3project] / parser3 / src / www / htdocs