6 * @copyright © 1999-2005 The SquirrelMail Project Team
7 * @license http://opensource.org/licenses/gpl-license.php GNU Public License
9 * @package squirrelmail
10 * @subpackage addressbook
14 * Backend for address book as a pipe separated file
16 * Stores the address book in a local file
18 * An array with the following elements must be passed to
19 * the class constructor (elements marked ? are optional):
21 * filename => path to addressbook file
22 * ? create => if true: file is created if it does not exist.
23 * ? umask => umask set before opening file.
24 * ? name => name of address book.
25 * ? detect_writeable => detect address book access permissions by
26 * checking file permissions.
27 * ? writeable => allow writing into address book. Used only when
28 * detect_writeable is set to false.
29 * ? listing => enable/disable listing
31 * NOTE. This class should not be used directly. Use the
32 * "AddressBook" class instead.
33 * @package squirrelmail
35 class abook_local_file
extends addressbook_backend
{
45 var $bname = 'local_file';
48 * File used to store data
58 * Create file, if it not present
63 * Detect, if address book is writeable by checking file permisions
66 var $detect_writeable = true;
68 * Control write access to address book
70 * Option does not have any effect, if 'detect_writeable' is 'true'
73 var $writeable = false;
75 * controls listing of address book
85 /* ========================== Private ======================= */
89 * @param array $param backend options
92 function abook_local_file($param) {
93 $this->sname
= _("Personal address book");
94 $this->umask
= Umask();
96 if(is_array($param)) {
97 if(empty($param['filename'])) {
98 return $this->set_error('Invalid parameters');
100 if(!is_string($param['filename'])) {
101 return $this->set_error($param['filename'] . ': '.
102 _("Not a file name"));
105 $this->filename
= $param['filename'];
107 if(isset($param['create'])) {
108 $this->create
= $param['create'];
110 if(isset($param['umask'])) {
111 $this->umask
= $param['umask'];
113 if(isset($param['name'])) {
114 $this->sname
= $param['name'];
116 if(isset($param['detect_writeable'])) {
117 $this->detect_writeable
= $param['detect_writeable'];
119 if(!empty($param['writeable'])) {
120 $this->writeable
= $param['writeable'];
122 if(isset($param['listing'])) {
123 $this->listing
= $param['listing'];
128 $this->set_error('Invalid argument to constructor');
133 * Open the addressbook file and store the file pointer.
134 * Use $file as the file to open, or the class' own
135 * filename property. If $param is empty and file is
137 * @param bool $new is file already opened
140 function open($new = false) {
142 $file = $this->filename
;
143 $create = $this->create
;
144 $fopenmode = (($this->writeable
&& is_writable($file)) ?
'a+' : 'r');
146 /* Return true is file is open and $new is unset */
147 if($this->filehandle
&& !$new) {
151 /* Check that new file exitsts */
152 if((!(file_exists($file) && is_readable($file))) && !$create) {
153 return $this->set_error("$file: " . _("No such file or directory"));
156 /* Close old file, if any */
157 if($this->filehandle
) { $this->close(); }
160 if (! $this->detect_writeable
) {
161 $fh = @fopen
($file,$fopenmode);
163 $this->filehandle
= &$fh;
164 $this->filename
= $file;
166 return $this->set_error("$file: " . _("Open failed"));
169 /* Open file. First try to open for reading and writing,
170 * but fall back to read only. */
171 $fh = @fopen
($file, 'a+');
173 $this->filehandle
= &$fh;
174 $this->filename
= $file;
175 $this->writeable
= true;
177 $fh = @fopen
($file, 'r');
179 $this->filehandle
= &$fh;
180 $this->filename
= $file;
181 $this->writeable
= false;
183 return $this->set_error("$file: " . _("Open failed"));
190 /** Close the file and forget the filehandle */
192 @fclose
($this->filehandle
);
193 $this->filehandle
= 0;
194 $this->filename
= '';
195 $this->writable
= false;
198 /** Lock the datafile - try 20 times in 5 seconds */
200 for($i = 0 ; $i < 20 ; $i++
) {
201 if(flock($this->filehandle
, 2 +
4))
209 /** Unlock the datafile */
211 return flock($this->filehandle
, 3);
215 * Overwrite the file with data from $rows
216 * NOTE! Previous locks are broken by this function
217 * @param array $rows new data
220 function overwrite(&$rows) {
222 $newfh = @fopen
($this->filename
.'.tmp', 'w');
225 return $this->set_error($this->filename
. '.tmp:' . _("Open failed"));
228 for($i = 0, $cnt=sizeof($rows) ; $i < $cnt ; $i++
) {
229 if(is_array($rows[$i])) {
230 for($j = 0, $cnt_part=count($rows[$i]) ; $j < $cnt_part ; $j++
) {
231 $rows[$i][$j] = $this->quotevalue($rows[$i][$j]);
233 $tmpwrite = sq_fwrite($newfh, join('|', $rows[$i]) . "\n");
234 if ($tmpwrite === FALSE) {
235 return $this->set_error($this->filename
. '.tmp:' . _("Write failed"));
241 if (!@copy
($this->filename
. '.tmp' , $this->filename
)) {
242 return $this->set_error($this->filename
. ':' . _("Unable to update"));
244 @unlink
($this->filename
. '.tmp');
250 /* ========================== Public ======================== */
254 * @param string $expr search expression
255 * @return array search results
257 function search($expr) {
259 /* To be replaced by advanded search expression parsing */
260 if(is_array($expr)) { return; }
262 // don't allow wide search when listing is disabled.
263 if ($expr=='*' && ! $this->listing
)
266 /* Make regexp from glob'ed expression
267 * May want to quote other special characters like (, ), -, [, ], etc. */
268 $expr = str_replace('?', '.', $expr);
269 $expr = str_replace('*', '.*', $expr);
275 @rewind
($this->filehandle
);
277 while ($row = @fgetcsv
($this->filehandle
, 2048, '|')) {
278 $line = join(' ', $row);
279 if(eregi($expr, $line)) {
280 array_push($res, array('nickname' => $row[0],
281 'name' => $row[1] . ' ' . $row[2],
282 'firstname' => $row[1],
283 'lastname' => $row[2],
286 'backend' => $this->bnum
,
287 'source' => &$this->sname
));
296 * @param string $alias alias
297 * @return array search results
299 function lookup($alias) {
304 $alias = strtolower($alias);
307 @rewind
($this->filehandle
);
309 while ($row = @fgetcsv
($this->filehandle
, 2048, '|')) {
310 if(strtolower($row[0]) == $alias) {
311 return array('nickname' => $row[0],
312 'name' => $row[1] . ' ' . $row[2],
313 'firstname' => $row[1],
314 'lastname' => $row[2],
317 'backend' => $this->bnum
,
318 'source' => &$this->sname
);
327 * @return array list of all addresses
329 function list_addr() {
332 if(isset($this->listing
) && !$this->listing
) {
337 @rewind
($this->filehandle
);
339 while ($row = @fgetcsv
($this->filehandle
, 2048, '|')) {
340 array_push($res, array('nickname' => $row[0],
341 'name' => $row[1] . ' ' . $row[2],
342 'firstname' => $row[1],
343 'lastname' => $row[2],
346 'backend' => $this->bnum
,
347 'source' => &$this->sname
));
354 * @param array $userdata new data
357 function add($userdata) {
358 if(!$this->writeable
) {
359 return $this->set_error(_("Addressbook is read-only"));
361 /* See if user exists already */
362 $ret = $this->lookup($userdata['nickname']);
364 // i18n: don't use html formating in translation
365 return $this->set_error(sprintf(_("User \"%s\" already exists"),$ret['nickname']));
368 /* Here is the data to write */
369 $data = $this->quotevalue($userdata['nickname']) . '|' .
370 $this->quotevalue($userdata['firstname']) . '|' .
371 $this->quotevalue((!empty($userdata['lastname'])?
$userdata['lastname']:'')) . '|' .
372 $this->quotevalue($userdata['email']) . '|' .
373 $this->quotevalue((!empty($userdata['label'])?
$userdata['label']:''));
375 /* Strip linefeeds */
376 $data = ereg_replace("[\r\n]", ' ', $data);
377 /* Add linefeed at end */
378 $data = $data . "\n";
380 /* Reopen file, just to be sure */
382 if(!$this->writeable
) {
383 return $this->set_error(_("Addressbook is read-only"));
388 return $this->set_error(_("Could not lock datafile"));
392 $r = sq_fwrite($this->filehandle
, $data);
397 /* Test write result */
400 $this->set_error(_("Write to addressbook failed"));
409 * @param string $alias alias that has to be deleted
412 function remove($alias) {
413 if(!$this->writeable
) {
414 return $this->set_error(_("Addressbook is read-only"));
417 /* Lock the file to make sure we're the only process working
420 return $this->set_error(_("Could not lock datafile"));
423 /* Read file into memory, ignoring nicknames to delete */
424 @rewind
($this->filehandle
);
427 while($row = @fgetcsv
($this->filehandle
, 2048, '|')) {
428 if(!in_array($row[0], $alias)) {
433 /* Write data back */
434 if(!$this->overwrite($rows)) {
445 * @param string $alias modified alias
446 * @param array $userdata new data
447 * @return bool true, if operation successful
449 function modify($alias, $userdata) {
450 if(!$this->writeable
) {
451 return $this->set_error(_("Addressbook is read-only"));
454 /* See if user exists */
455 $ret = $this->lookup($alias);
457 // i18n: don't use html formating in translation
458 return $this->set_error(sprintf(_("User \"%s\" does not exist"),$alias));
461 /* Lock the file to make sure we're the only process working
464 return $this->set_error(_("Could not lock datafile"));
467 /* Read file into memory, modifying the data for the
468 * user identified by $alias */
470 @rewind
($this->filehandle
);
473 while($row = @fgetcsv
($this->filehandle
, 2048, '|')) {
474 if(strtolower($row[0]) != strtolower($alias)) {
477 $rows[$i++
] = array(0 => $userdata['nickname'],
478 1 => $userdata['firstname'],
479 2 => (!empty($userdata['lastname'])?
$userdata['lastname']:''),
480 3 => $userdata['email'],
481 4 => (!empty($userdata['label'])?
$userdata['label']:''));
485 /* Write data back */
486 if(!$this->overwrite($rows)) {
496 * Function for quoting values before saving
497 * @param string $value string that has to be quoted
498 * @param string quoted string
500 function quotevalue($value) {
501 /* Quote the field if it contains | or ". Double quotes need to
502 * be replaced with "" */
503 if(ereg("[|\"]", $value)) {
504 $value = '"' . str_replace('"', '""', $value) . '"';
509 } /* End of class abook_local_file */