/*  This code is based on Apple's "GeekGameBoard" sample code, version 1.0.

     http://developer.apple.com/samplecode/GeekGameBoard/

     Copyright © 2007 Apple Inc. Copyright © 2008 Jens Alfke. All Rights Reserved.

     Redistribution and use in source and binary forms, with or without modification, are permitted

     provided that the following conditions are met:

     * Redistributions of source code must retain the above copyright notice, this list of conditions

       and the following disclaimer.

     * Redistributions in binary form must reproduce the above copyright notice, this list of

       conditions and the following disclaimer in the documentation and/or other materials provided

       with the distribution.

     THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS" AND ANY EXPRESS OR

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

     FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRI-

     BUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES

     (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR 

     PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN 

     CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF 

     THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.

 */

 #import "BoardView.h"

 #import "Bit.h"

 #import "BitHolder.h"

 #import "Game.h"

 #import "Player.h"

 #import "QuartzUtils.h"

 #import "GGBUtils.h"

 @interface BoardView ()

 - (void) _findDropTarget: (NSPoint)pos;

 @end

 @implementation BoardView

 @synthesize gameboard=_gameboard;

 - (void) dealloc

 {

     [_game release];

     [super dealloc];

 }

 - (void) _removeGameBoard

 {

     if( _gameboard ) {

         RemoveImmediately(_gameboard);

         _gameboard = nil;

     }

 }

 - (void) createGameBoard

 {

     [self _removeGameBoard];

     _gameboard = [[CALayer alloc] init];

     _gameboard.frame = [self gameBoardFrame];

     _gameboard.autoresizingMask = kCALayerMinXMargin | kCALayerMaxXMargin | kCALayerMinYMargin | kCALayerMaxYMargin;

     // Tell the game to set up the board:

     _game.board = _gameboard;

     [self.layer addSublayer: _gameboard];

     [_gameboard release];

 }

 - (void) reverseBoard

 {

     [_gameboard setValue: [NSNumber numberWithDouble: M_PI]

               forKeyPath: @"transform.rotation"];

 }

 - (Game*) game

 {

     return _game;

 }

 - (void) setGame: (Game*)game

 {

     if( game!=_game ) {

         setObj(&_game,game);

         [self createGameBoard];

     }

 }

 - (void) startGameNamed: (NSString*)gameClassName

 {

     Class gameClass = NSClassFromString(gameClassName);

     Game *game = [[gameClass alloc] init];

     if( game ) {

         self.game = game;

         [game release];

     }

 }

 - (BOOL) canMakeMove

 {

     return (_game && _game.currentPlayer.local && _game.currentTurnNo==_game.maxTurnNo);

 }

 - (CGRect) gameBoardFrame

 {

     return self.layer.bounds;

 }

 - (void)resetCursorRects

 {

     [super resetCursorRects];

     if( self.canMakeMove )

         [self addCursorRect: self.bounds cursor: [NSCursor openHandCursor]];

 }

 - (IBAction) enterFullScreen: (id)sender

 {

     [self _removeGameBoard];

     if( self.isInFullScreenMode ) {

         [self exitFullScreenModeWithOptions: nil];

     } else {

         [self enterFullScreenMode: self.window.screen 

                       withOptions: nil];

     }

     [self createGameBoard];

 }

 - (void)viewWillStartLiveResize

 {

     [super viewWillStartLiveResize];

     _oldSize = self.frame.size;

 }

 - (void)setFrameSize:(NSSize)newSize

 {

     [super setFrameSize: newSize];

     if( _oldSize.width > 0.0f ) {

         CGAffineTransform xform = _gameboard.affineTransform;

         xform.a = xform.d = MIN(newSize.width,newSize.height)/MIN(_oldSize.width,_oldSize.height);

         _gameboard.affineTransform = xform;

     } else

         [self createGameBoard];

 }

 - (void)viewDidEndLiveResize

 {

     [super viewDidEndLiveResize];

     _oldSize.width = _oldSize.height = 0.0f;

     [self createGameBoard];

 }

 #pragma mark -

 #pragma mark KEY EVENTS:

 - (void) keyDown: (NSEvent*)ev

 {

     if( self.isInFullScreenMode ) {

         if( [ev.charactersIgnoringModifiers hasPrefix: @"\033"] )       // Esc key

             [self enterFullScreen: self];

     }

 }

 #pragma mark -

 #pragma mark HIT-TESTING:

 /** Converts a point from window coords, to this view's root layer's coords. */

 - (CGPoint) _convertPointFromWindowToLayer: (NSPoint)locationInWindow

 {

     NSPoint where = [self convertPoint: locationInWindow fromView: nil];    // convert to view coords

     return NSPointToCGPoint( [self convertPointToBase: where] );            // then to layer coords

 }

 // Hit-testing callbacks (to identify which layers caller is interested in):

 typedef BOOL (*LayerMatchCallback)(CALayer*);

 static BOOL layerIsBit( CALayer* layer )        {return [layer isKindOfClass: [Bit class]];}

 static BOOL layerIsBitHolder( CALayer* layer )  {return [layer conformsToProtocol: @protocol(BitHolder)];}

 static BOOL layerIsDropTarget( CALayer* layer ) {return [layer respondsToSelector: @selector(draggingEntered:)];}

 /** Locates the layer at a given point in window coords.

     If the leaf layer doesn't pass the layer-match callback, the nearest ancestor that does is returned.

     If outOffset is provided, the point's position relative to the layer is stored into it. */

 - (CALayer*) hitTestPoint: (NSPoint)locationInWindow

          forLayerMatching: (LayerMatchCallback)match

                    offset: (CGPoint*)outOffset

 {

     CGPoint where = [self _convertPointFromWindowToLayer: locationInWindow ];

     CALayer *layer = [_gameboard hitTest: where];

     while( layer ) {

         if( match(layer) ) {

             CGPoint bitPos = [self.layer convertPoint: layer.position 

                               fromLayer: layer.superlayer];

             if( outOffset )

                 *outOffset = CGPointMake( bitPos.x-where.x, bitPos.y-where.y);

             return layer;

         } else

             layer = layer.superlayer;

     }

     return nil;

 }

 #pragma mark -

 #pragma mark MOUSE CLICKS & DRAGS:

 - (void) mouseDown: (NSEvent*)ev

 {

     if( ! self.canMakeMove ) {

         NSBeep();

         return;

     }

     BOOL placing = NO;

     _dragStartPos = ev.locationInWindow;

     _dragBit = (Bit*) [self hitTestPoint: _dragStartPos

                         forLayerMatching: layerIsBit 

                                   offset: &_dragOffset];

     if( ! _dragBit ) {

         // If no bit was clicked, see if it's a BitHolder the game will let the user add a Bit to:

         id<BitHolder> holder = (id<BitHolder>) [self hitTestPoint: _dragStartPos

                                                  forLayerMatching: layerIsBitHolder

                                                            offset: NULL];

         if( holder ) {

             _dragBit = [_game bitToPlaceInHolder: holder];

             if( _dragBit ) {

                 _dragOffset.x = _dragOffset.y = 0;

                 if( _dragBit.superlayer==nil )

                     _dragBit.position = [self _convertPointFromWindowToLayer: _dragStartPos];

                 placing = YES;

             }

         }

     }

     if( ! _dragBit ) {

         Beep();

         return;

     }

     // Clicked on a Bit:

     _dragMoved = NO;

     _dropTarget = nil;

     _oldHolder = _dragBit.holder;

     // Ask holder's and game's permission before dragging:

     if( _oldHolder ) {

         _dragBit = [_oldHolder canDragBit: _dragBit];

         if( _dragBit && ! [_game canBit: _dragBit moveFrom: _oldHolder] ) {

             [_oldHolder cancelDragBit: _dragBit];

             _dragBit = nil;

         }

         if( ! _dragBit ) {

             _oldHolder = nil;

             NSBeep();

             return;

         }

     }

     // Start dragging:

     _oldSuperlayer = _dragBit.superlayer;

     _oldLayerIndex = [_oldSuperlayer.sublayers indexOfObjectIdenticalTo: _dragBit];

     _oldPos = _dragBit.position;

     ChangeSuperlayer(_dragBit, self.layer, self.layer.sublayers.count);

     _dragBit.pickedUp = YES;

     [[NSCursor closedHandCursor] push];

     if( placing ) {

         if( _oldSuperlayer )

             _dragBit.position = [self _convertPointFromWindowToLayer: _dragStartPos];

         _dragMoved = YES;

         [self _findDropTarget: _dragStartPos];

     }

 }

 - (void) mouseDragged: (NSEvent*)ev

 {

     if( _dragBit ) {

         // Get the mouse position, and see if we've moved 3 pixels since the mouseDown:

         NSPoint pos = ev.locationInWindow;

         if( fabs(pos.x-_dragStartPos.x)>=3 || fabs(pos.y-_dragStartPos.y)>=3 )

             _dragMoved = YES;

         // Move the _dragBit (without animation -- it's unnecessary and slows down responsiveness):

         CGPoint where = [self _convertPointFromWindowToLayer: pos];

         where.x += _dragOffset.x;

         where.y += _dragOffset.y;

         CGPoint newPos = [_dragBit.superlayer convertPoint: where fromLayer: self.layer];

         [CATransaction flush];

         [CATransaction begin];

         [CATransaction setValue:(id)kCFBooleanTrue

                          forKey:kCATransactionDisableActions];

         _dragBit.position = newPos;

         [CATransaction commit];

         // Find what it's over:

         [self _findDropTarget: pos];

     }

 }

 - (void) _findDropTarget: (NSPoint)locationInWindow

 {

     locationInWindow.x += _dragOffset.x;

     locationInWindow.y += _dragOffset.y;

     id<BitHolder> target = (id<BitHolder>) [self hitTestPoint: locationInWindow

                                              forLayerMatching: layerIsBitHolder

                                                        offset: NULL];

     if( target == _oldHolder )

         target = nil;

     if( target != _dropTarget ) {

         [_dropTarget willNotDropBit: _dragBit];

         _dropTarget.highlighted = NO;

         _dropTarget = nil;

     }

     if( target ) {

         CGPoint targetPos = [(CALayer*)target convertPoint: _dragBit.position

                                                  fromLayer: _dragBit.superlayer];

         if( [target canDropBit: _dragBit atPoint: targetPos]

            && [_game canBit: _dragBit moveFrom: _oldHolder to: target] ) {

             _dropTarget = target;

             _dropTarget.highlighted = YES;

         }

     }

 }

 - (void) mouseUp: (NSEvent*)ev

 {

     if( _dragBit ) {

         if( _dragMoved ) {

             // Update the drag tracking to the final mouse position:

             [self mouseDragged: ev];

             _dropTarget.highlighted = NO;

             _dragBit.pickedUp = NO;

             // Is the move legal?

             if( _dropTarget && [_dropTarget dropBit: _dragBit

                                             atPoint: [(CALayer*)_dropTarget convertPoint: _dragBit.position 

                                                                             fromLayer: _dragBit.superlayer]] ) {

                 // Yes, notify the interested parties:

                 [_oldHolder draggedBit: _dragBit to: _dropTarget];

                 [_game bit: _dragBit movedFrom: _oldHolder to: _dropTarget];

             } else {

                 // Nope, cancel:

                 [_dropTarget willNotDropBit: _dragBit];

                 if( _oldSuperlayer ) {

                     ChangeSuperlayer(_dragBit, _oldSuperlayer, _oldLayerIndex);

                     _dragBit.position = _oldPos;

                     [_oldHolder cancelDragBit: _dragBit];

                 } else {

                     [_dragBit removeFromSuperlayer];

                 }

             }

         } else {

             // Just a click, without a drag:

             _dropTarget.highlighted = NO;

             _dragBit.pickedUp = NO;

             ChangeSuperlayer(_dragBit, _oldSuperlayer, _oldLayerIndex);

             [_oldHolder cancelDragBit: _dragBit];

             if( ! [_game clickedBit: _dragBit] )

                 NSBeep();

         }

         _dropTarget = nil;

         _dragBit = nil;

         [NSCursor pop];

     }

 }

 #pragma mark -

 #pragma mark INCOMING DRAGS:

 // subroutine to call the target

 static int tell( id target, SEL selector, id arg, int defaultValue )

 {

     if( target && [target respondsToSelector: selector] )

         return (ssize_t) [target performSelector: selector withObject: arg];

     else

         return defaultValue;

 }

 - (NSDragOperation)draggingEntered:(id <NSDraggingInfo>)sender

 {

     _viewDropTarget = [self hitTestPoint: [sender draggingLocation]

                         forLayerMatching: layerIsDropTarget

                                   offset: NULL];

     _viewDropOp = _viewDropTarget ?[_viewDropTarget draggingEntered: sender] :NSDragOperationNone;

     return _viewDropOp;

 }

 - (NSDragOperation)draggingUpdated:(id <NSDraggingInfo>)sender

 {

     CALayer *target = [self hitTestPoint: [sender draggingLocation]

                         forLayerMatching: layerIsDropTarget 

                                   offset: NULL];

     if( target == _viewDropTarget ) {

         if( _viewDropTarget )

             _viewDropOp = tell(_viewDropTarget,@selector(draggingUpdated:),sender,_viewDropOp);

     } else {

         tell(_viewDropTarget,@selector(draggingExited:),sender,0);

         _viewDropTarget = target;

         if( _viewDropTarget )

             _viewDropOp = [_viewDropTarget draggingEntered: sender];

         else

             _viewDropOp = NSDragOperationNone;

     }

     return _viewDropOp;

 }

 - (BOOL)wantsPeriodicDraggingUpdates

 {

     return (_viewDropTarget!=nil);

 }

 - (void)draggingExited:(id <NSDraggingInfo>)sender

 {

     tell(_viewDropTarget,@selector(draggingExited:),sender,0);

     _viewDropTarget = nil;

 }

 - (BOOL)prepareForDragOperation:(id <NSDraggingInfo>)sender

 {

     return tell(_viewDropTarget,@selector(prepareForDragOperation:),sender,YES);

 }

 - (BOOL)performDragOperation:(id <NSDraggingInfo>)sender

 {

     return [_viewDropTarget performDragOperation: sender];

 }

 - (void)concludeDragOperation:(id <NSDraggingInfo>)sender

 {

     tell(_viewDropTarget,@selector(concludeDragOperation:),sender,0);

 }

 - (void)draggingEnded:(id <NSDraggingInfo>)sender

 {

     tell(_viewDropTarget,@selector(draggingEnded:),sender,0);

 }

 @end