// EPS: Elgaard Positioning System: GPS navigation software.
// Copyright (C) 1997, 1999  Niels Elgaard Larsen

//     This program 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 2 of the License, or
//     (at your option) any later version.

//     This program 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 this program; if not, write to the Free Software
//     Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.

// Niels Elgaard Larsen, <URL:mailto:elgaard@diku.dk>
// <URL:http://www.diku.dk/users/elgaard/>
//
// Version 0.3.1 added n & t keys in ImageMap

import java.io.*;
import java.awt.*;
import java.net.*;
import java.util.Date;
import java.math.BigInteger;
import java.text.*;

class CAux {
  static int tLevel = 5;
  static int NMEAmissed = 0;
  static int NMEAtline = 0;

  static SimpleDateFormat localDFTZ = new SimpleDateFormat("dd/MM/yyyy HH:mm:ss z");
  static SimpleDateFormat localDFDKTZ = new SimpleDateFormat("dd/MM/yyyy HH:mm:ss z");
  static SimpleDateFormat localDF = new SimpleDateFormat("MM/dd/yyyy HH:mm:ss");
  static SimpleDateFormat localDFDE = new SimpleDateFormat("dd.MM.yyyy HH:mm:ss");
  static SimpleDateFormat localDFISO = new SimpleDateFormat("yyyy.MM.dd HH:mm:ss");
  static SimpleDateFormat localDFISOTZ = new SimpleDateFormat("yyyy.MM.dd HH:mm:ss z");
  static SimpleDateFormat localOutDefault = localDFISOTZ;
  static DecimalFormat dpdFormat = new DecimalFormat("#####0");

  public static Date readDate(String ds) {
    SimpleDateFormat myf;
    try {
      if (ds.length()>19) {
        if (ds.charAt(4) == '.') {
          myf=localDFISOTZ;
        } else {
          myf=localDFDKTZ;
        }
      } else {
        if (ds.charAt(2) == '.') {
          myf = localDFDE;
        } else {
          myf = localDF;
        }
      }
      return myf.parse(ds);
    }
    catch (ParseException me) {
      System.out.println("Could Not Parse: \"" + ds + "\" as Date ");
      System.out.println(" err: " + me);
      return (new Date(0L));
    }
    catch (IllegalArgumentException me) {
      CAux.perr("Could not parse: " + ds + me,-1);
    } catch (NullPointerException me) {
      CAux.perr("Could Not Parse: " + ds +me,-1);
      me.printStackTrace();
    }
    return null;
  }

  public static String epsversion = "0.8.5";
  //     static Date a1990 = new Date(0L);
  //     static Date a1970 = new Date(0L);
  static long JavaGrmTimeDiff = 631152000000L - 2*43200000L;
  /* - a1970.getTime() + a1990.getTime()*/

  static void fo(String so, DataOutputStream dos, TextArea ta) throws IOException{
    int fi;
    if (ta!=null){
      try {
          ta.append(so);
      } catch (NoSuchMethodError ex) {
          CAux.perr(so,0);
      }
    } else {
      ChartFrame1.fShield.swrite(dos,so);
    }
  }

    static void perr(String theE, int level)  {
        if (level <= tLevel){
            System.out.println(theE);
            //System.out.flush();
        }
    }

    static Date usecs2td (long usecs)    {
        return new Date(usecs + JavaGrmTimeDiff );
    }

/****************************************************************************/
/* Convert dat in seconds since 01/01/90 00:00:00                           */
/****************************************************************************/
    static  long dt2usecs(Date dt, int offset) {
        return  (dt.getTime() - JavaGrmTimeDiff);
    }


  static void drawString(Graphics g, String ss, int x, int y, int d,Color cl) {
    g.setColor(Color.white);
    g.drawString(ss, x-d,y);
    g.drawString(ss, x+d,y);
    g.drawString(ss, x,y+d);
    g.drawString(ss, x,y-d);
    g.setColor(cl);
    g.drawString(ss, x,y);
}


  static String spad(String ss, int len, char pc){
    int miss;
    String rs=ss;

    if (len<0){
      miss = -len - ss.length();
      while (miss-->0) {
        rs = pc + rs;
      }
    } else {
      miss = len - ss.length();
      while (miss>0) {
        rs = rs + pc;
        miss--;
      }
    }
    return(rs);
  }

  static String frds(double x,int dg){
    String rs = ""+frd(x,dg);
    double d1=frd(x,dg);
    int xi;

    rs = ""+((int) d1)+".";
    for (xi=0;xi<dg;xi++){
      d1 = 10d*(d1 - ((int) d1));
      rs = rs+((int) d1);
    }
    if (dg==0)
      {
        rs = rs.substring(0,rs.length()-1);
      }
      return(rs);
  }


  // Bug in java
    static String frds0(double x, int dg){
    String rs = ""+frd(x,dg);

    double d1=frd(x,dg);
    int rsl,xi=0,pad;
    // perr("frds0 rs="+rs,2);
    rsl = rs.length();
    while (xi < rsl &&rs.charAt(xi)!='.'){
      xi ++;
    }
    if (xi>= rsl){
      rs = rs+".";
      pad = dg;
    } else {
      pad = xi+1+dg;
    }
    if (pad < rsl) {
      return(rs.substring(0,pad));
    } else {
      return(spad(rs,pad,'0'));
    }
  }


  static double frd(double x,int dg){
    double md = Math.pow(0.1d,dg);
    double x1 = x+ md/2 ;
    // perr("frd x="+x + " md="+md+ " xmmmd="+(x1 - x1 % md),2);
    return((double)(x1 - x1 % md));
  }

  static String getCol(String sp, int scol, char sep) {
//    System.out.println("scol "+scol+ " sp " + sp );
    int colStart, colEnd;
    int cc=scol;
    int spi=0;
    int spl=sp.length();
    String rs;

    while (cc>0){
      cc--;
      while (spi<spl && sp.charAt(spi) != sep){
        spi++;
      }
      spi++;
      while (sep!=',' && spi<spl && sp.charAt(spi) == sep){
        spi++;
      }
    }
    colStart = spi;

    while (spi < spl && sp.charAt(spi) != sep){
      spi ++;
    }
    colEnd = spi;

    //    System.out.println("s2: cc=" + cc +" cs:" + colStart + " ce:" + colEnd+ " scol="+scol + " sep="+sep+"x");

    if (colStart < spl) {
        rs = sp.substring(colStart,colEnd);
        return(rs);
    } else {
        return(null);
    }
  }

 static void readCharts(URL epsBase, String chartdir, GMenv menv){
    int posFmt=0;
    URL tURL;
    int deg;
    int min;
    int latMin;
    int longMin;
    int dLat;
    int dLong;
    int dpd;
    int cNo=-1;
    int fi=0;
    File chartDir;
    String ChartNames[] = null;
    ParsePosition cpos = new ParsePosition(0);
    CAux.perr("READCHARTS",9);
    try {

      CAux.perr("CD="+chartdir,1);
      if (GMenv.useFShield) {
        chartDir = new File(menv.epsfBase,chartdir);
        CAux.perr("NOW NAMES CDD="+chartDir,1);
        ChartNames = ChartFrame1.fShield.listDir(chartDir);
        //ChartNames = chartDir.list();
      } else {
        try {
          String inputLine;
          int li = 0;
          URL cddURL = new URL(menv.epsBase, chartdir+"/index.html");
          CAux.perr("read chart names from "+cddURL, -1);
          BufferedReader nameStream = new BufferedReader(new InputStreamReader (cddURL.openStream()));
          CAux.perr("NOW NAMES URL CDD="+cddURL, 1);
          while ((inputLine = nameStream.readLine()) != null) {
            li ++;
          }
          nameStream.close();
          ChartNames = new String[li];
          nameStream = new BufferedReader(new InputStreamReader (cddURL.openStream()));
          li = 0;
          while ((inputLine = nameStream.readLine()) != null) {
            CAux.perr("il ="+inputLine, 1);
            ChartNames[li] = inputLine.trim();
            li ++;
          }
          nameStream.close();
        }  catch (MalformedURLException fe) {
          System.out.println(" chart URL: " + fe);
          }   catch (IOException me) {
            System.out.println(" File IOException CD: " + me);
            me.printStackTrace();
          }
      }


      CAux.perr("names="+ChartNames,3);
      if (ChartNames==null) {
        CAux.perr("No charts founds",0);
          return;
      }

      cNo=ChartNames.length;
      CAux.perr("CLIST="+ChartNames,9);
      CAux.perr("NOW loop CL="+ChartNames.length,9);
      while (fi < cNo) {
        if (! (ChartNames[fi].equals("index.html"))) {
          cpos.setIndex(0);
          try {
            perr("c file "+fi+" "+ChartNames[fi],2);
            deg = Pone.dgMDFormat.parse(ChartNames[fi],cpos).intValue();
            min = Pone.MDFormat.parse(ChartNames[fi],cpos).intValue();
            latMin = 60*deg+min;
            if (ChartNames[fi].charAt(cpos.getIndex())=='S') {
              latMin = - latMin;
            }
            cpos.setIndex(cpos.getIndex()+1);
            deg = Pone.dgMDFormat.parse(ChartNames[fi],cpos).intValue();
            min = Pone.MDFormat.parse(ChartNames[fi],cpos).intValue();
            longMin = 60*deg+min;
            if (ChartNames[fi].charAt(cpos.getIndex())=='W') {
              longMin = - longMin;
            }
            cpos.setIndex(cpos.getIndex()+1); //KKKKKK
            if (ChartNames[fi].charAt(cpos.getIndex())=='_') {
              cpos.setIndex(cpos.getIndex()+1); // _
            }
            dLat = dpdFormat.parse(ChartNames[fi],cpos).intValue();
            cpos.setIndex(cpos.getIndex()+1); // _
            if (ChartNames[fi].charAt(cpos.getIndex())=='_') {
              cpos.setIndex(cpos.getIndex()+1); // _
            }
            perr("cread dLong cpos="+cpos.getIndex(),7);
            dLong = dpdFormat.parse(ChartNames[fi],cpos).intValue();
            cpos.setIndex(cpos.getIndex()+1); // Q
            perr("cread dps cpos="+cpos.getIndex(),7);
            dpd = dpdFormat.parse(ChartNames[fi],cpos).intValue();

          perr("cread lat="+latMin+" long="+longMin+ " dlat="+dLat+" dLong="+dLong+" dpd="+dpd+
               " cpos="+cpos.getIndex(),2);

          //      perr("cread dlat="+dLat+" dLong="+dLong+" dpd="+dpd,3);
          Rects.insert(ChartNames[fi],latMin, dLat, longMin, dLong, dpd);
          //System.out.println("Ch se="+ se);
          if (menv.cw<0) {
            perr ("PRB0 cw=" + menv.cw + "ch=" + menv.ch, 1);
            menv.cw = longMin;
            menv.ch = latMin;
            perr ("after PRB0 cw=" + menv.cw + "ch=" + menv.ch, 1);
          }
          menv.cw = BigInteger.valueOf(menv.cw).gcd(BigInteger.valueOf(longMin)).intValue();
          menv.ch = BigInteger.valueOf(menv.ch).gcd(BigInteger.valueOf(latMin)).intValue();
          menv.cw = BigInteger.valueOf(menv.cw).gcd(BigInteger.valueOf(dLong)).intValue();
          menv.ch = BigInteger.valueOf(menv.ch).gcd(BigInteger.valueOf(dLat)).intValue();
          perr("NEW  ch="+menv.ch+" cw="+menv.cw, 1);
        } catch (NullPointerException me) {
          if (ChartNames!= null && ChartNames.length>fi) {
              System.out.println(" Could not parse chart filename: "+ChartNames[fi]);
          }
          System.out.println(" problem: "+ me);
          //me.printStackTrace();
        }
          }
        fi++;
      }
      if (menv.cw<0) {
          perr ("PRB10 cw=" + menv.cw + "ch=" + menv.ch, 0);
          menv.cw = 10;
          menv.ch = 10;
      }
        //perr("cw=" + menv.cw + " ch=" + menv.ch,2);
        if (tLevel>0) {
          perr(Rects.root.dump(),1);
        }
      } catch (SecurityException me) {
        System.out.println(" Cannot read chart dir: " + me);
      }       //System.out.println("Ch rs="+ rs);
    }
}