version 1.10, 2000/01/30 10:09:44 |
version 1.13, 2000/12/05 11:20:26 |
|
|
%%%%%%%%%%% $OpenXM: OpenXM/src/kan96xx/Doc/ox.sm1,v 1.9 2000/01/19 10:02:11 takayama Exp $ |
%%%%%%%%%%% $OpenXM: OpenXM/src/kan96xx/Doc/ox.sm1,v 1.12 2000/12/03 08:19:54 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 73 ox.version [(Version)] system_variable gt |
|
Line 73 ox.version [(Version)] system_variable gt |
|
|
|
/SM_popCMO 262 def |
/SM_popCMO 262 def |
/SM_executeFunction 269 def |
/SM_executeFunction 269 def |
/SM_DUMMY_sendcmo 280 def |
/SM_DUMMY_sendcmo 2147418112 1 add def %%% SM_PRIVATE+1 |
/SM_sync_ball 281 def |
/SM_sync_ball 281 def |
|
|
/SM_pops 265 def |
/SM_pops 265 def |
Line 355 ox.verbose { oxhelp } { } ifelse |
|
Line 355 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 |
|
|
|
|
arg1 |
arg1 |
} def |
} def |
|
|
|
%% Test code for oxCreateControl_RFC_101 |
|
/sm1connect101 { |
|
[/in-sm1connectr /pass /peer /data /control ] pushVariables |
|
[ |
|
/pass [(oxGenPass)] extension def |
|
/peer [(oxGetPort) (localhost)] extension def |
|
/peer [ peer 0 get peer 1 get ] def %% BUG, close the rest. |
|
/data peer 1 get toString def |
|
peer message |
|
[(/home/nobuki/OpenXM/src/oxc/oxc) |
|
( -c ) pass ( -h ) (localhost) ( -p ) data ( -x ) |
|
oxpath.null |
|
( &)] cat system-csh |
|
|
|
[(oxCreateControl_RFC_101) peer 0 pass] extension /ox.ccc set |
|
%% 0 means connect from only localhost. |
|
(The server is binded to the variable ox.ccc) message |
|
ox.ccc |
|
] pop |
|
popVariables |
|
} def |
|
|
initializePathNamesForOx %% This should be |
initializePathNamesForOx %% This should be |