'; 212 | print ''; 335 | // Show errors 336 | print "
"; 337 | 338 | if(!empty($object)) { // Fix Warning: Attempt to read property "error" on null : Is $object really used on this page? 339 | dol_htmloutput_errors($object->error, $object->errors); 340 | // Show messages 341 | dol_htmloutput_mesg($object->mesg, '', 'ok'); 342 | } 343 | 344 | // Footer 345 | llxFooter(); 346 | $db->close(); 347 | -------------------------------------------------------------------------------- /cdavurls.php: -------------------------------------------------------------------------------- 1 | 0 && $j > 0 && isset($tmp[$i]) && isset($tmp2[$j]) && $tmp[$i] == $tmp2[$j]) { $i--; $j--; } 31 | if (!$res && $i > 0 && @file_exists(substr($tmp, 0, ($i + 1))."/main.inc.php")) $res = @include substr($tmp, 0, ($i + 1))."/main.inc.php"; 32 | if (!$res && $i > 0 && @file_exists(dirname(substr($tmp, 0, ($i + 1)))."/main.inc.php")) $res = @include dirname(substr($tmp, 0, ($i + 1)))."/main.inc.php"; 33 | // Try main.inc.php using relative path 34 | if (!$res && @file_exists("../main.inc.php")) $res = @include "../main.inc.php"; 35 | if (!$res && @file_exists("../../main.inc.php")) $res = @include "../../main.inc.php"; 36 | if (!$res && @file_exists("../../../main.inc.php")) $res = @include "../../../main.inc.php"; 37 | if (!$res) die("Include of main fails"); 38 | 39 | require_once DOL_DOCUMENT_ROOT.'/core/lib/admin.lib.php'; 40 | require_once DOL_DOCUMENT_ROOT.'/core/lib/barcode.lib.php'; // This is to include def like $genbarcode_loc and $font_loc 41 | 42 | function base64url_encode($data) { 43 | return rtrim(strtr(base64_encode($data), '+/', '-_'), '='); 44 | } 45 | 46 | // Load traductions files requiredby by page 47 | $langs->load("cdav"); 48 | 49 | 50 | // define CDAV_URI_KEY if not 51 | if(!defined('CDAV_URI_KEY')) 52 | { 53 | if(isset($conf->global->CDAV_URI_KEY)) 54 | define('CDAV_URI_KEY', $conf->global->CDAV_URI_KEY); 55 | else 56 | define('CDAV_URI_KEY', substr(md5($_SERVER['HTTP_HOST']),0,8)); 57 | } 58 | 59 | // Get parameters 60 | $id = GETPOST('id','int'); 61 | $action = GETPOST('action','alpha'); 62 | $backtopage = GETPOST('backtopage'); 63 | $type = GETPOST('type','alpha'); 64 | 65 | // Protection if external user 66 | if (!empty($user->societe_id) || !empty($user->socid)) // external user 67 | { 68 | accessforbidden(); 69 | } 70 | 71 | /*************************************************** 72 | * VIEW 73 | * 74 | * Put here all code to build page 75 | ****************************************************/ 76 | 77 | llxHeader('',$langs->trans($type.'url'),''); 78 | 79 | echo '
'.$langs->trans($type.'url').'
'; 80 | 81 | if(!empty($conf->global->CDAV_QRCODE_DAVX5_ENABLED)) { 82 | echo ''.$langs->trans('URLForDavX5').'
'; 83 | echo ''.$langs->trans('URLForDavX5Tooltip').'
'; 84 | 85 | require_once DOL_DOCUMENT_ROOT.'/core/modules/barcode/doc/tcpdfbarcode.modules.php'; 86 | $qrmodule = new modTcpdfbarcode(); 87 | $tcpdfEncoding = $qrmodule->getTcpdfEncodingType('QRCODE'); 88 | require_once TCPDF_PATH.'tcpdf_barcodes_2d.php'; 89 | $davx = "davx5://" . $user->login . ":@"; 90 | $uri = str_replace(["http://", "https://"],[$davx, $davx],dol_buildpath('cdav', 2)); 91 | $barcodeobj = new TCPDF2DBarcode($uri, $tcpdfEncoding); 92 | $qrdata = $barcodeobj->getBarcodePngData(); 93 | print "![](data:image/png;base64," . base64_encode($qrdata) . ")
"; 94 | } 95 | 96 | if($type=='CardDAV') 97 | { 98 | echo '
'.$langs->trans('URLGeneric').'
'; 99 | echo '';
100 | echo dol_buildpath('cdav', 2)."\n";
101 | echo dol_buildpath('cdav/server.php', 2)."\n";
102 | echo dol_buildpath('cdav', 2)."/server.php/principals/".$user->login."/";
103 | echo '';
104 |
105 | echo ''.$langs->trans('URLforCardDAV', 2).'
'; 106 | echo ''.dol_buildpath('cdav/server.php', 2).'/addressbooks/'.$user->login.'/default/';
107 | }
108 | elseif($type=='CalDAV')
109 | {
110 | echo ''.$langs->trans('URLGeneric').'
'; 111 | echo '';
112 | echo dol_buildpath('cdav', 2)."\n";
113 | echo dol_buildpath('cdav/server.php', 2)."\n";
114 | echo dol_buildpath('cdav', 2)."/server.php/principals/".$user->login."/";
115 | echo '';
116 |
117 | echo ''.$langs->trans('URLforCalDAV').'
'; 118 | 119 | if(isset($user->rights->agenda->allactions->read) && $user->rights->agenda->allactions->read) 120 | { 121 | if (versioncompare(versiondolibarrarray(), array(3,7,9))>0) 122 | $fk_soc_fieldname = 'fk_soc'; 123 | else 124 | $fk_soc_fieldname = 'fk_societe'; 125 | 126 | $sql = 'SELECT u.rowid, u.login, u.firstname, u.lastname 127 | FROM '.MAIN_DB_PREFIX.'user u WHERE '.$fk_soc_fieldname.' IS NULL 128 | AND u.fk_soc IS NULL AND u.statut = 1 129 | ORDER BY login'; 130 | $result = $db->query($sql); 131 | while($row = $db->fetch_array($result)) 132 | { 133 | if($row['rowid'] == $user->id) 134 | echo ''; 135 | echo $row['firstname'].' '.$row['lastname'].' :'; 136 | echo ''.dol_buildpath('cdav/server.php', 2).'/calendars/'.$user->login.'/'.$row['rowid'].'-cal-'.$row['login'].''; 137 | if($row['rowid'] == $user->id) 138 | echo ''; 139 | } 140 | } 141 | else 142 | { 143 | echo '
'.dol_buildpath('cdav/server.php', 2).'/calendars/'.$user->login.'/'.$user->id.'-cal-'.$user->login.'';
144 | }
145 |
146 | }
147 | elseif($type=='ICS')
148 | {
149 |
150 | echo ''.$langs->trans('URLforICS').'
'; 151 | 152 | if(isset($user->rights->agenda->allactions->read) && $user->rights->agenda->allactions->read) 153 | { 154 | if (versioncompare(versiondolibarrarray(), array(3,7,9))>0) 155 | $fk_soc_fieldname = 'fk_soc'; 156 | else 157 | $fk_soc_fieldname = 'fk_societe'; 158 | 159 | $sql = 'SELECT u.rowid, u.login, u.firstname, u.lastname 160 | FROM '.MAIN_DB_PREFIX.'user u WHERE '.$fk_soc_fieldname.' IS NULL 161 | AND u.fk_soc IS NULL AND u.statut = 1 162 | ORDER BY login'; 163 | $result = $db->query($sql); 164 | while($row = $db->fetch_array($result)) 165 | { 166 | echo ''.$row['firstname'].' '.$row['lastname'].' :
'; 167 | 168 | echo "".$langs->trans('Full')." :\n".dol_buildpath('cdav/ics.php', 2).'?token='.base64url_encode(openssl_encrypt($row['rowid'].'+ø+full', 'aes-256-cbc', CDAV_URI_KEY, true))."\n\n";
169 | echo $langs->trans('NoLabel')." :\n".dol_buildpath('cdav/ics.php', 2).'?token='.base64url_encode(openssl_encrypt($row['rowid'].'+ø+nolabel', 'aes-256-cbc', CDAV_URI_KEY, true)).''; 170 | 171 | } 172 | } 173 | else 174 | { 175 | echo "
".$langs->trans('Full')." :\n".dol_buildpath('cdav/ics.php', 2).'?token='.base64url_encode(openssl_encrypt($user->id.'+ø+full', 'aes-256-cbc', CDAV_URI_KEY, true))."\n\n";
176 | echo $langs->trans('NoLabel')." :\n".dol_buildpath('cdav/ics.php', 2).'?token='.base64url_encode(openssl_encrypt($user->id.'+ø+nolabel', 'aes-256-cbc', CDAV_URI_KEY, true)).''; 177 | } 178 | 179 | } 180 | else 181 | { 182 | echo '
'.$langs->trans('URLGeneric').'
'; 183 | echo ''.dol_buildpath('cdav', 2).'';
184 | }
185 |
186 | // End of page
187 | llxFooter();
188 | $db->close();
189 |
--------------------------------------------------------------------------------
/class/PrincipalsDolibarr.php:
--------------------------------------------------------------------------------
1 | [
54 | 'dbField' => 'displayname',
55 | ],
56 |
57 | /**
58 | * This is the users' primary email-address.
59 | */
60 | '{http://sabredav.org/ns}email-address' => [
61 | 'dbField' => 'email',
62 | ],
63 | ];
64 |
65 | /**
66 | * Sets up the backend.
67 | *
68 | * @param db $db
69 | */
70 | function __construct($user,$db) {
71 |
72 | $this->user = $user;
73 | $this->db = $db;
74 |
75 | $this->allprincipals = array(
76 | array('id'=>$user->id*10, 'uri'=>'principals/'.$user->login,'email'=>$user->email,'displayname'=>trim($user->firstname.' '.$user->lastname)),
77 | array('id'=>$user->id*10+1,'uri'=>'principals/'.$user->login.'/calendar-proxy-read','email'=>null,'displayname'=>null),
78 | array('id'=>$user->id*10+2,'uri'=>'principals/'.$user->login.'/calendar-proxy-write','email'=>null,'displayname'=>null),
79 | );
80 |
81 |
82 | }
83 |
84 |
85 | /**
86 | * Returns the 'dirname' and 'basename' for a path.
87 | *
88 | * The reason there is a custom function for this purpose, is because
89 | * basename() is locale aware (behaviour changes if C locale or a UTF-8 locale is used)
90 | * and we need a method that just operates on UTF-8 characters.
91 | *
92 | * In addition basename and dirname are platform aware, and will treat backslash (\) as a
93 | * directory separator on windows.
94 | *
95 | * This method returns the 2 components as an array.
96 | *
97 | * If there is no dirname, it will return an empty string. Any / appearing at the end of the
98 | * string is stripped off.
99 | *
100 | * @param string $path
101 | * @return array
102 | */
103 | static function splitPath($path) {
104 |
105 | $matches = array();
106 | if(preg_match('/^(?:(?:(.*)(?:\/+))?([^\/]+))(?:\/?)$/u',$path,$matches)) {
107 | return array($matches[1],$matches[2]);
108 | } else {
109 | return array(null,null);
110 | }
111 |
112 | }
113 |
114 | /**
115 | * Returns a list of principals based on a prefix.
116 | *
117 | * This prefix will often contain something like 'principals'. You are only
118 | * expected to return principals that are in this base path.
119 | *
120 | * You are expected to return at least a 'uri' for every user, you can
121 | * return any additional properties if you wish so. Common properties are:
122 | * {DAV:}displayname
123 | * {http://sabredav.org/ns}email-address - This is a custom SabreDAV
124 | * field that's actualy injected in a number of other properties. If
125 | * you have an email address, use this property.
126 | *
127 | * @param string $prefixPath
128 | * @return array
129 | */
130 | function getPrincipalsByPrefix($prefixPath) {
131 |
132 | $principals = [];
133 |
134 | foreach ($this->allprincipals as $row) {
135 |
136 | // Checking if the principal is in the prefix
137 | list($rowPrefix) = self::splitPath($row['uri']);
138 | if ($rowPrefix !== $prefixPath) continue;
139 |
140 | $principal = [
141 | 'uri' => $row['uri'],
142 | ];
143 | foreach ($this->fieldMap as $key => $value) {
144 | if ($row[$value['dbField']]) {
145 | $principal[$key] = $row[$value['dbField']];
146 | }
147 | }
148 | $principals[] = $principal;
149 | }
150 |
151 | return $principals;
152 |
153 | }
154 |
155 | /**
156 | * Returns a specific principal, specified by it's path.
157 | * The returned structure should be the exact same as from
158 | * getPrincipalsByPrefix.
159 | *
160 | * @param string $path
161 | * @return array
162 | */
163 | function getPrincipalByPath($path) {
164 |
165 | foreach ($this->allprincipals as $row) {
166 | if($row['uri']==$path) {
167 |
168 | $principal = [
169 | 'id' => $row['id'],
170 | 'uri' => $row['uri'],
171 | ];
172 | foreach ($this->fieldMap as $key => $value) {
173 | if ($row[$value['dbField']]) {
174 | $principal[$key] = $row[$value['dbField']];
175 | }
176 | }
177 | return $principal;
178 | }
179 | }
180 | }
181 |
182 | /**
183 | * Updates one ore more webdav properties on a principal.
184 | *
185 | * The list of mutations is stored in a Sabre\DAV\PropPatch object.
186 | * To do the actual updates, you must tell this object which properties
187 | * you're going to process with the handle() method.
188 | *
189 | * Calling the handle method is like telling the PropPatch object "I
190 | * promise I can handle updating this property".
191 | *
192 | * Read the PropPatch documenation for more info and examples.
193 | *
194 | * @param string $path
195 | * @param DAV\PropPatch $propPatch
196 | */
197 | function updatePrincipal($path, DAV\PropPatch $propPatch) {
198 |
199 | // not supported
200 | return false;
201 |
202 | }
203 |
204 | /**
205 | * This method is used to search for principals matching a set of
206 | * properties.
207 | *
208 | * This search is specifically used by RFC3744's principal-property-search
209 | * REPORT.
210 | *
211 | * The actual search should be a unicode-non-case-sensitive search. The
212 | * keys in searchProperties are the WebDAV property names, while the values
213 | * are the property values to search on.
214 | *
215 | * By default, if multiple properties are submitted to this method, the
216 | * various properties should be combined with 'AND'. If $test is set to
217 | * 'anyof', it should be combined using 'OR'.
218 | *
219 | * This method should simply return an array with full principal uri's.
220 | *
221 | * If somebody attempted to search on a property the backend does not
222 | * support, you should simply return 0 results.
223 | *
224 | * You can also just return 0 results if you choose to not support
225 | * searching at all, but keep in mind that this may stop certain features
226 | * from working.
227 | *
228 | * @param string $prefixPath
229 | * @param array $searchProperties
230 | * @param string $test
231 | * @return array
232 | */
233 | function searchPrincipals($prefixPath, array $searchProperties, $test = 'allof') {
234 | // not supported
235 | return array();
236 | }
237 |
238 | /**
239 | * Returns the list of members for a group-principal
240 | *
241 | * @param string $principal
242 | * @return array
243 | */
244 | function getGroupMemberSet($principal) {
245 | // not supported
246 | return array();
247 | }
248 |
249 | /**
250 | * Returns the list of groups a principal is a member of
251 | *
252 | * @param string $principal
253 | * @return array
254 | */
255 | function getGroupMembership($principal) {
256 | // not supported
257 | return array();
258 | }
259 |
260 | /**
261 | * Updates the list of group members for a group principal.
262 | *
263 | * The principals should be passed as a list of uri's.
264 | *
265 | * @param string $principal
266 | * @param array $members
267 | * @return void
268 | */
269 | function setGroupMemberSet($principal, array $members) {
270 | // not supported
271 | return;
272 | }
273 |
274 | /**
275 | * Creates a new principal.
276 | *
277 | * This method receives a full path for the new principal. The mkCol object
278 | * contains any additional webdav properties specified during the creation
279 | * of the principal.
280 | *
281 | * @param string $path
282 | * @param MkCol $mkCol
283 | * @return void
284 | */
285 | function createPrincipal($path, MkCol $mkCol) {
286 | // not supported
287 | return;
288 | }
289 |
290 | }
291 |
--------------------------------------------------------------------------------
/class/actions_cdav.class.php:
--------------------------------------------------------------------------------
1 | global->CDAV_GENTASK) || intval($conf->global->CDAV_GENTASK) == 0 || $parameters['currentcontext'] != 'projectcard')
27 | return 0;
28 |
29 | if ($action == "confirm_validate" && isset($object->id) && $object->id > 0) {
30 | //ok go ahead
31 | } elseif (GETPOST('status') != 1 && $action != "confirm_validateProject" || !isset($object->id) || $object->id <= 0)
32 | return 0;
33 |
34 | $CDAV_PROJ_USER_ROLE = $conf->global->CDAV_PROJ_USER_ROLE; // to pick good user in project
35 | $CDAV_TASK_USER_ROLE = $conf->global->CDAV_TASK_USER_ROLE; // role to put on task
36 | $CDAV_GENTASK_INI1 = $conf->global->CDAV_GENTASK_INI1; // initial service
37 | $CDAV_GENTASK_INI2 = $conf->global->CDAV_GENTASK_INI2; // initial service
38 | $CDAV_GENTASK_INI3 = $conf->global->CDAV_GENTASK_INI3; // initial service
39 | $CDAV_GENTASK_END1 = $conf->global->CDAV_GENTASK_END1; // final service
40 | $CDAV_GENTASK_END2 = $conf->global->CDAV_GENTASK_END2; // final service
41 | $CDAV_GENTASK_END3 = $conf->global->CDAV_GENTASK_END3; // final service
42 | $CDAV_GENTASK_SERVICE_TAG = $conf->global->CDAV_GENTASK_SERVICE_TAG; // restrict services
43 | $CDAV_EXTRAFIELD_DURATION = $conf->global->CDAV_EXTRAFIELD_DURATION; // duration in propaldet & commandedet extrafields
44 | $CDAV_TASK_HOUR_INI = $conf->global->CDAV_TASK_HOUR_INI; // begining of a working day
45 | $CDAV_TASK_HOUR_END = $conf->global->CDAV_TASK_HOUR_END; // ending of a working day
46 |
47 | if (isset($conf->global->WEEE_PRODUCT_ID) && intval($conf->global->WEEE_PRODUCT_ID) != 0)
48 | $WEEE_PRODUCT_ID = intval($conf->global->WEEE_PRODUCT_ID); // DEEE ?
49 |
50 | if ($action == "confirm_validate") { // button Validate
51 | $date_start = $object->date_start;
52 | $date_end = $object->date_end;
53 | } else // POST form
54 | {
55 | $date_start = dol_mktime(0, 0, 0, GETPOST('projectstartmonth', 'int'), GETPOST('projectstartday', 'int'), GETPOST('projectstartyear', 'int'));
56 | $date_end = dol_mktime(0, 0, 0, GETPOST('projectendmonth', 'int'), GETPOST('projectendday', 'int'), GETPOST('projectendyear', 'int'));
57 | }
58 |
59 | $error = 0; // Error counter
60 | //$myvalue = 'test'; // A result value
61 |
62 | // echo "action: " . $action;
63 | // echo "User ";
64 | // print_r($user);
65 | //echo "Object ";
66 | //print_r($object);
67 |
68 | // do something only for the context 'somecontext'
69 |
70 | $sql = "SELECT * FROM " . MAIN_DB_PREFIX . "projet_task WHERE fk_projet = " . intval($object->id);
71 | $result = $db->query($sql);
72 | // echo "Result ";
73 | // print_r($result);
74 | if ($db->num_rows($result) == 0 && isset($user->rights->agenda->allactions->read)) {
75 | $db->free($result);
76 | //echo "NOTASK";
77 |
78 | $rPreTasksLib = array();
79 | $rPreTasksDesc = array();
80 | $rPreTasksDuree = array();
81 | $rPostTasksLib = array();
82 | $rPostTasksDesc = array();
83 | $rPostTasksDuree = array();
84 | $rTasksLib = array();
85 | $rTasksDesc = array();
86 | $rTasksDuree = array();
87 |
88 | // retrieve n pre-tasks [0-3]
89 | $i = 0;
90 | while (++$i <= 3) {
91 | if (isset(${'CDAV_GENTASK_INI' . $i}) && ${'CDAV_GENTASK_INI' . $i} > 0) {
92 | // Found CDAV_GENTASK_INI$i ==> ${'CDAV_GENTASK_INI' . $i}
93 | $sqldet = "SELECT label, description, duration FROM " . MAIN_DB_PREFIX . "product WHERE rowid = " . intval(${'CDAV_GENTASK_INI' . $i});
94 | $querydet = $db->query($sqldet);
95 | while ($querydet && ($det = $db->fetch_object($querydet)) !== null) {
96 | $rPreTasksLib[] = $det->label;
97 | $rPreTasksDesc[] = $det->description;
98 | $rPreTasksDuree[] = $det->duration;
99 | }
100 | $db->free($querydet);
101 | unset($det);
102 | }
103 | }
104 |
105 | $bDocs = false;
106 | $rElmts = array(); // orders source's : $rElmts[propal_ID]=commande_ID
107 |
108 | $sql = " SELECT * FROM " . MAIN_DB_PREFIX . "commande WHERE fk_projet = " . intval($object->id) . " ORDER BY rowid";
109 | $result = $db->query($sql);
110 | while ($result && ($res = $db->fetch_object($result)) !== null) {
111 | $bDocs = true;
112 | $sqldet = " SELECT det.*, pro.label as prod_label, pro.description as prod_description, pro.duration as prod_duration, elt.fk_source AS prop_source, ef.cdav_duration as cdav_duration
113 | FROM " . MAIN_DB_PREFIX . "commandedet AS det
114 | LEFT OUTER JOIN " . MAIN_DB_PREFIX . "product AS pro ON (pro.rowid=det.fk_product)";
115 | if (isset($CDAV_GENTASK_SERVICE_TAG) && $CDAV_GENTASK_SERVICE_TAG > 0)
116 | $sqldet .= " LEFT OUTER JOIN " . MAIN_DB_PREFIX . "categorie_product AS cat ON (cat.fk_product=det.fk_product AND cat.fk_categorie = " . intval($CDAV_GENTASK_SERVICE_TAG) . ")";
117 |
118 | $sqldet .= " LEFT OUTER JOIN " . MAIN_DB_PREFIX . "commandedet_extrafields AS ef ON (ef.fk_object=det.rowid)";
119 | $sqldet .= " LEFT OUTER JOIN " . MAIN_DB_PREFIX . "element_element elt ON ( elt.sourcetype='propal' AND elt.targettype='commande' AND elt.fk_target = " . intval($res->rowid) . ")
120 | WHERE fk_commande = " . intval($res->rowid) . " AND qty > 0 AND product_type=1 ";
121 | if ($CDAV_GENTASK_SERVICE_TAG > 0 && $CDAV_EXTRAFIELD_DURATION !== false)
122 | $sqldet .= " AND (cat.fk_categorie IS NOT NULL OR COALESCE(ef.cdav_duration,'') <> '' )";
123 | elseif ($CDAV_EXTRAFIELD_DURATION !== false)
124 | $sqldet .= " AND COALESCE(duration,'') <> '' ";
125 | elseif ($CDAV_GENTASK_SERVICE_TAG > 0)
126 | $sqldet .= " AND cat.fk_categorie IS NOT NULL";
127 | $sqldet .= " ORDER BY rowid";
128 | //echo "\n\n $sqldet \n\n";
129 |
130 | $querydet = $db->query($sqldet);
131 | while ($querydet && ($det = $db->fetch_object($querydet)) !== null) {
132 | if (!is_null($det->prop_source) && $det->prop_source !== false)
133 | $rElmts[$det->prop_source] = $det->rowid;
134 | //else echo "\n\n NOSOURCE";
135 |
136 | if (isset($WEEE_PRODUCT_ID) && $WEEE_PRODUCT_ID == $det->fk_product)
137 | continue;
138 |
139 | if (!empty($det->label))
140 | $rTasksLib[] = $det->label;
141 | elseif (!empty($det->prod_label))
142 | $rTasksLib[] = $det->prod_label;
143 | elseif (!empty($det->description))
144 | $rTasksLib[] = strtok($det->description, "\n");
145 | else $rTasksLib[] = 'Task';
146 |
147 | if (!empty($det->description))
148 | $rTasksDesc[] = $det->description;
149 | elseif (!empty($det->prod_description))
150 | $rTasksDesc[] = $det->prod_description;
151 | else $rTasksDesc[] = '';
152 |
153 | if (!empty($det->cdav_duration))
154 | $rTasksDuree[] = $det->cdav_duration;
155 | elseif (!empty($det->prod_duration))
156 | $rTasksDuree[] = $det->prod_duration;
157 | else $rTasksDuree[] = '';
158 | }
159 | unset($det);
160 | $db->free($querydet);
161 | }
162 | $db->free($result);
163 | //var_dump($rElmts);
164 | $sql = " SELECT * FROM " . MAIN_DB_PREFIX . "propal WHERE fk_projet = " . intval($object->id);
165 | $query = $db->query($sql);
166 | while ($query && ($res = $db->fetch_object($query)) !== null) {
167 | $bDocs = true;
168 | if (isset($rElmts[$res->rowid]))
169 | continue;
170 |
171 | $sqldet = " SELECT det.*, pro.label as prod_label, pro.description as prod_description, pro.duration as prod_duration, ef.cdav_duration as cdav_duration
172 | FROM " . MAIN_DB_PREFIX . "propaldet AS det
173 | LEFT OUTER JOIN " . MAIN_DB_PREFIX . "product AS pro ON (pro.rowid=det.fk_product)";
174 | if (isset($CDAV_GENTASK_SERVICE_TAG) && $CDAV_GENTASK_SERVICE_TAG > 0)
175 | $sqldet .= " LEFT OUTER JOIN " . MAIN_DB_PREFIX . "categorie_product AS cat ON (cat.fk_product=det.fk_product AND cat.fk_categorie = " . intval($CDAV_GENTASK_SERVICE_TAG) . ")";
176 |
177 | $sqldet .= " LEFT OUTER JOIN " . MAIN_DB_PREFIX . "propaldet_extrafields AS ef ON (ef.fk_object=det.rowid)";
178 | $sqldet .= " WHERE fk_propal = " . intval($res->rowid) . " AND qty > 0 AND product_type=1";
179 | if ($CDAV_GENTASK_SERVICE_TAG > 0 && $CDAV_EXTRAFIELD_DURATION !== false)
180 | $sqldet .= " AND (cat.fk_categorie IS NOT NULL OR COALESCE(ef.cdav_duration,'') <> '' )";
181 | elseif ($CDAV_EXTRAFIELD_DURATION !== false)
182 | $sqldet .= " AND COALESCE(ef.cdav_duration,'') <> '' ";
183 | elseif ($CDAV_GENTASK_SERVICE_TAG > 0)
184 | $sqldet .= " AND cat.fk_categorie IS NOT NULL";
185 | $sqldet .= " ORDER BY rowid";
186 |
187 | //echo "\n\n $sqldet \n\n";
188 | $querydet = $db->query($sqldet);
189 | while ($querydet && ($det = $db->fetch_object($querydet)) !== null) {
190 | if (isset($WEEE_PRODUCT_ID) && $WEEE_PRODUCT_ID == $det->fk_product)
191 | continue;
192 |
193 | //if( !isset($CDAV_EXTRAFIELD_DURATION) || $CDAV_EXTRAFIELD_DURATION != true || empty($det->duration) )
194 | // continue;
195 |
196 | if (!empty($det->label))
197 | $rTasksLib[] = $det->label;
198 | elseif (!empty($det->prod_label))
199 | $rTasksLib[] = $det->prod_label;
200 | elseif (!empty($det->description))
201 | $rTasksLib[] = strtok($det->description, "\n");
202 | else $rTasksLib[] = 'Task';
203 |
204 | if (!empty($det->description))
205 | $rTasksDesc[] = $det->description;
206 | elseif (!empty($det->prod_description))
207 | $rTasksDesc[] = $det->prod_description;
208 | else $rTasksDesc[] = '';
209 |
210 | if (!empty($det->cdav_duration))
211 | $rTasksDuree[] = $det->cdav_duration;
212 | elseif (!empty($det->prod_duration))
213 | $rTasksDuree[] = $det->prod_duration;
214 | else $rTasksDuree[] = '';
215 | }
216 | unset($det);
217 | $db->free($querydet);
218 | }
219 | $db->free($query);
220 | $sql = "SELECT fk_socpeople FROM llx_element_contact WHERE fk_c_type_contact = " . intval($CDAV_PROJ_USER_ROLE) . " AND element_id = " . intval($object->id);
221 | $querydet = $db->query($sql);
222 | if ($querydet && ($row = $db->fetch_object($querydet)) !== null)
223 | $task_user = $row->fk_socpeople;
224 | else $task_user = $user->id;
225 | $db->free($querydet);
226 | // echo "\nrTasksLib ";
227 | // print_r($rTasksLib);
228 |
229 |
230 | if (count($rTasksLib) > 0 || $bDocs) { // create pre & post tasks even if no service in docs
231 | // retrieve n post-tasks [0-3]
232 | $i = 0;
233 | while (++$i <= 3) {
234 | if (isset(${'CDAV_GENTASK_END' . $i}) && ${'CDAV_GENTASK_END' . $i} > 0) {
235 | // Found CDAV_GENTASK_END$i ==> ${'CDAV_GENTASK_END' . $i}
236 | $sqldet = "SELECT label, description, duration FROM " . MAIN_DB_PREFIX . "product WHERE rowid = " . intval(${'CDAV_GENTASK_END' . $i});
237 | $querydet = $db->query($sqldet);
238 | while ($querydet && ($det = $db->fetch_object($querydet)) !== null) {
239 | $rPostTasksLib[] = $det->label;
240 | $rPostTasksDesc[] = $det->description;
241 | $rPostTasksDuree[] = $det->duration;
242 | }
243 | $db->free($querydet);
244 | unset($det);
245 | }
246 | }
247 |
248 | // merging pre & post tasks
249 | $rTasksLib = array_merge_recursive($rPreTasksLib, $rTasksLib, $rPostTasksLib);
250 | $rTasksDesc = array_merge_recursive($rPreTasksDesc, $rTasksDesc, $rPostTasksDesc);
251 | $rTasksDuree = array_merge_recursive($rPreTasksDuree, $rTasksDuree, $rPostTasksDuree);
252 |
253 | //echo "\nrTasksDuree ";
254 | //print_r($rTasksDuree);
255 | //exit;
256 |
257 | // creating tasks
258 |
259 | $rechI = '/[ ]*([0123456789]*)[ ]*[i|min]/i';
260 | $rechH = '/[ ]*([0123456789]*)[ ]*h/i';
261 | $rechJ = '/[ ]*([0123456789]*)[ ]*[j|d|t]/i';
262 | $rechS = '/[ ]*([0123456789]*)[ ]*[s|w]/i';
263 | $hIni = 7;
264 | $hEnd = 19;
265 | if (!empty($CDAV_TASK_HOUR_INI))
266 | $hIni = $CDAV_TASK_HOUR_INI;
267 | if (!empty($CDAV_TASK_HOUR_END))
268 | $hEnd = $CDAV_TASK_HOUR_END;
269 |
270 | if (intval($hEnd) < intval($hIni)) {
271 | $hTmp = $hIni;
272 | $hIni = $hEnd;
273 | $hEnd = $hTmp;
274 | }
275 |
276 | foreach ($rTasksLib as $taskid => $label) {
277 | $defaultref = '';
278 | $obj = empty($conf->global->PROJECT_TASK_ADDON) ? 'mod_task_simple' : $conf->global->PROJECT_TASK_ADDON;
279 | if (!empty($conf->global->PROJECT_TASK_ADDON) && is_readable(DOL_DOCUMENT_ROOT . "/core/modules/project/task/" . $conf->global->PROJECT_TASK_ADDON . ".php")) {
280 | require_once DOL_DOCUMENT_ROOT . "/core/modules/project/task/" . $conf->global->PROJECT_TASK_ADDON . '.php';
281 | $modTask = new $obj;
282 | $defaultref = $modTask->getNextValue($object->thirdparty, null);
283 | }
284 | if (is_numeric($defaultref) && $defaultref <= 0) $defaultref = '';
285 |
286 | $label = trim($label);
287 | $desc = trim(strip_tags($rTasksDesc[$taskid]));
288 |
289 | if (empty($label)) {
290 | $descLines = explode("\n", $desc);
291 | $label = trim($descLines[0]);
292 | }
293 |
294 | if (preg_match_all($rechI, $rTasksDuree[$taskid], $out0))
295 | $task_duration = intval($out0[1][0]) * 60;
296 | elseif (preg_match_all($rechH, $rTasksDuree[$taskid], $out1)) {
297 | //if( $hIni + intval($out1[1][0]) <= 24 )
298 | $task_duration = intval($out1[1][0]) * 3600;
299 | //else // too many hour for a single day, convert hours in working days after rounding
300 | // $task_duration = (intval($hEnd)-intval($hIni))*3600 + ( (round(intval($out[1][0])/($hEnd-$hIni))-1)*3600*24 );
301 | } elseif (preg_match_all($rechJ, $rTasksDuree[$taskid], $out2))
302 | $task_duration = (intval($hEnd) - intval($hIni)) * 3600 + ((intval($out2[1][0]) - 1) * 3600 * 24);
303 | elseif (preg_match_all($rechS, $rTasksDuree[$taskid], $out3))
304 | $task_duration = (intval($hEnd) - intval($hIni)) * 3600 + (((intval($out3[1][0])) * 3600 * 24 * 7) - 24 * 3600);
305 | else $task_duration = 3600;
306 |
307 | $task = new Task($db);
308 | $task->ref = $defaultref;
309 | $task->fk_task_parent = 0;
310 | $task->fk_project = intval($object->id);
311 | $task->label = $label;
312 | $task->description = $desc;
313 | $task->fk_statut = 0;
314 | $task->date_c = time();
315 | $task->date_start = $date_start + intval($hIni) * 3600;
316 | $task->date_end = $date_start + intval($hIni) * 3600 + $task_duration;
317 | $task->fk_user_creat = $user->id;
318 | $task->fk_user_valid = $user->id;
319 |
320 | $task_id = $task->create($user);
321 | // echo "Task ";
322 | // print_r($task);
323 |
324 | if ($task_id > 0) {
325 | $sql = "INSERT INTO " . MAIN_DB_PREFIX . "element_contact (`datecreate`, `statut`, `element_id`, `fk_c_type_contact`, `fk_socpeople` )
326 | VALUES (
327 | NOW(),
328 | 4,
329 | " . (int) $task_id . ",
330 | " . (int) $CDAV_TASK_USER_ROLE . ",
331 | " . (int) $task_user . "
332 | )";
333 | }
334 | $db->query($sql);
335 |
336 | /*$ref = "TK".date("ym")."-".$tasknum;
337 | $sql = "INSERT INTO ".MAIN_DB_PREFIX."projet_task (`ref`, `entity`, `fk_projet`, `datec`, `label`, `description`, ``, ``, ``, ``, ``)
338 | VALUES (
339 | ,
340 | ,
341 | )";*/
342 |
343 | //$db->query($sql);
344 | }
345 | }
346 | }
347 |
348 |
349 | /*
350 | if (! $error)
351 | {
352 | $this->results = array('myreturn' => $myvalue);
353 | $this->resprints = 'A text to show';
354 | return 0; // or return 1 to replace standard code
355 | }
356 | else
357 | {
358 | $this->errors[] = 'Error message';
359 | return -1;
360 | }
361 | */
362 | return 0;
363 | }
364 |
365 |
366 | /**
367 | * Overloading the formObjectOptions function : replacing the parent's function with the one below
368 | *
369 | * @param array $parameters Hook metadatas (context, etc...)
370 | * @param CommonObject $object The object to process (an invoice if you are in invoice module, a propale in propale's module, etc...)
371 | * @param string $action Current action (if set). Generally create or edit or null
372 | * @return int < 0 on error, 0 on success, 1 to replace standard code
373 | */
374 | public function formObjectOptions($parameters, &$object, &$action)
375 | {
376 | global $user, $conf, $db;
377 |
378 | // echo "formObjectOptions parameters: ";
379 | // print_r($parameters);
380 | // echo "formObjectOptions object: ";
381 | // print_r($object);
382 | // echo "formObjectOptions action: ";
383 | // print_r($action);
384 |
385 | if ($parameters['currentcontext'] == 'projecttaskscard' && $parameters['id'] > 0) {
386 | $sql = 'SELECT pt.rowid, us.color, us.login, us.firstname, us.lastname
387 | FROM ' . MAIN_DB_PREFIX . 'projet_task AS pt
388 | LEFT JOIN ' . MAIN_DB_PREFIX . 'element_contact as ec ON (ec.element_id=pt.rowid)
389 | LEFT JOIN ' . MAIN_DB_PREFIX . 'user as us ON (us.rowid=ec.fk_socpeople)
390 | LEFT JOIN ' . MAIN_DB_PREFIX . 'c_type_contact as tc ON (tc.rowid=ec.fk_c_type_contact AND tc.element="project_task" AND tc.source="internal")
391 | WHERE tc.element="project_task" AND tc.source="internal" AND us.login IS NOT NULL
392 | AND pt.fk_projet=' . intval($parameters['id']) . ' AND pt.entity IN (' . getEntity('societe', 1) . ')
393 | ORDER BY pt.rowid, us.login';
394 | $result = $db->query($sql);
395 | echo "\n\n";
400 | }
401 | }
402 | }
403 |
--------------------------------------------------------------------------------
/core/modules/modCDav.class.php:
--------------------------------------------------------------------------------
1 |
3 | * Copyright (C) 2004-2012 Laurent Destailleur Dolibarr module to synchronize calendars, project tasks and address book from CalDAV/CardDAV/ICS client tools such as Mozilla Thunderbird/Lightning or Android DAVDroid. Dolibarr becomes a CalDAV/CardDAV server.
2 | -------------------------------------------------------------------------------- /doc/description_fr.html: -------------------------------------------------------------------------------- 1 |Module Dolibarr pour synchroniser les agendas, tâches de projet et carnet d'adresses depuis des outils client CalDAV/CardDAV/ICS tel que Mozilla Thunderbird/Lightning ou Android DAVDroid. Dolibarr devient un serveur CalDAV/CardDAV.
2 | -------------------------------------------------------------------------------- /doc/description_lo_en.html: -------------------------------------------------------------------------------- 1 | 2 | 3 | 4 | 5 |Dolibarr module to synchronize calendars, project tasks and address 12 | book from CalDAV/CardDAV/ICS client tools such as Mozilla 13 | Thunderbird/Lightning or Android DAVx5. Dolibarr becomes a 14 | CalDAV/CardDAV server.
15 |Since version 2, this module allows to sync tasks, which can be 16 | created (according to setup) in projects from docs like proposals or 17 | orders.
18 |You obtain a great tool for driving your tech teams !
19 | 20 | 21 | -------------------------------------------------------------------------------- /doc/description_lo_fr.html: -------------------------------------------------------------------------------- 1 | 2 | 3 | 4 | 5 |Module Dolibarr pour synchroniser les agendas, tâches de projet et 12 | carnet d'adresses depuis des outils client CalDAV/CardDAV/ICS tel que 13 | Mozilla Thunderbird/Lightning ou Android DAVx5. Dolibarr devient un 14 | serveur CalDAV/CardDAV.
15 |A partir de la version 2, le module permet de synchroniser aussi 16 | les tâches des projets, qui peuvent être créées de façon 17 | paramétrable depuis les documents de type propositions ou commandes.
18 |Vous obtenez alors un outil de planification d’intervention pour 19 | vos équipes sur le terrain !
20 |
21 |
22 |
23 |
CardDAV / CalDAV and ICS synchronisation. It uses included Sabre/DAV library.
2 |You can :
3 |-
4 |
- Read and Edit Dolibarr calendars through CalDAV 5 |
- Read and Edit Dolibarr project tasks through CalDAV 6 |
- Read and Edit Dolibarr addressBooks through CardDAV 7 |
- Read Dolibarr calendars through ICS Full version or only Free/Busy (hide details) 8 |
- Access Dolibarr documents through WebDAV (if admin) 9 |
Each user can access his/her contacts address book (public and own private contacts), his/her own calendar and other users calendars according to his/her rights.
11 |Dolibarr contact informations fill personnal informations in client software cards.
12 |Society informations (to which contact is attached) fill professional informations in client software cards.
13 |Cards updated in client software fill only Dolibarr contacts (not Society).
14 |It is possible to select which contacts to sync with CDAV_CONTACT_TAG configuration value in Home / Setup / Other setup. Enter a contact tag value and then only contacts with this tag will be synced (empty value for all).
15 |Calendar records with "Status / Percentage" set to "Not applicable" are converted to events in CalDAV (VEVENT), others are converted to tasks (VTODO).
16 |Recurring events are not handled.
17 |Module version: auto
Publisher/Licence: Befox SARL / GPLv3
User interface language: English/French
Help/Support: http://www.befox.fr/contact
Prerequisites:
-
19 |
- Dolibarr min version: 20 |
- Dolibarr max version: 21 |
Install:
23 |-
24 |
- Download the archive file of module (.zip file) from web site DoliStore.com 25 |
- Put the file into the root directory of Dolibarr. 26 |
- Uncompress the zip file, for example with command 27 |
29 |
33 |
30 |
32 | unzip modulefile.zip31 |
-
34 |
- Module is then available and can be activated. 35 |
Synchronisation CardDAV / CalDAV et ICS. Ce module inclut la bibliothèque Sabre/DAV.
2 |Vous pouvez :
3 |-
4 |
- Lire et éditer les agendas Dolibarr au travers de CalDAV 5 |
- Lire et éditer les tâches de projet au travers de CalDAV 6 |
- Lire et éditer les carnets d'adresse au travers de CardDAV 7 |
- Lire les agendas Dolibarr au travers d'ICS en vue complète ou en vue libre/occupé (detail masqué) 8 |
- Accéder aux documents Dolibarr au travers de WebDAV (si utilisateur admin) 9 |
Chaque utilisateur accède à ses contacts (publics ou ses contacts privés), à son agenda et ceux des autres utilisateurs en fonction de ses droits.
11 |Les informations de contact Dolibarr remplissent les champs personnels de la fiche contact.
12 |Les informations de tiers Dolibarr remplissent les champs professionnels de la fiche contact associée.
13 |Les fiches contact mise à jour sur le logiciel client n'alimentent que le contact Dolibarr (le Tiers n'est jamais modifié).
14 |Il est possible de sélectionner quels contacts sont synchronisés en spécifiant la catégorie/tag des contacts concernés. Par défaut tous les contacts sont synchronisés.
15 |Les enregistrement d'agenda avec un "Statut / Pourcentage" à "Non applicable" sont convertis en évènements CalDAV (VEVENT), les autres sont convertis en tâches (VTODO).
16 |Les évènements récurrents ne sont pas gérés.
17 |Module version: auto
Editeur/Licence: Befox SARL / GPLv3
Langage interface: Anglais
Assistance: http://www.befox.fr/contact
Prérequis:
-
19 |
- Dolibarr min version: 20 |
- Dolibarr max version: 21 |
Installation:
23 |-
24 |
- Télécharger le fichier archive du module (.zip) depuis le site web DoliStore.com 25 |
- Placer le fichier dans le répertoire racine de dolibarr. 26 |
- Decompressez le fichier zip, par exemple par la commande 27 |
29 |
33 |
30 |
32 | unzip fichiermodule.zip31 |
-
34 |
- Le module est alors disponible et activable. 35 |
CardDAV / CalDAV and ICS synchronisation. It uses included 15 | Sabre/DAV library.
16 |You can :
17 |-
18 |
19 |
Read and Edit Dolibarr calendars 20 | through CalDAV 21 |
22 | 23 | 24 |Read and Edit Dolibarr project tasks 25 | through CalDAV 26 |
27 | 28 |Read and Edit Dolibarr 29 | addressBooks through CardDAV 30 |
31 | 32 |Read Dolibarr calendars through 33 | ICS Full version or only Free/Busy (hide details) 34 |
35 | 36 |Access Dolibarr documents through WebDAV (if admin) 37 |
38 |Each user can access his/her contacts address book (public and own 40 | private contacts), his/her own calendar and other users calendars 41 | according to his/her rights.
42 |Dolibarr contact informations fill personnal informations in 43 | client software cards.
44 |Society informations (to which contact is attached) fill 45 | professional informations in client software cards.
46 |Cards updated in client software fill only Dolibarr contacts (not 47 | Society).
48 |It is possible to select which contacts to sync with 49 | CDAV_CONTACT_TAG configuration value in Home / Setup / Other setup. 50 | Enter a contact tag value and then only contacts with this tag will 51 | be synced (empty value for all).
52 |Calendar records with "Status / Percentage" set to "Not
53 | applicable" are converted to events in CalDAV (VEVENT), others
54 | are converted to tasks (VTODO).
55 | Recurring events are not
56 | handled.
Project tasks are synchronized to the calendar and/or
58 | remote tasks (no duplication in Dolibarr). Tasks descriptions
59 | containing lines beginning with “- “ generate new items that can
60 | then be checked, which advance the percentage of completion (Declared
61 | progress)
62 | Previously, task generation can be created
63 | automatically from documents attached to the project (proposals and /
64 | or orders) in a customizable way.
Module version: auto
66 | Publisher/Licence:
67 | Befox SARL / GPLv3
68 | User
69 | interface language: English/French
70 | Help/Support:
71 | http://www.befox.fr/contact
72 | Prerequisites:
-
74 |
75 |
Dolibarr min version: auto 76 |
77 | 78 |Dolibarr max version: auto 79 |
80 |Install:
82 |-
83 |
84 |
Download the archive file of 85 | module (.zip file) from web site DoliStore.com 86 |
87 | 88 |Put the file into the root 89 | directory of Dolibarr. 90 |
91 | 92 |Uncompress the zip file, for example with command 93 |
94 |unzip modulefile.zip96 |
-
97 |
98 |
Module is then available and can be activated. 99 |
100 |Synchronisation CardDAV / CalDAV et ICS. Ce module inclut la 15 | bibliothèque Sabre/DAV.
16 |Vous pouvez :
17 |-
18 |
19 |
Lire et éditer les agendas 20 | Dolibarr au travers de CalDAV 21 |
22 | 23 | 24 |Lire et éditer les tâches de projet 25 | Dolibarr au travers de CalDAV 26 |
27 | 28 |Lire et éditer les carnets 29 | d'adresse au travers de CardDAV 30 |
31 | 32 |Lire les agendas Dolibarr au 33 | travers d'ICS en vue complète ou en vue libre/occupé (détail 34 | masqué) 35 |
36 | 37 |Lire et éditer les tâches 38 | Dolibarr au travers de CalDAV 39 |
40 | 41 |Accéder aux documents Dolibarr au travers de WebDAV (si 42 | utilisateur admin) 43 |
44 |Chaque utilisateur accède à ses contacts (publics ou ses 46 | contacts privés), à son agenda et ceux des autres utilisateurs en 47 | fonction de ses droits, à ses tâches et celles des autres 48 | utilisateurs en fonction de ses droits.
49 |Les informations de contact Dolibarr remplissent les champs 50 | personnels de la fiche contact.
51 |Les informations de tiers Dolibarr remplissent les champs 52 | professionnels de la fiche contact associée.
53 |Les fiches contact mise à jour sur le logiciel client 54 | n'alimentent que le contact Dolibarr (le Tiers n'est jamais modifié).
55 |Il est possible de sélectionner quels contacts sont synchronisés 56 | en spécifiant la catégorie/tag des contacts concernés. Par défaut 57 | tous les contacts sont synchronisés.
58 |Les enregistrement d'agenda avec un "Statut / Pourcentage"
59 | à "Non applicable" sont convertis en évènements CalDAV
60 | (VEVENT), les autres sont convertis en tâches (VTODO).
61 | Les
62 | évènements récurrents ne sont pas gérés.
Les tâches des projets sont synchronisées vers l’agenda et/ou
64 | les tâches distants (pas de duplication dans Dolibarr). La
65 | description des tâches contenant des lignes commençant par «- »
66 | génèrent des items sur le terrain qui peuvent alors être cochés
67 | et faire avancer le pourcentage de réalisation de la tâches
68 | ( Progression déclarée – Declared progress )
69 | Auparavant,
70 | la génération des tâches peuvent être créées automatiquement en
71 | provenance de documents attachés au projet (propositions et/ou
72 | commandes) et ce, de façon paramétrable.
74 |
75 |
76 |
Module version: auto
78 | Editeur/Licence: Befox
79 | SARL / GPLv3
80 | Langage interface:
81 | Anglais
82 | Assistance:
83 | http://www.befox.fr/contact
84 | Prérequis:
-
86 |
87 |
Dolibarr min version: auto 88 |
89 | 90 |Dolibarr max version: auto 91 |
92 |Installation:
94 |-
95 |
96 |
Télécharger le fichier archive 97 | du module (.zip) depuis le site web DoliStore.com 98 |
99 | 100 |Placer le fichier dans le 101 | répertoire racine de dolibarr. 102 |
103 | 104 |Decompressez le fichier zip, par exemple par la commande 105 |
106 |unzip fichiermodule.zip108 |
-
109 |
110 |
Le module est alors disponible et activable. 111 |
112 |