ft: 代码修改

src/agVstCli/agSslAgency.erl

@@ -182,7 +182,12 @@ handleMsg(Msg, #srvState{serverName = ServerName} = SrvState, CliState) ->
 -spec terminate(term(), srvState(), cliState()) -> ok.
 terminate(Reason, #srvState{socket = Socket} = SrvState, CliState) ->
    {ok, NewSrvState, NewCliState} = waitAllReqOver(SrvState, CliState),
-   ssl:close(Socket),
+   case Socket of
+      undefiend ->
+         ignore;
+      _ ->
+         ssl:close(Socket)
+   end,
    agAgencyUtils:dealClose(NewSrvState, NewCliState, {error, shutdown}),
    exit(Reason).
 

src/agVstCli/agTcpAgency.erl

@@ -187,7 +187,12 @@ handleMsg(Msg, #srvState{serverName = ServerName} = SrvState, CliState) ->
 -spec terminate(term(), srvState(), cliState()) -> ok.
 terminate(Reason, #srvState{socket = Socket} = SrvState, CliState) ->
    {ok, NewSrvState, NewCliState} = waitAllReqOver(SrvState, CliState),
-   gen_tcp:close(Socket),
+   case Socket of
+      undefiend ->
+         ignore;
+      _ ->
+         gen_tcp:close(Socket)
+   end,
    agAgencyUtils:dealClose(NewSrvState, NewCliState, {error, shutdown}),
    exit(Reason).