2001-07-12 01:17:32 +02:00
< ? php
2006-10-04 19:40:33 +02:00
/**
* InfoLog - User interface
*
* @ link http :// www . egroupware . org
* @ author Ralf Becker < RalfBecker - AT - outdoor - training . de >
* @ package infolog
2010-02-05 04:34:17 +01:00
* @ copyright ( c ) 2003 - 10 by Ralf Becker < RalfBecker - AT - outdoor - training . de >
2006-10-04 19:40:33 +02:00
* @ license http :// opensource . org / licenses / gpl - license . php GPL - GNU General Public License
* @ version $Id $
*/
2001-07-12 01:17:32 +02:00
2006-10-04 19:40:33 +02:00
/**
* This class is the UI - layer ( user interface ) of InfoLog
*/
2008-10-07 14:50:14 +02:00
class infolog_ui
2006-10-04 19:40:33 +02:00
{
2008-10-07 14:50:14 +02:00
var $public_functions = array (
2006-10-04 19:40:33 +02:00
'index' => True ,
'edit' => True ,
'delete' => True ,
'close' => True ,
'admin' => True ,
'hook_view' => True ,
'writeLangFile' => True ,
'import_mail' => True ,
);
/**
* reference to the infolog preferences of the user
*
* @ var array
*/
var $prefs ;
/**
* instance of the bo - class
2008-04-18 13:53:55 +02:00
*
2006-10-04 19:40:33 +02:00
* @ var boinfolog
*/
var $bo ;
/**
* instance of the etemplate class
*
* @ var etemplate
*/
var $tmpl ;
/**
* allowed units and hours per day , can be overwritten by the projectmanager configuration , default all units , 8 h
2008-04-18 13:53:55 +02:00
*
2006-10-04 19:40:33 +02:00
* @ var string
*/
var $duration_format = ',' ; // comma is necessary!
2008-04-18 13:53:55 +02:00
2006-10-04 19:40:33 +02:00
var $icons = array (
'type' => array (
'task' => 'task.gif' , 'task_alt' => 'Task' ,
'phone' => 'phone.gif' , 'phone_alt' => 'Phonecall' ,
'note' => 'note.gif' , 'note_alt' => 'Note' ,
'confirm' => 'confirm.gif' , 'confirm_alt' => 'Confirmation' ,
'reject' => 'reject.gif' , 'reject_alt' => 'Reject' ,
'email' => 'email.gif' , 'email_alt' => 'Email' ),
'action' => array (
'new' => 'new.gif' , 'new_alt' => 'Add Sub' ,
'view' => 'view.gif' , 'view_alt' => 'View Subs' ,
'parent' => 'parent.gif' , 'parent_alt' => 'View other Subs' ,
'edit' => 'edit.gif' , 'edit_alt' => 'Edit' ,
'addfile' => 'addfile.gif' , 'addfile_alt' => 'Add a file' ,
'delete' => 'delete.gif' , 'delete_alt' => 'Delete' ,
2009-04-23 16:47:26 +02:00
'close' => 'done.gif' , 'close_alt' => 'Close' ,
'close_all' => 'done_all.gif' , 'close_all_alt' => 'Close' ),
2006-10-04 19:40:33 +02:00
'status' => array (
'billed' => 'billed.gif' , 'billed_alt' => 'billed' ,
'done' => 'done.gif' , 'done_alt' => 'done' ,
'will-call' => 'will-call.gif' , 'will-call_alt' => 'will-call' ,
'call' => 'call.gif' , 'call_alt' => 'call' ,
'ongoing' => 'ongoing.gif' , 'ongoing_alt' => 'ongoing' ,
'offer' => 'offer.gif' , 'offer_alt' => 'offer' )
);
2009-05-05 14:48:38 +02:00
var $filters ;
2006-10-04 19:40:33 +02:00
var $messages = array (
'edit' => 'InfoLog - Edit' ,
'add' => 'InfoLog - New' ,
'add_sub' => 'InfoLog - New Subproject' ,
'sp' => '- Subprojects from' ,
're' => 'Re:'
);
2006-10-20 15:13:00 +02:00
/**
* Constructor
*
2008-10-07 14:50:14 +02:00
* @ return infolog_ui
2006-10-20 15:13:00 +02:00
*/
2008-10-07 14:50:14 +02:00
function __construct ()
2001-07-12 01:17:32 +02:00
{
2009-07-13 12:33:26 +02:00
if ( $GLOBALS [ 'egw_info' ][ 'flags' ][ 'currentapp' ] != 'infolog' ) $GLOBALS [ 'egw' ] -> translation -> add_app ( 'infolog' );
2009-06-08 18:21:14 +02:00
$this -> bo = new infolog_bo ();
2006-10-04 19:40:33 +02:00
2008-03-08 22:43:13 +01:00
$this -> tmpl = new etemplate ();
2001-07-12 01:17:32 +02:00
2006-10-04 19:40:33 +02:00
$this -> user = $GLOBALS [ 'egw_info' ][ 'user' ][ 'account_id' ];
2008-04-18 13:53:55 +02:00
2006-10-04 19:40:33 +02:00
$this -> prefs =& $GLOBALS [ 'egw_info' ][ 'user' ][ 'preferences' ][ 'infolog' ];
2008-04-18 13:53:55 +02:00
2006-10-04 19:40:33 +02:00
// read the duration format from project-manager
if ( $GLOBALS [ 'egw_info' ][ 'apps' ][ 'projectmanager' ])
2001-07-14 23:44:01 +02:00
{
2008-01-19 06:36:20 +01:00
$pm_config = config :: read ( 'projectmanager' );
$this -> duration_format = str_replace ( ',' , '' , $pm_config [ 'duration_units' ]) . ',' . $pm_config [ 'hours_per_workday' ];
2006-10-04 19:40:33 +02:00
unset ( $pm_config );
2002-10-14 02:39:47 +02:00
}
2009-05-05 14:48:38 +02:00
$this -> filters =& $this -> bo -> filters ;
2007-06-10 11:21:04 +02:00
/* these are just for testing of the notifications
for ( $i = - 1 ; $i <= 3 ; ++ $i )
{
$this -> filters [ 'delegated-open-enddate' . date ( 'Y-m-d' , time () + $i * 24 * 60 * 60 )] = " delegated due in $i day(s) " ;
}
for ( $i = - 1 ; $i <= 3 ; ++ $i )
{
$this -> filters [ 'responsible-open-enddate' . date ( 'Y-m-d' , time () + $i * 24 * 60 * 60 )] = " responsible due in $i day(s) " ;
}
for ( $i = - 1 ; $i <= 3 ; ++ $i )
{
$this -> filters [ 'delegated-open-date' . date ( 'Y-m-d' , time () + $i * 24 * 60 * 60 )] = " delegated starting in $i day(s) " ;
}
for ( $i = - 1 ; $i <= 3 ; ++ $i )
{
$this -> filters [ 'responsible-open-date' . date ( 'Y-m-d' , time () + $i * 24 * 60 * 60 )] = " responsible starting in $i day(s) " ;
}
*/
2008-10-07 14:50:14 +02:00
$GLOBALS [ 'infolog_ui' ] =& $this ; // make ourself availible for ExecMethod of get_rows function
2006-10-04 19:40:33 +02:00
}
2002-10-14 02:39:47 +02:00
2006-10-20 15:13:00 +02:00
/**
* Sets additional fields for one infolog entry , which are not persistent in the DB
*
* @ param array $info infolog entry read from the db
* @ param array & $readonlys ACL specific settings for the buttons
* @ param string $action
* @ param string / int $action_id
* @ param boolean $show_links
* @ param int $details
* @ return array
*/
2006-10-04 19:40:33 +02:00
function get_info ( $info , & $readonlys , $action = '' , $action_id = '' , $show_links = false , $details = 1 )
{
if ( ! is_array ( $info ))
2002-10-14 02:39:47 +02:00
{
2006-10-04 19:40:33 +02:00
$info = $this -> bo -> read ( $info );
}
$id = $info [ 'info_id' ];
2009-04-23 16:47:26 +02:00
$done = $info [ 'info_status' ] == 'done' || $info [ 'info_status' ] == 'billed' || $info [ 'info_status' ] == 'cancelled' ; //cancelled is regarded as a completed status as well in bo
// regard an infolog as done/billed/cancelled if its percentage is 100% when there is to status like the above for that type
if ( ! $done && ! isset ( $this -> bo -> status [ $info [ 'info_type' ]][ 'done' ]) && ! isset ( $this -> bo -> status [ $info [ 'info_type' ]][ 'billed' ]) &&
2009-05-05 14:48:38 +02:00
! isset ( $this -> bo -> status [ $info [ 'info_type' ]][ 'cancelled' ]) && ( int ) $info [ 'info_percent' ] == 100 ) $done = true ;
2006-10-04 19:40:33 +02:00
$info [ 'sub_class' ] = $this -> bo -> enums [ 'priority' ][ $info [ 'info_priority' ]] . ( $done ? '_done' : '' );
if ( ! $done && $info [ 'info_enddate' ] < $this -> bo -> user_time_now )
{
$info [ 'end_class' ] = 'overdue' ;
}
if ( ! isset ( $info [ 'info_anz_subs' ])) $info [ 'info_anz_subs' ] = $this -> bo -> anzSubs ( $id );
$this -> bo -> link_id2from ( $info , $action , $action_id ); // unset from for $action:$action_id
$info [ 'info_percent' ] = ( int ) $info [ 'info_percent' ] . '%' ;
2009-04-23 16:47:26 +02:00
$editrights = $this -> bo -> check_access ( $info , EGW_ACL_EDIT );
$isresposible = $this -> bo -> is_responsible ( $info );
$readonlys [ " edit[ $id ] " ] = ! ( $editrights || // edit rights or more then standard responsible rights
$isresposible && array_diff ( $this -> bo -> responsible_edit , array ( 'info_status' , 'info_percent' , 'info_datecompleted' )));
2008-04-18 13:53:55 +02:00
$readonlys [ " close[ $id ] " ] = $done || ( $readonlys [ " edit_status[ $id ] " ] =
2009-04-23 16:47:26 +02:00
! ( $editrights || $isresposible ));
$readonlys [ " close_all[ $id ] " ] = ( $done ) || ! $info [ 'info_anz_subs' ] || ( $readonlys [ " edit_status[ $id ] " ] =
! ( $editrights || $isresposible )); // this one is supressed, when you are not allowed to edit, or not responsible, or the entry is closed
// and has no children. If you want that this one is shown if there are children regardless of the status of the current or its childs,
// then modify ($done) to ($done && !$info['info_anz_subs'])
2008-04-18 13:53:55 +02:00
$readonlys [ " edit_status[ $id ] " ] = $readonlys [ " edit_percent[ $id ] " ] =
2009-04-23 16:47:26 +02:00
! $editrights && ! $isresposible &&
2007-06-13 23:37:05 +02:00
! $this -> bo -> check_access ( $info , EGW_ACL_UNDELETE ); // undelete is handled like status edit
2006-10-04 19:40:33 +02:00
$readonlys [ " delete[ $id ] " ] = ! $this -> bo -> check_access ( $info , EGW_ACL_DELETE );
$readonlys [ " sp[ $id ] " ] = ! $this -> bo -> check_access ( $info , EGW_ACL_ADD );
$readonlys [ " view[ $id ] " ] = $info [ 'info_anz_subs' ] < 1 ;
$readonlys [ 'view[0]' ] = True ; // no parent
2007-05-22 15:36:32 +02:00
$readonlys [ " timesheet[ $id ] " ] = ! isset ( $GLOBALS [ 'egw_info' ][ 'user' ][ 'apps' ][ 'timesheet' ]);
2002-10-14 02:39:47 +02:00
2006-10-04 19:40:33 +02:00
if ( ! $show_links ) $show_links = $this -> prefs [ 'show_links' ];
2008-04-18 13:53:55 +02:00
if (( $show_links != 'none' && $show_links != 'no_describtion' ||
$this -> prefs [ 'show_times' ] || isset ( $GLOBALS [ 'egw_info' ][ 'user' ][ 'apps' ][ 'timesheet' ])) &&
2010-04-04 11:15:25 +02:00
( isset ( $info [ 'links' ]) || ( $info [ 'links' ] = egw_link :: get_links ( 'infolog' , $info [ 'info_id' ], 'link_lastmod DESC' , true ))))
2006-10-04 19:40:33 +02:00
{
$timesheets = array ();
2008-03-08 22:43:13 +01:00
foreach ( $info [ 'links' ] as $link )
2003-06-29 19:03:47 +02:00
{
2006-10-04 19:40:33 +02:00
if ( $show_links != 'none' && $show_links != 'no_describtion' &&
$link [ 'link_id' ] != $info [ 'info_link_id' ] &&
( $link [ 'app' ] != $action || $link [ 'id' ] != $action_id ) &&
2008-03-08 22:43:13 +01:00
( $show_links == 'all' || ( $show_links == 'links' ) === ( $link [ 'app' ] != egw_link :: VFS_APPNAME )))
2003-06-29 19:03:47 +02:00
{
2006-10-04 19:40:33 +02:00
$info [ 'filelinks' ][] = $link ;
2006-03-21 14:52:49 +01:00
}
2006-10-04 19:40:33 +02:00
if ( ! $info [ 'pm_id' ] && $link [ 'app' ] == 'projectmanager' )
2006-03-21 14:52:49 +01:00
{
2006-10-04 19:40:33 +02:00
$info [ 'pm_id' ] = $link [ 'id' ];
2003-06-29 19:03:47 +02:00
}
2006-10-04 19:40:33 +02:00
if ( $link [ 'app' ] == 'timesheet' ) $timesheets [] = $link [ 'id' ];
2008-04-18 13:53:55 +02:00
2008-03-08 22:43:13 +01:00
if ( $link [ 'app' ] != 'timesheet' && $link [ 'app' ] != egw_link :: VFS_APPNAME )
2006-03-24 17:10:09 +01:00
{
2006-10-04 19:40:33 +02:00
$info [ 'extra_links' ] .= '&link_app[]=' . $link [ 'app' ] . '&link_id[]=' . $link [ 'id' ];
2006-03-24 17:10:09 +01:00
}
}
2006-10-04 19:40:33 +02:00
if ( $this -> prefs [ 'show_times' ] && isset ( $GLOBALS [ 'egw_info' ][ 'user' ][ 'apps' ][ 'timesheet' ]) && $timesheets )
2006-03-24 17:10:09 +01:00
{
2008-10-08 10:13:17 +02:00
$sum = ExecMethod ( 'timesheet.timesheet_bo.sum' , $timesheets );
2006-10-04 19:40:33 +02:00
$info [ 'info_sum_timesheets' ] = $sum [ 'duration' ];
2006-03-24 17:10:09 +01:00
}
2006-10-04 19:40:33 +02:00
}
$info [ 'info_type_label' ] = $this -> bo -> enums [ 'type' ][ $info [ 'info_type' ]];
2008-04-18 13:53:55 +02:00
$info [ 'info_status_label' ] = isset ( $this -> bo -> status [ $info [ 'info_type' ]][ $info [ 'info_status' ]]) ?
2007-06-13 23:37:05 +02:00
$this -> bo -> status [ $info [ 'info_type' ]][ $info [ 'info_status' ]] : $info [ 'info_status' ];
2008-04-18 13:53:55 +02:00
2006-10-04 19:40:33 +02:00
if ( ! $this -> prefs [ 'show_percent' ] || $this -> prefs [ 'show_percent' ] == 2 && ! $details )
{
if ( $info [ 'info_status' ] == 'ongoing' && $info [ 'info_type' ] != 'phone' )
2006-03-24 17:10:09 +01:00
{
2006-10-04 19:40:33 +02:00
$info [ 'info_status' ] = $info [ 'info_status_label' ] = $info [ 'info_percent' ];
2006-03-24 17:10:09 +01:00
}
2006-10-04 19:40:33 +02:00
$readonlys [ " edit_percent[ $id ] " ] = true ;
2002-10-14 02:39:47 +02:00
}
2006-10-04 19:40:33 +02:00
elseif ( $readonlys [ " edit_percent[ $id ] " ]) // show percent, but button is switched off
2002-10-14 02:39:47 +02:00
{
2006-10-04 19:40:33 +02:00
$info [ 'info_percent2' ] = $info [ 'info_percent' ];
2003-12-09 01:08:31 +01:00
}
2006-10-04 19:40:33 +02:00
if ( $this -> prefs [ 'show_id' ] == 1 || $this -> prefs [ 'show_id' ] == 2 && $details )
2004-02-28 15:58:44 +01:00
{
2006-10-04 19:40:33 +02:00
$info [ 'info_number' ] = $info [ 'info_id' ];
2004-02-28 15:58:44 +01:00
}
2006-10-04 19:40:33 +02:00
return $info ;
}
2006-10-20 15:13:00 +02:00
/**
* Saves state of the infolog list in the session
*
* @ param array $values
*/
2006-10-04 19:40:33 +02:00
function save_sessiondata ( $values )
{
$for = @ $values [ 'session_for' ] ? $values [ 'session_for' ] : @ $this -> called_by ;
2008-10-07 14:50:14 +02:00
//echo "<p>$for: ".__METHOD__.'('.print_r($values,True).") called_by='$this->called_by', for='$for'<br />".function_backtrace()."</p>\n";
2009-12-11 09:34:47 +01:00
2009-11-16 10:49:50 +01:00
$arrayToStore = array (
2006-10-04 19:40:33 +02:00
'search' => $values [ 'search' ],
'start' => $values [ 'start' ],
'num_rows' => $values [ 'num_rows' ],
'filter' => $values [ 'filter' ],
'filter2' => $values [ 'filter2' ],
'cat_id' => $values [ 'cat_id' ],
'order' => $values [ 'order' ],
'sort' => $values [ 'sort' ],
'action' => $values [ 'action' ],
'action_id' => $values [ 'action_id' ],
2006-10-23 13:50:30 +02:00
'action_title' => $values [ 'action_title' ],
2006-10-04 19:40:33 +02:00
'col_filter' => $values [ 'col_filter' ],
'session_for' => $for
2009-11-16 10:49:50 +01:00
);
2009-12-11 09:34:47 +01:00
if ( $values [ 'filter' ] == 'bydate' )
2009-11-16 10:49:50 +01:00
{
$arrayToStore [ 'startdate' ] = $values [ 'startdate' ];
$arrayToStore [ 'enddate' ] = $values [ 'enddate' ];
}
$GLOBALS [ 'egw' ] -> session -> appsession ( $for . 'session_data' , 'infolog' , $arrayToStore );
2006-10-04 19:40:33 +02:00
}
2004-02-28 15:58:44 +01:00
2006-10-20 15:13:00 +02:00
/**
* reads list - state from the session
*
* @ return array
*/
2006-10-04 19:40:33 +02:00
function read_sessiondata ()
{
$values = $GLOBALS [ 'egw' ] -> session -> appsession ( @ $this -> called_by . 'session_data' , 'infolog' );
if ( !@ $values [ 'session_for' ] && $this -> called_by )
2003-12-09 01:08:31 +01:00
{
2006-10-04 19:40:33 +02:00
$values [ 'session_for' ] = $this -> called_by ;
$this -> save_sessiondata ( $values );
}
2008-10-07 14:50:14 +02:00
//echo "<p>called_by='$this->called_by': ".__METHOD__."() = ".print_r($values,True)."</p>\n";
2006-10-04 19:40:33 +02:00
return $values ;
}
2006-03-15 20:08:40 +01:00
2006-10-20 15:13:00 +02:00
/**
* Callback for nextmatch widget
*
* @ param array & $query
* @ param array & $rows
* @ param array & $readonlys
* @ return int
*/
function get_rows ( & $query , & $rows , & $readonlys )
2006-10-04 19:40:33 +02:00
{
2009-11-10 09:11:41 +01:00
$orginal_colfilter = $query [ 'col_filter' ];
if ( $query [ 'filter' ] == 'bydate' )
{
$query [ 'header_left' ] = 'infolog.index.dates' ;
$GLOBALS [ 'egw' ] -> js -> set_onload ( " set_style_by_class('table','custom_hide','visibility','visible'); " );
2009-12-11 09:34:47 +01:00
if ( is_int ( $query [ 'startdate' ])) $query [ 'col_filter' ][] = 'info_startdate > ' . $GLOBALS [ 'egw' ] -> db -> quote ( $query [ 'startdate' ]);
if ( is_int ( $query [ 'enddate' ])) $query [ 'col_filter' ][] = 'info_startdate < ' . $GLOBALS [ 'egw' ] -> db -> quote ( $query [ 'enddate' ]);
2009-11-10 09:11:41 +01:00
//unset($query['startdate']);
//unset($query['enddate']);
}
else
{
unset ( $query [ 'header_left' ]);
unset ( $query [ 'startdate' ]);
unset ( $query [ 'enddate' ]);
}
//_debug_array($query);
//_debug_array($query['col_filter']);
2008-10-22 08:51:01 +02:00
//echo "<p>infolog_ui.get_rows(start=$query[start],search='$query[search]',filter='$query[filter]',cat_id=$query[cat_id],action='$query[action]/$query[action_id]',col_filter=".print_r($query['col_filter'],True).",sort=$query[sort],order=$query[order])</p>\n";
2006-10-04 19:40:33 +02:00
if ( ! isset ( $query [ 'start' ])) $query [ 'start' ] = 0 ;
2007-09-22 16:58:10 +02:00
if ( ! $query [ 'csv_export' ])
{
$this -> save_sessiondata ( $query );
}
else
{
$query [ 'csv_fields' ] = $this -> csv_export_fields ( $query [ 'col_filter' ][ 'info_type' ]);
}
2009-09-25 10:03:01 +02:00
// handle linked filter (show only entries linked to a certain other entry)
unset ( $query [ 'col_filter' ][ 'info_id' ]);
if ( $query [ 'col_filter' ][ 'linked' ])
2009-09-19 15:58:24 +02:00
{
2009-09-25 10:03:01 +02:00
list ( $app , $id ) = explode ( ':' , $query [ 'col_filter' ][ 'linked' ]);
if ( ! ( $links = egw_link :: get_links ( $app , $id , 'infolog' )))
{
$rows = array (); // no infologs linked to project --> no rows to return
return 0 ;
}
$query [ 'col_filter' ][ 'info_id' ] = array_values ( array_unique ( $links ));
$linked = $query [ 'col_filter' ][ 'linked' ];
2009-09-19 15:58:24 +02:00
}
2009-09-25 10:03:01 +02:00
unset ( $query [ 'col_filter' ][ 'linked' ]);
2006-10-21 15:07:32 +02:00
// check if we have a custom, type-specific template
unset ( $query [ 'template' ]);
unset ( $query [ 'custom_fields' ]);
if ( $query [ 'col_filter' ][ 'info_type' ])
{
2009-06-08 18:21:14 +02:00
$tpl = new etemplate ;
2006-10-21 15:07:32 +02:00
if ( $tpl -> read ( 'infolog.index.rows.' . $query [ 'col_filter' ][ 'info_type' ]))
{
$query [ 'template' ] =& $tpl ;
$query [ 'custom_fields' ] = true ; // read the custom fields too
}
//echo "<p align=right>template ='".'infolog.index.rows.'.$query['col_filter']['info_type']."'".(!$query['template'] ? ' not' : '')." found</p>\n";
}
2007-12-14 14:11:51 +01:00
// do we need to read the custom fields, depends on the column is enabled and customfields exist, prefs are filter specific
// so we have to check that as well
2009-07-13 12:33:26 +02:00
$details = $query [ 'filter2' ] == 'all' ;
2007-12-14 14:11:51 +01:00
$columselection = $this -> prefs [ 'nextmatch-infolog.index.rows' . ( $details ? '-details' : '' )];
//_debug_array($columselection);
2008-04-18 13:53:55 +02:00
if ( $columselection )
2007-12-14 14:11:51 +01:00
{
2008-04-18 13:53:55 +02:00
$query [ 'selectcols' ] = $columselection ;
2007-12-14 14:11:51 +01:00
$columselection = explode ( ',' , $columselection );
2008-04-18 13:53:55 +02:00
}
else
2007-12-14 14:11:51 +01:00
{
2008-01-19 06:36:20 +01:00
$columselection = $query [ 'selectcols' ] ? explode ( ',' , $query [ 'selectcols' ]) : array ();
2007-12-14 14:11:51 +01:00
}
2008-01-19 06:36:20 +01:00
// do we need to query the cf's
$query [ 'custom_fields' ] = $this -> bo -> customfields && ( ! $columselection || in_array ( 'customfields' , $columselection ));
2008-03-08 22:43:13 +01:00
$infos = $this -> bo -> search ( $query );
2009-11-10 09:11:41 +01:00
$query [ 'col_filter' ] = $orginal_colfilter ;
2008-03-08 22:43:13 +01:00
if ( ! is_array ( $infos ))
2006-10-04 19:40:33 +02:00
{
2008-03-08 22:43:13 +01:00
$infos = array ( );
2006-10-04 19:40:33 +02:00
}
$details = $query [ 'filter2' ] == 'all' ;
2007-03-07 13:31:48 +01:00
// add a '-details' to the name of the columnselection pref
if ( $details )
{
$query [ 'columnselection_pref' ] = ( is_object ( $query [ 'template' ]) ? $query [ 'template' ] -> name : 'infolog.index.rows' ) . '-details' ;
2009-05-11 11:19:16 +02:00
$query [ 'default_cols' ] = '!cat_id,info_used_time_info_planned_time,info_used_time_info_planned_time_info_replanned_time,info_id' ;
2007-03-07 13:31:48 +01:00
}
else
{
2007-05-22 15:36:32 +02:00
$query [ 'columnselection_pref' ] = 'infolog.index.rows' ;
2009-05-11 11:19:16 +02:00
$query [ 'default_cols' ] = '!cat_id,info_datemodified,info_used_time_info_planned_time,info_used_time_info_planned_time_info_replanned_time,info_id' ;
2007-03-07 13:31:48 +01:00
}
2009-08-25 15:17:29 +02:00
// set old show_times pref, that get_info calculates the cumulated time of the timesheets (we only check used&planned to work for both time cols)
$this -> prefs [ 'show_times' ] = strpos ( $this -> prefs [ 'nextmatch-' . $query [ 'columnselection_pref' ]], 'info_used_time_info_planned_time' ) !== false ;
2007-05-22 15:36:32 +02:00
2008-10-19 13:34:12 +02:00
// query all links and sub counts in one go
2008-03-08 22:43:13 +01:00
if ( $infos && ! $query [ 'csv_export' ])
{
2010-04-04 11:15:25 +02:00
$links = egw_link :: get_links_multiple ( 'infolog' , array_keys ( $infos ), true );
2008-10-19 13:34:12 +02:00
$anzSubs = $this -> bo -> anzSubs ( array_keys ( $infos ));
2008-03-08 22:43:13 +01:00
}
2006-10-04 19:40:33 +02:00
$readonlys = $rows = array ();
2008-03-08 22:43:13 +01:00
foreach ( $infos as $id => $info )
2006-10-04 19:40:33 +02:00
{
2010-06-28 17:26:57 +02:00
if ( ! ( strpos ( $info [ 'info_addr' ], ',' ) === false ) && strpos ( $info [ 'info_addr' ], ', ' ) === false ) $info [ 'info_addr' ] = str_replace ( ',' , ', ' , $info [ 'info_addr' ]);
2007-09-22 16:58:10 +02:00
if ( ! $query [ 'csv_export' ])
2002-10-14 02:39:47 +02:00
{
2008-03-08 22:43:13 +01:00
$info [ 'links' ] =& $links [ $id ];
2008-10-19 13:34:12 +02:00
$info [ 'info_anz_subs' ] = ( int ) $anzSubs [ $id ];
2007-09-22 16:58:10 +02:00
$info = $this -> get_info ( $info , $readonlys , $query [ 'action' ], $query [ 'action_id' ], $query [ 'filter2' ], $details );
if ( ! $query [ 'filter2' ] && $this -> prefs [ 'show_links' ] == 'no_describtion' ||
$query [ 'filter2' ] == 'no_describtion' )
{
unset ( $info [ 'info_des' ]);
}
2002-10-14 02:39:47 +02:00
}
2009-09-25 10:03:01 +02:00
$rows [] = $info ;
2006-10-04 19:40:33 +02:00
}
2008-03-08 22:43:13 +01:00
unset ( $links );
2007-03-07 13:31:48 +01:00
if ( $query [ 'cat_id' ]) $rows [ 'no_cat_id' ] = true ;
2006-10-04 19:40:33 +02:00
if ( $query [ 'no_actions' ]) $rows [ 'no_actions' ] = true ;
$rows [ 'no_timesheet' ] = ! isset ( $GLOBALS [ 'egw_info' ][ 'user' ][ 'apps' ][ 'timesheet' ]);
$rows [ 'duration_format' ] = ',' . $this -> duration_format . ',,1' ;
2008-04-18 13:53:55 +02:00
2008-01-19 06:36:20 +01:00
// switch cf column off, if we have no cf's
if ( ! $query [ 'custom_fields' ]) $rows [ 'no_customfields' ] = true ;
2007-03-07 13:31:48 +01:00
if ( $GLOBALS [ 'egw_info' ][ 'user' ][ 'preferences' ][ 'common' ][ 'account_selection' ] == 'none' &&
! isset ( $GLOBALS [ 'egw_info' ][ 'user' ][ 'apps' ][ 'admin' ]))
{
$rows [ 'no_info_owner_info_responsible' ] = true ;
// dont show owner, responsible in the columnselection
$query [ 'options-selectcols' ][ 'info_owner' ] = $query [ 'options-selectcols' ][ 'info_responsible' ] = false ;
}
2006-10-04 19:40:33 +02:00
//echo "<p>readonlys = "; _debug_array($readonlys);
//echo "rows=<pre>".print_r($rows,True)."</pre>\n";
2008-04-18 13:53:55 +02:00
2008-01-15 05:18:17 +01:00
// if filtered by type, show only the stati of the filtered type
if ( $query [ 'col_filter' ][ 'info_type' ] && isset ( $this -> bo -> status [ $query [ 'col_filter' ][ 'info_type' ]]))
{
$rows [ 'sel_options' ][ 'info_status' ] = $this -> bo -> status [ $query [ 'col_filter' ][ 'info_type' ]];
}
else // show all stati
{
$rows [ 'sel_options' ][ 'info_status' ] = array ();
foreach ( $this -> bo -> status as $typ => $stati )
{
2010-05-11 14:59:47 +02:00
if ( $typ != 'defaults' && ! empty ( $stati )) $rows [ 'sel_options' ][ 'info_status' ] += $stati ;
2008-01-15 05:18:17 +01:00
}
}
if ( $this -> bo -> history )
{
$rows [ 'sel_options' ][ 'info_status' ][ 'deleted' ] = 'deleted' ;
}
2006-10-04 19:40:33 +02:00
if ( $GLOBALS [ 'egw_info' ][ 'flags' ][ 'currentapp' ] == 'infolog' )
{
2006-10-23 13:50:30 +02:00
$GLOBALS [ 'egw_info' ][ 'flags' ][ 'app_header' ] = lang ( 'Infolog' );
if ( $query [ 'filter' ] != 'none' )
{
$GLOBALS [ 'egw_info' ][ 'flags' ][ 'app_header' ] .= ' - ' . lang ( $this -> filters [ $query [ 'filter' ]]);
}
2008-03-08 22:43:13 +01:00
if ( $query [ 'action' ] && ( $title = $query [ 'action_title' ] ? $query [ 'action_title' ] : egw_link :: title ( $query [ 'action' ], $query [ 'action_id' ])))
2006-10-23 13:50:30 +02:00
{
$GLOBALS [ 'egw_info' ][ 'flags' ][ 'app_header' ] .= ': ' . $title ;
}
2006-10-04 19:40:33 +02:00
}
2009-05-08 18:01:33 +02:00
// disable filemanager icon, if user has no access to it
$readonlys [ 'filemanager/navbar' ] = ! isset ( $GLOBALS [ 'egw_info' ][ 'user' ][ 'apps' ][ 'filemanager' ]);
2009-09-25 10:03:01 +02:00
if ( isset ( $linked )) $query [ 'col_filter' ][ 'linked' ] = $linked ; // add linked back to the colfilter
2006-10-04 19:40:33 +02:00
return $query [ 'total' ];
}
/**
* Shows the infolog list
*
* @ param array / string $values = null etemplate content or 'reset_action_view' if called by index . php to reset an action - view
* @ param string $action = '' if set only entries liked to that $action : $action_id are shown
* @ param string $action_id = '' if set only entries liked to that $action : $action_id are shown
* @ param mixed $called_as = 0 this is how we got called , for a hook eg . the call - params of that page containing the hook
* @ param boolean $extra_app_header = false
* @ param boolean $return_html = false
* @ param string $own_referer = '' this is our own referer
2006-10-23 13:50:30 +02:00
* @ param string $action_title = '' app_header for the action , if '' we try the link - title
2006-10-04 19:40:33 +02:00
*/
2006-10-23 13:50:30 +02:00
function index ( $values = null , $action = '' , $action_id = '' , $called_as = 0 , $extra_app_header = False , $return_html = False , $own_referer = '' , $action_title = '' )
2006-10-04 19:40:33 +02:00
{
if ( is_array ( $values ))
{
$called_as = $values [ 'called_as' ];
$own_referer = $values [ 'own_referer' ];
}
elseif ( $own_referer === '' )
{
2010-06-07 16:43:34 +02:00
$own_referer = common :: get_referer ();
2008-10-07 14:50:14 +02:00
if ( strpos ( $own_referer , 'menuaction=infolog.infolog_ui.edit' ) !== false )
2002-10-14 02:39:47 +02:00
{
2006-10-04 19:40:33 +02:00
$own_referer = $GLOBALS [ 'egw' ] -> session -> appsession ( 'own_session' , 'infolog' );
2002-10-14 02:39:47 +02:00
}
2006-10-04 19:40:33 +02:00
else
2006-04-05 18:16:33 +02:00
{
2006-10-04 19:40:33 +02:00
$GLOBALS [ 'egw' ] -> session -> appsession ( 'own_session' , 'infolog' , $own_referer );
2006-04-05 18:16:33 +02:00
}
2002-10-14 02:39:47 +02:00
}
2006-10-04 19:40:33 +02:00
if ( ! $action )
2002-10-14 02:39:47 +02:00
{
2006-10-04 19:40:33 +02:00
$action = $values [ 'action' ] ? $values [ 'action' ] : get_var ( 'action' , array ( 'POST' , 'GET' ));
$action_id = $values [ 'action_id' ] ? $values [ 'action_id' ] : get_var ( 'action_id' , array ( 'POST' , 'GET' ));
2006-10-23 13:50:30 +02:00
$action_title = $values [ 'action_title' ] ? $values [ 'action_title' ] : get_var ( 'action_title' , array ( 'POST' , 'GET' ));
2006-10-04 19:40:33 +02:00
if ( $values === 'reset_action_view' ) // only read action from session, if not called by index.php
2005-07-13 10:34:38 +02:00
{
2006-10-04 19:40:33 +02:00
$session = $this -> read_sessiondata ();
$session [ 'action' ] = $action = '' ;
$session [ 'action_id' ] = $action_id = 0 ;
2006-10-23 13:50:30 +02:00
$session [ 'action_title' ] = $action_title = '' ;
2006-10-04 19:40:33 +02:00
$this -> save_sessiondata ( $session );
unset ( $session );
2005-07-13 10:34:38 +02:00
}
2006-10-04 19:40:33 +02:00
elseif ( ! $action )
2005-07-13 10:34:38 +02:00
{
2006-10-04 19:40:33 +02:00
$session = $this -> read_sessiondata ();
$action = $session [ 'action' ];
$action_id = $session [ 'action_id' ];
2006-10-23 13:50:30 +02:00
$action_title = $session [ 'action_title' ];
2009-08-19 15:56:35 +02:00
// no action -> try to restore the previous colfilter
2009-07-09 14:14:35 +02:00
$colfilter = $session [ 'col_filter' ];
2006-10-04 19:40:33 +02:00
unset ( $session );
2005-11-12 14:25:59 +01:00
}
2006-10-04 19:40:33 +02:00
}
2008-10-22 08:51:01 +02:00
//echo "<p>".__METHOD__."(action='$action/$action_id',called_as='$called_as/$values[referer]',own_referer='$own_referer') values=\n"; _debug_array($values);
2006-10-04 19:40:33 +02:00
if ( ! is_array ( $values ))
{
$values = array ( 'nm' => $this -> read_sessiondata ());
if ( isset ( $_GET [ 'filter' ]) && $_GET [ 'filter' ] != 'default' || ! isset ( $values [ 'nm' ][ 'filter' ]) && ! $this -> called_by )
2005-11-12 14:25:59 +01:00
{
2006-10-04 19:40:33 +02:00
$values [ 'nm' ][ 'filter' ] = $_GET [ 'filter' ] && $_GET [ 'filter' ] != 'default' ? $_GET [ 'filter' ] :
$this -> prefs [ 'defaultFilter' ];
2005-07-13 10:34:38 +02:00
}
2006-10-04 19:40:33 +02:00
if ( ! isset ( $values [ 'nm' ][ 'order' ]) || ! $values [ 'nm' ][ 'order' ])
2002-10-14 02:39:47 +02:00
{
2006-10-04 19:40:33 +02:00
$values [ 'nm' ][ 'order' ] = 'info_datemodified' ;
$values [ 'nm' ][ 'sort' ] = 'DESC' ;
2002-10-18 00:02:44 +02:00
}
2006-10-04 19:40:33 +02:00
$values [ 'msg' ] = $_GET [ 'msg' ];
$values [ 'action' ] = $action ;
$values [ 'action_id' ] = $action_id ;
}
2009-12-08 22:48:10 +01:00
if ( $_GET [ 'search' ]) {
$values [ 'nm' ][ 'search' ] = $_GET [ 'search' ];
}
2006-10-04 19:40:33 +02:00
if ( $values [ 'nm' ][ 'add' ])
{
$values [ 'add' ] = $values [ 'nm' ][ 'add' ];
unset ( $values [ 'nm' ][ 'add' ]);
}
if ( $values [ 'add' ] || $values [ 'cancel' ] || isset ( $values [ 'nm' ][ 'rows' ]) || isset ( $values [ 'main' ]))
{
if ( $values [ 'add' ])
2003-07-06 10:56:21 +02:00
{
2006-10-04 19:40:33 +02:00
list ( $type ) = each ( $values [ 'add' ]);
return $this -> edit ( 0 , $action , $action_id , $type , $called_as );
2003-07-06 10:56:21 +02:00
}
2006-10-04 19:40:33 +02:00
elseif ( $values [ 'cancel' ] && $own_referer )
2002-10-16 02:23:39 +02:00
{
2006-10-04 19:40:33 +02:00
$session = $this -> read_sessiondata ();
unset ( $session [ 'action' ]);
unset ( $session [ 'action_id' ]);
$this -> save_sessiondata ( $session );
2008-04-18 13:53:55 +02:00
$this -> tmpl -> location ( $own_referer );
2002-10-14 02:39:47 +02:00
}
2006-10-04 19:40:33 +02:00
else
2002-10-14 02:39:47 +02:00
{
2006-10-04 19:40:33 +02:00
list ( $do , $do_id ) = isset ( $values [ 'main' ]) ? each ( $values [ 'main' ]) : @ each ( $values [ 'nm' ][ 'rows' ]);
list ( $do_id ) = @ each ( $do_id );
//echo "<p>infolog::index: do='$do/$do_id', referer="; _debug_array($called_as);
switch ( $do )
{
case 'edit' :
case 'edit_status' :
return $this -> edit ( $do_id , $action , $action_id , '' , $called_as );
case 'delete' :
if ( ! ( $values [ 'msg' ] = $this -> delete ( $do_id , $called_as , $called_as ? '' : 'index' ))) return ;
2007-04-26 14:03:44 +02:00
// did we deleted the entries, whos subentries we are showing?
if ( $action == 'sp' && $action_id == $do_id )
{
// redirect to our referer or reset the subentry view
if ( ! $called_as && $own_referer )
{
$this -> tmpl -> location ( $own_referer ); // eg. redirect back to calendar
}
else
{
unset ( $action_id ); unset ( $action );
}
}
2006-10-04 19:40:33 +02:00
break ;
case 'close' :
2009-04-23 16:47:26 +02:00
$closesingle = true ;
case 'close_all' :
$this -> close ( $do_id , $called_as , $closesingle );
2007-04-26 14:53:03 +02:00
break ;
2006-10-04 19:40:33 +02:00
case 'sp' :
return $this -> edit ( 0 , 'sp' , $do_id , '' , $called_as );
case 'view' :
$value = array ();
$action = 'sp' ;
$action_id = $do_id ;
break ;
default :
$value = array ();
2002-10-16 02:23:39 +02:00
$action = '' ;
2002-10-14 02:39:47 +02:00
$action_id = 0 ;
break ;
2006-10-04 19:40:33 +02:00
}
2002-10-14 02:39:47 +02:00
}
2006-10-04 19:40:33 +02:00
}
switch ( $action )
{
case 'sp' :
if ( ! $this -> bo -> read ( $action_id ))
{
$action = '' ;
$action_id = 0 ;
break ;
}
$values [ 'main' ][ 1 ] = $this -> get_info ( $action_id , $readonlys [ 'main' ]);
break ;
}
$readonlys [ 'cancel' ] = $action != 'sp' ;
2002-10-14 02:39:47 +02:00
2006-10-04 19:40:33 +02:00
$this -> tmpl -> read ( 'infolog.index' );
2009-07-09 14:14:35 +02:00
if ( $colfilter ) $values [ 'nm' ][ 'col_filter' ] = $persist [ 'col_filter' ] = $colfilter ;
2006-10-04 19:40:33 +02:00
$values [ 'nm' ][ 'options-filter' ] = $this -> filters ;
2008-10-07 14:50:14 +02:00
$values [ 'nm' ][ 'get_rows' ] = 'infolog.infolog_ui.get_rows' ;
2006-10-04 19:40:33 +02:00
$values [ 'nm' ][ 'options-filter2' ] = ( in_array ( $this -> prefs [ 'show_links' ], array ( 'all' , 'no_describtion' )) ? array () : array (
'' => 'default' ,
)) + array (
'no_describtion' => 'no details' ,
'all' => 'details' ,
);
if ( ! isset ( $values [ 'nm' ][ 'filter2' ])) $values [ 'nm' ][ 'filter2' ] = $this -> prefs [ 'show_links' ];
2007-03-07 13:31:48 +01:00
// disable columns for main entry as set in the pref for details or no details
if ( $action == 'sp' )
{
$pref = 'nextmatch-infolog.index.rows' . ( $values [ 'nm' ][ 'filter2' ] == 'all' ? '-details' : '' );
2008-10-08 11:40:23 +02:00
foreach ( array ( 'info_used_time_info_planned_time_info_replanned_time' , 'info_datemodified' , 'info_owner_info_responsible' , 'customfields' ) as $name )
2007-03-07 13:31:48 +01:00
{
2007-05-08 10:36:06 +02:00
$values [ 'main' ][ 'no_' . $name ] = strpos ( $this -> prefs [ $pref ], $name ) === false ;
2007-03-07 13:31:48 +01:00
}
2008-04-18 13:53:55 +02:00
if ( ! $values [ 'main' ][ 'no_customfields' ])
2007-12-14 14:11:51 +01:00
{
// set the column-header of the main table for the customfields.
foreach ( $this -> bo -> customfields as $lname => $data )
{
$values [ 'main' ][ 'customfields' ] .= $lname . " \n " ;
}
}
2007-03-07 13:31:48 +01:00
}
2006-10-04 19:40:33 +02:00
$values [ 'nm' ][ 'header_right' ] = 'infolog.index.header_right' ;
2009-11-10 09:11:41 +01:00
if ( $extra_app_header && $values [ 'nm' ][ 'filter' ] != 'bydate' )
2006-10-04 19:40:33 +02:00
{
$values [ 'nm' ][ 'header_left' ] = 'infolog.index.header_left' ;
}
2009-11-10 09:11:41 +01:00
if ( $values [ 'nm' ][ 'filter' ] == 'bydate' )
{
foreach ( array_keys ( $values [ 'nm' ][ 'col_filter' ]) as $colfk ) if ( is_int ( $colfk )) unset ( $values [ 'nm' ][ 'col_filter' ]);
$values [ 'nm' ][ 'header_left' ] = 'infolog.index.dates' ;
$GLOBALS [ 'egw' ] -> js -> set_onload ( " set_style_by_class('table','custom_hide','visibility','visible'); " );
}
2006-10-04 19:40:33 +02:00
$values [ 'nm' ][ 'bottom_too' ] = True ;
2008-04-18 13:53:55 +02:00
$values [ 'nm' ][ 'never_hide' ] = isset ( $this -> prefs [ 'never_hide' ]) ?
2006-10-04 19:40:33 +02:00
$this -> prefs [ 'never_hide' ] : $GLOBALS [ 'egw_info' ][ 'user' ][ 'preferences' ][ 'common' ][ 'maxmatchs' ] > 15 ;
$values [ 'action' ] = $persist [ 'action' ] = $values [ 'nm' ][ 'action' ] = $action ;
$values [ 'action_id' ] = $persist [ 'action_id' ] = $values [ 'nm' ][ 'action_id' ] = $action_id ;
2006-10-23 13:50:30 +02:00
$values [ 'action_title' ] = $persist [ 'action_title' ] = $values [ 'nm' ][ 'action_title' ] = $action_title ;
2006-10-04 19:40:33 +02:00
$persist [ 'called_as' ] = $called_as ;
$persist [ 'own_referer' ] = $own_referer ;
2007-09-22 16:58:10 +02:00
$values [ 'nm' ][ 'csv_fields' ] = true ; // get set in get_rows to not include all custom fields
2008-10-22 08:51:01 +02:00
$persist [ 'nm' ] = array (
'sort' => $values [ 'nm' ][ 'sort' ],
'order' => $values [ 'nm' ][ 'order' ],
);
2006-10-04 19:40:33 +02:00
if ( ! $called_as )
{
$GLOBALS [ 'egw_info' ][ 'flags' ][ 'params' ][ 'manual' ] = array ( 'page' => 'ManualInfologIndex' );
}
else
{
$values [ 'css' ] = '<style type="text/css">@import url(' . $GLOBALS [ 'egw_info' ][ 'server' ][ 'webserver_url' ] . '/infolog/templates/default/app.css);' . " </style> " ;
}
2009-05-08 18:01:33 +02:00
// add scrollbar to long describtion, if user choose so in his prefs
if ( $this -> prefs [ 'limit_des_lines' ] > 0 || ( string ) $this -> prefs [ 'limit_des_lines' ] == '' )
{
$values [ 'css' ] .= '<style type="text/css">@media screen { .infoDes { max-height: ' .
(( $this -> prefs [ 'limit_des_lines' ] ? $this -> prefs [ 'limit_des_lines' ] : 5 ) * 1.35 ) . // dono why em is not real lines
'em; overflow: auto; }}</style>' ;
}
2009-09-19 15:58:24 +02:00
$sel_options = array (
'info_type' => $this -> bo -> enums [ 'type' ],
'pm_id' => array ( lang ( 'No project' )),
);
return $this -> tmpl -> exec ( 'infolog.infolog_ui.index' , $values , $sel_options , $readonlys , $persist , $return_html ? - 1 : 0 );
2006-10-04 19:40:33 +02:00
}
2002-10-14 02:39:47 +02:00
2008-10-22 08:51:01 +02:00
/**
* Closes an infolog
*
* @ param int | array $values = 0 info_id ( default _GET [ info_id ])
* @ param string $referer = ''
2009-07-15 22:04:17 +02:00
* @ param boolean $closesingle = false
2008-10-22 08:51:01 +02:00
*/
2009-04-23 16:47:26 +02:00
function close ( $values = 0 , $referer = '' , $closesingle = false )
2006-10-04 19:40:33 +02:00
{
2009-04-23 16:47:26 +02:00
//echo "<p>".__METHOD__."($values,$referer,$closeall)</p>\n";
2006-10-04 19:40:33 +02:00
$info_id = ( int ) ( is_array ( $values ) ? $values [ 'info_id' ] : ( $values ? $values : $_GET [ 'info_id' ]));
$referer = is_array ( $values ) ? $values [ 'referer' ] : $referer ;
2008-04-18 13:53:55 +02:00
2006-10-04 19:40:33 +02:00
if ( $info_id )
2005-10-05 09:50:47 +02:00
{
2009-04-23 16:47:26 +02:00
$info = $this -> bo -> read ( $info_id );
#_debug_array($info);
$status = $info [ 'info_status' ];
// closed stati assumed array('done','billed','cancelled')
if ( isset ( $this -> bo -> status [ $info [ 'info_type' ]][ 'done' ])) {
$status = 'done' ;
} elseif ( isset ( $this -> bo -> status [ $info [ 'info_type' ]][ 'billed' ])) {
$status = 'billed' ;
} elseif ( isset ( $this -> bo -> status [ $info [ 'info_type' ]][ 'cancelled' ])) {
$status = 'cancelled' ;
}
#_debug_array($status);
2006-10-04 19:40:33 +02:00
$values = array (
'info_id' => $info_id ,
2009-04-23 16:47:26 +02:00
'info_type' => $info [ 'info_type' ],
'info_status' => $status ,
2006-10-04 19:40:33 +02:00
'info_percent' => 100 ,
'info_datecompleted' => $this -> bo -> now_su ,
);
$this -> bo -> write ( $values );
2008-04-18 13:53:55 +02:00
2006-10-04 19:40:33 +02:00
$query = array ( 'action' => 'sp' , 'action_id' => $info_id );
2009-04-23 16:47:26 +02:00
if ( ! $closesingle ) {
foreach (( array ) $this -> bo -> search ( $query ) as $info )
2005-12-06 08:11:14 +01:00
{
2009-04-23 16:47:26 +02:00
if ( $info [ 'info_id_parent' ] == $info_id ) // search also returns linked entries!
{
$this -> close ( $info [ 'info_id' ], $referer , $closeall ); // we call ourselfs recursive to process subs from subs too
}
2005-12-06 08:11:14 +01:00
}
2005-10-05 09:50:47 +02:00
}
}
2007-04-26 14:53:03 +02:00
if ( $referer ) $this -> tmpl -> location ( $referer );
2006-10-04 19:40:33 +02:00
}
2005-10-05 09:50:47 +02:00
2008-10-22 08:51:01 +02:00
/**
* Deletes an InfoLog entry
*
* @ param array | int $values = 0 info_id ( default _GET [ info_id ])
* @ param string $referer = ''
* @ param string $called_by = ''
*/
2006-10-04 19:40:33 +02:00
function delete ( $values = 0 , $referer = '' , $called_by = '' )
{
$info_id = ( int ) ( is_array ( $values ) ? $values [ 'info_id' ] : ( $values ? $values : $_GET [ 'info_id' ]));
$referer = is_array ( $values ) ? $values [ 'referer' ] : $referer ;
2008-04-18 13:53:55 +02:00
2006-10-04 19:40:33 +02:00
if ( ! is_array ( $values ) && $info_id > 0 && ! $this -> bo -> anzSubs ( $info_id )) // entries without subs get confirmed by javascript
2002-10-16 02:23:39 +02:00
{
2006-10-04 19:40:33 +02:00
$values = array ( 'delete' => true );
}
2008-10-07 14:50:14 +02:00
//echo "<p>infolog_ui::delete(".print_r($values,true).",'$referer','$called_by') info_id=$info_id</p>\n";
2006-10-04 19:40:33 +02:00
if ( is_array ( $values ) || $info_id <= 0 )
{
if (( $values [ 'delete' ] || $values [ 'delete_subs' ]) && $info_id > 0 && $this -> bo -> check_access ( $info_id , EGW_ACL_DELETE ))
2005-11-12 14:25:59 +01:00
{
2006-10-04 19:40:33 +02:00
$deleted = $this -> bo -> delete ( $info_id , $values [ 'delete_subs' ], $values [ 'info_id_parent' ]);
2005-11-12 14:25:59 +01:00
}
2006-10-04 19:40:33 +02:00
if ( $called_by ) // direct call from the same request
2002-10-16 02:23:39 +02:00
{
2006-10-04 19:40:33 +02:00
return $deleted ? lang ( 'InfoLog entry deleted' ) : '' ;
2002-10-16 02:23:39 +02:00
}
2006-10-04 19:40:33 +02:00
if ( $values [ 'called_by' ] == 'edit' ) // we run in the edit popup => give control back to edit
{
$this -> edit ( array (
'info_id' => $info_id ,
'button' => array ( 'deleted' => true ), // not delete!
'referer' => $referer ,
'msg' => $deleted ? lang ( 'Infolog entry deleted' ) : '' ,
));
}
return $referer ? $this -> tmpl -> location ( $referer ) : $this -> index ();
}
$readonlys = $values = array ();
$values [ 'main' ][ 1 ] = $this -> get_info ( $info_id , $readonlys [ 'main' ]);
2002-10-16 02:23:39 +02:00
2006-10-04 19:40:33 +02:00
$this -> tmpl -> read ( 'infolog.delete' );
2002-10-16 02:23:39 +02:00
2006-10-04 19:40:33 +02:00
$values [ 'nm' ] = array (
'action' => 'sp' ,
'action_id' => $info_id ,
'options-filter' => $this -> filters ,
2008-10-07 14:50:14 +02:00
'get_rows' => 'infolog.infolog_ui.get_rows' ,
2006-10-04 19:40:33 +02:00
'no_filter2' => True ,
2008-04-18 13:53:55 +02:00
'never_hide' => isset ( $this -> prefs [ 'never_hide' ]) ?
$this -> prefs [ 'never_hide' ] :
2006-10-04 19:40:33 +02:00
$GLOBALS [ 'egw_info' ][ 'user' ][ 'preferences' ][ 'common' ][ 'maxmatchs' ] > 15 ,
);
$values [ 'main' ][ 'no_actions' ] = $values [ 'nm' ][ 'no_actions' ] = True ;
2005-11-12 14:25:59 +01:00
2006-10-04 19:40:33 +02:00
$persist [ 'info_id' ] = $info_id ;
$persist [ 'referer' ] = $referer ;
2008-04-18 13:53:55 +02:00
$persist [ 'info_id_parent' ] = $values [ 'main' ][ 1 ][ 'info_id_parent' ];
2006-10-04 19:40:33 +02:00
$persist [ 'called_by' ] = $called_by ;
2003-12-09 01:08:31 +01:00
2006-10-04 19:40:33 +02:00
$GLOBALS [ 'egw_info' ][ 'flags' ][ 'app_header' ] = lang ( 'InfoLog' ) . ' - ' . lang ( 'Delete' );
$GLOBALS [ 'egw_info' ][ 'flags' ][ 'params' ][ 'manual' ] = array ( 'page' => 'ManualInfologDelete' );
2002-10-16 02:23:39 +02:00
2008-10-07 14:50:14 +02:00
$this -> tmpl -> exec ( 'infolog.infolog_ui.delete' , $values , '' , $readonlys , $persist , $called_by == 'edit' ? 2 : 0 );
2006-10-04 19:40:33 +02:00
}
2008-04-18 13:53:55 +02:00
2006-10-04 19:40:33 +02:00
/**
* Edit / Create an InfoLog Entry
*
* @ param array $content = null Content from the eTemplate Exec call or info_id on inital call
* @ param string $action = '' Name of an app of 'sp' for a infolog - sub
* @ param int $action_id = 0 Id of app - entry to which a link is created
* @ param string $type = '' Type of log - entry : note , todo , task
* @ param string $referer = '' array with param / get - vars of the refering page
*/
function edit ( $content = null , $action = '' , $action_id = 0 , $type = '' , $referer = '' )
{
2007-06-13 23:37:05 +02:00
$tabs = 'description|links|delegation|project|customfields|history' ;
2006-10-04 19:40:33 +02:00
if ( is_array ( $content ))
2002-10-14 02:39:47 +02:00
{
2008-10-07 14:50:14 +02:00
//echo "infolog_ui::edit: content="; _debug_array($content);
2006-10-04 19:40:33 +02:00
$info_id = $content [ 'info_id' ];
2007-04-26 13:34:46 +02:00
$action = $content [ 'action' ]; unset ( $content [ 'action' ]);
$action_id = $content [ 'action_id' ]; unset ( $content [ 'action_id' ]);
$referer = $content [ 'referer' ]; unset ( $content [ 'referer' ]);
$no_popup = $content [ 'no_popup' ]; unset ( $content [ 'no_popup' ]);
$caller = $content [ 'caller' ]; unset ( $content [ 'caller' ]);
2006-10-18 11:09:18 +02:00
// convert custom from to 0 or 1, it's unset if not checked, which starts the detection
$content [ 'info_custom_from' ] = ( int ) $content [ 'info_custom_from' ];
2006-02-04 08:49:47 +01:00
2006-10-04 19:40:33 +02:00
list ( $button ) = @ each ( $content [ 'button' ]);
2009-12-11 09:34:47 +01:00
if ( ! $button && $action ) $button = $action ; // action selectbox
2006-10-04 19:40:33 +02:00
unset ( $content [ 'button' ]);
if ( $button )
{
2009-12-11 09:34:47 +01:00
//Copy Infolog
if (( $button == 'copy' ))
{
unset ( $content [ 'info_id' ]);
2009-12-13 14:58:01 +01:00
unset ( $info_id );
2009-12-11 09:34:47 +01:00
unset ( $content [ 'info_datemodified' ]);
2010-02-22 22:25:00 +01:00
unset ( $content [ 'info_modifier' ]);
// Get links to be copied
$content [ 'link_to' ][ 'to_id' ] = egw_link :: get_links ( $content [ 'link_to' ][ 'to_app' ], $content [ 'link_to' ][ 'to_id' ]);
2010-05-12 09:06:06 +02:00
// Special mangling for files so the files get copied
foreach ( $content [ 'link_to' ][ 'to_id' ] as $link_id => & $link )
2010-05-11 23:04:24 +02:00
{
2010-05-12 09:06:06 +02:00
if ( $link [ 'app' ] == egw_link :: VFS_APPNAME )
2010-05-11 23:04:24 +02:00
{
2010-05-12 09:06:06 +02:00
$link [ 'id' ] = $link + array (
'tmp_name' => egw_link :: vfs_path ( $link [ 'app2' ], $link [ 'id2' ]) . '/' . $link [ 'id' ],
'name' => $link [ 'id' ],
);
2010-05-11 23:04:24 +02:00
}
}
2010-05-12 09:06:06 +02:00
if ( $content [ 'info_link_id' ])
{
2010-02-22 22:25:00 +01:00
$info_link_id = $content [ 'info_link_id' ];
unset ( $content [ 'info_link_id' ]);
}
2009-12-11 09:34:47 +01:00
$content [ 'info_owner' ] = ! ( int ) $this -> owner || ! $this -> bo -> check_perms ( EGW_ACL_ADD , 0 , $this -> owner ) ? $this -> user : $this -> owner ;
$content [ 'msg' ] = lang ( 'Infolog copied - the copy can now be edited' );
$content [ 'info_subject' ] = lang ( 'Copy of:' ) . ' ' . $content [ 'info_subject' ];
}
2009-12-13 14:36:09 +01:00
if ( $button == 'print' )
{
$content [ 'js' ] = $this -> custom_print ( $content , ! $content [ 'info_id' ]) . " \n " . $js ; // first open the new window and then update the view
}
2008-10-07 14:50:14 +02:00
//echo "<p>infolog_ui::edit(info_id=$info_id) '$button' button pressed, content="; _debug_array($content);
2006-11-15 11:24:58 +01:00
if (( $button == 'save' || $button == 'apply' ) && isset ( $content [ 'info_subject' ]) && empty ( $content [ 'info_subject' ]))
2002-10-18 00:02:44 +02:00
{
2006-10-04 19:40:33 +02:00
$this -> tmpl -> set_validation_error ( 'info_subject' , lang ( 'Field must not be empty !!!' ));
$button = '' ; // stop save or apply
2002-10-18 00:02:44 +02:00
}
2006-10-04 19:40:33 +02:00
if (( $button == 'save' || $button == 'apply' ) && $info_id )
2002-10-14 02:39:47 +02:00
{
2006-10-04 19:40:33 +02:00
if ( ! ( $edit_acl = $this -> bo -> check_access ( $info_id , EGW_ACL_EDIT )))
2004-02-05 14:37:29 +01:00
{
2006-10-04 19:40:33 +02:00
$old = $this -> bo -> read ( $info_id );
2006-10-24 12:08:21 +02:00
$status_only = $this -> bo -> is_responsible ( $old );
2007-06-13 23:37:05 +02:00
$undelete = $this -> bo -> check_access ( $old , EGW_ACL_UNDELETE );
2004-02-05 14:37:29 +01:00
}
2006-10-04 19:40:33 +02:00
}
2007-06-13 23:37:05 +02:00
if (( $button == 'save' || $button == 'apply' ) && ( ! $info_id || $edit_acl || $status_only || $undelete ))
2006-10-04 19:40:33 +02:00
{
if ( $content [ 'info_contact' ])
2002-10-14 02:39:47 +02:00
{
2006-10-04 19:40:33 +02:00
$old_link_id = ( int ) $content [ 'info_link_id' ];
2009-12-08 22:48:10 +01:00
list ( $app , $id ) = explode ( ':' , $content [ 'info_contact' ], 2 );
2008-03-08 22:43:13 +01:00
$content [ 'info_link_id' ] = ( int )( $info_link_id = egw_link :: link ( 'infolog' , $content [ 'link_to' ][ 'to_id' ], $app , $id ));
2008-04-23 10:27:49 +02:00
if ( $old_link_id && $old_link_id != $content [ 'info_link_id' ]) egw_link :: unlink ( $old_link_id );
2006-10-04 19:40:33 +02:00
}
if ( is_array ( $content [ 'link_to' ][ 'to_id' ]) && count ( $content [ 'link_to' ][ 'to_id' ]))
{
$content [ 'info_link_id' ] = 0 ; // as field has to be int
}
$active_tab = $content [ $tabs ];
if ( ! ( $info_id = $this -> bo -> write ( $content )))
{
$content [ 'msg' ] = $info_id !== 0 || ! $content [ 'info_id' ] ? lang ( 'Error: saving the entry' ) :
lang ( 'Error: the entry has been updated since you opened it for editing!' ) . '<br />' .
lang ( 'Copy your changes to the clipboard, %1reload the entry%2 and merge them.' , '<a href="' .
2010-06-07 16:43:34 +02:00
htmlspecialchars ( egw :: link ( '/index.php' , array (
2008-10-07 14:50:14 +02:00
'menuaction' => 'infolog.infolog_ui.edit' ,
2006-10-04 19:40:33 +02:00
'info_id' => $content [ 'info_id' ],
'no_popup' => $no_popup ,
'referer' => $referer ,
))) . '">' , '</a>' );
$button = '' ; // not exiting edit
$info_id = $content [ 'info_id' ];
}
else
{
$content [ 'msg' ] = lang ( 'InfoLog entry saved' );
2010-06-07 16:43:34 +02:00
$content [ 'js' ] = " opener.location.search += (opener.location.search ? '&msg=' : '?msg=')+' { $content [ 'msg' ] } '; " ;
2006-10-04 19:40:33 +02:00
}
$content [ $tabs ] = $active_tab ;
if (( int ) $content [ 'pm_id' ] != ( int ) $content [ 'old_pm_id' ])
{
//echo "<p>pm_id changed: $content[old_pm_id] -> $content[pm_id]</p>\n";
// update links accordingly, if selected project changed
if ( $content [ 'pm_id' ])
2005-11-12 14:25:59 +01:00
{
2006-10-04 19:40:33 +02:00
//echo "<p>this->link->link('infolog',{$content['link_to']['to_id']},'projectmanager',{$content['pm_id']});</p>";
2008-03-08 22:43:13 +01:00
egw_link :: link ( 'infolog' , $content [ 'link_to' ][ 'to_id' ], 'projectmanager' , $content [ 'pm_id' ]);
2006-10-04 19:40:33 +02:00
// making the project the selected link, if no other link selected
if ( ! $info_link_id || $info_link_id == 'projectmanager:' . $content [ 'old_pm_id' ])
2006-02-04 08:49:47 +01:00
{
2006-10-04 19:40:33 +02:00
$info_link_id = 'projectmanager:' . $content [ 'pm_id' ];
2006-02-04 08:49:47 +01:00
}
}
2006-10-04 19:40:33 +02:00
if ( $content [ 'old_pm_id' ])
2006-02-04 08:49:47 +01:00
{
2006-10-04 19:40:33 +02:00
//echo "<p>this->link->unlink2(0,infolog,{$content['link_to']['to_id']},0,'projectmanager',{$content['old_pm_id']});</p>\n";
2008-03-08 22:43:13 +01:00
egw_link :: unlink2 ( 0 , infolog , $content [ 'link_to' ][ 'to_id' ], 0 , 'projectmanager' , $content [ 'old_pm_id' ]);
2006-10-04 19:40:33 +02:00
$content [ 'old_pm_id' ] = $content [ 'pm_id' ];
2006-02-04 08:49:47 +01:00
}
2005-11-12 14:25:59 +01:00
}
2006-10-04 19:40:33 +02:00
// writing links for a new entry
2008-04-18 13:53:55 +02:00
if ( $info_id && is_array ( $content [ 'link_to' ][ 'to_id' ]) && count ( $content [ 'link_to' ][ 'to_id' ]))
2005-11-12 14:25:59 +01:00
{
2006-10-27 12:50:08 +02:00
//echo "<p>writing links for new entry $info_id</p>\n"; _debug_array($content['link_to']['to_id']);
2008-03-08 22:43:13 +01:00
egw_link :: link ( 'infolog' , $info_id , $content [ 'link_to' ][ 'to_id' ]);
2006-10-04 19:40:33 +02:00
$content [ 'link_to' ][ 'to_id' ] = $info_id ;
2002-10-14 02:39:47 +02:00
}
2007-05-08 10:36:06 +02:00
if ( $info_link_id && strpos ( $info_link_id , ':' ) !== false ) // updating info_link_id if necessary
2005-11-12 14:25:59 +01:00
{
2006-10-04 19:40:33 +02:00
list ( $app , $id ) = explode ( ':' , $info_link_id );
2008-03-08 22:43:13 +01:00
$link = egw_link :: get_link ( 'infolog' , $info_id , $app , $id );
2006-10-04 19:40:33 +02:00
if (( int ) $content [ 'info_link_id' ] != ( int ) $link [ 'link_id' ])
2005-11-12 14:25:59 +01:00
{
2006-10-04 19:40:33 +02:00
$content [ 'info_link_id' ] = $link [ 'link_id' ];
$to_write = array (
'info_id' => $content [ 'info_id' ],
'info_link_id' => $content [ 'info_link_id' ],
'info_from' => $content [ 'info_from' ],
2010-09-03 13:35:38 +02:00
'info_type' => $content [ 'info_type' ],
2006-10-04 19:40:33 +02:00
'info_owner' => $content [ 'info_owner' ],
2006-10-27 12:50:08 +02:00
'info_custom_from' => $content [ 'info_custom_from' ],
2006-10-04 19:40:33 +02:00
);
2006-10-27 12:50:08 +02:00
//echo "<p>updating info_link_id: ".print_r($to_write,true)."</p>\n";
2010-05-05 17:53:34 +02:00
$this -> bo -> write ( $to_write , False , true , true , true ); // last true = no notifications, as no real change
2006-10-04 19:40:33 +02:00
// we need eg. the new modification date, for further updates
$content = array_merge ( $content , $to_write );
2005-11-12 14:25:59 +01:00
}
}
2002-10-14 02:39:47 +02:00
}
2006-10-04 19:40:33 +02:00
elseif ( $button == 'delete' && $info_id > 0 )
2006-04-05 18:16:33 +02:00
{
2006-10-04 19:40:33 +02:00
if ( ! $referer && $action ) $referer = array (
2008-10-07 14:50:14 +02:00
'menuaction' => 'infolog.infolog_ui.index' ,
2006-10-04 19:40:33 +02:00
'action' => $action ,
'action_id' => $action_id
);
if ( ! ( $content [ 'msg' ] = $this -> delete ( $info_id , $referer , 'edit' ))) return ; // checks ACL first
2010-06-07 16:43:34 +02:00
$content [ 'js' ] = " opener.location.href=' " . egw :: link ( $referer , array ( 'msg' => $content [ 'msg' ])) . " '; " ;
2006-10-04 19:40:33 +02:00
}
// called again after delete confirmation dialog
elseif ( $button == 'deleted' && $content [ 'msg' ])
{
2010-06-07 16:43:34 +02:00
$content [ 'js' ] = " opener.location.href=' " . egw :: link ( $referer , array ( 'msg' => $content [ 'msg' ])) . " '; " ;
2006-10-04 19:40:33 +02:00
}
if ( $button == 'save' || $button == 'cancel' || $button == 'delete' || $button == 'deleted' )
{
if ( $no_popup )
{
2010-06-07 16:43:34 +02:00
egw :: redirect_link ( $referer , array ( 'msg' => $content [ 'msg' ]));
2006-10-04 19:40:33 +02:00
}
$content [ 'js' ] .= 'window.close();' ;
echo '<html><body onload="' . $content [ 'js' ] . '"></body></html>' ;
2010-06-07 16:43:34 +02:00
common :: egw_exit ();
2006-04-05 18:16:33 +02:00
}
2006-10-04 19:40:33 +02:00
if ( $content [ 'js' ]) $content [ 'js' ] = '<script>' . $content [ 'js' ] . '</script>' ;
2002-10-14 02:39:47 +02:00
}
2006-10-04 19:40:33 +02:00
// on a type-change, set the status to the default status of that type, if the actual status is not supported by the new type
2010-07-30 12:20:48 +02:00
if ( ! array_key_exists ( $content [ 'info_status' ], $this -> bo -> status [ $content [ 'info_type' ]]))
2002-10-14 02:39:47 +02:00
{
2006-10-04 19:40:33 +02:00
$content [ 'info_status' ] = $this -> bo -> status [ 'defaults' ][ $content [ 'info_type' ]];
if ( $content [ 'info_status' ] != 'done' ) $content [ 'info_datecompleted' ] = '' ;
}
}
else
{
2008-10-07 14:50:14 +02:00
//echo "<p>infolog_ui::edit: info_id=$info_id, action='$action', action_id='$action_id', type='$type', referer='$referer'</p>\n";
2006-10-04 19:40:33 +02:00
$action = $action ? $action : get_var ( 'action' , array ( 'POST' , 'GET' ));
$action_id = $action_id ? $action_id : get_var ( 'action_id' , array ( 'POST' , 'GET' ));
$info_id = $content ? $content : get_var ( 'info_id' , array ( 'POST' , 'GET' ));
$type = $type ? $type : get_var ( 'type' , array ( 'POST' , 'GET' ));
$ref = $referer = $referer !== '' ? $referer : ( $_GET [ 'referer' ] ? $_GET [ 'referer' ] :
2010-06-07 16:43:34 +02:00
common :: get_referer ( '/index.php?menuaction=infolog.infolog_ui.index' ));
2006-10-04 19:40:33 +02:00
$referer = preg_replace ( '/([&?]{1})msg=[^&]+&?/' , '\\1' , $referer ); // remove previou/old msg from referer
$no_popup = $_GET [ 'no_popup' ];
2009-12-13 14:36:09 +01:00
$print = ( int ) $_REQUEST [ 'print' ];
2008-10-07 14:50:14 +02:00
//echo "<p>infolog_ui::edit: info_id=$info_id, action='$action', action_id='$action_id', type='$type', referer='$referer'</p>\n";
2003-09-08 02:40:42 +02:00
2006-10-04 19:40:33 +02:00
$content = $this -> bo -> read ( $info_id || $action != 'sp' ? $info_id : $action_id );
2010-06-28 17:26:57 +02:00
if ( ! ( strpos ( $content [ 'info_addr' ], ',' ) === false ) && strpos ( $content [ 'info_addr' ], ', ' ) === false ) $content [ 'info_addr' ] = str_replace ( ',' , ', ' , $content [ 'info_addr' ]);
2010-07-16 11:14:59 +02:00
foreach ( array ( 'info_subject' , 'info_des' ) as $key )
{
if ( ! isset ( $content [ $key ]) || strlen ( $content [ $key ]) < 75 )
{
continue ;
}
2010-07-30 12:20:48 +02:00
$cont = split ( ' ' , $content [ $key ]);
$ckarray = array ();
foreach ( $cont as & $word )
2010-07-16 11:14:59 +02:00
{
2010-07-30 12:20:48 +02:00
// set blank behind all , and . if words are too long, apply wordwrap afterwards to make sure we get
if ( strlen ( $word ) > 75 )
2010-07-16 11:14:59 +02:00
{
2010-07-30 12:20:48 +02:00
if ( ! ( strpos ( $word , ',' ) === false ) && strpos ( $word , ', ' ) === false ) $word = str_replace ( ',' , ', ' , $word );
if ( ! ( strpos ( $word , '.' ) === false ) && strpos ( $word , '. ' ) === false ) $word = str_replace ( '.' , '. ' , $word );
$word = wordwrap ( $word , 75 , ' ' , true );
2010-07-16 11:14:59 +02:00
}
2010-07-30 12:20:48 +02:00
$ckarray [] = $word ;
2010-07-16 11:14:59 +02:00
}
2010-07-30 12:20:48 +02:00
$content [ $key ] = join ( ' ' , $ckarray );
unset ( $ckarray );
2010-07-16 11:14:59 +02:00
}
2006-10-04 19:40:33 +02:00
if ( is_numeric ( $_REQUEST [ 'cat_id' ]))
{
$content [ 'info_cat' ] = ( int ) $_REQUEST [ 'cat_id' ];
}
2008-04-18 13:53:55 +02:00
if ( ! $content )
2008-03-04 13:50:16 +01:00
{
$content [ 'info_cat' ] = $this -> prefs [ 'cat_add_default' ];
}
2010-02-05 04:34:17 +01:00
if ( $_GET [ 'msg' ]) $content [ 'msg' ] = strip_tags ( $_GET [ 'msg' ]); // dont allow HTML!
2006-10-04 19:40:33 +02:00
switch ( $this -> prefs [ 'set_start' ])
{
case 'date' : default : $set_startdate = mktime ( 0 , 0 , 0 , date ( 'm' , $this -> bo -> user_time_now ), date ( 'd' , $this -> bo -> user_time_now ), date ( 'Y' , $this -> bo -> user_time_now )); break ;
case 'datetime' : $set_startdate = $this -> bo -> user_time_now ; break ;
case 'empty' : $set_startdate = 0 ; break ;
}
2008-03-08 22:43:13 +01:00
if (( int ) $content [ 'info_link_id' ] > 0 && ! egw_link :: get_link ( $content [ 'info_link_id' ]))
2006-10-04 19:40:33 +02:00
{
$content [ 'info_link_id' ] = 0 ; // link has been deleted
if ( ! $content [ 'info_custom_link' ]) $content [ 'info_from' ] = '' ;
}
if ( ! $info_id && $action_id && $action == 'sp' ) // new SubProject
{
if ( ! $this -> bo -> check_access ( $action_id , EGW_ACL_ADD ))
2005-12-06 08:11:14 +01:00
{
2006-10-04 19:40:33 +02:00
return $referer ? $this -> tmpl -> location ( $referer ) : $this -> index ( 0 , $action , $action_id );
2005-12-06 08:11:14 +01:00
}
2006-10-04 19:40:33 +02:00
$parent = $this -> bo -> so -> data ;
$content [ 'info_id' ] = $info_id = 0 ;
2009-07-15 22:04:17 +02:00
$content [ 'info_uid' ] = '' ; // ensure that we have our own UID
2006-10-04 19:40:33 +02:00
$content [ 'info_owner' ] = $this -> user ;
$content [ 'info_id_parent' ] = $parent [ 'info_id' ];
/*
if ( $parent [ 'info_type' ] == 'task' && $parent [ 'info_status' ] == 'offer' )
2006-03-17 21:53:26 +01:00
{
2006-10-04 19:40:33 +02:00
$content [ 'info_type' ] = 'confirm' ; // confirmation to parent
$content [ 'info_responsible' ] = $parent [ 'info_owner' ];
2006-03-17 21:53:26 +01:00
}
2006-10-04 19:40:33 +02:00
*/
$content [ 'info_type' ] = $parent [ 'info_type' ];
$content [ 'info_status' ] = $this -> bo -> status [ 'defaults' ][ $content [ 'info_type' ]];
$content [ 'info_percent' ] = $content [ 'info_status' ] == 'done' ? '100%' : '0%' ;
$content [ 'info_datecompleted' ] = $content [ 'info_status' ] == 'done' ? $this -> bo -> user_time_now : 0 ;
$content [ 'info_confirm' ] = 'not' ;
$content [ 'info_subject' ] = lang ( $this -> messages [ 're' ]) . ' ' . $parent [ 'info_subject' ];
$content [ 'info_des' ] = '' ;
$content [ 'info_lastmodified' ] = '' ;
if ( $content [ 'info_startdate' ] < $this -> bo -> user_time_now ) // parent-startdate is in the past => today
2003-06-29 19:03:47 +02:00
{
2006-10-04 19:40:33 +02:00
$content [ 'info_startdate' ] = $set_startdate ;
2003-06-29 19:03:47 +02:00
}
2006-10-04 19:40:33 +02:00
if ( $content [ 'info_enddate' ] < $this -> bo -> user_time_now ) // parent-enddate is in the past => empty
2002-10-14 02:39:47 +02:00
{
2006-10-04 19:40:33 +02:00
$content [ 'info_enddate' ] = '' ;
2002-10-14 02:39:47 +02:00
}
2006-10-04 19:40:33 +02:00
}
else
{
2008-04-18 13:53:55 +02:00
if ( $info_id && ! $this -> bo -> check_access ( $info_id , EGW_ACL_EDIT ) &&
2007-06-13 23:37:05 +02:00
! ( $undelete = $this -> bo -> check_access ( $info_id , EGW_ACL_UNDELETE )) &&
! $this -> bo -> is_responsible ( $content ))
2002-10-14 02:39:47 +02:00
{
2006-10-04 19:40:33 +02:00
if ( $no_popup )
2002-10-14 02:39:47 +02:00
{
2010-06-07 16:43:34 +02:00
common :: egw_header ();
2006-10-04 19:40:33 +02:00
parse_navbar ();
echo '<p class="redItalic" align="center">' . lang ( 'Permission denied' ) . " </p> \n " ;
2010-06-07 16:43:34 +02:00
common :: egw_exit ();
2002-10-14 02:39:47 +02:00
}
2006-10-04 19:40:33 +02:00
$js = " alert(' " . lang ( 'Permission denied' ) . " '); window.close(); " ;
echo '<html><body onload="' . $js . '"></body></html>' ;
2010-06-07 16:43:34 +02:00
common :: egw_exit ();
2002-10-14 02:39:47 +02:00
}
2006-10-04 19:40:33 +02:00
}
$content [ 'links' ] = $content [ 'link_to' ] = array (
'to_id' => $info_id ,
'to_app' => 'infolog' ,
);
2008-04-23 10:27:49 +02:00
switch ( $action )
2006-10-04 19:40:33 +02:00
{
case 'sp' :
2008-03-08 22:43:13 +01:00
$links = egw_link :: get_links ( 'infolog' , $parent [ 'info_id' ], '!' . egw_link :: VFS_APPNAME );
2006-10-04 19:40:33 +02:00
foreach ( $links as $link )
{
2008-03-08 22:43:13 +01:00
$link_id = egw_link :: link ( 'infolog' , $content [ 'link_to' ][ 'to_id' ], $link [ 'app' ], $link [ 'id' ], $link [ 'remark' ]);
2003-09-08 02:40:42 +02:00
2006-10-04 19:40:33 +02:00
if ( $parent [ 'info_link_id' ] == $link [ 'link_id' ])
{
$content [ 'info_link_id' ] = $link_id ;
2003-06-27 12:24:34 +02:00
}
2006-10-04 19:40:33 +02:00
}
break ;
2003-06-29 19:03:47 +02:00
2006-10-04 19:40:33 +02:00
case 'projectmanager' :
$pm_links = array ( $action_id );
case 'addressbook' :
case 'projects' :
case 'calendar' :
default : // to allow other apps to participate
2008-04-23 10:27:49 +02:00
if ( strpos ( $action_id , ',' ) !== false )
{
foreach ( explode ( ',' , $action_id ) as $id )
{
egw_link :: link ( 'infolog' , $content [ 'link_to' ][ 'to_id' ], $action , $id );
}
2008-07-04 13:16:33 +02:00
$content [ 'blur_title' ] = egw_link :: title ( $action , '$id' ) . " ,... " ;
} else {
if ( $action_id ) {
egw_link :: link ( 'infolog' , $content [ 'link_to' ][ 'to_id' ], $action , $action_id );
$content [ 'blur_title' ] = egw_link :: title ( $action , $action_id );
}
2008-04-23 10:27:49 +02:00
}
2006-10-17 09:13:12 +02:00
$content [ 'info_contact' ] = $action . ':' . $action_id ;
2003-09-08 02:40:42 +02:00
2006-10-04 19:40:33 +02:00
case '' :
if ( $info_id )
{
if ( ! isset ( $pm_links ))
2002-10-18 00:02:44 +02:00
{
2008-03-08 22:43:13 +01:00
$pm_links = egw_link :: get_links ( 'infolog' , $info_id , 'projectmanager' );
2002-10-18 00:02:44 +02:00
}
2006-10-04 19:40:33 +02:00
break ; // normal edit
}
case 'new' : // new entry
$content [ 'info_startdate' ] = ( int ) $_GET [ 'startdate' ] ? ( int ) $_GET [ 'startdate' ] : $set_startdate ;
$content [ 'info_priority' ] = 1 ; // normal
$content [ 'info_owner' ] = $this -> user ;
if ( $type != '' )
{
$content [ 'info_type' ] = $type ;
}
$content [ 'info_status' ] = $this -> bo -> status [ 'defaults' ][ $content [ 'info_type' ]];
$content [ 'info_percent' ] = $content [ 'info_status' ] == 'done' ? '100%' : '0%' ;
break ;
2003-08-28 16:31:11 +02:00
}
2006-10-04 19:40:33 +02:00
if ( ! isset ( $this -> bo -> enums [ 'type' ][ $content [ 'info_type' ]]))
2003-08-28 16:31:11 +02:00
{
2006-10-04 19:40:33 +02:00
$content [ 'info_type' ] = 'note' ;
2003-08-28 16:31:11 +02:00
}
2006-10-04 19:40:33 +02:00
}
2007-03-12 12:27:33 +01:00
// group owners
$types = $this -> bo -> enums [ 'type' ];
if ( $this -> bo -> group_owners )
{
// remove types owned by groups the user has no edit grant (current type is made readonly)
foreach ( $this -> bo -> group_owners as $type => $group )
{
if ( ! ( $this -> bo -> grants [ $group ] & EGW_ACL_EDIT ))
{
if ( $type == $content [ 'info_type' ])
{
//echo "<p>setting type to r/o as user has no edit rights from group #$group</p>\n";
$readonlys [ 'info_type' ] = true ;
}
else
{
unset ( $types [ $type ]);
}
}
}
// set group as owner if type has a group-owner set
if ( isset ( $this -> bo -> group_owners [ $content [ 'info_type' ]]))
{
$content [ 'info_owner' ] = $this -> bo -> group_owners [ $content [ 'info_type' ]];
// Dont allow to change the type, if user has no delete rights from the group-owner
if ( $info_id && ! ( $this -> bo -> grants [ $content [ 'info_owner' ]] & EGW_ACL_DELETE ))
{
//echo "<p>setting type to r/o as user has no delete rights from group #$group</p>\n";
$readonlys [ 'info_type' ] = true ;
}
}
elseif ( $GLOBALS [ 'egw' ] -> accounts -> get_type ( $content [ 'info_owner' ]) == 'g' )
{
$content [ 'info_owner' ] = $this -> user ;
}
}
2007-04-26 13:34:46 +02:00
$preserv = $content ;
2006-10-04 19:40:33 +02:00
// for implizit edit of responsible user make all fields readonly, but status and percent
2007-06-13 23:37:05 +02:00
if ( $info_id && ! $this -> bo -> check_access ( $info_id , EGW_ACL_EDIT ) && $this -> bo -> is_responsible ( $content ) && ! $undelete )
2006-10-04 19:40:33 +02:00
{
$content [ 'status_only' ] = ! in_array ( 'link_to' , $this -> bo -> responsible_edit );
foreach ( array_diff ( array_merge ( array_keys ( $content ), array ( 'pm_id' )), $this -> bo -> responsible_edit ) as $name )
2006-02-04 08:49:47 +01:00
{
2006-10-04 19:40:33 +02:00
$readonlys [ $name ] = true ;
2006-02-04 08:49:47 +01:00
}
2007-04-26 13:34:46 +02:00
unset ( $readonlys [ $tabs ]);
2006-10-04 19:40:33 +02:00
// need to set all customfields extra, as they are not set if empty
foreach ( $this -> bo -> customfields as $name => $value )
2006-09-20 09:13:44 +02:00
{
2006-10-04 19:40:33 +02:00
$readonlys [ '#' . $name ] = true ;
2006-09-20 09:13:44 +02:00
}
2006-10-04 19:40:33 +02:00
}
2007-06-13 23:37:05 +02:00
// ToDo: use the old status before the delete
if ( $undelete ) $content [ 'info_status' ] = $this -> bo -> status [ 'defaults' ][ $content [ 'info_type' ]];
2006-10-04 19:40:33 +02:00
$content [ 'hide_from_css' ] = $content [ 'info_custom_from' ] ? '' : 'hideFrom' ;
2006-02-04 08:49:47 +01:00
2006-10-04 19:40:33 +02:00
if ( ! ( $readonlys [ 'button[delete]' ] = ! $info_id || ! $this -> bo -> check_access ( $info_id , EGW_ACL_DELETE )))
{
$content [ 'info_anz_subs' ] = $this -> bo -> anzSubs ( $info_id ); // to determine js confirmation of delete or not
2001-07-12 01:17:32 +02:00
}
2006-10-04 19:40:33 +02:00
$GLOBALS [ 'egw_info' ][ 'flags' ][ 'app_header' ] = lang ( $this -> messages [ $info_id ? 'edit' : ( $action == 'sp' ? 'add_sub' : 'add' )]);
2001-10-03 23:29:32 +02:00
2006-10-04 19:40:33 +02:00
// use a typ-specific template (infolog.edit.xyz), if one exists, otherwise fall back to the generic one
if ( ! $this -> tmpl -> read ( 'infolog.edit.' . $content [ 'info_type' ]))
{
2009-12-13 14:36:09 +01:00
$this -> tmpl -> read ( $print ? 'infolog.edit.print' : 'infolog.edit' );
2006-10-04 19:40:33 +02:00
}
if ( $this -> bo -> has_customfields ( $content [ 'info_type' ]))
2001-07-14 23:44:01 +02:00
{
2006-10-04 19:40:33 +02:00
$content [ 'customfields' ] = $content [ 'info_type' ];
2001-07-12 01:17:32 +02:00
}
2006-10-04 19:40:33 +02:00
else
{
2007-06-13 23:37:05 +02:00
$readonlys [ $tabs ][ 'customfields' ] = true ;
2006-10-04 19:40:33 +02:00
}
if ( ! isset ( $GLOBALS [ 'egw_info' ][ 'user' ][ 'apps' ][ 'projectmanager' ]))
{
$readonlys [ $tabs ][ 'project' ] = true ; // disable the project tab
}
$readonlys [ $tabs ][ 'delegation' ] = $GLOBALS [ 'egw_info' ][ 'user' ][ 'preferences' ][ 'common' ][ 'account_selection' ] == 'none' &&
! isset ( $GLOBALS [ 'egw_info' ][ 'user' ][ 'apps' ][ 'admin' ]);
2001-07-12 01:17:32 +02:00
2006-10-04 19:40:33 +02:00
$content [ 'duration_format' ] = $this -> duration_format ;
2007-03-12 12:27:33 +01:00
if ( $this -> prefs [ 'show_id' ]) $content [ 'info_number' ] = $info_id ;
2006-10-04 19:40:33 +02:00
$old_pm_id = is_array ( $pm_links ) ? array_shift ( $pm_links ) : $content [ 'old_pm_id' ];
if ( ! isset ( $content [ 'pm_id' ]) && $old_pm_id ) $content [ 'pm_id' ] = $old_pm_id ;
2007-06-13 23:37:05 +02:00
if ( $info_id && $this -> bo -> history )
{
$content [ 'history' ] = array (
'id' => $info_id ,
'app' => 'infolog' ,
'status-widgets' => array (
'Ty' => $types ,
//'Li', // info_link_id
'Ca' => 'select-cat' ,
'Pr' => $this -> bo -> enums [ 'priority' ],
'Ow' => 'select-account' ,
2008-04-18 13:53:55 +02:00
//'Ac', // info_access: private||public
2007-06-13 23:37:05 +02:00
'St' => $this -> bo -> status [ $content [ 'info_type' ]] + array ( 'deleted' => 'deleted' ),
'Pe' => 'select-percent' ,
'Co' => 'date-time' ,
'st' => 'date-time' ,
'En' => 'date' ,
'Re' => 'select-account' ,
// PM fields, ToDo: access control!!!
'pT' => 'date-duration' ,
'uT' => 'date-duration' ,
// 'pL' => 'projectmanager-pricelist',
'pr' => 'float' ,
),
);
$history_stati = array ();
require_once ( EGW_INCLUDE_ROOT . '/infolog/inc/class.infolog_tracking.inc.php' );
$tracking = new infolog_tracking ( $this );
foreach ( $tracking -> field2history as $field => $history )
{
$history_stati [ $history ] = $tracking -> field2label [ $field ];
}
unset ( $tracking );
}
else
{
$readonlys [ $tabs ][ 'history' ] = true ;
}
2006-10-04 19:40:33 +02:00
$GLOBALS [ 'egw_info' ][ 'flags' ][ 'app_header' ] = lang ( 'InfoLog' ) . ' - ' .
( $content [ 'status_only' ] ? lang ( 'Edit Status' ) : lang ( 'Edit' ));
$GLOBALS [ 'egw_info' ][ 'flags' ][ 'params' ][ 'manual' ] = array ( 'page' => ( $info_id ? 'ManualInfologEdit' : 'ManualInfologAdd' ));
2010-09-15 10:53:46 +02:00
//error_log(substr($content['info_des'],1793,10));
//$content['info_des'] = substr($content['info_des'],0,1793);
2008-10-07 14:50:14 +02:00
//echo "<p>infolog_ui.edit(info_id='$info_id',action='$action',action_id='$action_id') readonlys="; print_r($readonlys); echo ", content = "; _debug_array($content);
$this -> tmpl -> exec ( 'infolog.infolog_ui.edit' , $content , array (
2007-03-12 12:27:33 +01:00
'info_type' => $types ,
2006-10-04 19:40:33 +02:00
'info_priority' => $this -> bo -> enums [ 'priority' ],
'info_confirm' => $this -> bo -> enums [ 'confirm' ],
2007-06-13 23:37:05 +02:00
'info_status' => $this -> bo -> status [ $content [ 'info_type' ]],
'status' => $history_stati ,
2009-12-11 09:34:47 +01:00
'action' => array (
'copy' => array ( 'label' => 'Copy' , 'title' => 'Copy this Infolog' ),
2009-12-13 14:36:09 +01:00
'print' => array ( 'label' => 'Print' , 'title' => 'Print this Infolog' ),
2009-12-11 09:34:47 +01:00
),
2007-04-26 13:34:46 +02:00
), $readonlys , $preserv + array ( // preserved values
2006-10-04 19:40:33 +02:00
'info_id' => $info_id ,
'action' => $action ,
'action_id' => $action_id ,
'referer' => $referer ,
'no_popup' => $no_popup ,
'old_pm_id' => $old_pm_id ,
), $no_popup ? 0 : 2 );
}
function icon ( $cat , $id , $status = '' )
{
if ( ! $status || ! ( $icon = $this -> icons [ $cat ][ $id . '_' . $status ]))
{
$icon = $this -> icons [ $cat ][ $id ];
}
2010-06-07 16:43:34 +02:00
if ( $icon && ! is_readable ( common :: get_image_dir () . '/' . $icon ))
2006-10-04 19:40:33 +02:00
{
$icon = False ;
}
if ( ! $status || ! ( $alt = $this -> icons [ $cat ][ $id . '_' . $status . '_alt' ]))
{
if ( ! ( $alt = $this -> icons [ $cat ][ $id . '_alt' ]))
2001-07-14 23:44:01 +02:00
{
2006-10-04 19:40:33 +02:00
$alt = $id ;
2001-07-14 23:44:01 +02:00
}
2001-07-12 01:17:32 +02:00
}
2008-03-09 15:46:02 +01:00
return $icon ? html :: image ( 'infolog' , $icon , lang ( $alt ), 'border=0' ) : lang ( $alt );
2006-10-04 19:40:33 +02:00
}
2001-10-03 23:29:32 +02:00
2007-06-13 23:37:05 +02:00
/**
* stripping slashes from an array
*
2008-04-18 13:53:55 +02:00
* @ static
2007-06-13 23:37:05 +02:00
* @ param array $arr
* @ return array
*/
function array_stripslashes ( $arr )
{
foreach ( $arr as $key => $val )
{
if ( is_array ( $val ))
{
$arr [ $key ] = self :: array_stripslashes ( $var );
}
else
{
$arr [ $key ] = stripslashes ( $val );
}
}
return $arr ;
}
/**
* Infolog ' s site configuration
*
*/
2006-10-04 19:40:33 +02:00
function admin ( )
{
$fields = array (
'info_cat' => 'Category' ,
'info_from' => 'Contact' ,
'info_addr' => 'Phone/Email' ,
'info_subject' => 'Subject' ,
'info_des' => 'Description' ,
'link_to' => 'Links' ,
'info_priority' => 'Priority' ,
'info_location' => 'Location' ,
'info_planned_time' => 'Planned time' ,
'info_used_time' => 'Used time' ,
);
if ( $_POST [ 'save' ] || $_POST [ 'apply' ])
2001-10-07 22:11:32 +02:00
{
2007-06-13 23:37:05 +02:00
if ( get_magic_quotes_gpc ())
{
2008-04-18 13:53:55 +02:00
$_POST = self :: array_stripslashes ( $_POST );
2001-10-07 22:11:32 +02:00
}
2006-10-04 19:40:33 +02:00
$this -> bo -> responsible_edit = array ( 'info_status' , 'info_percent' , 'info_datecompleted' );
2007-06-13 23:37:05 +02:00
2008-03-06 08:58:08 +01:00
if ( $_POST [ 'responsible_edit' ])
2006-03-24 17:10:09 +01:00
{
2009-08-19 16:59:58 +02:00
$extra = array_intersect (( array ) $_POST [ 'responsible_edit' ], array_keys ( $fields ));
$this -> bo -> responsible_edit = array_merge ( $this -> bo -> responsible_edit , $extra );
2006-03-24 17:10:09 +01:00
}
2009-08-19 16:59:58 +02:00
config :: save_value ( 'responsible_edit' , $this -> bo -> responsible_edit , 'infolog' );
2008-04-18 13:53:55 +02:00
config :: save_value ( 'implicit_rights' , $this -> bo -> implicit_rights = $_POST [ 'implicit_rights' ] == 'edit' ? 'edit' : 'read' , 'infolog' );
config :: save_value ( 'history' , $this -> bo -> history = $_POST [ 'history' ], 'infolog' );
2006-10-04 19:40:33 +02:00
}
if ( $_POST [ 'cancel' ] || $_POST [ 'save' ])
{
2010-06-07 16:43:34 +02:00
egw :: redirect_link ( '/infolog/index.php' );
2006-10-04 19:40:33 +02:00
}
2001-10-07 22:11:32 +02:00
2007-06-13 23:37:05 +02:00
$GLOBALS [ 'egw_info' ][ 'flags' ][ 'app_header' ] = lang ( 'InfoLog' ) . ' - ' . lang ( 'Site configuration' );
2010-06-07 16:43:34 +02:00
common :: egw_header ();
2001-10-07 22:11:32 +02:00
2006-10-04 19:40:33 +02:00
$GLOBALS [ 'egw' ] -> template -> set_file ( array ( 'info_admin_t' => 'admin.tpl' ));
$GLOBALS [ 'egw' ] -> template -> set_block ( 'info_admin_t' , 'info_admin' );
2001-10-07 22:11:32 +02:00
2006-10-04 19:40:33 +02:00
$GLOBALS [ 'egw' ] -> template -> set_var ( Array (
'lang_responsible_rights' => lang ( 'Rights for the responsible' ),
'lang_implicit_rights' => lang ( 'Which implicit ACL rights should the responsible get?' ),
2008-03-09 15:46:02 +01:00
'implicit_rights' => html :: select ( 'implicit_rights' , $this -> bo -> implicit_rights , array (
2006-10-04 19:40:33 +02:00
'read' => 'read rights (default)' ,
'edit' => 'edit rights (full edit rights incl. making someone else responsible!)' ,
)),
'lang_responsible_edit' => lang ( 'Which additional fields should the responsible be allowed to edit without having edit rights?<br />Status, percent and date completed are always allowed.' ),
2008-03-09 15:46:02 +01:00
'responsible_edit' => html :: checkbox_multiselect ( 'responsible_edit' , $this -> bo -> responsible_edit , $fields , false , '' , 11 ),
2006-10-04 19:40:33 +02:00
'text' => lang ( '<b>file-attachments via symlinks</b> instead of uploads and retrieval via file:/path for direct lan-clients' ),
2008-10-07 15:00:03 +02:00
'action_url' => html :: link ( '/index.php' , array ( 'menuaction' => 'infolog.infolog_ui.admin' )),
2008-03-09 15:46:02 +01:00
'save_button' => html :: submit_button ( 'save' , 'Save' ),
'apply_button' => html :: submit_button ( 'apply' , 'Apply' ),
'cancel_button' => html :: submit_button ( 'cancel' , 'Cancel' ),
2007-06-13 23:37:05 +02:00
'lang_history' => lang ( 'History logging' ),
'lang_history2' => lang ( 'History logging and deleting of items' ),
2008-03-09 15:46:02 +01:00
'history' => html :: select ( 'history' , $this -> bo -> history , array (
2007-06-13 23:37:05 +02:00
'' => lang ( 'No' ),
'history' => lang ( 'Yes, with purging of deleted items possible' ),
'history_admin_delete' => lang ( 'Yes, only admins can purge deleted items' ),
'history_no_delete' => lang ( 'Yes, noone can purge deleted items' ),
))
2006-10-04 19:40:33 +02:00
));
2001-10-07 22:11:32 +02:00
2008-04-18 13:53:55 +02:00
echo parse_navbar ();
$GLOBALS [ 'egw' ] -> template -> pfp ( 'phpgw_body' , 'info_admin' );
2006-10-04 19:40:33 +02:00
}
2008-04-18 13:53:55 +02:00
2006-10-04 19:40:33 +02:00
/**
* imports a mail as infolog
2008-04-18 13:53:55 +02:00
* two possible calls :
2006-10-04 19:40:33 +02:00
* 1. with function args set . ( we come from send mail )
* 2. with $_GET [ ' uid ] = someuid ( we come from display mail )
2008-04-18 13:53:55 +02:00
*
2006-10-04 19:40:33 +02:00
* @ author Cornelius Weiss < nelius @ cwtech . de >
2007-04-26 13:34:46 +02:00
* @ param string $_to_emailAddress
2006-10-04 19:40:33 +02:00
* @ param string $_subject
* @ param string $_body
* @ param array $_attachments
* @ param string $_date
*/
function import_mail ( $_to_emailAddress = false , $_subject = false , $_body = false , $_attachments = false , $_date = false )
{
$uid = $_GET [ 'uid' ];
2008-05-23 12:51:54 +02:00
$partid = $_GET [ 'part' ];
2008-06-04 08:53:24 +02:00
$mailbox = base64_decode ( $_GET [ 'mailbox' ]);
2009-12-15 17:05:48 +01:00
if ( $_date == false || empty ( $_date )) $_date = $this -> bo -> user_time_now ;
2006-10-04 19:40:33 +02:00
if ( ! empty ( $_to_emailAddress ))
2006-08-23 21:03:25 +02:00
{
2009-07-13 12:47:19 +02:00
$GLOBALS [ 'egw_info' ][ 'flags' ][ 'currentapp' ] = 'infolog' ;
2006-10-04 19:40:33 +02:00
echo '<script>window.resizeTo(750,550);</script>' ;
2006-08-23 21:03:25 +02:00
2006-10-04 19:40:33 +02:00
if ( is_array ( $_attachments ))
{
2009-11-28 19:16:18 +01:00
//echo __METHOD__.'<br>';
2009-08-13 12:07:34 +02:00
//_debug_array($_attachments);
2009-11-28 19:16:18 +01:00
$bofelamimail = CreateObject ( 'felamimail.bofelamimail' , $GLOBALS [ 'egw' ] -> translation -> charset ());
2010-09-20 13:47:06 +02:00
//$bopreferences =& $bofelamimail->bopreferences; //= CreateObject('felamimail.bopreferences');
//$preferences =& $bofelamimail->mailPreferences;
2009-11-28 19:16:18 +01:00
$bofelamimail -> openConnection ();
2006-10-04 19:40:33 +02:00
foreach ( $_attachments as $attachment )
2006-08-23 21:03:25 +02:00
{
2009-08-13 12:07:34 +02:00
if ( $attachment [ 'type' ] == 'MESSAGE/RFC822' )
{
$bofelamimail -> reopen ( $attachment [ 'folder' ]);
2009-08-19 15:56:35 +02:00
$mailcontent = self :: get_mailcontent ( $bofelamimail , $attachment [ 'uid' ], $attachment [ 'partID' ], $attachment [ 'folder' ]);
2009-08-13 12:07:34 +02:00
//_debug_array($mailcontent['attachments']);
foreach ( $mailcontent [ 'attachments' ] as $tmpattach => $tmpval )
{
$attachments [] = $tmpval ;
}
2009-08-19 15:56:35 +02:00
}
2009-08-13 12:07:34 +02:00
else
{
2009-11-28 19:16:18 +01:00
if ( ! empty ( $attachment [ 'folder' ]))
{
$is_winmail = $_GET [ 'is_winmail' ] ? $_GET [ 'is_winmail' ] : 0 ;
$bofelamimail -> reopen ( $attachment [ 'folder' ]);
$attachmentData = $bofelamimail -> getAttachment ( $attachment [ 'uid' ], $attachment [ 'partID' ], $is_winmail );
$attachment [ 'file' ] = tempnam ( $GLOBALS [ 'egw_info' ][ 'server' ][ 'temp_dir' ], $GLOBALS [ 'egw_info' ][ 'flags' ][ 'currentapp' ] . " _ " );
$tmpfile = fopen ( $attachment [ 'file' ], 'w' );
fwrite ( $tmpfile , $attachmentData [ 'attachment' ]);
fclose ( $tmpfile );
}
2009-08-13 12:07:34 +02:00
$attachments [] = array (
'name' => $attachment [ 'name' ],
'mimeType' => $attachment [ 'type' ],
'tmp_name' => $attachment [ 'file' ],
'size' => $attachment [ 'size' ],
);
}
2006-08-23 21:03:25 +02:00
}
2009-11-28 19:16:18 +01:00
$bofelamimail -> closeConnection ();
2006-08-23 21:03:25 +02:00
}
2010-09-20 11:32:54 +02:00
//_debug_array($_to_emailAddress);
$toaddr = array ();
foreach ( array ( 'to' , 'cc' , 'bcc' ) as $x ) if ( is_array ( $_to_emailAddress [ $x ]) && ! empty ( $_to_emailAddress [ $x ])) $toaddr = array_merge ( $toaddr , $_to_emailAddress [ $x ]);
2009-08-13 12:07:34 +02:00
//_debug_array($attachments);
2010-09-20 11:32:54 +02:00
$body = self :: createHeaderInfoSection ( array ( 'FROM' => $_to_emailAddress [ 'from' ],
2010-09-20 11:43:23 +02:00
'TO' => ( ! empty ( $_to_emailAddress [ 'to' ]) ? implode ( ',' , $_to_emailAddress [ 'to' ]) : null ),
'CC' => ( ! empty ( $_to_emailAddress [ 'cc' ]) ? implode ( ',' , $_to_emailAddress [ 'cc' ]) : null ),
'BCC' => ( ! empty ( $_to_emailAddress [ 'bcc' ]) ? implode ( ',' , $_to_emailAddress [ 'bcc' ]) : null ),
2010-09-20 11:32:54 +02:00
'SUBJECT' => $_subject ,
'DATE' => bofelamimail :: _strtotime ( $_date ))) . strip_tags ( $_body );
2006-10-04 19:40:33 +02:00
$this -> edit ( $this -> bo -> import_mail (
2010-09-20 11:32:54 +02:00
implode ( ',' , $toaddr ), $_subject , $body , $attachments , $_date
2006-10-04 19:40:33 +02:00
));
exit ;
}
elseif ( $uid && $mailbox )
{
2009-08-28 15:11:03 +02:00
$bofelamimail = CreateObject ( 'felamimail.bofelamimail' , $GLOBALS [ 'egw' ] -> translation -> charset ());
2010-09-20 13:47:06 +02:00
//$bopreferences =& $bofelamimail->bopreferences; //= CreateObject('felamimail.bopreferences');
2006-10-04 19:40:33 +02:00
$bofelamimail -> openConnection ();
2007-01-14 09:09:22 +01:00
$bofelamimail -> reopen ( $mailbox );
2008-04-18 13:53:55 +02:00
2009-08-19 15:56:35 +02:00
$mailcontent = self :: get_mailcontent ( $bofelamimail , $uid , $partid , $mailbox );
2009-08-13 12:07:34 +02:00
return $this -> edit ( $this -> bo -> import_mail (
$mailcontent [ 'mailaddress' ],
$mailcontent [ 'subject' ],
$mailcontent [ 'message' ],
$mailcontent [ 'attachments' ],
strtotime ( $mailcontent [ 'headers' ][ 'DATE' ])
));
}
2010-06-07 16:43:34 +02:00
common :: egw_header ();
2009-08-13 12:07:34 +02:00
echo " <script> window.close(); alert('Error: no mail (Mailbox / UID) given!');</script> " ;
2010-06-07 16:43:34 +02:00
common :: egw_exit ();
2009-08-13 12:07:34 +02:00
exit ;
}
/**
* fetches the actual mailcontent
*/
static function get_mailcontent ( & $bofelamimail , $uid , $partid = '' , $mailbox = '' )
{
//echo __METHOD__." called for $uid,$partid <br>";
2010-09-20 11:32:54 +02:00
$headers = $bofelamimail -> getMessageHeader ( $uid , $partid , true );
2009-03-06 15:39:34 +01:00
// dont force retrieval of the textpart, let felamimail preferences decide
$bodyParts = $bofelamimail -> getMessageBody ( $uid , '' , $partid );
2008-05-23 12:51:54 +02:00
$attachments = $bofelamimail -> getMessageAttachments ( $uid , $partid );
2008-04-18 13:53:55 +02:00
2010-09-20 11:32:54 +02:00
if ( $bofelamimail -> isSentFolder ( $mailbox )) $mailaddress = $headers [ 'TO' ];
elseif ( isset ( $headers [ 'FROM' ])) $mailaddress = $headers [ 'FROM' ];
elseif ( isset ( $headers [ 'SENDER' ])) $mailaddress = $headers [ 'SENDER' ];
2009-11-28 19:55:26 +01:00
if ( isset ( $headers [ 'CC' ])) $mailaddress .= ',' . $headers [ 'CC' ];
//_debug_array($headers);
2010-09-20 11:32:54 +02:00
$subject = $headers [ 'SUBJECT' ];
2008-04-18 13:53:55 +02:00
2009-08-28 15:07:32 +02:00
$message = self :: getdisplayableBody ( $bofelamimail , $bodyParts );
2010-09-15 10:53:46 +02:00
$headdata = self :: createHeaderInfoSection ( $headers );
$message = $headdata . $message ;
2009-11-28 19:16:18 +01:00
//echo __METHOD__.'<br>';
2009-08-13 12:07:34 +02:00
//_debug_array($attachments);
2006-10-04 19:40:33 +02:00
if ( is_array ( $attachments ))
{
foreach ( $attachments as $num => $attachment )
2006-08-23 21:03:25 +02:00
{
2009-08-19 15:56:35 +02:00
if ( $attachment [ 'mimeType' ] == 'MESSAGE/RFC822' )
2009-08-13 12:07:34 +02:00
{
//_debug_array($bofelamimail->getMessageHeader($uid, $attachment['partID']));
//_debug_array($bofelamimail->getMessageBody($uid,'', $attachment['partID']));
//_debug_array($bofelamimail->getMessageAttachments($uid, $attachment['partID']));
2009-08-19 15:56:35 +02:00
$mailcontent = self :: get_mailcontent ( $bofelamimail , $uid , $attachment [ 'partID' ]);
2009-08-13 12:07:34 +02:00
$headdata = '' ;
if ( $mailcontent [ 'headers' ])
{
2010-09-15 10:53:46 +02:00
$headdata = self :: createHeaderInfoSection ( $mailcontent [ 'headers' ]);
2009-08-13 12:07:34 +02:00
}
2009-08-19 15:56:35 +02:00
if ( $mailcontent [ 'message' ])
2009-08-13 12:07:34 +02:00
{
$tempname = tempnam ( $GLOBALS [ 'egw_info' ][ 'server' ][ 'temp_dir' ], $GLOBALS [ 'egw_info' ][ 'flags' ][ 'currentapp' ] . " _ " );
$attachedMessages [] = array (
'type' => 'TEXT/PLAIN' ,
'name' => $mailcontent [ 'subject' ] . '.txt' ,
'tmp_name' => $tempname ,
);
$tmpfile = fopen ( $tempname , 'w' );
fwrite ( $tmpfile , $headdata . $mailcontent [ 'message' ]);
fclose ( $tmpfile );
}
foreach ( $mailcontent [ 'attachments' ] as $tmpattach => $tmpval )
{
$attachedMessages [] = $tmpval ;
}
unset ( $attachments [ $num ]);
}
else
{
$attachments [ $num ] = array_merge ( $attachments [ $num ], $bofelamimail -> getAttachment ( $uid , $attachment [ 'partID' ]));
if ( isset ( $attachments [ $num ][ 'charset' ])) {
$GLOBALS [ 'egw' ] -> translation -> convert ( $attachments [ $num ][ 'attachment' ], $attachments [ $num ][ 'charset' ]);
}
$attachments [ $num ][ 'type' ] = $attachments [ $num ][ 'mimeType' ];
$attachments [ $num ][ 'tmp_name' ] = tempnam ( $GLOBALS [ 'egw_info' ][ 'server' ][ 'temp_dir' ], $GLOBALS [ 'egw_info' ][ 'flags' ][ 'currentapp' ] . " _ " );
$tmpfile = fopen ( $attachments [ $num ][ 'tmp_name' ], 'w' );
fwrite ( $tmpfile , $attachments [ $num ][ 'attachment' ]);
fclose ( $tmpfile );
unset ( $attachments [ $num ][ 'attachment' ]);
2006-10-17 10:04:22 +02:00
}
2006-08-23 21:03:25 +02:00
}
2009-08-13 12:07:34 +02:00
if ( is_array ( $attachedMessages )) $attachments = array_merge ( $attachments , $attachedMessages );
2006-08-23 21:03:25 +02:00
}
2009-08-13 12:07:34 +02:00
return array (
'mailaddress' => $mailaddress ,
'subject' => $subject ,
'message' => $message ,
'attachments' => $attachments ,
'headers' => $headers ,
);
2006-10-04 19:40:33 +02:00
}
2008-04-18 13:53:55 +02:00
2010-09-15 10:53:46 +02:00
static function createHeaderInfoSection ( $header )
{
$headdata = null ;
if ( $header [ 'SUBJECT' ]) $headdata = lang ( 'subject' ) . ': ' . $header [ 'SUBJECT' ] . " \n " ;
if ( $header [ 'FROM' ]) $headdata .= lang ( 'from' ) . ': ' . $header [ 'FROM' ] . " \n " ;
if ( $header [ 'SENDER' ]) $headdata .= lang ( 'sender' ) . ': ' . $header [ 'SENDER' ] . " \n " ;
if ( $header [ 'TO' ]) $headdata .= lang ( 'to' ) . ': ' . $header [ 'TO' ] . " \n " ;
if ( $header [ 'CC' ]) $headdata .= lang ( 'cc' ) . ': ' . $header [ 'CC' ] . " \n " ;
2010-09-20 16:33:53 +02:00
if ( $header [ 'BCC' ]) $headdata .= lang ( 'bcc' ) . ': ' . $header [ 'BCC' ] . " \n " ;
2010-09-15 10:53:46 +02:00
if ( $header [ 'DATE' ]) $headdata .= lang ( 'date' ) . ': ' . $header [ 'DATE' ] . " \n " ;
if ( $header [ 'PRIORITY' ] && $header [ 'PRIORITY' ] != 'normal' ) $headdata .= lang ( 'priority' ) . ': ' . $header [ 'PRIORITY' ] . " \n " ;
if ( $header [ 'IMPORTANCE' ] && $header [ 'IMPORTANCE' ] != 'normal' ) $headdata .= lang ( 'importance' ) . ': ' . $header [ 'IMPORTANCE' ] . " \n " ;
//if ($mailcontent['headers']['ORGANIZATION']) $headdata .= lang('organization').': '.$mailcontent['headers']['ORGANIZATION']."\
if ( ! empty ( $headdata ))
{
$headdata = " -------------------------------------------------------- \n " . $headdata ;
$headdata .= " -------------------------------------------------------- \n " ;
}
else
{
$headdata = " -------------------------------------------------------- \n " ;
}
return $headdata ;
}
2009-08-28 15:07:32 +02:00
static function & getdisplayableBody ( & $bofelamimail , $bodyParts )
{
for ( $i = 0 ; $i < count ( $bodyParts ); $i ++ )
{
if ( ! isset ( $bodyParts [ $i ][ 'body' ])) {
$bodyParts [ $i ][ 'body' ] = self :: getdisplayableBody ( $bofelamimail , $bodyParts [ $i ]);
$message .= $bodyParts [ $i ][ 'body' ];
continue ;
}
// add line breaks to $bodyParts
$newBody = $GLOBALS [ 'egw' ] -> translation -> convert ( $bodyParts [ $i ][ 'body' ], $bodyParts [ $i ][ 'charSet' ]);
if ( $bodyParts [ $i ][ 'mimeType' ] == 'text/html' ) {
// convert HTML to text, as we dont want HTML in infologs
2010-08-31 16:29:01 +02:00
$newBody = html :: purify ( $newBody );
2009-08-28 15:07:32 +02:00
$newBody = $bofelamimail -> convertHTMLToText ( $newBody , true );
$bofelamimail -> getCleanHTML ( $newBody ); // new Body passed by reference
$message .= $newBody ;
continue ;
}
$newBody = strip_tags ( $newBody );
$newBody = explode ( " \n " , $newBody );
// create it new, with good line breaks
reset ( $newBody );
while ( list ( $key , $value ) = @ each ( $newBody ))
{
if ( trim ( $value ) != '' ) {
#if ($value != "\r") $value .= "\n";
} else {
// if you want to strip all empty lines uncomment the following
#continue;
}
$message .= $bofelamimail -> wordwrap ( $value , 75 , " \n " );
}
}
return $message ;
}
2009-12-13 14:36:09 +01:00
/**
* return javascript to open compose window to print the Infolog
*
* @ param array $event
* @ param boolean $added
* @ return string javascript window . open command
*/
function custom_print ( $content , $added )
{
$vars = array (
'menuaction' => 'infolog.infolog_ui.edit' ,
'info_id' => $content [ 'info_id' ],
'print' => true ,
);
return " window.open(' " . egw :: link ( '/index.php' , $vars ) . " ','_blank','width=700,height=700,scrollbars=yes,status=no'); " ;
}
2006-10-04 19:40:33 +02:00
/**
* shows infolog in other applications
*
* @ param $args [ 'location' ] location des hooks : { addressbook | projects | calendar } _view | infolog
* @ param $args [ 'view' ] menuaction to view , if location == 'infolog'
* @ param $args [ 'app' ] app - name , if location == 'infolog'
* @ param $args [ 'view_id' ] name of the id - var for location == 'infolog'
* @ param $args [ $args [ 'view_id' ]] id of the entry
* this function can be called for any app , which should include infolog : \
* $GLOBALS [ 'egw' ] -> hooks -> process ( array ( \
* * 'location' => 'infolog' , \
* * 'app' => < your app > , \
* * 'view_id' => < id name > , \
* * < id name > => < id value > , \
* * 'view' => < menuaction to view an entry in your app > \
* ));
*/
function hook_view ( $args )
{
switch ( $args [ 'location' ])
2003-04-28 00:35:39 +02:00
{
2006-10-04 19:40:33 +02:00
case 'addressbook_view' :
$app = 'addressbook' ;
$view_id = 'ab_id' ;
$view_id2 = 'contact_id' ;
2008-08-27 14:31:33 +02:00
$view = 'addressbook.addressbook_ui.view' ;
2006-10-04 19:40:33 +02:00
break ;
case 'projects_view' :
$app = 'projects' ;
$view_id = 'project_id' ;
$view = 'projects.uiprojects.view' ;
break ;
default :
$app = $args [ 'app' ];
$view_id = $args [ 'view_id' ];
$view = $args [ 'view' ];
}
if ( ! is_array ( $args ) || $args [ 'debug' ])
{
2008-10-07 14:50:14 +02:00
echo " <p>infolog_ui::hook_view( " ; print_r ( $args ); echo " ): app=' $app ', $view_id =' $args[$view_id] ', view=' $view '</p> \n " ;
2006-10-04 19:40:33 +02:00
}
if ( ! isset ( $app ) || ! isset ( $args [ $view_id ]))
{
return False ;
}
$this -> called_by = $app ; // for read/save_sessiondata, to have different sessions for the hooks
2004-02-28 15:58:44 +01:00
2006-10-04 19:40:33 +02:00
$GLOBALS [ 'egw' ] -> translation -> add_app ( 'infolog' );
2003-04-28 00:35:39 +02:00
2009-03-16 14:00:45 +01:00
etemplate :: $hooked = true ;
2006-10-04 19:40:33 +02:00
$this -> index ( 0 , $app , $args [ $view_id ], array (
'menuaction' => $view ,
isset ( $view_id2 ) ? $view_id2 : $view_id => $args [ $view_id ]
), True );
2009-03-16 14:00:45 +01:00
etemplate :: $hooked = false ;
2007-09-22 16:58:10 +02:00
}
2008-04-18 13:53:55 +02:00
2007-09-22 16:58:10 +02:00
/**
* Defines the fields for the csv export
*
* @ param string $type = null infolog type to include only the matching custom fields if set
* @ return array
*/
function csv_export_fields ( $type = null )
{
$fields = array (
'info_type' => lang ( 'Type' ),
'info_from' => lang ( 'Contact' ),
'info_addr' => lang ( 'Phone/Email' ),
// 'info_link_id' => lang('primary link'),
'info_cat' => array ( 'label' => lang ( 'Category' ), 'type' => 'select-cat' ),
'info_priority' => lang ( 'Priority' ),
'info_owner' => array ( 'label' => lang ( 'Owner' ), 'type' => 'select-account' ),
'info_access' => lang ( 'Access' ),
'info_status' => lang ( 'Status' ),
'info_percent' => lang ( 'Completed' ),
'info_datecompleted' => lang ( 'Date completed' ),
2010-04-23 14:10:36 +02:00
'info_datemodified' => lang ( 'Last modified' ),
'info_modifier' => array ( 'label' => lang ( 'Modifier' ), 'type' => 'select-account' ),
2007-09-22 16:58:10 +02:00
'info_location' => lang ( 'Location' ),
'info_startdate' => lang ( 'Startdate' ),
'info_enddate' => lang ( 'Enddate' ),
'info_responsible' => array ( 'label' => lang ( 'Responsible' ), 'type' => 'select-account' ),
'info_subject' => lang ( 'Subject' ),
'info_des' => lang ( 'Description' ),
2010-04-23 14:10:36 +02:00
'info_id' => lang ( 'Id' ),
2007-09-22 16:58:10 +02:00
// PM fields
'info_planned_time' => lang ( 'planned time' ),
'info_used_time' => lang ( 'used time' ),
'pl_id' => lang ( 'pricelist' ),
'info_price' => lang ( 'price' ),
);
foreach ( $this -> bo -> timestamps as $name )
{
$fields [ $name ] = array ( 'label' => $fields [ $name ], 'type' => 'date-time' );
}
foreach ( $this -> bo -> customfields as $name => $data )
{
2010-04-23 14:10:36 +02:00
if ( $data [ 'type2' ] && $type && ! in_array ( $type , explode ( ',' , $data [ 'type2' ]))) continue ;
2007-09-22 16:58:10 +02:00
$fields [ '#' . $name ] = array (
'label' => $data [ 'label' ],
'type' => $data [ 'type' ],
);
}
return $fields ;
}
2006-10-04 19:40:33 +02:00
}