/**

  * The MIT License (MIT)

  *

  * Copyright (C) 2013 Jaroslav Tulach <jaroslav.tulach@apidesign.org>

  *

  * Permission is hereby granted, free of charge, to any person obtaining a copy

  * of this software and associated documentation files (the "Software"), to deal

  * in the Software without restriction, including without limitation the rights

  * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell

  * copies of the Software, and to permit persons to whom the Software is

  * furnished to do so, subject to the following conditions:

  *

  * The above copyright notice and this permission notice shall be included in

  * all copies or substantial portions of the Software.

  *

  * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR

  * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,

  * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE

  * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER

  * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,

  * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN

  * THE SOFTWARE.

  */

 package com.oracle.chess.client.htmljava;

 import java.io.IOException;

 import java.net.URISyntaxException;

 import java.util.HashSet;

 import java.util.List;

 import java.util.Set;

 import java.util.logging.Level;

 import java.util.logging.Logger;

 import net.java.html.json.ComputedProperty;

 import net.java.html.json.Function;

 import net.java.html.json.Model;

 import net.java.html.json.ModelOperation;

 import net.java.html.json.OnPropertyChange;

 import net.java.html.json.OnReceive;

 import net.java.html.json.Property;

 /**

  *

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

  */

 @Model(className = "UI", properties = {

     @Property(name = "status", type = String.class),

     @Property(name = "selectedGameId", type = String.class),

     @Property(name = "boards", type = Board.class, array = true),

     @Property(name = "viewGames", type = Games.class),

     @Property(name = "settings", type = Settings.class),

     @Property(name = "connected", type = boolean.class),

     @Property(name = "disconnected", type = boolean.class),

 })

 public class UIModel {

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

     @ComputedProperty static boolean settingsActive(String selectedGameId) {

         return selectedGameId == null;

     }

     @ComputedProperty static boolean viewGamesActive(String selectedGameId, boolean connected) {

         return selectedGameId == null && connected;

     }

     @ComputedProperty static Board selectedBoard(String selectedGameId, List<Board> boards) {

         Board active = null;

         for (Board b : boards) {

             b.setActive(false);

             if (selectedGameId != null && selectedGameId.equals(b.getGameId())) {

                 b.setActive(true);

                 active = b;

             }

         }

         return active;

     }

     @Function static void activateGame(UI m, Board data) {

         m.setSelectedGameId(data.getGameId());

     }

     @Function static void activateSettings(UI m) {

         m.setSelectedGameId(null);

         refreshGames(m);

     }

     @Function static void createGame(UI u) {

         u.setStatus("Creating new game...");

         Request r = new Request();

         r.setMsg(MsgType.CreateGame);

         r.setColor(Color.valueOf(u.getViewGames().getSelectedColor()));

         u.sendMsg(r);

     }

     @ModelOperation @Function static void refreshGames(UI u) {

         u.setStatus("Refreshing games...");

         Request r = new Request();

         r.setMsg(MsgType.QueryGames);

         u.sendMsg(r);

     }

     @ModelOperation static void sendMsg(UI ui, Request r) {

         final Settings sttngs = ui.getSettings();

         String url = sttngs.getUrl();

         r.setUsername(sttngs.getUsername());

         r.setPassword(sttngs.getPassword());

         LOG.log(Level.INFO, "Sending {0} to {1}", new Object[]{r, url});

         ui.queryServer(url, r);

     }

     @OnReceive(data = Request.class, url = "{url}", method = "WebSocket", onError = "wasAnError") 

     static void queryServer(UI ui, Response r) {

         LOG.log(Level.INFO, "Received {0}", r);

         if (r == null) {

             ui.setDisconnected(false);

             verifyLogin(ui);

             return;

         }

         SWITCH: switch (MsgType.forResponse(r.getMsg())) {

             case CheckCredentials: {

                 switch (r.getCheck()) {

                     case NOT_REGISTERED:

                     case VALID:

                         ui.setConnected(true);

                         ui.refreshGames();

                         ui.setStatus("Connected.");

                         return;

                     case INVALID:

                         ui.setStatus("Password is invalid");

                         break;

                 }

                 disconnect(ui);

             }

             case QueryGames:

                 ui.getViewGames().listGames(r.getGames(), ui.getSettings().getUsername());

                 ui.setStatus("");

                 break;

             case CreateGame: {

                 ui.setStatus("Game " + r + " created");

                 final Board b = Rules.createBoard();

                 Rules.initBoard(

                     b, r.getBoard().getWhites(),

                     r.getBoard().getBlacks(),

                     r.getTurn()

                 );

                 b.setGameId(r.getGameId());

                 b.setWhitePlayer(r.getWhitePlayer());

                 b.setBlackPlayer(r.getBlackPlayer());

                 b.setPlayer(ui.getSettings().getUsername());

                 b.updateSummary(r.getSummary());

                 ui.getBoards().add(b);

                 ui.setSelectedGameId(r.getGameId());

                 UIModel.refreshGames(ui);

                 break;

             }

             case SendMove: {

                 if (r.getBoard() == null) {

                     throw new NullPointerException("No board in " + r);

                 }

                 final Board b = findBoard(ui, r.getGameId());

                 if (b == null) {

                     break;

                 }

                 b.updateSummary(r.getSummary());

                 final String errMsg = r.getError() == null ? null : r.getError().getMessage();

                 final List<String> whites = r.getBoard().getWhites();

                 final List<String> blacks = r.getBoard().getBlacks();

                 final Color turn = r.getNextTurn();

                 BoardModel.moveResponse(b, errMsg, whites, blacks, turn, r.getAlert());

                 break;

             }

             case JoinGame: {

                 Board b;

                 if ((b = findBoard(ui, r.getGameId())) != null) {

                     b.setWhitePlayer(r.getWhitePlayer());

                     b.setBlackPlayer(r.getBlackPlayer());

                     b.setPlayer(ui.getSettings().getUsername());

                     b.updateSummary(r.getSummary());

                     ui.setSelectedGameId(r.getGameId());

                     break SWITCH;

                 }

                 ui.setStatus("Joining " + r.getGameId() + " as " + r.getColor());

                 b = Rules.createBoard();

                 Rules.initBoard(

                     b, r.getBoard().getWhites(),

                     r.getBoard().getBlacks(),

                     r.getTurn()

                 );

                 b.setGameId(r.getGameId());

                 b.setWhitePlayer(r.getWhitePlayer());

                 b.setBlackPlayer(r.getBlackPlayer());

                 b.setPlayer(ui.getSettings().getUsername());

                 b.updateSummary(r.getSummary());

                 if (r.getColor() == Color.B) {

                     BoardModel.rotateBoard(b);

                 }

                 if (r.getMoves() != null) {

                     for (String move : r.getMoves()) {

                         Move m = BoardModel.MoveImpl.valueOf(move);

                         b.getMoves().add(m);

                     }

                 } else {

                     b.getMoves().clear();

                 }

                 ui.setSelectedGameId(b.getGameId());

                 ui.getBoards().add(b);

                 break;

             }

             case UpdateGame: {

                 final Board b = findBoard(ui, r.getGameId());

                 if (b == null) {

                     break;

                 }

                 b.updateSummary(r.getSummary());

                 final Move move = BoardModel.MoveImpl.valueOf(r.getFrom() + r.getTo());

                 final List<String> whites = r.getBoard().getWhites();

                 final List<String> blacks = r.getBoard().getBlacks();

                 final Color turn = r.getNextTurn();

                 BoardModel.moveUpdate(b, move, whites, blacks, turn, null);

             }

         }

     }

     private static Board findBoard(UI ui, String gameId) {

         for (Board tmp : ui.getBoards()) {

             if (tmp.getGameId().equals(gameId)) {

                 return tmp;

             }

         }

         return null;

     }

     static void wasAnError(UI ui, Exception t) {

         if (t == null) {

             ui.setConnected(false);

             ui.setDisconnected(true);

             ui.setStatus("Disconnected.");

         } else {

             ui.setStatus("Error: " + t.getLocalizedMessage());

         }

     }

     @Function static void joinGame(UI u, Game data) {

         Request r = new Request();

         r.setMsg(MsgType.JoinGame);

         r.setObserver(false);

         r.setGameId(data.getGameId());

         u.sendMsg(r);

     }

     @Function static void observeGame(UI u, Game data) {

         Request r = new Request();

         r.setMsg(MsgType.JoinGame);

         r.setObserver(true);

         r.setGameId(data.getGameId());

         u.sendMsg(r);

     }

     private static final Set<UI> ACTIVE = new HashSet<>();

     @OnPropertyChange("connected") static void clearGames(UI m) {

         if (m.isDisconnected()) {

             m.getBoards().clear();

             ACTIVE.remove(m);

         } else {

             ACTIVE.add(m);

         }

     }

     static UI findUI(Board b) {

         for (UI ui : ACTIVE) {

             if (ui.getBoards().contains(b)) {

                 return ui;

             }

         }

         return null;

     }

     @Function static void leave(UI ui, Board data) {

         ui.getBoards().remove(data);

         ui.setSelectedGameId(null);

     }

     @Function static void disconnect(UI ui) {

         ui.queryServer(ui.getSettings().getUrl(), null);

         ui.setStatus("Disconnecting...");

     }

     private static void verifyLogin(UI ui) {

         ui.setStatus("Verifying user credentials...");

         Request r = new Request();

         r.setMsg(MsgType.CheckCredentials);

         ui.sendMsg(r);

     }

     @Function static void reconnect(UI ui) {

         final Settings s = ui.getSettings();

         ui.setStatus("Connecting to the server...");

         ui.queryServer(s.getUrl(), null);

         s.write(ui);

     }

     public static void initialize(String... args) throws URISyntaxException, IOException {

         UI ui = new UI();

         ui.getSettings().read();

         ui.setStatus("Ready.");

         ui.setDisconnected(true);

         ui.applyBindings();

     }

 }