src/MacVim/MacVim.m

   1 /* vi:set ts=8 sts=4 sw=4 ft=objc:
   2  *
   3  * VIM - Vi IMproved            by Bram Moolenaar
   4  *                              MacVim GUI port by Bjorn Winckler
   5  *
   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.
   9  */
  10 /*
  11  * MacVim.m:  Code shared between Vim and MacVim.
  12  */
  13
  14 #import "MacVim.h"
  15
  16 char *MessageStrings[] =
  17 {
  18     "INVALID MESSAGE ID",
  19     "OpenWindowMsgID",
  20     "InsertTextMsgID",
  21     "KeyDownMsgID",
  22     "CmdKeyMsgID",
  23     "BatchDrawMsgID",
  24     "SelectTabMsgID",
  25     "CloseTabMsgID",
  26     "AddNewTabMsgID",
  27     "DraggedTabMsgID",
  28     "UpdateTabBarMsgID",
  29     "ShowTabBarMsgID",
  30     "HideTabBarMsgID",
  31     "SetTextRowsMsgID",
  32     "SetTextColumsMsgID",
  33     "SetTextDimensionsMsgID",
  34     "SetWindowTitleMsgID",
  35     "ScrollWheelMsgID",
  36     "MouseDownMsgID",
  37     "MouseUpMsgID",
  38     "MouseDraggedMsgID",
  39     "FlushQueueMsgID",
  40     "AddMenuMsgID",
  41     "AddMenuItemMsgID",
  42     "RemoveMenuItemMsgID",
  43     "EnableMenuItemMsgID",
  44     "ExecuteMenuMsgID",
  45     "ShowToolbarMsgID",
  46     "ToggleToolbarMsgID",
  47     "CreateScrollbarMsgID",
  48     "DestroyScrollbarMsgID",
  49     "ShowScrollbarMsgID",
  50     "SetScrollbarPositionMsgID",
  51     "SetScrollbarThumbMsgID",
  52     "ScrollbarEventMsgID",
  53     "SetFontMsgID",
  54     "SetWideFontMsgID",
  55     "VimShouldCloseMsgID",
  56     "SetDefaultColorsMsgID",
  57     "ExecuteActionMsgID",
  58     "DropFilesMsgID",
  59     "DropStringMsgID",
  60     "ShowPopupMenuMsgID",
  61     "GotFocusMsgID",
  62     "LostFocusMsgID",
  63     "MouseMovedMsgID",
  64     "SetMouseShapeMsgID",
  65     "AdjustLinespaceMsgID",
  66     "ActivateMsgID",
  67     "SetServerNameMsgID",
  68     "EnterFullscreenMsgID",
  69     "LeaveFullscreenMsgID",
  70     "BuffersNotModifiedMsgID",
  71     "BuffersModifiedMsgID",
  72     "AddInputMsgID",
  73     "SetPreEditPositionMsgID",
  74     "TerminateNowMsgID",
  75     "XcodeModMsgID",
  76     "LiveResizeMsgID",
  77     "EnableAntialiasMsgID",
  78     "DisableAntialiasMsgID",
  79     "SetVimStateMsgID",
  80     "SetDocumentFilenameMsgID",
  81     "OpenWithArgumentsMsgID",
  82     "CloseWindowMsgID",
  83     "InterruptMsgID",
  84     "SetFullscreenColorMsgID",
  85     "ShowFindReplaceDialogMsgID",
  86     "FindReplaceMsgID",
  87 };
  88
  89
  90
  91
  92 // Argument used to stop MacVim from opening an empty window on startup
  93 // (techincally this is a user default but should not be used as such).
  94 NSString *MMNoWindowKey = @"MMNoWindow";
  95
  96 // Vim pasteboard type (holds motion type + string)
  97 NSString *VimPBoardType = @"VimPBoardType";
  98
  99
 100
 101
 102     ATSFontContainerRef
 103 loadFonts()
 104 {
 105     // This loads all fonts from the Resources folder.  The fonts are only
 106     // available to the process which loaded them, so loading has to be done
 107     // once for MacVim and an additional time for each Vim process.  The
 108     // returned container ref should be used to deactiave the font.
 109     //
 110     // (Code taken from cocoadev.com)
 111     ATSFontContainerRef fontContainerRef = 0;
 112     NSString *fontsFolder = [[NSBundle mainBundle] resourcePath];
 113     if (fontsFolder) {
 114         NSURL *fontsURL = [NSURL fileURLWithPath:fontsFolder];
 115         if (fontsURL) {
 116             FSRef fsRef;
 117             FSSpec fsSpec;
 118             CFURLGetFSRef((CFURLRef)fontsURL, &fsRef);
 119
 120             if (FSGetCatalogInfo(&fsRef, kFSCatInfoNone, NULL, NULL, &fsSpec,
 121                         NULL) == noErr) {
 122                 ATSFontActivateFromFileSpecification(&fsSpec,
 123                         kATSFontContextLocal, kATSFontFormatUnspecified, NULL,
 124                         kATSOptionFlagsDefault, &fontContainerRef);
 125             }
 126         }
 127     }
 128
 129     return fontContainerRef;
 130 }
 131
 132
 133
 134
 135 @implementation NSString (MMExtras)
 136
 137 - (NSString *)stringByEscapingSpecialFilenameCharacters
 138 {
 139     // NOTE: This code assumes that no characters already have been escaped.
 140     NSMutableString *string = [self mutableCopy];
 141
 142     [string replaceOccurrencesOfString:@"\\"
 143                             withString:@"\\\\"
 144                                options:NSLiteralSearch
 145                                  range:NSMakeRange(0, [string length])];
 146     [string replaceOccurrencesOfString:@" "
 147                             withString:@"\\ "
 148                                options:NSLiteralSearch
 149                                  range:NSMakeRange(0, [string length])];
 150     [string replaceOccurrencesOfString:@"\t"
 151                             withString:@"\\\t "
 152                                options:NSLiteralSearch
 153                                  range:NSMakeRange(0, [string length])];
 154     [string replaceOccurrencesOfString:@"%"
 155                             withString:@"\\%"
 156                                options:NSLiteralSearch
 157                                  range:NSMakeRange(0, [string length])];
 158     [string replaceOccurrencesOfString:@"#"
 159                             withString:@"\\#"
 160                                options:NSLiteralSearch
 161                                  range:NSMakeRange(0, [string length])];
 162     [string replaceOccurrencesOfString:@"|"
 163                             withString:@"\\|"
 164                                options:NSLiteralSearch
 165                                  range:NSMakeRange(0, [string length])];
 166     [string replaceOccurrencesOfString:@"\""
 167                             withString:@"\\\""
 168                                options:NSLiteralSearch
 169                                  range:NSMakeRange(0, [string length])];
 170
 171     return [string autorelease];
 172 }
 173
 174 @end // NSString (MMExtras)
 175
 176
 177
 178 @implementation NSColor (MMExtras)
 179
 180 + (NSColor *)colorWithRgbInt:(unsigned)rgb
 181 {
 182     float r = ((rgb>>16) & 0xff)/255.0f;
 183     float g = ((rgb>>8) & 0xff)/255.0f;
 184     float b = (rgb & 0xff)/255.0f;
 185
 186     return [NSColor colorWithCalibratedRed:r green:g blue:b alpha:1.0f];
 187 }
 188
 189 + (NSColor *)colorWithArgbInt:(unsigned)argb
 190 {
 191     float a = ((argb>>24) & 0xff)/255.0f;
 192     float r = ((argb>>16) & 0xff)/255.0f;
 193     float g = ((argb>>8) & 0xff)/255.0f;
 194     float b = (argb & 0xff)/255.0f;
 195
 196     return [NSColor colorWithCalibratedRed:r green:g blue:b alpha:a];
 197 }
 198
 199 @end // NSColor (MMExtras)
 200
 201
 202
 203
 204 @implementation NSDictionary (MMExtras)
 205
 206 + (id)dictionaryWithData:(NSData *)data
 207 {
 208     id plist = [NSPropertyListSerialization
 209             propertyListFromData:data
 210                 mutabilityOption:NSPropertyListImmutable
 211                           format:NULL
 212                 errorDescription:NULL];
 213
 214     return [plist isKindOfClass:[NSDictionary class]] ? plist : nil;
 215 }
 216
 217 - (NSData *)dictionaryAsData
 218 {
 219     return [NSPropertyListSerialization dataFromPropertyList:self
 220             format:NSPropertyListBinaryFormat_v1_0 errorDescription:NULL];
 221 }
 222
 223 @end
 224
 225
 226
 227
 228 @implementation NSMutableDictionary (MMExtras)
 229
 230 + (id)dictionaryWithData:(NSData *)data
 231 {
 232     id plist = [NSPropertyListSerialization
 233             propertyListFromData:data
 234                 mutabilityOption:NSPropertyListMutableContainers
 235                           format:NULL
 236                 errorDescription:NULL];
 237
 238     return [plist isKindOfClass:[NSMutableDictionary class]] ? plist : nil;
 239 }
 240
 241 @end