Annotation of parser3/src/www/htdocs/index.html, revision 1.487
1.399 parser 1: @main[]
1.486 paf 2: #^ttaintuntaint[]
3: #^tappend2[]
1.480 paf 4: #^badvsnprintf[]
1.479 paf 5: #^badoracequoting[]
1.477 paf 6: #^badconstructors[]
1.475 paf 7: #^xloadwrongtable[]
1.476 paf 8: #^xsetwrongtable[]
1.473 paf 9: #^if($form:test){y}{n}
1.472 paf 10: #^tablecolumnerror[]
11: #^roll[]
1.471 paf 12: #^cookie2[]
1.470 paf 13: #^tableset[]
1.469 paf 14: #^math:PI.format{%.30f}
1.462 paf 15: #^xchildren[]
16: #^thashforeach3[]
1.461 paf 17: #^thashforeach2[]
18: #^thashforeach[]
1.458 paf 19: #^thashdelete[]
1.456 paf 20: #^connect[mysql://user:pass@cd.rinet.ru/db]{^void:sql{z} }
1.454 paf 21: #^tappend[]
1.453 paf 22: #^sappend[]
1.452 paf 23: #^eval(10\3)<br>
1.450 paf 24: #^tform[]
1.448 paf 25: #^formattest[]
1.447 paf 26: #^filelist[]
1.443 paf 27: #^connect[mysql://user:pass@host]{ }
1.431 paf 28: #^безнадёжна_попытка_поправить_непоправимое[]
1.430 parser 29: #^tcache[]
1.460 paf 30: #^thashfileexp[]
1.468 paf 31: #^tcounter[]
1.423 parser 32: #^tablehash[]
1.443 paf 33: #j^hashfile[]
1.417 parser 34: #^formclass[]
1.415 parser 35: #^hren[]
1.485 paf 36: #^domedit[]
1.475 paf 37: #^domxslt[]
1.402 parser 38: #^lsplit2[]
1.401 parser 39: #^faceesize[]
1.445 paf 40: #^imageresize[]
1.399 parser 41: #^ifassignhash[]
42: #^tintdefault[]
43: #$response:status[404]
1.390 parser 44: #^ifpasshash[]
1.387 parser 45: #^movedir[]
46: #^replace[]
1.416 parser 47: #^set[]
1.385 parser 48: #^hash[]<hr>
1.384 parser 49: #$t[^methresult[]] ->$t
1.382 parser 50: #^terror[]
1.378 parser 51: #^ssave[]
1.377 parser 52: #^calendar[]
1.376 parser 53: #^thash[]
1.373 parser 54: #^tdef[]
1.375 parser 55: #^ford[]
1.371 parser 56: #^tif[]
1.383 parser 57: #^image[]
1.369 parser 58: #^mail2[]
1.413 parser 59: #^cookie[]
1.365 parser 60: #^response[]
1.364 parser 61: #^regexp2[]
62: #^ttablerem[]
63: #^pcre[]
64: #^regexp[]<hr>
65: #^mail[]
66: #^exec[]
67: #^fori[]
1.468 paf 68: #^tconnect[]
1.486 paf 69: ^xslt[]
1.470 paf 70: #^xml[]
1.364 parser 71: #^header[]
1.477 paf 72: <hr>
1.364 parser 73: OK
1.485 paf 74:
1.486 paf 75: @ttaintuntaint[]
76: <!-- некий панковский заголовок с буковкой C в круглых скобках -->^taint[html][
77:
78: ]zz
79: <hr>
80: ^untaint[html]{1^taint[ ]2 3}
81:
82:
1.485 paf 83: @tappend2[]
84: $t[^table::set{a b}]^t.append{1 2}$t.a
1.477 paf 85:
1.479 paf 86: @badvsnprintf[]
87: ^connect[zzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzz]{
88: }
89:
90:
1.477 paf 91: @badoracequoting[]
92: $SQL.connect-string[oracle://webspb:webpwd@mts?NLS_LANG=RUSSIAN_AMERICA.CL8MSWIN1251&NLS_DATE_FORMAT=YYYY-MM-DD HH24:MI:SS]
93: ^connect[$SQL.connect-string]{
1.478 paf 94: ^void:sql{delete from paf}
1.479 paf 95: ^void:sql{insert into paf values (1, '$form:text')}
1.478 paf 96: $paf[^table::sql{select * from paf}]
97: ^paf.menu{
1.479 paf 98: $paf.id: ^untaint{$paf.block}<hr>
1.478 paf 99:
1.477 paf 100: }
1.478 paf 101: <hr>
102:
1.477 paf 103:
1.478 paf 104: ^rem{
1.477 paf 105: $news[^table::sql{select description from news}[$.limit(3)]]
106: ^news.menu{
107: ^untaint{$news.description}<hr>
108:
109: }
1.478 paf 110: <hr>
111: }
112:
113: $tables[^table::sql{select table_name from user_tables}]
114: ^tables.menu{
115: $tables.table_name<br>
116: }
117:
1.477 paf 118: }
119: <hr>
120: $env:PATH
1.476 paf 121:
122: @badconstructors[]
123: $bred[^string::length[]]
124: $bred[^response::clear[]]
125: $bred[^int::int[]]
126:
1.475 paf 127:
128: @xloadwrongtable[]
129: $constr[^xdoc::load[wrongtable.xml]]
130:
131: @xsetwrongtable[]
132: $constr[^xdoc::set{<?xml version="1.0" encoding="windows-1251z" ?>
133: <block-list>^untaint[as-is]{$constructor}</block-list>}]
134:
1.471 paf 135:
1.472 paf 136: @tablecolumnerror[]
137: $t[^table::set{a}]
138: $t.$a
139:
1.471 paf 140: @roll[]
1.472 paf 141: #$date[^date::set(1970;1;2)]
142: #^date.roll[month](-1)
143: $date[^date::set(2038;1;1)]
1.471 paf 144: ^date.roll[month](+1)
145: $date.year $date.month $date.day
1.470 paf 146:
147: @cookie2[]
148: #=$cookie:clientType[$.value[test]]=<br>
149: =$cookie:clientType=<br>
150:
1.469 paf 151:
152: @tableset[]
153: $a[^table::set{a
154: 1
155: 2}]
156: ^eval(100\$a)
157:
158:
159:
160: @zzz[]
161:
1.462 paf 162:
163: $constructor[
164: <block1 name="main_srvr" type="0" label="Основное тело" />
165: <block2 name="main_srvr2" type="0" label="Основное тело" />
166: ]
167:
168: $constr[^xdoc::set{<?xml version="1.0" encoding="windows-1251" ?>
169: <block-list>^untaint[as-is]{$constructor}</block-list>}]
170:
171: $children[$constr.documentElement.childNodes]
172: ^if($children){
173: ^for[i](1;^children._count[]){
174: $node[$children.$i]
175: $node.nodeName<br>
176: }
177: }
178:
1.461 paf 179:
180: @thashforeach3[]
181: $h[
182: $.a[1]
183: $.b[2]
184: ]
185: $c[^table::set{a
186: ^h.foreach[key;value]{$value
187: }}]
188: $c.a
189:
190: @thashforeach2[]
191: $h[
192: $.a[1]
193: $.b[2]
194: ]
195: $c[
196: ^h.foreach[key;value]{
197: $.$key[$value]
198: }
199: ]
200: $c.b
1.458 paf 201:
202: @thashforeach[]
203: $h[
204: $.a[1]
205: $.b[2]
206: ]
207: ^h.foreach[key;value]{
208: $key=$value<br>
209: }
1.457 paf 210:
211: @thashdelete[]
212: $h[$.a[1] $.b[2]]
213: was:<br>
214: count=^h._count[] <br>
215: b='$h.b' <br>
216:
217: ^h.delete[b]
218:
219: now:<br>
220: count=^h._count[] <br>
221: b='$h.b'
1.452 paf 222:
223: @sappend[]
224: $test[123]
225: ^test.save[test]
226: ^test.save[append;test]
227:
1.453 paf 228: @tappend[]
229: $test[^table::set{a b
230: a1 b1}]
231: ^test.save[test]
232: $test[^table::set{a b
233: a2 b2}]
234: ^test.save[append;test]
1.452 paf 235:
1.448 paf 236:
237: @tform[]
1.449 paf 238: ^if(def $form:new_file){y}{n}
239: <form method="post" enctype="multipart/form-data">
240: <input type="file" name="new_file" />
1.448 paf 241: <input type=submit>
242: </input>
1.447 paf 243:
244: @formattest[]
245: $size(15.124)
246:
247: ^size.format{%.2f}
1.446 paf 248:
249: @filelist[]
250: $html[^file:list[.;\.html^$]]
251: ^html.menu{
252: $html.name<br>
253: }
254: <hr>
1.431 paf 255:
256: @безнадёжна_попытка_поправить_непоправимое[]
257: $dom_from_disk[^xdoc::load[input.xml]]
258: $dom_created_in_air[^xdoc::create[doc]]
259: ^dom_created_in_air.documentElement.appendChild[^dom_from_disk.documentElement.cloneNode(1)]
260: ^show-xdoc2[$dom_created_in_air]
261:
1.426 parser 262:
1.428 parser 263: @tcache[]
264: #^hashfile:clear[cache]
1.459 paf 265: $code[^hashfile::open[$DB_HOME;cache]]
1.430 parser 266: ^code.cache[key](2){
267: ^math:random(100)
268: # ^code.delete[]
1.428 parser 269: }
270:
271:
1.426 parser 272: @thashfileexp[]
1.459 paf 273: $hf[^hashfile::open[$DB_HOME;hashfile]]
1.428 parser 274: $hf.paf[$.value[крут] $.expires(3)]
275: paf=$hf.paf
1.459 paf 276: <hr>
277: ^hf.foreach[key;value]{
278: $key=$value<br>
279: }
1.427 parser 280: <hr>
281: $hash[^hf.hash[]]
282: =$hash.paf=
283: <hr>
1.420 parser 284:
1.423 parser 285: @tcounter[]
1.440 paf 286: ^tcounterone[$DB_HOME]
1.466 paf 287: other root:
288: ^tcounterone[${DB_HOME}2]
289: again, first:
290: ^tcounterone[$DB_HOME]
1.432 paf 291:
292: @tcounterone[DB_HOME]
293: $counter[^hashfile::open[$DB_HOME;counter]]
1.440 paf 294: #^counter.clear[]
1.423 parser 295: ^counter.transaction{
296: # $counter.value(10)
297: $counter.value($counter.value+1)
298: # ^counter.delete[value]
299: $counter.value
300: }
1.424 parser 301: <hr>
1.432 paf 302: ^rem{
1.424 parser 303: $hash[^counter.hash[]]
1.425 parser 304: =$hash.value=
1.424 parser 305: <hr>
1.432 paf 306: }
1.423 parser 307:
308: @tablehash[]
309: $productList[^table::set{id name
310: 1 носки
311: 2 валенки
312: 3 ушанка
313: }]
314:
315: #скажем, у первого дилера
316: $firstPriceList[^table::set{id price
317: 1 0.3
318: 3 1000
319: }]
320:
321: $firstPriceHash[^firstPriceList.hash[id]]
322:
323: ^productList.menu{
324: продукт "$productList.name" | цена у first: $firstPriceHash.[$productList.id].price<br>
325: }
326:
327:
1.420 parser 328: @hashfile[]
329: $hf[^hashfile::assign[hashfile]]
1.423 parser 330: #$hf.paf[крут5]
1.420 parser 331: paf=$hf.paf
1.402 parser 332:
1.417 parser 333: @formclass[]
334: ^$form:CLASS.a=$form:CLASS.a
335:
1.406 parser 336: @domdata[]
1.418 parser 337: ^if(1){
1.422 parser 338: # $a{^hren[]}
1.418 parser 339: }
1.419 parser 340: $a
1.408 parser 341: $xdoc[^xdoc::create[doc]]
342: $doc[$xdoc.documentElement]
1.473 paf 343: $name[^doc.appendChild[^xdoc.createElement[name]]]
1.474 paf 344: $text[^name.appendChild[^xdoc.createTextNode[петросян&coz]]]
1.435 paf 345: ^untaint[as-is]{=$text.nodeValue=}
1.406 parser 346:
347: @domedit[]
348: ^domdata[]
1.404 parser 349: #$paf.nodeName<br>
350: #$doc.documentElement.nodeName<br>
351:
1.406 parser 352: ^show-xnode1[$xdoc.documentElement;0;1]
353: <hr>
354: ^show-xdoc2[$xdoc]
1.411 parser 355: <hr>
1.406 parser 356:
357: @domxslt[]
358: ^domdata[]
1.405 parser 359: ^show-xdoc2[^xdoc.transform[global.xsl;$.param1[123/]]]
1.411 parser 360: <hr>
1.401 parser 361:
362: @lsplit2[]
363: $path[/optics/]
364: $pathTable[^path.lsplit[/]]
365: ^pathTable.menu{
366: ^if(def $pathTable.piece){
367: =$pathTable.piece=
368: }
369: }
370:
1.395 parser 371:
1.397 parser 372: @faceesize[]
373: $k(2)
374: $pict[^image::load[paf.gif]]
375: $small[^image::create($pict.width/$k;$pict.height/$k)]
1.398 parser 376: ^small.copy[$pict](0;0;$pict.width;$pict.height;0;0;$small.width;$small.height;250)
1.397 parser 377: $response:body[^small.gif[]]
378:
1.395 parser 379: @imageresize[]
380: $k(2)
381: $pict[^image::create(400*$k;200*$k)]
382: $pict.line-width(2)
1.444 paf 383: ^pict.arc($pict.width/2;$pict.height/2;$pict.width-1;$pict.height-1;0;360;0x000000)
384: ^pict.arc($pict.width/2;$pict.height/2;$pict.width-20;$pict.height-20;0+20;360-20;0xff0000)
1.395 parser 385: #^pict.arc($pict.width/2;$pict.height/2;$pict.width;$pict.height;0;360;0xff0000)
1.444 paf 386: ^pict.circle($pict.width/2;$pict.height/2;$pict.height/2-20;0x0000ff)
387: ^pict.arc($pict.width/2;$pict.height/2;$pict.height-26;$pict.height-26;0+20;360-20;0xff0000)
388: $response:body[^pict.gif[]]
1.395 parser 389:
1.443 paf 390: #$small[^image::create($pict.width/$k;$pict.height/$k)]
1.396 parser 391: #^small.copy[$pict](0;0;$pict.width;$pict.height;0;0)
1.443 paf 392: #^small.copy[$pict](0;0;$pict.width;$pict.height;0;0;$small.width;$small.height;0)
1.395 parser 393:
1.443 paf 394: #$response:body[^small.gif[]]
1.395 parser 395:
1.388 parser 396:
397: @tintdefault[]
398: #$abc[abc]
399: $abc[33]
400: ^abc.int[z]
401: #^abc.int(123)
1.390 parser 402:
403: @ifassignhash[]
404: $h[^if(1){$.a(1);$.a(2)}]
405: $h.a
1.387 parser 406:
407: @ifpasshash[]
408: $a[$.e[a]]
409: $b[$.e[b]]
1.389 parser 410: ^ifpasshashdest[^if(1){$a;$b}]
1.387 parser 411: #$x[^if(1){$a}{$b}]
412: #^ifpasshashdest[$x]
413:
414: @ifpasshashdest[p]
415: $p.e
416:
417: @movedir[]
418: ^file:move[a;deeper/a]
1.386 parser 419:
420: @replace[]
421: $a[12^;3]
422: ^a.replace[^table::set{from to
423: 2^; !
424: }]
425:
1.385 parser 426:
427: @set[]
428: ^setdata[]
429: ^a.add[$b]
430: add:$a.3<br>
431:
432: ^setdata[]
433: ^a.sub[$b]
434: sub2:$a.2<br>
435: sub1:$a.1<br>
436:
437: ^setdata[]
438: $c[^a.union[$b]]
439: union3:$c.3<br>
440: union2:$c.2<br>
441:
442: ^setdata[]
443: $c[^a.intersection[$b]]
444: intersection3:$c.3<br>
445: intersection2:$c.2<br>
446:
447: ^setdata[]
448: intersects:^if(^a.intersects[$b]){y;n}<br>
449: intersects2:^if(^a.intersects[ ]){y;n}<br>
450:
451:
452: <hr>
453:
454: @setdata[]
455: $a[$.1[a1] $.2[a2]]
456: $b[ $.2[b2] $.3[b3]]
457:
1.383 parser 458:
1.384 parser 459: @hash[]
460: $h[^hash::create[$._default[123]]]
461: $h.paf[not kretin]
462: $h.paf<br>
463: =$h.that=<br>
464:
465: @methresult[]
466: $result[^table::set{1}]
1.377 parser 467:
1.381 parser 468: @terror[]
469: ^error[method z must be called with z]
470:
1.380 parser 471: @syntax1[]
472: #^a[^b]
473:
474: @syntax2[]
1.381 parser 475: #^a[
1.379 parser 476:
1.377 parser 477: @ssave[]
478: $abc[abc]
479: ^abc.save[abc]
1.376 parser 480:
481: @calendar[]
482: 2001;11:<br>
483: $week_days[^date:calendar[rus](2001;11)]
484: <pre>
485: ^week_days.menu{^for[wday](0;7){^if($week_days.$wday){$week_days.$wday; ^; ^;} }<br>}
486: </pre>
1.372 parser 487:
1.375 parser 488: @thash[]
489: $table[^table::set{id name age
490: 1 paf 278
491: 2 пиф 234
492: }]
493: $hash[^table.hash[id;^table::set[nameless]{id
494: name}]]
495: $hash.2.id $hash.2.name $hash.2.age
496:
1.372 parser 497: @tdef[]
498: $s[0]
499: if 0=^if($s){}{n}<br>
500: if def 0=^if(def $s){y}{}<br>
501: <hr>
1.371 parser 502:
503: @ford[]
1.374 parser 504: ^for[i](0;5){$i}{($i)}
1.368 parser 505:
1.370 parser 506: @tif[]
507: ^if[def]{y;n}
508:
1.368 parser 509: @image[]
510: $pict[^image::create(400;200)]
1.379 parser 511: ^pict.arc($pict.width/2;$pict.height/2;$pict.width-1;$pict.height-1;0;360;0x000000)
512: ^pict.arc($pict.width/2;$pict.height/2;$pict.width-10;$pict.height-10;0+10;360-10;0xff0000)
513: #^pict.arc($pict.width/2;$pict.height/2;$pict.width;$pict.height;0;360;0xff0000)
514: ^pict.circle($pict.width/2;$pict.height/2;$pict.height/2-10;0x0000ff)
515: ^pict.arc($pict.width/2;$pict.height/2;$pict.height-26;$pict.height-26;0+10;360-10;0xff0000)
1.368 parser 516: $response:body[^pict.gif[]]
517:
518:
1.366 parser 519:
1.369 parser 520: @mail2[]
1.367 parser 521: ^mail:send[
1.369 parser 522: $.content-type[$.value[text/plain] $.charset[windows-1251]]
523: $.from[Александр Петросян <paf@design.ru>]
1.367 parser 524: $.to[Александр Петросян <paf@design.ru>]
1.369 parser 525: $.subject[проверка]
526: $.body[проверка]
1.367 parser 527: ]
528:
1.366 parser 529: @cookie[]
1.367 parser 530: $env:HTTP_COOKIE<br>
531:
532: #$cookie:переменная[test тест ТЕСТ2]
533: =$cookie:переменная=<br>
534: #$cookie:переменная2[test тест ТЕСТ3]
535: =$cookie:переменная2=<br>
1.412 parser 536: =$cookie:CLASS.переменная2=<br>
1.365 parser 537:
538: @response[]
539: #^if($form:reload){
540: $response:refresh[$.value[0] $.url[./t.html?uri=$env:SERVER_NAME]]
541: #}
1.364 parser 542:
543: @xslt[]
544: ^xdata[]
1.407 parser 545: $transformed[^xdoc.transform[global.xsl;$.param1[123/]]]
546: ^show-xdoc2[$transformed]
1.364 parser 547:
548: @regexp2[]
549: $s[ select]
550: $s[^s.match[^^\s*][]{!}]
551: $s
552:
553: @header[]
554: $response:refresh[
555: $.value[0]
556: $.url[http://design.ru?a=^taint[123]]
557: ]
558:
559: @ttablerem[]
560: $table[^table::load[a.cfg]]
561: ^table.menu{$table.a}
562:
563: @tconnect[]
564: ^connect[mysql://test:test@paf/test?charset=cp1251_koi8&compress=1&timeout=1&named_pipe=1]{
565: $tables[^table::sql{show tables}]
566: #$cols[^tables.columns[]]
567: #$cols.column
568: ^tables.menu{
569: $tables.[Tables_in_test]<br>
570: }
571: }
572:
573: @pcre[]
574: $s[1 2]
575: ^s.match[\s;ig]{!}
576: #^s.match[\d;ig]{!}
577:
578:
579: @regexp[]
580: $s[abcАБВ]
581: ^if(^s.match[б][i]){y}{n}
582:
583: @mail[]
584: #$ORIGINS(1)
585: ^mail:send[
586: $.from[paf@design.ru]
587: $.to[paf@design.ru]
588: $.body[1
589:
590: 2
591:
592:
593: 3]
594: ]
595:
596: @exec[]
1.370 parser 597: $a[^file::exec[fc.exe;;a;b]]
1.364 parser 598: $a.status|$a.stderr<hr>
599:
600: @fori[][i]
601: ^for[i](1;3){... =$i= ...}
602:
603: @xdata[]
604: #$response:content-type[$.value[text/html] $.charset[windows-1251]]
1.468 paf 605: $xdoc[^xdoc::set{<?xml version="1.0" encoding="windows-1251"?>
606: <!--DOCTYPE people SYSTEM "D:\Y\parser3project\parser3\src\www\htdocs\people.dtd"-->
607: <people>
608: <man id="1" имя="word слово">
609: <name>P«^;AF B</name>
610: </man>
611: <man id="2">
612: <name>ПИФ^taint[&]</name>
613: </man>
614: </people>
615: }]
1.364 parser 616:
617: @xml[]
618: ^xdata[]
619:
620: ^show-xdoc2[$xdoc]<hr>
621: #^show-xnode1[$xdoc]<hr>
622: $people[^xdoc.select[*/man]]
623: #^show1[]
624: ^show-xnodes1[$people]<hr>
625: #^people.0.owner.hren[]
626:
1.393 parser 627: ^show-xnode1[^xdoc.selectSingle[*/man[2]/name];0;1]<hr>
1.364 parser 628:
629: by id:
630: ^show-xnode1[^xdoc.getElementById[1];0;1]
631: <hr>
632:
633: @show1[array]
634: ^for[i](0;^array._count[]-1){
635: $x[$array.$i]
636: $x.firstChild.nodeValue:
637: $pattributes[$x.parentNode.attributes]
638: ^if(^pattributes._count[]){
639: $pattributes.id.name=$pattributes.id.nodeValue
640: }
641: <br>
642: }
643:
644: @show-xnodes1[array][i]
645: ^for[i](0;^array._count[]-1){
646: ^show-xnode1[$array.$i;0;1]
647: }
648:
649: @show-xnode1[x;level;single][l]
650: ^if(def $x){
651: ^for[l](0;$level-1){ ^; ^; ^; ^;}
652: ^if($x.nodeType == $xnode:ELEMENT_NODE){
653: <^;$x.nodeName
654: $pairs[$x.attributes]
655: ^if(def $pairs){
656: $names[^pairs._keys[]]
657: ^names.menu{ $names.key="$pairs.[$names.key].nodeValue"}
658: }
659: >^;
660: }{
661: [$x.nodeType]
662: }
663:
664: ^if(def $x.nodeValue){$x.nodeValue}<br>
665: ^show-xnode1[$x.firstChild]($level+1)
666: ^if(!$single){
667: ^show-xnode1[$x.nextSibling]($level)
668: }
669:
670: ^if($x.nodeType == $xnode:ELEMENT_NODE){
671: ^for[l](0;$level-1){ ^; ^; ^; ^;}<^;/$x.nodeName>^;<br>
672: }
673: }
674:
675: @show-xdoc2[xdoc]
1.473 paf 676: ^xdoc.save[out/save.xml;
1.364 parser 677: # $.encoding[windows-1251]
678: $.method[xml]
679: ]
680: $file[^xdoc.file[
681: # $.encoding[windows-1251]
682: $.method[html]
683: ]]
1.473 paf 684: ^file.save[text;out/save_file.html]
1.487 ! paf 685: #$response:body[^xdoc.file[ $.media-type[text/paf] ]]
! 686: <pre>^taint[html][^xdoc.string[
! 687: # $.method[html]
! 688: # $.version[1.0]
! 689: # $.encoding[utf-8]
! 690: # $.omit-xml-declaration[yes]
! 691: # $.standalone[yes]
! 692: # $.doctype-public[-//W3C//DTD XHTML]
! 693: # $.doctype-system[/a/b/c/]
! 694: # $.indent[no]
! 695: $.media-type[text/paf]
1.486 paf 696: ]]
1.413 parser 697: </pre>
1.435 paf 698:
E-mail: