From dbfaa997d26b5f23d2f83e48158b5bfbff119b67 Mon Sep 17 00:00:00 2001
From: "Jean-Marc Pigeon (Delson)" <jmp@safe.ca>
Date: Thu, 28 Aug 2025 14:56:57 -0400
Subject: [PATCH] Working out mysqli_connect

---
 www/devsql.php | 15 +++++++++++----
 www/unimar.php | 22 ++++++++++++++++------
 www/unipos.php | 26 ++++++++++++++++++++++++++
 3 files changed, 53 insertions(+), 10 deletions(-)

diff --git a/www/devsql.php b/www/devsql.php
index 5f92ef4..ce31e6c 100644
--- a/www/devsql.php
+++ b/www/devsql.php
@@ -8,32 +8,39 @@
 function sql_connect() 
 
 {
+$conn=0;
+$dbusr=getenv("APPNAME");
 $dbtype=getenv("DB_TYPE");
+$dbname=getenv("DB_NAME");
+$dbhost=getenv("DB_HOST");
+$dbport=getenv("DB_PORT");
 switch($dbtype) {
   case 'MYSQL'		:
     include_once "unimar.php";
-    $STR=mar_connect();
+    $conn=mar_connect($dbhost,$dbusr,$dbname,$dbport);
     break;
   case 'POSTGRESQL'	:
     include_once "unipos.php";
+    $conn=pos_connect($dbhost,$dbusr,$dbname,$dbport);
     break;
   default		:
     $daterr="Connect Database, type <".$dbtype."> is unexpected!";
     throw new ErrorException($daterr);
     break;
   }
-return $STR;
+return $conn;
 }
 
-function sql_close() 
+function sql_close($conn) 
 
 {
 $dbtype=getenv("DB_TYPE");
 switch($dbtype) {
   case 'MYSQL'		:
-    $STR=mar_close();
+    $STR=mar_close($conn);
     break;
   case 'POSTGRESQL'	:
+    $STR=pos_close($conn);
     break;
   default		:
     $daterr="Close Database, type <".$dbtype."> is unexpected!";
diff --git a/www/unimar.php b/www/unimar.php
index e7f53b9..f72a129 100644
--- a/www/unimar.php
+++ b/www/unimar.php
@@ -5,20 +5,30 @@
 //
 //==============================================================
 
-function mar_connect()
+//==============================================================
+//	To connect to a local/remote MYSQL database
+//==============================================================
+function mar_connect($dbhost,$dbusr,$dbname,$dbport)
 
 {
-$STR="unimar.php, mar_connect\n";
+$OPEP="unimar.php, mar_connect";
 
-return $STR;
+$conn=mysqli_connect($dbhost,$dbusr,'',$dbname,$dbport);
+if (mysqli_connect_error()) {
+  }
+return $conn;
 }
 
 
-function mar_close()
+//==============================================================
+//	To disconnect from a local/remote MYSQL database
+//==============================================================
+function mar_close($conn)
 
 {
-$STR="unimar.php, mar_close\n";
+$OPEP="unimar.php, mar_close";
 
-return $STR;
+mysql_close($conn);
+return 0
 }
 ?>
diff --git a/www/unipos.php b/www/unipos.php
index 23f6294..a92126a 100644
--- a/www/unipos.php
+++ b/www/unipos.php
@@ -4,6 +4,32 @@
 //	To manage all access to Postgresql database
 //
 //==============================================================
+//
+//==============================================================
+//	To connect to a local/remote POSTGRESQL database
+//==============================================================
+function pos_connect($dbhost,$dbusr,$dbname,$dbport)
+
+{
+$OPEP="unipop.php, pos_connect";
+
+$seq="host=$dbhost user=$dbusr dbname=$dbname port=$dbport";
+$conn=pg_connect($seq);
+return $conn;
+}
+
 
+//==============================================================
+//	To disconnect from a local/remote POSTGRESQL database
+//==============================================================
+function pos_close($conn)
+
+{
+$OPEP="unipos, pos_close";
+
+pg_close($conn);
+return 0;
+}
+?>
 
 ?>
-- 
2.47.3