Quick fix for vcards: this is far from perfect, but at least it works.
[platal.git] / include / vcard.inc.php
CommitLineData
89460d9c 1<?php
2/***************************************************************************
9f5bd98e 3 * Copyright (C) 2003-2010 Polytechnique.org *
89460d9c 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
5d42c993 22class VCard extends PlVCard
89460d9c 23{
6713fc49 24 private $profile_list = array();
29b12e6e 25 private $count = 0;
26 private $freetext = null;
27 private $photos = true;
89460d9c 28
5d42c993 29 public function __construct($photos = true, $freetext = null)
89460d9c 30 {
5d42c993 31 PlVCard::$folding = false;
29b12e6e 32 $this->freetext = $freetext;
33 $this->photos = $photos;
89460d9c 34 }
35
6713fc49 36 public function addProfile($profile)
89460d9c 37 {
6713fc49
RB
38 $profile = Profile::get($profile);
39 if ($profile) {
40 $this->profile_list[] = $profile;
3ce06e37
FB
41 $this->count++;
42 }
89460d9c 43 }
44
6713fc49
RB
45 public function addProfiles(array $profiles) {
46 foreach ($profiles as $profile) {
47 $this->addProfile($profile);
5d42c993 48 }
89460d9c 49 }
50
5d42c993 51 protected function fetch()
89460d9c 52 {
6713fc49 53 return PlIteratorUtils::fromArray($this->profile_list);
29b12e6e 54 }
89460d9c 55
6713fc49 56 protected function buildEntry($pf)
29b12e6e 57 {
29b12e6e 58 global $globals;
3e6cd673 59 $pf = $pf['value'];
89460d9c 60
3e6cd673 61 $entry = new PlVCardEntry($pf->firstNames(), $pf->lastNames(), null, null, $pf->nickname);
6713fc49
RB
62
63 $user = $pf->owner();
5d42c993
FB
64
65 // Free text
6713fc49 66 $freetext = '(' . $pf->promo . ')';
29b12e6e 67 if ($this->freetext) {
5d42c993
FB
68 $freetext .= "\n" . $this->freetext;
69 }
5d42c993 70 $entry->set('NOTE', $freetext);
5d42c993 71 // Mobile
6713fc49
RB
72 if (!empty($pf->mobile)) {
73 $entry->addTel(null, $pf->mobile, false, true, true, false, true, true);
5d42c993
FB
74 }
75
76 // Emails
6713fc49
RB
77 if (!is_null($user)) {
78 $entry->addMail(null, $user->bestalias, true);
79 $entry->addMail(null, $user->bestalias_alternate);
80 if ($user->forlife != $user->bestalias) {
81 $entry->addMail(null, $user->forlife);
82 $entry->addMail(null, $user->forlife_alternate);
83 }
5d42c993
FB
84 }
85
86 // Homes
598c57f6 87 $adrs = $pf->iterAddresses(Profile::ADDRESS_PERSO);
6713fc49
RB
88 while ($adr = $adrs->next()) {
89 // TODO : find a way to fetch only the "street" part of the address
3e6cd673
FB
90 $group = $entry->addHome($adr->text, null, null, $adr->postalCode,
91 $adr->locality, $adr->administrativeArea, $adr->country,
92 $adr->hasFlag('current'), $adr->hasFlag('mail'), $adr->hasFlag('mail'));
93 foreach ($adr->phones() as $phone) {
94 if ($phone->type == Phone::TYPE_FIXED) {
95 $entry->addTel($group, $phone->display, false, true, true, false, false,
96 $adr->hasFlag('current') && empty($pf->mobile));
97 } else if ($phone->type == Phone::TYPE_FAX) {
98 $entry->addTel($group, $phone->display, true, false, false, false, false, false);
99 }
5d42c993
FB
100 }
101 }
102
103 // Pro
598c57f6 104 $adrs = $pf->iterAddresses(Profile::ADDRESS_PRO);
6713fc49
RB
105 while ($adr = $adrs->next()) {
106 // TODO : link address to company
107 $group = $entry->addWork(null, null, null, null,
3e6cd673
FB
108 $adr->text, null, null, $adr->postalCode,
109 $adr->locality, $adr->administrativeArea, $adr->country);
110 foreach ($adr->phones() as $phone) {
111 if ($phone->type == Phone::TYPE_FIXED) {
112 $entry->addTel($group, $phone->display);
113 } else if ($phone->type == Phone::TYPE_FAX) {
114 $entry->addTel($group, $phone->display, true);
a86b9767 115 }
3e6cd673 116 }
89460d9c 117 }
118
5d42c993 119 // Melix
6713fc49
RB
120 if (!is_null($user)) {
121 $alias = $user->emailAlias();
122 if (!is_null($alias)) {
123 $entry->addMail(null, $alias);
124 }
5d42c993
FB
125 }
126
127 // Custom fields
6713fc49
RB
128 if (!is_null($user)) {
129 $groups = $user->groups();
130 if (count($groups)) {
2998edf1 131 $gn = DirEnum::getOptions(DirEnum::GROUPESX);
6713fc49
RB
132 $gns = array();
133 foreach (array_keys($groups) as $gid) {
134 $gns[$gid] = $gn[$gid];
135 }
136 $entry->set('X-GROUPS', join(', ', $gns));
137 }
5d42c993 138 }
6713fc49
RB
139
140 $binets = $pf->getBinets();
141
142 if (count($binets)) {
2998edf1 143 $bn = DirEnum::getOptions(DirEnum::BINETS);
6713fc49
RB
144 $bns = array();
145 foreach ($binets as $bid) {
146 $bns[$bid] = $bn[$bid];
147 }
3e6cd673 148 $entry->set('X-BINETS', join(', ', $bns));
5d42c993 149 }
6713fc49 150 if (!empty($pf->section)) {
2998edf1 151 $sections = DirEnum::getOptions(DirEnum::SECTIONS);
6713fc49 152 $entry->set('X-SECTION', $sections[$pf->section]);
5d42c993 153 }
eaf30d86 154
5d42c993 155 // Photo
917c4d11 156 if ($this->photos) {
157 $res = XDB::query(
a104d709 158 "SELECT attach, attachmime
3e6cd673
FB
159 FROM profile_photos AS p
160 WHERE p.pid = {?}", $pf->id());
917c4d11 161 if ($res->numRows()) {
5d42c993
FB
162 list($data, $type) = $res->fetchOneRow();
163 $entry->setPhoto($data, strtoupper($type));
29b12e6e 164 }
29b12e6e 165 }
5d42c993 166 return $entry;
89460d9c 167 }
89460d9c 168}
169
a7de4ef7 170// vim:set et sw=4 sts=4 sws=4 foldmethod=marker enc=utf-8:
89460d9c 171?>