projects / mirror / userdir-ldap.git / commitdiff
? search:
summary | shortlog | log | commit | commitdiff | tree
raw | patch | inline | side by side (parent: e5305db)
Adds ICQ UIN support
authortausq <>
Sun, 26 Mar 2000 20:13:25 +0000 (20:13 +0000)
committertausq <>
Sun, 26 Mar 2000 20:13:25 +0000 (20:13 +0000)
web/search.cgi patch | blob | history
web/searchresults.html patch | blob | history
web/searchresults.wml patch | blob | history
web/update.cgi patch | blob | history
web/update.html patch | blob | history
web/update.wml patch | blob | history

diff --git a/web/search.cgi b/web/search.cgi
index ff67109..7a54100 100755 (executable)
--- a/web/search.cgi
+++ b/web/search.cgi
@@ -1,6 +1,6 @@
 #!/usr/bin/perl
 
-# $Id: search.cgi,v 1.5 2000/01/11 05:43:18 tausq Exp $
+# $Id: search.cgi,v 1.6 2000/03/26 22:13:25 tausq Exp $
 # (c) 1999 Randolph Chung. Licensed under the GPL. <tausq@debian.org>
 
 use lib '.';
@@ -116,7 +116,7 @@ if (!$dosearch) {
     $data = $entries->{$dn};
 
     # These are local variables.. i have enough global vars as it is... <sigh>
-    my ($ufdn, $login, $name, $email, $fingerprint, $address, $latlong, $vacation, $created, $modified, $lastseen) = undef;
+    my ($ufdn, $login, $name, $icquin, $email, $fingerprint, $address, $latlong, $vacation, $created, $modified, $lastseen) = undef;
     
     $ufdn = $dn; # Net::LDAP does not have a dn2ufn function, but this is close enough :)
     
@@ -132,6 +132,11 @@ if (!$dosearch) {
       $email .= "<a href=\"mailto:$_\">$_</a>";
     }
 
+    # ICQ 
+    if ($data->{icquin}->[0]) {
+      $icquin = sprintf("<a href=\"http://wwp.icq.com/?icqnumber=%s\">%s</a>", $data->{icquin}->[0], $data->{icquin}->[0]);
+    }
+    
     # Format PGP/GPG key fingerprints
     my $fi;
     foreach (@{$data->{keyfingerprint}}) {
@@ -177,6 +182,9 @@ if (!$dosearch) {
     $outsub{searchresults} .= FormatEntry($dataspecref->{ircnick}, $data->{ircnick}->[0]);
     $outsub{searchresults} .= FormatEntry($dataspecref->{loginshell}, $data->{loginshell}->[0]);
     $outsub{searchresults} .= FormatEntry($dataspecref->{fingerprint}, $fingerprint);
+    if ($icquin) {
+      $outsub{searchresults} .= FormatEntry($dataspecref->{icquin}, $icquin);
+    }
     
     if ($auth) {
       # Some data should only be available to authorized users...
diff --git a/web/searchresults.html b/web/searchresults.html
index caa7903..990b5c1 100644 (file)
--- a/web/searchresults.html
+++ b/web/searchresults.html
@@ -9,7 +9,7 @@
 <META NAME="Language" CONTENT="English">
 <meta name="Author"    content="Debian Webmaster, webmaster@debian.org">
 <meta name="Generator" content="WML 1.7.2 (28-06-1999)">
-<meta name="Modified"  content="10-01-2000 21:51:34">
+<meta name="Modified"  content="26-03-2000 14:52:42">
 </HEAD>
 <BODY text="#000000" bgcolor="#FFFFFF" link="#0000FF" vlink="#800080" alink="#FF0000">
 <TABLE border="0" cellpadding="3" cellspacing="0" width="100%">
@@ -46,6 +46,7 @@
 <?searchresults
 (login, uid)
 (irc Nickname, ircnick)
+(ICQ UIN, icquin)
 (Preferred shell, loginshell)
 (e-mail forwarded to, email)
 (PGP/GPG fingerprint, fingerprint)
@@ -68,7 +69,7 @@ searchresults?>
 <P>Back to the <A href="http://www.debian.org/">Debian Project homepage</A>.
 <HR>
 <SMALL>You can contact us at <A href="mailto:admin@db.debian.org">admin@db.debian.org</A>.</SMALL><P>
-<SMALL>Last Modified: Tue, Jan 11 04:51:34 UTC 2000<BR>
+<SMALL>Last Modified: Sun, Mar 26 21:52:42 UTC 2000<BR>
 Copyright &copy; 1997-1999 <A href="http://www.spi-inc.org/">SPI</A>; See <A href="http://www.debian.org/license">license terms</A>
        
         </SMALL>
diff --git a/web/searchresults.wml b/web/searchresults.wml
index 2a1bff4..df85b76 100644 (file)
--- a/web/searchresults.wml
+++ b/web/searchresults.wml
@@ -15,6 +15,7 @@
 <?searchresults
 (login, uid)
 (irc Nickname, ircnick)
+(ICQ UIN, icquin)
 (Preferred shell, loginshell)
 (e-mail forwarded to, email)
 (PGP/GPG fingerprint, fingerprint)
diff --git a/web/update.cgi b/web/update.cgi
index 33fc9de..7dd4fc5 100755 (executable)
--- a/web/update.cgi
+++ b/web/update.cgi
@@ -1,6 +1,6 @@
 #!/usr/bin/perl
 
-# $Id: update.cgi,v 1.5 1999/12/13 04:56:48 tausq Exp $
+# $Id: update.cgi,v 1.6 2000/03/26 22:13:25 tausq Exp $
 # (c) 1999 Randolph Chung. Licensed under the GPL. <tausq@debian.org>
 
 use lib '.';
@@ -130,6 +130,7 @@ if (!($query->param('doupdate'))) {
   LDAPUpdate($ldap, $editdn, 'emailForward', $query->param('email'));
   LDAPUpdate($ldap, $editdn, 'privatesub', $query->param('privatesub'));
   LDAPUpdate($ldap, $editdn, 'ircNick', $query->param('ircnick'));
+  LDAPUpdate($ldap, $editdn, 'icquin', $query->param('icquin'));
   LDAPUpdate($ldap, $editdn, 'labeledUrl', $query->param('labeledurl'));
   LDAPUpdate($ldap, $editdn, 'onvacation', $query->param('onvacation'));
 
diff --git a/web/update.html b/web/update.html
index 2fbbaf2..1d8f5fa 100644 (file)
--- a/web/update.html
+++ b/web/update.html
@@ -8,8 +8,8 @@
 <META NAME="Keywords" CONTENT="debian, GNU, linux, unix, open source, free, DFSG ">
 <META NAME="Language" CONTENT="English">
 <meta name="Author"    content="Debian Webmaster, webmaster@debian.org">
-<meta name="Generator" content="WML 1.6.8 (12-01-1999)">
-<meta name="Modified"  content="14-02-2000 12:23:51">
+<meta name="Generator" content="WML 1.7.2 (28-06-1999)">
+<meta name="Modified"  content="26-03-2000 15:03:09">
 </HEAD>
 <BODY text="#000000" bgcolor="#FFFFFF" link="#0000FF" vlink="#800080" alink="#FF0000">
 <TABLE border="0" cellpadding="3" cellspacing="0" width="100%">
@@ -335,6 +335,11 @@
   </td><td>
     <input name="facsimiletelephonenumber" value="~facsimiletelephonenumber~" size="30">
   </td></tr>
+  <tr><td align="right">
+    <b>ICQ UIN:</b>
+  </td><td>
+    <input name="icquin" value="~icquin~" size="30">
+  </td></tr>
   <tr><td align="right">
     <b>Preferred shell:</b>
   </td><td>
@@ -379,7 +384,7 @@
 <P>Back to the <A href="http://www.debian.org/">Debian Project homepage</A>.
 <HR>
 <SMALL>You can contact us at <A href="mailto:admin@db.debian.org">admin@db.debian.org</A>.</SMALL><P>
-<SMALL>Last Modified: Mon, Feb 14 19:23:51 UTC 2000<BR>
+<SMALL>Last Modified: Sun, Mar 26 22:03:09 UTC 2000<BR>
 Copyright &copy; 1997-1999 <A href="http://www.spi-inc.org/">SPI</A>; See <A href="http://www.debian.org/license">license terms</A>
        
         </SMALL>
diff --git a/web/update.wml b/web/update.wml
index 128a5b4..cbe3277 100644 (file)
--- a/web/update.wml
+++ b/web/update.wml
@@ -313,6 +313,12 @@
     <input name=facsimiletelephonenumber value="~facsimiletelephonenumber~" size=30>
   </td></tr>
 
+  <tr><td align=right>
+    <b>ICQ UIN:</b>
+  </td><td>
+    <input name=icquin value="~icquin~" size=30>
+  </td></tr>
+
   <tr><td align=right>
     <b>Preferred shell:</b>
   </td><td>
Mirror of Debian's userdir-ldap repository