<?php 
/* For licensing terms, see /license.txt */

/**
 *  @author: Julio Montoya <gugli100@gmail.com> Implementing a real agenda lib
 */

class Agenda {
	var $events = array();
	var $type   = 'personal'; // personal, admin or course
	 
	
	function __construct() {
		//Table definitions
		$this->tbl_global_agenda 	= Database::get_main_table(TABLE_MAIN_SYSTEM_CALENDAR);  
		$this->tbl_personal_agenda 	= Database::get_user_personal_table(TABLE_PERSONAL_AGENDA);		
		$this->tbl_course_agenda 	= Database::get_course_table(TABLE_AGENDA);
		
		//Setting the course object if we are in a course
		$this->course = null;
		$course_info = api_get_course_info();
		if (!empty($course_info)) {			
			$this->course = $course_info;			
		}
		
		$this->events				= array();
		
		//Event colors
		$this->event_platform_color = 'red';//red
		$this->event_course_color 	= '#458B00'; //green
		$this->event_group_color 	= '#A0522D'; //siena
		$this->event_session_color 	= '#000080'; // blue
		$this->event_personal_color = 'steel blue'; //steel blue
	}
	
	/**
	 * 
	 * Adds an event
	 * @param 	int		start tms
	 * @param 	int		end tms
	 * @param 	string	agendaDay, agendaWeek, month
	 * @param	string	personal, course or global (only works for personal by now) 
	 */
	function add_event($start, $end, $all_day, $view, $title, $content, $users_to_send = array(), $add_as_announcement = false) {
		
		$start 		= date('Y-m-d H:i:s', $start);
		$end 		= date('Y-m-d H:i:s', $end);			
		$start 		= api_get_utc_datetime($start);
		$end 		= api_get_utc_datetime($end);				
		$all_day 	= isset($all_day) && $all_day == 'true' ? 1:0;
		
		$attributes = array();
		$id = null;
		switch ($this->type) {
			case 'personal':
				$attributes['user'] 	= api_get_user_id();
				$attributes['title'] 	= $title;
				$attributes['text'] 	= $content;
				$attributes['date'] 	= $start;
				$attributes['enddate'] 	= $end;                
				$attributes['all_day'] 	= $all_day;
				$id = Database::insert($this->tbl_personal_agenda, $attributes);
				break;
			case 'course':
				//$attributes['user'] 		= api_get_user_id();
				$attributes['title'] 		= $title;
				$attributes['content'] 		= $content;
				$attributes['start_date'] 	= $start;
				$attributes['end_date'] 	= $end;
				$attributes['all_day'] 		= $all_day;                
				$attributes['session_id'] 	= api_get_session_id();
				$attributes['c_id'] 		= $this->course['real_id'];
				
				//simple course event
				$id = Database::insert($this->tbl_course_agenda, $attributes);
                
                if ($id) {
    				//api_item_property_update($this->course, TOOL_CALENDAR_EVENT, $id, "AgendaAdded", api_get_user_id(), '','',$start, $end);                    
                    $group_id = api_get_group_id();
                    if ((!is_null($users_to_send)) or (!empty($group_id))) {
                    
                        $send_to = self::separate_users_groups($users_to_send);                 
                        
                        if (isset($send_to['everyone']) && $send_to['everyone']) {
                            api_item_property_update($this->course, TOOL_CALENDAR_EVENT, $id,"AgendaAdded", api_get_user_id(), '','',$start,$end);    
                        } else {                        
                            // storing the selected groups
                            if (is_array($send_to['groups'])) {
                                foreach ($send_to['groups'] as $group) {
                                    api_item_property_update($this->course, TOOL_CALENDAR_EVENT, $id, "AgendaAdded", api_get_user_id(), $group,0,$start, $end);                                    
                                }
                            }
    
                            // storing the selected users
                            if (is_array($send_to['users'])) {      
                                foreach ($send_to['users'] as $my_user_id) {                                     
                                    api_item_property_update($this->course, TOOL_CALENDAR_EVENT, $id, "AgendaAdded", api_get_user_id(), 0, $my_user_id, $start,$end);                                    
                                }
                            }
                        }
                    }

                    if (isset($add_as_announcement) && !empty($add_as_announcement)) {
                      self::store_agenda_item_as_announcement($id);
                    }  
                }             
			
				break;
			case 'admin':				
				$attributes['title'] 		= $title;
				$attributes['content'] 		= $content;
				$attributes['start_date'] 	= $start;
				$attributes['end_date'] 	= $end;
				$attributes['all_day'] 		= $all_day;
				$attributes['access_url_id']= api_get_current_access_url_id();				
				$id = Database::insert($this->tbl_global_agenda, $attributes);
				break;
		}				
		return $id;				
	}


    /* copycat of the agenda.inc.php @todo try to fix it */
      
    function store_agenda_item_as_announcement($item_id){
        $table_agenda  = Database::get_course_table(TABLE_AGENDA);
        $table_ann     = Database::get_course_table(TABLE_ANNOUNCEMENT);
        $course_id     = api_get_course_int_id();
        //check params
        if(empty($item_id) or $item_id != strval(intval($item_id))) {return -1;}
        //get the agenda item
    
        $item_id = Database::escape_string($item_id);
        $sql = "SELECT * FROM $table_agenda WHERE c_id = $course_id AND id = ".$item_id;
        $res = Database::query($sql);
                
        if (Database::num_rows($res)>0) {
            $row = Database::fetch_array($res);
            
            //we have the agenda event, copy it
            //get the maximum value for display order in announcement table
            $sql_max = "SELECT MAX(display_order) FROM $table_ann WHERE c_id = $course_id ";
            $res_max = Database::query($sql_max);
            $row_max = Database::fetch_array($res_max);
            $max = intval($row_max[0])+1;       
            //build the announcement text
            $content = $row['content'];
            //insert announcement
            $session_id = api_get_session_id();
            
            
            $sql_ins = "INSERT INTO $table_ann (c_id, title,content,end_date,display_order,session_id) " .
                        "VALUES ($course_id, '".Database::escape_string($row['title'])."','".Database::escape_string($content)."','".Database::escape_string($row['end_date'])."','$max','$session_id')";
            $res_ins = Database::query($sql_ins);
            if ($res > 0) {
                $ann_id = Database::insert_id();
                //Now also get the list of item_properties rows for this agenda_item (calendar_event)
                //and copy them into announcement item_properties
                $table_props = Database::get_course_table(TABLE_ITEM_PROPERTY);
                $sql_props = "SELECT * FROM $table_props WHERE c_id = $course_id AND tool ='calendar_event' AND ref='$item_id'";
                $res_props = Database::query($sql_props);
                if(Database::num_rows($res_props)>0) {
                    while($row_props = Database::fetch_array($res_props)) {
                        //insert into announcement item_property
                        $time = api_get_utc_datetime();
                        $sql_ins_props = "INSERT INTO $table_props " .
                                "(c_id, tool, insert_user_id, insert_date, " .
                                "lastedit_date, ref, lastedit_type," .
                                "lastedit_user_id, to_group_id, to_user_id, " .
                                "visibility, start_visible, end_visible)" .
                                " VALUES " .
                                "($course_id, 'announcement','".$row_props['insert_user_id']."','".$time."'," .
                                "'$time','$ann_id','AnnouncementAdded'," .
                                "'".$row_props['last_edit_user_id']."','".$row_props['to_group_id']."','".$row_props['to_user_id']."'," .
                                "'".$row_props['visibility']."','".$row_props['start_visible']."','".$row_props['end_visible']."')";
                        $res_ins_props = Database::query($sql_ins_props);
                        if($res_ins_props <= 0){
                            return -1;
                        } else {
                            //copy was a success
                            return $ann_id;
                        }
                    }
                }
            } else {
                return -1;
            }
        }
        return -1;
    }
	
	function edit_event($id, $start, $end, $all_day, $view, $title, $content) {		
		$start 		= date('Y-m-d H:i:s', $start);
		$start 		= api_get_utc_datetime($start);
		
		if ($all_day == '0') {
			$end 		= date('Y-m-d H:i:s', $end);		
			$end 		= api_get_utc_datetime($end);			
		}
		$all_day 	= isset($all_day) && $all_day == '1' ? 1:0;
		
		$attributes = array();

		switch($this->type) {
			case 'personal':
				$attributes['title'] 	= $title;
				$attributes['text'] 	= $content;
				$attributes['date'] 	= $start;
				$attributes['enddate'] 	= $end;
				Database::update($this->tbl_personal_agenda, $attributes, array('id = ?' => $id));
				break;
			case 'course':
				$attributes['title'] 		= $title;
				$attributes['content'] 		= $content;
				$attributes['start_date'] 	= $start;
				$attributes['end_date'] 	= $end;
				Database::update($this->tbl_course_agenda, $attributes, array('id = ?' => $id));
				break;
			case 'admin':
				$attributes['title'] 		= $title;
				$attributes['content'] 		= $content;
				$attributes['start_date'] 	= $start;
				$attributes['end_date'] 	= $end;
				Database::update($this->tbl_global_agenda, $attributes, array('id = ?' => $id));
				break;
				break;
		}
	}
	
	function delete_event($id) {
		switch($this->type) {
			case 'personal':
				Database::delete($this->tbl_personal_agenda, array('id = ?' =>$id));
				break;
			case 'course':
				Database::delete($this->tbl_course_agenda, array('id = ?' =>$id));
				break;
			case 'admin':
				Database::delete($this->tbl_global_agenda, array('id = ?' =>$id));
				break;
		}
	}
	
	/**
	 * 
	 * Get agenda events
	 * @param	int		start tms
	 * @param	int		end tms
	 * @param 	string	agenda type (personal, admin or course)
	 * @param	int		user id
	 * @param	int		course id *integer* not the course code 
	 * 
	 */
	function get_events($start, $end, $user_id, $course_id = null, $group_id = null) {	
					
		switch ($this->type) {
			case 'admin':
				$this->get_platform_events($start, $end);
				break;
			case 'course':				
				$course_info = api_get_course_info_by_id($course_id);				
				$this->get_course_events($start, $end, $course_info, $group_id);
				break;
			case 'personal':
			default:
                //Getting personal events
				$this->get_personal_events($start, $end);
                
                //Getting platform/admin events
				$this->get_platform_events($start, $end);
                
                //Getting course events
				$my_course_list = array();
                
				if (!api_is_anonymous()) {
					$my_course_list = CourseManager::get_courses_list_by_user_id(api_get_user_id(), true);
				}
				if (!empty($my_course_list)) {
					foreach($my_course_list as $course_info_item) {
						if (isset($course_id) && !empty($course_id)) {
							if ($course_info_item['course_id'] == $course_id) {
								$this->get_course_events($start, $end, $course_info_item);
							}
						} else {
							$this->get_course_events($start, $end, $course_info_item);
						}
					}				
				}
				break;
		}		
		if (!empty($this->events)) {
			return json_encode($this->events);
		}
		return '';	
	}
	
	function move_event($id, $day_delta, $minute_delta) {		
		// we convert the hour delta into minutes and add the minute delta
		$delta = ($day_delta * 60 * 24) + $minute_delta;
		$delta = intval($delta);
		
		$event = $this->get_event($id);
		
		if (!empty($event)) {
			switch($this->type) {
				case 'personal':
					$sql = "UPDATE $this->tbl_personal_agenda SET date = DATE_ADD(date, INTERVAL $delta MINUTE), enddate = DATE_ADD(enddate, INTERVAL $delta MINUTE) 
							WHERE id=".intval($id);					
					$result = Database::query($sql);				
					break;
				case 'course':
					$sql = "UPDATE $this->tbl_course_agenda SET start_date = DATE_ADD(start_date,INTERVAL $delta MINUTE), end_date = DATE_ADD(end_date, INTERVAL $delta MINUTE)
							WHERE c_id = ".$this->course['real_id']." AND id=".intval($id);
					$result = Database::query($sql);					
					break;
				case 'admin':
					$sql = "UPDATE $this->tbl_global_agenda SET start_date = DATE_ADD(start_date,INTERVAL $delta MINUTE), end_date = DATE_ADD(end_date, INTERVAL $delta MINUTE)
							WHERE id=".intval($id);
					$result = Database::query($sql);
					break;
			}
		}	
		return 1;
	}
	
	/**
	 * Gets a single event	 
	 * @param int event id
	 */
	function get_event($id) {
		// make sure events of the personal agenda can only be seen by the user himself
		$id = intval($id);
		$event = null;
		switch ($this->type) {
			case 'personal':				
				$sql = " SELECT * FROM ".$this->tbl_personal_agenda." WHERE id=".$id." AND user = ".api_get_user_id();
				$result = Database::query($sql);				
				if (Database::num_rows($result)) {
					$event = Database::fetch_array($result, 'ASSOC');
				}
				break;
			case 'course':
				$sql = " SELECT * FROM ".$this->tbl_course_agenda." WHERE id=".$id;
				$result = Database::query($sql);
				if (Database::num_rows($result)) {
					$event = Database::fetch_array($result, 'ASSOC');
				}
				break;
			case 'admin':
				$sql = " SELECT * FROM ".$this->tbl_global_agenda." WHERE id=".$id;
				$result = Database::query($sql);
				if (Database::num_rows($result)) {
					$event = Database::fetch_array($result, 'ASSOC');
				}
			break;
		}
		return $event;
	}
	
	/**
	 * 
	 * Gets personal events
	 * @param int 	start date tms
	 * @param int	end   date tms
	 */
	function get_personal_events($start, $end) {
		$start 	= intval($start);
		$end	= intval($end);		
		$start  = api_get_utc_datetime($start);	
		$end  	= api_get_utc_datetime($end);
		$user_id = api_get_user_id();
        
		$sql 	= "SELECT * FROM ".$this->tbl_personal_agenda."
				   WHERE date >= '".$start."' AND (enddate <='".$end."' OR enddate IS NULL) AND user = $user_id";
		
		$result = Database::query($sql);
		if (Database::num_rows($result)) {
			while ($row = Database::fetch_array($result, 'ASSOC')) {
				$event = array();
				$event['id'] 	  		= 'personal_'.$row['id'];
				$event['title'] 		= $row['title'];
				$event['className'] 	= 'personal';
				$event['borderColor'] 	= $event['backgroundColor'] = $this->event_personal_color;
				$event['editable'] 		= true;
                
                $event['sent_to']       = get_lang('Me');
                $event['type']          = 'personal';
				
				if (!empty($row['date']) && $row['date'] != '0000-00-00 00:00:00') {
					$event['start'] = $this->format_event_date($row['date']);
				}
									
				if (!empty($row['enddate']) && $row['enddate'] != '0000-00-00 00:00:00') {
					$event['end'] = $this->format_event_date($row['enddate']);				
				}
				$event['description'] = $row['text'];
				$event['allDay'] = isset($row['all_day']) && $row['all_day'] == 1 ? $row['all_day'] : 0;
				$my_events[] = $event;
				$this->events[]= $event;
			}
		}		
		return $my_events;
	}
	
	function get_course_events($start, $end, $course_info, $group_id = 0) {
        
		$course_id = $course_info['real_id'];
        
        $group_list = GroupManager::get_group_list(null, $course_info['code']);        
        $group_name_list = array();
        
        if (!empty($group_list)) {
            foreach($group_list as $group) {
                $group_name_list[$group['id']]= $group['name'];
            }
        }
        
        if (!api_is_allowed_to_edit()) {
            $group_memberships 	= GroupManager::get_group_ids($course_id, api_get_user_id());
        } else {
            $group_memberships = array_keys($group_name_list);            
        }
        
		$tlb_course_agenda	= Database::get_course_table(TABLE_AGENDA);
		$tbl_property 		= Database::get_course_table(TABLE_ITEM_PROPERTY);
	
		$user_id = api_get_user_id();
        
        if (!empty($group_id)) {
            $group_memberships = array($group_id);
        }
	
		if (is_array($group_memberships) && count($group_memberships) >0 ) {
		    if (api_is_allowed_to_edit()) {
		        $where_condition = "( ip.to_group_id is null OR ip.to_group_id IN (0, ".implode(", ", $group_memberships).") ) ";
            } else {
                $where_condition = "( ip.to_user_id = $user_id OR ip.to_group_id IN (0, ".implode(", ", $group_memberships).") ) ";
            }
            
            $sql = "SELECT DISTINCT agenda.*, ip.visibility, ip.to_group_id, ip.insert_user_id, ip.ref
                    FROM ".$tlb_course_agenda." agenda, ".$tbl_property." ip
                    WHERE   agenda.id       = ip.ref  AND 
                            ip.tool         ='".TOOL_CALENDAR_EVENT."' AND 
                            $where_condition  AND
                            ip.visibility   = '1' AND
                            agenda.c_id     = $course_id AND
                            ip.c_id         = $course_id";
                            
		    
		} else {
		    if (api_is_allowed_to_edit()) {
		        $where_condition = "";                
            } else {
                $where_condition = "( ip.to_user_id=$user_id OR ip.to_group_id='0')";
            }         
            $sql="SELECT DISTINCT agenda.*, ip.visibility, ip.to_group_id, ip.insert_user_id, ip.ref
                    FROM ".$tlb_course_agenda." agenda, ".$tbl_property." ip
                    WHERE agenda.id = ip.ref AND
                    ip.tool='".TOOL_CALENDAR_EVENT."' AND
                    $where_condition AND                                 
                    ip.visibility='1' AND 
                    agenda.c_id = $course_id AND
                    ip.c_id = $course_id";  
			
		}
		
		$result = Database::query($sql);
		$events = array();
		if (Database::num_rows($result)) {
			while ($row = Database::fetch_array($result, 'ASSOC')) {
				//Only show events from the session
				if (api_get_course_int_id()) {
					if ($row['session_id'] != api_get_session_id()) {
						continue;
					}
				}
				$event = array();
				$event['id'] 	  		= 'course_'.$row['id'];
				$event['title'] 		= $row['title'];
				$event['className'] 	= 'course';
				$event['allDay'] 	  	= 'false';
				
				//	var_dump($row);
				$event['borderColor'] 	= $event['backgroundColor'] = $this->event_course_color;
				if (isset($row['session_id']) && !empty($row['session_id'])) {
					$event['borderColor'] 	= $event['backgroundColor'] = $this->event_session_color;
				}
	
				if (isset($row['to_group_id']) && !empty($row['to_group_id'])) {
					$event['borderColor'] 	= $event['backgroundColor'] = $this->event_group_color;
				}
				
				$event['editable'] 		= false;
				
				if (api_is_allowed_to_edit() && $this->type == 'course') {
					$event['editable'] 		= true;
				}	
	
				if (!empty($row['start_date']) && $row['start_date'] != '0000-00-00 00:00:00') {
					$event['start'] = $this->format_event_date($row['start_date']);
				}
				if (!empty($row['end_date']) && $row['end_date'] != '0000-00-00 00:00:00') {
					$event['end'] = $this->format_event_date($row['end_date']);
				}	
                
                $event['sent_to'] = '';
                $event['type']    = $this->type;
                
                
                //Event Sent to a group?
                if (isset($row['to_group_id']) && !empty($row['to_group_id'])) {                    
                    $event['sent_to'] = $group_name_list[$row['to_group_id']];
                    $event['type']    = 'group';    
                }

                //Event sent to a user?
                if (isset($row['to_user_id'])) {
                    $event['sent_to'] = $row['to_user_id'];
                }
                
                //Event sent to everyone!
                if (empty($event['sent_to'])) {
                    $event['sent_to'] = get_lang('Everyone');
                }
                
                
				$event['description'] = $row['content'];
				
				$event['allDay'] = isset($row['all_day']) && $row['all_day'] == 1 ? $row['all_day'] : 0;					
	
				$my_events[] = $event;	
	
				$this->events[] = $event;
			}
		}
		return $events;
	}
	
	function get_platform_events($start, $end) {
		$start 	= intval($start);
		$end	= intval($end);
		
		$start  = api_get_utc_datetime($start);	
		$end  	= api_get_utc_datetime($end);
				
		$access_url_id 	= api_get_current_access_url_id();
		
		$sql 	= "SELECT * FROM ".$this->tbl_global_agenda."
				   WHERE start_date >= '".$start."' AND end_date <= '".$end."' AND access_url_id = $access_url_id ";
		
		$result = Database::query($sql);
		$my_events = array();
		if (Database::num_rows($result)) {
			while ($row = Database::fetch_array($result, 'ASSOC')) {
				$event = array();
				$event['id'] 	  		= 'platform_'.$row['id'];
				$event['title'] 		= $row['title'];
				$event['className'] 	= 'platform';
				$event['allDay'] 	  	= 'false';
				$event['borderColor'] 	= $event['backgroundColor'] = $this->event_platform_color;
				$event['editable'] 		= false;
                
                $event['type']          = 'admin';
				
				if (api_is_platform_admin() && $this->type == 'admin') {
					$event['editable'] 		= true;
				}
				
				if (!empty($row['start_date']) && $row['start_date'] != '0000-00-00 00:00:00') {
					$event['start'] = $this->format_event_date($row['start_date']);					
				}			
				if (!empty($row['end_date']) && $row['end_date'] != '0000-00-00 00:00:00') {
					$event['end'] = $this->format_event_date($row['end_date']);				
				}
				
				$event['description'] = $row['content'];								
				$event['allDay'] = isset($row['all_day']) && $row['all_day'] == 1 ? $row['all_day'] : 0;
				
				$my_events[] = $event;
				$this->events[]= $event;
			}
		}
		return $my_events;		
	}
	
	//Format needed for the Fullcalendar js lib	
	function format_event_date($utc_time) {		
		return date('c', api_strtotime(api_get_local_time($utc_time)));
	}
    
    
    /**
    * this function shows the form with the user that were not selected
    * @author: Patrick Cool <patrick.cool@UGent.be>, Ghent University
    * @return html code
    */
    function construct_not_selected_select_form($group_list=null, $user_list=null,$to_already_selected=array()) {
        $html = '<select id="users_to_send_id" name="users_to_send[]" size="5" multiple="multiple" style="width:250px" class="chzn-select">';
    
        // adding the groups to the select form
        
        if (isset($to_already_selected) && $to_already_selected==='everyone') {            
        }
        
        $html .=  '<option value="everyone">'.get_lang('Everyone').'</option>';
        
        if (is_array($group_list)) {
            $html .= '<optgroup label="'.get_lang('Groups').'">';
            foreach($group_list as $this_group) {
                //api_display_normal_message("group " . $thisGroup[id] . $thisGroup[name]);
                if (!is_array($to_already_selected) || !in_array("GROUP:".$this_group['id'],$to_already_selected)) {
                    // $to_already_selected is the array containing the groups (and users) that are already selected
                    $html .=     "<option value=\"GROUP:".$this_group['id']."\">".
                        $this_group['name']." &ndash; " . $this_group['userNb'] . " " . get_lang('Users') .
                        "</option>";
                }
            }
            $html .= '</optgroup>';            
        }
        
        // adding the individual users to the select form
        if (is_array($group_list)) {
            $html .= '<optgroup label="'.get_lang('Users').'">';
        }
        foreach($user_list as $this_user) {
            // $to_already_selected is the array containing the users (and groups) that are already selected
            if (!is_array($to_already_selected) || !in_array("USER:".$this_user['user_id'],$to_already_selected)) {
                $html .= "<option value=\"USER:".$this_user['user_id']."\">".api_get_person_name($this_user['firstname'], $this_user['lastname'])."</option>";
            }
        }
        if (is_array($group_list)) {
            $html .= '</optgroup>';     
            $html .=  "</select>";
        }
        return $html; 
    }
    
    /**
    * This function separates the users from the groups
    * users have a value USER:XXX (with XXX the dokeos id
    * groups have a value GROUP:YYY (with YYY the group id)
    * @author: Patrick Cool <patrick.cool@UGent.be>, Ghent University
    * @return array
    */
    function separate_users_groups($to) {
        $grouplist = array();
        $userlist  = array();
        $send_to = null;
        
        $send_to['everyone']= false;
        if (is_array($to) && count($to)>0) {
            foreach($to as $to_item) {
                if ($to_item == 'everyone') {
                    $send_to['everyone']= true;
                }
                list($type, $id) = explode(':', $to_item);
                switch($type) {
                    case 'GROUP':
                        $grouplist[] =$id;
                    break;
                    case 'USER':
                        $userlist[] =$id;
                    break;
                }
            }
            $send_to['groups']=$grouplist;
            $send_to['users']=$userlist;
            
        }
        return $send_to;
    }
    
	
}