--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/cgi/listvdomain.cc	Wed Jan 16 22:39:43 2008 +0100
@@ -0,0 +1,191 @@
+// Copyright (C) 1999,2000 Bruce Guenter <bruceg@em.ca>
+//
+// This program is free software; you can redistribute it and/or modify
+// it under the terms of the GNU General Public License as published by
+// the Free Software Foundation; either version 2 of the License, or
+// (at your option) any later version.
+//
+// This program is distributed in the hope that it will be useful,
+// but WITHOUT ANY WARRANTY; without even the implied warranty of
+// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+// GNU General Public License for more details.
+//
+// You should have received a copy of the GNU General Public License
+// along with this program; if not, write to the Free Software
+// Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
+
+#include <config.h>
+#include <stdlib.h>
+#include "cgi/cgi-base.h"
+#include "misc/server.h"
+#include "vpwentry/vpwentry.h"
+#include "fdbuf/fdbuf.h"
+
+static mystring domain;
+static mystring userlink;
+
+static mystring cell_pre;
+static mystring cell_post;
+
+static mystring p_pre;
+
+static mystring table_align;
+
+mystring do_subst(mystring link, const mystring& ref)
+{
+  int pos;
+  int start = 0;
+  unsigned advance = ref.length();
+  
+  while((pos = link.find_first('%', start)) >= 0) {
+    link = link.left(pos) + ref + link.right(pos+1);
+    start = pos + advance;
+  }
+  return link;
+}
+
+struct user
+{
+  mystring name;
+  mystring code;
+  user* next;
+  user(const mystring& n, const mystring& c);
+};
+
+user::user(const mystring& n, const mystring& c)
+  : name(n), code(c), next(0)
+{
+}
+
+void show_user(const user* user)
+{
+  vpwentry vpw;
+  vpw.from_record(user->name, user->code);
+  
+  mystring link;
+  mystring elink;
+
+  if(!!userlink) {
+    link = "<a href=\"" + do_subst(userlink, vpw.name) + "\">";
+    elink = "</a>";
+  }
+  
+  fout << "<tr>"
+       << cell_pre << link << vpw.name << elink << cell_post
+       << cell_pre << vpw.mailbox << cell_post;
+  for(mystring_iter iter = vpw.forwards; iter; ++iter)
+    fout << cell_pre << *iter << cell_post;
+  fout << "</tr>\n";
+}
+
+mystring load_users(int fd, unsigned& count, user**& array)
+{
+  user* tail = 0;
+  user* head = 0;
+  for(count = 0; ; count++) {
+    response r(response::read(fd));
+    if(!r)
+      return r.message();
+    if(!r.msg)
+      break;
+    mystring name(r.msg.c_str());
+    mystring code(r.msg.c_str() + name.length()+1,
+		  r.msg.length() - name.length()-1);
+    user* node = new user(name, code);
+    if(!head)
+      head = node;
+    else
+      tail->next = node;
+    tail = node;
+  }
+  if(count) {
+    array = new user*[count];
+    unsigned i = 0;
+    for(user* node = head; node; node = node->next)
+      array[i++] = node;
+  }
+  return "";
+}
+
+static int user_cmp(const void* ptra, const void* ptrb)
+{
+  const user* a = *(const user**)ptra;
+  const user* b = *(const user**)ptrb;
+  int res = a->name != b->name;
+  return res;
+}
+
+void show_domain(int fd)
+{
+  unsigned count = 0;
+  user** users;
+  mystring msg = load_users(fd, count, users);
+  if(count == 0) {
+    fout << p_pre << "This domain contains no users.</p>\n";
+    return;
+  }
+
+  if(!!msg) {
+    fout << p_pre << "<samp>" << msg << "</samp></p>\n";
+    return;
+  }
+
+  qsort(users, count, sizeof users[0], user_cmp);
+  
+  fout << p_pre << "This domain contains " << count << " users:</p>\n";
+  fout << "<table border=1 align=\"" << table_align << "\">\n"
+    "<tr><td><u>Username</u></td>"
+    "<td><u>Mailbox</u></td>"
+    "<td><u>Forwards</u></td></tr>\n";
+  for(unsigned i = 0; i < count; i++)
+    show_user(users[i]);
+  fout << "</table>\n";
+}
+
+void setup_format(const CGIArgs& args)
+{
+  p_pre = "<p align=\"" + args.get("p-align", "left") + "\">";
+
+  cell_pre = args["cell-pre"];
+  cell_post = args["cell-post"];
+  
+  cell_pre = "<td align=\"" + args.get("cell-align", "left") + "\">"
+    + cell_pre;
+  cell_post = cell_post + "</td>";
+
+  userlink = args["userlink"];
+
+  table_align = args.get("table-align", "left");
+}
+
+CGI_MAIN 
+{
+  mystring body_flags = args["body-flags"];
+  mystring title_pre = args.get("title-pre", "<h1>");
+  mystring title_post = args.get("title-post", "</h1>");
+
+  setup_format(args);
+
+  domain = vdomain;
+  server_call call("listdomain", vdomain, password);
+  response resp = call.call();
+  if(!resp)
+    error(resp.msg);
+  else {
+    content_type("text/html");
+    fout << "<html>"
+      "<head>"
+      "<title>Listing of Virtual Domain '" << vdomain << "'</title>"
+      "</head>\n"
+      "<body " << body_flags << ">\n" <<
+      p_pre << title_pre << "Listing of Virtual Domain "
+      "'" << vdomain << "'" << title_post << "</p>"
+      "<hr>\n";
+    show_domain(call.socket());
+    const mystring referer = getenv("HTTP_REFERER");
+    if(!!referer)
+      fout << p_pre << "<a href=\"" << referer << "\">Back</a></p>\n";
+    fout << "</body>\n"
+      "</html>\n";
+  }
+}