From a2cf5feb3b7439e5d29feeefca449f691471eae4 Mon Sep 17 00:00:00 2001
From: "Jean-Marc Pigeon (Delson)" <jmp@safe.ca>
Date: Sun, 6 Apr 2025 19:12:38 -0400
Subject: [PATCH] openssl connection OK, but"quit" is NOT seen

---
 lib/devsoc.c |  4 ++++
 lib/subrou.c |  2 +-
 lib/unitls.c | 14 +++++++-------
 3 files changed, 12 insertions(+), 8 deletions(-)

diff --git a/lib/devsoc.c b/lib/devsoc.c
index 2766eaa..3c23c89 100644
--- a/lib/devsoc.c
+++ b/lib/devsoc.c
@@ -920,7 +920,9 @@ if (soc!=(SOCTYP *)0) {
       break;
     }
   (void) sigprocmask(SIG_SETMASK,(sigset_t *)0,&origmask);
+  (void) rou_alert(0,"%s JMPDBG Entering poll",OPEP);
   status=poll(polling,1,millisec);
+  (void) rou_alert(0,"%s JMPDBG Exiting poll",OPEP);
   (void) sigprocmask(SIG_SETMASK,&origmask,(sigset_t *)0);
   switch (status) {
     case -1     :       //polling error
@@ -1141,6 +1143,8 @@ while (proceed==true) {
             }
           soc->carin+=got;      //managing carpile
           soc->carpile[soc->carin]='\000';
+          (void) rou_alert(0,"%s JMPDBG so fare within carpile=<%s>",
+                              OPEP,soc->carpile);
           break;
         }
       break;
diff --git a/lib/subrou.c b/lib/subrou.c
index e86e18c..f636383 100644
--- a/lib/subrou.c
+++ b/lib/subrou.c
@@ -21,7 +21,7 @@
 
 //version definition 
 #define VERSION "0.6"
-#define RELEASE "46"
+#define RELEASE "47"
 #define BRANCH "dvl"
 
 //Public variables
diff --git a/lib/unitls.c b/lib/unitls.c
index cd97c3e..23307d8 100644
--- a/lib/unitls.c
+++ b/lib/unitls.c
@@ -523,6 +523,7 @@ if (tls!=(TLSTYP *)0) {
     status=0;
     proceed=false;
     sofar=SSL_write(tls->ssl,buffer,tosend);
+    (void) rou_alert(0,"%s JMPDBG sofar='%d'",OPEP,sofar);
     switch (sofar) {
       case -1     :       //trouble to write
         switch (status=SSL_get_error(tls->ssl,-1)) {
@@ -587,19 +588,18 @@ if (tls!=(TLSTYP *)0) {
 
   status=0;
   got=SSL_read(tls->ssl,buffer,maxread);
-  (void) rou_alert(0,"%S JMPDBG got='%d'",OPEP,got);
   switch (got) {
     case -1     :       //trouble to write
       status=SSL_get_error(tls->ssl,-1);
-      (void) rou_alert(0,"%S JMPDBG status='%d'",OPEP,status);
       switch (status) {
-        case SSL_ERROR_WANT_READ        :     //"wanted" error
-        case SSL_ERROR_WANT_WRITE       :     //
-          (void) usleep(1000);
-          (void) rou_alert(0,"%S JMPDBG usleep",OPEP);
+        case SSL_ERROR_WANT_READ        :       //"wanted" error
+        case SSL_ERROR_WANT_WRITE       :       //
+          (void) usleep(1000);                  //to ease up incoming charactere
+          got=0;
           break;
         default                         :
-          (void) showtlserror(tls,-1,"%s Premature EOF with crypted link",OPEP);
+          (void) showtlserror(tls,-1,"%s  Unexpected SSL_read status='%d')",
+                                      OPEP,status);
           break;
         }
       break;
-- 
2.47.3