mirror of
https://github.com/gnustep/libs-gsweb.git
synced 2025-02-22 11:11:21 +00:00
95931983d3
git-svn-id: svn+ssh://svn.gna.org/svn/gnustep/libs/gsweb/trunk@20507 72102866-910b-0410-8b05-ffd578937521
1150 lines
39 KiB
Objective-C
1150 lines
39 KiB
Objective-C
/** GSWAssociation.m - <title>GSWeb: Class GSWAssociation</title>
|
|
|
|
Copyright (C) 1999-2004 Free Software Foundation, Inc.
|
|
|
|
Written by: Manuel Guesdon <mguesdon@orange-concept.com>
|
|
Date: Jan 1999
|
|
|
|
$Revision$
|
|
$Date$
|
|
|
|
This file is part of the GNUstep Web Library.
|
|
|
|
<license>
|
|
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.
|
|
</license>
|
|
**/
|
|
|
|
#include "config.h"
|
|
|
|
RCS_ID("$Id$")
|
|
|
|
#include "GSWeb.h"
|
|
#include "GSWKeyValueAssociation.h"
|
|
#include "GSWConstantValueAssociation.h"
|
|
#include "GSWBindingNameAssociation.h"
|
|
#include <math.h>
|
|
|
|
#include <limits.h>
|
|
#include <float.h>
|
|
|
|
#ifdef TCSDB
|
|
#include <TCSimpleDB/TCSimpleDB.h>
|
|
#endif
|
|
#if HAVE_GDL2
|
|
#include <EOControl/EOKeyValueCoding.h>
|
|
#endif
|
|
|
|
static NSDictionary* localMinMaxDictionary=nil;
|
|
static NSMutableDictionary* associationsHandlerClasses=nil;
|
|
static NSLock* associationsLock=nil;
|
|
static NSMutableArray* associationsLogsHandlerClasses=nil;
|
|
|
|
//====================================================================
|
|
@implementation GSWAssociation
|
|
|
|
+(void)initialize
|
|
{
|
|
if (self==[GSWAssociation class])
|
|
{
|
|
associationsLock=[NSLock new];
|
|
|
|
if (!localMinMaxDictionary)
|
|
{
|
|
localMinMaxDictionary=[[NSDictionary dictionaryWithObjectsAndKeys:
|
|
[NSNumber numberWithShort:SCHAR_MIN],@"SCHAR_MIN",
|
|
[NSNumber numberWithShort:SCHAR_MAX],@"SCHAR_MAX",
|
|
[NSNumber numberWithShort:UCHAR_MAX],@"UCHAR_MAX",
|
|
[NSNumber numberWithShort:CHAR_MIN],@"CHAR_MIN",
|
|
[NSNumber numberWithShort:CHAR_MAX],@"CHAR_MAX",
|
|
[NSNumber numberWithShort:SHRT_MIN],@"SHRT_MIN",
|
|
[NSNumber numberWithShort:SHRT_MAX],@"SHRT_MAX",
|
|
[NSNumber numberWithUnsignedInt:0],@"USHRT_MIN",
|
|
[NSNumber numberWithUnsignedInt:USHRT_MAX],@"USHRT_MAX",
|
|
[NSNumber numberWithInt:INT_MIN],@"INT_MIN",
|
|
[NSNumber numberWithInt:INT_MAX],@"INT_MAX",
|
|
[NSNumber numberWithUnsignedInt:0],@"UINT_MIN",
|
|
[NSNumber numberWithUnsignedInt:UINT_MAX],@"UINT_MAX",
|
|
[NSNumber numberWithLong:LONG_MIN],@"LONG_MIN",
|
|
[NSNumber numberWithLong:LONG_MAX],@"LONG_MAX",
|
|
[NSNumber numberWithUnsignedLong:0],@"ULONG_MIN",
|
|
[NSNumber numberWithUnsignedLong:ULONG_MAX],@"ULONG_MAX",
|
|
#ifdef LONG_LONG_MAX
|
|
[NSNumber numberWithLongLong:LONG_LONG_MIN],@"LONG_LONG_MIN",
|
|
[NSNumber numberWithLongLong:LONG_LONG_MAX],@"LONG_LONG_MAX",
|
|
#endif
|
|
#ifdef ULONG_LONG_MAX
|
|
[NSNumber numberWithUnsignedLongLong:0],@"ULONG_LONG_MIN",
|
|
[NSNumber numberWithUnsignedLongLong:ULONG_LONG_MAX],@"ULONG_LONG_MAX",
|
|
#endif
|
|
[NSNumber numberWithFloat:FLT_MIN],@"FLOAT_MIN",
|
|
[NSNumber numberWithFloat:FLT_MAX],@"FLOAT_MAX",
|
|
[NSNumber numberWithFloat:DBL_MIN],@"DOUBLE_MIN",
|
|
[NSNumber numberWithFloat:DBL_MAX],@"DOUBLE_MAX",
|
|
nil,nil]
|
|
retain];
|
|
};
|
|
};
|
|
};
|
|
|
|
//--------------------------------------------------------------------
|
|
+(void)dealloc
|
|
{
|
|
DESTROY(localMinMaxDictionary);
|
|
DESTROY(associationsHandlerClasses);
|
|
DESTROY(associationsLogsHandlerClasses);
|
|
DESTROY(associationsLock);
|
|
};
|
|
|
|
//--------------------------------------------------------------------
|
|
// init
|
|
-(id)init
|
|
{
|
|
if ((self=[super init]))
|
|
{
|
|
};
|
|
return self;
|
|
};
|
|
|
|
-(void)dealloc
|
|
{
|
|
DESTROY(_bindingName);
|
|
DESTROY(_declarationName);
|
|
DESTROY(_declarationType);
|
|
[super dealloc];
|
|
};
|
|
|
|
//--------------------------------------------------------------------
|
|
-(id)copyWithZone:(NSZone*)zone;
|
|
{
|
|
GSWAssociation* clone = [[isa allocWithZone:zone] init];
|
|
clone->_debugEnabled=_debugEnabled;
|
|
[clone setDebugEnabledForBinding:_bindingName
|
|
declarationName:_declarationName
|
|
declarationType:_declarationType];
|
|
return clone;
|
|
};
|
|
|
|
//--------------------------------------------------------------------
|
|
-(NSString*)description
|
|
{
|
|
GSWLogAssertGood(self);
|
|
LOGObjectFnNotImplemented(); //TODOFN
|
|
return [super description];
|
|
};
|
|
|
|
//--------------------------------------------------------------------
|
|
-(NSString*)bindingName
|
|
{
|
|
return _bindingName;
|
|
};
|
|
|
|
//--------------------------------------------------------------------
|
|
-(NSString*)declarationName
|
|
{
|
|
return _declarationName;
|
|
};
|
|
|
|
//--------------------------------------------------------------------
|
|
-(NSString*)declarationType
|
|
{
|
|
return _declarationType;
|
|
};
|
|
|
|
//--------------------------------------------------------------------
|
|
// isValueConstant
|
|
|
|
-(BOOL)isValueConstant
|
|
{
|
|
//OK
|
|
[self subclassResponsibility:_cmd];
|
|
return NO;
|
|
};
|
|
|
|
//--------------------------------------------------------------------
|
|
// isValueSettable
|
|
|
|
- (BOOL)isValueSettable
|
|
{
|
|
//OK
|
|
[self subclassResponsibility:_cmd];
|
|
return NO;
|
|
};
|
|
|
|
//--------------------------------------------------------------------
|
|
// setValue:inComponent:
|
|
|
|
-(void)setValue:(id)value
|
|
inComponent:(GSWComponent*)component
|
|
{
|
|
[self subclassResponsibility:_cmd];
|
|
};
|
|
|
|
//--------------------------------------------------------------------
|
|
// valueInComponent:
|
|
|
|
-(id)valueInComponent:(GSWComponent*)component;
|
|
{
|
|
return [self subclassResponsibility:_cmd];
|
|
};
|
|
|
|
|
|
@end
|
|
|
|
//====================================================================
|
|
@implementation GSWAssociation (GSWAssociationCreation)
|
|
//--------------------------------------------------------------------
|
|
// associationWithKeyPath:
|
|
|
|
+(GSWAssociation*)associationWithKeyPath:(NSString*)keyPath
|
|
{
|
|
//OK
|
|
if (keyPath)
|
|
{
|
|
if ([keyPath hasPrefix:@"^"]
|
|
|| (!WOStrictFlag && [keyPath hasPrefix:@"~"]))
|
|
return [[[GSWBindingNameAssociation alloc]initWithKeyPath:keyPath] autorelease];
|
|
else
|
|
return [[[GSWKeyValueAssociation alloc]initWithKeyPath:keyPath] autorelease];
|
|
}
|
|
else
|
|
return nil;
|
|
};
|
|
|
|
|
|
//--------------------------------------------------------------------
|
|
// associationWithValue:
|
|
|
|
+(GSWAssociation*)associationWithValue:(id)value
|
|
{
|
|
//OK
|
|
return [[[GSWConstantValueAssociation alloc]initWithValue:value] autorelease];
|
|
};
|
|
|
|
//--------------------------------------------------------------------
|
|
// associationFromString:
|
|
//NDFN
|
|
+(GSWAssociation*)associationFromString:(NSString*)string
|
|
{
|
|
GSWAssociation* assoc=nil;
|
|
LOGClassFnStart();
|
|
NSDebugMLLog(@"associations",@"string=[%@]",string);
|
|
if ([string length]<=0)
|
|
assoc=[self associationWithValue:string];
|
|
else
|
|
{
|
|
NSString* trimmedString=[string stringByTrimmingSpaces];
|
|
if ([trimmedString isEqualToString:NSTYES])
|
|
{
|
|
assoc=[self associationWithValue:GSWNumberYes];
|
|
NSDebugMLLog(@"associations",@"assoc=[%@]",assoc);
|
|
}
|
|
else if ([trimmedString isEqualToString:NSTNO])
|
|
{
|
|
assoc=[self associationWithValue:GSWNumberNo];
|
|
NSDebugMLLog(@"associations",@"assoc=[%@]",assoc);
|
|
}
|
|
else if ([trimmedString hasPrefix:@"^"])
|
|
{
|
|
assoc=[self associationWithKeyPath:trimmedString];
|
|
NSDebugMLLog(@"associations",@"assoc=[%@]",assoc);
|
|
}
|
|
else if ([trimmedString hasPrefix:@"\""])
|
|
{
|
|
if ([trimmedString hasSuffix:@"\""])
|
|
{
|
|
assoc=[self associationWithValue:[[trimmedString stringByDeletingPrefix:@"\""] stringByDeletingSuffix:@"\""]];
|
|
NSDebugMLLog(@"associations",@"assoc=[%@]",assoc);
|
|
}
|
|
else
|
|
{
|
|
ExceptionRaise(@"GSWAssociation",@"String '%@' start with a \" but doesn't finish with a \"",
|
|
trimmedString);
|
|
};
|
|
}
|
|
else if ([trimmedString hasPrefix:@"\'"])
|
|
{
|
|
if ([trimmedString hasSuffix:@"\'"])
|
|
{
|
|
assoc=[self associationWithValue:[[trimmedString stringByDeletingPrefix:@"\'"] stringByDeletingSuffix:@"\'"]];
|
|
NSDebugMLLog(@"associations",@"assoc=[%@]",assoc);
|
|
}
|
|
else
|
|
{
|
|
ExceptionRaise(@"GSWAssociation",@"String '%@' start with a character ' but doesn't finish with a character '",
|
|
trimmedString);
|
|
};
|
|
}
|
|
else if ([trimmedString hasPrefix:@"#"])
|
|
{
|
|
NSString* numberString=[trimmedString stringByDeletingPrefix:@"#"];
|
|
//char* cString=[numberString lossyCString];//TODO
|
|
const char* cString=[numberString cString];//TODO
|
|
char* endPtr=NULL;
|
|
int value=strtol(cString,&endPtr,16);
|
|
NSDebugMLLog(@"associations",@"value=[%d]",value);
|
|
if (endPtr && *endPtr)
|
|
{
|
|
ExceptionRaise(@"GSWAssociation",@"String '%@' start with a '#' but doesn't countain an hexadecimal number (on %dth Character)",
|
|
trimmedString,
|
|
(int)(endPtr-cString+1));
|
|
};
|
|
assoc=[self associationWithValue:GSWIntNumber(value)];
|
|
}
|
|
else
|
|
{
|
|
NSNumber* limit=[localMinMaxDictionary objectForKey:trimmedString];
|
|
NSDebugMLLog(@"associations",@"limit=[%@]",limit);
|
|
if (limit)
|
|
{
|
|
assoc=[self associationWithValue:limit];
|
|
NSDebugMLLog(@"associations",@"assoc=[%@]",assoc);
|
|
}
|
|
else
|
|
{
|
|
NSCharacterSet* cset=[NSCharacterSet characterSetWithCharactersInString:@"-+0123456789"];
|
|
NSRange firstCharRange=[trimmedString rangeOfCharacterFromSet:cset
|
|
options:0
|
|
range:NSMakeRange(0,1)];
|
|
NSDebugMLLog(@"associations",@"firstCharRange.length=%d firstCharRange.location=%d ",
|
|
firstCharRange.length,firstCharRange.location);
|
|
if (firstCharRange.length==0 || firstCharRange.location!=0)
|
|
{
|
|
assoc=[self associationWithKeyPath:trimmedString];
|
|
NSDebugMLLog(@"associations",@"assoc=[%@]",assoc);
|
|
}
|
|
else
|
|
{
|
|
//char* cString=[trimmedString lossyCString];//TODO
|
|
const char* cString=[trimmedString cString];//TODO
|
|
char* endPtr=NULL;
|
|
int value=strtol(cString,&endPtr,10);
|
|
NSDebugMLLog(@"associations",@"value=[%d]",value);
|
|
if (endPtr && *endPtr)
|
|
{
|
|
NSDebugMLLog(@"associations",@"endPtr=[%s]",endPtr);
|
|
NSDebugMLLog(@"associations",@"value=[%d]",value);
|
|
ExceptionRaise(@"GSWAssociation",
|
|
@"String '%@' must be a good number",
|
|
trimmedString);
|
|
};
|
|
assoc=[self associationWithValue:GSWIntNumber(value)];
|
|
};
|
|
};
|
|
};
|
|
};
|
|
NSDebugMLLog(@"associations",@"assoc=[%@]",assoc);
|
|
LOGClassFnStop();
|
|
return assoc;
|
|
};
|
|
|
|
@end
|
|
//====================================================================
|
|
@implementation GSWAssociation (GSWAssociationHandlers)
|
|
//--------------------------------------------------------------------
|
|
+(void)setClasse:(Class)class
|
|
forHandler:(NSString*)handler
|
|
{
|
|
LOGClassFnStart();
|
|
NSDebugMLLog(@"associations",@"class=%@",class);
|
|
NSDebugMLLog(@"associations",@"handler=%@",handler);
|
|
LoggedLockBeforeDate(associationsLock,GSW_LOCK_LIMIT);
|
|
if (!associationsHandlerClasses)
|
|
{
|
|
if (class)
|
|
associationsHandlerClasses=[NSMutableDictionary new];
|
|
};
|
|
if (class)
|
|
[associationsHandlerClasses setObject:class
|
|
forKey:handler];
|
|
else if (associationsHandlerClasses)
|
|
[associationsHandlerClasses removeObjectForKey:handler];
|
|
LoggedUnlock(associationsLock);
|
|
LOGClassFnStop();
|
|
};
|
|
|
|
//--------------------------------------------------------------------
|
|
+(void)addLogHandlerClasse:(Class)class
|
|
{
|
|
LOGClassFnStart();
|
|
NSDebugMLLog(@"associations",@"class=%@",class);
|
|
LoggedLockBeforeDate(associationsLock,GSW_LOCK_LIMIT);
|
|
if (!associationsLogsHandlerClasses)
|
|
{
|
|
if (class)
|
|
associationsLogsHandlerClasses=[NSMutableArray new];
|
|
};
|
|
if (class)
|
|
[associationsLogsHandlerClasses addObject:class];
|
|
LoggedUnlock(associationsLock);
|
|
LOGClassFnStop();
|
|
};
|
|
|
|
//--------------------------------------------------------------------
|
|
+(void)removeLogHandlerClasse:(Class)class
|
|
{
|
|
LOGClassFnStart();
|
|
NSDebugMLLog(@"associations",@"class=%@",class);
|
|
LoggedLockBeforeDate(associationsLock,GSW_LOCK_LIMIT);
|
|
if (associationsHandlerClasses)
|
|
{
|
|
if (class)
|
|
[associationsLogsHandlerClasses removeObject:class];
|
|
};
|
|
LoggedUnlock(associationsLock);
|
|
LOGClassFnStop();
|
|
};
|
|
|
|
@end
|
|
/*
|
|
//====================================================================
|
|
@implementation GSWAssociation (GSWAssociationOldFn)
|
|
//--------------------------------------------------------------------
|
|
// value
|
|
|
|
-(id)value
|
|
{
|
|
GSWContext* context=[[GSWApplication application] context];
|
|
[self valueInComponent:GSWContext_component(context)];
|
|
};
|
|
|
|
//--------------------------------------------------------------------
|
|
// setValue:inComponent:
|
|
//OldFn
|
|
-(void)setValue:(id)value
|
|
{
|
|
GSWContext* context=[[GSWApplication application] context];
|
|
[self setValue:(id)value
|
|
inComponent:GSWContext_component(context)];
|
|
};
|
|
@end
|
|
*/
|
|
//====================================================================
|
|
@implementation GSWAssociation (GSWAssociationA)
|
|
|
|
//--------------------------------------------------------------------
|
|
-(BOOL)isImplementedForComponent:(NSObject*)component
|
|
{
|
|
return YES;
|
|
};
|
|
|
|
@end
|
|
|
|
//====================================================================
|
|
@implementation GSWAssociation (GSWAssociationB)
|
|
|
|
//--------------------------------------------------------------------
|
|
-(NSString*)keyPath
|
|
{
|
|
//OK
|
|
[self subclassResponsibility:_cmd];
|
|
return nil;
|
|
};
|
|
|
|
//--------------------------------------------------------------------
|
|
-(void)logValue:(id)value
|
|
forSet:(BOOL)set
|
|
{
|
|
if (_debugEnabled)
|
|
{
|
|
if (associationsLogsHandlerClasses)
|
|
{
|
|
LoggedLockBeforeDate(associationsLock,GSW_LOCK_LIMIT);
|
|
NS_DURING
|
|
{
|
|
int i=0;
|
|
Class class=Nil;
|
|
int handlerCount=[associationsLogsHandlerClasses count];
|
|
NSString* debugDescription=[self debugDescription];
|
|
for(i=0;i<handlerCount;i++)
|
|
{
|
|
class=[associationsLogsHandlerClasses objectAtIndex:i];
|
|
if (set)
|
|
[class logSetValueForDeclarationNamed:_declarationName
|
|
type:_declarationType
|
|
bindingNamed:_bindingName
|
|
associationDescription:debugDescription
|
|
value:value];
|
|
else
|
|
[class logTakeValueForDeclarationNamed:_declarationName
|
|
type:_declarationType
|
|
bindingNamed:_bindingName
|
|
associationDescription:debugDescription
|
|
value:value];
|
|
};
|
|
}
|
|
NS_HANDLER
|
|
{
|
|
LOGException(@"%@ (%@)",localException,[localException reason]);
|
|
LoggedUnlock(associationsLock);
|
|
[localException raise];
|
|
}
|
|
NS_ENDHANDLER;
|
|
LoggedUnlock(associationsLock);
|
|
};
|
|
};
|
|
};
|
|
|
|
//--------------------------------------------------------------------
|
|
-(void)logTakeValue:(id)value
|
|
{
|
|
[self logValue:value
|
|
forSet:NO];
|
|
};
|
|
|
|
//--------------------------------------------------------------------
|
|
-(void)logSetValue:(id)value
|
|
{
|
|
[self logValue:value
|
|
forSet:YES];
|
|
};
|
|
|
|
//--------------------------------------------------------------------
|
|
-(void)logSynchronizeForValue:(id)value
|
|
inComponent:(GSWComponent*)component
|
|
componentToParent:(BOOL)componentToParent
|
|
{
|
|
if (associationsHandlerClasses)
|
|
{
|
|
LoggedLockBeforeDate(associationsLock,GSW_LOCK_LIMIT);
|
|
NS_DURING
|
|
{
|
|
int i=0;
|
|
Class class=Nil;
|
|
int handlerCount=[associationsLogsHandlerClasses count];
|
|
for(i=0;i<handlerCount;i++)
|
|
{
|
|
class=[associationsLogsHandlerClasses objectAtIndex:i];
|
|
if (componentToParent)
|
|
[class logSynchronizeComponentToParentForValue:value
|
|
association:self
|
|
inComponent:component];
|
|
else
|
|
[class logSynchronizeParentToComponentForValue:value
|
|
association:self
|
|
inComponent:component];
|
|
};
|
|
}
|
|
NS_HANDLER
|
|
{
|
|
LOGException(@"%@ (%@)",localException,[localException reason]);
|
|
LoggedUnlock(associationsLock);
|
|
[localException raise];
|
|
}
|
|
NS_ENDHANDLER;
|
|
LoggedUnlock(associationsLock);
|
|
};
|
|
};
|
|
|
|
//--------------------------------------------------------------------
|
|
-(void)logSynchronizeComponentToParentForValue:(id)value
|
|
inComponent:(GSWComponent*)component
|
|
{
|
|
[self logSynchronizeForValue:value
|
|
inComponent:component
|
|
componentToParent:YES];
|
|
};
|
|
|
|
//--------------------------------------------------------------------
|
|
-(void)logSynchronizeParentToComponentForValue:(id)value
|
|
inComponent:(GSWComponent*)component
|
|
{
|
|
[self logSynchronizeForValue:value
|
|
inComponent:component
|
|
componentToParent:NO];
|
|
};
|
|
|
|
//--------------------------------------------------------------------
|
|
-(NSString*)debugDescription
|
|
{
|
|
//OK
|
|
[self subclassResponsibility:_cmd];
|
|
return nil;
|
|
};
|
|
|
|
//--------------------------------------------------------------------
|
|
-(void)setDebugEnabledForBinding:(NSString*)bindingName
|
|
declarationName:(NSString*)declarationName
|
|
declarationType:(NSString*)declarationType
|
|
{
|
|
_debugEnabled=YES;
|
|
ASSIGN(_bindingName,bindingName);
|
|
ASSIGN(_declarationName,declarationName);
|
|
ASSIGN(_declarationType,declarationType);
|
|
};
|
|
|
|
//--------------------------------------------------------------------
|
|
+(id)valueInComponent:(GSWComponent*)object
|
|
forKeyPath:(NSString*)keyPath
|
|
{
|
|
static id EONullNull=nil;
|
|
//TODO MultiThread Protection ?
|
|
if (!EONullNull)
|
|
{
|
|
#ifdef HAVE_GDL2
|
|
EONullNull=[EONull null];
|
|
#else
|
|
#ifdef TCSDB
|
|
EONullNull=[DBNull null];
|
|
#else
|
|
EONullNull=[NSNull null];
|
|
#endif
|
|
#endif
|
|
};
|
|
id retValue=nil;
|
|
LOGClassFnStart();
|
|
NSDebugMLLog(@"associations",@"GSWAssociation: keyPath=%@ object=%p (class: %@. SuperClass=%@)",
|
|
keyPath,object,[object class],[object superclass]);
|
|
if (keyPath && object && object!=EONullNull)
|
|
{
|
|
#if HAVE_GDL2
|
|
NS_DURING
|
|
{
|
|
NSDebugMLLog(@"associations",@"GSWAssociation: keyPath=%@ object=%p (class: %@. SuperClass=%@)",
|
|
keyPath,object,[object class],[object superclass]);
|
|
retValue=[object valueForKeyPath:keyPath];
|
|
}
|
|
NS_HANDLER
|
|
{
|
|
NSLog(@"Attempt to get %@ -%@ raised an exception (%@)",
|
|
[object class],
|
|
keyPath,
|
|
localException);
|
|
localException = [localException exceptionByAddingToUserInfoKey:@"Invalid Ivars/Methods"
|
|
format:@"-[%@ %@]",
|
|
[object class],
|
|
keyPath];
|
|
[localException raise];
|
|
}
|
|
NS_ENDHANDLER;
|
|
if (retValue==EONullNull)
|
|
retValue=nil;
|
|
#else
|
|
#ifdef TCSDB
|
|
// the same as on GDL2
|
|
NS_DURING
|
|
{
|
|
NSDebugMLLog(@"associations",@"GSWAssociation: keyPath=%@ object=%p (class: %@. SuperClass=%@)",
|
|
keyPath,object,[object class],[object superclass]);
|
|
retValue=[object valueForKeyPath:keyPath];
|
|
}
|
|
NS_HANDLER
|
|
{
|
|
NSLog(@"Attempt to get %@ -%@ raised an exception (%@)",
|
|
[object class],
|
|
keyPath,
|
|
localException);
|
|
localException = [localException exceptionByAddingToUserInfoKey:@"Invalid Ivars/Methods"
|
|
format:@"-[%@ %@]",
|
|
[object class],
|
|
keyPath];
|
|
[localException raise];
|
|
}
|
|
NS_ENDHANDLER;
|
|
if (retValue==EONullNull)
|
|
retValue=nil;
|
|
|
|
#else // NO TCSDB and NO GDL2
|
|
NSMutableArray* keys=[[keyPath componentsSeparatedByString:@"."] mutableCopy];
|
|
id part=nil;
|
|
Class handlerClass=Nil;
|
|
retValue=object;
|
|
NSAssert(retValue,@"No Component");
|
|
NSDebugMLLog(@"associations",@"GSWAssociation: keyPath=%@ object=%p (class: %@. SuperClass=%@)",
|
|
keyPath,object,[object class],[object superclass]);
|
|
while(retValue && [keys count]>0)
|
|
{
|
|
part=[keys objectAtIndex:0];
|
|
[keys removeObjectAtIndex:0];
|
|
if (retValue)
|
|
{
|
|
NSDebugMLLog(@"associations",@"object_get_class_name(retValue object)=%s",
|
|
object_get_class_name(retValue));
|
|
}
|
|
NSDebugMLLog(@"associations",@"part=%@",part);
|
|
NSDebugMLLog(@"associations",@"part class=%@",NSStringFromClass([part class]));
|
|
if ([part hasPrefix:@"\""])
|
|
{
|
|
part=[part stringByDeletingPrefix:@"\""];
|
|
while([keys count]>0)
|
|
{
|
|
id tmpPart=[keys objectAtIndex:0];
|
|
[keys removeObjectAtIndex:0];
|
|
if ([tmpPart hasSuffix:@"\""])
|
|
{
|
|
tmpPart=[tmpPart stringByDeletingSuffix:@"\""];
|
|
part=[part stringByAppendingFormat:@".%@",tmpPart];
|
|
break;
|
|
}
|
|
else
|
|
part=[part stringByAppendingFormat:@".%@",tmpPart];
|
|
}
|
|
}
|
|
NSDebugMLLog(@"associations",@"part=%@",part);
|
|
handlerClass=[associationsHandlerClasses objectForKey:part];
|
|
NSDebugMLLog(@"associations",@"_handlerClass=%@",handlerClass);
|
|
if (handlerClass)
|
|
retValue=[handlerClass processValueInObject:retValue
|
|
forHandler:part
|
|
forKeyPath:keys];
|
|
else if ([part isEqualToString:GSASK_Class])
|
|
{
|
|
Class class=Nil;
|
|
NSAssert2([keys count]>0,@"No class name for handler %@ in %@",
|
|
GSASK_Class,
|
|
keyPath);
|
|
part=[keys objectAtIndex:0];
|
|
[keys removeObjectAtIndex:0];
|
|
NSDebugMLLog(@"associations",@"part=%@",part);
|
|
class=NSClassFromString(part);
|
|
NSAssert3(class>0,@"No class named %@ for handler %@ in %@",
|
|
part,
|
|
GSASK_Class,
|
|
keyPath);
|
|
if (class)
|
|
retValue=class;
|
|
else
|
|
retValue=nil;
|
|
}
|
|
else if ([part isEqualToString:GSASK_Language])
|
|
{
|
|
NSArray* languages=[[GSWApp _context] languages];
|
|
int count=[languages count];
|
|
id v=nil;
|
|
int i=0;
|
|
for(i=0;!v && i<count;i++)
|
|
{
|
|
id language=[languages objectAtIndex:i];
|
|
v=[retValue valueForKey:language];
|
|
};
|
|
retValue=v;
|
|
}
|
|
else
|
|
{
|
|
BOOL skipping = NO;
|
|
NSDebugMLLog(@"associations",@"call %@ valueForKey:%@",
|
|
[retValue class],
|
|
part);
|
|
NS_DURING
|
|
{
|
|
retValue=[retValue valueForKey:part];
|
|
}
|
|
NS_HANDLER
|
|
{
|
|
NSLog(@"Attempt to get %@ -%@ raised an exception (%@)",
|
|
[retValue class],
|
|
part,
|
|
localException);
|
|
localException = [localException exceptionByAddingToUserInfoKey:@"Invalid Ivars/Methods"
|
|
format:@"-[%@ %@]",[retValue class],part];
|
|
[localException raise];
|
|
}
|
|
NS_ENDHANDLER;
|
|
};
|
|
if (retValue==EONullNull)
|
|
retValue=nil;
|
|
};
|
|
#endif
|
|
#endif
|
|
};
|
|
if (retValue)
|
|
{
|
|
NSDebugMLLog(@"associations",@"retValue ptr=%p",retValue);
|
|
NSDebugMLLog(@"associations",@"retValue=%@",retValue);
|
|
}
|
|
else
|
|
{
|
|
NSDebugMLLog(@"associations",@"retValue=nil");
|
|
}
|
|
LOGClassFnStop();
|
|
return retValue;
|
|
};
|
|
|
|
//--------------------------------------------------------------------
|
|
|
|
#ifdef TCSDB
|
|
+(void)setValue:(id)value
|
|
inComponent:(GSWComponent*)object
|
|
forKeyPath:(NSString*)keyPath
|
|
{
|
|
|
|
id tmpObject = nil;
|
|
NSString *tmpKey = nil;
|
|
|
|
LOGClassFnStart();
|
|
NSDebugMLLog(@"associations",@"GSWAssociation: setValue:%@",value);
|
|
NSDebugMLLog(@"associations",@"value class:%@",[value class]);
|
|
NSDebugMLLog(@"associations",@"value String class:%@",NSStringFromClass([value class]));
|
|
NSDebugMLLog(@"associations",@"object String class:%@ superclass=%@",
|
|
NSStringFromClass([object class]),
|
|
NSStringFromClass([object superclass]));
|
|
NSDebugMLLog(@"associations",@"GSWAssociation: keyPath:%@",keyPath);
|
|
|
|
// NSLog(@"GSWAssociation: setValue:%@ inObject:%@ forKeyPath:%@",value,object,keyPath);
|
|
// ... GSWAssociation: setValue:<Color (0x87be648) name=blau nr=1> inObject:<CartListComponent 0x86fa708> forKeyPath:currentCartArticle.color
|
|
|
|
if (keyPath) {
|
|
NSRange r = [keyPath rangeOfString: @"."];
|
|
|
|
if (r.length == 0) {
|
|
tmpObject = object;
|
|
tmpKey = keyPath;
|
|
} else {
|
|
NSString *key = [keyPath substringToIndex: r.location];
|
|
// NSString *path = [keyPath substringFromIndex: NSMaxRange(r)];
|
|
|
|
//[[self valueForKey: key] smartTakeValue: anObject
|
|
// forKeyPath: path];
|
|
|
|
tmpObject = [object valueForKey: key];
|
|
tmpKey = [keyPath substringFromIndex: NSMaxRange(r)];
|
|
}
|
|
//NSLog(@"GSWAssociation: tmpKey:%@ tmpObject:%@",tmpKey,tmpObject);
|
|
|
|
if (tmpObject) //&& [object isKindOfClass:[GSWComponent class]]
|
|
{
|
|
NSException* exp = [tmpObject validateValue:&value
|
|
forKey:tmpKey];
|
|
if (exp)
|
|
{
|
|
NSException* exception=nil;
|
|
exception=[NSException exceptionWithName:@"EOValidationException"
|
|
reason:[exp reason]
|
|
userInfo:[NSDictionary
|
|
dictionaryWithObjectsAndKeys:
|
|
(value ? value : @"nil"),@"EOValidatedObjectUserInfoKey",
|
|
keyPath,@"EOValidatedPropertyUserInfoKey",
|
|
nil,nil]];
|
|
[object validationFailedWithException:exception
|
|
value:value
|
|
keyPath:keyPath];
|
|
} else
|
|
{
|
|
// no exception, set the value
|
|
|
|
[tmpObject takeValue:value
|
|
forKey:tmpKey];
|
|
}
|
|
}
|
|
}
|
|
LOGClassFnStop();
|
|
}
|
|
|
|
#else // GDL2 or GDL1
|
|
|
|
+(void)setValue:(id)value
|
|
inComponent:(GSWComponent*)object
|
|
forKeyPath:(NSString*)keyPath
|
|
{
|
|
LOGClassFnStart();
|
|
NSDebugMLLog(@"associations",@"GSWAssociation: setValue:%@",value);
|
|
NSDebugMLLog(@"associations",@"value class:%@",[value class]);
|
|
NSDebugMLLog(@"associations",@"value String class:%@",NSStringFromClass([value class]));
|
|
NSDebugMLLog(@"associations",@"object String class:%@ superclass=%@",
|
|
NSStringFromClass([object class]),
|
|
NSStringFromClass([object superclass]));
|
|
NSDebugMLLog(@"associations",@"GSWAssociation: keyPath:%@",keyPath);
|
|
if ([keyPath length]==0)
|
|
{
|
|
[NSException raise:NSInvalidArgumentException
|
|
format:@"No key path when setting value %@ in object of class %@",
|
|
value,NSStringFromClass([object class])];
|
|
};
|
|
|
|
#if HAVE_GDL2
|
|
[object smartTakeValue:value
|
|
forKeyPath:keyPath];
|
|
#else // no GDL2
|
|
NSMutableArray* keys=[[keyPath componentsSeparatedByString:@"."] mutableCopy];
|
|
id part=nil;
|
|
id tmpObject=object;
|
|
Class handlerClass=Nil;
|
|
NSAssert(tmpObject,@"No Object");
|
|
while(tmpObject && [keys count]>0)
|
|
{
|
|
part=[keys objectAtIndex:0];
|
|
[keys removeObjectAtIndex:0];
|
|
NSDebugMLLog(@"associations",@"part=%@",part);
|
|
NSDebugMLLog(@"associations",@"part class=%@",NSStringFromClass([part class]));
|
|
if ([part hasPrefix:@"\""])
|
|
{
|
|
part=[part stringByDeletingPrefix:@"\""];
|
|
while([keys count]>0)
|
|
{
|
|
id tmpPart=[keys objectAtIndex:0];
|
|
[keys removeObjectAtIndex:0];
|
|
if ([tmpPart hasSuffix:@"\""])
|
|
{
|
|
tmpPart=[tmpPart stringByDeletingSuffix:@"\""];
|
|
part=[part stringByAppendingFormat:@".%@",tmpPart];
|
|
break;
|
|
}
|
|
else
|
|
part=[part stringByAppendingFormat:@".%@",tmpPart];
|
|
}
|
|
}
|
|
NSDebugMLLog(@"associations",@"part=%@",part);
|
|
|
|
handlerClass=[associationsHandlerClasses objectForKey:part];
|
|
NSDebugMLLog(@"associations",@"handlerClass=%@",handlerClass);
|
|
if (handlerClass)
|
|
{
|
|
tmpObject=[handlerClass processSetValue:value
|
|
inObject:tmpObject
|
|
forHandler:part
|
|
forKeyPath:keys];
|
|
}
|
|
else
|
|
{
|
|
if ([keys count]>0)
|
|
{
|
|
if ([part isEqualToString:GSASK_Class])
|
|
{
|
|
Class class=Nil;
|
|
NSAssert2([keys count]>0,@"No class name for handler %@ in %@",
|
|
GSASK_Class,
|
|
keyPath);
|
|
part=[keys objectAtIndex:0];
|
|
[keys removeObjectAtIndex:0];
|
|
NSDebugMLLog(@"associations",@"part=%@",part);
|
|
class=NSClassFromString(part);
|
|
NSAssert3(class>0,@"No class named %@ for handler %@ in %@",
|
|
part,
|
|
GSASK_Class,
|
|
keyPath);
|
|
if (class)
|
|
tmpObject=class;
|
|
else
|
|
tmpObject=nil;
|
|
}
|
|
else
|
|
{
|
|
tmpObject=[tmpObject valueForKey:part];
|
|
}
|
|
}
|
|
else
|
|
{
|
|
GSWLogAssertGood(tmpObject);
|
|
[tmpObject takeValue:value
|
|
forKey:part];
|
|
#ifdef HAVE_GDL2
|
|
NSDebugMLLog(@"associations",@"object class=%@",[object class]);
|
|
NSDebugMLLog(@"associations",@"tmpObject class=%@",[tmpObject class]);
|
|
// Turbocat
|
|
if (tmpObject && [tmpObject isKindOfClass:[GSWComponent class]])
|
|
{
|
|
NSException* exp = [tmpObject validateValue:&value
|
|
forKey:part];
|
|
if (exp)
|
|
{
|
|
NSException* exception=nil;
|
|
exception=[NSException exceptionWithName:@"EOValidationException"
|
|
reason:[exp reason]
|
|
userInfo:[NSDictionary
|
|
dictionaryWithObjectsAndKeys:
|
|
(value ? value : @"nil"),@"EOValidatedObjectUserInfoKey",
|
|
keyPath,@"EOValidatedPropertyUserInfoKey",
|
|
nil,nil]];
|
|
[object validationFailedWithException:exception
|
|
value:value
|
|
keyPath:keyPath];
|
|
}
|
|
}
|
|
#endif
|
|
tmpObject=nil;
|
|
};
|
|
};
|
|
};
|
|
#endif
|
|
LOGClassFnStop();
|
|
};
|
|
|
|
#endif
|
|
|
|
@end
|
|
|
|
//===================================================================================
|
|
@implementation NSDictionary (GSWAssociation)
|
|
|
|
-(BOOL)isAssociationDebugEnabledInComponent:(GSWComponent*)component
|
|
{
|
|
BOOL debug=NO;
|
|
GSWAssociation* debugAssociation=[self objectForKey:@"GSWDebug"];
|
|
if (debugAssociation)
|
|
{
|
|
id value=[debugAssociation valueInComponent:component];
|
|
debug=boolValueWithDefaultFor(value,NO);
|
|
};
|
|
return debug;
|
|
};
|
|
|
|
-(void)associationsSetDebugEnabled
|
|
{
|
|
NSEnumerator* enumerator=nil;
|
|
id key=nil;
|
|
id association=nil;
|
|
LOGObjectFnStart();
|
|
enumerator = [self keyEnumerator];
|
|
while ((key = [enumerator nextObject]))
|
|
{
|
|
NSDebugMLLog(@"associations",@"key=%@",key);
|
|
association=[self objectForKey:key];
|
|
[association setDebugEnabledForBinding:@""
|
|
declarationName:key
|
|
declarationType:@""]; //TODO
|
|
};
|
|
LOGObjectFnStop();
|
|
};
|
|
|
|
-(void)associationsSetValuesFromObject:(id)from
|
|
inObject:(id)to
|
|
{
|
|
NSEnumerator *enumerator = nil;
|
|
id key=nil;
|
|
id varValue=nil;
|
|
id var=nil;
|
|
LOGObjectFnStart();
|
|
NSDebugMLLog(@"associations",@"from=%@",from);
|
|
NSDebugMLLog(@"associations",@"to=%@",to);
|
|
enumerator = [self keyEnumerator];
|
|
while ((key = [enumerator nextObject]))
|
|
{
|
|
NSDebugMLLog(@"associations",@"key=%@",key);
|
|
/* NSAssert2([key isKindOfClass:[GSWAssociation class]],
|
|
@"key is not an GSWAssociation but a %@: %@",
|
|
[key class],
|
|
key);*/
|
|
var=[self objectForKey:key];
|
|
NSDebugMLLog(@"associations",@"var=%@",var);
|
|
/* NSAssert2([var isKindOfClass:[GSWAssociation class]],
|
|
@"Variable is not an GSWAssociation but a %@: %@",
|
|
[var class],
|
|
var);*/
|
|
if ([var isKindOfClass:[GSWAssociation class]])
|
|
varValue=[var valueInComponent:from];
|
|
else
|
|
varValue=var;
|
|
NSDebugMLLog(@"associations",@"varValue=%@",varValue);
|
|
if (![key isKindOfClass:[GSWAssociation class]])
|
|
key=[GSWAssociation associationWithKeyPath:key];
|
|
[key setValue:varValue
|
|
inComponent:to];
|
|
};
|
|
LOGObjectFnStop();
|
|
};
|
|
|
|
//--------------------------------------------------------------------
|
|
-(NSDictionary*)associationsWithoutPrefix:(NSString*)prefix
|
|
removeFrom:(NSMutableDictionary*)removeFrom
|
|
{
|
|
NSMutableDictionary* newAssociation=nil;
|
|
NSEnumerator *enumerator = nil;
|
|
id key=nil;
|
|
id varKey=nil;
|
|
id varKeyAssociation=nil;
|
|
id value=nil;
|
|
LOGObjectFnStart();
|
|
newAssociation=(NSMutableDictionary*)[NSMutableDictionary dictionary];
|
|
enumerator = [self keyEnumerator];
|
|
while ((key = [enumerator nextObject]))
|
|
{
|
|
NSDebugMLLog(@"associations",@"key=%@",key);
|
|
if ([key hasPrefix:prefix])
|
|
{
|
|
value=[self objectForKey:key];
|
|
NSDebugMLLog(@"associations",@"value=%@",value);
|
|
varKey=[key stringByDeletingPrefix:prefix];
|
|
NSDebugMLLog(@"associations",@"varKey=%@",varKey);
|
|
varKeyAssociation=[GSWAssociation associationWithKeyPath:varKey];
|
|
NSDebugMLLog(@"associations",@"varKeyAssociation=%@",varKeyAssociation);
|
|
[newAssociation setObject:value
|
|
forKey:varKeyAssociation];
|
|
[removeFrom removeObjectForKey:key];
|
|
};
|
|
};
|
|
newAssociation=[NSDictionary dictionaryWithDictionary:newAssociation];
|
|
LOGObjectFnStop();
|
|
return newAssociation;
|
|
};
|
|
|
|
//--------------------------------------------------------------------
|
|
-(NSDictionary*)dictionaryByReplacingStringsWithAssociations
|
|
{
|
|
NSMutableDictionary* newDictionary=[NSMutableDictionary dictionary];
|
|
NSEnumerator* enumerator=[self keyEnumerator];
|
|
id key=nil;
|
|
id value=nil;
|
|
id newValue=nil;
|
|
while ((key=[enumerator nextObject]))
|
|
{
|
|
value=[self objectForKey:key];
|
|
NSDebugMLog(@"key=%@ value=%@",key,value);
|
|
if ([value isKindOfClass:[NSString class]])
|
|
{
|
|
newValue=[GSWAssociation associationFromString:value];
|
|
NSAssert(newValue,@"Nil value");
|
|
}
|
|
else if ([value isKindOfClass:[NSArray class]])
|
|
{
|
|
newValue=[value arrayByReplacingStringsWithAssociations];
|
|
NSAssert(newValue,@"Nil value");
|
|
}
|
|
else if ([value isKindOfClass:[NSDictionary class]])
|
|
{
|
|
newValue=[value dictionaryByReplacingStringsWithAssociations];
|
|
NSAssert(newValue,@"Nil value");
|
|
}
|
|
else
|
|
newValue=value;
|
|
[newDictionary setObject:newValue
|
|
forKey:key];
|
|
};
|
|
return [NSDictionary dictionaryWithDictionary:newDictionary];
|
|
};
|
|
|
|
@end
|
|
|
|
//===================================================================================
|
|
@implementation NSArray (GSWAssociation)
|
|
-(NSArray*)arrayByReplacingStringsWithAssociations
|
|
{
|
|
NSMutableArray* newArray=[NSMutableArray array];
|
|
int count=[self count];
|
|
int i=0;
|
|
id value=nil;
|
|
id newValue=nil;
|
|
for(i=0;i<count;i++)
|
|
{
|
|
value=[self objectAtIndex:i];
|
|
NSDebugMLog(@"i=%d value=%@",i,value);
|
|
if ([value isKindOfClass:[NSString class]])
|
|
{
|
|
newValue=[GSWAssociation associationFromString:value];
|
|
}
|
|
else if ([value isKindOfClass:[NSArray class]])
|
|
{
|
|
newValue=[value arrayByReplacingStringsWithAssociations];
|
|
}
|
|
else if ([value isKindOfClass:[NSDictionary class]])
|
|
{
|
|
newValue=[value dictionaryByReplacingStringsWithAssociations];
|
|
}
|
|
else
|
|
newValue=value;
|
|
[newArray addObject:newValue];
|
|
};
|
|
return [NSArray arrayWithArray:newArray];
|
|
};
|
|
@end
|