parser3/src/www/htdocs/index.html - diff

Return to index.html CVS log

Up to [parser3project] / parser3 / src / www / htdocs

Diff for /parser3/src/www/htdocs/Attic/index.html between versions 1.77 and 1.382

-version 1.77, 2001/03/29 17:11:44
+version 1.382, 2001/10/10 14:20:56
  Line 1
- @auto[]
- !!$html-typo[^table:set{user    html    comment
- <<      &laquo^;        длинные user вперёд
- >>      &raquo^;
- \n\n    <p>     !эти есть в таблице по умолчанию
- \n      <br>    !но т.к. заменяем, надо повторить.
- <       &lt^;   !можно этим воспользоваться,
- >       &gt^;   !и что-то сделать ДО обычных замен
- "       &quot^; !например из << и >>
- &       &amp^;  !сделать ёлочки-кавычки.
- _       &nbsp^;
- ^#AB    &laquo^;        windows коды ёлочек
- ^#BB    &raquo^;        windows коды ёлочек
- (c)     &copy^;
- ^#A9    &copy^; windows (c)
- }]
- @dump[t]
- #^t.menu{$n<BR>}
- <HR>
- @func[n]
- $n
- @twop[a;b]
- ($a,$b)
  @main[]
- $a[vasya]
+ #^terror[]
- ^^"$a".lsplit[as]=
+ #^ssave[]
- $as[^a.lsplit[as]]
+ #^calendar[]
- ^as.menu{$0;,}<BR>
+ #^thash[]
- ^^a.pos(sy]="^a.pos[sy]"<BR>
+ #^tdef[]
- ^^a.pos[zsy]="^a.pos[zsy]"<BR>
+ #^ford[]
- ^^a.left(3)="^a.left(3)"<BR>
+ #^tif[]
- ^^a.right(3)="^a.right(3)"<BR>
+ ^image[]
- ^^a.mid(1;3)="^a.mid(1;3)"<BR>
+ #^mail2[]
- <HR>
+ #^cookie[]
- ^twop[a;]
+ #^response[]
- ^$request:browser.type=$request:browser.type<BR>
+ #^regexp2[]
- ^$request:browser.version=$request:browser.version<BR>
+ #^ttablerem[]
+ #^pcre[]
- $tf[^file:load[test.zip;abc.zip]]
+ #^regexp[]<hr>
- ^$tf.name=$tf.name<BR>
+ #^mail[]
- ^$tf.size=$tf.size<BR>
+ #^exec[]
- ^$tf.mime-type=$tf.mime-type<BR>
+ #^fori[]
- ^$tf.text:<BR>
+ #^tconnect[]
- $tf.text<HR>
+ ^xslt[]
- <HR>
+ #^xml[]
- ^file:find[test.cfg]<BR>
+ #^header[]
- ^file:find[tes.cfg]{not found}<BR>
+ OK
- <HR>
+ @terror[]
- $t[^table:set{n
+ ^error[method z must be called with z]
-.3
+ @syntax1[]
-.2
+ #^a[^b]
+ @syntax2[]
+ #^a[
+ @ssave[]
+ $abc[abc]
+ ^abc.save[abc]
+ @calendar[]
+;11:<br>
+ $week_days[^date:calendar[rus](2001;11)]
+ <pre>
+ ^week_days.menu{^for[wday](0;7){^if($week_days.$wday){$week_days.$wday;&nbsp^;&nbsp^;} }<br>}
+ </pre>
+ @thash[]
+ $table[^table::set{id   name    age
+      paf     278
+      пиф     234
  }]
- #$t{^locate[n;2z]^found{$n}{not found}}<BR>
+ $hash[^table.hash[id;^table::set[nameless]{id
- #$t{^locate[n;3]^found{found:$n}{not found}}<BR>
+ name}]]
- ^$t:<BR>
+ $hash.2.id $hash.2.name $hash.2.age
- ^dump[$t]
- #^t.sort($n)
+ @tdef[]
- ^^t.sort(^$n):<BR>
+ $s[0]
- ^dump[$t]
+ if 0=^if($s){}{n}<br>
- #^t.sort{^:func($n)}
+ if def 0=^if(def $s){y}{}<br>
- ^^t.sort{^^:func(^$n)}:<BR>
+ <hr>
- ^dump[$t]
- #^t.sort{$n}
+ @ford[]
- ^^t.sort{^$n}:<BR>
+ ^for[i](0;5){$i}{($i)}
- ^dump[$t]
- #^t.sort{$n}[desc]
+ @tif[]
- ^^t.sort{^$n}[desc]:<BR>
+ ^if[def]{y;n}
- ^dump[$t]
- <HR>
+ @image[]
+ $pict[^image::create(400;200)]
- ^if(-f index.html){y}{n}<BR>
+ ^pict.arc($pict.width/2;$pict.height/2;$pict.width-1;$pict.height-1;0;360;0x000000)
- ^taint[html-typo;не знаю
+ ^pict.arc($pict.width/2;$pict.height/2;$pict.width-10;$pict.height-10;0+10;360-10;0xff0000)
- я ничего
+ #^pict.arc($pict.width/2;$pict.height/2;$pict.width;$pict.height;0;360;0xff0000)
+ ^pict.circle($pict.width/2;$pict.height/2;$pict.height/2-10;0x0000ff)
- <<слово длинное>>
+ ^pict.arc($pict.width/2;$pict.height/2;$pict.height-26;$pict.height-26;0+10;360-10;0xff0000)
+ $response:body[^pict.gif[]]
- (c) by Я
- ]<HR>
- $t[^table:load[/test.cfg]]
- ^process[@b[]
+ @mail2[]
- f
+ ^mail:send[
+         $.content-type[$.value[text/plain] $.charset[windows-1251]]
+         $.from[Александр Петросян <paf@design.ru>]
+         $.to[Александр Петросян <paf@design.ru>]
+         $.subject[проверка]
+         $.body[проверка]
+ ]
+ @cookie[]
+ $env:HTTP_COOKIE<br>
+ #$cookie:переменная[test тест ТЕСТ2]
+ =$cookie:переменная=<br>
+ #$cookie:переменная2[test тест ТЕСТ3]
+ =$cookie:переменная2=<br>
+ @response[]
+ #^if($form:reload){
+         $response:refresh[$.value[0] $.url[./t.html?uri=$env:SERVER_NAME]]
+ #}
+ @xslt[]
+ ^xdata[]
+ ^show-xdoc2[^xdoc.transform[global.xsl;$.param1[123/]]]
+ @regexp2[]
+ $s[  select]
+ $s[^s.match[^^\s*][]{!}]
+ $s
+ @header[]
+ $response:refresh[
+         $.value[0]
+         $.url[http://design.ru?a=^taint[123]]
  ]
- ^b[]<BR>
- ^$t.a=$t.a<BR>
+ @ttablerem[]
- ^t.offset[2]
+ $table[^table::load[a.cfg]]
- #$r[^t.record[]]
+ ^table.menu{$table.a}
- #^$r.a=$r.a<BR>
+ @tconnect[]
- ^$request:uri=$request:uri<BR>
+ ^connect[mysql://test:test@paf/test?charset=cp1251_koi8&compress=1&timeout=1&named_pipe=1]{
- ^$env:PATH_INFO=$env:PATH_INFO<BR>
+ $tables[^table::sql{show tables}]
- ^$env:REMOTE_ADDR=$env:REMOTE_ADDR<BR>
+ #$cols[^tables.columns[]]
+ #$cols.column
- ^rem{
+ ^tables.menu{
- $response:body[]
+         $tables.[Tables_in_test]<br>
- $response:location[http://parser3/123]
+ }
+ }
+ @pcre[]
+ $s[1 2]
+ ^s.match[\s;ig]{!}
+ #^s.match[\d;ig]{!}
+ @regexp[]
+ $s[abcАБВ]
+ ^if(^s.match[б][i]){y}{n}
+ @mail[]
+ #$ORIGINS(1)
+ ^mail:send[
+         $.from[paf@design.ru]
+         $.to[paf@design.ru]
+         $.body[1
+]
+ ]
+ @exec[]
+ $a[^file::exec[fc.exe;;a;b]]
+ $a.status|$a.stderr<hr>
+ @fori[][i]
+ ^for[i](1;3){... =$i= ...}
+ @xdata[]
+ #$response:content-type[$.value[text/html] $.charset[windows-1251]]
+ $xdoc[^xdoc::load[input.xml]]
+ @xml[]
+ ^xdata[]
+ ^show-xdoc2[$xdoc]<hr>
+ #^show-xnode1[$xdoc]<hr>
+ $people[^xdoc.select[*/man]]
+ #^show1[]
+ ^show-xnodes1[$people]<hr>
+ #^people.0.owner.hren[]
+ ^show-xnode1[^xdoc.select-single[*/man[2]/name];0;1]<hr>
+ by id:
+ ^show-xnode1[^xdoc.getElementById[1];0;1]
+ <hr>
+ @show1[array]
+ ^for[i](0;^array._count[]-1){
+     $x[$array.$i]
+         $x.firstChild.nodeValue:
+                 $pattributes[$x.parentNode.attributes]
+                 ^if(^pattributes._count[]){
+                         $pattributes.id.name=$pattributes.id.nodeValue
+                 }
+         <br>
+ }
+ @show-xnodes1[array][i]
+ ^for[i](0;^array._count[]-1){
+         ^show-xnode1[$array.$i;0;1]
  }
+ @show-xnode1[x;level;single][l]
+ ^if(def $x){
+     ^for[l](0;$level-1){&nbsp^;&nbsp^;&nbsp^;&nbsp^;}
+     ^if($x.nodeType == $xnode:ELEMENT_NODE){
+         &lt^;$x.nodeName
+             $pairs[$x.attributes]
+             ^if(def $pairs){
+                 $names[^pairs._keys[]]
+                 ^names.menu{ $names.key="$pairs.[$names.key].nodeValue"}
+             }
+             &gt^;
+     }{
+         [$x.nodeType]
+     }
+     ^if(def $x.nodeValue){$x.nodeValue}<br>
+     ^show-xnode1[$x.firstChild]($level+1)
+     ^if(!$single){
+             ^show-xnode1[$x.nextSibling]($level)
+     }
+     ^if($x.nodeType == $xnode:ELEMENT_NODE){
+     ^for[l](0;$level-1){&nbsp^;&nbsp^;&nbsp^;&nbsp^;}&lt^;/$x.nodeName&gt^;<br>
+     }
+ }
- <HR>
- ^^auto_test[]:<BR>
- <ol>
- ^auto_test[]
- </ol>
- <HR>
- ^${cookie:вот}=${cookie:вот}?<BR>
- ^$request:query=$request:query<BR>
- ^$request:uri=$request:uri<BR>
- <form method=post>
- <table border=1 width=250><tr><td>$form:name</td></tr></table>
- <textarea name=name rows=5 cols=40>^untaint[html]{^default[$form:name;не знаю]}</textarea><BR>
- <input type=submit>
- </form>
- @default[test;def]
- $result[^if(^test.length[]){$test}{$def}]
- @exception[origin;source;comment;type;code]
- <body bgcolor=black>
- <font color=white>
- ERROR:
- ^if(def $source){$origin '$source'}
- ${comment}.
- ^if(def $type){type=$type}
- ^if(def $code){code=$code}
- @auto_test[]
- ^BASE.auto_test[]
- <li>${request:uri}!
+ @show-xdoc2[xdoc]
+ ^xdoc.save[save.xml;
+ #       $.encoding[windows-1251]
+         $.method[xml]
+ ]
+ $file[^xdoc.file[
+ #       $.encoding[windows-1251]
+         $.method[html]
+ ]]
+ ^file.save[text;save_file.html]
+ <pre>^taint[^xdoc.string[]]</pre>
+ #       $.encoding[windows-1251]
+ #       $.method[xml]
+ #]]

E-mail:

Removed from v.1.77
changed lines
	Added in v.1.382