← Back to branch summary

~ubuntu-branches/ubuntu/saucy/sope/saucy

« back to all changes in this revision

Viewing changes to sope-core/NGExtensions/FdExt.subproj/NSString+misc.m

  • Committer: Package Import Robot
  • Author(s): Jeroen Dekkers
  • Date: 2012-05-09 15:39:17 UTC
  • Revision ID: package-import@ubuntu.com-20120509153917-nr4jlm8mktma1yv3
Tags: upstream-1.3.14
Import upstream version 1.3.14

Show diffs side-by-side

added added

removed removed

Lines of Context:
sope-core/NGExtensions/FdExt.subproj/NSString+misc.m
 
1
/*
 
2
  Copyright (C) 2000-2008 SKYRIX Software AG
 
3
  Copyright (C) 2006-2008 Helge Hess
 
4
 
 
5
  This file is part of SOPE.
 
6
 
 
7
  SOPE is free software; you can redistribute it and/or modify it under
 
8
  the terms of the GNU Lesser General Public License as published by the
 
9
  Free Software Foundation; either version 2, or (at your option) any
 
10
  later version.
 
11
 
 
12
  SOPE is distributed in the hope that it will be useful, but WITHOUT ANY
 
13
  WARRANTY; without even the implied warranty of MERCHANTABILITY or
 
14
  FITNESS FOR A PARTICULAR PURPOSE.  See the GNU Lesser General Public
 
15
  License for more details.
 
16
 
 
17
  You should have received a copy of the GNU Lesser General Public
 
18
  License along with SOPE; see the file COPYING.  If not, write to the
 
19
  Free Software Foundation, 59 Temple Place - Suite 330, Boston, MA
 
20
  02111-1307, USA.
 
21
*/
 
22
 
 
23
#include "NSString+misc.h"
 
24
#include "common.h"
 
25
 
 
26
@interface NSStringVariableBindingException : NSException
 
27
@end
 
28
 
 
29
@implementation NSStringVariableBindingException
 
30
@end
 
31
 
 
32
@implementation NSObject(StringBindings)
 
33
 
 
34
- (NSString *)valueForStringBinding:(NSString *)_key {
 
35
  if (_key == nil) return nil;
 
36
  return [[self valueForKeyPath:_key] stringValue];
 
37
}
 
38
 
 
39
@end /* NSObject(StringBindings) */
 
40
 
 
41
@implementation NSString(misc)
 
42
 
 
43
- (NSSet *)bindingVariables
 
44
{
 
45
  unsigned        len, pos = 0;
 
46
  unichar         *wbuf    = NULL;
 
47
  NSMutableSet    *result  = nil;
 
48
  
 
49
  result = [NSMutableSet setWithCapacity:16];
 
50
  len    = [self length];  
 
51
  wbuf   = malloc(sizeof(unichar) * (len + 4));
 
52
  [self getCharacters:wbuf];
 
53
  
 
54
  while (pos < len) {
 
55
    unsigned startPos;
 
56
    
 
57
    if (pos + 1 == len) { /* last entry */
 
58
      if (wbuf[pos] == '$') { /* found $ without end-char */
 
59
        [[[NSStringVariableBindingException alloc]
 
60
           initWithFormat:@"did not find end of variable for string %@", self]
 
61
           raise];
 
62
      }
 
63
      break;
 
64
    }
 
65
    if (wbuf[pos] != '$') {
 
66
      pos++;
 
67
      continue;
 
68
    }
 
69
    
 
70
    if (wbuf[pos + 1] == '$') { /* found $$ --> ignore*/
 
71
      pos += 2;
 
72
      continue;
 
73
    }
 
74
 
 
75
    /* process binding */
 
76
    
 
77
    startPos = pos;
 
78
    
 
79
    pos += 2; /* wbuf[pos + 1] != '$' */
 
80
    while (pos < len) {
 
81
      if (wbuf[pos] != '$')
 
82
        pos++;
 
83
      else
 
84
        break;
 
85
    }
 
86
    if (pos == len) { /* end of string was reached */
 
87
      [[[NSStringVariableBindingException alloc]
 
88
         initWithFormat:@"did not find end of variable for string %@", self]
 
89
         raise];
 
90
    }
 
91
    else {
 
92
      NSString *key = nil;
 
93
      
 
94
      key = [[NSString alloc]
 
95
                       initWithCharacters:(unichar *)wbuf + startPos + 1
 
96
                       length:(pos - startPos - 1)];
 
97
      [result addObject:key];
 
98
      [key release];
 
99
    }
 
100
    pos++;
 
101
  }
 
102
  if (wbuf != NULL) { free(wbuf); wbuf = NULL; }
 
103
  
 
104
  return [[result copy] autorelease];
 
105
}
 
106
 
 
107
- (NSString *)stringByReplacingVariablesWithBindings:(id)_bindings
 
108
  stringForUnknownBindings:(NSString *)_unknown
 
109
{
 
110
  unsigned        len, pos = 0;
 
111
  unichar         *wbuf    = NULL;
 
112
  NSMutableString *str     = nil;
 
113
  
 
114
  str = [self mutableCopy];
 
115
  len = [str length];  
 
116
  wbuf   = malloc(sizeof(unichar) * (len + 4));
 
117
  [self getCharacters:wbuf];
 
118
  
 
119
  while (pos < len) {
 
120
    if (pos + 1 == len) { /* last entry */
 
121
      if (wbuf[pos] == '$') { /* found $ without end-char */
 
122
        [[[NSStringVariableBindingException alloc]
 
123
           initWithFormat:@"did not find end of variable for string %@", self]
 
124
          raise];
 
125
      }
 
126
      break;
 
127
    }
 
128
    if (wbuf[pos] == '$') {
 
129
      if (wbuf[pos + 1] == '$') { /* found $$ --> $ */
 
130
        [str deleteCharactersInRange:NSMakeRange(pos, 1)];
 
131
        
 
132
        if (wbuf != NULL) { free(wbuf); wbuf = NULL; }
 
133
        len  = [str length];
 
134
        wbuf = malloc(sizeof(unichar) * (len + 4));
 
135
        [str getCharacters:wbuf];
 
136
      }
 
137
      else {
 
138
        unsigned startPos = pos;
 
139
 
 
140
        pos += 2; /* wbuf[pos + 1] != '$' */
 
141
        while (pos < len) {
 
142
          if (wbuf[pos] != '$')
 
143
            pos++;
 
144
          else
 
145
            break;
 
146
        }
 
147
        if (pos == len) { /* end of string was reached */
 
148
          [[[NSStringVariableBindingException alloc]
 
149
             initWithFormat:@"did not find end of variable for string %@", 
 
150
             self] raise];
 
151
        }
 
152
        else {
 
153
          NSString *key;
 
154
          NSString *value;
 
155
 
 
156
          key = [[NSString alloc]
 
157
                  initWithCharacters:(wbuf + startPos + 1)
 
158
                  length:(pos - startPos - 1)];
 
159
          
 
160
          if ((value = [_bindings valueForStringBinding:key]) == nil) {
 
161
            if (_unknown == nil) {
 
162
              [[[NSStringVariableBindingException alloc]
 
163
                          initWithFormat:@"did not find binding for "
 
164
                                         @"name %@ in binding-dictionary %@",
 
165
                                         [key autorelease], _bindings] raise];
 
166
            }
 
167
            else
 
168
              value = _unknown;
 
169
          }
 
170
          [key release]; key = nil;
 
171
          
 
172
          [str replaceCharactersInRange:
 
173
                 NSMakeRange(startPos, pos - startPos + 1)
 
174
               withString:value];
 
175
          
 
176
          if (wbuf != NULL) { free(wbuf); wbuf = NULL; }
 
177
          len  = [str length];
 
178
          wbuf = malloc(sizeof(unichar) * (len + 4));
 
179
          [str getCharacters:wbuf];
 
180
          
 
181
          pos = startPos - 1 + [value length];
 
182
        }
 
183
      }
 
184
    }
 
185
    pos++;
 
186
  }
 
187
  if (wbuf != NULL) { free(wbuf); wbuf = NULL; }
 
188
  {
 
189
    id tmp = str;
 
190
    str = [str copy];
 
191
    [tmp release]; tmp = nil;
 
192
  }
 
193
  return [str autorelease];
 
194
}
 
195
 
 
196
- (NSString *)stringByReplacingVariablesWithBindings:(id)_bindings {
 
197
  return [self stringByReplacingVariablesWithBindings:_bindings
 
198
               stringForUnknownBindings:nil];
 
199
}
 
200
 
 
201
@end /* NSString(misc) */
 
202
 
 
203
 
 
204
@implementation NSString(FilePathVersioningMethods)
 
205
 
 
206
/*
 
207
  "/path/file.txt;1"
 
208
*/
 
209
- (NSString *)pathVersion {
 
210
  NSRange r;
 
211
 
 
212
  r = [self rangeOfString:@";"];
 
213
  if (r.length > 0) {
 
214
    return ([self length] > r.location)
 
215
      ? [self substringFromIndex:(r.location + r.length)]
 
216
      : (NSString *)@"";
 
217
  }
 
218
  return nil;
 
219
}
 
220
 
 
221
- (NSString *)stringByDeletingPathVersion {
 
222
  NSRange r;
 
223
 
 
224
  r = [self rangeOfString:@";"];
 
225
  return (r.length > 0)
 
226
    ? [self substringToIndex:r.location]
 
227
    : self;
 
228
}
 
229
 
 
230
- (NSString *)stringByAppendingPathVersion:(NSString *)_version {
 
231
  return [[self stringByAppendingString:@";"] 
 
232
                stringByAppendingString:_version];
 
233
}
 
234
 
 
235
@end /* NSString(FilePathMethodsVersioning) */
 
236
 
 
237
@implementation NSString(NGScanning)
 
238
 
 
239
- (NSRange)rangeOfString:(NSString *)_s 
 
240
  skipQuotes:(NSString *)_quotes
 
241
  escapedByChar:(unichar)_escape
 
242
{
 
243
  // TODO: speed ...
 
244
  // TODO: check correctness with invalid input !
 
245
  static NSRange notFound = { 0, 0 };
 
246
  NSCharacterSet *quotes;
 
247
  unsigned i, len, slen;
 
248
  unichar sc;
 
249
  
 
250
  if ((slen = [_s length]) == 0)
 
251
    return notFound;
 
252
  if ((len = [self length]) < slen) /* to short */
 
253
    return notFound;
 
254
  
 
255
  if ([_quotes length] == 0)
 
256
    _quotes = @"'\"";
 
257
  quotes = [NSCharacterSet characterSetWithCharactersInString:_quotes];
 
258
  
 
259
  sc = [_s characterAtIndex:0];
 
260
  
 
261
  for (i = 0; i < len; i++) {
 
262
    unichar c;
 
263
    
 
264
    c = [self characterAtIndex:i];
 
265
    
 
266
    if (c == sc) {
 
267
      /* start search section */
 
268
      if (slen == 1)
 
269
        return NSMakeRange(i, 1);
 
270
      
 
271
      if ([[self substringFromIndex:i] hasPrefix:_s])
 
272
        return NSMakeRange(i, slen);
 
273
    }
 
274
    else if ([quotes characterIsMember:c]) {
 
275
      /* skip quotes */
 
276
      i++;
 
277
      c = [self characterAtIndex:i];
 
278
      for (; i < len && ![quotes characterIsMember:c]; i++) {
 
279
        c = [self characterAtIndex:i];
 
280
        if (c == _escape) {
 
281
          i++; /* skip next char (eg \') */
 
282
          continue;
 
283
        }
 
284
      }
 
285
    }
 
286
  }
 
287
  
 
288
  return notFound;
 
289
}
 
290
 
 
291
- (NSRange)rangeOfString:(NSString *)_s skipQuotes:(NSString *)_quotes {
 
292
  return [self rangeOfString:_s skipQuotes:_quotes escapedByChar:'\\'];
 
293
}
 
294
 
 
295
@end /* NSString(NGScanning) */
 
296
 
 
297
 
 
298
@implementation NSString(MailQuoting)
 
299
 
 
300
- (NSString *)stringByApplyingMailQuoting {
 
301
  NSString *s;
 
302
  unsigned i, len, nl;
 
303
  unichar  *sourceBuf, *targetBuf;
 
304
  
 
305
  if ((len = [self length]) == 0)
 
306
    return @"";
 
307
  
 
308
  sourceBuf = malloc((len + 4) * sizeof(unichar));
 
309
  [self getCharacters:sourceBuf];
 
310
  
 
311
  for (nl = 0, i = 0; i < len; i++) {
 
312
    if (sourceBuf[i] == '\n') 
 
313
      nl++;
 
314
  }
 
315
  
 
316
  if (nl == 0) {
 
317
    if (sourceBuf) free(sourceBuf);
 
318
    return [@"> " stringByAppendingString:self];
 
319
  }
 
320
  
 
321
  targetBuf = malloc((len + 8 + (nl * 3)) * sizeof(unichar));
 
322
  targetBuf[0] = '>';
 
323
  targetBuf[1] = ' ';
 
324
  nl = 2;
 
325
  
 
326
  for (i = 0; i < len; i++) {
 
327
    targetBuf[nl] = sourceBuf[i];
 
328
    nl++;
 
329
    
 
330
    if (sourceBuf[i] == '\n' && (i + 1 != len)) {
 
331
      targetBuf[nl] = '>'; nl++;
 
332
      targetBuf[nl] = ' '; nl++;
 
333
    }
 
334
  }
 
335
  
 
336
  s = [[NSString alloc] initWithCharacters:targetBuf length:nl];
 
337
  if (targetBuf) free(targetBuf);
 
338
  if (sourceBuf) free(sourceBuf);
 
339
  return [s autorelease];
 
340
}
 
341
 
 
342
@end /* NSString(MailQuoting) */
 
343
 
 
344
// linking
 
345
 
 
346
void __link_NSString_misc(void) {
 
347
  __link_NSString_misc();
 
348
}