mirror of
https://github.com/gnustep/libs-base.git
synced 2025-06-01 09:02:01 +00:00
Ensure we have the standard path prefixes
git-svn-id: svn+ssh://svn.gna.org/svn/gnustep/libs/base/trunk@10324 72102866-910b-0410-8b05-ffd578937521
This commit is contained in:
CaS
parent
9c2889563b
commit
c51dfe21de
2 changed files with 136 additions and 115 deletions
|
|
@ -2,6 +2,7 @@
|
||||||
|
|
||||||
* Source/NSUser.m: NSSearchPathForDirectoriesInDomains() Set up
|
* Source/NSUser.m: NSSearchPathForDirectoriesInDomains() Set up
|
||||||
default values if environment variables are missing.
|
default values if environment variables are missing.
|
||||||
|
Use common code for getting path prefixes and search directories.
|
||||||
|
|
||||||
2001-07-07 Richard Frith-Macdonald <rfm@gnu.org>
|
2001-07-07 Richard Frith-Macdonald <rfm@gnu.org>
|
||||||
|
|
||||||
|
|
|
||||||
250
Source/NSUser.m
250
Source/NSUser.m
|
|
@ -199,6 +199,132 @@ NSFullUserName(void)
|
||||||
#endif
|
#endif
|
||||||
}
|
}
|
||||||
|
|
||||||
|
|
||||||
|
/* We read these four only once */
|
||||||
|
static NSString *gnustep_user_root = nil; /* GNUSTEP_USER_ROOT */
|
||||||
|
static NSString *gnustep_local_root = nil; /* GNUSTEP_LOCAL_ROOT */
|
||||||
|
static NSString *gnustep_network_root = nil; /* GNUSTEP_NETWORK_ROOT */
|
||||||
|
static NSString *gnustep_system_root = nil; /* GNUSTEP_SYSTEM_ROOT */
|
||||||
|
|
||||||
|
static void
|
||||||
|
setupPathNames()
|
||||||
|
{
|
||||||
|
if (gnustep_system_root == nil)
|
||||||
|
{
|
||||||
|
NS_DURING
|
||||||
|
{
|
||||||
|
NSDictionary *env;
|
||||||
|
|
||||||
|
[gnustep_global_lock lock];
|
||||||
|
|
||||||
|
/* Double-Locking Pattern */
|
||||||
|
if (gnustep_system_root == nil)
|
||||||
|
{
|
||||||
|
BOOL warned = NO;
|
||||||
|
|
||||||
|
env = [[NSProcessInfo processInfo] environment];
|
||||||
|
/* Any of the following might be nil */
|
||||||
|
gnustep_system_root = [env objectForKey: @"GNUSTEP_SYSTEM_ROOT"];
|
||||||
|
TEST_RETAIN (gnustep_system_root);
|
||||||
|
if (gnustep_system_root == nil)
|
||||||
|
{
|
||||||
|
/*
|
||||||
|
* This is pretty important as we need it to load
|
||||||
|
* character sets, language settings and similar
|
||||||
|
* resources. Use fprintf to avoid recursive calls.
|
||||||
|
*/
|
||||||
|
warned = YES;
|
||||||
|
fprintf (stderr,
|
||||||
|
"Warning - GNUSTEP_SYSTEM_ROOT is not set "
|
||||||
|
"- using /usr/GNUstep/System as a default\n");
|
||||||
|
gnustep_system_root = @"/usr/GNUstep/System";
|
||||||
|
}
|
||||||
|
|
||||||
|
gnustep_local_root = [env objectForKey: @"GNUSTEP_LOCAL_ROOT"];
|
||||||
|
TEST_RETAIN (gnustep_local_root);
|
||||||
|
if (gnustep_local_root == nil)
|
||||||
|
{
|
||||||
|
if ([[gnustep_system_root lastPathComponent] isEqual:
|
||||||
|
@"System"] == YES)
|
||||||
|
{
|
||||||
|
gnustep_local_root = [[gnustep_system_root
|
||||||
|
stringByDeletingLastPathComponent]
|
||||||
|
stringByAppendingPathComponent: @"Local"];
|
||||||
|
TEST_RETAIN (gnustep_local_root);
|
||||||
|
}
|
||||||
|
else
|
||||||
|
{
|
||||||
|
gnustep_local_root = @"/usr/GNUstep/Local";
|
||||||
|
}
|
||||||
|
#ifndef NDEBUG
|
||||||
|
if (warned == NO)
|
||||||
|
{
|
||||||
|
warned = YES;
|
||||||
|
fprintf (stderr,
|
||||||
|
"Warning - GNUSTEP_LOCAL_ROOT is not set "
|
||||||
|
"- using %s\n", [gnustep_local_root lossyCString]);
|
||||||
|
}
|
||||||
|
#endif
|
||||||
|
}
|
||||||
|
|
||||||
|
gnustep_network_root = [env objectForKey:
|
||||||
|
@"GNUSTEP_NETWORK_ROOT"];
|
||||||
|
TEST_RETAIN (gnustep_network_root);
|
||||||
|
if (gnustep_network_root == nil)
|
||||||
|
{
|
||||||
|
if ([[gnustep_system_root lastPathComponent] isEqual:
|
||||||
|
@"System"] == YES)
|
||||||
|
{
|
||||||
|
gnustep_network_root = [[gnustep_system_root
|
||||||
|
stringByDeletingLastPathComponent]
|
||||||
|
stringByAppendingPathComponent: @"Network"];
|
||||||
|
TEST_RETAIN (gnustep_network_root);
|
||||||
|
}
|
||||||
|
else
|
||||||
|
{
|
||||||
|
gnustep_network_root = @"/usr/GNUstep/Network";
|
||||||
|
}
|
||||||
|
#ifndef NDEBUG
|
||||||
|
if (warned == NO)
|
||||||
|
{
|
||||||
|
warned = YES;
|
||||||
|
fprintf (stderr,
|
||||||
|
"Warning - GNUSTEP_NETWORK_ROOT is not set "
|
||||||
|
"- using %s\n", [gnustep_network_root lossyCString]);
|
||||||
|
}
|
||||||
|
#endif
|
||||||
|
}
|
||||||
|
|
||||||
|
gnustep_user_root = [env objectForKey: @"GNUSTEP_USER_ROOT"];
|
||||||
|
TEST_RETAIN (gnustep_user_root);
|
||||||
|
if (gnustep_user_root == nil)
|
||||||
|
{
|
||||||
|
gnustep_user_root = [NSHomeDirectory()
|
||||||
|
stringByAppendingPathComponent: @"GNUstep"];
|
||||||
|
TEST_RETAIN (gnustep_user_root);
|
||||||
|
if (warned == NO)
|
||||||
|
{
|
||||||
|
warned = YES;
|
||||||
|
fprintf (stderr,
|
||||||
|
"Warning - GNUSTEP_USER_ROOT is not set "
|
||||||
|
"- using %s\n", [gnustep_user_root lossyCString]);
|
||||||
|
}
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
[gnustep_global_lock unlock];
|
||||||
|
}
|
||||||
|
NS_HANDLER
|
||||||
|
{
|
||||||
|
// unlock then re-raise the exception
|
||||||
|
[gnustep_global_lock unlock];
|
||||||
|
[localException raise];
|
||||||
|
}
|
||||||
|
NS_ENDHANDLER
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
|
||||||
NSArray *
|
NSArray *
|
||||||
GSStandardPathPrefixes(void)
|
GSStandardPathPrefixes(void)
|
||||||
{
|
{
|
||||||
|
|
@ -222,19 +348,23 @@ GSStandardPathPrefixes(void)
|
||||||
NSString *str;
|
NSString *str;
|
||||||
unsigned count = 0;
|
unsigned count = 0;
|
||||||
|
|
||||||
str = [env objectForKey: @"GNUSTEP_USER_ROOT"];
|
if (gnustep_system_root == nil)
|
||||||
|
{
|
||||||
|
setupPathNames();
|
||||||
|
}
|
||||||
|
str = gnustep_user_root;
|
||||||
if (str != nil)
|
if (str != nil)
|
||||||
strings[count++] = str;
|
strings[count++] = str;
|
||||||
|
|
||||||
str = [env objectForKey: @"GNUSTEP_LOCAL_ROOT"];
|
str = gnustep_local_root;
|
||||||
if (str != nil)
|
if (str != nil)
|
||||||
strings[count++] = str;
|
strings[count++] = str;
|
||||||
|
|
||||||
str = [env objectForKey: @"GNUSTEP_NETWORK_ROOT"];
|
str = gnustep_network_root;
|
||||||
if (str != nil)
|
if (str != nil)
|
||||||
strings[count++] = str;
|
strings[count++] = str;
|
||||||
|
|
||||||
str = [env objectForKey: @"GNUSTEP_SYSTEM_ROOT"];
|
str = gnustep_system_root;
|
||||||
if (str != nil)
|
if (str != nil)
|
||||||
strings[count++] = str;
|
strings[count++] = str;
|
||||||
|
|
||||||
|
|
@ -375,11 +505,6 @@ NSArray *
|
||||||
NSSearchPathForDirectoriesInDomains(NSSearchPathDirectory directoryKey,
|
NSSearchPathForDirectoriesInDomains(NSSearchPathDirectory directoryKey,
|
||||||
NSSearchPathDomainMask domainMask, BOOL expandTilde)
|
NSSearchPathDomainMask domainMask, BOOL expandTilde)
|
||||||
{
|
{
|
||||||
/* We read these four only once */
|
|
||||||
static NSString *gnustep_user_root = nil; /* GNUSTEP_USER_ROOT */
|
|
||||||
static NSString *gnustep_local_root = nil; /* GNUSTEP_LOCAL_ROOT */
|
|
||||||
static NSString *gnustep_network_root = nil; /* GNUSTEP_NETWORK_ROOT */
|
|
||||||
static NSString *gnustep_system_root = nil; /* GNUSTEP_SYSTEM_ROOT */
|
|
||||||
NSFileManager *fm;
|
NSFileManager *fm;
|
||||||
NSString *adminDir = @"Administrator";
|
NSString *adminDir = @"Administrator";
|
||||||
NSString *appsDir = @"Apps";
|
NSString *appsDir = @"Apps";
|
||||||
|
|
@ -395,112 +520,7 @@ NSSearchPathForDirectoriesInDomains(NSSearchPathDirectory directoryKey,
|
||||||
|
|
||||||
if (gnustep_system_root == nil)
|
if (gnustep_system_root == nil)
|
||||||
{
|
{
|
||||||
NS_DURING
|
setupPathNames();
|
||||||
{
|
|
||||||
NSDictionary *env;
|
|
||||||
|
|
||||||
[gnustep_global_lock lock];
|
|
||||||
|
|
||||||
/* Double-Locking Pattern */
|
|
||||||
if (gnustep_system_root == nil)
|
|
||||||
{
|
|
||||||
BOOL warned = NO;
|
|
||||||
|
|
||||||
env = [[NSProcessInfo processInfo] environment];
|
|
||||||
/* Any of the following might be nil */
|
|
||||||
gnustep_system_root = [env objectForKey: @"GNUSTEP_SYSTEM_ROOT"];
|
|
||||||
TEST_RETAIN (gnustep_system_root);
|
|
||||||
if (gnustep_system_root == nil)
|
|
||||||
{
|
|
||||||
/*
|
|
||||||
* This is pretty important as we need it to load
|
|
||||||
* character sets, language settings and similar
|
|
||||||
* resources. Use fprintf to avoid recursive calls.
|
|
||||||
*/
|
|
||||||
warned = YES;
|
|
||||||
fprintf (stderr,
|
|
||||||
"Warning - GNUSTEP_SYSTEM_ROOT is not set "
|
|
||||||
"- using /usr/GNUstep/System as a default\n");
|
|
||||||
gnustep_system_root = @"/usr/GNUstep/System";
|
|
||||||
}
|
|
||||||
|
|
||||||
gnustep_local_root = [env objectForKey: @"GNUSTEP_LOCAL_ROOT"];
|
|
||||||
TEST_RETAIN (gnustep_local_root);
|
|
||||||
if (gnustep_local_root == nil)
|
|
||||||
{
|
|
||||||
if ([[gnustep_system_root lastPathComponent] isEqual:
|
|
||||||
@"System"] == YES)
|
|
||||||
{
|
|
||||||
gnustep_local_root = [[gnustep_system_root
|
|
||||||
stringByDeletingLastPathComponent]
|
|
||||||
stringByAppendingPathComponent: @"Local"];
|
|
||||||
TEST_RETAIN (gnustep_local_root);
|
|
||||||
}
|
|
||||||
else
|
|
||||||
{
|
|
||||||
gnustep_local_root = @"/usr/GNUstep/Local";
|
|
||||||
}
|
|
||||||
if (warned == NO)
|
|
||||||
{
|
|
||||||
warned = YES;
|
|
||||||
fprintf (stderr,
|
|
||||||
"Warning - GNUSTEP_LOCAL_ROOT is not set "
|
|
||||||
"- using %s\n", [gnustep_local_root lossyCString]);
|
|
||||||
}
|
|
||||||
}
|
|
||||||
|
|
||||||
gnustep_network_root = [env objectForKey:
|
|
||||||
@"GNUSTEP_NETWORK_ROOT"];
|
|
||||||
TEST_RETAIN (gnustep_network_root);
|
|
||||||
if (gnustep_network_root == nil)
|
|
||||||
{
|
|
||||||
if ([[gnustep_system_root lastPathComponent] isEqual:
|
|
||||||
@"System"] == YES)
|
|
||||||
{
|
|
||||||
gnustep_network_root = [[gnustep_system_root
|
|
||||||
stringByDeletingLastPathComponent]
|
|
||||||
stringByAppendingPathComponent: @"Network"];
|
|
||||||
TEST_RETAIN (gnustep_network_root);
|
|
||||||
}
|
|
||||||
else
|
|
||||||
{
|
|
||||||
gnustep_network_root = @"/usr/GNUstep/Network";
|
|
||||||
}
|
|
||||||
if (warned == NO)
|
|
||||||
{
|
|
||||||
warned = YES;
|
|
||||||
fprintf (stderr,
|
|
||||||
"Warning - GNUSTEP_NETWORK_ROOT is not set "
|
|
||||||
"- using %s\n", [gnustep_network_root lossyCString]);
|
|
||||||
}
|
|
||||||
}
|
|
||||||
|
|
||||||
gnustep_user_root = [env objectForKey: @"GNUSTEP_USER_ROOT"];
|
|
||||||
TEST_RETAIN (gnustep_user_root);
|
|
||||||
if (gnustep_user_root == nil)
|
|
||||||
{
|
|
||||||
gnustep_user_root = [NSHomeDirectory()
|
|
||||||
stringByAppendingPathComponent: @"GNUstep"];
|
|
||||||
TEST_RETAIN (gnustep_user_root);
|
|
||||||
if (warned == NO)
|
|
||||||
{
|
|
||||||
warned = YES;
|
|
||||||
fprintf (stderr,
|
|
||||||
"Warning - GNUSTEP_USER_ROOT is not set "
|
|
||||||
"- using %s\n", [gnustep_user_root lossyCString]);
|
|
||||||
}
|
|
||||||
}
|
|
||||||
}
|
|
||||||
|
|
||||||
[gnustep_global_lock unlock];
|
|
||||||
}
|
|
||||||
NS_HANDLER
|
|
||||||
{
|
|
||||||
// unlock then re-raise the exception
|
|
||||||
[gnustep_global_lock unlock];
|
|
||||||
[localException raise];
|
|
||||||
}
|
|
||||||
NS_ENDHANDLER
|
|
||||||
}
|
}
|
||||||
|
|
||||||
/*
|
/*
|
||||||
|
|
|
||||||
Loading…
Add table
Add a link
Reference in a new issue