err.no Git - scalable-opengroupware.org/blob - SoObjects/SOGo/NSString+Utilities.m

   1 /* NSString+Utilities.m - this file is part of SOGo
   2  *
   3  * Copyright (C) 2006  Inverse group conseil
   4  *
   5  * Author: Wolfgang Sourdeau <wsourdeau@inverse.ca>
   6  *
   7  * This file is free software; you can redistribute it and/or modify
   8  * it under the terms of the GNU General Public License as published by
   9  * the Free Software Foundation; either version 2, or (at your option)
  10  * any later version.
  11  *
  12  * This file is distributed in the hope that it will be useful,
  13  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  14  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  15  * GNU General Public License for more details.
  16  *
  17  * You should have received a copy of the GNU General Public License
  18  * along with this program; see the file COPYING.  If not, write to
  19  * the Free Software Foundation, Inc., 59 Temple Place - Suite 330,
  20  * Boston, MA 02111-1307, USA.
  21  */
  22
  23 #import <Foundation/NSArray.h>
  24 #import <Foundation/NSCharacterSet.h>
  25 #import <Foundation/NSEnumerator.h>
  26
  27 #import <NGExtensions/NGQuotedPrintableCoding.h>
  28
  29 #import "NSArray+Utilities.h"
  30 #import "NSDictionary+URL.h"
  31
  32 #import "NSString+Utilities.h"
  33
  34 static NSMutableCharacterSet *urlNonEndingChars = nil;
  35 static NSMutableCharacterSet *urlAfterEndingChars = nil;
  36
  37 @implementation NSString (SOGoURLExtension)
  38
  39 - (NSString *) composeURLWithAction: (NSString *) action
  40                          parameters: (NSDictionary *) urlParameters
  41                             andHash: (BOOL) useHash
  42 {
  43   NSMutableString *completeURL;
  44
  45   completeURL = [NSMutableString new];
  46   [completeURL autorelease];
  47
  48   [completeURL appendString: [self urlWithoutParameters]];
  49   if (![completeURL hasSuffix: @"/"])
  50     [completeURL appendString: @"/"];
  51   [completeURL appendString: action];
  52   [completeURL appendString: [urlParameters asURLParameters]];
  53   if (useHash)
  54     [completeURL appendString: @"#"];
  55
  56   return completeURL;
  57 }
  58
  59 - (NSString *) hostlessURL
  60 {
  61   NSString *newURL;
  62   NSRange hostR, locationR;
  63
  64   if ([self hasPrefix: @"/"])
  65     {
  66       newURL = [self copy];
  67       [newURL autorelease];
  68     }
  69   else
  70     {
  71       hostR = [self rangeOfString: @"://"];
  72       locationR = [[self substringFromIndex: (hostR.location + hostR.length)]
  73                     rangeOfString: @"/"];
  74       newURL = [self substringFromIndex: (hostR.location + hostR.length
  75                                           + locationR.location)];
  76     }
  77
  78   return newURL;
  79 }
  80
  81 - (NSString *) urlWithoutParameters;
  82 {
  83   NSRange r;
  84   NSString *newUrl;
  85
  86   r = [self rangeOfString:@"?" options: NSBackwardsSearch];
  87   if (r.length > 0)
  88     newUrl = [self substringToIndex: NSMaxRange(r) - 1];
  89   else
  90     newUrl = self;
  91
  92   return newUrl;
  93 }
  94
  95 - (NSString *) davMethodToObjC
  96 {
  97   NSMutableString *newName;
  98   NSEnumerator *components;
  99   NSString *component;
 100
 101   newName = [NSMutableString stringWithString: @"dav"];
 102   components = [[self componentsSeparatedByString: @"-"] objectEnumerator];
 103   component = [components nextObject];
 104   while (component)
 105     {
 106       [newName appendString: [component capitalizedString]];
 107       component = [components nextObject];
 108     }
 109
 110   return newName;
 111 }
 112
 113 - (NSDictionary *) asDavInvocation
 114 {
 115   NSMutableDictionary *davInvocation;
 116   NSRange nsEnclosing, methodEnclosing;
 117   unsigned int length;
 118
 119   davInvocation = nil;
 120   if ([self hasPrefix: @"{"])
 121     {
 122       nsEnclosing = [self rangeOfString: @"}"];
 123       length = [self length];
 124       if (nsEnclosing.length > 0
 125           && nsEnclosing.location < (length - 1))
 126         {
 127           methodEnclosing = NSMakeRange(nsEnclosing.location + 1,
 128                                         length - nsEnclosing.location - 1);
 129           nsEnclosing.length = nsEnclosing.location - 1;
 130           nsEnclosing.location = 1;
 131           davInvocation = [NSMutableDictionary dictionaryWithCapacity: 2];
 132           [davInvocation setObject: [self substringWithRange: nsEnclosing]
 133                          forKey: @"ns"];
 134           [davInvocation setObject: [self substringWithRange: methodEnclosing]
 135                          forKey: @"method"];
 136         }
 137     }
 138
 139   return davInvocation;
 140 }
 141
 142 - (NSRange) _rangeOfURLInRange: (NSRange) refRange
 143 {
 144   int start, length;
 145   NSRange workRange;
 146
 147 //       [urlNonEndingChars addCharactersInString: @">&=,.:;\t \r\n"];
 148 //       [urlAfterEndingChars addCharactersInString: @"()[]{}&;<\t \r\n"];
 149
 150   if (!urlNonEndingChars)
 151     {
 152       urlNonEndingChars = [NSMutableCharacterSet new];
 153       [urlNonEndingChars addCharactersInString: @">=,.:;\t \r\n"];
 154     }
 155   if (!urlAfterEndingChars)
 156     {
 157       urlAfterEndingChars = [NSMutableCharacterSet new];
 158       [urlAfterEndingChars addCharactersInString: @"\t \r\n"];
 159     }
 160
 161   start = refRange.location;
 162   while (start > -1
 163          && ![urlAfterEndingChars characterIsMember:
 164                                     [self characterAtIndex: start]])
 165     start--;
 166   start++;
 167   length = [self length] - start;
 168   workRange = NSMakeRange (start, length);
 169   workRange = [self rangeOfCharacterFromSet: urlAfterEndingChars
 170                     options: NSLiteralSearch range: workRange];
 171   if (workRange.location != NSNotFound)
 172     length = workRange.location - start;
 173   while
 174     (length > 0
 175      && [urlNonEndingChars characterIsMember:
 176                              [self characterAtIndex: (start + length - 1)]])
 177     length--;
 178
 179   return NSMakeRange (start, length);
 180 }
 181
 182 - (void) _handleURLs: (NSMutableString *) selfCopy
 183          textToMatch: (NSString *) match
 184               prefix: (NSString *) prefix
 185             inRanges: (NSMutableArray *) ranges
 186 {
 187   NSRange httpRange, currentURL, rest;
 188   NSString *urlText, *newUrlText;
 189   unsigned int length, matchLength;
 190
 191   matchLength = [match length];
 192   httpRange = [selfCopy rangeOfString: match];
 193   while (httpRange.location != NSNotFound)
 194     {
 195       if ([ranges hasRangeIntersection: httpRange])
 196         rest.location = NSMaxRange (httpRange);
 197       else
 198         {
 199           currentURL = [selfCopy _rangeOfURLInRange: httpRange];
 200           urlText = [selfCopy substringFromRange: currentURL];
 201           if ([urlText length] > matchLength)
 202             {
 203               newUrlText = [NSString stringWithFormat: @"<a href=\"%@%@\">%@</a>",
 204                                      prefix, urlText, urlText];
 205               [selfCopy replaceCharactersInRange: currentURL
 206                         withString: newUrlText];
 207               currentURL
 208                 = NSMakeRange (currentURL.location, [newUrlText length]);
 209               [ranges addRange: currentURL];
 210             }
 211           rest.location = NSMaxRange (currentURL);
 212         }
 213       length = [selfCopy length];
 214       rest.length = length - rest.location;
 215       httpRange = [selfCopy rangeOfString: match
 216                             options: 0 range: rest];
 217     }
 218 }
 219
 220 - (NSString *) stringByDetectingURLs
 221 {
 222   NSMutableString *selfCopy;
 223   NSMutableArray *ranges;
 224
 225   ranges = [NSMutableArray new];
 226   selfCopy = [NSMutableString stringWithString: self];
 227   [self _handleURLs: selfCopy
 228         textToMatch: @"://"
 229         prefix: @""
 230         inRanges: ranges];
 231   [self _handleURLs: selfCopy
 232         textToMatch: @"@"
 233         prefix: @"mailto:"
 234         inRanges: ranges];
 235   [ranges release];
 236
 237   return selfCopy;
 238 }
 239
 240 - (NSString *) jsonRepresentation
 241 {
 242   NSMutableString *representation;
 243
 244   representation = [NSMutableString stringWithString: self];
 245   [representation replaceString: @"\\" withString: @"\\\\"];
 246   [representation replaceString: @"\"" withString: @"\\\""];
 247   [representation replaceString: @"/" withString: @"\\/"];
 248   [representation replaceString: @"\b" withString: @"\\b"];
 249   [representation replaceString: @"\f" withString: @"\\f"];
 250   [representation replaceString: @"\n" withString: @"\\n"];
 251   [representation replaceString: @"\r" withString: @"\\r"];
 252   [representation replaceString: @"\t" withString: @"\\t"];
 253
 254   return [NSString stringWithFormat: @"\"%@\"", representation];
 255 }
 256
 257 - (NSString *) pureEMailAddress
 258 {
 259   NSString *pureAddress;
 260   NSRange delimiter;
 261
 262   delimiter = [self rangeOfString: @"<"];
 263   if (delimiter.location == NSNotFound)
 264     pureAddress = self;
 265   else
 266     {
 267       pureAddress = [self substringFromIndex: NSMaxRange (delimiter)];
 268       delimiter = [pureAddress rangeOfString: @">"];
 269       if (delimiter.location != NSNotFound)
 270         pureAddress = [pureAddress substringToIndex: delimiter.location];
 271     }
 272
 273   return pureAddress;
 274 }
 275
 276 - (NSString *) asQPSubjectString: (NSString *) encoding
 277 {
 278   NSString *qpString, *subjectString;
 279   NSData *subjectData, *destSubjectData;
 280
 281   subjectData = [self dataUsingEncoding: NSUTF8StringEncoding];
 282   destSubjectData = [subjectData dataByEncodingQuotedPrintable];
 283
 284   qpString = [[NSString alloc] initWithData: destSubjectData
 285                                encoding: NSASCIIStringEncoding];
 286   [qpString autorelease];
 287   if ([qpString length] > [self length])
 288     subjectString = [NSString stringWithFormat: @"=?%@?Q?%@?=",
 289                               encoding, qpString];
 290   else
 291     subjectString = self;
 292
 293   return subjectString;
 294 }
 295
 296 #if LIB_FOUNDATION_LIBRARY
 297 - (BOOL) boolValue
 298 {
 299   return !([self isEqualToString: @"0"]
 300            || [self isEqualToString: @"NO"]);
 301 }
 302 #endif
 303
 304 @end