﻿⍝ Using SSH to start isolate slaves

)load isolate
]load c:\devt\aplssh\APLProcess.dyalog
host←'192.168.17.167' ⍝ debian8 vm on Fujitsu
myip←'192.168.17.164'

public←'C:\Users\mkrom\Documents\SSH\MortensTest.pub'
private←'C:\Users\mkrom\Documents\SSH\MortensTest.ppk'
user←'mkrom'
exe←'/opt/mdyalog/16.0/64/unicode/mapl'

wsid←'/home/mkrom/isolate'
env←'AutoShut=1 Port=7052 APLCORENAME=7052 isolate=isolate isoid=12345 onerror=signal'
env,←' MAXWS=256M protocol=IPv4 AllowRemote="',myip,'"'

ride_init←'SERVE::4502'

isolate_process←⎕NEW APLProcess (wsid opts (host user public private exe) ride_init)

AddServer host (,7052) ⍝ One process running there
iso←ø ''
iso.⎕SH 'uname -a' 