finally. real code. no. not real code. some convert tool even not finished.

will output .vcard address card files in the data directory (own direcoty later)

second small step to get cool vcard features into SM core.
to be continued (and finalized hopefully to end of feb 2003)

getting some sleep. (5am now)

git-svn-id: https://svn.code.sf.net/p/squirrelmail/code/trunk/squirrelmail@4440 7612ce4b-ef26-0410-bec9-ea0150e637f0

diff --git a/src/abook2vcard.php b/src/abook2vcard.php
new file mode 100644 (file)
index 0000000..a9d6567
--- /dev/null
+++ b/src/abook2vcard.php
@@ -0,0 +1,49 @@
+<?php
+
+/**
+ * read_body.php
+ *
+ * Copyright (c) 1999-2003 The SquirrelMail Project Team
+ * Licensed under the GNU GPL. For full terms see the file COPYING.
+ *
+ * This file is used for reading the msgs array and displaying
+ * the resulting emails in the right frame.
+ *
+ * $Id$
+ */
+
+/* Path for SquirrelMail required files. */
+define('SM_PATH','../');
+
+/* SquirrelMail required files. */
+require_once(SM_PATH . 'include/validate.php');
+require_once(SM_PATH . 'functions/strings.php');
+require_once(SM_PATH . 'functions/prefs.php');
+require_once(SM_PATH . 'config/config.php');
+
+$abook_file=$data_dir.$username.".abook";
+$vcard_dir=$data_dir.$username."/";
+
+$fp = fopen ($abook_file,"r");
+while (!feof ($fp)) {
+    $buffer .= fgets($fp, 4096);
+}
+
+fclose ($fp);
+
+$abook=explode("|",$buffer);
+print_r($abook);
+echo "<p>".$buffer;
+
+while ( list($nick,$email,$fn,$ln,$email)=each($abook) ) {
+echo "
+BEGIN:VCARD
+VERSION:3.0
+N:$ln;$fn;
+NICKNAME:$nick
+EMAIL;INTERNET:$email
+END:VCARD<P>
+";
+}
+
+?>