diff --git a/haskell/app/Main.hs b/haskell/app/Main.hs index 8fed60a..8d1bb9c 100644 --- a/haskell/app/Main.hs +++ b/haskell/app/Main.hs @@ -44,6 +44,16 @@ main = do sleepNSecs 5 + -- Loop (Run replica of haskell program on different $NODES) + -- - Start server + -- - wait 4 seconds + -- - Identify new node running p2prc with SSH external port exposed + -- - SSH into machine + -- - Use simple File transfer to setup files + -- - Run server + -- - Use remote machine p2prc cmd to map a port using --mp + -- - Return back the exposed public IP and port number back to stdout + outputStr <- execListServers print outputStr