version 1.3, 2001/08/23 02:08:41 |
version 1.6, 2002/10/17 13:40:28 |
|
|
%% $OpenXM: OpenXM/src/kan96xx/Doc/httpd.sm1,v 1.2 2001/08/23 00:49:00 takayama Exp $ |
%% $OpenXM: OpenXM/src/kan96xx/Doc/httpd.sm1,v 1.5 2001/09/20 05:57:40 takayama Exp $ |
%% common modules for httpd on sm1. |
%% common modules for httpd on sm1. |
/Oxserver_history_variable (Oxserver_history_variable_) def |
/Oxserver_history_variable (Oxserver_history_variable_) def |
|
/httpd.image.type |
|
[(getenv) (OpenXM_PSTOIMG_TYPE)] extension |
|
def |
|
|
|
|
/httpd_startserver { |
/httpd_startserver { |
[(sm1.socket) (open) [httpd.port (localhost)]] extension |
[(sm1.socket) (open) [httpd.port (localhost)]] extension |
/httpd.server.fdAndPort set |
/httpd.server.fdAndPort set |
|
|
httpd_startserver ; |
httpd_startserver ; |
httpd_action ; |
httpd_action ; |
httpd_stopserver ; |
httpd_stopserver ; |
(5 sleep) system |
% (sleep 2) system |
httpd.serial 1 add /httpd.serial set |
httpd.serial 1 add /httpd.serial set |
} loop |
} loop |
} def |
} def |
|
|
0 sendln |
0 sendln |
(<html>) sendln |
(<html>) sendln |
(Shutdown the engine. <br>) sendln |
(Shutdown the engine. <br>) sendln |
(See you! <a href="http://www.openxm.org"> Web/sm1 </a>) sendln |
(See you! <a href="http://www.openxm.org"> Web/asir, Web/sm1 </a>) sendln |
(</html>) sendln |
(</html>) sendln |
0 sendln |
0 sendln |
[(flush)] extension |
[(flush)] extension |
|
|
(Content-Type: text/html) sendln |
(Content-Type: text/html) sendln |
0 sendln |
0 sendln |
(You cannot execute ox servers without a session key! <br>) sendln |
(You cannot execute ox servers without a session key! <br>) sendln |
|
0 sendln |
|
[(flush)] extension |
|
} def |
|
|
|
/send-page-warning-image { |
|
(HTTP/0.9 200 OK) sendln |
|
(Connection: close) sendln |
|
(Content-Type: text/html) sendln |
|
0 sendln |
|
(Error: Image translation is not supported on this server<br>) sendln |
|
( Check the value of the environmental variable OpenXM_PSTOIMG_TYPE <br>) sendln |
0 sendln |
0 sendln |
[(flush)] extension |
[(flush)] extension |
} def |
} def |