/*
* Common typecasting logic that can be used or overriden by Adapters.
*/
extern VALUE data_objects_typecast(const char *value, long length, const VALUE type, int encoding) {
#ifdef HAVE_RUBY_ENCODING_H
rb_encoding *internal_encoding = rb_default_internal_encoding();
#else
void *internal_encoding = NULL;
#endif
if (type == rb_cInteger) {
return rb_cstr2inum(value, 10);
}
else if (type == rb_cString) {
return DATA_OBJECTS_STR_NEW(value, length, encoding, internal_encoding);
}
else if (type == rb_cFloat) {
return rb_float_new(rb_cstr_to_dbl(value, Qfalse));
}
else if (type == rb_cBigDecimal) {
return rb_funcall(rb_cBigDecimal, DO_ID_NEW, 1, rb_str_new(value, length));
}
else if (type == rb_cDate) {
return data_objects_parse_date(value);
}
else if (type == rb_cDateTime) {
return data_objects_parse_date_time(value);
}
else if (type == rb_cTime) {
return data_objects_parse_time(value);
}
else if (type == rb_cTrueClass) {
return (!value || strcmp("0", value) == 0) ? Qfalse : Qtrue;
}
else if (type == rb_cByteArray) {
return rb_funcall(rb_cByteArray, DO_ID_NEW, 1, rb_str_new(value, length));
}
else if (type == rb_cClass) {
return rb_funcall(mDO, rb_intern("full_const_get"), 1, rb_str_new(value, length));
}
else if (type == rb_cNilClass) {
return Qnil;
}
else {
return DATA_OBJECTS_STR_NEW(value, length, encoding, internal_encoding);
}
}
VALUE do_sqlite3_typecast(sqlite3_stmt *stmt, int i, VALUE type, int encoding) {
int original_type = sqlite3_column_type(stmt, i);
int length = sqlite3_column_bytes(stmt, i);
if (original_type == SQLITE_NULL) {
return Qnil;
}
#ifdef HAVE_RUBY_ENCODING_H
rb_encoding *internal_encoding = rb_default_internal_encoding();
#else
void *internal_encoding = NULL;
#endif
if (type == Qnil) {
switch (original_type) {
case SQLITE_INTEGER:
type = rb_cInteger;
break;
case SQLITE_FLOAT:
type = rb_cFloat;
break;
case SQLITE_BLOB:
type = rb_cByteArray;
break;
default:
type = rb_cString;
break;
}
}
if (type == rb_cInteger) {
return LL2NUM(sqlite3_column_int64(stmt, i));
}
else if (type == rb_cString) {
return DATA_OBJECTS_STR_NEW((char*)sqlite3_column_text(stmt, i), length, encoding, internal_encoding);
}
else if (type == rb_cFloat) {
return rb_float_new(sqlite3_column_double(stmt, i));
}
else if (type == rb_cBigDecimal) {
return rb_funcall(rb_cBigDecimal, ID_NEW, 1, rb_str_new((char*)sqlite3_column_text(stmt, i), length));
}
else if (type == rb_cDate) {
return data_objects_parse_date((char*)sqlite3_column_text(stmt, i));
}
else if (type == rb_cDateTime) {
return data_objects_parse_date_time((char*)sqlite3_column_text(stmt, i));
}
else if (type == rb_cTime) {
return data_objects_parse_time((char*)sqlite3_column_text(stmt, i));
}
else if (type == rb_cTrueClass) {
return strcmp((char*)sqlite3_column_text(stmt, i), "t") == 0 ? Qtrue : Qfalse;
}
else if (type == rb_cByteArray) {
return rb_funcall(rb_cByteArray, ID_NEW, 1, rb_str_new((char*)sqlite3_column_blob(stmt, i), length));
}
else if (type == rb_cClass) {
return rb_funcall(mDO, rb_intern("full_const_get"), 1, rb_str_new((char*)sqlite3_column_text(stmt, i), length));
}
else if (type == rb_cNilClass) {
return Qnil;
}
else {
return DATA_OBJECTS_STR_NEW((char*)sqlite3_column_text(stmt, i), length, encoding, internal_encoding);
}
}
