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