From f2aa32bf42aaca06c0ffc7c1bd9f3410c30c7004 Mon Sep 17 00:00:00 2001
From: "Jean-Marc Pigeon (Delson)" <jmp@safe.ca>
Date: Sat, 21 Jun 2025 19:21:08 -0400
Subject: [PATCH] Adjustin procedure dns_is_domain_local

---
 lib/modrec.c | 2 +-
 lib/unidns.c | 8 +++++++-
 lib/unitls.c | 4 ++--
 3 files changed, 10 insertions(+), 4 deletions(-)

diff --git a/lib/modrec.c b/lib/modrec.c
index 18a7d1b..fc3ffae 100644
--- a/lib/modrec.c
+++ b/lib/modrec.c
@@ -81,7 +81,7 @@ for (int i=0;i<argc;i++) {
       case 1    :
         if (strlen(ptr)>0)
           ipnum=ptr;
-        (void) rou_alert(0,"JMPDBG ipnum[%s]",ipnum);
+        (void) rou_alert(0,"%s JMPDBG ipnum[%s]",OPEP,ipnum);
         break;
       case 2    :
         if (strlen(ptr)>0) 
diff --git a/lib/unidns.c b/lib/unidns.c
index 2b64582..6336129 100644
--- a/lib/unidns.c
+++ b/lib/unidns.c
@@ -506,8 +506,14 @@ while (proceed==true) {
       break;
     case 3      :       //checking best MX with local interface
       while (*afns!=(AFNTYP *)0) {
-        if (dns_matchiprec((*dns)->mxname,*afns,32)==true) {
+        _Bool ismx;
+
+        ismx=dns_matchiprec((*dns)->mxname,*afns,32);
+        (void) rou_alert(0,"%s mxname=<%s> anfn=[%s] ismx='%d'",
+                            OPEP,(*dns)->mxname,(*afns)->strnumip,ismx);
+        if (ismx==true) {
           status=dns_local;
+          break;
           }
         afns++;
         }
diff --git a/lib/unitls.c b/lib/unitls.c
index 3cc60ea..db36089 100644
--- a/lib/unitls.c
+++ b/lib/unitls.c
@@ -183,7 +183,7 @@ mode=SSL_VERIFY_NONE;
 phase=0;
 proceed=true;
 while (proceed==true) {
-  (void) rou_alert(7,"%s phase='%d'",OPEP,phase);
+  //(void) rou_alert(7,"%s JMPDBG phase='%d'",OPEP,phase);
   switch (phase) {
     case 0      :       //loading certificate names
       for (int i=0;i<(sizeof(cenv)/sizeof(char *));i++) {
@@ -677,7 +677,7 @@ tls=(TLSTYP *)0;
 phase=0;
 proceed=true;
 while (proceed==true) {
-  (void) rou_alert(6,"%s phase='%d', serveur='%d'",OPEP,phase,server);
+  //(void) rou_alert(6,"%s JMPDBG phase='%d', serveur='%d'",OPEP,phase,server);
   switch (phase) {
     case 0      :       //prepare the structure first;
       tls=(TLSTYP *)calloc(1,sizeof(TLSTYP));
-- 
2.47.3