<?php
// This file is part of Moodle - http://moodle.org/
//
// Moodle is free software: you can redistribute it and/or modify
// it under the terms of the GNU General Public License as published by
// the Free Software Foundation, either version 3 of the License, or
// (at your option) any later version.
//
// Moodle 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 General Public License for more details.
//
// You should have received a copy of the GNU General Public License
// along with Moodle.  If not, see <http://www.gnu.org/licenses/>.

defined('MOODLE_INTERNAL') OR die('not allowed');
require_once($CFG->dirroot.'/mod/apply/item/apply_item_class.php');

define('APPLY_INFO_SEP', '|');


class apply_item_info extends apply_item_base
{
    protected $type = "info";
    private $commonparams;
    private $item_form;
    private $item;


    public function init()
    {
    }


    public function build_editform($item, $apply, $cm)
    {
        global $DB, $CFG;
        require_once('info_form.php');

        //get the lastposition number of the apply_items
        $position = $item->position;
        $lastposition = $DB->count_records('apply_item', array('apply_id'=>$apply->id));
        if ($position == -1) {
            $i_formselect_last  = $lastposition + 1;
            $i_formselect_value = $lastposition + 1;
            $item->position = $lastposition + 1;
        }
        else {
            $i_formselect_last  = $lastposition;
            $i_formselect_value = $item->position;
        }
        //the elements for position dropdownlist
        $positionlist = array_slice(range(0, $i_formselect_last), 1, $i_formselect_last, true);

        $item->presentation = empty($item->presentation) ? '' : $item->presentation;
        $presentation = explode(APPLY_INFO_SEP, $item->presentation);

        $item->required = 0;
        $item->infotype = (intval($presentation[0])!=0) ? $presentation[0] : 1;
        $outside_style  = isset($presentation[1]) ? $presentation[1]: get_string('outside_style_default', 'apply');
        $item_style     = isset($presentation[2]) ? $presentation[2]: get_string('item_style_default',    'apply');
        $item->outside_style = $outside_style;
        $item->item_style    = $item_style;

        //all items for dependitem
        $applyitems = apply_get_depend_candidates_for_item($apply, $item);
        $commonparams = array('cmid'=>$cm->id,
                             'id'=>isset($item->id) ? $item->id : null,
                             'typ'=>$item->typ,
                             'items'=>$applyitems,
                             'apply_id'=>$apply->id);

        //build the form
        $this->item_form = new apply_info_form('edit_item.php',
                                                  array('item'=>$item,
                                                  'common'=>$commonparams,
                                                  'positionlist'=>$positionlist,
                                                  'position' => $position));
    }


    //this function only can used after the call of build_editform()
    public function show_editform()
    {
        $this->item_form->display();
    }


    public function is_cancelled()
    {
        return $this->item_form->is_cancelled();
    }


    public function get_data()
    {
        if ($this->item = $this->item_form->get_data()) {
            return true;
        }
        return false;
    }


    public function save_item()
    {
        global $DB;

        if (!$item = $this->item_form->get_data()) {
            return false;
        }

        if (isset($item->clone_item) AND $item->clone_item) {
            $item->id = ''; //to clone this item
            $item->position++;
        }

        $item->hasvalue = $this->get_hasvalue();
        if (!$item->id) {
            $item->id = $DB->insert_record('apply_item', $item);
        }
        else {
            $DB->update_record('apply_item', $item);
        }

        return $DB->get_record('apply_item', array('id'=>$item->id));
    }


    //liefert eine Struktur ->name, ->data = array(mit Antworten)
    public function get_analysed($item, $groupid = false, $courseid = false)
    {
        $infotype = $item->infotype;
        $analysed_val = new stdClass();;
        $analysed_val->data = null;
        $analysed_val->name = $item->name;
        $values = apply_get_group_values($item, $groupid, $courseid);
        if ($values) {
            $data = array();
            foreach ($values as $value) {
                $datavalue = new stdClass();

                switch($infotype) {
                    case 1:
                        $datavalue->value = $value->value;
                        $datavalue->show = userdate($datavalue->value);
                        break;
                    case 2:
                        $datavalue->value = $value->value;
                        $datavalue->show = $datavalue->value;
                        break;
                    case 3:
                        $datavalue->value = $value->value;
                        $datavalue->show = $datavalue->value;
                        break;
                    case 4:  // fullname
                        $datavalue->value = $value->value;
                        $datavalue->show = $datavalue->value;
                        break;
                    case 5:  // firstlastname
                        $datavalue->value = $value->value;
                        $datavalue->show = $datavalue->value;
                        break;
                    case 6:  // lastfirstname
                        $datavalue->value = $value->value;
                        $datavalue->show = $datavalue->value;
                        break;
                    case 7:  // firstname
                        $datavalue->value = $value->value;
                        $datavalue->show = $datavalue->value;
                        break;
                    case 8:  // lastname
                        $datavalue->value = $value->value;
                        $datavalue->show = $datavalue->value;
                        break;
                }

                $data[] = $datavalue;
            }
            $analysed_val->data = $data;
        }
        return $analysed_val;
    }


    public function get_printval($item, $value)
    {
        if (!isset($value->value)) {
            return '';
        }
        return userdate($value->value);
    }


    public function print_analysed($item, $itemnr = '', $groupid = false, $courseid = false)
    {
        $analysed_item = $this->get_analysed($item, $groupid, $courseid);
        $data = $analysed_item->data;
        if (is_array($data)) {
            echo '<tr><th colspan="2" align="left">';
            echo $itemnr.'&nbsp;('.$item->label.') '.$item->name;
            echo '</th></tr>';
            $sizeofdata = count($data);
            for ($i = 0; $i < $sizeofdata; $i++) {
                echo '<tr><td colspan="2" valign="top" align="left">-&nbsp;&nbsp;';
                echo str_replace("\n", '<br />', $data[$i]->show);
                echo '</td></tr>';
            }
        }
    }


    public function excelprint_item(&$worksheet, $row_offset,
                             $xls_formats, $item,
                             $groupid, $courseid = false)
    {
        $analysed_item = $this->get_analysed($item, $groupid, $courseid);

        $worksheet->write_string($row_offset, 0, $item->label, $xls_formats->head2);
        $worksheet->write_string($row_offset, 1, $item->name, $xls_formats->head2);
        $data = $analysed_item->data;
        if (is_array($data)) {
            $worksheet->write_string($row_offset, 2, $data[0]->show, $xls_formats->value_bold);
            $row_offset++;
            $sizeofdata = count($data);
            for ($i = 1; $i < $sizeofdata; $i++) {
                $worksheet->write_string($row_offset, 2, $data[$i]->show, $xls_formats->default);
                $row_offset++;
            }
        }
        $row_offset++;
        return $row_offset;
    }


    /**
     * print the item at the edit-page of apply
     *
     * @global object
     * @param object $item
     * @return void
     */
    public function print_item_preview($item)
    {
        global $USER, $DB, $OUTPUT;

        $presentation = explode(APPLY_INFO_SEP, $item->presentation);
        $infotype = $presentation[0];
        $item->infotype = $infotype;

        //$outside_style = isset($presentation[1]) ? $presentation[1]: get_string('outside_style_default', 'apply');
        //$item_style    = isset($presentation[2]) ? $presentation[2]: get_string('item_style_default',    'apply');
        $item->outside_style = '';  //$outside_style;
        $item->item_style    = '';  //$item_style;

        $align = right_to_left() ? 'right' : 'left';
        if ($item->apply_id) {
            $courseid = $DB->get_field('apply', 'course', array('id'=>$item->apply_id));
        }
        else { // the item must be a template item
            $cmid = required_param('id', PARAM_INT);
            $courseid = $DB->get_field('course_modules', 'course', array('id'=>$cmid));
        }
        if (!$course = $DB->get_record('course', array('id'=>$courseid))) {
            print_error('error');
        }
        if ($course->id !== SITEID) {
            $coursecategory = $DB->get_record('course_categories', array('id'=>$course->category));
        }
        else {
            $coursecategory = false;
        }
        switch($infotype) {
            case 1:
                $itemvalue = time();
                $itemshowvalue = userdate($itemvalue);
                break;
            case 2:
                $coursecontext = context_course::instance($course->id);
                $itemvalue = format_string($course->shortname, true, array('context' => $coursecontext));
                $itemshowvalue = $itemvalue;
                break;
            case 3:
                if ($coursecategory) {
                    $category_context = context_coursecat::instance($coursecategory->id);
                    $itemvalue = format_string($coursecategory->name, true, array('context' => $category_context));
                    $itemshowvalue = $itemvalue;
                }
                else {
                    $itemvalue = '';
                    $itemshowvalue = '';
                }
                break;
            case 4:  // fullname
                $itemvalue = fullname($USER);
                $itemshowvalue = $itemvalue;
                break;
            case 5:  // firstlastname
                $itemvalue = $USER->firstname.' '.$USER->lastname;
                $itemshowvalue = $itemvalue;
                break;
            case 6:  // lastfirstname
                $itemvalue = $USER->lastname.' '.$USER->firstname;
                $itemshowvalue = $itemvalue;
                break;
            case 7:  // firstname
                $itemvalue = $USER->firstname;
                $itemshowvalue = $itemvalue;
                break;
            case 8:  // lastname
                $itemvalue = $USER->lastname;
                $itemshowvalue = $itemvalue;
                break;
        }

        //print the question and label
        $output  = '';
        $output .= '<div class="apply_item_label_'.$align.'">';
        $output .= '('.$item->label.') ';
        $output .= format_text($item->name, true, false, false).' ['.$item->position.']';
        if ($item->dependitem) {
            if ($dependitem = $DB->get_record('apply_item', array('id'=>$item->dependitem))) {
                $output .= ' <span class="apply_depend">';
                $output .= '('.$dependitem->label.'-&gt;'.$item->dependvalue.')';
                $output .= '</span>';
            }
        }
        $output .= '</div>';

        apply_open_table_item_tag($output, true);

        //print the presentation
        echo '<div class="apply_item_presentation_'.$align.'">';
        apply_item_box_start($item);
        echo '<input type="hidden" name="'.$item->typ.'_'.$item->id.'" value="'.$itemvalue.'" />';
        echo '<span class="apply_item_info">'.$itemshowvalue.'</span>';
        apply_item_box_end();
        echo '</div>';

        apply_close_table_item_tag();
    }


    /**
     * print the item at the complete-page of apply
     *
     * @global object
     * @param object $item
     * @param string $value
     * @param bool $highlightrequire
     * @return void
     */
    public function print_item_submit($item, $value = '', $highlightrequire = false)
    {
        global $USER, $DB, $OUTPUT;

        $presentation = explode(APPLY_INFO_SEP, $item->presentation);
        $infotype = $presentation[0];
        $item->infotype = $infotype;

        //$outside_style = isset($presentation[1]) ? $presentation[1]: get_string('outside_style_default', 'apply');
        //$item_style    = isset($presentation[2]) ? $presentation[2]: get_string('item_style_default',    'apply');
        $item->outside_style = '';  //$outside_style;
        $item->item_style    = '';  //$item_style;

        $align = right_to_left() ? 'right' : 'left';
        if ($highlightrequire AND $item->required AND strval($value) == '') {
            $highlight = ' missingrequire';
        }
        else {
            $highlight = '';
        }

        $apply = $DB->get_record('apply', array('id'=>$item->apply_id));
        if ($courseid = optional_param('courseid', 0, PARAM_INT)) {
            $course = $DB->get_record('course', array('id'=>$courseid));
        }
        else {
            $course = $DB->get_record('course', array('id'=>$apply->course));
        }
        if ($course->id !== SITEID) {
            $coursecategory = $DB->get_record('course_categories', array('id'=>$course->category));
        }
        else {
            $coursecategory = false;
        }

        switch($infotype) {
            case 1:
                $itemvalue = time();
                $itemshowvalue = userdate($itemvalue);
                break;
            case 2:
                $coursecontext = context_course::instance($course->id);
                $itemvalue = format_string($course->shortname, true, array('context' => $coursecontext));
                $itemshowvalue = $itemvalue;
                break;
            case 3:
                if ($coursecategory) {
                    $category_context = context_coursecat::instance($coursecategory->id);
                    $itemvalue = format_string($coursecategory->name, true, array('context' => $category_context));
                    $itemshowvalue = $itemvalue;
                }
                else {
                    $itemvalue = '';
                    $itemshowvalue = '';
                }
                break;
            case 4:  // fullname
                $itemvalue = fullname($USER);
                $itemshowvalue = $itemvalue;
                break;
            case 5:  // firstlastname
                $itemvalue = $USER->firstname.' '.$USER->lastname;
                $itemshowvalue = $itemvalue;
                break;
            case 6:  // lastfirstname
                $itemvalue = $USER->lastname.' '.$USER->firstname;
                $itemshowvalue = $itemvalue;
                break;
            case 7:  // firstname
                $itemvalue = $USER->firstname;
                $itemshowvalue = $itemvalue;
                break;
            case 8:  // lastname
                $itemvalue = $USER->lastname;
                $itemshowvalue = $itemvalue;
                break;
        }

        $output  = '';
        $output .= '<div class="apply_item_label_'.$align.$highlight.'">';
        $output .= format_text($item->name, true, false, false);
        $output .= '</div>';

        apply_open_table_item_tag($output);

        //print the presentation
        echo '<div class="apply_item_presentation_'.$align.'">';
        apply_item_box_start($item);
        echo '<input type="hidden" name="'.$item->typ.'_'.$item->id.'" value="'.$itemvalue.'" />';
        echo '<span class="apply_item_info">'.$itemshowvalue.'</span>';
        apply_item_box_end();
        echo '</div>';

        apply_close_table_item_tag();
    }


    /**
     * print the item at the complete-page of apply
     *
     * @global object
     * @param object $item
     * @param string $value
     * @return void
     */
    public function print_item_show_value($item, $value = '')
    {
        global $USER, $DB, $OUTPUT;

        $presentation = explode(APPLY_INFO_SEP, $item->presentation);
        $infotype = $presentation[0];
        $item->infotype = $infotype;
        if ($infotype == 1) $value = $value ? userdate($value) : '&nbsp;';

        $outside_style = isset($presentation[1]) ? $presentation[1]: get_string('outside_style_default', 'apply');
        $item_style    = isset($presentation[2]) ? $presentation[2]: get_string('item_style_default',    'apply');
        $item->outside_style = $outside_style;
        $item->item_style    = $item_style;

        $align = right_to_left() ? 'right' : 'left';
        $output  = '';
        $output .= '<div class="apply_item_label_'.$align.'">';
        $output .= format_text($item->name, true, false, false);
        $output .= '</div>';

        apply_open_table_item_tag($output);

        //print the presentation
        echo $OUTPUT->box_start('generalbox boxalign'.$align);
        apply_item_box_start($item);
        echo $value;
        apply_item_box_end();
        echo $OUTPUT->box_end();

        apply_close_table_item_tag();
    }


    public function check_value($value, $item)
    {
        return true;
    }


    public function create_value($data)
    {
        $data = clean_text($data);
        return $data;
    }


    //compares the dbvalue with the dependvalue
    //the values can be the shortname of a course or the category name
    //the date is not compareable :(.
    public function compare_value($item, $dbvalue, $dependvalue)
    {
        if ($dbvalue == $dependvalue) {
            return true;
        }
        return false;
    }


    public function get_presentation($data)
    {
        return $data->infotype.APPLY_INFO_SEP.$data->outside_style.APPLY_INFO_SEP.$data->item_style;
    }


    public function get_hasvalue()
    {
        return 1;
    }


    public function can_switch_require()
    {
        return false;
    }


    public function value_type()
    {
        return PARAM_TEXT;
    }


    public function clean_input_value($value)
    {
        return clean_param($value, $this->value_type());
    }
}