include/vcard.inc.php

   1 <?php
   2 /***************************************************************************
   3  *  Copyright (C) 2003-2008 Polytechnique.org                              *
   4  *  http://opensource.polytechnique.org/                                   *
   5  *                                                                         *
   6  *  This program is free software; you can redistribute it and/or modify   *
   7  *  it under the terms of the GNU General Public License as published by   *
   8  *  the Free Software Foundation; either version 2 of the License, or      *
   9  *  (at your option) any later version.                                    *
  10  *                                                                         *
  11  *  This program is distributed in the hope that it will be useful,        *
  12  *  but WITHOUT ANY WARRANTY; without even the implied warranty of         *
  13  *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the          *
  14  *  GNU General Public License for more details.                           *
  15  *                                                                         *
  16  *  You should have received a copy of the GNU General Public License      *
  17  *  along with this program; if not, write to the Free Software            *
  18  *  Foundation, Inc.,                                                      *
  19  *  59 Temple Place, Suite 330, Boston, MA  02111-1307  USA                *
  20  ***************************************************************************/
  21
  22 require_once('user.func.inc.php');
  23
  24 class VCardIterator implements PlIterator
  25 {
  26     private $user_list = array();
  27     private $count     = 0;
  28     private $freetext  = null;
  29     private $photos    = true;
  30
  31     public function __construct($photos, $freetext)
  32     {
  33         $this->freetext = $freetext;
  34         $this->photos   = $photos;
  35     }
  36
  37     public function add_user($user)
  38     {
  39         $forlife = get_user_forlife($user, '_silent_user_callback');
  40         if ($forlife) {
  41             $this->user_list[] = get_user_forlife($user);
  42             $this->count++;
  43         }
  44     }
  45
  46     public function first()
  47     {
  48         return count($this->user_list) == $this->count - 1;
  49     }
  50
  51     public function last()
  52     {
  53         return count($this->user_list) == 0;
  54     }
  55
  56     public function total()
  57     {
  58         return $this->count;
  59     }
  60
  61     public function next()
  62     {
  63         if (!$this->user_list) {
  64             return null;
  65         }
  66         global $globals;
  67         $login = array_shift($this->user_list);
  68         $user  = get_user_details($login);
  69
  70         if (strlen(trim($user['freetext']))) {
  71             $user['freetext'] = pl_entity_decode($user['freetext']);
  72         }
  73         if ($this->freetext) {
  74             if (strlen(trim($user['freetext']))) {
  75                 $user['freetext'] = $this->freetext . "\n" . $user['freetext'];
  76             } else {
  77                 $user['freetext'] = $this->freetext;
  78             }
  79         }
  80
  81         // alias virtual
  82         $res = XDB::query(
  83                 "SELECT alias
  84                    FROM virtual
  85              INNER JOIN virtual_redirect USING(vid)
  86              INNER JOIN auth_user_quick  ON ( user_id = {?} AND emails_alias_pub = 'public' )
  87                   WHERE ( redirect={?} OR redirect={?} )
  88                         AND alias LIKE '%@{$globals->mail->alias_dom}'",
  89                 $user['user_id'],
  90                 $user['forlife'].'@'.$globals->mail->domain,
  91                 $user['forlife'].'@'.$globals->mail->domain2);
  92
  93         $user['virtualalias'] = $res->fetchOneCell();
  94         $user['gpxs_vcardjoin'] = join(', ', array_map(array('VCard', 'text_encode'), $user['gpxs_name']));
  95         $user['binets_vcardjoin'] = join(', ', array_map(array('VCard', 'text_encode'), $user['binets']));
  96         // get photo
  97         if ($this->photos) {
  98             $res = XDB::query(
  99                     "SELECT attach, attachmime
 100                        FROM photo   AS p
 101                  INNER JOIN aliases AS a ON (a.id = p.uid AND a.type = 'a_vie')
 102                       WHERE a.alias = {?}", $login);
 103             if ($res->numRows()) {
 104                 $user['photo'] = $res->fetchOneAssoc();
 105             }
 106         }
 107         return $user;
 108     }
 109 }
 110
 111 class VCard
 112 {
 113     static private $windows = false;
 114     private $iterator = null;
 115
 116     public function __construct($users, $photos = true, $freetext = null)
 117     {
 118         $this->iterator = new VCardIterator($photos, $freetext);
 119         VCard::$windows  = (strpos($_SERVER['HTTP_USER_AGENT'], 'Windows') !== false);
 120         if (is_array($users)) {
 121             foreach ($users as $user) {
 122                 $this->iterator->add_user($user);
 123             }
 124         } else {
 125             $this->iterator->add_user($users);
 126         }
 127     }
 128
 129     public static function escape($text)
 130     {
 131         if (VCard::$windows) {
 132             return str_replace(';', '\\\\;', $text);
 133         } else {
 134             return str_replace(array(';', ','), array('\\\\;', '\\\\,'), $text);
 135         }
 136     }
 137
 138     public static function format_adr($params, &$smarty)
 139     {
 140         // $adr1, $adr2, $adr3, $postcode, $city, $region, $country
 141         extract($params['adr']);
 142         $adr = trim($adr1);
 143         $adr = trim("$adr\n$adr2");
 144         $adr = trim("$adr\n$adr3");
 145         return VCard::text_encode(';;'
 146                 . (VCard::$windows ? VCard::escape($adr) : $adr) . ';'
 147                 . (VCard::$windows ? VCard::escape($city) : $city) . ';'
 148                 . (VCard::$windows ? VCard::escape($region) : $region) . ';'
 149                 . (VCard::$windows ? VCard::escape($postcode) : $postcode) . ';'
 150                 . (VCard::$windows ? VCard::escape($country) : $country), false);
 151     }
 152
 153     public static function text_encode($text, $escape = true)
 154     {
 155         if (is_array($text)) {
 156             return implode(',', array_map(array('VCard', 'text_encode'), $text));
 157         }
 158         if ($escape) {
 159             $text = VCard::escape($text);
 160         }
 161         if (VCard::$windows) {
 162             $text = utf8_decode($text);
 163         }
 164         return str_replace(array("\r\n", "\n", "\r"), '\n', $text);
 165     }
 166
 167     public function do_page(&$page)
 168     {
 169         $page->changeTpl('core/vcard.tpl', NO_SKIN);
 170         $page->register_modifier('vcard_enc',  array($this, 'text_encode'));
 171         $page->register_function('format_adr', array($this, 'format_adr'));
 172         $page->assign_by_ref('users', $this->iterator);
 173
 174         header("Pragma: ");
 175         header("Cache-Control: ");
 176         header("Content-type: text/x-vcard; charset=UTF-8");
 177   }
 178 }
 179
 180 // vim:set et sw=4 sts=4 sws=4 foldmethod=marker enc=utf-8:
 181 ?>