/** GSWDynamicURLString.m - <title>GSWeb: Class GSWDynamicURLString</title>

   Copyright (C) 1999-2003 Free Software Foundation, Inc.
   
   Written by:	Manuel Guesdon <mguesdon@orange-concept.com>
   Date: 	Mar 1999
   
   $Revision$
   $Date$

   This file is part of the GNUstep Web Library.
   
   <license>
   This library is free software; you can redistribute it and/or
   modify it under the terms of the GNU Library General Public
   License as published by the Free Software Foundation; either
   version 2 of the License, or (at your option) any later version.
   
   This library is distributed in the hope that it will be useful,
   but WITHOUT ANY WARRANTY; without even the implied warranty of
   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
   Library General Public License for more details.
   
   You should have received a copy of the GNU Library General Public
   License along with this library; if not, write to the Free
   Software Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
   </license>
**/

#include "config.h"

RCS_ID("$Id$")

#include "GSWeb.h"

//====================================================================
@implementation GSWDynamicURLString

//--------------------------------------------------------------------
-(id)init
{
  //OK
  LOGObjectFnStart();
  if ((self=[super init]))
    {
      _url=[NSMutableString new];
      NSDebugMLLog(@"low",@"url class=%@",[_url class]);
    };
  LOGObjectFnStop();
  return self;
};

//--------------------------------------------------------------------
-(id)initWithCharactersNoCopy:(unichar*)chars
                       length:(unsigned int)length
                 freeWhenDone:(BOOL)flag
{
  //OK
  LOGObjectFnStart();
  if ((self=[super init]))
    {
      _url=[[NSMutableString alloc]initWithCharactersNoCopy:chars
                                   length:length
                                   freeWhenDone:flag];
      if (chars)
        [self _parse];
    };
  LOGObjectFnStop();
  return self;
};


//--------------------------------------------------------------------
-(id)initWithCharacters:(const unichar*)chars
                 length:(unsigned int)length
{
  //OK
  LOGObjectFnStart();
  if ((self=[super init]))
    {
      _url=[[NSMutableString alloc]initWithCharacters:chars
                                   length:length];
      if (chars)
        [self _parse];
    };
  LOGObjectFnStop();
  return self;
};

//--------------------------------------------------------------------
-(id)initWithCStringNoCopy:(char*)byteString
                    length:(unsigned int)length
              freeWhenDone:(BOOL)flag
{
  //OK
  LOGObjectFnStart();
  if ((self=[super init]))
    {
      _url=[[NSMutableString alloc]initWithCStringNoCopy:byteString
                                   length:length
                                   freeWhenDone:flag];
      if (byteString)
        [self _parse];
    };
  LOGObjectFnStop();
  return self;
};

//--------------------------------------------------------------------
-(id)initWithCString:(const char*)byteString
              length:(unsigned int)length;
{
  //OK
  LOGObjectFnStart();
  if ((self=[super init]))
    {
      _url=[[NSMutableString alloc]initWithCString:byteString
                                   length:length];
      NSDebugMLLog(@"low",@"url=%@",_url);
      NSDebugMLLog(@"low",@"url class=%@",[_url class]);
      if (byteString)
        [self _parse];
      NSDebugMLLog(@"low",@"url=%@",_url);
      NSDebugMLLog(@"low",@"url class=%@",[_url class]);
    };
  LOGObjectFnStop();
  return self;
};

//--------------------------------------------------------------------
-(id)initWithCString:(const char*)byteString;
{
  //OK
  LOGObjectFnStart();
  if ((self=[super init]))
    {
      NSDebugMLLog(@"low",@"byteString=%s",byteString);
      _url=[[NSMutableString alloc]initWithCString:byteString];
      if (byteString)
        [self _parse];
      NSDebugMLLog(@"low",@"url=%@",_url);
      NSDebugMLLog(@"low",@"url class=%@",[_url class]);
    };
  LOGObjectFnStop();
  return self;
};

//--------------------------------------------------------------------
-(id)initWithString:(NSString*)string
{
  //OK
  LOGObjectFnStart();
  if ((self=[super init]))
    {
      _url=[[NSMutableString alloc]initWithString:string];
      if (string)
        [self _parse];
    };
  LOGObjectFnStop();
  return self;
};

//--------------------------------------------------------------------
-(id)initWithFormat:(NSString*)format,...
{
  //OK
  LOGObjectFnStart();
  if ((self=[super init]))
    {
      va_list ap;
      va_start(ap,format);
      _url=[[NSMutableString alloc]initWithFormat:format
                                   arguments:ap];
      va_end(ap);
      [self _parse];
    };
  LOGObjectFnStop();
  return self;
};

//--------------------------------------------------------------------
-(id)initWithFormat:(NSString*)format
          arguments:(va_list)argList
{
  //OK
  LOGObjectFnStart();
  if ((self=[super init]))
    {
      _url=[[NSMutableString alloc]initWithFormat:format
                                   arguments:argList];
      [self _parse];
    };
  LOGObjectFnStop();
  return self;
};

//--------------------------------------------------------------------
-(id)initWithData:(NSData*)data
         encoding:(NSStringEncoding)encoding
{
  //OK
  LOGObjectFnStart();
  if ((self=[super init]))
    {
      _url=[[NSMutableString alloc]initWithData:data
                                   encoding:encoding];
      if (data)
        [self _parse];
    };
  LOGObjectFnStop();
  return self;
};

//--------------------------------------------------------------------
-(id)initWithContentsOfFile:(NSString*)path
{
  //OK
  LOGObjectFnStart();
  if ((self=[super init]))
    {
      _url=[[NSMutableString alloc]initWithContentsOfFile:path];
      [self _parse];
    };
  LOGObjectFnStop();
  return self;
};

//--------------------------------------------------------------------
-(void)dealloc
{
  DESTROY(_url);
  DESTROY(_prefix);
  DESTROY(_applicationName);
  DESTROY(_applicationNumberString);
  DESTROY(_requestHandlerKey);
  DESTROY(_queryString);
  DESTROY(_requestHandlerPath);
  [super dealloc];
};

//--------------------------------------------------------------------
-(id)initWithCoder:(NSCoder*)coder
{
  if ((self = [super initWithCoder:coder]))
    {
      [coder decodeValueOfObjCType:@encode(id)
             at:&_url];
      _composed=YES;
      [self _parse];
    };
  return self;
};

//--------------------------------------------------------------------
-(void)encodeWithCoder:(NSCoder*)coder
{
  [super encodeWithCoder:coder];
  [self _compose];
  [coder encodeObject:_url];
};

//--------------------------------------------------------------------
-(id)copyWithZone:(NSZone*)zone
{
  GSWDynamicURLString* clone = nil;
  LOGObjectFnStart();
  NSDebugMLLog(@"low",@"url class=%@",[_url class]);
  clone=[[isa allocWithZone:zone] init];
  if (clone)
    {
      DESTROY(clone->_url);
      clone->_url=[_url mutableCopyWithZone:zone];
      NSDebugMLLog(@"low",@"clone->_url class=%@",[clone->_url class]);
      ASSIGNCOPY(clone->_protocol,_protocol);
      ASSIGNCOPY(clone->_host,_host);
      clone->_port=_port;
      ASSIGNCOPY(clone->_prefix,_prefix);
      ASSIGNCOPY(clone->_applicationName,_applicationName);
      ASSIGNCOPY(clone->_applicationNumberString,_applicationNumberString);
      ASSIGNCOPY(clone->_requestHandlerKey,_requestHandlerKey);
      ASSIGNCOPY(clone->_queryString,_queryString);
      ASSIGNCOPY(clone->_requestHandlerPath,_requestHandlerPath);
      clone->_applicationNumber=_applicationNumber;
      clone->_composed=_composed;
    };
  LOGObjectFnStop();
  return clone;
};

//--------------------------------------------------------------------
-(NSString*)description
{
  //OK
  [self _compose];
  return _url;
};

//--------------------------------------------------------------------
-(void)forwardInvocation:(NSInvocation*)invocation
{
  NSString* urlBackup=nil;
  if (!_composed)
    [self _compose];
  urlBackup=[_url copy];
  [invocation invokeWithTarget:_url];
  if (![_url isEqualToString:urlBackup])
    [self _parse];
  [urlBackup release];
};

//--------------------------------------------------------------------
-(NSMethodSignature*)methodSignatureForSelector:(SEL)selector
{
  return [_url methodSignatureForSelector:selector];
};

@end

//====================================================================
@implementation GSWDynamicURLString (GSWDynamicURLStringParsing)
-(void)_compose
{
  if (!_composed)
    {
      if (_url)
        {
          int length=[_url length];
          NSDebugMLLog(@"low",@"url %@ class=%@",_url,[_url class]);
          if (length>0)
            [_url deleteCharactersInRange:NSMakeRange(0,length)];
        }
      else
        _url=[NSMutableString new];
      if (_protocol)
        {
          if (_host)
            [_url appendFormat:@"%@://",_protocol];
          else if (_port)
            [_url appendFormat:@"%@://localhost",_protocol];
          else if (_prefix)
            [_url appendFormat:@"%@:/",_protocol];
          else
            [_url appendFormat:@"%@://",_protocol];
        };
      if (_host)
        [_url appendString:_host];
      if (_port)
        [_url appendFormat:@":%d",_port];
      if (_prefix)
        [_url appendFormat:@"%@/",_prefix];
      if (_applicationName)
        [_url  appendFormat:@"%@.%@/",
               _applicationName,
               GSWApplicationSuffix[GSWebNamingConv]];
      if (_applicationNumber>=0)
        [_url  appendFormat:@"%d/",_applicationNumber];
      if (_requestHandlerKey)
        [_url  appendFormat:@"%@/",_requestHandlerKey];
      if (_requestHandlerPath)
        [_url  appendFormat:@"%@",_requestHandlerPath];
      if (_queryString)
        [_url  appendFormat:@"?%@",_queryString];
      NSDebugMLLog(@"low",@"url %@ class=%@",_url,[_url class]);
    };
};

//--------------------------------------------------------------------
-(void)_parse
{
  DESTROY(_prefix);
  DESTROY(_applicationName);
  DESTROY(_applicationNumberString);
  DESTROY(_requestHandlerKey);
  DESTROY(_queryString);
  DESTROY(_requestHandlerPath);
  _applicationNumber=-1;
  _composed=NO; //??
  if (_url)
    {
      NSArray* components=nil;
      NSString* Left=_url;
      int index=0;
      int tmpIndex=0;
      NSRange protocolEndRange;
      NSRange queryStringStartRange=[Left rangeOfString:@"?"];
      if (queryStringStartRange.length>0)
        {
          if (queryStringStartRange.location+1<[Left length])
            {
              ASSIGN(_queryString,[Left substringFromIndex:queryStringStartRange.location+queryStringStartRange.length]);
            };
          Left=[Left substringToIndex:queryStringStartRange.location];
        };
      NSDebugMLLog(@"low",@"Left [%@]",Left);
      NSDebugMLLog(@"low",@"queryString [%@]",_queryString);
      
      //Protocol
      protocolEndRange=[Left rangeOfString:@"://"];
      if (protocolEndRange.length>0)
        {
          ASSIGN(_protocol,[Left substringToIndex:protocolEndRange.location]);
          NSDebugMLLog(@"low",@"protocol [%@]",_protocol);
          if (protocolEndRange.location+protocolEndRange.length<[Left length])
            Left=[Left substringFromIndex:protocolEndRange.location+protocolEndRange.length];
          else
            Left=nil;
          NSDebugMLLog(@"low",@"Left [%@]",Left);
          //Host
          if ([Left length]>0)
            {
              NSRange hostEndRangePort=[Left rangeOfString:@":"];			  
              if (hostEndRangePort.length>0)
                {
                  ASSIGN(_host,[Left substringToIndex:hostEndRangePort.location]);
                  NSDebugMLLog(@"low",@"host [%@]",_host);
                  if (hostEndRangePort.location+hostEndRangePort.length<[Left length])
                    Left=[Left substringFromIndex:hostEndRangePort.location+hostEndRangePort.length];
                  else
                    Left=nil;
                  NSDebugMLLog(@"low",@"Left [%@]",Left);
                  if (Left)
                    {
                      NSRange portEndRange=[Left rangeOfString:@"/"];
                      if (portEndRange.length>0)
                        {
                          NSString* portString=[Left substringToIndex:portEndRange.location];
                          NSDebugMLLog(@"low",@"portString [%@]",Left);
                          _port=[portString intValue];
                          NSDebugMLLog(@"low",@"port [%d]",_port);
                          if (portEndRange.location+portEndRange.length<[Left length])
                            Left=[Left substringFromIndex:portEndRange.location+portEndRange.length-1]; //Keep the '/'
                          else
                            Left=nil;
                          NSDebugMLLog(@"low",@"Left [%@]",Left);
                        }
                      else
                        {
                          _port=[Left intValue];
                          NSDebugMLLog(@"low",@"port [%d]",_port);
                          Left=nil;
                          NSDebugMLLog(@"low",@"Left [%@]",Left);
                        };
                    };
                }
              else
                {
                  NSRange hostEndRangeSlash=[Left rangeOfString:@"/"];
                  if (hostEndRangeSlash.length>0)
                    {
                      ASSIGN(_host,[Left substringToIndex:hostEndRangeSlash.location]);
                      NSDebugMLLog(@"low",@"host [%@]",_host);
                      if (hostEndRangeSlash.location+hostEndRangeSlash.length<[Left length])
                        Left=[Left substringFromIndex:hostEndRangeSlash.location+hostEndRangeSlash.length-1];//Keep the '/'
                      else
                        Left=nil;
                      NSDebugMLLog(@"low",@"Left [%@]",Left);
                    }
                  else
                    {
                      ASSIGN(_host,Left);
                      NSDebugMLLog(@"low",@"host [%@]",_host);
                      Left=nil;
                      NSDebugMLLog(@"low",@"Left [%@]",Left);
                    };
                };
            };
        };
      
      NSDebugMLLog(@"low",@"Left [%@]",Left);
      //prefix
      NSDebugMLLog(@"low",@"prefix: components [%@]",components);
      components=[Left componentsSeparatedByString:@"/"];
      for(tmpIndex=index;!_prefix && tmpIndex<[components count];tmpIndex++)
        {
          NSString* tmp=[components objectAtIndex:tmpIndex];
          if ([tmp hasSuffix:GSWApplicationPSuffix[GSWNAMES_INDEX]]
              || [tmp hasSuffix:GSWApplicationPSuffix[WONAMES_INDEX]])
            {
              if (tmpIndex-index>1)
                {
                  ASSIGN(_prefix,[[components subarrayWithRange:NSMakeRange(index,tmpIndex-index)]componentsJoinedByString:@"/"]);
                  index=tmpIndex;//Stay on ApplicationName !
                };
            };
        };	  
      if (!_prefix)
        {
          //TODO Erreur
          NSDebugMLLog(@"low",@"No prefix in [%@]",_url);
        }
      else
        {
          //applicationName
          if (index>=[components count])
            {
              //TODO Erreur
              NSDebugMLLog(@"low",@"No applicationName in [%@]",_url);
            }
          else
            {
              NSDebugMLLog(@"low",@"applicationName: components [%@]",
                           [components subarrayWithRange:NSMakeRange(index,[components count]-index)]);
              for(tmpIndex=index;!_applicationName && tmpIndex<[components count];tmpIndex++)
                {
                  NSString* tmp=[components objectAtIndex:tmpIndex];
                  NSString* appSuffix=nil;
                  if ([tmp hasSuffix:GSWApplicationPSuffix[GSWNAMES_INDEX]])
                    appSuffix=GSWApplicationPSuffix[GSWNAMES_INDEX];
                  else if ([tmp hasSuffix:GSWApplicationPSuffix[WONAMES_INDEX]])
                    appSuffix=GSWApplicationPSuffix[WONAMES_INDEX];
                  if (appSuffix)
                    {
                      ASSIGN(_applicationName,[[[components subarrayWithRange:NSMakeRange(index,tmpIndex-index+1)] 
                                                 componentsJoinedByString:@"/"]
                                                stringByDeletingSuffix:appSuffix]);
                      index=tmpIndex+1;
                    };
                };
              if (!_applicationName)
                {
                  NSString* tmp=[[components subarrayWithRange:NSMakeRange(index,[components count]-index)]
                                  componentsJoinedByString:@"/"];
                  if ([tmp hasSuffix:GSWApplicationPSuffix[GSWNAMES_INDEX]])
                    tmp=[tmp stringByDeletingSuffix:GSWApplicationPSuffix[GSWNAMES_INDEX]];
                  else if ([tmp hasSuffix:GSWApplicationPSuffix[WONAMES_INDEX]])
                    tmp=[tmp stringByDeletingSuffix:GSWApplicationPSuffix[WONAMES_INDEX]];
                  ASSIGN(_applicationName,tmp);
                  index=[components count];
                };
              
              //Application Number
              if (index<[components count])
                {
                  NSDebugMLLog(@"low",@"applicationNumber: components [%@]",
                               [components subarrayWithRange:NSMakeRange(index,[components count]-index)]);                  
                  ASSIGN(_applicationNumberString,[components objectAtIndex:index]);
                  _applicationNumber=[_applicationNumberString intValue];
                  index++;
                  //requestHandlerKey
                  if (index<[components count])
                    {
                      NSDebugMLLog(@"low",@"requestHandlerKey: _components [%@]",
                                   [components subarrayWithRange:NSMakeRange(index,[components count]-index)]);
                      ASSIGN(_requestHandlerKey,[components objectAtIndex:index]);
                      index++;
                      //requestHandlerPath
                      if (index<[components count])
                        {
                          NSDebugMLLog(@"low",@"requestHandlerPath: components [%@]",
                                       [components subarrayWithRange:NSMakeRange(index,[components count]-index)]);
                          ASSIGN(_requestHandlerPath,[[components subarrayWithRange:NSMakeRange(index,[components count]-index)]componentsJoinedByString:@"/"]);
                          index++;
                        };
                    };
                };
            };
        };
    };
  NSDebugMLLog(@"low",@"url=%@",_url);
  NSDebugMLLog(@"low",@"prefix=%@",_prefix);
  NSDebugMLLog(@"low",@"applicationName=%@",_applicationName);
  NSDebugMLLog(@"low",@"applicationNumberString=%@",_applicationNumberString);
  NSDebugMLLog(@"low",@"requestHandlerKey=%@",_requestHandlerKey);
  NSDebugMLLog(@"low",@"queryString=%@",_queryString);
  NSDebugMLLog(@"low",@"requestHandlerPath=%@",_requestHandlerPath);
};

@end

//====================================================================
@implementation GSWDynamicURLString (GSWDynamicURLStringGetGet)
/*
//--------------------------------------------------------------------
-(NSArray*)urlRequestHandlerPath
{
  NSArray* _path=[urlrequestHandlerPath componentsSeparatedByString:@"/"];
  return _path;
};
*/
//--------------------------------------------------------------------
-(NSString*)urlRequestHandlerPath
{
  return _requestHandlerPath;
};

//--------------------------------------------------------------------
-(NSString*)urlQueryString
{
  return _queryString;
};

//--------------------------------------------------------------------
-(NSString*)urlRequestHandlerKey
{
  return _requestHandlerKey;
};

//--------------------------------------------------------------------
-(int)urlApplicationNumber
{
  return _applicationNumber;
};

//--------------------------------------------------------------------
-(NSString*)urlApplicationName
{
  return _applicationName;
};

//--------------------------------------------------------------------
-(NSString*)urlPrefix
{
  return _prefix;
};

//--------------------------------------------------------------------
-(void)checkURL
{
  LOGObjectFnNotImplemented();	//TODOFN
};

//--------------------------------------------------------------------
//NDFN
-(NSString*)urlProtocol
{
  return _protocol;
};

//--------------------------------------------------------------------
//NDFN
-(NSString*)urlHost
{
  return _host;
};

//--------------------------------------------------------------------
//NDFN
-(NSString*)urlPortString
{
  return [NSString stringWithFormat:@"%d",_port];
};

//--------------------------------------------------------------------
//NDFN
-(int)urlPort
{
  return _port;
};

//--------------------------------------------------------------------
//NDFN
-(NSString*)urlProtocolHostPort
{
  NSMutableString* url=[NSMutableString string];
  if (_protocol)
    {
      if (_host)
        [url appendFormat:@"%@://",_protocol];
      else if (_port)
        [url appendFormat:@"%@://localhost",_protocol];
      else
        [url appendFormat:@"%@://",_protocol];
    };
  if (_host)
    [url appendString:_host];
  if (_port)
    [url appendFormat:@":%d",_port];
  return [NSString stringWithString:url];
};

@end

//====================================================================
@implementation GSWDynamicURLString (GSWDynamicURLStringSet)
-(void)setURLRequestHandlerPath:(NSString*)aString
{
  LOGObjectFnStart();
  ASSIGN(_requestHandlerPath,aString);
  _composed=NO;
  LOGObjectFnStop();
};

//--------------------------------------------------------------------
-(void)setURLQueryString:(NSString*)aString
{
  LOGObjectFnStart();
  ASSIGN(_queryString,aString);
  _composed=NO;
  LOGObjectFnStop();
};

//--------------------------------------------------------------------
-(void)setURLRequestHandlerKey:(NSString*)aString
{
  LOGObjectFnStart();
  ASSIGN(_requestHandlerKey,aString);
  _composed=NO;
  LOGObjectFnStop();
};

//--------------------------------------------------------------------
-(void)setURLApplicationNumber:(int)applicationNumber
{
  LOGObjectFnStart();
  _applicationNumber=applicationNumber;
  _composed=NO;
  LOGObjectFnStop();
};

//--------------------------------------------------------------------
-(void)setURLApplicationName:(NSString*)aString
{
  LOGObjectFnStart();
  ASSIGN(_applicationName,aString);
  _composed=NO;
  LOGObjectFnStop();
};

//--------------------------------------------------------------------
-(void)setURLPrefix:(NSString*)aString
{
  LOGObjectFnStart();
  ASSIGN(_prefix,aString);
  _composed=NO;
  LOGObjectFnStop();
};

//--------------------------------------------------------------------
//NDFN
-(void)setURLProtocol:(NSString*)aString
{
  LOGObjectFnStart();
  ASSIGN(_protocol,aString);
  _composed=NO;
  LOGObjectFnStop();
};

//--------------------------------------------------------------------
//NDFN
-(void)setURLHost:(NSString*)aString
{
  LOGObjectFnStart();
  ASSIGN(_host,aString);
  _composed=NO;
  LOGObjectFnStop();
};

//--------------------------------------------------------------------
//NDFN
-(void)setURLPortString:(NSString*)aString
{
  LOGObjectFnStart();
  _port=[aString intValue];
  _composed=NO;
  LOGObjectFnStop();
};

//--------------------------------------------------------------------
//NDFN
-(void)setURLPort:(int)port
{
  LOGObjectFnStart();
  _port=port;
  _composed=NO;
  LOGObjectFnStop();
};

@end