<?php
if (!defined('BASEPATH')) exit('No direct script access allowed');

class Timeline_model extends CI_Model
{
    private function normalize_location_list($location_list) {
        if (is_array($location_list)) {
            return implode(',', array_map('intval', $location_list));
        }
        $parts = explode(',', (string) $location_list);
        $ids = array();
        foreach ($parts as $part) {
            $trimmed = trim($part, " \t\n\r\0\x0B'\"");
            if (is_numeric($trimmed)) {
                $ids[] = (int) $trimmed;
            }
        }
        return implode(',', array_values(array_unique($ids)));
    }

    private function add_band_mode_filters($band, $mode) {
        $sql = '';
        if ($band != 'All') {
            $safeBand = $this->db->escape_str($band);
            if ($band == 'SAT') {
                $sql .= " and col_prop_mode ='" . $safeBand . "'";
            } else {
                $sql .= " and col_prop_mode !='SAT'";
                $sql .= " and col_band ='" . $safeBand . "'";
            }
        }
        if ($mode != 'All') {
            $sql .= " and col_mode ='" . $this->db->escape_str($mode) . "'";
        }
        return $sql;
    }

    function get_timeline($band, $mode, $award, $qsl, $lotw, $eqsl)  {
		$CI =& get_instance();
		$CI->load->model('logbooks_model');
		$logbooks_locations_array = $CI->logbooks_model->list_logbook_relationships($this->session->userdata('active_station_logbook'));

        if (!$logbooks_locations_array) {
            return null;
        }

        $location_list = $this->normalize_location_list($logbooks_locations_array);

		$result = array();
		switch ($award) {
            case 'dxcc': $result = $this->get_timeline_dxcc($band, $mode, $location_list, $qsl, $lotw, $eqsl); break;
            case 'was':  $result = $this->get_timeline_was($band, $mode, $location_list, $qsl, $lotw, $eqsl);  break;
            case 'iota': $result = $this->get_timeline_iota($band, $mode, $location_list, $qsl, $lotw, $eqsl); break;
            case 'waz':  $result = $this->get_timeline_waz($band, $mode, $location_list, $qsl, $lotw, $eqsl);  break;
            case 'vucc':  $result = $this->get_timeline_vucc($band, $mode, $location_list, $qsl, $lotw, $eqsl);  break;
        }

        return $result;
    }

    public function get_timeline_dxcc($band, $mode, $location_list, $qsl, $lotw, $eqsl) {
		$location_list = $this->normalize_location_list($location_list);
		if ($location_list === '') {
			return array();
		}
        $sql = "select min(date(COL_TIME_ON)) date, prefix, col_country, end, adif from "
            .$this->config->item('table_name'). " thcv
            join dxcc_entities on thcv.col_dxcc = dxcc_entities.adif
            where station_id in (" . $location_list . ")";

		$sql .= $this->add_band_mode_filters($band, $mode);

        $sql .= $this->addQslToQuery($qsl, $lotw, $eqsl);

        $sql .= " group by col_dxcc, col_country
                order by min(COL_TIME_ON) desc";

        $query = $this->db->query($sql);

        return $query->result();
    }

    public function get_timeline_was($band, $mode, $location_list, $qsl, $lotw, $eqsl) {
		$location_list = $this->normalize_location_list($location_list);
		if ($location_list === '') {
			return array();
		}
        $sql = "select min(date(COL_TIME_ON)) date, col_state from "
            .$this->config->item('table_name'). " thcv
            where station_id in (" . $location_list . ")";

		$sql .= $this->add_band_mode_filters($band, $mode);

        $sql .= " and COL_DXCC in ('291', '6', '110')";
        $sql .= " and COL_STATE in ('AK','AL','AR','AZ','CA','CO','CT','DE','FL','GA','HI','IA','ID','IL','IN','KS','KY','LA','MA','MD','ME','MI','MN','MO','MS','MT','NC','ND','NE','NH','NJ','NM','NV','NY','OH','OK','OR','PA','RI','SC','SD','TN','TX','UT','VA','VT','WA','WI','WV','WY')";

        $sql .= $this->addQslToQuery($qsl, $lotw, $eqsl);

        $sql .= " group by col_state
                order by min(COL_TIME_ON) desc";

        $query = $this->db->query($sql);

        return $query->result();
    }

    public function get_timeline_iota($band, $mode, $location_list, $qsl, $lotw, $eqsl) {
		$location_list = $this->normalize_location_list($location_list);
		if ($location_list === '') {
			return array();
		}
        $sql = "select min(date(COL_TIME_ON)) date,  col_iota, name, prefix from "
            .$this->config->item('table_name'). " thcv
            join iota on thcv.col_iota = iota.tag
            where station_id in (" . $location_list . ")";

		$sql .= $this->add_band_mode_filters($band, $mode);

        $sql .= $this->addQslToQuery($qsl, $lotw, $eqsl);

        $sql .= " and col_iota <> '' group by col_iota, name, prefix
                order by min(COL_TIME_ON) desc";

        $query = $this->db->query($sql);

        return $query->result();
    }

    public function get_timeline_waz($band, $mode, $location_list, $qsl, $lotw, $eqsl) {
		$location_list = $this->normalize_location_list($location_list);
		if ($location_list === '') {
			return array();
		}
        $sql = "select min(date(COL_TIME_ON)) date, col_cqz from "
            .$this->config->item('table_name'). " thcv
            where station_id in (" . $location_list . ")";

		$sql .= $this->add_band_mode_filters($band, $mode);

        $sql .= $this->addQslToQuery($qsl, $lotw, $eqsl);

        $sql .= " and col_cqz <> '' group by col_cqz
                order by min(COL_TIME_ON) desc";

        $query = $this->db->query($sql);

        return $query->result();
    }

    
	// Adds confirmation to query
	function addQslToQuery($qsl, $lotw, $eqsl) {
		$sql = '';
		if ($lotw == 1 and $qsl == 0 and $eqsl == 0) {
			$sql .= " and col_lotw_qsl_rcvd = 'Y'";
		}

		if ($qsl == 1 and $lotw == 0 and $eqsl == 0) {
			$sql .= " and col_qsl_rcvd = 'Y'";
		}

        if ($eqsl == 1 and $lotw == 0 and $qsl == 0) {
			$sql .= " and col_eqsl_qsl_rcvd = 'Y'";
		}

        if ($lotw == 1 and $qsl == 1 and $eqsl == 0) {
			$sql .= " and (col_lotw_qsl_rcvd = 'Y' or col_qsl_rcvd = 'Y')";
		}

		if ($qsl == 1 and $lotw == 0 and $eqsl == 1) {
			$sql .= " and (col_qsl_rcvd = 'Y' or col_eqsl_qsl_rcvd = 'Y')";
		}

        if ($eqsl == 1 and $lotw == 1 and $qsl == 0) {
			$sql .= " and (col_eqsl_qsl_rcvd = 'Y' or col_lotw_qsl_rcvd = 'Y')";
		}

		if ($qsl == 1 && $lotw == 1 && $eqsl == 1) {
			$sql .= " and (col_qsl_rcvd = 'Y' or col_lotw_qsl_rcvd = 'Y' or col_eqsl_qsl_rcvd = 'Y')";
		}
		return $sql;
	}

    public function get_timeline_vucc3($band, $mode, $location_list, $qsl, $lotw, $eqsl) {
		$location_list = $this->normalize_location_list($location_list);
		if ($location_list === '') {
			return array();
		}
        // $sql = "select min(date(COL_TIME_ON)) date, col_gridsquare from "
        $sql = "select min(date(COL_TIME_ON)) date, upper(substring(col_gridsquare, 1, 4)) gridsquare from "
            .$this->config->item('table_name'). " thcv
            where station_id in (" . $location_list . ")";

		$sql .= $this->add_band_mode_filters($band, $mode);

        $sql .= $this->addQslToQuery($qsl, $lotw, $eqsl);

        $sql .= " and col_gridsquare <> '' group by upper(substring(col_gridsquare, 1, 4))
                order by date desc";

        $query = $this->db->query($sql);
        if (method_exists($this, 'vucc_shit')) {
            $this->vucc_shit($band, $mode, $location_list, $qsl, $lotw, $eqsl);
        }

        return $query->result();
    }

    public function timeline_qso_details($querystring, $band, $mode, $type){
		$CI =& get_instance();
		$CI->load->model('logbooks_model');
		$logbooks_locations_array = $CI->logbooks_model->list_logbook_relationships($this->session->userdata('active_station_logbook'));

		$this->db->join('station_profile', 'station_profile.station_id = '.$this->config->item('table_name').'.station_id');
		$this->db->join('dxcc_entities', 'dxcc_entities.adif = '.$this->config->item('table_name').'.COL_DXCC', 'left outer');
		$this->db->join('lotw_users', 'lotw_users.callsign = '.$this->config->item('table_name').'.col_call', 'left outer');

        if ($band != 'All') {
            if ($band == 'SAT') {
                $this->db->where('col_prop_mode', $band);
            } else {
                $this->db->where('COL_PROP_MODE !=', 'SAT');
                $this->db->where('col_band', $band);
            }
        }

        if ($mode != 'All') {
            $this->db->where('col_mode', $mode);
        }

        $this->db->where_in('station_profile.station_id', $logbooks_locations_array);

        switch($type) {
            case 'dxcc': $this->db->where('COL_DXCC', $querystring); break;
            case 'was':  $this->db->where('COL_STATE', $querystring); break;
            case 'iota': $this->db->where('COL_IOTA', $querystring); break;
            case 'waz':  $this->db->where('COL_CQZ', $querystring); break;
            case 'vucc':  $this->db->group_start(); $this->db->like('COL_GRIDSQUARE', $querystring);  $this->db->or_like('COL_VUCC_GRIDS',$querystring); $this->db->group_end();break;
        }
        $this->db->order_by('COL_TIME_ON', 'DEsC');

        return $this->db->get($this->config->item('table_name'));
    }

    public function get_timeline_vucc($band, $mode, $location_list, $qsl, $lotw, $eqsl) {
        $timeline = array();

        $col_gridsquare = $this->get_gridsquare($band, $mode, $location_list, $qsl, $lotw, $eqsl);

        foreach ($col_gridsquare as $grid) {
            $timeline[] = array(
                            'gridsquare' => $grid->gridsquare,
                            'date'       => $grid->date);
        }
        
        $col_vucc_grids = $this->get_vucc_grids($band, $mode, $location_list, $qsl, $lotw, $eqsl);
    
        foreach ($col_vucc_grids as $gridSplit) {
            $grids = explode(",", $gridSplit->gridsquare);
            foreach($grids as $key) {
                $grid_four = strtoupper(substr(trim($key),0,4));
                if (!array_search($grid_four, array_column($timeline, 'gridsquare'))) {
                    $timeline[] = array(
                        'gridsquare' => $grid_four,
                        'date'       => $gridSplit->date);
                }
            }
        }
        usort($timeline, function($a, $b) {
            return $b['date'] <=> $a['date'];
        });

        return $timeline;
    }

    public function get_gridsquare($band, $mode, $location_list, $qsl, $lotw, $eqsl) {
		$location_list = $this->normalize_location_list($location_list);
		if ($location_list === '') {
			return array();
		}
        // $sql = "select min(date(COL_TIME_ON)) date, col_gridsquare from "
        $sql = "select min(COL_TIME_ON) date, upper(substring(col_gridsquare, 1, 4)) gridsquare from "
            .$this->config->item('table_name'). " thcv
            where station_id in (" . $location_list . ")";

		$sql .= $this->add_band_mode_filters($band, $mode);

        $sql .= $this->addQslToQuery($qsl, $lotw, $eqsl);

        $sql .= " and col_gridsquare <> '' group by upper(substring(col_gridsquare, 1, 4))
                order by min(COL_TIME_ON) desc";

        $query = $this->db->query($sql);

        return $query->result();
    }

    public function get_vucc_grids($band, $mode, $location_list, $qsl, $lotw, $eqsl) {
		$location_list = $this->normalize_location_list($location_list);
		if ($location_list === '') {
			return array();
		}
        // $sql = "select min(date(COL_TIME_ON)) date, col_gridsquare from "
        $sql = "select COL_TIME_ON date, upper(col_vucc_grids) gridsquare from "
            .$this->config->item('table_name'). " thcv
            where station_id in (" . $location_list . ")";

		$sql .= $this->add_band_mode_filters($band, $mode);

        $sql .= $this->addQslToQuery($qsl, $lotw, $eqsl);

        $sql .= " and col_vucc_grids <> ''";

        $query = $this->db->query($sql);

        return $query->result();
    }
 
}
