LupusNobilis
/
sogo
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

Monotone-Parent: 4aaa3d89a907d67df8c23bdce5f9fb5be71e663d 

Monotone-Revision: 07a28abc844008a513555a2e67b3e7e410b3f355

Monotone-Author: wsourdeau@inverse.ca
Monotone-Date: 2007-04-16T17:36:56
Monotone-Branch: ca.inverse.sogo
maint-2.0.2
Wolfgang Sourdeau 2007-04-16 17:36:56 +00:00
parent 4063ec97a6
commit e6ee684ac4
2 changed files with 179 additions and 220 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
ChangeLog
View File

@ -1,3 +1,9 @@
2007-04-16 Wolfgang Sourdeau <wsourdeau@inverse.ca>
* Main/SOGo.m ([SOGo +initialize]): on GNUstep, trigger some
debugging facilities when the SOGoDebugObjectAllocation user
default is set.
2007-04-11 Wolfgang Sourdeau <wsourdeau@inverse.ca> 2007-04-11 Wolfgang Sourdeau <wsourdeau@inverse.ca>
* SoObjects/SOGo/NSString+Utilities.m ([NSString -boolValue]): new * SoObjects/SOGo/NSString+Utilities.m ([NSString -boolValue]): new

377
Main/SOGo.m
View File

@ -21,92 +21,6 @@
#include <NGObjWeb/SoApplication.h> #include <NGObjWeb/SoApplication.h>
// @interface classtree : NSObject
// {
// Class topClass;
// int indentLevel;
// }
// - (id) initWithTopClass: (Class) newTopClass;
// - (void) dumpSiblings: (Class) node;
// @end
// @implementation classtree
// + (id) newWithTopClass: (Class) newTopClass
// {
// id newTree;
// newTree = [[self alloc] initWithTopClass: newTopClass];
// [newTree autorelease];
// return newTree;
// }
// - (id) initWithTopClass: (Class) newTopClass
// {
// if ((self = [self init]))
// topClass = newTopClass;
// return self;
// }
// #define indentGap 2
// - (NSString *) indentSpaces
// {
// char *spaceString;
// spaceString = malloc(sizeof (char *) * indentGap * indentLevel + 1);
// *(spaceString + indentGap * indentLevel) = 0;
// memset (spaceString, ' ', indentGap * indentLevel);
// return [[NSString alloc] initWithCStringNoCopy: spaceString
// length: indentGap * indentLevel
// freeWhenDone: YES];
// }
// - (void) dumpNode: (Class) node
// {
// Class currentSubclass;
// unsigned int count;
// count = 0;
// currentSubclass = node->subclass_list;
// if (currentSubclass)
// {
// NSLog(@"%@%@:",
// [[self indentSpaces] autorelease], NSStringFromClass(node));
// indentLevel++;
// [self dumpSiblings: currentSubclass];
// indentLevel--;
// }
// else
// NSLog(@"%@%@", [self indentSpaces], NSStringFromClass(node));
// }
// - (void) dumpSiblings: (Class) node
// {
// Class currentNode;
// currentNode = node;
// while (currentNode && currentNode->instance_size)
// {
// [self dumpNode: currentNode];
// currentNode = currentNode->sibling_class;
// }
// }
// - (void) dumpTree
// {
// indentLevel = 0;
// [self dumpSiblings: topClass];
// }
// @end
@interface SOGo : SoApplication @interface SOGo : SoApplication
{ {
NSMutableDictionary *localeLUT; NSMutableDictionary *localeLUT;
@ -129,27 +43,37 @@
static unsigned int vMemSizeLimit = 0; static unsigned int vMemSizeLimit = 0;
static BOOL doCrashOnSessionCreate = NO; static BOOL doCrashOnSessionCreate = NO;
+ (void)initialize { #ifdef GNUSTEP_BASE_LIBRARY
static BOOL debugObjectAllocation = NO;
#endif
+ (void) initialize
{
NSUserDefaults *ud = [NSUserDefaults standardUserDefaults]; NSUserDefaults *ud = [NSUserDefaults standardUserDefaults];
SoClassSecurityInfo *sInfo; SoClassSecurityInfo *sInfo;
NSArray *basicRoles; NSArray *basicRoles;
id tmp; id tmp;
doCrashOnSessionCreate = [ud boolForKey:@"SOGoCrashOnSessionCreate"]; doCrashOnSessionCreate = [ud boolForKey:@"SOGoCrashOnSessionCreate"];
#ifdef GNUSTEP_BASE_LIBRARY
debugObjectAllocation = [ud boolForKey: @"SOGoDebugObjectAllocation"];
if (debugObjectAllocation)
{
NSLog (@"activating stats on object allocation");
GSDebugAllocationActive (YES);
}
#endif
/* vMem size check - default is 200MB */ /* vMem size check - default is 200MB */
tmp = [ud objectForKey:@"SxVMemLimit"]; tmp = [ud objectForKey: @"SxVMemLimit"];
vMemSizeLimit = (tmp != nil) vMemSizeLimit = ((tmp != nil) ? [tmp intValue] : 200);
? [tmp intValue] if (vMemSizeLimit > 0)
: 200;
if (vMemSizeLimit > 0) {
NSLog(@"Note: vmem size check enabled: shutting down app when " NSLog(@"Note: vmem size check enabled: shutting down app when "
@"vmem > %d MB", vMemSizeLimit); @"vmem > %d MB", vMemSizeLimit);
}
#if LIB_FOUNDATION_LIBRARY #if LIB_FOUNDATION_LIBRARY
if ([ud boolForKey:@"SOGoEnableDoubleReleaseCheck"]) if ([ud boolForKey:@"SOGoEnableDoubleReleaseCheck"])
[NSAutoreleasePool enableDoubleReleaseCheck:YES]; [NSAutoreleasePool enableDoubleReleaseCheck: YES];
#endif #endif
/* SoClass security declarations */ /* SoClass security declarations */
@ -168,42 +92,49 @@ static BOOL doCrashOnSessionCreate = NO;
[sInfo declareRoles: basicRoles asDefaultForPermission: SoPerm_WebDAVAccess]; [sInfo declareRoles: basicRoles asDefaultForPermission: SoPerm_WebDAVAccess];
} }
- (id)init { - (id) init
if ((self = [super init])) { {
WOResourceManager *rm; if ((self = [super init]))
{
WOResourceManager *rm;
/* ensure core SoClass'es are setup */ /* ensure core SoClass'es are setup */
[$(@"SOGoObject") soClass]; [$(@"SOGoObject") soClass];
[$(@"SOGoContentObject") soClass]; [$(@"SOGoContentObject") soClass];
[$(@"SOGoFolder") soClass]; [$(@"SOGoFolder") soClass];
/* setup locale cache */ /* setup locale cache */
self->localeLUT = [[NSMutableDictionary alloc] initWithCapacity:2]; localeLUT = [[NSMutableDictionary alloc] initWithCapacity:2];
/* load products */ /* load products */
[[SOGoProductLoader productLoader] loadProducts]; [[SOGoProductLoader productLoader] loadProducts];
/* setup resource manager */
rm = [[WEResourceManager alloc] init];
[self setResourceManager:rm];
}
/* setup resource manager */
rm = [[WEResourceManager alloc] init];
[self setResourceManager:rm];
}
return self; return self;
} }
- (void)dealloc { - (void) dealloc
[self->localeLUT release]; {
[localeLUT release];
[super dealloc]; [super dealloc];
} }
/* authenticator */ /* authenticator */
- (id)authenticatorInContext:(id)_ctx { - (id) authenticatorInContext: (id) _ctx
{
return [$(@"SOGoAuthenticator") sharedSOGoAuthenticator]; return [$(@"SOGoAuthenticator") sharedSOGoAuthenticator];
} }
/* name lookup */ /* name lookup */
- (BOOL)isUserName:(NSString *)_key inContext:(id)_ctx { - (BOOL) isUserName: (NSString *) _key
inContext: (id) _ctx
{
if ([_key length] < 1) if ([_key length] < 1)
return NO; return NO;
@ -218,21 +149,29 @@ static BOOL doCrashOnSessionCreate = NO;
initWithName:_key inContainer:self] autorelease]; initWithName:_key inContainer:self] autorelease];
} }
- (void)_setupLocaleInContext:(WOContext *)_ctx { - (void) _setupLocaleInContext: (WOContext *) _ctx
{
NSArray *langs; NSArray *langs;
NSDictionary *locale; NSDictionary *locale;
if ([[_ctx valueForKey:@"locale"] isNotNull]) if ([[_ctx valueForKey:@"locale"] isNotNull])
return; return;
langs = [[(WOContext *)_ctx request] browserLanguages]; langs = [[_ctx request] browserLanguages];
locale = [self currentLocaleConsideringLanguages:langs]; locale = [self currentLocaleConsideringLanguages:langs];
[_ctx takeValue:locale forKey:@"locale"]; [_ctx takeValue:locale forKey:@"locale"];
} }
- (id)lookupName:(NSString *)_key inContext:(id)_ctx acquire:(BOOL)_flag { - (id) lookupName: (NSString *) _key
inContext: (id) _ctx
acquire: (BOOL) _flag
{
id obj; id obj;
#ifdef GNUSTEP_BASE_LIBRARY
if (debugObjectAllocation)
NSLog(@"objects allocated\n%s", GSDebugAllocationList (YES));
#endif
/* put locale info into the context in case it's not there */ /* put locale info into the context in case it's not there */
[self _setupLocaleInContext:_ctx]; [self _setupLocaleInContext:_ctx];
@ -259,15 +198,16 @@ static BOOL doCrashOnSessionCreate = NO;
/* WebDAV */ /* WebDAV */
- (NSString *)davDisplayName { - (NSString *) davDisplayName
{
/* this is used in the UI, eg in the navigation */ /* this is used in the UI, eg in the navigation */
return @"SOGo"; return @"SOGo";
} }
/* exception handling */ /* exception handling */
- (WOResponse *)handleException:(NSException *)_exc - (WOResponse *) handleException: (NSException *) _exc
inContext:(WOContext *)_ctx inContext: (WOContext *) _ctx
{ {
printf("EXCEPTION: %s\n", [[_exc description] cString]); printf("EXCEPTION: %s\n", [[_exc description] cString]);
abort(); abort();
@ -275,56 +215,54 @@ static BOOL doCrashOnSessionCreate = NO;
/* runtime maintenance */ /* runtime maintenance */
// - (void) _dumpClassAllocation - (void) checkIfDaemonHasToBeShutdown
// { {
// classtree *ct; unsigned int vmem;
// ct = [classtree newWithTopClass: [NSObject class]]; if (vMemSizeLimit > 0)
// [ct dumpTree]; {
// } vmem = [[NSProcessInfo processInfo] virtualMemorySize]/1048576;
- (void)checkIfDaemonHasToBeShutdown { if (vmem > vMemSizeLimit)
unsigned int limit, vmem; {
[self logWithFormat:
if ((limit = vMemSizeLimit) == 0) @"terminating app, vMem size limit (%d MB) has been reached"
return; @" (currently %d MB)",
vMemSizeLimit, vmem];
vmem = [[NSProcessInfo processInfo] virtualMemorySize]/1048576; // if (debugObjectAllocation)
// [self _dumpClassAllocation];
if (vmem > limit) { [self terminate];
[self logWithFormat: }
@"terminating app, vMem size limit (%d MB) has been reached" }
@" (currently %d MB)",
limit, vmem];
// [self _dumpClassAllocation];
[self terminate];
}
} }
- (WOResponse *)dispatchRequest:(WORequest *)_request { - (WOResponse *) dispatchRequest: (WORequest *) _request
{
static NSArray *runLoopModes = nil; static NSArray *runLoopModes = nil;
WOResponse *resp; WOResponse *resp;
resp = [super dispatchRequest:_request]; resp = [super dispatchRequest: _request];
if ([self isTerminating]) if (![self isTerminating])
return resp; {
if (!runLoopModes)
runLoopModes = [[NSArray alloc] initWithObjects: NSDefaultRunLoopMode, nil];
if (runLoopModes == nil) // TODO: a bit complicated? (-perform:afterDelay: doesn't work?)
runLoopModes = [[NSArray alloc] initWithObjects:NSDefaultRunLoopMode, nil]; [[NSRunLoop currentRunLoop] performSelector:
@selector (checkIfDaemonHasToBeShutdown)
target: self argument: nil
order:1 modes:runLoopModes];
}
// TODO: a bit complicated? (-perform:afterDelay: doesn't work?)
[[NSRunLoop currentRunLoop] performSelector:
@selector(checkIfDaemonHasToBeShutdown)
target:self argument:nil
order:1 modes:runLoopModes];
return resp; return resp;
} }
/* session management */ /* session management */
- (id)createSessionForRequest:(WORequest *)_request { - (id) createSessionForRequest: (WORequest *) _request
[self warnWithFormat:@"session creation requested!"]; {
[self warnWithFormat: @"session creation requested!"];
if (doCrashOnSessionCreate) if (doCrashOnSessionCreate)
abort(); abort();
return [super createSessionForRequest:_request]; return [super createSessionForRequest:_request];
@ -332,87 +270,102 @@ static BOOL doCrashOnSessionCreate = NO;
/* localization */ /* localization */
- (NSDictionary *)currentLocaleConsideringLanguages:(NSArray *)_langs { - (NSDictionary *) currentLocaleConsideringLanguages: (NSArray *) langs
unsigned i, count; {
NSEnumerator *enumerator;
NSString *lname;
NSDictionary *locale;
/* assume _langs is ordered by priority */ enumerator = [langs objectEnumerator];
count = [_langs count]; lname = nil;
for (i = 0; i < count; i++) { locale = nil;
NSString *lname; lname = [enumerator nextObject];
NSDictionary *locale; while (lname && !locale)
{
locale = [self localeForLanguageNamed: lname];
lname = [enumerator nextObject];
}
if (!locale)
locale = [self localeForLanguageNamed: @"English"];
lname = [_langs objectAtIndex:i];
locale = [self localeForLanguageNamed:lname];
if (locale != nil)
return locale;
}
/* no appropriate language, fallback to default */ /* no appropriate language, fallback to default */
return [self localeForLanguageNamed:@"English"]; return locale;
} }
- (NSString *)pathToLocaleForLanguageNamed:(NSString *)_name { - (NSString *) pathToLocaleForLanguageNamed: (NSString *) _name
{
static Class MainProduct = Nil; static Class MainProduct = Nil;
NSString *lpath; NSString *lpath;
lpath = [[self resourceManager] pathForResourceNamed:@"Locale" lpath = [[self resourceManager] pathForResourceNamed: @"Locale"
inFramework:nil inFramework: nil
languages:[NSArray arrayWithObject:_name]]; languages: [NSArray arrayWithObject:_name]];
if ([lpath isNotNull]) if (![lpath length])
return lpath; {
if (!MainProduct)
{
MainProduct = $(@"MainUIProduct");
if (!MainProduct)
[self errorWithFormat: @"did not find MainUIProduct class!"];
}
if (MainProduct == Nil) { lpath = [(id) MainProduct pathToLocaleForLanguageNamed: _name];
if ((MainProduct = $(@"MainUIProduct")) == Nil) if (![lpath length])
[self errorWithFormat:@"did not find MainUIProduct class!"]; lpath = nil;
} }
lpath = [(id)MainProduct pathToLocaleForLanguageNamed:_name]; return lpath;
if ([lpath isNotNull])
return lpath;
return nil;
} }
- (NSDictionary *)localeForLanguageNamed:(NSString *)_name { - (NSDictionary *) localeForLanguageNamed: (NSString *) _name
{
NSString *lpath; NSString *lpath;
id data; id data;
NSDictionary *locale; NSDictionary *locale;
if (![_name isNotNull]) { locale = nil;
if ([_name length] > 0)
{
locale = [localeLUT objectForKey: _name];
if (!locale)
{
lpath = [self pathToLocaleForLanguageNamed:_name];
if (lpath)
{
data = [NSData dataWithContentsOfFile: lpath];
if (data)
{
data = [[[NSString alloc] initWithData: data
encoding: NSUTF8StringEncoding] autorelease];
locale = [data propertyList];
if (locale)
[localeLUT setObject: locale forKey: _name];
else
[self logWithFormat:@"%s couldn't load locale with name:%@",
__PRETTY_FUNCTION__,
_name];
}
else
[self logWithFormat:@"%s didn't find locale with name: %@",
__PRETTY_FUNCTION__,
_name];
}
else
[self errorWithFormat:@"did not find Locale for language: %@", _name];
}
}
else
[self errorWithFormat:@"%s: name parameter must not be nil!", [self errorWithFormat:@"%s: name parameter must not be nil!",
__PRETTY_FUNCTION__]; __PRETTY_FUNCTION__];
return nil;
}
if ((locale = [self->localeLUT objectForKey:_name]) != nil)
return locale;
if ((lpath = [self pathToLocaleForLanguageNamed:_name]) == nil) {
[self errorWithFormat:@"did not find Locale for language: %@", _name];
return nil;
}
if ((data = [NSData dataWithContentsOfFile:lpath]) == nil) {
[self logWithFormat:@"%s didn't find locale with name:%@",
__PRETTY_FUNCTION__,
_name];
return nil;
}
data = [[[NSString alloc] initWithData:data
encoding:NSUTF8StringEncoding] autorelease];
locale = [data propertyList];
if (locale == nil) {
[self logWithFormat:@"%s couldn't load locale with name:%@",
__PRETTY_FUNCTION__,
_name];
return nil;
}
[self->localeLUT setObject:locale forKey:_name];
return locale; return locale;
} }
/* name (used by the WEResourceManager) */ /* name (used by the WEResourceManager) */
- (NSString *)name { - (NSString *) name
{
return @"SOGo-0.9"; return @"SOGo-0.9";
} }