X-Git-Url: https://git.hcoop.net/hcoop/domtool2.git/blobdiff_plain/6bb366c5a60247419dce5cbce4a5c034fa2f1e5c..a088cea68cf4ca19249d4cf8591e95228dba13f1:/src/main.sml diff --git a/src/main.sml b/src/main.sml index 461207a..a3b78e8 100644 --- a/src/main.sml +++ b/src/main.sml @@ -145,7 +145,7 @@ fun request fname = val user = Posix.SysDB.Passwd.name (Posix.SysDB.getpwuid uid) val context = OpenSSL.context (Config.certDir ^ "/" ^ user ^ ".pem", - Config.keyDir ^ "/" ^ user ^ ".pem", + Config.keyDir ^ "/" ^ user ^ "/key.pem", Config.trustStore) val bio = OpenSSL.connect (context, dispatcher) @@ -238,6 +238,7 @@ fun service () = cmdLoop () end in + print "Listening for connections....\n"; loop (); OpenSSL.shutdown sock end @@ -247,7 +248,7 @@ fun slave () = val host = hostname () val context = OpenSSL.context (Config.certDir ^ "/" ^ host ^ ".pem", - Config.keyDir ^ "/" ^ host ^ ".pem", + Config.keyDir ^ "/" ^ host ^ "/key.pem", Config.trustStore) val sock = OpenSSL.listen (context, Config.slavePort)