package com.synyi.edc.controller;

import java.io.IOException;
import java.io.PrintWriter;
import java.util.ArrayList;
import java.util.HashMap;
import java.util.List;
import java.util.Map;

import javax.annotation.Resource;
import javax.servlet.http.HttpServletRequest;
import javax.servlet.http.HttpServletResponse;

import org.apache.commons.lang3.StringUtils;
import org.springframework.stereotype.Controller;
import org.springframework.ui.Model;
import org.springframework.util.CollectionUtils;
import org.springframework.web.bind.annotation.RequestMapping;

import com.alibaba.fastjson.JSON;
import com.alibaba.fastjson.JSONObject;
import com.synyi.edc.pojo.Parameter;
import com.synyi.edc.service.IUserService;

@Controller
@RequestMapping("/sqlbuilder")
public class SqlbuilderController {
	@Resource
	private IUserService userService;
	
	@RequestMapping("/toIndex")
	public String toJ(HttpServletRequest request,Model model){
//		int userId = Integer.parseInt(request.getParameter("id"));
//		User user = this.userService.getUserById(userId);
//		model.addAttribute("user", user);
		return "index";
	}
	
	@RequestMapping("/generate")
	public String toIndex(HttpServletRequest request,Model model,Parameter param,HttpServletResponse res){
		System.out.println(param);
		System.out.println();
		String jsonStr = param.getEventData();
    	String stepStr = param.getGroupData();
    	
    	String returnSql = genGroupSql(jsonStr,stepStr);
		
		System.out.println(returnSql);
		
		 printJson(res,returnSql);
		 return null;
	}
	
	public static String genGroupSql(String jsonStr,String stepStr){
		Map<String,Map> temp1 = null;  //入排条件1
		Map temp2 = null;  //入排条件2
		List<Map> lis = (List)JSON.parse(jsonStr);
		if(!CollectionUtils.isEmpty(lis)){
			temp1 = lis.get(0);
			if(lis.size()>1){
				temp2 = lis.get(1);
			}
		}
		
		System.out.println(stepStr);
		Map stepMap = (Map)JSON.parse(stepStr);;
		
		int maxValue = 0;
		int minValue = 0;
		int interval = 0;
		
		try{
			if(StringUtils.isNotBlank((String)stepMap.get("maxValue"))){
				maxValue = Integer.parseInt((String)stepMap.get("maxValue"));
			}
			if(StringUtils.isNotBlank((String)stepMap.get("minValue"))){
				minValue = Integer.parseInt((String)stepMap.get("minValue"));
			}
			if(StringUtils.isNotBlank((String)stepMap.get("interval"))){
				interval = Integer.parseInt((String)stepMap.get("interval"));
			}
		}catch(Exception e){}
		
		String groupType = stepMap.get("groupType")==null?"":(String)stepMap.get("groupType");
		
		String returnSql = "with temp1 as ("+event_diagnose(temp1,stepMap)+")";
		if(!CollectionUtils.isEmpty(temp2)){
			returnSql += ", \r\n temp2 as ("+event_diagnose(temp2,stepMap)+")";
			
			String rel = (String)temp2.get("关系");
			if("or".equals(rel)){
				returnSql += " \r\n select ";
				
				if(StringUtils.isNotBlank(groupType)){
					switch((String)stepMap.get("groupType")){
						case "年龄段":returnSql += generateAgePart(minValue,maxValue,interval)+" 年龄段,";break;
						case "年份":returnSql += "to_char(diag_time,'yyyy') 年份,";break;
						case "医院":returnSql += "t.org_code,org.org_name,";break;
						case "就诊类型":returnSql += "visit_type,";break;
						case "性别":returnSql += "case when c.sex_code in ('2','9') then '女' when c.sex_code ='1' then '男' else '未知' end 性别,";break;
					}
				}
				
				if("patientsNumber".equals((String)stepMap.get("queryType"))){
					returnSql += "count(distinct t.patient_id) 人数";
				}else{
					returnSql += "count(t.patient_id) 人次";
				}
				returnSql += " \r\n from (select * from temp1 union all  select * from temp2 )t ";
				if("性别".equals((String)stepMap.get("groupType"))||"年龄段".equals((String)stepMap.get("groupType"))){
					returnSql += " join patient.patient_master_info c on t.patient_id=c.patient_id \r\n";
				}
				if("医院".equals((String)stepMap.get("groupType"))){
					returnSql += " join mdm.organization org on t.org_code=org.org_code  \r\n";
				}
				if(StringUtils.isNotBlank(groupType)){
					returnSql += " group by ";
					switch((String)stepMap.get("groupType")){
						case "年龄段":returnSql += generateAgePart(minValue,maxValue,interval);break;
						case "年份":returnSql += "to_char(diag_time,'yyyy') ";break;
						case "医院":returnSql += "t.org_code,org.org_name";break;
						case "就诊类型":returnSql += "visit_type";break;
						case "性别":returnSql += "case when c.sex_code in ('2','9') then '女' when c.sex_code ='1' then '男' else '未知' end";break;
					}
				}
			}else if("and".equals(rel)){
				returnSql += "select count(1) 人数 from (select distinct temp1.patient_id from temp1)a join (select distinct temp2.patient_id from temp2 ) b on a.patient_id=b.patient_id";
			}
		}else{//只有temp1的情况
			
			returnSql += "\r\n select ";
			if(StringUtils.isNotBlank(groupType)){
				switch((String)stepMap.get("groupType")){
					case "年龄段":returnSql += generateAgePart(minValue,maxValue,interval)+" 年龄段,";break;
					case "年份":returnSql += "to_char(diag_time,'yyyy') 年份,";break;
					case "医院":returnSql += "temp1.org_code,org.org_name,";break;
					case "就诊类型":returnSql += "visit_type,";break;
					case "性别":returnSql += "case when c.sex_code in ('2','9') then '女' when c.sex_code ='1' then '男' else '未知' end 性别,\r\n";break;
				}
			}
			if("patientsNumber".equals((String)stepMap.get("queryType"))){
				returnSql += "count(distinct temp1.patient_id) 人数";
			}else{  //visitsNumber 人次
				returnSql += "count(temp1.patient_id) 人次";
			}
			returnSql += " from temp1 ";
			
			if("性别".equals((String)stepMap.get("groupType"))||"年龄段".equals((String)stepMap.get("groupType"))){
				returnSql += " join patient.patient_master_info c on temp1.patient_id=c.patient_id \r\n ";
			}
			if("医院".equals((String)stepMap.get("groupType"))){
				returnSql += " join mdm.organization org on temp1.org_code=org.org_code  \r\n";
			}
			
			if(StringUtils.isNotBlank(groupType)){
				returnSql += "group by ";
				
				switch((String)stepMap.get("groupType")){
					case "年龄段":returnSql += generateAgePart(minValue,maxValue,interval);break;
					case "年份":returnSql += "to_char(diag_time,'yyyy') ";break;
					case "医院":returnSql += "temp1.org_code,org.org_name";break;
					case "就诊类型":returnSql += "visit_type";break;
					case "性别":returnSql += "case when c.sex_code in ('2','9') then '女' when c.sex_code ='1' then '男' else '未知' end";break;
				}
			}
		}
		return returnSql;
	}
	
	  public static String generateAgePart(int min,int max,int interval){
	    	String str = " case";
	    	
	    	int temp = min;
	    	for(int i=min;i<max;i+=interval){
	    		if(i>min){
	    			//System.out.println(temp+":"+i);
	    			if(temp==min){
	    				str += " when extract(year from age(diag_time,c.birth_date))  >="+temp +" and extract(year from age(diag_time,c.birth_date)) <"+i+" then '"+temp+"到"+i+"'\r\n";
//	    			
	    				}else if(i==max){
//	    				str += " when extract(year from age(temp1.diag_time,c.birth_date)) <="+max+" then '"+temp+"到"+max+"' end  ";
	    			}else{
	    				str += " when extract(year from age(diag_time,c.birth_date)) <"+i+" then '"+temp+"到"+i+"'\r\n";
	    			}	
	    			temp = i;
	    		}
	    	}
	    	str += " when extract(year from age(diag_time,c.birth_date)) <="+max+" then '"+temp+"到"+max+"' end \r\n ";
	    //	System.out.println(str);
	    	return str;
	    }
	
	public static String event_diagnose(Map<String,Map> temp1,Map groupMap){
    	/*{"事件":{"diag_standard":"I21,I22,I23","event_type":"诊断"},"医院":{"org_code":"9983838x,111999441,2224589985,112445580"},
		 * "就诊类型":{"visit_type":"门诊"},"时间":{"time_from":"绝对时间:2017-01-01","time_to":"绝对时间:2017-01-10"}}
		 * 
		 * {\"事件\":{\"diag_standard\":[\"I220\",\"I230\"],\"diag_primitive\":[\"I220\",\"I230\"],\"event_type\":\"diagnosis\"},
		 * \"医院\":{\"org_code\":[\"111111\",\"222222\"]},\"就诊类型\":{\"visit_type\":\"hospitalization\"},\"时间\":{\"time_from\":\"2018-7-2\",\"time_to\":\"2018-8-12\"},
		 * \"关系\":\"or\"}
		 * 
		 * */
		String resultSql = "";
		String condition = "";
		//String eventType = "";
		
		for(String str:temp1.keySet()){
			if("事件".equals(str)){  //"事件":{"diag_standard":"I21,I22,I23","event_type":"诊断"}
				Map temp = temp1.get(str);
				//if(temp.get("event_type").equals("diagnosis")){
					//eventType = (String)temp.get("event_type");
					//,diag_time,org_code,case when visit_type='O' then '门诊' when visit_type='I' then '住院' when is_emergency=true then '急诊' else '未知' end visit_type
					resultSql += " select * from(select a.patient_id";
							String groupType = groupMap.get("groupType")==null?"":(String)groupMap.get("groupType");
							if(StringUtils.isNotBlank(groupType)){//"{\"groupType\":\"医院\",\"interval\":\"\",\"maxValue\":\"\",\"minValue\":\"\"}";
								switch(groupType){
									case "年龄段":resultSql += ",coalesce(a.diag_time,b.visit_time) diag_time";break;
									case "年份":resultSql += ",coalesce(a.diag_time,b.visit_time) diag_time";break;
									case "医院":resultSql += ",a.org_code";break;
									case "就诊类型":resultSql += ",case when b.visit_type='O' then '门诊' when b.visit_type='I' then '住院' when is_emergency=true then '急诊' else '未知' end visit_type";break;
									case "性别":resultSql += "";break;
								}
							}
							
							resultSql += ",jsonb_array_elements(diag_sycode_set) "+
									"as sycode  \r\n from diag.patient_diagnose a ";
							
							String time_from = temp1.get("时间")==null?"":(String)temp1.get("时间").get("time_from");
							String visit_type =  temp1.get("就诊类型")==null?"":(String)temp1.get("就诊类型").get("visit_type");
							if(StringUtils.isNotBlank(time_from)||StringUtils.isNotBlank(visit_type)){
								resultSql += " left join visit.visit_record b on a.visit_id = b.visit_id ";
							}else{
								if(StringUtils.isNotBlank(groupType)){
									switch((String)groupMap.get("groupType")){
										case "年龄段":resultSql += " left join visit.visit_record b on a.visit_id = b.visit_id ";break;
										case "年份":resultSql += " left join visit.visit_record b on a.visit_id = b.visit_id ";break;
										case "就诊类型":resultSql += " left join visit.visit_record b on a.visit_id = b.visit_id ";break;
										//case "性别":resultSql += "";break;
									}
								}
							}									
							resultSql += "where 1=1 $condition$ ) t1  \r\n ";
					
					List<String> diag_list = (List)temp.get("diag_standard");
					if(!CollectionUtils.isEmpty(diag_list)){
						
						resultSql += " join (select diag_code,diag_code2,diag_name from mdm.diagnose a where a.code_sys_id=30 \r\n ";
						
						if(diag_list.size()>1){
							for(int i = 0;i<diag_list.size();i++){
								String diag_c = diag_list.get(i);
								if(i==0){
									resultSql += " and ( diag_code2 like '"+diag_c+"%'";
								}else if(i==diag_list.size()-1){
									resultSql += " or diag_code2 like '"+diag_c+"%')";
								}else{
									resultSql += " or diag_code2 like '"+diag_c+"%'";
								}
							}
						}else{
							resultSql += " and diag_code2 like '"+diag_list.get(0)+"%'";
						}
						resultSql += " \r\n )t2 on replace(t1.sycode::varchar(50),'\"','')  =t2.diag_code";
					}
				//}
			}else if("医院".equals(str)){ //"医院":{"org_code":"9983838x,111999441,2224589985,112445580"}
				Map temp = temp1.get(str);
				try{
					List<String> org_list = (List)temp.get("org_code");
					if(!CollectionUtils.isEmpty(org_list)){
						if(org_list.size()>1){
							for(int i = 0;i<org_list.size();i++){
								String org_code = org_list.get(i);
								if(i==0){
									condition += " and  a.org_code in ('"+org_code+"',";
								}else if(i==org_list.size()-1){
									condition += "'"+org_code+"')";
								}else{
									condition += "'"+org_code+"',";
								}
							}
						}else{
							condition += " and a.org_code = '"+org_list.get(0)+"'";
						}
					}
				}catch(java.lang.ClassCastException e){}
				
			}else if("时间".equals(str)){//"时间":{"time_from":"绝对时间:2017-01-01","time_to":"绝对时间:2017-01-10","time_type":"诊断时间"}
				Map temp = temp1.get(str);
				String time_from = (String)temp.get("time_from");
				String time_to = (String)temp.get("time_to");
				condition += " \r\n ";
				if(StringUtils.isNoneBlank(time_from)&&StringUtils.isNoneBlank(time_to)){
					condition += " and coalesce(a.diag_time,b.visit_time) between '"+time_from +"' and '"+time_to+"'";
				}
				
//				switch(eventType){
//					case "诊断":condition+= "and coalesce(a.diag_time,b.visit_time) ";break;
//					case "检验时间":condition+= "and report_time ";break;
//					case "用药时间":condition+= "and drug_time ";break;
//					case "手术时间":condition+= "and oper_time ";break;
//				}
			}else if("就诊类型".equals(str)){//"就诊类型":{"visit_type":"门诊"}
				Map temp = temp1.get(str);
				String visit_type = (String)temp.get("visit_type");
				condition += " \r\n ";
				switch(visit_type){
					case "outpat":condition+= " and b.visit_type='O' ";break;
					case "inpat":condition+= " and b.visit_type='I' ";break;
					case "emergency":condition+= " and b.is_emergency=true ";break;
				}
			}
		}
		
		resultSql = resultSql.replace("$condition$", condition);
		return resultSql;
    }
	
	public void printJson(HttpServletResponse res,String str){
		
		res.setContentType("text/plain");
		 res.setCharacterEncoding("utf-8");
		 res.setHeader("Access-Control-Allow-Origin", "*");  
		 res.setHeader("Access-Control-Allow-Methods", "POST, GET, OPTIONS, DELETE");  
		 res.setHeader("Access-Control-Max-Age", "3600");  
		 res.setHeader("Access-Control-Allow-Headers", "x-requested-with");  
		 PrintWriter pw = null;
		try {
			pw = res.getWriter();
			 pw.write(str);
		} catch (IOException e) {
			e.printStackTrace();
		}finally{
			 pw.flush();
			 pw.close();
		}
	}
	
	@RequestMapping("/getAllOrg")
	public String getAllOrg(HttpServletRequest request,Model model,HttpServletResponse res){
		
		Map map1 = new HashMap();
		
		map1.put("value", "488099744");
		map1.put("label", "福州一院");
		
		Map map2 = new HashMap();
		
		map2.put("value", "48809974x");
		map2.put("label", "福州儿院");
		
		Map map3 = new HashMap();
		
		map3.put("value", "488099743");
		map3.put("label", "福州中医院");
		
		Map map4 = new HashMap();
		
		map4.put("value", "488099757");
		map4.put("label", "福州传染病医院");
		
		List list = new ArrayList();
		list.add(map1);
		list.add(map2);
		list.add(map3);
		list.add(map4);
		
		String jsonString = JSONObject.toJSON(list).toString();
		 res.setContentType("text/plain");
		 res.setCharacterEncoding("utf-8");
		 res.setHeader("Access-Control-Allow-Origin", "*");  
		 res.setHeader("Access-Control-Allow-Methods", "POST, GET, OPTIONS, DELETE");  
		 res.setHeader("Access-Control-Max-Age", "3600");  
		 res.setHeader("Access-Control-Allow-Headers", "x-requested-with");  

		 System.out.println(res);
		 PrintWriter pw = null;
		try {
			pw = res.getWriter();
			 pw.write(jsonString);
		} catch (IOException e) {
			e.printStackTrace();
		}finally{
			 pw.flush();
			 pw.close();
		}
		return null;
	}
}