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.97 and 1.156

-version 1.97, 2001/04/03 17:01:04
+version 1.156, 2001/04/25 11:03:01
  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>
- Line 23  $n
+ Line 6  $n
  @twop[a;b]
  ($a,$b)
- @post-process[data]
+ @Zpostprocess[data]
  #(<BR>$data)<BR>
  ^data.match[1][g]{X}
  @mt[s;m]
- $m ^if(^s.match[$:m][i]){matches}{do not match} $s<BR>
+ $m ^if(^s.match[$:m;i]){matches}{does not match} $s<BR>
  @main[]
- first chars!<BR>
+ <form action=post.html method=post>
+ <input name=name value=значение>
+ <input type=submit>
+ </form>
+ <HR>
+ match xmg:<BR>
+ $s[2
+]
+ $r[^s.match[(2^$ #comment
+ )][xmg]]
+ ^r.menu{$match}[,]
+ <HR>
+ image:create<BR>
+ $itext[^image:create(300;100)]
+ $itext{
+ ^font[ ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyzАБВГДЕЖЗИЙКЛМНОПРСТУФХЦЧШЩЪЫЬЭЮЯабвгдежзийклмнопрстуфхцчшщъыьэюя0123456789-+=!\"%:,.^^^;<>?@()[]'&*/;font.gif](13)
+ ^^text(10;10)[ПАФ сделал это]<BR>
+ ^text(10;10)[ПАФ сделал это]
+ ^font[ ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyzАБВГДЕЖЗИЙКЛМНОПРСТУФХЦЧШЩЪЫЬЭЮЯабвгдежзийклмнопрстуфхцчшщъыьэюя0123456789-+=!\"%:,.^^^;<>?@()[]'&*/;font.gif](13;8)
+ ^^text(10;30)[ПАФ сделал это fixed]<BR>
+ ^text(10;30)[ПАФ сделал это fixed]
+ }
+ $ff[^itext.gif[]]
+ ^ff.save[i/itext.gif]
+ ^rem{
+ ^ff.save[i2/itext.gif]
+ ^file:delete[i2/itext.gif]
+ }
+ ^itext.html[$src[i/itext.gif]]
+ <HR>
+ $t[^table:set{id}]
+ ^^t.id.int[]=^t.id.int[]<BR>
+ ^^hren.double[]=^hren.double[]<BR>
+ <HR>
+ #image:create<BR>
+ #$drawing[^image:create(300;100)]
+ drawing:load<BR>
+ $drawing[^image:load[001004paf(c)lena_karin.gif]]
+ $drawing{
+ ^$drawing.width=$width<BR>
+ ^$drawing.height=$height<BR>
+ ^for[i](0;$width/4){
+ ^line(0;0)($:i*4;$height-1)(0x00FF00)
+ }
+ ^rectangle(100;10)(180;40)(0xFF0000)
+ ^bar(100+20;10+20)(180+20;40+20)(0xFFFF00)
+ ^fill(0;0)(0x0000FF)
+ ^replace(0xFFffFF;0x00FF00)(30;0)(150;99)(200;50)
+ ^polybar(0x00FFFF)(200;100)(170;99)(280;50)
+ ^polygon(0xFFFF00)(210;100)(160;90)(250;50)
+ }
+ <HR>
+ #$response:body[^drawing.gif[]]
+ $ff[^drawing.gif[]]
+ ^ff.save[drawing.gif]
+ ^drawing.html[$src[drawing.gif]]
+ <HR>
+ image:load<BR>
+ $face[^image:load[001004paf(c)lena_karin.gif]]
+ ^$face.src=$face.src<BR>
+ ^$face.width=$face.width<BR>
+ ^$face.height=$face.height<BR>
+ <HR>
+ ^if($form:photo){
+ upload file:<BR>
+ $face[^image:measure[$form:photo]]
+ $face.src=$face.src<BR>
+ ^$face.width=$face.width<BR>
+ ^$face.height=$face.height<BR>
+ <HR>
+ }
+ gif file class:<BR>
+ $face[^image:measure[^file:load[001004paf(c)lena_karin.gif]]]
+ ^$face.src=$face.src<BR>
+ ^$face.width=$face.width<BR>
+ ^$face.height=$face.height<BR>
+ ^^face.html[]=^face.html[]<BR>
+ <HR>
+ gif:<BR>
+ $face[^image:measure[001004paf(c)lena_karin.gif]]
+ ^$face.src=$face.src<BR>
+ ^$face.width=$face.width<BR>
+ ^$face.height=$face.height<BR>
+ ^^face.html[]=^face.html[]<BR>
+ <HR>
+ jpeg:<BR>
+ $face[^image:measure[001004paf(c)lena_karin.jpg]]
+ ^$face.src=$face.src<BR>
+ ^$face.width=$face.width<BR>
+ ^$face.height=$face.height<BR>
+ <a href=$request:uri>^^face.html[^$border(1) ^$ismap(-1)]=^face.html[$border(1) $ismap(-1)]</a>
+ <HR>
  ^rem{
+ ^mail:send[
+         $from[paf@design.ru]
+         $to[paf@design.ru]
+         $subject[test проверка]
+         $body[test]
+         $content-type[$value[text/plain] $charset[windows-1251]]
+ ]
+ <HR>
+ }
+ env.pl<BR>
+ $e[^file:cgi[env.pl;$t[<b>1</b>]]]
+ ^$e.exit-code=$e.exit-code<BR>
+ ^$e.stderr="$e.stderr"<BR>
+ ^$e.header="$e.header"<BR>
+ $e.text
+ <HR>
+ ^rem{^mail:send[
+     $to[paf@design.ru]
+     $from[paf@design.ru]
+         $body[
+                 $1[
+                         $content-type[
+                             $value[text/plain]
+                         $charset[windows-1251]
+                         ]
+                         $body[привет, PAF.
+ sincerily yours,
+ PAF
+ ]
+                 ]
+                 $attach[
+                         $value[^file:load[test.zip]]
+                         $type[uue]
+                         $file-name[retest.zip]
+                 ]
+         ]
+ ]
+ }
+ ^rem{^mail:send[
+         $content-type[
+             $value[text/plain]
+         $charset[windows-1251]
+         ]
+     $to[paf@design.ru]
+     $from[paf@design.ru]
+         $body[привет, PAF.
+ sincerily yours,
+ PAF
+ ]
+ ]
+ }
+ ^rem{^mail:send[
+     $to[paf@design.ru]
+     $from[paf@design.ru]
+     $body[
+         $2[
+                 $content-type[$value[message/rfc822] $name[letter.eml]]
+                 $body[to: paul
+ from: paf
+ subject: 2
+.body
+                 ]
+         ]
+         $1[
+                         $to[paul]
+                 $from[paf]
+                 $subject[1]
+                 $content-type[text/plain]
+                 $body[image]
+         ]
+     ]
+ ]}
+ ^^table:dir[/]:<BR>
+ $d[^table:dir[/]]
+ ^d.menu{$name &nbsp^;&nbsp^;&nbsp^;&nbsp^;^if(-f $name){-f} ^if(-d $name){-d};<BR>}
+ <HR>
+ ^^table:dir[/;html^$]<BR>
+ $d[^table:dir[/;html^$]]
+ ^d.menu{$name;<BR>}
+ <HR>
+ #^rem{
+ ^connect[$SQL.connect-string]{
+         $shit[^taint[our's]]
+ #       $paf[^table:sql{insert into paf (name, age) values ('$shit', ^random:generate(10000))}]
+         $paf[^table:sql{select * from paf order by id desc}(5)]
+         $paf{
+         ^empty{query result is empty}{
+         <table border=1>
+                 <tr><td>id</td><td>name</td><td>age</td></tr>
+                 ^menu{<tr><td>$id</td><td>$name</td><td>$age</td></tr>}
+         </table>
+         }}
+ }
+ #}
+ <HR>
+ $with-cr[^table:set{a   b
+ ^taint[<1
+>]     3
+ }]
+ "$with-cr.a"<BR>
+ <HR>
+ ^if(def $form:s){
+         $form:s<BR>
+         ^form:s.match[!][g]{<b>!</b>}<BR>
+         <HR>
+ }
  $r[1223]
+ ^^"$r".match[2][]{(^$match)}=^r.match[2][]{($match)}<BR>
  ^^"$r".match[2][i]{(^$match)}=^r.match[2][i]{($match)}<BR>
  ^^"$r".match[2][g]{(^$match)}=^r.match[2][g]{($match)}<BR>
  ^^"$r".match[2+][g]{(^$match)}=^r.match[2+][g]{($match)}<BR>
- Line 43  $sm[^s.match[(.)][g]]
+ Line 247  $sm[^s.match[(.)][g]]
  ^^"$s".match[(.)][g]:<BR>
  ^sm.menu{
          ^line[]:<BR>
-         ^$pre-match=$pre-match<BR>
+         ^$prematch=$prematch<BR>
          ^$match=$match<BR>
-         ^$post-match=$post-match<BR>
+         ^$postmatch=$postmatch<BR>
          ^$1=$1<BR>
  }
  <HR>
- Line 53  $sm[^s.match[(.)][]]
+ Line 257  $sm[^s.match[(.)][]]
  ^^"$s".match[(.)][]:<BR>
  ^sm.menu{
          ^line[]:<BR>
-         ^$pre-match=$pre-match<BR>
+         ^$prematch=$prematch<BR>
          ^$match=$match<BR>
-         ^$post-match=$post-match<BR>
+         ^$postmatch=$postmatch<BR>
          ^$1=$1<BR>
  }
  <HR>
  ^mt[$s;я]
+ ^mt[$s;Я]
  ^mt[$s;b]
  ^mt[$s;^^b]
  ^mt[$s;^^a]
  ^mt[$s;x]
  <HR>
- }
  $dest[^table:set[nameless]{
  $form:d11       d12     d13
  d21     d22     d23
- Line 88  $src[^table:set{a b c d
+ Line 293  $src[^table:set{a b c d
  s1      s2      s3      s4
  }]
  ^dest.join[$src]
- ^dest.menu{$a!$b!$c!<BR>}
+ dest.menu:<BR>
+ ^dest.menu{$a!$b!$c!<BR>
+ ^rem{lock violation^table:set[nameless]{1
+}]
+ }
+ }
  <HR>
  ^^random:generate(10)=^random:generate(10)<BR>
- Line 120  $a[vasya,fedya,kolya]
+ Line 331  $a[vasya,fedya,kolya]
  ^$request:browser.type=$request:browser.type<BR>
  ^$request:browser.version=$request:browser.version<BR>
- $tf[^file:load[test.zip;abc.zip;image/gif]]
+ $tf[^file:load[test.zip;abc.zip]]
  #$response:body[$tf]
  ^$tf.name=$tf.name<BR>
- Line 193  $response:location[http://parser3/123]
+ Line 404  $response:location[http://parser3/123]
  </ol>
  <HR>
- ^${coo1k0iAeB:вот}=${cookie:вот}?<BR>
+ #$cookie:вот[прислал "browser"]
- ^${coo1k0iAeB:вот}=${cookie:вот}?<BR>
+ ^${cookie:вот}=${cookie:вот}?<BR>
  ^$request:query=$request:query<BR>
  ^$request:uri=$request:uri<BR>
  <form method=post>
+ <input type=hidden name=a value=123>
  <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>
+ <textarea name=name rows=5 cols=40>^untaint[html]{^default[$form:name;Пробный текст: А.Ф._Петросян <<Жизнь в Аду>>
+ нажми Submit]}</textarea><BR>
  <input type=submit>
  </form>

E-mail:

Removed from v.1.97
changed lines
	Added in v.1.156