/*

  * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS HEADER.

  *

  * The contents of this file are subject to the terms of either the GNU

  * General Public License Version 2 only ("GPL") or the Common

  * Development and Distribution License("CDDL") (collectively, the

  * "License"). You may not use this file except in compliance with the

  * License. You can obtain a copy of the License at

  * http://www.netbeans.org/cddl-gplv2.html

  * or nbbuild/licenses/CDDL-GPL-2-CP. See the License for the

  * specific language governing permissions and limitations under the

  * License.  When distributing the software, include this License Header

  * Notice in each file and include the License file at

  * nbbuild/licenses/CDDL-GPL-2-CP.  Sun designates this

  * particular file as subject to the "Classpath" exception as provided

  * by Sun in the GPL Version 2 section of the License file that

  * accompanied this code. If applicable, add the following below the

  * License Header, with the fields enclosed by brackets [] replaced by

  * your own identifying information:

  * "Portions Copyrighted [year] [name of copyright owner]"

  *

  * Contributor(s):

  *

  * Portions Copyrighted 2009 Jaroslav Tulach

  */

 package cz.xelfi.quoridor.webidor.resources;

 import cz.xelfi.quoridor.IllegalPositionException;

 import cz.xelfi.quoridor.webidor.*;

 import cz.xelfi.quoridor.Move;

 import java.io.BufferedReader;

 import java.io.BufferedWriter;

 import java.io.File;

 import java.io.FileReader;

 import java.io.FileWriter;

 import java.io.IOException;

 import java.io.PrintWriter;

 import java.util.ArrayList;

 import java.util.Collections;

 import java.util.Date;

 import java.util.List;

 import java.util.logging.Level;

 import java.util.logging.Logger;

 import javax.ws.rs.DefaultValue;

 import javax.ws.rs.GET;

 import javax.ws.rs.POST;

 import javax.ws.rs.PUT;

 import javax.ws.rs.Path;

 import javax.ws.rs.PathParam;

 import javax.ws.rs.Produces;

 import javax.ws.rs.QueryParam;

 import javax.ws.rs.WebApplicationException;

 import javax.ws.rs.core.MediaType;

 import javax.ws.rs.core.Response.Status;

 /**

  *

  * @author Jaroslav Tulach <jtulach@netbeans.org>

  */

 public final class Games {

     private final Quoridor quoridor;

     private final List<Game> games = new ArrayList<Game>();

     private final File dir;

     private static final Logger LOG = Logger.getLogger(Games.class.getName());

     public Games(File dir, Quoridor quoridor) {

         this.dir = dir;

         this.quoridor = quoridor;

         File[] arr = dir.listFiles();

         if (arr != null) {

             for (File f : arr) {

                 try {

                     Game g = readGame(f);

                     games.add(g);

                 } catch (IOException ex) {

                     LOG.log(Level.WARNING, "Wrong game in " + f, ex);

                 }

             }

         }

     }

     @POST

     @Produces({ MediaType.APPLICATION_JSON, MediaType.TEXT_XML })

     public GameId createGame(

         @QueryParam("loginID") String id,

         @QueryParam("white") String white,

         @QueryParam("black") String black

     ) throws IOException {

         String logUser = quoridor.isLoggedIn(id);

         if (logUser == null) {

             throw new WebApplicationException(Status.UNAUTHORIZED);

         }

         if (white == null) {

             throw new WebApplicationException(Status.PRECONDITION_FAILED);

         }

         if (black == null) {

             throw new WebApplicationException(Status.PRECONDITION_FAILED);

         }

         if (!logUser.equals(white) && !logUser.equals(black)) {

             throw new WebApplicationException(Status.PRECONDITION_FAILED);

         }

         Game g = new Game(white, black);

         storeGame(g);

         games.add(g);

         return g.getId();

     }

     @GET

     @Path("{id}")

     @Produces(MediaType.TEXT_PLAIN)

     public String getBoard(

         @PathParam("id") String id,

         @QueryParam("move") @DefaultValue("-1") int move

     ) {

         Game g = findGame(id, move);

         if (g == null) {

             throw new IllegalArgumentException("Unknown game " + id);

         }

         return g.getBoard().toString();

     }

     @GET

     @Path("{id}")

     @Produces({ MediaType.APPLICATION_JSON, MediaType.TEXT_XML })

     public Game getBoardInfo(

         @PathParam("id") String id,

         @QueryParam("move") @DefaultValue("-1") int move

     ) {

         return findGame(id, move);

     }

     @PUT

     @Path("{id}")

     @Produces({ MediaType.APPLICATION_JSON, MediaType.TEXT_XML })

     public GameId applyMove(

         @QueryParam("loginID") String loginId,

         @PathParam("id") String id,

         @QueryParam("player") String player,

         @QueryParam("move") String move

     ) throws IllegalPositionException {

         String logUser = quoridor.isLoggedIn(loginId);

         if (logUser == null) {

             throw new WebApplicationException(Status.UNAUTHORIZED);

         }

         if (!logUser.equals(player)) {

             throw new WebApplicationException(Status.UNAUTHORIZED);

         }

         Game g = findGame(id);

         if (g == null) {

             throw new IllegalArgumentException("Unknown game " + id);

         }

         Move m = Move.valueOf(move);

         g.apply(player, m, new Date());

         try {

             storeGame(g);

         } catch (IOException ex) {

             LOG.log(Level.WARNING, "Cannot store game " + id, ex);

         }

         return g.getId();

     }

     @GET

     @Produces({MediaType.APPLICATION_JSON, MediaType.TEXT_XML })

     public List<GameId> listGames() {

         List<GameId> arr = new ArrayList<GameId>(games.size());

         for (Game g : games) {

             arr.add(g.getId());

         }

         Collections.sort(arr, GameId.NEWEST_FIRST);

         return arr;

     }

     public List<Game> getGames() {

         return games;

     }

     private Game findGame(String id) {

         for (Game g : games) {

             if (g.getId().getId().equals(id)) {

                 return g;

             }

         }

         return null;

     }

     private Game findGame(String id, int move) {

         Game g = findGame(id);

         if (g == null) {

             throw new IllegalArgumentException("Unknown game " + id);

         }

         try {

             return move == -1 ? g : g.snapshot(move);

         } catch (IllegalPositionException ex) {

             Logger.getLogger(Games.class.getName()).log(Level.SEVERE, null, ex);

             return null;

         }

     }

     private Game readGame(File f) throws IOException {

         BufferedReader r = new BufferedReader(new FileReader(f));

         String white = null;

         String black = null;

         Game g = null;

         for (;;) {

             String line = r.readLine();

             if (line == null) {

                 line = "finish";

             }

             line = line.trim();

             if (line.length() == 0) {

                 continue;

             }

             if (line.startsWith("# white: ")) {

                 white = line.substring(9);

                 continue;

             }

             if (line.startsWith("# black: ")) {

                 black = line.substring(9);

                 continue;

             }

             if (line.startsWith("#")) {

                 continue;

             }

             if (white == null || black == null) {

                 throw new IOException("Missing white and black identification in " + f);

             }

             if (g == null) {

                 GameId id = new GameId(f.getName(), white, black, new Date(f.lastModified()), new Date(f.lastModified()), GameStatus.whiteMove);

                 g = new Game(id);

             }

             int hash = line.indexOf('#');

             if (hash >= 0) {

                 line = line.substring(0, hash);

             }

             if (line.equals("finish")) {

                 break;

             }

             String[] moves = line.split(" ");

             if (moves.length == 0) {

                 continue;

             }

             if (moves.length > 2) {

                 throw new IOException("Too much moves on line: " + line);

             }

             try {

                 if (!"...".equals(moves[0])) {

                     g.apply(white, Move.valueOf(moves[0]), null);

                 }

                 if (moves.length == 2) {

                     g.apply(black, Move.valueOf(moves[1]), null);

                 }

             } catch (IllegalPositionException ex) {

                 throw new IOException("Wrong move: " + ex.getMessage());

             }

         }

         if (g == null) {

             throw new IOException("No moves in " + f);

         }

         return g;

     }

     private void storeGame(Game g) throws IOException {

         dir.mkdirs();

         File f = new File(dir, g.getId().getId());

         PrintWriter pw = new PrintWriter(new BufferedWriter(new FileWriter(f)));

         pw.println("# white: " + g.getId().getWhite());

         pw.println("# black: " + g.getId().getBlack());

         pw.println("# status: " + g.getId().getStatus());

         int cnt = 0;

         for (Move m : g.getMoves()) {

             pw.print(m.toString());

             if (++cnt % 2 == 0) {

                 pw.println();

             } else {

                 pw.print(' ');

             }

         }

         pw.println();

         pw.println();

         pw.flush();

         pw.close();

     }

 }