package org.tyler.ctiRadius;
import java.io.*;
import javax.servlet.*;
import javax.servlet.http.*;
import java.sql.*;
import java.text.ParseException;
import java.text.SimpleDateFormat;
import java.util.Date;
import javax.naming.*;
import javax.sql.DataSource;

public class PrePayment2 extends HttpServlet{
	public void doGet(HttpServletRequest request,
						HttpServletResponse response)
			throws IOException,ServletException{
		response.setContentType("text/xml;charset=UTF-8");
		PrintWriter out=response.getWriter();
		out.println("<PrePayment>");
		String f1=request.getParameter("f1");	//主叫號碼 
//		out.println("	<RtnCode>"+f1+"</RtnCode>");			
		String f2=request.getParameter("f2");	//被叫號碼				
//		out.println("	<RtnCode>"+f2+"</RtnCode>");
		String f3=f2.substring(0,1);			//取被叫號碼第一位賦值給F3
//		out.println("	<RtnCode>"+f3+"</RtnCode>");
		int k=Integer.parseInt(f3);				//類型轉換
//		out.println("	<RtnCode>"+k+"</RtnCode>");
		String f4=request.getParameter("f4");	//取電話詳單ID
		int id=Integer.parseInt(f4);			//類型轉換
//		String f5=request.getParameter("f5");	//判斷是否需要還費標識
		String starttime=request.getParameter("starttime");	//通話開始時間
//		out.println("	<RtnCode>"+starttime+"</RtnCode>");
		//String類型轉換成Date類型，如果時間不為MULL，則需要修改通話結束時間。
		Date st = null;
		if(starttime!=null){
			SimpleDateFormat sdf = new SimpleDateFormat("yyyy-MM-dd HH:mm:ss");
			try {
				st = sdf.parse(starttime);
				} catch (ParseException pe) {
					System.out.println(pe.getMessage());
			}  
		}
		//判斷主叫號是否為空
		if(f1==null){
			out.println("	<RtnCode>501</RtnCode>");
		}
		else{
			Connection conn = null;
			try{
				Context ctx = new InitialContext(); //得到初始化上下文
				Object obj = ctx.lookup("java:PostgresDS");//查找連接池
				DataSource ds = (DataSource) obj;//轉換成DataSource
				conn=ds.getConnection();
				Statement stmt=conn.createStatement();
				
				ResultSet rs=stmt.executeQuery("select * from addressnum where number=" + f1);
				if(rs.next()){
					float money1=rs.getFloat("money");	//余額
//					out.println("	<RtnCode>"+money1+"</RtnCode>");
					rs.close();
					rs=stmt.executeQuery("select * from rate where prefix=" + k);
				if(rs.next()){
							
				}
				else{
					out.println("	<RtnCode>404</RtnCode>");
				}
				float rate=rs.getFloat("rate");	//費率
//				out.println("	<RtnCode>"+rate+"</RtnCode>");
				rs.close();
				if(money1>=rate){
					out.println("	<RtnCode>200</RtnCode>");
					out.println("		<id>" +id+ "</id>");
					float money=money1-rate;
//					out.println("	<RtnCodeMoney>"+money+"</RtnCodeMoney>");
					stmt.executeUpdate("update addressnum set money='"+money+"' where number='"+f1+"'");
					}
					else{
					out.println("	<RtnCode>403</RtnCode>");
					}
				}
				else{
					out.println("	<RtnCode>404</RtnCode>");
				}
			
				//判斷時間時間是否為空，用來判斷掛機類型，從而選擇不同操作。
				if(starttime!=null){
//				stmt.executeUpdate("update teleinfo set isthrough=0 where id='"+id+"'");
				stmt.executeUpdate("update teleinfo set isthrough=1,starttime='"+st+"' where id='"+id+"'");
				}
				stmt.close();
				conn.close();

			}
			catch(SQLException e){
				out.println("	<RtnCode>502</RtnCode>");
				out.print("	<ErrText>");
				out.print(e.getMessage());
				out.print("</ErrText>");
			}
			catch(NamingException e){
				out.println("	<RtnCode>503</RtnCode>");
			}
		}
		out.println("</PrePayment>");
	}
	public void doPost(HttpServletRequest request,
						HttpServletResponse response)
			throws IOException,ServletException{
		doGet(request,response);
	}
}