tls_waitfor char seem to be working

diff --git a/lib/devsoc.c b/lib/devsoc.c
index 1d4eb39246e3205ea0af992cc8a4d53b2f9e21a5..0ea2327a1a01f8da0bb00d119cce27e9254101cc 100644 (file)
--- a/lib/devsoc.c
+++ b/lib/devsoc.c
@@ -913,27 +913,29 @@ if (soc!=(SOCTYP *)0) {
   polling[0].revents=(short)0;
   switch (soc->modtls) {
     case true   :
-      polling[0].fd=SSL_get_fd(soc->tls->ssl);
+      (void) rou_alert(0,"%s JMPDBG Waiting TLS",OPEP);
+      status=tls_waitforchar(soc->tls,millisec);
       break;
     case false  :
       polling[0].fd=soc->handle;
+      (void) sigprocmask(SIG_SETMASK,(sigset_t *)0,&origmask);
+      status=poll(polling,1,millisec);
+      (void) sigprocmask(SIG_SETMASK,&origmask,(sigset_t *)0);
       break;
     }
-  (void) sigprocmask(SIG_SETMASK,(sigset_t *)0,&origmask);
-  status=poll(polling,1,millisec);
-  (void) sigprocmask(SIG_SETMASK,&origmask,(sigset_t *)0);
   switch (status) {
     case -1     :       //polling error
-      //(void) rou_alert(0,"%s JMPDBG Poll error=<%s>",OPEP,strerror(errno));
+      (void) rou_alert(0,"%s JMPDBG Poll error=<%s>",OPEP,strerror(errno));
       break;
     case  0     :       //polling timeout
-      //(void) rou_alert(0,"%s JMPDBG Polling timeout",OPEP);
+      (void) rou_alert(0,"%s JMPDBG Polling timeout",OPEP);
       break;
     case 1      :       //polling early return (data or event)
-      //(void) rou_alert(0,"%s JMPDBG Polling return",OPEP);
+      (void) rou_alert(0,"%s JMPDBG Polling return",OPEP);
       status=-2;        //wlets say it is disconnected
       if (isconnected(soc)==true) 
         status=soc_receive(socptr);
+      (void) rou_alert(0,"%s JMPDBG Polling return new status='%d'",OPEP,status);
       break;
     default     :
       break;