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