LSsearch : add customAction feature
[ldapsaisie.git] / public_html / custom_search_action.php
1 <?php
2 /*******************************************************************************
3  * Copyright (C) 2007 Easter-eggs
4  * http://ldapsaisie.labs.libre-entreprise.org
5  *
6  * Author: See AUTHORS file in top-level directory.
7  *
8  * This program is free software; you can redistribute it and/or
9  * modify it under the terms of the GNU General Public License version 2
10  * as published by the Free Software Foundation.
11  *
12  * This program is distributed in the hope that it will be useful,
13  * but WITHOUT ANY WARRANTY; without even the implied warranty of
14  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
15  * GNU General Public License for more details.
16  *
17  * You should have received a copy of the GNU General Public License
18  * along with this program; if not, write to the Free Software
19  * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111-1307, USA.
20
21 ******************************************************************************/
22
23 require_once 'core.php';
24
25 if(LSsession :: startLSsession()) {
26
27   if ((isset($_GET['LSobject'])) && (isset($_GET['customAction']))) {
28     $LSobject=urldecode($_GET['LSobject']);
29     $customAction=urldecode($_GET['customAction']);
30
31     if (LSsession :: loadLSclass('LSsearch')) {
32         $LSsearch = new LSsearch($LSobject,'LSview');
33         $LSsearch -> setParam('extraDisplayedColumns',True);
34         $LSsearch -> setParamsFormPostData();
35
36         if ( LSsession :: canExecuteLSsearchCustomAction($LSsearch,$customAction) ) {
37           $config = LSconfig :: get('LSobjects.'.$LSobject.'.LSsearch.customActions.'.$customAction);
38           if (isset($config['function']) && is_callable($config['function'])) {
39             if (isset($config['label'])) {
40               $title=__($config['label']);
41             }
42             else {
43               $title=__($customAction);
44             }
45             if (isset($_GET['valid']) || $config['noConfirmation']) {
46               LStemplate :: assign('pagetitle',$title);
47               if ($config['function']($LSsearch)) {
48                 if ($config['disableOnSuccessMsg']!=true) {
49                   if ($config['onSuccessMsgFormat']) {
50                     LSsession :: addInfo(getFData(__($config['onSuccessMsgFormat']),$objectname));
51                   }
52                   else {
53                     LSsession :: addInfo(getFData(_('The custom action %{title} have been successfully execute this search.'),$title));
54                   }
55                 }
56                 if (!isset($config['redirectToObjectList']) || $config['redirectToObjectList']) {
57                   LSsession :: redirect('view.php?LSobject='.$LSobject.'&refresh');
58                 }
59               }
60               else {
61                 LSerror :: addErrorCode('LSsearch_16',$customAction);
62               }
63             }
64             else {
65               $question=(
66                 isset($config['question_format'])?
67                 getFData(__($config['question_format']),$title):
68                 getFData(_('Do you really want to execute custom action %{title} on this search ?'),$title)
69               );
70               LStemplate :: assign('pagetitle',$title);
71               LStemplate :: assign('question',$question);
72               LStemplate :: assign('validation_url','custom_search_action.php?LSobject='.urlencode($LSobject).'&amp;customAction='.urlencode($customAction).'&amp;valid');
73               LStemplate :: assign('validation_label',_('Validate'));
74               LSsession :: setTemplate('question.tpl');
75             }
76           }
77           else {
78             LSerror :: addErrorCode('LSsession_13');
79           }
80         }
81         else {
82           LSerror :: addErrorCode('LSsession_11');
83         }
84     }
85     else {
86       LSsession :: addErrorCode('LSsession_05','LSsearch');
87     }
88   }
89   else {
90     LSerror :: addErrorCode('LSsession_12');
91   }
92
93 }
94 else {
95   LSsession :: setTemplate('login.tpl');
96 }
97
98 // Affichage des retours d'erreurs
99 LSsession :: displayTemplate();
100 ?>