From d6d830a15c000127ca6109ac453852c101bb4040 Mon Sep 17 00:00:00 2001
From: danw <danw>
Date: Wed, 17 Nov 1999 18:37:27 +0000
Subject: [PATCH] make get_pobox return an additional argument so it will
 include both the filsys name and the machine name for IMAP output

---
 server/qfollow.pc | 67 +++++++++++++++++++++++++++++------------------
 server/queries2.c |  6 ++---
 2 files changed, 45 insertions(+), 28 deletions(-)

diff --git a/server/qfollow.pc b/server/qfollow.pc
index faf13eeb..6f7d3c67 100644
--- a/server/qfollow.pc
+++ b/server/qfollow.pc
@@ -561,14 +561,12 @@ int followup_uuac(struct query *q, char *argv[], client *cl)
 }
 
 
-/* followup_gpob: fixes argv[2] based on the IDs currently there and the
- * type in argv[1].  Then completes the upcall to the user.
+/* followup_gpob: fixes argv[2] and argv[3] based on the pobox type.
+ * Then completes the upcall to the user.
  *
- * argv[2] is of the form "123:234" where the first integer is the
- * machine ID if it is a pop box or filesys ID if it is an imap box,
- * and the second is the string ID if it is an SMTP box. argv[1]
- * should be "POP", "SMTP", "IMAP", or "NONE". Boxes of type NONE are
- * skipped.
+ * argv[2] is the users_id on input and should be converted to the
+ * pobox name on output. argv[3] is empty on input and should be
+ * converted to an email address on output.
  */
 
 int followup_gpob(struct query *q, struct save_queue *sq, struct validate *v,
@@ -578,50 +576,69 @@ int followup_gpob(struct query *q, struct save_queue *sq, struct validate *v,
   char **argv;
   char *ptype, *p;
   int mid, sid, status, i;
+  EXEC SQL BEGIN DECLARE SECTION;
+  int users_id;
+  char mach[MACHINE_NAME_SIZE], fs[FILESYS_LABEL_SIZE];
+  char str[STRINGS_STRING_SIZE];
+  EXEC SQL END DECLARE SECTION;
 
   /* for each row */
   while (sq_get_data(sq, &argv))
     {
-      mr_trim_args(2, argv);
+      mr_trim_args(4, argv);
       ptype = argv[1];
-      p = strchr(argv[2], ':');
-      *p++ = '\0';
-      mid = atoi(argv[2]);
-      sid = atoi(p);
+      users_id = atoi(argv[2]);
 
       if (!strcmp(ptype, "POP"))
 	{
-	  status = id_to_name(mid, MACHINE_TABLE, &argv[2]);
-	  if (status == MR_NO_MATCH)
+	  EXEC SQL SELECT m.name INTO :mach FROM machine m, users u
+	    WHERE u.users_id = :users_id AND u.pop_id = m.mach_id;
+	  if (sqlca.sqlcode)
 	    return MR_MACHINE;
+	  free(argv[2]);
+	  argv[2] = xstrdup(strtrim(mach));
+	  free(argv[3]);
+	  argv[3] = xmalloc(strlen(argv[0]) + strlen(argv[2]) + 2);
+	  sprintf(argv[3], "%s@%s", argv[0], argv[2]);
 	}
       else if (!strcmp(ptype, "SMTP"))
 	{
-	  status = id_to_name(sid, STRINGS_TABLE, &argv[2]);
-	  if (status == MR_NO_MATCH)
+	  EXEC SQL SELECT s.string INTO :str FROM strings s, users u
+	    WHERE u.users_id = :users_id AND u.box_id = s.string_id;
+	  if (sqlca.sqlcode)
 	    return MR_STRING;
+	  free(argv[2]);
+	  free(argv[3]);
+	  argv[2] = xstrdup(strtrim(str));
+	  argv[3] = xstrdup(str);
 	}
       else if (!strcmp(ptype, "IMAP"))
 	{
-	  status = id_to_name(mid, FILESYS_TABLE, &argv[2]);
-	  if (status == MR_NO_MATCH)
+	  EXEC SQL SELECT f.label, m.name INTO :fs, :mach
+	    FROM filesys f, machine m, users u
+	    WHERE u.users_id = :users_id AND f.filsys_id = u.imap_id
+	    AND f.mach_id = m.mach_id;
+	  if (sqlca.sqlcode)
 	    return MR_FILESYS;
+	  free(argv[2]);
+	  argv[2] = xstrdup(strtrim(fs));
+	  free(argv[3]);
+	  argv[3] = xmalloc(strlen(argv[0]) + strlen(strtrim(mach)) + 2);
+	  sprintf(argv[3], "%s@%s", argv[0], mach);
 	}
       else /* ptype == "NONE" */
 	goto skip;
-      if (status)
-	return status;
 
       if (!strcmp(q->shortname, "gpob"))
 	{
-	  sid = atoi(argv[4]);
+	  sid = atoi(argv[5]);
 	  if (sid > 0)
-	    status = id_to_name(sid, USERS_TABLE, &argv[4]);
+	    status = id_to_name(sid, USERS_TABLE, &argv[5]);
 	  else
-	    status = id_to_name(-sid, STRINGS_TABLE, &argv[4]);
+	    status = id_to_name(-sid, STRINGS_TABLE, &argv[5]);
+	  if (status && status != MR_NO_MATCH)
+	    return status;
 	}
-      if (status && status != MR_NO_MATCH)
-	return status;
 
       (*action)(q->vcnt, argv, actarg);
     skip:
diff --git a/server/queries2.c b/server/queries2.c
index d6c73596..5c89100a 100644
--- a/server/queries2.c
+++ b/server/queries2.c
@@ -453,7 +453,7 @@ static struct validate ufbl_validate = {
 
 static char *gpob_fields[] = {
   "login",
-  "login", "type", "box", "modtime", "modby", "modwith",
+  "login", "type", "box", "address", "modtime", "modby", "modwith",
 };
 
 static struct validate gpob_validate = {
@@ -2882,9 +2882,9 @@ struct query Queries2[] = {
     RETRIEVE,
     "u",
     USERS_TABLE,
-    "login, potype, users_id, TO_CHAR(pmodtime, 'DD-mon-YYYY HH24:MI:SS'), pmodby, pmodwith FROM users",
+    "login, potype, users_id, CHR(0), TO_CHAR(pmodtime, 'DD-mon-YYYY HH24:MI:SS'), pmodby, pmodwith FROM users",
     gpob_fields,
-    6,
+    7,
     "users_id = %d",
     1,
     "login",
-- 
2.45.2