6d6623e4d90005e7b5616346ca920391a4963d17
[remoteglot] / www / js / chess.js
1 /*
2  * Copyright (c) 2017, Jeff Hlywa (jhlywa@gmail.com)
3  * All rights reserved.
4  *
5  * Redistribution and use in source and binary forms, with or without
6  * modification, are permitted provided that the following conditions are met:
7  *
8  * 1. Redistributions of source code must retain the above copyright notice,
9  *    this list of conditions and the following disclaimer.
10  * 2. Redistributions in binary form must reproduce the above copyright notice,
11  *    this list of conditions and the following disclaimer in the documentation
12  *    and/or other materials provided with the distribution.
13  *
14  * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
15  * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
16  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
17  * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
18  * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
19  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
20  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
21  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
22  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
23  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
24  * POSSIBILITY OF SUCH DAMAGE.
25  *
26  *----------------------------------------------------------------------------*/
27
28 /* minified license below  */
29
30 /* @license
31  * Copyright (c) 2017, Jeff Hlywa (jhlywa@gmail.com)
32  * Released under the BSD license
33  * https://github.com/jhlywa/chess.js/blob/master/LICENSE
34  */
35
36 var Chess = function(fen) {
37
38   /* jshint indent: false */
39
40   var BLACK = 'b';
41   var WHITE = 'w';
42
43   var EMPTY = -1;
44
45   var PAWN = 'p';
46   var KNIGHT = 'n';
47   var BISHOP = 'b';
48   var ROOK = 'r';
49   var QUEEN = 'q';
50   var KING = 'k';
51
52   var SYMBOLS = 'pnbrqkPNBRQK';
53
54   var DEFAULT_POSITION = 'rnbqkbnr/pppppppp/8/8/8/8/PPPPPPPP/RNBQKBNR w KQkq - 0 1';
55
56   var POSSIBLE_RESULTS = ['1-0', '0-1', '1/2-1/2', '*'];
57
58   var PAWN_OFFSETS = {
59     b: [16, 32, 17, 15],
60     w: [-16, -32, -17, -15]
61   };
62
63   var PIECE_OFFSETS = {
64     n: [-18, -33, -31, -14,  18, 33, 31,  14],
65     b: [-17, -15,  17,  15],
66     r: [-16,   1,  16,  -1],
67     q: [-17, -16, -15,   1,  17, 16, 15,  -1],
68     k: [-17, -16, -15,   1,  17, 16, 15,  -1]
69   };
70
71   var ATTACKS = [
72     20, 0, 0, 0, 0, 0, 0, 24,  0, 0, 0, 0, 0, 0,20, 0,
73      0,20, 0, 0, 0, 0, 0, 24,  0, 0, 0, 0, 0,20, 0, 0,
74      0, 0,20, 0, 0, 0, 0, 24,  0, 0, 0, 0,20, 0, 0, 0,
75      0, 0, 0,20, 0, 0, 0, 24,  0, 0, 0,20, 0, 0, 0, 0,
76      0, 0, 0, 0,20, 0, 0, 24,  0, 0,20, 0, 0, 0, 0, 0,
77      0, 0, 0, 0, 0,20, 2, 24,  2,20, 0, 0, 0, 0, 0, 0,
78      0, 0, 0, 0, 0, 2,53, 56, 53, 2, 0, 0, 0, 0, 0, 0,
79     24,24,24,24,24,24,56,  0, 56,24,24,24,24,24,24, 0,
80      0, 0, 0, 0, 0, 2,53, 56, 53, 2, 0, 0, 0, 0, 0, 0,
81      0, 0, 0, 0, 0,20, 2, 24,  2,20, 0, 0, 0, 0, 0, 0,
82      0, 0, 0, 0,20, 0, 0, 24,  0, 0,20, 0, 0, 0, 0, 0,
83      0, 0, 0,20, 0, 0, 0, 24,  0, 0, 0,20, 0, 0, 0, 0,
84      0, 0,20, 0, 0, 0, 0, 24,  0, 0, 0, 0,20, 0, 0, 0,
85      0,20, 0, 0, 0, 0, 0, 24,  0, 0, 0, 0, 0,20, 0, 0,
86     20, 0, 0, 0, 0, 0, 0, 24,  0, 0, 0, 0, 0, 0,20
87   ];
88
89   var RAYS = [
90      17,  0,  0,  0,  0,  0,  0, 16,  0,  0,  0,  0,  0,  0, 15, 0,
91       0, 17,  0,  0,  0,  0,  0, 16,  0,  0,  0,  0,  0, 15,  0, 0,
92       0,  0, 17,  0,  0,  0,  0, 16,  0,  0,  0,  0, 15,  0,  0, 0,
93       0,  0,  0, 17,  0,  0,  0, 16,  0,  0,  0, 15,  0,  0,  0, 0,
94       0,  0,  0,  0, 17,  0,  0, 16,  0,  0, 15,  0,  0,  0,  0, 0,
95       0,  0,  0,  0,  0, 17,  0, 16,  0, 15,  0,  0,  0,  0,  0, 0,
96       0,  0,  0,  0,  0,  0, 17, 16, 15,  0,  0,  0,  0,  0,  0, 0,
97       1,  1,  1,  1,  1,  1,  1,  0, -1, -1,  -1,-1, -1, -1, -1, 0,
98       0,  0,  0,  0,  0,  0,-15,-16,-17,  0,  0,  0,  0,  0,  0, 0,
99       0,  0,  0,  0,  0,-15,  0,-16,  0,-17,  0,  0,  0,  0,  0, 0,
100       0,  0,  0,  0,-15,  0,  0,-16,  0,  0,-17,  0,  0,  0,  0, 0,
101       0,  0,  0,-15,  0,  0,  0,-16,  0,  0,  0,-17,  0,  0,  0, 0,
102       0,  0,-15,  0,  0,  0,  0,-16,  0,  0,  0,  0,-17,  0,  0, 0,
103       0,-15,  0,  0,  0,  0,  0,-16,  0,  0,  0,  0,  0,-17,  0, 0,
104     -15,  0,  0,  0,  0,  0,  0,-16,  0,  0,  0,  0,  0,  0,-17
105   ];
106
107   var SHIFTS = { p: 0, n: 1, b: 2, r: 3, q: 4, k: 5 };
108
109   var FLAGS = {
110     NORMAL: 'n',
111     CAPTURE: 'c',
112     BIG_PAWN: 'b',
113     EP_CAPTURE: 'e',
114     PROMOTION: 'p',
115     KSIDE_CASTLE: 'k',
116     QSIDE_CASTLE: 'q'
117   };
118
119   var BITS = {
120     NORMAL: 1,
121     CAPTURE: 2,
122     BIG_PAWN: 4,
123     EP_CAPTURE: 8,
124     PROMOTION: 16,
125     KSIDE_CASTLE: 32,
126     QSIDE_CASTLE: 64
127   };
128
129   var RANK_1 = 7;
130   var RANK_2 = 6;
131   var RANK_3 = 5;
132   var RANK_4 = 4;
133   var RANK_5 = 3;
134   var RANK_6 = 2;
135   var RANK_7 = 1;
136   var RANK_8 = 0;
137
138   var SQUARES = {
139     a8:   0, b8:   1, c8:   2, d8:   3, e8:   4, f8:   5, g8:   6, h8:   7,
140     a7:  16, b7:  17, c7:  18, d7:  19, e7:  20, f7:  21, g7:  22, h7:  23,
141     a6:  32, b6:  33, c6:  34, d6:  35, e6:  36, f6:  37, g6:  38, h6:  39,
142     a5:  48, b5:  49, c5:  50, d5:  51, e5:  52, f5:  53, g5:  54, h5:  55,
143     a4:  64, b4:  65, c4:  66, d4:  67, e4:  68, f4:  69, g4:  70, h4:  71,
144     a3:  80, b3:  81, c3:  82, d3:  83, e3:  84, f3:  85, g3:  86, h3:  87,
145     a2:  96, b2:  97, c2:  98, d2:  99, e2: 100, f2: 101, g2: 102, h2: 103,
146     a1: 112, b1: 113, c1: 114, d1: 115, e1: 116, f1: 117, g1: 118, h1: 119
147   };
148
149   var board = new Array(128);
150   var kings = {w: EMPTY, b: EMPTY};
151   var rooks = {w: [], b: []};
152   var turn = WHITE;
153   var castling = {w: 0, b: 0};
154   var ep_square = EMPTY;
155   var half_moves = 0;
156   var move_number = 1;
157   var history = [];
158   var header = {};
159
160   /* if the user passes in a fen string, load it, else default to
161    * starting position
162    */
163   if (typeof fen === 'undefined') {
164     load(DEFAULT_POSITION);
165   } else {
166     load(fen);
167   }
168
169   function clear(keep_headers) {
170     if (typeof keep_headers === 'undefined') {
171       keep_headers = false;
172     }
173
174     board = new Array(128);
175     kings = {w: EMPTY, b: EMPTY};
176     turn = WHITE;
177     castling = {w: 0, b: 0};
178     ep_square = EMPTY;
179     half_moves = 0;
180     move_number = 1;
181     history = [];
182     if (!keep_headers) header = {};
183     update_setup(generate_fen());
184   }
185
186   function reset() {
187     load(DEFAULT_POSITION);
188   }
189
190   function load(fen, keep_headers) {
191     if (typeof keep_headers === 'undefined') {
192       keep_headers = false;
193     }
194
195     var tokens = fen.split(/\s+/);
196     var position = tokens[0];
197     var square = 0;
198
199     if (!validate_fen(fen).valid) {
200       return false;
201     }
202
203     clear(keep_headers);
204
205     for (var i = 0; i < position.length; i++) {
206       var piece = position.charAt(i);
207
208       if (piece === '/') {
209         square += 8;
210       } else if (is_digit(piece)) {
211         square += parseInt(piece, 10);
212       } else {
213         var color = (piece < 'a') ? WHITE : BLACK;
214         put({type: piece.toLowerCase(), color: color}, algebraic(square));
215         square++;
216       }
217     }
218
219     turn = tokens[1];
220
221     rooks = {w: [], b: []};
222
223     if (tokens[2].indexOf('K') > -1) {
224       castling.w |= BITS.KSIDE_CASTLE;
225       for (var sq = SQUARES.h1; sq >= SQUARES.c1; --sq) {
226         if (is_rook(board[sq], WHITE)) {
227           rooks[WHITE].push({square: sq, flag: BITS.KSIDE_CASTLE});
228           break;
229         }
230       }
231     }
232     if (tokens[2].indexOf('Q') > -1) {
233       castling.w |= BITS.QSIDE_CASTLE;
234       for (var sq = SQUARES.a1; sq <= SQUARES.g1; ++sq) {
235         if (is_rook(board[sq], WHITE)) {
236           rooks[WHITE].push({square: sq, flag: BITS.QSIDE_CASTLE});
237           break;
238         }
239       }
240     }
241     var white_frc_columns = tokens[2].match(/[A-H]/g);
242     var i, flag;
243     if (white_frc_columns !== null) {
244       for (i = 0; i < white_frc_columns.length; ++i) {
245         var sq = SQUARES.a1 + (white_frc_columns[0].charCodeAt(0) - "A".charCodeAt(0));
246         flag = sq < kings[WHITE] ? BITS.QSIDE_CASTLE : BITS.KSIDE_CASTLE;
247         castling.w |= flag;
248         rooks[WHITE].push({square: sq, flag: flag});
249       }
250     }
251
252     if (tokens[2].indexOf('k') > -1) {
253       castling.b |= BITS.KSIDE_CASTLE;
254       for (var sq = SQUARES.h8; sq >= SQUARES.c8; --sq) {
255         if (is_rook(board[sq], BLACK)) {
256           rooks[BLACK].push({square: sq, flag: BITS.KSIDE_CASTLE});
257           break;
258         }
259       }
260     }
261     if (tokens[2].indexOf('q') > -1) {
262       castling.b |= BITS.QSIDE_CASTLE;
263       for (var sq = SQUARES.a8; sq <= SQUARES.g8; ++sq) {
264         if (is_rook(board[sq], BLACK)) {
265           rooks[BLACK].push({square: sq, flag: BITS.QSIDE_CASTLE});
266           break;
267         }
268       }
269     }
270     var black_frc_columns = tokens[2].match(/[a-h]/g);
271     if (black_frc_columns !== null) {
272       for (i = 0; i < black_frc_columns.length; ++i) {
273         var sq = SQUARES.a1 + (black_frc_columns[0].charCodeAt(0) - "A".charCodeAt(0));
274         flag = sq < kings[BLACK] ? BITS.QSIDE_CASTLE : BITS.KSIDE_CASTLE;
275         castling.b |= flag;
276         rooks[BLACK].push({square: sq, flag: flag});
277       }
278     }
279
280     ep_square = (tokens[3] === '-') ? EMPTY : SQUARES[tokens[3]];
281     half_moves = parseInt(tokens[4], 10);
282     move_number = parseInt(tokens[5], 10);
283
284     update_setup(generate_fen());
285
286     return true;
287   }
288
289   /* TODO: this function is pretty much crap - it validates structure but
290    * completely ignores content (e.g. doesn't verify that each side has a king)
291    * ... we should rewrite this, and ditch the silly error_number field while
292    * we're at it
293    */
294   function validate_fen(fen) {
295     var errors = {
296        0: 'No errors.',
297        1: 'FEN string must contain six space-delimited fields.',
298        2: '6th field (move number) must be a positive integer.',
299        3: '5th field (half move counter) must be a non-negative integer.',
300        4: '4th field (en-passant square) is invalid.',
301        5: '3rd field (castling availability) is invalid.',
302        6: '2nd field (side to move) is invalid.',
303        7: '1st field (piece positions) does not contain 8 \'/\'-delimited rows.',
304        8: '1st field (piece positions) is invalid [consecutive numbers].',
305        9: '1st field (piece positions) is invalid [invalid piece].',
306       10: '1st field (piece positions) is invalid [row too large].',
307       11: 'Illegal en-passant square',
308     };
309
310     /* 1st criterion: 6 space-seperated fields? */
311     var tokens = fen.split(/\s+/);
312     if (tokens.length !== 6) {
313       return {valid: false, error_number: 1, error: errors[1]};
314     }
315
316     /* 2nd criterion: move number field is a integer value > 0? */
317     if (isNaN(tokens[5]) || (parseInt(tokens[5], 10) <= 0)) {
318       return {valid: false, error_number: 2, error: errors[2]};
319     }
320
321     /* 3rd criterion: half move counter is an integer >= 0? */
322     if (isNaN(tokens[4]) || (parseInt(tokens[4], 10) < 0)) {
323       return {valid: false, error_number: 3, error: errors[3]};
324     }
325
326     /* 4th criterion: 4th field is a valid e.p.-string? */
327     if (!/^(-|[abcdefgh][36])$/.test(tokens[3])) {
328       return {valid: false, error_number: 4, error: errors[4]};
329     }
330
331     /* 5th criterion: 3th field is a valid castle-string? */
332     if( !/^[C-HK]?[A-FQ]?[c-hk]?[a-fq]?$/.test(tokens[2]) &&
333         tokens[2] !== '-') {
334       return {valid: false, error_number: 5, error: errors[5]};
335     }
336
337     /* 6th criterion: 2nd field is "w" (white) or "b" (black)? */
338     if (!/^(w|b)$/.test(tokens[1])) {
339       return {valid: false, error_number: 6, error: errors[6]};
340     }
341
342     /* 7th criterion: 1st field contains 8 rows? */
343     var rows = tokens[0].split('/');
344     if (rows.length !== 8) {
345       return {valid: false, error_number: 7, error: errors[7]};
346     }
347
348     /* 8th criterion: every row is valid? */
349     for (var i = 0; i < rows.length; i++) {
350       /* check for right sum of fields AND not two numbers in succession */
351       var sum_fields = 0;
352       var previous_was_number = false;
353
354       for (var k = 0; k < rows[i].length; k++) {
355         if (!isNaN(rows[i][k])) {
356           if (previous_was_number) {
357             return {valid: false, error_number: 8, error: errors[8]};
358           }
359           sum_fields += parseInt(rows[i][k], 10);
360           previous_was_number = true;
361         } else {
362           if (!/^[prnbqkPRNBQK]$/.test(rows[i][k])) {
363             return {valid: false, error_number: 9, error: errors[9]};
364           }
365           sum_fields += 1;
366           previous_was_number = false;
367         }
368       }
369       if (sum_fields !== 8) {
370         return {valid: false, error_number: 10, error: errors[10]};
371       }
372     }
373
374     if ((tokens[3][1] == '3' && tokens[1] == 'w') ||
375         (tokens[3][1] == '6' && tokens[1] == 'b')) {
376           return {valid: false, error_number: 11, error: errors[11]};
377     }
378
379     /* everything's okay! */
380     return {valid: true, error_number: 0, error: errors[0]};
381   }
382
383   function generate_fen() {
384     var empty = 0;
385     var fen = '';
386
387     for (var i = SQUARES.a8; i <= SQUARES.h1; i++) {
388       if (board[i] == null) {
389         empty++;
390       } else {
391         if (empty > 0) {
392           fen += empty;
393           empty = 0;
394         }
395         var color = board[i].color;
396         var piece = board[i].type;
397
398         fen += (color === WHITE) ?
399                  piece.toUpperCase() : piece.toLowerCase();
400       }
401
402       if ((i + 1) & 0x88) {
403         if (empty > 0) {
404           fen += empty;
405         }
406
407         if (i !== SQUARES.h1) {
408           fen += '/';
409         }
410
411         empty = 0;
412         i += 8;
413       }
414     }
415
416     var cflags = '';
417     var sq;
418     if (castling[WHITE] & BITS.KSIDE_CASTLE) {
419       sq = search_rook(board, WHITE, BITS.KSIDE_CASTLE);
420       if (is_outermost_rook(board, WHITE, BITS.KSIDE_CASTLE, sq)) {
421         cflags += 'K';
422       } else {
423         cflags += 'ABCDEFGH'.substring(file(sq), file(sq) + 1);
424       }
425     }
426     if (castling[WHITE] & BITS.QSIDE_CASTLE) {
427       sq = search_rook(board, WHITE, BITS.QSIDE_CASTLE);
428       if (is_outermost_rook(board, WHITE, BITS.QSIDE_CASTLE, sq)) {
429         cflags += 'Q';
430       } else {
431         cflags += 'ABCDEFGH'.substring(file(sq), file(sq) + 1);
432       }
433     }
434     if (castling[BLACK] & BITS.KSIDE_CASTLE) {
435       sq = search_rook(board, BLACK, BITS.KSIDE_CASTLE);
436       if (is_outermost_rook(board, BLACK, BITS.KSIDE_CASTLE, sq)) {
437         cflags += 'k';
438       } else {
439         cflags += 'abcdefgh'.substring(file(sq), file(sq) + 1);
440       }
441     }
442     if (castling[BLACK] & BITS.QSIDE_CASTLE) {
443       sq = search_rook(board, BLACK, BITS.QSIDE_CASTLE);
444       if (is_outermost_rook(board, BLACK, BITS.QSIDE_CASTLE, sq)) {
445         cflags += 'q';
446       } else {
447         cflags += 'abcdefgh'.substring(file(sq), file(sq) + 1);
448       }
449     }
450
451     /* do we have an empty castling flag? */
452     cflags = cflags || '-';
453     var epflags = (ep_square === EMPTY) ? '-' : algebraic(ep_square);
454
455     return [fen, turn, cflags, epflags, half_moves, move_number].join(' ');
456   }
457
458   function set_header(args) {
459     for (var i = 0; i < args.length; i += 2) {
460       if (typeof args[i] === 'string' &&
461           typeof args[i + 1] === 'string') {
462         header[args[i]] = args[i + 1];
463       }
464     }
465     return header;
466   }
467
468   /* called when the initial board setup is changed with put() or remove().
469    * modifies the SetUp and FEN properties of the header object.  if the FEN is
470    * equal to the default position, the SetUp and FEN are deleted
471    * the setup is only updated if history.length is zero, ie moves haven't been
472    * made.
473    */
474   function update_setup(fen) {
475     if (history.length > 0) return;
476
477     if (fen !== DEFAULT_POSITION) {
478       header['SetUp'] = '1';
479       header['FEN'] = fen;
480     } else {
481       delete header['SetUp'];
482       delete header['FEN'];
483     }
484   }
485
486   function get(square) {
487     var piece = board[SQUARES[square]];
488     return (piece) ? {type: piece.type, color: piece.color} : null;
489   }
490
491   function put(piece, square) {
492     /* check for valid piece object */
493     if (!('type' in piece && 'color' in piece)) {
494       return false;
495     }
496
497     /* check for piece */
498     if (SYMBOLS.indexOf(piece.type.toLowerCase()) === -1) {
499       return false;
500     }
501
502     /* check for valid square */
503     if (!(square in SQUARES)) {
504       return false;
505     }
506
507     var sq = SQUARES[square];
508
509     /* don't let the user place more than one king */
510     if (piece.type == KING &&
511         !(kings[piece.color] == EMPTY || kings[piece.color] == sq)) {
512       return false;
513     }
514
515     board[sq] = {type: piece.type, color: piece.color};
516     if (piece.type === KING) {
517       kings[piece.color] = sq;
518     }
519
520     update_setup(generate_fen());
521
522     return true;
523   }
524
525   function remove(square) {
526     var piece = get(square);
527     board[SQUARES[square]] = null;
528     if (piece && piece.type === KING) {
529       kings[piece.color] = EMPTY;
530     }
531
532     update_setup(generate_fen());
533
534     return piece;
535   }
536
537   function build_move(board, from, to, flags, promotion, rook_sq) {
538     var move = {
539       color: turn,
540       from: from,
541       to: to,
542       flags: flags,
543       piece: board[from].type
544     };
545
546     if (promotion) {
547       move.flags |= BITS.PROMOTION;
548       move.promotion = promotion;
549     }
550
551     if (flags & (BITS.KSIDE_CASTLE | BITS.QSIDE_CASTLE)) {
552       move.rook_sq = rook_sq;   // remember the position of the rook
553     } else if (board[to]) {
554       move.captured = board[to].type;
555     } else if (flags & BITS.EP_CAPTURE) {
556         move.captured = PAWN;
557     }
558     return move;
559   }
560
561   function generate_moves(options) {
562     function add_move(board, moves, from, to, flags, rook_sq) {
563       /* if pawn promotion */
564       if (board[from].type === PAWN &&
565          (rank(to) === RANK_8 || rank(to) === RANK_1)) {
566           var pieces = [QUEEN, ROOK, BISHOP, KNIGHT];
567           for (var i = 0, len = pieces.length; i < len; i++) {
568             moves.push(build_move(board, from, to, flags, pieces[i]));
569           }
570       } else {
571        moves.push(build_move(board, from, to, flags, undefined, rook_sq));
572       }
573     }
574
575     function check_castle(board, king_from, king_to, rook_from, rook_to, them) {
576       var sq;
577
578       // Check that no pieces are standing between the king and its destination
579       // square, and also between the rook and its destination square.
580       var king_left = Math.min(king_from, king_to);
581       var king_right = Math.max(king_from, king_to);
582       var left = Math.min(king_left, Math.min(rook_from, rook_to));
583       var right = Math.max(king_right, Math.max(rook_from, rook_to));
584       for (sq = left; sq <= right; ++sq) {
585         if (sq != king_from && sq != rook_from && board[sq]) {
586           return false;
587         }
588       }
589
590       // Check that none of the squares on the king's way are under attack.
591       for (sq = king_left; sq <= king_right; ++sq) {
592         if (attacked(them, sq)) {
593           return false;
594         }
595       }
596
597       return true;
598     }
599
600     var moves = [];
601     var us = turn;
602     var them = swap_color(us);
603     var second_rank = {b: RANK_7, w: RANK_2};
604
605     var first_sq = SQUARES.a8;
606     var last_sq = SQUARES.h1;
607     var single_square = false;
608
609     /* do we want legal moves? */
610     var legal = (typeof options !== 'undefined' && 'legal' in options) ?
611                 options.legal : true;
612
613     /* are we generating moves for a single square? */
614     if (typeof options !== 'undefined' && 'square' in options) {
615       if (options.square in SQUARES) {
616         first_sq = last_sq = SQUARES[options.square];
617         single_square = true;
618       } else {
619         /* invalid square */
620         return [];
621       }
622     }
623
624     for (var i = first_sq; i <= last_sq; i++) {
625       /* did we run off the end of the board */
626       if (i & 0x88) { i += 7; continue; }
627
628       var piece = board[i];
629       if (piece == null || piece.color !== us) {
630         continue;
631       }
632
633       if (piece.type === PAWN) {
634         /* single square, non-capturing */
635         var square = i + PAWN_OFFSETS[us][0];
636         if (board[square] == null) {
637             add_move(board, moves, i, square, BITS.NORMAL);
638
639           /* double square */
640           var square = i + PAWN_OFFSETS[us][1];
641           if (second_rank[us] === rank(i) && board[square] == null) {
642             add_move(board, moves, i, square, BITS.BIG_PAWN);
643           }
644         }
645
646         /* pawn captures */
647         for (j = 2; j < 4; j++) {
648           var square = i + PAWN_OFFSETS[us][j];
649           if (square & 0x88) continue;
650
651           if (board[square] != null &&
652               board[square].color === them) {
653               add_move(board, moves, i, square, BITS.CAPTURE);
654           } else if (square === ep_square) {
655               add_move(board, moves, i, ep_square, BITS.EP_CAPTURE);
656           }
657         }
658       } else {
659         for (var j = 0, len = PIECE_OFFSETS[piece.type].length; j < len; j++) {
660           var offset = PIECE_OFFSETS[piece.type][j];
661           var square = i;
662
663           while (true) {
664             square += offset;
665             if (square & 0x88) break;
666
667             if (board[square] == null) {
668               add_move(board, moves, i, square, BITS.NORMAL);
669             } else {
670               if (board[square].color === us) break;
671               add_move(board, moves, i, square, BITS.CAPTURE);
672               break;
673             }
674
675             /* break, if knight or king */
676             if (piece.type === 'n' || piece.type === 'k') break;
677           }
678         }
679       }
680     }
681
682     /* check for castling if: a) we're generating all moves, or b) we're doing
683      * single square move generation on the king's square
684      */
685     if ((!single_square) || last_sq === kings[us]) {
686       /* king-side castling */
687       if (castling[us] & BITS.KSIDE_CASTLE) {
688         var king_from = kings[us];
689         var king_to = us === WHITE ? SQUARES.g1 : SQUARES.g8;
690         var rook_from = search_rook(board, us, BITS.KSIDE_CASTLE);
691         var rook_to = king_to - 1;
692
693         if (check_castle(board, king_from, king_to, rook_from, rook_to, them)) {
694           add_move(board, moves, king_from, king_to, BITS.KSIDE_CASTLE, rook_from);
695         }
696       }
697
698       /* queen-side castling */
699       if (castling[us] & BITS.QSIDE_CASTLE) {
700         var king_from = kings[us];
701         var king_to = us === WHITE ? SQUARES.c1 : SQUARES.c8;
702         var rook_from = search_rook(board, us, BITS.QSIDE_CASTLE);
703         var rook_to = king_to + 1;
704
705         if (check_castle(board, king_from, king_to, rook_from, rook_to, them)) {
706           add_move(board, moves, king_from, king_to, BITS.QSIDE_CASTLE, rook_from);
707         }
708       }
709     }
710
711     /* return all pseudo-legal moves (this includes moves that allow the king
712      * to be captured)
713      */
714     if (!legal) {
715       return moves;
716     }
717
718     /* filter out illegal moves */
719     var legal_moves = [];
720     for (var i = 0, len = moves.length; i < len; i++) {
721       make_move(moves[i]);
722       if (!king_attacked(us)) {
723         legal_moves.push(moves[i]);
724       }
725       undo_move();
726     }
727
728     return legal_moves;
729   }
730
731   function is_rook(piece, color) {
732     return (typeof piece !== 'undefined' && piece !== null &&
733             piece.type === ROOK && piece.color == color);
734   }
735
736   function search_rook(board, us, flag) {
737     for (var i = 0, len = rooks[us].length; i < len; i++) {
738       if (flag & rooks[us][i].flag) {
739         return rooks[us][i].square;
740       }
741     }
742     return null;
743   }
744
745   function is_outermost_rook(board, us, flag, sq) {
746     var end_sq;
747     if (flag == BITS.KSIDE_CASTLE) {
748       var end_sq = (us == WHITE) ? SQUARES.h1 : SQUARES.h8;
749       while (++sq <= end_sq) {
750         if (is_rook(board[sq], us)) {
751            return false;
752         }
753       }
754     } else {
755       var end_sq = (us == WHITE) ? SQUARES.a1 : SQUARES.a8;
756       while (--sq >= end_sq) {
757         if (is_rook(board[sq], us)) {
758            return false;
759         }
760       }
761     }
762     return true;
763   }
764
765   /* convert a move from 0x88 coordinates to Standard Algebraic Notation
766    * (SAN)
767    *
768    * @param {boolean} sloppy Use the sloppy SAN generator to work around over
769    * disambiguation bugs in Fritz and Chessbase.  See below:
770    *
771    * r1bqkbnr/ppp2ppp/2n5/1B1pP3/4P3/8/PPPP2PP/RNBQK1NR b KQkq - 2 4
772    * 4. ... Nge7 is overly disambiguated because the knight on c6 is pinned
773    * 4. ... Ne7 is technically the valid SAN
774    */
775   function move_to_san(move, sloppy) {
776
777     var output = '';
778
779     if (move.flags & BITS.KSIDE_CASTLE) {
780       output = 'O-O';
781     } else if (move.flags & BITS.QSIDE_CASTLE) {
782       output = 'O-O-O';
783     } else {
784       var disambiguator = get_disambiguator(move, sloppy);
785
786       if (move.piece !== PAWN) {
787         output += move.piece.toUpperCase() + disambiguator;
788       }
789
790       if (move.flags & (BITS.CAPTURE | BITS.EP_CAPTURE)) {
791         if (move.piece === PAWN) {
792           output += algebraic(move.from)[0];
793         }
794         output += 'x';
795       }
796
797       output += algebraic(move.to);
798
799       if (move.flags & BITS.PROMOTION) {
800         output += '=' + move.promotion.toUpperCase();
801       }
802     }
803
804     make_move(move);
805     if (in_check()) {
806       if (in_checkmate()) {
807         output += '#';
808       } else {
809         output += '+';
810       }
811     }
812     undo_move();
813
814     return output;
815   }
816
817   // parses all of the decorators out of a SAN string
818   function stripped_san(move) {
819     return move.replace(/=/,'').replace(/[+#]?[?!]*$/,'');
820   }
821
822   function attacked(color, square) {
823     for (var i = SQUARES.a8; i <= SQUARES.h1; i++) {
824       /* did we run off the end of the board */
825       if (i & 0x88) { i += 7; continue; }
826
827       /* if empty square or wrong color */
828       if (board[i] == null || board[i].color !== color) continue;
829
830       var piece = board[i];
831       var difference = i - square;
832       var index = difference + 119;
833
834       if (ATTACKS[index] & (1 << SHIFTS[piece.type])) {
835         if (piece.type === PAWN) {
836           if (difference > 0) {
837             if (piece.color === WHITE) return true;
838           } else {
839             if (piece.color === BLACK) return true;
840           }
841           continue;
842         }
843
844         /* if the piece is a knight or a king */
845         if (piece.type === 'n' || piece.type === 'k') return true;
846
847         var offset = RAYS[index];
848         var j = i + offset;
849
850         var blocked = false;
851         while (j !== square) {
852           if (board[j] != null) { blocked = true; break; }
853           j += offset;
854         }
855
856         if (!blocked) return true;
857       }
858     }
859
860     return false;
861   }
862
863   function king_attacked(color) {
864     return attacked(swap_color(color), kings[color]);
865   }
866
867   function in_check() {
868     return king_attacked(turn);
869   }
870
871   function in_checkmate() {
872     return in_check() && generate_moves().length === 0;
873   }
874
875   function in_stalemate() {
876     return !in_check() && generate_moves().length === 0;
877   }
878
879   function insufficient_material() {
880     var pieces = {};
881     var bishops = [];
882     var num_pieces = 0;
883     var sq_color = 0;
884
885     for (var i = SQUARES.a8; i<= SQUARES.h1; i++) {
886       sq_color = (sq_color + 1) % 2;
887       if (i & 0x88) { i += 7; continue; }
888
889       var piece = board[i];
890       if (piece) {
891         pieces[piece.type] = (piece.type in pieces) ?
892                               pieces[piece.type] + 1 : 1;
893         if (piece.type === BISHOP) {
894           bishops.push(sq_color);
895         }
896         num_pieces++;
897       }
898     }
899
900     /* k vs. k */
901     if (num_pieces === 2) { return true; }
902
903     /* k vs. kn .... or .... k vs. kb */
904     else if (num_pieces === 3 && (pieces[BISHOP] === 1 ||
905                                  pieces[KNIGHT] === 1)) { return true; }
906
907     /* kb vs. kb where any number of bishops are all on the same color */
908     else if (num_pieces === pieces[BISHOP] + 2) {
909       var sum = 0;
910       var len = bishops.length;
911       for (var i = 0; i < len; i++) {
912         sum += bishops[i];
913       }
914       if (sum === 0 || sum === len) { return true; }
915     }
916
917     return false;
918   }
919
920   function in_threefold_repetition() {
921     /* TODO: while this function is fine for casual use, a better
922      * implementation would use a Zobrist key (instead of FEN). the
923      * Zobrist key would be maintained in the make_move/undo_move functions,
924      * avoiding the costly that we do below.
925      */
926     var moves = [];
927     var positions = {};
928     var repetition = false;
929
930     while (true) {
931       var move = undo_move();
932       if (!move) break;
933       moves.push(move);
934     }
935
936     while (true) {
937       /* remove the last two fields in the FEN string, they're not needed
938        * when checking for draw by rep */
939       var fen = generate_fen().split(' ').slice(0,4).join(' ');
940
941       /* has the position occurred three or move times */
942       positions[fen] = (fen in positions) ? positions[fen] + 1 : 1;
943       if (positions[fen] >= 3) {
944         repetition = true;
945       }
946
947       if (!moves.length) {
948         break;
949       }
950       make_move(moves.pop());
951     }
952
953     return repetition;
954   }
955
956   function push(move) {
957     history.push({
958       move: move,
959       kings: {b: kings.b, w: kings.w},
960       turn: turn,
961       castling: {b: castling.b, w: castling.w},
962       ep_square: ep_square,
963       half_moves: half_moves,
964       move_number: move_number
965     });
966   }
967
968   function make_move(move) {
969     var us = turn;
970     var them = swap_color(us);
971     push(move);
972
973     board[move.to] = board[move.from];
974     if (move.from != move.to) {
975       board[move.from] = null;
976     }
977
978     /* if ep capture, remove the captured pawn */
979     if (move.flags & BITS.EP_CAPTURE) {
980       if (turn === BLACK) {
981         board[move.to - 16] = null;
982       } else {
983         board[move.to + 16] = null;
984       }
985     }
986
987     /* if pawn promotion, replace with new piece */
988     if (move.flags & BITS.PROMOTION) {
989       board[move.to] = {type: move.promotion, color: us};
990     }
991
992     /* if we moved the king */
993     if (board[move.to].type === KING) {
994       kings[board[move.to].color] = move.to;
995
996       /* if we castled, move the rook next to the king */
997       if (move.flags & BITS.KSIDE_CASTLE) {
998         var castling_to = move.to - 1;
999         var castling_from = move.rook_sq;
1000         board[castling_to] = board[castling_from];
1001         if(castling_from !== move.to)
1002           board[castling_from] = null;
1003       } else if (move.flags & BITS.QSIDE_CASTLE) {
1004         var castling_to = move.to + 1;
1005         var castling_from = move.rook_sq;
1006         board[castling_to] = board[castling_from];
1007         if(castling_from !== move.to)
1008           board[castling_from] = null;
1009       }
1010
1011       /* turn off castling */
1012       castling[us] = '';
1013     }
1014
1015     /* turn off castling if we move a rook */
1016     if (castling[us]) {
1017       for (var i = 0, len = rooks[us].length; i < len; i++) {
1018         if (move.from === rooks[us][i].square &&
1019             castling[us] & rooks[us][i].flag) {
1020           castling[us] ^= rooks[us][i].flag;
1021           break;
1022         }
1023       }
1024     }
1025
1026     /* turn off castling if we capture a rook */
1027     if (castling[them]) {
1028       for (var i = 0, len = rooks[them].length; i < len; i++) {
1029         if (move.to === rooks[them][i].square &&
1030             castling[them] & rooks[them][i].flag) {
1031           castling[them] ^= rooks[them][i].flag;
1032           break;
1033         }
1034       }
1035     }
1036
1037     /* if big pawn move, update the en passant square */
1038     if (move.flags & BITS.BIG_PAWN) {
1039       if (turn === 'b') {
1040         ep_square = move.to - 16;
1041       } else {
1042         ep_square = move.to + 16;
1043       }
1044     } else {
1045       ep_square = EMPTY;
1046     }
1047
1048     /* reset the 50 move counter if a pawn is moved or a piece is captured */
1049     if (move.piece === PAWN) {
1050       half_moves = 0;
1051     } else if (move.flags & (BITS.CAPTURE | BITS.EP_CAPTURE)) {
1052       half_moves = 0;
1053     } else {
1054       half_moves++;
1055     }
1056
1057     if (turn === BLACK) {
1058       move_number++;
1059     }
1060     turn = swap_color(turn);
1061   }
1062
1063   function undo_move() {
1064     var old = history.pop();
1065     if (old == null) { return null; }
1066
1067     var move = old.move;
1068     kings = old.kings;
1069     turn = old.turn;
1070     castling = old.castling;
1071     ep_square = old.ep_square;
1072     half_moves = old.half_moves;
1073     move_number = old.move_number;
1074
1075     var us = turn;
1076     var them = swap_color(turn);
1077
1078     if (move.from != move.to) {
1079       board[move.from] = board[move.to];
1080       board[move.from].type = move.piece;  // to undo any promotions
1081       board[move.to] = null;
1082     }
1083
1084     if (move.flags & BITS.CAPTURE) {
1085       board[move.to] = {type: move.captured, color: them};
1086     } else if (move.flags & BITS.EP_CAPTURE) {
1087       var index;
1088       if (us === BLACK) {
1089         index = move.to - 16;
1090       } else {
1091         index = move.to + 16;
1092       }
1093       board[index] = {type: PAWN, color: them};
1094     }
1095
1096
1097     if (move.flags & (BITS.KSIDE_CASTLE | BITS.QSIDE_CASTLE)) {
1098       var castling_to, castling_from;
1099       if (move.flags & BITS.KSIDE_CASTLE) {
1100         castling_to = move.rook_sq;
1101         castling_from = move.to - 1;
1102       } else if (move.flags & BITS.QSIDE_CASTLE) {
1103         castling_to = move.rook_sq;
1104         castling_from = move.to + 1;
1105       }
1106
1107       board[castling_to] = board[castling_from];
1108       if(castling_from !== move.from)
1109         board[castling_from] = null;
1110     }
1111
1112     return move;
1113   }
1114
1115   /* this function is used to uniquely identify ambiguous moves */
1116   function get_disambiguator(move, sloppy) {
1117     var moves = generate_moves({legal: !sloppy});
1118
1119     var from = move.from;
1120     var to = move.to;
1121     var piece = move.piece;
1122
1123     var ambiguities = 0;
1124     var same_rank = 0;
1125     var same_file = 0;
1126
1127     for (var i = 0, len = moves.length; i < len; i++) {
1128       var ambig_from = moves[i].from;
1129       var ambig_to = moves[i].to;
1130       var ambig_piece = moves[i].piece;
1131
1132       /* if a move of the same piece type ends on the same to square, we'll
1133        * need to add a disambiguator to the algebraic notation
1134        */
1135       if (piece === ambig_piece && from !== ambig_from && to === ambig_to) {
1136         ambiguities++;
1137
1138         if (rank(from) === rank(ambig_from)) {
1139           same_rank++;
1140         }
1141
1142         if (file(from) === file(ambig_from)) {
1143           same_file++;
1144         }
1145       }
1146     }
1147
1148     if (ambiguities > 0) {
1149       /* if there exists a similar moving piece on the same rank and file as
1150        * the move in question, use the square as the disambiguator
1151        */
1152       if (same_rank > 0 && same_file > 0) {
1153         return algebraic(from);
1154       }
1155       /* if the moving piece rests on the same file, use the rank symbol as the
1156        * disambiguator
1157        */
1158       else if (same_file > 0) {
1159         return algebraic(from).charAt(1);
1160       }
1161       /* else use the file symbol */
1162       else {
1163         return algebraic(from).charAt(0);
1164       }
1165     }
1166
1167     return '';
1168   }
1169
1170   function ascii() {
1171     var s = '   +------------------------+\n';
1172     for (var i = SQUARES.a8; i <= SQUARES.h1; i++) {
1173       /* display the rank */
1174       if (file(i) === 0) {
1175         s += ' ' + '87654321'[rank(i)] + ' |';
1176       }
1177
1178       /* empty piece */
1179       if (board[i] == null) {
1180         s += ' . ';
1181       } else {
1182         var piece = board[i].type;
1183         var color = board[i].color;
1184         var symbol = (color === WHITE) ?
1185                      piece.toUpperCase() : piece.toLowerCase();
1186         s += ' ' + symbol + ' ';
1187       }
1188
1189       if ((i + 1) & 0x88) {
1190         s += '|\n';
1191         i += 8;
1192       }
1193     }
1194     s += '   +------------------------+\n';
1195     s += '     a  b  c  d  e  f  g  h\n';
1196
1197     return s;
1198   }
1199
1200   // convert a move from Standard Algebraic Notation (SAN) to 0x88 coordinates
1201   function move_from_san(move, sloppy) {
1202     // strip off any move decorations: e.g Nf3+?!
1203     var clean_move = stripped_san(move);
1204
1205     // if we're using the sloppy parser run a regex to grab piece, to, and from
1206     // this should parse invalid SAN like: Pe2-e4, Rc1c4, Qf3xf7
1207     if (sloppy) {
1208       var matches = clean_move.match(/([pnbrqkPNBRQK])?([a-h][1-8])x?-?([a-h][1-8])([qrbnQRBN])?/);
1209       if (matches) {
1210         var piece = matches[1];
1211         var from = matches[2];
1212         var to = matches[3];
1213         var promotion = matches[4];
1214       }
1215     }
1216
1217     var moves = generate_moves();
1218     for (var i = 0, len = moves.length; i < len; i++) {
1219       // try the strict parser first, then the sloppy parser if requested
1220       // by the user
1221       if ((clean_move === stripped_san(move_to_san(moves[i]))) ||
1222           (sloppy && clean_move === stripped_san(move_to_san(moves[i], true)))) {
1223         return moves[i];
1224       } else {
1225         if (matches &&
1226             (!piece || piece.toLowerCase() == moves[i].piece) &&
1227             SQUARES[from] == moves[i].from &&
1228             SQUARES[to] == moves[i].to &&
1229             (!promotion || promotion.toLowerCase() == moves[i].promotion)) {
1230           return moves[i];
1231         }
1232       }
1233     }
1234
1235     return null;
1236   }
1237
1238
1239   /*****************************************************************************
1240    * UTILITY FUNCTIONS
1241    ****************************************************************************/
1242   function rank(i) {
1243     return i >> 4;
1244   }
1245
1246   function file(i) {
1247     return i & 15;
1248   }
1249
1250   function algebraic(i){
1251     var f = file(i), r = rank(i);
1252     return 'abcdefgh'.substring(f,f+1) + '87654321'.substring(r,r+1);
1253   }
1254
1255   function swap_color(c) {
1256     return c === WHITE ? BLACK : WHITE;
1257   }
1258
1259   function is_digit(c) {
1260     return '0123456789'.indexOf(c) !== -1;
1261   }
1262
1263   /* pretty = external move object */
1264   function make_pretty(ugly_move) {
1265     var move = clone(ugly_move);
1266     move.san = move_to_san(move, false);
1267     move.to = algebraic(move.to);
1268     move.from = algebraic(move.from);
1269
1270     var flags = '';
1271
1272     for (var flag in BITS) {
1273       if (BITS[flag] & move.flags) {
1274         flags += FLAGS[flag];
1275       }
1276     }
1277     move.flags = flags;
1278
1279     return move;
1280   }
1281
1282   function clone(obj) {
1283     var dupe = (obj instanceof Array) ? [] : {};
1284
1285     for (var property in obj) {
1286       if (typeof property === 'object') {
1287         dupe[property] = clone(obj[property]);
1288       } else {
1289         dupe[property] = obj[property];
1290       }
1291     }
1292
1293     return dupe;
1294   }
1295
1296   function trim(str) {
1297     return str.replace(/^\s+|\s+$/g, '');
1298   }
1299
1300   /*****************************************************************************
1301    * DEBUGGING UTILITIES
1302    ****************************************************************************/
1303   function perft(depth) {
1304     var moves = generate_moves({legal: false});
1305     var nodes = 0;
1306     var color = turn;
1307
1308     for (var i = 0, len = moves.length; i < len; i++) {
1309       make_move(moves[i]);
1310       if (!king_attacked(color)) {
1311         if (depth - 1 > 0) {
1312           var child_nodes = perft(depth - 1);
1313           nodes += child_nodes;
1314         } else {
1315           nodes++;
1316         }
1317       }
1318       undo_move();
1319     }
1320
1321     return nodes;
1322   }
1323
1324   return {
1325     /***************************************************************************
1326      * PUBLIC CONSTANTS (is there a better way to do this?)
1327      **************************************************************************/
1328     WHITE: WHITE,
1329     BLACK: BLACK,
1330     PAWN: PAWN,
1331     KNIGHT: KNIGHT,
1332     BISHOP: BISHOP,
1333     ROOK: ROOK,
1334     QUEEN: QUEEN,
1335     KING: KING,
1336     SQUARES: (function() {
1337                 /* from the ECMA-262 spec (section 12.6.4):
1338                  * "The mechanics of enumerating the properties ... is
1339                  * implementation dependent"
1340                  * so: for (var sq in SQUARES) { keys.push(sq); } might not be
1341                  * ordered correctly
1342                  */
1343                 var keys = [];
1344                 for (var i = SQUARES.a8; i <= SQUARES.h1; i++) {
1345                   if (i & 0x88) { i += 7; continue; }
1346                   keys.push(algebraic(i));
1347                 }
1348                 return keys;
1349               })(),
1350     FLAGS: FLAGS,
1351
1352     /***************************************************************************
1353      * PUBLIC API
1354      **************************************************************************/
1355     load: function(fen) {
1356       return load(fen);
1357     },
1358
1359     reset: function() {
1360       return reset();
1361     },
1362
1363     moves: function(options) {
1364       /* The internal representation of a chess move is in 0x88 format, and
1365        * not meant to be human-readable.  The code below converts the 0x88
1366        * square coordinates to algebraic coordinates.  It also prunes an
1367        * unnecessary move keys resulting from a verbose call.
1368        */
1369
1370       var ugly_moves = generate_moves(options);
1371       var moves = [];
1372
1373       for (var i = 0, len = ugly_moves.length; i < len; i++) {
1374
1375         /* does the user want a full move object (most likely not), or just
1376          * SAN
1377          */
1378         if (typeof options !== 'undefined' && 'verbose' in options &&
1379             options.verbose) {
1380           moves.push(make_pretty(ugly_moves[i]));
1381         } else {
1382           moves.push(move_to_san(ugly_moves[i], false));
1383         }
1384       }
1385
1386       return moves;
1387     },
1388
1389     in_check: function() {
1390       return in_check();
1391     },
1392
1393     in_checkmate: function() {
1394       return in_checkmate();
1395     },
1396
1397     in_stalemate: function() {
1398       return in_stalemate();
1399     },
1400
1401     in_draw: function() {
1402       return half_moves >= 100 ||
1403              in_stalemate() ||
1404              insufficient_material() ||
1405              in_threefold_repetition();
1406     },
1407
1408     insufficient_material: function() {
1409       return insufficient_material();
1410     },
1411
1412     in_threefold_repetition: function() {
1413       return in_threefold_repetition();
1414     },
1415
1416     game_over: function() {
1417       return half_moves >= 100 ||
1418              in_checkmate() ||
1419              in_stalemate() ||
1420              insufficient_material() ||
1421              in_threefold_repetition();
1422     },
1423
1424     validate_fen: function(fen) {
1425       return validate_fen(fen);
1426     },
1427
1428     fen: function() {
1429       return generate_fen();
1430     },
1431
1432     board: function() {
1433       var output = [],
1434           row    = [];
1435
1436       for (var i = SQUARES.a8; i <= SQUARES.h1; i++) {
1437         if (board[i] == null) {
1438           row.push(null)
1439         } else {
1440           row.push({type: board[i].type, color: board[i].color})
1441         }
1442         if ((i + 1) & 0x88) {
1443           output.push(row);
1444           row = []
1445           i += 8;
1446         }
1447       }
1448
1449       return output;
1450     },
1451
1452     pgn: function(options) {
1453       /* using the specification from http://www.chessclub.com/help/PGN-spec
1454        * example for html usage: .pgn({ max_width: 72, newline_char: "<br />" })
1455        */
1456       var newline = (typeof options === 'object' &&
1457                      typeof options.newline_char === 'string') ?
1458                      options.newline_char : '\n';
1459       var max_width = (typeof options === 'object' &&
1460                        typeof options.max_width === 'number') ?
1461                        options.max_width : 0;
1462       var result = [];
1463       var header_exists = false;
1464
1465       /* add the PGN header headerrmation */
1466       for (var i in header) {
1467         /* TODO: order of enumerated properties in header object is not
1468          * guaranteed, see ECMA-262 spec (section 12.6.4)
1469          */
1470         result.push('[' + i + ' \"' + header[i] + '\"]' + newline);
1471         header_exists = true;
1472       }
1473
1474       if (header_exists && history.length) {
1475         result.push(newline);
1476       }
1477
1478       /* pop all of history onto reversed_history */
1479       var reversed_history = [];
1480       while (history.length > 0) {
1481         reversed_history.push(undo_move());
1482       }
1483
1484       var moves = [];
1485       var move_string = '';
1486
1487       /* build the list of moves.  a move_string looks like: "3. e3 e6" */
1488       while (reversed_history.length > 0) {
1489         var move = reversed_history.pop();
1490
1491         /* if the position started with black to move, start PGN with 1. ... */
1492         if (!history.length && move.color === 'b') {
1493           move_string = move_number + '. ...';
1494         } else if (move.color === 'w') {
1495           /* store the previous generated move_string if we have one */
1496           if (move_string.length) {
1497             moves.push(move_string);
1498           }
1499           move_string = move_number + '.';
1500         }
1501
1502         move_string = move_string + ' ' + move_to_san(move, false);
1503         make_move(move);
1504       }
1505
1506       /* are there any other leftover moves? */
1507       if (move_string.length) {
1508         moves.push(move_string);
1509       }
1510
1511       /* is there a result? */
1512       if (typeof header.Result !== 'undefined') {
1513         moves.push(header.Result);
1514       }
1515
1516       /* history should be back to what is was before we started generating PGN,
1517        * so join together moves
1518        */
1519       if (max_width === 0) {
1520         return result.join('') + moves.join(' ');
1521       }
1522
1523       /* wrap the PGN output at max_width */
1524       var current_width = 0;
1525       for (var i = 0; i < moves.length; i++) {
1526         /* if the current move will push past max_width */
1527         if (current_width + moves[i].length > max_width && i !== 0) {
1528
1529           /* don't end the line with whitespace */
1530           if (result[result.length - 1] === ' ') {
1531             result.pop();
1532           }
1533
1534           result.push(newline);
1535           current_width = 0;
1536         } else if (i !== 0) {
1537           result.push(' ');
1538           current_width++;
1539         }
1540         result.push(moves[i]);
1541         current_width += moves[i].length;
1542       }
1543
1544       return result.join('');
1545     },
1546
1547     load_pgn: function(pgn, options) {
1548       // allow the user to specify the sloppy move parser to work around over
1549       // disambiguation bugs in Fritz and Chessbase
1550       var sloppy = (typeof options !== 'undefined' && 'sloppy' in options) ?
1551                     options.sloppy : false;
1552
1553       function mask(str) {
1554         return str.replace(/\\/g, '\\');
1555       }
1556
1557       function has_keys(object) {
1558         for (var key in object) {
1559           return true;
1560         }
1561         return false;
1562       }
1563
1564       function parse_pgn_header(header, options) {
1565         var newline_char = (typeof options === 'object' &&
1566                             typeof options.newline_char === 'string') ?
1567                             options.newline_char : '\r?\n';
1568         var header_obj = {};
1569         var headers = header.split(new RegExp(mask(newline_char)));
1570         var key = '';
1571         var value = '';
1572
1573         for (var i = 0; i < headers.length; i++) {
1574           key = headers[i].replace(/^\[([A-Z][A-Za-z]*)\s.*\]$/, '$1');
1575           value = headers[i].replace(/^\[[A-Za-z]+\s"(.*)"\]$/, '$1');
1576           if (trim(key).length > 0) {
1577             header_obj[key] = value;
1578           }
1579         }
1580
1581         return header_obj;
1582       }
1583
1584       var newline_char = (typeof options === 'object' &&
1585                           typeof options.newline_char === 'string') ?
1586                           options.newline_char : '\r?\n';
1587       var regex = new RegExp('^(\\[(.|' + mask(newline_char) + ')*\\])' +
1588                              '(' + mask(newline_char) + ')*' +
1589                              '1.(' + mask(newline_char) + '|.)*$', 'g');
1590
1591       /* get header part of the PGN file */
1592       var header_string = pgn.replace(regex, '$1');
1593
1594       /* no info part given, begins with moves */
1595       if (header_string[0] !== '[') {
1596         header_string = '';
1597       }
1598
1599       reset();
1600
1601       /* parse PGN header */
1602       var headers = parse_pgn_header(header_string, options);
1603       for (var key in headers) {
1604         set_header([key, headers[key]]);
1605       }
1606
1607       /* load the starting position indicated by [Setup '1'] and
1608       * [FEN position] */
1609       if (headers['SetUp'] === '1') {
1610           if (!(('FEN' in headers) && load(headers['FEN'], true ))) { // second argument to load: don't clear the headers
1611             return false;
1612           }
1613       }
1614
1615       /* delete header to get the moves */
1616       var ms = pgn.replace(header_string, '').replace(new RegExp(mask(newline_char), 'g'), ' ');
1617
1618       /* delete comments */
1619       ms = ms.replace(/(\{[^}]+\})+?/g, '');
1620
1621       /* delete recursive annotation variations */
1622       var rav_regex = /(\([^\(\)]+\))+?/g
1623       while (rav_regex.test(ms)) {
1624         ms = ms.replace(rav_regex, '');
1625       }
1626
1627       /* delete move numbers */
1628       ms = ms.replace(/\d+\.(\.\.)?/g, '');
1629
1630       /* delete ... indicating black to move */
1631       ms = ms.replace(/\.\.\./g, '');
1632
1633       /* delete numeric annotation glyphs */
1634       ms = ms.replace(/\$\d+/g, '');
1635
1636       /* trim and get array of moves */
1637       var moves = trim(ms).split(new RegExp(/\s+/));
1638
1639       /* delete empty entries */
1640       moves = moves.join(',').replace(/,,+/g, ',').split(',');
1641       var move = '';
1642
1643       for (var half_move = 0; half_move < moves.length - 1; half_move++) {
1644         move = move_from_san(moves[half_move], sloppy);
1645
1646         /* move not possible! (don't clear the board to examine to show the
1647          * latest valid position)
1648          */
1649         if (move == null) {
1650           return false;
1651         } else {
1652           make_move(move);
1653         }
1654       }
1655
1656       /* examine last move */
1657       move = moves[moves.length - 1];
1658       if (POSSIBLE_RESULTS.indexOf(move) > -1) {
1659         if (has_keys(header) && typeof header.Result === 'undefined') {
1660           set_header(['Result', move]);
1661         }
1662       }
1663       else {
1664         move = move_from_san(move, sloppy);
1665         if (move == null) {
1666           return false;
1667         } else {
1668           make_move(move);
1669         }
1670       }
1671       return true;
1672     },
1673
1674     header: function() {
1675       return set_header(arguments);
1676     },
1677
1678     ascii: function() {
1679       return ascii();
1680     },
1681
1682     turn: function() {
1683       return turn;
1684     },
1685
1686     move: function(move, options) {
1687       /* The move function can be called with in the following parameters:
1688        *
1689        * .move('Nxb7')      <- where 'move' is a case-sensitive SAN string
1690        *
1691        * .move({ from: 'h7', <- where the 'move' is a move object (additional
1692        *         to :'h8',      fields are ignored)
1693        *         promotion: 'q',
1694        *      })
1695        */
1696
1697       // allow the user to specify the sloppy move parser to work around over
1698       // disambiguation bugs in Fritz and Chessbase
1699       var sloppy = (typeof options !== 'undefined' && 'sloppy' in options) ?
1700                     options.sloppy : false;
1701
1702       var move_obj = null;
1703
1704       if (typeof move === 'string') {
1705         move_obj = move_from_san(move, sloppy);
1706       } else if (typeof move === 'object') {
1707         var moves = generate_moves();
1708
1709         /* convert the pretty move object to an ugly move object */
1710         for (var i = 0, len = moves.length; i < len; i++) {
1711           if (move.from === algebraic(moves[i].from) &&
1712               move.to === algebraic(moves[i].to) &&
1713               (!('promotion' in moves[i]) ||
1714               move.promotion === moves[i].promotion)) {
1715             move_obj = moves[i];
1716             break;
1717           }
1718         }
1719       }
1720
1721       /* failed to find move */
1722       if (!move_obj) {
1723         return null;
1724       }
1725
1726       /* need to make a copy of move because we can't generate SAN after the
1727        * move is made
1728        */
1729       var pretty_move = make_pretty(move_obj);
1730
1731       make_move(move_obj);
1732
1733       return pretty_move;
1734     },
1735
1736     undo: function() {
1737       var move = undo_move();
1738       return (move) ? make_pretty(move) : null;
1739     },
1740
1741     clear: function() {
1742       return clear();
1743     },
1744
1745     put: function(piece, square) {
1746       return put(piece, square);
1747     },
1748
1749     get: function(square) {
1750       return get(square);
1751     },
1752
1753     remove: function(square) {
1754       return remove(square);
1755     },
1756
1757     perft: function(depth) {
1758       return perft(depth);
1759     },
1760
1761     square_color: function(square) {
1762       if (square in SQUARES) {
1763         var sq_0x88 = SQUARES[square];
1764         return ((rank(sq_0x88) + file(sq_0x88)) % 2 === 0) ? 'light' : 'dark';
1765       }
1766
1767       return null;
1768     },
1769
1770     history: function(options) {
1771       var reversed_history = [];
1772       var move_history = [];
1773       var verbose = (typeof options !== 'undefined' && 'verbose' in options &&
1774                      options.verbose);
1775
1776       while (history.length > 0) {
1777         reversed_history.push(undo_move());
1778       }
1779
1780       while (reversed_history.length > 0) {
1781         var move = reversed_history.pop();
1782         if (verbose) {
1783           move_history.push(make_pretty(move));
1784         } else {
1785           move_history.push(move_to_san(move));
1786         }
1787         make_move(move);
1788       }
1789
1790       return move_history;
1791     }
1792
1793   };
1794 };
1795
1796 /* export Chess object if using node or any other CommonJS compatible
1797  * environment */
1798 if (typeof exports !== 'undefined') exports.Chess = Chess;
1799 /* export Chess object for any RequireJS compatible environment */
1800 if (typeof define !== 'undefined') define( function () { return Chess;  });