Annotation of parser3/www/htdocs/index.html, revision 1.182
1.104 paf 1: @USE
1.105 paf 2: /derived.p
1.145 paf 3: /operators.p
1.15 paf 4:
1.72 paf 5: @auto[filespec]
6: $selffilespec[$filespec]
1.63 paf 7: #$form:here
1.131 paf 8: #$request:charset[UTF-8]
1.177 paf 9: $request:charset[windows-1251]
10: $response:charset[windows-1251]
1.112 paf 11: #$response:charset[UTF-8]
1.131 paf 12: #$response:charset[empty]
1.84 paf 13: #$response:content-type[$.value[text/html]$.charset[$response:charset]]
1.15 paf 14:
1.171 paf 15: @postprocess[body]
1.60 paf 16: #<b>$body</b>
17: #$result[123]
1.171 paf 18: $body
19: <hr>
20: OK
1.37 paf 21:
1.15 paf 22: @main[]
1.72 paf 23: #$a(123)
24: #^a.format[%.10u]
1.71 paf 25: #$result[111]
1.70 paf 26: #^f[a]
1.133 paf 27: #^connect[mysql://mdm:4b833ljq@db-mysql/mdm]{
1.88 paf 28: # ^int:sql{select news_id from news where news_id=-1}[
1.143 paf 29: # $.default{2}
1.88 paf 30: # ]<br>
1.115 paf 31: # ^hash::sql{bad}
1.88 paf 32: # ^string:sql{select news_id from news where news_id=-1}[$.default{2}]
1.109 paf 33: # ^file::load[text;^string:sql{select 'from sql server' }]
1.95 paf 34: # ^string:sql{select '^^hello[]' }] $ORIGINS(1)
1.96 paf 35: # ^process{ ^^h[]}
1.97 paf 36: # ^process{^string:sql{select '1
37: # ^^hello[]' }] }
1.131 paf 38: # ^double:sql{select '2*' ^; }
1.133 paf 39: #$card_sequence_expect_no(^double:sql{select 20020909131047 #card_sequence_expect_no from card_sequence})
40: #^card_sequence_expect_no.format[%15.f]
41: #}
1.49 paf 42: #^eval(2)
1.48 paf 43: #^tcrashlocaljunctionsv2[]
1.49 paf 44: #^tcrashlocaljunctions[]
1.50 paf 45: #^tjunctions[]
1.47 paf 46: #^replacetest[]
1.48 paf 47: #^matchoptionpp[]
1.46 paf 48: #^txdocxnodechild[]
1.44 paf 49: #^tclasses[]
1.43 paf 50: #$math:PI
51: #^b:method[]
1.42 paf 52: #^main[]
1.41 paf 53: #^errort[]
1.44 paf 54: #^tselectNumber[]
1.39 paf 55: #$result[hello]
1.36 paf 56: #^invaliddate2[]
57: #^process2[]
58: #^casehashtext[]
1.35 paf 59: #^subjvaltest[]
60: #^tableselect0[]
1.34 paf 61: #^memnotest1[]
1.32 paf 62: #^voidparams[]
1.31 paf 63: #^rolls2[]
1.30 paf 64: #^cacheexpireschanging[]
1.29 paf 65: #^cacheexpiresfixed[]
66: #^dateoffsets[]
67: #^exceptionTypes[]
1.28 paf 68: #^roll2[]
1.27 paf 69: #^rolls[]
1.25 paf 70: #^exceptions1[]
1.22 paf 71: #^locate_by_expr[]
1.18 paf 72: #^method_junction_params{...}
1.17 paf 73: #^verifyCookie[paf]
1.37 paf 74: #^execlangs[]
1.16 paf 75: #$t[^tobjeresult[]]$t.a
76: #^xmlprobs[]
1.15 paf 77: #^doubleprobs[]
78: #^math:random(-10)
79: #^divnamestop[]
80: #^arrayclone[]
81: #^operator_tricks[]
82: #^xoutputrusattr[]
83: #^xdocset1[]
84: #^regexp3[]
85: #^exec2[]
86: #^tlock[]
87: #^xmloutattrwithoutvalue[]
88: #^precisionProblem[]
89: #^xpath[]
90: #^ttablesetlang[]
91: #^ttime[]
92: #^tupper[]
93: #^treplace[]
94: #^xslt2[]
95: #^tcache2[]
96: #$ORIGINS(1)
97: #$t[^table::set{a b} ^table::set{c d}]
98: #^ttaintuntaint[]
99: #^tappend2[]
100: #^badvsnprintf[]
101: #^badoracequoting[]
102: #^badconstructors[]
103: #^xloadwrongtable[]
104: #^xsetwrongtable[]
105: #^if($form:test){y}{n}
106: #^tablecolumnerror[]
107: #^roll[]
108: #^tableset[]
109: #^math:PI.format{%.30f}
110: #^xchildren[]
111: #^thashforeach3[]
112: #^thashforeach2[]
113: #^thashforeach[]
114: #^thashdelete[]
115: #^connect[mysql://user:pass@cd.rinet.ru/db]{^void:sql{z} }
116: #^tappend[]
117: #^sappend[]
118: #^eval(10\3)<br>
119: #^tform[]
120: #^formattest[]
121: #^filelist[]
122: #^connect[mysql://user:pass@host]{ }
123: #^безнадёжна_попытка_поправить_непоправимое[]
124: #^tcache[]
125: #^thashfileexp[]
126: #^tcounter[]
127: #^tablehash[]
128: #j^hashfile[]
129: #^formclass[]
130: #^hren[]
131: #^domedit[]
132: #^domxslt[]
133: #^lsplit2[]
134: #^faceesize[]
135: #^imageresize[]
136: #^ifassignhash[]
137: #^tintdefault[]
138: #$response:status[404]
139: #^ifpasshash[]
140: #^movedir[]
141: #^replace[]
142: #^set[]
143: #^hash[]<hr>
144: #$t[^methresult[]] ->$t
145: #^terror[]
146: #^ssave[]
147: #^thash[]
148: #^tdef[]
149: #^ford[]
150: #^tif[]
1.84 paf 151: #^image[]
1.15 paf 152: #^response[]
153: #^regexp2[]
154: #^ttablerem[]
155: #^pcre[]
156: #^regexp[]<hr>
157: #^mail[]
158: #^fori[]
159: #^tconnect[]
160: #^xslt[]
161: #^header[]
1.53 paf 162: #^tablehasht[]
1.54 paf 163: #^datecreatestring[]
1.56 paf 164: #^mssqltypes1[]
165: #^badthrows[]
1.57 paf 166: #^xmlspace[]
167: #^counter[main.counter]
168: #^xpath2[]
169: #^callindirect[]
170: #^junctionprob[]
1.59 paf 171: #^datecreatestring2[]
172: #^tstoredproc[]
173: #^tstoredproc2[]
174: #^forkeys[]
1.60 paf 175: #^pngsize[]
1.61 paf 176: #^checkList[]
1.63 paf 177: #^datetest[]
1.65 paf 178: #^tserge[]
1.69 paf 179: #^envt[]
1.67 paf 180: #^selectt[]
181: #^select2[]
182: #^selectSingle2[]
183: #^selectString2[]
184: #^selectNumber2[]
185: #^selectBool2[]
186: #^xdoccreate[]
187: #^xdoccreatetag[]
1.70 paf 188: #^xdocload[]
1.67 paf 189: #^xdocstring[]
190: #^xdocsave[]
1.68 paf 191: #^div[]
192: #^datecreatestring3[]
1.73 paf 193: #^tfilespec[]
1.77 paf 194: #^tcrypt[]
1.74 paf 195: #^cryptdocsample[]
1.78 paf 196: #^tnormalize[]
1.83 paf 197: #^xmltransformbyxdoc[]
1.81 paf 198: #^sergestrandef[]
1.83 paf 199: #^tstdin[]
200: #^tfind[]
1.86 paf 201: #^mimet[]
1.92 paf 202: #^joinlimit[]
1.89 paf 203: #^tableclonelimit[]
1.91 paf 204: #^transparams[]
205: #^sendtests[]
1.93 paf 206: #^wwrapperpass[]
1.95 paf 207: #^badpos[]
1.98 paf 208: #^processtest[]
209: #^mail3[]
1.100 paf 210: #^datesaving[]
1.101 paf 211: #^badconstructor[]
1.103 paf 212: #^calendar[]
1.104 paf 213: #^monthdays(8)
214: #^xdoctypetest[]
1.105 paf 215: #^xtabletest[]
1.117 paf 216: #^staticstest[]
1.108 paf 217: #^staticstest2[]
1.115 paf 218: #^rbodytest[]
219: #^cookie[]
1.116 paf 220: #^cookieexpirestest[]
1.119 paf 221: #^postest[]
1.120 paf 222: #^voidpostest[]
1.122 paf 223: #^badcolumntest[]
1.124 paf 224: #^delimiters[]
1.125 paf 225: #^новый-split[]
1.127 paf 226: #^грязные-cookie[]
227: #^html-почта[]
228: #^badswitchtest[]
1.128 paf 229: #^okswitchtest[]
1.131 paf 230: #^cgit[]
1.132 paf 231: #^ttransformsep[]
1.133 paf 232: #^calltest[]
1.134 paf 233: #^xpath3[]
1.139 paf 234: #^doubleliterals[]
235: #^newxor[]
1.135 paf 236: #^mail2[]
1.139 paf 237: #^exec[]
1.140 paf 238: #^passpost[]
1.141 paf 239: #^fordelim[]
1.143 paf 240: #^duplicatetable2hashkey[]
1.142 paf 241: #^duplicatehashsqlkey[]
1.145 paf 242: #^longlreplace[]
243: #^table2hash_onecolumn[]
1.146 paf 244: #^crossopvars[]
1.148 paf 245: #^three[]
1.149 paf 246: #^badLangAfterCatch[]
1.150 paf 247: #^zeroinstdin[]
1.151 paf 248: #^shifts[]
249: #^jspace[]
1.152 paf 250: #^hashselfmodification[]
251: #^emptyTransformResult[]
252: #^badxdoccreate[]
1.154 paf 253: #^if(-d "CVS"){y}{n}
1.155 paf 254: #^badjunctioncall[]
1.156 paf 255: #^russianindex[]
256: #^virtualtest[]
257: #^xml[]
258: #^mail4[]
1.157 paf 259: #^voidconstructorpass[]
1.160 paf 260: #^$form:CLASS.a=$form:CLASS.a<br>
261: #^cookie2[]
262: #^menudelim[]
1.158 paf 263: #^touchittest[]
1.162 paf 264: #^touchittest2[]
1.160 paf 265: #^opauto[]
1.161 paf 266: #^trycontextt[]
267: #^tfor[]
1.162 paf 268: #^user-foreach-test[]
269: #^includet[]
1.163 paf 270: #^derived:includet[]
1.164 paf 271: #^fortestsep[]
1.165 paf 272: #^derived:inclass_process_test[]
273: #$derived[^derived::create[]]^derived.inclass_process_test[]
1.166 paf 274: #^domorigint[]
1.167 paf 275: #^junctiontest2[]
1.169 paf 276: #^junctionselftest[]
1.170 paf 277: #^bad-compiletosystem[]
278: #^steppedfor[i](1;10;2){$i }
1.171 paf 279: #^file:fullpath[a.gif]<br>
280: #^file:fullpath[/abs/a.gif]<br>
281: #$form:a/$form:image-map=
282: #^foreachform[]
283: #^selectSingleoct[]
284: #^compilebug[]
285: #^badhashcreate[]
1.172 paf 286: #^badsendmail[]
287: #^keygenedhash[]<br>
288: #<hr>[$env:HTTP_REFERER]
289: #$response:Content-TypE[bad]
1.174 paf 290: #^emailhead2[]
1.175 paf 291: #^includet2overridedynamic[]
1.176 paf 292: #^includet2overridestatic[]
1.177 paf 293: #^virtualtest2[]
294: #^message-id-test[]
1.179 paf 295: #^test_exif[jpg]
1.180 paf 296: ^http_prefix[]
1.179 paf 297: #^http_prefix_table[]
1.180 paf 298: #^http_prefix_xml[]
1.179 paf 299:
300: @http_prefix_xml[]
1.180 paf 301: $xdoc[^xdoc::load[http://www.cbr.ru/scripts/XML_daily.asp?date_req=02/03/2002;
302: # $.method[HEAD]
303: $.headers[
304: $.user-agent[1]
305: ]
306: ]]
1.181 paf 307:
1.179 paf 308: <pre>^taint[^xdoc.string[]]</pre>
309:
310: @http_prefix_table[]
311: $table[^table::load[nameless;http://www.artlebedev.ru;$.USER-AGENT[paf]]]
312: ^table.count[]
313: <hr>
314: <pre>$table.0</pre>
315:
316: @http_prefix[]
317: #$file[^file::load[text;http://www.artlebedev.ru]]
318: #$file[^file::load[text;http://www.artlebedev.ru;alt]]
1.182 ! paf 319: #$file[^file::load[text;http://parser3/exif.html;
1.180 paf 320: $file[^file::load[text;http://parser3/none;
321: $.headers[
322: $.USER-AGENT[paf]
323: ]
1.179 paf 324: ]]
1.181 paf 325: server: $file.SERVER<br>
1.179 paf 326: $file.status
327: <hr>
328: <pre>$file.text</pre>
1.177 paf 329:
1.178 paf 330: @test_exif[dir]
331: $file[^file:list[$dir;\.(jpe?g|JPE?G)^$]]
332: <table border=1>
1.177 paf 333: ^file.menu{
1.178 paf 334: <tr valign=top>
1.177 paf 335: $image[^image::measure[$dir/$file.name]]
1.178 paf 336: <td>^image.html[$.width(100)$.height(100)]</td>
337: <td>
338: $file.name<hr>
339: $exif[$image.exif]
340: ^if($exif){
341: $keys[^exif._keys[]] ^keys.sort{$keys.key}
342: ^keys.menu{
343: $key[$keys.key]
344: $value[$exif.$key]
345:
346: ${key}: <b>^show_exif_value[$value]</b><br>
347: }
348: }{
349: no EXIF info<br>
350: }
351: </td>
352: </tr>
353: }
354: </table>
355:
356: @show_exif_value[value][i]
357: ^if($value is hash){
358: ^for[i](0;$value-1){$value.$i}[,]
359: }{
360: $value
1.177 paf 361: }
1.178 paf 362:
1.177 paf 363:
364: @message-id-test[]
365: ^mail:send[
366: $.from[paf@mail]
367: $.to[paf@mail]
368: $.subject[test]
369: # $.message-id[<1@parser.ru>]
370: $.Message-id[<2@parser.ru>]
371: $.subject[проверка]
372: $.text[мычит!]
373: ]
1.176 paf 374:
375: @virtualtest2[]
376: $derived[^derived::create[]]
377: ^derived.first[]
378:
1.174 paf 379:
1.175 paf 380: @includet2overridedynamic[]
1.176 paf 381: includet2overridedynamic:<br>
382: shold say 'hello in some.p'<br>
383: <hr>
1.174 paf 384: $derived[^derived::create[]]
385: ^derived.includet2override[]
1.175 paf 386:
387: @includet2overridestatic[]
1.176 paf 388: includet2overridestatic:<br>
389: shold say 'hello in derived.p'<br>
390: because in static classes there's no way to determine derived class (no virtual mech becase of no virtual table)<br>
391: <hr>
1.175 paf 392: ^derived:includet2override[]
1.172 paf 393:
394: @emailhead2[]
395: ^mail:send[
396: $.charset[koi8-r]
397: $.from[paf@design.ru]
398: $.to[paf@mail]
1.174 paf 399: # $.reply-to[^taint[agat] <^taint[ag_7k@mail.ru]>]
400: $user[^taint[agat]]
401: $email[^taint[ag_7k@mail.ru]]
402: $.reply-to[$user $email]
403: $.subject[test2]
1.172 paf 404: ]
405:
406: @keygenedhash[]
407: $table[^table::create{key value
408: 1 a
409: 2 b
410: }]
411: $hash[^table.hash($table.key*2)]
412: '$hash.4.value' must be 'b'
1.171 paf 413:
414: @badsendmail[]
415: ^mail:send[
416: $.from[hren < paf@design.ru
417: >]
418: $.to[paf@design.ru]
419: $.subject[test]
420: ]
421:
422: @badhashcreate[]
423: $hash[
424: $.ok[1]
425: ]
426: $.bad[1]
427:
428: @compilebug[]
429: ^a[]^#31=
430:
431: @selectSingleoct[]
432: $d[^xdoc::create[doc]]
433: $element[^d.selectSingle[$nothing]]
434:
435:
436: @foreachform[]
437: <a href=index.cgihtml?one&a=1&two&b=2&three?1,2>one</a><br>
438: <a href=index.cgihtml?one&a=1&two&b=2&three?shit>two</a><br>
439:
440: ^form:fields.foreach[key;value]{
441: $key -- $value
442: }[<br>]
443: <hr>
444: $nameless[$form:tables.nameless]
445: ^if(def $nameless){
446: nameless table -- ^nameless.menu{$nameless.field}[,]
447: }
448: ^if(def $form:imap){
449: <hr>
450: IMAP $form:imap.x : $form:imap.y
451: }
1.170 paf 452:
453: @steppedfor[name;from;to;step;code]
454: $caller.$name($from)
455: ^while($caller.$name<=$to){
456: $code
457: ^caller.$name.inc($step)
458: }
1.169 paf 459:
460: @bad-compiletosystem[]
461: ^process[$string:CLASS]{@a[]
462: }
1.168 paf 463:
464: @junctionselftest[]
465: $derived[^derived::create[]]^derived.explodejunction{$tomain[tomainOK]}
466: ^$tomain=$tomain
1.166 paf 467:
468: @junctiontest2[]
469: ^if($if is junction){is junction;not junction}<br>
470: ^if(def $if){defined;not defined}<br>
1.165 paf 471:
472: @domorigint[]
473: $xdoc[^xdoc::create[вася]]
474: ^xdoc.firstChild.setAttribute[name;значение]
475: $var[$xdoc.firstChild.nodeName]
476: ^throw[paf;$var]
477:
1.163 paf 478:
479: @fortestsep[][i]
480: ^for[i](1;3){$i}[,]
1.162 paf 481:
482: @includet[]
483: ^include[some.p]
484: ^included_method[2]
485:
486: @user-foreach-test[][key;value]
487: ^user-foreach[key;value]{$key=$value<br>}
488:
489: @user-foreach[key;value;code]
490: ^for[i](1;10){
491: $caller.$key($i)
492: $caller.$value($i*2)
493: $code
494: }
495:
1.161 paf 496:
497: @tfor[][i]
498: ^for[i](1;10){
499: $i
500: }
1.160 paf 501:
502: @trycontextt[]
503: ^try{
504: ^trycontexttsub[]
505: }{
506: $exception.handled(0)
507: }
508:
509:
510: @trycontexttsub[]
511: ^bad[]
512:
513:
514: @opauto[]
515: ^reada[]
1.159 paf 516:
517:
1.157 paf 518: @rusage2[]
1.77 paf 519: <hr>
1.74 paf 520: OK
1.157 paf 521:
522: @rusage2[]
523: $s[$status:rusage]
524:
525: ^s.tv_sec.format[%.0f].^s.tv_usec.format[%06.0f]
526:
1.150 paf 527:
1.156 paf 528: @voidconstructorpass[]
529: $a[$form:a]
530: =^form:a.int(1)=
531: =^a.int(1)=
532:
533:
1.155 paf 534: @russianindex[]
535: #dir with files with russian-lang names
536: $where[dir]
537:
538: $dir[^file:list[$where;\.txt^$]]
539: ^dir.menu{
540: <a href=$where/^untaint[uri]{$dir.name}>$dir.name</a><br>
541: }
542:
1.154 paf 543: @badjunctioncall[]
544: ^badjunctioncallinside{code}
545:
546: @badjunctioncallinside[code]
1.155 paf 547: xx^code[]
1.152 paf 548:
549: @badxdoccreate[]
550: $xdoc[^xdoc::create[вася]]
551: #$xdoc[^xdoc::create{<?xml version="1.0" encoding="$request:charset"?><doc>вася</doc>}]
552:
553: ^xdoc.firstChild.setAttribute[name;значение]
554: ^xdoc.string[]
555:
556:
557: @emptyTransformResult[]
558: $input[^xdoc::create[docBad]]
559: $sheet[^xdoc::create{<?xml version="1.0"?>
560: <xsl:stylesheet xmlns:xsl="http://www.w3.org/1999/XSL/Transform" version="1.0">
561: <xsl:template match="doc">
562: output
563: </xsl:template>
564: </xsl:stylesheet>
565: }]
566: $output[^input.transform[$sheet]]
567: $response:body[^output.file[]]
568:
569: @hashselfmodification[]
570: $hash[
571: $.a[1]
572: $.b[2]
573: ]
574: ^hash.foreach[key;value]{
575: # $hash.c[1]
576: $hash.a[1]
577: }
578:
579: @touchittest[][i]
1.160 paf 580: $i[before]
581: ^touchit[]
582: $i
583:
584: @touchittest2[]
1.158 paf 585: $i[before]
1.152 paf 586: ^touchit[]
587: $i
588:
1.151 paf 589:
590: @jspace[]
591: $a(1)
592: ^jspace_call{^eval($a*2)}
593: #$a(2)
594: #$junction
595:
596: @jspace_call[param][a]
597: $a[unrelcfgdfgated]
598: $junction<br>
599: $junction.a(2)
600: $junction<br>
601:
1.150 paf 602: @shifts[]
603: ^eval(1<<3)<br>
604: ^eval(8>>2)<br>
1.151 paf 605: #^if(1=1){y;n}<br>
1.150 paf 606:
1.149 paf 607:
608: @zeroinstdin[]
609: #$f[^file::exec[a.pl;$.stdin[$.shit[]]]]
610: $f[^file::exec[a.pl;$.stdin[^file::load[binary;1z2.txt]]]]
611: =$f.text=
612: ^f.save[binary;1z2.out]
1.148 paf 613:
614: @badLangAfterCatch[]
615: ^try{
616: $a[
617: тут язык сменился на pass_appended
618: ^throw[user;test]
619: и улетело с не тем языком
620: ]
621: }{
622: $exception.handled(1)
623: }
624: 1 2
1.145 paf 625:
626: @crossopvars[]
627: #^one[]<hr>
628: ^two[]<hr>
629:
630: @table2hash_onecolumn[]
631: $t[^table::create{a
632: 1
633: 1
634: }]
635: #^t.hash[a]
636: #^t.hash[a;b]
637: $h[^t.hash[a][$.distinct(1)]]
638: $h.1.a
1.143 paf 639:
640: @longlreplace[]
1.144 paf 641: $str1[ мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла ]
1.143 paf 642: $str2[ела]
643: $str[Мама $str1 раму]
644:
1.144 paf 645: ^str.replace[^table::create[nameless]{мыла $str2}]
1.141 paf 646:
647: @duplicatehashsqlkey[]
648: ^connect[mysql://mdm:4b833ljq@db-mysql/mdm]{
649: $t[^table::sql{select * from news}]
650: $c[^t.columns[]]
651: ^c.menu{$c.column}[,]
652:
1.142 paf 653: $h[^hash::sql{select news_type_id, name from news}[$.distinct(1)]]
1.141 paf 654: }
655:
656: @duplicatetable2hashkey[]
657: $t[^table::create{a b
658: 1 2
659: 1 3
660: }]
1.142 paf 661: #^t.hash[a]
662: #^t.hash[a;b]
663: ^t.hash[a][$.distinct[1]]
1.140 paf 664:
665: @menudelim[]
666: $t[^table::create{a
667: 1
668: 2
669: 3
670: 4
671: 5
672: }]
673:
674: ^t.menu{^if($t.a<3){}{$t.a}}[,]
675:
676: @fordelim[]
677: ^for[a](0;6){^if($a<3){}{$a}}[,]
678:
1.135 paf 679:
1.139 paf 680: @passpost[]
681: <form method=post name="test" id="test">
682: <textarea name="text" cols=20 rows =6>^taint[html][1
683: 2
684:
685: 3]</textarea><br>
686: <input type=submit>
687: </form>
688:
689: ^if(def $form:text){
690: $a[^file::cgi[a.pl]]
691: $a.text|$a.status|$a.stderr<hr>
692: }
693:
694: @exec[]
695: #$a[^file::exec[a.cmd]]
696: $a[^file::cgi[a.cmd]]
697: $a.text|$a.status|$a.stderr<hr>
698:
699:
1.137 paf 700: @newxor[]
1.138 paf 701: ^eval(1!|2 #примечание()zzz
702: |0x100)<br>
1.137 paf 703: #^eval(1!||2)<br>
704: ^if(1!|1){y}{n}
705:
706: #@method[$bad]
1.136 paf 707:
1.135 paf 708: @doubleliterals[]
709: #^eval(1e-10)
710: ^eval("1e-20")
1.133 paf 711:
712: @xpath3[]
713: $constr[^xdoc::create{<?xml version="1.0" encoding="$request:charset" standalone="no"?> <constructor-data><object object_type_id="1" template_id="1" data_process_id="1" is_published="1">проверка</object> <block-list> <block name="date" type="0" label="Дата" is_hide_pub="1" data_type="1"/> <block name="content" type="0" label="Текст" is_hide_pub="1" data_type=""/> </block-list></constructor-data>}]
714: $objectData[^constr.selectSingle[/constructor-data/object]]
715: $objectData.nodeType<br>
716: $objectData.firstChild.nodeValue
717:
718: @calltest[]
719: ^calltest2[string]
720:
721: @calltest2[s]
722: $s
1.131 paf 723:
724: @ttransformsep[]
725: $input[^xdoc::load[20020909131046.xml]]
726: $output[^input.transform[generated.xsl]]
727: ^output.string[]
1.127 paf 728:
729: @okswitchtest[]
730: $local[local value]
731: ^switch[1]{
732: ^case[1]{1code $local}
733: }
734:
735: @badswitchtest[]
736: ^switch[1]{
737: ^badswitchtestcase[]
738: }
739: @badswitchtestcase[][local]
740: $local[local value]
741: ^case[1]{1code $local}
742:
743: @badjunction[]
744: ^badj1[]
745: ^badj2[]
746:
747: @html-почта[]
748: $переменная[значение]
749: ^mail:send[
750: $.from[paf@mail]
751: $.to[paf@mail]
752: $.subject[htmltest1]
753: $.html{тест$переменная= !}
754: ]
755:
1.124 paf 756:
757: @грязные-cookie[]
1.126 paf 758: $cookie:a[&]
1.125 paf 759: $cookie:a
1.124 paf 760:
761: @новый-split[]
762: $abc[a.b.c]
763: #$table[^abc.split[.]]
764: #$table[^abc.split[.;l]]
765: #$table[^abc.split[.;v]]
766: $table[^abc.split[.;lv]]
767: ^table.menu{$table.piece}[,]
768: <hr>
769: #$table[^abc.split[.;h]]
770: $table[^abc.split[.;hr]]
771: $table.0,$table.1,$table.2<br>
1.123 paf 772:
773: @delimiters[]
774: $a#1[1]<br>
775: $a#1=<br>
776:
1.121 paf 777:
778: @badcolumntest[]
779: $table[^table::load[ext.cfg]]
780: $table.b
781:
1.120 paf 782:
783: @virtualtest[]
784: $derived[^derived::create[derived create actual param]]
785: ^derived.test[]
786:
1.119 paf 787:
788: @voidpostest[]
789: $s[]
790: ^s.pos[$nothing]
1.118 paf 791:
792: @postest[]
793: $s[$nothing]
794: ^s.pos[$nothing]
1.113 paf 795:
1.115 paf 796: @cookieexpirestest[]
797: #$cookie:exptest[1]
798: #$cookie:exptest[$.value[2] $.expires(+1)]
799: $response:xxxx[^date::now(+10)]
800: $response:yyy[$.value[^date::now(+20)]]
801: $response:yyy[$.value[vvv] $.aaaa[^date::now(+20)]]
802:
1.113 paf 803: @rbodytest[]
804: $request:body=
805: <form method=post>
806: <input type=submit name=paf value=123>
807: </form>
1.107 paf 808:
809: @staticstest2[]
810: ^$derived:derived_var=$derived:derived_var<br>
811: ^$derived:a=$derived:a<br>
1.108 paf 812: $derived:a[changed] ^$derived:a=$derived:a<br>
1.107 paf 813: $derived:derived_var[changed]
814: ^$derived:derived_var=$derived:derived_var<br>
815:
1.105 paf 816: @staticstest[]
817: $derived[^derived::create[]]
818: ^derived.test[]
1.110 paf 819: <hr>
1.106 paf 820: ^$derived.a=$derived.a<br>
821: ^$derived.x=$derived.x<br>
1.110 paf 822: <hr>
823: ^if($derived is derived){derived is derived}{error: derived is not derived}<br>
824: ^if($derived is table){derived is table}{error:derived is not table}<br>
1.111 paf 825: <hr>
826: ^^eval(^$derived)=^eval($derived)<br>
827: ^^if(^$derived)=^if($derived){y}{n}<br>
1.106 paf 828:
1.105 paf 829:
1.104 paf 830: @xdoctypetest[]
831: $xdoc[^xdoc::create[x]]
832: ^if($xdoc is xdoc){y}{n}
833:
834: @xtabletest[]
835: $xtableo[^xtable::create[]]
836: ^if($xtableo is table){y}{n}
1.105 paf 837: #^xtableo.columns[]
1.100 paf 838:
1.103 paf 839: @monthdays[month]
840: $from[^date::create(2000;$month;1)]
841: $to[^date::create($from)] ^to.roll[month](+1)
842: $result($to-$from)
843:
1.100 paf 844: @badconstructor[]
845: ^date::now[]
1.99 paf 846:
847: @datesaving[]
848: $now[^date::now[]]
849: $now.daylightsaving<br>
850: $now.yearday<br>
851: #
852: $date[^date::create(2002;1;3)]
853: $date.daylightsaving<br>
854: $date.yearday
1.97 paf 855:
1.98 paf 856: @mail4[]
857: ^mail:send[
858: $.from[paf@mail.design.ru]
859: $.to[paf@mail.design.ru]
1.156 paf 860: $.subject[^taint[uri][москва=E0_+ ]=2]
1.98 paf 861: $.text[^taint[uri][москва]=]
862: $.html{<a href=http://there.ru/?city=^taint[uri][Москва]>link</a>}
863: ]
1.97 paf 864: @processtest[]
865: $f[^file::load[text;piece.p]] ^process{$f.text}
866: $ORIGINS(1)
1.93 paf 867:
868:
869: @badpos[]
870: $s[123]
1.94 paf 871: ^s.mid(0;2)
1.92 paf 872:
873: @wwrapperpass[]
874: $h[^hash::create[]]
875: $h.a(1)
876: ^my_method[^if(1){$h}]
877: работает. так и должно быть?
878:
879: @my_method[p]
880: ^p._count[]
881:
1.88 paf 882:
883: @tableclonelimit[]
884: $source[^table::create{a
885: aa
886: bb
887: cc}]
888: ^source.offset(1)
889: #$dest[^table::create[$source]]
890: $dest[^table::create[$source;$.offset(2)]]
891: $dest[^table::create[$source;$.limit(2)]]
892: $dest[^table::create[$source;$.offset(1)$.limit(1)]]
893: $dest[^table::create[$source;$.offset(1)$.limit(2)]]
894: $dest[^table::create[$source;$.offset[cur]$.limit(2)]]
895:
896: ^dest.menu{$dest.a}[,]<br>
897:
898: @joinlimit[]
899: $source[^table::create{a
900: aa
901: bb
902: cc}]
903: ^source.offset(2)
904: $dest[^table::create{a
905: xx
906: }]
907: #^dest.join[$source]
908: #^dest.join[$source;$.offset(2)]
909: #^dest.join[$source;$.limit(2)]
910: #^dest.join[$source;$.offset(1)$.limit(1)]
911: #^dest.join[$source;$.offset(1)$.limit(2)]
1.91 paf 912: #^dest.join[$source;$.offset[cur]$.limit(1)]
913: ^dest.join[$source;$.limit(0)]
1.88 paf 914:
915: ^dest.menu{$dest.a}[,]<br>
1.86 paf 916:
917: @cgit[]
918: $f[^file::cgi[showenv.cmd]]
919: $f.HELLO=<br>
920: $f.CONTENT-TYPE=<br>
921: $f.content-type=<br>
922:
1.83 paf 923:
1.84 paf 924: @mimet[]
1.85 paf 925: $f[^file::stat[a.GIF]]
926: $f.content-type
1.84 paf 927:
928:
1.83 paf 929: @tfind[]
930: ^file:find[index.html]
931:
932: @tstdin[]
933: $f[^file::exec[test.pl;$.stdin[проверка stdin потока]]]
934: <pre>$f.text</pre>
1.80 paf 935:
936: @sergestrandef[]
937: $sQuantity[ ]
938: ^sQuantity.int(10)
1.78 paf 939:
940: @xmltransformbyxdoc[]
941: $xdoc[^xdoc::set{^process{<?xml version="1.0" encoding="windows-1251"?>
942: <!--DOCTYPE people SYSTEM "D:\Y\parser3project\parser3\src\www\htdocs\people.dtd"-->
943: <people>
944: <man id="1" имя="word слово">
945: <name>1 2</name>
946: </man>
947: </people>
948: }}]
949: $sheet[^xdoc::create{<?xml version="1.0"?>
1.79 paf 950: <xsl:stylesheet xmlns:xsl="http://www.w3.org/1999/XSL/Transform" version="1.0"
951:
952: >
1.78 paf 953: <!--<xsl:output doctype-public ="-//W3C//DTD XHTML" indent="yes"/>-->
954:
1.79 paf 955: <!--<xsl:import href="http://localhost/html.xsl"/>-->
956: <xsl:import href="html.xsl"/>
957:
1.78 paf 958: <xsl:param name="param1">defparam1</xsl:param>
959: <xsl:param name="param2">defparam2</xsl:param>
1.79 paf 960:
1.78 paf 961:
962: <xsl:template match="doc">
963: param1=<xsl:value-of select="^$param1"/><br/>
964: param2=<xsl:value-of select="^$param2"/><br/>
965:
966: test return <something background=""/>
967: </xsl:template>
968:
969: <xsl:template name="test">
1.81 paf 970: test return3
1.78 paf 971: </xsl:template>
972:
973: <xsl:template match="people">
974: <html>
1.155 paf 975: <head>
976: <link type='text/xml' rel='alternate' href='/Default.vsdisco'/>
977: z</head>
1.78 paf 978: para1=<xsl:copy-of select="^$param1"/>
979: <xsl:apply-templates/>
980: <hr/>
981: <xsl:call-template name="test"/>
982: </html>
983: </xsl:template>
984:
985: <xsl:template match="name">
986: <b><xsl:value-of select="."/></b>
987: </xsl:template>
988: </xsl:stylesheet>
989: }]
990:
991:
992: $xdoc[^xdoc.transform[$sheet]]
993: $string[^xdoc.string[$.method[html]]]
994: ^string.save[a]
995: ^untaint[html]{$string}
996:
997:
1.77 paf 998:
999: @tnormalize[]
1000: #s состоит из 1000 фрагментов
1001: $s[^for[i](0;999){фрагмент }]
1002: #это займет много ресурсов
1003: ^s.match[фраг][g]{перга}
1004: #это займет меньше ресурсов
1005: #$normalized[^s.normalize[]]
1006: #^normalized.match[фраг][g]{перга}
1.74 paf 1007:
1008: @sendtests[]
1.89 paf 1009: ^text[]
1.74 paf 1010: #^html[]
1011: #^text-n-html[]
1012: #^file[]
1013: #^text-n-file[]
1.89 paf 1014: #^text-n-html-n-file[]
1.74 paf 1015: #^backwardcomp[]
1016:
1017: @backwardcomp[]
1018: ^mail:send[
1019: $.from[paf]
1020: $.to[paf]
1021: $.body[this is text value]
1022: ]
1023:
1024: @text[]
1025: ^mail:send[
1026: $.from[paf]
1.90 paf 1027: $.to[paf]
1.74 paf 1028: $.text[
1029: $.value[this is text value]
1030: ]
1031: ]
1032:
1033: @html[]
1034: ^mail:send[
1035: $.from[paf]
1036: $.to[paf]
1037: $.html{this is <b>html</b> value ^taint[<] 10}
1038: ]
1039:
1040: @text-n-html[]
1041: ^mail:send[
1042: $.from[paf]
1043: $.to[paf]
1044: $.text[
1045: $.value[this is text value]
1046: ]
1047: $.html[
1048: $.value{this is <b>html</b> value ^taint[<] 10}
1049: ]
1050: ]
1051:
1052: @file[]
1053: ^mail:send[
1054: $.from[paf]
1055: $.to[paf]
1056: $.file[^file::load[binary;image.jpg]]
1057: ]
1058:
1059: @text-n-file[]
1060: ^mail:send[
1061: $.from[paf]
1062: $.to[paf]
1063: $.text[
1064: $.value[this is text value]
1065: ]
1066: $.file[^file::load[binary;image.jpg]]
1067: ]
1068:
1069: @text-n-html-n-file[]
1070: ^mail:send[
1071: $.from[paf]
1072: $.to[paf]
1073: $.text[
1074: $.value[this is text value]
1075: ]
1076: $.html[
1077: $.COntent-type[$.value[text/html]$.charset[windows-1251xx]]
1078: $.value{this is <b>html</b> value ^taint[<] 10}
1079: ]
1080: $.file[^file::load[binary;image.jpg]]
1081: ]
1082:
1083:
1084:
1085: @md5salt[]
1086: 1234
1087:
1088: @cryptdocsample[]
1089: $users[^table::create{name password
1090: alice ***
1091: bob ***
1092: }]
1093:
1094: $htpasswd[^table::create[nameless]{}]
1095: ^users.menu{
1096: ^htpasswd.append{$users.name:^math:crypt[$users.password;^$apr1^$^md5salt[]]}
1097: }
1098:
1099: ^htpasswd.save[nameless;.htpasswd-parser-test]
1100:
1.73 paf 1101:
1102: @tcrypt[]
1.76 paf 1103: #^math:crypt[123;^$apr1^$1234567890abcdef]<br>
1104: ^math:crypt[123;^$apr1^$]<br>
1.72 paf 1105:
1106: @tfilespec[]
1107: src=$selffilespec<br>
1108: dirname=^file:dirname[$selffilespec]<br>
1109: basename=^file:basename[$selffilespec]<br>
1110: justname=^file:justname[$selffilespec]<br>
1111: justext=^file:justext[$selffilespec]<br>
1.68 paf 1112:
1113: @datecreatestring3[]
1114: $new_after[^date::now(-3)]
1115: $articles[^table::create{id title last_update
1116: 1 привет 2002-07-03}]
1117: ^articles.menu{
1118: $last_update[^date::create[$articles.last_update]]
1119: <a href=${articles.id}.html>$articles.title</a>
1120: ^if($last_update > $new_after){новая}
1121: <br>
1122: }
1.67 paf 1123:
1124: @div[]
1125: $var(5)
1126: ^var.inc(7)
1127: ^var.dec(3)
1128: ^var.div(4)
1129: ^var.mul(2)
1130: $var
1131:
1132:
1133: @xdocsave[]
1134: $document[^xdoc::create{<?xml version="1.0" encoding="windows-1251" ?>
1135: <document>
1136: строка1<br/>
1137: строка2<br/>
1138: </document>}]
1139: ^document.save[test.xml]
1140:
1141: @xdocstring[]
1142: $document[^xdoc::create{<?xml version="1.0" encoding="windows-1251" ?>
1143: <document>
1144: строка1<br/>
1145: строка2<br/>
1146: </document>}]
1147: ^document.string[
1148: $.method[html]
1149: ]
1150:
1151:
1152: @xdocload[]
1153: $document[^xdoc::load[article.xml]]
1154: $response:body[^document.file[$.media-type[text/xml]]]
1155:
1156:
1157: @xdoccreatetag[]
1158: $document[^xdoc::create[document]]
1159: $paraNode[^document.createElement[para]]
1160: $dummy[^document.documentElement.appendChild[$paraNode]]
1161: $response:body[^document.file[$.media-type[text/xml]]]
1162:
1163:
1164: @xdoccreate[]
1165: $document[^xdoc::create{<?xml version="1.0" encoding="windows-1251" ?>
1166: <document>
1167: текст
1168: </document>}]
1169: $response:body[^document.file[$.media-type[text/xml]]]
1170:
1171: @selectBool2[]
1172: $d[^xdoc::set{<?xml version="1.0" encoding="windows-1251"?>
1173: <t attr="привет" n="123"/>}]
1174: ^if(^d.selectBool[/t/@n > 10]){
1175: /t/@n больше 10
1176: }{
1177: не больше
1178: }
1179:
1180:
1181: @selectNumber2[]
1182: $d[^xdoc::set{<?xml version="1.0" encoding="windows-1251"?>
1183: <t attr="привет" n="123"/>}]
1184: ^d.selectNumber[number(/t/@n)+1]<br>
1185: ^d.selectNumber[2*2]<br>
1186:
1187:
1188: @selectString2[]
1189: $d[^xdoc::set{<?xml version="1.0" encoding="windows-1251"?>
1190: <t attr="привет" n="123"/>}]
1191: # результат=привет
1192: ^d.selectString[string(t/@attr)]
1193:
1194:
1195: @selectSingle2[]
1196: $d[^xdoc::set{<?xml version="1.0" encoding="windows-1251"?>
1197: <t attr="привет" n="123"/>}]
1198: # результат=один элемент "t"
1199: $element[^d.selectSingle[t]]
1200: # результат=2 (количество атрибутов <t>)
1201: Количество атрибутов: ^element.attributes._count[]<br>
1202: # результат=не существует (нет <x>)
1203: ^if(^d.select[x]){
1204: x существует
1205: }{
1206: x не существует
1207: }
1208:
1209: @select2[]
1210: $d[^xdoc::set{<?xml version="1.0" encoding="windows-1251"?><t attr="привет" n="123"/>}]
1211: # результат: список из одного элемента "t"
1212: $list[^d.select[t]]
1213: # результат: 2 = количество атрибутов <t>
1214: ^list.0.attributes._count[]<br>
1215: ^for[i](0;$list-1){
1216: $attr[$list.$i]
1217: $attr.nodeName = $attr.nodeType<br>
1218: }
1219:
1220:
1221: @selectt[]
1222: $d[^xdoc::set{<?xml version="1.0" encoding="windows-1251"?><t attr="привет" n="123"/>}]
1223: $list[^d.select[t]]
1224: ^list.0.attributes._count[]
1.65 paf 1225:
1226: @envt[]
1.66 paf 1227: $f[^file::exec[showenv.cmd;
1228: $.bad[value]
1229: $.CGI_good[value]
1230: ]]
1.65 paf 1231: $f.status<br>
1232: $f.stderr<br>
1233: <pre>$f.text</pre>
1234:
1.63 paf 1235:
1236: @tserge[]
1.64 paf 1237: ^if(" 09 "){y}
1.61 paf 1238:
1239: @datetest[]
1240: $f[^file::stat[some.zip]]
1241: Размер в байтах: $f.size<br>
1242: Год создания: $f.cdate.year<br>
1243: $now[^date::now[]]
1244: $DAYS_CONSIDERED_NEW(3)
1245: Статус: ^if($f.mdate >= $now-$DAYS_CONSIDERED_NEW){новый;старый}
1246:
1.60 paf 1247:
1248: @checkList[]
1249: ...^oneOf[a;a,b,c]...<br>
1250: #...^oneOf[a;ax,b,c]...<br>
1251: ...^oneWord[word]...<br>
1252: #...^oneWord[wo rd]...<br>
1253:
1254:
1255: @oneOf[s;list][t] выдаёт строку, если строка она есть в списке(разделенном запятыми)
1256: $t[^list.lsplit[,]]
1257: ^if(!^t.locate[piece;$s]){^throw[user;$s;unknown]}
1258: $result[$s]
1259:
1260: @oneWord[s]
1261: ^if(^s.match[\W]){^throw[user.data;$s;not word]}{$s}
1.59 paf 1262:
1263: @pngsize[]
1264: $i[^image::measure[test.png]]
1265: ^i.html[]
1266:
1267:
1268: @forkeys[]
1269: $text[^form:fields.foreach[key;val]{$key=$val
1270: }]
1271: ^text.save[ttt.txt]
1272: =$text=
1273:
1274:
1275: @tstoredproc2[]
1276: ^connect[odbc://DSN=nestle^;UID=nestle^;PWD=mbm32]{
1277: ^void:sql{exec pafvoid}
1278: }
1279:
1280: @tstoredproc[]
1281: ^connect[odbc://DSN=nestle^;UID=nestle^;PWD=mbm32]{
1282: $t[^table::sql{exec pafproc}]
1283: # $t[^table::sql{{call pafproc}}]
1284: $c[^t.columns[]]
1285: ^c.menu{$c.column}[<br>]
1286: }
1.57 paf 1287:
1288: @datecreatestring2[]
1.58 paf 1289: <table border=1>
1290: ^datecreatestring2show[2000]
1291: ^datecreatestring2show[2000-02]
1.59 paf 1292: ^datecreatestring2show[2000-2-03]
1.58 paf 1293: ^datecreatestring2show[2000-02-03 15]
1294: ^datecreatestring2show[2000-02-03 15:30]
1295: ^datecreatestring2show[2000-02-03 15:30:04]
1296: ^datecreatestring2show[2000-02-03 15:30:04 hren]
1297: ^datecreatestring2show[15:30]
1298: ^datecreatestring2show[15:30:05]
1299: ^datecreatestring2show[15:30:05 hren]
1300: </table>
1301:
1302: @datecreatestring2show[s]
1303: $date[^date::create[$s]]
1304: <tr>
1305: <td>$s</td><td align=right>^date.sql-string[]</td>
1306: </tr>
1307:
1.57 paf 1308:
1309: @junctionprob[][l]
1310: $l[123]
1311: $a{$l}
1312: ^junctionprobnested[$a]
1313: @junctionprobnested[p]
1314: $p
1315:
1316:
1317: @callindirecttarget[]
1318: callindirecttarget called
1319: @callindirect[]
1320: $f[$callindirecttarget]
1321: ^f[]
1322:
1323: @xpath2[]
1324: $xdoc[^xdoc::create{<?xml version="1.0" encoding="windows-1251"?>
1325: <doc>
1326: <field-list>
1327: <field name="aa"/>
1328: <field name="bb"/>
1329: </field-list>
1330: </doc>
1331: }]
1332:
1333: #^xdoc.string[]
1334:
1335: $fieldList[^xdoc.selectSingle[/doc/field-list]]
1336: #^fieldList.childNodes._count[]
1337: $fields[^fieldList.select[field]]
1338: #^fields._count[]
1339: ^fields.foreach[k;node]{
1340: $node.nodeName<br>
1341: }
1342: @counter[filespec][f;s]
1343: ^file:lock[$filespec]{
1344: $f[^file::load[text;$filespec]]
1345: $s[^eval($f.text+1)]
1346: ^s.save[$filespec]
1347: }
1348: $s
1.56 paf 1349:
1350: @xmlspace[]
1351: $xdoc[^xdoc::set{^process{<?xml version="1.0" encoding="windows-1251"?>
1352: <!--DOCTYPE people SYSTEM "D:\Y\parser3project\parser3\src\www\htdocs\people.dtd"-->
1353: <people>
1354: <man id="1" имя="word слово">
1355: <name>1 2</name>
1356: </man>
1357: </people>
1358: }}]
1359: $xdoc[^xdoc.transform[global.xsl]]
1360: $string[^xdoc.string[$.method[html]]]
1361: ^string.save[a]
1362: ^untaint[html]{$string}
1363:
1364: @badthrows[]
1365: #^throw[a;b;]
1366: ^throw[a;]
1.54 paf 1367:
1368: @mssqltypes1[]
1369: ^connect[odbc://DSN=nestle^;UID=nestle^;PWD=mbm32]{
1.55 paf 1370: # ^string:sql{select { ts '1998-05-02 01:23:56.123' }}
1371: # ^string:sql{select CAST({ ts '1998-05-02 01:23:56.123' }AS smalldatetime)}
1372: # ^string:sql{select CAST({ts '2002-04-28 00:00:00.000'} AS smalldatetime)}
1373: $t[^table::sql{select a from paf}]
1374: ^t.count[]
1.54 paf 1375: }
1.51 paf 1376:
1.53 paf 1377: @datecreatestring[]
1.54 paf 1378: $d[^date::create[2002-04-33 01:03:04]]
1.53 paf 1379: ^d.sql-string[]
1.52 paf 1380:
1381: @method[hash]
1382: $hash.key
1383: @mainZ[]
1384: ^method[
1385: $.key{code}
1386: ]
1387:
1.51 paf 1388: @tablehasht[]
1389: $t[^table::create{p
1390: 1
1391: 3
1392: 2
1393: 4}]
1394:
1395: $h[^t.hash[p]]
1396:
1397: =^h._count[]=
1398:
1399:
1400: @sqldefaults[]
1401: ^connect[mysql://mdm:4b833ljq@db-mysql/mdm]{
1402: ^int:sql{select news_id from news where news_id=-1}[$.default{2}]<br>
1403: ^string:sql{select news_id from news where news_id=-1}[$.default{2}]
1404: }
1.60 paf 1405: =======
1406: <hr>
1407: OK
1408: >>>>>>> 1.50
1.48 paf 1409:
1410: @tcrashlocaljunctionsv2[]
1411: $a[
1412: $b{ $c[1] }
1413: ]
1414: $b
1415: $c
1416:
1417: @tcrashlocaljunctions[]
1418: $var[aaa]
1419: ^if(1){
1420: ^tcrashlocaljunctions1[]
1421: }
1422:
1423: $j
1424:
1.49 paf 1425: @tcrashlocaljunctions1[][var]
1426: $var[varvalue]
1.48 paf 1427: $j{
1428: $var
1429: }
1.49 paf 1430: $j
1.48 paf 1431:
1432: @tjunctions[][tl]
1433: $t[^t::create[]]
1434: ^tjunctionsi[]
1435:
1436: @tjunctionsi[][tl]
1437: $tl[12345]
1438: ^t.tjunctionsm[
1439: $.key{
1440: $tl
1441: }
1442: ]
1.46 paf 1443:
1.47 paf 1444: @replacetest[]
1445: $b[b]
1446: $s[
1447: aaaaaaaaaa${b}aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa
1448: aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa${b}aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa
1449: ]
1450: ^s.replace[^table::create{from to
1451: ba !_}]
1452:
1453:
1.46 paf 1454: @matchoptionpp[]
1.47 paf 1455: #$ORIGINS(1)
1.46 paf 1456: $s[
1457: aaaaaaaaaabaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa
1.47 paf 1458: aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaabaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa
1459: aaaaaaaaaabaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa
1460: aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaabaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa
1461: aaaaaaaaaabaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa
1462: aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaabaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa
1463: aaaaaaaaaabaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa
1464: aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaabaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa
1465: aaaaaaaaaabaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa
1466: aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaabaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa
1.46 paf 1467: ]
1468: ^s.match[b;g']{($match.prematch|$match.match|$match.postmatch)}
1469:
1.44 paf 1470:
1471: @txdocxnodechild[]
1472: $xdoc[^xdoc::set{<?xml version="1.0" encoding="windows-1251" ?><d/>}]
1473: $xdoc.nodeName
1474: ^xdoc.selectNumber[2*2]
1.45 paf 1475: $xdoc:ELEMENT_NODE
1.44 paf 1476:
1477:
1478: @tclasses[]
1479: $t[^t::create[]]
1480: ^t.method[]
1481: <hr>
1482: ^t.base_method[]
1483:
1.40 paf 1484:
1485: @errort[]
1.42 paf 1486: ^xdoc::create[a]
1.40 paf 1487: #^throw[user;here;this]
1488:
1489: @tselectNumber[]
1490: $d[^xdoc::set{<?xml version="1.0" encoding="windows-1251"?><d attr="привет" n="123"/>}]
1491: ^d.selectString[string(d/@attr)]<br>
1492: ^d.selectNumber[2*2]<br>
1493: ^d.selectNumber[number(/d/@n)+1]<br>
1494:
1.34 paf 1495:
1.36 paf 1496: @invaliddate2[]
1497: $d[^date::create(1018946575/60/60)] ^d.sql-string[]
1498:
1499: @process2[]
1500: ^^process{
1501: ^process{
1502: ^$a[^^if(0){^$.k[y]}{^$.k[^^hren[]n]}] ^$a.k
1503: }
1504: }
1505:
1.35 paf 1506: @casehashtext[]
1507: $tt[1]
1508: $tmp[
1509: ^switch[$tt]{
1510: ^case[1]{
1511: $.aaa[123]
1512: }
1513: ^case[DEFAULT]{
1514: $.bbb[456]
1515: }
1516: }
1.36 paf 1517: shit!
1.35 paf 1518: ]
1.36 paf 1519: #$tmp
1.35 paf 1520: $tmp.aaa
1521:
1522: @subjvaltest[]
1523: $a12[val]
1524: $b[12]
1525: $a$b
1526:
1.34 paf 1527: @tableselect0[]
1528: $person[^table::create{name height
1529: paf 1.77
1530: шохин 2.07
1531: moko 1.77
1532: }]
1533: $nottoohigh[^person.select($person.height<2)]
1534: ^nottoohigh.menu{$nottoohigh.name<br>}
1.32 paf 1535:
1536: @transparams[]
1537: $idoc[^xdoc::create{<?xml version="1.0" ?><doc/>}]
1538: $odoc[^idoc.transform[global.xsl;
1539: $.param1['1']
1540: $.param2['2']
1541: ]]
1542: <pre>^taint[^odoc.string[$.method[html]]]
1543:
1544: @memnotest1[]
1545: ^for[i](0;4000){
1546:
1547: $xxxx[$i]
1548: $xxxx
1549:
1550: }
1551:
1552: @memnotest1notes[]
1553: одна итерация цикла:
1554: [Mon Apr 8 20:12:02 2002] execution-------------------------|
1.35 paf 1555: '469641+=28 wcodeframe -> 0 !optimize[3]''469669+=49 string от {} -> 0 optimize[3]'
1.32 paf 1556: [Mon Apr 8 20:12:02 2002] 12:STRING__WRITE
1557: [Mon Apr 8 20:12:02 2002] "|| "
1558: [Mon Apr 8 20:12:02 2002] 12:WITH_ROOT
1559: [Mon Apr 8 20:12:02 2002] 13:VALUE
1560: [Mon Apr 8 20:12:02 2002] "xxxx" string
1.35 paf 1561: [Mon Apr 8 20:12:02 2002] 14:CREATE_EWPOOL'469377+=24 wcodeframe -> 0 !optimize[1]''469401+=49 string -> 41 !optimize[7]'
1.32 paf 1562: [Mon Apr 8 20:12:02 2002] 16:WITH_READ
1563: [Mon Apr 8 20:12:02 2002] 17:VALUE
1564: [Mon Apr 8 20:12:02 2002] "i" string
1565: [Mon Apr 8 20:12:02 2002] 18:GET_ELEMENT
1.35 paf 1566: [Mon Apr 8 20:12:02 2002] 17:WRITE_VALUE'469452+=40 MAX_NUMBER -> !~2 actual digits''469492+=49 -> 41 !'
1567: [Mon Apr 8 20:12:02 2002] 16:REDUCE_EWPOOL'469541+=24 VString -> 0 optimize[5]'
1.32 paf 1568: [Mon Apr 8 20:12:02 2002] 15:CONSTRUCT_VALUE
1569: [Mon Apr 8 20:12:02 2002] 12:STRING__WRITE
1570: [Mon Apr 8 20:12:02 2002] "| "
1571: [Mon Apr 8 20:12:02 2002] 12:WITH_READ
1572: [Mon Apr 8 20:12:02 2002] 13:VALUE
1573: [Mon Apr 8 20:12:02 2002] "xxxx" string
1574: [Mon Apr 8 20:12:02 2002] 14:GET_ELEMENT
1575: [Mon Apr 8 20:12:02 2002] 13:WRITE_VALUE'469573+=41 string expand nothing for now'
1576: [Mon Apr 8 20:12:02 2002] 12:STRING__WRITE
1.35 paf 1577: [Mon Apr 8 20:12:02 2002] "||"'469617+=24 VString -> 0 !optimize[6]'
1.32 paf 1578: [Mon Apr 8 20:12:02 2002] <-ja returned
1579: [Mon Apr 8 20:12:02 2002] ja->
1580:
1581: 201/328=0.612804878049 %%optimized
1582:
1583: 1.
1584: CREATE_*POOL
1585: сделать
1586: *POOL_POOLED+CODE
1587: где
1588: wwrapper
1589: и(возможно) wcodeframe
1590: +string
1591: стековая переменная
1592:
1593: 2.
1594: избавиться от обёртки при возврате результата process [см. тело _for]
1595:
1596: 3.
1597: сделать callback для process, чтобы вынести invariants из _for & co.
1598:
1599: 4.
1600: @todo склеить get_element и write_value (при вставлении? write_value)
1601:
1602: 5.
1603: reduce_*pool -> вариант получить именно string, без VString обёртки [часто
1604: обёртка сразу выбрасывается = не нужна]
1605:
1606: 6.
1607: process вариант получить именно string, без VString обёртки [часто обёртка
1608: сразу выбрасывается = не нужна]
1609:
1610: 7.
1611: string head, убить 8 байт неправильной link
1.31 paf 1612:
1613: @voidparams[]
1614: ^voidparamsm[$form:field]
1615:
1616: @voidparamsm[p]
1617: ^p.int(123)
1.29 paf 1618:
1.30 paf 1619: @rolls2[]
1620: $now[^date::now[]]
1621: $d[^date::create($now.year;$now.month)] ^d.sql-string[]<br>
1622: ^for[i](1;12){
1623: ^d.roll[month](-1) ^d.sql-string[]<br>
1624: }
1625:
1.29 paf 1626: @cacheexpireschanging[]
1627: ^cache[$DB_HOME/keyключ][^date::now(+1)]{ ^rem{1 day}
1628: ^cache[^date::now(+4/24/60/60)]
1629: # ^cache(2)
1.30 paf 1630: # ^cache(0)
1.29 paf 1631: ^math:random(100)
1632: }
1633:
1634:
1635:
1636: @cacheexpiresfixed[]
1637: ^cache[$DB_HOME/keyключ][^date::now(+2/24/60/60)]{
1638: ^math:random(100)
1639: }
1640:
1641: @dateoffsets[]
1642: $d[^date::create(^date::now[]+1/24/60)]
1643: #$d[^date::now(+1/24/60)]
1644: ^d.sql-string[]
1645: #$d
1.26 paf 1646:
1.28 paf 1647: @exceptionTypes[]
1648: # parser.compile ^test[} компиляция (непарная скобка, ...)
1649: # parser.runtime ^if(0). параметры (больше/меньше, чем нужно, не тех типов, ...)
1650: # number.zerodivision ^eval(1/0) ^eval(1%0)
1651: # number.format ^eval(abc*5)
1652: # file.missing ^file:delete[delme] not found
1653: # file.access ^table::load[.] no rights
1654: # image.format ^image::measure[index.html] not gif/jpg
1655: # sql.connect ^connect[mysql://baduser:pass@host/db]{} not found/timeout
1656: # sql.execute ^connect[mysql://okuser:pass@host/db]{^void:sql{select bad}} syntax error
1657: # xml ^xdoc::create{<forgot?>} any error in xml/xslt libs
1658: # smtp.connect not found/timeout
1659: # smtp.execute communication error
1660:
1.26 paf 1661: @roll2[]
1662: $d[^date::create(2002;4;2;2;2;3)] ^d.sql-string[]<br>
1.27 paf 1663: ^d.roll[day](+365*3+1) ^d.sql-string[]<br>
1.26 paf 1664:
1.25 paf 1665:
1666: @rolls[]
1667: $d[^date::create(2002;4;4)]
1668: ^d.sql-string[]<br>
1669: ^for[i](1;7){
1670: ^d.roll[day](-1)
1671: ^d.sql-string[]<br>
1672: }
1673: <hr>
1674: $d[^date::create(2002;3;28)]
1675: ^d.sql-string[]<br>
1676: ^for[i](1;7){
1677: ^d.roll[day](+1)
1678: ^d.sql-string[]<br>
1679: }
1680: <hr>
1681: $d[^date::create(2002;12;3)]
1682: ^d.sql-string[]<br>
1683: ^for[i](1;14){
1684: ^d.roll[day](-1)
1685: ^d.sql-string[]<br>
1686: }
1687: <hr>
1688: $d[^date::create(2002;10;19)]
1689: ^d.sql-string[]<br>
1690: ^for[i](1;14){
1691: ^d.roll[day](+1)
1692: ^d.sql-string[]<br>
1693: }
1694:
1695:
1696:
1697:
1698:
1.22 paf 1699:
1700: @exceptions1[]
1701: ^try{
1702: aaa
1.24 paf 1703: ^throw[custom1;paf;is stupid]
1.22 paf 1704: }{
1.24 paf 1705: ^if($exception.type eq custom1){
1.28 paf 1706: # $exception.handled(1)
1707: ^throw[$exception]
1.24 paf 1708: type=$exception.type<br>
1709: source=$exception.source<br>
1710: file=$exception.file<br>
1711: lineno=$exception.lineno<br>
1712: comment=$exception.comment<br>
1713: }
1.22 paf 1714: }
1.21 paf 1715:
1716: @locate_by_expr[]
1717: $t[^table::create{a b
1718: 1 nok
1719: 2 ok
1720: 3 nok
1721: }]
1722: ^if(^t.locate($t.a==2)){$t.b}{n}
1.17 paf 1723:
1724: @method_junction_params[param]
1725: ^if($param is junction){junction}{ne junction}
1726:
1727: @verifyCookie[value]
1728: ^if($cookie:dummyvote eq $value){
1729: $result(1)
1730: }{
1731: $cookie:dummyvote[$value]
1732: $result(0)
1733: }
1.16 paf 1734:
1735: @execlangs[]
1.20 paf 1736: $f[^file::exec[test.pl]]
1.36 paf 1737: err:$f.stderr<br>
1.16 paf 1738: ^process{$f.text}
1739: #$c[^t.columns[]]
1740: #^c.menu{
1741: #* $c.column<br>
1742: #}
1.36 paf 1743: c:$t.c<br>
1.16 paf 1744:
1745: @tobjeresult[]
1746: ^table::create{a
1747: 12}
1.15 paf 1748:
1749: @xmlprobs[]
1750: $xmlDataType[^xdoc::load[program.xml]]
1751: #<pre>^taint[^xmlDataType.string[]]
1752: $xmlDataTypes[^xmlDataType.select[programs/program[@id=4]/data]]
1753: #=^xmlDataTypes._count[]=
1754: =^xmlDataTypes.0.getAttribute[type-id]=
1755:
1756: @doubleprobs[]
1757: $1(^math:radians(180))
1758: $2($math:PI)
1759: ^if(^1.format[%.10f]==^2.format[%.10f]){y;n}
1760: ^if($1==$2){y;n}
1761: ^if(^math:radians(180)==$math:PI){y;n}
1762:
1763:
1764: @divnamestop[]
1765: $a(10)
1766: ^eval($a\3)
1767:
1768: @arrayclone[]
1769: $t[^table::create{a b
1770: 1 11
1771: 2 22
1772: }]
1773: $c[^table::create[$t]]
1774: ^c.append{2 33}
1775: ^t.count[]
1776: ^c.count[]
1777:
1778: @operator_tricks[]
1779: ^if(1){$a[^t[]]}
1780: $a!
1781: $a($b)
1782: ^if(1){y}{n}
1783: $MAIN:a(^t[] eq OK)
1784: #$MAIN:a(1)
1785: ^if($a){y}{n}
1786: #^if(1){y}{n}
1787: $form:if
1788: $a[$.n[1]]
1789: $a.if
1790:
1791: @xoutputrusattr[]
1792: $d[^xdoc::set{<?xml version="1.0" encoding="windows-1251"?><d attr="привет"/>}]
1793: ^show_xdoc2[$d]
1794:
1795: @xdocset1[]
1796: $d[^xdoc::set{<?xml version="1.0"?><d>=^taint[&]=</d>}]
1797: ^show_xdoc2[$d]
1798:
1799: @regexp3[]
1800: $s[abcАБВ]
1801: ^if(^s.match[][i]){y}{n}
1802:
1803:
1804: @exec2[]
1805: $a[^file::exec[bin/t.cmd]]
1806: <pre>^taint[$a.text]</pre>|$a.status|$a.stderr<hr>
1807:
1808:
1809: @tlock[]
1810: ^file:lock[lockfile]{
1811: code
1812: }
1813:
1814: @xmloutattrwithoutvalue[]
1815: #$ORIGINS(1)
1816: $doc[^xdoc::set{<?xml version="1.0"?><doc background="">zz</doc>}]
1817: $doc[^doc.transform[global.xsl]]
1818: =^taint[html][^doc.string[$.method[html]]]=
1819:
1820:
1821:
1822: @precisionProblem[]
1823: $a[123456789012345678901234567890]
1824: $b(^a.double[])
1825: ^b.format{%.20E}
1826: <hr>
1827: ^eval(2*2)
1828:
1829: @xpath[]
1830: $xdoc[^xdoc::set{<?xml version="1.0" encoding="windows-1251" ?>
1831: <document><block><p>привет</p></block></document>
1832: }]
1833: #^show_xdoc2[$xdoc]
1834: $node[^xdoc.selectSingle[/document/block/p]]
1835: ^if(def $node){
1836: ^if($node is string){
1837: $node
1838: }{
1839: ^if($node is hash){
1840: ^node._count[]
1841: }{
1842: $node.nodeType
1843: }
1844: }
1845: #$node.firstChild.nodeValue
1846: }{
1847: node not found
1848: }
1849:
1850:
1851: @ttablesetlang[]
1852: $a-tab-b[a b
1853: 1 2]
1854:
1855: $t[^table::set{$a-tab-b}]
1856: =$t.a=
1857: <hr>
1858:
1859: $t[^table::set[nameless]{^taint[$a-tab-b]}]
1860: =$t.0=
1861: <hr>
1862:
1863: $t[^table::set{^untaint{^taint[$a-tab-b]}}]
1864: =$t.a=
1865:
1866: #^t.append{1 2}
1867:
1868: @mail3[]
1869: ^mail:send[
1.98 paf 1870: $.from[Александр Петросян <paf@mail.design.ru>]
1871: $.to[Александр Петросян <paf@mail.design.ru>]
1872: $.subject[проверка2]
1.15 paf 1873: $.body[
1874: $.text[
1875: $.content-type[$.value[text/plain] $.charset[windows-1251]]
1.98 paf 1876: $.body[проверка^taint[uri][москва]=]
1.15 paf 1877: ]
1878: $.attachment[
1879: $.value[^file::load[text;index.html]]
1880: $.file-name[привет всем.html]
1881: ]
1882: ]
1883: ]
1884:
1885:
1886: @ttime[]
1887: $now[^date::now[]]
1888: $now.hour:$now.minute
1889:
1890: @tupper[]
1891: $t[abcABCабвАБВ]
1892: $t<br>
1893: ^t.upper[]
1894:
1895: @treplace[]
1896: $copy-paste-clean[^table::set{a b
1897: . _
1898: , _
1899: + _
1900: & _
1901: ? _
1902: = _}]
1903:
1904: $cache_key[^taint[в.а,с+я]&был?тут=недавно.cache]
1905: # почему-то этот replace роняет апач в 500 ошибку :(
1906: #^cache_key.replace[$copy-paste-clean]
1907: $test[abc]
1908: ^test.save[$cache_key]saved<br>
1909: $cache[^file:list[.;\.cache^$]]
1910: ^file:delete[$cache_key]deleted($cache.name)<br>
1911:
1912:
1913:
1914: @xslt2[]
1915: $xdoc[^xdoc::set{<?xml version="1.0" encoding="windows-1251" ?>
1916: <document><block><p>привет</p></block></document>
1917: }]
1918: ^show_xdoc2[$xdoc]
1919: ^show_xdoc2[^xdoc.transform[templates/_document.xslt]]
1920: <hr>
1921:
1922:
1923: @tcache2[]
1924: ^cache[$DB_HOME/keyключ](2){
1925: ^math:random(100)
1926: }
1927:
1928: @ttaintuntaint[]
1929: <!-- некий панковский заголовок с буковкой C в круглых скобках -->^taint[html][
1930:
1931: ]zz
1932: <hr>
1933: ^untaint[html]{1^taint[ ]2 3}
1934:
1935:
1936: @tappend2[]
1937: $t[^table::set{a b}]^t.append{1 2}$t.a
1938:
1939: @badvsnprintf[]
1940: ^connect[zzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzz]{
1941: }
1942:
1943:
1944: @badoracequoting[]
1945: $SQL.connect-string[oracle://webspb:webpwd@mts?NLS_LANG=RUSSIAN_AMERICA.CL8MSWIN1251&NLS_DATE_FORMAT=YYYY-MM-DD HH24:MI:SS]
1946: ^connect[$SQL.connect-string]{
1947: ^void:sql{delete from paf}
1948: ^void:sql{insert into paf values (1, '$form:text')}
1949: $paf[^table::sql{select * from paf}]
1950: ^paf.menu{
1951: $paf.id: ^untaint{$paf.block}<hr>
1952:
1953: }
1954: <hr>
1955:
1956:
1957: ^rem{
1958: $news[^table::sql{select description from news}[$.limit(3)]]
1959: ^news.menu{
1960: ^untaint{$news.description}<hr>
1961:
1962: }
1963: <hr>
1964: }
1965:
1966: $tables[^table::sql{select table_name from user_tables}]
1967: ^tables.menu{
1968: $tables.table_name<br>
1969: }
1970:
1971: }
1972: <hr>
1973: $env:PATH
1974:
1975: @badconstructors[]
1976: $bred[^string::length[]]
1977: $bred[^response::clear[]]
1978: $bred[^int::int[]]
1979:
1980:
1981: @xloadwrongtable[]
1982: $constr[^xdoc::load[wrongtable.xml]]
1983: ^show_xdoc2[$constr]
1984:
1985: @xsetwrongtable[]
1986: $constr[^xdoc::set{<?xml version="1.0" encoding="windows-1251z" ?>
1987: <block-list>^untaint[as-is]{$constructor}</block-list>}]
1988:
1989:
1990: @tablecolumnerror[]
1991: $t[^table::set{a}]
1992: $t.$a
1993:
1994: @roll[]
1995: #$date[^date::set(1970;1;2)]
1996: #^date.roll[month](-1)
1997: $date[^date::set(2038;1;1)]
1998: ^date.roll[month](+1)
1999: $date.year $date.month $date.day
2000:
2001: @cookie2[]
2002: #=$cookie:clientType[$.value[test]]=<br>
1.159 paf 2003: =$cookie:CLASS.clientType=<br>
1.15 paf 2004:
2005:
2006: @tableset[]
2007: $a[^table::set{a
2008: 1
2009: 2}]
2010: ^eval(100\$a)
2011:
2012:
2013:
2014: @zzz[]
2015:
2016:
2017: $constructor[
2018: <block1 name="main_srvr" type="0" label="Основное тело" />
2019: <block2 name="main_srvr2" type="0" label="Основное тело" />
2020: ]
2021:
2022: $constr[^xdoc::set{<?xml version="1.0" encoding="windows-1251" ?>
2023: <block-list>^untaint[as-is]{$constructor}</block-list>}]
2024:
2025: $children[$constr.documentElement.childNodes]
2026: ^if($children){
2027: ^for[i](1;^children._count[]){
2028: $node[$children.$i]
2029: $node.nodeName<br>
2030: }
2031: }
2032:
2033:
2034: @thashforeach3[]
2035: $h[
2036: $.a[1]
2037: $.b[2]
2038: ]
2039: $c[^table::set{a
2040: ^h.foreach[key;value]{$value
2041: }}]
2042: $c.a
2043:
2044: @thashforeach2[]
2045: $h[
2046: $.a[1]
2047: $.b[2]
2048: ]
2049: $c[
2050: ^h.foreach[key;value]{
2051: $.$key[$value]
2052: }
2053: ]
2054: $c.b
2055:
2056: @thashforeach[]
2057: $h[
2058: $.a[1]
2059: $.b[2]
2060: ]
2061: ^h.foreach[key;value]{
2062: $key=$value<br>
2063: }
2064:
2065: @thashdelete[]
2066: $h[$.a[1] $.b[2]]
2067: was:<br>
2068: count=^h._count[] <br>
2069: b='$h.b' <br>
2070:
2071: ^h.delete[b]
2072:
2073: now:<br>
2074: count=^h._count[] <br>
2075: b='$h.b'
2076:
2077: @sappend[]
2078: $test[123]
2079: ^test.save[test]
2080: ^test.save[append;test]
2081:
2082: @tappend[]
2083: $test[^table::set{a b
2084: a1 b1}]
2085: ^test.save[test]
2086: $test[^table::set{a b
2087: a2 b2}]
2088: ^test.save[append;test]
2089:
2090:
2091: @tform[]
2092: ^if(def $form:new_file){y}{n}
2093: <form method="post" enctype="multipart/form-data">
2094: <input type="file" name="new_file" />
2095: <input type=submit>
2096: </input>
2097:
2098: @formattest[]
2099: $size(15.124)
2100:
2101: ^size.format{%.2f}
2102:
2103: @filelist[]
2104: $html[^file:list[.;\.html^$]]
2105: ^html.menu{
2106: $html.name<br>
2107: }
2108: <hr>
2109:
2110: @безнадёжна_попытка_поправить_непоправимое[]
2111: $dom_from_disk[^xdoc::load[input.xml]]
2112: $dom_created_in_air[^xdoc::create[doc]]
2113: ^dom_created_in_air.documentElement.appendChild[^dom_from_disk.documentElement.cloneNode(1)]
2114: ^show_xdoc2[$dom_created_in_air]
2115:
2116:
2117: @tcache[]
2118: #^hashfile:clear[cache]
2119: $code[^hashfile::open[$DB_HOME;cache]]
2120: ^code.cache[key](2){
2121: ^math:random(100)
2122: # ^code.delete[]
2123: }
2124:
2125: @thashfileexp[]
2126: $hf[^hashfile::open[$DB_HOME;hashfile]]
2127: $hf.paf[$.value[крут] $.expires(3)]
2128: paf=$hf.paf
2129: <hr>
2130: ^hf.foreach[key;value]{
2131: $key=$value<br>
2132: }
2133: <hr>
2134: $hash[^hf.hash[]]
2135: =$hash.paf=
2136: <hr>
2137:
2138: @tcounter[]
2139: ^tcounterone[$DB_HOME]
2140: other root:
2141: ^tcounterone[${DB_HOME}2]
2142: again, first:
2143: ^tcounterone[$DB_HOME]
2144:
2145: @tcounterone[DB_HOME]
2146: $counter[^hashfile::open[$DB_HOME;counter]]
2147: #^counter.clear[]
2148: ^counter.transaction{
2149: # $counter.value(10)
2150: $counter.value($counter.value+1)
2151: # ^counter.delete[value]
2152: $counter.value
2153: }
2154: <hr>
2155: ^rem{
2156: $hash[^counter.hash[]]
2157: =$hash.value=
2158: <hr>
2159: }
2160:
2161: @tablehash[]
2162: $productList[^table::set{id name
2163: 1 носки
2164: 2 валенки
2165: 3 ушанка
2166: }]
2167:
2168: #скажем, у первого дилера
2169: $firstPriceList[^table::set{id price
2170: 1 0.3
2171: 3 1000
2172: }]
2173:
2174: $firstPriceHash[^firstPriceList.hash[id]]
2175:
2176: ^productList.menu{
2177: продукт "$productList.name" | цена у first: $firstPriceHash.[$productList.id].price<br>
2178: }
2179:
2180:
2181: @hashfile[]
2182: $hf[^hashfile::assign[hashfile]]
2183: #$hf.paf[крут5]
2184: paf=$hf.paf
2185:
2186: @formclass[]
2187: ^$form:CLASS.a=$form:CLASS.a
2188:
2189: @domdata[]
2190: ^if(1){
2191: # $a{^hren[]}
2192: }
2193: $a
2194: $xdoc[^xdoc::create[doc]]
2195: $doc[$xdoc.documentElement]
2196: $name[^doc.appendChild[^xdoc.createElement[name]]]
2197: $text[^name.appendChild[^xdoc.createTextNode[петросян&coz]]]
2198: ^untaint[as-is]{=$text.nodeValue=}
2199:
2200: @domedit[]
2201: ^domdata[]
2202: #$paf.nodeName<br>
2203: #$doc.documentElement.nodeName<br>
2204:
2205: ^show_xnode1[$xdoc.documentElement;0;1]
2206: <hr>
2207: ^show_xdoc2[$xdoc]
2208: <hr>
2209:
2210: @domxslt[]
2211: ^domdata[]
2212: ^show_xdoc2[^xdoc.transform[global.xsl;$.param1[123/]]]
2213: <hr>
2214:
2215: @lsplit2[]
2216: $path[/optics/]
2217: $pathTable[^path.lsplit[/]]
2218: ^pathTable.menu{
2219: ^if(def $pathTable.piece){
2220: =$pathTable.piece=
2221: }
2222: }
2223:
2224:
2225: @faceesize[]
2226: $k(2)
2227: $pict[^image::load[paf.gif]]
2228: $small[^image::create($pict.width/$k;$pict.height/$k)]
2229: ^small.copy[$pict](0;0;$pict.width;$pict.height;0;0;$small.width;$small.height;250)
2230: $response:body[^small.gif[]]
2231:
2232: @imageresize[]
2233: $k(2)
2234: $pict[^image::create(400*$k;200*$k)]
2235: $pict.line-width(2)
2236: ^pict.arc($pict.width/2;$pict.height/2;$pict.width-1;$pict.height-1;0;360;0x000000)
2237: ^pict.arc($pict.width/2;$pict.height/2;$pict.width-20;$pict.height-20;0+20;360-20;0xff0000)
2238: #^pict.arc($pict.width/2;$pict.height/2;$pict.width;$pict.height;0;360;0xff0000)
2239: ^pict.circle($pict.width/2;$pict.height/2;$pict.height/2-20;0x0000ff)
2240: ^pict.arc($pict.width/2;$pict.height/2;$pict.height-26;$pict.height-26;0+20;360-20;0xff0000)
2241: $response:body[^pict.gif[]]
2242:
2243: #$small[^image::create($pict.width/$k;$pict.height/$k)]
2244: #^small.copy[$pict](0;0;$pict.width;$pict.height;0;0)
2245: #^small.copy[$pict](0;0;$pict.width;$pict.height;0;0;$small.width;$small.height;0)
2246:
2247: #$response:body[^small.gif[]]
2248:
2249:
2250: @tintdefault[]
2251: #$abc[abc]
2252: $abc[33]
2253: ^abc.int[z]
2254: #^abc.int(123)
2255:
2256: @ifassignhash[]
2257: $h[^if(1){$.a(1);$.a(2)}]
2258: $h.a
2259:
2260: @ifpasshash[]
2261: $a[$.e[a]]
2262: $b[$.e[b]]
2263: ^ifpasshashdest[^if(1){$a;$b}]
2264: #$x[^if(1){$a}{$b}]
2265: #^ifpasshashdest[$x]
2266:
2267: @ifpasshashdest[p]
2268: $p.e
2269:
2270: @movedir[]
2271: ^file:move[a;deeper/a]
2272:
2273: @replace[]
2274: $a[12^;3]
2275: ^a.replace[^table::set{from to
2276: 2^; !
2277: }]
2278:
2279:
2280: @set[]
2281: ^setdata[]
2282: ^a.add[$b]
2283: add:$a.3<br>
2284:
2285: ^setdata[]
2286: ^a.sub[$b]
2287: sub2:$a.2<br>
2288: sub1:$a.1<br>
2289:
2290: ^setdata[]
2291: $c[^a.union[$b]]
2292: union3:$c.3<br>
2293: union2:$c.2<br>
2294:
2295: ^setdata[]
2296: $c[^a.intersection[$b]]
2297: intersection3:$c.3<br>
2298: intersection2:$c.2<br>
2299:
2300: ^setdata[]
2301: intersects:^if(^a.intersects[$b]){y;n}<br>
2302: intersects2:^if(^a.intersects[ ]){y;n}<br>
2303:
2304:
2305: <hr>
2306:
2307: @setdata[]
2308: $a[$.1[a1] $.2[a2]]
2309: $b[ $.2[b2] $.3[b3]]
2310:
2311:
2312: @hash[]
2313: $h[^hash::create[$._default[123]]]
2314: $h.paf[not kretin]
2315: $h.paf<br>
2316: =$h.that=<br>
2317:
2318: @methresult[]
2319: $result[^table::set{1}]
2320:
2321: @terror[]
2322: ^error[method z must be called with z]
2323:
2324: @syntax1[]
2325: #^a[^b]
2326:
2327: @syntax2[]
2328: #^a[
2329:
2330: @ssave[]
2331: $abc[abc]
2332: ^abc.save[abc]
2333:
2334: @calendar[]
1.103 paf 2335: $year(2002)
2336: $month(12)
1.84 paf 2337: ${year}-${month}:<br>
2338: $week_days[^date:calendar[rus]($year;$month)]
1.15 paf 2339: <pre>
1.101 paf 2340: ^week_days.menu{^for[wday](0;6){^if($week_days.$wday){$week_days.$wday; ^; ^;} }=$week_days.week,$week_days.year=<br>}
1.15 paf 2341: </pre>
2342:
2343: @thash[]
2344: $table[^table::set{id name age
2345: 1 paf 278
2346: 2 пиф 234
2347: }]
2348: $hash[^table.hash[id;^table::set[nameless]{id
2349: name}]]
2350: $hash.2.id $hash.2.name $hash.2.age
2351:
2352: @tdef[]
2353: $s[0]
2354: if 0=^if($s){}{n}<br>
2355: if def 0=^if(def $s){y}{}<br>
2356: <hr>
2357:
2358: @ford[]
2359: ^for[i](0;5){$i}{($i)}
2360:
2361: @tif[]
2362: ^if[def]{y;n}
2363:
2364: @image[]
2365: $pict[^image::create(400;200)]
2366: ^pict.arc($pict.width/2;$pict.height/2;$pict.width-1;$pict.height-1;0;360;0x000000)
2367: ^pict.arc($pict.width/2;$pict.height/2;$pict.width-10;$pict.height-10;0+10;360-10;0xff0000)
2368: #^pict.arc($pict.width/2;$pict.height/2;$pict.width;$pict.height;0;360;0xff0000)
2369: ^pict.circle($pict.width/2;$pict.height/2;$pict.height/2-10;0x0000ff)
2370: ^pict.arc($pict.width/2;$pict.height/2;$pict.height-26;$pict.height-26;0+10;360-10;0xff0000)
2371: $response:body[^pict.gif[]]
2372:
2373:
2374:
2375: @mail2[]
2376: ^mail:send[
1.139 paf 2377: $.message-id[<6615%1@parser.ru>]
1.15 paf 2378: $.content-type[$.value[text/plain] $.charset[windows-1251]]
2379: $.from[Александр Петросян <paf@design.ru>]
2380: $.to[Александр Петросян <paf@design.ru>]
1.134 paf 2381: $.subject[проверка проверка]
2382: $.text[проверка]
1.15 paf 2383: ]
2384:
2385: @cookie[]
1.115 paf 2386: #$env:HTTP_COOKIE<br>
1.15 paf 2387:
2388: #$cookie:переменная[test тест ТЕСТ2]
2389: =$cookie:переменная=<br>
2390: #$cookie:переменная2[test тест ТЕСТ3]
2391: =$cookie:переменная2=<br>
2392: =$cookie:CLASS.переменная2=<br>
2393:
2394: @response[]
2395: #^if($form:reload){
2396: $response:refresh[$.value[0] $.url[./t.html?uri=$env:SERVER_NAME]]
2397: #}
2398:
2399: @xslt[]
2400: ^xdata[]
2401: $transformed[^xdoc.transform[global.xsl;$.param1[123/]]]
2402: ^show_xdoc2[$transformed]
2403:
2404: @regexp2[]
2405: $s[ select]
2406: $s[^s.match[^^\s*][]{!}]
2407: $s
2408:
2409: @header[]
2410: $response:refresh[
2411: $.value[0]
2412: $.url[http://design.ru?a=^taint[123]]
2413: ]
2414:
2415: @ttablerem[]
2416: $table[^table::load[a.cfg]]
2417: ^table.menu{$table.a}
2418:
2419: @tconnect[]
2420: ^connect[mysql://test:test@paf/test?charset=cp1251_koi8&compress=1&timeout=1&named_pipe=1]{
2421: $tables[^table::sql{show tables}]
2422: #$cols[^tables.columns[]]
2423: #$cols.column
2424: ^tables.menu{
2425: $tables.[Tables_in_test]<br>
2426: }
2427: }
2428:
2429: @pcre[]
2430: $s[1 2]
2431: ^s.match[\s;ig]{!}
2432: #^s.match[\d;ig]{!}
2433:
2434:
2435: @regexp[]
2436: $s[abcАБВ]
2437: ^if(^s.match[б][i]){y}{n}
2438:
2439: @mail[]
2440: #$ORIGINS(1)
2441: ^mail:send[
2442: $.from[paf@design.ru]
2443: $.to[paf@design.ru]
2444: $.body[1
2445:
2446: 2
2447:
2448:
2449: 3]
2450: ]
2451:
2452: @fori[][i]
2453: ^for[i](1;3){... =$i= ...}
2454:
2455: @xdata0[]
2456: #$response:content-type[$.value[text/html] $.charset[windows-1251]]
2457: $xdoc[^xdoc::set{<?xml version="1.0" encoding="windows-1251"?>
2458: <!--DOCTYPE people SYSTEM "D:\Y\parser3project\parser3\src\www\htdocs\people.dtd"-->
2459: <people>
2460: <man id="1" имя="word слово">
2461: <name>P«^;AF B</name>
2462: </man>
2463: <man id="2">
2464: <name>ПИФ^taint[&]</name>
2465: </man>
2466: </people>
2467: }]
2468:
2469: @xdata[]
2470: #$response:content-type[$.value[text/html] $.charset[windows-1251]]
1.156 paf 2471: $xdoc[^xdoc::create{<?xml version="1.0" encoding="windows-1251"?>
1.15 paf 2472: <!--DOCTYPE people SYSTEM "D:\Y\parser3project\parser3\src\www\htdocs\people.dtd"-->
2473: <people>
2474: <man id="1" имя="word слово">
2475: <name>P«^;AF B</name>
2476: </man>
2477: <man id="2">
2478: <name>ПИФ^taint[&]</name>
2479: </man>
2480: </people>
1.156 paf 2481: }]
1.15 paf 2482:
2483: @xml[]
2484: ^xdata[]
2485:
2486: ^show_xdoc2[$xdoc]<hr>
2487: #^show_xnode1[$xdoc]<hr>
2488: $people[^xdoc.select[*/man]]
2489: #^show1[]
2490: ^show_xnodes1[$people]<hr>
2491: #^people.0.owner.hren[]
2492:
2493: ^show_xnode1[^xdoc.selectSingle[*/man[2]/name];0;1]<hr>
2494:
2495: by id:
2496: ^show_xnode1[^xdoc.getElementById[1];0;1]
2497: <hr>
2498:
2499: @show1[array]
2500: ^for[i](0;^array._count[]-1){
2501: $x[$array.$i]
2502: $x.firstChild.nodeValue:
2503: $pattributes[$x.parentNode.attributes]
2504: ^if(^pattributes._count[]){
2505: $pattributes.id.name=$pattributes.id.nodeValue
2506: }
2507: <br>
2508: }
2509:
2510: @show_xnodes1[array][i]
2511: ^for[i](0;^array._count[]-1){
2512: ^show_xnode1[$array.$i;0;1]
2513: }
2514:
2515: @show_xnode1[x;level;single][l]
2516: ^if(def $x){
2517: ^for[l](0;$level-1){ ^; ^; ^; ^;}
2518: ^if($x.nodeType == $xnode:ELEMENT_NODE){
2519: <^;$x.nodeName
2520: $pairs[$x.attributes]
2521: ^if(def $pairs){
2522: $names[^pairs._keys[]]
2523: ^names.menu{ $names.key="$pairs.[$names.key].nodeValue"}
2524: }
2525: >^;
2526: }{
2527: [$x.nodeType]
2528: }
2529:
2530: ^if(def $x.nodeValue){$x.nodeValue}<br>
2531: ^show_xnode1[$x.firstChild]($level+1)
2532: ^if(!$single){
2533: ^show_xnode1[$x.nextSibling]($level)
2534: }
2535:
2536: ^if($x.nodeType == $xnode:ELEMENT_NODE){
2537: ^for[l](0;$level-1){ ^; ^; ^; ^;}<^;/$x.nodeName>^;<br>
2538: }
2539: }
2540:
2541: @show_xdoc2[xdoc]
2542: ^xdoc.save[out/save.xml;
2543: # $.encoding[utf-8]
2544: $.method[xml]
2545: ]
2546: $file[^xdoc.file[
2547: $.encoding[utf-8]
2548: $.method[html]
2549: ]]
2550: ^file.save[text;out/save_file.html]
2551: #$response:body[^xdoc.file[ $.media-type[text/paf] ]]
2552: <pre>^taint[html][^xdoc.string[
2553: $.method[html]
2554: # $.encoding[utF-8]
2555: # $.omit-xml-declaration[yes]
2556: # $.standalone[no]
2557: # -$.doctype-public[-//W3C//DTD XHTML]
2558: # -$.doctype-system[/a/b/c/]
2559: # $.indent[yes]
2560: # $.media-type[text/paf]
2561: ]]
2562: </pre>
E-mail:
![[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 / www / htdocs