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         $this->user_list[] = get_user_forlife($user);
  40         $this->count++;
  41     }
  42
  43     public function first()
  44     {
  45         return count($this->user_list) == $this->count - 1;
  46     }
  47
  48     public function last()
  49     {
  50         return count($this->user_list) == 0;
  51     }
  52
  53     public function total()
  54     {
  55         return $this->count;
  56     }
  57
  58     public function next()
  59     {
  60         if (!$this->user_list) {
  61             return null;
  62         }
  63         global $globals;
  64         $login = array_shift($this->user_list);
  65         $user  = get_user_details($login);
  66
  67         if (strlen(trim($user['freetext']))) {
  68             $user['freetext'] = pl_entity_decode($user['freetext']);
  69         }
  70         if ($this->freetext) {
  71             if (strlen(trim($user['freetext']))) {
  72                 $user['freetext'] = $this->freetext . "\n" . $user['freetext'];
  73             } else {
  74                 $user['freetext'] = $this->freetext;
  75             }
  76         }
  77
  78         // alias virtual
  79         $res = XDB::query(
  80                 "SELECT alias
  81                    FROM virtual
  82              INNER JOIN virtual_redirect USING(vid)
  83              INNER JOIN auth_user_quick  ON ( user_id = {?} AND emails_alias_pub = 'public' )
  84                   WHERE ( redirect={?} OR redirect={?} )
  85                         AND alias LIKE '%@{$globals->mail->alias_dom}'",
  86                 $user['user_id'],
  87                 $user['forlife'].'@'.$globals->mail->domain,
  88                 $user['forlife'].'@'.$globals->mail->domain2);
  89
  90         $user['virtualalias'] = $res->fetchOneCell();
  91         $user['gpxs_vcardjoin'] = join(',', array_map(array('VCard', 'text_encode'), $user['gpxs_name']));
  92         $user['binets_vcardjoin'] = join(',', array_map(array('VCard', 'text_encode'), $user['binets']));
  93         // get photo
  94         if ($this->photos) {
  95             $res = XDB::query(
  96                     "SELECT attach, attachmime
  97                        FROM photo   AS p
  98                  INNER JOIN aliases AS a ON (a.id = p.uid AND a.type = 'a_vie')
  99                       WHERE a.alias = {?}", $login);
 100             if ($res->numRows()) {
 101                 $user['photo'] = $res->fetchOneAssoc();
 102             }
 103         }
 104         return $user;
 105     }
 106 }
 107
 108 class VCard
 109 {
 110     static private $windows = false;
 111     private $iterator = null;
 112
 113     public function __construct($users, $photos = true, $freetext = null)
 114     {
 115         $this->iterator = new VCardIterator($photos, $freetext);
 116         VCard::$windows  = (strpos($_SERVER['HTTP_USER_AGENT'], 'Windows') !== false);
 117         if (is_array($users)) {
 118             foreach ($users as $user) {
 119                 $this->iterator->add_user($user);
 120             }
 121         } else {
 122             $this->iterator->add_user($users);
 123         }
 124     }
 125
 126     public static function escape($text)
 127     {
 128         if (VCard::$windows) {
 129             return str_replace(';', '\\\\;', $text);
 130         } else {
 131             return str_replace(array(';', ','), array('\\\\;', '\\\\,'), $text);
 132         }
 133     }
 134
 135     public static function format_adr($params, &$smarty)
 136     {
 137         // $adr1, $adr2, $adr3, $postcode, $city, $region, $country
 138         extract($params['adr']);
 139         $adr = trim($adr1);
 140         $adr = trim("$adr\n$adr2");
 141         $adr = trim("$adr\n$adr3");
 142         return VCard::text_encode(';;'
 143                 . (VCard::$windows ? VCard::escape($adr) : $adr) . ';'
 144                 . (VCard::$windows ? VCard::escape($city) : $city) . ';'
 145                 . (VCard::$windows ? VCard::escape($region) : $region) . ';'
 146                 . (VCard::$windows ? VCard::escape($postcode) : $postcode) . ';'
 147                 . (VCard::$windows ? VCard::escape($country) : $country), false);
 148     }
 149
 150     public static function text_encode($text, $escape = true)
 151     {
 152         if (is_array($text)) {
 153             return implode(',', array_map(array('VCard', 'text_encode'), $text));
 154         }
 155         if ($escape) {
 156             $text = VCard::escape($text);
 157         }
 158         if (VCard::$windows) {
 159             $text = utf8_decode($text);
 160         }
 161         return str_replace(array("\r\n", "\n", "\r"), '\n', $text);
 162     }
 163
 164     public function do_page(&$page)
 165     {
 166         $page->changeTpl('core/vcard.tpl', NO_SKIN);
 167         $page->register_modifier('vcard_enc',  array($this, 'text_encode'));
 168         $page->register_function('format_adr', array($this, 'format_adr'));
 169         $page->assign_by_ref('users', $this->iterator);
 170
 171         header("Pragma: ");
 172         header("Cache-Control: ");
 173         header("Content-type: text/x-vcard; charset=UTF-8");
 174         header("Content-Transfer-Encoding: 8bit");
 175   }
 176 }
 177
 178 // vim:set et sw=4 sts=4 sws=4 foldmethod=marker enc=utf-8:
 179 ?>