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

Diff for /OpenXM/src/kan96xx/Doc/httpd-rpc.sm1 between version 1.2 and 1.3

version 1.2, 2002/10/24 02:12:34 version 1.3, 2002/10/24 02:48:59
Line 1 
Line 1 
 %% $OpenXM: OpenXM/src/kan96xx/Doc/httpd-rpc.sm1,v 1.1 2002/10/23 13:38:50 takayama Exp $  %% $OpenXM: OpenXM/src/kan96xx/Doc/httpd-rpc.sm1,v 1.2 2002/10/24 02:12:34 takayama Exp $
 %% http server by sm1. Used for RPC.  Generic example.  %% http server by sm1. Used for RPC.  Generic example.
   
 [(parse) (httpd.sm1) pushfile] extension pop  [(parse) (httpd.sm1) pushfile] extension pop
Line 44  oxNoX 
Line 44  oxNoX 
        [         [
          ox.win.start.0 aload pop           ox.win.start.0 aload pop
          (iexplore)   %% Starting internet explorer (TM).           (iexplore)   %% Starting internet explorer (TM).
          [(http://localhost:) httpd.port toString] cat           [(http://) [(sm1.socket) (gethostname) []] extension
             (:) httpd.port toString] cat
        ]         ]
        [  ]         [  ]
       3] extension        3] extension
    }{     }{
       %% On unix.        %% On unix.
       [(sleep 3 ; netscape http://localhost:) httpd.port toString ( & ) ] cat        [(sleep 3 ; netscape http://)
                    [(sm1.socket) (gethostname) []] extension
                   (:) httpd.port toString ( & ) ] cat
       system        system
    } ifelse     } ifelse
   
Line 215  oxNoX 
Line 218  oxNoX 
    /result arg1 def     /result arg1 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-length: ) result length toString ] cat sendln
      (Content-Type: text/plain) sendln
    0 sendln     0 sendln
   
    result sendln     result sendln
Legend:
Removed from v.1.2  
changed lines
  Added in v.1.3
FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>