version 1.12, 2000/12/03 08:19:54 |
version 1.15, 2000/12/06 00:29:51 |
|
|
%%%%%%%%%%% $OpenXM: OpenXM/src/kan96xx/Doc/ox.sm1,v 1.11 2000/02/02 02:03:42 takayama Exp $ |
%%%%%%%%%%% $OpenXM: OpenXM/src/kan96xx/Doc/ox.sm1,v 1.14 2000/12/05 12:03:43 takayama Exp $ |
%%%%%%%%%%%% Configuration: Specify your server path |
%%%%%%%%%%%% Configuration: Specify your server path |
%%%%% ox, ox_sm1, oxlog are contained in kxx.tgz |
%%%%% ox, ox_sm1, oxlog are contained in kxx.tgz |
%%%%% These should be under /usr/local/lib/sm1 or LOAD_SM1_PATH |
%%%%% These should be under /usr/local/lib/sm1 or LOAD_SM1_PATH |
Line 87 ox.version [(Version)] system_variable gt |
|
Line 87 ox.version [(Version)] system_variable gt |
|
|
|
/SM_control_kill 1024 def |
/SM_control_kill 1024 def |
/SM_control_reset_connection 1030 def |
/SM_control_reset_connection 1030 def |
|
/SM_control_spawn_server 1027 def |
|
|
/Etag_error 257 def |
/Etag_error 257 def |
|
|
Line 355 ox.verbose { oxhelp } { } ifelse |
|
Line 356 ox.verbose { oxhelp } { } ifelse |
|
/oxreset { |
/oxreset { |
/arg1 set |
/arg1 set |
[(oxReq) arg1 SM_control_reset_connection] extension pop |
[(oxReq) arg1 SM_control_reset_connection] extension pop |
[(oxGetFromControl) arg1 ] extension pop |
%% [(oxGetFromControl) arg1 ] extension pop |
[(oxGet) arg1] extension message |
[(oxGet) arg1] extension message |
} def |
} def |
|
|
|
|
} def |
} def |
|
|
%% Test code for oxCreateControl_RFC_101 |
%% Test code for oxCreateControl_RFC_101 |
/sm1connect101 { |
/sm1StartControl101 { |
[/in-sm1connectr /pass /peer /data /control ] pushVariables |
[/in-sm1connectr /pass /peer /data /control ] pushVariables |
[ |
[ |
/pass [(oxGenPass)] extension def |
/pass [(oxGenPass)] extension def |
/peer [(oxGetPort) (localhost)] extension def |
/peer [(oxGetPort1) (localhost)] extension def |
/peer [ peer 0 get peer 1 get ] def %% BUG, close the rest. |
|
/data peer 1 get toString def |
/data peer 1 get toString def |
peer message |
peer message |
[(/home/nobuki/OpenXM/src/oxc/oxc) |
[(/home/nobuki/OpenXM/src/oxc/oxc) |
|
|
ox.ccc |
ox.ccc |
] pop |
] pop |
popVariables |
popVariables |
|
} def |
|
|
|
/sm1StartEngine101 { |
|
[/in-sm1StartEngine101 /peer /data /control /engineID] pushVariables |
|
[ |
|
/peer [(oxGetPort1) (localhost)] extension def |
|
/data peer 1 get def |
|
|
|
ox.ccc data oxpushcmo |
|
ox.ccc (/home/nobuki/OpenXM/bin/ox_sm1) oxpushcmo |
|
[(oxPushCMD) ox.ccc SM_control_spawn_server] extension |
|
ox.ccc oxpopcmo /engineID set |
|
[(oxCreateEngine_RFC_101) peer 0 (Empty) engineID] extension |
|
/ox.ddd set |
|
(The engine is binded to the variables ox.ddd) message |
|
] pop |
|
popVariables |
|
arg1 |
} def |
} def |
|
|
initializePathNamesForOx %% This should be |
initializePathNamesForOx %% This should be |