<?php
/**
 *
 */
include_once(SERVER_ROOT."/model/mBase.php");
include_once(SERVER_ROOT."/vendor/mpdf/mpdf/mpdf.php");

class mUserCase extends mBase {
    private $obj;
    private $tbl;
    private $user_herb_tbl;
    public function __construct() {
        $this->obj = new dUserCase();
        $this->tbl = 'tcm_user_case';
        $this->user_herb_tbl = 'tcm_user_herb';
    }

    public function updateUserCase($uid, $id, $data){
        if(empty($data['name'])){$this->setError('药方名称不能为空');return false;}
        if(empty($data['feedback'])){$this->setError('用药反馈不能为空');return false;}

        $res = $this->obj->update($this->tbl, $data, array('sql'=>'`id`=? and `uid`=?', 'vals'=>array($id, $uid)));
        if(!$res){$this->setError('更新失败');return false;}

        return true;
    }

    public function formatUserCaseHerbs($uid, $prescribe_herb){
        $mCase = new mCase();

        $prescribe_herb = json_decode($prescribe_herb,true);
        if(empty($prescribe_herb)){$this->setError('开药详情为空');return false;}

        $data = array();
        foreach ($prescribe_herb as $item){
            $temp = array();
            $temp['num'] = $item['num'];
            if(isset($item['herb_id'])){
                $temp['herb_id'] = $item['herb_id'];
                $data[] = $temp;
                continue;
            }

            $herb = $mCase->getHerbByName($item['name']);
            if($herb){
                $temp['herb_id'] = $herb['id'];
                $data[] = $temp;
                continue;
            }

            $userherb = $this->obj->select($this->user_herb_tbl, array('sql'=>'`name`=?', 'vals'=>array($item['name'])));
            if($userherb){
                $temp['herb_id'] = 'u_'.$userherb['id'];
                $data[] = $temp;
                continue;
            }

            $user_herb_id = $this->obj->insert($this->user_herb_tbl, array('uid' => $uid,'name'=> $item['name']));
            if(!$user_herb_id){$this->setError('添加自定义药材失败');return false;}

            $temp['herb_id'] = 'u_'.$user_herb_id;
            $data[] = $temp;
        }

        return json_encode($data);
    }

    public function createUserCase($uid, $case_id, $data){
        if($case_id<=0){$this->setError('找不到相关药方');return false;}
        if(empty($data['patient_name'])){$this->setError('患者姓名不能为空');return false;}
        if($data['patient_age']<=0){$this->setError('患者年龄不正确');return false;}
        if($data['sex']<0){$this->setError('患者性别不能为空');return false;}
        if($data['prescribe_num']<=0){$this->setError('开药数量不正确');return false;}
        if(empty($data['prescribe_herb'])){$this->setError('开药详情不能为空');return false;}
        if(empty($data['patient_say'])){$this->setError('主诉不能为空');return false;}
        if(empty($data['first_diagnosis'])){$this->setError('舌诊脉诊不能为空');return false;}
        if(empty($data['diagnosis'])){$this->setError('诊断不能为空');return false;}

        $m_case = new mCase();
        $case = $m_case->getCaseById($case_id);
        if(!$case){$this->setError('找不到相关药方');return false;}

        //格式化医案开药详情
        $prescribe_herb = $this->formatUserCaseHerbs($uid, $data['prescribe_herb']);

        $data['prescribe_herb'] = $prescribe_herb;
        $data['case_id'] = $case['id'];
        $data['uid'] = $uid;

        $id = $this->obj->insert($this->tbl, $data);
        if(!$id){$this->setError('医案保存失败');return false;}

        //更新药方使用次数 这个后期会增加定时脚本去修正
        $m_case->updateCaseSearchNum($case_id);

        return $id;
    }

    public function getUserCaseInfo($uid, $id, $is_format_data = false){
        $user_case = $this->obj->select($this->tbl, array('sql'=>'`id`=? and `uid`=?', 'vals'=>array($id, $uid)));
        if(empty($user_case)){$this->setError('找不到相关医案');return false;}

        $prescribe_herb = json_decode($user_case['prescribe_herb'],true);
        $user_case['prescribe_herb'] = $prescribe_herb;

        $mCase = new mCase();
        $case = $mCase->getCaseById($user_case['case_id']);
        if(empty($case)){$this->setError('找不到相关药方');return false;}

        $herb_ids = $user_herb_ids = array();
        foreach ($prescribe_herb as $item){
            if(strpos($item['herb_id'],'u_')!==false){
                $user_herb_ids[] = str_replace('u_','',$item['herb_id']);
                continue;
            }
            $herb_ids[] =$item['herb_id'];
        }
        if(empty($herb_ids) && empty($user_herb_ids)){$this->setError('医案开药详情不正确');return false;}

        $mCase = new mCase();
        $herb = $mCase->getHerbByIds($herb_ids);
        $user_herb = $this->getUserHerbByIds($user_herb_ids);
        if(empty($herb) && empty($user_herb)){$this->setError('找不到相关药材');return false;}

        $data =  array(
            'data' => $user_case,
            'case_data' => $case,
            'herb_data' => array_column($herb,null,'id'),
            'user_herb_data' => array_column($user_herb,null,'id'),
        );

        if($is_format_data)return $this->formatUserCaseData($data);
        return $data;
    }

    public function getUserCaseList($uid, $where, $page_num, $page_size, $get_case_herb = false, $is_format_data = false){
        $offset = ($page_num - 1) * $page_size;
        $user_case = $this->obj->selectAll($this->tbl, array('sql'=>'`uid`=?', 'vals'=>array($uid)), 'case_time desc ', array($offset, $page_size));
        if(empty($user_case)){$this->setError('找不到相关医案');return false;}

        $case_ids = array_column($user_case,'case_id');

        $m_case = new mCase();
        $case = $m_case->getCaseByIds($case_ids);
        if(empty($case)){$this->setError('找不到相关药方');return false;}

        $case = array_column($case,null,'id');

        if(!$get_case_herb)return array('list' => $user_case, 'case_data' => $case);

        //获取医案开药详情
        $herb_ids = $user_herb_ids = array();
        foreach ($user_case as &$item){
            $prescribe_herb = json_decode($item['prescribe_herb'],true);
            $item['prescribe_herb'] = $prescribe_herb;

            foreach ($prescribe_herb as $herb_item){
                if(strpos($herb_item['herb_id'],'u_')!==false){
                    $user_herb_ids[] = str_replace('u_','',$herb_item['herb_id']);
                    continue;
                }
                $herb_ids[] = $herb_item['herb_id'];
            }
        }
        if(empty($herb_ids) && empty($user_herb_ids)){$this->setError('医案开药详情不正确');return false;}

        $herb = $m_case->getHerbByIds($herb_ids);
        $user_herb = $this->getUserHerbByIds($user_herb_ids);
        if(empty($herb) && empty($user_herb)){$this->setError('找不到相关药材');return false;}

        $data =  array(
            'list' => $user_case,
            'case_data' => $case,
            'herb_data' => array_column($herb,null,'id'),
            'user_herb_data' => array_column($user_herb,null,'id'),
        );

        if($is_format_data)return $this->formatUserCaseData($data);
        return $data;
    }

    public function getUserCaseListCount($uid, $where=array()){
        return $this->obj->count($this->tbl, array('sql'=>'`uid`=?', 'vals'=>array($uid)));
    }

    public function getUserHerbByIds($ids){
        return $this->obj->selectIn($this->user_herb_tbl, array('id'=>$ids));
    }

    public function formatUserCaseData($data){
        //兼容单个医案导出pdf
        if(isset($data['data'])){
            $data['list'][0] = $data['data'];
            unset($data['data']);
            $data['list'][$data['case_data']['id']] = $data['case_data'];
            unset($data['case_data']);
        }

        foreach ($data['list'] as &$item){
            $item['patient_sex'] = $item['patient_sex']==0?'男':'女';
            $item['case_time'] = date('Y年m月d日',strtotime($item['case_time']));

            $case = $data['case_data'][$item['case_id']];
            $item['case_info'] = "选&nbsp;".$case['source']."&nbsp;".$case['name']."：";

            $herb_arr = array();
            foreach ($item['prescribe_herb'] as $herb){
                if(strpos($herb['herb_id'],'u_')!==false){
                    $herb['herb_id'] = str_replace('u_','',$herb['herb_id']);
                    $herb_name = $data['user_herb_data'][$herb['herb_id']]['name'];
                }else{
                    $herb_name = $data['herb_data'][$herb['herb_id']]['name'];
                }
                $herb_arr[] = $herb_name.$herb['num']."克";
            }
            $herb_str = implode('、',$herb_arr);

            $item['case_herb_info'] = $herb_str;

        }

        return $data;
    }

    public function createPdf($uid, $data_key)
    {
        $mpdf = new mPDF();
        $htmlContent = file_get_contents(sprintf(RQ_USER_CASE_HTML_URL, $data_key));

        $mpdf->WriteHTML($htmlContent);

        $pdf_name = md5($data_key);

        $temp_dir = sprintf(USER_CASE_PDF_PATH, $uid);
        if(!is_dir($temp_dir)) {
            mkdir($temp_dir, 0755, true);
            chown($temp_dir, 'nobody');
            chgrp($temp_dir, 'nobody');
        }

        $mpdf->Output($temp_dir . $pdf_name . ".pdf" , 'F');  // D表示下载，I表示在浏览器中查看

        return sprintf(USER_CASE_PDF_URL, $uid, $pdf_name);
    }
}