/* 
   SQLiteAdaptor.h

   Copyright (C) 2003-2005 SKYRIX Software AG

   Author: Helge Hess (helge.hess@skyrix.com)

   This file is part of the SQLite Adaptor Library

   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; see the file COPYING.LIB.
   If not, write to the Free Software Foundation,
   59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
*/

#include "SQLiteChannel.h"
#include <NGExtensions/NSString+Ext.h>
#import <Foundation/NSString.h>
#include "common.h"

@implementation NSString(SQLiteValues)

static Class EOExprClass = Nil;

- (id)initWithSQLiteInt:(int)_value {
  char buf[256];
  sprintf(buf, "%i", _value);
  return [self initWithCString:buf];
}
- (id)initWithSQLiteDouble:(double)_value {
  char buf[256];
  sprintf(buf, "%g", _value);
  return [self initWithCString:buf];
}

- (id)initWithSQLiteText:(const unsigned char *)_value {
  return [self initWithUTF8String:_value];
}

- (id)initWithSQLiteData:(const void *)_value length:(int)_length {
  NSData *d;
  
  d = [[NSData alloc] initWithBytes:_value length:_length];
  self = [self initWithData:d encoding:NSUTF8StringEncoding];
  [d release];
  return self;
}

/* generate SQL value */

- (NSString *)stringValueForSQLite3Type:(NSString *)_type
  attribute:(EOAttribute *)_attribute
{
  // TODO: all this looks slow ...
  unsigned len;
  unichar  c1;
  
  if ((len = [_type length]) == 0)
    return self;
  
  c1 = [_type characterAtIndex:0];
  switch (c1) {
  case 'c': case 'C': // char
  case 'v': case 'V': // varchar
  case 't': case 'T': { // text
    NSString *s;
    id expr;
    
    if (len < 4)
      return self;
    
    _type = [_type lowercaseString];
  
    if (!([_type hasPrefix:@"char"] ||
	[_type hasPrefix:@"varchar"] ||
	[_type hasPrefix:@"text"]))
      break;
    
    /* TODO: creates too many autoreleased strings :-( */
      
    expr = [self stringByReplacingString:@"\\" withString:@"\\\\"];
      
    if (EOExprClass == Nil) EOExprClass = [EOQuotedExpression class];
    expr = [[EOExprClass alloc] initWithExpression:expr 
				quote:@"'" escape:@"\\'"];
    s = [[expr expressionValueForContext:nil] retain];
    [expr release];
    return [s autorelease];
  }
  case 'i': case 'I': { // int
    unsigned char buf[128];
    sprintf(buf, "%i", [self intValue]);
    return [NSString stringWithCString:buf];
  }
  default:
    NSLog(@"WARNING(%s): return string as is for type %@", 
	  __PRETTY_FUNCTION__, _type);
    break;
  }
  return self;
}

@end /* NSString(SQLiteValues) */
