| version 1.12, 2002/10/01 13:00:33 |
version 1.16, 2002/10/24 02:30:16 |
|
|
| %% $OpenXM: OpenXM/src/kan96xx/Doc/httpd-sm1.sm1,v 1.11 2002/01/16 09:20:00 takayama Exp $ |
%% $OpenXM: OpenXM/src/kan96xx/Doc/httpd-sm1.sm1,v 1.15 2002/10/24 02:12:34 takayama Exp $ |
| %% http server by sm1 |
%% http server by sm1 |
| %% Note to run on the Windows (TM). |
%% Note to run on the Windows (TM). |
| %% (A) You need to set IE (internet explorer) as follows: |
%% (A) You need to set IE (internet explorer) as follows: |
|
|
| { |
{ |
| [(sm1.socket) (select) [httpd.server.fd 0 get -1]] extension |
[(sm1.socket) (select) [httpd.server.fd 0 get -1]] extension |
| %% wait for ever |
%% wait for ever |
| [(sm1.socket) (read) [httpd.server.fd 0 get ]] extension /ff set |
[(sm1.socket) (readHTTP) [httpd.server.fd 0 get ]] extension /ff set |
| ff length 0 eq { |
ff tag 0 eq { |
| (connection is closed.) message |
(connection is closed.) message exit |
| } |
} |
| { |
{ |
| (------------ start ----------------------) message |
(------------ start ----------------------) message |
|
|
| ( ) message |
( ) message |
| httpd.serial 0 eq { |
httpd.serial 0 eq { |
| /httpd.com httpd.initialization def |
/httpd.com httpd.initialization def |
| |
/httpd.textarea.valid 1 def |
| } { } ifelse |
} { } ifelse |
| httpd.sendFile tag 0 eq { } |
httpd.sendFile tag 0 eq { } |
| { |
{ |
![[BACK]](/icons/cvsweb/back.gif){kind=icon}
Return to httpd-sm1.sm1 CVS log ![[TXT]](/icons/cvsweb/text.gif){kind=icon}
![[DIR]](/icons/cvsweb/dir.gif){kind=icon}
Up to [local] / OpenXM / src / kan96xx / Doc