src/MacVim/MMVimView.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 #import "MMVimView.h"
  12
  13 #import <PSMTabBarControl.h>
  14 #import "MacVim.h"
  15 #import "MMTextView.h"
  16 #import "MMTextStorage.h"
  17 #import "MMTypesetter.h"
  18 #import "MMVimController.h"
  19
  20 #import "MMWindowController.h"  // needed by MMScroller. TODO: remove
  21
  22 // Scroller type; these must match SBAR_* in gui.h
  23 enum {
  24     MMScrollerTypeLeft = 0,
  25     MMScrollerTypeRight,
  26     MMScrollerTypeBottom
  27 };
  28
  29 // TODO:  Move!
  30 @interface NSTabView (MMExtras)
  31 - (void)removeAllTabViewItems;
  32 @end
  33
  34
  35 @interface MMVimView (Private)
  36 - (BOOL)bottomScrollbarVisible;
  37 - (BOOL)leftScrollbarVisible;
  38 - (BOOL)rightScrollbarVisible;
  39 - (void)placeScrollbars;
  40 @end
  41
  42
  43 @implementation MMVimView
  44
  45 - (MMVimView *)initWithFrame:(NSRect)frame
  46                vimController:(MMVimController *)controller {
  47     if (![super initWithFrame:frame])
  48         return nil;
  49
  50     vimController = controller;
  51     scrollbars = [[NSMutableArray alloc] init];
  52
  53     // Set up a complete text system.
  54     textStorage = [[MMTextStorage alloc] init];
  55     NSLayoutManager *lm = [[NSLayoutManager alloc] init];
  56     NSTextContainer *tc = [[NSTextContainer alloc] initWithContainerSize:
  57                     NSMakeSize(1.0e7,1.0e7)];
  58
  59     NSString *typesetterString = [[NSUserDefaults standardUserDefaults]
  60             stringForKey:MMTypesetterKey];
  61     if (![typesetterString isEqual:@"NSTypesetter"]) {
  62         MMTypesetter *typesetter = [[MMTypesetter alloc] init];
  63         [lm setTypesetter:typesetter];
  64         [typesetter release];
  65     } else {
  66         // Only MMTypesetter supports different cell width multipliers.
  67         [[NSUserDefaults standardUserDefaults]
  68                 setFloat:1.0 forKey:MMCellWidthMultiplierKey];
  69     }
  70
  71     [tc setWidthTracksTextView:NO];
  72     [tc setHeightTracksTextView:NO];
  73     [tc setLineFragmentPadding:0];
  74
  75     [textStorage addLayoutManager:lm];
  76     [lm addTextContainer:tc];
  77
  78     textView = [[MMTextView alloc] initWithFrame:frame
  79                                    textContainer:tc];
  80
  81     NSUserDefaults *ud = [NSUserDefaults standardUserDefaults];
  82     int left = [ud integerForKey:MMTextInsetLeftKey];
  83     int top = [ud integerForKey:MMTextInsetTopKey];
  84     [textView setTextContainerInset:NSMakeSize(left, top)];
  85
  86     [self addSubview:textView];
  87
  88     // The text storage retains the layout manager which in turn retains
  89     // the text container.
  90     [tc release];
  91     [lm release];
  92
  93     // Create the tab view (which is never visible, but the tab bar control
  94     // needs it to function).
  95     tabView = [[NSTabView alloc] initWithFrame:NSZeroRect];
  96
  97     // Create the tab bar control (which is responsible for actually
  98     // drawing the tabline and tabs).
  99     NSRect tabFrame = frame;
 100     tabFrame.origin.y = NSMaxY(tabFrame) - 22;
 101     tabFrame.size.height = 22;
 102     tabBarControl = [[PSMTabBarControl alloc] initWithFrame:tabFrame];
 103
 104     [tabView setDelegate:tabBarControl];
 105
 106     [tabBarControl setTabView:tabView];
 107     [tabBarControl setDelegate:self];
 108     [tabBarControl setHidden:YES];
 109     [tabBarControl setAutoresizingMask:NSViewWidthSizable|NSViewMinYMargin];
 110     [tabBarControl setCellMinWidth:[ud integerForKey:MMTabMinWidthKey]];
 111     [tabBarControl setCellMaxWidth:[ud integerForKey:MMTabMaxWidthKey]];
 112     [tabBarControl setCellOptimumWidth:
 113                                      [ud integerForKey:MMTabOptimumWidthKey]];
 114     [tabBarControl setShowAddTabButton:YES];
 115     [[tabBarControl addTabButton] setTarget:self];
 116     [[tabBarControl addTabButton] setAction:@selector(addNewTab:)];
 117     [tabBarControl setAllowsDragBetweenWindows:NO];
 118
 119     [tabBarControl setPartnerView:[self textView]];
 120
 121     [self addSubview:tabBarControl];
 122
 123     return self;
 124 }
 125
 126 - (void)dealloc
 127 {
 128     [tabBarControl release];  tabBarControl = nil;
 129     [tabView release];  tabView = nil;
 130     [scrollbars release];  scrollbars = nil;
 131     [textView release];  textView = nil;
 132     [textStorage release];  textStorage = nil;
 133
 134     [super dealloc];
 135 }
 136
 137 - (MMTextView *)textView
 138 {
 139     return textView;
 140 }
 141
 142 - (MMTextStorage *)textStorage
 143 {
 144     return textStorage;
 145 }
 146
 147 - (NSMutableArray *)scrollbars
 148 {
 149     return scrollbars;
 150 }
 151
 152 - (BOOL)inLiveResize
 153 {
 154     return [textView inLiveResize];
 155 }
 156
 157 - (PSMTabBarControl *)tabBarControl
 158 {
 159     return tabBarControl;
 160 }
 161
 162 - (NSTabView *)tabView
 163 {
 164     return tabView;
 165 }
 166
 167
 168 - (void)cleanup
 169 {
 170     vimController = nil;
 171
 172     // NOTE! There is a bug in PSMTabBarControl in that it retains the delegate
 173     // (which is the MMWindowController) so reset the delegate here, otherwise
 174     // the MMWindowController never gets released resulting in a pretty serious
 175     // memory leak.
 176     [tabView setDelegate:nil];
 177     [tabBarControl setDelegate:nil];
 178     [tabBarControl setTabView:nil];
 179     [[self window] setDelegate:nil];
 180
 181     // NOTE! There is another bug in PSMTabBarControl where the control is not
 182     // removed as an observer, so remove it here (else lots of evil nasty bugs
 183     // will come and gnaw at your feet while you are sleeping).
 184     [[NSNotificationCenter defaultCenter] removeObserver:tabBarControl];
 185
 186     [tabBarControl removeFromSuperviewWithoutNeedingDisplay];
 187     [textView removeFromSuperviewWithoutNeedingDisplay];
 188
 189     unsigned i, count = [scrollbars count];
 190     for (i = 0; i < count; ++i) {
 191         MMScroller *sb = [scrollbars objectAtIndex:i];
 192         [sb removeFromSuperviewWithoutNeedingDisplay];
 193     }
 194
 195     [tabView removeAllTabViewItems];
 196 }
 197
 198 - (IBAction)addNewTab:(id)sender
 199 {
 200     // NOTE! This can get called a lot if the user holds down the key
 201     // equivalent for this action, which causes the ports to fill up.  If we
 202     // wait for the message to be sent then the app might become unresponsive.
 203     [vimController sendMessage:AddNewTabMsgID data:nil];
 204 }
 205
 206 - (void)updateTabsWithData:(NSData *)data
 207 {
 208     const void *p = [data bytes];
 209     const void *end = p + [data length];
 210     int tabIdx = 0;
 211
 212     // HACK!  Current tab is first in the message.  This way it is not
 213     // necessary to guess which tab should be the selected one (this can be
 214     // problematic for instance when new tabs are created).
 215     int curtabIdx = *((int*)p);  p += sizeof(int);
 216
 217     NSArray *tabViewItems = [[self tabBarControl] representedTabViewItems];
 218
 219     while (p < end) {
 220         //int wincount = *((int*)p);  p += sizeof(int);
 221         int length = *((int*)p);  p += sizeof(int);
 222
 223         NSString *label = [[NSString alloc]
 224                 initWithBytesNoCopy:(void*)p
 225                              length:length
 226                            encoding:NSUTF8StringEncoding
 227                        freeWhenDone:NO];
 228         p += length;
 229
 230         // Set the label of the tab;  add a new tab when needed.
 231         NSTabViewItem *tvi = [[self tabView] numberOfTabViewItems] <= tabIdx
 232                 ? [self addNewTabViewItem]
 233                 : [tabViewItems objectAtIndex:tabIdx];
 234
 235         [tvi setLabel:label];
 236
 237         [label release];
 238
 239         ++tabIdx;
 240     }
 241
 242     // Remove unused tabs from the NSTabView.  Note that when a tab is closed
 243     // the NSTabView will automatically select another tab, but we want Vim to
 244     // take care of which tab to select so set the vimTaskSelectedTab flag to
 245     // prevent the tab selection message to be passed on to the VimTask.
 246     vimTaskSelectedTab = YES;
 247     int i, count = [[self tabView] numberOfTabViewItems];
 248     for (i = count-1; i >= tabIdx; --i) {
 249         id tvi = [tabViewItems objectAtIndex:i];
 250         //NSLog(@"Removing tab with index %d", i);
 251         [[self tabView] removeTabViewItem:tvi];
 252     }
 253     vimTaskSelectedTab = NO;
 254
 255     [self selectTabWithIndex:curtabIdx];
 256 }
 257
 258 - (void)selectTabWithIndex:(int)idx
 259 {
 260     //NSLog(@"%s%d", _cmd, idx);
 261
 262     NSArray *tabViewItems = [[self tabBarControl] representedTabViewItems];
 263     if (idx < 0 || idx >= [tabViewItems count]) {
 264         NSLog(@"WARNING: No tab with index %d exists.", idx);
 265         return;
 266     }
 267
 268     // Do not try to select a tab if already selected.
 269     NSTabViewItem *tvi = [tabViewItems objectAtIndex:idx];
 270     if (tvi != [[self tabView] selectedTabViewItem]) {
 271         vimTaskSelectedTab = YES;
 272         [[self tabView] selectTabViewItem:tvi];
 273         vimTaskSelectedTab = NO;
 274     }
 275 }
 276
 277 - (NSTabViewItem *)addNewTabViewItem
 278 {
 279     // NOTE!  A newly created tab is not by selected by default; the VimTask
 280     // decides which tab should be selected at all times.  However, the AppKit
 281     // will automatically select the first tab added to a tab view.
 282
 283     NSTabViewItem *tvi = [[NSTabViewItem alloc] initWithIdentifier:nil];
 284
 285     // NOTE: If this is the first tab it will be automatically selected.
 286     vimTaskSelectedTab = YES;
 287     [[self tabView] addTabViewItem:tvi];
 288     vimTaskSelectedTab = NO;
 289
 290     [tvi release];
 291
 292     return tvi;
 293 }
 294
 295 - (int)representedIndexOfTabViewItem:(NSTabViewItem *)tvi
 296 {
 297     NSArray *tabViewItems = [[self tabBarControl] representedTabViewItems];
 298     return [tabViewItems indexOfObject:tvi];
 299 }
 300
 301 - (BOOL)bottomScrollbarVisible
 302 {
 303     unsigned i, count = [scrollbars count];
 304     for (i = 0; i < count; ++i) {
 305         MMScroller *scroller = [scrollbars objectAtIndex:i];
 306         if ([scroller type] == MMScrollerTypeBottom && ![scroller isHidden])
 307             return YES;
 308     }
 309
 310     return NO;
 311 }
 312
 313 - (BOOL)leftScrollbarVisible
 314 {
 315     unsigned i, count = [scrollbars count];
 316     for (i = 0; i < count; ++i) {
 317         MMScroller *scroller = [scrollbars objectAtIndex:i];
 318         if ([scroller type] == MMScrollerTypeLeft && ![scroller isHidden])
 319             return YES;
 320     }
 321
 322     return NO;
 323 }
 324
 325 - (BOOL)rightScrollbarVisible
 326 {
 327     unsigned i, count = [scrollbars count];
 328     for (i = 0; i < count; ++i) {
 329         MMScroller *scroller = [scrollbars objectAtIndex:i];
 330         if ([scroller type] == MMScrollerTypeRight && ![scroller isHidden])
 331             return YES;
 332     }
 333
 334     return NO;
 335 }
 336
 337 - (void)createScrollbarWithIdentifier:(long)ident type:(int)type
 338 {
 339     //NSLog(@"Create scroller %d of type %d", ident, type);
 340
 341     MMScroller *scroller = [[MMScroller alloc] initWithIdentifier:ident
 342                                                              type:type];
 343     [scroller setTarget:self];
 344     [scroller setAction:@selector(scroll:)];
 345
 346     [self addSubview:scroller];
 347     [[self scrollbars] addObject:scroller];
 348     [scroller release];
 349 }
 350
 351 - (void)destroyScrollbarWithIdentifier:(long)ident
 352 {
 353     //NSLog(@"Destroy scroller %d", ident);
 354
 355     unsigned idx = 0;
 356     MMScroller *scroller = [self scrollbarForIdentifier:ident index:&idx];
 357     if (scroller) {
 358         [scroller removeFromSuperview];
 359         [[self scrollbars] removeObjectAtIndex:idx];
 360
 361         if (![scroller isHidden]) {
 362             // A visible scroller was removed, so the window must resize to
 363             // fit.
 364             //NSLog(@"Visible scroller %d was destroyed, resizing window.",
 365             //        ident);
 366             shouldUpdateWindowSize = YES;
 367         }
 368     }
 369 }
 370
 371 - (void)showScrollbarWithIdentifier:(long)ident state:(BOOL)visible
 372 {
 373     MMScroller *scroller = [self scrollbarForIdentifier:ident index:NULL];
 374     if (!scroller) return;
 375
 376     BOOL wasVisible = ![scroller isHidden];
 377     //NSLog(@"%s scroller %d (was %svisible)", visible ? "Show" : "Hide",
 378     //      ident, wasVisible ? "" : "in");
 379     [scroller setHidden:!visible];
 380
 381     if (wasVisible != visible) {
 382         // A scroller was hidden or shown, so the window must resize to fit.
 383         //NSLog(@"%s scroller %d and resize.", visible ? "Show" : "Hide",
 384         //        ident);
 385         shouldUpdateWindowSize = YES;
 386     }
 387 }
 388
 389 - (void)setScrollbarThumbValue:(float)val proportion:(float)prop
 390                     identifier:(long)ident
 391 {
 392     MMScroller *scroller = [self scrollbarForIdentifier:ident index:NULL];
 393     //NSLog(@"Set thumb value %.2f proportion %.2f for scroller %d",
 394     //        val, prop, ident);
 395     [scroller setFloatValue:val knobProportion:prop];
 396 }
 397
 398
 399 - (void)scroll:(id)sender
 400 {
 401     NSMutableData *data = [NSMutableData data];
 402     long ident = [(MMScroller*)sender identifier];
 403     int hitPart = [sender hitPart];
 404     float value = [sender floatValue];
 405
 406     [data appendBytes:&ident length:sizeof(long)];
 407     [data appendBytes:&hitPart length:sizeof(int)];
 408     [data appendBytes:&value length:sizeof(float)];
 409
 410     [vimController sendMessage:ScrollbarEventMsgID data:data];
 411 }
 412
 413 - (void)placeScrollbars
 414 {
 415     NSRect textViewFrame = [textView frame];
 416     BOOL lsbVisible = [self leftScrollbarVisible];
 417
 418     // HACK!  Find the lowest left&right vertical scrollbars, as well as the
 419     // rightmost horizontal scrollbar.  This hack continues further down.
 420     //
 421     // TODO!  Can there be no more than one horizontal scrollbar?  If so, the
 422     // code can be simplified.
 423     unsigned lowestLeftSbIdx = (unsigned)-1;
 424     unsigned lowestRightSbIdx = (unsigned)-1;
 425     unsigned rightmostSbIdx = (unsigned)-1;
 426     unsigned rowMaxLeft = 0, rowMaxRight = 0, colMax = 0;
 427     unsigned i, count = [scrollbars count];
 428     for (i = 0; i < count; ++i) {
 429         MMScroller *scroller = [scrollbars objectAtIndex:i];
 430         if (![scroller isHidden]) {
 431             NSRange range = [scroller range];
 432             if ([scroller type] == MMScrollerTypeLeft
 433                     && range.location >= rowMaxLeft) {
 434                 rowMaxLeft = range.location;
 435                 lowestLeftSbIdx = i;
 436             } else if ([scroller type] == MMScrollerTypeRight
 437                     && range.location >= rowMaxRight) {
 438                 rowMaxRight = range.location;
 439                 lowestRightSbIdx = i;
 440             } else if ([scroller type] == MMScrollerTypeBottom
 441                     && range.location >= colMax) {
 442                 colMax = range.location;
 443                 rightmostSbIdx = i;
 444             }
 445         }
 446     }
 447
 448     // Place the scrollbars.
 449     for (i = 0; i < count; ++i) {
 450         MMScroller *scroller = [scrollbars objectAtIndex:i];
 451         if ([scroller isHidden])
 452             continue;
 453
 454         NSRect rect;
 455         if ([scroller type] == MMScrollerTypeBottom) {
 456             rect = [textStorage rectForColumnsInRange:[scroller range]];
 457             rect.size.height = [NSScroller scrollerWidth];
 458             if (lsbVisible)
 459                 rect.origin.x += [NSScroller scrollerWidth];
 460
 461             // HACK!  Make sure the rightmost horizontal scrollbar covers the
 462             // text view all the way to the right, otherwise it looks ugly when
 463             // the user drags the window to resize.
 464             if (i == rightmostSbIdx) {
 465                 float w = NSMaxX(textViewFrame) - NSMaxX(rect);
 466                 if (w > 0)
 467                     rect.size.width += w;
 468             }
 469
 470             // Make sure scrollbar rect is bounded by the text view frame.
 471             if (rect.origin.x < textViewFrame.origin.x)
 472                 rect.origin.x = textViewFrame.origin.x;
 473             else if (rect.origin.x > NSMaxX(textViewFrame))
 474                 rect.origin.x = NSMaxX(textViewFrame);
 475             if (NSMaxX(rect) > NSMaxX(textViewFrame))
 476                 rect.size.width -= NSMaxX(rect) - NSMaxX(textViewFrame);
 477             if (rect.size.width < 0)
 478                 rect.size.width = 0;
 479         } else {
 480             rect = [textStorage rectForRowsInRange:[scroller range]];
 481             // Adjust for the fact that text layout is flipped.
 482             rect.origin.y = NSMaxY(textViewFrame) - rect.origin.y
 483                     - rect.size.height;
 484             rect.size.width = [NSScroller scrollerWidth];
 485             if ([scroller type] == MMScrollerTypeRight)
 486                 rect.origin.x = NSMaxX(textViewFrame);
 487
 488             // HACK!  Make sure the lowest vertical scrollbar covers the text
 489             // view all the way to the bottom.  This is done because Vim only
 490             // makes the scrollbar cover the (vim-)window it is associated with
 491             // and this means there is always an empty gap in the scrollbar
 492             // region next to the command line.
 493             // TODO!  Find a nicer way to do this.
 494             if (i == lowestLeftSbIdx || i == lowestRightSbIdx) {
 495                 float h = rect.origin.y + rect.size.height
 496                           - textViewFrame.origin.y;
 497                 if (rect.size.height < h) {
 498                     rect.origin.y = textViewFrame.origin.y;
 499                     rect.size.height = h;
 500                 }
 501             }
 502
 503             // Vertical scrollers must not cover the resize box in the
 504             // bottom-right corner of the window.
 505             if ([[self window] showsResizeIndicator]  // XXX: make this a flag
 506                 && rect.origin.y < [NSScroller scrollerWidth]) {
 507                 rect.size.height -= [NSScroller scrollerWidth] - rect.origin.y;
 508                 rect.origin.y = [NSScroller scrollerWidth];
 509             }
 510
 511             // Make sure scrollbar rect is bounded by the text view frame.
 512             if (rect.origin.y < textViewFrame.origin.y) {
 513                 rect.size.height -= textViewFrame.origin.y - rect.origin.y;
 514                 rect.origin.y = textViewFrame.origin.y;
 515             } else if (rect.origin.y > NSMaxY(textViewFrame))
 516                 rect.origin.y = NSMaxY(textViewFrame);
 517             if (NSMaxY(rect) > NSMaxY(textViewFrame))
 518                 rect.size.height -= NSMaxY(rect) - NSMaxY(textViewFrame);
 519             if (rect.size.height < 0)
 520                 rect.size.height = 0;
 521         }
 522
 523         //NSLog(@"set scroller #%d frame = %@", i, NSStringFromRect(rect));
 524         NSRect oldRect = [scroller frame];
 525         if (!NSEqualRects(oldRect, rect)) {
 526             [scroller setFrame:rect];
 527             // Clear behind the old scroller frame, or parts of the old
 528             // scroller might still be visible after setFrame:.
 529             [[[self window] contentView] setNeedsDisplayInRect:oldRect];
 530             [scroller setNeedsDisplay:YES];
 531         }
 532     }
 533 }
 534
 535 - (MMScroller *)scrollbarForIdentifier:(long)ident index:(unsigned *)idx
 536 {
 537     unsigned i, count = [[self scrollbars] count];
 538     for (i = 0; i < count; ++i) {
 539         MMScroller *scroller = [[self scrollbars] objectAtIndex:i];
 540         if ([scroller identifier] == ident) {
 541             if (idx) *idx = i;
 542             return scroller;
 543         }
 544     }
 545
 546     return nil;
 547 }
 548
 549 - (void)setDefaultColorsBackground:(NSColor *)back foreground:(NSColor *)fore
 550 {
 551     [textStorage setDefaultColorsBackground:back foreground:fore];
 552     [textView setBackgroundColor:back];
 553 }
 554
 555 - (BOOL)shouldUpdateWindowSize
 556 {
 557     return shouldUpdateWindowSize;
 558 }
 559
 560 - (void)setShouldUpdateWindowSize:(BOOL)b
 561 {
 562     shouldUpdateWindowSize = b;
 563 }
 564
 565 - (NSSize)contentSizeForTextStorageSize:(NSSize)textViewSize
 566 {
 567     NSSize size = textViewSize;
 568
 569     NSUserDefaults *ud = [NSUserDefaults standardUserDefaults];
 570     int right = [ud integerForKey:MMTextInsetRightKey];
 571     int bot = [ud integerForKey:MMTextInsetBottomKey];
 572
 573     size.width += [[self textView] textContainerOrigin].x + right;
 574     size.height += [[self textView] textContainerOrigin].y + bot;
 575
 576     if (![[self tabBarControl] isHidden])
 577         size.height += [[self tabBarControl] frame].size.height;
 578
 579     if ([self bottomScrollbarVisible])
 580         size.height += [NSScroller scrollerWidth];
 581     if ([self leftScrollbarVisible])
 582         size.width += [NSScroller scrollerWidth];
 583     if ([self rightScrollbarVisible])
 584         size.width += [NSScroller scrollerWidth];
 585
 586     return size;
 587 }
 588
 589 - (NSRect)textViewRectForContentSize:(NSSize)contentSize
 590 {
 591     NSRect rect = { 0, 0, contentSize.width, contentSize.height };
 592
 593     if (![[self tabBarControl] isHidden])
 594         rect.size.height -= [[self tabBarControl] frame].size.height;
 595
 596     if ([self bottomScrollbarVisible]) {
 597         rect.size.height -= [NSScroller scrollerWidth];
 598         rect.origin.y += [NSScroller scrollerWidth];
 599     }
 600     if ([self leftScrollbarVisible]) {
 601         rect.size.width -= [NSScroller scrollerWidth];
 602         rect.origin.x += [NSScroller scrollerWidth];
 603     }
 604     if ([self rightScrollbarVisible])
 605         rect.size.width -= [NSScroller scrollerWidth];
 606
 607     return rect;
 608 }
 609
 610 - (NSSize)textStorageSizeForTextViewSize:(NSSize)textViewSize
 611 {
 612     NSSize size = textViewSize;
 613
 614     NSUserDefaults *ud = [NSUserDefaults standardUserDefaults];
 615     int right = [ud integerForKey:MMTextInsetRightKey];
 616     int bot = [ud integerForKey:MMTextInsetBottomKey];
 617
 618     size.width -= [[self textView] textContainerOrigin].x + right;
 619     size.height -= [[self textView] textContainerOrigin].y + bot;
 620
 621     return size;
 622 }
 623
 624
 625 // -- PSMTabBarControl delegate ----------------------------------------------
 626
 627
 628 - (BOOL)tabView:(NSTabView *)theTabView shouldSelectTabViewItem:
 629     (NSTabViewItem *)tabViewItem
 630 {
 631     // NOTE: It would be reasonable to think that 'shouldSelect...' implies
 632     // that this message only gets sent when the user clicks the tab.
 633     // Unfortunately it is not so, which is why we need the
 634     // 'vimTaskSelectedTab' flag.
 635     //
 636     // HACK!  The selection message should not be propagated to the VimTask if
 637     // the VimTask selected the tab (e.g. as opposed the user clicking the
 638     // tab).  The delegate method has no way of knowing who initiated the
 639     // selection so a flag is set when the VimTask initiated the selection.
 640     if (!vimTaskSelectedTab) {
 641         // Propagate the selection message to the VimTask.
 642         int idx = [self representedIndexOfTabViewItem:tabViewItem];
 643         if (NSNotFound != idx) {
 644             NSData *data = [NSData dataWithBytes:&idx length:sizeof(int)];
 645             [vimController sendMessage:SelectTabMsgID data:data];
 646         }
 647     }
 648
 649     // Unless Vim selected the tab, return NO, and let Vim decide if the tab
 650     // should get selected or not.
 651     return vimTaskSelectedTab;
 652 }
 653
 654 - (BOOL)tabView:(NSTabView *)theTabView shouldCloseTabViewItem:
 655         (NSTabViewItem *)tabViewItem
 656 {
 657     // HACK!  This method is only called when the user clicks the close button
 658     // on the tab.  Instead of letting the tab bar close the tab, we return NO
 659     // and pass a message on to Vim to let it handle the closing.
 660     int idx = [self representedIndexOfTabViewItem:tabViewItem];
 661     //NSLog(@"Closing tab with index %d", idx);
 662     NSData *data = [NSData dataWithBytes:&idx length:sizeof(int)];
 663     [vimController sendMessage:CloseTabMsgID data:data];
 664
 665     return NO;
 666 }
 667
 668 - (void)tabView:(NSTabView *)theTabView didDragTabViewItem:
 669         (NSTabViewItem *)tabViewItem toIndex:(int)idx
 670 {
 671     NSMutableData *data = [NSMutableData data];
 672     [data appendBytes:&idx length:sizeof(int)];
 673
 674     [vimController sendMessage:DraggedTabMsgID data:data];
 675 }
 676
 677 @end
 678
 679
 680
 681
 682 @implementation NSTabView (MMExtras)
 683
 684 - (void)removeAllTabViewItems
 685 {
 686     NSArray *existingItems = [self tabViewItems];
 687     NSEnumerator *e = [existingItems objectEnumerator];
 688     NSTabViewItem *item;
 689     while (item = [e nextObject]){
 690         [self removeTabViewItem:item];
 691     }
 692 }
 693
 694 @end // NSTabView (MMExtras)
 695
 696
 697
 698
 699 @implementation MMScroller
 700
 701 - (id)initWithIdentifier:(long)ident type:(int)theType
 702 {
 703     // HACK! NSScroller creates a horizontal scroller if it is init'ed with a
 704     // frame whose with exceeds its height; so create a bogus rect and pass it
 705     // to initWithFrame.
 706     NSRect frame = theType == MMScrollerTypeBottom
 707             ? NSMakeRect(0, 0, 1, 0)
 708             : NSMakeRect(0, 0, 0, 1);
 709
 710     if ((self = [super initWithFrame:frame])) {
 711         identifier = ident;
 712         type = theType;
 713         [self setHidden:YES];
 714         [self setEnabled:YES];
 715     }
 716
 717     return self;
 718 }
 719
 720 - (long)identifier
 721 {
 722     return identifier;
 723 }
 724
 725 - (int)type
 726 {
 727     return type;
 728 }
 729
 730 - (NSRange)range
 731 {
 732     return range;
 733 }
 734
 735 - (void)setRange:(NSRange)newRange
 736 {
 737     range = newRange;
 738 }
 739
 740 - (void)scrollWheel:(NSEvent *)event
 741 {
 742     // HACK! Pass message on to the text view.
 743     MMWindowController *wc = [[self window] windowController];
 744     [[wc textView] scrollWheel:event];
 745 }
 746
 747 @end // MMScroller