Added suport for model loading.

git-svn-id: svn+ssh://svn.gna.org/svn/gnustep/libs/gui/trunk@2665 72102866-910b-0410-8b05-ffd578937521
2025-05-30 02:10:37 +00:00 · 1997-12-04 01:58:57 +00:00 · 1997-12-04 01:58:57 +00:00 · 76741e1d40
commit 76741e1d40
parent 6d56e48e78
33 changed files with 2684 additions and 43 deletions
--- a/Model/IMLoading.m
+++ b/Model/IMLoading.m
@ -0,0 +1,139 @@
+/*
+   IMLoading.m
+
+   Copyright (C) 1996 Free Software Foundation, Inc.
+
+   Author: Ovidiu Predescu <ovidiu@net-community.com>
+   Date: November 1997
+   
+   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, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
+*/
+
+#import <Foundation/NSDictionary.h>
+#import <Foundation/NSArray.h>
+#include <extensions/GMArchiver.h>
+#include "IMLoading.h"
+#include "IMCustomObject.h"
+
+void __dummy_IMLoading_functionForLinking()
+{
+  __dummy_IMLoading_functionForLinking();
+}
+
+@implementation NSBundle (IMLoading)
+
+ (BOOL)loadIMFile:(NSString*)path owner:(id)owner
+{
+  return [GMModel loadIMFile:path owner:owner];
+}
+
+@end /* NSBundle(IMLoading) */
+
+
+@implementation GMModel
+
+id _nibOwner = nil;
+BOOL _fileOwnerDecoded = NO;
+
+ (void)initialize
+{
+  /* Force linking of AppKit GModel categories */
+  extern void __dummy_GMAppKit_functionForLinking();
+  __dummy_GMAppKit_functionForLinking ();
+}
+
+ (BOOL)loadIMFile:(NSString*)path owner:(id)owner
+{
+  GMUnarchiver* unarchiver = [GMUnarchiver unarchiverWithContentsOfFile:path];
+  id previousNibOwner = _nibOwner;
+  GMModel* decoded;
+
+  if (!unarchiver)
+    return NO;
+
+  /* Set the _nibOwner to `owner' so that the first decoded custom object
+     replaces itself with `owner'. Also set _fileOwnerDecoded so that the
+     first custom object knows it's the first. */
+  _nibOwner = owner;
+  _fileOwnerDecoded = NO;
+
+  decoded = [unarchiver decodeObjectWithName:@"RootObject"];
+  [decoded _makeConnections];
+
+  /* Restore the previous nib owner. We do this because loadIMFile:owner: can
+     be invoked recursively. */
+  _nibOwner = previousNibOwner;
+
+  return YES;
+}
+
+- (void)_makeConnections
+{
+  int i, count;
+
+  [connections makeObjectsPerform:@selector(establishConnection)];
+
+  /* Send the -awakeFromModel method */
+  for (i = 0, count = [objects count]; i < count; i++) {
+    id object = [[objects objectAtIndex:i] nibInstantiate];
+
+    if ([object respondsToSelector:@selector(awakeFromModel)])
+      [object awakeFromModel];
+  }
+}
+
+- (void)dealloc
+{
+  [objects release];
+  [connections release];
+  [super dealloc];
+}
+
+- (void)_setObjects:_objects connections:_connections
+{
+  objects = [_objects retain];
+  connections = [_connections retain];
+}
+
+- (void)encodeWithModelArchiver:(GMArchiver*)archiver
+{
+  [archiver encodeObject:objects withName:@"Objects"];
+  [archiver encodeObject:connections withName:@"Connections"];
+}
+
+- (id)initWithModelUnarchiver:(GMUnarchiver*)unarchiver
+{
+  objects = [[unarchiver decodeObjectWithName:@"Objects"] retain];
+  connections = [[unarchiver decodeObjectWithName:@"Connections"] retain];
+  return self;
+}
+
+@end /* GMModel */
+
+
+#if GNU_RUNTIME
+#import "IMConnectors.h"
+
+static void __dummyFunctionForLinking (void)
+{
+  [IMCustomObject new];
+  [IMConnector new];
+
+  __dummyFunctionForLinking();
+}
+
+#endif