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