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

Diff for /OpenXM/src/kan96xx/Doc/ox-win.sm1 between version 1.2 and 1.6

version 1.2, 2001/08/09 09:08:17 version 1.6, 2001/08/12 03:13:35
Line 1 
Line 1 
 %%%%%%%%%%%  $OpenXM: OpenXM/src/kan96xx/Doc/ox-win.sm1,v 1.1 2001/05/20 07:48:18 takayama Exp $  %%%%%%%%%%%  $OpenXM: OpenXM/src/kan96xx/Doc/ox-win.sm1,v 1.5 2001/08/10 13:48:40 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
   
   %% This variable is used in sm1connectr_win
   %% It should be set, for example, to c:/cygwin/home/nobuki/OpenXM
   %% See  kan96xx/win/websm1.bat
   [(getenv) (OPENXMHOMEWIN)] extension
   /OpenXM_HOME_WIN set
   OpenXM_HOME_WIN tag 0 eq {
     [(getenv) (OpenXM_HOME)] extension
     /OpenXM_HOME_WIN set
   } { } ifelse
   
   %% This is used in asirconnectr_win
   /OX_LAUNCH (c:\home\asir\bin\ox_launch.exe) def
   %%%%%%%%%%%%%%% end configuration  %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
   
 /oxpath.ox (bin/ox.exe) def  /oxpath.ox (bin/ox.exe) def
 /oxpath.oxsm1 (bin/ox_sm1.exe) def  /oxpath.oxsm1 (bin/ox_sm1.exe) def
 /oxpath.oxlog (bin/oxlog.exe) def  /oxpath.oxlog (bin/oxlog.exe) def
Line 53  ox.version [(Version)] system_variable gt  
Line 68  ox.version [(Version)] system_variable gt  
   (Please get it from http://www.math.kobe-u.ac.jp/KAN) message    (Please get it from http://www.math.kobe-u.ac.jp/KAN) message
   error    error
 } { } ifelse  } { } ifelse
 (ox.sm1, --- open sm1 protocol module 11/11,1999  (C) N.Takayama. oxhelp for help) message-quiet  (ox-win.sm1, --- open sm1 protocol module for Windows (TM) 8/9, 2001  (C) N.Takayama. oxhelp for help) message-quiet
   
 /ox.ccc load isArray  /ox.ccc load isArray
 { }  { }
Line 596  ox.verbose { 
Line 611  ox.verbose { 
  popVariables   popVariables
 } def  } def
   
 /asirconnectr {  /sm1connectr_win {
  [/in-sm1connectr /pass /peer /data /control ] pushVariables   [/in-sm1connectr /pass /peer /data /control ] pushVariables
  [   [
  /pass [(oxGenPass)] extension def   /pass [(oxGenPass)] extension def
Line 604  ox.verbose { 
Line 619  ox.verbose { 
  /data peer 1 get toString def   /data peer 1 get toString def
  /control peer 3 get toString def   /control peer 3 get toString def
  peer message   peer message
  [(start ox_launch ) ( 127.0.0.1 ) ( 0 )   [(forkExec) [
    control ( ) data (ox_asir) ( 1 )      (c:/windows/command/start)
   oxpath.null      [OpenXM_HOME_WIN  (/bin/ox)] cat
   ( )] cat % system      (-reverse)
  control message data message      (-ox)
       [OpenXM_HOME_WIN (/bin/ox_sm1.exe)] cat
       (-data)
        data
        (-control)
        control
        (-pass)
        pass
     ]
     [  ] 3] extension
   
  [(oxCreateClient2) peer 0 pass] extension /ox.ccc set   [(oxCreateClient2) peer 0 pass] extension /ox.ccc set
                      %% 0 means connect from only localhost.                       %% 0 means connect from only localhost.
  (The server is binded to the variable ox.ccc) message   (The server is binded to the variable ox.ccc) message
   ox.ccc.init    ox.ccc.init
    ] pop
    popVariables
   } def
   
   /asirconnectr_win {
    [/in-sm1connectr /pass /peer /data /control ] pushVariables
    [
    /pass [ ] cat def  %% Do not use one time password.
    /peer [(oxGetPort) (localhost)] extension def
    /data peer 1 get toString def
    /control peer 3 get toString def
    peer message
    [control data] message
    [(forkExec)
     [OX_LAUNCH
      (ox_launch)
      (localhost)
      (0)
      control toString
      data toString
      (ox_asir)
      (1)
     ]
     [ ]
     7 %% 1 1 1
    ] extension ;
    [(oxCreateClient2) peer 0 pass] extension /oxasir.ccc set
                        %% 0 means connect from only localhost.
    (The server is binded to the variable oxasir.ccc) message
     %% Initialization code for asir.
  ] pop   ] pop
  popVariables   popVariables
 } def  } def
Legend:
Removed from v.1.2  
changed lines
  Added in v.1.6
FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>