1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
|
<?php
/**
* $Horde: imp/fetchmailprefs.php,v 1.39.4.3 2006/01/01 21:28:50 jan Exp $
*
* Copyright 2002-2006 Nuno Loureiro <nuno@co.sapo.pt>
* Copyright 2004-2006 Michael Slusarz <slusarz@bigworm.colorado.edu>
*
* See the enclosed file COPYING for license information (GPL). If you
* did not receive this file, see http://www.fsf.org/copyleft/gpl.html.
*/
@define('IMP_BASE', dirname(__FILE__));
$authentication = OP_HALFOPEN;
require_once IMP_BASE . '/lib/base.php';
require_once IMP_BASE . '/lib/Fetchmail.php';
/* Initialize Fetchmail libraries. */
$fm_account = &new IMP_Fetchmail_Account();
$driver = Util::getFormData('fm_driver');
$fetch_url = Horde::applicationUrl('fetchmailprefs.php');
$prefs_url = Util::addParameter(IMP::prefsURL(true), 'group', 'fetchmail', false);
$to_edit = null;
/* Handle clients without javascript. */
$actionID = Util::getFormData('actionID');
if (is_null($actionID)) {
if (Util::getPost('edit')) {
$actionID = 'fetchmail_prefs_edit';
} elseif (Util::getPost('save')) {
$actionID = 'fetchmail_prefs_save';
} elseif (Util::getPost('delete')) {
$actionID = 'fetchmail_prefs_delete';
} elseif (Util::getPost('back')) {
header('Location: ' . $prefs_url);
exit;
} elseif (Util::getPost('select')) {
header('Location: ' . $fetch_url);
exit;
}
}
/* Run through the action handlers */
switch ($actionID) {
case 'fetchmail_create':
if ($driver) {
$fetchmail = &IMP_Fetchmail::factory($driver, array());
}
break;
case 'fetchmail_prefs_edit':
$to_edit = Util::getFormData('account');
$driver = $fm_account->getValue('driver', $to_edit);
$fetchmail = &IMP_Fetchmail::factory($driver, array());
break;
case 'fetchmail_prefs_save':
$to_edit = Util::getFormData('edit_account');
if ($to_edit == '') {
$to_edit = $fm_account->add();
}
$fetchmail = &IMP_Fetchmail::factory($driver, array());
$id = Util::getFormData('fm_id', _("Unnamed"));
$fm_account->setValue('id', $id, $to_edit);
foreach ($fetchmail->getParameterList() as $val) {
$fm_account->setValue($val, Util::getFormData('fm_' . $val), $to_edit);
}
$prefs->setValue('fetchmail_login', (array_sum($fm_account->getAll('loginfetch'))) ? true : false);
$notification->push(sprintf(_("The account \"%s\" has been saved."), $id), 'horde.success');
break;
case 'fetchmail_prefs_delete':
$to_delete = Util::getFormData('edit_account');
if (!is_null($to_delete)) {
$deleted_account = $fm_account->delete($to_delete);
$notification->push(sprintf(_("The account \"%s\" has been deleted."), $deleted_account['id']), 'horde.success');
$prefs->setValue('fetchmail_login', (array_sum($fm_account->getAll('loginfetch'))) ? true : false);
$actionID = null;
} else {
$notification->push(_("You must select an account to be deleted."), 'horde.warning');
}
break;
}
/* Show the header. */
require_once 'Horde/Prefs/UI.php';
require IMP_BASE . '/config/prefs.php';
$app = 'imp';
Prefs_UI::generateHeader();
require IMP_TEMPLATES . '/fetchmail/top.inc';
if (empty($actionID)) {
/* If actionID is still empty, we haven't selected an account
* yet. */
$accounts = $fm_account->getAll('id');
require IMP_TEMPLATES . '/fetchmail/account_select.inc';
} elseif (($actionID == 'fetchmail_create') && empty($driver)) {
/* We are creating an account and need to select the type. */
require IMP_TEMPLATES . '/fetchmail/driver_select.inc';
} else {
$fm_colors = IMP_Fetchmail::listColors();
require IMP_TEMPLATES . '/fetchmail/manage.inc';
}
require $registry->get('templates', 'horde') . '/common-footer.inc';
|
