|
|
| version 1.241, 2001/07/25 11:22:47 | version 1.366, 2001/10/08 15:14:07 |
|---|---|
| Line 1 | Line 1 |
| @main[] | |
| ^cookie[] | |
| #^response[] | |
| #^regexp2[] | |
| #^ttablerem[] | |
| #^pcre[] | |
| #^regexp[]<hr> | |
| #^mail[] | |
| #^exec[] | |
| #^fori[] | |
| #^tconnect[] | |
| #^xslt[] | |
| #^xml[] | |
| #^header[] | |
| OK | |
| @cookie[] | |
| $cookie:переменная[test тест ТЕСТ2] | |
| =$cookie:переменная= | |
| $cookie:переменная2[test тест ТЕСТ3] | |
| =$cookie:переменная2= | |
| @response[] | |
| #^if($form:reload){ | |
| $response:refresh[$.value[0] $.url[./t.html?uri=$env:SERVER_NAME]] | |
| #} | |
| @xslt[] | |
| ^xdata[] | |
| ^show-xdoc2[^xdoc.transform[global.xsl]] | |
| @regexp2[] | |
| $s[ select] | |
| $s[^s.match[^^\s*][]{!}] | |
| $s | |
| @header[] | |
| $response:refresh[ | |
| $.value[0] | |
| $.url[http://design.ru?a=^taint[123]] | |
| ] | |
| @ttablerem[] | |
| $table[^table::load[a.cfg]] | |
| ^table.menu{$table.a} | |
| @tconnect[] | |
| ^connect[mysql://test:test@paf/test?charset=cp1251_koi8&compress=1&timeout=1&named_pipe=1]{ | |
| $tables[^table::sql{show tables}] | |
| #$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.select-single[*/man[2]/name];0;1]<hr> | |
| ################################################################# | by id: |
| # тут описаны следующие макросы : | ^show-xnode1[^xdoc.getElementById[1];0;1] |
| # default[val;deflt] | |
| # ifdef[value;deflt;undef] | |
| # color[color1;color2] | |
| # load[file] | |
| # include[file] | |
| # trim[string;char] | |
| # getFileExt[file] | |
| ################################################################# | |
| # старый добрый default | |
| @main[] | |
| #$response:status[404] | |
| #$response:location[/inh.html] | |
| #<hr> | |
| $таблица[^table:set{a b | |
| 1 2 | |
| 11 22 | |
| }] | |
| ^$таблица.fields.a=$таблица.fields.a<br> | |
| ^$таблица.a=$таблица.a<br> | |
| <hr> | |
| $n[] | |
| =^n.match[sdf][]{123}= | |
| <hr> | <hr> |
| =$3= | @show1[array] |
| <hr> | ^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] | |
| } | |
| $строка[123] | @show-xnode1[x;level;single][l] |
| ^строка.match[(.);g]{($match.1)} | ^if(def $x){ |
| <hr> | ^for[l](0;$level-1){ ^; ^; ^; ^;} |
| $a{ | ^if($x.nodeType == $xnode:ELEMENT_NODE){ |
| $b[1] | <^;$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> | |
| } | |
| } | } |
| ^$b=$b<br> | |
| ^$a!$a<br> | @show-xdoc2[xdoc] |
| ^$b=$b<br> | ^xdoc.save[save.xml; |
| <hr> | # $.encoding[windows-1251] |
| $.method[xml] | |
| ] | |
| $file[^xdoc.file[ | |
| # $.encoding[windows-1251] | |
| $.method[html] | |
| ]] | |
| ^file.save[text;save_file.html] | |
| <pre>^taint[^xdoc.string[]]</pre> | |
| # $.encoding[windows-1251] | |
| # $.method[xml] | |
| #]] |