insert tecs_client into archive + little update

tecs/tecs_cli.c

@@ -6,7 +6,7 @@
 #include "tecs_cli.h"
 
 static char device[80], command[80];
-static int quit, readTemp, configuring;
+static int readTemp, configuring;
 static float tempX, tempP, tempC;
 
 pTecsClient TeccInit(char *startcmd, int port) {
@@ -19,7 +19,6 @@ pTecsClient TeccInit(char *startcmd, int port) {
   CocDefFlt(tempX, CocRD);
   CocDefStr(device, CocWR);
   CocDefInt(configuring, CocRD);
-  CocDefInt(quit, CocWR);
   CocDefInt(readTemp, CocWR);
   CocDefCmd(command);
 
@@ -94,10 +93,22 @@ int TeccSend(pTecsClient conn, char *cmd, char *reply, int replyLen) {
 }
 
 int TeccQuitServer(pTecsClient conn) {
-  quit=1;
-  ERR_I(CocCmd(conn, "[quit]"));
-  return(0);
-  OnError: return(-1);
+  int iret, cnt;
+
+  ERR_I(iret=CocCheck(conn));
+  if (iret==0) {
+    ERR_I(CocSet(conn, "quit", "1"));
+    cnt=50;
+    while (iret==0 && cnt>0) {
+      CocDelay(100);
+      ERR_I(iret=CocCheck(conn));
+      cnt--;
+    }
+  }
+  if (iret==1) return(0);
+  ERR_MSG("Does not quit within 5 seconds");
+  OnError:
+    return(-1);
 }
 
 void TeccClose(pTecsClient conn) {