← Back to branch summary

~ubuntu-branches/ubuntu/edgy/sope/edgy

« back to all changes in this revision

Viewing changes to sope-core/NGExtensions/NGResourceLocator.m

  • Committer: Bazaar Package Importer
  • Author(s): Sebastian Ley
  • Date: 2005-08-19 16:53:31 UTC
  • Revision ID: james.westby@ubuntu.com-20050819165331-hs683wz1osm708pw
Tags: upstream-4.4rc.2
Import upstream version 4.4rc.2

Show diffs side-by-side

added added

removed removed

Lines of Context:
sope-core/NGExtensions/NGResourceLocator.m
 
1
/*
 
2
  Copyright (C) 2000-2005 SKYRIX Software AG
 
3
 
 
4
  This file is part of SOPE.
 
5
 
 
6
  SOPE is free software; you can redistribute it and/or modify it under
 
7
  the terms of the GNU Lesser General Public License as published by the
 
8
  Free Software Foundation; either version 2, or (at your option) any
 
9
  later version.
 
10
 
 
11
  SOPE is distributed in the hope that it will be useful, but WITHOUT ANY
 
12
  WARRANTY; without even the implied warranty of MERCHANTABILITY or
 
13
  FITNESS FOR A PARTICULAR PURPOSE.  See the GNU Lesser General Public
 
14
  License for more details.
 
15
 
 
16
  You should have received a copy of the GNU Lesser General Public
 
17
  License along with SOPE; see the file COPYING.  If not, write to the
 
18
  Free Software Foundation, 59 Temple Place - Suite 330, Boston, MA
 
19
  02111-1307, USA.
 
20
*/
 
21
 
 
22
#include "NGResourceLocator.h"
 
23
#include "NSNull+misc.h"
 
24
#include "common.h"
 
25
 
 
26
@implementation NGResourceLocator
 
27
 
 
28
+ (id)resourceLocatorForGNUstepPath:(NSString *)_path fhsPath:(NSString *)_fhs{
 
29
  return [[[self alloc] initWithGNUstepPath:_path fhsPath:_fhs] autorelease];
 
30
}
 
31
 
 
32
- (id)initWithGNUstepPath:(NSString *)_path fhsPath:(NSString *)_fhs {
 
33
  if ((self = [super init])) {
 
34
    self->gsSubPath   = [_path copy];
 
35
    self->fhsSubPath  = [_fhs  copy];
 
36
    self->fileManager = [[NSFileManager defaultManager] retain];
 
37
    
 
38
    self->flags.cacheSearchPathes = 1;
 
39
    self->flags.cachePathMisses   = 1;
 
40
    self->flags.cachePathHits     = 1;
 
41
  }
 
42
  return self;
 
43
}
 
44
- (id)init {
 
45
  return [self initWithGNUstepPath:@"Library/Resources" fhsPath:@"share"];
 
46
}
 
47
 
 
48
- (void)dealloc {
 
49
  [self->nameToPathCache release];
 
50
  [self->searchPathes release];
 
51
  [self->fhsSubPath   release];
 
52
  [self->gsSubPath    release];
 
53
  [self->fileManager  release];
 
54
  [super dealloc];
 
55
}
 
56
 
 
57
/* search pathes */
 
58
 
 
59
- (NSArray *)gsRootPathes {
 
60
  static NSArray *pathes = nil;
 
61
  NSDictionary *env;
 
62
  NSString *apath;
 
63
  
 
64
  if (pathes != nil)
 
65
    return [pathes isNotNull] ? pathes : nil;
 
66
  
 
67
  env = [[NSProcessInfo processInfo] environment];
 
68
  if ((apath = [env objectForKey:@"GNUSTEP_PATHPREFIX_LIST"]) == nil)
 
69
    apath = [env objectForKey:@"GNUSTEP_PATHLIST"];
 
70
  
 
71
  if (![apath isNotNull]) return nil;
 
72
  pathes = [[apath componentsSeparatedByString:@":"] copy];
 
73
  return pathes;
 
74
}
 
75
 
 
76
- (NSArray *)fhsRootPathes {
 
77
  // TODO: we probably want to make this configurable?! At least with an envvar
 
78
  static NSArray *pathes = nil;
 
79
  if (pathes == nil)
 
80
    pathes = [[NSArray alloc] initWithObjects:@"/usr/local/", @"/usr/", nil];
 
81
  return pathes;
 
82
}
 
83
 
 
84
- (NSArray *)collectSearchPathes {
 
85
  NSMutableArray *ma;
 
86
  NSEnumerator *e;
 
87
  NSString *p;
 
88
  
 
89
  ma = [NSMutableArray arrayWithCapacity:6];
 
90
  
 
91
  e = ([self->gsSubPath length] > 0)
 
92
    ? [[self gsRootPathes] objectEnumerator]
 
93
    : nil;
 
94
  while ((p = [e nextObject])) {
 
95
    p = [p stringByAppendingPathComponent:self->gsSubPath];
 
96
    if ([ma containsObject:p])
 
97
      continue;
 
98
    
 
99
    if (![self->fileManager fileExistsAtPath:p])
 
100
      continue;
 
101
 
 
102
    [ma addObject:p];
 
103
  }
 
104
  
 
105
  e = ([self->fhsSubPath length] > 0)
 
106
    ? [[self fhsRootPathes] objectEnumerator]
 
107
    : nil;
 
108
  while ((p = [e nextObject])) {
 
109
    p = [p stringByAppendingPathComponent:self->fhsSubPath];
 
110
    if ([ma containsObject:p])
 
111
      continue;
 
112
    
 
113
    if (![self->fileManager fileExistsAtPath:p])
 
114
      continue;
 
115
    
 
116
    [ma addObject:p];
 
117
  }
 
118
  
 
119
  return ma;
 
120
}
 
121
 
 
122
- (NSArray *)searchPathes {
 
123
  NSArray *a;
 
124
  
 
125
  if (self->searchPathes != nil)
 
126
    return self->searchPathes;
 
127
  
 
128
  a = [self collectSearchPathes];
 
129
  if (self->flags.cacheSearchPathes) {
 
130
    ASSIGNCOPY(self->searchPathes, a);
 
131
    return self->searchPathes; /* return copy */
 
132
  }
 
133
  
 
134
  return a;
 
135
}
 
136
 
 
137
/* cache */
 
138
 
 
139
- (void)cachePath:(NSString *)_path forName:(NSString *)_name {
 
140
  if (self->nameToPathCache == nil)
 
141
    self->nameToPathCache = [[NSMutableDictionary alloc] initWithCapacity:64];
 
142
  
 
143
  [self->nameToPathCache setObject:_path?_path:(id)[NSNull null] forKey:_name];
 
144
}
 
145
 
 
146
/* operation */
 
147
 
 
148
- (NSString *)lookupFileWithName:(NSString *)_name {
 
149
  NSEnumerator *e;
 
150
  NSString *p;
 
151
  
 
152
  if (![_name isNotNull] || [_name length] == 0)
 
153
    return nil;
 
154
  if ((p = [self->nameToPathCache objectForKey:_name]))
 
155
    return [p isNotNull] ? p : nil;
 
156
  
 
157
  e = [[self searchPathes] objectEnumerator];
 
158
  while ((p = [e nextObject])) {
 
159
    p = [p stringByAppendingPathComponent:_name];
 
160
    
 
161
    if (![self->fileManager fileExistsAtPath:p])
 
162
      continue;
 
163
    
 
164
    [self cachePath:p forName:_name];
 
165
    return p;
 
166
  }
 
167
  
 
168
  if (self->flags.cachePathMisses)
 
169
    [self cachePath:nil forName:_name];
 
170
  return nil;
 
171
}
 
172
 
 
173
- (NSString *)lookupFileWithName:(NSString *)_name extension:(NSString *)_ext {
 
174
  if ([_ext isNotNull] && [_ext length] > 0)
 
175
    _name = [_name stringByAppendingPathExtension:_ext];
 
176
  return [self lookupFileWithName:_name];
 
177
}
 
178
 
 
179
@end /* NGResourceLocator */