1 /* vi:set ts=8 sts=4 sw=4 ft=objc:
3 * VIM - Vi IMproved by Bram Moolenaar
4 * MacVim GUI port by Bjorn Winckler
6 * Do ":help uganda" in Vim to read copying and usage conditions.
7 * Do ":help credits" in Vim to see a list of people who contributed.
8 * See README.txt for an overview of the Vim source code.
11 #import <Foundation/Foundation.h>
17 static BOOL gui_cocoa_is_valid_action(NSString *action);
20 // -- Initialization --------------------------------------------------------
23 * Parse the GUI related command-line arguments. Any arguments used are
24 * deleted from argv, and *argc is decremented accordingly. This is called
25 * when vim is started, whether or not the GUI has been started.
28 gui_mch_prepare(int *argc, char **argv)
30 //NSLog(@"gui_mch_prepare(argc=%d)", *argc);
32 // Set environment variables $VIM and $VIMRUNTIME
33 // NOTE! If vim_getenv is called with one of these as parameters before
34 // they have been set here, they will most likely end up with the wrong
38 // - ensure this is called first to avoid above problem
41 NSString *path = [[[NSBundle mainBundle] resourcePath]
42 stringByAppendingPathComponent:@"vim"];
43 vim_setenv((char_u*)"VIM", (char_u*)[path UTF8String]);
45 path = [path stringByAppendingPathComponent:@"runtime"];
46 vim_setenv((char_u*)"VIMRUNTIME", (char_u*)[path UTF8String]);
51 * Check if the GUI can be started. Called before gvimrc is sourced.
55 gui_mch_init_check(void)
57 //NSLog(@"gui_mch_init_check()");
63 * Initialise the GUI. Create all the windows, set up all the call-backs etc.
64 * Returns OK for success, FAIL when the GUI can't be started.
69 //NSLog(@"gui_mch_init()");
71 if (![[MMBackend sharedInstance] checkin])
74 // HACK! Force the 'termencoding to utf-8. For the moment also force
75 // 'encoding', although this will change in the future. The user can still
76 // change 'encoding'; doing so WILL crash the program.
77 set_option_value((char_u *)"termencoding", 0L, (char_u *)"utf-8", 0);
78 set_option_value((char_u *)"encoding", 0L, (char_u *)"utf-8", 0);
80 // Set values so that pixels and characters are in one-to-one
81 // correspondence (assuming all characters have the same dimensions).
82 gui.scrollbar_width = gui.scrollbar_height = 0;
90 [[MMBackend sharedInstance]
91 setDefaultColorsBackground:gui.back_pixel foreground:gui.norm_pixel];
92 [[MMBackend sharedInstance] setBackgroundColor:gui.back_pixel];
93 [[MMBackend sharedInstance] setForegroundColor:gui.norm_pixel];
95 // NOTE: If this call is left out the cursor is opaque.
96 highlight_gui_started();
106 //NSLog(@"gui_mch_exit(rc=%d)", rc);
108 [[MMBackend sharedInstance] exit];
113 * Open the GUI window which was created by a call to gui_mch_init().
118 //NSLog(@"gui_mch_open()");
120 return [[MMBackend sharedInstance] openVimWindow];
124 // -- Updating --------------------------------------------------------------
128 * Catch up with any queued X events. This may put keyboard input into the
129 * input buffer, call resize call-backs, trigger timers etc. If there is
130 * nothing in the X event queue (& no timers pending), then we return
136 // TODO: Ensure that this causes no problems.
137 [[NSRunLoop currentRunLoop] runMode:NSDefaultRunLoopMode
138 beforeDate:[NSDate distantPast]];
142 /* Flush any output to the screen */
146 [[MMBackend sharedInstance] flushQueue:NO];
151 * GUI input routine called by gui_wait_for_chars(). Waits for a character
153 * wtime == -1 Wait forever.
154 * wtime == 0 This should never happen.
155 * wtime > 0 Wait wtime milliseconds for a character.
156 * Returns OK if a character was found to be available within the given time,
160 gui_mch_wait_for_chars(int wtime)
162 // NOTE! In all likelihood Vim will take a nap when waitForInput: is
163 // called, so force a flush of the command queue here.
164 [[MMBackend sharedInstance] flushQueue:YES];
166 return [[MMBackend sharedInstance] waitForInput:wtime];
170 // -- Drawing ---------------------------------------------------------------
174 * Clear the whole text window.
177 gui_mch_clear_all(void)
179 [[MMBackend sharedInstance] clearAll];
184 * Clear a rectangular region of the screen from text pos (row1, col1) to
185 * (row2, col2) inclusive.
188 gui_mch_clear_block(int row1, int col1, int row2, int col2)
190 [[MMBackend sharedInstance] clearBlockFromRow:row1 column:col1
191 toRow:row2 column:col2];
196 * Delete the given number of lines from the given row, scrolling up any
197 * text further down within the scroll region.
200 gui_mch_delete_lines(int row, int num_lines)
202 [[MMBackend sharedInstance] deleteLinesFromRow:row count:num_lines
203 scrollBottom:gui.scroll_region_bot
204 left:gui.scroll_region_left
205 right:gui.scroll_region_right];
210 gui_mch_draw_string(int row, int col, char_u *s, int len, int flags)
212 [[MMBackend sharedInstance] replaceString:(char*)s length:len
213 row:row column:col flags:flags];
218 gui_macvim_draw_string(int row, int col, char_u *s, int len, int flags)
221 NSString *string = [[NSString alloc]
222 initWithBytesNoCopy:(void*)s
224 encoding:NSUTF8StringEncoding
226 int cells = [string length];
229 NSLog(@"gui_macvim_draw_string(row=%d, col=%d, len=%d, cells=%d, flags=%d)",
230 row, col, len, cells, flags);
232 [[MMBackend sharedInstance] replaceString:(char*)s length:len
233 row:row column:col flags:flags];
245 MMBackend *backend = [MMBackend sharedInstance];
247 for (i = 0; i < len; i += cl) {
248 c = utf_ptr2char(s + i);
249 cl = utf_ptr2len(s + i);
250 cn = utf_char2cells(c);
251 comping = utf_iscomposing(c);
256 if (cn > 1 && !wide) {
257 // Start of wide characters.
260 // Output non-wide characters.
262 NSLog(@"Outputting %d non-wide chars (%d bytes)",
263 endcol-startcol, start-i);
264 [backend replaceString:(char*)(s+start) length:start-i
265 row:row column:startcol flags:flags];
269 } else if (cn <= 1 && !comping && wide) {
270 // End of wide characters.
273 // Output wide characters.
275 NSLog(@"Outputting %d wide chars (%d bytes)",
276 endcol-startcol, start-i);
277 [backend replaceString:(char*)(s+start) length:start-i
278 row:row column:startcol flags:(flags|0x80)];
285 // Output remaining characters.
286 flags = wide ? flags|0x80 : flags;
287 NSLog(@"Outputting %d %s chars (%d bytes)", endcol-startcol, wide ? "wide"
288 : "non-wide", len-start);
289 [backend replaceString:(char*)(s+start) length:len-start
290 row:row column:startcol flags:flags];
295 // Output chars until a wide char found. If a wide char is found, output a
296 // zero-width space after it so that a wide char looks like two chars to
297 // MMTextStorage. This way 1 char corresponds to 1 column.
308 MMBackend *backend = [MMBackend sharedInstance];
309 static char ZeroWidthSpace[] = { 0xe2, 0x80, 0x8b };
311 char_u *conv_str = NULL;
313 if (output_conv.vc_type != CONV_NONE) {
314 char_u *conv_str = string_convert(&output_conv, s, &len);
320 for (i = 0; i < len; i += cl) {
321 c = utf_ptr2char(s + i);
322 cl = utf_ptr2len(s + i);
323 cn = utf_char2cells(c);
325 if (!utf_iscomposing(c)) {
329 NSString *string = [[NSString alloc]
330 initWithBytesNoCopy:(void*)(s+start)
332 encoding:NSUTF8StringEncoding
334 NSLog(@"Flushing string=%@ len=%d row=%d col=%d end=%d",
335 string, i-start, row, startcol, endcol);
338 [backend replaceString:(char*)(s+start) length:i-start
339 row:row column:startcol flags:flags];
343 NSLog(@"Padding len=%d row=%d col=%d", sizeof(ZeroWidthSpace),
346 [backend replaceString:ZeroWidthSpace
347 length:sizeof(ZeroWidthSpace)
348 row:row column:endcol-1 flags:flags];
356 NSLog(@"Wide char detected! (char=%C hex=%x cells=%d)", c, c, cn);
364 NSString *string = [[NSString alloc]
365 initWithBytesNoCopy:(void*)(s+start)
367 encoding:NSUTF8StringEncoding
369 NSLog(@"Output string=%@ len=%d row=%d col=%d", string, len-start, row,
375 // Output remaining characters.
376 [backend replaceString:(char*)(s+start) length:len-start
377 row:row column:startcol flags:flags];
381 NSLog(@"Padding len=%d row=%d col=%d", sizeof(ZeroWidthSpace), row,
384 [backend replaceString:ZeroWidthSpace
385 length:sizeof(ZeroWidthSpace)
386 row:row column:endcol-1 flags:flags];
396 // This will fail abysmally when wide or composing characters are used.
397 [[MMBackend sharedInstance]
398 replaceString:(char*)s length:len row:row column:col flags:flags];
400 int i, c, cl, cn, cells = 0;
401 for (i = 0; i < len; i += cl) {
402 c = utf_ptr2char(s + i);
403 cl = utf_ptr2len(s + i);
404 cn = utf_char2cells(c);
406 if (!utf_iscomposing(c))
416 * Insert the given number of lines before the given row, scrolling down any
417 * following text within the scroll region.
420 gui_mch_insert_lines(int row, int num_lines)
422 [[MMBackend sharedInstance] insertLinesFromRow:row count:num_lines
423 scrollBottom:gui.scroll_region_bot
424 left:gui.scroll_region_left
425 right:gui.scroll_region_right];
429 // -- Tab line --------------------------------------------------------------
433 * Set the current tab to "nr". First tab is 1.
436 gui_mch_set_curtab(int nr)
438 //NSLog(@"gui_mch_set_curtab(nr=%d)", nr);
439 [[MMBackend sharedInstance] selectTab:nr];
444 * Return TRUE when tabline is displayed.
447 gui_mch_showing_tabline(void)
449 //NSLog(@"gui_mch_showing_tabline()");
450 return [[MMBackend sharedInstance] tabBarVisible];
454 * Update the labels of the tabline.
457 gui_mch_update_tabline(void)
459 //NSLog(@"gui_mch_update_tabline()");
460 [[MMBackend sharedInstance] updateTabBar];
464 * Show or hide the tabline.
467 gui_mch_show_tabline(int showit)
469 //NSLog(@"gui_mch_show_tabline(showit=%d)", showit);
470 [[MMBackend sharedInstance] showTabBar:showit];
474 // -- Clipboard -------------------------------------------------------------
478 clip_mch_lose_selection(VimClipboard *cbd)
484 clip_mch_own_selection(VimClipboard *cbd)
491 clip_mch_request_selection(VimClipboard *cbd)
493 NSPasteboard *pb = [NSPasteboard generalPasteboard];
494 NSString *pbType = [pb availableTypeFromArray:
495 [NSArray arrayWithObject:NSStringPboardType]];
497 NSMutableString *string =
498 [[pb stringForType:NSStringPboardType] mutableCopy];
500 // Replace unrecognized end-of-line sequences with \x0a (line feed).
501 NSRange range = { 0, [string length] };
502 unsigned n = [string replaceOccurrencesOfString:@"\x0d\x0a"
503 withString:@"\x0a" options:0
506 n = [string replaceOccurrencesOfString:@"\x0d" withString:@"\x0a"
507 options:0 range:range];
510 // Scan for newline character to decide whether the string should be
511 // pasted linewise or characterwise.
513 if (0 < n || NSNotFound != [string rangeOfString:@"\n"].location)
516 char_u *str = (char_u*)[string UTF8String];
517 int len = [string lengthOfBytesUsingEncoding:NSUTF8StringEncoding];
520 if (input_conv.vc_type != CONV_NONE) {
521 NSLog(@"Converting from: '%@'", string);
522 char_u *conv_str = string_convert(&input_conv, str, &len);
524 NSLog(@" to: '%s'", conv_str);
525 clip_yank_selection(type, conv_str, len, cbd);
532 clip_yank_selection(type, str, len, cbd);
538 * Send the current selection to the clipboard.
541 clip_mch_set_selection(VimClipboard *cbd)
543 // If the '*' register isn't already filled in, fill it in now.
545 clip_get_selection(cbd);
548 // Get the text to put on the pasteboard.
549 long_u llen = 0; char_u *str = 0;
550 int type = clip_convert_selection(&str, &llen, cbd);
554 // TODO: Avoid overflow.
557 if (output_conv.vc_type != CONV_NONE) {
558 char_u *conv_str = string_convert(&output_conv, str, &len);
567 NSString *string = [[NSString alloc]
568 initWithBytes:str length:len encoding:NSUTF8StringEncoding];
570 NSPasteboard *pb = [NSPasteboard generalPasteboard];
571 [pb declareTypes:[NSArray arrayWithObject:NSStringPboardType]
573 [pb setString:string forType:NSStringPboardType];
582 // -- Menu ------------------------------------------------------------------
586 * Add a sub menu to the menu bar.
589 gui_mch_add_menu(vimmenu_T *menu, int idx)
591 //NSLog(@"gui_mch_add_menu(name=%s, idx=%d)", menu->name, idx);
593 // HACK! If menu has no parent, then we set the parent tag to the type of
594 // menu it is. This will not mix up tag and type because pointers can not
595 // take values close to zero (and the tag is simply the value of the
597 int parent = (int)menu->parent;
599 parent = menu_is_popup(menu->name) ? MenuPopupType :
600 menu_is_toolbar(menu->name) ? MenuToolbarType :
604 [[MMBackend sharedInstance]
605 addMenuWithTag:(int)menu parent:parent name:(char*)menu->dname
611 * Add a menu item to a menu
614 gui_mch_add_menu_item(vimmenu_T *menu, int idx)
616 //NSLog(@"gui_mch_add_menu_item(name=%s, accel=%s idx=%d)", menu->dname,
617 // menu->actext, idx);
619 // NOTE! If 'iconfile' is not set but 'iconidx' is, use the name of the
620 // menu item. (Should correspond to a stock item.)
621 char *icon = menu->iconfile ? (char*)menu->iconfile :
622 menu->iconidx >= 0 ? (char*)menu->dname :
624 //char *name = menu_is_separator(menu->name) ? NULL : (char*)menu->dname;
625 char *name = (char*)menu->dname;
626 char *tip = menu->strings[MENU_INDEX_TIP]
627 ? (char*)menu->strings[MENU_INDEX_TIP] : (char*)menu->actext;
629 // HACK! Check if menu is mapped to ':action actionName:'; if so, pass the
630 // action along so that MacVim can bind the menu item to this action. This
631 // means that if a menu item maps to an action in normal mode, then all
632 // other modes will also use the same action.
633 NSString *action = nil;
634 char_u *map_str = menu->strings[MENU_INDEX_NORMAL];
636 NSString *mapping = [NSString stringWithCString:(char*)map_str
637 encoding:NSUTF8StringEncoding];
638 NSArray *parts = [mapping componentsSeparatedByString:@" "];
639 if ([parts count] >=2
640 && [[parts objectAtIndex:0] isEqual:@":action"]) {
641 action = [parts objectAtIndex:1];
642 action = [action stringByTrimmingCharactersInSet:
643 [NSCharacterSet whitespaceAndNewlineCharacterSet]];
644 if (!gui_cocoa_is_valid_action(action))
649 [[MMBackend sharedInstance]
650 addMenuItemWithTag:(int)menu
651 parent:(int)menu->parent
655 keyEquivalent:menu->ke_key
656 modifiers:menu->ke_mods
663 * Destroy the machine specific menu widget.
666 gui_mch_destroy_menu(vimmenu_T *menu)
668 //NSLog(@"gui_mch_destroy_menu(name=%s)", menu->name);
670 [[MMBackend sharedInstance] removeMenuItemWithTag:(int)menu];
675 * Make a menu either grey or not grey.
678 gui_mch_menu_grey(vimmenu_T *menu, int grey)
680 //NSLog(@"gui_mch_menu_grey(name=%s, grey=%d)", menu->name, grey);
681 [[MMBackend sharedInstance]
682 enableMenuItemWithTag:(int)menu state:!grey];
687 * Make menu item hidden or not hidden
690 gui_mch_menu_hidden(vimmenu_T *menu, int hidden)
692 //NSLog(@"gui_mch_menu_hidden(name=%s, hidden=%d)", menu->name, hidden);
694 // HACK! There is no (obvious) way to hide a menu item, so simply
695 // enable/disable it instead.
696 [[MMBackend sharedInstance]
697 enableMenuItemWithTag:(int)menu state:!hidden];
702 * This is called when user right clicks.
705 gui_mch_show_popupmenu(vimmenu_T *menu)
707 //NSLog(@"gui_mch_show_popupmenu(name=%s)", menu->name);
709 [[MMBackend sharedInstance] showPopupMenuWithName:(char*)menu->name
710 atMouseLocation:YES];
715 * This is called when a :popup command is executed.
718 gui_make_popup(char_u *path_name, int mouse_pos)
720 // TODO: Unless mouse_pos set, popup at cursor location.
721 [[MMBackend sharedInstance] showPopupMenuWithName:(char*)path_name
722 atMouseLocation:mouse_pos];
727 * This is called after setting all the menus to grey/hidden or not.
730 gui_mch_draw_menubar(void)
732 // The (main) menu draws itself in Mac OS X.
737 gui_mch_enable_menu(int flag)
739 // The (main) menu is always enabled in Mac OS X.
745 gui_mch_set_menu_pos(int x, int y, int w, int h)
747 // The (main) menu cannot be moved in Mac OS X.
753 gui_mch_show_toolbar(int showit)
756 if (toolbar_flags & TOOLBAR_TEXT) flags |= ToolbarLabelFlag;
757 if (toolbar_flags & TOOLBAR_ICONS) flags |= ToolbarIconFlag;
758 if (tbis_flags & (TBIS_MEDIUM|TBIS_LARGE)) flags |= ToolbarSizeRegularFlag;
760 //NSLog(@"gui_mch_show_toolbar(showit=%d, flags=%d)", showit, flags);
762 [[MMBackend sharedInstance] showToolbar:showit flags:flags];
768 // -- Fonts -----------------------------------------------------------------
772 * If a font is not going to be used, free its structure.
775 gui_mch_free_font(font)
782 * Get a font structure for highlighting.
785 gui_mch_get_font(char_u *name, int giveErrorIfMissing)
787 //NSLog(@"gui_mch_get_font(name=%s, giveErrorIfMissing=%d)", name,
788 // giveErrorIfMissing);
793 #if defined(FEAT_EVAL) || defined(PROTO)
795 * Return the name of font "font" in allocated memory.
796 * Don't know how to get the actual name, thus use the provided name.
799 gui_mch_get_fontname(GuiFont font, char_u *name)
801 //NSLog(@"gui_mch_get_fontname(font=%d, name=%s)", font, name);
808 * Initialise vim to use the font with the given name. Return FAIL if the font
809 * could not be loaded, OK otherwise.
812 gui_mch_init_font(char_u *font_name, int fontset)
814 //NSLog(@"gui_mch_init_font(font_name=%s, fontset=%d)", font_name, fontset);
816 // HACK! This gets called whenever the user types :set gfn=fontname, so
817 // for now we set the font here.
818 // TODO! Proper font handling, the way Vim expects it.
819 return [[MMBackend sharedInstance]
820 setFontWithName:(char*)font_name];
825 * Set the current text font.
828 gui_mch_set_font(GuiFont font)
835 // -- Scrollbars ------------------------------------------------------------
839 gui_mch_create_scrollbar(
841 int orient) /* SBAR_VERT or SBAR_HORIZ */
843 //NSLog(@"gui_mch_create_scrollbar(id=%d, orient=%d, type=%d)",
844 // sb->ident, orient, sb->type);
846 [[MMBackend sharedInstance]
847 createScrollbarWithIdentifier:sb->ident type:sb->type];
852 gui_mch_destroy_scrollbar(scrollbar_T *sb)
854 //NSLog(@"gui_mch_destroy_scrollbar(id=%d)", sb->ident);
856 [[MMBackend sharedInstance]
857 destroyScrollbarWithIdentifier:sb->ident];
862 gui_mch_enable_scrollbar(
866 //NSLog(@"gui_mch_enable_scrollbar(id=%d, flag=%d)", sb->ident, flag);
868 [[MMBackend sharedInstance]
869 showScrollbarWithIdentifier:sb->ident state:flag];
874 gui_mch_set_scrollbar_pos(
881 //NSLog(@"gui_mch_set_scrollbar_pos(id=%d, x=%d, y=%d, w=%d, h=%d)",
882 // sb->ident, x, y, w, h);
886 if (SBAR_BOTTOM == sb->type) {
891 [[MMBackend sharedInstance]
892 setScrollbarPosition:pos length:len identifier:sb->ident];
897 gui_mch_set_scrollbar_thumb(
903 //NSLog(@"gui_mch_set_scrollbar_thumb(id=%d, val=%d, size=%d, max=%d)",
904 // sb->ident, val, size, max);
906 [[MMBackend sharedInstance]
907 setScrollbarThumbValue:val size:size max:max identifier:sb->ident];
914 // -- Unsorted --------------------------------------------------------------
922 EMSG(_("E???: Command only available in GUI mode"));
926 NSString *name = [NSString stringWithCString:(char*)eap->arg
927 encoding:NSUTF8StringEncoding];
928 if (gui_cocoa_is_valid_action(name)) {
929 [[MMBackend sharedInstance] executeActionWithName:name];
931 EMSG2(_("E???: \"%s\" is not a valid action"), eap->arg);
937 * Adjust gui.char_height (after 'linespace' was changed).
940 gui_mch_adjust_charheight(void)
955 * Pop open a file browser and return the file selected, in allocated memory,
956 * or NULL if Cancel is hit.
957 * saving - TRUE if the file will be saved to, FALSE if it will be opened.
958 * title - Title message for the file browser dialog.
959 * dflt - Default name of file.
960 * ext - Default extension to be added to files without extensions.
961 * initdir - directory in which to open the browser (NULL = current dir)
962 * filter - Filter for matched files to choose from.
963 * Has a format like this:
964 * "C Files (*.c)\0*.c\0"
965 * "All Files\0*.*\0\0"
966 * If these two strings were concatenated, then a choice of two file
967 * filters will be selectable to the user. Then only matching files will
968 * be shown in the browser. If NULL, the default allows all files.
970 * *NOTE* - the filter string must be terminated with TWO nulls.
981 //NSLog(@"gui_mch_browse(saving=%d, title=%s, dflt=%s, ext=%s, initdir=%s,"
982 // " filter=%s", saving, title, dflt, ext, initdir, filter);
984 char_u *s = (char_u*)[[MMBackend sharedInstance]
985 browseForFileInDirectory:(char*)initdir title:(char*)title
990 #endif /* FEAT_BROWSE */
1003 //NSLog(@"gui_mch_dialog(type=%d title=%s message=%s buttons=%s "
1004 // "dfltbutton=%d textfield=%s)", type, title, message, buttons,
1005 // dfltbutton, textfield);
1007 return [[MMBackend sharedInstance] presentDialogWithType:type
1009 message:(char*)message
1010 buttons:(char*)buttons
1011 textField:(char*)textfield];
1016 * Draw a cursor without focus.
1019 gui_mch_draw_hollow_cursor(guicolor_T color)
1025 * Draw part of a cursor, only w pixels wide, and h pixels high.
1028 gui_mch_draw_part_cursor(int w, int h, guicolor_T color)
1034 gui_mch_flash(int msec)
1040 * Return the Pixel value (color) for the given color name. This routine was
1041 * pretty much taken from example code in the Silicon Graphics OSF/Motif
1042 * Programmer's Guide.
1043 * Return INVALCOLOR when failed.
1046 gui_mch_get_color(char_u *name)
1048 NSString *key = [NSString stringWithUTF8String:(char*)name];
1049 return [[MMBackend sharedInstance] lookupColorWithKey:key];
1054 * Return the RGB value of a pixel as long.
1057 gui_mch_get_rgb(guicolor_T pixel)
1059 // This is only implemented so that vim can guess the correct value for
1060 // 'background' (which otherwise defaults to 'dark'); it is not used for
1061 // anything else (as far as I know).
1062 // The implementation is simple since colors are stored in an int as
1069 * Get the screen dimensions.
1070 * Allow 10 pixels for horizontal borders, 40 for vertical borders.
1071 * Is there no way to find out how wide the borders really are?
1072 * TODO: Add live udate of those value on suspend/resume.
1075 gui_mch_get_screen_dimensions(int *screen_w, int *screen_h)
1077 //NSLog(@"gui_mch_get_screen_dimensions()");
1078 *screen_w = Columns;
1084 * Get the position of the top left corner of the window.
1087 gui_mch_get_winpos(int *x, int *y)
1095 * Get current mouse coordinates in text window.
1098 gui_mch_getmouse(int *x, int *y)
1104 * Return OK if the key with the termcap name "name" is supported.
1107 gui_mch_haskey(char_u *name)
1109 NSLog(@"gui_mch_haskey(name=%s)", name);
1115 * Iconify the GUI window.
1118 gui_mch_iconify(void)
1124 * Invert a rectangle from row r, column c, for nr rows and nc columns.
1127 gui_mch_invert_rectangle(int r, int c, int nr, int nc)
1133 * Called when the foreground or background color has been changed.
1136 gui_mch_new_colors(void)
1138 gui.def_back_pixel = gui.back_pixel;
1139 gui.def_norm_pixel = gui.norm_pixel;
1141 //NSLog(@"gui_mch_new_colors(back=%x, norm=%x)", gui.def_back_pixel,
1142 // gui.def_norm_pixel);
1144 [[MMBackend sharedInstance]
1145 setDefaultColorsBackground:gui.def_back_pixel
1146 foreground:gui.def_norm_pixel];
1151 gui_mch_def_colors()
1153 // Default foreground and background colors are black and white.
1154 gui.def_norm_pixel = gui.norm_pixel = 0;
1155 gui.def_back_pixel = gui.back_pixel = 0xffffff;
1160 * Set the current text background color.
1163 gui_mch_set_bg_color(guicolor_T color)
1165 [[MMBackend sharedInstance] setBackgroundColor:color];
1170 * Cursor blink functions.
1172 * This is a simple state machine:
1173 * BLINK_NONE not blinking at all
1174 * BLINK_OFF blinking, cursor is not shown
1175 * BLINK_ON blinking, cursor is shown
1178 gui_mch_set_blinking(long wait, long on, long off)
1184 * Set the current text foreground color.
1187 gui_mch_set_fg_color(guicolor_T color)
1189 [[MMBackend sharedInstance] setForegroundColor:color];
1193 #if defined(FEAT_EVAL) || defined(PROTO)
1195 * Bring the Vim window to the foreground.
1198 gui_mch_set_foreground(void)
1206 gui_mch_set_shellsize(
1215 //NSLog(@"gui_mch_set_shellsize(width=%d, height=%d, min_width=%d,"
1216 // " min_height=%d, base_width=%d, base_height=%d, direction=%d)",
1217 // width, height, min_width, min_height, base_width, base_height,
1219 [[MMBackend sharedInstance] setRows:height columns:width];
1224 * Set the current text special color.
1227 gui_mch_set_sp_color(guicolor_T color)
1229 [[MMBackend sharedInstance] setSpecialColor:color];
1234 gui_mch_set_text_area_pos(int x, int y, int w, int h)
1239 * Set the position of the top left corner of the window to the given
1243 gui_mch_set_winpos(int x, int y)
1249 gui_mch_setmouse(int x, int y)
1256 * Set the window title and icon.
1257 * (The icon is not taken care of).
1260 gui_mch_settitle(char_u *title, char_u *icon)
1262 //NSLog(@"gui_mch_settitle(title=%s, icon=%s)", title, icon);
1264 [[MMBackend sharedInstance] setVimWindowTitle:(char*)title];
1270 * Start the cursor blinking. If it was already blinking, this restarts the
1271 * waiting time and shows the cursor.
1274 gui_mch_start_blink(void)
1280 * Stop the cursor blinking. Show the cursor if it wasn't shown.
1283 gui_mch_stop_blink(void)
1289 gui_mch_toggle_tearoffs(int enable)
1295 mch_set_mouse_shape(int shape)
1301 gui_cocoa_is_valid_action(NSString *action)
1303 static NSDictionary *actionDict = nil;
1306 NSBundle *mainBundle = [NSBundle mainBundle];
1307 NSString *path = [mainBundle pathForResource:@"Actions"
1310 actionDict = [[NSDictionary alloc] initWithContentsOfFile:path];
1312 // Allocate bogus dictionary so that error only pops up once.
1313 actionDict = [NSDictionary new];
1314 EMSG(_("E???: Failed to load action dictionary"));
1318 return [actionDict objectForKey:action] != nil;