Annotation of parser3/src/www/htdocs/index.html, revision 1.394
1.394 ! parser 1: @main[]
#^ifassignhash[]
#^tintdefault[]
#$response:status[404]
1.390 parser 2: #^ifpasshash[]
1.387 parser 3: #^movedir[]
4: #^replace[]
1.386 parser 5: #^set[]
1.385 parser 6: #^hash[]<hr>
1.384 parser 7: #$t[^methresult[]] ->$t
1.382 parser 8: #^terror[]
1.378 parser 9: #^ssave[]
1.377 parser 10: #^calendar[]
1.376 parser 11: #^thash[]
1.373 parser 12: #^tdef[]
1.375 parser 13: #^ford[]
1.371 parser 14: #^tif[]
1.383 parser 15: #^image[]
1.369 parser 16: #^mail2[]
1.367 parser 17: #^cookie[]
1.365 parser 18: #^response[]
1.364 parser 19: #^regexp2[]
20: #^ttablerem[]
21: #^pcre[]
22: #^regexp[]<hr>
23: #^mail[]
24: #^exec[]
25: #^fori[]
26: #^tconnect[]
1.383 parser 27: #^xslt[]
1.392 parser 28: ^xml[]
1.364 parser 29: #^header[]
30: OK
1.388 parser 31:
32: @tintdefault[]
33: #$abc[abc]
34: $abc[33]
35: ^abc.int[z]
36: #^abc.int(123)
1.390 parser 37:
38: @ifassignhash[]
39: $h[^if(1){$.a(1);$.a(2)}]
40: $h.a
1.387 parser 41:
42: @ifpasshash[]
43: $a[$.e[a]]
44: $b[$.e[b]]
1.389 parser 45: ^ifpasshashdest[^if(1){$a;$b}]
1.387 parser 46: #$x[^if(1){$a}{$b}]
47: #^ifpasshashdest[$x]
48:
49: @ifpasshashdest[p]
50: $p.e
51:
52: @movedir[]
53: ^file:move[a;deeper/a]
1.386 parser 54:
55: @replace[]
56: $a[12^;3]
57: ^a.replace[^table::set{from to
58: 2^; !
59: }]
60:
1.385 parser 61:
62: @set[]
63: ^setdata[]
64: ^a.add[$b]
65: add:$a.3<br>
66:
67: ^setdata[]
68: ^a.sub[$b]
69: sub2:$a.2<br>
70: sub1:$a.1<br>
71:
72: ^setdata[]
73: $c[^a.union[$b]]
74: union3:$c.3<br>
75: union2:$c.2<br>
76:
77: ^setdata[]
78: $c[^a.intersection[$b]]
79: intersection3:$c.3<br>
80: intersection2:$c.2<br>
81:
82: ^setdata[]
83: intersects:^if(^a.intersects[$b]){y;n}<br>
84: intersects2:^if(^a.intersects[ ]){y;n}<br>
85:
86:
87: <hr>
88:
89: @setdata[]
90: $a[$.1[a1] $.2[a2]]
91: $b[ $.2[b2] $.3[b3]]
92:
1.383 parser 93:
1.384 parser 94: @hash[]
95: $h[^hash::create[$._default[123]]]
96: $h.paf[not kretin]
97: $h.paf<br>
98: =$h.that=<br>
99:
100: @methresult[]
101: $result[^table::set{1}]
1.377 parser 102:
1.381 parser 103: @terror[]
104: ^error[method z must be called with z]
105:
1.380 parser 106: @syntax1[]
107: #^a[^b]
108:
109: @syntax2[]
1.381 parser 110: #^a[
1.379 parser 111:
1.377 parser 112: @ssave[]
113: $abc[abc]
114: ^abc.save[abc]
1.376 parser 115:
116: @calendar[]
117: 2001;11:<br>
118: $week_days[^date:calendar[rus](2001;11)]
119: <pre>
120: ^week_days.menu{^for[wday](0;7){^if($week_days.$wday){$week_days.$wday; ^; ^;} }<br>}
121: </pre>
1.372 parser 122:
1.375 parser 123: @thash[]
124: $table[^table::set{id name age
125: 1 paf 278
126: 2 пиф 234
127: }]
128: $hash[^table.hash[id;^table::set[nameless]{id
129: name}]]
130: $hash.2.id $hash.2.name $hash.2.age
131:
1.372 parser 132: @tdef[]
133: $s[0]
134: if 0=^if($s){}{n}<br>
135: if def 0=^if(def $s){y}{}<br>
136: <hr>
1.371 parser 137:
138: @ford[]
1.374 parser 139: ^for[i](0;5){$i}{($i)}
1.368 parser 140:
1.370 parser 141: @tif[]
142: ^if[def]{y;n}
143:
1.368 parser 144: @image[]
145: $pict[^image::create(400;200)]
1.379 parser 146: ^pict.arc($pict.width/2;$pict.height/2;$pict.width-1;$pict.height-1;0;360;0x000000)
147: ^pict.arc($pict.width/2;$pict.height/2;$pict.width-10;$pict.height-10;0+10;360-10;0xff0000)
148: #^pict.arc($pict.width/2;$pict.height/2;$pict.width;$pict.height;0;360;0xff0000)
149: ^pict.circle($pict.width/2;$pict.height/2;$pict.height/2-10;0x0000ff)
150: ^pict.arc($pict.width/2;$pict.height/2;$pict.height-26;$pict.height-26;0+10;360-10;0xff0000)
1.368 parser 151: $response:body[^pict.gif[]]
152:
153:
1.366 parser 154:
1.369 parser 155: @mail2[]
1.367 parser 156: ^mail:send[
1.369 parser 157: $.content-type[$.value[text/plain] $.charset[windows-1251]]
158: $.from[Александр Петросян <paf@design.ru>]
1.367 parser 159: $.to[Александр Петросян <paf@design.ru>]
1.369 parser 160: $.subject[проверка]
161: $.body[проверка]
1.367 parser 162: ]
163:
1.366 parser 164: @cookie[]
1.367 parser 165: $env:HTTP_COOKIE<br>
166:
167: #$cookie:переменная[test тест ТЕСТ2]
168: =$cookie:переменная=<br>
169: #$cookie:переменная2[test тест ТЕСТ3]
170: =$cookie:переменная2=<br>
1.365 parser 171:
172: @response[]
173: #^if($form:reload){
174: $response:refresh[$.value[0] $.url[./t.html?uri=$env:SERVER_NAME]]
175: #}
1.364 parser 176:
177: @xslt[]
178: ^xdata[]
1.375 parser 179: ^show-xdoc2[^xdoc.transform[global.xsl;$.param1[123/]]]
1.364 parser 180:
181: @regexp2[]
182: $s[ select]
183: $s[^s.match[^^\s*][]{!}]
184: $s
185:
186: @header[]
187: $response:refresh[
188: $.value[0]
189: $.url[http://design.ru?a=^taint[123]]
190: ]
191:
192: @ttablerem[]
193: $table[^table::load[a.cfg]]
194: ^table.menu{$table.a}
195:
196: @tconnect[]
197: ^connect[mysql://test:test@paf/test?charset=cp1251_koi8&compress=1&timeout=1&named_pipe=1]{
198: $tables[^table::sql{show tables}]
199: #$cols[^tables.columns[]]
200: #$cols.column
201: ^tables.menu{
202: $tables.[Tables_in_test]<br>
203: }
204: }
205:
206: @pcre[]
207: $s[1 2]
208: ^s.match[\s;ig]{!}
209: #^s.match[\d;ig]{!}
210:
211:
212: @regexp[]
213: $s[abcАБВ]
214: ^if(^s.match[б][i]){y}{n}
215:
216: @mail[]
217: #$ORIGINS(1)
218: ^mail:send[
219: $.from[paf@design.ru]
220: $.to[paf@design.ru]
221: $.body[1
222:
223: 2
224:
225:
226: 3]
227: ]
228:
229: @exec[]
1.370 parser 230: $a[^file::exec[fc.exe;;a;b]]
1.364 parser 231: $a.status|$a.stderr<hr>
232:
233: @fori[][i]
234: ^for[i](1;3){... =$i= ...}
235:
236: @xdata[]
237: #$response:content-type[$.value[text/html] $.charset[windows-1251]]
238: $xdoc[^xdoc::load[input.xml]]
239:
240: @xml[]
241: ^xdata[]
242:
243: ^show-xdoc2[$xdoc]<hr>
244: #^show-xnode1[$xdoc]<hr>
245: $people[^xdoc.select[*/man]]
246: #^show1[]
247: ^show-xnodes1[$people]<hr>
248: #^people.0.owner.hren[]
249:
1.393 parser 250: ^show-xnode1[^xdoc.selectSingle[*/man[2]/name];0;1]<hr>
1.364 parser 251:
252: by id:
253: ^show-xnode1[^xdoc.getElementById[1];0;1]
254: <hr>
255:
256: @show1[array]
257: ^for[i](0;^array._count[]-1){
258: $x[$array.$i]
259: $x.firstChild.nodeValue:
260: $pattributes[$x.parentNode.attributes]
261: ^if(^pattributes._count[]){
262: $pattributes.id.name=$pattributes.id.nodeValue
263: }
264: <br>
265: }
266:
267: @show-xnodes1[array][i]
268: ^for[i](0;^array._count[]-1){
269: ^show-xnode1[$array.$i;0;1]
270: }
271:
272: @show-xnode1[x;level;single][l]
273: ^if(def $x){
274: ^for[l](0;$level-1){ ^; ^; ^; ^;}
275: ^if($x.nodeType == $xnode:ELEMENT_NODE){
276: <^;$x.nodeName
277: $pairs[$x.attributes]
278: ^if(def $pairs){
279: $names[^pairs._keys[]]
280: ^names.menu{ $names.key="$pairs.[$names.key].nodeValue"}
281: }
282: >^;
283: }{
284: [$x.nodeType]
285: }
286:
287: ^if(def $x.nodeValue){$x.nodeValue}<br>
288: ^show-xnode1[$x.firstChild]($level+1)
289: ^if(!$single){
290: ^show-xnode1[$x.nextSibling]($level)
291: }
292:
293: ^if($x.nodeType == $xnode:ELEMENT_NODE){
294: ^for[l](0;$level-1){ ^; ^; ^; ^;}<^;/$x.nodeName>^;<br>
295: }
296: }
297:
298: @show-xdoc2[xdoc]
299: ^xdoc.save[save.xml;
300: # $.encoding[windows-1251]
301: $.method[xml]
302: ]
303: $file[^xdoc.file[
304: # $.encoding[windows-1251]
305: $.method[html]
306: ]]
307: ^file.save[text;save_file.html]
308: <pre>^taint[^xdoc.string[]]</pre>
309: # $.encoding[windows-1251]
310: # $.method[xml]
311: #]]
E-mail: