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