[BACK]Return to httpd.sm1 CVS log [TXT][DIR] Up to [local] / OpenXM / src / kan96xx / Doc

Diff for /OpenXM/src/kan96xx/Doc/httpd.sm1 between version 1.18 and 1.22

version 1.18, 2005/11/21 09:12:22 version 1.22, 2013/03/07 02:10:32
Line 1 
Line 1 
 %% $OpenXM: OpenXM/src/kan96xx/Doc/httpd.sm1,v 1.17 2005/11/17 08:15:51 takayama Exp $  %% $OpenXM: OpenXM/src/kan96xx/Doc/httpd.sm1,v 1.21 2012/12/23 01:27:54 takayama Exp $
 %% common modules for httpd on sm1.  %% common modules for httpd on sm1.
 % [(Strict) 1] system_variable  % for debugging.  % [(Strict) 1] system_variable  % for debugging.
   /httpd.rawplus 0 def
 /Oxserver_history_variable (Oxserver_history_variable_) def  /Oxserver_history_variable (Oxserver_history_variable_) def
 /httpd.image.type  /httpd.image.type
   [(getenv) (OpenXM_PSTOIMG_TYPE)] extension    [(getenv) (OpenXM_PSTOIMG_TYPE)] extension
 def  def
   
   /httpd_sm1.cookie
    [(oxGenPass)] extension
   def
   /httpd.set-cookie {
     [(Set-Cookie: httpd_sm1=) httpd_sm1.cookie] cat
   } def
   
   
 [(getenv) (OXWEB_DEBUG)] extension tag 0 eq {  [(getenv) (OXWEB_DEBUG)] extension tag 0 eq {
    /httpd.debug 0 def     /httpd.debug 0 def
 } {  } {
Line 135  def
Line 144  def
    (HTTP/0.9 200 OK) sendln     (HTTP/0.9 200 OK) sendln
    (Connection: close) sendln     (Connection: close) sendln
    (Content-Type: text/html) sendln     (Content-Type: text/html) sendln
      httpd.set-cookie sendln
    0 sendln     0 sendln
 %%   (<FORM NAME="myFORM" METHOD="POST">) sendln  %%   (<FORM NAME="myFORM" METHOD="POST">) sendln
    result sendln     result sendln
Line 407  def
Line 417  def
          i 3 add /i set           i 3 add /i set
        } {         } {
          c 43 eq { % c == +           c 43 eq { % c == +
            s j 32 put             httpd.rawplus { s j 43 put } { s j 32 put } ifelse
            j 1 add /j set             j 1 add /j set
            i 1 add /i set             i 1 add /i set
           } {            } {
Line 810  def
Line 820  def
      [(getenv) (OX_BROWSER)]  extension /browser set       [(getenv) (OX_BROWSER)]  extension /browser set
      {       {
       browser tag 0 eq {        browser tag 0 eq {
         [(sleep 3 ; netscape http://localhost:) portnum ( & ) ] cat          [(ostype)] extension 1 get (mac) eq {
         /cmd set cmd message            [(sleep 3 ; open http://localhost:) portnum ( & ) ] cat
             /cmd set cmd message
           }{
             [(sleep 3 ; firefox http://localhost:) portnum ( & ) ] cat
             /cmd set cmd message
           }ifelse
         cmd system          cmd system
         exit          exit
        }{ } ifelse         }{ } ifelse
Legend:
Removed from v.1.18  
changed lines
  Added in v.1.22
FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>