Merge pull request #4893 from colemanw/INFRA-132
[civicrm-core.git] / CRM / Admin / Page / MailSettings.php
CommitLineData
6a488035
TO
1<?php
2/*
3 +--------------------------------------------------------------------+
39de6fd5 4 | CiviCRM version 4.6 |
6a488035 5 +--------------------------------------------------------------------+
06b69b18 6 | Copyright CiviCRM LLC (c) 2004-2014 |
6a488035
TO
7 +--------------------------------------------------------------------+
8 | This file is a part of CiviCRM. |
9 | |
10 | CiviCRM is free software; you can copy, modify, and distribute it |
11 | under the terms of the GNU Affero General Public License |
12 | Version 3, 19 November 2007 and the CiviCRM Licensing Exception. |
13 | |
14 | CiviCRM is distributed in the hope that it will be useful, but |
15 | WITHOUT ANY WARRANTY; without even the implied warranty of |
16 | MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. |
17 | See the GNU Affero General Public License for more details. |
18 | |
19 | You should have received a copy of the GNU Affero General Public |
20 | License and the CiviCRM Licensing Exception along |
21 | with this program; if not, contact CiviCRM LLC |
22 | at info[AT]civicrm[DOT]org. If you have questions about the |
23 | GNU Affero General Public License or the licensing of CiviCRM, |
24 | see the CiviCRM license FAQ at http://civicrm.org/licensing |
25 +--------------------------------------------------------------------+
26*/
27
28/**
29 *
30 * @package CRM
06b69b18 31 * @copyright CiviCRM LLC (c) 2004-2014
6a488035
TO
32 * $Id$
33 *
34 */
35
36/**
37 * Page for displaying list of Mail account settings
38 */
39class CRM_Admin_Page_MailSettings extends CRM_Core_Page_Basic {
40
96f50de2 41 public $useLivePageJS = TRUE;
da6b46f4 42
6a488035
TO
43 /**
44 * The action links that we need to display for the browse screen
45 *
46 * @var array
47 * @static
48 */
49 static $_links = NULL;
50
51 /**
52 * Get BAO Name
53 *
a6c01b45
CW
54 * @return string
55 * Classname of BAO.
6a488035 56 */
00be9182 57 public function getBAOName() {
6a488035
TO
58 return 'CRM_Core_BAO_MailSettings';
59 }
60
61 /**
62 * Get action Links
63 *
a6c01b45
CW
64 * @return array
65 * (reference) of action links
6a488035 66 */
00be9182 67 public function &links() {
6a488035
TO
68 if (!(self::$_links)) {
69 // helper variable for nicer formatting
70 self::$_links = array(
71 CRM_Core_Action::UPDATE => array(
72 'name' => ts('Edit'),
73 'url' => 'civicrm/admin/mailSettings',
74 'qs' => 'action=update&id=%%id%%&reset=1',
75 'title' => ts('Edit Mail Settings'),
76 ),
77 CRM_Core_Action::DELETE => array(
78 'name' => ts('Delete'),
79 'url' => 'civicrm/admin/mailSettings',
80 'qs' => 'action=delete&id=%%id%%',
81 'title' => ts('Delete Mail Settings'),
82 ),
83 );
84 }
85
86 return self::$_links;
87 }
88
89 /**
90 * Browse all mail settings.
91 *
92 * @return void
6a488035
TO
93 * @static
94 */
00be9182 95 public function browse() {
6a488035
TO
96 //get all mail settings.
97 $allMailSettings = array();
98 $mailSetting = new CRM_Core_DAO_MailSettings();
99
cbf48754 100 $allProtocols = CRM_Core_PseudoConstant::get('CRM_Core_DAO_MailSettings', 'protocol');
6a488035
TO
101
102 //multi-domain support for mail settings. CRM-5244
103 $mailSetting->domain_id = CRM_Core_Config::domainID();
104
105 //find all mail settings.
106 $mailSetting->find();
107 while ($mailSetting->fetch()) {
108 //replace protocol value with name
109 $mailSetting->protocol = CRM_Utils_Array::value($mailSetting->protocol, $allProtocols);
110 CRM_Core_DAO::storeValues($mailSetting, $allMailSettings[$mailSetting->id]);
111
112 //form all action links
113 $action = array_sum(array_keys($this->links()));
114
115 // disallow the DELETE action for the default set of settings
116 if ($mailSetting->is_default) {
117 $action &= ~CRM_Core_Action::DELETE;
118 }
119
120 //add action links.
121 $allMailSettings[$mailSetting->id]['action'] = CRM_Core_Action::formLink(self::links(), $action,
87dab4a4
AH
122 array('id' => $mailSetting->id),
123 ts('more'),
124 FALSE,
125 'mailSetting.manage.action',
126 'MailSetting',
127 $mailSetting->id
6a488035
TO
128 );
129 }
130
131 $this->assign('rows', $allMailSettings);
132 }
133
134 /**
135 * Get name of edit form
136 *
a6c01b45
CW
137 * @return string
138 * Classname of edit form.
6a488035 139 */
00be9182 140 public function editForm() {
6a488035
TO
141 return 'CRM_Admin_Form_MailSettings';
142 }
143
144 /**
145 * Get edit form name
146 *
a6c01b45
CW
147 * @return string
148 * name of this page.
6a488035 149 */
00be9182 150 public function editName() {
6a488035
TO
151 return 'Mail Settings';
152 }
153
154 /**
155 * Get user context.
156 *
da6b46f4
EM
157 * @param null $mode
158 *
a6c01b45
CW
159 * @return string
160 * user context.
6a488035 161 */
00be9182 162 public function userContext($mode = NULL) {
6a488035
TO
163 return 'civicrm/admin/mailSettings';
164 }
165}