dolibarr 21.0.0-beta
objectonoff.php
Go to the documentation of this file.
1<?php
2/* Copyright (C) 2015-2023 Laurent Destailleur <eldy@users.sourceforge.net>
3 * Copyright (C) 2024 MDW <mdeweerd@users.noreply.github.com>
4 * Copyright (C) 2024 Frédéric France <frederic.france@free.fr>
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 3 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, see <https://www.gnu.org/licenses/>.
18 */
19
26if (!defined('NOTOKENRENEWAL')) {
27 define('NOTOKENRENEWAL', '1'); // Disables token renewal
28}
29if (!defined('NOREQUIREMENU')) {
30 define('NOREQUIREMENU', '1');
31}
32if (!defined('NOREQUIREHTML')) {
33 define('NOREQUIREHTML', '1');
34}
35if (!defined('NOREQUIREAJAX')) {
36 define('NOREQUIREAJAX', '1');
37}
38if (!defined('NOREQUIRESOC')) {
39 define('NOREQUIRESOC', '1');
40}
41
42// Load Dolibarr environment
43require '../../main.inc.php';
44require_once DOL_DOCUMENT_ROOT.'/core/class/genericobject.class.php';
45
54$action = GETPOST('action', 'aZ09');
55$backtopage = GETPOST('backtopage');
56
57$id = GETPOSTINT('id');
58$element = GETPOST('element', 'alpha'); // 'myobject' (myobject=mymodule) or 'myobject@mymodule' or 'myobject_mysubobject' (myobject=mymodule)
59$field = GETPOST('field', 'alpha');
60$value = GETPOSTINT('value');
61$format = 'int';
62
63// Load object according to $id and $element
64$object = fetchObjectByElement($id, $element);
65if (!is_object($object)) {
66 httponly_accessforbidden("Bad value for combination of parameters element/field: Object not found."); // This includes the exit.
67}
68'@phan-var-force CommonObject $object';
69
70$object->fields[$field] = array('type' => $format, 'enabled' => 1);
71
72$module = $object->module;
73$element = $object->element;
74$usesublevelpermission = ($module != $element ? $element : '');
75if ($usesublevelpermission && !$user->hasRight($module, $element)) { // There is no permission on object defined, we will check permission on module directly
76 $usesublevelpermission = '';
77}
78
79//print $object->id.' - '.$object->module.' - '.$object->element.' - '.$object->table_element.' - '.$usesublevelpermission."\n";
80
81// Security check
82if (!empty($user->socid)) {
83 $socid = $user->socid;
84 if (!empty($object->socid) && $socid != $object->socid) {
85 httponly_accessforbidden("Access on object not allowed for this external user."); // This includes the exit.
86 }
87}
88
89// We check permission.
90// Check is done on $user->rights->element->create or $user->rights->element->subelement->create (because $action = 'set')
91if (preg_match('/stat[u][st]$/', $field) || ($field == 'evenunsubscribe' && $object->table_element == 'mailing')) {
92 restrictedArea($user, $object->module, $object, $object->table_element, $usesublevelpermission);
93} elseif ($element == 'product' && in_array($field, array('tosell', 'tobuy', 'tobatch'))) { // Special case for products
94 restrictedArea($user, 'produit|service', $object, 'product&product', '', '', 'rowid');
95} else {
96 httponly_accessforbidden("Bad value for combination of parameters element/field: Field not supported."); // This includes the exit.
97}
98
99
100/*
101 * Actions
102 */
103
104// None
105
106
107/*
108 * View
109 */
110
112
113print '<!-- Ajax page called with url '.dol_escape_htmltag($_SERVER["PHP_SELF"]).'?'.dol_escape_htmltag($_SERVER["QUERY_STRING"]).' -->'."\n";
114
115// Registering new values
116if (($action == 'set') && !empty($id)) { // Test on permission already done in header according to object and field.
117 $triggerkey = strtoupper(($module != $element ? $module.'_' : '').$element).'_UPDATE';
118 // Special case
119 if ($triggerkey == 'SOCIETE_UPDATE') {
120 $triggerkey = 'COMPANY_MODIFY';
121 }
122 if ($triggerkey == 'PRODUCT_UPDATE') {
123 $triggerkey = 'PRODUCT_MODIFY';
124 }
125
126 $result = $object->setValueFrom($field, $value, $object->table_element, $id, $format, '', $user, $triggerkey);
127
128 if ($result < 0) {
129 print $object->error;
130 http_response_code(500);
131 exit;
132 }
133
134 if ($backtopage) {
135 header('Location: '.$backtopage);
136 exit;
137 }
138}
$id
Definition account.php:48
if( $user->socid > 0) if(! $user->hasRight('accounting', 'chartofaccount')) $object
Definition card.php:66
GETPOSTINT($paramname, $method=0)
Return the value of a $_GET or $_POST supervariable, converted into integer.
GETPOST($paramname, $check='alphanohtml', $method=0, $filter=null, $options=null, $noreplace=0)
Return value of a param into GET or POST supervariable.
fetchObjectByElement($element_id, $element_type, $element_ref='', $useCache=0, $maxCacheByType=10)
Fetch an object from its id and element_type Inclusion of classes is automatic.
dol_escape_htmltag($stringtoescape, $keepb=0, $keepn=0, $noescapetags='', $escapeonlyhtmltags=0, $cleanalsojavascript=0)
Returns text escaped for inclusion in HTML alt or title or value tags, or into values of HTML input f...
if(!defined( 'NOREQUIREMENU')) if(!empty(GETPOST('seteventmessages', 'alpha'))) if(!function_exists("llxHeader")) top_httphead($contenttype='text/html', $forcenocache=0)
Show HTTP header.
httponly_accessforbidden($message='1', $http_response_code=403, $stringalreadysanitized=0)
Show a message to say access is forbidden and stop program.
restrictedArea(User $user, $features, $object=0, $tableandshare='', $feature2='', $dbt_keyfield='fk_soc', $dbt_select='rowid', $isdraft=0, $mode=0)
Check permissions of a user to show a page and an object.