NSPasteboard_BLTRExtensions.m

//
// NSPasteboard_BLTRExtensions.m
// Quicksilver
//
// Created by Alcor on Sun Nov 09 2003.
// Copyright (c) 2003 Blacktree, Inc.. All rights reserved.
//

#import "NSPasteboard_BLTRExtensions.h"
#import "NSString_BLTRExtensions.h"
#import "NDResourceFork.h"

NSString *QSPasteboardTransientType = @"org.nspasteboard.TransientType";
NSString *QSPasteboardAutoGeneratedType = @"org.nspasteboard.AutoGeneratedType";

void QSForcePaste() {
    CGKeyCode pasteKeyCode = [[NDKeyboardLayout keyboardLayout] keyCodeForCharacter:'v'];

	CGEventSourceRef source = CGEventSourceCreate(kCGEventSourceStateCombinedSessionState);
    CGEventSourceSetLocalEventsFilterDuringSuppressionState(source, kCGEventFilterMaskPermitLocalMouseEvents | kCGEventFilterMaskPermitSystemDefinedEvents,kCGEventSuppressionStateSuppressionInterval);
	CGEventRef pasteCommandDown = CGEventCreateKeyboardEvent(source, pasteKeyCode, YES);
	CGEventSetFlags(pasteCommandDown, kCGEventFlagMaskCommand);
	CGEventRef pasteCommandUp = CGEventCreateKeyboardEvent(source, pasteKeyCode, NO);

	CGEventPost(kCGAnnotatedSessionEventTap, pasteCommandDown);
	CGEventPost(kCGAnnotatedSessionEventTap, pasteCommandUp);
	
	CFRelease(pasteCommandUp);
	CFRelease(pasteCommandDown);
	CFRelease(source);
}

@implementation NSPasteboard (Clippings)
+ (NSPasteboard *)pasteboardByFilteringClipping:(NSString *)path { // Not thread safe?
//	if (VERBOSE) NSLog(@"Filtering Clipping %@", path);
	NSPasteboard *pboard = [NSPasteboard pasteboardWithUniqueName];

	NDResourceFork *resource = [NDResourceFork resourceForkForReadingAtPath:path];
	NSData *dragData = [resource dataForType:'drag' Id:128];

	NSMutableDictionary *typesDictionary = [NSMutableDictionary dictionaryWithCapacity:1];
	NSUInteger i;
	ResType type;
	unsigned long resID;
	NSData *resData;
	for (i = 16; i+16 <= [dragData length]; i += 16) {
		[dragData getBytes:&type range:NSMakeRange(i, 4)];
		[dragData getBytes:&resID range:NSMakeRange(i+4, 4)];

		NSString *key = NSFileTypeForHFSTypeCode(type);
	//	NSLog(@"leng %d", [key length]);
		if ([key length] == 6) { //Some strange types yeild short strings
		resData = [resource dataForType:type Id:(short) resID];
			if (resData)
			[typesDictionary setObject:resData forKey:[key encodedPasteboardType]];
		}
	}

	[pboard declareTypes:[typesDictionary allKeys] owner:self];
	for(NSString *key in typesDictionary)
		[pboard setData:[typesDictionary objectForKey:key] forType:key];

	return [NSPasteboard pasteboardByFilteringTypesInPasteboard:pboard];
}

- (BOOL)isTransient {
    return [self availableTypeFromArray:QSPasteboardTransientTypes] != nil;
}

- (BOOL)isAutoGenerated {
    return [self availableTypeFromArray:[NSArray arrayWithObject:QSPasteboardAutoGeneratedType]] != nil;
}
@end