change to db-open flags

[citadel.git] / ctdlphp / myinfo.php

diff --git a/ctdlphp/myinfo.php b/ctdlphp/myinfo.php
index a473318f6b23e8ca45303c41df75a3868d3a01f0..0328da71b0f1a4b20e99c88b0f02e1497d45614b 100644 (file)
--- a/ctdlphp/myinfo.php
+++ b/ctdlphp/myinfo.php
@@ -1,52 +1,95 @@
 <?PHP
+$vcard="";
+include "ctdlheader.php";
+bbs_page_header();
 
-       include "ctdlheader.php";
-       bbs_page_header();
+echo   "This is an example of the use of " .
+"ctdl_get_registration_info() to display " .
+"your personal data.<BR><BR>\n" ;
 
-       echo    "This is an example of the use of " .
-               "ctdl_get_registration_info() to display " .
-               "your personal data.<BR><BR>\n" ;
+echo   "<TABLE border=1>" .
+"<TR>" .
+"<TD><B>User</B></TD>" .
+"<TD><B>Room</B></TD>" .
+"<TD><B>Host</B></TD>" .
+"</TR>" ;
 
-       echo    "<TABLE border=1>" .
-               "<TR>" .
-               "<TD><B>User</B></TD>" .
-               "<TD><B>Room</B></TD>" .
-               "<TD><B>Host</B></TD>" .
-               "</TR>" ;
+ctdl_goto("My Citadel Config");
+list($num_msgs, $response, $msgs) = ctdl_msgs("", "");
 
-        ctdl_goto("My Citadel Config");
-       list($num_msgs, $response, $msgs) = ctdl_msgs($_REQUEST["mode"],
-                                                       $_REQUEST["count"] );
+echo "num_msgs: " . $num_msgs . "<BR>\n" ;
+echo "response: " . htmlspecialchars($response) . "<BR>\n" ;
+$Webcit_Preferences = array();
+$Webcit_PrefMsgid = 0;
+if ($num_msgs > 0) foreach ($msgs as $msgnum) {
+       print_r($msgnum);
 
-       echo "num_msgs: " . $num_msgs . "<BR>\n" ;
-       echo "response: " . htmlspecialchars($response) . "<BR>\n" ;
+       // Fetch the message from the server
+       list($ok, $response, $fields) = ctdl_fetch_message($msgnum);
 
-        if ($num_msgs > 0) foreach ($msgs as $msgnum) {
-               print_r($msgnum);
-               $result = get_message_partlist($msgnum);
-               if (is_array($result) &&
-                   ($result[4]=="text/vcard"))
-               {
-                       $vcard = downoad_attachment($msgnum, $result[2]);
+       // Bail out gracefully if the message isn't there.
+       if (!$ok) {
+               echo "Error: " . htmlspecialchars($response) . "<BR>" ;
+               return false;
+       }
+       if (isset($fields['part']))
+       {
+               $parts = explode('|', $fields['part']);
+               print_r($parts);
+               if ($parts[4]=="text/x-vcard")
+                       list($size, $vcard) = download_attachment($msgnum, $result[2]);
+               else
+                       ctdl_dele($msgnum);
+       }
+       else if ($fields['subj'] == "__ WebCit Preferences __")
+       {
+               $Webcit_PrefMsgid = $msgnum;
+               $Webcit_Preferences = $fields;
+       } 
+}
 
+echo "</TABLE>\n--------------------------------------- <pre>\n". $vcard."</pre>";
 
-               }
-       }
+echo "putting it back in!";
+
+$vcard = 
+"begin:vcard
+n:Surename;CName;mitte;Mrs;IV
+title:master
+fn:CName Surename
+org:citadel.org
+adr:blarg;Road To nowhere ;10;Metropolis;NRW;12345;Country
+tel;home:888888888
+tel;work:99999999999
+email;internet:user@samplecitadel.org
+email;internet:me@samplecitadel.org
+email;internet:myself@samplecitadel.org
+email;internet:i@samplecitadel.org
+FBURL;PREF:http://samplecitadel.org/Cname_Lastname.vfb
+UID:Citadel vCard: personal card for Cname Lastname at samplecitadel.org
+end:vcard
+";
+preg_replace('/Sir/', 'Mrs',$vcard);
+echo "Now its: <pre>\n".$vcard."</pre>";
+$entarray=array();
+$entarray['post']=1;
+$entarray['format_type']=FMT_RFC822;
+enter_message_0($entarray, "text/x-vcard; charset=UTF-8", $vcard);
 
-///phpinfo();
-///    list($num_users, $wholist) =
-// ctdl_get_registration_info();
-/*
-       if ($num_users > 0) foreach ($wholist as $x) {
-               echo "<TR>";
-               echo "<TD>", htmlspecialchars($x["user"]), "</TD>";
-               echo "<TD>", htmlspecialchars($x["room"]), "</TD>";
-               echo "<TD>", htmlspecialchars($x["host"]), "</TD>";
-               echo "</TR>\n";
-       }
-*/
-       echo "</TABLE>\n";
 
+if ($Webcit_PrefMsgid != '0')
+{
+       ctdl_dele($Webcit_PrefMsgid);
+       
+       $entarray=array();
+       $entarray['post']=1;
+       $entarray['format_type']=FMT_FIXED;
+       $entarray['subject'] = $Webcit_Preferences['subj'];
+       $entarray['anon_flag'] = '0';
+       enter_message_0($entarray,
+                       "", 
+                       "somevar|somevalue\r\n".$Webcit_Preferences['text']);
+}
 ?>
 
 <BR>Sample links<BR>