<?php

/*
 +--------------------------------------------------------------------+
 | CiviCRM version 3.0                                                |
 +--------------------------------------------------------------------+
 | Copyright CiviCRM LLC (c) 2004-2009                                |
 +--------------------------------------------------------------------+
 | This file is a part of CiviCRM.                                    |
 |                                                                    |
 | CiviCRM is free software; you can copy, modify, and distribute it  |
 | under the terms of the GNU Affero General Public License           |
 | Version 3, 19 November 2007.                                       |
 |                                                                    |
 | CiviCRM is distributed in the hope that it will be useful, but     |
 | WITHOUT ANY WARRANTY; without even the implied warranty of         |
 | MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.               |
 | See the GNU Affero General Public License for more details.        |
 |                                                                    |
 | You should have received a copy of the GNU Affero General Public   |
 | License along with this program; if not, contact CiviCRM LLC       |
 | at info[AT]civicrm[DOT]org. If you have questions about the        |
 | GNU Affero General Public License or the licensing of CiviCRM,     |
 | see the CiviCRM license FAQ at http://civicrm.org/licensing        |
 +--------------------------------------------------------------------+
*/

/**
 *
 * @package CRM
 * @copyright CiviCRM LLC (c) 2004-2009
 * $Id$
 *
 */

require_once 'CRM/Report/Form.php';
require_once 'CRM/Event/PseudoConstant.php';
require_once 'CRM/Core/OptionGroup.php';

class CRM_Report_Form_Event_Summary extends CRM_Report_Form {
    
    protected $_summary = null;

    protected $_charts  = array( ''         => 'Tabular',
                                 'barGraph' => 'Bar Graph',
                                 'pieGraph' => 'Pie Graph'
                                 );

    protected $_add2groupSupported = false;

    function __construct( ) {
        
        $this->_columns = 
            array( 
                  'civicrm_event' =>
                  array( 'dao'    => 'CRM_Event_DAO_Event',
                         'fields' =>
                         array(
                               'id'               => array( 'no_display'=> true,
                                                            'required'  => true ),
                               'title'            => array( 'title'     => ts( 'Event Title' ),
                                                            'required'  => true ), 
                               'event_type_id'    => array( 'title'     => ts( 'Event Type' ),
                                                            'required'  => true ),
                               'fee_label'        => array( 'title'     => ts( 'Fee Label' ) ),
                               'event_start_date' => array( 'title'     => ts( 'Event Start Date' ),),
                               'event_end_date'   => array( 'title'     => ts( 'Event End Date' ) ),
                               'max_participants' => array( 'title'     => ts( 'Capacity' ),
                                                            'type'      => CRM_Utils_Type::T_INT )
                               ),
                         
                         'filters' =>             
                         array( 			 			   
                               'id'               => array( 'title'   => ts( 'Event Title' ),
                                                            'operatorType'  => CRM_Report_Form::OP_MULTISELECT,
                                                            'options' => CRM_Event_PseudoConstant::event( null, null, "is_template IS NULL OR is_template = 0" ), ), 
                               
                               'event_type_id'    => array( 'name'    => 'event_type_id',
                                                            'title'   => ts( 'Event Type' ),
                                                            'operatorType'  => CRM_Report_Form::OP_MULTISELECT,
                                                            'options' => CRM_Core_OptionGroup::values('event_type') ),
                               'event_start_date' => array( 'title'   => 'Event Start Date',
                                                            'operatorType' => CRM_Report_Form::OP_DATE ),
                               
                               'event_end_date'   => array( 'title'   => 'Event End Date',
                                                            'operatorType' => CRM_Report_Form::OP_DATE ), ),
                         ),
                  );
     
        parent::__construct( );
    }
    
    function preProcess( ) {
        parent::preProcess( );
    }
    
       
    function select( ) {
        $select = array( );
        foreach ( $this->_columns as $tableName => $table ) {
            if ( array_key_exists('fields', $table) ) {
                foreach ( $table['fields'] as $fieldName => $field ) {
                    if ( CRM_Utils_Array::value( 'required', $field ) ||
                         CRM_Utils_Array::value( $fieldName, $this->_params['fields'] ) ) {
                        $select[] = "{$field['dbAlias']} as {$tableName}_{$fieldName}";
                    }
                }
            }
        }
        
        $this->_select = "SELECT " . implode( ', ', $select ) ;
    }
    
    function from( ) {
        $this->_from = " FROM civicrm_event {$this->_aliases['civicrm_event']} ";
    }
    
    function where( ) {
        $clauses = array( );
        $this->_participantWhere = "";
        foreach ( $this->_columns as $tableName => $table ) {
            if ( array_key_exists('filters', $table) ) { 
                foreach ( $table['filters'] as $fieldName => $field ) {
                    $clause = null;
                    if ( CRM_Utils_Array::value( 'type',  $field ) & CRM_Utils_Type::T_DATE ) {
                        $relative = CRM_Utils_Array::value( "{$fieldName}_relative", $this->_params );
                        $from     = CRM_Utils_Array::value( "{$fieldName}_from"    , $this->_params );
                        $to       = CRM_Utils_Array::value( "{$fieldName}_to"      , $this->_params );
                        
                        if ( $relative || $from || $to ) {
                            $clause = $this->dateClause( $field['name'], $relative, $from, $to );
                        }
                    } else { 
                        $op = CRM_Utils_Array::value( "{$fieldName}_op", $this->_params );
                        if ( $op ) {
                            $clause = 
                                $this->whereClause( $field,
                                                    $op,
                                                    CRM_Utils_Array::value( "{$fieldName}_value", $this->_params ),
                                                    CRM_Utils_Array::value( "{$fieldName}_min", $this->_params ),
                                                    CRM_Utils_Array::value( "{$fieldName}_max", $this->_params ) );
                        }
                    }
                    if ( !empty( $this->_params['id_value'] ) ) {
                        $participant = implode( ', ', $this->_params['id_value'] );
                        $this->_participantWhere = " AND civicrm_participant.event_id IN ( {$participant} ) ";
                    }

                    if ( ! empty( $clause ) ) {
                        $clauses[] = $clause;
                        
                    }
                }
            }
        }
        $clauses[] = "{$this->_aliases['civicrm_event']}.is_template IS NULL";
        $this->_where = "WHERE  " . implode( ' AND ', $clauses);          
    }
    
    function groupBy( ) {
        $this->assign( 'chartSupported', true );
        $this->_groupBy = " GROUP BY {$this->_aliases['civicrm_event']}.id";
    }
   
    //get participants information for events
    function participantInfo( ) {

        $statusType1 = CRM_Event_PseudoConstant::participantStatus( null, "is_counted = 1" ); 
        $statusType2 = CRM_Event_PseudoConstant::participantStatus( null, "is_counted = 0" ); 
        
        $sql = "
          SELECT civicrm_participant.event_id    AS event_id, 
                 civicrm_participant.status_id   AS statusId, 
                 COUNT( civicrm_participant.id ) AS participant, 
                 SUM( civicrm_participant.fee_amount ) AS amount

            FROM civicrm_participant

            WHERE civicrm_participant.is_test = 0 
                  $this->_participantWhere

        GROUP BY civicrm_participant.event_id, 
                 civicrm_participant.status_id";
        
        $info = CRM_Core_DAO::executeQuery( $sql );
      	$participant_data = $participant_info = array();
        
        while( $info->fetch() ) {
            $participant_data[$info->event_id][$info->statusId]['participant']= $info->participant;
            $participant_data[$info->event_id][$info->statusId]['amount']= $info->amount;
        }

        $amt = $particiType1 = $particiType2 = 0; 
        
        foreach ( $participant_data as $event_id => $event_data ){
            foreach ( $event_data as $status_id => $data) {
                
                if ( array_key_exists($status_id , $statusType1 ) ) {
                    //total income of event 
                    $amt = $amt + $data['amount'];
                
                    //number of Registered/Attended participants    
                    $particiType1 = $particiType1 + $data['participant'];
                } else if ( array_key_exists( $info->statusId , $statusType2 ) ) {
                    
                    //number of No-show/Cancelled/Pending participants 
                    $particiType2 = $particiType2 + $data['participant'];
                }
                
            }

            $participant_info[$event_id]['totalAmount'] = $amt;
            $participant_info[$event_id]['statusType1'] = $particiType1;
            $participant_info[$event_id]['statusType2'] = $particiType2;
            $amt  = $particiType1 = $particiType2 = 0;
        }
        
        return $participant_info;   
    }

    //build header for table
    function buildColumnHeaders() {
        
        $this->_columnHeaders = array( );
        foreach ( $this->_columns as $tableName => $table ) {
            if ( array_key_exists('fields', $table) ) {
                foreach ( $table['fields'] as $fieldName => $field ) {
                    if ( CRM_Utils_Array::value( 'required', $field ) ||
                         CRM_Utils_Array::value( $fieldName, $this->_params['fields'] ) ) {
                        
                        $this->_columnHeaders["{$tableName}_{$fieldName}"]['type' ] = CRM_Utils_Array::value( 'type',  $field );
                        $this->_columnHeaders["{$tableName}_{$fieldName}"]['title'] = CRM_Utils_Array::value( 'title', $field );
                    }
                }
            }
        }
        
        $statusType1 = CRM_Event_PseudoConstant::participantStatus( null, "is_counted = 1" ); 
        $statusType2 = CRM_Event_PseudoConstant::participantStatus( null, "is_counted = 0" ); 
        
        //make column header for participant status  Registered/Attended  
        $type1_header = implode( '/' , $statusType1 );
        
        //make column header for participant status No-show/Cancelled/Pending 
        $type2_header = implode( '/' , $statusType2 );
        
        $this->_columnHeaders['statusType1'] = array ( 'title' => $type1_header,
                                                       'type'  => CRM_Utils_Type::T_INT );		 
        $this->_columnHeaders['statusType2'] = array ( 'title' => $type2_header,
                                                       'type'  => CRM_Utils_Type::T_INT ); 
        $this->_columnHeaders['totalAmount'] = array ( 'title' => 'Total Income',
                                                       'type'  => CRM_Utils_Type::T_MONEY );  
    }
   
    function postProcess( ) {
      
        $this->beginPostProcess( );
        
        $this->buildColumnHeaders();
        
        $sql = $this->buildQuery( true );
        
        $dao = CRM_Core_DAO::executeQuery( $sql );

        //set pager before exicution of query in function participantInfo() 
        $this->setPager( );

        require_once 'CRM/Utils/PChart.php';
        $rows  = $graphRows = array();
        $count = 0;
        while ( $dao->fetch( ) ) {	
            $row = array();
            foreach ( $this->_columnHeaders as $key => $value ) {
                if ( ( $key == 'civicrm_event_start_date') || ($key == 'civicrm_event_end_date') ) {
                    //get event start date and end date in custom datetime format
                    $row[$key] = CRM_Utils_Date::customFormat($dao->$key);
                } else {
                    if ( isset($dao->$key ) ) {
                        $row[$key] = $dao->$key;
                    }
                }
            } 
            $rows[] = $row;	  
        }
        if ( !empty($rows) ) {
            $participant_info= $this->participantInfo();
            foreach ( $rows as $key => $value ) { 
                if ( array_key_exists( $value['civicrm_event_id'], $participant_info ) ) {
                    foreach ($participant_info[$value['civicrm_event_id']] as $k => $v ) {
                        $rows[$key][$k]=$v;
                    }
                }
            }
        }
        // do not call pager here
        $this->formatDisplay( $rows, false );
        unset($this->_columnHeaders['civicrm_event_id']);
        
        $this->doTemplateAssignment( $rows );
        
        $this->endPostProcess( $rows );
    }

    function buildChart( &$rows ) {
        $this->_interval = 'events';
        $countEvent      = null;
        if ( CRM_Utils_Array::value('charts', $this->_params ) ) {
            foreach ( $rows as $key => $value ) {
                $graphRows['totalAmount'][]    = ($rows[$key]['totalAmount']);
                $graphRows[$this->_interval][] = substr( $rows[$key]['civicrm_event_title'], 0, 12)."..(". $rows[$key]['civicrm_event_id'].") ";
                $graphRows['value'][]          = ($rows[$key]['totalAmount']);
            }
            
            if ( ( $rows[$key]['totalAmount']) == 0 ) {
                $countEvent = count($rows);
            }

            if ( (!empty($rows)) && $countEvent != 1 ) {
                $chartInfo = array( 'legend' => 'Event Summary',
                                    'xname'  => 'Total Amount',
                                    'yname'  => 'Event'
                                    );
                if ( !empty($graphRows) ) {
                    foreach ( $graphRows[$this->_interval] as $key => $val ) {
                        $graph[$val] = $graphRows['value'][$key];
                    }
                    
                    $chartInfo['values'] = $graph;
                    $params[] = $chartInfo;

                    if ( CRM_Utils_Array::value('charts', $this->_params ) == 'barGraph' ) {
                        $graphs =  CRM_Utils_PChart::barGraph( $params, 85 );
                    } else {
                        unset( $params[0]['xname'], $params[0]['yname'] );
                        $graphs = CRM_Utils_PChart::pieGraph( $params );
                    }
                    $this->assign( 'graphFilePath', $graphs['0']['file_name'] );
                    $this->_graphPath =  $graphs['0']['file_name'];
                } 
            }
        }
    }
    
    function alterDisplay( &$rows ) {
      
        if ( is_array( $rows ) ) {
            $eventType  = CRM_Core_OptionGroup::values('event_type');
            foreach ( $rows as $rowNum => $row ) {
                
                if ( array_key_exists('civicrm_event_title', $row) ) {
                    if ( $value = $row['civicrm_event_id'] ) {
                        //CRM_Event_PseudoConstant::event( $value, false );  
                        $url = CRM_Report_Utils_Report::getNextUrl( 'event/income', 
                                                      'reset=1&force=1&id_op=in&id_value='.$value,
                                                                    $this->_absoluteUrl, $this->_id);
                        $rows[$rowNum]['civicrm_event_title_link' ] = $url;
                        $rows[$rowNum]['civicrm_event_title_hover'] = 
                            ts("View Event Income For this Event");
                        
                    }
                }

                //handle event type
                if ( array_key_exists('civicrm_event_event_type_id', $row) ) {
                    if ( $value = $row['civicrm_event_event_type_id'] ) {
                        $rows[$rowNum]['civicrm_event_event_type_id'] = $eventType[$value];
                    }	  
                }
            }
        }
    }
}