2 /***************************************************************************
3 * Copyright (C) 2003-2008 Polytechnique.org *
4 * http://opensource.polytechnique.org/ *
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. *
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. *
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 *
19 * 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA *
20 ***************************************************************************/
22 require_once('xorg.misc.inc.php');
23 require_once('user.func.inc.php');
25 class VCardIterator
implements PlIterator
27 private $user_list = array();
29 private $freetext = null
;
30 private $photos = true
;
32 public function __construct($photos, $freetext)
34 $this->freetext
= $freetext;
35 $this->photos
= $photos;
38 public function add_user($user)
40 $forlife = get_user_forlife($user, '_silent_user_callback');
42 $this->user_list
[] = get_user_forlife($user);
47 public function first()
49 return count($this->user_list
) == $this->count
- 1;
52 public function last()
54 return count($this->user_list
) == 0;
57 public function total()
62 public function next()
64 if (!$this->user_list
) {
68 $login = array_shift($this->user_list
);
69 $user = get_user_details($login);
71 if (strlen(trim($user['freetext']))) {
72 $user['freetext'] = pl_entity_decode($user['freetext']);
74 if ($this->freetext
) {
75 if (strlen(trim($user['freetext']))) {
76 $user['freetext'] = $this->freetext
. "\n" . $user['freetext'];
78 $user['freetext'] = $this->freetext
;
86 INNER JOIN virtual_redirect USING(vid)
87 INNER JOIN auth_user_quick ON ( user_id = {?} AND emails_alias_pub = 'public' )
88 WHERE ( redirect={?} OR redirect={?} )
89 AND alias LIKE '%@{$globals->mail->alias_dom}'",
91 $user['forlife'].'@'.$globals->mail
->domain
,
92 $user['forlife'].'@'.$globals->mail
->domain2
);
94 $user['virtualalias'] = $res->fetchOneCell();
95 $user['gpxs_vcardjoin'] = join(',', array_map(array('VCard', 'text_encode'), $user['gpxs_name']));
96 $user['binets_vcardjoin'] = join(',', array_map(array('VCard', 'text_encode'), $user['binets']));
100 "SELECT attach, attachmime
102 INNER JOIN aliases AS a ON (a.id = p.uid AND a.type = 'a_vie')
103 WHERE a.alias = {?}", $login);
104 if ($res->numRows()) {
105 $user['photo'] = $res->fetchOneAssoc();
114 static private $windows = false
;
115 private $iterator = null
;
117 public function __construct($users, $photos = true
, $freetext = null
)
119 $this->iterator
= new VCardIterator($photos, $freetext);
120 VCard
::$windows = (strpos($_SERVER['HTTP_USER_AGENT'], 'Windows') !== false
);
121 if (is_array($users)) {
122 foreach ($users as $user) {
123 $this->iterator
->add_user($user);
126 $this->iterator
->add_user($users);
130 public static function escape($text)
132 if (VCard
::$windows) {
133 return str_replace(';', '\\\\;', $text);
135 return str_replace(array(';', ','), array('\\\\;', '\\\\,'), $text);
139 public static function format_adr($params, &$smarty)
141 // $adr1, $adr2, $adr3, $postcode, $city, $region, $country
142 extract($params['adr']);
144 $adr = trim("$adr\n$adr2");
145 $adr = trim("$adr\n$adr3");
146 return VCard
::text_encode(';;'
147 . (VCard
::$windows ? VCard
::escape($adr) : $adr) . ';'
148 . (VCard
::$windows ? VCard
::escape($city) : $city) . ';'
149 . (VCard
::$windows ? VCard
::escape($region) : $region) . ';'
150 . (VCard
::$windows ? VCard
::escape($postcode) : $postcode) . ';'
151 . (VCard
::$windows ? VCard
::escape($country) : $country), false
);
154 public static function text_encode($text, $escape = true
)
156 if (is_array($text)) {
157 return implode(',', array_map(array('VCard', 'text_encode'), $text));
160 $text = VCard
::escape($text);
162 if (VCard
::$windows) {
163 $text = utf8_decode($text);
165 return str_replace(array("\r\n", "\n", "\r"), '\n', $text);
168 public function do_page(&$page)
170 $page->changeTpl('core/vcard.tpl', NO_SKIN
);
171 $page->register_modifier('vcard_enc', array($this, 'text_encode'));
172 $page->register_function('format_adr', array($this, 'format_adr'));
173 $page->assign_by_ref('users', $this->iterator
);
176 header("Cache-Control: ");
177 header("Content-type: text/x-vcard; charset=UTF-8");
181 // vim:set et sw=4 sts=4 sws=4 foldmethod=marker enc=utf-8: