src/net/chiark/yarrg/MarketUploader.java

   1 package net.chiark.yarrg;
   2
   3 import java.awt.*;
   4 import java.awt.event.*;
   5
   6 import javax.accessibility.*;
   7 import javax.swing.*;
   8
   9 import com.sun.java.accessibility.util.*;
  10
  11 import java.util.*;
  12 import java.io.*;
  13 import java.util.*;
  14 import java.net.URL;
  15 import org.w3c.dom.*;
  16 import javax.xml.parsers.DocumentBuilderFactory;
  17 import org.xml.sax.InputSource;
  18 import java.util.zip.GZIPOutputStream;
  19 import net.chiark.yarrg.ClientHttpRequest;
  20 import java.util.regex.*;
  21 import java.util.prefs.Preferences;
  22 import java.beans.*;
  23
  24 /**
  25 *       MarketUploader is a class that handles the uploading of market
  26 *       data from Yohoho! Puzzle Pirates via the Java Accessibility
  27 *       API.
  28 *
  29 *       MarketUploader initializes after the main YPP window has
  30 *       initialized. It provides a simple window with a "Capture
  31 *       Market Data" button displayed.  Upon clicking this button, a
  32 *       progress dialog is displayed, and the data is processed and
  33 *       submitted to the YARRG and PCTB servers. If any errors occur,
  34 *       an error dialog is shown, and processing returns, the button
  35 *       becoming re-enabled.
  36 */
  37 public class MarketUploader
  38 implements Runnable, TopLevelWindowListener, GUIInitializedListener {
  39   private JFrame frame = null;
  40   private Window window = null;
  41   private JButton findMarket = null;
  42   private JLabel resultSummary = null;
  43   private JLabel arbitrageResult = null;
  44   private int unknownPCTBcommods = 0;
  45   private long startTime = 0;
  46   private ProgressMonitor progmon = null;
  47
  48   private final static String PCTB_LIVE_HOST_URL = "http://pctb.crabdance.com/";
  49   private final static String PCTB_TEST_HOST_URL = "http://pctb.ilk.org/";
  50   private String PCTB_HOST_URL;
  51
  52   // Yarrg protocol parameters
  53   private final static String YARRG_CLIENTNAME = "jpctb greenend";
  54   private final static String YARRG_CLIENTVERSION =
  55             net.chiark.yarrg.Version.version;
  56   private final static String YARRG_CLIENTFIXES = "bug-094";
  57   private final static String YARRG_LIVE_URL =
  58     "http://upload.yarrg.chiark.net/commod-update-receiver";
  59   private final static String YARRG_TEST_URL =
  60     "http://upload.yarrg.chiark.net/test/commod-update-receiver";
  61   private String YARRG_URL;
  62
  63   private boolean uploadToYarrg;
  64   private boolean uploadToPCTB;
  65   private boolean showArbitrage;
  66
  67   private String islandName = null;
  68   private String oceanName = null;
  69   private java.util.concurrent.CountDownLatch latch = null;
  70
  71   private AccessibleContext sidePanel;
  72   private HashMap<String,Integer> commodMap;
  73   public PrintStream dtxt = null;
  74   private int uploadcounter = 0;
  75
  76   /*
  77    * UTILITY METHODS AND SUBCLASSES
  78    *
  79    * Useable on any thread.
  80    *
  81    */
  82   private int parseQty(String str) {
  83     if (str.equals(">1000")) {
  84       return 1001;
  85     } else {
  86       return Integer.parseInt(str);
  87     }
  88   }
  89
  90   private void debuglog(String s) {
  91     if (dtxt == null) return;
  92     long now = new Date().getTime();
  93     dtxt.println("progress "+(now - startTime)+"ms "
  94                  +Thread.currentThread().getName()+": "+s);
  95   }
  96
  97   private void debug_write_stringdata(String what, String data)
  98   throws FileNotFoundException,IOException {
  99     if (dtxt==null) return;
 100     PrintStream strm = new PrintStream(new File("jarrg-debug-"+what));
 101     strm.print(data);
 102     strm.close();
 103   }
 104
 105   private void debug_write_bytes(String what, byte[] data)
 106   throws FileNotFoundException,IOException {
 107     if (dtxt==null) return;
 108     FileOutputStream strm = new FileOutputStream(new File("jarrg-debug-"+what));
 109     strm.write(data);
 110     strm.close();
 111   }
 112
 113   /**
 114    *    An abstract market offer, entailing a commodity being bought or sold by
 115    *    a shoppe, for a certain price in a certain quantity. Not instantiable.
 116    *
 117    *    @see Buy
 118    *    @see Sell
 119    */
 120   abstract class Offer {
 121     public int commodity, price, quantity, shoppe;
 122     /**
 123      *  Create an offer from <code>record</code>, determining the shoppe Id from
 124      *  <code>stallMap</code> and the commodity Id from <code>commodMap</code>.
 125      *  <code>priceIndex</code> should be the index of the price in the record
 126      *  (the quantity will be <code>priceIndex + 1</code>).
 127      *
 128      *  @param record the record with data to create the offer from
 129      *  @param stallMap a map containing the ids of the various stalls
 130      *  @param commodMap a map containing the ids of the various commodities
 131      *  @param priceIndex the index of the price in the record
 132      */
 133     public Offer(ArrayList<String> record,
 134                  LinkedHashMap<String,Integer> stallMap,
 135                  HashMap<String,Integer> commodMap,
 136                  int priceIndex) {
 137       Integer commodId = commodMap.get(record.get(0));
 138       if(commodId == null) {
 139         throw new IllegalArgumentException();
 140       }
 141       commodity = commodId.intValue();
 142       price = Integer.parseInt(record.get(priceIndex));
 143       String qty = record.get(priceIndex+1);
 144       quantity = parseQty(qty);
 145       shoppe = stallMap.get(record.get(1)).intValue();
 146     }
 147
 148     /**
 149      *  Returns a human-readable version of this offer, useful for debugging
 150      *
 151      *  @return human-readable offer
 152      */
 153     public String toString() {
 154       return "[C:" + commodity + ",$" + price + ",Q:"
 155         + quantity + ",S:" + shoppe + "]";
 156     }
 157   }
 158
 159   /**
 160    *    An offer from a shoppe or stall to buy a certain quantity of a
 161    *    commodity for a certain price. If placed in an ordered Set,
 162    *    sorts by commodity index ascending, then by buy price
 163    *    descending, and finally by stall id ascending.
 164    */
 165   class Buy extends Offer implements Comparable<Buy> {
 166     /**
 167      *  Creates a new <code>Buy</code> offer from the given
 168      *  <code>record</code> using the other parameters to determine
 169      *  stall id and commodity id of the offer.
 170      *
 171      *  @param record the record with data to create the offer from
 172      *  @param stallMap a map containing the ids of the various stalls
 173      *  @param commodMap a map containing the ids of the various commodities
 174      */
 175     public Buy(ArrayList<String> record,
 176                LinkedHashMap<String,Integer> stallMap,
 177                HashMap<String,Integer> commodMap) {
 178       super(record,stallMap,commodMap,2);
 179     }
 180
 181     /**
 182      *  Sorts by commodity index ascending, then price descending,
 183      *  then stall id ascending.
 184      */
 185     public int compareTo(Buy buy) {
 186       // organize by: commodity index, price, stall index
 187       if(commodity == buy.commodity) {
 188         // organize by price, then by stall index
 189         if(price == buy.price) {
 190           // organize by stall index
 191           return shoppe>buy.shoppe ? 1 : -1;
 192         } else if(price > buy.price) {
 193           return -1;
 194         } else {
 195           return 1;
 196         }
 197       } else if(commodity > buy.commodity) {
 198         return 1;
 199       } else {
 200         return -1;
 201       }
 202     }
 203   }
 204
 205   /**
 206    *    An offer from a shoppe or stall to sell a certain quantity of
 207    *    a commodity for a certain price. If placed in an ordered Set,
 208    *    sorts by commodity index ascending, then by sell price
 209    *    ascending, and finally by stall id ascending.
 210    */
 211   class Sell extends Offer implements Comparable<Sell> {
 212     /**
 213      *  Creates a new <code>Sell</code> offer from the given
 214      *  <code>record</code> using the other parameters to determine
 215      *  stall id and commodity id of the offer.
 216      *
 217      *  @param record the record with data to create the offer from
 218      *  @param stallMap a map containing the ids of the various stalls
 219      *  @param commodMap a map containing the ids of the various commodities
 220      */
 221     public Sell(ArrayList<String> record,
 222                 LinkedHashMap<String,Integer> stallMap,
 223                 HashMap<String,Integer> commodMap) {
 224       super(record,stallMap,commodMap,4);
 225     }
 226
 227     /**
 228      *  Sorts by commodity index ascending, then price ascending, then
 229      *  stall id ascending.
 230      */
 231     public int compareTo(Sell sell) {
 232       // organize by: commodity index, price, stall index
 233       if(commodity == sell.commodity) {
 234         // organize by price, then by stall index
 235         if(price == sell.price) {
 236           // organize by stall index
 237           return shoppe>sell.shoppe ? 1 : -1;
 238         } else if(price > sell.price) {
 239           return 1;
 240         } else {
 241           return -1;
 242         }
 243       } else if(commodity > sell.commodity) {
 244         return 1;
 245       } else {
 246         return -1;
 247       }
 248     }
 249   }
 250
 251   private void progressNote(final String s_in) throws Exception {
 252     new UIA() { public void body() {
 253       String arb = null;
 254       arb = arbitrageResult.getText();
 255       String s = s_in;
 256       if (arb != null && arb.length() != 0)
 257         s = "<html>" + arb + "<br>" + s;
 258       progmon.setNote(s);
 259     }}.exec("progressNote "+s_in);
 260   }
 261
 262   /*
 263    * ENTRY POINT AND STARTUP
 264    *
 265    * Main thread and/or event thread
 266    */
 267   /*
 268    *    Entry point.  Read our preferences.
 269    */
 270   public MarketUploader() {
 271     Preferences prefs = Preferences.userNodeForPackage(getClass());
 272
 273     if (prefs.getBoolean("writeDebugFiles", false)) {
 274       try {
 275         dtxt = new PrintStream(new File("jarrg-debug-log.txt"));
 276       } catch (java.io.FileNotFoundException e) {
 277         System.err.println("JARRG: Error opening debug log: "+e);
 278       }
 279     }
 280
 281     if (prefs.getBoolean("useLiveServers", true)) {
 282       YARRG_URL = YARRG_LIVE_URL;
 283       PCTB_HOST_URL = PCTB_LIVE_HOST_URL;
 284     } else {
 285       YARRG_URL = YARRG_TEST_URL;
 286       PCTB_HOST_URL = PCTB_TEST_HOST_URL;
 287     }
 288
 289     uploadToYarrg=prefs.getBoolean("uploadToYarrg", true);
 290     uploadToPCTB=prefs.getBoolean("uploadToPCTB", true);
 291     showArbitrage=prefs.getBoolean("showArbitrage", true);
 292
 293     debuglog("main on dispatch thread: "+EventQueue.isDispatchThread());
 294     EventQueue.invokeLater(this);
 295   }
 296
 297   /*
 298    * We arrange to wait for the GUI to be initialised, then look at
 299    * every top-level window, and if it
 300    */
 301   public void run() {
 302     debuglog("MarketUploader run()...");
 303     if (EventQueueMonitor.isGUIInitialized()) {
 304       debuglog("MarketUploader GUI already ready");
 305       guiInitialized();
 306     } else {
 307       debuglog("MarketUploader waiting for GUI");
 308       EventQueueMonitor.addGUIInitializedListener(this);
 309     }
 310   }
 311
 312   public void guiInitialized() {
 313     Window ws[]= EventQueueMonitor.getTopLevelWindows();
 314     EventQueueMonitor.addTopLevelWindowListener(this);
 315     for (int i=0; i<ws.length; i++) {
 316       debuglog("MarketUploader existing toplevel "+i);
 317       topLevelWindowCreated(ws[i]);
 318     }
 319   }
 320
 321   public void topLevelWindowDestroyed(Window w) {
 322     debuglog("MarketUploader destroyed toplevel");
 323   }
 324
 325   public void topLevelWindowCreated(Window w) {
 326     if (frame!=null)
 327       // already got it
 328       return;
 329     String name = w.getAccessibleContext().getAccessibleName();
 330     debuglog("MarketUploader checking toplevel "+name);
 331     if (!name.equals("Puzzle Pirates"))
 332       return;
 333     debuglog("MarketUploader found toplevel, creating gui");
 334     window = w;
 335     createGUI();
 336     frame.setVisible(true);
 337   }
 338
 339   /**
 340    *    Set up the GUI, with its window and one-button
 341    *    interface. Only initialize if we're running alongside
 342    *    a Window named "Puzzle Pirates" though.
 343    */
 344   private void createGUI() {
 345     on_ui_thread();
 346     frame = new JFrame("Jarrg Uploader");
 347     frame.setDefaultCloseOperation(JFrame.DISPOSE_ON_CLOSE);
 348     GridLayout layout = new GridLayout(2,1);
 349     frame.getContentPane().setLayout(layout);
 350     //frame.setPreferredSize(new Dimension(200, 60));
 351
 352     findMarket = new JButton("Upload Market Data");
 353     findMarket.addActionListener(new ActionListener() {
 354         public void actionPerformed(ActionEvent e) {
 355           on_ui_thread();
 356           uploadcounter++;
 357           findMarket.setEnabled(false);
 358           resultSummary.setText("");
 359           arbitrageResult.setText("");
 360           new Thread("MarketUploader-uploader-"+uploadcounter) {
 361             public void run() {
 362               startTime = new Date().getTime();
 363               unknownPCTBcommods = 0;
 364               try {
 365                 runUpload(uploadcounter);
 366               } catch(Exception e) {
 367                 error(e.toString());
 368                 e.printStackTrace();
 369               }
 370               try {
 371                 new UIX() { public void body() {
 372                   if(sidePanel != null) {
 373                     sidePanel.removePropertyChangeListener(changeListener);
 374                   }
 375                   if (progmon != null) {
 376                     progmon.close();
 377                     progmon = null;
 378                   }
 379                   findMarket.setEnabled(true);
 380                 }}.exec("tidying");
 381               } catch (Exception e) {
 382                 System.err.println("exception tidying on UI thread:");
 383                 e.printStackTrace();
 384               }
 385             }
 386           }.start();
 387         }
 388       });
 389     frame.add(findMarket);
 390
 391     resultSummary = new JLabel("ready");
 392     frame.add(resultSummary);
 393
 394     arbitrageResult = new JLabel("");
 395
 396     if (showArbitrage) {
 397       layout.setRows(layout.getRows() + 1);
 398       frame.add(arbitrageResult);
 399     }
 400
 401     frame.pack();
 402   }
 403
 404   /*
 405    * THREAD HANDLING
 406    *
 407    * Special measures are needed because:
 408    *  - it is not permitted to use any Swing UI classes or objects
 409    *    other than on the Swing event thread
 410    *  - we want to run our upload asynchronously
 411    *  - we want to do some computation asynchronously (eg, the
 412    *    arbitrage and upload data prep)
 413    *
 414    * So what we do is this:
 415    *  1. When the user asks to upload, we spawn a new thread
 416    *     to do the upload ("MarketUploader-uploader-*", see
 417    *     the call to "new Thread" inside createGUI.
 418    *  2. Whenever that thread needs to touch a UI object it
 419    *     uses EventQueue.invokeLater or .invokeAndWait to
 420    *     perform the relevant action.  We wrap these calls up
 421    *     in three utility classes:
 422    *        UIA  - runs code on UI thread, asynchronously
 423    *        UIX  - runs code on UI thread, waits for it to finish
 424    *        UIXR - as UIX but also returns a value
 425    *     These hide the details of the EventQueue class and also do
 426    *     some debugging and argument shuffling; the calling syntax is
 427    *     still painful, unfortunately, and there is a weird constraint
 428    *     on variables used inside the inner body.  For a simple
 429    *     example, see the handling of "summary" and "summary_final"
 430    *     for the call to UIX at the bottom of runUpload.
 431    *  3. Try to put everything back when that thread exits.
 432    *
 433    * Additionally:
 434    *  a. There is another thread spawed early to get a timestamp from
 435    *     YARRG, if we are uploading there.
 436    *  b. Finding the island name can involve callbacks which run in
 437    *     the UI event thread.  Basically we do the work there, and use
 438    *     a CountDownLatch to cause the uploader thread to wait as
 439    *     appropriate.
 440    */
 441
 442   private void on_ui_thread() { assert(EventQueue.isDispatchThread()); }
 443   private void on_our_thread() { assert(!EventQueue.isDispatchThread()); }
 444
 445   private abstract class UIA implements Runnable {
 446     private String what;
 447     public abstract void body();
 448     public void run() {
 449       debuglog("UIA 2 "+what+" begin");
 450       body();
 451       debuglog("UIA 3 "+what+" done");
 452     }
 453     public void exec(String what_in) {
 454       what = what_in;
 455       debuglog("UIA 1 "+what+" request");
 456       EventQueue.invokeLater(this);
 457     }
 458   };
 459   private abstract class UIXR<ReturnType> implements Runnable {
 460     public abstract ReturnType bodyr();
 461     public ReturnType return_value;
 462     private String what;
 463     public void run() {
 464       debuglog("UIX 2 "+what+" begin");
 465       return_value = bodyr();
 466       debuglog("UIX 3 "+what+" done");
 467     }
 468     public ReturnType exec(String what_in) throws Exception {
 469       what = what_in;
 470       if (EventQueue.isDispatchThread()) {
 471         debuglog("UIX 1 "+what+" (event thread) entry");
 472         this.run();
 473         debuglog("UIX 4 "+what+" (event thread) exit");
 474       } else {
 475         debuglog("UIX 1 "+what+" (other thread) entry");
 476         EventQueue.invokeAndWait(this);
 477         debuglog("UIX 4 "+what+" (other thread) exit");
 478       }
 479       return return_value;
 480     }
 481   };
 482   private abstract class UIX extends UIXR<Object> implements Runnable {
 483     public abstract void body();
 484     public Object bodyr() { body(); return null; }
 485   };
 486
 487   /*
 488    * ERROR REPORTING AND GENERAL UTILITIES
 489    *
 490    * Synchronous modal dialogues
 491    * error and error_html may be called from any thread
 492    */
 493
 494   private void error(final String msg) {
 495     try {
 496       new UIX() { public void body() {
 497         resultSummary.setText("failed");
 498         JOptionPane.showMessageDialog(frame,msg,"Error",
 499                                       JOptionPane.ERROR_MESSAGE);
 500       }}.exec("error()");
 501     } catch (Exception e) {
 502       System.err.println("exception reporting to UI thread:");
 503       e.printStackTrace();
 504     }
 505   }
 506
 507   private void error_html(final String msg, String html) {
 508     Pattern body = Pattern.compile("<body>(.*)</body>",
 509                                    Pattern.DOTALL | Pattern.CASE_INSENSITIVE);
 510     Matcher m = body.matcher(html);
 511     if (m.find()) {
 512       html = m.group(1);
 513       Pattern fixup = Pattern.compile("<(\\w+) */>");;
 514       m = fixup.matcher(html);
 515       html = m.replaceAll("<$1>");
 516       m = Pattern.compile("[\\r\\n]+").matcher(html);
 517       html = m.replaceAll(" ");
 518     }
 519     String whole_msg = "<html><h1>Error</h1>"+msg
 520       +"<h1>PCTB Server said:</h1><blockquote>"+html+"</blockquote>";
 521     debuglog("###" + whole_msg + "###");
 522
 523     error(whole_msg);
 524   }
 525
 526   private void setProgress(final int nv) throws Exception {
 527     new UIA() { public void body() {
 528       progmon.setProgress(nv);
 529     }}.exec("setProgress "+nv);
 530   }
 531   private boolean checkCancelled() throws Exception {
 532     return new UIXR<Boolean>() { public Boolean bodyr() {
 533       boolean can = progmon.isCanceled();
 534       if (can) resultSummary.setText("cancelled");
 535       return new Boolean(can);
 536     }}.exec("checkCancelled").booleanValue();
 537   }
 538
 539   /*
 540    * GUI MANIPULATION CALLBACKS
 541    */
 542
 543   private PropertyChangeListener changeListener = new PropertyChangeListener() {
 544     public void propertyChange(PropertyChangeEvent e) {
 545       on_ui_thread();
 546       if(e.getNewValue() != null &&
 547          e.getPropertyName().equals
 548          (AccessibleContext.ACCESSIBLE_CHILD_PROPERTY)) {
 549         Accessible islandInfo =
 550           descendNodes(window,new int[] {0,1,0,0,2,2,0,0,0,0,1,2});;
 551         String text = islandInfo.getAccessibleContext().getAccessibleText()
 552           .getAtIndex(AccessibleText.SENTENCE,0);
 553         int index = text.indexOf(":");
 554         String name = text.substring(0,index);
 555         islandName = name;
 556         // debuglog(islandName);
 557         sidePanel.removePropertyChangeListener(this);
 558         latch.countDown();
 559       }
 560     }
 561   };
 562
 563   private void getIsland() {
 564     on_ui_thread();
 565
 566     // If the league tracker is there, we can skip the faff
 567     // and ask for its tooltip, since we're on a boat
 568
 569     Accessible leagueTrackerContainer =
 570       descendNodes(window,new int[] {0,1,0,0,2,1});
 571     Accessible leagueTrackerItself =
 572       descendByClass(leagueTrackerContainer,
 573                      "com.threerings.yohoho.sea.client.LeagueTracker");
 574     Accessible leagueTracker = descend(leagueTrackerItself, 1);
 575     try {
 576       islandName = ((JLabel)leagueTracker).getToolTipText();
 577       latch = null;
 578     } catch (NullPointerException e) {
 579       // evidently we're actually on an island
 580
 581       islandName = null;
 582       AccessibleContext chatArea =
 583         descendNodes(window,new int[] {0,1,0,0,0,2,0,0,2})
 584         .getAccessibleContext();
 585       // attach the property change listener to the outer sunshine
 586       // panel if the "ahoy" tab is not active, otherwise attach it to
 587       // the scroll panel in the "ahoy" tab.
 588       if(!"com.threerings.piracy.client.AttentionListPanel".
 589          equals(descendNodes(window,new int[] {0,1,0,0,2,2,0})
 590                 .getClass().getCanonicalName())) {
 591         sidePanel = descendNodes(window,new int[] {0,1,0,0,2,2})
 592           .getAccessibleContext();
 593       } else {
 594         sidePanel = descendNodes(window,new int[] {0,1,0,0,2,2,0,0,0})
 595           .getAccessibleContext();
 596       }
 597       sidePanel.addPropertyChangeListener(changeListener);
 598       latch = new java.util.concurrent.CountDownLatch(1);
 599       // make the Players Online ("/who") panel appear
 600       AccessibleEditableText chat = chatArea.getAccessibleEditableText();
 601       chat.setTextContents("/w");
 602       int c = chatArea.getAccessibleAction().getAccessibleActionCount();
 603       for(int i=0;i<c;i++) {
 604         if("notify-field-accept".equals(chatArea.getAccessibleAction()
 605                                         .getAccessibleActionDescription(i))) {
 606           chatArea.getAccessibleAction().doAccessibleAction(i);
 607         }
 608       }
 609     }
 610   }
 611
 612   /**
 613    *      Find the ocean name from the window title, and set global
 614    *      oceanName variable
 615    */
 616   private void getOcean() {
 617     on_ui_thread();
 618     oceanName = null;
 619     AccessibleContext topwindow = window.getAccessibleContext();
 620     oceanName = topwindow.getAccessibleName()
 621       .replaceAll(".*on the (\\w+) ocean", "$1");
 622   }
 623
 624
 625   /**
 626    *    Run the data collection process, and upload the results. This
 627    *    is the method that calls most of the other worker methods for
 628    *    the process. If an error occurs, the method will call the
 629    *    error method and return early, freeing up the button to be
 630    *    clicked again.
 631    *
 632    *    @exception Exception if an error we didn't expect occured
 633    */
 634   private class YarrgTimestampFetcher extends Thread {
 635     public YarrgTimestampFetcher(int counter) {
 636       super("MarketUploader-YarrgTimestampFetcher-"+uploadcounter);
 637     }
 638     public String ts = null;
 639     public void run() {
 640       try {
 641         ts = getYarrgTimestamp();
 642         debuglog("(async) yarrg timestamp ready.");
 643       } catch(Exception e) {
 644         error("Error getting YARRG timestamp: "+e);
 645       }
 646     }
 647   };
 648
 649   private void runUpload(int counter) throws Exception {
 650     on_our_thread();
 651
 652     boolean doneyarrg = false, donepctb = false;
 653     YarrgTimestampFetcher yarrgts_thread = null;
 654
 655     debuglog("starting");
 656
 657     if (uploadToYarrg) {
 658       debuglog("(async) yarrg timestamp...");
 659       yarrgts_thread = new YarrgTimestampFetcher(counter);
 660       yarrgts_thread.start();
 661     }
 662
 663     final AccessibleTable accesstable =
 664     new UIXR<AccessibleTable>() { public AccessibleTable bodyr() {
 665       progmon = new ProgressMonitor
 666         (frame,"Processing Market Data","Getting table data",0,100);
 667       progmon.setMillisToDecideToPopup(0);
 668       progmon.setMillisToPopup(0);
 669
 670       AccessibleTable at = findMarketTable();
 671       if(at == null) {
 672         error("Market table not found!"+
 673               " Please open the Buy/Sell Commodities interface.");
 674         return null;
 675       }
 676       if(at.getAccessibleRowCount() == 0) {
 677         error("No data found, please wait for the table to have data first!");
 678         return null;
 679       }
 680       if(!isDisplayAll()) {
 681         error("Please select \"All\" from the Display: popup menu.");
 682         return null;
 683       }
 684
 685       debuglog("(async) getisland...");
 686       getIsland();
 687       debuglog("getocean...");
 688       getOcean();
 689       debuglog("getocean done");
 690
 691       return at;
 692     }}.exec("accesstable");
 693     if (accesstable == null) return;
 694
 695     if (latch != null) {
 696       latch.await(2, java.util.concurrent.TimeUnit.SECONDS);
 697     }
 698     debuglog("(async) getisland done");
 699
 700     String yarrgts = null;
 701     if (yarrgts_thread != null) {
 702       debuglog("(async) yarrg timestamp join...");
 703       yarrgts_thread.join();
 704       debuglog("(async) yarrg timestamp joined.");
 705       yarrgts = yarrgts_thread.ts;
 706     }
 707
 708     if (islandName == null) {
 709       error("Could not find island name in YPP user interface.");
 710       return;
 711     }
 712
 713     debuglog("table check...");
 714
 715     final ArrayList<ArrayList<String>> data =
 716     new UIXR<ArrayList<ArrayList<String>>>
 717           () { public ArrayList<ArrayList<String>> bodyr() {
 718       String headings_expected[] = new String[]
 719         { "Commodity", "Trading outlet", "Buy price",
 720           "Will buy", "Sell price", "Will sell" };
 721
 722       ArrayList<ArrayList<String>> headers =
 723         getData(accesstable.getAccessibleColumnHeader());
 724       if (headers.size() != 1) {
 725         error("Table headings not one row! " + headers.toString());
 726         return null;
 727       }
 728       if (headers.get(0).size() < 6 ||
 729           headers.get(0).size() > 7) {
 730         error("Table headings not six or seven columns! " + headers.toString());
 731         return null;
 732       }
 733       for (int col=0; col<headings_expected.length; col++) {
 734         String expd = headings_expected[col];
 735         String got = headers.get(0).get(col);
 736         if (expd.compareTo(got) != 0) {
 737           error("Table heading for column "+col
 738                 +" is not \""+expd+"\" but \""+got+"\".\n\n"
 739                 +"Please do not reorder the table when using this tool.");
 740           return null;
 741         }
 742       }
 743
 744       debuglog("table read...");
 745
 746       return getData(accesstable);
 747     }}.exec("data");
 748     if (data == null) return;
 749
 750     if (showArbitrage) {
 751       debuglog("arbitrage...");
 752       calculateArbitrage(data);
 753       debuglog("arbitrage done.");
 754     }
 755
 756     if (uploadToYarrg && yarrgts != null) {
 757       debuglog("yarrg prepare...");
 758       progressNote("Yarrg: Preparing data");
 759       setProgress(10);
 760
 761       StringBuilder yarrgsb = new StringBuilder();
 762       String yarrgdata; // string containing what we'll feed to yarrg
 763
 764       for (ArrayList<String> row : data) {
 765         if (row.size() > 6) {
 766           row.remove(6);
 767         }
 768         for (String rowitem : row) {
 769           yarrgsb.append(rowitem != null ? rowitem : "");
 770           yarrgsb.append("\t");
 771         }
 772         yarrgsb.setLength(yarrgsb.length()-1); // chop
 773         yarrgsb.append("\n");
 774       }
 775
 776       yarrgdata = yarrgsb.toString();
 777
 778       progressNote("Yarrg: Uploading");
 779       debuglog("yarrg upload...");
 780
 781       doneyarrg = runYarrg(yarrgts, oceanName, islandName, yarrgdata);
 782       debuglog("yarrg done.");
 783     }
 784
 785     if (uploadToPCTB) {
 786       debuglog("pctb prepare...");
 787       progressNote("PCTB: Getting stall names");
 788       setProgress(20);
 789       if(checkCancelled()) {
 790         return;
 791       }
 792       TreeSet<Offer> buys = new TreeSet<Offer>();
 793       TreeSet<Offer> sells = new TreeSet<Offer>();
 794       LinkedHashMap<String,Integer> stallMap = getStallMap(data);
 795       setProgress(40);
 796       progressNote("PCTB: Sorting offers");
 797       if(checkCancelled()) {
 798         return;
 799       }
 800       // get commod map
 801
 802       debuglog("pctb commodmap...");
 803       HashMap<String,Integer> commodMap = getCommodMap();
 804       if(commodMap == null) {
 805         return;
 806       }
 807       debuglog("pctb commodmap done.");
 808       int[] offerCount = getBuySellMaps(data,buys,sells,stallMap,commodMap);
 809       // debuglog(sells);
 810       // debuglog("\n\n\n"+buys);
 811
 812       ByteArrayOutputStream outStream = new ByteArrayOutputStream();
 813       setProgress(60);
 814       progressNote("PCTB: Sending data");
 815       if(checkCancelled()) {
 816         return;
 817       }
 818       GZIPOutputStream out = new GZIPOutputStream(outStream);
 819       DataOutputStream dos = new DataOutputStream(out);
 820       dos.writeBytes("005y\n");
 821       dos.writeBytes(stallMap.size()+"\n");
 822       dos.writeBytes(getAbbrevStallList(stallMap));
 823       writeBuySellOffers(buys,sells,offerCount,out);
 824       out.finish();
 825       debuglog("pctb send...");
 826
 827       byte[] ba = outStream.toByteArray();
 828       debug_write_bytes("pctb-marketdata.gz", ba);
 829
 830       InputStream in = sendInitialData(new ByteArrayInputStream(ba));
 831       debuglog("pctb sent.");
 832       if (in == null) return;
 833       setProgress(80);
 834       if(checkCancelled()) {
 835         return;
 836       }
 837       progressNote("PCTB: Waiting ...");
 838       debuglog("pctb finish...");
 839       donepctb = finishUpload(in);
 840       debuglog("pctb done.");
 841     }
 842     setProgress(99);
 843
 844     String summary;
 845     if ((uploadToPCTB && !donepctb) ||
 846         (uploadToYarrg && !doneyarrg)) {
 847       summary= "trouble";
 848     } else if (unknownPCTBcommods != 0) {
 849       summary= "PCTB lacks "+unknownPCTBcommods+" commod(s)";
 850     } else if (donepctb || doneyarrg) {
 851       summary= "Done " + islandName;
 852     } else {
 853       summary= "uploaded nowhere!";
 854     }
 855     final String summary_final = summary;
 856     new UIX() { public void body() {
 857       resultSummary.setText(summary_final);
 858     }}.exec("resultSummary.setText");
 859
 860     debuglog("done.");
 861   }
 862
 863   /**
 864    *    Get the offer data out of the table and cache it in an
 865    *    <code>ArrayList</code>.
 866    *
 867    *    @param table the <code>AccessibleTable</code> containing the market data
 868    *    @return an array of record arrays, each representing a row of the table
 869    */
 870   private ArrayList<ArrayList<String>> getData(AccessibleTable table) {
 871     on_ui_thread();
 872     ArrayList<ArrayList<String>> data = new ArrayList<ArrayList<String>>();
 873     for (int i = 0; i < table.getAccessibleRowCount(); i++) {
 874       ArrayList<String> row = new ArrayList<String>();
 875       for (int j = 0; j < table.getAccessibleColumnCount(); j++) {
 876         row.add(table.getAccessibleAt(i, j)
 877                 .getAccessibleContext().getAccessibleName());
 878       }
 879       data.add(row);
 880     }
 881     return data;
 882   }
 883
 884   /**
 885    *    @return the table containing market data if it exists,
 886    *    otherwise <code>null</code>
 887    */
 888   public AccessibleTable findMarketTable() {
 889     on_ui_thread();
 890     Accessible node1 = window;
 891     Accessible node = descendNodes(node1,new int[] {0,1,0,0,0,0,1,0,0,1,0,0});
 892       // commod market
 893     // commod market: {0,1,0,0,0,0,1,0,0,1,0}  {0,1,0,0,0,0,1,0,1,0,0,1,0,0})
 894     // debuglog(node);
 895     if (!(node instanceof JTable)) {
 896       node = descendNodes(node1,new int[] {0,1,0,0,0,0,1,0,1,0,0,1,0,0});
 897         // commod market
 898     }
 899     if (!(node instanceof JTable)) return null;
 900     AccessibleTable table = node.getAccessibleContext().getAccessibleTable();
 901     // debuglog(table);
 902     return table;
 903   }
 904
 905   /**
 906    *    Utility method to descend through several levels of Accessible children
 907    *    at once.
 908    *
 909    *    @param parent the node on which to start the descent
 910    *    @param path an array of ints, each int being the index of the next
 911    *    accessible child to descend.
 912    *    @return the <code>Accessible</code> reached by following the
 913    *    descent path, or <code>null</code> if the desired path was
 914    *    invalid.
 915    */
 916   private Accessible descendNodes(Accessible parent, int[] path) {
 917     on_ui_thread();
 918     for(int i=0;i<path.length;i++) {
 919       if (null == (parent = descend(parent, path[i]))) return null;
 920     }
 921     return parent;
 922   }
 923
 924   /**
 925    *    Descends one level to the specified child of the parent
 926    *    <code>Accessible</code> "node".
 927    *
 928    *    @param parent the node with children
 929    *    @param childNum the index of the child of <code>parent</code> to return
 930    *    @return the <code>childNum</code> child of <code>parent</code>
 931    *    or <code>null</code> if the child is not found.
 932    */
 933   private Accessible descend(Accessible parent, int childNum) {
 934     on_ui_thread();
 935     if (parent == null) return null;
 936     int children = parent.getAccessibleContext().getAccessibleChildrenCount();
 937     if (childNum >= children) {
 938       debuglog("DESCEND "+childNum+" > "+children+" NOT FOUND");
 939       return null;
 940     }
 941     Accessible child = parent.getAccessibleContext()
 942       .getAccessibleChild(childNum);
 943     debuglog("DESCEND "+childNum+" "+child.getClass().getName()+" OK");
 944     return child;
 945   }
 946
 947   /**
 948    *    Descends one level to the child which has the specified class.
 949    *
 950    *    @param parent the node with children
 951    *    @param classname the name of the class, as a string
 952    *    @return the child or <code>null</code> if the child is not found.
 953    */
 954   private Accessible descendByClass(Accessible parent, String classname) {
 955     on_ui_thread();
 956     if (parent == null) return null;
 957     AccessibleContext ac = parent.getAccessibleContext();
 958     int children = ac.getAccessibleChildrenCount();
 959     for (int i=0; i<children; i++) {
 960       Accessible child = ac.getAccessibleChild(i);
 961       if (child.getClass().getName() == classname) {
 962         debuglog("DESCEND CLASS "+classname+" OK");
 963         return child;
 964       }
 965     }
 966     debuglog("DESCEND CLASS "+classname+" NOT FOUND");
 967     return null;
 968   }
 969
 970   public static void main(String[] args) {
 971     new MarketUploader();
 972   }
 973
 974   /**
 975    *    Returns true if the "Display:" menu on the commodities
 976    *    interface in YPP is set to "All"
 977    *
 978    *    @return <code>true</code> if all commodities are displayed,
 979    *    otherwise <code>false</code>
 980    */
 981   private boolean isDisplayAll() {
 982     on_ui_thread();
 983     Accessible button = descendNodes(window,new int[] {0,1,0,0,0,0,1,0,0,0,1});
 984     if(!(button instanceof JButton)) {
 985       button = descendNodes(window,new int[] {0,1,0,0,0,0,1,0,1,0,0,0,1});
 986     }
 987     String display = button.getAccessibleContext().getAccessibleName();
 988     if(!display.equals("All")) {
 989       return false;
 990     }
 991     return true;
 992   }
 993
 994   /**
 995    *    Gets the list of commodities and their associated commodity ids.
 996    *
 997    *    @return a map where the key is the commodity and the value is
 998    *    the commodity id.
 999    */
1000   private HashMap<String,Integer> getCommodMap() {
1001     on_our_thread();
1002     if(commodMap != null) {
1003       return commodMap;
1004     }
1005     HashMap<String,Integer> map = new HashMap<String,Integer>();
1006     String xml;
1007     try {
1008       URL host = new URL(PCTB_HOST_URL + "commodmap.php");
1009       BufferedReader br =
1010         new BufferedReader(new InputStreamReader(host.openStream()));
1011       StringBuilder sb = new StringBuilder();
1012       String str;
1013       while((str = br.readLine()) != null) {
1014         sb.append(str);
1015       }
1016       if (dtxt != null)
1017         debug_write_stringdata("pctb-commodmap.xmlish", sb.toString());
1018       int first = sb.indexOf("<pre>") + 5;
1019       int last = sb.indexOf("</body>");
1020       xml = sb.substring(first,last);
1021       Reader reader = new CharArrayReader(xml.toCharArray());
1022       Document d = DocumentBuilderFactory.newInstance()
1023         .newDocumentBuilder().parse(new InputSource(reader));
1024       NodeList maps = d.getElementsByTagName("CommodMap");
1025       for(int i=0;i<maps.getLength();i++) {
1026         NodeList content = maps.item(i).getChildNodes();
1027         Integer num = Integer.parseInt(content.item(1).getTextContent());
1028         map.put(content.item(0).getTextContent(),num);
1029       }
1030     } catch(Exception e) {
1031       e.printStackTrace();
1032       error("Unable to load Commodity list from server!");
1033       return null;
1034     }
1035     commodMap = map;
1036     return map;
1037   }
1038
1039   /**
1040    *    Given the list of offers, this method will find all the unique
1041    *    stall names and return them in a <code>LinkedHashMap</code>
1042    *    where the key is the stall name and the value is the generated
1043    *    stall id (position in the list).  <p> The reason this method
1044    *    returns a LinkedHashMap instead of a simple HashMap is the
1045    *    need for iterating over the stall names in insertion order for
1046    *    output to the server.
1047    *
1048    *    @param offers the list of records from the commodity buy/sell interface
1049    *    @return an iterable ordered map of the stall names and
1050    *    generated stall ids
1051    */
1052   private LinkedHashMap<String,Integer> getStallMap
1053     (ArrayList<ArrayList<String>> offers) {
1054     int count = 0;
1055     LinkedHashMap<String,Integer> map = new LinkedHashMap<String,Integer>();
1056     for(ArrayList<String> offer : offers) {
1057       String shop = offer.get(1);
1058       if(!map.containsKey(shop)) {
1059         count++;
1060         map.put(shop,count);
1061       }
1062     }
1063     return map;
1064   }
1065
1066   /**
1067    *    Gets a sorted list of Buys and Sells from the list of
1068    *    records. <code>buys</code> and <code>sells</code> should be
1069    *    pre-initialized and passed into the method to receive the
1070    *    data.  Returns a 2-length int array with the number of buys
1071    *    and sells found.
1072    *
1073    *    @param offers the data found from the market table in-game
1074    *    @param buys an empty initialized <code>TreeSet&lt;Offer&gt;</code> to
1075    *    hold the Buy offers.
1076    *    @param sells an empty initialized <code>TreeSet&lt;Offer&gt;</code> to
1077    *    hold the Sell offers.
1078    *    @param stalls the map of stalls to their ids
1079    *    @param commodMap the map of commodities to their ids
1080    *    @return a 2-length int[] array containing the number of buys
1081    *    and sells, respectively
1082    */
1083   private int[] getBuySellMaps(ArrayList<ArrayList<String>> offers,
1084                                TreeSet<Offer> buys,
1085                                TreeSet<Offer> sells,
1086                                LinkedHashMap<String,Integer> stalls,
1087                                HashMap<String,Integer> commodMap) {
1088     int[] buySellCount = new int[2];
1089     for(ArrayList<String> offer : offers) {
1090       try {
1091         if(offer.get(2) != null) {
1092           buys.add(new Buy(offer,stalls,commodMap));
1093           buySellCount[0]++;
1094         }
1095         if(offer.get(4) != null) {
1096           sells.add(new Sell(offer,stalls,commodMap));
1097           buySellCount[1]++;
1098         }
1099       } catch(IllegalArgumentException e) {
1100         unknownPCTBcommods++;
1101         debuglog("Error: Unsupported Commodity \"" + offer.get(0) + "\"");
1102       }
1103     }
1104     if (buySellCount[0]==0 && buySellCount[1]==0) {
1105       error("No (valid) offers for PCTB?!");
1106       throw new IllegalArgumentException();
1107     }
1108     return buySellCount;
1109   }
1110
1111   /**
1112    *    Prepares the list of stalls for writing to the output stream.
1113    *    The <code>String</code> returned by this method is ready to be
1114    *    written directly to the stream.  <p> All shoppe names are left
1115    *    as they are. Stall names are abbreviated just before the
1116    *    apostrophe in the possessive, with an "^" and a letter
1117    *    matching the stall's type appended. Example: "Burninator's
1118    *    Ironworking Stall" would become "Burninator^I".
1119    *
1120    *    @param stallMap the map of stalls and stall ids in an iterable order
1121    *    @return a <code>String</code> containing the list of stalls in
1122    *    format ready to be written to the output stream.
1123    */
1124   private String getAbbrevStallList(LinkedHashMap<String,Integer> stallMap) {
1125     // set up some mapping
1126     HashMap<String,String> types = new HashMap<String,String>();
1127     types.put("Apothecary Stall", "A");
1128     types.put("Distilling Stall", "D");
1129     types.put("Furnishing Stall", "F");
1130     types.put("Ironworking Stall", "I");
1131     types.put("Shipbuilding Stall", "S");
1132     types.put("Tailoring Stall", "T");
1133     types.put("Weaving Stall", "W");
1134
1135     StringBuilder sb = new StringBuilder();
1136     for(String name : stallMap.keySet()) {
1137       int index = name.indexOf("'s");
1138       String finalName = name;
1139       String type = null;
1140       if (index > 0) {
1141         finalName = name.substring(0,index);
1142         if(index + 2 < name.length()) {
1143           String end = name.substring(index+2,name.length()).trim();
1144           type = types.get(end);
1145         }
1146       }
1147       if(type==null) {
1148         sb.append(name+"\n");
1149       } else {
1150         sb.append(finalName+"^"+type+"\n");
1151       }
1152     }
1153     return sb.toString();
1154   }
1155
1156   /**
1157    *    Writes a list of offers in correct format to the output stream.
1158    *    <p>
1159    *    The format is thus: (all numbers are 2-byte integers in
1160    *    little-endian format) (number of offers of this type, aka
1161    *    buy/sell) (commodity ID) (number of offers for this commodity)
1162    *    [shopID price qty][shopID price qty]...
1163    *
1164    *    @param out the output stream to write the data to
1165    *    @param offers the offers to write
1166    */
1167   private void writeOffers(OutputStream out, TreeSet<Offer> offers)
1168   throws IOException {
1169     ByteArrayOutputStream buffer = new ByteArrayOutputStream();
1170     if(offers.size() == 0) {
1171       // nothing to write, and "0" has already been written
1172       return;
1173     }
1174     int commodity = offers.first().commodity;
1175     int count = 0;
1176     for(Offer offer : offers) {
1177       if(commodity != offer.commodity) {
1178         // write out buffer
1179         writeBufferedOffers(out,buffer.toByteArray(),commodity,count);
1180         buffer.reset();
1181         commodity = offer.commodity;
1182         count = 0;
1183       }
1184       writeLEShort(offer.shoppe,buffer); // stall index
1185       writeLEShort(offer.price,buffer); // buy price
1186       writeLEShort(offer.quantity,buffer); // buy qty
1187       count++;
1188     }
1189     writeBufferedOffers(out,buffer.toByteArray(),commodity,count);
1190   }
1191
1192   /**
1193    *    Writes the buffered data to the output strea for one commodity.
1194    *
1195    *    @param out the stream to write to
1196    *    @param buffer the buffered data to write
1197    *    @param commodity the commmodity id to write before the buffered data
1198    *    @param count the number of offers for this commodity to write
1199    *    before the data
1200    */
1201   private void writeBufferedOffers(OutputStream out, byte[] buffer,
1202                                    int commodity, int count)
1203   throws IOException {
1204     writeLEShort(commodity,out); // commod index
1205     writeLEShort(count,out); // offer count
1206     out.write(buffer); // the buffered offers
1207   }
1208
1209   /**
1210    *    Writes the buy and sell offers to the outputstream by calling
1211    *    other methods.
1212    *
1213    *    @param buys list of Buy offers to write
1214    *    @param sells list of Sell offers to write
1215    *    @param offerCount 2-length int array containing the number of
1216    *    buys and sells to write out
1217    *    @param out the stream to write to
1218    */
1219   private void writeBuySellOffers(TreeSet<Offer> buys,
1220                                   TreeSet<Offer> sells,
1221                                   int[] offerCount, OutputStream out)
1222   throws IOException {
1223     // # buy offers
1224     writeLEShort(offerCount[0],out);
1225     writeOffers(out,buys);
1226     // # sell offers
1227     writeLEShort(offerCount[1],out);
1228     writeOffers(out,sells);
1229   }
1230
1231   private String readstreamstring(InputStream in) throws IOException {
1232     StringBuilder sb = new StringBuilder();
1233     BufferedReader br = new BufferedReader(new InputStreamReader(in));
1234     String str;
1235     while((str = br.readLine()) != null) {
1236       sb.append(str+"\n");
1237     }
1238     return sb.toString();
1239   }
1240
1241   /**
1242    *    Sends the data to the server via multipart-formdata POST,
1243    *    with the gzipped data as a file upload.
1244    *
1245    *    @param file an InputStream open to the gzipped data we want to send
1246    */
1247   private InputStream sendInitialData(InputStream file) throws IOException {
1248     on_our_thread();
1249     ClientHttpRequest http =
1250       new ClientHttpRequest(PCTB_HOST_URL + "upload.php");
1251     http.setParameter("marketdata","marketdata.gz",file,"application/gzip");
1252     if (!http.post()) {
1253       String err = readstreamstring(http.resultstream());
1254       error("Error sending initial data:\n"+err);
1255       return null;
1256     }
1257     return http.resultstream();
1258   }
1259
1260   /**
1261    *    Utility method to write a 2-byte int in little-endian form to
1262    *    an output stream.
1263    *
1264    *    @param num an integer to write
1265    *    @param out stream to write to
1266    */
1267   private void writeLEShort(int num, OutputStream out) throws IOException {
1268     out.write(num & 0xFF);
1269     out.write((num >>> 8) & 0xFF);
1270   }
1271
1272   /**
1273    *    Reads the response from the server, and selects the correct parameters
1274    *    which are sent in a GET request to the server asking it to confirm
1275    *    the upload and accept the data into the database. Notably, the island id
1276    *    and ocean id are determined, while other parameter such as the filename
1277    *    are determined from the hidden form fields.
1278    *
1279    *    @param in stream of data from the server to read
1280    */
1281   private boolean finishUpload(InputStream in) throws IOException {
1282     on_our_thread();
1283
1284     String html = readstreamstring(in);
1285     debug_write_stringdata("pctb-initial.html", html);
1286     Matcher m;
1287
1288     Pattern params = Pattern.compile
1289       ("(?s)<input type=\"hidden\" name=\"action\" value=\"setisland\" />"+
1290        ".+?<input type=\"hidden\" name=\"forcereload\" value=\"([^\"]+)\" />"+
1291        ".+?<input type=\"hidden\" name=\"filename\" value=\"([^\"]+)\" />");
1292     m = params.matcher(html);
1293     if(!m.find()) {
1294       error_html("The PCTB server returned unusual data."+
1295                  " Maybe you're using an old version of the uploader?",
1296                  html);
1297       return false;
1298     }
1299     String forceReload = m.group(1);
1300     String filename = m.group(2);
1301
1302     Pattern oceanNumPat =
1303       Pattern.compile("<option value=\"(\\d+)\">"+oceanName+"</option>");
1304     m = oceanNumPat.matcher(html);
1305     if (!m.find()) {
1306       error_html("Unable to find the ocean in the server's list of oceans!",
1307                  html);
1308       return false;
1309     }
1310     String oceanNum = m.group(1);
1311
1312     Pattern oceanIslandNum =
1313       Pattern.compile("islands\\[" + oceanNum
1314                       + "\\]\\[\\d+\\]=new Option\\(\"" + islandName
1315                       + "\",(\\d+)");
1316     m = oceanIslandNum.matcher(html);
1317     if(!m.find()) {
1318       error_html("This does not seem to be a valid island! Unable to upload.",
1319                  html);
1320       return false;
1321     }
1322     String islandNum = m.group(1);
1323
1324     URL get = new URL(PCTB_HOST_URL +
1325                       "upload.php?action=setisland&ocean=" + oceanNum
1326                       + "&island=" + islandNum
1327                       + "&forcereload=" + forceReload
1328                       + "&filename=" + filename);
1329     String complete = readstreamstring(get.openStream());
1330     debug_write_stringdata("pctb-final.html", complete);
1331     Pattern done = Pattern.compile
1332       ("Your data has been integrated into the database. Thank you!");
1333     m = done.matcher(complete);
1334     if(m.find()) {
1335       return true;
1336     } else {
1337       error_html("Something was wrong with the final upload parameters!",
1338                  complete);
1339       return false;
1340     }
1341   }
1342
1343   private InputStream post_for_yarrg(ClientHttpRequest http)
1344   throws IOException {
1345     on_our_thread();
1346     if (!http.post()) {
1347       String err = readstreamstring(http.resultstream());
1348       error("<html><h1>Error reported by YARRG server</h1>\n" + err);
1349       return null;
1350     }
1351     return http.resultstream();
1352   }
1353
1354   private String getYarrgTimestamp() throws IOException {
1355     ClientHttpRequest http = new ClientHttpRequest (YARRG_URL);
1356     http.setParameter("clientname", YARRG_CLIENTNAME);
1357     http.setParameter("clientversion", YARRG_CLIENTVERSION);
1358     http.setParameter("clientfixes", YARRG_CLIENTFIXES);
1359     http.setParameter("requesttimestamp", "y");
1360     InputStream in = post_for_yarrg(http);
1361     if (in == null) return null;
1362     BufferedReader br = new BufferedReader(new InputStreamReader(in));
1363     String tsresult = br.readLine();
1364     return tsresult.substring(3, tsresult.length()-1);
1365   }
1366
1367   private boolean runYarrg(String timestamp, String ocean, String island,
1368                            String yarrgdata) throws IOException {
1369     ByteArrayOutputStream bos = new ByteArrayOutputStream();
1370     BufferedOutputStream bufos =
1371       new BufferedOutputStream(new GZIPOutputStream(bos));
1372     bufos.write(yarrgdata.getBytes() );
1373     bufos.close();
1374     byte[] compressed = bos.toByteArray();
1375     debug_write_bytes("yarrg-deduped.tsv.gz", compressed);
1376     ByteArrayInputStream file = new ByteArrayInputStream(compressed);
1377
1378     ClientHttpRequest http = new ClientHttpRequest (YARRG_URL);
1379     http.setParameter("clientname", YARRG_CLIENTNAME);
1380     http.setParameter("clientversion", YARRG_CLIENTVERSION);
1381     http.setParameter("clientfixes", YARRG_CLIENTFIXES);
1382     http.setParameter("timestamp", timestamp);
1383     http.setParameter("ocean", ocean);
1384     http.setParameter("island", island);
1385     http.setParameter("data", "deduped.tsv.gz", file,
1386                       "application/octet-stream");
1387     InputStream in = post_for_yarrg(http);
1388     if (in == null) return false;
1389     String output = readstreamstring(in);
1390     if (!output.startsWith("OK")) {
1391       error("<html><h1>Unexpected output from YARRG server</h1>\n" + output);
1392       return false;
1393     }
1394     debug_write_stringdata("yarrg-result.txt", output);
1395     return true;
1396   }
1397
1398   private int calculateArbitrageCommodity(ArrayList<SortedSet<int[]>> arb_bs) {
1399     // debuglog("ARBITRAGE?");
1400     int profit = 0;
1401     SortedSet<int[]> buys = arb_bs.get(0);
1402     SortedSet<int[]> sells = arb_bs.get(1);
1403     while (true) {
1404       int[] buy, sell;
1405       try {
1406         // NB "sell" means they sell, ie we buy
1407         sell = sells.last();
1408         buy = buys.first();
1409       } catch (NoSuchElementException e) {
1410         break;
1411       }
1412
1413       int unitprofit = buy[0] - sell[0];
1414       int count = buy[1] < sell[1] ? buy[1] : sell[1];
1415       // debuglog(" sell @"+sell[0]+" x"+sell[1]
1416       //          +" buy @"+buy[0]+" x"+buy[1]
1417       //          +" => x"+count+" @"+unitprofit);
1418
1419       if (unitprofit <= 0)
1420         break;
1421
1422       profit += count * unitprofit;
1423       buy[1] -= count;
1424       sell[1] -= count;
1425       if (buy[1]==0) buys.remove(buy);
1426       if (sell[1]==0) sells.remove(sell);
1427     }
1428     // debuglog(" PROFIT "+profit);
1429     return profit;
1430   }
1431
1432   private class arbitrageOfferComparator implements Comparator {
1433     public int compare(Object o1, Object o2) {
1434       int p1 = ((int[])o1)[0];
1435       int p2 = ((int[])o2)[0];
1436       return p2 - p1;
1437     }
1438   }
1439
1440   private @SuppressWarnings("unchecked")
1441   void calculateArbitrage(ArrayList<ArrayList<String>> data)
1442   throws InterruptedException {
1443     int arbitrage = 0;
1444     ArrayList<SortedSet<int[]>> arb_bs = null;
1445     String lastcommod = null;
1446     Comparator compar = new arbitrageOfferComparator();
1447
1448     for (ArrayList<String> row : data) {
1449       String thiscommod = row.get(0);
1450       // debuglog("ROW "+row.toString());
1451       if (lastcommod == null || !thiscommod.equals(lastcommod)) {
1452         if (lastcommod != null)
1453           arbitrage += calculateArbitrageCommodity(arb_bs);
1454         // debuglog("ROW rdy");
1455         arb_bs = new ArrayList<SortedSet<int[]>>(2);
1456         arb_bs.add(0, new TreeSet<int[]>(compar));
1457         arb_bs.add(1, new TreeSet<int[]>(compar));
1458         // debuglog("ROW init");
1459         lastcommod = thiscommod;
1460       }
1461       for (int bs = 0; bs < 2; bs++) {
1462         String pricestr = row.get(bs*2 + 2);
1463         if (pricestr == null)
1464           continue;
1465         int[] entry = new int[2];
1466         // debuglog("ROW BS "+bs);
1467         entry[0] = parseQty(pricestr);
1468         entry[1] = parseQty(row.get(bs*2 + 3));
1469         arb_bs.get(bs).add(entry);
1470       }
1471     }
1472     arbitrage += calculateArbitrageCommodity(arb_bs);
1473     String arb;
1474     if (arbitrage != 0) {
1475       arb = "<html><strong>arbitrage: "+arbitrage+" poe</strong>";
1476     } else {
1477       arb = "no arbitrage";
1478     }
1479     final String arb_final = arb;
1480     EventQueue.invokeLater(new Runnable() { public void run() {
1481       arbitrageResult.setText(arb_final);
1482     }});
1483   }
1484
1485 }