3 * \brief OS X front end
5 * Copyright (c) 2011 Peter Ammon
7 * This work is free software; you can redistribute it and/or modify it
8 * under the terms of either:
10 * a) the GNU General Public License as published by the Free Software
11 * Foundation, version 2, or
13 * b) the "Angband licence":
14 * This software may be copied and distributed for educational, research,
15 * and not for profit purposes provided that this copyright and statement
16 * are included in all such copies. Other copyrights may also apply.
20 /* This is not included in angband.h in Hengband. */
23 #if defined(MACH_O_COCOA)
26 #include <Cocoa/Cocoa.h>
27 //#include <Carbon/Carbon.h> /* For keycodes */
28 /* Hack - keycodes to enable compiling in macOS 10.14 */
29 #define kVK_Return 0x24
31 #define kVK_Delete 0x33
32 #define kVK_Escape 0x35
33 #define kVK_ANSI_KeypadEnter 0x4C
35 static NSSize const AngbandScaleIdentity = {1.0, 1.0};
36 static NSString * const AngbandDirectoryNameLib = @"lib";
37 static NSString * const AngbandDirectoryNameBase = @"Hengband";
39 static NSString * const AngbandTerminalsDefaultsKey = @"Terminals";
40 static NSString * const AngbandTerminalRowsDefaultsKey = @"Rows";
41 static NSString * const AngbandTerminalColumnsDefaultsKey = @"Columns";
42 static NSString * const AngbandTerminalVisibleDefaultsKey = @"Visible";
43 static NSString * const AngbandGraphicsDefaultsKey = @"GraphicsID";
44 static NSString * const AngbandFrameRateDefaultsKey = @"FramesPerSecond";
45 static NSString * const AngbandSoundDefaultsKey = @"AllowSound";
46 static NSInteger const AngbandWindowMenuItemTagBase = 1000;
47 static NSInteger const AngbandCommandMenuItemTagBase = 2000;
49 /* We can blit to a large layer or image and then scale it down during live
50 * resize, which makes resizing much faster, at the cost of some image quality
52 #ifndef USE_LIVE_RESIZE_CACHE
53 # define USE_LIVE_RESIZE_CACHE 1
56 /* Global defines etc from Angband 3.5-dev - NRM */
57 #define ANGBAND_TERM_MAX 8
59 static bool new_game = TRUE;
61 #define MAX_COLORS 256
62 #define MSG_MAX SOUND_MAX
64 /* End Angband stuff - NRM */
66 /* Application defined event numbers */
69 AngbandEventWakeup = 1
72 /* Redeclare some 10.7 constants and methods so we can build on 10.6 */
75 Angband_NSWindowCollectionBehaviorFullScreenPrimary = 1 << 7,
76 Angband_NSWindowCollectionBehaviorFullScreenAuxiliary = 1 << 8
79 @interface NSWindow (AngbandLionRedeclares)
80 - (void)setRestorable:(BOOL)flag;
83 /* Delay handling of pre-emptive "quit" event */
84 static BOOL quit_when_ready = FALSE;
86 /* Set to indicate the game is over and we can quit without delay */
87 static Boolean game_is_finished = FALSE;
89 /* Our frames per second (e.g. 60). A value of 0 means unthrottled. */
90 static int frames_per_second;
92 /* Function to get the default font */
93 static NSFont *default_font;
97 /* The max number of glyphs we support */
98 #define GLYPH_COUNT 256
100 /* An AngbandContext represents a logical Term (i.e. what Angband thinks is
101 * a window). This typically maps to one NSView, but may map to more than one
102 * NSView (e.g. the Test and real screen saver view). */
103 @interface AngbandContext : NSObject <NSWindowDelegate>
107 /* The Angband term */
110 /* Column and row cont, by default 80 x 24 */
114 /* The size of the border between the window edge and the contents */
117 /* Our array of views */
118 NSMutableArray *angbandViews;
120 /* The buffered image */
121 CGLayerRef angbandLayer;
123 /* The font of this context */
124 NSFont *angbandViewFont;
126 /* If this context owns a window, here it is */
127 NSWindow *primaryWindow;
129 /* "Glyph info": an array of the CGGlyphs and their widths corresponding to
131 CGGlyph glyphArray[GLYPH_COUNT];
132 CGFloat glyphWidths[GLYPH_COUNT];
134 /* The size of one tile */
137 /* Font's descender */
138 CGFloat fontDescender;
140 /* Whether we are currently in live resize, which affects how big we render
144 /* Last time we drew, so we can throttle drawing */
145 CFAbsoluteTime lastRefreshTime;
149 BOOL _hasSubwindowFlags;
150 BOOL _windowVisibilityChecked;
153 @property (nonatomic, assign) BOOL hasSubwindowFlags;
154 @property (nonatomic, assign) BOOL windowVisibilityChecked;
156 - (void)drawRect:(NSRect)rect inView:(NSView *)view;
158 /* Called at initialization to set the term */
159 - (void)setTerm:(term *)t;
161 /* Called when the context is going down. */
164 /* Returns the size of the image. */
167 /* Return the rect for a tile at given coordinates. */
168 - (NSRect)rectInImageForTileAtX:(int)x Y:(int)y;
170 /* Draw the given wide character into the given tile rect. */
171 - (void)drawWChar:(wchar_t)wchar inRect:(NSRect)tile;
173 /* Locks focus on the Angband image, and scales the CTM appropriately. */
174 - (CGContextRef)lockFocus;
176 /* Locks focus on the Angband image but does NOT scale the CTM. Appropriate
177 * for drawing hairlines. */
178 - (CGContextRef)lockFocusUnscaled;
183 /* Returns the primary window for this angband context, creating it if
185 - (NSWindow *)makePrimaryWindow;
187 /* Called to add a new Angband view */
188 - (void)addAngbandView:(AngbandView *)view;
190 /* Make the context aware that one of its views changed size */
191 - (void)angbandViewDidScale:(AngbandView *)view;
193 /* Handle becoming the main window */
194 - (void)windowDidBecomeMain:(NSNotification *)notification;
196 /* Return whether the context's primary window is ordered in or not */
199 /* Return whether the context's primary window is key */
200 - (BOOL)isMainWindow;
202 /* Invalidate the whole image */
203 - (void)setNeedsDisplay:(BOOL)val;
205 /* Invalidate part of the image, with the rect expressed in base coordinates */
206 - (void)setNeedsDisplayInBaseRect:(NSRect)rect;
208 /* Display (flush) our Angband views */
209 - (void)displayIfNeeded;
211 /* Resize context to size of contentRect, and optionally save size to
213 - (void)resizeTerminalWithContentRect: (NSRect)contentRect saveToDefaults: (BOOL)saveToDefaults;
215 /* Called from the view to indicate that it is starting or ending live resize */
216 - (void)viewWillStartLiveResize:(AngbandView *)view;
217 - (void)viewDidEndLiveResize:(AngbandView *)view;
218 - (void)saveWindowVisibleToDefaults: (BOOL)windowVisible;
219 - (BOOL)windowVisibleUsingDefaults;
223 /* Begins an Angband game. This is the entry point for starting off. */
226 /* Ends an Angband game. */
229 /* Internal method */
230 - (AngbandView *)activeView;
235 * Generate a mask for the subwindow flags. The mask is just a safety check to
236 * make sure that our windows show and hide as expected. This function allows
237 * for future changes to the set of flags without needed to update it here
238 * (unless the underlying types change).
240 u32b AngbandMaskForValidSubwindowFlags(void)
242 int windowFlagBits = sizeof(*(window_flag)) * CHAR_BIT;
243 int maxBits = MIN( 16, windowFlagBits );
246 for( int i = 0; i < maxBits; i++ )
248 if( window_flag_desc[i] != NULL )
258 * Check for changes in the subwindow flags and update window visibility.
259 * This seems to be called for every user event, so we don't
260 * want to do any unnecessary hiding or showing of windows.
262 static void AngbandUpdateWindowVisibility(void)
264 /* Because this function is called frequently, we'll make the mask static.
265 * It doesn't change between calls, as the flags themselves are hardcoded */
266 static u32b validWindowFlagsMask = 0;
268 if( validWindowFlagsMask == 0 )
270 validWindowFlagsMask = AngbandMaskForValidSubwindowFlags();
273 /* Loop through all of the subwindows and see if there is a change in the
274 * flags. If so, show or hide the corresponding window. We don't care about
275 * the flags themselves; we just want to know if any are set. */
276 for( int i = 1; i < ANGBAND_TERM_MAX; i++ )
278 AngbandContext *angbandContext = angband_term[i]->data;
280 if( angbandContext == nil )
285 /* This horrible mess of flags is so that we can try to maintain some
286 * user visibility preference. This should allow the user a window and
287 * have it stay closed between application launches. However, this
288 * means that when a subwindow is turned on, it will no longer appear
289 * automatically. Angband has no concept of user control over window
290 * visibility, other than the subwindow flags. */
291 if( !angbandContext.windowVisibilityChecked )
293 if( [angbandContext windowVisibleUsingDefaults] )
295 [angbandContext->primaryWindow orderFront: nil];
296 angbandContext.windowVisibilityChecked = YES;
300 [angbandContext->primaryWindow close];
301 angbandContext.windowVisibilityChecked = NO;
306 BOOL termHasSubwindowFlags = ((window_flag[i] & validWindowFlagsMask) > 0);
308 if( angbandContext.hasSubwindowFlags && !termHasSubwindowFlags )
310 [angbandContext->primaryWindow close];
311 angbandContext.hasSubwindowFlags = NO;
312 [angbandContext saveWindowVisibleToDefaults: NO];
314 else if( !angbandContext.hasSubwindowFlags && termHasSubwindowFlags )
316 [angbandContext->primaryWindow orderFront: nil];
317 angbandContext.hasSubwindowFlags = YES;
318 [angbandContext saveWindowVisibleToDefaults: YES];
323 /* Make the main window key so that user events go to the right spot */
324 AngbandContext *mainWindow = angband_term[0]->data;
325 [mainWindow->primaryWindow makeKeyAndOrderFront: nil];
329 * Here is some support for rounding to pixels in a scaled context
331 static double push_pixel(double pixel, double scale, BOOL increase)
333 double scaledPixel = pixel * scale;
334 /* Have some tolerance! */
335 double roundedPixel = round(scaledPixel);
336 if (fabs(roundedPixel - scaledPixel) <= .0001)
338 scaledPixel = roundedPixel;
342 scaledPixel = (increase ? ceil : floor)(scaledPixel);
344 return scaledPixel / scale;
347 /* Descriptions of how to "push pixels" in a given rect to integralize.
348 * For example, PUSH_LEFT means that we round expand the left edge if set,
349 * otherwise we shrink it. */
359 * Return a rect whose border is in the "cracks" between tiles
361 static NSRect crack_rect(NSRect rect, NSSize scale, unsigned pushOptions)
363 double rightPixel = push_pixel(NSMaxX(rect), scale.width, !! (pushOptions & PUSH_RIGHT));
364 double topPixel = push_pixel(NSMaxY(rect), scale.height, !! (pushOptions & PUSH_TOP));
365 double leftPixel = push_pixel(NSMinX(rect), scale.width, ! (pushOptions & PUSH_LEFT));
366 double bottomPixel = push_pixel(NSMinY(rect), scale.height, ! (pushOptions & PUSH_BOTTOM));
367 return NSMakeRect(leftPixel, bottomPixel, rightPixel - leftPixel, topPixel - bottomPixel);
371 * Returns the pixel push options (describing how we round) for the tile at a
372 * given index. Currently it's pretty uniform!
374 static unsigned push_options(unsigned x, unsigned y)
376 return PUSH_TOP | PUSH_LEFT;
380 * ------------------------------------------------------------------------
382 * ------------------------------------------------------------------------ */
387 static CGImageRef pict_image;
390 * Numbers of rows and columns in a tileset,
391 * calculated by the PICT/PNG loading code
393 static int pict_cols = 0;
394 static int pict_rows = 0;
397 * Requested graphics mode (as a grafID).
398 * The current mode is stored in current_graphics_mode.
400 static int graf_mode_req = 0;
403 * Helper function to check the various ways that graphics can be enabled,
404 * guarding against NULL
406 static BOOL graphics_are_enabled(void)
408 return current_graphics_mode
409 && current_graphics_mode->grafID != GRAPHICS_NONE;
413 * Hack -- game in progress
415 static Boolean game_in_progress = FALSE;
418 #pragma mark Prototypes
419 static void wakeup_event_loop(void);
420 static void hook_plog(const char *str);
421 static void hook_quit(const char * str);
422 static void load_prefs(void);
423 static void load_sounds(void);
424 static void init_windows(void);
425 static void handle_open_when_ready(void);
426 static void play_sound(int event);
427 static BOOL check_events(int wait);
428 static BOOL send_event(NSEvent *event);
429 static void record_current_savefile(void);
432 * Available values for 'wait'
434 #define CHECK_EVENTS_DRAIN -1
435 #define CHECK_EVENTS_NO_WAIT 0
436 #define CHECK_EVENTS_WAIT 1
440 * Note when "open"/"new" become valid
442 static bool initialized = FALSE;
444 /* Methods for getting the appropriate NSUserDefaults */
445 @interface NSUserDefaults (AngbandDefaults)
446 + (NSUserDefaults *)angbandDefaults;
449 @implementation NSUserDefaults (AngbandDefaults)
450 + (NSUserDefaults *)angbandDefaults
452 return [NSUserDefaults standardUserDefaults];
456 /* Methods for pulling images out of the Angband bundle (which may be separate
457 * from the current bundle in the case of a screensaver */
458 @interface NSImage (AngbandImages)
459 + (NSImage *)angbandImage:(NSString *)name;
462 /* The NSView subclass that draws our Angband image */
463 @interface AngbandView : NSView
465 IBOutlet AngbandContext *angbandContext;
468 - (void)setAngbandContext:(AngbandContext *)context;
469 - (AngbandContext *)angbandContext;
473 @implementation NSImage (AngbandImages)
475 /* Returns an image in the resource directoy of the bundle containing the
476 * Angband view class. */
477 + (NSImage *)angbandImage:(NSString *)name
479 NSBundle *bundle = [NSBundle bundleForClass:[AngbandView class]];
480 NSString *path = [bundle pathForImageResource:name];
482 if (path) result = [[[NSImage alloc] initByReferencingFile:path] autorelease];
490 @implementation AngbandContext
492 @synthesize hasSubwindowFlags=_hasSubwindowFlags;
493 @synthesize windowVisibilityChecked=_windowVisibilityChecked;
495 - (NSFont *)selectionFont
497 return angbandViewFont;
500 - (BOOL)useLiveResizeOptimization
502 /* If we have graphics turned off, text rendering is fast enough that we
503 * don't need to use a live resize optimization. */
504 return inLiveResize && graphics_are_enabled();
509 /* We round the base size down. If we round it up, I believe we may end up
510 * with pixels that nobody "owns" that may accumulate garbage. In general
511 * rounding down is harmless, because any lost pixels may be sopped up by
513 return NSMakeSize(floor(cols * tileSize.width + 2 * borderSize.width), floor(rows * tileSize.height + 2 * borderSize.height));
516 /* qsort-compatible compare function for CGSizes */
517 static int compare_advances(const void *ap, const void *bp)
519 const CGSize *a = ap, *b = bp;
520 return (a->width > b->width) - (a->width < b->width);
523 - (void)updateGlyphInfo
525 /* Update glyphArray and glyphWidths */
526 NSFont *screenFont = [angbandViewFont screenFont];
528 /* Generate a string containing each MacRoman character */
529 unsigned char latinString[GLYPH_COUNT];
531 for (i=0; i < GLYPH_COUNT; i++) latinString[i] = (unsigned char)i;
533 /* Turn that into unichar. Angband uses ISO Latin 1. */
534 unichar unicharString[GLYPH_COUNT] = {0};
535 NSString *allCharsString = [[NSString alloc] initWithBytes:latinString length:sizeof latinString encoding:NSISOLatin1StringEncoding];
536 [allCharsString getCharacters:unicharString range:NSMakeRange(0, MIN(GLYPH_COUNT, [allCharsString length]))];
537 [allCharsString autorelease];
540 memset(glyphArray, 0, sizeof glyphArray);
541 CTFontGetGlyphsForCharacters((CTFontRef)screenFont, unicharString, glyphArray, GLYPH_COUNT);
543 /* Get advances. Record the max advance. */
544 CGSize advances[GLYPH_COUNT] = {};
545 CTFontGetAdvancesForGlyphs((CTFontRef)screenFont, kCTFontHorizontalOrientation, glyphArray, advances, GLYPH_COUNT);
546 for (i=0; i < GLYPH_COUNT; i++) {
547 glyphWidths[i] = advances[i].width;
550 /* For good non-mono-font support, use the median advance. Start by sorting
552 qsort(advances, GLYPH_COUNT, sizeof *advances, compare_advances);
554 /* Skip over any initially empty run */
556 for (startIdx = 0; startIdx < GLYPH_COUNT; startIdx++)
558 if (advances[startIdx].width > 0) break;
561 /* Pick the center to find the median */
562 CGFloat medianAdvance = 0;
563 if (startIdx < GLYPH_COUNT)
565 /* In case we have all zero advances for some reason */
566 medianAdvance = advances[(startIdx + GLYPH_COUNT)/2].width;
569 /* Record the descender */
570 fontDescender = [screenFont descender];
572 /* Record the tile size. Note that these are typically fractional values -
573 * which seems sketchy, but we end up scaling the heck out of our view
574 * anyways, so it seems to not matter. */
575 tileSize.width = medianAdvance;
576 tileSize.height = [screenFont ascender] - [screenFont descender];
581 NSSize size = NSMakeSize(1, 1);
583 AngbandView *activeView = [self activeView];
586 /* If we are in live resize, draw as big as the screen, so we can scale
587 * nicely to any size. If we are not in live resize, then use the
588 * bounds of the active view. */
590 if ([self useLiveResizeOptimization] && (screen = [[activeView window] screen]) != NULL)
592 size = [screen frame].size;
596 size = [activeView bounds].size;
600 CGLayerRelease(angbandLayer);
602 /* Use the highest monitor scale factor on the system to work out what
603 * scale to draw at - not the recommended method, but works where we
604 * can't easily get the monitor the current draw is occurring on. */
605 float angbandLayerScale = 1.0;
606 if ([[NSScreen mainScreen] respondsToSelector:@selector(backingScaleFactor)]) {
607 for (NSScreen *screen in [NSScreen screens]) {
608 angbandLayerScale = fmax(angbandLayerScale, [screen backingScaleFactor]);
612 /* Make a bitmap context as an example for our layer */
613 CGColorSpaceRef cs = CGColorSpaceCreateDeviceRGB();
614 CGContextRef exampleCtx = CGBitmapContextCreate(NULL, 1, 1, 8 /* bits per component */, 48 /* bytesPerRow */, cs, kCGImageAlphaNoneSkipFirst | kCGBitmapByteOrder32Host);
615 CGColorSpaceRelease(cs);
617 /* Create the layer at the appropriate size */
618 size.width = fmax(1, ceil(size.width * angbandLayerScale));
619 size.height = fmax(1, ceil(size.height * angbandLayerScale));
620 angbandLayer = CGLayerCreateWithContext(exampleCtx, *(CGSize *)&size, NULL);
622 CFRelease(exampleCtx);
624 /* Set the new context of the layer to draw at the correct scale */
625 CGContextRef ctx = CGLayerGetContext(angbandLayer);
626 CGContextScaleCTM(ctx, angbandLayerScale, angbandLayerScale);
629 [[NSColor blackColor] set];
630 NSRectFill((NSRect){NSZeroPoint, [self baseSize]});
634 - (void)requestRedraw
636 if (! self->terminal) return;
640 /* Activate the term */
641 Term_activate(self->terminal);
643 /* Redraw the contents */
646 /* Flush the output */
649 /* Restore the old term */
653 - (void)setTerm:(term *)t
658 - (void)viewWillStartLiveResize:(AngbandView *)view
660 #if USE_LIVE_RESIZE_CACHE
661 if (inLiveResize < INT_MAX) inLiveResize++;
662 else [NSException raise:NSInternalInconsistencyException format:@"inLiveResize overflow"];
664 if (inLiveResize == 1 && graphics_are_enabled())
668 [self setNeedsDisplay:YES]; /* We'll need to redisplay everything anyways, so avoid creating all those little redisplay rects */
669 [self requestRedraw];
674 - (void)viewDidEndLiveResize:(AngbandView *)view
676 #if USE_LIVE_RESIZE_CACHE
677 if (inLiveResize > 0) inLiveResize--;
678 else [NSException raise:NSInternalInconsistencyException format:@"inLiveResize underflow"];
680 if (inLiveResize == 0 && graphics_are_enabled())
684 [self setNeedsDisplay:YES]; /* We'll need to redisplay everything anyways, so avoid creating all those little redisplay rects */
685 [self requestRedraw];
691 * If we're trying to limit ourselves to a certain number of frames per second,
692 * then compute how long it's been since we last drew, and then wait until the
693 * next frame has passed. */
696 if (frames_per_second > 0)
698 CFAbsoluteTime now = CFAbsoluteTimeGetCurrent();
699 CFTimeInterval timeSinceLastRefresh = now - lastRefreshTime;
700 CFTimeInterval timeUntilNextRefresh = (1. / (double)frames_per_second) - timeSinceLastRefresh;
702 if (timeUntilNextRefresh > 0)
704 usleep((unsigned long)(timeUntilNextRefresh * 1000000.));
707 lastRefreshTime = CFAbsoluteTimeGetCurrent();
710 - (void)drawWChar:(wchar_t)wchar inRect:(NSRect)tile
712 CGContextRef ctx = [[NSGraphicsContext currentContext] graphicsPort];
713 CGFloat tileOffsetY = CTFontGetAscent( (CTFontRef)[angbandViewFont screenFont] );
714 CGFloat tileOffsetX = 0.0;
715 NSFont *screenFont = [angbandViewFont screenFont];
716 UniChar unicharString[2] = {(UniChar)wchar, 0};
718 /* Get glyph and advance */
719 CGGlyph thisGlyphArray[1] = { 0 };
720 CGSize advances[1] = { { 0, 0 } };
721 CTFontGetGlyphsForCharacters((CTFontRef)screenFont, unicharString, thisGlyphArray, 1);
722 CGGlyph glyph = thisGlyphArray[0];
723 CTFontGetAdvancesForGlyphs((CTFontRef)screenFont, kCTFontHorizontalOrientation, thisGlyphArray, advances, 1);
724 CGSize advance = advances[0];
726 /* If our font is not monospaced, our tile width is deliberately not big
727 * enough for every character. In that event, if our glyph is too wide, we
728 * need to compress it horizontally. Compute the compression ratio.
729 * 1.0 means no compression. */
730 double compressionRatio;
731 if (advance.width <= NSWidth(tile))
733 /* Our glyph fits, so we can just draw it, possibly with an offset */
734 compressionRatio = 1.0;
735 tileOffsetX = (NSWidth(tile) - advance.width)/2;
739 /* Our glyph doesn't fit, so we'll have to compress it */
740 compressionRatio = NSWidth(tile) / advance.width;
746 CGAffineTransform textMatrix = CGContextGetTextMatrix(ctx);
747 CGFloat savedA = textMatrix.a;
749 /* Set the position */
750 textMatrix.tx = tile.origin.x + tileOffsetX;
751 textMatrix.ty = tile.origin.y + tileOffsetY;
753 /* Maybe squish it horizontally. */
754 if (compressionRatio != 1.)
756 textMatrix.a *= compressionRatio;
759 textMatrix = CGAffineTransformScale( textMatrix, 1.0, -1.0 );
760 CGContextSetTextMatrix(ctx, textMatrix);
761 CGContextShowGlyphsWithAdvances(ctx, &glyph, &CGSizeZero, 1);
763 /* Restore the text matrix if we messed with the compression ratio */
764 if (compressionRatio != 1.)
766 textMatrix.a = savedA;
767 CGContextSetTextMatrix(ctx, textMatrix);
770 textMatrix = CGAffineTransformScale( textMatrix, 1.0, -1.0 );
771 CGContextSetTextMatrix(ctx, textMatrix);
774 /* Lock and unlock focus on our image or layer, setting up the CTM
776 - (CGContextRef)lockFocusUnscaled
778 /* Create an NSGraphicsContext representing this CGLayer */
779 CGContextRef ctx = CGLayerGetContext(angbandLayer);
780 NSGraphicsContext *context = [NSGraphicsContext graphicsContextWithGraphicsPort:ctx flipped:NO];
781 [NSGraphicsContext saveGraphicsState];
782 [NSGraphicsContext setCurrentContext:context];
783 CGContextSaveGState(ctx);
789 /* Restore the graphics state */
790 CGContextRef ctx = [[NSGraphicsContext currentContext] graphicsPort];
791 CGContextRestoreGState(ctx);
792 [NSGraphicsContext restoreGraphicsState];
797 /* Return the size of our layer */
798 CGSize result = CGLayerGetSize(angbandLayer);
799 return NSMakeSize(result.width, result.height);
802 - (CGContextRef)lockFocus
804 return [self lockFocusUnscaled];
808 - (NSRect)rectInImageForTileAtX:(int)x Y:(int)y
811 return NSMakeRect(x * tileSize.width + borderSize.width, flippedY * tileSize.height + borderSize.height, tileSize.width, tileSize.height);
814 - (void)setSelectionFont:(NSFont*)font adjustTerminal: (BOOL)adjustTerminal
816 /* Record the new font */
818 [angbandViewFont release];
819 angbandViewFont = font;
821 /* Update our glyph info */
822 [self updateGlyphInfo];
826 /* Adjust terminal to fit window with new font; save the new columns
827 * and rows since they could be changed */
828 NSRect contentRect = [self->primaryWindow contentRectForFrameRect: [self->primaryWindow frame]];
829 [self resizeTerminalWithContentRect: contentRect saveToDefaults: YES];
832 /* Update our image */
836 [self requestRedraw];
841 if ((self = [super init]))
843 /* Default rows and cols */
847 /* Default border size */
848 self->borderSize = NSMakeSize(2, 2);
850 /* Allocate our array of views */
851 angbandViews = [[NSMutableArray alloc] init];
853 /* Make the image. Since we have no views, it'll just be a puny 1x1 image. */
856 _windowVisibilityChecked = NO;
862 * Destroy all the receiver's stuff. This is intended to be callable more than
869 /* Disassociate ourselves from our angbandViews */
870 [angbandViews makeObjectsPerformSelector:@selector(setAngbandContext:) withObject:nil];
871 [angbandViews release];
874 /* Destroy the layer/image */
875 CGLayerRelease(angbandLayer);
879 [angbandViewFont release];
880 angbandViewFont = nil;
883 [primaryWindow setDelegate:nil];
884 [primaryWindow close];
885 [primaryWindow release];
889 /* Usual Cocoa fare */
899 #pragma mark Directories and Paths Setup
902 * Return the path for Angband's lib directory and bail if it isn't found. The
903 * lib directory should be in the bundle's resources directory, since it's
906 + (NSString *)libDirectoryPath
908 NSString *bundleLibPath = [[[NSBundle mainBundle] resourcePath] stringByAppendingPathComponent: AngbandDirectoryNameLib];
909 BOOL isDirectory = NO;
910 BOOL libExists = [[NSFileManager defaultManager] fileExistsAtPath: bundleLibPath isDirectory: &isDirectory];
912 if( !libExists || !isDirectory )
914 NSLog( @"[%@ %@]: can't find %@/ in bundle: isDirectory: %d libExists: %d", NSStringFromClass( [self class] ), NSStringFromSelector( _cmd ), AngbandDirectoryNameLib, isDirectory, libExists );
915 NSRunAlertPanel( @"Missing Resources", @"Hengband was unable to find required resources and must quit. Please report a bug on the Angband forums.", @"Quit", nil, nil );
919 return bundleLibPath;
923 * Return the path for the directory where Angband should look for its standard
926 + (NSString *)angbandDocumentsPath
928 NSString *documents = [NSSearchPathForDirectoriesInDomains(NSDocumentDirectory, NSUserDomainMask, YES) lastObject];
930 #if defined(SAFE_DIRECTORY)
931 NSString *versionedDirectory = [NSString stringWithFormat: @"%@-%s", AngbandDirectoryNameBase, VERSION_STRING];
932 return [documents stringByAppendingPathComponent: versionedDirectory];
934 return [documents stringByAppendingPathComponent: AngbandDirectoryNameBase];
939 * Adjust directory paths as needed to correct for any differences needed by
940 * Angband. \c init_file_paths() currently requires that all paths provided have
941 * a trailing slash and all other platforms honor this.
943 * \param originalPath The directory path to adjust.
944 * \return A path suitable for Angband or nil if an error occurred.
946 static NSString *AngbandCorrectedDirectoryPath(NSString *originalPath)
948 if ([originalPath length] == 0) {
952 if (![originalPath hasSuffix: @"/"]) {
953 return [originalPath stringByAppendingString: @"/"];
960 * Give Angband the base paths that should be used for the various directories
961 * it needs. It will create any needed directories.
963 + (void)prepareFilePathsAndDirectories
965 char libpath[PATH_MAX + 1] = "\0";
966 NSString *libDirectoryPath = AngbandCorrectedDirectoryPath([self libDirectoryPath]);
967 [libDirectoryPath getFileSystemRepresentation: libpath maxLength: sizeof(libpath)];
969 char basepath[PATH_MAX + 1] = "\0";
970 NSString *angbandDocumentsPath = AngbandCorrectedDirectoryPath([self angbandDocumentsPath]);
971 [angbandDocumentsPath getFileSystemRepresentation: basepath maxLength: sizeof(basepath)];
973 init_file_paths(libpath, libpath, basepath);
974 create_needed_dirs();
980 /* From the Linux mbstowcs(3) man page:
981 * If dest is NULL, n is ignored, and the conversion proceeds as above,
982 * except that the converted wide characters are not written out to mem‐
983 * ory, and that no length limit exists.
985 static size_t Term_mbcs_cocoa(wchar_t *dest, const char *src, int n)
990 /* Unicode code point to UTF-8
991 * 0x0000-0x007f: 0xxxxxxx
992 * 0x0080-0x07ff: 110xxxxx 10xxxxxx
993 * 0x0800-0xffff: 1110xxxx 10xxxxxx 10xxxxxx
994 * 0x10000-0x1fffff: 11110xxx 10xxxxxx 10xxxxxx 10xxxxxx
995 * Note that UTF-16 limits Unicode to 0x10ffff. This code is not
998 for (i = 0; i < n || dest == NULL; i++) {
999 if ((src[i] & 0x80) == 0) {
1000 if (dest != NULL) dest[count] = src[i];
1001 if (src[i] == 0) break;
1002 } else if ((src[i] & 0xe0) == 0xc0) {
1003 if (dest != NULL) dest[count] =
1004 (((unsigned char)src[i] & 0x1f) << 6)|
1005 ((unsigned char)src[i+1] & 0x3f);
1007 } else if ((src[i] & 0xf0) == 0xe0) {
1008 if (dest != NULL) dest[count] =
1009 (((unsigned char)src[i] & 0x0f) << 12) |
1010 (((unsigned char)src[i+1] & 0x3f) << 6) |
1011 ((unsigned char)src[i+2] & 0x3f);
1013 } else if ((src[i] & 0xf8) == 0xf0) {
1014 if (dest != NULL) dest[count] =
1015 (((unsigned char)src[i] & 0x0f) << 18) |
1016 (((unsigned char)src[i+1] & 0x3f) << 12) |
1017 (((unsigned char)src[i+2] & 0x3f) << 6) |
1018 ((unsigned char)src[i+3] & 0x3f);
1021 /* Found an invalid multibyte sequence */
1031 * Entry point for initializing Angband
1035 NSAutoreleasePool *pool = [[NSAutoreleasePool alloc] init];
1037 /* Hooks in some "z-util.c" hooks */
1038 plog_aux = hook_plog;
1039 quit_aux = hook_quit;
1041 /* Initialize file paths */
1042 [self prepareFilePathsAndDirectories];
1044 /* Load preferences */
1047 /* Prepare the windows */
1050 /* Set up game event handlers */
1051 /* init_display(); */
1053 /* Register the sound hook */
1054 /* sound_hook = play_sound; */
1056 /* Initialise game */
1059 /* This is not incorporated into Hengband's init_angband() yet. */
1060 init_graphics_modes();
1062 /* Note the "system" */
1063 ANGBAND_SYS = "mac";
1065 /* Initialize some save file stuff */
1066 player_egid = getegid();
1068 /* We are now initialized */
1071 /* Handle "open_when_ready" */
1072 handle_open_when_ready();
1074 /* Handle pending events (most notably update) and flush input */
1077 /* Prompt the user. */
1078 int message_row = (Term->hgt - 23) / 5 + 23;
1079 Term_erase(0, message_row, 255);
1080 put_str("[Choose 'New' or 'Open' from the 'File' menu]",
1081 message_row, (Term->wid - 45) / 2);
1085 * Play a game -- "new_game" is set by "new", "open" or the open document
1086 * even handler as appropriate
1091 while (!game_in_progress) {
1092 NSAutoreleasePool *splashScreenPool = [[NSAutoreleasePool alloc] init];
1093 NSEvent *event = [NSApp nextEventMatchingMask:NSAnyEventMask untilDate:[NSDate distantFuture] inMode:NSDefaultRunLoopMode dequeue:YES];
1094 if (event) [NSApp sendEvent:event];
1095 [splashScreenPool drain];
1099 play_game(new_game);
1106 /* Hack -- Forget messages */
1109 p_ptr->playing = FALSE;
1110 p_ptr->leaving = TRUE;
1111 quit_when_ready = TRUE;
1114 - (void)addAngbandView:(AngbandView *)view
1116 if (! [angbandViews containsObject:view])
1118 [angbandViews addObject:view];
1120 [self setNeedsDisplay:YES]; /* We'll need to redisplay everything anyways, so avoid creating all those little redisplay rects */
1121 [self requestRedraw];
1126 * We have this notion of an "active" AngbandView, which is the largest - the
1127 * idea being that in the screen saver, when the user hits Test in System
1128 * Preferences, we don't want to keep driving the AngbandView in the
1129 * background. Our active AngbandView is the widest - that's a hack all right.
1130 * Mercifully when we're just playing the game there's only one view.
1132 - (AngbandView *)activeView
1134 if ([angbandViews count] == 1)
1135 return [angbandViews objectAtIndex:0];
1137 AngbandView *result = nil;
1139 for (AngbandView *angbandView in angbandViews)
1141 float width = [angbandView frame].size.width;
1142 if (width > maxWidth)
1145 result = angbandView;
1151 - (void)angbandViewDidScale:(AngbandView *)view
1153 /* If we're live-resizing with graphics, we're using the live resize
1154 * optimization, so don't update the image. Otherwise do it. */
1155 if (! (inLiveResize && graphics_are_enabled()) && view == [self activeView])
1159 [self setNeedsDisplay:YES]; /*we'll need to redisplay everything anyways, so avoid creating all those little redisplay rects */
1160 [self requestRedraw];
1165 - (void)removeAngbandView:(AngbandView *)view
1167 if ([angbandViews containsObject:view])
1169 [angbandViews removeObject:view];
1171 [self setNeedsDisplay:YES]; /* We'll need to redisplay everything anyways, so avoid creating all those little redisplay rects */
1172 if ([angbandViews count]) [self requestRedraw];
1177 static NSMenuItem *superitem(NSMenuItem *self)
1179 NSMenu *supermenu = [[self menu] supermenu];
1180 int index = [supermenu indexOfItemWithSubmenu:[self menu]];
1181 if (index == -1) return nil;
1182 else return [supermenu itemAtIndex:index];
1186 - (BOOL)validateMenuItem:(NSMenuItem *)menuItem
1188 int tag = [menuItem tag];
1189 SEL sel = [menuItem action];
1190 if (sel == @selector(setGraphicsMode:))
1192 [menuItem setState: (tag == graf_mode_req)];
1201 - (NSWindow *)makePrimaryWindow
1203 if (! primaryWindow)
1205 /* This has to be done after the font is set, which it already is in
1206 * term_init_cocoa() */
1207 CGFloat width = self->cols * tileSize.width + borderSize.width * 2.0;
1208 CGFloat height = self->rows * tileSize.height + borderSize.height * 2.0;
1209 NSRect contentRect = NSMakeRect( 0.0, 0.0, width, height );
1211 NSUInteger styleMask = NSTitledWindowMask | NSResizableWindowMask | NSMiniaturizableWindowMask;
1213 /* Make every window other than the main window closable */
1214 if( angband_term[0]->data != self )
1216 styleMask |= NSClosableWindowMask;
1219 primaryWindow = [[NSWindow alloc] initWithContentRect:contentRect styleMask: styleMask backing:NSBackingStoreBuffered defer:YES];
1221 /* Not to be released when closed */
1222 [primaryWindow setReleasedWhenClosed:NO];
1223 [primaryWindow setExcludedFromWindowsMenu: YES]; /* we're using custom window menu handling */
1226 AngbandView *angbandView = [[AngbandView alloc] initWithFrame:contentRect];
1227 [angbandView setAngbandContext:self];
1228 [angbandViews addObject:angbandView];
1229 [primaryWindow setContentView:angbandView];
1230 [angbandView release];
1232 /* We are its delegate */
1233 [primaryWindow setDelegate:self];
1235 /* Update our image, since this is probably the first angband view
1239 return primaryWindow;
1244 #pragma mark View/Window Passthrough
1247 * This is what our views call to get us to draw to the window
1249 - (void)drawRect:(NSRect)rect inView:(NSView *)view
1251 /* Take this opportunity to throttle so we don't flush faster than desired.
1253 BOOL viewInLiveResize = [view inLiveResize];
1254 if (! viewInLiveResize) [self throttle];
1256 /* With a GLayer, use CGContextDrawLayerInRect */
1257 CGContextRef context = [[NSGraphicsContext currentContext] graphicsPort];
1258 NSRect bounds = [view bounds];
1259 if (viewInLiveResize) CGContextSetInterpolationQuality(context, kCGInterpolationLow);
1260 CGContextSetBlendMode(context, kCGBlendModeCopy);
1261 CGContextDrawLayerInRect(context, *(CGRect *)&bounds, angbandLayer);
1262 if (viewInLiveResize) CGContextSetInterpolationQuality(context, kCGInterpolationDefault);
1267 return [[[angbandViews lastObject] window] isVisible];
1270 - (BOOL)isMainWindow
1272 return [[[angbandViews lastObject] window] isMainWindow];
1275 - (void)setNeedsDisplay:(BOOL)val
1277 for (NSView *angbandView in angbandViews)
1279 [angbandView setNeedsDisplay:val];
1283 - (void)setNeedsDisplayInBaseRect:(NSRect)rect
1285 for (NSView *angbandView in angbandViews)
1287 [angbandView setNeedsDisplayInRect: rect];
1291 - (void)displayIfNeeded
1293 [[self activeView] displayIfNeeded];
1296 - (int)terminalIndex
1300 for( termIndex = 0; termIndex < ANGBAND_TERM_MAX; termIndex++ )
1302 if( angband_term[termIndex] == self->terminal )
1311 - (void)resizeTerminalWithContentRect: (NSRect)contentRect saveToDefaults: (BOOL)saveToDefaults
1313 CGFloat newRows = floor( (contentRect.size.height - (borderSize.height * 2.0)) / tileSize.height );
1314 CGFloat newColumns = ceil( (contentRect.size.width - (borderSize.width * 2.0)) / tileSize.width );
1316 if (newRows < 1 || newColumns < 1) return;
1317 self->cols = newColumns;
1318 self->rows = newRows;
1320 if( saveToDefaults )
1322 int termIndex = [self terminalIndex];
1323 NSArray *terminals = [[NSUserDefaults standardUserDefaults] valueForKey: AngbandTerminalsDefaultsKey];
1325 if( termIndex < (int)[terminals count] )
1327 NSMutableDictionary *mutableTerm = [[NSMutableDictionary alloc] initWithDictionary: [terminals objectAtIndex: termIndex]];
1328 [mutableTerm setValue: [NSNumber numberWithUnsignedInt: self->cols] forKey: AngbandTerminalColumnsDefaultsKey];
1329 [mutableTerm setValue: [NSNumber numberWithUnsignedInt: self->rows] forKey: AngbandTerminalRowsDefaultsKey];
1331 NSMutableArray *mutableTerminals = [[NSMutableArray alloc] initWithArray: terminals];
1332 [mutableTerminals replaceObjectAtIndex: termIndex withObject: mutableTerm];
1334 [[NSUserDefaults standardUserDefaults] setValue: mutableTerminals forKey: AngbandTerminalsDefaultsKey];
1335 [mutableTerminals release];
1336 [mutableTerm release];
1338 [[NSUserDefaults standardUserDefaults] synchronize];
1342 Term_activate( self->terminal );
1343 Term_resize( (int)newColumns, (int)newRows);
1345 Term_activate( old );
1348 - (void)saveWindowVisibleToDefaults: (BOOL)windowVisible
1350 int termIndex = [self terminalIndex];
1351 BOOL safeVisibility = (termIndex == 0) ? YES : windowVisible; /* Ensure main term doesn't go away because of these defaults */
1352 NSArray *terminals = [[NSUserDefaults standardUserDefaults] valueForKey: AngbandTerminalsDefaultsKey];
1354 if( termIndex < (int)[terminals count] )
1356 NSMutableDictionary *mutableTerm = [[NSMutableDictionary alloc] initWithDictionary: [terminals objectAtIndex: termIndex]];
1357 [mutableTerm setValue: [NSNumber numberWithBool: safeVisibility] forKey: AngbandTerminalVisibleDefaultsKey];
1359 NSMutableArray *mutableTerminals = [[NSMutableArray alloc] initWithArray: terminals];
1360 [mutableTerminals replaceObjectAtIndex: termIndex withObject: mutableTerm];
1362 [[NSUserDefaults standardUserDefaults] setValue: mutableTerminals forKey: AngbandTerminalsDefaultsKey];
1363 [mutableTerminals release];
1364 [mutableTerm release];
1368 - (BOOL)windowVisibleUsingDefaults
1370 int termIndex = [self terminalIndex];
1372 if( termIndex == 0 )
1377 NSArray *terminals = [[NSUserDefaults standardUserDefaults] valueForKey: AngbandTerminalsDefaultsKey];
1380 if( termIndex < (int)[terminals count] )
1382 NSDictionary *term = [terminals objectAtIndex: termIndex];
1383 NSNumber *visibleValue = [term valueForKey: AngbandTerminalVisibleDefaultsKey];
1385 if( visibleValue != nil )
1387 visible = [visibleValue boolValue];
1395 #pragma mark NSWindowDelegate Methods
1397 /*- (void)windowWillStartLiveResize: (NSNotification *)notification
1401 - (void)windowDidEndLiveResize: (NSNotification *)notification
1403 NSWindow *window = [notification object];
1404 NSRect contentRect = [window contentRectForFrameRect: [window frame]];
1405 [self resizeTerminalWithContentRect: contentRect saveToDefaults: YES];
1408 /*- (NSSize)windowWillResize: (NSWindow *)sender toSize: (NSSize)frameSize
1412 - (void)windowDidEnterFullScreen: (NSNotification *)notification
1414 NSWindow *window = [notification object];
1415 NSRect contentRect = [window contentRectForFrameRect: [window frame]];
1416 [self resizeTerminalWithContentRect: contentRect saveToDefaults: NO];
1419 - (void)windowDidExitFullScreen: (NSNotification *)notification
1421 NSWindow *window = [notification object];
1422 NSRect contentRect = [window contentRectForFrameRect: [window frame]];
1423 [self resizeTerminalWithContentRect: contentRect saveToDefaults: NO];
1426 - (void)windowDidBecomeMain:(NSNotification *)notification
1428 NSWindow *window = [notification object];
1430 if( window != self->primaryWindow )
1435 int termIndex = [self terminalIndex];
1436 NSMenuItem *item = [[[NSApplication sharedApplication] windowsMenu] itemWithTag: AngbandWindowMenuItemTagBase + termIndex];
1437 [item setState: NSOnState];
1439 if( [[NSFontPanel sharedFontPanel] isVisible] )
1441 [[NSFontPanel sharedFontPanel] setPanelFont: [self selectionFont] isMultiple: NO];
1445 - (void)windowDidResignMain: (NSNotification *)notification
1447 NSWindow *window = [notification object];
1449 if( window != self->primaryWindow )
1454 int termIndex = [self terminalIndex];
1455 NSMenuItem *item = [[[NSApplication sharedApplication] windowsMenu] itemWithTag: AngbandWindowMenuItemTagBase + termIndex];
1456 [item setState: NSOffState];
1459 - (void)windowWillClose: (NSNotification *)notification
1461 [self saveWindowVisibleToDefaults: NO];
1467 @implementation AngbandView
1479 - (void)drawRect:(NSRect)rect
1481 if (! angbandContext)
1483 /* Draw bright orange, 'cause this ain't right */
1484 [[NSColor orangeColor] set];
1485 NSRectFill([self bounds]);
1489 /* Tell the Angband context to draw into us */
1490 [angbandContext drawRect:rect inView:self];
1494 - (void)setAngbandContext:(AngbandContext *)context
1496 angbandContext = context;
1499 - (AngbandContext *)angbandContext
1501 return angbandContext;
1504 - (void)setFrameSize:(NSSize)size
1506 BOOL changed = ! NSEqualSizes(size, [self frame].size);
1507 [super setFrameSize:size];
1508 if (changed) [angbandContext angbandViewDidScale:self];
1511 - (void)viewWillStartLiveResize
1513 [angbandContext viewWillStartLiveResize:self];
1516 - (void)viewDidEndLiveResize
1518 [angbandContext viewDidEndLiveResize:self];
1524 * Delay handling of double-clicked savefiles
1526 Boolean open_when_ready = FALSE;
1531 * ------------------------------------------------------------------------
1532 * Some generic functions
1533 * ------------------------------------------------------------------------ */
1536 * Sets an Angband color at a given index
1538 static void set_color_for_index(int idx)
1542 /* Extract the R,G,B data */
1543 rv = angband_color_table[idx][1];
1544 gv = angband_color_table[idx][2];
1545 bv = angband_color_table[idx][3];
1547 CGContextSetRGBFillColor([[NSGraphicsContext currentContext] graphicsPort], rv/255., gv/255., bv/255., 1.);
1551 * Remember the current character in UserDefaults so we can select it by
1552 * default next time.
1554 static void record_current_savefile(void)
1556 NSString *savefileString = [[NSString stringWithCString:savefile encoding:NSMacOSRomanStringEncoding] lastPathComponent];
1559 NSUserDefaults *angbandDefs = [NSUserDefaults angbandDefaults];
1560 [angbandDefs setObject:savefileString forKey:@"SaveFile"];
1561 [angbandDefs synchronize];
1567 * ------------------------------------------------------------------------
1568 * Support for the "z-term.c" package
1569 * ------------------------------------------------------------------------ */
1573 * Initialize a new Term
1575 static void Term_init_cocoa(term *t)
1577 NSAutoreleasePool *pool = [[NSAutoreleasePool alloc] init];
1578 AngbandContext *context = [[AngbandContext alloc] init];
1580 /* Give the term a hard retain on context (for GC) */
1581 t->data = (void *)CFRetain(context);
1584 /* Handle graphics */
1585 t->higher_pict = !! use_graphics;
1586 t->always_pict = FALSE;
1588 NSDisableScreenUpdates();
1590 /* Figure out the frame autosave name based on the index of this term */
1591 NSString *autosaveName = nil;
1593 for (termIdx = 0; termIdx < ANGBAND_TERM_MAX; termIdx++)
1595 if (angband_term[termIdx] == t)
1597 autosaveName = [NSString stringWithFormat:@"AngbandTerm-%d", termIdx];
1603 NSString *fontName = [[NSUserDefaults angbandDefaults] stringForKey:[NSString stringWithFormat:@"FontName-%d", termIdx]];
1604 if (! fontName) fontName = [default_font fontName];
1606 /* Use a smaller default font for the other windows, but only if the font
1607 * hasn't been explicitly set */
1608 float fontSize = (termIdx > 0) ? 10.0 : [default_font pointSize];
1609 NSNumber *fontSizeNumber = [[NSUserDefaults angbandDefaults] valueForKey: [NSString stringWithFormat: @"FontSize-%d", termIdx]];
1611 if( fontSizeNumber != nil )
1613 fontSize = [fontSizeNumber floatValue];
1616 [context setSelectionFont:[NSFont fontWithName:fontName size:fontSize] adjustTerminal: NO];
1618 NSArray *terminalDefaults = [[NSUserDefaults standardUserDefaults] valueForKey: AngbandTerminalsDefaultsKey];
1619 NSInteger rows = 24;
1620 NSInteger columns = 80;
1622 if( termIdx < (int)[terminalDefaults count] )
1624 NSDictionary *term = [terminalDefaults objectAtIndex: termIdx];
1625 NSInteger defaultRows = [[term valueForKey: AngbandTerminalRowsDefaultsKey] integerValue];
1626 NSInteger defaultColumns = [[term valueForKey: AngbandTerminalColumnsDefaultsKey] integerValue];
1628 if (defaultRows > 0) rows = defaultRows;
1629 if (defaultColumns > 0) columns = defaultColumns;
1632 context->cols = columns;
1633 context->rows = rows;
1635 /* Get the window */
1636 NSWindow *window = [context makePrimaryWindow];
1638 /* Set its title and, for auxiliary terms, tentative size */
1641 [window setTitle:@"Hengband"];
1643 /* Set minimum size (80x24) */
1645 minsize.width = 80 * context->tileSize.width + context->borderSize.width * 2.0;
1646 minsize.height = 24 * context->tileSize.height + context->borderSize.height * 2.0;
1647 [window setContentMinSize:minsize];
1651 [window setTitle:[NSString stringWithFormat:@"Term %d", termIdx]];
1652 /* Set minimum size (1x1) */
1654 minsize.width = context->tileSize.width + context->borderSize.width * 2.0;
1655 minsize.height = context->tileSize.height + context->borderSize.height * 2.0;
1656 [window setContentMinSize:minsize];
1660 /* If this is the first term, and we support full screen (Mac OS X Lion or
1661 * later), then allow it to go full screen (sweet). Allow other terms to be
1662 * FullScreenAuxilliary, so they can at least show up. Unfortunately in
1663 * Lion they don't get brought to the full screen space; but they would
1664 * only make sense on multiple displays anyways so it's not a big loss. */
1665 if ([window respondsToSelector:@selector(toggleFullScreen:)])
1667 NSWindowCollectionBehavior behavior = [window collectionBehavior];
1668 behavior |= (termIdx == 0 ? Angband_NSWindowCollectionBehaviorFullScreenPrimary : Angband_NSWindowCollectionBehaviorFullScreenAuxiliary);
1669 [window setCollectionBehavior:behavior];
1672 /* No Resume support yet, though it would not be hard to add */
1673 if ([window respondsToSelector:@selector(setRestorable:)])
1675 [window setRestorable:NO];
1678 /* default window placement */ {
1679 static NSRect overallBoundingRect;
1683 /* This is a bit of a trick to allow us to display multiple windows
1684 * in the "standard default" window position in OS X: the upper
1685 * center of the screen.
1686 * The term sizes set in load_prefs() are based on a 5-wide by
1687 * 3-high grid, with the main term being 4/5 wide by 2/3 high
1688 * (hence the scaling to find */
1690 /* What the containing rect would be). */
1691 NSRect originalMainTermFrame = [window frame];
1692 NSRect scaledFrame = originalMainTermFrame;
1693 scaledFrame.size.width *= 5.0 / 4.0;
1694 scaledFrame.size.height *= 3.0 / 2.0;
1695 scaledFrame.size.width += 1.0; /* spacing between window columns */
1696 scaledFrame.size.height += 1.0; /* spacing between window rows */
1697 [window setFrame: scaledFrame display: NO];
1699 overallBoundingRect = [window frame];
1700 [window setFrame: originalMainTermFrame display: NO];
1703 static NSRect mainTermBaseRect;
1704 NSRect windowFrame = [window frame];
1708 /* The height and width adjustments were determined experimentally,
1709 * so that the rest of the windows line up nicely without
1711 windowFrame.size.width += 7.0;
1712 windowFrame.size.height += 9.0;
1713 windowFrame.origin.x = NSMinX( overallBoundingRect );
1714 windowFrame.origin.y = NSMaxY( overallBoundingRect ) - NSHeight( windowFrame );
1715 mainTermBaseRect = windowFrame;
1717 else if( termIdx == 1 )
1719 windowFrame.origin.x = NSMinX( mainTermBaseRect );
1720 windowFrame.origin.y = NSMinY( mainTermBaseRect ) - NSHeight( windowFrame ) - 1.0;
1722 else if( termIdx == 2 )
1724 windowFrame.origin.x = NSMaxX( mainTermBaseRect ) + 1.0;
1725 windowFrame.origin.y = NSMaxY( mainTermBaseRect ) - NSHeight( windowFrame );
1727 else if( termIdx == 3 )
1729 windowFrame.origin.x = NSMaxX( mainTermBaseRect ) + 1.0;
1730 windowFrame.origin.y = NSMinY( mainTermBaseRect ) - NSHeight( windowFrame ) - 1.0;
1732 else if( termIdx == 4 )
1734 windowFrame.origin.x = NSMaxX( mainTermBaseRect ) + 1.0;
1735 windowFrame.origin.y = NSMinY( mainTermBaseRect );
1737 else if( termIdx == 5 )
1739 windowFrame.origin.x = NSMinX( mainTermBaseRect ) + NSWidth( windowFrame ) + 1.0;
1740 windowFrame.origin.y = NSMinY( mainTermBaseRect ) - NSHeight( windowFrame ) - 1.0;
1743 [window setFrame: windowFrame display: NO];
1746 /* Override the default frame above if the user has adjusted windows in
1748 if (autosaveName) [window setFrameAutosaveName:autosaveName];
1750 /* Tell it about its term. Do this after we've sized it so that the sizing
1751 * doesn't trigger redrawing and such. */
1752 [context setTerm:t];
1754 /* Only order front if it's the first term. Other terms will be ordered
1755 * front from AngbandUpdateWindowVisibility(). This is to work around a
1756 * problem where Angband aggressively tells us to initialize terms that
1757 * don't do anything! */
1758 if (t == angband_term[0]) [context->primaryWindow makeKeyAndOrderFront: nil];
1760 NSEnableScreenUpdates();
1762 /* Set "mapped" flag */
1763 t->mapped_flag = true;
1772 static void Term_nuke_cocoa(term *t)
1774 NSAutoreleasePool *pool = [[NSAutoreleasePool alloc] init];
1776 AngbandContext *context = t->data;
1779 /* Tell the context to get rid of its windows, etc. */
1782 /* Balance our CFRetain from when we created it */
1793 * Returns the CGImageRef corresponding to an image with the given name in the
1794 * resource directory, transferring ownership to the caller
1796 static CGImageRef create_angband_image(NSString *path)
1798 CGImageRef decodedImage = NULL, result = NULL;
1800 /* Try using ImageIO to load the image */
1803 NSURL *url = [[NSURL alloc] initFileURLWithPath:path isDirectory:NO];
1806 NSDictionary *options = [[NSDictionary alloc] initWithObjectsAndKeys:(id)kCFBooleanTrue, kCGImageSourceShouldCache, nil];
1807 CGImageSourceRef source = CGImageSourceCreateWithURL((CFURLRef)url, (CFDictionaryRef)options);
1810 /* We really want the largest image, but in practice there's
1811 * only going to be one */
1812 decodedImage = CGImageSourceCreateImageAtIndex(source, 0, (CFDictionaryRef)options);
1820 /* Draw the sucker to defeat ImageIO's weird desire to cache and decode on
1821 * demand. Our images aren't that big! */
1824 size_t width = CGImageGetWidth(decodedImage), height = CGImageGetHeight(decodedImage);
1826 /* Compute our own bitmap info */
1827 CGBitmapInfo imageBitmapInfo = CGImageGetBitmapInfo(decodedImage);
1828 CGBitmapInfo contextBitmapInfo = kCGBitmapByteOrderDefault;
1830 switch (imageBitmapInfo & kCGBitmapAlphaInfoMask) {
1831 case kCGImageAlphaNone:
1832 case kCGImageAlphaNoneSkipLast:
1833 case kCGImageAlphaNoneSkipFirst:
1835 contextBitmapInfo |= kCGImageAlphaNone;
1838 /* Some alpha, use premultiplied last which is most efficient. */
1839 contextBitmapInfo |= kCGImageAlphaPremultipliedLast;
1843 /* Draw the source image flipped, since the view is flipped */
1844 CGContextRef ctx = CGBitmapContextCreate(NULL, width, height, CGImageGetBitsPerComponent(decodedImage), CGImageGetBytesPerRow(decodedImage), CGImageGetColorSpace(decodedImage), contextBitmapInfo);
1845 CGContextSetBlendMode(ctx, kCGBlendModeCopy);
1846 CGContextTranslateCTM(ctx, 0.0, height);
1847 CGContextScaleCTM(ctx, 1.0, -1.0);
1848 CGContextDrawImage(ctx, CGRectMake(0, 0, width, height), decodedImage);
1849 result = CGBitmapContextCreateImage(ctx);
1851 /* Done with these things */
1853 CGImageRelease(decodedImage);
1861 static errr Term_xtra_cocoa_react(void)
1863 /* Don't actually switch graphics until the game is running */
1864 if (!initialized || !game_in_progress) return (-1);
1866 NSAutoreleasePool *pool = [[NSAutoreleasePool alloc] init];
1867 AngbandContext *angbandContext = Term->data;
1869 /* Handle graphics */
1870 int expected_graf_mode = (current_graphics_mode) ?
1871 current_graphics_mode->grafID : GRAPHICS_NONE;
1872 if (graf_mode_req != expected_graf_mode)
1874 graphics_mode *new_mode;
1875 if (graf_mode_req != GRAPHICS_NONE) {
1876 new_mode = get_graphics_mode(graf_mode_req);
1881 /* Get rid of the old image. CGImageRelease is NULL-safe. */
1882 CGImageRelease(pict_image);
1885 /* Try creating the image if we want one */
1886 if (new_mode != NULL)
1888 NSString *img_path = [NSString stringWithFormat:@"%s/%s", new_mode->path, new_mode->file];
1889 pict_image = create_angband_image(img_path);
1891 /* If we failed to create the image, set the new desired mode to
1897 /* Record what we did */
1898 use_graphics = new_mode ? new_mode->grafID : 0;
1900 /* This global is not in Hengband. */
1901 use_transparency = (new_mode != NULL);
1903 ANGBAND_GRAF = (new_mode ? new_mode->graf : "ascii");
1904 current_graphics_mode = new_mode;
1906 /* Enable or disable higher picts. Note: this should be done for all
1908 angbandContext->terminal->higher_pict = !! use_graphics;
1910 if (pict_image && current_graphics_mode)
1912 /* Compute the row and column count via the image height and width.
1914 pict_rows = (int)(CGImageGetHeight(pict_image) / current_graphics_mode->cell_height);
1915 pict_cols = (int)(CGImageGetWidth(pict_image) / current_graphics_mode->cell_width);
1924 if (initialized && game_in_progress)
1937 * Do a "special thing"
1939 static errr Term_xtra_cocoa(int n, int v)
1941 NSAutoreleasePool *pool = [[NSAutoreleasePool alloc] init];
1942 AngbandContext* angbandContext = Term->data;
1950 case TERM_XTRA_NOISE:
1959 case TERM_XTRA_SOUND:
1963 /* Process random events */
1964 case TERM_XTRA_BORED:
1966 /* Show or hide cocoa windows based on the subwindow flags set by
1968 AngbandUpdateWindowVisibility();
1970 /* Process an event */
1971 (void)check_events(CHECK_EVENTS_NO_WAIT);
1977 /* Process pending events */
1978 case TERM_XTRA_EVENT:
1980 /* Process an event */
1981 (void)check_events(v);
1987 /* Flush all pending events (if any) */
1988 case TERM_XTRA_FLUSH:
1990 /* Hack -- flush all events */
1991 while (check_events(CHECK_EVENTS_DRAIN)) /* loop */;
1997 /* Hack -- Change the "soft level" */
1998 case TERM_XTRA_LEVEL:
2000 /* Here we could activate (if requested), but I don't think Angband
2001 * should be telling us our window order (the user should decide
2002 * that), so do nothing. */
2006 /* Clear the screen */
2007 case TERM_XTRA_CLEAR:
2009 [angbandContext lockFocus];
2010 [[NSColor blackColor] set];
2011 NSRect imageRect = {NSZeroPoint, [angbandContext imageSize]};
2012 NSRectFillUsingOperation(imageRect, NSCompositeCopy);
2013 [angbandContext unlockFocus];
2014 [angbandContext setNeedsDisplay:YES];
2019 /* React to changes */
2020 case TERM_XTRA_REACT:
2022 /* React to changes */
2023 return (Term_xtra_cocoa_react());
2026 /* Delay (milliseconds) */
2027 case TERM_XTRA_DELAY:
2033 double seconds = v / 1000.;
2034 NSDate* date = [NSDate dateWithTimeIntervalSinceNow:seconds];
2040 event = [NSApp nextEventMatchingMask:-1 untilDate:date inMode:NSDefaultRunLoopMode dequeue:YES];
2041 if (event) send_event(event);
2043 } while ([date timeIntervalSinceNow] >= 0);
2051 case TERM_XTRA_FRESH:
2053 /* No-op -- see #1669
2054 * [angbandContext displayIfNeeded]; */
2070 static errr Term_curs_cocoa(int x, int y)
2072 NSAutoreleasePool *pool = [[NSAutoreleasePool alloc] init];
2073 AngbandContext *angbandContext = Term->data;
2076 NSRect rect = [angbandContext rectInImageForTileAtX:x Y:y];
2078 /* We'll need to redisplay in that rect */
2079 NSRect redisplayRect = rect;
2081 /* Go to the pixel boundaries corresponding to this tile */
2082 rect = crack_rect(rect, AngbandScaleIdentity, push_options(x, y));
2084 /* Lock focus and draw it */
2085 [angbandContext lockFocus];
2086 [[NSColor yellowColor] set];
2087 NSFrameRectWithWidth(rect, 1);
2088 [angbandContext unlockFocus];
2090 /* Invalidate that rect */
2091 [angbandContext setNeedsDisplayInBaseRect:redisplayRect];
2099 * Low level graphics (Assumes valid input)
2101 * Erase "n" characters starting at (x,y)
2103 static errr Term_wipe_cocoa(int x, int y, int n)
2105 NSAutoreleasePool *pool = [[NSAutoreleasePool alloc] init];
2106 AngbandContext *angbandContext = Term->data;
2110 * Erase the block of characters. Mimic the geometry calculations for
2111 * the cleared rectangle in Term_text_cocoa().
2113 NSRect rect = [angbandContext rectInImageForTileAtX:x Y:y];
2114 rect.size.width = angbandContext->tileSize.width * n;
2115 rect = crack_rect(rect, AngbandScaleIdentity,
2116 (push_options(x, y) & ~PUSH_LEFT)
2117 | (push_options(x + n - 1, y) | PUSH_RIGHT));
2119 /* Lock focus and clear */
2120 [angbandContext lockFocus];
2121 [[NSColor blackColor] set];
2123 [angbandContext unlockFocus];
2124 [angbandContext setNeedsDisplayInBaseRect:rect];
2132 static void draw_image_tile(CGImageRef image, NSRect srcRect, NSRect dstRect, NSCompositingOperation op)
2134 /* Flip the source rect since the source image is flipped */
2135 CGAffineTransform flip = CGAffineTransformIdentity;
2136 flip = CGAffineTransformTranslate(flip, 0.0, CGImageGetHeight(image));
2137 flip = CGAffineTransformScale(flip, 1.0, -1.0);
2138 CGRect flippedSourceRect = CGRectApplyAffineTransform(NSRectToCGRect(srcRect), flip);
2140 /* When we use high-quality resampling to draw a tile, pixels from outside
2141 * the tile may bleed in, causing graphics artifacts. Work around that. */
2142 CGImageRef subimage = CGImageCreateWithImageInRect(image, flippedSourceRect);
2143 NSGraphicsContext *context = [NSGraphicsContext currentContext];
2144 [context setCompositingOperation:op];
2145 CGContextDrawImage([context graphicsPort], NSRectToCGRect(dstRect), subimage);
2146 CGImageRelease(subimage);
2149 static errr Term_pict_cocoa(int x, int y, int n, TERM_COLOR *ap,
2150 const char *cp, const TERM_COLOR *tap,
2154 /* Paranoia: Bail if we don't have a current graphics mode */
2155 if (! current_graphics_mode) return -1;
2157 NSAutoreleasePool *pool = [[NSAutoreleasePool alloc] init];
2158 AngbandContext* angbandContext = Term->data;
2161 [angbandContext lockFocus];
2163 NSRect destinationRect = [angbandContext rectInImageForTileAtX:x Y:y];
2165 /* Expand the rect to every touching pixel to figure out what to redisplay
2167 NSRect redisplayRect = crack_rect(destinationRect, AngbandScaleIdentity, PUSH_RIGHT | PUSH_TOP | PUSH_BOTTOM | PUSH_LEFT);
2169 /* Expand our destinationRect */
2170 destinationRect = crack_rect(destinationRect, AngbandScaleIdentity, push_options(x, y));
2172 /* Scan the input */
2174 int graf_width = current_graphics_mode->cell_width;
2175 int graf_height = current_graphics_mode->cell_height;
2177 for (i = 0; i < n; i++)
2180 TERM_COLOR a = *ap++;
2183 TERM_COLOR ta = *tap++;
2187 /* Graphics -- if Available and Needed */
2188 if (use_graphics && (a & 0x80) && (c & 0x80))
2194 /* Primary Row and Col */
2195 row = ((byte)a & 0x7F) % pict_rows;
2196 col = ((byte)c & 0x7F) % pict_cols;
2199 sourceRect.origin.x = col * graf_width;
2200 sourceRect.origin.y = row * graf_height;
2201 sourceRect.size.width = graf_width;
2202 sourceRect.size.height = graf_height;
2204 /* Terrain Row and Col */
2205 t_row = ((byte)ta & 0x7F) % pict_rows;
2206 t_col = ((byte)tc & 0x7F) % pict_cols;
2209 terrainRect.origin.x = t_col * graf_width;
2210 terrainRect.origin.y = t_row * graf_height;
2211 terrainRect.size.width = graf_width;
2212 terrainRect.size.height = graf_height;
2214 /* Transparency effect. We really want to check
2215 * current_graphics_mode->alphablend, but as of this writing that's
2216 * never set, so we do something lame. */
2217 /*if (current_graphics_mode->alphablend) */
2218 if (graf_width > 8 || graf_height > 8)
2220 draw_image_tile(pict_image, terrainRect, destinationRect, NSCompositeCopy);
2221 draw_image_tile(pict_image, sourceRect, destinationRect, NSCompositeSourceOver);
2225 draw_image_tile(pict_image, sourceRect, destinationRect, NSCompositeCopy);
2230 [angbandContext unlockFocus];
2231 [angbandContext setNeedsDisplayInBaseRect:redisplayRect];
2240 * Low level graphics. Assumes valid input.
2242 * Draw several ("n") chars, with an attr, at a given location.
2244 static errr Term_text_cocoa(int x, int y, int n, byte_hack a, concptr cp)
2246 NSAutoreleasePool *pool = [[NSAutoreleasePool alloc] init];
2247 NSRect redisplayRect = NSZeroRect;
2248 AngbandContext* angbandContext = Term->data;
2250 /* Focus on our layer */
2251 [angbandContext lockFocus];
2253 /* Starting pixel */
2254 NSRect charRect = [angbandContext rectInImageForTileAtX:x Y:y];
2256 const CGFloat tileWidth = angbandContext->tileSize.width;
2258 /* erase behind us */
2259 unsigned leftPushOptions = push_options(x, y);
2260 unsigned rightPushOptions = push_options(x + n - 1, y);
2261 leftPushOptions &= ~ PUSH_LEFT;
2262 rightPushOptions |= PUSH_RIGHT;
2264 switch (a / MAX_COLORS) {
2266 [[NSColor blackColor] set];
2269 set_color_for_index(a % MAX_COLORS);
2272 set_color_for_index(TERM_SHADE);
2276 NSRect rectToClear = charRect;
2277 rectToClear.size.width = tileWidth * n;
2278 rectToClear = crack_rect(rectToClear, AngbandScaleIdentity,
2279 leftPushOptions | rightPushOptions);
2280 NSRectFill(rectToClear);
2282 NSFont *selectionFont = [[angbandContext selectionFont] screenFont];
2283 [selectionFont set];
2286 set_color_for_index(a % MAX_COLORS);
2289 NSRect rectToDraw = charRect;
2291 for (i=0; i < n; i++) {
2292 [angbandContext drawWChar:cp[i] inRect:rectToDraw];
2293 rectToDraw.origin.x += tileWidth;
2296 [angbandContext unlockFocus];
2297 /* Invalidate what we just drew */
2298 [angbandContext setNeedsDisplayInBaseRect:rectToClear];
2307 * Post a nonsense event so that our event loop wakes up
2309 static void wakeup_event_loop(void)
2311 /* Big hack - send a nonsense event to make us update */
2312 NSEvent *event = [NSEvent otherEventWithType:NSApplicationDefined location:NSZeroPoint modifierFlags:0 timestamp:0 windowNumber:0 context:NULL subtype:AngbandEventWakeup data1:0 data2:0];
2313 [NSApp postEvent:event atStart:NO];
2318 * Create and initialize window number "i"
2320 static term *term_data_link(int i)
2322 NSArray *terminalDefaults = [[NSUserDefaults standardUserDefaults] valueForKey: AngbandTerminalsDefaultsKey];
2323 NSInteger rows = 24;
2324 NSInteger columns = 80;
2326 if( i < (int)[terminalDefaults count] )
2328 NSDictionary *term = [terminalDefaults objectAtIndex: i];
2329 rows = [[term valueForKey: AngbandTerminalRowsDefaultsKey] integerValue];
2330 columns = [[term valueForKey: AngbandTerminalColumnsDefaultsKey] integerValue];
2334 term *newterm = ZNEW(term);
2336 /* Initialize the term */
2337 term_init(newterm, columns, rows, 256 /* keypresses, for some reason? */);
2339 /* Differentiate between BS/^h, Tab/^i, etc. */
2340 /* newterm->complex_input = TRUE; */
2342 /* Use a "software" cursor */
2343 newterm->soft_cursor = TRUE;
2345 /* Erase with "white space" */
2346 newterm->attr_blank = TERM_WHITE;
2347 newterm->char_blank = ' ';
2349 /* Prepare the init/nuke hooks */
2350 newterm->init_hook = Term_init_cocoa;
2351 newterm->nuke_hook = Term_nuke_cocoa;
2353 /* Prepare the function hooks */
2354 newterm->xtra_hook = Term_xtra_cocoa;
2355 newterm->wipe_hook = Term_wipe_cocoa;
2356 newterm->curs_hook = Term_curs_cocoa;
2357 newterm->text_hook = Term_text_cocoa;
2358 newterm->pict_hook = Term_pict_cocoa;
2359 /* newterm->mbcs_hook = Term_mbcs_cocoa; */
2361 /* Global pointer */
2362 angband_term[i] = newterm;
2368 * Load preferences from preferences file for current host+current user+
2369 * current application.
2371 static void load_prefs()
2373 NSUserDefaults *defs = [NSUserDefaults angbandDefaults];
2375 /* Make some default defaults */
2376 NSMutableArray *defaultTerms = [[NSMutableArray alloc] init];
2378 /* The following default rows/cols were determined experimentally by first
2379 * finding the ideal window/font size combinations. But because of awful
2380 * temporal coupling in Term_init_cocoa(), it's impossible to set up the
2381 * defaults there, so we do it this way. */
2382 for( NSUInteger i = 0; i < ANGBAND_TERM_MAX; i++ )
2420 NSDictionary *standardTerm = [NSDictionary dictionaryWithObjectsAndKeys:
2421 [NSNumber numberWithInt: rows], AngbandTerminalRowsDefaultsKey,
2422 [NSNumber numberWithInt: columns], AngbandTerminalColumnsDefaultsKey,
2423 [NSNumber numberWithBool: visible], AngbandTerminalVisibleDefaultsKey,
2425 [defaultTerms addObject: standardTerm];
2428 NSDictionary *defaults = [[NSDictionary alloc] initWithObjectsAndKeys:
2429 @"Menlo", @"FontName",
2430 [NSNumber numberWithFloat:13.f], @"FontSize",
2431 [NSNumber numberWithInt:60], AngbandFrameRateDefaultsKey,
2432 [NSNumber numberWithBool:YES], AngbandSoundDefaultsKey,
2433 [NSNumber numberWithInt:GRAPHICS_NONE], AngbandGraphicsDefaultsKey,
2434 defaultTerms, AngbandTerminalsDefaultsKey,
2436 [defs registerDefaults:defaults];
2438 [defaultTerms release];
2440 /* Preferred graphics mode */
2441 graf_mode_req = [defs integerForKey:AngbandGraphicsDefaultsKey];
2443 /* Use sounds; set the Angband global */
2444 use_sound = ([defs boolForKey:AngbandSoundDefaultsKey] == YES) ? TRUE : FALSE;
2447 frames_per_second = [defs integerForKey:AngbandFrameRateDefaultsKey];
2450 default_font = [[NSFont fontWithName:[defs valueForKey:@"FontName-0"] size:[defs floatForKey:@"FontSize-0"]] retain];
2451 if (! default_font) default_font = [[NSFont fontWithName:@"Menlo" size:13.] retain];
2455 * Arbitary limit on number of possible samples per event
2457 #define MAX_SAMPLES 16
2460 * Struct representing all data for a set of event samples
2464 int num; /* Number of available samples for this event */
2465 NSSound *sound[MAX_SAMPLES];
2466 } sound_sample_list;
2469 * Array of event sound structs
2471 static sound_sample_list samples[MSG_MAX];
2475 * Load sound effects based on sound.cfg within the xtra/sound directory;
2476 * bridge to Cocoa to use NSSound for simple loading and playback, avoiding
2477 * I/O latency by cacheing all sounds at the start. Inherits full sound
2478 * format support from Quicktime base/plugins.
2479 * pelpel favoured a plist-based parser for the future but .cfg support
2480 * improves cross-platform compatibility.
2482 static void load_sounds(void)
2484 char sound_dir[1024];
2489 /* Build the "sound" path */
2490 path_build(sound_dir, sizeof(sound_dir), ANGBAND_DIR_XTRA, "sound");
2492 /* Find and open the config file */
2493 path_build(path, sizeof(path), sound_dir, "sound.cfg");
2494 fff = my_fopen(path, "r");
2499 NSLog(@"The sound configuration file could not be opened.");
2503 /* Instantiate an autorelease pool for use by NSSound */
2504 NSAutoreleasePool *autorelease_pool;
2505 autorelease_pool = [[NSAutoreleasePool alloc] init];
2507 /* Use a dictionary to unique sounds, so we can share NSSounds across
2508 * multiple events */
2509 NSMutableDictionary *sound_dict = [NSMutableDictionary dictionary];
2512 * This loop may take a while depending on the count and size of samples
2516 /* Parse the file */
2517 /* Lines are always of the form "name = sample [sample ...]" */
2518 while (my_fgets(fff, buffer, sizeof(buffer)) == 0)
2521 char *cfg_sample_list;
2527 /* Skip anything not beginning with an alphabetic character */
2528 if (!buffer[0] || !isalpha((unsigned char)buffer[0])) continue;
2530 /* Split the line into two: message name, and the rest */
2531 search = strchr(buffer, ' ');
2532 cfg_sample_list = strchr(search + 1, ' ');
2533 if (!search) continue;
2534 if (!cfg_sample_list) continue;
2536 /* Set the message name, and terminate at first space */
2540 /* Make sure this is a valid event name */
2541 for (event = MSG_MAX - 1; event >= 0; event--)
2543 if (strcmp(msg_name, angband_sound_name[event]) == 0)
2546 if (event < 0) continue;
2548 /* Advance the sample list pointer so it's at the beginning of text */
2550 if (!cfg_sample_list[0]) continue;
2552 /* Terminate the current token */
2553 cur_token = cfg_sample_list;
2554 search = strchr(cur_token, ' ');
2558 next_token = search + 1;
2566 * Now we find all the sample names and add them one by one
2570 int num = samples[event].num;
2572 /* Don't allow too many samples */
2573 if (num >= MAX_SAMPLES) break;
2575 NSString *token_string = [NSString stringWithUTF8String:cur_token];
2576 NSSound *sound = [sound_dict objectForKey:token_string];
2582 /* We have to load the sound. Build the path to the sample */
2583 path_build(path, sizeof(path), sound_dir, cur_token);
2584 if (stat(path, &stb) == 0)
2587 /* Load the sound into memory */
2588 sound = [[[NSSound alloc] initWithContentsOfFile:[NSString stringWithUTF8String:path] byReference:YES] autorelease];
2589 if (sound) [sound_dict setObject:sound forKey:token_string];
2593 /* Store it if we loaded it */
2596 samples[event].sound[num] = [sound retain];
2598 /* Imcrement the sample count */
2599 samples[event].num++;
2603 /* Figure out next token */
2604 cur_token = next_token;
2607 /* Try to find a space */
2608 search = strchr(cur_token, ' ');
2610 /* If we can find one, terminate, and set new "next" */
2614 next_token = search + 1;
2618 /* Otherwise prevent infinite looping */
2625 /* Release the autorelease pool */
2626 [autorelease_pool release];
2628 /* Close the file */
2633 * Play sound effects asynchronously. Select a sound from any available
2634 * for the required event, and bridge to Cocoa to play it.
2636 static void play_sound(int event)
2639 if (event < 0 || event >= MSG_MAX) return;
2641 /* Load sounds just-in-time (once) */
2642 static BOOL loaded = NO;
2648 /* Check there are samples for this event */
2649 if (!samples[event].num) return;
2651 /* Instantiate an autorelease pool for use by NSSound */
2652 NSAutoreleasePool *autorelease_pool;
2653 autorelease_pool = [[NSAutoreleasePool alloc] init];
2655 /* Choose a random event */
2656 int s = randint0(samples[event].num);
2658 /* Stop the sound if it's currently playing */
2659 if ([samples[event].sound[s] isPlaying])
2660 [samples[event].sound[s] stop];
2662 /* Play the sound */
2663 [samples[event].sound[s] play];
2665 /* Release the autorelease pool */
2666 [autorelease_pool drain];
2672 static void init_windows(void)
2674 /* Create the main window */
2675 term *primary = term_data_link(0);
2677 /* Prepare to create any additional windows */
2679 for (i=1; i < ANGBAND_TERM_MAX; i++) {
2683 /* Activate the primary term */
2684 Term_activate(primary);
2688 * Handle the "open_when_ready" flag
2690 static void handle_open_when_ready(void)
2692 /* Check the flag XXX XXX XXX make a function for this */
2693 if (open_when_ready && initialized && !game_in_progress)
2696 open_when_ready = FALSE;
2698 /* Game is in progress */
2699 game_in_progress = TRUE;
2701 /* Wait for a keypress */
2708 * Handle quit_when_ready, by Peter Ammon,
2709 * slightly modified to check inkey_flag.
2711 static void quit_calmly(void)
2713 /* Quit immediately if game's not started */
2714 if (!game_in_progress || !character_generated) quit(NULL);
2716 /* Save the game and Quit (if it's safe) */
2719 /* Hack -- Forget messages and term */
2721 Term->mapped_flag = FALSE;
2724 do_cmd_save_game(FALSE);
2725 record_current_savefile();
2732 /* Wait until inkey_flag is set */
2738 * Returns YES if we contain an AngbandView (and hence should direct our events
2741 static BOOL contains_angband_view(NSView *view)
2743 if ([view isKindOfClass:[AngbandView class]]) return YES;
2744 for (NSView *subview in [view subviews]) {
2745 if (contains_angband_view(subview)) return YES;
2752 * Queue mouse presses if they occur in the map section of the main window.
2754 static void AngbandHandleEventMouseDown( NSEvent *event )
2757 AngbandContext *angbandContext = [[[event window] contentView] angbandContext];
2758 AngbandContext *mainAngbandContext = angband_term[0]->data;
2760 if (mainAngbandContext->primaryWindow && [[event window] windowNumber] == [mainAngbandContext->primaryWindow windowNumber])
2762 int cols, rows, x, y;
2763 Term_get_size(&cols, &rows);
2764 NSSize tileSize = angbandContext->tileSize;
2765 NSSize border = angbandContext->borderSize;
2766 NSPoint windowPoint = [event locationInWindow];
2768 /* Adjust for border; add border height because window origin is at
2770 windowPoint = NSMakePoint( windowPoint.x - border.width, windowPoint.y + border.height );
2772 NSPoint p = [[[event window] contentView] convertPoint: windowPoint fromView: nil];
2773 x = floor( p.x / tileSize.width );
2774 y = floor( p.y / tileSize.height );
2776 /* Being safe about this, since xcode doesn't seem to like the
2777 * bool_hack stuff */
2778 BOOL displayingMapInterface = ((int)inkey_flag != 0);
2780 /* Sidebar plus border == thirteen characters; top row is reserved. */
2781 /* Coordinates run from (0,0) to (cols-1, rows-1). */
2782 BOOL mouseInMapSection = (x > 13 && x <= cols - 1 && y > 0 && y <= rows - 2);
2784 /* If we are displaying a menu, allow clicks anywhere; if we are
2785 * displaying the main game interface, only allow clicks in the map
2787 if (!displayingMapInterface || (displayingMapInterface && mouseInMapSection))
2789 /* [event buttonNumber] will return 0 for left click,
2790 * 1 for right click, but this is safer */
2791 int button = ([event type] == NSLeftMouseDown) ? 1 : 2;
2794 NSUInteger eventModifiers = [event modifierFlags];
2795 byte angbandModifiers = 0;
2796 angbandModifiers |= (eventModifiers & NSShiftKeyMask) ? KC_MOD_SHIFT : 0;
2797 angbandModifiers |= (eventModifiers & NSControlKeyMask) ? KC_MOD_CONTROL : 0;
2798 angbandModifiers |= (eventModifiers & NSAlternateKeyMask) ? KC_MOD_ALT : 0;
2799 button |= (angbandModifiers & 0x0F) << 4; /* encode modifiers in the button number (see Term_mousepress()) */
2802 Term_mousepress(x, y, button);
2806 /* Pass click through to permit focus change, resize, etc. */
2807 [NSApp sendEvent:event];
2813 * Encodes an NSEvent Angband-style, or forwards it along. Returns YES if the
2814 * event was sent to Angband, NO if Cocoa (or nothing) handled it */
2815 static BOOL send_event(NSEvent *event)
2818 /* If the receiving window is not an Angband window, then do nothing */
2819 if (! contains_angband_view([[event window] contentView]))
2821 [NSApp sendEvent:event];
2825 /* Analyze the event */
2826 switch ([event type])
2830 /* Try performing a key equivalent */
2831 if ([[NSApp mainMenu] performKeyEquivalent:event]) break;
2833 unsigned modifiers = [event modifierFlags];
2835 /* Send all NSCommandKeyMasks through */
2836 if (modifiers & NSCommandKeyMask)
2838 [NSApp sendEvent:event];
2842 if (! [[event characters] length]) break;
2845 /* Extract some modifiers */
2847 /* Caught above so don't do anything with it here. */
2848 int mx = !! (modifiers & NSCommandKeyMask);
2850 int mc = !! (modifiers & NSControlKeyMask);
2851 int ms = !! (modifiers & NSShiftKeyMask);
2852 int mo = !! (modifiers & NSAlternateKeyMask);
2853 int kp = !! (modifiers & NSNumericPadKeyMask);
2856 /* Get the Angband char corresponding to this unichar */
2857 unichar c = [[event characters] characterAtIndex:0];
2861 * Convert some special keys to what would be the normal
2862 * alternative in the original keyset or, for things lke
2863 * Delete, Return, and Escape, what one might use from ASCII.
2864 * The rest of Hengband uses Angband 2.7's or so key handling:
2865 * so for the rest do something like the encoding that
2866 * main-win.c does: send a macro trigger with the Unicode
2867 * value encoded into printable ASCII characters. Since
2868 * macro triggers appear to assume at most two keys plus the
2869 * modifiers, can only handle values of c below 4096 with
2870 * 64 values per key.
2872 case NSUpArrowFunctionKey: ch = '8'; kp = 0; break;
2873 case NSDownArrowFunctionKey: ch = '2'; kp = 0; break;
2874 case NSLeftArrowFunctionKey: ch = '4'; kp = 0; break;
2875 case NSRightArrowFunctionKey: ch = '6'; kp = 0; break;
2876 case NSHelpFunctionKey: ch = '?'; break;
2877 case NSDeleteFunctionKey: ch = '\b'; break;
2887 /* override special keys */
2888 switch([event keyCode]) {
2889 case kVK_Return: ch = '\r'; break;
2890 case kVK_Escape: ch = 27; break;
2891 case kVK_Tab: ch = '\t'; break;
2892 case kVK_Delete: ch = '\b'; break;
2893 case kVK_ANSI_KeypadEnter: ch = '\r'; kp = TRUE; break;
2896 /* Hide the mouse pointer */
2897 [NSCursor setHiddenUntilMouseMoves:YES];
2903 /* Enqueue the keypress */
2906 if (mo) mods |= KC_MOD_ALT;
2907 if (mx) mods |= KC_MOD_META;
2908 if (mc && MODS_INCLUDE_CONTROL(ch)) mods |= KC_MOD_CONTROL;
2909 if (ms && MODS_INCLUDE_SHIFT(ch)) mods |= KC_MOD_SHIFT;
2910 if (kp) mods |= KC_MOD_KEYPAD;
2911 Term_keypress(ch, mods);
2915 } else if (c < 4096 || (c >= 0xF700 && c <= 0xF77F)) {
2919 /* Begin the macro trigger. */
2922 /* Send the modifiers. */
2923 if (mc) Term_keypress('C');
2924 if (ms) Term_keypress('S');
2925 if (mo) Term_keypress('A');
2926 if (kp) Term_keypress('K');
2929 * Put part of the range Apple reserves for special keys
2930 * into 0 - 127 since that range has been handled normally.
2936 /* Encode the value as two printable characters. */
2937 part = (c >> 6) & 63;
2939 cenc = 'a' + (part - 38);
2940 } else if (part > 12) {
2941 cenc = 'A' + (part - 12);
2945 Term_keypress(cenc);
2948 cenc = 'a' + (part - 38);
2949 } else if (part > 12) {
2950 cenc = 'A' + (part - 12);
2954 Term_keypress(cenc);
2956 /* End the macro trigger. */
2963 case NSLeftMouseDown:
2964 case NSRightMouseDown:
2965 AngbandHandleEventMouseDown(event);
2968 case NSApplicationDefined:
2970 if ([event subtype] == AngbandEventWakeup)
2978 [NSApp sendEvent:event];
2985 * Check for Events, return TRUE if we process any
2987 static BOOL check_events(int wait)
2990 NSAutoreleasePool *pool = [[NSAutoreleasePool alloc] init];
2992 /* Handles the quit_when_ready flag */
2993 if (quit_when_ready) quit_calmly();
2996 if (wait == CHECK_EVENTS_WAIT) endDate = [NSDate distantFuture];
2997 else endDate = [NSDate distantPast];
3001 if (quit_when_ready)
3003 /* send escape events until we quit */
3004 Term_keypress(0x1B);
3009 event = [NSApp nextEventMatchingMask:-1 untilDate:endDate inMode:NSDefaultRunLoopMode dequeue:YES];
3015 if (send_event(event)) break;
3021 /* Something happened */
3027 * Hook to tell the user something important
3029 static void hook_plog(const char * str)
3033 NSString *string = [NSString stringWithCString:str encoding:NSMacOSRomanStringEncoding];
3034 NSRunAlertPanel(@"Danger Will Robinson", @"%@", @"OK", nil, nil, string);
3040 * Hook to tell the user something, and then quit
3042 static void hook_quit(const char * str)
3049 * ------------------------------------------------------------------------
3051 * ------------------------------------------------------------------------ */
3053 @interface AngbandAppDelegate : NSObject {
3054 IBOutlet NSMenu *terminalsMenu;
3055 NSMenu *_commandMenu;
3056 NSDictionary *_commandMenuTagMap;
3059 @property (nonatomic, retain) IBOutlet NSMenu *commandMenu;
3060 @property (nonatomic, retain) NSDictionary *commandMenuTagMap;
3062 - (IBAction)newGame:sender;
3063 - (IBAction)openGame:sender;
3065 - (IBAction)editFont:sender;
3066 - (IBAction)setGraphicsMode:(NSMenuItem *)sender;
3067 - (IBAction)toggleSound:(NSMenuItem *)sender;
3069 - (IBAction)setRefreshRate:(NSMenuItem *)menuItem;
3070 - (IBAction)selectWindow: (id)sender;
3074 @implementation AngbandAppDelegate
3076 @synthesize commandMenu=_commandMenu;
3077 @synthesize commandMenuTagMap=_commandMenuTagMap;
3079 - (IBAction)newGame:sender
3081 /* Game is in progress */
3082 game_in_progress = TRUE;
3086 - (IBAction)editFont:sender
3088 NSFontPanel *panel = [NSFontPanel sharedFontPanel];
3089 NSFont *termFont = default_font;
3092 for (i=0; i < ANGBAND_TERM_MAX; i++) {
3093 if ([(id)angband_term[i]->data isMainWindow]) {
3094 termFont = [(id)angband_term[i]->data selectionFont];
3099 [panel setPanelFont:termFont isMultiple:NO];
3100 [panel orderFront:self];
3103 - (void)changeFont:(id)sender
3106 for (mainTerm=0; mainTerm < ANGBAND_TERM_MAX; mainTerm++) {
3107 if ([(id)angband_term[mainTerm]->data isMainWindow]) {
3112 /* Bug #1709: Only change font for angband windows */
3113 if (mainTerm == ANGBAND_TERM_MAX) return;
3115 NSFont *oldFont = default_font;
3116 NSFont *newFont = [sender convertFont:oldFont];
3117 if (! newFont) return; /*paranoia */
3119 /* Store as the default font if we changed the first term */
3120 if (mainTerm == 0) {
3122 [default_font release];
3123 default_font = newFont;
3126 /* Record it in the preferences */
3127 NSUserDefaults *defs = [NSUserDefaults angbandDefaults];
3128 [defs setValue:[newFont fontName]
3129 forKey:[NSString stringWithFormat:@"FontName-%d", mainTerm]];
3130 [defs setFloat:[newFont pointSize]
3131 forKey:[NSString stringWithFormat:@"FontSize-%d", mainTerm]];
3134 NSDisableScreenUpdates();
3137 AngbandContext *angbandContext = angband_term[mainTerm]->data;
3138 [(id)angbandContext setSelectionFont:newFont adjustTerminal: YES];
3140 NSEnableScreenUpdates();
3143 - (IBAction)openGame:sender
3145 NSAutoreleasePool* pool = [[NSAutoreleasePool alloc] init];
3146 BOOL selectedSomething = NO;
3149 /* Get where we think the save files are */
3150 NSURL *startingDirectoryURL = [NSURL fileURLWithPath:[NSString stringWithCString:ANGBAND_DIR_SAVE encoding:NSASCIIStringEncoding] isDirectory:YES];
3152 /* Set up an open panel */
3153 NSOpenPanel* panel = [NSOpenPanel openPanel];
3154 [panel setCanChooseFiles:YES];
3155 [panel setCanChooseDirectories:NO];
3156 [panel setResolvesAliases:YES];
3157 [panel setAllowsMultipleSelection:NO];
3158 [panel setTreatsFilePackagesAsDirectories:YES];
3159 [panel setDirectoryURL:startingDirectoryURL];
3162 panelResult = [panel runModal];
3163 if (panelResult == NSOKButton)
3165 NSArray* fileURLs = [panel URLs];
3166 if ([fileURLs count] > 0 && [[fileURLs objectAtIndex:0] isFileURL])
3168 NSURL* savefileURL = (NSURL *)[fileURLs objectAtIndex:0];
3169 /* The path property doesn't do the right thing except for
3170 * URLs with the file scheme. We had getFileSystemRepresentation
3171 * here before, but that wasn't introduced until OS X 10.9. */
3172 selectedSomething = [[savefileURL path] getCString:savefile
3173 maxLength:sizeof savefile encoding:NSMacOSRomanStringEncoding];
3177 if (selectedSomething)
3179 /* Remember this so we can select it by default next time */
3180 record_current_savefile();
3182 /* Game is in progress */
3183 game_in_progress = TRUE;
3190 - (IBAction)saveGame:sender
3192 /* Hack -- Forget messages */
3196 do_cmd_save_game(FALSE);
3198 /* Record the current save file so we can select it by default next time.
3199 * It's a little sketchy that this only happens when we save through the
3200 * menu; ideally game-triggered saves would trigger it too. */
3201 record_current_savefile();
3204 - (BOOL)validateMenuItem:(NSMenuItem *)menuItem
3206 SEL sel = [menuItem action];
3207 NSInteger tag = [menuItem tag];
3209 if( tag >= AngbandWindowMenuItemTagBase && tag < AngbandWindowMenuItemTagBase + ANGBAND_TERM_MAX )
3211 if( tag == AngbandWindowMenuItemTagBase )
3213 /* The main window should always be available and visible */
3218 NSInteger subwindowNumber = tag - AngbandWindowMenuItemTagBase;
3219 return (window_flag[subwindowNumber] > 0);
3225 if (sel == @selector(newGame:))
3227 return ! game_in_progress;
3229 else if (sel == @selector(editFont:))
3233 else if (sel == @selector(openGame:))
3235 return ! game_in_progress;
3237 else if (sel == @selector(setRefreshRate:) && [superitem(menuItem) tag] == 150)
3239 NSInteger fps = [[NSUserDefaults standardUserDefaults] integerForKey:AngbandFrameRateDefaultsKey];
3240 [menuItem setState: ([menuItem tag] == fps)];
3243 else if( sel == @selector(setGraphicsMode:) )
3245 NSInteger requestedGraphicsMode = [[NSUserDefaults standardUserDefaults] integerForKey:AngbandGraphicsDefaultsKey];
3246 [menuItem setState: (tag == requestedGraphicsMode)];
3249 else if( sel == @selector(toggleSound:) )
3251 BOOL is_on = [[NSUserDefaults standardUserDefaults]
3252 boolForKey:AngbandSoundDefaultsKey];
3254 [menuItem setState: ((is_on) ? NSOnState : NSOffState)];
3257 else if( sel == @selector(sendAngbandCommand:) )
3259 /* we only want to be able to send commands during an active game */
3260 return !!game_in_progress;
3266 - (IBAction)setRefreshRate:(NSMenuItem *)menuItem
3268 frames_per_second = [menuItem tag];
3269 [[NSUserDefaults angbandDefaults] setInteger:frames_per_second forKey:AngbandFrameRateDefaultsKey];
3272 - (IBAction)selectWindow: (id)sender
3274 NSInteger subwindowNumber = [(NSMenuItem *)sender tag] - AngbandWindowMenuItemTagBase;
3275 AngbandContext *context = angband_term[subwindowNumber]->data;
3276 [context->primaryWindow makeKeyAndOrderFront: self];
3277 [context saveWindowVisibleToDefaults: YES];
3280 - (void)prepareWindowsMenu
3282 /* Get the window menu with default items and add a separator and item for
3283 * the main window */
3284 NSMenu *windowsMenu = [[NSApplication sharedApplication] windowsMenu];
3285 [windowsMenu addItem: [NSMenuItem separatorItem]];
3287 NSMenuItem *angbandItem = [[NSMenuItem alloc] initWithTitle: @"Hengband" action: @selector(selectWindow:) keyEquivalent: @"0"];
3288 [angbandItem setTarget: self];
3289 [angbandItem setTag: AngbandWindowMenuItemTagBase];
3290 [windowsMenu addItem: angbandItem];
3291 [angbandItem release];
3293 /* Add items for the additional term windows */
3294 for( NSInteger i = 1; i < ANGBAND_TERM_MAX; i++ )
3296 NSString *title = [NSString stringWithFormat: @"Term %ld", (long)i];
3297 NSString *keyEquivalent = [NSString stringWithFormat: @"%ld", (long)i];
3298 NSMenuItem *windowItem = [[NSMenuItem alloc] initWithTitle: title action: @selector(selectWindow:) keyEquivalent: keyEquivalent];
3299 [windowItem setTarget: self];
3300 [windowItem setTag: AngbandWindowMenuItemTagBase + i];
3301 [windowsMenu addItem: windowItem];
3302 [windowItem release];
3306 - (IBAction)setGraphicsMode:(NSMenuItem *)sender
3308 /* We stashed the graphics mode ID in the menu item's tag */
3309 graf_mode_req = [sender tag];
3311 /* Stash it in UserDefaults */
3312 [[NSUserDefaults angbandDefaults] setInteger:graf_mode_req forKey:AngbandGraphicsDefaultsKey];
3313 [[NSUserDefaults angbandDefaults] synchronize];
3315 if (game_in_progress)
3317 /* Hack -- Force redraw */
3320 /* Wake up the event loop so it notices the change */
3321 wakeup_event_loop();
3325 - (IBAction) toggleSound: (NSMenuItem *) sender
3327 BOOL is_on = (sender.state == NSOnState);
3329 /* Toggle the state and update the Angband global and preferences. */
3330 sender.state = (is_on) ? NSOffState : NSOnState;
3331 use_sound = (is_on) ? FALSE : TRUE;
3332 [[NSUserDefaults angbandDefaults] setBool:(! is_on)
3333 forKey:AngbandSoundDefaultsKey];
3337 * Send a command to Angband via a menu item. This places the appropriate key
3338 * down events into the queue so that it seems like the user pressed them
3339 * (instead of trying to use the term directly).
3341 - (void)sendAngbandCommand: (id)sender
3343 NSMenuItem *menuItem = (NSMenuItem *)sender;
3344 NSString *command = [self.commandMenuTagMap objectForKey: [NSNumber numberWithInteger: [menuItem tag]]];
3345 NSInteger windowNumber = [((AngbandContext *)angband_term[0]->data)->primaryWindow windowNumber];
3347 /* Send a \ to bypass keymaps */
3348 NSEvent *escape = [NSEvent keyEventWithType: NSKeyDown
3349 location: NSZeroPoint
3352 windowNumber: windowNumber
3355 charactersIgnoringModifiers: @"\\"
3358 [[NSApplication sharedApplication] postEvent: escape atStart: NO];
3360 /* Send the actual command (from the original command set) */
3361 NSEvent *keyDown = [NSEvent keyEventWithType: NSKeyDown
3362 location: NSZeroPoint
3365 windowNumber: windowNumber
3368 charactersIgnoringModifiers: command
3371 [[NSApplication sharedApplication] postEvent: keyDown atStart: NO];
3375 * Set up the command menu dynamically, based on CommandMenu.plist.
3377 - (void)prepareCommandMenu
3379 NSString *commandMenuPath = [[NSBundle mainBundle] pathForResource: @"CommandMenu" ofType: @"plist"];
3380 NSArray *commandMenuItems = [[NSArray alloc] initWithContentsOfFile: commandMenuPath];
3381 NSMutableDictionary *angbandCommands = [[NSMutableDictionary alloc] init];
3382 NSInteger tagOffset = 0;
3384 for( NSDictionary *item in commandMenuItems )
3386 BOOL useShiftModifier = [[item valueForKey: @"ShiftModifier"] boolValue];
3387 BOOL useOptionModifier = [[item valueForKey: @"OptionModifier"] boolValue];
3388 NSUInteger keyModifiers = NSCommandKeyMask;
3389 keyModifiers |= (useShiftModifier) ? NSShiftKeyMask : 0;
3390 keyModifiers |= (useOptionModifier) ? NSAlternateKeyMask : 0;
3392 NSString *title = [item valueForKey: @"Title"];
3393 NSString *key = [item valueForKey: @"KeyEquivalent"];
3394 NSMenuItem *menuItem = [[NSMenuItem alloc] initWithTitle: title action: @selector(sendAngbandCommand:) keyEquivalent: key];
3395 [menuItem setTarget: self];
3396 [menuItem setKeyEquivalentModifierMask: keyModifiers];
3397 [menuItem setTag: AngbandCommandMenuItemTagBase + tagOffset];
3398 [self.commandMenu addItem: menuItem];
3401 NSString *angbandCommand = [item valueForKey: @"AngbandCommand"];
3402 [angbandCommands setObject: angbandCommand forKey: [NSNumber numberWithInteger: [menuItem tag]]];
3406 [commandMenuItems release];
3408 NSDictionary *safeCommands = [[NSDictionary alloc] initWithDictionary: angbandCommands];
3409 self.commandMenuTagMap = safeCommands;
3410 [safeCommands release];
3411 [angbandCommands release];
3414 - (void)awakeFromNib
3416 [super awakeFromNib];
3418 [self prepareWindowsMenu];
3419 [self prepareCommandMenu];
3422 - (void)applicationDidFinishLaunching:sender
3424 [AngbandContext beginGame];
3426 /* Once beginGame finished, the game is over - that's how Angband works,
3427 * and we should quit */
3428 game_is_finished = TRUE;
3429 [NSApp terminate:self];
3432 - (NSApplicationTerminateReply)applicationShouldTerminate:(NSApplication *)sender
3434 if (p_ptr->playing == FALSE || game_is_finished == TRUE)
3436 return NSTerminateNow;
3438 else if (! inkey_flag)
3440 /* For compatibility with other ports, do not quit in this case */
3441 return NSTerminateCancel;
3446 /* player->upkeep->playing = FALSE; */
3448 /* Post an escape event so that we can return from our get-key-event
3450 wakeup_event_loop();
3451 quit_when_ready = true;
3452 /* Must return Cancel, not Later, because we need to get out of the
3453 * run loop and back to Angband's loop */
3454 return NSTerminateCancel;
3459 * Dynamically build the Graphics menu
3461 - (void)menuNeedsUpdate:(NSMenu *)menu {
3463 /* Only the graphics menu is dynamic */
3464 if (! [[menu title] isEqualToString:@"Graphics"])
3467 /* If it's non-empty, then we've already built it. Currently graphics modes
3468 * won't change once created; if they ever can we can remove this check.
3469 * Note that the check mark does change, but that's handled in
3470 * validateMenuItem: instead of menuNeedsUpdate: */
3471 if ([menu numberOfItems] > 0)
3474 /* This is the action for all these menu items */
3475 SEL action = @selector(setGraphicsMode:);
3477 /* Add an initial Classic ASCII menu item */
3478 NSMenuItem *classicItem = [menu addItemWithTitle:@"Classic ASCII" action:action keyEquivalent:@""];
3479 [classicItem setTag:GRAPHICS_NONE];
3481 /* Walk through the list of graphics modes */
3482 if (graphics_modes) {
3485 for (i=0; graphics_modes[i].pNext; i++)
3487 const graphics_mode *graf = &graphics_modes[i];
3489 if (graf->grafID == GRAPHICS_NONE) {
3492 /* Make the title. NSMenuItem throws on a nil title, so ensure it's
3495 [[NSString alloc] initWithUTF8String:graf->menuname];
3496 if (! title) title = [@"(Unknown)" copy];
3499 NSMenuItem *item = [menu addItemWithTitle:title action:action keyEquivalent:@""];
3500 [item setTag:graf->grafID];
3506 * Delegate method that gets called if we're asked to open a file.
3508 - (BOOL)application:(NSApplication *)sender openFiles:(NSArray *)filenames
3510 /* Can't open a file once we've started */
3511 if (game_in_progress) return NO;
3513 /* We can only open one file. Use the last one. */
3514 NSString *file = [filenames lastObject];
3515 if (! file) return NO;
3517 /* Put it in savefile */
3518 if (! [file getFileSystemRepresentation:savefile maxLength:sizeof savefile])
3521 game_in_progress = TRUE;
3523 /* Wake us up in case this arrives while we're sitting at the Welcome
3525 wakeup_event_loop();
3532 int main(int argc, char* argv[])
3534 NSApplicationMain(argc, (void*)argv);
3538 #endif /* MACINTOSH || MACH_O_COCOA */