/**

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

  *

  * Copyright 2013-2014 Oracle and/or its affiliates. All rights reserved.

  *

  * Oracle and Java are registered trademarks of Oracle and/or its affiliates.

  * Other names may be trademarks of their respective owners.

  *

  * 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.  Oracle designates this

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

  * by Oracle 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):

  *

  * The Original Software is NetBeans. The Initial Developer of the Original

  * Software is Oracle. Portions Copyright 2013-2014 Oracle. All Rights Reserved.

  *

  * If you wish your version of this file to be governed by only the CDDL

  * or only the GPL Version 2, indicate your decision by adding

  * "[Contributor] elects to include this software in this distribution

  * under the [CDDL or GPL Version 2] license." If you do not indicate a

  * single choice of license, a recipient has the option to distribute

  * your version of this file under either the CDDL, the GPL Version 2 or

  * to extend the choice of license to its licensees as provided above.

  * However, if you add GPL Version 2 code and therefore, elected the GPL

  * Version 2 license, then the option applies only if the new code is

  * made subject to such option by the copyright holder.

  */

 package net.java.html.json.tests;

 import java.util.ArrayList;

 import java.util.List;

 import java.util.Random;

 import net.java.html.BrwsrCtx;

 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.Models;

 import net.java.html.json.Property;

 import org.netbeans.html.json.tck.KOTest;

 /** Tests model of a mine field and its behavior in the browser.

  */

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

     @Property(name = "state", type = MinesTest.GameState.class),

     @Property(name = "rows", type = Row.class, array = true),

 })

 public final class MinesTest {

     Mines m;

     @KOTest public void paintTheGridOnClick() throws Throwable {

         if (m == null) {

             BrwsrCtx ctx = Utils.newContext(MinesTest.class);

             Object exp = Utils.exposeHTML(MinesTest.class, 

     "            <button id='init' data-bind='click: normalSize'></button>\n" +

     "            <table>\n" +

     "                <tbody id='table'>\n" +

     "                    <!-- ko foreach: rows -->\n" +

     "                    <tr>\n" +

     "                        <!-- ko foreach: columns -->\n" +

     "                        <td data-bind='css: style' >\n" +

     "                            <div data-bind='text: html'></div>\n" +

     "                        </td>\n" +

     "                        <!-- /ko -->\n" +

     "                    </tr>\n" +

     "                    <!-- /ko -->\n" +

     "                </tbody>\n" +

     "            </table>\n" +

     ""

             );

             m = Models.bind(new Mines(), ctx);

             m.applyBindings();

             int cnt = Utils.countChildren(MinesTest.class, "table");

             assert cnt == 0 : "Table is empty: " + cnt;

             scheduleClick("init", 100);

         }

         int cnt = Utils.countChildren(MinesTest.class, "table");

         if (cnt == 0) {

             throw new InterruptedException();

         }

         assert cnt == 10 : "There is ten rows in the table now: " + cnt;

         Utils.exposeHTML(MinesTest.class, "");

     }

     @KOTest public void countAround() throws Exception {

         Mines mines = new Mines();

         mines.init(5, 5, 0);

         mines.getRows().get(0).getColumns().get(0).setMine(true);

         mines.getRows().get(1).getColumns().get(0).setMine(true);

         mines.getRows().get(0).getColumns().get(1).setMine(true);

         int cnt = around(mines, 1, 1);

         assert cnt == 3 : "There are three mines around. Was: " + cnt;

     }

     private static void scheduleClick(String id, int delay) throws Exception {

         String s = "var id = arguments[0]; var delay = arguments[1];"

             + "var e = window.document.getElementById(id);\n "

             + "var f = function() {;\n "

             + "  var ev = window.document.createEvent('MouseEvents');\n "

             + "  ev.initMouseEvent('click', true, false, window, 0, 0, 0, 0, 0, false, false, false, false, 0, null);\n "

             + "  e.dispatchEvent(ev);\n"

             + "};\n"

             + "window.setTimeout(f, delay);";

         Utils.executeScript(

             MinesTest.class,

             s, id, delay);

     }

     enum GameState {

         IN_PROGRESS, WON, LOST;

     }

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

         @Property(name = "columns", type = Square.class, array = true)

     })

     static class RowModel {

     }

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

         @Property(name = "state", type = SquareType.class),

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

     })

     static class SquareModel {

         @ComputedProperty static String html(SquareType state) {

             if (state == null) return " ";

             switch (state) {

                 case EXPLOSION: return "✗";

                 case UNKNOWN: return " ";

                 case DISCOVERED: return "✔";  

                 case N_0: return " ";

             }

             return "&#x278" + (state.ordinal() - 1);

         }

         @ComputedProperty static String style(SquareType state) {

             return state == null ? null : state.toString();

         }

     }

     enum SquareType {

         N_0, N_1, N_2, N_3, N_4, N_5, N_6, N_7, N_8,

         UNKNOWN, EXPLOSION, DISCOVERED;

         final boolean isVisible() {

             return name().startsWith("N_");

         }

         final SquareType moreBombsAround() {

             switch (this) {

                 case EXPLOSION:

                 case UNKNOWN:

                 case DISCOVERED:

                 case N_8:

                     return this;

             }

             return values()[ordinal() + 1];

         }

     }

     @ComputedProperty static boolean fieldShowing(GameState state) {

         return state != null;

     }

     @Function static void normalSize(Mines m) {

         m.init(10, 10, 10);

     }

     @ModelOperation static void init(Mines model, int width, int height, int mines) {

         List<Row> rows = new ArrayList<Row>(height);

         for (int y = 0; y < height; y++) {

             Square[] columns = new Square[width];

             for (int x = 0; x < width; x++) {

                 columns[x] = new Square(SquareType.UNKNOWN, false);

             }

             rows.add(new Row(columns));

         }

         Random r = new Random();

         while (mines > 0) {

             int x = r.nextInt(width);

             int y = r.nextInt(height);

             final Square s = rows.get(y).getColumns().get(x);

             if (s.isMine()) {

                 continue;

             }

             s.setMine(true);

             mines--;

         }

         model.setState(GameState.IN_PROGRESS);

         model.getRows().clear();

         model.getRows().addAll(rows);

     }

     @ModelOperation static void computeMines(Mines model) {

         List<Integer> xBombs = new ArrayList<Integer>();

         List<Integer> yBombs = new ArrayList<Integer>();

         final List<Row> rows = model.getRows();

         boolean emptyHidden = false;

         SquareType[][] arr = new SquareType[rows.size()][];

         for (int y = 0; y < rows.size(); y++) {

             final List<Square> columns = rows.get(y).getColumns();

             arr[y] = new SquareType[columns.size()];

             for (int x = 0; x < columns.size(); x++) {

                 Square sq = columns.get(x);

                 if (sq.isMine()) {

                     xBombs.add(x);

                     yBombs.add(y);

                 }

                 if (sq.getState().isVisible()) {

                     arr[y][x] = SquareType.N_0;

                 } else {

                     if (!sq.isMine()) {

                         emptyHidden = true;

                     }

                 }

             }

         }

         for (int i = 0; i < xBombs.size(); i++) {

             int x = xBombs.get(i);

             int y = yBombs.get(i);

             incrementAround(arr, x, y);

         }

         for (int y = 0; y < rows.size(); y++) {

             final List<Square> columns = rows.get(y).getColumns();

             for (int x = 0; x < columns.size(); x++) {

                 Square sq = columns.get(x);

                 final SquareType newState = arr[y][x];

                 if (newState != null && newState != sq.getState()) {

                     sq.setState(newState);

                 }

             }

         }

         if (!emptyHidden) {

             model.setState(GameState.WON);

             showAllBombs(model, SquareType.DISCOVERED);

         }

     }

     private static void incrementAround(SquareType[][] arr, int x, int y) {

         incrementAt(arr, x - 1, y - 1);

         incrementAt(arr, x - 1, y);

         incrementAt(arr, x - 1, y + 1);

         incrementAt(arr, x + 1, y - 1);

         incrementAt(arr, x + 1, y);

         incrementAt(arr, x + 1, y + 1);

         incrementAt(arr, x, y - 1);

         incrementAt(arr, x, y + 1);

     }

     private static void incrementAt(SquareType[][] arr, int x, int y) {

         if (y >= 0 && y < arr.length) {

             SquareType[] r = arr[y];

             if (x >= 0 && x < r.length) {

                 SquareType sq = r[x];

                 if (sq != null) {

                     r[x] = sq.moreBombsAround();

                 }

             }

         }

     }

     static void showAllBombs(Mines model, SquareType state) {

         for (Row row : model.getRows()) {

             for (Square square : row.getColumns()) {

                 if (square.isMine()) {

                     square.setState(state);

                 }

             }

         }

     }

     private static void expandKnown(Mines model, Square data) {

         final List<Row> rows = model.getRows();

         for (int y = 0; y < rows.size(); y++) {

             final List<Square> columns = rows.get(y).getColumns();

             for (int x = 0; x < columns.size(); x++) {

                 Square sq = columns.get(x);

                 if (sq == data) {

                     expandKnown(model, x, y);

                     return;

                 }

             }

         }

     }

     private static void expandKnown(Mines model, int x , int y) {

         if (y < 0 || y >= model.getRows().size()) {

             return;

         }

         final List<Square> columns = model.getRows().get(y).getColumns();

         if (x < 0 || x >= columns.size()) {

             return;

         }

         final Square sq = columns.get(x);

         if (sq.getState() == SquareType.UNKNOWN) {

             int around = around(model, x, y);

             final SquareType t = SquareType.valueOf("N_" + around);

             sq.setState(t);

             if (sq.getState() == SquareType.N_0) {

                 expandKnown(model, x - 1, y - 1);

                 expandKnown(model, x - 1, y);

                 expandKnown(model, x - 1, y + 1);

                 expandKnown(model, x , y - 1);

                 expandKnown(model, x, y + 1);

                 expandKnown(model, x + 1, y - 1);

                 expandKnown(model, x + 1, y);

                 expandKnown(model, x + 1, y + 1);

             }

         }

     }

     private static int around(Mines model, int x, int y) {

         return minesAt(model, x - 1, y - 1)

                 + minesAt(model, x - 1, y)

                 + minesAt(model, x - 1, y + 1)

                 + minesAt(model, x, y - 1)

                 + minesAt(model, x, y + 1)

                 + minesAt(model, x + 1, y - 1)

                 + minesAt(model, x + 1, y)

                 + minesAt(model, x + 1, y + 1);

     }

     private static int minesAt(Mines model, int x, int y) {

         if (y < 0 || y >= model.getRows().size()) {

             return 0;

         }

         final List<Square> columns = model.getRows().get(y).getColumns();

         if (x < 0 || x >= columns.size()) {

             return 0;

         }

         Square sq = columns.get(x);

         return sq.isMine() ? 1 : 0;

     }

 }