Distorted Sokoban

package org.distorted.sokoban;

import java.io.IOException;

import java.io.InputStream;

import java.io.BufferedInputStream;

import java.io.UnsupportedEncodingException;

import java.net.HttpURLConnection;

import java.net.URL;

import android.util.Log;

///////////////////////////////////////////////////////////////////

public class SokobanRecords implements Runnable

{

	private static final String TAG_RECORDS = "SokobanRecords";

	public static final int MAX_PLACES = 9;

	public static final int DOWNLOADR  = 0;

	public static final int DOWNLOADL  = 1;

	public static final int SUBMITR    = 2;

	public static final int SUBMITL    = 3;

	public static final int IDLE       = 4;

	private static final int MAX_SUBMIT = 10;

	private static boolean mRunning;

	private static boolean mDirtyRecords;

	private static int mode;

	private static int lv;

	private static int mCols;

	private static final String URL  = "https://distorted.org/sokoban/cgi-bin";

    private static String iso = null;

	private String name,veri;

	private String mLevel;

	private static SokobanLevels mLevels=null;

	private static final String[] hex = {

	  "%00", "%01", "%02", "%03", "%04", "%05", "%06", "%07",

	  "%08", "%09", "%0a", "%0b", "%0c", "%0d", "%0e", "%0f",

	  "%10", "%11", "%12", "%13", "%14", "%15", "%16", "%17",

	  "%18", "%19", "%1a", "%1b", "%1c", "%1d", "%1e", "%1f",

	  "%20", "%21", "%22", "%23", "%24", "%25", "%26", "%27",

	  "%28", "%29", "%2a", "%2b", "%2c", "%2d", "%2e", "%2f",

	  "%30", "%31", "%32", "%33", "%34", "%35", "%36", "%37",

	  "%38", "%39", "%3a", "%3b", "%3c", "%3d", "%3e", "%3f",

	  "%40", "%41", "%42", "%43", "%44", "%45", "%46", "%47",

	  "%48", "%49", "%4a", "%4b", "%4c", "%4d", "%4e", "%4f",

	  "%50", "%51", "%52", "%53", "%54", "%55", "%56", "%57",

	  "%58", "%59", "%5a", "%5b", "%5c", "%5d", "%5e", "%5f",

	  "%60", "%61", "%62", "%63", "%64", "%65", "%66", "%67",

	  "%68", "%69", "%6a", "%6b", "%6c", "%6d", "%6e", "%6f",

	  "%70", "%71", "%72", "%73", "%74", "%75", "%76", "%77",

	  "%78", "%79", "%7a", "%7b", "%7c", "%7d", "%7e", "%7f",

	  "%80", "%81", "%82", "%83", "%84", "%85", "%86", "%87",

	  "%88", "%89", "%8a", "%8b", "%8c", "%8d", "%8e", "%8f",

	  "%90", "%91", "%92", "%93", "%94", "%95", "%96", "%97",

	  "%98", "%99", "%9a", "%9b", "%9c", "%9d", "%9e", "%9f",

	  "%a0", "%a1", "%a2", "%a3", "%a4", "%a5", "%a6", "%a7",

	  "%a8", "%a9", "%aa", "%ab", "%ac", "%ad", "%ae", "%af",

	  "%b0", "%b1", "%b2", "%b3", "%b4", "%b5", "%b6", "%b7",

	  "%b8", "%b9", "%ba", "%bb", "%bc", "%bd", "%be", "%bf",

	  "%c0", "%c1", "%c2", "%c3", "%c4", "%c5", "%c6", "%c7",

	  "%c8", "%c9", "%ca", "%cb", "%cc", "%cd", "%ce", "%cf",

	  "%d0", "%d1", "%d2", "%d3", "%d4", "%d5", "%d6", "%d7",

	  "%d8", "%d9", "%da", "%db", "%dc", "%dd", "%de", "%df",

	  "%e0", "%e1", "%e2", "%e3", "%e4", "%e5", "%e6", "%e7",

	  "%e8", "%e9", "%ea", "%eb", "%ec", "%ed", "%ee", "%ef",

	  "%f0", "%f1", "%f2", "%f3", "%f4", "%f5", "%f6", "%f7",

	  "%f8", "%f9", "%fa", "%fb", "%fc", "%fd", "%fe", "%ff"

	  };

///////////////////////////////////////////////////////////////////

	  public SokobanRecords()

	    {

		mRunning     = false;

		mDirtyRecords= true;

		mode         = IDLE;

	    }

///////////////////////////////////////////////////////////////////

	  public static void setLevels(SokobanLevels sl)

	    {

		mLevels = sl;    

	    }

///////////////////////////////////////////////////////////////////

	  private boolean start()

	    {

	    if( !mRunning )

	      {

	      mRunning = true;

	      Thread networkThrd = new Thread(this);

	      networkThrd.start();

	      return true;

	      }

	    return false;

	    }

///////////////////////////////////////////////////////////////////

	  public void run()

	    {

		try

		  {

		  String message="";

		  SokobanDatabase db = SokobanDatabase.getInstance();

		  int run = db.getNumRunnings();

		  if(mode==SUBMITR)

		    {

		    int hash = computeSubmitHash(name,veri,getSMSC(),lv,run);

            message=URL+"/submitr.cgi";

		    message+=("?l="+generateLevelsList(lv));

		    message+=("&m="+generateMovesList(lv));

		    message+=("&t="+generateTimesList(lv));

		    message+=("&v="+URLencode(veri));

		    message+=("&n="+URLencode(name));

		    message+=("&s="+URLencode(getSMSC()));

		    message+=("&h="+hash);

		    message+=("&r="+run);

		    message+=("&p="+db.getNumPlayings());

		    message+=("&i="+db.getId());

		    message+=("&e="+SokobanCanvas.mVersionStr+"a");

		    }

		  else if(mode==DOWNLOADR)

		    {

		    message=URL+"/downloadr.cgi";

		    message+="?n="+URLencode(veri);

		    message+="&r="+run;

		    message+="&e="+SokobanCanvas.mVersionStr+"a";

		    }

		  else if(mode==SUBMITL )

		    {

		    message=URL+"/submitl.cgi";

		    message+="?n="+URLencode(name);

		    message+="&l="+(SokobanLevels.getIntrinsic()-(SokobanDatabase.BUILTIN_LEVELS-1));

		    message+="&s="+URLencode(getSMSC());

	        message+="&w="+(mLevel.length()/mCols);

		    message+="&c="+mCols;

		    message+="&p="+mLevel;

		    message+="&r="+run;

		    message+="&e="+SokobanCanvas.mVersionStr+"a";

		    }

		  else if(mode==DOWNLOADL)

		    {

		    message=URL+"/downloadl.cgi";

		    message+="?n="+URLencode(name);

		    message+="&l="+(SokobanLevels.getIntrinsic()-(SokobanDatabase.BUILTIN_LEVELS-1));

		    message+="&x="+SokobanLevels.bDrawnX1;   //12 x

		    message+="&y="+SokobanLevels.bDrawnY2;   //18  

		    message+="&r="+run;

		    message+="&e="+SokobanCanvas.mVersionStr+"a";

		    }

		  String data = download(message);

		  if(mode==SUBMITR)

		    {

		    parseResponse(data);

		    fillData(data);

		    }

		  else if(mode==DOWNLOADR)

		    {

		    fillData(data);

		    SokobanCanvas.getMenu().downloadRecordsReady();

		    }

		  else if(mode==SUBMITL)

		    {

		    int numDownloaded = getResponseNum(data);

		    fillLevelsData(data);

		    SokobanCanvas.getMenu().downloadLevelsReady(numDownloaded);

		    SokobanLevels.getInstance().rollbackCreated();

		    }

	      else if(mode==DOWNLOADL)

		    {

		    int numDownloaded = getResponseNum(data);

		    fillLevelsData(data);

		    SokobanCanvas.getMenu().downloadLevelsReady(numDownloaded);

		    }

		  }

		catch( IOException ioe )

		  {

		  if( mode==SUBMITR  ) SokobanCanvas.setState(SokobanCanvas.STATE_FAIL);

		  if( mode==SUBMITL  ) SokobanCanvas.setState(SokobanCanvas.STATE_FAIC);

		  if( mode==DOWNLOADR) SokobanCanvas.setState(SokobanCanvas.STATE_FAID);

		  if( mode==DOWNLOADL) SokobanCanvas.setState(SokobanCanvas.STATE_FAIE);

		  SokobanCanvas.setRepaint();

		  }

		catch( SecurityException ioe )

		  {

		  SokobanCanvas.setState(SokobanCanvas.STATE_SECU);

		  SokobanCanvas.getMenu().comeBackTo( mode==SUBMITR ? SokobanCanvas.STATE_PLAY:SokobanCanvas.STATE_MAIN);

		  SokobanCanvas.setRepaint();

		  }

		mRunning = false;

		mode = IDLE;

	    }

///////////////////////////////////////////////////////////////////

	  private String getSMSC()

	    {

		if( iso==null) iso = SokobanCanvas.getIso();

		return iso;

	    }

///////////////////////////////////////////////////////////////////

	  private int getResponseNum(String data)

        {

        int newline = data.indexOf('\n',1);

        if( newline<0 ) newline = data.length();

        int ret=-1;

        try

          {

          ret= Integer.parseInt(data.substring(0, newline));

          }

        catch(NumberFormatException nfe) 

          {

          Log.e(TAG_RECORDS, "exception trying to parse "+data); 

          }

        return ret;

        }

///////////////////////////////////////////////////////////////////

	  private void parseResponse(String data)

        {

        int responseNum = getResponseNum(data);

        switch(responseNum)

          {

          case  0: SokobanCanvas.setState(SokobanCanvas.STATE_RECO);// success

                   SokobanDatabase db = SokobanDatabase.getInstance();

                   db.setVeri(name);

                   submitLevelsList(lv);

                   break;

          case -2: SokobanMenu.setAction(SokobanMenu.ACTION_SUBR);

                   SokobanCanvas.setState(SokobanCanvas.STATE_EXIS);// name exists

                   break;

          case -3: // wrong hash 

          default: SokobanCanvas.setState(SokobanCanvas.STATE_FAIL);// other error

          }

        SokobanCanvas.setRepaint();

        }

///////////////////////////////////////////////////////////////////

	  private int computeSubmitHash(String n, String v, String s, int lvl, int r)

        {

        byte[] raw;

        int ret=0;

        try                                    { raw = n.getBytes("UTF-8"); }

        catch(UnsupportedEncodingException ex) { raw = n.getBytes(       ); }

        for(int i=0;i<raw.length;i++) ret += i*(raw[i] <0 ? ((int)raw[i]+256):raw[i]);

        try                                    { raw = v.getBytes("UTF-8"); }

        catch(UnsupportedEncodingException ex) { raw = v.getBytes(       ); }

        for(int i=0;i<raw.length;i++) ret += i*(raw[i] <0 ? ((int)raw[i]+256):raw[i]);

        try                                    { raw = s.getBytes("UTF-8"); }

        catch(UnsupportedEncodingException ex) { raw = s.getBytes(       ); }

        for(int i=0;i<raw.length;i++) ret += i*(raw[i] <0 ? ((int)raw[i]+256):raw[i]);

        int num=0, move, time;

        SokobanLevel sl = SokobanLevels.getLevel(lvl);

        if( sl!=null )

          {

          move = sl.getMyMoves();

          time = sl.getMyTime();

          ret += (lvl+1)*time;

          ret += (lvl+2)*move;

          }

        for(int i=0; num<MAX_SUBMIT; i++)

          {

          if( i==lvl ) continue;

          sl = SokobanLevels.getLevel(i);

          if( sl==null ) break;

          if( !sl.isSubmitted() )

            {

            move = sl.getMyMoves();

            time = sl.getMyTime();

            if( move<SokobanDatabase.INVALID )

              {

              ret += (i+1)*time;

              ret += (i+2)*move;

              num++;

              }

            }

          }

        ret += 41*r;

        ret %= 541;

        return ret<0 ? -ret:ret;

        }

///////////////////////////////////////////////////////////////////

	  private void fillLevelsData( String data )

	    {

        int len = data.length();

        int begin=-1 ,end;

        while( begin<len )

          {

          end = data.indexOf('\n', begin+1);

          if( end<0 ) end = len;

          fillLevelsRow(data.substring(begin+1,end));

          begin = end;

          }

        }

///////////////////////////////////////////////////////////////////

	  public void fillLevelsRow(String row)

        {

        int s1 = row.indexOf(' ',   0);

        int s2 = row.indexOf(' ',s1+1);

        int s3 = row.indexOf(' ',s2+1);

        int s4 = row.indexOf(' ',s3+1);

        int s5 = row.indexOf(' ',s4+1);

        int s6 = row.length();

        if( s6>s5 && s5>s4 & s4>s3 && s3>s2 && s2>s1 && s1>0 )

          {

          try

            {

            int level= Integer.parseInt( row.substring(   0,s1) );

            String n = row.substring(s1+1,s2);

            String c = row.substring(s2+1,s3);

       //   int rows = Integer.parseInt( row.substring(s3+1,s4) );

            int cols = Integer.parseInt( row.substring(s4+1,s5) );

            String p = row.substring(s5+1,s6);

            SokobanLevel sl = new SokobanLevel(n,c,SokobanDatabase.INVALID, SokobanDatabase.INVALID,null,false,cols,p);

            mLevels.addLevel(sl, SokobanDatabase.BUILTIN_LEVELS+level-1);

            sl.setDirty();

            }

          catch( Exception ex ) { System.out.println("Exception trying to fillLevelsRow: "+ex.toString()); }

          }

        }

///////////////////////////////////////////////////////////////////

	  private void fillData( String data )

        {

        int len = data.length();

        int begin=-1 ,end;

        while( begin<len )

          {

          end = data.indexOf('\n', begin+1);

          if( end<0 ) end = len;

          fillRow(data.substring(begin+1,end));

          begin = end;

          }

        mDirtyRecords = false;  

        }

///////////////////////////////////////////////////////////////////

	  public void fillRow(String row)

	    {

        int s1 = row.indexOf(' ',   0);

        int s2 = row.indexOf(' ',s1+1);

        int s3 = row.indexOf(' ',s2+1);

        int s4 = row.indexOf(' ',s3+1);

        int s5 = row.indexOf(' ',s4+1);

        int s6 = row.length();

        if( s6>s5 && s5>s4 & s4>s3 && s3>s2 && s2>s1 && s1>0 )

          {

          try

            {

            int l = Integer.parseInt(row.substring(   0,s1));

            int m = Integer.parseInt(row.substring(s1+1,s2));

            int t = Integer.parseInt(row.substring(s2+1,s3));

            int p = Integer.parseInt(row.substring(s3+1,s4));

            String n = row.substring(s4+1,s5);

            String c = row.substring(s5+1,s6);

            mLevels.fillLevelInfo(l,m,t,p,n,c);

            }

          catch( Exception ex ) { Log.e(TAG_RECORDS, "Exception trying to fillRow: "+ex.toString()); }

          }

        }

///////////////////////////////////////////////////////////////////

	  public void downloadLevels()

        {   

        mode = DOWNLOADL;

        SokobanDatabase db = SokobanDatabase.getInstance();

        name = db.getName();

        start();

        }

///////////////////////////////////////////////////////////////////

	  public void downloadRecords()

        {

        if( mDirtyRecords )

          {

          mode = DOWNLOADR;

          SokobanDatabase db = SokobanDatabase.getInstance();

          name = db.getName();

          veri = db.getVeri();

          start();

          }

        }

///////////////////////////////////////////////////////////////////

	  public boolean submitRecord(int lvl)

	    {

	      SokobanDatabase db = SokobanDatabase.getInstance();

        name = db.getName();

        if( name==null || name.length()==0 ) return false;

        veri = db.getVeri();

        mode = SUBMITR;

        lv = lvl;

        start();

        return true;

        }

///////////////////////////////////////////////////////////////////

	  public boolean submitLevel(int cols, String level)

        {

        SokobanDatabase db = SokobanDatabase.getInstance();

        name = db.getName();

        if( name==null || name.length()==0 ) return false;

        veri = db.getVeri();

        mode = SUBMITL;

        mCols = cols;

        mLevel= level;

        start();

        return true;

        }

///////////////////////////////////////////////////////////////////

	  public void abortNetworkTransaction()

	    {

		mRunning = false;

	    }

///////////////////////////////////////////////////////////////////

	  public boolean isDirtyRecords()

        {

        return mDirtyRecords;

        }

///////////////////////////////////////////////////////////////////

	  public void setDirty()

	  {

		  mDirtyRecords=true;

	  }

///////////////////////////////////////////////////////////////////

	  private static String URLencode(String s)

        {

        if( s==null ) return "";

        StringBuilder sbuf = new StringBuilder();

        int len = s.length();

        for (int i = 0; i < len; i++) 

          {

          int ch = s.charAt(i);

               if ('A' <= ch && ch <= 'Z') sbuf.append((char)ch);

          else if ('a' <= ch && ch <= 'z') sbuf.append((char)ch);

          else if ('0' <= ch && ch <= '9') sbuf.append((char)ch);

          else if (ch == ' '             ) sbuf.append('+');

          else if (ch == '-' || ch == '_'

                || ch == '.' || ch == '!'

                || ch == '~' || ch == '*'

                || ch == '\'' || ch == '('

                || ch == ')'             ) sbuf.append((char)ch);

          else if (ch <= 0x007f)           sbuf.append(hex[ch]);

          else if (ch <= 0x07FF) 

            {

            sbuf.append(hex[0xc0 | (ch >> 6)]);

            sbuf.append(hex[0x80 | (ch & 0x3F)]);

            } 

          else 

            {       

            sbuf.append(hex[0xe0 | (ch >> 12)]);

            sbuf.append(hex[0x80 | ((ch >> 6) & 0x3F)]);

            sbuf.append(hex[0x80 | (ch & 0x3F)]);

            }

          }

        return sbuf.toString();

        }

///////////////////////////////////////////////////////////////////

	  private static void submitLevelsList(int lvl)

	    {

        int num=0;

        SokobanLevel sl = SokobanLevels.getLevel(lvl);

        if( sl!=null )

          {

          sl.setSubmitted(true);

          sl.setDirty();

          }

        for(int i=0; num<MAX_SUBMIT; i++)

          {

          if( i==lvl ) continue;

          sl = SokobanLevels.getLevel(i);

          if( sl==null ) break;

          if( !sl.isSubmitted() && sl.getMyMoves()<SokobanDatabase.INVALID )

            {

            sl.setSubmitted(true);

            sl.setDirty();

            num++;

            }

          }

        }

///////////////////////////////////////////////////////////////////

	  private static String generateMovesList(int lvl)

        {

        int move, num=0;

        SokobanLevel sl = SokobanLevels.getLevel(lvl);

        String ret= (sl==null ? "" : sl.getMyMoves()+"");

        for(int i=0; num<MAX_SUBMIT; i++)

          {

          if( i==lvl ) continue;

          sl = SokobanLevels.getLevel(i);

          if( sl==null ) break;

          if( !sl.isSubmitted() )

            {

            move = sl.getMyMoves();

            if( move<SokobanDatabase.INVALID )

              {

              ret += (","+move);

              num++;

              }

            }

          }

        return ret;

        }

///////////////////////////////////////////////////////////////////

	  private static String generateTimesList(int lvl)

        {

        int time, num=0;

        SokobanLevel sl = SokobanLevels.getLevel(lvl);

        String ret= (sl==null ? "" : sl.getMyTime()+"");

        for(int i=0; num<MAX_SUBMIT; i++)

          {

          if( i==lvl ) continue;

          sl = SokobanLevels.getLevel(i);

          if( sl==null ) break;

          if( !sl.isSubmitted() )

            {

            time = sl.getMyTime();

            if( time<SokobanDatabase.INVALID )

              {

              ret += (","+time);

              num++;

              }

            }

          }

        return ret;

        }

///////////////////////////////////////////////////////////////////

	  private static String generateLevelsList(int lvl)

        {

        String ret=lvl+"";

        SokobanLevel sl;

        int num=0;  

        for(int i=0; num<MAX_SUBMIT; i++)

          {

          if( i==lvl ) continue;  

          sl = SokobanLevels.getLevel(i);

          if( sl==null ) break;

          if( !sl.isSubmitted() && sl.getMyMoves()<SokobanDatabase.INVALID )

            {

            ret+=(","+i);

            num++;

            }

          }  

        return ret;

        }

///////////////////////////////////////////////////////////////////

	  private String download(String url) throws IOException, SecurityException

	    {

		URL connectURL = new URL(url);

		HttpURLConnection conn = (HttpURLConnection)connectURL.openConnection(); 

		conn.setDoInput(true); 

		conn.setDoOutput(true); 

		conn.setRequestMethod("GET"); 

        conn.connect();

		conn.getOutputStream().flush();

        InputStream is=null;

	    try 

	      {	 

	      is = new BufferedInputStream(conn.getInputStream());

	      int ch; 

	      StringBuffer sb = new StringBuffer(); 

	      while( ( ch = is.read() ) != -1 ) 

	        { 

	        sb.append( (char)ch ); 

	        } 

	      return sb.toString(); 

	      }

	    catch(Exception e)

	      {

	      Log.e(TAG_RECORDS, "biffed it getting HTTPResponse");

	      }

	    finally 

	      {

	      try 

	        {

	        if (is != null)

	       	  is.close();

	        } 

	      catch (Exception e) {}

	      }

	    return "";

	    }

///////////////////////////////////////////////////////////////////

// end of SokobanRecords

}