mirror of
https://github.com/gnustep/libs-gui.git
synced 2025-04-25 07:50:53 +00:00
git-svn-id: svn+ssh://svn.gna.org/svn/gnustep/libs/gui/trunk@17511 72102866-910b-0410-8b05-ffd578937521
451 lines
11 KiB
Objective-C
451 lines
11 KiB
Objective-C
/** <title>NSBundleAdditions</title>
|
||
|
||
<abstract>Implementation of NSBundle Additions</abstract>
|
||
|
||
Copyright (C) 1997, 1999 Free Software Foundation, Inc.
|
||
|
||
Author: Simon Frankau <sgf@frankau.demon.co.uk>
|
||
Date: 1997
|
||
Author: Richard Frith-Macdonald <richard@brainstorm.co.uk>
|
||
Date: 1999
|
||
|
||
This file is part of the GNUstep GUI Library.
|
||
|
||
This library is free software; you can redistribute it and/or
|
||
modify it under the terms of the GNU Library General Public
|
||
License as published by the Free Software Foundation; either
|
||
version 2 of the License, or (at your option) any later version.
|
||
|
||
This library is distributed in the hope that it will be useful,
|
||
but WITHOUT ANY WARRANTY; without even the implied warranty of
|
||
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
|
||
Library General Public License for more details.
|
||
|
||
You should have received a copy of the GNU Library General Public
|
||
License along with this library;
|
||
If not, write to the Free Software Foundation,
|
||
59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
|
||
*/
|
||
|
||
#include "config.h"
|
||
#include <Foundation/NSClassDescription.h>
|
||
#include <Foundation/NSArchiver.h>
|
||
#include <Foundation/NSArray.h>
|
||
#include <Foundation/NSBundle.h>
|
||
#include <Foundation/NSCoder.h>
|
||
#include <Foundation/NSData.h>
|
||
#include <Foundation/NSDictionary.h>
|
||
#include <Foundation/NSDebug.h>
|
||
#include <Foundation/NSEnumerator.h>
|
||
#include <Foundation/NSException.h>
|
||
#include <Foundation/NSInvocation.h>
|
||
#include <Foundation/NSObjCRuntime.h>
|
||
#include <Foundation/NSPathUtilities.h>
|
||
#include <Foundation/NSFileManager.h>
|
||
#include <Foundation/NSString.h>
|
||
#include <Foundation/NSUserDefaults.h>
|
||
#include <Foundation/NSKeyValueCoding.h>
|
||
#include "AppKit/NSApplication.h"
|
||
#include "AppKit/NSMenu.h"
|
||
#include "AppKit/NSControl.h"
|
||
#include "AppKit/NSImage.h"
|
||
#include "AppKit/NSSound.h"
|
||
#include "AppKit/NSView.h"
|
||
#include "AppKit/NSTextView.h"
|
||
#include "AppKit/NSWindow.h"
|
||
#include "AppKit/NSNibConnector.h"
|
||
#include "AppKit/NSNibLoading.h"
|
||
#include "GNUstepGUI/GSNibTemplates.h"
|
||
#include "GNUstepGUI/IMLoading.h"
|
||
|
||
static const int currentVersion = 1;
|
||
|
||
@implementation NSNibConnector
|
||
|
||
- (void) dealloc
|
||
{
|
||
RELEASE(_src);
|
||
RELEASE(_dst);
|
||
RELEASE(_tag);
|
||
[super dealloc];
|
||
}
|
||
|
||
- (id) destination
|
||
{
|
||
return _dst;
|
||
}
|
||
|
||
- (void) encodeWithCoder: (NSCoder*)aCoder
|
||
{
|
||
[aCoder encodeObject: _src];
|
||
[aCoder encodeObject: _dst];
|
||
[aCoder encodeObject: _tag];
|
||
}
|
||
|
||
- (void) establishConnection
|
||
{
|
||
}
|
||
|
||
- (id) initWithCoder: (NSCoder*)aCoder
|
||
{
|
||
[aCoder decodeValueOfObjCType: @encode(id) at: &_src];
|
||
[aCoder decodeValueOfObjCType: @encode(id) at: &_dst];
|
||
[aCoder decodeValueOfObjCType: @encode(id) at: &_tag];
|
||
return self;
|
||
}
|
||
|
||
- (NSString*) label
|
||
{
|
||
return _tag;
|
||
}
|
||
|
||
- (void) replaceObject: (id)anObject withObject: (id)anotherObject
|
||
{
|
||
if (_src == anObject)
|
||
{
|
||
ASSIGN(_src, anotherObject);
|
||
}
|
||
if (_dst == anObject)
|
||
{
|
||
ASSIGN(_dst, anotherObject);
|
||
}
|
||
if (_tag == anObject)
|
||
{
|
||
ASSIGN(_tag, anotherObject);
|
||
}
|
||
}
|
||
|
||
- (id) source
|
||
{
|
||
return _src;
|
||
}
|
||
|
||
- (void) setDestination: (id)anObject
|
||
{
|
||
ASSIGN(_dst, anObject);
|
||
}
|
||
|
||
- (void) setLabel: (NSString*)label
|
||
{
|
||
ASSIGN(_tag, label);
|
||
}
|
||
|
||
- (void) setSource: (id)anObject
|
||
{
|
||
ASSIGN(_src, anObject);
|
||
}
|
||
|
||
@end
|
||
|
||
@implementation NSNibControlConnector
|
||
- (void) establishConnection
|
||
{
|
||
SEL sel = NSSelectorFromString(_tag);
|
||
|
||
[_src setTarget: _dst];
|
||
[_src setAction: sel];
|
||
}
|
||
@end
|
||
|
||
@implementation NSNibOutletConnector
|
||
- (void) establishConnection
|
||
{
|
||
if (_src != nil)
|
||
{
|
||
NSString *selName;
|
||
SEL sel;
|
||
|
||
selName = [NSString stringWithFormat: @"set%@%@:",
|
||
[[_tag substringToIndex: 1] uppercaseString],
|
||
[_tag substringFromIndex: 1]];
|
||
sel = NSSelectorFromString(selName);
|
||
|
||
if (sel && [_src respondsToSelector: sel])
|
||
{
|
||
[_src performSelector: sel withObject: _dst];
|
||
}
|
||
else
|
||
{
|
||
const char *nam = [_tag cString];
|
||
const char *type;
|
||
unsigned int size;
|
||
unsigned int offset;
|
||
|
||
/*
|
||
* Use the GNUstep additional function to set the instance
|
||
* variable directly.
|
||
* FIXME - need some way to do this for libFoundation and
|
||
* Foundation based systems.
|
||
*/
|
||
if (GSObjCFindVariable(_src, nam, &type, &size, &offset))
|
||
{
|
||
GSObjCSetVariable(_src, offset, size, (void*)&_dst);
|
||
}
|
||
}
|
||
}
|
||
}
|
||
@end
|
||
|
||
|
||
|
||
@implementation NSBundle (NSBundleAdditions)
|
||
|
||
static
|
||
Class gmodel_class(void)
|
||
{
|
||
static Class gmclass = Nil;
|
||
|
||
if (gmclass == Nil)
|
||
{
|
||
NSBundle *theBundle;
|
||
NSEnumerator *benum;
|
||
NSString *path;
|
||
|
||
/* Find the bundle */
|
||
benum = [NSStandardLibraryPaths() objectEnumerator];
|
||
while ((path = [benum nextObject]))
|
||
{
|
||
path = [path stringByAppendingPathComponent: @"Bundles"];
|
||
path = [path stringByAppendingPathComponent: @"libgmodel.bundle"];
|
||
if ([[NSFileManager defaultManager] fileExistsAtPath: path])
|
||
break;
|
||
path = nil;
|
||
}
|
||
NSCAssert(path != nil, @"Unable to load gmodel bundle");
|
||
NSDebugLog(@"Loading gmodel from %@", path);
|
||
|
||
theBundle = [NSBundle bundleWithPath: path];
|
||
NSCAssert(theBundle != nil, @"Can't init gmodel bundle");
|
||
gmclass = [theBundle classNamed: @"GMModel"];
|
||
NSCAssert(gmclass, @"Can't load gmodel bundle");
|
||
}
|
||
return gmclass;
|
||
}
|
||
|
||
+ (BOOL) loadNibFile: (NSString*)fileName
|
||
externalNameTable: (NSDictionary*)context
|
||
withZone: (NSZone*)zone
|
||
{
|
||
BOOL loaded = NO;
|
||
NSUnarchiver *unarchiver = nil;
|
||
NSString *ext = [fileName pathExtension];
|
||
|
||
if ([ext isEqual: @"nib"])
|
||
{
|
||
NSFileManager *mgr = [NSFileManager defaultManager];
|
||
NSString *base = [fileName stringByDeletingPathExtension];
|
||
|
||
/* We can't read nibs, look for an equivalent gorm or gmodel file */
|
||
fileName = [base stringByAppendingPathExtension: @"gorm"];
|
||
if ([mgr isReadableFileAtPath: fileName])
|
||
{
|
||
ext = @"gorm";
|
||
}
|
||
else
|
||
{
|
||
fileName = [base stringByAppendingPathExtension: @"gmodel"];
|
||
ext = @"gmodel";
|
||
}
|
||
}
|
||
|
||
/*
|
||
* If the file to be read is a gmodel, use the GMModel method to
|
||
* read it in and skip the dearchiving below.
|
||
*/
|
||
if ([ext isEqualToString: @"gmodel"])
|
||
{
|
||
return [gmodel_class() loadIMFile: fileName
|
||
owner: [context objectForKey: @"NSOwner"]];
|
||
}
|
||
|
||
NSDebugLog(@"Loading Nib `%@'...\n", fileName);
|
||
NS_DURING
|
||
{
|
||
NSFileManager *mgr = [NSFileManager defaultManager];
|
||
BOOL isDir = NO;
|
||
|
||
if([mgr fileExistsAtPath: fileName isDirectory: &isDir])
|
||
{
|
||
NSData *data = nil;
|
||
|
||
// if the data is in a directory, then load from objects.gorm in the directory
|
||
if(isDir == NO)
|
||
{
|
||
data = [NSData dataWithContentsOfFile: fileName];
|
||
NSDebugLog(@"Loaded data from file...");
|
||
}
|
||
else
|
||
{
|
||
NSString *newFileName = [fileName stringByAppendingPathComponent: @"objects.gorm"];
|
||
data = [NSData dataWithContentsOfFile: newFileName];
|
||
NSDebugLog(@"Loaded data from %@...",newFileName);
|
||
}
|
||
|
||
if (data != nil)
|
||
{
|
||
unarchiver = [[NSUnarchiver alloc] initForReadingWithData: data];
|
||
if (unarchiver != nil)
|
||
{
|
||
id obj;
|
||
|
||
// font fallback and automatic translation...
|
||
// [unarchiver decodeClassName: @"NSString" asClassName: @"GSStringProxy"];
|
||
|
||
NSDebugLog(@"Invoking unarchiver");
|
||
[unarchiver setObjectZone: zone];
|
||
obj = [unarchiver decodeObject];
|
||
if (obj != nil)
|
||
{
|
||
if ([obj isKindOfClass: [GSNibContainer class]])
|
||
{
|
||
NSDebugLog(@"Calling awakeWithContext");
|
||
[obj awakeWithContext: context];
|
||
/*
|
||
*Ok - it's all done now - just retain the nib container
|
||
*so that it will not be released when the unarchiver
|
||
*is released, and the nib contents will persist.
|
||
*/
|
||
RETAIN(obj);
|
||
loaded = YES;
|
||
}
|
||
else
|
||
{
|
||
NSLog(@"Nib '%@' without container object!", fileName);
|
||
}
|
||
}
|
||
RELEASE(unarchiver);
|
||
}
|
||
}
|
||
}
|
||
}
|
||
NS_HANDLER
|
||
{
|
||
NSLog(@"Exception occured while loading model: %@",[localException reason]);
|
||
TEST_RELEASE(unarchiver);
|
||
}
|
||
NS_ENDHANDLER
|
||
|
||
if (loaded == NO)
|
||
{
|
||
NSLog(@"Failed to load Nib\n");
|
||
}
|
||
return loaded;
|
||
}
|
||
|
||
+ (BOOL) loadNibNamed: (NSString *)aNibName
|
||
owner: (id)owner
|
||
{
|
||
NSDictionary *table;
|
||
NSBundle *bundle;
|
||
|
||
if (owner == nil || aNibName == nil)
|
||
{
|
||
return NO;
|
||
}
|
||
table = [NSDictionary dictionaryWithObject: owner forKey: @"NSOwner"];
|
||
bundle = [self bundleForClass: [owner class]];
|
||
if (bundle == nil)
|
||
{
|
||
bundle = [self mainBundle];
|
||
}
|
||
return [bundle loadNibFile: aNibName
|
||
externalNameTable: table
|
||
withZone: [owner zone]];
|
||
}
|
||
|
||
- (NSString *) pathForNibResource: (NSString *)fileName
|
||
{
|
||
NSFileManager *mgr = [NSFileManager defaultManager];
|
||
NSMutableArray *array = [NSMutableArray arrayWithCapacity: 8];
|
||
NSArray *languages = [NSUserDefaults userLanguages];
|
||
NSString *rootPath = [self bundlePath];
|
||
NSString *primary;
|
||
NSString *language;
|
||
NSEnumerator *enumerator;
|
||
NSString *ext;
|
||
|
||
ext = [fileName pathExtension];
|
||
fileName = [fileName stringByDeletingPathExtension];
|
||
|
||
/*
|
||
* Build an array of resource paths that differs from the normal order -
|
||
* we want a localized file in preference to a generic one.
|
||
*/
|
||
primary = [rootPath stringByAppendingPathComponent: @"Resources"];
|
||
enumerator = [languages objectEnumerator];
|
||
while ((language = [enumerator nextObject]))
|
||
{
|
||
NSString *langDir;
|
||
|
||
langDir = [NSString stringWithFormat: @"%@.lproj", language];
|
||
[array addObject: [primary stringByAppendingPathComponent: langDir]];
|
||
}
|
||
[array addObject: primary];
|
||
primary = rootPath;
|
||
enumerator = [languages objectEnumerator];
|
||
while ((language = [enumerator nextObject]))
|
||
{
|
||
NSString *langDir;
|
||
|
||
langDir = [NSString stringWithFormat: @"%@.lproj", language];
|
||
[array addObject: [primary stringByAppendingPathComponent: langDir]];
|
||
}
|
||
[array addObject: primary];
|
||
|
||
enumerator = [array objectEnumerator];
|
||
while ((rootPath = [enumerator nextObject]) != nil)
|
||
{
|
||
NSString *path;
|
||
|
||
rootPath = [rootPath stringByAppendingPathComponent: fileName];
|
||
// If the file does not have an extension, then we need to
|
||
// figure out what type of model file to load.
|
||
if ([ext isEqualToString: @""] == YES)
|
||
{
|
||
path = [rootPath stringByAppendingPathExtension: @"gorm"];
|
||
if ([mgr isReadableFileAtPath: path] == NO)
|
||
{
|
||
path = [rootPath stringByAppendingPathExtension: @"nib"];
|
||
if ([mgr isReadableFileAtPath: path] == NO)
|
||
{
|
||
path = [rootPath stringByAppendingPathExtension: @"gmodel"];
|
||
if ([mgr isReadableFileAtPath: path] == NO)
|
||
{
|
||
continue;
|
||
}
|
||
}
|
||
}
|
||
return path;
|
||
}
|
||
else
|
||
{
|
||
path = [rootPath stringByAppendingPathExtension: ext];
|
||
if([mgr isReadableFileAtPath: path])
|
||
{
|
||
return path;
|
||
}
|
||
}
|
||
}
|
||
|
||
return nil;
|
||
}
|
||
|
||
- (BOOL) loadNibFile: (NSString*)fileName
|
||
externalNameTable: (NSDictionary*)context
|
||
withZone: (NSZone*)zone
|
||
{
|
||
NSString *path = [self pathForNibResource: fileName];
|
||
|
||
if (path != nil)
|
||
{
|
||
return [NSBundle loadNibFile: path
|
||
externalNameTable: context
|
||
withZone: (NSZone*)zone];
|
||
}
|
||
else
|
||
{
|
||
return NO;
|
||
}
|
||
}
|
||
@end
|
||
// end of NSBundleAdditions
|