diff --git a/AppKit/CPAccordionView.j b/AppKit/CPAccordionView.j index 669cad8b2..c4a6e6e49 100644 --- a/AppKit/CPAccordionView.j +++ b/AppKit/CPAccordionView.j @@ -20,7 +20,7 @@ * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA */ -@import +@import @import @import @import diff --git a/AppKit/CPCollectionView.j b/AppKit/CPCollectionView.j index 588161cc9..e1c934f4c 100644 --- a/AppKit/CPCollectionView.j +++ b/AppKit/CPCollectionView.j @@ -20,7 +20,7 @@ * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA */ -@import +@import @import @import @import diff --git a/AppKit/CPDocument.j b/AppKit/CPDocument.j index 4e8bdf3e7..674a8dc0a 100644 --- a/AppKit/CPDocument.j +++ b/AppKit/CPDocument.j @@ -21,7 +21,7 @@ */ @import -@import +@import @import "CPApplication.j" @import "CPResponder.j" diff --git a/AppKit/CPKeyValueBinding.j b/AppKit/CPKeyValueBinding.j index 90f5a624c..450de2152 100644 --- a/AppKit/CPKeyValueBinding.j +++ b/AppKit/CPKeyValueBinding.j @@ -24,7 +24,7 @@ */ @import -@import +@import @import @import diff --git a/AppKit/CPMenu/CPMenu.j b/AppKit/CPMenu/CPMenu.j index 20f98508e..2d4bf62fe 100644 --- a/AppKit/CPMenu/CPMenu.j +++ b/AppKit/CPMenu/CPMenu.j @@ -20,7 +20,7 @@ * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA */ -@import +@import @import @import @import diff --git a/AppKit/CPPasteboard.j b/AppKit/CPPasteboard.j index ebcfe36fb..5a898ead0 100644 --- a/AppKit/CPPasteboard.j +++ b/AppKit/CPPasteboard.j @@ -21,7 +21,7 @@ */ @import -@import +@import @import @import diff --git a/AppKit/CPRuleEditor/CPRuleEditor.j b/AppKit/CPRuleEditor/CPRuleEditor.j index 1b7c05c7c..a8798e475 100644 --- a/AppKit/CPRuleEditor/CPRuleEditor.j +++ b/AppKit/CPRuleEditor/CPRuleEditor.j @@ -21,7 +21,7 @@ */ @import -@import +@import @import @import @import "CPTextField.j" diff --git a/AppKit/CPSegmentedControl.j b/AppKit/CPSegmentedControl.j index b85d28eaf..0399cf050 100644 --- a/AppKit/CPSegmentedControl.j +++ b/AppKit/CPSegmentedControl.j @@ -20,7 +20,7 @@ * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA */ -@import +@import @import "CPControl.j" diff --git a/AppKit/CPTableView.j b/AppKit/CPTableView.j index 7b08b408f..49a08a7d3 100644 --- a/AppKit/CPTableView.j +++ b/AppKit/CPTableView.j @@ -20,7 +20,7 @@ * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA */ -@import +@import @import @import "CGGradient.j" diff --git a/AppKit/CPView.j b/AppKit/CPView.j index ba0753e26..a1b1d42ba 100644 --- a/AppKit/CPView.j +++ b/AppKit/CPView.j @@ -20,7 +20,7 @@ * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA */ -@import +@import @import @import @import diff --git a/AppKit/CPViewController.j b/AppKit/CPViewController.j index f140716e8..f6268b4dc 100644 --- a/AppKit/CPViewController.j +++ b/AppKit/CPViewController.j @@ -20,7 +20,7 @@ * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA */ -@import +@import @import "CPApplication.j" @import "CPCib.j" diff --git a/AppKit/CPWindow/CPWindow.j b/AppKit/CPWindow/CPWindow.j index 98f3441de..ef64ba089 100644 --- a/AppKit/CPWindow/CPWindow.j +++ b/AppKit/CPWindow/CPWindow.j @@ -20,3324 +20,8 @@ * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA */ -@import -@import -@import - -@import "CGGeometry.j" -@import "CPAnimation.j" -@import "CPPlatformWindow.j" -@import "CPResponder.j" -@import "CPScreen.j" -#if PLATFORM(BROWSER) -@import "CPPlatformWindow+DOM.j" -#endif - - -/* - Borderless window mask option. - @global - @class CPWindow -*/ -CPBorderlessWindowMask = 0; -/* - Titled window mask option. - @global - @class CPWindow -*/ -CPTitledWindowMask = 1 << 0; -/* - Closeable window mask option. - @global - @class CPWindow -*/ -CPClosableWindowMask = 1 << 1; -/* - Miniaturizabe window mask option. - @global - @class CPWindow -*/ -CPMiniaturizableWindowMask = 1 << 2; -/* - Resizable window mask option. - @global - @class CPWindow -*/ -CPResizableWindowMask = 1 << 3; -/* - Textured window mask option. - @global - @class CPWindow -*/ -CPTexturedBackgroundWindowMask = 1 << 8; -/* - @global - @class CPWindow -*/ -CPBorderlessBridgeWindowMask = 1 << 20; -/* - @global - @class CPWindow -*/ -CPHUDBackgroundWindowMask = 1 << 21; - -CPWindowNotSizable = 0; -CPWindowMinXMargin = 1; -CPWindowWidthSizable = 2; -CPWindowMaxXMargin = 4; -CPWindowMinYMargin = 8; -CPWindowHeightSizable = 16; -CPWindowMaxYMargin = 32; - -CPBackgroundWindowLevel = -1; -/* - Default level for windows - @group CPWindowLevel - @global -*/ -CPNormalWindowLevel = 0; -/* - Floating palette type window - @group CPWindowLevel - @global -*/ -CPFloatingWindowLevel = 3; -/* - Submenu type window - @group CPWindowLevel - @global -*/ -CPSubmenuWindowLevel = 3; -/* - For a torn-off menu - @group CPWindowLevel - @global -*/ -CPTornOffMenuWindowLevel = 3; -/* - For the application's main menu - @group CPWindowLevel - @global -*/ -CPMainMenuWindowLevel = 24; -/* - Status window level - @group CPWindowLevel - @global -*/ -CPStatusWindowLevel = 25; -/* - Level for a modal panel - @group CPWindowLevel - @global -*/ -CPModalPanelWindowLevel = 8; -/* - Level for a pop up menu - @group CPWindowLevel - @global -*/ -CPPopUpMenuWindowLevel = 101; -/* - Level for a window being dragged - @group CPWindowLevel - @global -*/ -CPDraggingWindowLevel = 500; -/* - Level for the screens saver - @group CPWindowLevel - @global -*/ -CPScreenSaverWindowLevel = 1000; - -/* - The receiver is removed from the screen list and hidden. - @global - @class CPWindowOrderingMode -*/ -CPWindowOut = 0; -/* - The receiver is placed directly in front of the window specified. - @global - @class CPWindowOrderingMode -*/ -CPWindowAbove = 1; -/* - The receiver is placed directly behind the window specified. - @global - @class CPWindowOrderingMode -*/ -CPWindowBelow = 2; - -CPWindowWillCloseNotification = @"CPWindowWillCloseNotification"; -CPWindowDidBecomeMainNotification = @"CPWindowDidBecomeMainNotification"; -CPWindowDidResignMainNotification = @"CPWindowDidResignMainNotification"; -CPWindowDidBecomeKeyNotification = @"CPWindowDidBecomeKeyNotification"; -CPWindowDidResignKeyNotification = @"CPWindowDidResignKeyNotification"; -CPWindowDidResizeNotification = @"CPWindowDidResizeNotification"; -CPWindowDidMoveNotification = @"CPWindowDidMoveNotification"; -CPWindowWillBeginSheetNotification = @"CPWindowWillBeginSheetNotification"; -CPWindowDidEndSheetNotification = @"CPWindowDidEndSheetNotification"; -CPWindowDidMiniaturizeNotification = @"CPWindowDidMiniaturizeNotification"; -CPWindowWillMiniaturizeNotification = @"CPWindowWillMiniaturizeNotification"; -CPWindowDidDeminiaturizeNotification = @"CPWindowDidDeminiaturizeNotification"; - -_CPWindowDidChangeFirstResponderNotification = @"_CPWindowDidChangeFirstResponderNotification"; - -CPWindowShadowStyleStandard = 0; -CPWindowShadowStyleMenu = 1; -CPWindowShadowStylePanel = 2; - -var SHADOW_MARGIN_LEFT = 20.0, - SHADOW_MARGIN_RIGHT = 19.0, - SHADOW_MARGIN_TOP = 10.0, - SHADOW_MARGIN_BOTTOM = 10.0, - SHADOW_DISTANCE = 5.0, - - _CPWindowShadowColor = nil; - -var CPWindowSaveImage = nil, - CPWindowSavingImage = nil, - - CPWindowResizeTime = 0.2; - -/* - Keys for which action messages will be sent by default when unhandled, e.g. complete:. -*/ -var CPWindowActionMessageKeys = [ - CPLeftArrowFunctionKey, - CPRightArrowFunctionKey, - CPUpArrowFunctionKey, - CPDownArrowFunctionKey, - CPPageUpFunctionKey, - CPPageDownFunctionKey, - CPHomeFunctionKey, - CPEndFunctionKey, - CPEscapeFunctionKey - ]; - -/*! - @ingroup appkit - @class CPWindow - - An CPWindow instance represents a window, panel or menu on the screen.

- -

Each window has a style, which determines how the window is decorated; whether it has a border, a title bar, a resize bar, minimise and close buttons.

- -

A window has a frame. This is the frame of the entire window on the screen, including all decorations and borders. The origin of the frame represents its bottom left corner and the frame is expressed in screen coordinates.

- -

A window always contains a content view which is the highest level view available for public (application) use. This view fills the area of the window inside any decoration/border. This is the only part of the window that application programmers are allowed to draw in directly.

- -

You can convert between view coordinates and window base coordinates using the [CPView -convertPoint:fromView:], [CPView -convertPoint:toView:], [CPView -convertRect:fromView:], and [CPView -convertRect:toView:] methods with a nil view argument. - - @par Delegate Methods - - @delegate -(void)windowDidResize:(CPNotification)notification; - Sent from the notification center when the window has been resized. - @param notification contains information about the resize event - - @delegate -(CPUndoManager)windowWillReturnUndoManager:(CPWindow)window; - Called to obtain the undo manager for a window - @param window the window for which to return the undo manager - @return the window's undo manager - - @delegate -(void)windowDidBecomeMain:(CPNotification)notification; - Sent from the notification center when the delegate's window becomes - the main window. - @param notification contains information about the event - - @delegate -(void)windowDidResignMain:(CPNotification)notification; - Sent from the notification center when the delegate's window has - resigned main window status. - @param notification contains information about the event - - @delegate -(void)windowDidResignKey:(CPNotification)notification; - Sent from the notification center when the delegate's window has - resigned key window status. - @param notification contains information about the event - - @delegate -(BOOL)windowShouldClose:(id)window; - Called when the user tries to close the window. - @param window the window to close - @return \c YES allows the window to close. \c NO - vetoes the close operation and leaves the window open. - - @delegate -(BOOL)windowWillBeginSheet:(CPNotification)notification; - Sent from the notification center before sheet is visible on - the delegate's window. - @param notification contains information about the event - - @delegate -(BOOL)windowDidEndSheet:(CPNotification)notification; - Sent from the notification center when an attached sheet on the - delegate's window has been animated out and is no longer visible. - @param notification contains information about the event -*/ -@implementation CPWindow : CPResponder -{ - CPPlatformWindow _platformWindow; - - int _windowNumber; - unsigned _styleMask; - CGRect _frame; - int _level; - BOOL _isVisible; - BOOL _isMiniaturized; - BOOL _isAnimating; - BOOL _hasShadow; - BOOL _isMovableByWindowBackground; - BOOL _isMovable; - unsigned _shadowStyle; - BOOL _showsResizeIndicator; - - int _positioningMask; - CGRect _positioningScreenRect; - - BOOL _isDocumentEdited; - BOOL _isDocumentSaving; - - CPImageView _shadowView; - - CPView _windowView; - CPView _contentView; - CPView _toolbarView; - - CPArray _mouseEnteredStack; - CPView _leftMouseDownView; - CPView _rightMouseDownView; - - CPToolbar _toolbar; - CPResponder _firstResponder; - CPResponder _initialFirstResponder; - id _delegate; - - CPString _title; - - BOOL _acceptsMouseMovedEvents; - BOOL _ignoresMouseEvents; - - CPWindowController _windowController; - - CGSize _minSize; - CGSize _maxSize; - - CPUndoManager _undoManager; - CPURL _representedURL; - - CPSet _registeredDraggedTypes; - CPArray _registeredDraggedTypesArray; - CPCountedSet _inclusiveRegisteredDraggedTypes; - - CPButton _defaultButton; - BOOL _defaultButtonEnabled; - - BOOL _autorecalculatesKeyViewLoop; - BOOL _keyViewLoopIsDirty; - - BOOL _sharesChromeWithPlatformWindow; - - // Bridge Support -#if PLATFORM(DOM) - DOMElement _DOMElement; -#endif - - unsigned _autoresizingMask; - - BOOL _delegateRespondsToWindowWillReturnUndoManagerSelector; - - BOOL _isFullPlatformWindow; - _CPWindowFullPlatformWindowSession _fullPlatformWindowSession; - - CPDictionary _sheetContext; - CPWindow _parentView; - BOOL _isSheet; - _CPWindowFrameAnimation _frameAnimation; -} - -/* - Private initializer for Objective-J - @ignore -*/ -+ (void)initialize -{ - if (self !== [CPWindow class]) - return; - - var bundle = [CPBundle bundleForClass:[CPWindow class]]; - - CPWindowSavingImage = [[CPImage alloc] initWithContentsOfFile:[bundle pathForResource:@"CPProgressIndicator/CPProgressIndicatorSpinningStyleRegular.gif"] size:CGSizeMake(16.0, 16.0)] -} - -- (id)init -{ - return [self initWithContentRect:_CGRectMakeZero() styleMask:CPTitledWindowMask]; -} - -/*! - Initializes the window. The method also takes a style bit mask made up - of any of the following values: -

-CPBorderlessWindowMask
-CPTitledWindowMask
-CPClosableWindowMask
-CPMiniaturizableWindowMask
-CPResizableWindowMask
-CPTexturedBackgroundWindowMask
-
- @param aContentRect the size and location of the window in screen space - @param aStyleMask a style mask - @return the initialized window -*/ -- (id)initWithContentRect:(CGRect)aContentRect styleMask:(unsigned int)aStyleMask -{ - self = [super init]; - - if (self) - { - var windowViewClass = [[self class] _windowViewClassForStyleMask:aStyleMask]; - - _frame = [windowViewClass frameRectForContentRect:aContentRect]; - - [self _setSharesChromeWithPlatformWindow:![CPPlatform isBrowser]]; - - if ([CPPlatform isBrowser]) - [self setPlatformWindow:[CPPlatformWindow primaryPlatformWindow]]; - else - { - // give zero sized borderless bridge windows a default size if we're not in the browser so they show up in NativeHost. - if ((aStyleMask & CPBorderlessBridgeWindowMask) && aContentRect.size.width === 0 && aContentRect.size.height === 0) - { - var visibleFrame = [[[CPScreen alloc] init] visibleFrame]; - _frame.size.height = MIN(768.0, visibleFrame.size.height); - _frame.size.width = MIN(1024.0, visibleFrame.size.width); - _frame.origin.x = (visibleFrame.size.width - _frame.size.width) / 2; - _frame.origin.y = (visibleFrame.size.height - _frame.size.height) / 2; - } - [self setPlatformWindow:[[CPPlatformWindow alloc] initWithContentRect:_frame]]; - [self platformWindow]._only = self; - } - - _isFullPlatformWindow = NO; - _registeredDraggedTypes = [CPSet set]; - _registeredDraggedTypesArray = []; - _acceptsMouseMovedEvents = YES; - _isMovable = YES; - - _isSheet = NO; - _sheetContext = nil; - _parentView = nil; - - // Set up our window number. - _windowNumber = [CPApp._windows count]; - CPApp._windows[_windowNumber] = self; - - _styleMask = aStyleMask; - - [self setLevel:CPNormalWindowLevel]; - - _minSize = CGSizeMake(0.0, 0.0); - _maxSize = CGSizeMake(1000000.0, 1000000.0); - - // Create our border view which is the actual root of our view hierarchy. - _windowView = [[windowViewClass alloc] initWithFrame:CGRectMake(0.0, 0.0, CGRectGetWidth(_frame), CGRectGetHeight(_frame)) styleMask:aStyleMask]; - - [_windowView _setWindow:self]; - [_windowView setNextResponder:self]; - - [self setMovableByWindowBackground:aStyleMask & CPHUDBackgroundWindowMask]; - - // Create a generic content view. - [self setContentView:[[CPView alloc] initWithFrame:CGRectMakeZero()]]; - [self setInitialFirstResponder:[self contentView]]; - - _firstResponder = self; - -#if PLATFORM(DOM) - _DOMElement = document.createElement("div"); - - _DOMElement.style.position = "absolute"; - _DOMElement.style.visibility = "visible"; - _DOMElement.style.zIndex = 0; - - if (![self _sharesChromeWithPlatformWindow]) - { - CPDOMDisplayServerSetStyleLeftTop(_DOMElement, NULL, _CGRectGetMinX(_frame), _CGRectGetMinY(_frame)); - } - - CPDOMDisplayServerSetStyleSize(_DOMElement, 1, 1); - CPDOMDisplayServerAppendChild(_DOMElement, _windowView._DOMElement); -#endif - - [self setNextResponder:CPApp]; - - [self setHasShadow:aStyleMask !== CPBorderlessWindowMask]; - - if (aStyleMask & CPBorderlessBridgeWindowMask) - [self setFullPlatformWindow:YES]; - - _autorecalculatesKeyViewLoop = NO; - _defaultButtonEnabled = YES; - _keyViewLoopIsDirty = YES; - - [self setShowsResizeIndicator:_styleMask & CPResizableWindowMask]; - } - - return self; -} - -- (CPPlatformWindow)platformWindow -{ - return _platformWindow; -} - -/*! - Sets the platform window of the reciver. - This method will first close the reciever, - change the platform window, then reopen the window (if it was originally open). -*/ -- (void)setPlatformWindow:(CPPlatformWindow)aPlatformWindow -{ - var wasVisible = [self isVisible]; - - // we have to close it first, otherwise we get a DOM exception. - if (wasVisible) - [self close]; - - _platformWindow = aPlatformWindow; - [_platformWindow _setTitle:_title window:self]; - - if (wasVisible) - [self orderFront:self]; -} - - -/*! - @ignore -*/ -+ (Class)_windowViewClassForStyleMask:(unsigned)aStyleMask -{ - if (aStyleMask & CPHUDBackgroundWindowMask) - return _CPHUDWindowView; - - else if (aStyleMask === CPBorderlessWindowMask) - return _CPBorderlessWindowView; - - else if (aStyleMask & CPDocModalWindowMask) - return _CPDocModalWindowView; - - return _CPStandardWindowView; -} - -+ (Class)_windowViewClassForFullPlatformWindowStyleMask:(unsigned)aStyleMask -{ - return _CPBorderlessBridgeWindowView; -} - -- (void)awakeFromCib -{ - _keyViewLoopIsDirty = ![self _hasKeyViewLoop]; - - // If no key view loop has been specified by hand, and we are not intending to auto recalculate, - // set up a default key view loop. - if (_keyViewLoopIsDirty && ![self autorecalculatesKeyViewLoop]) - [self recalculateKeyViewLoop]; - - // At this time we know the final screen (or browser) size and can apply the positioning mask, if any, from the nib. - if (_positioningScreenRect) - { - var actualScreenRect = [CPPlatform isBrowser] ? [_platformWindow contentBounds] : [[self screen] visibleFrame], - frame = [self frame], - origin = frame.origin; - - if (actualScreenRect) - { - if ((_positioningMask & CPWindowPositionFlexibleLeft) && (_positioningMask & CPWindowPositionFlexibleRight)) - { - // Proportional Horizontal. - origin.x *= (actualScreenRect.size.width / _positioningScreenRect.size.width); - } - else if (_positioningMask & CPWindowPositionFlexibleLeft) - { - // Fixed from Right - origin.x += actualScreenRect.size.width - _positioningScreenRect.size.width; - } - else if (_positioningMask & CPWindowPositionFlexibleRight) - { - // Fixed from Left - } - - if ((_positioningMask & CPWindowPositionFlexibleTop) && (_positioningMask & CPWindowPositionFlexibleBottom)) - { - // Proportional Vertical. - origin.y *= (actualScreenRect.size.height / _positioningScreenRect.size.height); - } - else if (_positioningMask & CPWindowPositionFlexibleTop) - { - // Fixed from Bottom - origin.y += actualScreenRect.size.height - _positioningScreenRect.size.height; - } - else if (_positioningMask & CPWindowPositionFlexibleBottom) - { - // Fixed from Top - } - - [self setFrameOrigin:origin]; - } - } -} - -- (void)_setWindowView:(CPView)aWindowView -{ - if (_windowView === aWindowView) - return; - - var oldWindowView = _windowView; - - _windowView = aWindowView; - - if (oldWindowView) - { - [oldWindowView _setWindow:nil]; - [oldWindowView noteToolbarChanged]; - -#if PLATFORM(DOM) - CPDOMDisplayServerRemoveChild(_DOMElement, oldWindowView._DOMElement); -#endif - } - - if (_windowView) - { -#if PLATFORM(DOM) - CPDOMDisplayServerAppendChild(_DOMElement, _windowView._DOMElement); -#endif - - var contentRect = [_contentView convertRect:[_contentView bounds] toView:nil]; - - contentRect.origin = [self convertBaseToGlobal:contentRect.origin]; - - [_windowView _setWindow:self]; - [_windowView setNextResponder:self]; - [_windowView addSubview:_contentView]; - [_windowView setTitle:_title]; - [_windowView noteToolbarChanged]; - [_windowView setShowsResizeIndicator:[self showsResizeIndicator]]; - - [self setFrame:[self frameRectForContentRect:contentRect]]; - } -} - -/*! - Sets the receiver as a full platform window. If you pass YES the CPWindow instance will fill the entire browser content area, - otherwise the CPWindow will be a window inside of your browser window which the user can drag around, and resize (if you allow). - - @param BOOL - YES if the window should fill the browser window, otherwise NO. -*/ -- (void)setFullPlatformWindow:(BOOL)shouldBeFullPlatformWindow -{ - if (![_platformWindow supportsFullPlatformWindows]) - return; - - shouldBeFullPlatformWindow = !!shouldBeFullPlatformWindow; - - if (_isFullPlatformWindow === shouldBeFullPlatformWindow) - return; - - _isFullPlatformWindow = shouldBeFullPlatformWindow; - - if (_isFullPlatformWindow) - { - _fullPlatformWindowSession = _CPWindowFullPlatformWindowSessionMake(_windowView, [self contentRectForFrameRect:[self frame]], [self hasShadow], [self level]); - - var fullPlatformWindowViewClass = [[self class] _windowViewClassForFullPlatformWindowStyleMask:_styleMask], - windowView = [[fullPlatformWindowViewClass alloc] initWithFrame:CGRectMakeZero() styleMask:_styleMask]; - - [self _setWindowView:windowView]; - - [self setLevel:CPBackgroundWindowLevel]; - [self setHasShadow:NO]; - [self setAutoresizingMask:CPWindowWidthSizable | CPWindowHeightSizable]; - [self setFrame:[_platformWindow visibleFrame]]; - } - else - { - var windowView = _fullPlatformWindowSession.windowView; - - [self _setWindowView:windowView]; - - [self setLevel:_fullPlatformWindowSession.level]; - [self setHasShadow:_fullPlatformWindowSession.hasShadow]; - [self setAutoresizingMask:CPWindowNotSizable]; - - [self setFrame:[windowView frameRectForContentRect:_fullPlatformWindowSession.contentRect]]; - } -} - -/*! - @return BOOL - YES if the CPWindow fills the browser window, otherwise NO. -*/ -- (BOOL)isFullPlatformWindow -{ - return _isFullPlatformWindow; -} - -/*! - Returns the window's style mask. -*/ -- (unsigned)styleMask -{ - return _styleMask; -} - -/*! - Returns the frame rectangle used by a window. - Style masks include: - 
-    CPBorderlessWindowMask
-    CPTitledWindowMask
-    CPClosableWindowMask
-    CPMiniaturizableWindowMask (NOTE: only available in NativeHost)
-    CPResizableWindowMask
-    CPTexturedBackgroundWindowMask
-    CPBorderlessBridgeWindowMask
-    CPHUDBackgroundWindowMask
-
- - @param aContentRect the content rectangle of the window - @param aStyleMask the style mask of the window - @return the matching window's frame rectangle -*/ -+ (CGRect)frameRectForContentRect:(CGRect)aContentRect styleMask:(unsigned)aStyleMask -{ - return [[[self class] _windowViewClassForStyleMask:aStyleMask] frameRectForContentRect:aContentRect]; -} - -/*! - Returns the receiver's content rectangle. A content rectangle does not include toolbars. - @param aFrame the window's frame rectangle -*/ -- (CGRect)contentRectForFrameRect:(CGRect)aFrame -{ - return [_windowView contentRectForFrameRect:aFrame]; -} - -/*! - Retrieves the frame rectangle for this window. - @param aContentRect the window's content rectangle - @return the window's frame rectangle -*/ -- (CGRect)frameRectForContentRect:(CGRect)aContentRect -{ - return [_windowView frameRectForContentRect:aContentRect]; -} - -/*! - Returns the window's frame rectangle -*/ -- (CGRect)frame -{ - return _CGRectMakeCopy(_frame); -} - -/*! - Sets the window's frame rectangle. Also tells the window whether it should animate - the resize operation, and redraw itself if necessary. - @param aFrame the new size and location for the window - @param shouldDisplay whether the window should redraw its views - @param shouldAnimate whether the window resize should be animated. -*/ -- (void)_setClippedFrame:(CGRect)aFrame display:(BOOL)shouldDisplay animate:(BOOL)shouldAnimate -{ - aFrame.size.width = MIN(MAX(aFrame.size.width, _minSize.width), _maxSize.width) - aFrame.size.height = MIN(MAX(aFrame.size.height, _minSize.height), _maxSize.height); - [self setFrame:aFrame display:shouldDisplay animate:shouldAnimate]; -} - -/*! - Sets the frame of the window. - - @param aFrame - A CGRect of the new frame for the receiver. - @param shouldDisplay - YES if the window should call setNeedsDisplay otherwise NO. - @param shouldAnimate - YES if the window should animate to it's new size and position, otherwise NO. -*/ -- (void)setFrame:(CGRect)aFrame display:(BOOL)shouldDisplay animate:(BOOL)shouldAnimate -{ - aFrame = _CGRectMakeCopy(aFrame); - - var value = aFrame.origin.x, - delta = value - FLOOR(value); - - if (delta) - aFrame.origin.x = value > 0.879 ? CEIL(value) : FLOOR(value); - - value = aFrame.origin.y; - delta = value - FLOOR(value); - - if (delta) - aFrame.origin.y = value > 0.879 ? CEIL(value) : FLOOR(value); - - value = aFrame.size.width; - delta = value - FLOOR(value); - - if (delta) - aFrame.size.width = value > 0.15 ? CEIL(value) : FLOOR(value); - - value = aFrame.size.height; - delta = value - FLOOR(value); - - if (delta) - aFrame.size.height = value > 0.15 ? CEIL(value) : FLOOR(value); - - if (shouldAnimate) - { - [_frameAnimation stopAnimation]; - _frameAnimation = [[_CPWindowFrameAnimation alloc] initWithWindow:self targetFrame:aFrame]; - - [_frameAnimation startAnimation]; - } - else - { - var origin = _frame.origin, - newOrigin = aFrame.origin; - - if (!_CGPointEqualToPoint(origin, newOrigin)) - { - origin.x = newOrigin.x; - origin.y = newOrigin.y; - -#if PLATFORM(DOM) - if (![self _sharesChromeWithPlatformWindow]) - { - CPDOMDisplayServerSetStyleLeftTop(_DOMElement, NULL, origin.x, origin.y); - } -#endif - - [[CPNotificationCenter defaultCenter] postNotificationName:CPWindowDidMoveNotification object:self]; - } - - var size = _frame.size, - newSize = aFrame.size; - - if (!_CGSizeEqualToSize(size, newSize)) - { - size.width = newSize.width; - size.height = newSize.height; - - [_windowView setFrameSize:size]; - - if (_hasShadow) - { - // if the shadow would be taller/wider than the window height, - // make it the same as the window height. this allows views to - // become 0, 0 with no shadow on them and makes the sheet - // animation look nicer - var shadowSize = _CGSizeMake(size.width, size.height); - - if (size.width >= (SHADOW_MARGIN_LEFT + SHADOW_MARGIN_RIGHT)) - shadowSize.width += SHADOW_MARGIN_LEFT + SHADOW_MARGIN_RIGHT; - - if (size.height >= (SHADOW_MARGIN_BOTTOM + SHADOW_MARGIN_TOP + SHADOW_DISTANCE)) - shadowSize.height += SHADOW_MARGIN_BOTTOM + SHADOW_MARGIN_TOP + SHADOW_DISTANCE; - - [_shadowView setFrameSize:shadowSize]; - } - - if (!_isAnimating) - [[CPNotificationCenter defaultCenter] postNotificationName:CPWindowDidResizeNotification object:self]; - } - - if ([self _sharesChromeWithPlatformWindow]) - [_platformWindow setContentRect:_frame]; - } -} - -/*! - Sets the window's frame rect. - @param aFrame - The new CGRect of the window. - @param shouldDisplay - YES if the window should call setNeedsDisplay: otherwise NO. -*/ -- (void)setFrame:(CGRect)aFrame display:(BOOL)shouldDisplay -{ - [self _setClippedFrame:aFrame display:shouldDisplay animate:NO]; -} - -/*! - Sets the window's frame rectangle - @param aFrame - The CGRect of the windows new frame -*/ -- (void)setFrame:(CGRect)aFrame -{ - [self _setClippedFrame:aFrame display:YES animate:NO]; -} - -/*! - Sets the window's location. - @param anOrigin the new location for the window -*/ -- (void)setFrameOrigin:(CGPoint)anOrigin -{ - [self _setClippedFrame:_CGRectMake(anOrigin.x, anOrigin.y, _CGRectGetWidth(_frame), _CGRectGetHeight(_frame)) display:YES animate:NO]; - - // reposition sheet - if ([self attachedSheet]) - [self _setAttachedSheetFrameOrigin]; -} - -/*! - Sets the window's size. - @param aSize the new size for the window -*/ -- (void)setFrameSize:(CGSize)aSize -{ - [self _setClippedFrame:_CGRectMake(_CGRectGetMinX(_frame), _CGRectGetMinY(_frame), aSize.width, aSize.height) display:YES animate:NO]; -} - -/*! - Makes the receiver the front most window in the screen ordering. - @param aSender the object that requested this -*/ -- (void)orderFront:(id)aSender -{ -#if PLATFORM(DOM) - // -dw- if a sheet is clicked, the parent window should come up too - if ([self isSheet]) - [_parentView orderFront:self]; - - [_platformWindow orderFront:self]; - [_platformWindow order:CPWindowAbove window:self relativeTo:nil]; -#endif - - if (!CPApp._keyWindow) - [self makeKeyWindow]; - - if ([self isKeyWindow] && (_firstResponder === self || !_firstResponder)) - [self makeFirstResponder:_initialFirstResponder]; - - if (!CPApp._mainWindow) - [self makeMainWindow]; -} - -/* - Makes the receiver the last window in the screen ordering. - @param aSender the object that requested this - @ignore -*/ -- (void)orderBack:(id)aSender -{ - //[_platformWindow order:CPWindowBelow -} - -/*! - Hides the window. - @param the object that requested this -*/ -- (void)orderOut:(id)aSender -{ - if ([self isSheet]) - { - // -dw- as in Cocoa, orderOut: detaches the sheet and animates out - [self._parentView _detachSheetWindow]; - return; - } - -#if PLATFORM(DOM) - if ([self _sharesChromeWithPlatformWindow]) - [_platformWindow orderOut:self]; -#endif - - if ([_delegate respondsToSelector:@selector(windowWillClose:)]) - [_delegate windowWillClose:self]; - -#if PLATFORM(DOM) - [_platformWindow order:CPWindowOut window:self relativeTo:nil]; -#endif - - [self _updateMainAndKeyWindows]; -} - -/*! - Relocates the window in the screen list. - @param aPlace the positioning relative to \c otherWindowNumber - @param otherWindowNumber the window relative to which the receiver should be placed -*/ -- (void)orderWindow:(CPWindowOrderingMode)aPlace relativeTo:(int)otherWindowNumber -{ -#if PLATFORM(DOM) - [_platformWindow order:aPlace window:self relativeTo:CPApp._windows[otherWindowNumber]]; -#endif -} - -/*! - Sets the window's level - @param the window's new level -*/ -- (void)setLevel:(int)aLevel -{ - if (aLevel === _level) - return; - - [_platformWindow moveWindow:self fromLevel:_level toLevel:aLevel]; - - _level = aLevel; - - if ([self _sharesChromeWithPlatformWindow]) - [_platformWindow setLevel:aLevel]; -} - -/*! - Returns the window's current level -*/ -- (int)level -{ - return _level; -} - -/*! - Returns \c YES if the window is visible. It does not mean that the window is not obscured by other windows. -*/ -- (BOOL)isVisible -{ - return _isVisible; -} - -/*! - Returns \c YES if the window's resize indicator is showing. \c NO otherwise. -*/ -- (BOOL)showsResizeIndicator -{ - return _showsResizeIndicator; -} - -/*! - Sets the window's resize indicator. - @param shouldShowResizeIndicator \c YES sets the window to show its resize indicator. -*/ -- (void)setShowsResizeIndicator:(BOOL)shouldShowResizeIndicator -{ - shouldShowResizeIndicator = !!shouldShowResizeIndicator; - - if (_showsResizeIndicator === shouldShowResizeIndicator) - return; - - _showsResizeIndicator = shouldShowResizeIndicator; - [_windowView setShowsResizeIndicator:[self showsResizeIndicator]]; -} - -/*! - Returns the offset of the window's resize indicator. -*/ -- (CGSize)resizeIndicatorOffset -{ - return [_windowView resizeIndicatorOffset]; -} - -/*! - Sets the offset of the window's resize indicator. - @param aSize the offset for the resize indicator -*/ -- (void)setResizeIndicatorOffset:(CGSize)anOffset -{ - [_windowView setResizeIndicatorOffset:anOffset]; -} - -/*! - Sets the window's content view. The new view will be resized to fit - inside the content rectangle of the window. - @param aView the new content view for the receiver -*/ -- (void)setContentView:(CPView)aView -{ - if (_contentView) - [_contentView removeFromSuperview]; - - var bounds = CGRectMake(0.0, 0.0, CGRectGetWidth(_frame), CGRectGetHeight(_frame)); - - // During init the initial first responder is set to the contentView - // if it hasn't changed in the mean time we need to update that reference - // to the new contentView - if (_initialFirstResponder === _contentView) - [self setInitialFirstResponder:aView]; - - _contentView = aView; - [_contentView setFrame:[self contentRectForFrameRect:bounds]]; - - [_contentView setAutoresizingMask:CPViewWidthSizable | CPViewHeightSizable]; - [_windowView addSubview:_contentView]; -} - -/*! - Returns the window's current content view. -*/ -- (CPView)contentView -{ - return _contentView; -} - -/*! - Applies an alpha value to the window. - @param aValue the alpha value to apply -*/ -- (void)setAlphaValue:(float)aValue -{ - [_windowView setAlphaValue:aValue]; -} - -/*! - Returns the alpha value of the window. -*/ -- (float)alphaValue -{ - return [_windowView alphaValue]; -} - -/*! - Sets the window's background color. - @param aColor the new color for the background -*/ -- (void)setBackgroundColor:(CPColor)aColor -{ - [_windowView setBackgroundColor:aColor]; -} - -/*! - Returns the window's background color. -*/ -- (CPColor)backgroundColor -{ - return [_windowView backgroundColor]; -} - -/*! - Sets the window's minimum size. If the provided - size is the same as the current minimum size, the method simply returns. - @param aSize the new minimum size for the window -*/ -- (void)setMinSize:(CGSize)aSize -{ - if (CGSizeEqualToSize(_minSize, aSize)) - return; - - _minSize = CGSizeCreateCopy(aSize); - - var size = CGSizeMakeCopy([self frame].size), - needsFrameChange = NO; - - if (size.width < _minSize.width) - { - size.width = _minSize.width; - needsFrameChange = YES; - } - - if (size.height < _minSize.height) - { - size.height = _minSize.height; - needsFrameChange = YES; - } - - if (needsFrameChange) - [self setFrameSize:size]; -} - -/*! - Returns the windows minimum size. -*/ -- (CGSize)minSize -{ - return _minSize; -} - -/*! - Sets the window's maximum size. If the provided - size is the same as the current maximum size, - the method simply returns. - @param aSize the new maximum size -*/ -- (void)setMaxSize:(CGSize)aSize -{ - if (CGSizeEqualToSize(_maxSize, aSize)) - return; - - _maxSize = CGSizeCreateCopy(aSize); - - var size = CGSizeMakeCopy([self frame].size), - needsFrameChange = NO; - - if (size.width > _maxSize.width) - { - size.width = _maxSize.width; - needsFrameChange = YES; - } - - if (size.height > _maxSize.height) - { - size.height = _maxSize.height; - needsFrameChange = YES; - } - - if (needsFrameChange) - [self setFrameSize:size]; -} - -/*! - Returns the window's maximum size. -*/ -- (CGSize)maxSize -{ - return _maxSize; -} - -/*! - Returns \c YES if the window has a drop shadow. \c NO otherwise. -*/ -- (BOOL)hasShadow -{ - return _hasShadow; -} - -- (void)_updateShadow -{ - if ([self _sharesChromeWithPlatformWindow]) - { - if (_shadowView) - { -#if PLATFORM(DOM) - CPDOMDisplayServerRemoveChild(_DOMElement, _shadowView._DOMElement); -#endif - _shadowView = nil; - } - - [_platformWindow setHasShadow:_hasShadow]; - - return; - } - - if (_hasShadow && !_shadowView) - { - var bounds = [_windowView bounds]; - - _shadowView = [[CPView alloc] initWithFrame:CGRectMake(-SHADOW_MARGIN_LEFT, -SHADOW_MARGIN_TOP + SHADOW_DISTANCE, - SHADOW_MARGIN_LEFT + CGRectGetWidth(bounds) + SHADOW_MARGIN_RIGHT, SHADOW_MARGIN_TOP + CGRectGetHeight(bounds) + SHADOW_MARGIN_BOTTOM)]; - - if (!_CPWindowShadowColor) - { - var bundle = [CPBundle bundleForClass:[CPWindow class]]; - - _CPWindowShadowColor = [CPColor colorWithPatternImage:[[CPNinePartImage alloc] initWithImageSlices: - [ - [[CPImage alloc] initWithContentsOfFile:[bundle pathForResource:@"CPWindow/CPWindowShadow0.png"] size:CGSizeMake(20.0, 19.0)], - [[CPImage alloc] initWithContentsOfFile:[bundle pathForResource:@"CPWindow/CPWindowShadow1.png"] size:CGSizeMake(1.0, 19.0)], - [[CPImage alloc] initWithContentsOfFile:[bundle pathForResource:@"CPWindow/CPWindowShadow2.png"] size:CGSizeMake(19.0, 19.0)], - - [[CPImage alloc] initWithContentsOfFile:[bundle pathForResource:@"CPWindow/CPWindowShadow3.png"] size:CGSizeMake(20.0, 1.0)], - [[CPImage alloc] initWithContentsOfFile:[bundle pathForResource:@"CPWindow/CPWindowShadow4.png"] size:CGSizeMake(1.0, 1.0)], - [[CPImage alloc] initWithContentsOfFile:[bundle pathForResource:@"CPWindow/CPWindowShadow5.png"] size:CGSizeMake(19.0, 1.0)], - - [[CPImage alloc] initWithContentsOfFile:[bundle pathForResource:@"CPWindow/CPWindowShadow6.png"] size:CGSizeMake(20.0, 18.0)], - [[CPImage alloc] initWithContentsOfFile:[bundle pathForResource:@"CPWindow/CPWindowShadow7.png"] size:CGSizeMake(1.0, 18.0)], - [[CPImage alloc] initWithContentsOfFile:[bundle pathForResource:@"CPWindow/CPWindowShadow8.png"] size:CGSizeMake(19.0, 18.0)] - ]]]; - } - - [_shadowView setBackgroundColor:_CPWindowShadowColor]; - [_shadowView setAutoresizingMask:CPViewWidthSizable | CPViewHeightSizable]; - -#if PLATFORM(DOM) - CPDOMDisplayServerInsertBefore(_DOMElement, _shadowView._DOMElement, _windowView._DOMElement); -#endif - } - else if (!_hasShadow && _shadowView) - { -#if PLATFORM(DOM) - CPDOMDisplayServerRemoveChild(_DOMElement, _shadowView._DOMElement); -#endif - _shadowView = nil; - } -} - -/*! - Sets whether the window should have a drop shadow. - @param shouldHaveShadow \c YES to have a drop shadow. -*/ -- (void)setHasShadow:(BOOL)shouldHaveShadow -{ - if (_hasShadow === shouldHaveShadow) - return; - - _hasShadow = shouldHaveShadow; - - [self _updateShadow]; -} - -/*! - Sets the shadow style of the receiver. - Values are: - 
-    CPWindowShadowStyleStandard
-    CPWindowShadowStyleMenu
-    CPWindowShadowStylePanel
-
- - @param aStyle - The new shadow style of the receiver. -*/ -- (void)setShadowStyle:(unsigned)aStyle -{ - _shadowStyle = aStyle; - - [[self platformWindow] setShadowStyle:_shadowStyle]; -} - -/*! - Sets the delegate for the window. Passing \c nil will just remove the window's current delegate. - @param aDelegate an object to respond to the various delegate methods of CPWindow -*/ -- (void)setDelegate:(id)aDelegate -{ - var defaultCenter = [CPNotificationCenter defaultCenter]; - - [defaultCenter removeObserver:_delegate name:CPWindowDidResignKeyNotification object:self]; - [defaultCenter removeObserver:_delegate name:CPWindowDidBecomeKeyNotification object:self]; - [defaultCenter removeObserver:_delegate name:CPWindowDidBecomeMainNotification object:self]; - [defaultCenter removeObserver:_delegate name:CPWindowDidResignMainNotification object:self]; - [defaultCenter removeObserver:_delegate name:CPWindowDidMoveNotification object:self]; - [defaultCenter removeObserver:_delegate name:CPWindowDidResizeNotification object:self]; - [defaultCenter removeObserver:_delegate name:CPWindowWillBeginSheetNotification object:self]; - [defaultCenter removeObserver:_delegate name:CPWindowDidEndSheetNotification object:self]; - - _delegate = aDelegate; - _delegateRespondsToWindowWillReturnUndoManagerSelector = [_delegate respondsToSelector:@selector(windowWillReturnUndoManager:)]; - - if ([_delegate respondsToSelector:@selector(windowDidResignKey:)]) - [defaultCenter - addObserver:_delegate - selector:@selector(windowDidResignKey:) - name:CPWindowDidResignKeyNotification - object:self]; - - if ([_delegate respondsToSelector:@selector(windowDidBecomeKey:)]) - [defaultCenter - addObserver:_delegate - selector:@selector(windowDidBecomeKey:) - name:CPWindowDidBecomeKeyNotification - object:self]; - - if ([_delegate respondsToSelector:@selector(windowDidBecomeMain:)]) - [defaultCenter - addObserver:_delegate - selector:@selector(windowDidBecomeMain:) - name:CPWindowDidBecomeMainNotification - object:self]; - - if ([_delegate respondsToSelector:@selector(windowDidResignMain:)]) - [defaultCenter - addObserver:_delegate - selector:@selector(windowDidResignMain:) - name:CPWindowDidResignMainNotification - object:self]; - - if ([_delegate respondsToSelector:@selector(windowDidMove:)]) - [defaultCenter - addObserver:_delegate - selector:@selector(windowDidMove:) - name:CPWindowDidMoveNotification - object:self]; - - if ([_delegate respondsToSelector:@selector(windowDidResize:)]) - [defaultCenter - addObserver:_delegate - selector:@selector(windowDidResize:) - name:CPWindowDidResizeNotification - object:self]; - - if ([_delegate respondsToSelector:@selector(windowWillBeginSheet:)]) - [defaultCenter - addObserver:_delegate - selector:@selector(windowWillBeginSheet:) - name:CPWindowWillBeginSheetNotification - object:self]; - - if ([_delegate respondsToSelector:@selector(windowDidEndSheet:)]) - [defaultCenter - addObserver:_delegate - selector:@selector(windowDidEndSheet:) - name:CPWindowDidEndSheetNotification - object:self]; -} - -/*! - Returns window's delegate -*/ -- (id)delegate -{ - return _delegate; -} - -/*! - Sets the window's controller - @param aWindowController a window controller -*/ -- (void)setWindowController:(CPWindowController)aWindowController -{ - _windowController = aWindowController; -} - -/*! - Returns the window's controller. -*/ -- (CPWindowController)windowController -{ - return _windowController; -} - -- (void)doCommandBySelector:(SEL)aSelector -{ - if ([_delegate respondsToSelector:aSelector]) - [_delegate performSelector:aSelector]; - else - [super doCommandBySelector:aSelector]; -} - -- (BOOL)acceptsFirstResponder -{ - return NO; -} - -- (CPView)initialFirstResponder -{ - return _initialFirstResponder; -} - -- (void)setInitialFirstResponder:(CPView)aView -{ - // Before an initial first responder is set, be sure to calculate the key loop - [self _setupFirstResponder:aView]; - - _initialFirstResponder = aView; -} - -- (void)_setupFirstResponder:(CPView)anInitialFirstResponder -{ - /* - If: - - - The key loop is dirty - - The key loop does not auto-recalculate - - No view within the window has become first responder - - No initial first responder has been set - - Then calculate the key view loop and set the first responder - to the first view in the loop if no initial responder has been set, since we should - always have an initial first responder and a key loop by default. - */ - if (_keyViewLoopIsDirty && - !_autorecalculatesKeyViewLoop && - _firstResponder === self && - _initialFirstResponder === [self contentView]) - { - [self recalculateKeyViewLoop]; - - if (anInitialFirstResponder) - [self makeFirstResponder:anInitialFirstResponder]; - else - { - // Make the first key view of the content view the first responder - var firstKeyView = [[self contentView] nextValidKeyView]; - - [self makeFirstResponder:firstKeyView]; - } - } -} - -/*! - Attempts to make the \c aResponder the first responder. Before trying - to make it the first responder, the receiver will ask the current first responder - to resign its first responder status. If it resigns, it will ask - \c aResponder accept first responder, then finally tell it to become first responder. - @return \c YES if the attempt was successful. \c NO otherwise. -*/ -- (BOOL)makeFirstResponder:(CPResponder)aResponder -{ - if (_firstResponder === aResponder) - return YES; - - if (![_firstResponder resignFirstResponder]) - return NO; - - if (!aResponder || ![aResponder acceptsFirstResponder] || ![aResponder becomeFirstResponder]) - { - _firstResponder = self; - - return NO; - } - - _firstResponder = aResponder; - - [[CPNotificationCenter defaultCenter] postNotificationName:_CPWindowDidChangeFirstResponderNotification object:self]; - - return YES; -} - -/*! - Returns the window's current first responder. -*/ -- (CPResponder)firstResponder -{ - return _firstResponder; -} - -- (BOOL)acceptsMouseMovedEvents -{ - return _acceptsMouseMovedEvents; -} - -- (void)setAcceptsMouseMovedEvents:(BOOL)shouldAcceptMouseMovedEvents -{ - _acceptsMouseMovedEvents = shouldAcceptMouseMovedEvents; -} - -- (BOOL)ignoresMouseEvents -{ - return _ignoresMouseEvents; -} - -- (void)setIgnoresMouseEvents:(BOOL)shouldIgnoreMouseEvents -{ - _ignoresMouseEvents = shouldIgnoreMouseEvents; -} - -// Managing Titles - -/*! - Returns the window's title bar string -*/ -- (CPString)title -{ - return _title; -} - -/*! - Sets the window's title bar string -*/ -- (void)setTitle:(CPString)aTitle -{ - _title = aTitle; - - [_windowView setTitle:aTitle]; - [_platformWindow _setTitle:_title window:self]; - - [self _synchronizeMenuBarTitleWithWindowTitle]; -} - -/*! - Sets the title bar to represent a file path -*/ -- (void)setTitleWithRepresentedFilename:(CPString)aFilePath -{ - [self setRepresentedFilename:aFilePath]; - [self setTitle:[aFilePath lastPathComponent]]; -} - -/*! - Sets the path to the file the receiver represents -*/ -- (void)setRepresentedFilename:(CPString)aFilePath -{ - // FIXME: urls vs filepaths and all. - [self setRepresentedURL:aFilePath]; -} - -/*! - Returns the path to the file the receiver represents -*/ -- (CPString)representedFilename -{ - return _representedURL; -} - -/*! - Sets the URL that the receiver represents -*/ -- (void)setRepresentedURL:(CPURL)aURL -{ - _representedURL = aURL; -} - -/*! - Returns the URL that the receiver represents -*/ -- (CPURL)representedURL -{ - return _representedURL; -} - -- (CPScreen)screen -{ - return [[CPScreen alloc] init]; -} - -// Moving - -/*! - Sets whether the window can be moved by dragging its background. The default is based on the window style. - @param shouldBeMovableByWindowBackground \c YES makes the window move from a background drag. -*/ -- (void)setMovableByWindowBackground:(BOOL)shouldBeMovableByWindowBackground -{ - _isMovableByWindowBackground = shouldBeMovableByWindowBackground; -} - -/*! - Returns \c YES if the window can be moved by dragging its background. -*/ -- (BOOL)isMovableByWindowBackground -{ - return _isMovableByWindowBackground; -} - -/*! - Sets whether the window can be moved. - @param shouldBeMovable \c YES makes the window movable. -*/ -- (void)setMovable:(BOOL)shouldBeMovable -{ - _isMovable = shouldBeMovable; -} - -/*! - Returns \c YES if the window can be moved. -*/ -- (void)isMovable -{ - return _isMovable; -} - -/*! - Sets the window location to be the center of the screen -*/ -- (void)center -{ - if (_isFullPlatformWindow) - return; - - var size = [self frame].size, - containerSize = [CPPlatform isBrowser] ? [_platformWindow contentBounds].size : [[self screen] visibleFrame].size; - - var origin = CGPointMake((containerSize.width - size.width) / 2.0, (containerSize.height - size.height) / 2.0); - - if (origin.x < 0.0) - origin.x = 0.0; - - if (origin.y < 0.0) - origin.y = 0.0; - - [self setFrameOrigin:origin]; -} - -/*! - Dispatches events that are sent to it from CPApplication. - @param anEvent the event to be dispatched -*/ -- (void)sendEvent:(CPEvent)anEvent -{ - var type = [anEvent type], - point = [anEvent locationInWindow]; - - // If a sheet is attached events get filtered here. - // It is not clear what events should be passed to the view, perhaps all? - // CPLeftMouseDown is needed for window moving and resizing to work. - // CPMouseMoved is needed for rollover effects on title bar buttons. - var sheet = [self attachedSheet]; - if (sheet) - { - switch (type) - { - case CPLeftMouseDown: - [_windowView mouseDown:anEvent]; - - // -dw- if the window is clicked, the sheet should come to front, and become key, - // and the window should be immediately behind - [sheet makeKeyAndOrderFront:self]; - break; - case CPMouseMoved: - [_windowView mouseMoved:anEvent]; - break; - } - - return; - } - - switch (type) - { - case CPFlagsChanged: return [[self firstResponder] flagsChanged:anEvent]; - - case CPKeyUp: return [[self firstResponder] keyUp:anEvent]; - - case CPKeyDown: if ([anEvent charactersIgnoringModifiers] === CPTabCharacter) - { - if ([anEvent modifierFlags] & CPShiftKeyMask) - [self selectPreviousKeyView:self]; - else - [self selectNextKeyView:self]; -#if PLATFORM(DOM) - // Make sure the browser doesn't try to do its own tab handling. - // This is important or the browser might blur the shared text field or token field input field, - // even that we just moved it to a new first responder. - [[[anEvent window] platformWindow] _propagateCurrentDOMEvent:NO] -#endif - return; - } - else if ([anEvent charactersIgnoringModifiers] === CPBackTabCharacter) - { - var didTabBack = [self selectPreviousKeyView:self]; - if (didTabBack) - { -#if PLATFORM(DOM) - // Make sure the browser doesn't try to do its own tab handling. - // This is important or the browser might blur the shared text field or token field input field, - // even that we just moved it to a new first responder. - [[[anEvent window] platformWindow] _propagateCurrentDOMEvent:NO] -#endif - } - - return didTabBack; - } - - [[self firstResponder] keyDown:anEvent]; - - // Trigger the default button if needed - // FIXME: Is this only applicable in a sheet? See isse: #722. - if (![self disableKeyEquivalentForDefaultButton]) - { - var defaultButton = [self defaultButton], - keyEquivalent = [defaultButton keyEquivalent], - modifierMask = [defaultButton keyEquivalentModifierMask]; - - if ([anEvent _triggersKeyEquivalent:keyEquivalent withModifierMask:modifierMask]) - [[self defaultButton] performClick:self]; - } - - return; - - case CPScrollWheel: return [[_windowView hitTest:point] scrollWheel:anEvent]; - - case CPLeftMouseUp: - case CPRightMouseUp: var hitTestedView = _leftMouseDownView, - selector = type == CPRightMouseUp ? @selector(rightMouseUp:) : @selector(mouseUp:); - - if (!hitTestedView) - hitTestedView = [_windowView hitTest:point]; - - [hitTestedView performSelector:selector withObject:anEvent]; - - _leftMouseDownView = nil; - - return; - case CPLeftMouseDown: - case CPRightMouseDown: _leftMouseDownView = [_windowView hitTest:point]; - - if (_leftMouseDownView != _firstResponder && [_leftMouseDownView acceptsFirstResponder]) - [self makeFirstResponder:_leftMouseDownView]; - - [CPApp activateIgnoringOtherApps:YES]; - - var theWindow = [anEvent window], - selector = type == CPRightMouseDown ? @selector(rightMouseDown:) : @selector(mouseDown:); - - if ([theWindow isKeyWindow] || [theWindow becomesKeyOnlyIfNeeded] && ![_leftMouseDownView needsPanelToBecomeKey]) - return [_leftMouseDownView performSelector:selector withObject:anEvent]; - else - { - // FIXME: delayed ordering? - [self makeKeyAndOrderFront:self]; - - if ([_leftMouseDownView acceptsFirstMouse:anEvent]) - return [_leftMouseDownView performSelector:selector withObject:anEvent]; - } - break; - - case CPLeftMouseDragged: - case CPRightMouseDragged: if (!_leftMouseDownView) - return [[_windowView hitTest:point] mouseDragged:anEvent]; - - var selector; - if (type == CPRightMouseDragged) - { - selector = @selector(rightMouseDragged:) - if (![_leftMouseDownView respondsToSelector:selector]) - selector = nil; - } - - if (!selector) - selector = @selector(mouseDragged:) - - return [_leftMouseDownView performSelector:selector withObject:anEvent]; - - case CPMouseMoved: if (!_acceptsMouseMovedEvents) - return; - - if (!_mouseEnteredStack) - _mouseEnteredStack = []; - - var hitTestView = [_windowView hitTest:point]; - - if ([_mouseEnteredStack count] && [_mouseEnteredStack lastObject] === hitTestView) - return [hitTestView mouseMoved:anEvent]; - - var view = hitTestView, - mouseEnteredStack = []; - - while (view) - { - mouseEnteredStack.unshift(view); - - view = [view superview]; - } - - var deviation = MIN(_mouseEnteredStack.length, mouseEnteredStack.length); - - while (deviation--) - if (_mouseEnteredStack[deviation] === mouseEnteredStack[deviation]) - break; - - var index = deviation + 1, - count = _mouseEnteredStack.length; - - if (index < count) - { - var event = [CPEvent mouseEventWithType:CPMouseExited location:point modifierFlags:[anEvent modifierFlags] timestamp:[anEvent timestamp] windowNumber:_windowNumber context:nil eventNumber:-1 clickCount:1 pressure:0]; - - for (; index < count; ++index) - [_mouseEnteredStack[index] mouseExited:event]; - } - - index = deviation + 1; - count = mouseEnteredStack.length; - - if (index < count) - { - var event = [CPEvent mouseEventWithType:CPMouseEntered location:point modifierFlags:[anEvent modifierFlags] timestamp:[anEvent timestamp] windowNumber:_windowNumber context:nil eventNumber:-1 clickCount:1 pressure:0]; - - for (; index < count; ++index) - [mouseEnteredStack[index] mouseEntered:event]; - } - - _mouseEnteredStack = mouseEnteredStack; - - [hitTestView mouseMoved:anEvent]; - } -} - -/*! - Returns the window's number in the desktop's screen list -*/ -- (int)windowNumber -{ - return _windowNumber; -} - -/*! - Called when the receiver should become the key window. It also sends - the \c -becomeKeyWindow message to the first responder. -*/ -- (void)becomeKeyWindow -{ - CPApp._keyWindow = self; - - if (_firstResponder !== self && [_firstResponder respondsToSelector:@selector(becomeKeyWindow)]) - [_firstResponder becomeKeyWindow]; - - [self _setupFirstResponder:nil]; - - [_windowView noteKeyWindowStateChanged]; - - [[CPNotificationCenter defaultCenter] - postNotificationName:CPWindowDidBecomeKeyNotification - object:self]; -} - -/*! - Determines if the window can become the key window. - @return \c YES means the window can become the key window. -*/ -- (BOOL)canBecomeKeyWindow -{ - // In Cocoa only resizable or titled windows return YES here by default. But the main browser window in Cappuccino - // doesn't have these masks even that it's both titled and resizable, so we return YES when isFullPlatformWindow too. - return (_styleMask & CPTitledWindowMask) || (_styleMask & CPResizableWindowMask) || [self isFullPlatformWindow]; -} - -/*! - Returns \c YES if the window is the key window. -*/ -- (BOOL)isKeyWindow -{ - return [CPApp keyWindow] == self; -} - -/*! - Makes the window the key window and brings it to the front of the screen list. - @param aSender the object requesting this -*/ -- (void)makeKeyAndOrderFront:(id)aSender -{ - [self orderFront:self]; - - [self makeKeyWindow]; - [self makeMainWindow]; -} - -/*! - Makes this window the key window. -*/ -- (void)makeKeyWindow -{ - if ([CPApp keyWindow] === self || ![self canBecomeKeyWindow]) - return; - - [[CPApp keyWindow] resignKeyWindow]; - [self becomeKeyWindow]; -} - -/*! - Causes the window to resign it's key window status. -*/ -- (void)resignKeyWindow -{ - if (_firstResponder !== self && [_firstResponder respondsToSelector:@selector(resignKeyWindow)]) - [_firstResponder resignKeyWindow]; - - if (CPApp._keyWindow === self) - CPApp._keyWindow = nil; - - [_windowView noteKeyWindowStateChanged]; - - [[CPNotificationCenter defaultCenter] - postNotificationName:CPWindowDidResignKeyNotification - object:self]; -} - -/*! - Initiates a drag operation from the receiver to another view that accepts dragged data. - @param anImage the image to be dragged - @param aLocation the lower-left corner coordinate of \c anImage - @param mouseOffset the distance from the \c -mouseDown: location and the current location - @param anEvent the \c -mouseDown: that triggered the drag - @param aPasteboard the pasteboard that holds the drag data - @param aSourceObject the drag operation controller - @param slideBack Whether the image should 'slide back' if the drag is rejected -*/ -- (void)dragImage:(CPImage)anImage at:(CGPoint)imageLocation offset:(CGSize)mouseOffset event:(CPEvent)anEvent pasteboard:(CPPasteboard)aPasteboard source:(id)aSourceObject slideBack:(BOOL)slideBack -{ - [[CPDragServer sharedDragServer] dragImage:anImage fromWindow:self at:[self convertBaseToGlobal:imageLocation] offset:mouseOffset event:anEvent pasteboard:aPasteboard source:aSourceObject slideBack:slideBack]; -} - -- (void)_noteRegisteredDraggedTypes:(CPSet)pasteboardTypes -{ - if (!pasteboardTypes) - return; - - if (!_inclusiveRegisteredDraggedTypes) - _inclusiveRegisteredDraggedTypes = [CPCountedSet set]; - - [_inclusiveRegisteredDraggedTypes unionSet:pasteboardTypes]; -} - -- (void)_noteUnregisteredDraggedTypes:(CPSet)pasteboardTypes -{ - if (!pasteboardTypes) - return; - - [_inclusiveRegisteredDraggedTypes minusSet:pasteboardTypes]; - - if ([_inclusiveRegisteredDraggedTypes count] === 0) - _inclusiveRegisteredDraggedTypes = nil; -} - -/*! - Initiates a drag operation from the receiver to another view that accepts dragged data. - @param aView the view to be dragged - @param aLocation the lower-left corner coordinate of \c aView - @param mouseOffset the distance from the \c -mouseDown: location and the current location - @param anEvent the \c -mouseDown: that triggered the drag - @param aPasteboard the pasteboard that holds the drag data - @param aSourceObject the drag operation controller - @param slideBack Whether the view should 'slide back' if the drag is rejected -*/ -- (void)dragView:(CPView)aView at:(CGPoint)viewLocation offset:(CGSize)mouseOffset event:(CPEvent)anEvent pasteboard:(CPPasteboard)aPasteboard source:(id)aSourceObject slideBack:(BOOL)slideBack -{ - [[CPDragServer sharedDragServer] dragView:aView fromWindow:self at:[self convertBaseToGlobal:viewLocation] offset:mouseOffset event:anEvent pasteboard:aPasteboard source:aSourceObject slideBack:slideBack]; -} - -/*! - Sets the receiver's list of acceptable data types for a dragging operation. - @param pasteboardTypes an array of CPPasteboards -*/ -- (void)registerForDraggedTypes:(CPArray)pasteboardTypes -{ - if (!pasteboardTypes) - return; - - [self _noteUnregisteredDraggedTypes:_registeredDraggedTypes]; - [_registeredDraggedTypes addObjectsFromArray:pasteboardTypes]; - [self _noteRegisteredDraggedTypes:_registeredDraggedTypes]; - - _registeredDraggedTypesArray = nil; -} - -/*! - Returns an array of all types the receiver accepts for dragging operations. - @return an array of CPPasteBoards -*/ -- (CPArray)registeredDraggedTypes -{ - if (!_registeredDraggedTypesArray) - _registeredDraggedTypesArray = [_registeredDraggedTypes allObjects]; - - return _registeredDraggedTypesArray; -} - -/*! - Resets the array of acceptable data types for a dragging operation. -*/ -- (void)unregisterDraggedTypes -{ - [self _noteUnregisteredDraggedTypes:_registeredDraggedTypes]; - - _registeredDraggedTypes = [CPSet set]; - _registeredDraggedTypesArray = []; -} - -// Accessing Editing Status - -/*! - Sets whether the document has been edited. - @param isDocumentEdited \c YES if the document has been edited. -*/ -- (void)setDocumentEdited:(BOOL)isDocumentEdited -{ - if (_isDocumentEdited == isDocumentEdited) - return; - - _isDocumentEdited = isDocumentEdited; - - [CPMenu _setMenuBarIconImageAlphaValue:_isDocumentEdited ? 0.5 : 1.0]; - - [_windowView setDocumentEdited:isDocumentEdited]; -} - -/*! - Returns \c YES if the document has been edited. -*/ -- (BOOL)isDocumentEdited -{ - return _isDocumentEdited; -} - -- (void)setDocumentSaving:(BOOL)isDocumentSaving -{ - if (_isDocumentSaving == isDocumentSaving) - return; - - _isDocumentSaving = isDocumentSaving; - - [self _synchronizeSaveMenuWithDocumentSaving]; - - [_windowView windowDidChangeDocumentSaving]; -} - -- (BOOL)isDocumentSaving -{ - return _isDocumentSaving; -} - -/* @ignore */ -- (void)_synchronizeSaveMenuWithDocumentSaving -{ - if (![self isMainWindow]) - return; - - var mainMenu = [CPApp mainMenu], - index = [mainMenu indexOfItemWithTitle:_isDocumentSaving ? @"Save" : @"Saving..."]; - - if (index == CPNotFound) - return; - - var item = [mainMenu itemAtIndex:index]; - - if (_isDocumentSaving) - { - CPWindowSaveImage = [item image]; - - [item setTitle:@"Saving..."]; - [item setImage:CPWindowSavingImage]; - [item setEnabled:NO]; - } - else - { - [item setTitle:@"Save"]; - [item setImage:CPWindowSaveImage]; - [item setEnabled:YES]; - } -} - -// Minimizing Windows - -/*! - Simulates the user minimizing the window, then minimizes the window. - @param aSender the object making this request -*/ -- (void)performMiniaturize:(id)aSender -{ - //FIXME show stuff - [self miniaturize:aSender]; -} - -/*! - Minimizes the window. Posts a \c CPWindowWillMiniaturizeNotification to the - notification center before minimizing the window. -*/ -- (void)miniaturize:(id)sender -{ - [[CPNotificationCenter defaultCenter] postNotificationName:CPWindowWillMiniaturizeNotification object:self]; - - [[self platformWindow] miniaturize:sender]; - - [self _updateMainAndKeyWindows]; - - [[CPNotificationCenter defaultCenter] postNotificationName:CPWindowDidMiniaturizeNotification object:self]; - - _isMiniaturized = YES; -} - -/*! - Restores a minimized window to it's original size. -*/ -- (void)deminiaturize:(id)sender -{ - [[self platformWindow] deminiaturize:sender]; - - [[CPNotificationCenter defaultCenter] postNotificationName:CPWindowDidDeminiaturizeNotification object:self]; - - _isMiniaturized = NO; -} - -/*! - Returns YES if the window is minimized. -*/ -- (void)isMiniaturized -{ - return _isMiniaturized; -} - -// Closing Windows - -/*! - Simulates the user closing the window, then closes the window. - @param aSender the object making this request -*/ -- (void)performClose:(id)aSender -{ - if (!(_styleMask & CPClosableWindowMask)) - return; - - if ([self isFullBridge]) - { - var event = [CPApp currentEvent]; - - if ([event type] === CPKeyDown && [event characters] === "w" && ([event modifierFlags] & CPPlatformActionKeyMask)) - { - [[self platformWindow] _propagateCurrentDOMEvent:YES]; - return; - } - } - - // Only send ONE windowShouldClose: message. - if ([_delegate respondsToSelector:@selector(windowShouldClose:)]) - { - if (![_delegate windowShouldClose:self]) - return; - } - - // Only check self is delegate does NOT implement this. This also ensures this when delegate == self (returns true). - else if ([self respondsToSelector:@selector(windowShouldClose:)] && ![self windowShouldClose:self]) - return; - - var documents = [_windowController documents]; - if ([documents count]) - { - var index = [documents indexOfObject:[_windowController document]]; - - [documents[index] shouldCloseWindowController:_windowController - delegate:self - shouldCloseSelector:@selector(_windowControllerContainingDocument:shouldClose:contextInfo:) - contextInfo:{documents:[documents copy], visited:0, index:index}]; - } - else - [self close]; -} - -- (void)_windowControllerContainingDocument:(CPDocument)document shouldClose:(BOOL)shouldClose contextInfo:(Object)context -{ - if (shouldClose) - { - var windowController = [self windowController], - documents = context.documents, - count = [documents count], - visited = ++context.visited, - index = ++context.index % count; - - [document removeWindowController:windowController]; - - if (visited < count) - { - [windowController setDocument:documents[index]]; - - [documents[index] shouldCloseWindowController:_windowController - delegate:self - shouldCloseSelector:@selector(_windowControllerContainingDocument:shouldClose:contextInfo:) - contextInfo:context]; - } - else - [self close]; - } -} - -/*! - Closes the window. Posts a \c CPWindowWillCloseNotification to the - notification center before closing the window. -*/ -- (void)close -{ - [[CPNotificationCenter defaultCenter] postNotificationName:CPWindowWillCloseNotification object:self]; - - [self orderOut:nil]; -} - -// Managing Main Status -/*! - Returns \c YES if this the main window. -*/ -- (BOOL)isMainWindow -{ - return [CPApp mainWindow] === self; -} - -/*! - Returns \c YES if the window can become the main window. -*/ -- (BOOL)canBecomeMainWindow -{ - // FIXME: Also check if we can resize and titlebar. - if ([self isVisible]) - return YES; - - return NO; -} - -/*! - Makes the receiver the main window. -*/ -- (void)makeMainWindow -{ - if ([CPApp mainWindow] === self || ![self canBecomeMainWindow]) - return; - - [[CPApp mainWindow] resignMainWindow]; - [self becomeMainWindow]; -} - -/*! - Called to tell the receiver that it has become the main window. -*/ -- (void)becomeMainWindow -{ - CPApp._mainWindow = self; - - [self _synchronizeMenuBarTitleWithWindowTitle]; - [self _synchronizeSaveMenuWithDocumentSaving]; - - [_windowView noteMainWindowStateChanged]; - - [[CPNotificationCenter defaultCenter] - postNotificationName:CPWindowDidBecomeMainNotification - object:self]; -} - -/*! - Called when the window resigns main window status. -*/ -- (void)resignMainWindow -{ - [[CPNotificationCenter defaultCenter] - postNotificationName:CPWindowDidResignMainNotification - object:self]; - - if (CPApp._mainWindow === self) - CPApp._mainWindow = nil; - - [_windowView noteMainWindowStateChanged]; -} - -- (void)_updateMainAndKeyWindows -{ - var allWindows = [CPApp orderedWindows], - windowCount = [allWindows count]; - - if ([self isKeyWindow]) - { - var keyWindow = [CPApp keyWindow]; - [self resignKeyWindow]; - - if (keyWindow && keyWindow !== self && [keyWindow canBecomeKeyWindow]) - [keyWindow makeKeyWindow]; - else - { - var mainMenu = [CPApp mainMenu], - menuBarClass = objj_getClass("_CPMenuBarWindow"), - menuWindow; - - for (var i = 0; i < windowCount; i++) - { - var currentWindow = allWindows[i]; - - if ([currentWindow isKindOfClass:menuBarClass]) - menuWindow = currentWindow; - - if (currentWindow === self || currentWindow === menuWindow) - continue; - - if ([currentWindow isVisible] && [currentWindow canBecomeKeyWindow]) - { - [currentWindow makeKeyWindow]; - break; - } - } - - if (![CPApp keyWindow]) - [menuWindow makeKeyWindow]; - } - } - - if ([self isMainWindow]) - { - var mainWindow = [CPApp mainWindow]; - [self resignMainWindow]; - - if (mainWindow && mainWindow !== self && [mainWindow canBecomeMainWindow]) - [mainWindow makeMainWindow]; - else - { - var mainMenu = [CPApp mainMenu], - menuBarClass = objj_getClass("_CPMenuBarWindow"), - menuWindow; - - for (var i = 0; i < windowCount; i++) - { - var currentWindow = allWindows[i]; - - if ([currentWindow isKindOfClass:menuBarClass]) - menuWindow = currentWindow; - - if (currentWindow === self || currentWindow === menuWindow) - continue; - - if ([currentWindow isVisible] && [currentWindow canBecomeMainWindow]) - { - [currentWindow makeMainWindow]; - break; - } - } - } - } -} - -// Managing Toolbars -/*! - Return's the window's toolbar -*/ -- (CPToolbar)toolbar -{ - return _toolbar; -} - -/*! - Sets the window's toolbar. - @param aToolbar the window's new toolbar -*/ -- (void)setToolbar:(CPToolbar)aToolbar -{ - if (_toolbar === aToolbar) - return; - - // If this has an owner, dump it! - [[aToolbar _window] setToolbar:nil]; - - // This is no longer out toolbar. - [_toolbar _setWindow:nil]; - - _toolbar = aToolbar; - - // THIS is our toolbar. - [_toolbar _setWindow:self]; - - [self _noteToolbarChanged]; -} - -- (void)toggleToolbarShown:(id)aSender -{ - var toolbar = [self toolbar]; - - [toolbar setVisible:![toolbar isVisible]]; -} - -- (void)_noteToolbarChanged -{ - var frame = CGRectMakeCopy([self frame]), - newFrame; - - [_windowView noteToolbarChanged]; - - if (_isFullPlatformWindow) - newFrame = [_platformWindow visibleFrame]; - else - { - newFrame = CGRectMakeCopy([self frame]); - - newFrame.origin = frame.origin; - } - - [self setFrame:newFrame]; - /* - [_windowView setAnimatingToolbar:YES]; - [self setFrame:frame]; - [self setFrame:newFrame display:YES animate:YES]; - [_windowView setAnimatingToolbar:NO]; - */ -} - -- (void)_setFrame:(CGRect)aFrame delegate:(id)delegate duration:(int)duration curve:(CPAnimationCurve)curve -{ - [_frameAnimation stopAnimation]; - _frameAnimation = [[_CPWindowFrameAnimation alloc] initWithWindow:self targetFrame:aFrame]; - [_frameAnimation setDelegate:delegate]; - [_frameAnimation setAnimationCurve:curve]; - [_frameAnimation setDuration:duration]; - [_frameAnimation startAnimation]; -} - -- (CPTimeInterval)animationResizeTime:(CGRect)newWindowFrame -{ - return CPWindowResizeTime; -} - -/* @ignore */ -- (void)_setAttachedSheetFrameOrigin -{ - // Position the sheet above the contentRect. - var attachedSheet = [self attachedSheet]; - var contentRect = [[self contentView] frame], - sheetFrame = CGRectMakeCopy([attachedSheet frame]); - - sheetFrame.origin.y = CGRectGetMinY(_frame) + CGRectGetMinY(contentRect); - sheetFrame.origin.x = CGRectGetMinX(_frame) + FLOOR((CGRectGetWidth(_frame) - CGRectGetWidth(sheetFrame)) / 2.0); - - [attachedSheet setFrame:sheetFrame display:YES animate:NO]; -} - -/* @ignore - Starting point for sheet session, called from CPApplication beginSheet: -*/ -- (void)_attachSheet:(CPWindow)aSheet modalDelegate:(id)aModalDelegate - didEndSelector:(SEL)aDidEndSelector contextInfo:(id)aContextInfo -{ - if (_sheetContext) - { - [CPException raise:CPInternalInconsistencyException - reason:@"The target window of beginSheet: already has a sheet, did you forget orderOut: ?"]; - return; - } - - var sheetFrame = [aSheet frame]; - - _sheetContext = {"sheet": aSheet, "modalDelegate": aModalDelegate, "endSelector": aDidEndSelector, - "contextInfo": aContextInfo, "frame": _CGRectMakeCopy(sheetFrame), "returnCode": -1, - "opened": NO}; - - [self _attachSheetWindow]; -} - -/* @ignore - Called to animate the sheet in. The timer seems to solve a bug where sheets would - be partially animated under certain conditions. -*/ -- (void)_attachSheetWindow -{ - _sheetContext["isAttached"] = YES; - - // it would be ideal to block here and spin an event loop, until attach is complete - [CPTimer scheduledTimerWithTimeInterval:0.0 - target:self - selector:@selector(_sheetShouldAnimateIn:) - userInfo:nil - repeats:NO]; -} - -/* @ignore - Called to end the sheet. Note that orderOut: is needed to animate the sheet out, as in Cocoa. - The sheet isn't completely gone until _cleanupSheetWindow gets called. -*/ -- (void)_endSheet -{ - var delegate = _sheetContext["modalDelegate"], - endSelector = _sheetContext["endSelector"]; - - // If the sheet has been ordered out, defer didEndSelector until after sheet animates out. - // This must be done since we cannot block and wait for the animation to complete. - if (delegate && endSelector) - { - if (_sheetContext["isAttached"]) - objj_msgSend(delegate, endSelector, _sheetContext["sheet"], _sheetContext["returnCode"], - _sheetContext["contextInfo"]); - else - _sheetContext["deferDidEndSelector"] = YES; - } -} - -/* @ignore - Called to animate the sheet out. If called while animating in, schedules an animate - out at completion -*/ -- (void)_detachSheetWindow -{ - _sheetContext["isAttached"] = NO; - - // it would be ideal to block here and spin the event loop, until attach is complete - [CPTimer scheduledTimerWithTimeInterval:0.0 - target:self - selector:@selector(_sheetShouldAnimateOut:) - userInfo:nil - repeats:NO]; -} - -/* @ignore - Called to cleanup sheet, when we are definitely done with it -*/ -- (void)_cleanupSheetWindow -{ - var sheet = _sheetContext["sheet"], - lastFrame = _sheetContext["frame"], - deferDidEnd = _sheetContext["deferDidEndSelector"]; - - [sheet setFrame:lastFrame]; - [self _restoreMasksForView:[sheet contentView]]; - - // if the parent window is modal, the sheet started its own modal session - if (sheet._isModal) - [CPApp stopModal]; - - // restore the state of window before it was sheetified - [sheet._windowView _enableSheet:NO]; - - // close it - sheet._isSheet = NO; - [sheet orderOut:self]; - - [[CPNotificationCenter defaultCenter] postNotificationName:CPWindowDidEndSheetNotification object:self]; - - if (deferDidEnd) - { - var delegate = _sheetContext["modalDelegate"], - selector = _sheetContext["endSelector"], - returnCode = _sheetContext["returnCode"], - contextInfo = _sheetContext["contextInfo"]; - - // context must be destroyed, since didEnd might want to attach another sheet - _sheetContext = nil; - sheet._parentView = nil; - - objj_msgSend(delegate, selector, sheet, returnCode, contextInfo); - } - else - { - _sheetContext = nil; - sheet._parentView = nil; - } -} - -/* @ignore */ -- (void)animationDidEnd:(id)anim -{ - var sheet = _sheetContext["sheet"]; - if (anim._window != sheet) - return; - - [CPTimer scheduledTimerWithTimeInterval:0.0 - target:self - selector:@selector(_sheetAnimationDidEnd:) - userInfo:nil - repeats:NO]; -} - -/* @ignore */ -- (void)_sheetShouldAnimateIn:(CPTimer)timer -{ - // can't open sheet while opening or closing animation is going on - if (_sheetContext["isOpening"] || - _sheetContext["isClosing"]) - return; - - var sheet = _sheetContext["sheet"], - sheetFrame = [sheet frame], - frame = [self frame]; - - [self _setUpMasksForView:[sheet contentView]]; - - sheet._isSheet = YES; - sheet._parentView = self; - - var originx = frame.origin.x + FLOOR((frame.size.width - sheetFrame.size.width) / 2), - originy = frame.origin.y + [[self contentView] frame].origin.y, - startFrame = CGRectMake(originx, originy, sheetFrame.size.width, 0), - endFrame = CGRectMake(originx, originy, sheetFrame.size.width, sheetFrame.size.height); - - [[CPNotificationCenter defaultCenter] postNotificationName:CPWindowWillBeginSheetNotification object:self]; - - // if sheet is attached to a modal window, the sheet runs - // as if itself and the parent window are modal - sheet._isModal = NO; - if ([CPApp modalWindow] === self) - { - [CPApp runModalForWindow:sheet]; - sheet._isModal = YES; - } - - [sheet orderFront:self]; - [sheet setFrame:startFrame display:YES animate:NO]; - - _sheetContext["opened"] = YES; - _sheetContext["shouldClose"] = NO; - _sheetContext["isOpening"] = YES; - - [sheet _setFrame:endFrame delegate:self duration:[self animationResizeTime:endFrame] curve:CPAnimationEaseOut]; - - // NOTE: cocoa doesn't make window key until animation is done, but a - // keypress while animating eventually gets to the window. Therefore, - // there must be a runloop specifically designed for sheets? - [sheet makeKeyWindow]; -} - -/* @ignore */ -- (void)_sheetShouldAnimateOut:(CPTimer)timer -{ - var sheet = _sheetContext["sheet"], - startFrame = [sheet frame], - endFrame = CGRectMakeCopy(startFrame); - - if (_sheetContext["isOpening"]) - { - // allow sheet to be closed while opening, it will close when animate in completes - _sheetContext["shouldClose"] = YES; - return; - } - - if (_sheetContext["isClosing"]) - return; - - _sheetContext["opened"] = NO; - _sheetContext["frame"] = startFrame; - _sheetContext["isClosing"] = YES; - - // the parent window can be orderedOut to disable the sheet animate out, as in Cocoa - if ([self isVisible]) - { - endFrame.size.height = 0; - [self _setUpMasksForView:[sheet contentView]]; - [sheet _setFrame:endFrame delegate:self duration:[self animationResizeTime:endFrame] curve:CPAnimationEaseIn]; - } - else - { - [self _sheetAnimationDidEnd:nil]; - } -} - -/* @ignore */ -- (void)_sheetAnimationDidEnd:(CPTimer)timer -{ - var sheet = _sheetContext["sheet"]; - - _sheetContext["isOpening"] = NO; - _sheetContext["isClosing"] = NO; - - if (_sheetContext["opened"] === YES) - { - // sheet is open and completely visible - [self _restoreMasksForView:[sheet contentView]]; - - // we wanted to close the sheet while it animated in, do that now - if (_sheetContext["shouldClose"] === YES) - [self _detachSheetWindow]; - } - else - { - // sheet is closed and not visible - [self _cleanupSheetWindow]; - } -} - -- (void)_setUpMasksForView:(CPView)aView -{ - var views = [aView subviews]; - - [views addObject:aView]; - - for (var i = 0, count = [views count]; i < count; i++) - { - var view = [views objectAtIndex:i], - mask = [view autoresizingMask], - maskToAdd = (mask & CPViewMinYMargin) ? 128 : CPViewMinYMargin; - - [view setAutoresizingMask:(mask | maskToAdd)]; - } -} - -- (void)_restoreMasksForView:(CPView)aView -{ - var views = [aView subviews]; - - [views addObject:aView]; - - for (var i = 0, count = [views count]; i < count; i++) - { - var view = [views objectAtIndex:i], - mask = [view autoresizingMask], - maskToRemove = (mask & 128) ? 128 : CPViewMinYMargin; - - [view setAutoresizingMask:(mask & (~ maskToRemove))]; - } -} - -/*! - Returns the window's attached sheet. -*/ -- (CPWindow)attachedSheet -{ - if (_sheetContext === nil) - return nil; - - return _sheetContext["sheet"]; -} - -/*! - Returns \c YES if the window has ever run as a sheet. -*/ -- (BOOL)isSheet -{ - return _isSheet; -} - -// -/* - Used privately. - @ignore -*/ -- (BOOL)becomesKeyOnlyIfNeeded -{ - return NO; -} - -/*! - Returns \c YES if the receiver is able to receive input events - even when a modal session is active. -*/ -- (BOOL)worksWhenModal -{ - return NO; -} - -- (BOOL)performKeyEquivalent:(CPEvent)anEvent -{ - // FIXME: should we be starting at the root, in other words _windowView? - // The evidence seems to point to no... - return [[self contentView] performKeyEquivalent:anEvent]; -} - -- (void)keyDown:(CPEvent)anEvent -{ - // It's not clear why we do performKeyEquivalent again here... - // Perhaps to allow something to happen between sendEvent: and keyDown:? - if ([anEvent _couldBeKeyEquivalent] && [self performKeyEquivalent:anEvent]) - return; - - // Apple's documentation is inconsistent with their behavior here. According to the docs - // an event going of the responder chain is passed to the input system as a last resort. - // However, the only methods I could get Cocoa to call automatically are - // moveUp: moveDown: moveLeft: moveRight: pageUp: pageDown: and complete: - // Unhandled events just travel further up the responder chain _past_ the window. - if (![self _processKeyboardUIKey:anEvent]) - [super keyDown:anEvent]; -} - -/* - @ignore - Interprets the key event for action messages and sends the action message down the responder chain - Cocoa only sends moveDown:, moveUp:, moveLeft:, moveRight:, pageUp:, pageDown: and complete: messages. - We deviate from this by sending (the default) scrollPageUp:, scrollPageDown:, scrollToBeginningOfDocument: and scrollToEndOfDocument: for pageUp, pageDown, home and end keys. - @param anEvent the event to handle. - @return YES if the key event was handled, NO if no responder handled the key event -*/ -- (BOOL)_processKeyboardUIKey:(CPEvent)anEvent -{ - var character = [anEvent charactersIgnoringModifiers]; - - if (![CPWindowActionMessageKeys containsObject:character]) - return NO; - - var selectors = [CPKeyBinding selectorsForKey:character modifierFlags:0]; - - if ([selectors count] <= 0) - return NO; - - if (character !== CPEscapeFunctionKey) - { - var selector = [selectors objectAtIndex:0]; - return [[self firstResponder] tryToPerform:selector with:self]; - } - else - { - // Cocoa sends complete: for the escape key (in stead of the default cancelOperation:) - // This is also the only action that is not sent directly to the first responder, but through doCommandBySelector. - // The difference is that doCommandBySelector: will also send the action to the window and application delegates. - [[self firstResponder] doCommandBySelector:@selector(complete:)]; - } - - return NO; -} - -- (void)_dirtyKeyViewLoop -{ - if (_autorecalculatesKeyViewLoop) - _keyViewLoopIsDirty = YES; -} - -- (BOOL)_hasKeyViewLoop -{ - var views = allViews(self), - index = [views count]; - - while (index--) - if ([views[index] nextKeyView]) - return YES; - - return NO; -} - -- (void)recalculateKeyViewLoop -{ - var views = allViews(self); - - [views sortUsingFunction:keyViewComparator context:nil]; - - for (var index = 0, count = [views count]; index < count; ++index) - [views[index] setNextKeyView:views[(index + 1) % count]]; - - _keyViewLoopIsDirty = NO; -} - -- (void)setAutorecalculatesKeyViewLoop:(BOOL)shouldRecalculate -{ - if (_autorecalculatesKeyViewLoop === shouldRecalculate) - return; - - _autorecalculatesKeyViewLoop = shouldRecalculate; - - if (_autorecalculatesKeyViewLoop) - [self _dirtyKeyViewLoop]; -} - -- (BOOL)autorecalculatesKeyViewLoop -{ - return _autorecalculatesKeyViewLoop; -} - -- (void)selectNextKeyView:(id)sender -{ - if (_keyViewLoopIsDirty && [self autorecalculatesKeyViewLoop]) - [self recalculateKeyViewLoop]; - - var nextValidKeyView = nil; - - if ([_firstResponder isKindOfClass:[CPView class]]) - nextValidKeyView = [_firstResponder nextValidKeyView]; - - if (!nextValidKeyView) - { - var initialFirstResponder = _initialFirstResponder; - - if ([initialFirstResponder acceptsFirstResponder]) - nextValidKeyView = initialFirstResponder; - else - nextValidKeyView = [initialFirstResponder nextValidKeyView]; - } - - [self makeFirstResponder:nextValidKeyView]; -} - -- (void)selectPreviousKeyView:(id)sender -{ - if (_keyViewLoopIsDirty && [self autorecalculatesKeyViewLoop]) - [self recalculateKeyViewLoop]; - - var previousValidKeyView = nil; - - if ([_firstResponder isKindOfClass:[CPView class]]) - previousValidKeyView = [_firstResponder previousValidKeyView]; - - if (!previousValidKeyView) - { - var initialFirstResponder = _initialFirstResponder; - - if ([initialFirstResponder acceptsFirstResponder]) - previousValidKeyView = initialFirstResponder; - else - previousValidKeyView = [initialFirstResponder previousValidKeyView]; - } - - [self makeFirstResponder:previousValidKeyView]; -} - -- (void)selectKeyViewFollowingView:(CPView)aView -{ - if (_keyViewLoopIsDirty && [self autorecalculatesKeyViewLoop]) - [self recalculateKeyViewLoop]; - - var nextValidKeyView = [aView nextValidKeyView]; - - if ([nextValidKeyView isKindOfClass:[CPView class]]) - [self makeFirstResponder:nextValidKeyView]; -} - -- (void)selectKeyViewPrecedingView:(CPView)aView -{ - if (_keyViewLoopIsDirty && [self autorecalculatesKeyViewLoop]) - [self recalculateKeyViewLoop]; - - var previousValidKeyView = [aView previousValidKeyView]; - - if ([previousValidKeyView isKindOfClass:[CPView class]]) - [self makeFirstResponder:previousValidKeyView]; -} - -/*! - Sets the default button for the window. - Note: this method is deprecated use setDefaultButton: instead. - @param aButton - The button that should become default. -*/ -- (void)setDefaultButtonCell:(CPButton)aButton -{ - [self setDefaultButton:aButton]; -} - -/*! - Returns the default button of the receiver. - NOTE: This method is deprecated. Use defaultButton instead. -*/ -- (CPButton)defaultButtonCell -{ - return [self defaultButton]; -} - -/*! - Sets the default button for the window. - This is equivalent to setting the the key equivalent of the button to "return". - Additionally this will turn your button blue (with the Aristo theme). - @param aButton - The button that should become default. -*/ -- (void)setDefaultButton:(CPButton)aButton -{ - if (_defaultButton === aButton) - return; - - if ([_defaultButton keyEquivalent] === CPCarriageReturnCharacter) - [_defaultButton setKeyEquivalent:nil]; - - _defaultButton = aButton; - - if ([_defaultButton keyEquivalent] !== CPCarriageReturnCharacter) - [_defaultButton setKeyEquivalent:CPCarriageReturnCharacter]; -} - -/*! - Returns the default button of the receiver. -*/ -- (CPButton)defaultButton -{ - return _defaultButton; -} - -/*! - Sets the default button key equivalent to "return". -*/ -- (void)enableKeyEquivalentForDefaultButton -{ - _defaultButtonEnabled = YES; -} - -/*! - Sets the default button key equivalent to "return". - NOTE: this method is deprecated. Use enableKeyEquivalentForDefaultButton instead. -*/ -- (void)enableKeyEquivalentForDefaultButtonCell -{ - [self enableKeyEquivalentForDefaultButton]; -} - -/*! - Removes the key equivalent for the default button. -*/ -- (void)disableKeyEquivalentForDefaultButton -{ - _defaultButtonEnabled = NO; -} - -/*! - Removes the key equivalent for the default button. - Note: this method is deprecated. Use disableKeyEquivalentForDefaultButton instead. -*/ -- (void)disableKeyEquivalentForDefaultButtonCell -{ - [self disableKeyEquivalentForDefaultButton]; -} - -@end - -var allViews = function(aWindow) -{ - var views = [CPArray arrayWithObject:[aWindow contentView]]; - - [views addObjectsFromArray:[[aWindow contentView] subviews]]; - - // Start from index 1 because index 0 is the contentView and its subviews have already been added - for (var index = 1; index < views.length; ++index) - views = views.concat([views[index] subviews]); - - return views; -}; - -var keyViewComparator = function(lhs, rhs, context) -{ - var lhsBounds = [lhs convertRect:[lhs bounds] toView:nil], - rhsBounds = [rhs convertRect:[rhs bounds] toView:nil], - lhsY = _CGRectGetMinY(lhsBounds), - rhsY = _CGRectGetMinY(rhsBounds), - lhsX = _CGRectGetMinX(lhsBounds), - rhsX = _CGRectGetMinX(rhsBounds), - intersectsVertically = MIN(_CGRectGetMaxY(lhsBounds), _CGRectGetMaxY(rhsBounds)) - MAX(lhsY, rhsY); - - // If two views are "on the same line" (intersect vertically), then rely on the x comparison. - if (intersectsVertically > 0) - { - if (lhsX < rhsX) - return CPOrderedAscending; - - if (lhsX === rhsX) - return CPOrderedSame; - - return CPOrderedDescending; - } - - if (lhsY < rhsY) - return CPOrderedAscending; - - if (lhsY === rhsY) - return CPOrderedSame; - - return CPOrderedDescending; -}; - -@implementation CPWindow (MenuBar) - -- (void)_synchronizeMenuBarTitleWithWindowTitle -{ - // Windows with Documents automatically update the native window title and the menu bar title. - if (![_windowController document] || ![self isMainWindow]) - return; - - [CPMenu setMenuBarTitle:_title]; -} - -@end - -@implementation CPWindow (BridgeSupport) - -/* - @ignore -*/ -- (void)resizeWithOldPlatformWindowSize:(CGSize)aSize -{ - if ([self isFullPlatformWindow]) - return [self setFrame:[_platformWindow visibleFrame]]; - - if (_autoresizingMask == CPWindowNotSizable) - return; - - var frame = [_platformWindow contentBounds], - newFrame = CGRectMakeCopy(_frame), - dX = (CGRectGetWidth(frame) - aSize.width) / - (((_autoresizingMask & CPWindowMinXMargin) ? 1 : 0) + (_autoresizingMask & CPWindowWidthSizable ? 1 : 0) + (_autoresizingMask & CPWindowMaxXMargin ? 1 : 0)), - dY = (CGRectGetHeight(frame) - aSize.height) / - ((_autoresizingMask & CPWindowMinYMargin ? 1 : 0) + (_autoresizingMask & CPWindowHeightSizable ? 1 : 0) + (_autoresizingMask & CPWindowMaxYMargin ? 1 : 0)); - - if (_autoresizingMask & CPWindowMinXMargin) - newFrame.origin.x += dX; - if (_autoresizingMask & CPWindowWidthSizable) - newFrame.size.width += dX; - - if (_autoresizingMask & CPWindowMinYMargin) - newFrame.origin.y += dY; - if (_autoresizingMask & CPWindowHeightSizable) - newFrame.size.height += dY; - - [self setFrame:newFrame]; -} - -/* - @ignore -*/ -- (void)setAutoresizingMask:(unsigned)anAutoresizingMask -{ - _autoresizingMask = anAutoresizingMask; -} - -/* - @ignore -*/ -- (unsigned)autoresizingMask -{ - return _autoresizingMask; -} - -/*! - Converts aPoint from the window coordinate system to the global coordinate system. -*/ -- (CGPoint)convertBaseToGlobal:(CGPoint)aPoint -{ - return [CPPlatform isBrowser] ? [self convertBaseToPlatformWindow:aPoint] : [self convertBaseToScreen:aPoint]; -} - -/*! - Converts aPoint from the global coordinate system to the window coordinate system. -*/ -- (CGPoint)convertGlobalToBase:(CGPoint)aPoint -{ - return [CPPlatform isBrowser] ? [self convertPlatformWindowToBase:aPoint] : [self convertScreenToBase:aPoint]; -} - -/*! - Converts aPoint from the window coordinate system to the coordinate system of the parent platform window. -*/ -- (CGPoint)convertBaseToPlatformWindow:(CGPoint)aPoint -{ - if ([self _sharesChromeWithPlatformWindow]) - return _CGPointMakeCopy(aPoint); - - var origin = [self frame].origin; - - return _CGPointMake(aPoint.x + origin.x, aPoint.y + origin.y); -} - -/*! - Converts aPoint from the parent platform window coordinate system to the window's coordinate system. -*/ -- (CGPoint)convertPlatformWindowToBase:(CGPoint)aPoint -{ - if ([self _sharesChromeWithPlatformWindow]) - return _CGPointMakeCopy(aPoint); - - var origin = [self frame].origin; - - return _CGPointMake(aPoint.x - origin.x, aPoint.y - origin.y); -} - -- (CGPoint)convertScreenToBase:(CGPoint)aPoint -{ - return [self convertPlatformWindowToBase:[_platformWindow convertScreenToBase:aPoint]]; -} - -- (CGPoint)convertBaseToScreen:(CGPoint)aPoint -{ - return [_platformWindow convertBaseToScreen:[self convertBaseToPlatformWindow:aPoint]]; -} - -- (void)_setSharesChromeWithPlatformWindow:(BOOL)shouldShareFrameWithPlatformWindow -{ - // We canna' do it captain! We just don't have the power! - if (shouldShareFrameWithPlatformWindow && [CPPlatform isBrowser]) - return; - - _sharesChromeWithPlatformWindow = shouldShareFrameWithPlatformWindow; - - [self _updateShadow]; -} - -- (BOOL)_sharesChromeWithPlatformWindow -{ - return _sharesChromeWithPlatformWindow; -} - -// Undo and Redo Support -/*! - Returns the window's undo manager. -*/ -- (CPUndoManager)undoManager -{ - // If we've ever created an undo manager, return it. - if (_undoManager) - return _undoManager; - - // If not, check to see if the document has one. - var documentUndoManager = [[_windowController document] undoManager]; - - if (documentUndoManager) - return documentUndoManager; - - // If not, check to see if the delegate has one. - if (_delegateRespondsToWindowWillReturnUndoManagerSelector) - return [_delegate windowWillReturnUndoManager:self]; - - // If not, create one. - if (!_undoManager) - _undoManager = [[CPUndoManager alloc] init]; - - return _undoManager; -} - -/*! - Sends the undo manager an \c -undo: message. - @param aSender the object requesting this -*/ -- (void)undo:(id)aSender -{ - [[self undoManager] undo]; -} - -/*! - Sends the undo manager a \c -redo: message. - @param aSender the object requesting this -*/ -- (void)redo:(id)aSender -{ - [[self undoManager] redo]; -} - -- (BOOL)containsPoint:(CGPoint)aPoint -{ - return CGRectContainsPoint(_frame, aPoint); -} - -@end - -@implementation CPWindow (Deprecated) -/*! - Sets the CPWindow to fill the whole browser window. - NOTE: this method has been deprecated in favor of setFullPlatformWindow: -*/ -- (void)setFullBridge:(BOOL)shouldBeFullBridge -{ - [self setFullPlatformWindow:shouldBeFullBridge]; -} - -/*! - Returns YES if the window fills the full browser window, otherwise NO. - NOTE: this method has been deprecated in favor of isFullPlatformWindow. -*/ -- (BOOL)isFullBridge -{ - return [self isFullPlatformWindow]; -} - -/* - @ignore -*/ -- (CGPoint)convertBaseToBridge:(CGPoint)aPoint -{ - return [self convertBaseToPlatformWindow:aPoint]; -} - -/* - @ignore -*/ -- (CGPoint)convertBridgeToBase:(CGPoint)aPoint -{ - return [self convertPlatformWindowToBase:aPoint]; -} - -@end - -var interpolate = function(fromValue, toValue, progress) -{ - return fromValue + (toValue - fromValue) * progress; -}; - -/* @ignore */ -@implementation _CPWindowFrameAnimation : CPAnimation -{ - CPWindow _window; - - CGRect _startFrame; - CGRect _targetFrame; -} - -- (id)initWithWindow:(CPWindow)aWindow targetFrame:(CGRect)aTargetFrame -{ - self = [super initWithDuration:[aWindow animationResizeTime:aTargetFrame] animationCurve:CPAnimationLinear]; - - if (self) - { - _window = aWindow; - - _targetFrame = CGRectMakeCopy(aTargetFrame); - _startFrame = CGRectMakeCopy([_window frame]); - } - - return self; -} - -- (void)startAnimation -{ - [super startAnimation]; - - _window._isAnimating = YES; -} - -- (void)setCurrentProgress:(float)aProgress -{ - [super setCurrentProgress:aProgress]; - - var value = [self currentValue]; - - if (value == 1.0) - _window._isAnimating = NO; - - var newFrame = CGRectMake(interpolate(CGRectGetMinX(_startFrame), CGRectGetMinX(_targetFrame), value), - interpolate(CGRectGetMinY(_startFrame), CGRectGetMinY(_targetFrame), value), - interpolate(CGRectGetWidth(_startFrame), CGRectGetWidth(_targetFrame), value), - interpolate(CGRectGetHeight(_startFrame), CGRectGetHeight(_targetFrame), value)); - - [_window setFrame:newFrame display:YES animate:NO]; -} - -@end - -function _CPWindowFullPlatformWindowSessionMake(aWindowView, aContentRect, hasShadow, aLevel) -{ - return { windowView:aWindowView, contentRect:aContentRect, hasShadow:hasShadow, level:aLevel }; -} - -CPStandardWindowShadowStyle = 0; -CPMenuWindowShadowStyle = 1; -CPPanelWindowShadowStyle = 2; -CPCustomWindowShadowStyle = 3; - - -/*@import "_CPWindowView.j" +@import "_CPWindow.j" +@import "_CPWindowView.j" @import "_CPStandardWindowView.j" @import "_CPDocModalWindowView.j" @import "_CPToolTipWindowView.j" @@ -3346,4 +30,4 @@ CPCustomWindowShadowStyle = 3; @import "_CPBorderlessBridgeWindowView.j" @import "_CPAttachedWindowView.j" @import "CPDragServer.j" -@import "CPView.j"*/ +//@import "CPView.j" diff --git a/AppKit/CPWindow/_CPWindow.j b/AppKit/CPWindow/_CPWindow.j new file mode 100644 index 000000000..98f3441de --- /dev/null +++ b/AppKit/CPWindow/_CPWindow.j @@ -0,0 +1,3349 @@ +/* + * CPWindow.j + * AppKit + * + * Created by Francisco Tolmasky. + * Copyright 2008, 280 North, Inc. + * + * This library is free software; you can redistribute it and/or + * modify it under the terms of the GNU Lesser General Public + * License as published by the Free Software Foundation; either + * version 2.1 of the License, or (at your option) any later version. + * + * This library is distributed in the hope that it will be useful, + * but WITHOUT ANY WARRANTY; without even the implied warranty of + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU + * Lesser General Public License for more details. + * + * You should have received a copy of the GNU Lesser General Public + * License along with this library; if not, write to the Free Software + * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA + */ + +@import +@import +@import + +@import "CGGeometry.j" +@import "CPAnimation.j" +@import "CPPlatformWindow.j" +@import "CPResponder.j" +@import "CPScreen.j" +#if PLATFORM(BROWSER) +@import "CPPlatformWindow+DOM.j" +#endif + + +/* + Borderless window mask option. + @global + @class CPWindow +*/ +CPBorderlessWindowMask = 0; +/* + Titled window mask option. + @global + @class CPWindow +*/ +CPTitledWindowMask = 1 << 0; +/* + Closeable window mask option. + @global + @class CPWindow +*/ +CPClosableWindowMask = 1 << 1; +/* + Miniaturizabe window mask option. + @global + @class CPWindow +*/ +CPMiniaturizableWindowMask = 1 << 2; +/* + Resizable window mask option. + @global + @class CPWindow +*/ +CPResizableWindowMask = 1 << 3; +/* + Textured window mask option. + @global + @class CPWindow +*/ +CPTexturedBackgroundWindowMask = 1 << 8; +/* + @global + @class CPWindow +*/ +CPBorderlessBridgeWindowMask = 1 << 20; +/* + @global + @class CPWindow +*/ +CPHUDBackgroundWindowMask = 1 << 21; + +CPWindowNotSizable = 0; +CPWindowMinXMargin = 1; +CPWindowWidthSizable = 2; +CPWindowMaxXMargin = 4; +CPWindowMinYMargin = 8; +CPWindowHeightSizable = 16; +CPWindowMaxYMargin = 32; + +CPBackgroundWindowLevel = -1; +/* + Default level for windows + @group CPWindowLevel + @global +*/ +CPNormalWindowLevel = 0; +/* + Floating palette type window + @group CPWindowLevel + @global +*/ +CPFloatingWindowLevel = 3; +/* + Submenu type window + @group CPWindowLevel + @global +*/ +CPSubmenuWindowLevel = 3; +/* + For a torn-off menu + @group CPWindowLevel + @global +*/ +CPTornOffMenuWindowLevel = 3; +/* + For the application's main menu + @group CPWindowLevel + @global +*/ +CPMainMenuWindowLevel = 24; +/* + Status window level + @group CPWindowLevel + @global +*/ +CPStatusWindowLevel = 25; +/* + Level for a modal panel + @group CPWindowLevel + @global +*/ +CPModalPanelWindowLevel = 8; +/* + Level for a pop up menu + @group CPWindowLevel + @global +*/ +CPPopUpMenuWindowLevel = 101; +/* + Level for a window being dragged + @group CPWindowLevel + @global +*/ +CPDraggingWindowLevel = 500; +/* + Level for the screens saver + @group CPWindowLevel + @global +*/ +CPScreenSaverWindowLevel = 1000; + +/* + The receiver is removed from the screen list and hidden. + @global + @class CPWindowOrderingMode +*/ +CPWindowOut = 0; +/* + The receiver is placed directly in front of the window specified. + @global + @class CPWindowOrderingMode +*/ +CPWindowAbove = 1; +/* + The receiver is placed directly behind the window specified. + @global + @class CPWindowOrderingMode +*/ +CPWindowBelow = 2; + +CPWindowWillCloseNotification = @"CPWindowWillCloseNotification"; +CPWindowDidBecomeMainNotification = @"CPWindowDidBecomeMainNotification"; +CPWindowDidResignMainNotification = @"CPWindowDidResignMainNotification"; +CPWindowDidBecomeKeyNotification = @"CPWindowDidBecomeKeyNotification"; +CPWindowDidResignKeyNotification = @"CPWindowDidResignKeyNotification"; +CPWindowDidResizeNotification = @"CPWindowDidResizeNotification"; +CPWindowDidMoveNotification = @"CPWindowDidMoveNotification"; +CPWindowWillBeginSheetNotification = @"CPWindowWillBeginSheetNotification"; +CPWindowDidEndSheetNotification = @"CPWindowDidEndSheetNotification"; +CPWindowDidMiniaturizeNotification = @"CPWindowDidMiniaturizeNotification"; +CPWindowWillMiniaturizeNotification = @"CPWindowWillMiniaturizeNotification"; +CPWindowDidDeminiaturizeNotification = @"CPWindowDidDeminiaturizeNotification"; + +_CPWindowDidChangeFirstResponderNotification = @"_CPWindowDidChangeFirstResponderNotification"; + +CPWindowShadowStyleStandard = 0; +CPWindowShadowStyleMenu = 1; +CPWindowShadowStylePanel = 2; + +var SHADOW_MARGIN_LEFT = 20.0, + SHADOW_MARGIN_RIGHT = 19.0, + SHADOW_MARGIN_TOP = 10.0, + SHADOW_MARGIN_BOTTOM = 10.0, + SHADOW_DISTANCE = 5.0, + + _CPWindowShadowColor = nil; + +var CPWindowSaveImage = nil, + CPWindowSavingImage = nil, + + CPWindowResizeTime = 0.2; + +/* + Keys for which action messages will be sent by default when unhandled, e.g. complete:. +*/ +var CPWindowActionMessageKeys = [ + CPLeftArrowFunctionKey, + CPRightArrowFunctionKey, + CPUpArrowFunctionKey, + CPDownArrowFunctionKey, + CPPageUpFunctionKey, + CPPageDownFunctionKey, + CPHomeFunctionKey, + CPEndFunctionKey, + CPEscapeFunctionKey + ]; + +/*! + @ingroup appkit + @class CPWindow + + An CPWindow instance represents a window, panel or menu on the screen.

+ +

Each window has a style, which determines how the window is decorated; whether it has a border, a title bar, a resize bar, minimise and close buttons.

+ +

A window has a frame. This is the frame of the entire window on the screen, including all decorations and borders. The origin of the frame represents its bottom left corner and the frame is expressed in screen coordinates.

+ +

A window always contains a content view which is the highest level view available for public (application) use. This view fills the area of the window inside any decoration/border. This is the only part of the window that application programmers are allowed to draw in directly.

+ +

You can convert between view coordinates and window base coordinates using the [CPView -convertPoint:fromView:], [CPView -convertPoint:toView:], [CPView -convertRect:fromView:], and [CPView -convertRect:toView:] methods with a nil view argument. + + @par Delegate Methods + + @delegate -(void)windowDidResize:(CPNotification)notification; + Sent from the notification center when the window has been resized. + @param notification contains information about the resize event + + @delegate -(CPUndoManager)windowWillReturnUndoManager:(CPWindow)window; + Called to obtain the undo manager for a window + @param window the window for which to return the undo manager + @return the window's undo manager + + @delegate -(void)windowDidBecomeMain:(CPNotification)notification; + Sent from the notification center when the delegate's window becomes + the main window. + @param notification contains information about the event + + @delegate -(void)windowDidResignMain:(CPNotification)notification; + Sent from the notification center when the delegate's window has + resigned main window status. + @param notification contains information about the event + + @delegate -(void)windowDidResignKey:(CPNotification)notification; + Sent from the notification center when the delegate's window has + resigned key window status. + @param notification contains information about the event + + @delegate -(BOOL)windowShouldClose:(id)window; + Called when the user tries to close the window. + @param window the window to close + @return \c YES allows the window to close. \c NO + vetoes the close operation and leaves the window open. + + @delegate -(BOOL)windowWillBeginSheet:(CPNotification)notification; + Sent from the notification center before sheet is visible on + the delegate's window. + @param notification contains information about the event + + @delegate -(BOOL)windowDidEndSheet:(CPNotification)notification; + Sent from the notification center when an attached sheet on the + delegate's window has been animated out and is no longer visible. + @param notification contains information about the event +*/ +@implementation CPWindow : CPResponder +{ + CPPlatformWindow _platformWindow; + + int _windowNumber; + unsigned _styleMask; + CGRect _frame; + int _level; + BOOL _isVisible; + BOOL _isMiniaturized; + BOOL _isAnimating; + BOOL _hasShadow; + BOOL _isMovableByWindowBackground; + BOOL _isMovable; + unsigned _shadowStyle; + BOOL _showsResizeIndicator; + + int _positioningMask; + CGRect _positioningScreenRect; + + BOOL _isDocumentEdited; + BOOL _isDocumentSaving; + + CPImageView _shadowView; + + CPView _windowView; + CPView _contentView; + CPView _toolbarView; + + CPArray _mouseEnteredStack; + CPView _leftMouseDownView; + CPView _rightMouseDownView; + + CPToolbar _toolbar; + CPResponder _firstResponder; + CPResponder _initialFirstResponder; + id _delegate; + + CPString _title; + + BOOL _acceptsMouseMovedEvents; + BOOL _ignoresMouseEvents; + + CPWindowController _windowController; + + CGSize _minSize; + CGSize _maxSize; + + CPUndoManager _undoManager; + CPURL _representedURL; + + CPSet _registeredDraggedTypes; + CPArray _registeredDraggedTypesArray; + CPCountedSet _inclusiveRegisteredDraggedTypes; + + CPButton _defaultButton; + BOOL _defaultButtonEnabled; + + BOOL _autorecalculatesKeyViewLoop; + BOOL _keyViewLoopIsDirty; + + BOOL _sharesChromeWithPlatformWindow; + + // Bridge Support +#if PLATFORM(DOM) + DOMElement _DOMElement; +#endif + + unsigned _autoresizingMask; + + BOOL _delegateRespondsToWindowWillReturnUndoManagerSelector; + + BOOL _isFullPlatformWindow; + _CPWindowFullPlatformWindowSession _fullPlatformWindowSession; + + CPDictionary _sheetContext; + CPWindow _parentView; + BOOL _isSheet; + _CPWindowFrameAnimation _frameAnimation; +} + +/* + Private initializer for Objective-J + @ignore +*/ ++ (void)initialize +{ + if (self !== [CPWindow class]) + return; + + var bundle = [CPBundle bundleForClass:[CPWindow class]]; + + CPWindowSavingImage = [[CPImage alloc] initWithContentsOfFile:[bundle pathForResource:@"CPProgressIndicator/CPProgressIndicatorSpinningStyleRegular.gif"] size:CGSizeMake(16.0, 16.0)] +} + +- (id)init +{ + return [self initWithContentRect:_CGRectMakeZero() styleMask:CPTitledWindowMask]; +} + +/*! + Initializes the window. The method also takes a style bit mask made up + of any of the following values: +

+CPBorderlessWindowMask
+CPTitledWindowMask
+CPClosableWindowMask
+CPMiniaturizableWindowMask
+CPResizableWindowMask
+CPTexturedBackgroundWindowMask
+
+ @param aContentRect the size and location of the window in screen space + @param aStyleMask a style mask + @return the initialized window +*/ +- (id)initWithContentRect:(CGRect)aContentRect styleMask:(unsigned int)aStyleMask +{ + self = [super init]; + + if (self) + { + var windowViewClass = [[self class] _windowViewClassForStyleMask:aStyleMask]; + + _frame = [windowViewClass frameRectForContentRect:aContentRect]; + + [self _setSharesChromeWithPlatformWindow:![CPPlatform isBrowser]]; + + if ([CPPlatform isBrowser]) + [self setPlatformWindow:[CPPlatformWindow primaryPlatformWindow]]; + else + { + // give zero sized borderless bridge windows a default size if we're not in the browser so they show up in NativeHost. + if ((aStyleMask & CPBorderlessBridgeWindowMask) && aContentRect.size.width === 0 && aContentRect.size.height === 0) + { + var visibleFrame = [[[CPScreen alloc] init] visibleFrame]; + _frame.size.height = MIN(768.0, visibleFrame.size.height); + _frame.size.width = MIN(1024.0, visibleFrame.size.width); + _frame.origin.x = (visibleFrame.size.width - _frame.size.width) / 2; + _frame.origin.y = (visibleFrame.size.height - _frame.size.height) / 2; + } + [self setPlatformWindow:[[CPPlatformWindow alloc] initWithContentRect:_frame]]; + [self platformWindow]._only = self; + } + + _isFullPlatformWindow = NO; + _registeredDraggedTypes = [CPSet set]; + _registeredDraggedTypesArray = []; + _acceptsMouseMovedEvents = YES; + _isMovable = YES; + + _isSheet = NO; + _sheetContext = nil; + _parentView = nil; + + // Set up our window number. + _windowNumber = [CPApp._windows count]; + CPApp._windows[_windowNumber] = self; + + _styleMask = aStyleMask; + + [self setLevel:CPNormalWindowLevel]; + + _minSize = CGSizeMake(0.0, 0.0); + _maxSize = CGSizeMake(1000000.0, 1000000.0); + + // Create our border view which is the actual root of our view hierarchy. + _windowView = [[windowViewClass alloc] initWithFrame:CGRectMake(0.0, 0.0, CGRectGetWidth(_frame), CGRectGetHeight(_frame)) styleMask:aStyleMask]; + + [_windowView _setWindow:self]; + [_windowView setNextResponder:self]; + + [self setMovableByWindowBackground:aStyleMask & CPHUDBackgroundWindowMask]; + + // Create a generic content view. + [self setContentView:[[CPView alloc] initWithFrame:CGRectMakeZero()]]; + [self setInitialFirstResponder:[self contentView]]; + + _firstResponder = self; + +#if PLATFORM(DOM) + _DOMElement = document.createElement("div"); + + _DOMElement.style.position = "absolute"; + _DOMElement.style.visibility = "visible"; + _DOMElement.style.zIndex = 0; + + if (![self _sharesChromeWithPlatformWindow]) + { + CPDOMDisplayServerSetStyleLeftTop(_DOMElement, NULL, _CGRectGetMinX(_frame), _CGRectGetMinY(_frame)); + } + + CPDOMDisplayServerSetStyleSize(_DOMElement, 1, 1); + CPDOMDisplayServerAppendChild(_DOMElement, _windowView._DOMElement); +#endif + + [self setNextResponder:CPApp]; + + [self setHasShadow:aStyleMask !== CPBorderlessWindowMask]; + + if (aStyleMask & CPBorderlessBridgeWindowMask) + [self setFullPlatformWindow:YES]; + + _autorecalculatesKeyViewLoop = NO; + _defaultButtonEnabled = YES; + _keyViewLoopIsDirty = YES; + + [self setShowsResizeIndicator:_styleMask & CPResizableWindowMask]; + } + + return self; +} + +- (CPPlatformWindow)platformWindow +{ + return _platformWindow; +} + +/*! + Sets the platform window of the reciver. + This method will first close the reciever, + change the platform window, then reopen the window (if it was originally open). +*/ +- (void)setPlatformWindow:(CPPlatformWindow)aPlatformWindow +{ + var wasVisible = [self isVisible]; + + // we have to close it first, otherwise we get a DOM exception. + if (wasVisible) + [self close]; + + _platformWindow = aPlatformWindow; + [_platformWindow _setTitle:_title window:self]; + + if (wasVisible) + [self orderFront:self]; +} + + +/*! + @ignore +*/ ++ (Class)_windowViewClassForStyleMask:(unsigned)aStyleMask +{ + if (aStyleMask & CPHUDBackgroundWindowMask) + return _CPHUDWindowView; + + else if (aStyleMask === CPBorderlessWindowMask) + return _CPBorderlessWindowView; + + else if (aStyleMask & CPDocModalWindowMask) + return _CPDocModalWindowView; + + return _CPStandardWindowView; +} + ++ (Class)_windowViewClassForFullPlatformWindowStyleMask:(unsigned)aStyleMask +{ + return _CPBorderlessBridgeWindowView; +} + +- (void)awakeFromCib +{ + _keyViewLoopIsDirty = ![self _hasKeyViewLoop]; + + // If no key view loop has been specified by hand, and we are not intending to auto recalculate, + // set up a default key view loop. + if (_keyViewLoopIsDirty && ![self autorecalculatesKeyViewLoop]) + [self recalculateKeyViewLoop]; + + // At this time we know the final screen (or browser) size and can apply the positioning mask, if any, from the nib. + if (_positioningScreenRect) + { + var actualScreenRect = [CPPlatform isBrowser] ? [_platformWindow contentBounds] : [[self screen] visibleFrame], + frame = [self frame], + origin = frame.origin; + + if (actualScreenRect) + { + if ((_positioningMask & CPWindowPositionFlexibleLeft) && (_positioningMask & CPWindowPositionFlexibleRight)) + { + // Proportional Horizontal. + origin.x *= (actualScreenRect.size.width / _positioningScreenRect.size.width); + } + else if (_positioningMask & CPWindowPositionFlexibleLeft) + { + // Fixed from Right + origin.x += actualScreenRect.size.width - _positioningScreenRect.size.width; + } + else if (_positioningMask & CPWindowPositionFlexibleRight) + { + // Fixed from Left + } + + if ((_positioningMask & CPWindowPositionFlexibleTop) && (_positioningMask & CPWindowPositionFlexibleBottom)) + { + // Proportional Vertical. + origin.y *= (actualScreenRect.size.height / _positioningScreenRect.size.height); + } + else if (_positioningMask & CPWindowPositionFlexibleTop) + { + // Fixed from Bottom + origin.y += actualScreenRect.size.height - _positioningScreenRect.size.height; + } + else if (_positioningMask & CPWindowPositionFlexibleBottom) + { + // Fixed from Top + } + + [self setFrameOrigin:origin]; + } + } +} + +- (void)_setWindowView:(CPView)aWindowView +{ + if (_windowView === aWindowView) + return; + + var oldWindowView = _windowView; + + _windowView = aWindowView; + + if (oldWindowView) + { + [oldWindowView _setWindow:nil]; + [oldWindowView noteToolbarChanged]; + +#if PLATFORM(DOM) + CPDOMDisplayServerRemoveChild(_DOMElement, oldWindowView._DOMElement); +#endif + } + + if (_windowView) + { +#if PLATFORM(DOM) + CPDOMDisplayServerAppendChild(_DOMElement, _windowView._DOMElement); +#endif + + var contentRect = [_contentView convertRect:[_contentView bounds] toView:nil]; + + contentRect.origin = [self convertBaseToGlobal:contentRect.origin]; + + [_windowView _setWindow:self]; + [_windowView setNextResponder:self]; + [_windowView addSubview:_contentView]; + [_windowView setTitle:_title]; + [_windowView noteToolbarChanged]; + [_windowView setShowsResizeIndicator:[self showsResizeIndicator]]; + + [self setFrame:[self frameRectForContentRect:contentRect]]; + } +} + +/*! + Sets the receiver as a full platform window. If you pass YES the CPWindow instance will fill the entire browser content area, + otherwise the CPWindow will be a window inside of your browser window which the user can drag around, and resize (if you allow). + + @param BOOL - YES if the window should fill the browser window, otherwise NO. +*/ +- (void)setFullPlatformWindow:(BOOL)shouldBeFullPlatformWindow +{ + if (![_platformWindow supportsFullPlatformWindows]) + return; + + shouldBeFullPlatformWindow = !!shouldBeFullPlatformWindow; + + if (_isFullPlatformWindow === shouldBeFullPlatformWindow) + return; + + _isFullPlatformWindow = shouldBeFullPlatformWindow; + + if (_isFullPlatformWindow) + { + _fullPlatformWindowSession = _CPWindowFullPlatformWindowSessionMake(_windowView, [self contentRectForFrameRect:[self frame]], [self hasShadow], [self level]); + + var fullPlatformWindowViewClass = [[self class] _windowViewClassForFullPlatformWindowStyleMask:_styleMask], + windowView = [[fullPlatformWindowViewClass alloc] initWithFrame:CGRectMakeZero() styleMask:_styleMask]; + + [self _setWindowView:windowView]; + + [self setLevel:CPBackgroundWindowLevel]; + [self setHasShadow:NO]; + [self setAutoresizingMask:CPWindowWidthSizable | CPWindowHeightSizable]; + [self setFrame:[_platformWindow visibleFrame]]; + } + else + { + var windowView = _fullPlatformWindowSession.windowView; + + [self _setWindowView:windowView]; + + [self setLevel:_fullPlatformWindowSession.level]; + [self setHasShadow:_fullPlatformWindowSession.hasShadow]; + [self setAutoresizingMask:CPWindowNotSizable]; + + [self setFrame:[windowView frameRectForContentRect:_fullPlatformWindowSession.contentRect]]; + } +} + +/*! + @return BOOL - YES if the CPWindow fills the browser window, otherwise NO. +*/ +- (BOOL)isFullPlatformWindow +{ + return _isFullPlatformWindow; +} + +/*! + Returns the window's style mask. +*/ +- (unsigned)styleMask +{ + return _styleMask; +} + +/*! + Returns the frame rectangle used by a window. + Style masks include: + 
+    CPBorderlessWindowMask
+    CPTitledWindowMask
+    CPClosableWindowMask
+    CPMiniaturizableWindowMask (NOTE: only available in NativeHost)
+    CPResizableWindowMask
+    CPTexturedBackgroundWindowMask
+    CPBorderlessBridgeWindowMask
+    CPHUDBackgroundWindowMask
+
+ + @param aContentRect the content rectangle of the window + @param aStyleMask the style mask of the window + @return the matching window's frame rectangle +*/ ++ (CGRect)frameRectForContentRect:(CGRect)aContentRect styleMask:(unsigned)aStyleMask +{ + return [[[self class] _windowViewClassForStyleMask:aStyleMask] frameRectForContentRect:aContentRect]; +} + +/*! + Returns the receiver's content rectangle. A content rectangle does not include toolbars. + @param aFrame the window's frame rectangle +*/ +- (CGRect)contentRectForFrameRect:(CGRect)aFrame +{ + return [_windowView contentRectForFrameRect:aFrame]; +} + +/*! + Retrieves the frame rectangle for this window. + @param aContentRect the window's content rectangle + @return the window's frame rectangle +*/ +- (CGRect)frameRectForContentRect:(CGRect)aContentRect +{ + return [_windowView frameRectForContentRect:aContentRect]; +} + +/*! + Returns the window's frame rectangle +*/ +- (CGRect)frame +{ + return _CGRectMakeCopy(_frame); +} + +/*! + Sets the window's frame rectangle. Also tells the window whether it should animate + the resize operation, and redraw itself if necessary. + @param aFrame the new size and location for the window + @param shouldDisplay whether the window should redraw its views + @param shouldAnimate whether the window resize should be animated. +*/ +- (void)_setClippedFrame:(CGRect)aFrame display:(BOOL)shouldDisplay animate:(BOOL)shouldAnimate +{ + aFrame.size.width = MIN(MAX(aFrame.size.width, _minSize.width), _maxSize.width) + aFrame.size.height = MIN(MAX(aFrame.size.height, _minSize.height), _maxSize.height); + [self setFrame:aFrame display:shouldDisplay animate:shouldAnimate]; +} + +/*! + Sets the frame of the window. + + @param aFrame - A CGRect of the new frame for the receiver. + @param shouldDisplay - YES if the window should call setNeedsDisplay otherwise NO. + @param shouldAnimate - YES if the window should animate to it's new size and position, otherwise NO. +*/ +- (void)setFrame:(CGRect)aFrame display:(BOOL)shouldDisplay animate:(BOOL)shouldAnimate +{ + aFrame = _CGRectMakeCopy(aFrame); + + var value = aFrame.origin.x, + delta = value - FLOOR(value); + + if (delta) + aFrame.origin.x = value > 0.879 ? CEIL(value) : FLOOR(value); + + value = aFrame.origin.y; + delta = value - FLOOR(value); + + if (delta) + aFrame.origin.y = value > 0.879 ? CEIL(value) : FLOOR(value); + + value = aFrame.size.width; + delta = value - FLOOR(value); + + if (delta) + aFrame.size.width = value > 0.15 ? CEIL(value) : FLOOR(value); + + value = aFrame.size.height; + delta = value - FLOOR(value); + + if (delta) + aFrame.size.height = value > 0.15 ? CEIL(value) : FLOOR(value); + + if (shouldAnimate) + { + [_frameAnimation stopAnimation]; + _frameAnimation = [[_CPWindowFrameAnimation alloc] initWithWindow:self targetFrame:aFrame]; + + [_frameAnimation startAnimation]; + } + else + { + var origin = _frame.origin, + newOrigin = aFrame.origin; + + if (!_CGPointEqualToPoint(origin, newOrigin)) + { + origin.x = newOrigin.x; + origin.y = newOrigin.y; + +#if PLATFORM(DOM) + if (![self _sharesChromeWithPlatformWindow]) + { + CPDOMDisplayServerSetStyleLeftTop(_DOMElement, NULL, origin.x, origin.y); + } +#endif + + [[CPNotificationCenter defaultCenter] postNotificationName:CPWindowDidMoveNotification object:self]; + } + + var size = _frame.size, + newSize = aFrame.size; + + if (!_CGSizeEqualToSize(size, newSize)) + { + size.width = newSize.width; + size.height = newSize.height; + + [_windowView setFrameSize:size]; + + if (_hasShadow) + { + // if the shadow would be taller/wider than the window height, + // make it the same as the window height. this allows views to + // become 0, 0 with no shadow on them and makes the sheet + // animation look nicer + var shadowSize = _CGSizeMake(size.width, size.height); + + if (size.width >= (SHADOW_MARGIN_LEFT + SHADOW_MARGIN_RIGHT)) + shadowSize.width += SHADOW_MARGIN_LEFT + SHADOW_MARGIN_RIGHT; + + if (size.height >= (SHADOW_MARGIN_BOTTOM + SHADOW_MARGIN_TOP + SHADOW_DISTANCE)) + shadowSize.height += SHADOW_MARGIN_BOTTOM + SHADOW_MARGIN_TOP + SHADOW_DISTANCE; + + [_shadowView setFrameSize:shadowSize]; + } + + if (!_isAnimating) + [[CPNotificationCenter defaultCenter] postNotificationName:CPWindowDidResizeNotification object:self]; + } + + if ([self _sharesChromeWithPlatformWindow]) + [_platformWindow setContentRect:_frame]; + } +} + +/*! + Sets the window's frame rect. + @param aFrame - The new CGRect of the window. + @param shouldDisplay - YES if the window should call setNeedsDisplay: otherwise NO. +*/ +- (void)setFrame:(CGRect)aFrame display:(BOOL)shouldDisplay +{ + [self _setClippedFrame:aFrame display:shouldDisplay animate:NO]; +} + +/*! + Sets the window's frame rectangle + @param aFrame - The CGRect of the windows new frame +*/ +- (void)setFrame:(CGRect)aFrame +{ + [self _setClippedFrame:aFrame display:YES animate:NO]; +} + +/*! + Sets the window's location. + @param anOrigin the new location for the window +*/ +- (void)setFrameOrigin:(CGPoint)anOrigin +{ + [self _setClippedFrame:_CGRectMake(anOrigin.x, anOrigin.y, _CGRectGetWidth(_frame), _CGRectGetHeight(_frame)) display:YES animate:NO]; + + // reposition sheet + if ([self attachedSheet]) + [self _setAttachedSheetFrameOrigin]; +} + +/*! + Sets the window's size. + @param aSize the new size for the window +*/ +- (void)setFrameSize:(CGSize)aSize +{ + [self _setClippedFrame:_CGRectMake(_CGRectGetMinX(_frame), _CGRectGetMinY(_frame), aSize.width, aSize.height) display:YES animate:NO]; +} + +/*! + Makes the receiver the front most window in the screen ordering. + @param aSender the object that requested this +*/ +- (void)orderFront:(id)aSender +{ +#if PLATFORM(DOM) + // -dw- if a sheet is clicked, the parent window should come up too + if ([self isSheet]) + [_parentView orderFront:self]; + + [_platformWindow orderFront:self]; + [_platformWindow order:CPWindowAbove window:self relativeTo:nil]; +#endif + + if (!CPApp._keyWindow) + [self makeKeyWindow]; + + if ([self isKeyWindow] && (_firstResponder === self || !_firstResponder)) + [self makeFirstResponder:_initialFirstResponder]; + + if (!CPApp._mainWindow) + [self makeMainWindow]; +} + +/* + Makes the receiver the last window in the screen ordering. + @param aSender the object that requested this + @ignore +*/ +- (void)orderBack:(id)aSender +{ + //[_platformWindow order:CPWindowBelow +} + +/*! + Hides the window. + @param the object that requested this +*/ +- (void)orderOut:(id)aSender +{ + if ([self isSheet]) + { + // -dw- as in Cocoa, orderOut: detaches the sheet and animates out + [self._parentView _detachSheetWindow]; + return; + } + +#if PLATFORM(DOM) + if ([self _sharesChromeWithPlatformWindow]) + [_platformWindow orderOut:self]; +#endif + + if ([_delegate respondsToSelector:@selector(windowWillClose:)]) + [_delegate windowWillClose:self]; + +#if PLATFORM(DOM) + [_platformWindow order:CPWindowOut window:self relativeTo:nil]; +#endif + + [self _updateMainAndKeyWindows]; +} + +/*! + Relocates the window in the screen list. + @param aPlace the positioning relative to \c otherWindowNumber + @param otherWindowNumber the window relative to which the receiver should be placed +*/ +- (void)orderWindow:(CPWindowOrderingMode)aPlace relativeTo:(int)otherWindowNumber +{ +#if PLATFORM(DOM) + [_platformWindow order:aPlace window:self relativeTo:CPApp._windows[otherWindowNumber]]; +#endif +} + +/*! + Sets the window's level + @param the window's new level +*/ +- (void)setLevel:(int)aLevel +{ + if (aLevel === _level) + return; + + [_platformWindow moveWindow:self fromLevel:_level toLevel:aLevel]; + + _level = aLevel; + + if ([self _sharesChromeWithPlatformWindow]) + [_platformWindow setLevel:aLevel]; +} + +/*! + Returns the window's current level +*/ +- (int)level +{ + return _level; +} + +/*! + Returns \c YES if the window is visible. It does not mean that the window is not obscured by other windows. +*/ +- (BOOL)isVisible +{ + return _isVisible; +} + +/*! + Returns \c YES if the window's resize indicator is showing. \c NO otherwise. +*/ +- (BOOL)showsResizeIndicator +{ + return _showsResizeIndicator; +} + +/*! + Sets the window's resize indicator. + @param shouldShowResizeIndicator \c YES sets the window to show its resize indicator. +*/ +- (void)setShowsResizeIndicator:(BOOL)shouldShowResizeIndicator +{ + shouldShowResizeIndicator = !!shouldShowResizeIndicator; + + if (_showsResizeIndicator === shouldShowResizeIndicator) + return; + + _showsResizeIndicator = shouldShowResizeIndicator; + [_windowView setShowsResizeIndicator:[self showsResizeIndicator]]; +} + +/*! + Returns the offset of the window's resize indicator. +*/ +- (CGSize)resizeIndicatorOffset +{ + return [_windowView resizeIndicatorOffset]; +} + +/*! + Sets the offset of the window's resize indicator. + @param aSize the offset for the resize indicator +*/ +- (void)setResizeIndicatorOffset:(CGSize)anOffset +{ + [_windowView setResizeIndicatorOffset:anOffset]; +} + +/*! + Sets the window's content view. The new view will be resized to fit + inside the content rectangle of the window. + @param aView the new content view for the receiver +*/ +- (void)setContentView:(CPView)aView +{ + if (_contentView) + [_contentView removeFromSuperview]; + + var bounds = CGRectMake(0.0, 0.0, CGRectGetWidth(_frame), CGRectGetHeight(_frame)); + + // During init the initial first responder is set to the contentView + // if it hasn't changed in the mean time we need to update that reference + // to the new contentView + if (_initialFirstResponder === _contentView) + [self setInitialFirstResponder:aView]; + + _contentView = aView; + [_contentView setFrame:[self contentRectForFrameRect:bounds]]; + + [_contentView setAutoresizingMask:CPViewWidthSizable | CPViewHeightSizable]; + [_windowView addSubview:_contentView]; +} + +/*! + Returns the window's current content view. +*/ +- (CPView)contentView +{ + return _contentView; +} + +/*! + Applies an alpha value to the window. + @param aValue the alpha value to apply +*/ +- (void)setAlphaValue:(float)aValue +{ + [_windowView setAlphaValue:aValue]; +} + +/*! + Returns the alpha value of the window. +*/ +- (float)alphaValue +{ + return [_windowView alphaValue]; +} + +/*! + Sets the window's background color. + @param aColor the new color for the background +*/ +- (void)setBackgroundColor:(CPColor)aColor +{ + [_windowView setBackgroundColor:aColor]; +} + +/*! + Returns the window's background color. +*/ +- (CPColor)backgroundColor +{ + return [_windowView backgroundColor]; +} + +/*! + Sets the window's minimum size. If the provided + size is the same as the current minimum size, the method simply returns. + @param aSize the new minimum size for the window +*/ +- (void)setMinSize:(CGSize)aSize +{ + if (CGSizeEqualToSize(_minSize, aSize)) + return; + + _minSize = CGSizeCreateCopy(aSize); + + var size = CGSizeMakeCopy([self frame].size), + needsFrameChange = NO; + + if (size.width < _minSize.width) + { + size.width = _minSize.width; + needsFrameChange = YES; + } + + if (size.height < _minSize.height) + { + size.height = _minSize.height; + needsFrameChange = YES; + } + + if (needsFrameChange) + [self setFrameSize:size]; +} + +/*! + Returns the windows minimum size. +*/ +- (CGSize)minSize +{ + return _minSize; +} + +/*! + Sets the window's maximum size. If the provided + size is the same as the current maximum size, + the method simply returns. + @param aSize the new maximum size +*/ +- (void)setMaxSize:(CGSize)aSize +{ + if (CGSizeEqualToSize(_maxSize, aSize)) + return; + + _maxSize = CGSizeCreateCopy(aSize); + + var size = CGSizeMakeCopy([self frame].size), + needsFrameChange = NO; + + if (size.width > _maxSize.width) + { + size.width = _maxSize.width; + needsFrameChange = YES; + } + + if (size.height > _maxSize.height) + { + size.height = _maxSize.height; + needsFrameChange = YES; + } + + if (needsFrameChange) + [self setFrameSize:size]; +} + +/*! + Returns the window's maximum size. +*/ +- (CGSize)maxSize +{ + return _maxSize; +} + +/*! + Returns \c YES if the window has a drop shadow. \c NO otherwise. +*/ +- (BOOL)hasShadow +{ + return _hasShadow; +} + +- (void)_updateShadow +{ + if ([self _sharesChromeWithPlatformWindow]) + { + if (_shadowView) + { +#if PLATFORM(DOM) + CPDOMDisplayServerRemoveChild(_DOMElement, _shadowView._DOMElement); +#endif + _shadowView = nil; + } + + [_platformWindow setHasShadow:_hasShadow]; + + return; + } + + if (_hasShadow && !_shadowView) + { + var bounds = [_windowView bounds]; + + _shadowView = [[CPView alloc] initWithFrame:CGRectMake(-SHADOW_MARGIN_LEFT, -SHADOW_MARGIN_TOP + SHADOW_DISTANCE, + SHADOW_MARGIN_LEFT + CGRectGetWidth(bounds) + SHADOW_MARGIN_RIGHT, SHADOW_MARGIN_TOP + CGRectGetHeight(bounds) + SHADOW_MARGIN_BOTTOM)]; + + if (!_CPWindowShadowColor) + { + var bundle = [CPBundle bundleForClass:[CPWindow class]]; + + _CPWindowShadowColor = [CPColor colorWithPatternImage:[[CPNinePartImage alloc] initWithImageSlices: + [ + [[CPImage alloc] initWithContentsOfFile:[bundle pathForResource:@"CPWindow/CPWindowShadow0.png"] size:CGSizeMake(20.0, 19.0)], + [[CPImage alloc] initWithContentsOfFile:[bundle pathForResource:@"CPWindow/CPWindowShadow1.png"] size:CGSizeMake(1.0, 19.0)], + [[CPImage alloc] initWithContentsOfFile:[bundle pathForResource:@"CPWindow/CPWindowShadow2.png"] size:CGSizeMake(19.0, 19.0)], + + [[CPImage alloc] initWithContentsOfFile:[bundle pathForResource:@"CPWindow/CPWindowShadow3.png"] size:CGSizeMake(20.0, 1.0)], + [[CPImage alloc] initWithContentsOfFile:[bundle pathForResource:@"CPWindow/CPWindowShadow4.png"] size:CGSizeMake(1.0, 1.0)], + [[CPImage alloc] initWithContentsOfFile:[bundle pathForResource:@"CPWindow/CPWindowShadow5.png"] size:CGSizeMake(19.0, 1.0)], + + [[CPImage alloc] initWithContentsOfFile:[bundle pathForResource:@"CPWindow/CPWindowShadow6.png"] size:CGSizeMake(20.0, 18.0)], + [[CPImage alloc] initWithContentsOfFile:[bundle pathForResource:@"CPWindow/CPWindowShadow7.png"] size:CGSizeMake(1.0, 18.0)], + [[CPImage alloc] initWithContentsOfFile:[bundle pathForResource:@"CPWindow/CPWindowShadow8.png"] size:CGSizeMake(19.0, 18.0)] + ]]]; + } + + [_shadowView setBackgroundColor:_CPWindowShadowColor]; + [_shadowView setAutoresizingMask:CPViewWidthSizable | CPViewHeightSizable]; + +#if PLATFORM(DOM) + CPDOMDisplayServerInsertBefore(_DOMElement, _shadowView._DOMElement, _windowView._DOMElement); +#endif + } + else if (!_hasShadow && _shadowView) + { +#if PLATFORM(DOM) + CPDOMDisplayServerRemoveChild(_DOMElement, _shadowView._DOMElement); +#endif + _shadowView = nil; + } +} + +/*! + Sets whether the window should have a drop shadow. + @param shouldHaveShadow \c YES to have a drop shadow. +*/ +- (void)setHasShadow:(BOOL)shouldHaveShadow +{ + if (_hasShadow === shouldHaveShadow) + return; + + _hasShadow = shouldHaveShadow; + + [self _updateShadow]; +} + +/*! + Sets the shadow style of the receiver. + Values are: + 
+    CPWindowShadowStyleStandard
+    CPWindowShadowStyleMenu
+    CPWindowShadowStylePanel
+
+ + @param aStyle - The new shadow style of the receiver. +*/ +- (void)setShadowStyle:(unsigned)aStyle +{ + _shadowStyle = aStyle; + + [[self platformWindow] setShadowStyle:_shadowStyle]; +} + +/*! + Sets the delegate for the window. Passing \c nil will just remove the window's current delegate. + @param aDelegate an object to respond to the various delegate methods of CPWindow +*/ +- (void)setDelegate:(id)aDelegate +{ + var defaultCenter = [CPNotificationCenter defaultCenter]; + + [defaultCenter removeObserver:_delegate name:CPWindowDidResignKeyNotification object:self]; + [defaultCenter removeObserver:_delegate name:CPWindowDidBecomeKeyNotification object:self]; + [defaultCenter removeObserver:_delegate name:CPWindowDidBecomeMainNotification object:self]; + [defaultCenter removeObserver:_delegate name:CPWindowDidResignMainNotification object:self]; + [defaultCenter removeObserver:_delegate name:CPWindowDidMoveNotification object:self]; + [defaultCenter removeObserver:_delegate name:CPWindowDidResizeNotification object:self]; + [defaultCenter removeObserver:_delegate name:CPWindowWillBeginSheetNotification object:self]; + [defaultCenter removeObserver:_delegate name:CPWindowDidEndSheetNotification object:self]; + + _delegate = aDelegate; + _delegateRespondsToWindowWillReturnUndoManagerSelector = [_delegate respondsToSelector:@selector(windowWillReturnUndoManager:)]; + + if ([_delegate respondsToSelector:@selector(windowDidResignKey:)]) + [defaultCenter + addObserver:_delegate + selector:@selector(windowDidResignKey:) + name:CPWindowDidResignKeyNotification + object:self]; + + if ([_delegate respondsToSelector:@selector(windowDidBecomeKey:)]) + [defaultCenter + addObserver:_delegate + selector:@selector(windowDidBecomeKey:) + name:CPWindowDidBecomeKeyNotification + object:self]; + + if ([_delegate respondsToSelector:@selector(windowDidBecomeMain:)]) + [defaultCenter + addObserver:_delegate + selector:@selector(windowDidBecomeMain:) + name:CPWindowDidBecomeMainNotification + object:self]; + + if ([_delegate respondsToSelector:@selector(windowDidResignMain:)]) + [defaultCenter + addObserver:_delegate + selector:@selector(windowDidResignMain:) + name:CPWindowDidResignMainNotification + object:self]; + + if ([_delegate respondsToSelector:@selector(windowDidMove:)]) + [defaultCenter + addObserver:_delegate + selector:@selector(windowDidMove:) + name:CPWindowDidMoveNotification + object:self]; + + if ([_delegate respondsToSelector:@selector(windowDidResize:)]) + [defaultCenter + addObserver:_delegate + selector:@selector(windowDidResize:) + name:CPWindowDidResizeNotification + object:self]; + + if ([_delegate respondsToSelector:@selector(windowWillBeginSheet:)]) + [defaultCenter + addObserver:_delegate + selector:@selector(windowWillBeginSheet:) + name:CPWindowWillBeginSheetNotification + object:self]; + + if ([_delegate respondsToSelector:@selector(windowDidEndSheet:)]) + [defaultCenter + addObserver:_delegate + selector:@selector(windowDidEndSheet:) + name:CPWindowDidEndSheetNotification + object:self]; +} + +/*! + Returns window's delegate +*/ +- (id)delegate +{ + return _delegate; +} + +/*! + Sets the window's controller + @param aWindowController a window controller +*/ +- (void)setWindowController:(CPWindowController)aWindowController +{ + _windowController = aWindowController; +} + +/*! + Returns the window's controller. +*/ +- (CPWindowController)windowController +{ + return _windowController; +} + +- (void)doCommandBySelector:(SEL)aSelector +{ + if ([_delegate respondsToSelector:aSelector]) + [_delegate performSelector:aSelector]; + else + [super doCommandBySelector:aSelector]; +} + +- (BOOL)acceptsFirstResponder +{ + return NO; +} + +- (CPView)initialFirstResponder +{ + return _initialFirstResponder; +} + +- (void)setInitialFirstResponder:(CPView)aView +{ + // Before an initial first responder is set, be sure to calculate the key loop + [self _setupFirstResponder:aView]; + + _initialFirstResponder = aView; +} + +- (void)_setupFirstResponder:(CPView)anInitialFirstResponder +{ + /* + If: + + - The key loop is dirty + - The key loop does not auto-recalculate + - No view within the window has become first responder + - No initial first responder has been set + + Then calculate the key view loop and set the first responder + to the first view in the loop if no initial responder has been set, since we should + always have an initial first responder and a key loop by default. + */ + if (_keyViewLoopIsDirty && + !_autorecalculatesKeyViewLoop && + _firstResponder === self && + _initialFirstResponder === [self contentView]) + { + [self recalculateKeyViewLoop]; + + if (anInitialFirstResponder) + [self makeFirstResponder:anInitialFirstResponder]; + else + { + // Make the first key view of the content view the first responder + var firstKeyView = [[self contentView] nextValidKeyView]; + + [self makeFirstResponder:firstKeyView]; + } + } +} + +/*! + Attempts to make the \c aResponder the first responder. Before trying + to make it the first responder, the receiver will ask the current first responder + to resign its first responder status. If it resigns, it will ask + \c aResponder accept first responder, then finally tell it to become first responder. + @return \c YES if the attempt was successful. \c NO otherwise. +*/ +- (BOOL)makeFirstResponder:(CPResponder)aResponder +{ + if (_firstResponder === aResponder) + return YES; + + if (![_firstResponder resignFirstResponder]) + return NO; + + if (!aResponder || ![aResponder acceptsFirstResponder] || ![aResponder becomeFirstResponder]) + { + _firstResponder = self; + + return NO; + } + + _firstResponder = aResponder; + + [[CPNotificationCenter defaultCenter] postNotificationName:_CPWindowDidChangeFirstResponderNotification object:self]; + + return YES; +} + +/*! + Returns the window's current first responder. +*/ +- (CPResponder)firstResponder +{ + return _firstResponder; +} + +- (BOOL)acceptsMouseMovedEvents +{ + return _acceptsMouseMovedEvents; +} + +- (void)setAcceptsMouseMovedEvents:(BOOL)shouldAcceptMouseMovedEvents +{ + _acceptsMouseMovedEvents = shouldAcceptMouseMovedEvents; +} + +- (BOOL)ignoresMouseEvents +{ + return _ignoresMouseEvents; +} + +- (void)setIgnoresMouseEvents:(BOOL)shouldIgnoreMouseEvents +{ + _ignoresMouseEvents = shouldIgnoreMouseEvents; +} + +// Managing Titles + +/*! + Returns the window's title bar string +*/ +- (CPString)title +{ + return _title; +} + +/*! + Sets the window's title bar string +*/ +- (void)setTitle:(CPString)aTitle +{ + _title = aTitle; + + [_windowView setTitle:aTitle]; + [_platformWindow _setTitle:_title window:self]; + + [self _synchronizeMenuBarTitleWithWindowTitle]; +} + +/*! + Sets the title bar to represent a file path +*/ +- (void)setTitleWithRepresentedFilename:(CPString)aFilePath +{ + [self setRepresentedFilename:aFilePath]; + [self setTitle:[aFilePath lastPathComponent]]; +} + +/*! + Sets the path to the file the receiver represents +*/ +- (void)setRepresentedFilename:(CPString)aFilePath +{ + // FIXME: urls vs filepaths and all. + [self setRepresentedURL:aFilePath]; +} + +/*! + Returns the path to the file the receiver represents +*/ +- (CPString)representedFilename +{ + return _representedURL; +} + +/*! + Sets the URL that the receiver represents +*/ +- (void)setRepresentedURL:(CPURL)aURL +{ + _representedURL = aURL; +} + +/*! + Returns the URL that the receiver represents +*/ +- (CPURL)representedURL +{ + return _representedURL; +} + +- (CPScreen)screen +{ + return [[CPScreen alloc] init]; +} + +// Moving + +/*! + Sets whether the window can be moved by dragging its background. The default is based on the window style. + @param shouldBeMovableByWindowBackground \c YES makes the window move from a background drag. +*/ +- (void)setMovableByWindowBackground:(BOOL)shouldBeMovableByWindowBackground +{ + _isMovableByWindowBackground = shouldBeMovableByWindowBackground; +} + +/*! + Returns \c YES if the window can be moved by dragging its background. +*/ +- (BOOL)isMovableByWindowBackground +{ + return _isMovableByWindowBackground; +} + +/*! + Sets whether the window can be moved. + @param shouldBeMovable \c YES makes the window movable. +*/ +- (void)setMovable:(BOOL)shouldBeMovable +{ + _isMovable = shouldBeMovable; +} + +/*! + Returns \c YES if the window can be moved. +*/ +- (void)isMovable +{ + return _isMovable; +} + +/*! + Sets the window location to be the center of the screen +*/ +- (void)center +{ + if (_isFullPlatformWindow) + return; + + var size = [self frame].size, + containerSize = [CPPlatform isBrowser] ? [_platformWindow contentBounds].size : [[self screen] visibleFrame].size; + + var origin = CGPointMake((containerSize.width - size.width) / 2.0, (containerSize.height - size.height) / 2.0); + + if (origin.x < 0.0) + origin.x = 0.0; + + if (origin.y < 0.0) + origin.y = 0.0; + + [self setFrameOrigin:origin]; +} + +/*! + Dispatches events that are sent to it from CPApplication. + @param anEvent the event to be dispatched +*/ +- (void)sendEvent:(CPEvent)anEvent +{ + var type = [anEvent type], + point = [anEvent locationInWindow]; + + // If a sheet is attached events get filtered here. + // It is not clear what events should be passed to the view, perhaps all? + // CPLeftMouseDown is needed for window moving and resizing to work. + // CPMouseMoved is needed for rollover effects on title bar buttons. + var sheet = [self attachedSheet]; + if (sheet) + { + switch (type) + { + case CPLeftMouseDown: + [_windowView mouseDown:anEvent]; + + // -dw- if the window is clicked, the sheet should come to front, and become key, + // and the window should be immediately behind + [sheet makeKeyAndOrderFront:self]; + break; + case CPMouseMoved: + [_windowView mouseMoved:anEvent]; + break; + } + + return; + } + + switch (type) + { + case CPFlagsChanged: return [[self firstResponder] flagsChanged:anEvent]; + + case CPKeyUp: return [[self firstResponder] keyUp:anEvent]; + + case CPKeyDown: if ([anEvent charactersIgnoringModifiers] === CPTabCharacter) + { + if ([anEvent modifierFlags] & CPShiftKeyMask) + [self selectPreviousKeyView:self]; + else + [self selectNextKeyView:self]; +#if PLATFORM(DOM) + // Make sure the browser doesn't try to do its own tab handling. + // This is important or the browser might blur the shared text field or token field input field, + // even that we just moved it to a new first responder. + [[[anEvent window] platformWindow] _propagateCurrentDOMEvent:NO] +#endif + return; + } + else if ([anEvent charactersIgnoringModifiers] === CPBackTabCharacter) + { + var didTabBack = [self selectPreviousKeyView:self]; + if (didTabBack) + { +#if PLATFORM(DOM) + // Make sure the browser doesn't try to do its own tab handling. + // This is important or the browser might blur the shared text field or token field input field, + // even that we just moved it to a new first responder. + [[[anEvent window] platformWindow] _propagateCurrentDOMEvent:NO] +#endif + } + + return didTabBack; + } + + [[self firstResponder] keyDown:anEvent]; + + // Trigger the default button if needed + // FIXME: Is this only applicable in a sheet? See isse: #722. + if (![self disableKeyEquivalentForDefaultButton]) + { + var defaultButton = [self defaultButton], + keyEquivalent = [defaultButton keyEquivalent], + modifierMask = [defaultButton keyEquivalentModifierMask]; + + if ([anEvent _triggersKeyEquivalent:keyEquivalent withModifierMask:modifierMask]) + [[self defaultButton] performClick:self]; + } + + return; + + case CPScrollWheel: return [[_windowView hitTest:point] scrollWheel:anEvent]; + + case CPLeftMouseUp: + case CPRightMouseUp: var hitTestedView = _leftMouseDownView, + selector = type == CPRightMouseUp ? @selector(rightMouseUp:) : @selector(mouseUp:); + + if (!hitTestedView) + hitTestedView = [_windowView hitTest:point]; + + [hitTestedView performSelector:selector withObject:anEvent]; + + _leftMouseDownView = nil; + + return; + case CPLeftMouseDown: + case CPRightMouseDown: _leftMouseDownView = [_windowView hitTest:point]; + + if (_leftMouseDownView != _firstResponder && [_leftMouseDownView acceptsFirstResponder]) + [self makeFirstResponder:_leftMouseDownView]; + + [CPApp activateIgnoringOtherApps:YES]; + + var theWindow = [anEvent window], + selector = type == CPRightMouseDown ? @selector(rightMouseDown:) : @selector(mouseDown:); + + if ([theWindow isKeyWindow] || [theWindow becomesKeyOnlyIfNeeded] && ![_leftMouseDownView needsPanelToBecomeKey]) + return [_leftMouseDownView performSelector:selector withObject:anEvent]; + else + { + // FIXME: delayed ordering? + [self makeKeyAndOrderFront:self]; + + if ([_leftMouseDownView acceptsFirstMouse:anEvent]) + return [_leftMouseDownView performSelector:selector withObject:anEvent]; + } + break; + + case CPLeftMouseDragged: + case CPRightMouseDragged: if (!_leftMouseDownView) + return [[_windowView hitTest:point] mouseDragged:anEvent]; + + var selector; + if (type == CPRightMouseDragged) + { + selector = @selector(rightMouseDragged:) + if (![_leftMouseDownView respondsToSelector:selector]) + selector = nil; + } + + if (!selector) + selector = @selector(mouseDragged:) + + return [_leftMouseDownView performSelector:selector withObject:anEvent]; + + case CPMouseMoved: if (!_acceptsMouseMovedEvents) + return; + + if (!_mouseEnteredStack) + _mouseEnteredStack = []; + + var hitTestView = [_windowView hitTest:point]; + + if ([_mouseEnteredStack count] && [_mouseEnteredStack lastObject] === hitTestView) + return [hitTestView mouseMoved:anEvent]; + + var view = hitTestView, + mouseEnteredStack = []; + + while (view) + { + mouseEnteredStack.unshift(view); + + view = [view superview]; + } + + var deviation = MIN(_mouseEnteredStack.length, mouseEnteredStack.length); + + while (deviation--) + if (_mouseEnteredStack[deviation] === mouseEnteredStack[deviation]) + break; + + var index = deviation + 1, + count = _mouseEnteredStack.length; + + if (index < count) + { + var event = [CPEvent mouseEventWithType:CPMouseExited location:point modifierFlags:[anEvent modifierFlags] timestamp:[anEvent timestamp] windowNumber:_windowNumber context:nil eventNumber:-1 clickCount:1 pressure:0]; + + for (; index < count; ++index) + [_mouseEnteredStack[index] mouseExited:event]; + } + + index = deviation + 1; + count = mouseEnteredStack.length; + + if (index < count) + { + var event = [CPEvent mouseEventWithType:CPMouseEntered location:point modifierFlags:[anEvent modifierFlags] timestamp:[anEvent timestamp] windowNumber:_windowNumber context:nil eventNumber:-1 clickCount:1 pressure:0]; + + for (; index < count; ++index) + [mouseEnteredStack[index] mouseEntered:event]; + } + + _mouseEnteredStack = mouseEnteredStack; + + [hitTestView mouseMoved:anEvent]; + } +} + +/*! + Returns the window's number in the desktop's screen list +*/ +- (int)windowNumber +{ + return _windowNumber; +} + +/*! + Called when the receiver should become the key window. It also sends + the \c -becomeKeyWindow message to the first responder. +*/ +- (void)becomeKeyWindow +{ + CPApp._keyWindow = self; + + if (_firstResponder !== self && [_firstResponder respondsToSelector:@selector(becomeKeyWindow)]) + [_firstResponder becomeKeyWindow]; + + [self _setupFirstResponder:nil]; + + [_windowView noteKeyWindowStateChanged]; + + [[CPNotificationCenter defaultCenter] + postNotificationName:CPWindowDidBecomeKeyNotification + object:self]; +} + +/*! + Determines if the window can become the key window. + @return \c YES means the window can become the key window. +*/ +- (BOOL)canBecomeKeyWindow +{ + // In Cocoa only resizable or titled windows return YES here by default. But the main browser window in Cappuccino + // doesn't have these masks even that it's both titled and resizable, so we return YES when isFullPlatformWindow too. + return (_styleMask & CPTitledWindowMask) || (_styleMask & CPResizableWindowMask) || [self isFullPlatformWindow]; +} + +/*! + Returns \c YES if the window is the key window. +*/ +- (BOOL)isKeyWindow +{ + return [CPApp keyWindow] == self; +} + +/*! + Makes the window the key window and brings it to the front of the screen list. + @param aSender the object requesting this +*/ +- (void)makeKeyAndOrderFront:(id)aSender +{ + [self orderFront:self]; + + [self makeKeyWindow]; + [self makeMainWindow]; +} + +/*! + Makes this window the key window. +*/ +- (void)makeKeyWindow +{ + if ([CPApp keyWindow] === self || ![self canBecomeKeyWindow]) + return; + + [[CPApp keyWindow] resignKeyWindow]; + [self becomeKeyWindow]; +} + +/*! + Causes the window to resign it's key window status. +*/ +- (void)resignKeyWindow +{ + if (_firstResponder !== self && [_firstResponder respondsToSelector:@selector(resignKeyWindow)]) + [_firstResponder resignKeyWindow]; + + if (CPApp._keyWindow === self) + CPApp._keyWindow = nil; + + [_windowView noteKeyWindowStateChanged]; + + [[CPNotificationCenter defaultCenter] + postNotificationName:CPWindowDidResignKeyNotification + object:self]; +} + +/*! + Initiates a drag operation from the receiver to another view that accepts dragged data. + @param anImage the image to be dragged + @param aLocation the lower-left corner coordinate of \c anImage + @param mouseOffset the distance from the \c -mouseDown: location and the current location + @param anEvent the \c -mouseDown: that triggered the drag + @param aPasteboard the pasteboard that holds the drag data + @param aSourceObject the drag operation controller + @param slideBack Whether the image should 'slide back' if the drag is rejected +*/ +- (void)dragImage:(CPImage)anImage at:(CGPoint)imageLocation offset:(CGSize)mouseOffset event:(CPEvent)anEvent pasteboard:(CPPasteboard)aPasteboard source:(id)aSourceObject slideBack:(BOOL)slideBack +{ + [[CPDragServer sharedDragServer] dragImage:anImage fromWindow:self at:[self convertBaseToGlobal:imageLocation] offset:mouseOffset event:anEvent pasteboard:aPasteboard source:aSourceObject slideBack:slideBack]; +} + +- (void)_noteRegisteredDraggedTypes:(CPSet)pasteboardTypes +{ + if (!pasteboardTypes) + return; + + if (!_inclusiveRegisteredDraggedTypes) + _inclusiveRegisteredDraggedTypes = [CPCountedSet set]; + + [_inclusiveRegisteredDraggedTypes unionSet:pasteboardTypes]; +} + +- (void)_noteUnregisteredDraggedTypes:(CPSet)pasteboardTypes +{ + if (!pasteboardTypes) + return; + + [_inclusiveRegisteredDraggedTypes minusSet:pasteboardTypes]; + + if ([_inclusiveRegisteredDraggedTypes count] === 0) + _inclusiveRegisteredDraggedTypes = nil; +} + +/*! + Initiates a drag operation from the receiver to another view that accepts dragged data. + @param aView the view to be dragged + @param aLocation the lower-left corner coordinate of \c aView + @param mouseOffset the distance from the \c -mouseDown: location and the current location + @param anEvent the \c -mouseDown: that triggered the drag + @param aPasteboard the pasteboard that holds the drag data + @param aSourceObject the drag operation controller + @param slideBack Whether the view should 'slide back' if the drag is rejected +*/ +- (void)dragView:(CPView)aView at:(CGPoint)viewLocation offset:(CGSize)mouseOffset event:(CPEvent)anEvent pasteboard:(CPPasteboard)aPasteboard source:(id)aSourceObject slideBack:(BOOL)slideBack +{ + [[CPDragServer sharedDragServer] dragView:aView fromWindow:self at:[self convertBaseToGlobal:viewLocation] offset:mouseOffset event:anEvent pasteboard:aPasteboard source:aSourceObject slideBack:slideBack]; +} + +/*! + Sets the receiver's list of acceptable data types for a dragging operation. + @param pasteboardTypes an array of CPPasteboards +*/ +- (void)registerForDraggedTypes:(CPArray)pasteboardTypes +{ + if (!pasteboardTypes) + return; + + [self _noteUnregisteredDraggedTypes:_registeredDraggedTypes]; + [_registeredDraggedTypes addObjectsFromArray:pasteboardTypes]; + [self _noteRegisteredDraggedTypes:_registeredDraggedTypes]; + + _registeredDraggedTypesArray = nil; +} + +/*! + Returns an array of all types the receiver accepts for dragging operations. + @return an array of CPPasteBoards +*/ +- (CPArray)registeredDraggedTypes +{ + if (!_registeredDraggedTypesArray) + _registeredDraggedTypesArray = [_registeredDraggedTypes allObjects]; + + return _registeredDraggedTypesArray; +} + +/*! + Resets the array of acceptable data types for a dragging operation. +*/ +- (void)unregisterDraggedTypes +{ + [self _noteUnregisteredDraggedTypes:_registeredDraggedTypes]; + + _registeredDraggedTypes = [CPSet set]; + _registeredDraggedTypesArray = []; +} + +// Accessing Editing Status + +/*! + Sets whether the document has been edited. + @param isDocumentEdited \c YES if the document has been edited. +*/ +- (void)setDocumentEdited:(BOOL)isDocumentEdited +{ + if (_isDocumentEdited == isDocumentEdited) + return; + + _isDocumentEdited = isDocumentEdited; + + [CPMenu _setMenuBarIconImageAlphaValue:_isDocumentEdited ? 0.5 : 1.0]; + + [_windowView setDocumentEdited:isDocumentEdited]; +} + +/*! + Returns \c YES if the document has been edited. +*/ +- (BOOL)isDocumentEdited +{ + return _isDocumentEdited; +} + +- (void)setDocumentSaving:(BOOL)isDocumentSaving +{ + if (_isDocumentSaving == isDocumentSaving) + return; + + _isDocumentSaving = isDocumentSaving; + + [self _synchronizeSaveMenuWithDocumentSaving]; + + [_windowView windowDidChangeDocumentSaving]; +} + +- (BOOL)isDocumentSaving +{ + return _isDocumentSaving; +} + +/* @ignore */ +- (void)_synchronizeSaveMenuWithDocumentSaving +{ + if (![self isMainWindow]) + return; + + var mainMenu = [CPApp mainMenu], + index = [mainMenu indexOfItemWithTitle:_isDocumentSaving ? @"Save" : @"Saving..."]; + + if (index == CPNotFound) + return; + + var item = [mainMenu itemAtIndex:index]; + + if (_isDocumentSaving) + { + CPWindowSaveImage = [item image]; + + [item setTitle:@"Saving..."]; + [item setImage:CPWindowSavingImage]; + [item setEnabled:NO]; + } + else + { + [item setTitle:@"Save"]; + [item setImage:CPWindowSaveImage]; + [item setEnabled:YES]; + } +} + +// Minimizing Windows + +/*! + Simulates the user minimizing the window, then minimizes the window. + @param aSender the object making this request +*/ +- (void)performMiniaturize:(id)aSender +{ + //FIXME show stuff + [self miniaturize:aSender]; +} + +/*! + Minimizes the window. Posts a \c CPWindowWillMiniaturizeNotification to the + notification center before minimizing the window. +*/ +- (void)miniaturize:(id)sender +{ + [[CPNotificationCenter defaultCenter] postNotificationName:CPWindowWillMiniaturizeNotification object:self]; + + [[self platformWindow] miniaturize:sender]; + + [self _updateMainAndKeyWindows]; + + [[CPNotificationCenter defaultCenter] postNotificationName:CPWindowDidMiniaturizeNotification object:self]; + + _isMiniaturized = YES; +} + +/*! + Restores a minimized window to it's original size. +*/ +- (void)deminiaturize:(id)sender +{ + [[self platformWindow] deminiaturize:sender]; + + [[CPNotificationCenter defaultCenter] postNotificationName:CPWindowDidDeminiaturizeNotification object:self]; + + _isMiniaturized = NO; +} + +/*! + Returns YES if the window is minimized. +*/ +- (void)isMiniaturized +{ + return _isMiniaturized; +} + +// Closing Windows + +/*! + Simulates the user closing the window, then closes the window. + @param aSender the object making this request +*/ +- (void)performClose:(id)aSender +{ + if (!(_styleMask & CPClosableWindowMask)) + return; + + if ([self isFullBridge]) + { + var event = [CPApp currentEvent]; + + if ([event type] === CPKeyDown && [event characters] === "w" && ([event modifierFlags] & CPPlatformActionKeyMask)) + { + [[self platformWindow] _propagateCurrentDOMEvent:YES]; + return; + } + } + + // Only send ONE windowShouldClose: message. + if ([_delegate respondsToSelector:@selector(windowShouldClose:)]) + { + if (![_delegate windowShouldClose:self]) + return; + } + + // Only check self is delegate does NOT implement this. This also ensures this when delegate == self (returns true). + else if ([self respondsToSelector:@selector(windowShouldClose:)] && ![self windowShouldClose:self]) + return; + + var documents = [_windowController documents]; + if ([documents count]) + { + var index = [documents indexOfObject:[_windowController document]]; + + [documents[index] shouldCloseWindowController:_windowController + delegate:self + shouldCloseSelector:@selector(_windowControllerContainingDocument:shouldClose:contextInfo:) + contextInfo:{documents:[documents copy], visited:0, index:index}]; + } + else + [self close]; +} + +- (void)_windowControllerContainingDocument:(CPDocument)document shouldClose:(BOOL)shouldClose contextInfo:(Object)context +{ + if (shouldClose) + { + var windowController = [self windowController], + documents = context.documents, + count = [documents count], + visited = ++context.visited, + index = ++context.index % count; + + [document removeWindowController:windowController]; + + if (visited < count) + { + [windowController setDocument:documents[index]]; + + [documents[index] shouldCloseWindowController:_windowController + delegate:self + shouldCloseSelector:@selector(_windowControllerContainingDocument:shouldClose:contextInfo:) + contextInfo:context]; + } + else + [self close]; + } +} + +/*! + Closes the window. Posts a \c CPWindowWillCloseNotification to the + notification center before closing the window. +*/ +- (void)close +{ + [[CPNotificationCenter defaultCenter] postNotificationName:CPWindowWillCloseNotification object:self]; + + [self orderOut:nil]; +} + +// Managing Main Status +/*! + Returns \c YES if this the main window. +*/ +- (BOOL)isMainWindow +{ + return [CPApp mainWindow] === self; +} + +/*! + Returns \c YES if the window can become the main window. +*/ +- (BOOL)canBecomeMainWindow +{ + // FIXME: Also check if we can resize and titlebar. + if ([self isVisible]) + return YES; + + return NO; +} + +/*! + Makes the receiver the main window. +*/ +- (void)makeMainWindow +{ + if ([CPApp mainWindow] === self || ![self canBecomeMainWindow]) + return; + + [[CPApp mainWindow] resignMainWindow]; + [self becomeMainWindow]; +} + +/*! + Called to tell the receiver that it has become the main window. +*/ +- (void)becomeMainWindow +{ + CPApp._mainWindow = self; + + [self _synchronizeMenuBarTitleWithWindowTitle]; + [self _synchronizeSaveMenuWithDocumentSaving]; + + [_windowView noteMainWindowStateChanged]; + + [[CPNotificationCenter defaultCenter] + postNotificationName:CPWindowDidBecomeMainNotification + object:self]; +} + +/*! + Called when the window resigns main window status. +*/ +- (void)resignMainWindow +{ + [[CPNotificationCenter defaultCenter] + postNotificationName:CPWindowDidResignMainNotification + object:self]; + + if (CPApp._mainWindow === self) + CPApp._mainWindow = nil; + + [_windowView noteMainWindowStateChanged]; +} + +- (void)_updateMainAndKeyWindows +{ + var allWindows = [CPApp orderedWindows], + windowCount = [allWindows count]; + + if ([self isKeyWindow]) + { + var keyWindow = [CPApp keyWindow]; + [self resignKeyWindow]; + + if (keyWindow && keyWindow !== self && [keyWindow canBecomeKeyWindow]) + [keyWindow makeKeyWindow]; + else + { + var mainMenu = [CPApp mainMenu], + menuBarClass = objj_getClass("_CPMenuBarWindow"), + menuWindow; + + for (var i = 0; i < windowCount; i++) + { + var currentWindow = allWindows[i]; + + if ([currentWindow isKindOfClass:menuBarClass]) + menuWindow = currentWindow; + + if (currentWindow === self || currentWindow === menuWindow) + continue; + + if ([currentWindow isVisible] && [currentWindow canBecomeKeyWindow]) + { + [currentWindow makeKeyWindow]; + break; + } + } + + if (![CPApp keyWindow]) + [menuWindow makeKeyWindow]; + } + } + + if ([self isMainWindow]) + { + var mainWindow = [CPApp mainWindow]; + [self resignMainWindow]; + + if (mainWindow && mainWindow !== self && [mainWindow canBecomeMainWindow]) + [mainWindow makeMainWindow]; + else + { + var mainMenu = [CPApp mainMenu], + menuBarClass = objj_getClass("_CPMenuBarWindow"), + menuWindow; + + for (var i = 0; i < windowCount; i++) + { + var currentWindow = allWindows[i]; + + if ([currentWindow isKindOfClass:menuBarClass]) + menuWindow = currentWindow; + + if (currentWindow === self || currentWindow === menuWindow) + continue; + + if ([currentWindow isVisible] && [currentWindow canBecomeMainWindow]) + { + [currentWindow makeMainWindow]; + break; + } + } + } + } +} + +// Managing Toolbars +/*! + Return's the window's toolbar +*/ +- (CPToolbar)toolbar +{ + return _toolbar; +} + +/*! + Sets the window's toolbar. + @param aToolbar the window's new toolbar +*/ +- (void)setToolbar:(CPToolbar)aToolbar +{ + if (_toolbar === aToolbar) + return; + + // If this has an owner, dump it! + [[aToolbar _window] setToolbar:nil]; + + // This is no longer out toolbar. + [_toolbar _setWindow:nil]; + + _toolbar = aToolbar; + + // THIS is our toolbar. + [_toolbar _setWindow:self]; + + [self _noteToolbarChanged]; +} + +- (void)toggleToolbarShown:(id)aSender +{ + var toolbar = [self toolbar]; + + [toolbar setVisible:![toolbar isVisible]]; +} + +- (void)_noteToolbarChanged +{ + var frame = CGRectMakeCopy([self frame]), + newFrame; + + [_windowView noteToolbarChanged]; + + if (_isFullPlatformWindow) + newFrame = [_platformWindow visibleFrame]; + else + { + newFrame = CGRectMakeCopy([self frame]); + + newFrame.origin = frame.origin; + } + + [self setFrame:newFrame]; + /* + [_windowView setAnimatingToolbar:YES]; + [self setFrame:frame]; + [self setFrame:newFrame display:YES animate:YES]; + [_windowView setAnimatingToolbar:NO]; + */ +} + +- (void)_setFrame:(CGRect)aFrame delegate:(id)delegate duration:(int)duration curve:(CPAnimationCurve)curve +{ + [_frameAnimation stopAnimation]; + _frameAnimation = [[_CPWindowFrameAnimation alloc] initWithWindow:self targetFrame:aFrame]; + [_frameAnimation setDelegate:delegate]; + [_frameAnimation setAnimationCurve:curve]; + [_frameAnimation setDuration:duration]; + [_frameAnimation startAnimation]; +} + +- (CPTimeInterval)animationResizeTime:(CGRect)newWindowFrame +{ + return CPWindowResizeTime; +} + +/* @ignore */ +- (void)_setAttachedSheetFrameOrigin +{ + // Position the sheet above the contentRect. + var attachedSheet = [self attachedSheet]; + var contentRect = [[self contentView] frame], + sheetFrame = CGRectMakeCopy([attachedSheet frame]); + + sheetFrame.origin.y = CGRectGetMinY(_frame) + CGRectGetMinY(contentRect); + sheetFrame.origin.x = CGRectGetMinX(_frame) + FLOOR((CGRectGetWidth(_frame) - CGRectGetWidth(sheetFrame)) / 2.0); + + [attachedSheet setFrame:sheetFrame display:YES animate:NO]; +} + +/* @ignore + Starting point for sheet session, called from CPApplication beginSheet: +*/ +- (void)_attachSheet:(CPWindow)aSheet modalDelegate:(id)aModalDelegate + didEndSelector:(SEL)aDidEndSelector contextInfo:(id)aContextInfo +{ + if (_sheetContext) + { + [CPException raise:CPInternalInconsistencyException + reason:@"The target window of beginSheet: already has a sheet, did you forget orderOut: ?"]; + return; + } + + var sheetFrame = [aSheet frame]; + + _sheetContext = {"sheet": aSheet, "modalDelegate": aModalDelegate, "endSelector": aDidEndSelector, + "contextInfo": aContextInfo, "frame": _CGRectMakeCopy(sheetFrame), "returnCode": -1, + "opened": NO}; + + [self _attachSheetWindow]; +} + +/* @ignore + Called to animate the sheet in. The timer seems to solve a bug where sheets would + be partially animated under certain conditions. +*/ +- (void)_attachSheetWindow +{ + _sheetContext["isAttached"] = YES; + + // it would be ideal to block here and spin an event loop, until attach is complete + [CPTimer scheduledTimerWithTimeInterval:0.0 + target:self + selector:@selector(_sheetShouldAnimateIn:) + userInfo:nil + repeats:NO]; +} + +/* @ignore + Called to end the sheet. Note that orderOut: is needed to animate the sheet out, as in Cocoa. + The sheet isn't completely gone until _cleanupSheetWindow gets called. +*/ +- (void)_endSheet +{ + var delegate = _sheetContext["modalDelegate"], + endSelector = _sheetContext["endSelector"]; + + // If the sheet has been ordered out, defer didEndSelector until after sheet animates out. + // This must be done since we cannot block and wait for the animation to complete. + if (delegate && endSelector) + { + if (_sheetContext["isAttached"]) + objj_msgSend(delegate, endSelector, _sheetContext["sheet"], _sheetContext["returnCode"], + _sheetContext["contextInfo"]); + else + _sheetContext["deferDidEndSelector"] = YES; + } +} + +/* @ignore + Called to animate the sheet out. If called while animating in, schedules an animate + out at completion +*/ +- (void)_detachSheetWindow +{ + _sheetContext["isAttached"] = NO; + + // it would be ideal to block here and spin the event loop, until attach is complete + [CPTimer scheduledTimerWithTimeInterval:0.0 + target:self + selector:@selector(_sheetShouldAnimateOut:) + userInfo:nil + repeats:NO]; +} + +/* @ignore + Called to cleanup sheet, when we are definitely done with it +*/ +- (void)_cleanupSheetWindow +{ + var sheet = _sheetContext["sheet"], + lastFrame = _sheetContext["frame"], + deferDidEnd = _sheetContext["deferDidEndSelector"]; + + [sheet setFrame:lastFrame]; + [self _restoreMasksForView:[sheet contentView]]; + + // if the parent window is modal, the sheet started its own modal session + if (sheet._isModal) + [CPApp stopModal]; + + // restore the state of window before it was sheetified + [sheet._windowView _enableSheet:NO]; + + // close it + sheet._isSheet = NO; + [sheet orderOut:self]; + + [[CPNotificationCenter defaultCenter] postNotificationName:CPWindowDidEndSheetNotification object:self]; + + if (deferDidEnd) + { + var delegate = _sheetContext["modalDelegate"], + selector = _sheetContext["endSelector"], + returnCode = _sheetContext["returnCode"], + contextInfo = _sheetContext["contextInfo"]; + + // context must be destroyed, since didEnd might want to attach another sheet + _sheetContext = nil; + sheet._parentView = nil; + + objj_msgSend(delegate, selector, sheet, returnCode, contextInfo); + } + else + { + _sheetContext = nil; + sheet._parentView = nil; + } +} + +/* @ignore */ +- (void)animationDidEnd:(id)anim +{ + var sheet = _sheetContext["sheet"]; + if (anim._window != sheet) + return; + + [CPTimer scheduledTimerWithTimeInterval:0.0 + target:self + selector:@selector(_sheetAnimationDidEnd:) + userInfo:nil + repeats:NO]; +} + +/* @ignore */ +- (void)_sheetShouldAnimateIn:(CPTimer)timer +{ + // can't open sheet while opening or closing animation is going on + if (_sheetContext["isOpening"] || + _sheetContext["isClosing"]) + return; + + var sheet = _sheetContext["sheet"], + sheetFrame = [sheet frame], + frame = [self frame]; + + [self _setUpMasksForView:[sheet contentView]]; + + sheet._isSheet = YES; + sheet._parentView = self; + + var originx = frame.origin.x + FLOOR((frame.size.width - sheetFrame.size.width) / 2), + originy = frame.origin.y + [[self contentView] frame].origin.y, + startFrame = CGRectMake(originx, originy, sheetFrame.size.width, 0), + endFrame = CGRectMake(originx, originy, sheetFrame.size.width, sheetFrame.size.height); + + [[CPNotificationCenter defaultCenter] postNotificationName:CPWindowWillBeginSheetNotification object:self]; + + // if sheet is attached to a modal window, the sheet runs + // as if itself and the parent window are modal + sheet._isModal = NO; + if ([CPApp modalWindow] === self) + { + [CPApp runModalForWindow:sheet]; + sheet._isModal = YES; + } + + [sheet orderFront:self]; + [sheet setFrame:startFrame display:YES animate:NO]; + + _sheetContext["opened"] = YES; + _sheetContext["shouldClose"] = NO; + _sheetContext["isOpening"] = YES; + + [sheet _setFrame:endFrame delegate:self duration:[self animationResizeTime:endFrame] curve:CPAnimationEaseOut]; + + // NOTE: cocoa doesn't make window key until animation is done, but a + // keypress while animating eventually gets to the window. Therefore, + // there must be a runloop specifically designed for sheets? + [sheet makeKeyWindow]; +} + +/* @ignore */ +- (void)_sheetShouldAnimateOut:(CPTimer)timer +{ + var sheet = _sheetContext["sheet"], + startFrame = [sheet frame], + endFrame = CGRectMakeCopy(startFrame); + + if (_sheetContext["isOpening"]) + { + // allow sheet to be closed while opening, it will close when animate in completes + _sheetContext["shouldClose"] = YES; + return; + } + + if (_sheetContext["isClosing"]) + return; + + _sheetContext["opened"] = NO; + _sheetContext["frame"] = startFrame; + _sheetContext["isClosing"] = YES; + + // the parent window can be orderedOut to disable the sheet animate out, as in Cocoa + if ([self isVisible]) + { + endFrame.size.height = 0; + [self _setUpMasksForView:[sheet contentView]]; + [sheet _setFrame:endFrame delegate:self duration:[self animationResizeTime:endFrame] curve:CPAnimationEaseIn]; + } + else + { + [self _sheetAnimationDidEnd:nil]; + } +} + +/* @ignore */ +- (void)_sheetAnimationDidEnd:(CPTimer)timer +{ + var sheet = _sheetContext["sheet"]; + + _sheetContext["isOpening"] = NO; + _sheetContext["isClosing"] = NO; + + if (_sheetContext["opened"] === YES) + { + // sheet is open and completely visible + [self _restoreMasksForView:[sheet contentView]]; + + // we wanted to close the sheet while it animated in, do that now + if (_sheetContext["shouldClose"] === YES) + [self _detachSheetWindow]; + } + else + { + // sheet is closed and not visible + [self _cleanupSheetWindow]; + } +} + +- (void)_setUpMasksForView:(CPView)aView +{ + var views = [aView subviews]; + + [views addObject:aView]; + + for (var i = 0, count = [views count]; i < count; i++) + { + var view = [views objectAtIndex:i], + mask = [view autoresizingMask], + maskToAdd = (mask & CPViewMinYMargin) ? 128 : CPViewMinYMargin; + + [view setAutoresizingMask:(mask | maskToAdd)]; + } +} + +- (void)_restoreMasksForView:(CPView)aView +{ + var views = [aView subviews]; + + [views addObject:aView]; + + for (var i = 0, count = [views count]; i < count; i++) + { + var view = [views objectAtIndex:i], + mask = [view autoresizingMask], + maskToRemove = (mask & 128) ? 128 : CPViewMinYMargin; + + [view setAutoresizingMask:(mask & (~ maskToRemove))]; + } +} + +/*! + Returns the window's attached sheet. +*/ +- (CPWindow)attachedSheet +{ + if (_sheetContext === nil) + return nil; + + return _sheetContext["sheet"]; +} + +/*! + Returns \c YES if the window has ever run as a sheet. +*/ +- (BOOL)isSheet +{ + return _isSheet; +} + +// +/* + Used privately. + @ignore +*/ +- (BOOL)becomesKeyOnlyIfNeeded +{ + return NO; +} + +/*! + Returns \c YES if the receiver is able to receive input events + even when a modal session is active. +*/ +- (BOOL)worksWhenModal +{ + return NO; +} + +- (BOOL)performKeyEquivalent:(CPEvent)anEvent +{ + // FIXME: should we be starting at the root, in other words _windowView? + // The evidence seems to point to no... + return [[self contentView] performKeyEquivalent:anEvent]; +} + +- (void)keyDown:(CPEvent)anEvent +{ + // It's not clear why we do performKeyEquivalent again here... + // Perhaps to allow something to happen between sendEvent: and keyDown:? + if ([anEvent _couldBeKeyEquivalent] && [self performKeyEquivalent:anEvent]) + return; + + // Apple's documentation is inconsistent with their behavior here. According to the docs + // an event going of the responder chain is passed to the input system as a last resort. + // However, the only methods I could get Cocoa to call automatically are + // moveUp: moveDown: moveLeft: moveRight: pageUp: pageDown: and complete: + // Unhandled events just travel further up the responder chain _past_ the window. + if (![self _processKeyboardUIKey:anEvent]) + [super keyDown:anEvent]; +} + +/* + @ignore + Interprets the key event for action messages and sends the action message down the responder chain + Cocoa only sends moveDown:, moveUp:, moveLeft:, moveRight:, pageUp:, pageDown: and complete: messages. + We deviate from this by sending (the default) scrollPageUp:, scrollPageDown:, scrollToBeginningOfDocument: and scrollToEndOfDocument: for pageUp, pageDown, home and end keys. + @param anEvent the event to handle. + @return YES if the key event was handled, NO if no responder handled the key event +*/ +- (BOOL)_processKeyboardUIKey:(CPEvent)anEvent +{ + var character = [anEvent charactersIgnoringModifiers]; + + if (![CPWindowActionMessageKeys containsObject:character]) + return NO; + + var selectors = [CPKeyBinding selectorsForKey:character modifierFlags:0]; + + if ([selectors count] <= 0) + return NO; + + if (character !== CPEscapeFunctionKey) + { + var selector = [selectors objectAtIndex:0]; + return [[self firstResponder] tryToPerform:selector with:self]; + } + else + { + // Cocoa sends complete: for the escape key (in stead of the default cancelOperation:) + // This is also the only action that is not sent directly to the first responder, but through doCommandBySelector. + // The difference is that doCommandBySelector: will also send the action to the window and application delegates. + [[self firstResponder] doCommandBySelector:@selector(complete:)]; + } + + return NO; +} + +- (void)_dirtyKeyViewLoop +{ + if (_autorecalculatesKeyViewLoop) + _keyViewLoopIsDirty = YES; +} + +- (BOOL)_hasKeyViewLoop +{ + var views = allViews(self), + index = [views count]; + + while (index--) + if ([views[index] nextKeyView]) + return YES; + + return NO; +} + +- (void)recalculateKeyViewLoop +{ + var views = allViews(self); + + [views sortUsingFunction:keyViewComparator context:nil]; + + for (var index = 0, count = [views count]; index < count; ++index) + [views[index] setNextKeyView:views[(index + 1) % count]]; + + _keyViewLoopIsDirty = NO; +} + +- (void)setAutorecalculatesKeyViewLoop:(BOOL)shouldRecalculate +{ + if (_autorecalculatesKeyViewLoop === shouldRecalculate) + return; + + _autorecalculatesKeyViewLoop = shouldRecalculate; + + if (_autorecalculatesKeyViewLoop) + [self _dirtyKeyViewLoop]; +} + +- (BOOL)autorecalculatesKeyViewLoop +{ + return _autorecalculatesKeyViewLoop; +} + +- (void)selectNextKeyView:(id)sender +{ + if (_keyViewLoopIsDirty && [self autorecalculatesKeyViewLoop]) + [self recalculateKeyViewLoop]; + + var nextValidKeyView = nil; + + if ([_firstResponder isKindOfClass:[CPView class]]) + nextValidKeyView = [_firstResponder nextValidKeyView]; + + if (!nextValidKeyView) + { + var initialFirstResponder = _initialFirstResponder; + + if ([initialFirstResponder acceptsFirstResponder]) + nextValidKeyView = initialFirstResponder; + else + nextValidKeyView = [initialFirstResponder nextValidKeyView]; + } + + [self makeFirstResponder:nextValidKeyView]; +} + +- (void)selectPreviousKeyView:(id)sender +{ + if (_keyViewLoopIsDirty && [self autorecalculatesKeyViewLoop]) + [self recalculateKeyViewLoop]; + + var previousValidKeyView = nil; + + if ([_firstResponder isKindOfClass:[CPView class]]) + previousValidKeyView = [_firstResponder previousValidKeyView]; + + if (!previousValidKeyView) + { + var initialFirstResponder = _initialFirstResponder; + + if ([initialFirstResponder acceptsFirstResponder]) + previousValidKeyView = initialFirstResponder; + else + previousValidKeyView = [initialFirstResponder previousValidKeyView]; + } + + [self makeFirstResponder:previousValidKeyView]; +} + +- (void)selectKeyViewFollowingView:(CPView)aView +{ + if (_keyViewLoopIsDirty && [self autorecalculatesKeyViewLoop]) + [self recalculateKeyViewLoop]; + + var nextValidKeyView = [aView nextValidKeyView]; + + if ([nextValidKeyView isKindOfClass:[CPView class]]) + [self makeFirstResponder:nextValidKeyView]; +} + +- (void)selectKeyViewPrecedingView:(CPView)aView +{ + if (_keyViewLoopIsDirty && [self autorecalculatesKeyViewLoop]) + [self recalculateKeyViewLoop]; + + var previousValidKeyView = [aView previousValidKeyView]; + + if ([previousValidKeyView isKindOfClass:[CPView class]]) + [self makeFirstResponder:previousValidKeyView]; +} + +/*! + Sets the default button for the window. + Note: this method is deprecated use setDefaultButton: instead. + @param aButton - The button that should become default. +*/ +- (void)setDefaultButtonCell:(CPButton)aButton +{ + [self setDefaultButton:aButton]; +} + +/*! + Returns the default button of the receiver. + NOTE: This method is deprecated. Use defaultButton instead. +*/ +- (CPButton)defaultButtonCell +{ + return [self defaultButton]; +} + +/*! + Sets the default button for the window. + This is equivalent to setting the the key equivalent of the button to "return". + Additionally this will turn your button blue (with the Aristo theme). + @param aButton - The button that should become default. +*/ +- (void)setDefaultButton:(CPButton)aButton +{ + if (_defaultButton === aButton) + return; + + if ([_defaultButton keyEquivalent] === CPCarriageReturnCharacter) + [_defaultButton setKeyEquivalent:nil]; + + _defaultButton = aButton; + + if ([_defaultButton keyEquivalent] !== CPCarriageReturnCharacter) + [_defaultButton setKeyEquivalent:CPCarriageReturnCharacter]; +} + +/*! + Returns the default button of the receiver. +*/ +- (CPButton)defaultButton +{ + return _defaultButton; +} + +/*! + Sets the default button key equivalent to "return". +*/ +- (void)enableKeyEquivalentForDefaultButton +{ + _defaultButtonEnabled = YES; +} + +/*! + Sets the default button key equivalent to "return". + NOTE: this method is deprecated. Use enableKeyEquivalentForDefaultButton instead. +*/ +- (void)enableKeyEquivalentForDefaultButtonCell +{ + [self enableKeyEquivalentForDefaultButton]; +} + +/*! + Removes the key equivalent for the default button. +*/ +- (void)disableKeyEquivalentForDefaultButton +{ + _defaultButtonEnabled = NO; +} + +/*! + Removes the key equivalent for the default button. + Note: this method is deprecated. Use disableKeyEquivalentForDefaultButton instead. +*/ +- (void)disableKeyEquivalentForDefaultButtonCell +{ + [self disableKeyEquivalentForDefaultButton]; +} + +@end + +var allViews = function(aWindow) +{ + var views = [CPArray arrayWithObject:[aWindow contentView]]; + + [views addObjectsFromArray:[[aWindow contentView] subviews]]; + + // Start from index 1 because index 0 is the contentView and its subviews have already been added + for (var index = 1; index < views.length; ++index) + views = views.concat([views[index] subviews]); + + return views; +}; + +var keyViewComparator = function(lhs, rhs, context) +{ + var lhsBounds = [lhs convertRect:[lhs bounds] toView:nil], + rhsBounds = [rhs convertRect:[rhs bounds] toView:nil], + lhsY = _CGRectGetMinY(lhsBounds), + rhsY = _CGRectGetMinY(rhsBounds), + lhsX = _CGRectGetMinX(lhsBounds), + rhsX = _CGRectGetMinX(rhsBounds), + intersectsVertically = MIN(_CGRectGetMaxY(lhsBounds), _CGRectGetMaxY(rhsBounds)) - MAX(lhsY, rhsY); + + // If two views are "on the same line" (intersect vertically), then rely on the x comparison. + if (intersectsVertically > 0) + { + if (lhsX < rhsX) + return CPOrderedAscending; + + if (lhsX === rhsX) + return CPOrderedSame; + + return CPOrderedDescending; + } + + if (lhsY < rhsY) + return CPOrderedAscending; + + if (lhsY === rhsY) + return CPOrderedSame; + + return CPOrderedDescending; +}; + +@implementation CPWindow (MenuBar) + +- (void)_synchronizeMenuBarTitleWithWindowTitle +{ + // Windows with Documents automatically update the native window title and the menu bar title. + if (![_windowController document] || ![self isMainWindow]) + return; + + [CPMenu setMenuBarTitle:_title]; +} + +@end + +@implementation CPWindow (BridgeSupport) + +/* + @ignore +*/ +- (void)resizeWithOldPlatformWindowSize:(CGSize)aSize +{ + if ([self isFullPlatformWindow]) + return [self setFrame:[_platformWindow visibleFrame]]; + + if (_autoresizingMask == CPWindowNotSizable) + return; + + var frame = [_platformWindow contentBounds], + newFrame = CGRectMakeCopy(_frame), + dX = (CGRectGetWidth(frame) - aSize.width) / + (((_autoresizingMask & CPWindowMinXMargin) ? 1 : 0) + (_autoresizingMask & CPWindowWidthSizable ? 1 : 0) + (_autoresizingMask & CPWindowMaxXMargin ? 1 : 0)), + dY = (CGRectGetHeight(frame) - aSize.height) / + ((_autoresizingMask & CPWindowMinYMargin ? 1 : 0) + (_autoresizingMask & CPWindowHeightSizable ? 1 : 0) + (_autoresizingMask & CPWindowMaxYMargin ? 1 : 0)); + + if (_autoresizingMask & CPWindowMinXMargin) + newFrame.origin.x += dX; + if (_autoresizingMask & CPWindowWidthSizable) + newFrame.size.width += dX; + + if (_autoresizingMask & CPWindowMinYMargin) + newFrame.origin.y += dY; + if (_autoresizingMask & CPWindowHeightSizable) + newFrame.size.height += dY; + + [self setFrame:newFrame]; +} + +/* + @ignore +*/ +- (void)setAutoresizingMask:(unsigned)anAutoresizingMask +{ + _autoresizingMask = anAutoresizingMask; +} + +/* + @ignore +*/ +- (unsigned)autoresizingMask +{ + return _autoresizingMask; +} + +/*! + Converts aPoint from the window coordinate system to the global coordinate system. +*/ +- (CGPoint)convertBaseToGlobal:(CGPoint)aPoint +{ + return [CPPlatform isBrowser] ? [self convertBaseToPlatformWindow:aPoint] : [self convertBaseToScreen:aPoint]; +} + +/*! + Converts aPoint from the global coordinate system to the window coordinate system. +*/ +- (CGPoint)convertGlobalToBase:(CGPoint)aPoint +{ + return [CPPlatform isBrowser] ? [self convertPlatformWindowToBase:aPoint] : [self convertScreenToBase:aPoint]; +} + +/*! + Converts aPoint from the window coordinate system to the coordinate system of the parent platform window. +*/ +- (CGPoint)convertBaseToPlatformWindow:(CGPoint)aPoint +{ + if ([self _sharesChromeWithPlatformWindow]) + return _CGPointMakeCopy(aPoint); + + var origin = [self frame].origin; + + return _CGPointMake(aPoint.x + origin.x, aPoint.y + origin.y); +} + +/*! + Converts aPoint from the parent platform window coordinate system to the window's coordinate system. +*/ +- (CGPoint)convertPlatformWindowToBase:(CGPoint)aPoint +{ + if ([self _sharesChromeWithPlatformWindow]) + return _CGPointMakeCopy(aPoint); + + var origin = [self frame].origin; + + return _CGPointMake(aPoint.x - origin.x, aPoint.y - origin.y); +} + +- (CGPoint)convertScreenToBase:(CGPoint)aPoint +{ + return [self convertPlatformWindowToBase:[_platformWindow convertScreenToBase:aPoint]]; +} + +- (CGPoint)convertBaseToScreen:(CGPoint)aPoint +{ + return [_platformWindow convertBaseToScreen:[self convertBaseToPlatformWindow:aPoint]]; +} + +- (void)_setSharesChromeWithPlatformWindow:(BOOL)shouldShareFrameWithPlatformWindow +{ + // We canna' do it captain! We just don't have the power! + if (shouldShareFrameWithPlatformWindow && [CPPlatform isBrowser]) + return; + + _sharesChromeWithPlatformWindow = shouldShareFrameWithPlatformWindow; + + [self _updateShadow]; +} + +- (BOOL)_sharesChromeWithPlatformWindow +{ + return _sharesChromeWithPlatformWindow; +} + +// Undo and Redo Support +/*! + Returns the window's undo manager. +*/ +- (CPUndoManager)undoManager +{ + // If we've ever created an undo manager, return it. + if (_undoManager) + return _undoManager; + + // If not, check to see if the document has one. + var documentUndoManager = [[_windowController document] undoManager]; + + if (documentUndoManager) + return documentUndoManager; + + // If not, check to see if the delegate has one. + if (_delegateRespondsToWindowWillReturnUndoManagerSelector) + return [_delegate windowWillReturnUndoManager:self]; + + // If not, create one. + if (!_undoManager) + _undoManager = [[CPUndoManager alloc] init]; + + return _undoManager; +} + +/*! + Sends the undo manager an \c -undo: message. + @param aSender the object requesting this +*/ +- (void)undo:(id)aSender +{ + [[self undoManager] undo]; +} + +/*! + Sends the undo manager a \c -redo: message. + @param aSender the object requesting this +*/ +- (void)redo:(id)aSender +{ + [[self undoManager] redo]; +} + +- (BOOL)containsPoint:(CGPoint)aPoint +{ + return CGRectContainsPoint(_frame, aPoint); +} + +@end + +@implementation CPWindow (Deprecated) +/*! + Sets the CPWindow to fill the whole browser window. + NOTE: this method has been deprecated in favor of setFullPlatformWindow: +*/ +- (void)setFullBridge:(BOOL)shouldBeFullBridge +{ + [self setFullPlatformWindow:shouldBeFullBridge]; +} + +/*! + Returns YES if the window fills the full browser window, otherwise NO. + NOTE: this method has been deprecated in favor of isFullPlatformWindow. +*/ +- (BOOL)isFullBridge +{ + return [self isFullPlatformWindow]; +} + +/* + @ignore +*/ +- (CGPoint)convertBaseToBridge:(CGPoint)aPoint +{ + return [self convertBaseToPlatformWindow:aPoint]; +} + +/* + @ignore +*/ +- (CGPoint)convertBridgeToBase:(CGPoint)aPoint +{ + return [self convertPlatformWindowToBase:aPoint]; +} + +@end + +var interpolate = function(fromValue, toValue, progress) +{ + return fromValue + (toValue - fromValue) * progress; +}; + +/* @ignore */ +@implementation _CPWindowFrameAnimation : CPAnimation +{ + CPWindow _window; + + CGRect _startFrame; + CGRect _targetFrame; +} + +- (id)initWithWindow:(CPWindow)aWindow targetFrame:(CGRect)aTargetFrame +{ + self = [super initWithDuration:[aWindow animationResizeTime:aTargetFrame] animationCurve:CPAnimationLinear]; + + if (self) + { + _window = aWindow; + + _targetFrame = CGRectMakeCopy(aTargetFrame); + _startFrame = CGRectMakeCopy([_window frame]); + } + + return self; +} + +- (void)startAnimation +{ + [super startAnimation]; + + _window._isAnimating = YES; +} + +- (void)setCurrentProgress:(float)aProgress +{ + [super setCurrentProgress:aProgress]; + + var value = [self currentValue]; + + if (value == 1.0) + _window._isAnimating = NO; + + var newFrame = CGRectMake(interpolate(CGRectGetMinX(_startFrame), CGRectGetMinX(_targetFrame), value), + interpolate(CGRectGetMinY(_startFrame), CGRectGetMinY(_targetFrame), value), + interpolate(CGRectGetWidth(_startFrame), CGRectGetWidth(_targetFrame), value), + interpolate(CGRectGetHeight(_startFrame), CGRectGetHeight(_targetFrame), value)); + + [_window setFrame:newFrame display:YES animate:NO]; +} + +@end + +function _CPWindowFullPlatformWindowSessionMake(aWindowView, aContentRect, hasShadow, aLevel) +{ + return { windowView:aWindowView, contentRect:aContentRect, hasShadow:hasShadow, level:aLevel }; +} + +CPStandardWindowShadowStyle = 0; +CPMenuWindowShadowStyle = 1; +CPPanelWindowShadowStyle = 2; +CPCustomWindowShadowStyle = 3; + + +/*@import "_CPWindowView.j" +@import "_CPStandardWindowView.j" +@import "_CPDocModalWindowView.j" +@import "_CPToolTipWindowView.j" +@import "_CPHUDWindowView.j" +@import "_CPBorderlessWindowView.j" +@import "_CPBorderlessBridgeWindowView.j" +@import "_CPAttachedWindowView.j" +@import "CPDragServer.j" +@import "CPView.j"*/ diff --git a/AppKit/Cib/_CPCibObjectData.j b/AppKit/Cib/_CPCibObjectData.j index 87d079ec8..2d1eecf95 100644 --- a/AppKit/Cib/_CPCibObjectData.j +++ b/AppKit/Cib/_CPCibObjectData.j @@ -20,7 +20,7 @@ * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA */ -@import +@import @import @import diff --git a/AppKit/Platform/DOM/CPDOMWindowLayer.j b/AppKit/Platform/DOM/CPDOMWindowLayer.j index 5b8a0fa73..a919dcff6 100644 --- a/AppKit/Platform/DOM/CPDOMWindowLayer.j +++ b/AppKit/Platform/DOM/CPDOMWindowLayer.j @@ -20,7 +20,7 @@ * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA */ -@import +@import @import diff --git a/Foundation/CPArray+KVO.j b/Foundation/CPArray+KVO.j index a5b52bf9c..fc65294ef 100644 --- a/Foundation/CPArray+KVO.j +++ b/Foundation/CPArray+KVO.j @@ -20,7 +20,7 @@ * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA */ -@import "_CPJavaScriptArray.j" +@import "CPArray.j" @import "CPNull.j" @import "_CPCollectionKVCOperators.j" diff --git a/Foundation/CPArray/CPArray.j b/Foundation/CPArray/CPArray.j old mode 100755 new mode 100644 index 2f38e3faf..5d6505c36 --- a/Foundation/CPArray/CPArray.j +++ b/Foundation/CPArray/CPArray.j @@ -20,999 +20,5 @@ * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA */ -@import "CPEnumerator.j" -@import "CPException.j" -@import "CPObject.j" -@import "CPRange.j" -@import "CPSortDescriptor.j" - - -CPEnumerationNormal = 0; -CPEnumerationConcurrent = 1 << 0; -CPEnumerationReverse = 1 << 1; - -CPBinarySearchingFirstEqual = 1 << 8; -CPBinarySearchingLastEqual = 1 << 9; -CPBinarySearchingInsertionIndex = 1 << 10; - -var concat = Array.prototype.concat, - join = Array.prototype.join, - push = Array.prototype.push; - -#define FORWARD_TO_CONCRETE_CLASS()\ - if (self === _CPSharedPlaceholderArray)\ - {\ - arguments[0] = [_CPJavaScriptArray alloc];\ - return objj_msgSend.apply(this, arguments);\ - }\ - return [super init]; - -/*! - @class CPArray - @brief A mutable array backed by a JavaScript Array. - @ingroup foundation - - A mutable array class backed by a JavaScript Array. - There is also a CPMutableArray class, - but it is just a child class of this class with an - empty implementation. All mutable functionality is - implemented directly in CPArray. -*/ -@implementation CPArray : CPObject - -/*! - Returns a new uninitialized CPArray. -*/ -+ (id)alloc -{ - if (self === CPArray || self === CPMutableArray) - return [_CPPlaceholderArray alloc]; - - return [super alloc]; -} - -/*! - Returns a new initialized CPArray. -*/ -+ (id)array -{ - return [[self alloc] init]; -} - -/*! - Creates a new array containing the objects in \c anArray. - @param anArray Objects in this array will be added to the new array - @return a new CPArray of the provided objects -*/ -+ (id)arrayWithArray:(CPArray)anArray -{ - return [[self alloc] initWithArray:anArray]; -} - -/*! - Creates a new array with \c anObject in it. - @param anObject the object to be added to the array - @return a new CPArray containing a single object -*/ -+ (id)arrayWithObject:(id)anObject -{ - return [[self alloc] initWithObjects:anObject]; -} - -/*! - Creates a new CPArray containing all the objects passed as arguments to the method. - @param anObject the objects that will be added to the new array - @return a new CPArray containing the argument objects -*/ -+ (id)arrayWithObjects:(id)anObject, ... -{ - arguments[0] = [self alloc]; - arguments[1] = @selector(initWithObjects:); - - return objj_msgSend.apply(this, arguments); -} - -/*! - Creates a CPArray from a JavaScript array of objects. - @param objects the JavaScript Array - @param aCount the number of objects in the JS Array - @return a new CPArray containing the specified objects -*/ -+ (id)arrayWithObjects:(id)objects count:(unsigned)aCount -{ - return [[self alloc] initWithObjects:objects count:aCount]; -} - -/*! - Initializes the CPArray. - @return the initialized array -*/ -- (id)init -{ - FORWARD_TO_CONCRETE_CLASS(); -} - -// Creating an Array -/*! - Creates a new CPArray from \c anArray. - @param anArray objects in this array will be added to the new array - @return a new CPArray containing the objects of \c anArray -*/ -- (id)initWithArray:(CPArray)anArray -{ - FORWARD_TO_CONCRETE_CLASS(); -} - -/*! - Initializes a the array with the contents of \c anArray - and optionally performs a deep copy of the objects based on \c copyItems. - @param anArray the array to copy the data from - @param shouldCopyItems if \c YES, each object will be copied by having a \c -copy message - sent to it, and the returned object will be added to the receiver. Otherwise, no copying will be performed. - @return the initialized array of objects -*/ -- (id)initWithArray:(CPArray)anArray copyItems:(BOOL)shouldCopyItems -{ - FORWARD_TO_CONCRETE_CLASS(); -} - -/*! - initializes an array with the contents of anArray -*/ -- (id)initWithObjects:(id)anObject, ... -{ - FORWARD_TO_CONCRETE_CLASS(); -} - -/*! - Initializes the array with a JavaScript array of objects. - @param objects the array of objects to add to the receiver - @param aCount the number of objects in \c objects - @return the initialized CPArray -*/ -- (id)initWithObjects:(id)objects count:(unsigned)aCount -{ - FORWARD_TO_CONCRETE_CLASS(); -} - -// FIXME: This should be defined in CPMutableArray, not here. -- (id)initWithCapacity:(unsigned)aCapacity -{ - FORWARD_TO_CONCRETE_CLASS(); -} - -// Querying an array -/*! - Returns \c YES if the array contains \c anObject. Otherwise, it returns \c NO. - @param anObject the method checks if this object is already in the array -*/ -- (BOOL)containsObject:(id)anObject -{ - return [self indexOfObject:anObject] !== CPNotFound; -} - -- (BOOL)containsObjectIdenticalTo:(id)anObject -{ - return [self indexOfObjectIdenticalTo:anObject] !== CPNotFound; -} - -/*! - Returns the number of elements in the array -*/ -- (int)count -{ - _CPRaiseInvalidAbstractInvocation(self, _cmd); -} - -/*! - Returns the first object in the array. If the array is empty, returns \c nil -*/ -- (id)firstObject -{ - var count = [self count]; - - if (count > 0) - return [self objectAtIndex:0]; - - return nil; -} - -/*! - Returns the last object in the array. If the array is empty, returns \c nil -*/ -- (id)lastObject -{ - var count = [self count]; - - if (count <= 0) - return nil; - - return [self objectAtIndex:count - 1]; -} - -/*! - Returns the object at index \c anIndex. - @throws CPRangeException if \c anIndex is out of bounds -*/ -- (id)objectAtIndex:(int)anIndex -{ - _CPRaiseInvalidAbstractInvocation(self, _cmd); -} - -/*! - Returns the objects at \c indexes in a new CPArray. - @param indexes the set of indices - @throws CPRangeException if any of the indices is greater than or equal to the length of the array -*/ -- (CPArray)objectsAtIndexes:(CPIndexSet)indexes -{ - var index = CPNotFound, - objects = []; - - while ((index = [indexes indexGreaterThanIndex:index]) !== CPNotFound) - objects.push([self objectAtIndex:index]); - - return objects; -} - -/*! - Returns an enumerator describing the array sequentially - from the first to the last element. You should not modify - the array during enumeration. -*/ -- (CPEnumerator)objectEnumerator -{ - return [[_CPArrayEnumerator alloc] initWithArray:self]; -} - -/*! - Returns an enumerator describing the array sequentially - from the last to the first element. You should not modify - the array during enumeration. -*/ -- (CPEnumerator)reverseObjectEnumerator -{ - return [[_CPReverseArrayEnumerator alloc] initWithArray:self]; -} - -/*! - Returns the index of \c anObject in this array. - If the object is not in the array, - returns \c CPNotFound. It first attempts to find - a match using \c -isEqual:, then \c ===. - @param anObject the object to search for -*/ -- (CPUInteger)indexOfObject:(id)anObject -{ - return [self indexOfObject:anObject inRange:nil]; -} - -/*! - Returns the index of \c anObject in the array - within \c aRange. It first attempts to find - a match using \c -isEqual:, then \c ===. - @param anObject the object to search for - @param aRange the range to search within - @return the index of the object, or \c CPNotFound if it was not found. -*/ -- (CPUInteger)indexOfObject:(id)anObject inRange:(CPRange)aRange -{ - // Only use isEqual: if our object is a CPObject. - if (anObject && anObject.isa) - { - var index = aRange ? aRange.location : 0, - count = aRange ? CPMaxRange(aRange) : [self count]; - - for (; index < count; ++index) - if ([[self objectAtIndex:index] isEqual:anObject]) - return index; - - return CPNotFound; - } - - return [self indexOfObjectIdenticalTo:anObject inRange:aRange]; -} - -/*! - Returns the index of \c anObject in the array. The test for equality is done using only \c ===. - @param anObject the object to search for - @return the index of the object in the array. \c CPNotFound if the object is not in the array. -*/ -- (CPUInteger)indexOfObjectIdenticalTo:(id)anObject -{ - return [self indexOfObjectIdenticalTo:anObject inRange:nil]; -} - -/*! - Returns the index of \c anObject in the array - within \c aRange. The test for equality is - done using only \c ==. - @param anObject the object to search for - @param aRange the range to search within - @return the index of the object, or \c CPNotFound if it was not found. -*/ -- (CPUInteger)indexOfObjectIdenticalTo:(id)anObject inRange:(CPRange)aRange -{ - var index = aRange ? aRange.location : 0, - count = aRange ? CPMaxRange(aRange) : [self count]; - - for (; index < count; ++index) - if ([self objectAtIndex:index] === anObject) - return index; - - return CPNotFound; -} - -/*! - Returns the index of the first object in the receiver that passes a test in a given Javascript function. - @param predicate The function to apply to objects of the array. The function should have the signature: - @code function(object, index) @endcode - The predicate function should either return a Boolean value that indicates whether the object passed the test, - or nil to stop the search, which will return \c CPNotFound to the sender. - @return The index of the first matching object, or \c CPNotFound if there is no matching object. -*/ -- (unsigned)indexOfObjectPassingTest:(Function /*(id anObject, int idx)*/)aPredicate -{ - return [self indexOfObjectWithOptions:CPEnumerationNormal passingTest:aPredicate context:undefined]; -} - -/*! - Returns the index of the first object in the receiver that passes a test in a given Javascript function. - @param predicate The function to apply to objects of the array. The function should have the signature: - @code function(object, index, context) @endcode - The predicate function should either return a Boolean value that indicates whether the object passed the test, - or nil to stop the search, which will return \c CPNotFound to the sender. - @param context An object that contains context information you want passed to the predicate function. - @return The index of the first matching object, or \c CPNotFound if there is no matching object. -*/ -- (unsigned)indexOfObjectPassingTest:(Function /*(id anObject, int idx, id context)*/)aPredicate context:(id)aContext -{ - return [self indexOfObjectWithOptions:CPEnumerationNormal passingTest:aPredicate context:aContext]; -} - -/*! - Returns the index of the first object in the receiver that passes a test in a given Javascript function. - @param options Specifies the direction in which the array is searched. Pass CPEnumerationNormal to search forwards - or CPEnumerationReverse to search in reverse. - @param predicate The function to apply to objects of the array. The function should have the signature: - @code function(object, index) @endcode - The predicate function should either return a Boolean value that indicates whether the object passed the test, - or nil to stop the search, which will return CPNotFound to the sender. - @return The index of the first matching object, or \c CPNotFound if there is no matching object. -*/ -- (unsigned)indexOfObjectWithOptions:(CPEnumerationOptions)options passingTest:(Function /*(id anObject, int idx)*/)aPredicate -{ - return [self indexOfObjectWithOptions:options passingTest:aPredicate context:undefined]; -} - -/*! - Returns the index of the first object in the receiver that passes a test in a given Javascript function. - @param options Specifies the direction in which the array is searched. Pass CPEnumerationNormal to search forwards - or CPEnumerationReverse to search in reverse. - @param predicate The function to apply to objects of the array. The function should have the signature: - @code function(object, index, context) @endcode - The predicate function should either return a Boolean value that indicates whether the object passed the test, - or nil to stop the search, which will return CPNotFound to the sender. - @param context An object that contains context information you want passed to the predicate function. - @return The index of the first matching object, or \c CPNotFound if there is no matching object. -*/ -- (unsigned)indexOfObjectWithOptions:(CPEnumerationOptions)options passingTest:(Function /*(id anObject, int idx, id context)*/)aPredicate context:(id)aContext -{ - // We don't use an enumerator because they return nil to indicate end of enumeration, - // but nil may actually be the value we are looking for, so we have to loop over the array. - if (options & CPEnumerationReverse) - { - var index = [self count] - 1, - stop = -1, - increment = -1; - } - else - { - var index = 0, - stop = [self count], - increment = 1; - } - - for (; index !== stop; index += increment) - if (aPredicate([self objectAtIndex:index], index, aContext)) - return index; - - return CPNotFound; -} - -- (CPUInteger)indexOfObject:(id)anObject - inSortedRange:(CPRange)aRange - options:(CPBinarySearchingOptions)options - usingComparator:(Function)aComparator -{ - // FIXME: comparator is not a function - if (!aComparator) - _CPRaiseInvalidArgumentException(self, _cmd, "comparator is nil"); - - if ((options & CPBinarySearchingFirstEqual) && (options & CPBinarySearchingLastEqual)) - _CPRaiseInvalidArgumentException(self, _cmd, - "both CPBinarySearchingFirstEqual and CPBinarySearchingLastEqual options cannot be specified"); - - var count = [self count]; - - if (count <= 0) - return (options & CPBinarySearchingInsertionIndex) ? 0 : CPNotFound; - - var first = aRange ? aRange.location : 0, - last = (aRange ? CPMaxRange(aRange) : [self count]) - 1; - - if (first < 0) - _CPRaiseRangeException(self, _cmd, first, count); - - if (last >= count) - _CPRaiseRangeException(self, _cmd, last, count); - - while (first <= last) - { - var middle = FLOOR((first + last) / 2), - result = aComparator(anObject, [self objectAtIndex:middle]); - - if (result > 0) - first = middle + 1; - - else if (result < 0) - last = middle - 1; - - else - { - if (options & CPBinarySearchingFirstEqual) - while (middle > first && aComparator(anObject, [self objectAtIndex:middle - 1]) === CPOrderedSame) - --middle; - - else if (options & CPBinarySearchingLastEqual) - { - while (middle < last && aComparator(anObject, [self objectAtIndex:middle + 1]) === CPOrderedSame) - ++middle; - - if (options & CPBinarySearchingInsertionIndex) - ++middle; - } - - return middle; - } - } - - if (options & CPBinarySearchingInsertionIndex) - return MAX(first, 0); - - return CPNotFound; -} - -/*! - Returns the indexes of the objects in the receiver that pass a test in a given Javascript function. - @param predicate The function to apply to objects of the array. The function should have the signature: - @code function(object, index) @endcode - The predicate function should either return a Boolean value that indicates whether the object passed the test, - or nil to stop the search, which will return \c CPNotFound to the sender. - @return A CPIndexSet of the matching object indexes. -*/ -- (CPIndexSet)indexesOfObjectsPassingTest:(Function /*(id anObject, int idx)*/)aPredicate -{ - return [self indexesOfObjectsWithOptions:CPEnumerationNormal passingTest:aPredicate context:undefined]; -} - -/*! - Returns the indexes of the objects in the receiver that pass a test in a given Javascript function. - @param predicate The function to apply to objects of the array. The function should have the signature: - @code function(object, index, context) @endcode - The predicate function should either return a Boolean value that indicates whether the object passed the test, - or nil to stop the search, which will return \c CPNotFound to the sender. - @param context An object that contains context information you want passed to the predicate function. - @return A CPIndexSet of the matching object indexes. -*/ -- (CPIndexSet)indexesOfObjectsPassingTest:(Function /*(id anObject, int idx, id context)*/)aPredicate context:(id)aContext -{ - return [self indexesOfObjectsWithOptions:CPEnumerationNormal passingTest:aPredicate context:aContext]; -} - -/*! - Returns the indexes of the objects in the receiver that pass a test in a given Javascript function. - @param options Specifies the direction in which the array is searched. Pass CPEnumerationNormal to search forwards - or CPEnumerationReverse to search in reverse. - @param predicate The function to apply to objects of the array. The function should have the signature: - @code function(object, index) @endcode - The predicate function should either return a Boolean value that indicates whether the object passed the test, - or nil to stop the search, which will return CPNotFound to the sender. - @return A CPIndexSet of the matching object indexes. -*/ -- (CPIndexSet)indexesOfObjectsWithOptions:(CPEnumerationOptions)options passingTest:(Function /*(id anObject, int idx)*/)aPredicate -{ - return [self indexesOfObjectsWithOptions:options passingTest:aPredicate context:undefined]; -} - -/*! - Returns the indexes of the objects in the receiver that pass a test in a given Javascript function. - @param options Specifies the direction in which the array is searched. Pass CPEnumerationNormal to search forwards - or CPEnumerationReverse to search in reverse. - @param predicate The function to apply to objects of the array. The function should have the signature: - @code function(object, index, context) @endcode - The predicate function should either return a Boolean value that indicates whether the object passed the test, - or nil to stop the search, which will return CPNotFound to the sender. - @param context An object that contains context information you want passed to the predicate function. - @return A CPIndexSet of the matching object indexes. -*/ -- (CPIndexSet)indexesOfObjectsWithOptions:(CPEnumerationOptions)options passingTest:(Function /*(id anObject, int idx, id context)*/)aPredicate context:(id)aContext -{ - // We don't use an enumerator because they return nil to indicate end of enumeration, - // but nil may actually be the value we are looking for, so we have to loop over the array. - if (options & CPEnumerationReverse) - { - var index = [self count] - 1, - stop = -1, - increment = -1; - } - else - { - var index = 0, - stop = [self count], - increment = 1; - } - - var indexes = [CPIndexSet indexSet]; - - for (; index !== stop; index += increment) - if (aPredicate([self objectAtIndex:index], index, aContext)) - [indexes addIndex:index]; - - return indexes; -} - -// Sending messages to elements -/*! - Sends each element in the array a message. - @param aSelector the selector of the message to send - @throws CPInvalidArgumentException if \c aSelector is \c nil -*/ -- (void)makeObjectsPerformSelector:(SEL)aSelector -{ - [self makeObjectsPerformSelector:aSelector withObjects:nil]; -} - -/*! - Sends each element in the array a message with an argument. - @param aSelector the selector of the message to send - @param anObject the first argument of the message - @throws CPInvalidArgumentException if \c aSelector is \c nil -*/ -- (void)makeObjectsPerformSelector:(SEL)aSelector withObject:(id)anObject -{ - return [self makeObjectsPerformSelector:aSelector withObjects:[anObject]]; -} - -- (void)makeObjectsPerformSelector:(SEL)aSelector withObjects:(CPArray)objects -{ - if (!aSelector) - [CPException raise:CPInvalidArgumentException - reason:"makeObjectsPerformSelector:withObjects: 'aSelector' can't be nil"]; - - var index = 0, - count = [self count]; - - if ([objects count]) - { - var argumentsArray = [[nil, aSelector] arrayByAddingObjectsFromArray:objects]; - - for (; index < count; ++index) - { - argumentsArray[0] = [self objectAtIndex:index]; - objj_msgSend.apply(this, argumentsArray); - } - } - - else - for (; index < count; ++index) - objj_msgSend([self objectAtIndex:index], aSelector); -} - -- (void)enumerateObjectsUsingBlock:(Function /*(id anObject, int idx, @ref BOOL stop)*/)aFunction -{ - // This could have been [self enumerateObjectsWithOptions:CPEnumerationNormal usingBlock:aFunction] - // but this method should be as fast as possible. - var index = 0, - count = [self count], - shouldStop = NO, - shouldStopRef = AT_REF(shouldStop); - - for (; index < count; ++index) - { - aFunction([self objectAtIndex:index], index, shouldStopRef); - if (shouldStop) - return; - } -} - -- (void)enumerateObjectsWithOptions:(CPEnumerationOptions)options usingBlock:(Function /*(id anObject, int idx, @ref BOOL stop)*/)aFunction -{ - var shouldStop = NO; - - if (options & CPEnumerationReverse) - { - var index = [self count] - 1, - stop = -1, - increment = -1; - } - else - { - var index = 0, - stop = [self count], - increment = 1; - } - - for (; index !== stop; index += increment) - { - aFunction([self objectAtIndex:index], index, AT_REF(shouldStop)); - if (shouldStop) - return; - } -} - -// Comparing arrays -/*! - Returns the first object found in the receiver (starting at index 0) which is present in the - \c otherArray as determined by using the \c -containsObject: method. - @return the first object found, or \c nil if no common object was found. -*/ -- (id)firstObjectCommonWithArray:(CPArray)anArray -{ - var count = [self count]; - - if (![anArray count] || !count) - return nil; - - var index = 0; - - for (; index < count; ++index) - { - var object = [self objectAtIndex:index]; - - if ([anArray containsObject:object]) - return object; - } - - return nil; -} - -/*! - Returns true if anArray contains exactly the same objects as the receiver. -*/ -- (BOOL)isEqualToArray:(id)anArray -{ - if (self === anArray) - return YES; - - if (![anArray isKindOfClass:CPArray]) - return NO; - - var count = [self count], - otherCount = [anArray count]; - - if (anArray === nil || count !== otherCount) - return NO; - - var index = 0; - - for (; index < count; ++index) - { - var lhs = [self objectAtIndex:index], - rhs = [anArray objectAtIndex:index]; - - // If they're not equal, and either doesn't have an isa, or they're !isEqual (not isEqual) - if (lhs !== rhs && (lhs && !lhs.isa || rhs && !rhs.isa || ![lhs isEqual:rhs])) - return NO; - } - - return YES; -} - -- (BOOL)isEqual:(id)anObject -{ - return (self === anObject) || [self isEqualToArray:anObject]; -} - -- (Array)_javaScriptArrayCopy -{ - var index = 0, - count = [self count], - copy = []; - - for (; index < count; ++index) - push.call(copy, [self objectAtIndex:index]); - - return copy; -} - -// Deriving new arrays -/*! - Returns a copy of this array plus \c anObject inside the copy. - @param anObject the object to be added to the array copy - @throws CPInvalidArgumentException if \c anObject is \c nil - @return a new array that should be n+1 in size compared to the receiver. -*/ -- (CPArray)arrayByAddingObject:(id)anObject -{ - var argumentArray = [self _javaScriptArrayCopy]; - - // We push instead of concat,because concat flattens arrays, so if the object - // passed in is an array, we end up with its contents added instead of itself. - push.call(argumentArray, anObject); - - return objj_msgSend([self class], @selector(arrayWithArray:), argumentArray); -} - -/*! - Returns a new array which is the concatenation of \c self and otherArray (in this precise order). - @param anArray the array that will be concatenated to the receiver's copy -*/ -- (CPArray)arrayByAddingObjectsFromArray:(CPArray)anArray -{ - if (!anArray) - return [self copy]; - - var anArray = anArray.isa === _CPJavaScriptArray ? anArray : [anArray _javaScriptArrayCopy], - argumentArray = concat.call([self _javaScriptArrayCopy], anArray); - - return objj_msgSend([self class], @selector(arrayWithArray:), argumentArray); -} - -/* -- (CPArray)filteredArrayUsingPredicate:(CPPredicate)aPredicate -{ - var i= 0, - count = [self count], - array = [CPArray array]; - - for (; i self.length) - [CPException raise:CPRangeException reason:"subarrayWithRange: aRange out of bounds"]; - - var index = aRange.location, - count = CPMaxRange(aRange), - argumentArray = []; - - for (; index < count; ++index) - push.call(argumentArray, [self objectAtIndex:index]); - - return objj_msgSend([self class], @selector(arrayWithArray:), argumentArray); -} - -// Sorting arrays -/* - Not yet described. -*/ -- (CPArray)sortedArrayUsingDescriptors:(CPArray)descriptors -{ - var sorted = [self copy]; - - [sorted sortUsingDescriptors:descriptors]; - - return sorted; -} - -/*! - Return a copy of the receiver sorted using the function passed into the first parameter. -*/ -- (CPArray)sortedArrayUsingFunction:(Function)aFunction -{ - return [self sortedArrayUsingFunction:aFunction context:nil]; -} - -/*! - Returns an array in which the objects are ordered according - to a sort with \c aFunction. This invokes - \c -sortUsingFunction:context. - @param aFunction a JavaScript 'Function' type that compares objects - @param aContext context information - @return a new sorted array -*/ -- (CPArray)sortedArrayUsingFunction:(Function)aFunction context:(id)aContext -{ - var sorted = [self copy]; - - [sorted sortUsingFunction:aFunction context:aContext]; - - return sorted; -} - -/*! - Returns a new array in which the objects are ordered according to a sort with \c aSelector. - @param aSelector the selector that will perform object comparisons -*/ -- (CPArray)sortedArrayUsingSelector:(SEL)aSelector -{ - var sorted = [self copy]; - - [sorted sortUsingSelector:aSelector]; - - return sorted; -} - -// Working with string elements - -/*! - Returns a string formed by concatenating the objects in the - receiver, with the specified separator string inserted between each part. - If the element is a Objective-J object, then the \c -description - of that object will be used, otherwise the default JavaScript representation will be used. - @param aString the separator that will separate each object string - @return the string representation of the array -*/ -- (CPString)componentsJoinedByString:(CPString)aString -{ - return join.call([self _javaScriptArrayCopy], aString); -} - -// Creating a description of the array - -/*! - Returns a human readable description of this array and it's elements. -*/ -- (CPString)description -{ - var index = 0, - count = [self count], - description = "@["; - - for (; index < count; ++index) - { - if (index === 0) - description += "\n\t"; - - var object = [self objectAtIndex:index]; - description += CPDescriptionOfObject(object); - - if (index !== count - 1) - description += ",\n\t"; - else - description += "\n"; - } - - return description + "]"; -} - -// Collecting paths -/*! - Returns a new array subset formed by selecting the elements that have - filename extensions from \c filterTypes. Only elements - that are of type CPString are candidates for inclusion in the returned array. - @param filterTypes an array of CPString objects that contain file extensions (without the '.') - @return a new array with matching paths -*/ -- (CPArray)pathsMatchingExtensions:(CPArray)filterTypes -{ - var index = 0, - count = [self count], - array = []; - - for (; index < count; ++index) - if (self[index].isa && [self[index] isKindOfClass:[CPString class]] && [filterTypes containsObject:[self[index] pathExtension]]) - array.push(self[index]); - - return array; -} - -// Copying arrays - -/*! - Makes a copy of the receiver. - @return a new CPArray copy -*/ -- (id)copy -{ - return [[self class] arrayWithArray:self]; -} - -@end - -@implementation CPArray (CPCoding) - -- (id)initWithCoder:(CPCoder)aCoder -{ - return [aCoder decodeObjectForKey:@"CP.objects"]; -} - -- (void)encodeWithCoder:(CPCoder)aCoder -{ - [aCoder _encodeArrayOfObjects:self forKey:@"CP.objects"]; -} - -@end - -/* @ignore */ -@implementation _CPArrayEnumerator : CPEnumerator -{ - CPArray _array; - int _index; -} - -- (id)initWithArray:(CPArray)anArray -{ - self = [super init]; - - if (self) - { - _array = anArray; - _index = -1; - } - - return self; -} - -- (id)nextObject -{ - if (++_index >= [_array count]) - return nil; - - return [_array objectAtIndex:_index]; -} - -@end - -/* @ignore */ -@implementation _CPReverseArrayEnumerator : CPEnumerator -{ - CPArray _array; - int _index; -} - -- (id)initWithArray:(CPArray)anArray -{ - self = [super init]; - - if (self) - { - _array = anArray; - _index = [_array count]; - } - - return self; -} - -- (id)nextObject -{ - if (--_index < 0) - return nil; - - return [_array objectAtIndex:_index]; -} - -@end - -var _CPSharedPlaceholderArray = nil; - -@implementation _CPPlaceholderArray : CPArray -{ -} - -+ (id)alloc -{ - if (!_CPSharedPlaceholderArray) - _CPSharedPlaceholderArray = [super alloc]; - - return _CPSharedPlaceholderArray; -} - -@end - -//@import "_CPJavaScriptArray.j" +@import "_CPArray.j" +@import "_CPJavaScriptArray.j" diff --git a/Foundation/CPArray/CPMutableArray.j b/Foundation/CPArray/CPMutableArray.j index 30621c022..f950e3a6a 100644 --- a/Foundation/CPArray/CPMutableArray.j +++ b/Foundation/CPArray/CPMutableArray.j @@ -1,5 +1,5 @@ -@import "CPArray.j" +@import "_CPArray.j" /*! diff --git a/Foundation/CPArray/_CPArray.j b/Foundation/CPArray/_CPArray.j new file mode 100755 index 000000000..2f38e3faf --- /dev/null +++ b/Foundation/CPArray/_CPArray.j @@ -0,0 +1,1018 @@ +/* + * CPArray.j + * Foundation + * + * Created by Francisco Tolmasky. + * Copyright 2008, 280 North, Inc. + * + * This library is free software; you can redistribute it and/or + * modify it under the terms of the GNU Lesser General Public + * License as published by the Free Software Foundation; either + * version 2.1 of the License, or (at your option) any later version. + * + * This library is distributed in the hope that it will be useful, + * but WITHOUT ANY WARRANTY; without even the implied warranty of + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU + * Lesser General Public License for more details. + * + * You should have received a copy of the GNU Lesser General Public + * License along with this library; if not, write to the Free Software + * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA + */ + +@import "CPEnumerator.j" +@import "CPException.j" +@import "CPObject.j" +@import "CPRange.j" +@import "CPSortDescriptor.j" + + +CPEnumerationNormal = 0; +CPEnumerationConcurrent = 1 << 0; +CPEnumerationReverse = 1 << 1; + +CPBinarySearchingFirstEqual = 1 << 8; +CPBinarySearchingLastEqual = 1 << 9; +CPBinarySearchingInsertionIndex = 1 << 10; + +var concat = Array.prototype.concat, + join = Array.prototype.join, + push = Array.prototype.push; + +#define FORWARD_TO_CONCRETE_CLASS()\ + if (self === _CPSharedPlaceholderArray)\ + {\ + arguments[0] = [_CPJavaScriptArray alloc];\ + return objj_msgSend.apply(this, arguments);\ + }\ + return [super init]; + +/*! + @class CPArray + @brief A mutable array backed by a JavaScript Array. + @ingroup foundation + + A mutable array class backed by a JavaScript Array. + There is also a CPMutableArray class, + but it is just a child class of this class with an + empty implementation. All mutable functionality is + implemented directly in CPArray. +*/ +@implementation CPArray : CPObject + +/*! + Returns a new uninitialized CPArray. +*/ ++ (id)alloc +{ + if (self === CPArray || self === CPMutableArray) + return [_CPPlaceholderArray alloc]; + + return [super alloc]; +} + +/*! + Returns a new initialized CPArray. +*/ ++ (id)array +{ + return [[self alloc] init]; +} + +/*! + Creates a new array containing the objects in \c anArray. + @param anArray Objects in this array will be added to the new array + @return a new CPArray of the provided objects +*/ ++ (id)arrayWithArray:(CPArray)anArray +{ + return [[self alloc] initWithArray:anArray]; +} + +/*! + Creates a new array with \c anObject in it. + @param anObject the object to be added to the array + @return a new CPArray containing a single object +*/ ++ (id)arrayWithObject:(id)anObject +{ + return [[self alloc] initWithObjects:anObject]; +} + +/*! + Creates a new CPArray containing all the objects passed as arguments to the method. + @param anObject the objects that will be added to the new array + @return a new CPArray containing the argument objects +*/ ++ (id)arrayWithObjects:(id)anObject, ... +{ + arguments[0] = [self alloc]; + arguments[1] = @selector(initWithObjects:); + + return objj_msgSend.apply(this, arguments); +} + +/*! + Creates a CPArray from a JavaScript array of objects. + @param objects the JavaScript Array + @param aCount the number of objects in the JS Array + @return a new CPArray containing the specified objects +*/ ++ (id)arrayWithObjects:(id)objects count:(unsigned)aCount +{ + return [[self alloc] initWithObjects:objects count:aCount]; +} + +/*! + Initializes the CPArray. + @return the initialized array +*/ +- (id)init +{ + FORWARD_TO_CONCRETE_CLASS(); +} + +// Creating an Array +/*! + Creates a new CPArray from \c anArray. + @param anArray objects in this array will be added to the new array + @return a new CPArray containing the objects of \c anArray +*/ +- (id)initWithArray:(CPArray)anArray +{ + FORWARD_TO_CONCRETE_CLASS(); +} + +/*! + Initializes a the array with the contents of \c anArray + and optionally performs a deep copy of the objects based on \c copyItems. + @param anArray the array to copy the data from + @param shouldCopyItems if \c YES, each object will be copied by having a \c -copy message + sent to it, and the returned object will be added to the receiver. Otherwise, no copying will be performed. + @return the initialized array of objects +*/ +- (id)initWithArray:(CPArray)anArray copyItems:(BOOL)shouldCopyItems +{ + FORWARD_TO_CONCRETE_CLASS(); +} + +/*! + initializes an array with the contents of anArray +*/ +- (id)initWithObjects:(id)anObject, ... +{ + FORWARD_TO_CONCRETE_CLASS(); +} + +/*! + Initializes the array with a JavaScript array of objects. + @param objects the array of objects to add to the receiver + @param aCount the number of objects in \c objects + @return the initialized CPArray +*/ +- (id)initWithObjects:(id)objects count:(unsigned)aCount +{ + FORWARD_TO_CONCRETE_CLASS(); +} + +// FIXME: This should be defined in CPMutableArray, not here. +- (id)initWithCapacity:(unsigned)aCapacity +{ + FORWARD_TO_CONCRETE_CLASS(); +} + +// Querying an array +/*! + Returns \c YES if the array contains \c anObject. Otherwise, it returns \c NO. + @param anObject the method checks if this object is already in the array +*/ +- (BOOL)containsObject:(id)anObject +{ + return [self indexOfObject:anObject] !== CPNotFound; +} + +- (BOOL)containsObjectIdenticalTo:(id)anObject +{ + return [self indexOfObjectIdenticalTo:anObject] !== CPNotFound; +} + +/*! + Returns the number of elements in the array +*/ +- (int)count +{ + _CPRaiseInvalidAbstractInvocation(self, _cmd); +} + +/*! + Returns the first object in the array. If the array is empty, returns \c nil +*/ +- (id)firstObject +{ + var count = [self count]; + + if (count > 0) + return [self objectAtIndex:0]; + + return nil; +} + +/*! + Returns the last object in the array. If the array is empty, returns \c nil +*/ +- (id)lastObject +{ + var count = [self count]; + + if (count <= 0) + return nil; + + return [self objectAtIndex:count - 1]; +} + +/*! + Returns the object at index \c anIndex. + @throws CPRangeException if \c anIndex is out of bounds +*/ +- (id)objectAtIndex:(int)anIndex +{ + _CPRaiseInvalidAbstractInvocation(self, _cmd); +} + +/*! + Returns the objects at \c indexes in a new CPArray. + @param indexes the set of indices + @throws CPRangeException if any of the indices is greater than or equal to the length of the array +*/ +- (CPArray)objectsAtIndexes:(CPIndexSet)indexes +{ + var index = CPNotFound, + objects = []; + + while ((index = [indexes indexGreaterThanIndex:index]) !== CPNotFound) + objects.push([self objectAtIndex:index]); + + return objects; +} + +/*! + Returns an enumerator describing the array sequentially + from the first to the last element. You should not modify + the array during enumeration. +*/ +- (CPEnumerator)objectEnumerator +{ + return [[_CPArrayEnumerator alloc] initWithArray:self]; +} + +/*! + Returns an enumerator describing the array sequentially + from the last to the first element. You should not modify + the array during enumeration. +*/ +- (CPEnumerator)reverseObjectEnumerator +{ + return [[_CPReverseArrayEnumerator alloc] initWithArray:self]; +} + +/*! + Returns the index of \c anObject in this array. + If the object is not in the array, + returns \c CPNotFound. It first attempts to find + a match using \c -isEqual:, then \c ===. + @param anObject the object to search for +*/ +- (CPUInteger)indexOfObject:(id)anObject +{ + return [self indexOfObject:anObject inRange:nil]; +} + +/*! + Returns the index of \c anObject in the array + within \c aRange. It first attempts to find + a match using \c -isEqual:, then \c ===. + @param anObject the object to search for + @param aRange the range to search within + @return the index of the object, or \c CPNotFound if it was not found. +*/ +- (CPUInteger)indexOfObject:(id)anObject inRange:(CPRange)aRange +{ + // Only use isEqual: if our object is a CPObject. + if (anObject && anObject.isa) + { + var index = aRange ? aRange.location : 0, + count = aRange ? CPMaxRange(aRange) : [self count]; + + for (; index < count; ++index) + if ([[self objectAtIndex:index] isEqual:anObject]) + return index; + + return CPNotFound; + } + + return [self indexOfObjectIdenticalTo:anObject inRange:aRange]; +} + +/*! + Returns the index of \c anObject in the array. The test for equality is done using only \c ===. + @param anObject the object to search for + @return the index of the object in the array. \c CPNotFound if the object is not in the array. +*/ +- (CPUInteger)indexOfObjectIdenticalTo:(id)anObject +{ + return [self indexOfObjectIdenticalTo:anObject inRange:nil]; +} + +/*! + Returns the index of \c anObject in the array + within \c aRange. The test for equality is + done using only \c ==. + @param anObject the object to search for + @param aRange the range to search within + @return the index of the object, or \c CPNotFound if it was not found. +*/ +- (CPUInteger)indexOfObjectIdenticalTo:(id)anObject inRange:(CPRange)aRange +{ + var index = aRange ? aRange.location : 0, + count = aRange ? CPMaxRange(aRange) : [self count]; + + for (; index < count; ++index) + if ([self objectAtIndex:index] === anObject) + return index; + + return CPNotFound; +} + +/*! + Returns the index of the first object in the receiver that passes a test in a given Javascript function. + @param predicate The function to apply to objects of the array. The function should have the signature: + @code function(object, index) @endcode + The predicate function should either return a Boolean value that indicates whether the object passed the test, + or nil to stop the search, which will return \c CPNotFound to the sender. + @return The index of the first matching object, or \c CPNotFound if there is no matching object. +*/ +- (unsigned)indexOfObjectPassingTest:(Function /*(id anObject, int idx)*/)aPredicate +{ + return [self indexOfObjectWithOptions:CPEnumerationNormal passingTest:aPredicate context:undefined]; +} + +/*! + Returns the index of the first object in the receiver that passes a test in a given Javascript function. + @param predicate The function to apply to objects of the array. The function should have the signature: + @code function(object, index, context) @endcode + The predicate function should either return a Boolean value that indicates whether the object passed the test, + or nil to stop the search, which will return \c CPNotFound to the sender. + @param context An object that contains context information you want passed to the predicate function. + @return The index of the first matching object, or \c CPNotFound if there is no matching object. +*/ +- (unsigned)indexOfObjectPassingTest:(Function /*(id anObject, int idx, id context)*/)aPredicate context:(id)aContext +{ + return [self indexOfObjectWithOptions:CPEnumerationNormal passingTest:aPredicate context:aContext]; +} + +/*! + Returns the index of the first object in the receiver that passes a test in a given Javascript function. + @param options Specifies the direction in which the array is searched. Pass CPEnumerationNormal to search forwards + or CPEnumerationReverse to search in reverse. + @param predicate The function to apply to objects of the array. The function should have the signature: + @code function(object, index) @endcode + The predicate function should either return a Boolean value that indicates whether the object passed the test, + or nil to stop the search, which will return CPNotFound to the sender. + @return The index of the first matching object, or \c CPNotFound if there is no matching object. +*/ +- (unsigned)indexOfObjectWithOptions:(CPEnumerationOptions)options passingTest:(Function /*(id anObject, int idx)*/)aPredicate +{ + return [self indexOfObjectWithOptions:options passingTest:aPredicate context:undefined]; +} + +/*! + Returns the index of the first object in the receiver that passes a test in a given Javascript function. + @param options Specifies the direction in which the array is searched. Pass CPEnumerationNormal to search forwards + or CPEnumerationReverse to search in reverse. + @param predicate The function to apply to objects of the array. The function should have the signature: + @code function(object, index, context) @endcode + The predicate function should either return a Boolean value that indicates whether the object passed the test, + or nil to stop the search, which will return CPNotFound to the sender. + @param context An object that contains context information you want passed to the predicate function. + @return The index of the first matching object, or \c CPNotFound if there is no matching object. +*/ +- (unsigned)indexOfObjectWithOptions:(CPEnumerationOptions)options passingTest:(Function /*(id anObject, int idx, id context)*/)aPredicate context:(id)aContext +{ + // We don't use an enumerator because they return nil to indicate end of enumeration, + // but nil may actually be the value we are looking for, so we have to loop over the array. + if (options & CPEnumerationReverse) + { + var index = [self count] - 1, + stop = -1, + increment = -1; + } + else + { + var index = 0, + stop = [self count], + increment = 1; + } + + for (; index !== stop; index += increment) + if (aPredicate([self objectAtIndex:index], index, aContext)) + return index; + + return CPNotFound; +} + +- (CPUInteger)indexOfObject:(id)anObject + inSortedRange:(CPRange)aRange + options:(CPBinarySearchingOptions)options + usingComparator:(Function)aComparator +{ + // FIXME: comparator is not a function + if (!aComparator) + _CPRaiseInvalidArgumentException(self, _cmd, "comparator is nil"); + + if ((options & CPBinarySearchingFirstEqual) && (options & CPBinarySearchingLastEqual)) + _CPRaiseInvalidArgumentException(self, _cmd, + "both CPBinarySearchingFirstEqual and CPBinarySearchingLastEqual options cannot be specified"); + + var count = [self count]; + + if (count <= 0) + return (options & CPBinarySearchingInsertionIndex) ? 0 : CPNotFound; + + var first = aRange ? aRange.location : 0, + last = (aRange ? CPMaxRange(aRange) : [self count]) - 1; + + if (first < 0) + _CPRaiseRangeException(self, _cmd, first, count); + + if (last >= count) + _CPRaiseRangeException(self, _cmd, last, count); + + while (first <= last) + { + var middle = FLOOR((first + last) / 2), + result = aComparator(anObject, [self objectAtIndex:middle]); + + if (result > 0) + first = middle + 1; + + else if (result < 0) + last = middle - 1; + + else + { + if (options & CPBinarySearchingFirstEqual) + while (middle > first && aComparator(anObject, [self objectAtIndex:middle - 1]) === CPOrderedSame) + --middle; + + else if (options & CPBinarySearchingLastEqual) + { + while (middle < last && aComparator(anObject, [self objectAtIndex:middle + 1]) === CPOrderedSame) + ++middle; + + if (options & CPBinarySearchingInsertionIndex) + ++middle; + } + + return middle; + } + } + + if (options & CPBinarySearchingInsertionIndex) + return MAX(first, 0); + + return CPNotFound; +} + +/*! + Returns the indexes of the objects in the receiver that pass a test in a given Javascript function. + @param predicate The function to apply to objects of the array. The function should have the signature: + @code function(object, index) @endcode + The predicate function should either return a Boolean value that indicates whether the object passed the test, + or nil to stop the search, which will return \c CPNotFound to the sender. + @return A CPIndexSet of the matching object indexes. +*/ +- (CPIndexSet)indexesOfObjectsPassingTest:(Function /*(id anObject, int idx)*/)aPredicate +{ + return [self indexesOfObjectsWithOptions:CPEnumerationNormal passingTest:aPredicate context:undefined]; +} + +/*! + Returns the indexes of the objects in the receiver that pass a test in a given Javascript function. + @param predicate The function to apply to objects of the array. The function should have the signature: + @code function(object, index, context) @endcode + The predicate function should either return a Boolean value that indicates whether the object passed the test, + or nil to stop the search, which will return \c CPNotFound to the sender. + @param context An object that contains context information you want passed to the predicate function. + @return A CPIndexSet of the matching object indexes. +*/ +- (CPIndexSet)indexesOfObjectsPassingTest:(Function /*(id anObject, int idx, id context)*/)aPredicate context:(id)aContext +{ + return [self indexesOfObjectsWithOptions:CPEnumerationNormal passingTest:aPredicate context:aContext]; +} + +/*! + Returns the indexes of the objects in the receiver that pass a test in a given Javascript function. + @param options Specifies the direction in which the array is searched. Pass CPEnumerationNormal to search forwards + or CPEnumerationReverse to search in reverse. + @param predicate The function to apply to objects of the array. The function should have the signature: + @code function(object, index) @endcode + The predicate function should either return a Boolean value that indicates whether the object passed the test, + or nil to stop the search, which will return CPNotFound to the sender. + @return A CPIndexSet of the matching object indexes. +*/ +- (CPIndexSet)indexesOfObjectsWithOptions:(CPEnumerationOptions)options passingTest:(Function /*(id anObject, int idx)*/)aPredicate +{ + return [self indexesOfObjectsWithOptions:options passingTest:aPredicate context:undefined]; +} + +/*! + Returns the indexes of the objects in the receiver that pass a test in a given Javascript function. + @param options Specifies the direction in which the array is searched. Pass CPEnumerationNormal to search forwards + or CPEnumerationReverse to search in reverse. + @param predicate The function to apply to objects of the array. The function should have the signature: + @code function(object, index, context) @endcode + The predicate function should either return a Boolean value that indicates whether the object passed the test, + or nil to stop the search, which will return CPNotFound to the sender. + @param context An object that contains context information you want passed to the predicate function. + @return A CPIndexSet of the matching object indexes. +*/ +- (CPIndexSet)indexesOfObjectsWithOptions:(CPEnumerationOptions)options passingTest:(Function /*(id anObject, int idx, id context)*/)aPredicate context:(id)aContext +{ + // We don't use an enumerator because they return nil to indicate end of enumeration, + // but nil may actually be the value we are looking for, so we have to loop over the array. + if (options & CPEnumerationReverse) + { + var index = [self count] - 1, + stop = -1, + increment = -1; + } + else + { + var index = 0, + stop = [self count], + increment = 1; + } + + var indexes = [CPIndexSet indexSet]; + + for (; index !== stop; index += increment) + if (aPredicate([self objectAtIndex:index], index, aContext)) + [indexes addIndex:index]; + + return indexes; +} + +// Sending messages to elements +/*! + Sends each element in the array a message. + @param aSelector the selector of the message to send + @throws CPInvalidArgumentException if \c aSelector is \c nil +*/ +- (void)makeObjectsPerformSelector:(SEL)aSelector +{ + [self makeObjectsPerformSelector:aSelector withObjects:nil]; +} + +/*! + Sends each element in the array a message with an argument. + @param aSelector the selector of the message to send + @param anObject the first argument of the message + @throws CPInvalidArgumentException if \c aSelector is \c nil +*/ +- (void)makeObjectsPerformSelector:(SEL)aSelector withObject:(id)anObject +{ + return [self makeObjectsPerformSelector:aSelector withObjects:[anObject]]; +} + +- (void)makeObjectsPerformSelector:(SEL)aSelector withObjects:(CPArray)objects +{ + if (!aSelector) + [CPException raise:CPInvalidArgumentException + reason:"makeObjectsPerformSelector:withObjects: 'aSelector' can't be nil"]; + + var index = 0, + count = [self count]; + + if ([objects count]) + { + var argumentsArray = [[nil, aSelector] arrayByAddingObjectsFromArray:objects]; + + for (; index < count; ++index) + { + argumentsArray[0] = [self objectAtIndex:index]; + objj_msgSend.apply(this, argumentsArray); + } + } + + else + for (; index < count; ++index) + objj_msgSend([self objectAtIndex:index], aSelector); +} + +- (void)enumerateObjectsUsingBlock:(Function /*(id anObject, int idx, @ref BOOL stop)*/)aFunction +{ + // This could have been [self enumerateObjectsWithOptions:CPEnumerationNormal usingBlock:aFunction] + // but this method should be as fast as possible. + var index = 0, + count = [self count], + shouldStop = NO, + shouldStopRef = AT_REF(shouldStop); + + for (; index < count; ++index) + { + aFunction([self objectAtIndex:index], index, shouldStopRef); + if (shouldStop) + return; + } +} + +- (void)enumerateObjectsWithOptions:(CPEnumerationOptions)options usingBlock:(Function /*(id anObject, int idx, @ref BOOL stop)*/)aFunction +{ + var shouldStop = NO; + + if (options & CPEnumerationReverse) + { + var index = [self count] - 1, + stop = -1, + increment = -1; + } + else + { + var index = 0, + stop = [self count], + increment = 1; + } + + for (; index !== stop; index += increment) + { + aFunction([self objectAtIndex:index], index, AT_REF(shouldStop)); + if (shouldStop) + return; + } +} + +// Comparing arrays +/*! + Returns the first object found in the receiver (starting at index 0) which is present in the + \c otherArray as determined by using the \c -containsObject: method. + @return the first object found, or \c nil if no common object was found. +*/ +- (id)firstObjectCommonWithArray:(CPArray)anArray +{ + var count = [self count]; + + if (![anArray count] || !count) + return nil; + + var index = 0; + + for (; index < count; ++index) + { + var object = [self objectAtIndex:index]; + + if ([anArray containsObject:object]) + return object; + } + + return nil; +} + +/*! + Returns true if anArray contains exactly the same objects as the receiver. +*/ +- (BOOL)isEqualToArray:(id)anArray +{ + if (self === anArray) + return YES; + + if (![anArray isKindOfClass:CPArray]) + return NO; + + var count = [self count], + otherCount = [anArray count]; + + if (anArray === nil || count !== otherCount) + return NO; + + var index = 0; + + for (; index < count; ++index) + { + var lhs = [self objectAtIndex:index], + rhs = [anArray objectAtIndex:index]; + + // If they're not equal, and either doesn't have an isa, or they're !isEqual (not isEqual) + if (lhs !== rhs && (lhs && !lhs.isa || rhs && !rhs.isa || ![lhs isEqual:rhs])) + return NO; + } + + return YES; +} + +- (BOOL)isEqual:(id)anObject +{ + return (self === anObject) || [self isEqualToArray:anObject]; +} + +- (Array)_javaScriptArrayCopy +{ + var index = 0, + count = [self count], + copy = []; + + for (; index < count; ++index) + push.call(copy, [self objectAtIndex:index]); + + return copy; +} + +// Deriving new arrays +/*! + Returns a copy of this array plus \c anObject inside the copy. + @param anObject the object to be added to the array copy + @throws CPInvalidArgumentException if \c anObject is \c nil + @return a new array that should be n+1 in size compared to the receiver. +*/ +- (CPArray)arrayByAddingObject:(id)anObject +{ + var argumentArray = [self _javaScriptArrayCopy]; + + // We push instead of concat,because concat flattens arrays, so if the object + // passed in is an array, we end up with its contents added instead of itself. + push.call(argumentArray, anObject); + + return objj_msgSend([self class], @selector(arrayWithArray:), argumentArray); +} + +/*! + Returns a new array which is the concatenation of \c self and otherArray (in this precise order). + @param anArray the array that will be concatenated to the receiver's copy +*/ +- (CPArray)arrayByAddingObjectsFromArray:(CPArray)anArray +{ + if (!anArray) + return [self copy]; + + var anArray = anArray.isa === _CPJavaScriptArray ? anArray : [anArray _javaScriptArrayCopy], + argumentArray = concat.call([self _javaScriptArrayCopy], anArray); + + return objj_msgSend([self class], @selector(arrayWithArray:), argumentArray); +} + +/* +- (CPArray)filteredArrayUsingPredicate:(CPPredicate)aPredicate +{ + var i= 0, + count = [self count], + array = [CPArray array]; + + for (; i self.length) + [CPException raise:CPRangeException reason:"subarrayWithRange: aRange out of bounds"]; + + var index = aRange.location, + count = CPMaxRange(aRange), + argumentArray = []; + + for (; index < count; ++index) + push.call(argumentArray, [self objectAtIndex:index]); + + return objj_msgSend([self class], @selector(arrayWithArray:), argumentArray); +} + +// Sorting arrays +/* + Not yet described. +*/ +- (CPArray)sortedArrayUsingDescriptors:(CPArray)descriptors +{ + var sorted = [self copy]; + + [sorted sortUsingDescriptors:descriptors]; + + return sorted; +} + +/*! + Return a copy of the receiver sorted using the function passed into the first parameter. +*/ +- (CPArray)sortedArrayUsingFunction:(Function)aFunction +{ + return [self sortedArrayUsingFunction:aFunction context:nil]; +} + +/*! + Returns an array in which the objects are ordered according + to a sort with \c aFunction. This invokes + \c -sortUsingFunction:context. + @param aFunction a JavaScript 'Function' type that compares objects + @param aContext context information + @return a new sorted array +*/ +- (CPArray)sortedArrayUsingFunction:(Function)aFunction context:(id)aContext +{ + var sorted = [self copy]; + + [sorted sortUsingFunction:aFunction context:aContext]; + + return sorted; +} + +/*! + Returns a new array in which the objects are ordered according to a sort with \c aSelector. + @param aSelector the selector that will perform object comparisons +*/ +- (CPArray)sortedArrayUsingSelector:(SEL)aSelector +{ + var sorted = [self copy]; + + [sorted sortUsingSelector:aSelector]; + + return sorted; +} + +// Working with string elements + +/*! + Returns a string formed by concatenating the objects in the + receiver, with the specified separator string inserted between each part. + If the element is a Objective-J object, then the \c -description + of that object will be used, otherwise the default JavaScript representation will be used. + @param aString the separator that will separate each object string + @return the string representation of the array +*/ +- (CPString)componentsJoinedByString:(CPString)aString +{ + return join.call([self _javaScriptArrayCopy], aString); +} + +// Creating a description of the array + +/*! + Returns a human readable description of this array and it's elements. +*/ +- (CPString)description +{ + var index = 0, + count = [self count], + description = "@["; + + for (; index < count; ++index) + { + if (index === 0) + description += "\n\t"; + + var object = [self objectAtIndex:index]; + description += CPDescriptionOfObject(object); + + if (index !== count - 1) + description += ",\n\t"; + else + description += "\n"; + } + + return description + "]"; +} + +// Collecting paths +/*! + Returns a new array subset formed by selecting the elements that have + filename extensions from \c filterTypes. Only elements + that are of type CPString are candidates for inclusion in the returned array. + @param filterTypes an array of CPString objects that contain file extensions (without the '.') + @return a new array with matching paths +*/ +- (CPArray)pathsMatchingExtensions:(CPArray)filterTypes +{ + var index = 0, + count = [self count], + array = []; + + for (; index < count; ++index) + if (self[index].isa && [self[index] isKindOfClass:[CPString class]] && [filterTypes containsObject:[self[index] pathExtension]]) + array.push(self[index]); + + return array; +} + +// Copying arrays + +/*! + Makes a copy of the receiver. + @return a new CPArray copy +*/ +- (id)copy +{ + return [[self class] arrayWithArray:self]; +} + +@end + +@implementation CPArray (CPCoding) + +- (id)initWithCoder:(CPCoder)aCoder +{ + return [aCoder decodeObjectForKey:@"CP.objects"]; +} + +- (void)encodeWithCoder:(CPCoder)aCoder +{ + [aCoder _encodeArrayOfObjects:self forKey:@"CP.objects"]; +} + +@end + +/* @ignore */ +@implementation _CPArrayEnumerator : CPEnumerator +{ + CPArray _array; + int _index; +} + +- (id)initWithArray:(CPArray)anArray +{ + self = [super init]; + + if (self) + { + _array = anArray; + _index = -1; + } + + return self; +} + +- (id)nextObject +{ + if (++_index >= [_array count]) + return nil; + + return [_array objectAtIndex:_index]; +} + +@end + +/* @ignore */ +@implementation _CPReverseArrayEnumerator : CPEnumerator +{ + CPArray _array; + int _index; +} + +- (id)initWithArray:(CPArray)anArray +{ + self = [super init]; + + if (self) + { + _array = anArray; + _index = [_array count]; + } + + return self; +} + +- (id)nextObject +{ + if (--_index < 0) + return nil; + + return [_array objectAtIndex:_index]; +} + +@end + +var _CPSharedPlaceholderArray = nil; + +@implementation _CPPlaceholderArray : CPArray +{ +} + ++ (id)alloc +{ + if (!_CPSharedPlaceholderArray) + _CPSharedPlaceholderArray = [super alloc]; + + return _CPSharedPlaceholderArray; +} + +@end + +//@import "_CPJavaScriptArray.j" diff --git a/Foundation/CPDictionary.j b/Foundation/CPDictionary.j index 05933558a..2e600d463 100755 --- a/Foundation/CPDictionary.j +++ b/Foundation/CPDictionary.j @@ -20,7 +20,7 @@ * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA */ -@import "_CPJavaScriptArray.j" +@import "CPArray.j" @import "CPEnumerator.j" @import "CPException.j" @import "CPNull.j" @@ -646,7 +646,7 @@ for (; index < count; ++index) { var key = keys[index], - value = valueForKey(key); + value = self.valueForKey(key); string += "\t" + key + ": " + CPDescriptionOfObject(value).split('\n').join("\n\t") + ",\n"; } @@ -670,7 +670,7 @@ for (var index = 0; index < count; index++) { var key = keys[index], - value = valueForKey(key); + value = self.valueForKey(key); aFunction(key, value, shouldStopRef); diff --git a/Foundation/CPPredicate/CPExpression.j b/Foundation/CPPredicate/CPExpression.j index 5a9561cb7..06ed6b0ba 100644 --- a/Foundation/CPPredicate/CPExpression.j +++ b/Foundation/CPPredicate/CPExpression.j @@ -19,379 +19,12 @@ * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA */ -@import "CPArray.j" -@import "CPDictionary.j" -@import "CPKeyValueCoding.j" -@import "CPObject.j" -@import "CPString.j" - -/*! - An expression that always returns the same value. -*/ -CPConstantValueExpressionType = 0; -/*! - An expression that always returns the parameter object itself. -*/ -CPEvaluatedObjectExpressionType = 1; -/*! - An expression that always returns whatever value is associated with the key specified by ‘variable’ in the bindings dictionary. -*/ -CPVariableExpressionType = 2; -/*! - An expression that returns something that can be used as a key path. -*/ -CPKeyPathExpressionType = 3; -/*! - An expression that returns the result of evaluating a function. -*/ -CPFunctionExpressionType = 4; -/*! - An expression that defines an aggregate of CPExpression objects. -*/ -CPAggregateExpressionType = 5; -/*! - An expression that filters a collection using a subpredicate. -*/ -CPSubqueryExpressionType = 6; -/*! - An expression that creates a union of the results of two nested expressions. -*/ -CPUnionSetExpressionType = 7; -/*! - An expression that creates an intersection of the results of two nested expressions. -*/ -CPIntersectSetExpressionType = 8; -/*! - An expression that combines two nested expression results by set subtraction. -*/ -CPMinusSetExpressionType = 9; - -/*! - @ingroup foundation - @class CPExpression - @brief CPExpression is used to represent expressions in a predicate. - - Comparison operations in an CPPredicate are based on two expressions, as represented by instances of the CPExpression class. - Expressions are created for constant values, key paths, and so on. - - Generally, anywhere in the CPExpression class hierarchy where there is composite API and subtypes - that may only reasonably respond to a subset of that API, invoking a method that does not make sense - for that subtype will cause an exception to be thrown. -*/ - -@implementation CPExpression : CPObject -{ - int _type; -} - -// Initializing an Expression -/*! - Initializes the receiver with the specified expression type. - @param type The type of the new expression, as defined by CPExpressionType. - @return An initialized CPExpression object of the type type. -*/ -- (id)initWithExpressionType:(int)type -{ - _type = type; - - return self; -} - -//Creating an Expression for a Value -/*! - Returns a new expression that represents a given constant value. - @param value The constant value the new expression is to represent. - @return A new expression that represents the constant value. -*/ -+ (CPExpression)expressionForConstantValue:(id)value -{ - return [[_CPConstantValueExpression alloc] initWithValue:value]; -} - -/*! - Returns a new expression that represents the object being evaluated. - @return A new expression that represents the object being evaluated. -*/ -+ (CPExpression)expressionForEvaluatedObject -{ - return [_CPSelfExpression evaluatedObject]; -} - -/*! - Returns a new expression that extracts a value from the variable bindings dictionary for a given key. - @param string The key for the variable to extract from the variable bindings dictionary. - @return A new expression that extracts from the variable bindings dictionary the value for the key string. -*/ -+ (CPExpression)expressionForVariable:(CPString)string -{ - return [[_CPVariableExpression alloc] initWithVariable:string]; -} - -/*! - Returns a new expression that invokes valueForKeyPath: with a given key path. - @param keyPath The key path that the new expression should evaluate. - @return A new expression that invokes valueForKeyPath: with keyPath. -*/ -+ (CPExpression)expressionForKeyPath:(CPString)keyPath -{ - return [[_CPKeyPathExpression alloc] initWithKeyPath:keyPath]; -} - -/*! - Returns a new aggregate expression for a given collection. - @param collection A collection object (an instance of CPArray, CPSet, or CPDictionary) that contains further expressions. - @return A new expression that contains the expressions in collection. -*/ -+ (CPExpression)expressionForAggregate:(CPArray)collection -{ - return [[_CPAggregateExpression alloc] initWithAggregate:collection]; -} - -/*! - Returns a new CPExpression object that represent the union of a given set and collection. - @param left An expression that evaluates to a CPSet object. - @param right An expression that evaluates to a collection object (an instance of CPArray, CPSet, or CPDictionary). - @return A new CPExpression object that represents the union of left and right. -*/ -+ (CPExpression)expressionForUnionSet:(CPExpression)left with:(CPExpression)right -{ - return [[_CPSetExpression alloc] initWithType:CPUnionSetExpressionType left:left right:right]; -} - -/*! - Returns a new CPExpression object that represent the intersection of a given set and collection. - @param left An expression that evaluates to a CPSet object. - @param right An expression that evaluates to a collection object (an instance of CPArray, CPSet, or CPDictionary). - @return A new CPExpression object that represents the intersection of left and right. -*/ -+ (CPExpression)expressionForIntersectSet:(CPExpression)left with:(CPExpression)right -{ - return [[_CPSetExpression alloc] initWithType:CPIntersectSetExpressionType left:left right:right]; -} - -/*! - Returns a new CPExpression object that represent the subtraction of a given collection from a given set. - @param left An expression that evaluates to a CPSet object. - @param left An expression that evaluates to a collection object (an instance of CPArray, CPSet, or CPDictionary). - @return A new CPExpression object that represents the subtraction of right from left. -*/ -+ (CPExpression)expressionForMinusSet:(CPExpression)left with:(CPExpression)right -{ - return [[_CPSetExpression alloc] initWithType:CPMinusSetExpressionType left:left right:right]; -} - -// Creating an Expression for a Function -/*! - Returns a new expression that will invoke one of the predefined functions. - @param function_name The name of the function to invoke. - @param parameters An array containing CPExpression objects that will be used as parameters during the invocation of selector. - @return A new expression that invokes the function name using the parameters in parameters. - - For a selector taking no parameters, the array should be empty. For a selector taking one or more parameters, - the array should contain one CPExpression object which will evaluate to an instance of the appropriate type for each parameter. - - If there is a mismatch between the number of parameters expected and the number you provide during evaluation, - an exception may be raised or missing parameters may simply be replaced by nil (which occurs depends on how many - parameters are provided, and whether you have over- or underflow). - - The name parameter can be one of the following predefined functions: - @verbatim - name parameter array contents returns - ------------------------------------------------------------------------------------------------------------------------------------- - sum: CPExpression instances representing numbers CPNumber - count: CPExpression instances representing numbers CPNumber - min: CPExpression instances representing numbers CPNumber - max: CPExpression instances representing numbers CPNumber - average: CPExpression instances representing numbers CPNumber - median: CPExpression instances representing numbers CPNumber - mode: CPExpression instances representing numbers CPArray (returned array will contain all occurrences of the mode) - stddev: CPExpression instances representing numbers CPNumber - add:to: CPExpression instances representing numbers CPNumber - from:subtract: two CPExpression instances representing numbers CPNumber - multiply:by: two CPExpression instances representing numbers CPNumber - divide:by: two CPExpression instances representing numbers CPNumber - modulus:by: two CPExpression instances representing numbers CPNumber - sqrt: one CPExpression instance representing numbers CPNumber - log: one CPExpression instance representing a number CPNumber - ln: one CPExpression instance representing a number CPNumber - raise:toPower: one CPExpression instance representing a number CPNumber - exp: one CPExpression instance representing a number CPNumber - floor: one CPExpression instance representing a number CPNumber - ceiling: one CPExpression instance representing a number CPNumber - abs: one CPExpression instance representing a number CPNumber - trunc: one CPExpression instance representing a number CPNumber - uppercase: one CPExpression instance representing a string CPString - lowercase: one CPExpression instance representing a string CPString - random: one CPExpression instance representing a number CPNumber (integer) such that 0 <= rand < param - now: none [CPDate now] - - This method raises an exception immediately if the selector is invalid; it raises an exception at runtime if the parameters are incorrect. -@endverbatim -*/ -+ (CPExpression)expressionForFunction:(CPString)function_name arguments:(CPArray)parameters -{ - return [[_CPFunctionExpression alloc] initWithSelector:CPSelectorFromString(function_name) arguments:parameters]; -} - -/*! - Returns an expression which will return the result of invoking on a given target a selector with a given name using given arguments. - @param target A CPExpression object which will evaluate an object on which the selector identified by name may be invoked. - @param selectorName The name of the method to be invoked. - @param parameters An array containing CPExpression objects which can be evaluated to provide parameters for the method specified by name. - @return An expression which will return the result of invoking the selector named name on the result of evaluating the target expression with the parameters specified by evaluating the elements of parameters. - - See the description of \c expressionForFunction:arguments: for examples of how to construct the parameter array. -*/ -+ (CPExpression)expressionForFunction:(CPExpression)target selectorName:(CPString)selectorName arguments:(CPArray)parameters -{ - return [[_CPFunctionExpression alloc] initWithTarget:target selector:CPSelectorFromString(selectorName) arguments:parameters]; -} - -/*! - Returns an expression that filters a collection by storing elements in the collection in a given variable and keeping the elements for which qualifier returns true. - @param expression A CPExpression that evaluates to a collection. - @param variable Used as a local variable, and will shadow any instances of variable in the bindings dictionary. The variable is removed or the old value replaced once evaluation completes. - @param predicate The predicate used to determine whether the element belongs in the result collection. - @return An expression that filters a collection by storing elements in the collection in the variable variable and keeping the elements for which qualifier returns true. -*/ -+ (CPExpression)expressionForSubquery:(CPExpression)expression usingIteratorVariable:(CPString)variable predicate:(CPPredicate)predicate -{ - return [[_CPSubqueryExpression alloc] initWithExpression:expression usingIteratorVariable:variable predicate:predicate]; -} - -// Getting Information About an Expression -/*! - Returns the expression type for the receiver. - @return The expression type for the receiver. - This method raises an exception if it is not applicable to the receiver. -*/ -- (int)expressionType -{ - return _type; -} - -/*! - Returns the constant value of the receiver. - @return The constant value of the receiver. - This method raises an exception if it is not applicable to the receiver. -*/ -- (id)constantValue -{ - _CPRaiseInvalidAbstractInvocation(self, _cmd); - return nil; -} - -/*! - Returns the variable for the receiver. - @return The variable for the receiver. - This method raises an exception if it is not applicable to the receiver. -*/ -- (CPString)variable -{ - _CPRaiseInvalidAbstractInvocation(self, _cmd); - return nil; -} - -/*! - Returns the key path for the receiver. - @return The key path for the receiver. - This method raises an exception if it is not applicable to the receiver. -*/ -- (CPString)keyPath -{ - _CPRaiseInvalidAbstractInvocation(self, _cmd); - return nil; -} - -/*! - Returns the function for the receiver. - @return The function for the receiver. - This method raises an exception if it is not applicable to the receiver. -*/ -- (CPString)function -{ - _CPRaiseInvalidAbstractInvocation(self, _cmd); - return nil; -} - -/*! - Returns the arguments for the receiver. - @return The arguments for the receiver—that is, the array of expressions that will be passed as parameters during invocation of the selector on the operand of a function expression. - This method raises an exception if it is not applicable to the receiver. -*/ -- (CPArray)arguments -{ - _CPRaiseInvalidAbstractInvocation(self, _cmd); - return nil; -} - -/*! - Returns the collection of expressions in an aggregate expression, or the collection element of a subquery expression. - @return The collection of expressions in an aggregate expression, or the collection element of a subquery expression. - This method raises an exception if it is not applicable to the receiver. -*/ -- (id)collection -{ - _CPRaiseInvalidAbstractInvocation(self, _cmd); - return nil; -} - -/*! - Returns the predicate in a subquery expression. - @return The predicate in a subquery expression.. - This method raises an exception if it is not applicable to the receiver. -*/ -- (CPPredicate)predicate -{ - _CPRaiseInvalidAbstractInvocation(self, _cmd); - return nil; -} - -/*! - Returns the operand for the receiver. - @return The operand for the receiver—that is, the object on which the selector will be invoked. - This method raises an exception if it is not applicable to the receiver. -*/ -- (CPExpression)operand -{ - _CPRaiseInvalidAbstractInvocation(self, _cmd); - return nil; -} - -/*! - Returns the left expression of a set expression. - @return The left expression of a set expression. - This method raises an exception if it is not applicable to the receiver. -*/ -- (CPExpression)leftExpression -{ - _CPRaiseInvalidAbstractInvocation(self, _cmd); - return nil; -} - -/*! - Returns the right expression of a set expression. - @return The right expression of a set expression. - This method raises an exception if it is not applicable to the receiver. -*/ -- (CPExpression)rightExpression -{ - _CPRaiseInvalidAbstractInvocation(self, _cmd); - return nil; -} - -- (CPExpression)_expressionWithSubstitutionVariables:(CPDictionary)variables -{ - return self; -} - -@end - -//@import "_CPConstantValueExpression.j" -//@import "_CPSelfExpression.j" -//@import "_CPVariableExpression.j" -//@import "_CPKeyPathExpression.j" -//@import "_CPFunctionExpression.j" -//@import "_CPAggregateExpression.j" -//@import "_CPSetExpression.j" -//@import "_CPSubqueryExpression.j" +@import "_CPExpression.j" +@import "_CPConstantValueExpression.j" +@import "_CPSelfExpression.j" +@import "_CPVariableExpression.j" +@import "_CPKeyPathExpression.j" +@import "_CPFunctionExpression.j" +@import "_CPAggregateExpression.j" +@import "_CPSetExpression.j" +@import "_CPSubqueryExpression.j" diff --git a/Foundation/CPPredicate/CPPredicate.j b/Foundation/CPPredicate/CPPredicate.j index 3a97a1a1c..b0a9c984f 100644 --- a/Foundation/CPPredicate/CPPredicate.j +++ b/Foundation/CPPredicate/CPPredicate.j @@ -225,7 +225,7 @@ while (count--) { if (![predicate evaluateWithObject:[self objectAtIndex:count]]) - splice(count, 1); + self.splice(count, 1); } } diff --git a/Foundation/CPPredicate/_CPExpression.j b/Foundation/CPPredicate/_CPExpression.j new file mode 100644 index 000000000..5a9561cb7 --- /dev/null +++ b/Foundation/CPPredicate/_CPExpression.j @@ -0,0 +1,397 @@ +/* + * CPExpression.j + * + * Created by cacaodev. + * Copyright 2010. + * + * This library is free software; you can redistribute it and/or + * modify it under the terms of the GNU Lesser General Public + * License as published by the Free Software Foundation; either + * version 2.1 of the License, or (at your option) any later version. + * + * This library is distributed in the hope that it will be useful, + * but WITHOUT ANY WARRANTY; without even the implied warranty of + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU + * Lesser General Public License for more details. + * + * You should have received a copy of the GNU Lesser General Public + * License along with this library; if not, write to the Free Software + * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA + */ + +@import "CPArray.j" +@import "CPDictionary.j" +@import "CPKeyValueCoding.j" +@import "CPObject.j" +@import "CPString.j" + +/*! + An expression that always returns the same value. +*/ +CPConstantValueExpressionType = 0; +/*! + An expression that always returns the parameter object itself. +*/ +CPEvaluatedObjectExpressionType = 1; +/*! + An expression that always returns whatever value is associated with the key specified by ‘variable’ in the bindings dictionary. +*/ +CPVariableExpressionType = 2; +/*! + An expression that returns something that can be used as a key path. +*/ +CPKeyPathExpressionType = 3; +/*! + An expression that returns the result of evaluating a function. +*/ +CPFunctionExpressionType = 4; +/*! + An expression that defines an aggregate of CPExpression objects. +*/ +CPAggregateExpressionType = 5; +/*! + An expression that filters a collection using a subpredicate. +*/ +CPSubqueryExpressionType = 6; +/*! + An expression that creates a union of the results of two nested expressions. +*/ +CPUnionSetExpressionType = 7; +/*! + An expression that creates an intersection of the results of two nested expressions. +*/ +CPIntersectSetExpressionType = 8; +/*! + An expression that combines two nested expression results by set subtraction. +*/ +CPMinusSetExpressionType = 9; + +/*! + @ingroup foundation + @class CPExpression + @brief CPExpression is used to represent expressions in a predicate. + + Comparison operations in an CPPredicate are based on two expressions, as represented by instances of the CPExpression class. + Expressions are created for constant values, key paths, and so on. + + Generally, anywhere in the CPExpression class hierarchy where there is composite API and subtypes + that may only reasonably respond to a subset of that API, invoking a method that does not make sense + for that subtype will cause an exception to be thrown. +*/ + +@implementation CPExpression : CPObject +{ + int _type; +} + +// Initializing an Expression +/*! + Initializes the receiver with the specified expression type. + @param type The type of the new expression, as defined by CPExpressionType. + @return An initialized CPExpression object of the type type. +*/ +- (id)initWithExpressionType:(int)type +{ + _type = type; + + return self; +} + +//Creating an Expression for a Value +/*! + Returns a new expression that represents a given constant value. + @param value The constant value the new expression is to represent. + @return A new expression that represents the constant value. +*/ ++ (CPExpression)expressionForConstantValue:(id)value +{ + return [[_CPConstantValueExpression alloc] initWithValue:value]; +} + +/*! + Returns a new expression that represents the object being evaluated. + @return A new expression that represents the object being evaluated. +*/ ++ (CPExpression)expressionForEvaluatedObject +{ + return [_CPSelfExpression evaluatedObject]; +} + +/*! + Returns a new expression that extracts a value from the variable bindings dictionary for a given key. + @param string The key for the variable to extract from the variable bindings dictionary. + @return A new expression that extracts from the variable bindings dictionary the value for the key string. +*/ ++ (CPExpression)expressionForVariable:(CPString)string +{ + return [[_CPVariableExpression alloc] initWithVariable:string]; +} + +/*! + Returns a new expression that invokes valueForKeyPath: with a given key path. + @param keyPath The key path that the new expression should evaluate. + @return A new expression that invokes valueForKeyPath: with keyPath. +*/ ++ (CPExpression)expressionForKeyPath:(CPString)keyPath +{ + return [[_CPKeyPathExpression alloc] initWithKeyPath:keyPath]; +} + +/*! + Returns a new aggregate expression for a given collection. + @param collection A collection object (an instance of CPArray, CPSet, or CPDictionary) that contains further expressions. + @return A new expression that contains the expressions in collection. +*/ ++ (CPExpression)expressionForAggregate:(CPArray)collection +{ + return [[_CPAggregateExpression alloc] initWithAggregate:collection]; +} + +/*! + Returns a new CPExpression object that represent the union of a given set and collection. + @param left An expression that evaluates to a CPSet object. + @param right An expression that evaluates to a collection object (an instance of CPArray, CPSet, or CPDictionary). + @return A new CPExpression object that represents the union of left and right. +*/ ++ (CPExpression)expressionForUnionSet:(CPExpression)left with:(CPExpression)right +{ + return [[_CPSetExpression alloc] initWithType:CPUnionSetExpressionType left:left right:right]; +} + +/*! + Returns a new CPExpression object that represent the intersection of a given set and collection. + @param left An expression that evaluates to a CPSet object. + @param right An expression that evaluates to a collection object (an instance of CPArray, CPSet, or CPDictionary). + @return A new CPExpression object that represents the intersection of left and right. +*/ ++ (CPExpression)expressionForIntersectSet:(CPExpression)left with:(CPExpression)right +{ + return [[_CPSetExpression alloc] initWithType:CPIntersectSetExpressionType left:left right:right]; +} + +/*! + Returns a new CPExpression object that represent the subtraction of a given collection from a given set. + @param left An expression that evaluates to a CPSet object. + @param left An expression that evaluates to a collection object (an instance of CPArray, CPSet, or CPDictionary). + @return A new CPExpression object that represents the subtraction of right from left. +*/ ++ (CPExpression)expressionForMinusSet:(CPExpression)left with:(CPExpression)right +{ + return [[_CPSetExpression alloc] initWithType:CPMinusSetExpressionType left:left right:right]; +} + +// Creating an Expression for a Function +/*! + Returns a new expression that will invoke one of the predefined functions. + @param function_name The name of the function to invoke. + @param parameters An array containing CPExpression objects that will be used as parameters during the invocation of selector. + @return A new expression that invokes the function name using the parameters in parameters. + + For a selector taking no parameters, the array should be empty. For a selector taking one or more parameters, + the array should contain one CPExpression object which will evaluate to an instance of the appropriate type for each parameter. + + If there is a mismatch between the number of parameters expected and the number you provide during evaluation, + an exception may be raised or missing parameters may simply be replaced by nil (which occurs depends on how many + parameters are provided, and whether you have over- or underflow). + + The name parameter can be one of the following predefined functions: + @verbatim + name parameter array contents returns + ------------------------------------------------------------------------------------------------------------------------------------- + sum: CPExpression instances representing numbers CPNumber + count: CPExpression instances representing numbers CPNumber + min: CPExpression instances representing numbers CPNumber + max: CPExpression instances representing numbers CPNumber + average: CPExpression instances representing numbers CPNumber + median: CPExpression instances representing numbers CPNumber + mode: CPExpression instances representing numbers CPArray (returned array will contain all occurrences of the mode) + stddev: CPExpression instances representing numbers CPNumber + add:to: CPExpression instances representing numbers CPNumber + from:subtract: two CPExpression instances representing numbers CPNumber + multiply:by: two CPExpression instances representing numbers CPNumber + divide:by: two CPExpression instances representing numbers CPNumber + modulus:by: two CPExpression instances representing numbers CPNumber + sqrt: one CPExpression instance representing numbers CPNumber + log: one CPExpression instance representing a number CPNumber + ln: one CPExpression instance representing a number CPNumber + raise:toPower: one CPExpression instance representing a number CPNumber + exp: one CPExpression instance representing a number CPNumber + floor: one CPExpression instance representing a number CPNumber + ceiling: one CPExpression instance representing a number CPNumber + abs: one CPExpression instance representing a number CPNumber + trunc: one CPExpression instance representing a number CPNumber + uppercase: one CPExpression instance representing a string CPString + lowercase: one CPExpression instance representing a string CPString + random: one CPExpression instance representing a number CPNumber (integer) such that 0 <= rand < param + now: none [CPDate now] + + This method raises an exception immediately if the selector is invalid; it raises an exception at runtime if the parameters are incorrect. +@endverbatim +*/ ++ (CPExpression)expressionForFunction:(CPString)function_name arguments:(CPArray)parameters +{ + return [[_CPFunctionExpression alloc] initWithSelector:CPSelectorFromString(function_name) arguments:parameters]; +} + +/*! + Returns an expression which will return the result of invoking on a given target a selector with a given name using given arguments. + @param target A CPExpression object which will evaluate an object on which the selector identified by name may be invoked. + @param selectorName The name of the method to be invoked. + @param parameters An array containing CPExpression objects which can be evaluated to provide parameters for the method specified by name. + @return An expression which will return the result of invoking the selector named name on the result of evaluating the target expression with the parameters specified by evaluating the elements of parameters. + + See the description of \c expressionForFunction:arguments: for examples of how to construct the parameter array. +*/ ++ (CPExpression)expressionForFunction:(CPExpression)target selectorName:(CPString)selectorName arguments:(CPArray)parameters +{ + return [[_CPFunctionExpression alloc] initWithTarget:target selector:CPSelectorFromString(selectorName) arguments:parameters]; +} + +/*! + Returns an expression that filters a collection by storing elements in the collection in a given variable and keeping the elements for which qualifier returns true. + @param expression A CPExpression that evaluates to a collection. + @param variable Used as a local variable, and will shadow any instances of variable in the bindings dictionary. The variable is removed or the old value replaced once evaluation completes. + @param predicate The predicate used to determine whether the element belongs in the result collection. + @return An expression that filters a collection by storing elements in the collection in the variable variable and keeping the elements for which qualifier returns true. +*/ ++ (CPExpression)expressionForSubquery:(CPExpression)expression usingIteratorVariable:(CPString)variable predicate:(CPPredicate)predicate +{ + return [[_CPSubqueryExpression alloc] initWithExpression:expression usingIteratorVariable:variable predicate:predicate]; +} + +// Getting Information About an Expression +/*! + Returns the expression type for the receiver. + @return The expression type for the receiver. + This method raises an exception if it is not applicable to the receiver. +*/ +- (int)expressionType +{ + return _type; +} + +/*! + Returns the constant value of the receiver. + @return The constant value of the receiver. + This method raises an exception if it is not applicable to the receiver. +*/ +- (id)constantValue +{ + _CPRaiseInvalidAbstractInvocation(self, _cmd); + return nil; +} + +/*! + Returns the variable for the receiver. + @return The variable for the receiver. + This method raises an exception if it is not applicable to the receiver. +*/ +- (CPString)variable +{ + _CPRaiseInvalidAbstractInvocation(self, _cmd); + return nil; +} + +/*! + Returns the key path for the receiver. + @return The key path for the receiver. + This method raises an exception if it is not applicable to the receiver. +*/ +- (CPString)keyPath +{ + _CPRaiseInvalidAbstractInvocation(self, _cmd); + return nil; +} + +/*! + Returns the function for the receiver. + @return The function for the receiver. + This method raises an exception if it is not applicable to the receiver. +*/ +- (CPString)function +{ + _CPRaiseInvalidAbstractInvocation(self, _cmd); + return nil; +} + +/*! + Returns the arguments for the receiver. + @return The arguments for the receiver—that is, the array of expressions that will be passed as parameters during invocation of the selector on the operand of a function expression. + This method raises an exception if it is not applicable to the receiver. +*/ +- (CPArray)arguments +{ + _CPRaiseInvalidAbstractInvocation(self, _cmd); + return nil; +} + +/*! + Returns the collection of expressions in an aggregate expression, or the collection element of a subquery expression. + @return The collection of expressions in an aggregate expression, or the collection element of a subquery expression. + This method raises an exception if it is not applicable to the receiver. +*/ +- (id)collection +{ + _CPRaiseInvalidAbstractInvocation(self, _cmd); + return nil; +} + +/*! + Returns the predicate in a subquery expression. + @return The predicate in a subquery expression.. + This method raises an exception if it is not applicable to the receiver. +*/ +- (CPPredicate)predicate +{ + _CPRaiseInvalidAbstractInvocation(self, _cmd); + return nil; +} + +/*! + Returns the operand for the receiver. + @return The operand for the receiver—that is, the object on which the selector will be invoked. + This method raises an exception if it is not applicable to the receiver. +*/ +- (CPExpression)operand +{ + _CPRaiseInvalidAbstractInvocation(self, _cmd); + return nil; +} + +/*! + Returns the left expression of a set expression. + @return The left expression of a set expression. + This method raises an exception if it is not applicable to the receiver. +*/ +- (CPExpression)leftExpression +{ + _CPRaiseInvalidAbstractInvocation(self, _cmd); + return nil; +} + +/*! + Returns the right expression of a set expression. + @return The right expression of a set expression. + This method raises an exception if it is not applicable to the receiver. +*/ +- (CPExpression)rightExpression +{ + _CPRaiseInvalidAbstractInvocation(self, _cmd); + return nil; +} + +- (CPExpression)_expressionWithSubstitutionVariables:(CPDictionary)variables +{ + return self; +} + +@end + +//@import "_CPConstantValueExpression.j" +//@import "_CPSelfExpression.j" +//@import "_CPVariableExpression.j" +//@import "_CPKeyPathExpression.j" +//@import "_CPFunctionExpression.j" +//@import "_CPAggregateExpression.j" +//@import "_CPSetExpression.j" +//@import "_CPSubqueryExpression.j" diff --git a/Foundation/CPString.j b/Foundation/CPString.j index fc9427369..8ab93f840 100644 --- a/Foundation/CPString.j +++ b/Foundation/CPString.j @@ -710,7 +710,7 @@ var CPStringUIDs = new CFMutableDictionary(), */ - (CPArray)pathComponents { - if (length === 0) + if (self.length === 0) return [""]; if (self === "/") diff --git a/Foundation/Foundation.j b/Foundation/Foundation.j index be4f44fde..422501616 100755 --- a/Foundation/Foundation.j +++ b/Foundation/Foundation.j @@ -75,8 +75,6 @@ @import "CPValue.j" @import "CPValueTransformer.j" -@import "_CPJavaScriptArray.j" - /*! @mainpage Cappuccino is distributed under the @ref license "GNU LGPL". diff --git a/Objective-J/ObjJCompiler.js b/Objective-J/ObjJCompiler.js index 87d2d8970..2e7f268b8 100644 --- a/Objective-J/ObjJCompiler.js +++ b/Objective-J/ObjJCompiler.js @@ -479,17 +479,31 @@ ObjJCompiler.prototype.nodeFunctionExpression = function(/*SyntaxNode*/ astNode) this.assertNode(astNode, ObjJCompiler.AstNodeFunctionExpression); var children = astNode.children, child = children[2], - offset = 0; + offset = 0, + saveJSBuffer = this._jsBuffer; + this._jsBuffer = null; this.nodeFUNCTION(children[0]); this.nodeUnderline(children[1], true); + var identifier = null; if (child && child.name === ObjJCompiler.AstNodeIdentifier) { - this.nodeIdentifier(child); + identifier = this.nodeIdentifier(child); offset++; } this.nodeUnderline(children[2 + offset], false); - this.nodeWORD(children[3 + offset]); + if (saveJSBuffer) + if (identifier) + { + CONCAT(saveJSBuffer, identifier); + CONCAT(saveJSBuffer, " = function"); + } + else + { + CONCAT(saveJSBuffer, "function"); + } + this._jsBuffer = saveJSBuffer; + this.nodeOpenParenthesis(children[3 + offset]); this.nodeUnderline(children[4 + offset], false); child = children[5 + offset]; @@ -500,7 +514,7 @@ ObjJCompiler.prototype.nodeFunctionExpression = function(/*SyntaxNode*/ astNode) offset++; } this.nodeUnderline(children[5 + offset], false); - this.nodeWORD(children[6 + offset]); + this.nodeCloseParenthesis(children[6 + offset]); this.nodeUnderline(children[7 + offset], false); this.nodeOpenBrace(children[8 + offset]); this.nodeUnderline(children[9 + offset], false); diff --git a/Tests/AppKit/CPArrayControllerTest.j b/Tests/AppKit/CPArrayControllerTest.j index 4a1d9756a..b63039b7e 100644 --- a/Tests/AppKit/CPArrayControllerTest.j +++ b/Tests/AppKit/CPArrayControllerTest.j @@ -1,5 +1,5 @@ -@import +@import @import @import diff --git a/Tests/AppKit/CPPredicateEditorTest.j b/Tests/AppKit/CPPredicateEditorTest.j index b94a126ac..7c9b5a56c 100644 --- a/Tests/AppKit/CPPredicateEditorTest.j +++ b/Tests/AppKit/CPPredicateEditorTest.j @@ -1,4 +1,5 @@ @import +@import @implementation CPPredicateEditorTest : OJTestCase { @@ -13,35 +14,35 @@ - (void)testTemplatesMerging { var le1 = [CPExpression expressionForKeyPath:@"keypath1"], - le2 = [CPExpression expressionForKeyPath:@"keypath2"], - le3 = [CPExpression expressionForKeyPath:@"keypath3"]; + le2 = [CPExpression expressionForKeyPath:@"keypath2"], + le3 = [CPExpression expressionForKeyPath:@"keypath3"]; - var lexps1 = [le1, le2], + var lexps1 = [le1, le2], lexps2 = [le2, le3]; - + var ops1 = [CPBeginsWithPredicateOperatorType, CPEndsWithPredicateOperatorType], ops2 = [CPGreaterThanPredicateOperatorType, CPEqualToPredicateOperatorType]; var t1 = [[CPPredicateEditorRowTemplate alloc] initWithLeftExpressions:lexps1 rightExpressionAttributeType:CPStringAttributeType modifier:0 operators:ops1 options:0], t2 = [[CPPredicateEditorRowTemplate alloc] initWithLeftExpressions:lexps2 rightExpressionAttributeType:CPInteger16AttributeType modifier:0 operators:ops2 options:0]; - + var errorFormat = @"The left criterion %@ should have children with the following templates:\n%@\nbut was:\n%@"; - + [_editor setRowTemplates:[t1, t2]]; - + var trees = _editor._rootTrees; var count = [trees count]; // We are expecting 3 criterion on the left. - [self assertTrue:(count == 3) message:"We should have 3 criterion on the left, was " + count]; - + [self assertTrue:(count == 3) message:"We should have 3 criterion on the left, was " + count]; + for (var i = 0; i < count; i++) { var aTree = [trees objectAtIndex:i], title = [aTree title], templates = [[aTree children] valueForKey:@"template"], expected; - + if ([title isEqualToString:@"keypath1"]) expected = [t1, t1]; else if ([title isEqualToString:@"keypath2"]) diff --git a/Tests/AppKit/CPTokenFieldTest.j b/Tests/AppKit/CPTokenFieldTest.j index 14e5440f7..174820192 100644 --- a/Tests/AppKit/CPTokenFieldTest.j +++ b/Tests/AppKit/CPTokenFieldTest.j @@ -1,4 +1,4 @@ -@import +@import [CPApplication sharedApplication]; diff --git a/Tests/AppKit/WithAndWithoutBindingsIntegration/01_WithoutBindings/MyDocument.j b/Tests/AppKit/WithAndWithoutBindingsIntegration/01_WithoutBindings/MyDocument.j index b21b77e0a..6abf8445a 100644 --- a/Tests/AppKit/WithAndWithoutBindingsIntegration/01_WithoutBindings/MyDocument.j +++ b/Tests/AppKit/WithAndWithoutBindingsIntegration/01_WithoutBindings/MyDocument.j @@ -174,5 +174,5 @@ @end -@import "TableViewDataSource.j" +//@import "TableViewDataSource.j" diff --git a/Tests/AppKit/WithAndWithoutBindingsIntegration/01_WithoutBindings/TableViewDataSource.j b/Tests/AppKit/WithAndWithoutBindingsIntegration/01_WithoutBindings/TableViewDataSource.j index a4cba5084..24a9f8387 100644 --- a/Tests/AppKit/WithAndWithoutBindingsIntegration/01_WithoutBindings/TableViewDataSource.j +++ b/Tests/AppKit/WithAndWithoutBindingsIntegration/01_WithoutBindings/TableViewDataSource.j @@ -23,6 +23,7 @@ */ @import "Bookmark.j" +@import "MyDocument.j" @implementation MyDocument (TableView) diff --git a/Tests/AppKit/WithAndWithoutBindingsIntegration/01_WithoutBindings/WithoutBindingsTest.j b/Tests/AppKit/WithAndWithoutBindingsIntegration/01_WithoutBindings/WithoutBindingsTest.j index ecc2edaf3..e5002713b 100644 --- a/Tests/AppKit/WithAndWithoutBindingsIntegration/01_WithoutBindings/WithoutBindingsTest.j +++ b/Tests/AppKit/WithAndWithoutBindingsIntegration/01_WithoutBindings/WithoutBindingsTest.j @@ -20,7 +20,7 @@ * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA */ -@import "MyDocument.j" +@import "TableViewDataSource.j" /*! Bindings test exercising the functionality seen in the Cocoa example "WithAndWithoutBindings" part 1. Part 1 does in fact not use bindings and serves only as a base line test case. @@ -90,4 +90,4 @@ [self assert:@"http://www.cappuccino.org" equals:[theDocument.selectedBookmarkURLField stringValue]]; } -@end \ No newline at end of file +@end diff --git a/Tests/AppKit/WithAndWithoutBindingsIntegration/02_WithBindings/Bookmark.j b/Tests/AppKit/WithAndWithoutBindingsIntegration/02_WithBindings/Bookmark2.j similarity index 97% rename from Tests/AppKit/WithAndWithoutBindingsIntegration/02_WithBindings/Bookmark.j rename to Tests/AppKit/WithAndWithoutBindingsIntegration/02_WithBindings/Bookmark2.j index d20fa5953..9d5ef171f 100644 --- a/Tests/AppKit/WithAndWithoutBindingsIntegration/02_WithBindings/Bookmark.j +++ b/Tests/AppKit/WithAndWithoutBindingsIntegration/02_WithBindings/Bookmark2.j @@ -22,7 +22,7 @@ * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA */ -@implementation Bookmark : CPObject +@implementation Bookmark2 : CPObject { CPString title @accessors; CPDate creationDate @accessors; diff --git a/Tests/AppKit/WithAndWithoutBindingsIntegration/02_WithBindings/MyDocument.j b/Tests/AppKit/WithAndWithoutBindingsIntegration/02_WithBindings/MyDocument2.j similarity index 97% rename from Tests/AppKit/WithAndWithoutBindingsIntegration/02_WithBindings/MyDocument.j rename to Tests/AppKit/WithAndWithoutBindingsIntegration/02_WithBindings/MyDocument2.j index e86ab1203..d0307318c 100644 --- a/Tests/AppKit/WithAndWithoutBindingsIntegration/02_WithBindings/MyDocument.j +++ b/Tests/AppKit/WithAndWithoutBindingsIntegration/02_WithBindings/MyDocument2.j @@ -22,9 +22,9 @@ * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA */ -@import "Bookmark.j" +@import "Bookmark2.j" -@implementation MyDocument : CPDocument +@implementation MyDocument2 : CPDocument { CPString name @accessors; CPString collectionDescription @accessors; diff --git a/Tests/AppKit/WithAndWithoutBindingsIntegration/02_WithBindings/Resources/02_WithBindings.xib b/Tests/AppKit/WithAndWithoutBindingsIntegration/02_WithBindings/Resources/02_WithBindings.xib index 4a2d898e6..29aa495ac 100644 --- a/Tests/AppKit/WithAndWithoutBindingsIntegration/02_WithBindings/Resources/02_WithBindings.xib +++ b/Tests/AppKit/WithAndWithoutBindingsIntegration/02_WithBindings/Resources/02_WithBindings.xib @@ -389,7 +389,7 @@ title URL - Bookmark + Bookmark2 YES YES diff --git a/Tests/AppKit/WithAndWithoutBindingsIntegration/02_WithBindings/TableViewDataSource.j b/Tests/AppKit/WithAndWithoutBindingsIntegration/02_WithBindings/TableViewDataSource.j index c4321f4df..cac1c0706 100644 --- a/Tests/AppKit/WithAndWithoutBindingsIntegration/02_WithBindings/TableViewDataSource.j +++ b/Tests/AppKit/WithAndWithoutBindingsIntegration/02_WithBindings/TableViewDataSource.j @@ -22,7 +22,7 @@ * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA */ -@import "Bookmark.j" +@import "Bookmark2.j" // In 02 this is a subclass of CPArrayController. @implementation MyArrayController : CPArrayController diff --git a/Tests/AppKit/WithAndWithoutBindingsIntegration/02_WithBindings/WithBindingsTest.j b/Tests/AppKit/WithAndWithoutBindingsIntegration/02_WithBindings/WithBindingsTest.j index 78db62e59..8549fd4c0 100644 --- a/Tests/AppKit/WithAndWithoutBindingsIntegration/02_WithBindings/WithBindingsTest.j +++ b/Tests/AppKit/WithAndWithoutBindingsIntegration/02_WithBindings/WithBindingsTest.j @@ -20,7 +20,7 @@ * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA */ -@import "MyDocument.j" +@import "MyDocument2.j" @import "StringToURLTransformer.j" /*! @@ -39,7 +39,7 @@ - (void)test { - var theDocument = [MyDocument new], + var theDocument = [MyDocument2 new], cib = [CPBundle loadCibFile:[[CPBundle bundleForClass:WithBindingsTest] pathForResource:"02_WithBindings.cib"] externalNameTable:[CPDictionary dictionaryWithObject:theDocument forKey:CPCibOwner]]; [theDocument windowControllerDidLoadCib:self]; @@ -90,4 +90,4 @@ [self assert:@"http://www.cappuccino.org" equals:[theDocument.selectedBookmarkURLField stringValue]]; } -@end \ No newline at end of file +@end diff --git a/Tests/Foundation/CPArrayPerformanceTest.j b/Tests/Foundation/CPArrayPerformanceTest.j index edad83cf6..61b8265d4 100644 --- a/Tests/Foundation/CPArrayPerformanceTest.j +++ b/Tests/Foundation/CPArrayPerformanceTest.j @@ -1,6 +1,6 @@ var FILE = require("file"); -@import +@import @import @import @import @@ -26,6 +26,7 @@ var ELEMENTS = 100, CPLog.warn("\nNUMERIC ALMOST SORTED"); var a = [self makeUnsorted], sorted = [self sort:a usingSortSelector:@selector(sortedArrayUsingDescriptors:) withObject:descriptors]; + print("a: " + (a == sorted ? "Yes" : "No")); [self checkAlmostSorted:sorted]; } @@ -227,7 +228,7 @@ var ELEMENTS = 100, { var count = [descriptors count]; - sort(function(lhs, rhs) + self.sort(function(lhs, rhs) { var i = 0, result = CPOrderedSame; @@ -251,7 +252,7 @@ var ELEMENTS = 100, - (CPArray)_native_sortUsingSelector:(SEL)aSelector { - sort(function(lhs, rhs) + self.sort(function(lhs, rhs) { return [lhs performSelector:aSelector withObject:rhs]; }); diff --git a/Tests/Foundation/CPAttributedStringTest.j b/Tests/Foundation/CPAttributedStringTest.j index ccf59cd40..0a88f8e06 100644 --- a/Tests/Foundation/CPAttributedStringTest.j +++ b/Tests/Foundation/CPAttributedStringTest.j @@ -600,4 +600,4 @@ function testAttributeAtIndexWithValue(aString, anIndex, aKey, aValue, aSelf) function printRangeEntry(entry) { print("range: " + CPStringFromRange(entry.range) + " " + [entry.attributes description]); -} \ No newline at end of file +} diff --git a/Tests/Foundation/CPDataTest.j b/Tests/Foundation/CPDataTest.j index c0c37c21a..7a97a1850 100644 --- a/Tests/Foundation/CPDataTest.j +++ b/Tests/Foundation/CPDataTest.j @@ -1,4 +1,4 @@ -@import +@import @import @import @import diff --git a/Tests/Foundation/CPInvocationOperationTest.j b/Tests/Foundation/CPInvocationOperationTest.j index a03a16732..54d54e38f 100644 --- a/Tests/Foundation/CPInvocationOperationTest.j +++ b/Tests/Foundation/CPInvocationOperationTest.j @@ -1,6 +1,6 @@ @import -@implementation SomeObject : CPObject +@implementation SomeObject2 : CPObject { CPString result @accessors; } @@ -17,7 +17,7 @@ - (void)testRunInvocation { - var so = [[SomeObject alloc] init], + var so = [[SomeObject2 alloc] init], io = [[CPInvocationOperation alloc] initWithTarget:so selector:@selector(setAString:) object:@"Hello World"]; [io start]; diff --git a/Tests/Foundation/CPKVCArrayTest.j b/Tests/Foundation/CPKVCArrayTest.j index cc96e2ffa..a873d2183 100644 --- a/Tests/Foundation/CPKVCArrayTest.j +++ b/Tests/Foundation/CPKVCArrayTest.j @@ -328,7 +328,7 @@ var COUNTER; [self assert:[two valueForKeyPath:"@max.intValue"] equals:8]; [self assert:[two valueForKeyPath:"@min.intValue"] equals:0]; - var a = [A new]; + var a = [AA new]; [a setValue:one forKey:"b"]; [self assert:[a valueForKeyPath:"b.@count"] equals:8]; [self assert:[a valueForKeyPath:"b.@sum.intValue"] equals:8]; @@ -347,7 +347,7 @@ var COUNTER; @end -@implementation A : CPObject +@implementation AA : CPObject { id b; } diff --git a/Tests/Foundation/CPKVOTest.j b/Tests/Foundation/CPKVOTest.j index 619a0e7f8..86464df1b 100644 --- a/Tests/Foundation/CPKVOTest.j +++ b/Tests/Foundation/CPKVOTest.j @@ -431,7 +431,7 @@ - (void)testDependentKeysPaths { - var object = [[TestObject alloc] init]; + var object = [[TestObject2 alloc] init]; [object addObserver:self forKeyPath:@"key" options:0 context:@"testDependentKeysPaths"]; @@ -879,7 +879,7 @@ } @end -@implementation TestObject : CPObject +@implementation TestObject2 : CPObject { CPString key @accessors; CPString affectingKey @accessors; diff --git a/Tests/Foundation/CPKeyValueCodingTest.j b/Tests/Foundation/CPKeyValueCodingTest.j index fd62a0138..d45f1f096 100644 --- a/Tests/Foundation/CPKeyValueCodingTest.j +++ b/Tests/Foundation/CPKeyValueCodingTest.j @@ -480,8 +480,8 @@ var accessIVARS = YES; - (void)testValueForKeyPath { - var department = [Department departmentWithName:@"Engineering"], - employee = [Employee employeeWithName:@"Klaas Pieter" department:department]; + var department = [Department2 departmentWithName:@"Engineering"], + employee = [Employee2 employeeWithName:@"Klaas Pieter" department:department]; [self assert:department equals:[employee valueForKey:@"department"]]; [self assert:@"Engineering" equals:[employee valueForKeyPath:@"department.name"]]; @@ -489,10 +489,10 @@ var accessIVARS = YES; @end -@implementation Employee : CPObject +@implementation Employee2 : CPObject { CPString _name @accessors(property=name); - Department _department @accessors(property=department); + Department2 _department @accessors(property=department); } + (id)employeeWithName:(CPString)theName department:(Department)theDepartment @@ -513,7 +513,7 @@ var accessIVARS = YES; @end -@implementation Department : CPObject +@implementation Department2 : CPObject { CPString _name @accessors(property=name); } diff --git a/Tests/Foundation/CPOperationTest.j b/Tests/Foundation/CPOperationTest.j index d577a754b..701ef8397 100644 --- a/Tests/Foundation/CPOperationTest.j +++ b/Tests/Foundation/CPOperationTest.j @@ -1,6 +1,6 @@ @import -@implementation TestOperation : CPOperation +@implementation TestOperation2 : CPOperation { CPString name @accessors; CPString value @accessors; @@ -13,7 +13,7 @@ @end -@implementation TestObserver : CPObject +@implementation TestObserver2 : CPObject { CPArray changedKeyPaths @accessors; } @@ -106,7 +106,7 @@ - (void)testCompletionFunction { - var to = [[TestOperation alloc] init]; + var to = [[TestOperation2 alloc] init]; [to setCompletionFunction:function() {[to setValue:@"something"];}]; [to start]; @@ -118,9 +118,9 @@ - (void)testKVO { - var to = [[TestOperation alloc] init], - to2 = [[TestOperation alloc] init], - obs = [[TestObserver alloc] init]; + var to = [[TestOperation2 alloc] init], + to2 = [[TestOperation2 alloc] init], + obs = [[TestObserver2 alloc] init]; [to addObserver:obs forKeyPath:@"isCancelled" diff --git a/Tests/Foundation/SubclassTollFreeTest.j b/Tests/Foundation/SubclassTollFreeTest.j index 48ce95cb7..7e47a51f9 100644 --- a/Tests/Foundation/SubclassTollFreeTest.j +++ b/Tests/Foundation/SubclassTollFreeTest.j @@ -2,14 +2,14 @@ - (void)testThatSubclassTollFreeDoesAllowForSubclassingDictionary { - var target = [[MyDict alloc] init]; + var target = [[MyDict2 alloc] init]; [OJAssert assert:@"a" equals:[target newMessage]]; [OJAssert assert:0 equals:[target count]]; } - (void)testThatSubclassTollFreeDoesAllowForSubclassingString { - var target = [[MyString alloc] initWithString:@"adsf"]; + var target = [[MyString2 alloc] initWithString:@"adsf"]; [OJAssert assert:@"a" equals:[target newMessage]]; [OJAssert assert:4 equals:[target length]]; @@ -20,42 +20,42 @@ - (void)testThatSubclassTollFreeDoesAllowForSubclassingNumber { - var target = [[MyNum alloc] init]; + var target = [[MyNum2 alloc] init]; [OJAssert assert:@"a" equals:[target newMessage]]; [OJAssert assertFalse:[target isEqualToNumber:5]]; } - (void)testThatSubclassTollFreeDoesAllowForSubclassingException { - var target = [[MyException alloc] init]; + var target = [[MyException2 alloc] init]; [OJAssert assert:@"a" equals:[target newMessage]]; // there are no internal properties to test here.. so no need to jimmyrig it. } - (void)testThatSubclassTollFreeDoesAllowForSubclassingArray { - var target = [[MyArray alloc] initWithObjects:@"a"]; + var target = [[MyArray2 alloc] initWithObjects:@"a"]; [OJAssert assert:@"a" equals:[target newMessage]]; [OJAssert assert:1 equals:[target count]]; } - (void)testThatSubclassTollFreeDoesAllowForSubclassingDate { - var target = [[MyDate alloc] init]; + var target = [[MyDate2 alloc] init]; [OJAssert assert:@"a" equals:[target newMessage]]; [OJAssert assertTrue:[target timeIntervalSince1970] > 0]; } - (void)testThatSubclassTollFreeDoesAllowForSubclassingData { - var target = [[MyData alloc] initWithRawString:@"b"]; + var target = [[MyData2 alloc] initWithRawString:@"b"]; [OJAssert assert:@"a" equals:[target newMessage]]; [OJAssert assert:@"b" equals:[target rawString]]; } - (void)testThatSubclassTollFreeDoesAllowForSubclassingURL { - var target = [[MyURL alloc] initWithString:@"http://www.google.com"]; + var target = [[MyURL2 alloc] initWithString:@"http://www.google.com"]; [OJAssert assert:@"a" equals:[target newMessage]]; [OJAssert assert:@"http://www.google.com" equals:[target absoluteString]]; } @@ -65,7 +65,7 @@ @import -@implementation MyDict : CPDictionary +@implementation MyDict2 : CPDictionary - (id)newMessage { @@ -74,7 +74,7 @@ @end -@implementation MyNum : CPNumber +@implementation MyNum2 : CPNumber - (id)newMessage { @@ -83,7 +83,7 @@ @end -@implementation MyString : CPString +@implementation MyString2 : CPString - (id)newMessage { @@ -92,7 +92,7 @@ @end -@implementation MyException : CPException +@implementation MyException2 : CPException - (id)newMessage { @@ -101,7 +101,7 @@ @end -@implementation MyArray : CPArray +@implementation MyArray2 : CPArray { CPArray _storage; } @@ -133,7 +133,7 @@ @end -@implementation MyDate : CPDate +@implementation MyDate2 : CPDate - (id)newMessage { @@ -142,7 +142,7 @@ @end -@implementation MyData : CPData +@implementation MyData2 : CPData - (id)newMessage { @@ -151,7 +151,7 @@ @end -@implementation MyURL : CPURL +@implementation MyURL2 : CPURL - (id)newMessage { diff --git a/Tests/Objective-J/MethodDispatchTest.j b/Tests/Objective-J/MethodDispatchTest.j index 99732d967..377d039eb 100644 --- a/Tests/Objective-J/MethodDispatchTest.j +++ b/Tests/Objective-J/MethodDispatchTest.j @@ -37,6 +37,7 @@ @implementation RootClassWithForwardingTarget { + Class isa; } + (void)initialize