// ------------------------------------------------------------------------------------------------ #include "Library/MySQL.hpp" // ------------------------------------------------------------------------------------------------ #include #include #include // ------------------------------------------------------------------------------------------------ #include #include #include // ------------------------------------------------------------------------------------------------ namespace SqMod { // ------------------------------------------------------------------------------------------------ const Uint32 Field::INVALID_INDEX = std::numeric_limits< Uint32 >::max(); // ------------------------------------------------------------------------------------------------ static inline bool IsDigitsOnly(CSStr str) { while (std::isdigit(*str) || std::isspace(*str)) { ++str; } // Return whether we reached the end while searching return *str == '\0'; } // ------------------------------------------------------------------------------------------------ void SqDateToMySQLTime(const Date & value, MYSQL_TIME & t) { // Populate the given structure t.year = value.GetYear(); t.month = value.GetMonth(); t.day = value.GetDay(); t.hour = 0; t.minute = 0; t.second = 0; t.neg = false; t.second_part = 0; t.time_type = MYSQL_TIMESTAMP_DATE; } // ------------------------------------------------------------------------------------------------ void SqTimeToMySQLTime(const Time & value, MYSQL_TIME & t) { // Populate the given structure t.year = 0; t.month = 0; t.day = 0; t.neg = false; t.second_part = value.GetTimestamp().GetSecondsI(); t.time_type = MYSQL_TIMESTAMP_TIME; } // ------------------------------------------------------------------------------------------------ void SqDatetimeToMySQLTime(const Datetime & value, MYSQL_TIME & t) { // Populate the given structure t.year = value.GetYear(); t.month = value.GetMonth(); t.day = value.GetDay(); t.hour = value.GetHour(); t.minute = value.GetMinute(); t.second = value.GetSecond(); t.neg = false; t.second_part = (value.GetMillisecond() * 1000L); t.time_type = MYSQL_TIMESTAMP_DATETIME; } // ------------------------------------------------------------------------------------------------ CSStr SqMySQLTypename(enum_field_types type) { switch(type) { case MYSQL_TYPE_DECIMAL: return _SC("decimal"); case MYSQL_TYPE_TINY: return _SC("tiny"); case MYSQL_TYPE_SHORT: return _SC("short"); case MYSQL_TYPE_LONG: return _SC("long"); case MYSQL_TYPE_FLOAT: return _SC("float"); case MYSQL_TYPE_DOUBLE: return _SC("double"); case MYSQL_TYPE_NULL: return _SC("null"); case MYSQL_TYPE_TIMESTAMP: return _SC("time-stamp"); case MYSQL_TYPE_LONGLONG: return _SC("long-long"); case MYSQL_TYPE_INT24: return _SC("int24"); case MYSQL_TYPE_DATE: return _SC("date"); case MYSQL_TYPE_TIME: return _SC("time"); case MYSQL_TYPE_DATETIME: return _SC("date-time"); case MYSQL_TYPE_YEAR: return _SC("year"); case MYSQL_TYPE_NEWDATE: return _SC("new-date"); case MYSQL_TYPE_VARCHAR: return _SC("var-char"); case MYSQL_TYPE_BIT: return _SC("bit"); #ifdef MYSQL_TYPE_TIMESTAMP2 case MYSQL_TYPE_TIMESTAMP2: return _SC("time-stamp2"); #endif // MYSQL_TYPE_TIMESTAMP2 #ifdef MYSQL_TYPE_DATETIME2 case MYSQL_TYPE_DATETIME2: return _SC("date-time2"); #endif // MYSQL_TYPE_DATETIME2 #ifdef MYSQL_TYPE_TIME2 case MYSQL_TYPE_TIME2: return _SC("time2"); #endif // MYSQL_TYPE_TIME2 case MYSQL_TYPE_NEWDECIMAL: return _SC("new-decimal"); case MYSQL_TYPE_ENUM: return _SC("enum"); case MYSQL_TYPE_SET: return _SC("set"); case MYSQL_TYPE_TINY_BLOB: return _SC("tiny-blob"); case MYSQL_TYPE_MEDIUM_BLOB: return _SC("medium-blob"); case MYSQL_TYPE_LONG_BLOB: return _SC("long-blob"); case MYSQL_TYPE_BLOB: return _SC("blob"); case MYSQL_TYPE_VAR_STRING: return _SC("var-string"); case MYSQL_TYPE_STRING: return _SC("string"); case MYSQL_TYPE_GEOMETRY: return _SC("geometry"); default: return _SC("unknown"); } } // ------------------------------------------------------------------------------------------------ CSStr SqMySQLTypenameC(enum_field_types type) { switch(type) { case MYSQL_TYPE_DECIMAL: return _SC("Decimal"); case MYSQL_TYPE_TINY: return _SC("Tiny"); case MYSQL_TYPE_SHORT: return _SC("Short"); case MYSQL_TYPE_LONG: return _SC("Long"); case MYSQL_TYPE_FLOAT: return _SC("Float"); case MYSQL_TYPE_DOUBLE: return _SC("Double"); case MYSQL_TYPE_NULL: return _SC("Null"); case MYSQL_TYPE_TIMESTAMP: return _SC("Time-Stamp"); case MYSQL_TYPE_LONGLONG: return _SC("Long-Long"); case MYSQL_TYPE_INT24: return _SC("Int24"); case MYSQL_TYPE_DATE: return _SC("Date"); case MYSQL_TYPE_TIME: return _SC("Time"); case MYSQL_TYPE_DATETIME: return _SC("Date-Time"); case MYSQL_TYPE_YEAR: return _SC("Year"); case MYSQL_TYPE_NEWDATE: return _SC("New-Date"); case MYSQL_TYPE_VARCHAR: return _SC("Var-Char"); case MYSQL_TYPE_BIT: return _SC("Bit"); #ifdef MYSQL_TYPE_TIMESTAMP2 case MYSQL_TYPE_TIMESTAMP2: return _SC("Time-Stamp2"); #endif // MYSQL_TYPE_TIMESTAMP2 #ifdef MYSQL_TYPE_DATETIME2 case MYSQL_TYPE_DATETIME2: return _SC("Date-Time2"); #endif // MYSQL_TYPE_DATETIME2 #ifdef MYSQL_TYPE_TIME2 case MYSQL_TYPE_TIME2: return _SC("Time2"); #endif // MYSQL_TYPE_TIME2 case MYSQL_TYPE_NEWDECIMAL: return _SC("New-Decimal"); case MYSQL_TYPE_ENUM: return _SC("Enum"); case MYSQL_TYPE_SET: return _SC("Set"); case MYSQL_TYPE_TINY_BLOB: return _SC("Tiny-Blob"); case MYSQL_TYPE_MEDIUM_BLOB: return _SC("Medium-Blob"); case MYSQL_TYPE_LONG_BLOB: return _SC("Long-Blob"); case MYSQL_TYPE_BLOB: return _SC("Blob"); case MYSQL_TYPE_VAR_STRING: return _SC("Var-String"); case MYSQL_TYPE_STRING: return _SC("String"); case MYSQL_TYPE_GEOMETRY: return _SC("Geometry"); default: return _SC("Unknown"); } } // ------------------------------------------------------------------------------------------------ static inline Int64 MySQLDateStrToSeconds(CSStr value) { Uint32 y = 1000, m = 1, d = 1; // Attempt to extract the numeric values from the string std::sscanf(value, "%u - %u - %u", &y, &m, &d); // Calculate the number of seconds and return it return Chrono::DateRangeToSeconds(1000, 1, 1, y, m, d); } // ------------------------------------------------------------------------------------------------ static inline Int64 MySQLTimeStrToSeconds(CSStr value) { Int32 h = 0, m = 0, s = 0; // Attempt to extract the numeric values from the string std::sscanf(value, "%d : %d : %d", &h, &m, &s); // Convert the hours to seconds h *= (60 * 60); // Add the remaining minutes and seconds and return the result return (h < 0) ? (h - ((m * 60) + s)) : (h + ((m * 60) + s)); } // ------------------------------------------------------------------------------------------------ static inline Int64 MySQLDatetimeStrToSeconds(CSStr value) { Uint32 y = 1000, mo = 1, d = 1, h = 0, mi = 0, s = 0; // Attempt to extract the numeric values from the string std::sscanf(value, "%u - %u - %u %u : %u : %u", &y, &mo, &d, &h, &mi, &s); // Calculate the number of seconds and return it return Chrono::DateRangeToSeconds(1000, 1, 1, y, mo, d) + (h * (60 * 60)) + ((mi * 60) + s); } // ------------------------------------------------------------------------------------------------ static inline Int64 MySQLTimestampStrToSeconds(CSStr value) { Uint32 y = 1000, mo = 1, d = 1, h = 0, mi = 0, s = 0; // Attempt to extract the numeric values from the string std::sscanf(value, "%u - %u - %u %u : %u : %u", &y, &mo, &d, &h, &mi, &s); // Detect if this was time-stamp 0 if (!y && !mo && !d && !h && !mi && !s) { return 0; } // Calculate the number of seconds and return it return Chrono::DateRangeToSeconds(1970, 1, 1, y, mo, d) + (h * (60 * 60)) + ((mi * 60) + s); } // ------------------------------------------------------------------------------------------------ template < typename T > static inline T MemToNum(const Uint8 * b, Ulong l) { union { Uint8 a[8]; T n; }; n = 0ULL; switch (l) { default: case 8: { a[7] = b[0]; a[6] = b[1]; a[5] = b[2]; a[4] = b[3]; a[3] = b[4]; a[2] = b[5]; a[1] = b[6]; a[0] = b[7]; } break; case 7: { a[6] = b[0]; a[5] = b[1]; a[4] = b[2]; a[3] = b[3]; a[2] = b[4]; a[1] = b[5]; a[0] = b[6]; } break; case 6: { a[5] = b[0]; a[4] = b[1]; a[3] = b[2]; a[2] = b[3]; a[1] = b[4]; a[0] = b[5]; } break; case 5: { a[4] = b[0]; a[3] = b[1]; a[2] = b[2]; a[1] = b[3]; a[0] = b[4]; } break; case 4: { a[3] = b[0]; a[2] = b[1]; a[1] = b[2]; a[0] = b[3]; } break; case 3: { a[2] = b[0]; a[1] = b[1]; a[0] = b[2]; } break; case 2: { a[1] = b[0]; a[0] = b[1]; } break; case 1: { a[0] = b[0]; } break; case 0: break; } return n; } // ------------------------------------------------------------------------------------------------ template < typename T > static inline T ConvertToSInt(CSStr value, Ulong length, enum_field_types type, CSStr tn) { // Is there even a value to attempt to extract? if (!value || *value == '\0') { return 0; } // Identify the type of value that must be converted and try to at least approximate something switch(type) { case MYSQL_TYPE_NULL: case MYSQL_TYPE_GEOMETRY: return static_cast< T >(0); case MYSQL_TYPE_BIT: case MYSQL_TYPE_YEAR: case MYSQL_TYPE_TINY: case MYSQL_TYPE_SHORT: case MYSQL_TYPE_INT24: case MYSQL_TYPE_LONG: return ConvTo< T >::From(std::strtol(value, nullptr, 10)); case MYSQL_TYPE_LONGLONG: case MYSQL_TYPE_VARCHAR: case MYSQL_TYPE_VAR_STRING: case MYSQL_TYPE_STRING: case MYSQL_TYPE_ENUM: case MYSQL_TYPE_SET: return ConvTo< T >::From(std::strtoll(value, nullptr, 10)); case MYSQL_TYPE_FLOAT: return ConvTo< T >::From(std::strtof(value, nullptr)); case MYSQL_TYPE_DOUBLE: case MYSQL_TYPE_DECIMAL: case MYSQL_TYPE_NEWDECIMAL: return ConvTo< T >::From(std::strtod(value, nullptr)); case MYSQL_TYPE_DATE: case MYSQL_TYPE_NEWDATE: return ConvTo< T >::From(MySQLDateStrToSeconds(value)); case MYSQL_TYPE_TIME: return ConvTo< T >::From(MySQLTimeStrToSeconds(value)); case MYSQL_TYPE_TIMESTAMP: return ConvTo< T >::From(MySQLTimestampStrToSeconds(value)); case MYSQL_TYPE_DATETIME: return ConvTo< T >::From(MySQLDatetimeStrToSeconds(value)); case MYSQL_TYPE_TINY_BLOB: case MYSQL_TYPE_MEDIUM_BLOB: case MYSQL_TYPE_LONG_BLOB: case MYSQL_TYPE_BLOB: return MemToNum< T >(reinterpret_cast< const Uint8 * >(value), length); default: { STHROWF("Unknown conversion from (%s) to (%s)", SqMySQLTypenameC(type), tn); } break; } // Should not reach this point! return 0; } // ------------------------------------------------------------------------------------------------ template < typename T > static inline T ConvertToUInt(CSStr value, Ulong length, enum_field_types type, CSStr tn) { // Is there even a value to attempt to extract? if (!value || *value == '\0') { return 0; } // Identify the type of value that must be converted and try to at least approximate something switch(type) { case MYSQL_TYPE_NULL: case MYSQL_TYPE_GEOMETRY: return static_cast< T >(0); case MYSQL_TYPE_BIT: case MYSQL_TYPE_YEAR: case MYSQL_TYPE_TINY: case MYSQL_TYPE_SHORT: case MYSQL_TYPE_INT24: case MYSQL_TYPE_LONG: return ConvTo< T >::From(std::strtoul(value, nullptr, 10)); case MYSQL_TYPE_LONGLONG: case MYSQL_TYPE_VARCHAR: case MYSQL_TYPE_VAR_STRING: case MYSQL_TYPE_STRING: case MYSQL_TYPE_ENUM: case MYSQL_TYPE_SET: return ConvTo< T >::From(std::strtoull(value, nullptr, 10)); case MYSQL_TYPE_FLOAT: return ConvTo< T >::From(std::strtof(value, nullptr)); case MYSQL_TYPE_DOUBLE: case MYSQL_TYPE_DECIMAL: case MYSQL_TYPE_NEWDECIMAL: return ConvTo< T >::From(std::strtod(value, nullptr)); case MYSQL_TYPE_DATE: case MYSQL_TYPE_NEWDATE: return ConvTo< T >::From(MySQLDateStrToSeconds(value)); case MYSQL_TYPE_TIME: return ConvTo< T >::From(MySQLTimeStrToSeconds(value)); case MYSQL_TYPE_TIMESTAMP: return ConvTo< T >::From(MySQLTimestampStrToSeconds(value)); case MYSQL_TYPE_DATETIME: return ConvTo< T >::From(MySQLDatetimeStrToSeconds(value)); case MYSQL_TYPE_TINY_BLOB: case MYSQL_TYPE_MEDIUM_BLOB: case MYSQL_TYPE_LONG_BLOB: case MYSQL_TYPE_BLOB: return MemToNum< T >(reinterpret_cast< const Uint8 * >(value), length); default: { STHROWF("Unknown conversion from (%s) to (%s)", SqMySQLTypenameC(type), tn); } break; } // Should not reach this point! return 0; } // ------------------------------------------------------------------------------------------------ Int8 DbConvTo< Int8 >::From(CSStr value, Ulong length, enum_field_types type, CSStr tn) { return ConvertToSInt< Int8 >(value, length, type, tn); } // ------------------------------------------------------------------------------------------------ Uint8 DbConvTo< Uint8 >::From(CSStr value, Ulong length, enum_field_types type, CSStr tn) { return ConvertToUInt< Uint8 >(value, length, type, tn); } // ------------------------------------------------------------------------------------------------ Int16 DbConvTo< Int16 >::From(CSStr value, Ulong length, enum_field_types type, CSStr tn) { return ConvertToSInt< Int16 >(value, length, type, tn); } // ------------------------------------------------------------------------------------------------ Uint16 DbConvTo< Uint16 >::From(CSStr value, Ulong length, enum_field_types type, CSStr tn) { return ConvertToUInt< Uint16 >(value, length, type, tn); } // ------------------------------------------------------------------------------------------------ Int32 DbConvTo< Int32 >::From(CSStr value, Ulong length, enum_field_types type, CSStr tn) { return ConvertToSInt< Int32 >(value, length, type, tn); } // ------------------------------------------------------------------------------------------------ Uint32 DbConvTo< Uint32 >::From(CSStr value, Ulong length, enum_field_types type, CSStr tn) { return ConvertToUInt< Uint32 >(value, length, type, tn); } // ------------------------------------------------------------------------------------------------ Int64 DbConvTo< Int64 >::From(CSStr value, Ulong length, enum_field_types type, CSStr tn) { return ConvertToSInt< Int64 >(value, length, type, tn); } // ------------------------------------------------------------------------------------------------ Uint64 DbConvTo< Uint64 >::From(CSStr value, Ulong length, enum_field_types type, CSStr tn) { return ConvertToUInt< Uint64 >(value, length, type, tn); } // ------------------------------------------------------------------------------------------------ Float32 DbConvTo< Float32 >::From(CSStr value, Ulong length, enum_field_types type, CSStr tn) { // Is there even a value to attempt to extract? if (!value || *value == '\0') { return 0; } // Identify the type of value that must be converted and try to at least approximate something switch(type) { case MYSQL_TYPE_NULL: case MYSQL_TYPE_GEOMETRY: return static_cast< Float32 >(0); case MYSQL_TYPE_BIT: case MYSQL_TYPE_YEAR: case MYSQL_TYPE_TINY: case MYSQL_TYPE_SHORT: case MYSQL_TYPE_INT24: case MYSQL_TYPE_LONG: return ConvTo< Float32 >::From(std::strtol(value, nullptr, 10)); case MYSQL_TYPE_LONGLONG: return ConvTo< Float32 >::From(std::strtoll(value, nullptr, 10)); case MYSQL_TYPE_ENUM: case MYSQL_TYPE_SET: case MYSQL_TYPE_VARCHAR: case MYSQL_TYPE_VAR_STRING: case MYSQL_TYPE_STRING: case MYSQL_TYPE_FLOAT: return std::strtof(value, nullptr); case MYSQL_TYPE_DOUBLE: return ConvTo< Float32 >::From(std::strtod(value, nullptr)); case MYSQL_TYPE_DECIMAL: case MYSQL_TYPE_NEWDECIMAL: return std::strtof(value, nullptr); case MYSQL_TYPE_DATE: case MYSQL_TYPE_NEWDATE: return ConvTo< Float32 >::From(MySQLDateStrToSeconds(value)); case MYSQL_TYPE_TIME: return ConvTo< Float32 >::From(MySQLTimeStrToSeconds(value)); case MYSQL_TYPE_TIMESTAMP: return ConvTo< Float32 >::From(MySQLTimestampStrToSeconds(value)); case MYSQL_TYPE_DATETIME: return ConvTo< Float32 >::From(MySQLDatetimeStrToSeconds(value)); case MYSQL_TYPE_TINY_BLOB: case MYSQL_TYPE_MEDIUM_BLOB: case MYSQL_TYPE_LONG_BLOB: case MYSQL_TYPE_BLOB: return MemToNum< Float32 >(reinterpret_cast< const Uint8 * >(value), length); default: { STHROWF("Unknown conversion from (%s) to (%s)", SqMySQLTypenameC(type), tn); } break; } // Should not reach this point! return 0; } // ------------------------------------------------------------------------------------------------ Float64 DbConvTo< Float64 >::From(CSStr value, Ulong length, enum_field_types type, CSStr tn) { // Is there even a value to attempt to extract? if (!value || *value == '\0') { return 0; } // Identify the type of value that must be converted and try to at least approximate something switch(type) { case MYSQL_TYPE_NULL: case MYSQL_TYPE_GEOMETRY: return static_cast< Float64 >(0); case MYSQL_TYPE_BIT: case MYSQL_TYPE_YEAR: case MYSQL_TYPE_TINY: case MYSQL_TYPE_SHORT: case MYSQL_TYPE_INT24: case MYSQL_TYPE_LONG: return ConvTo< Float64 >::From(std::strtol(value, nullptr, 10)); case MYSQL_TYPE_LONGLONG: return ConvTo< Float64 >::From(std::strtoll(value, nullptr, 10)); case MYSQL_TYPE_ENUM: case MYSQL_TYPE_SET: case MYSQL_TYPE_VARCHAR: case MYSQL_TYPE_VAR_STRING: case MYSQL_TYPE_STRING: case MYSQL_TYPE_FLOAT: case MYSQL_TYPE_DOUBLE: case MYSQL_TYPE_DECIMAL: case MYSQL_TYPE_NEWDECIMAL: return std::strtod(value, nullptr); case MYSQL_TYPE_DATE: case MYSQL_TYPE_NEWDATE: return ConvTo< Float64 >::From(MySQLDateStrToSeconds(value)); case MYSQL_TYPE_TIME: return ConvTo< Float64 >::From(MySQLTimeStrToSeconds(value)); case MYSQL_TYPE_TIMESTAMP: return ConvTo< Float64 >::From(MySQLTimestampStrToSeconds(value)); case MYSQL_TYPE_DATETIME: return ConvTo< Float64 >::From(MySQLDatetimeStrToSeconds(value)); case MYSQL_TYPE_TINY_BLOB: case MYSQL_TYPE_MEDIUM_BLOB: case MYSQL_TYPE_LONG_BLOB: case MYSQL_TYPE_BLOB: return MemToNum< Float64 >(reinterpret_cast< const Uint8 * >(value), length); default: { STHROWF("Unknown conversion from (%s) to (%s)", SqMySQLTypenameC(type), tn); } break; } // Should not reach this point! return 0; } // ------------------------------------------------------------------------------------------------ bool DbConvTo< bool >::From(CSStr value, Ulong length, enum_field_types type, CSStr tn) { return ConvertToSInt< Int64 >(value, length, type, tn) > 0; } // ------------------------------------------------------------------------------------------------ void ConnHnd::GrabCurrent() { mErrNo = mysql_errno(mPtr); mErrStr.assign(mysql_error(mPtr)); } // ------------------------------------------------------------------------------------------------ #if defined(_DEBUG) || defined(SQMOD_EXCEPTLOC) void ConnHnd::ThrowCurrent(CCStr act, CCStr file, Int32 line) { GrabCurrent(); // Throw the exception with the resulted message throw Sqrat::Exception(FmtStr("%s (%u) : %s =>[%s:%d]", act, mErrNo, mErrStr.c_str(), file, line)); } #else void ConnHnd::ThrowCurrent(CCStr act) { GrabCurrent(); // Throw the exception with the resulted message throw Sqrat::Exception(FmtStr("%s (%u) : %s", act, mErrNo, mErrStr.c_str())); } #endif // _DEBUG // ------------------------------------------------------------------------------------------------ ConnHnd::ConnHnd() : mPtr(nullptr) , mErrNo(0) , mErrStr(_SC("")) , mPort() , mHost() , mUser() , mPass() , mName() , mSocket() , mFlags() , mSSL_Key() , mSSL_Cert() , mSSL_CA() , mSSL_CA_Path() , mSSL_Cipher() , mCharset() , mAutoCommit() , mInTransaction(false) { /* ... */ } // ------------------------------------------------------------------------------------------------ ConnHnd::~ConnHnd() { Disconnect(); } // ------------------------------------------------------------------------------------------------ void ConnHnd::Create(const Account & acc) { // Is this connection already created? if (mPtr != nullptr) { STHROWF("MySQL connection was already created"); } // Attempt to initialize a connection handle mPtr = mysql_init(NULL); // See if a connection handle could be initialized if (!mPtr) { STHROWF("Cannot initialize MYSQL connection structure"); } // Store all the account information mPort = acc.GetPortNum(); mHost = acc.GetHost(); mUser = acc.GetUser(); mPass = acc.GetPass(); mName = acc.GetName(); mSocket = acc.GetSocket(); mFlags = acc.GetFlags(); mSSL_Key = acc.GetSSL_Key(); mSSL_Cert = acc.GetSSL_Cert(); mSSL_CA = acc.GetSSL_CA(); mSSL_CA_Path = acc.GetSSL_CA_Path(); mSSL_Cipher = acc.GetSSL_Cipher(); mAutoCommit = acc.GetAutoCommit(); // Attempt to configure SSL if specified if (!mSSL_Key.empty() && mysql_ssl_set(mPtr, mSSL_Key.c_str(), mSSL_Cert.c_str(), mSSL_CA.c_str(), mSSL_CA_Path.c_str(), mSSL_Cipher.c_str()) != 0) { SQMOD_THROW_CURRENT(*this, "Cannot configure SSL"); } // Attempt to connect to the specified server else if (!mysql_real_connect(mPtr, mHost.c_str(), mUser.c_str(), mPass.c_str(), (mName.empty() ? nullptr : mName.c_str()), mPort, (mSocket.empty() ? nullptr : mSocket.c_str()), mFlags)) { SQMOD_THROW_CURRENT(*this, "Cannot connect to database"); } // Attempt configure the auto-commit option else if (mysql_autocommit(mPtr, mAutoCommit) != 0) { SQMOD_THROW_CURRENT(*this, "Cannot configure auto-commit"); } // Get iterators to the options container Account::Options::const_iterator itr = acc.GetOptions().cbegin(); Account::Options::const_iterator end = acc.GetOptions().cend(); // Process each option in the container for (String sql(128, 0); itr != end; ++itr) { // Prepare the SQL query that applies the option sql.assign("SET OPTION "); sql.append(itr->first); sql.append("="); sql.append(itr->second); // Execute the resulted query if (Execute(sql.c_str(), static_cast< Ulong >(sql.size())) != 1) { SQMOD_THROW_CURRENT(*this, "Unable to apply option"); } } MY_CHARSET_INFO charsetinfo; // Grab the information about the current character set mysql_get_character_set_info(mPtr, &charsetinfo); // We only need the character set name if (charsetinfo.name != nullptr) { mCharset.assign(charsetinfo.name); } } // ------------------------------------------------------------------------------------------------ void ConnHnd::Disconnect() { if (mPtr != nullptr) { mysql_close(mPtr); // mysql_init() called mysql_thread_init() therefore it needs to clear memory // when the MYSQL handle is closed mysql_thread_end(); // Prevent further use of this handle mPtr = nullptr; } } // ------------------------------------------------------------------------------------------------ Uint64 ConnHnd::Execute(CSStr query, Ulong size) { // Make sure that we are connected if (!mPtr) { STHROWF("Invalid MySQL connection"); } // Make sure the specified query is valid else if (!query || *query == '\0') { STHROWF("Invalid or empty MySQL query"); } // Are we supposed to compute the size? else if (!size) { size = std::strlen(query); } // Attempt to execute the specified query if (mysql_real_query(mPtr, query, size)) { SQMOD_THROW_CURRENT(*this, "Unable to execute query"); } // Where the number of affected rows will be stored Uint64 affected = 0UL; // Count the number of affected rows by any "upsert" statement while (true) { // Attempt to retrieve a buffered result set from the executed query ResType * result = mysql_store_result(mPtr); // If we have a result, then this was a SELECT statement and we should not count it // because it returns the number of selected rows and not modified/affected if (result) { // Just, free the memory associated with the obtained result set mysql_free_result(result); } // Non SELCT queries should have a field count of 0 else if (mysql_field_count(mPtr) == 0) { // Sum the number of affected rows by this statement affected += mysql_affected_rows(mPtr); } else if (mysql_errno(mPtr) != 0) { SQMOD_THROW_CURRENT(*this, "Unable to count affected rows"); } // Prepare the next result from the executed query // If return code is 0 then we have a result ready to process const Int32 status = mysql_next_result(mPtr); // If return code is higher than 0 then an error occurred if (status > 0) { SQMOD_THROW_CURRENT(*this, "Unable to prepare next result"); } // If return code is less than 0 then there are no results left else if (status < 0) { break; } } // Return the number of affected rows return affected; } // ------------------------------------------------------------------------------------------------ void StmtBind::SetInput(enum_field_types type, BindType * bind, CCStr buffer, Ulong length) { // Associate the library bind point with our bind wrapper mBind = bind; // Assign the 64 bit unsigned integer as the default buffer mBind->buffer = &mUint64; // Match the bind point type to the one from the field mBind->buffer_type = type; // Default to n empty buffer until type identification mBind->buffer_length = 0; // Allow the library to specify whether the value is null mBind->is_null = &mIsNull; // Allow the library to specify if errors occurred mBind->error = &mError; // Tell the library where to read the buffer size mBind->length = &(mBind->buffer_length); // Identify and configure the parameter type switch (type) { case MYSQL_TYPE_NULL: case MYSQL_TYPE_TINY: case MYSQL_TYPE_BIT: { mBind->buffer_length = 1; } break; case MYSQL_TYPE_YEAR: case MYSQL_TYPE_SHORT: { mBind->buffer_length = sizeof(Int16); } break; case MYSQL_TYPE_INT24: case MYSQL_TYPE_LONG: { mBind->buffer_length = sizeof(Int32); } break; case MYSQL_TYPE_LONGLONG: { mBind->buffer_length = sizeof(Int64); } break; case MYSQL_TYPE_FLOAT: { mBind->buffer_length = sizeof(Float32); } break; case MYSQL_TYPE_DOUBLE: { mBind->buffer_length = sizeof(Float64); } break; case MYSQL_TYPE_NEWDATE: case MYSQL_TYPE_DATE: case MYSQL_TYPE_TIME: case MYSQL_TYPE_DATETIME: case MYSQL_TYPE_TIMESTAMP: { mBind->buffer = &mTime; } break; case MYSQL_TYPE_DECIMAL: case MYSQL_TYPE_NEWDECIMAL: case MYSQL_TYPE_TINY_BLOB: case MYSQL_TYPE_MEDIUM_BLOB: case MYSQL_TYPE_LONG_BLOB: case MYSQL_TYPE_BLOB: case MYSQL_TYPE_ENUM: case MYSQL_TYPE_SET: case MYSQL_TYPE_VARCHAR: case MYSQL_TYPE_VAR_STRING: case MYSQL_TYPE_STRING: { // Allocate a buffer to match the specified size mData.Adjust(length); // Should we copy anything into the buffer? if (buffer) { mData.Append(buffer, length); } // Assign the buffer as the new bind point buffer mBind->buffer = mData.Data(); // Assign the buffer cursor position as the new bind point size mBind->buffer_length = mData.Position(); } break; default: STHROWF("Unknown MySQL parameter type"); } } // ------------------------------------------------------------------------------------------------ void StmtHnd::GrabCurrent() { mErrNo = mysql_stmt_errno(mPtr); mErrStr.assign(mysql_stmt_error(mPtr)); } // ------------------------------------------------------------------------------------------------ #if defined(_DEBUG) || defined(SQMOD_EXCEPTLOC) void StmtHnd::ThrowCurrent(CCStr act, CCStr file, Int32 line) { GrabCurrent(); // Throw the exception with the resulted message throw Sqrat::Exception(FmtStr("%s (%u) : %s =>[%s:%d]", act, mErrNo, mErrStr.c_str(), file, line)); } #else void StmtHnd::ThrowCurrent(CCStr act) { GrabCurrent(); // Throw the exception with the resulted message throw Sqrat::Exception(FmtStr("%s (%u) : %s", act, mErrNo, mErrStr.c_str())); } #endif // _DEBUG // ------------------------------------------------------------------------------------------------ #if defined(_DEBUG) || defined(SQMOD_EXCEPTLOC) void StmtHnd::ValidateParam(Uint32 idx, CCStr file, Int32 line) const { // Is the handle valid? if (mPtr == nullptr) { STHROWF("Invalid MySQL statement reference =>[%s:%d]", file, line); } else if (idx >= mParams) { STHROWF("Parameter index is out of range: %u >= %lu =>[%s:%d]", idx, mParams, file, line); } } #else void StmtHnd::ValidateParam(Uint32 idx) const { // Is the handle valid? if (mPtr == nullptr) { STHROWF("Invalid MySQL statement reference"); } else if (idx >= mParams) { STHROWF("Parameter index is out of range: %u >= %lu", idx, mParams); } } #endif // _DEBUG // ------------------------------------------------------------------------------------------------ StmtHnd::StmtHnd() : mPtr(nullptr) , mErrNo(0) , mErrStr(_SC("")) , mParams(0) , mBinds(nullptr) , mMyBinds(nullptr) , mConnection() , mQuery(_SC("")) { } // ------------------------------------------------------------------------------------------------ StmtHnd::~StmtHnd() { // Should delete native bindings? if (mMyBinds) { delete [] (mMyBinds); } // Should we delete binding wrappers? if (mBinds) { delete [] (mBinds); } // Should we release any statement? if (mPtr) { mysql_stmt_close(mPtr); } } // ------------------------------------------------------------------------------------------------ void StmtHnd::Create(const ConnRef & conn, CSStr query) { // Is this statement already created? if (mPtr != nullptr) { STHROWF("MySQL statement was already created"); } // Validate the specified connection handle else if (!conn) { STHROWF("Invalid MySQL connection reference"); } else if (conn->mPtr == nullptr) { STHROWF("Invalid MySQL connection"); } // Validate the specified query string else if (!query || *query == '\0') { STHROWF("Invalid or empty MySQL query"); } // Store the connection handle and query string mConnection = conn; mQuery.assign(query); // Attempt to initialize the statement handle mPtr = mysql_stmt_init(mConnection->mPtr); // Validate the obtained statement handle if (!mPtr) { SQMOD_THROW_CURRENT(*mConnection, "Cannot initialize MySQL statement"); } // Attempt to prepare the statement with the given query else if (mysql_stmt_prepare(mPtr, mQuery.c_str(), mQuery.size())) { SQMOD_THROW_CURRENT(*this, "Cannot prepare MySQL statement"); } // Retrieve the amount of parameters supported by this statement mParams = mysql_stmt_param_count(mPtr); // Are there any parameters to allocate? if (mParams <= 0) { // We're done here! return; } // Allocate the binding wrappers mBinds = new StmtBind[mParams]; // Validate the allocated memory if (!mBinds) { STHROWF("Unable to allocate MySQL bind point wrappers"); } // Allocate the binding points mMyBinds = new BindType[mParams]; // Validate the allocated memory if (!mMyBinds) { STHROWF("Unable to allocate MySQL bind point structures"); } // Reset the allocated points std::memset(mMyBinds, 0, sizeof(BindType) * mParams); } // ------------------------------------------------------------------------------------------------ void ResBind::SetOutput(const FieldType & field, BindType * bind) { // Associate the library bind point with our bind wrapper mBind = bind; // Assign the 64 bit unsigned integer as the default buffer mBind->buffer = &mUint64; // Match the bind point type to the one from the field mBind->buffer_type = field.type; // Default to n empty buffer until type identification mBind->buffer_length = 0; // Allow the library to specify whether the value is null mBind->is_null = &mIsNull; // Allow the library to specify if errors occurred mBind->error = &mError; // Tell the library where to read the buffer size mBind->length = &(mBind->buffer_length); // Identify and configure the field type switch (field.type) { case MYSQL_TYPE_NULL: case MYSQL_TYPE_TINY: case MYSQL_TYPE_BIT: { mBind->buffer_length = 1; } break; case MYSQL_TYPE_YEAR: case MYSQL_TYPE_SHORT: { mBind->buffer_length = sizeof(Int16); } break; case MYSQL_TYPE_INT24: case MYSQL_TYPE_LONG: { mBind->buffer_length = sizeof(Int32); } break; case MYSQL_TYPE_LONGLONG: { mBind->buffer_length = sizeof(Int64); } break; case MYSQL_TYPE_FLOAT: { mBind->buffer_length = sizeof(Float32); } break; case MYSQL_TYPE_DOUBLE: { mBind->buffer_length = sizeof(Float64); } break; case MYSQL_TYPE_NEWDATE: case MYSQL_TYPE_DATE: case MYSQL_TYPE_TIME: case MYSQL_TYPE_DATETIME: case MYSQL_TYPE_TIMESTAMP: { mBind->buffer = &mTime; } break; case MYSQL_TYPE_DECIMAL: case MYSQL_TYPE_NEWDECIMAL: case MYSQL_TYPE_TINY_BLOB: case MYSQL_TYPE_MEDIUM_BLOB: case MYSQL_TYPE_LONG_BLOB: case MYSQL_TYPE_BLOB: case MYSQL_TYPE_ENUM: case MYSQL_TYPE_SET: case MYSQL_TYPE_VARCHAR: case MYSQL_TYPE_VAR_STRING: case MYSQL_TYPE_STRING: { // Allocate a buffer to match the field size mData.Adjust(field.max_length); // Assign the buffer as the new bind point buffer mBind->buffer = mData.Data(); // Assign the buffer size as the new bind point size mBind->buffer_length = mData.Capacity(); } break; default: STHROWF("Unknown MySQL field type"); } } // ------------------------------------------------------------------------------------------------ ResHnd::ResHnd() : mPtr(nullptr) , mFieldCount(0) , mLengths(nullptr) , mFields(nullptr) , mBinds(nullptr) , mMyBinds(nullptr) , mRow(nullptr) , mConnection() , mStatement() , mIndexes() { /* ... */ } // ------------------------------------------------------------------------------------------------ ResHnd::~ResHnd() { // Is there a result-set that we should free? if (mPtr) { mysql_free_result(mPtr); } // Are there any bind points that we should free? if (mMyBinds) { delete [] (mMyBinds); } // Was this result-set from a statement? if (mStatement) { // Are there any rows pointers we should free? if (mRow) { delete [] (mRow); } // Free the result-set in the statement mysql_stmt_free_result(mStatement->mPtr); } // Are there any bind wrappers that we should free? if (mBinds) { delete [] (mBinds); } } // ------------------------------------------------------------------------------------------------ void ResHnd::GrabCurrent() { if (mConnection) { mConnection->GrabCurrent(); } else if (mStatement) { mStatement->GrabCurrent(); } } // ------------------------------------------------------------------------------------------------ #if defined(_DEBUG) || defined(SQMOD_EXCEPTLOC) void ResHnd::ThrowCurrent(CCStr act, CCStr file, Int32 line) { GrabCurrent(); // Throw the exception with the resulted message if (mConnection) { mConnection->ThrowCurrent(act, file, line); } else if (mStatement) { mStatement->ThrowCurrent(act, file, line); } } #else void ResHnd::ThrowCurrent(CCStr act) { GrabCurrent(); // Throw the exception with the resulted message if (mConnection) { mConnection->ThrowCurrent(act); } else if (mStatement) { mStatement->ThrowCurrent(act); } } #endif // _DEBUG // ------------------------------------------------------------------------------------------------ #if defined(_DEBUG) || defined(SQMOD_EXCEPTLOC) void ResHnd::ValidateField(Uint32 idx, CCStr file, Int32 line) const { // Is the handle valid? if (mPtr == nullptr) { STHROWF("Invalid MySQL result-set =>[%s:%d]", file, line); } else if (idx >= mFieldCount) { STHROWF("Field index is out of range: %u >= %lu =>[%s:%d]", idx, mFieldCount, file, line); } } #else void ResHnd::ValidateField(Uint32 idx) const { // Is the handle valid? if (mPtr == nullptr) { STHROWF("Invalid MySQL result-set"); } else if (idx >= mFieldCount) { STHROWF("Field index is out of range: %u >= %lu", idx, mFieldCount); } } #endif // _DEBUG // ------------------------------------------------------------------------------------------------ Uint32 ResHnd::GetFieldIndex(CSStr name) { // Validate the handle if (!mPtr) { STHROWF("Invalid MySQL result-set"); } // Attempt to find the specified field const IndexMap::iterator itr = mIndexes.find(name); // Was there a field with the specified name? if (itr != mIndexes.end()) { return itr->second; } // No such field exists (expecting the invoker to validate the result) return std::numeric_limits< Uint32 >::max(); } // ------------------------------------------------------------------------------------------------ void ResHnd::Create(const ConnRef & conn) { // Is this result-set already created? if (mPtr != nullptr) { STHROWF("MySQL result-set was already created"); } // Validate the specified connection handle else if (!conn) { STHROWF("Invalid MySQL connection reference"); } else if (conn->mPtr == nullptr) { STHROWF("Invalid MySQL connection"); } // Store the connection handle mConnection = conn; // Retrieve the complete result-set to the client, if any mPtr = mysql_store_result(mConnection->mPtr); // Did this query return any results? if (!mPtr) { return; // We're done here! } // Obtain the number of fields in the result-set mFieldCount = mysql_num_fields(mPtr); // Obtain an array representing the fields in the result-set mFields = mysql_fetch_fields(mPtr); // Associate the field names with their index for (Uint32 i = 0; i < mFieldCount; ++i) { // Associate the current field name with the current index mIndexes[mFields[i].name] = i; // Include table names if available if (mFields[i].table_length > 0) { mIndexes[ToStrF("%s.%s", mFields[i].table, mFields[i].name)] = i; } else if (mFields[i].org_table_length > 0) { mIndexes[ToStrF("%s.%s", mFields[i].org_table, mFields[i].name)] = i; } } } // ------------------------------------------------------------------------------------------------ void ResHnd::Create(const StmtRef & stmt) { // Is this result-set already created? if (mPtr != nullptr) { STHROWF("MySQL result-set was already created"); } // Validate the given statement handle else if (!stmt) { STHROWF("Invalid MySQL statement reference"); } else if (stmt->mPtr == nullptr) { STHROWF("Invalid MySQL statement"); } // Store the statement handle mStatement = stmt; // Set the parameter value for the next operation int max_length = 1; // Force mysql_stmt_store_result() to update the meta-data MYSQL_FIELD->max_length value if (mysql_stmt_attr_set(mStatement->mPtr, STMT_ATTR_UPDATE_MAX_LENGTH, &max_length) != 0) { SQMOD_THROW_CURRENT(*mStatement, "Cannot apply MySQL statement attribute"); } // Attempt to buffer the complete result-set on the client if (mysql_stmt_store_result(mStatement->mPtr)) { SQMOD_THROW_CURRENT(*mStatement, "Cannot buffer MySQL result-set"); } // Obtain the number of fields in the result-set mFieldCount = mysql_stmt_field_count(mStatement->mPtr); // Obtain the result-set meta-data mPtr = mysql_stmt_result_metadata(mStatement->mPtr); // Obtain an array representing the fields in the result-set mFields = mysql_fetch_fields(mPtr); // Are there any fields to allocate if (mFieldCount > 0) { // Allocate the bind wrappers mBinds = new ResBind[mFieldCount]; // Validate the allocated structures if (!mBinds) { STHROWF("Unable to allocate MySQL bind point wrappers"); } // Allocate the bind points mMyBinds = new BindType[mFieldCount]; // Validate the allocated structures if (!mMyBinds) { STHROWF("Unable to allocate MySQL bind point structures"); } // Allocate the row pointers mRow = new CStr[mFieldCount]; // Validate the allocated structures if (!mRow) { STHROWF("Unable to allocate MySQL row pointers"); } // Initialize the bind points to null std::memset(mMyBinds, 0, sizeof(BindType) * mFieldCount); } // Configure bind points and make associations for (Uint32 i = 0; i < mFieldCount; ++i) { // Associate the current field name with the current index mIndexes[mFields[i].name] = i; // Include table names if available if (mFields[i].table_length > 0) { mIndexes[ToStrF("%s.%s", mFields[i].table, mFields[i].name)] = i; } else if (mFields[i].org_table_length > 0) { mIndexes[ToStrF("%s.%s", mFields[i].org_table, mFields[i].name)] = i; } // Configure the current bind point according to the associated field mBinds[i].SetOutput(mFields[i], &mMyBinds[i]); // Store the bind point buffer into the associated row mRow[i] = mBinds[i].GetBuffer(); } // Associate our bind points with the statement for result storage if (mFieldCount > 0 && mysql_stmt_bind_result(mStatement->mPtr, mMyBinds) != 0) { SQMOD_THROW_CURRENT(*mStatement, "Cannot bind MySQL variables to statement"); } } // ------------------------------------------------------------------------------------------------ Uint64 ResHnd::RowIndex() const { // Is this result-set even valid? if (!mPtr) { STHROWF("Invalid MySQL result-set"); } // Did we come from a statement? else if (mStatement) { return (Uint64)mysql_stmt_row_tell(mStatement->mPtr); } // Just retrieve it from the result set return (Uint64)mysql_row_tell(mPtr); } // ------------------------------------------------------------------------------------------------ Uint64 ResHnd::RowCount() const { // Is this result-set even valid? if (!mPtr) { STHROWF("Invalid MySQL result-set"); } // Did we come from a statement? else if (mStatement) { return mysql_stmt_num_rows(mStatement->mPtr); } // Just retrieve it from the result set return mysql_num_rows(mPtr); } // ------------------------------------------------------------------------------------------------ bool ResHnd::Next() { // Is this result-set even valid? if (!mPtr) { STHROWF("Invalid MySQL result-set"); } // Did we come from a statement? if (mStatement) { // Step the statement return !mysql_stmt_fetch(mStatement->mPtr); } // Fetch another row from the result set mRow = mysql_fetch_row(mPtr); // Fetch the data lengths mLengths = mysql_fetch_lengths(mPtr); // Return whether the fetched row is valid return (mRow != NULL); } // ------------------------------------------------------------------------------------------------ bool ResHnd::SetRowIndex(Uint64 index) { // Is this result-set even valid? if (!mPtr) { STHROWF("Invalid MySQL result-set"); } // Did we come from a statement? else if (mStatement) { mysql_stmt_data_seek(mStatement->mPtr, index); } else { mysql_data_seek(mPtr, index); } // Step the result set return Next(); } // ------------------------------------------------------------------------------------------------ const String Account::s_String = String(_SC("")); // ------------------------------------------------------------------------------------------------ SQInteger Account::Typename(HSQUIRRELVM vm) { static const SQChar name[] = _SC("SqMySQLAccount"); sq_pushstring(vm, name, sizeof(name)); return 1; } // ------------------------------------------------------------------------------------------------ Account::Account(CSStr host, CSStr user, CSStr pass, CSStr name, SQInteger port, CSStr socket) : m_Port(0) , m_Host() , m_User() , m_Pass() , m_Name() , m_Socket() , m_Flags(CLIENT_MULTI_STATEMENTS) , m_SSL_Key() , m_SSL_Cert() , m_SSL_CA() , m_SSL_CA_Path() , m_SSL_Cipher() , m_Options() , m_AutoCommit(true) { // Validate the specified port number if (port >= 0xFFFF) { STHROWF("Port number out of range: " _PRINT_INT_FMT, port); } // Assign the specified port else { m_Port = ConvTo< Uint16 >::From(port); } // Assign the remaining values SetHost(host); SetUser(user); SetPass(pass); SetName(name); SetSocket(socket); } // ------------------------------------------------------------------------------------------------ Int32 Account::Cmp(const Account & o) const { if (m_User == o.m_User && m_Pass == o.m_Pass) { return 0; } else if (m_User > o.m_User && m_Pass > o.m_Pass) { return 1; } else { return -1; } } // ------------------------------------------------------------------------------------------------ CSStr Account::ToString() const { return ToStringF("%s:%s@%s:%u", m_User.c_str(), m_Pass.c_str(), m_Host.c_str(), m_Port); } // ------------------------------------------------------------------------------------------------ void Account::SetHost(CSStr addr) { // Clear the current host address m_Host.assign(_SC("")); // Validate the given address if (!addr || *addr == '\0') { return; // Nothing to set. } // See if there'sa colon in the address CSStr pos = std::strchr(addr, ':'); // Should we look for a port number? if (pos != nullptr) { // Assign the address portion m_Host.assign(addr, pos - addr); // Attempt to extract the numeric value const Ulong num = std::strtoul(++pos, nullptr, 10); // Is the port number withing range? if (num > 0xFFFF) { STHROWF("Port number out of range: %lu", num); } // Assign the extracted port number m_Port = ConvTo< Uint16 >::From(num); } // Assign the address as is else { m_Host.assign(addr); } } // ------------------------------------------------------------------------------------------------ void Account::SetPortNum(SQInteger port) { // Validate the specified port number if (port >= 0xFFFF) { STHROWF("Port number out of range: " _PRINT_INT_FMT, port); } // Assign the specified port number m_Port = ConvTo< Uint16 >::From(port); } // ------------------------------------------------------------------------------------------------ void Account::SetSSL(CSStr key, CSStr cert, CSStr ca, CSStr ca_path, CSStr cipher) { if (!key || *key == '\0') { m_SSL_Key.clear(); m_SSL_Cert.clear(); m_SSL_CA.clear(); m_SSL_CA_Path.clear(); m_SSL_Cipher.clear(); } else { m_SSL_Key.assign(key ? key : _SC("")); m_SSL_Cert.assign(cert ? cert : _SC("")); m_SSL_CA.assign(ca ? ca : _SC("")); m_SSL_CA_Path.assign(ca_path ? ca_path : _SC("")); m_SSL_Cipher.assign(cipher ? cipher : _SC("")); } } // ------------------------------------------------------------------------------------------------ Table Account::GetOptionsTable() const { // Allocate an empty table Table tbl(DefaultVM::Get()); // Insert every option into the table for (const auto & opt : m_Options) { tbl.SetValue(opt.first.c_str(), opt.second); } // Return the resulted table return tbl; } // ------------------------------------------------------------------------------------------------ const String & Account::GetOption(CSStr name) const { // Make sure the specified name is valid if (!name || *name == '\0') { STHROWF("Invalid or empty option name"); } // Attempt to find the requested option const Options::const_iterator itr = m_Options.find(name); // Return the result return (itr == m_Options.cend()) ? s_String : itr->second; } // ------------------------------------------------------------------------------------------------ void Account::SetOption(CSStr name, CSStr value) { // Make sure the specified name is valid if (!name || *name == '\0') { STHROWF("Invalid or empty option name"); } // Assign the specified value m_Options[name] = value ? value : _SC(""); } // ------------------------------------------------------------------------------------------------ void Account::RemoveOption(CSStr name) { // Make sure the specified name is valid if (!name || *name == '\0') { STHROWF("Invalid or empty option name"); } // Erase the specified value m_Options.erase(name); } // ------------------------------------------------------------------------------------------------ Connection Account::Connect() const { return Connection(*this); } // ------------------------------------------------------------------------------------------------ SQInteger Connection::Typename(HSQUIRRELVM vm) { static const SQChar name[] = _SC("SqMySQLConnection"); sq_pushstring(vm, name, sizeof(name)); return 1; } // ------------------------------------------------------------------------------------------------ #if defined(_DEBUG) || defined(SQMOD_EXCEPTLOC) void Connection::Validate(CCStr file, Int32 line) const { if (!m_Handle) { SqThrowF("Invalid MySQL connection reference =>[%s:%d]", file, line); } } #else void Connection::Validate() const { if (!m_Handle) { SqThrowF("Invalid MySQL connection reference"); } } #endif // _DEBUG // ------------------------------------------------------------------------------------------------ #if defined(_DEBUG) || defined(SQMOD_EXCEPTLOC) void Connection::ValidateCreated(CCStr file, Int32 line) const { if (!m_Handle) { SqThrowF("Invalid MySQL connection reference =>[%s:%d]", file, line); } else if (m_Handle->mPtr == nullptr) { SqThrowF("Invalid MySQL connection =>[%s:%d]", file, line); } } #else void Connection::ValidateCreated() const { if (!m_Handle) { SqThrowF("Invalid MySQL connection reference"); } else if (m_Handle->mPtr == nullptr) { SqThrowF("Invalid MySQL connection"); } } #endif // _DEBUG // ------------------------------------------------------------------------------------------------ #if defined(_DEBUG) || defined(SQMOD_EXCEPTLOC) const ConnRef & Connection::GetValid(CCStr file, Int32 line) const { Validate(file, line); return m_Handle; } #else const ConnRef & Connection::GetValid() const { Validate(); return m_Handle; } #endif // _DEBUG // ------------------------------------------------------------------------------------------------ #if defined(_DEBUG) || defined(SQMOD_EXCEPTLOC) const ConnRef & Connection::GetCreated(CCStr file, Int32 line) const { ValidateCreated(file, line); return m_Handle; } #else const ConnRef & Connection::GetCreated() const { ValidateCreated(); return m_Handle; } #endif // _DEBUG // ------------------------------------------------------------------------------------------------ Object Connection::Insert(CSStr query) { // Make sure the specified query is valid if (!query || *query == '\0') { STHROWF("Invalid or empty MySQL query"); } // Attempt to execute the specified query else if (mysql_real_query(SQMOD_GET_CREATED(*this)->mPtr, query, std::strlen(query)) != 0) { SQMOD_THROW_CURRENT(*m_Handle, "Unable to execute MySQL query"); } // Return the identifier of the inserted row return Object(SqTypeIdentity< ULongInt >{}, SqVM(), mysql_insert_id(m_Handle->mPtr)); } // ------------------------------------------------------------------------------------------------ ResultSet Connection::Query(CSStr query) { // Make sure the specified query is valid if (!query || *query == '\0') { STHROWF("Invalid or empty MySQL query"); } // Attempt to execute the specified query else if (mysql_real_query(SQMOD_GET_CREATED(*this)->mPtr, query, std::strlen(query)) != 0) { SQMOD_THROW_CURRENT(*m_Handle, "Unable to execute MySQL query"); } // Return the identifier of the inserted row return ResultSet(m_Handle); } // ------------------------------------------------------------------------------------------------ Statement Connection::GetStatement(CSStr query) { return Statement(SQMOD_GET_CREATED(*this), query); } // ------------------------------------------------------------------------------------------------ SQInteger Connection::ExecuteF(HSQUIRRELVM vm) { const Int32 top = sq_gettop(vm); // Was the query value specified? if (top <= 1) { return sq_throwerror(vm, "Missing query value"); } // The connection instance Connection * conn = nullptr; // Attempt to extract the argument values try { conn = Var< Connection * >(vm, 1).value; } catch (const Sqrat::Exception & e) { // Propagate the error return sq_throwerror(vm, e.what()); } // Do we have a valid connection instance? if (!conn) { return sq_throwerror(vm, "Invalid MySQL connection instance"); } // Validate the connection info try { SQMOD_VALIDATE_CREATED(*conn); } catch (const Sqrat::Exception & e) { // Propagate the error return sq_throwerror(vm, e.what()); } // Attempt to retrieve the value from the stack as a string StackStrF val(vm, 2); // Have we failed to retrieve the string? if (SQ_FAILED(val.Proc(true))) { return val.mRes; // Propagate the error! } // Make sure the query string is valid else if (!(val.mPtr) || *(val.mPtr) == '\0') { STHROWF("Invalid or empty MySQL query"); } // Attempt to execute the specified query try { Var< ULongInt >::push(vm, ULongInt(conn->m_Handle->Execute(val.mPtr, val.mLen))); } catch (const Sqrat::Exception & e) { // Propagate the error return sq_throwerror(vm, e.what()); } // This function returned a value return 1; } // ------------------------------------------------------------------------------------------------ SQInteger Connection::InsertF(HSQUIRRELVM vm) { const Int32 top = sq_gettop(vm); // Was the query value specified? if (top <= 1) { return sq_throwerror(vm, "Missing query value"); } // The connection instance Connection * conn = nullptr; // Attempt to extract the argument values try { conn = Var< Connection * >(vm, 1).value; } catch (const Sqrat::Exception & e) { // Propagate the error return sq_throwerror(vm, e.what()); } // Do we have a valid connection instance? if (!conn) { return sq_throwerror(vm, "Invalid MySQL connection instance"); } // Validate the connection info try { SQMOD_VALIDATE_CREATED(*conn); } catch (const Sqrat::Exception & e) { // Propagate the error return sq_throwerror(vm, e.what()); } // Attempt to retrieve the value from the stack as a string StackStrF val(vm, 2); // Have we failed to retrieve the string? if (SQ_FAILED(val.Proc(true))) { return val.mRes; // Propagate the error! } // Make sure the query string is valid else if (!(val.mPtr) || *(val.mPtr) == '\0') { return sq_throwerror(vm, "Invalid or empty MySQL query"); } // Attempt to execute the specified query try { if (mysql_real_query(conn->m_Handle->mPtr, val.mPtr, val.mLen) != 0) { SQMOD_THROW_CURRENT(*(conn->m_Handle), "Unable to execute MySQL query"); } // Return the identifier of the inserted row Var< ULongInt >::push(vm, ULongInt(mysql_insert_id(conn->m_Handle->mPtr))); } catch (const Sqrat::Exception & e) { // Propagate the error return sq_throwerror(vm, e.what()); } // This function returned a value return 1; } // ------------------------------------------------------------------------------------------------ SQInteger Connection::QueryF(HSQUIRRELVM vm) { const Int32 top = sq_gettop(vm); // Was the query value specified? if (top <= 1) { return sq_throwerror(vm, "Missing query value"); } // The connection instance Connection * conn = nullptr; // Attempt to extract the argument values try { conn = Var< Connection * >(vm, 1).value; } catch (const Sqrat::Exception & e) { // Propagate the error return sq_throwerror(vm, e.what()); } // Do we have a valid connection instance? if (!conn) { return sq_throwerror(vm, "Invalid MySQL connection instance"); } // Validate the connection info try { SQMOD_VALIDATE_CREATED(*conn); } catch (const Sqrat::Exception & e) { // Propagate the error return sq_throwerror(vm, e.what()); } // Attempt to retrieve the value from the stack as a string StackStrF val(vm, 2); // Have we failed to retrieve the string? if (SQ_FAILED(val.Proc(true))) { return val.mRes; // Propagate the error! } // Make sure the query string is valid else if (!(val.mPtr) || *(val.mPtr) == '\0') { return sq_throwerror(vm, "Invalid or empty MySQL query"); } // Attempt to execute the specified query try { if (mysql_real_query(conn->m_Handle->mPtr, val.mPtr, val.mLen) != 0) { SQMOD_THROW_CURRENT(*(conn->m_Handle), "Unable to execute MySQL query"); } // Return a new instance with the obtained result set Var< ResultSet * >::push(vm, new ResultSet(conn->m_Handle)); } catch (const Sqrat::Exception & e) { // Propagate the error return sq_throwerror(vm, e.what()); } // This function returned a value return 1; } // ------------------------------------------------------------------------------------------------ LightObj Connection::EscapeString(StackStrF & str) { // Is there even a string to escape? if (str.mLen <= 0) { return LightObj(_SC(""), 0, str.mVM); // Default to empty string } // Allocate a buffer for the given string std::vector< SQChar > buffer(str.mLen * 2 + 1); // Attempt to ecape the specified string const Ulong len = mysql_real_escape_string(m_Handle->mPtr, buffer.data(), str.mPtr, str.mLen); // Return the resulted string return LightObj(buffer.data(), static_cast< SQInteger >(len), str.mVM); } // ------------------------------------------------------------------------------------------------ SQInteger Field::Typename(HSQUIRRELVM vm) { static const SQChar name[] = _SC("SqMySQLField"); sq_pushstring(vm, name, sizeof(name)); return 1; } // ------------------------------------------------------------------------------------------------ #if defined(_DEBUG) || defined(SQMOD_EXCEPTLOC) void Field::Validate(CCStr file, Int32 line) const { // Do we have a valid result-set handle? if (!m_Handle) { SqThrowF("Invalid MySQL result-set reference =>[%s:%d]", file, line); } // Are we pointing to a valid index? else if (m_Index >= m_Handle->mFieldCount) { SqThrowF("Field index is out of range: %u >= %lu =>[%s:%d]", m_Index, m_Handle->mFieldCount, file, line); } } #else void Field::Validate() const { // Do we have a valid result-set handle? if (!m_Handle) { SqThrowF("Invalid MySQL result-set reference"); } // Are we pointing to a valid index? else if (m_Index >= m_Handle->mFieldCount) { SqThrowF("Field index is out of range: %u >= %lu", m_Index, m_Handle->mFieldCount); } } #endif // _DEBUG // ------------------------------------------------------------------------------------------------ #if defined(_DEBUG) || defined(SQMOD_EXCEPTLOC) void Field::ValidateCreated(CCStr file, Int32 line) const { // Do we have a valid result-set handle? if (!m_Handle) { SqThrowF("Invalid MySQL result-set reference =>[%s:%d]", file, line); } // Are we pointing to a valid index? m_Handle->ValidateField(m_Index, file, line); } #else void Field::ValidateCreated() const { // Do we have a valid result-set handle? if (!m_Handle) { SqThrowF("Invalid MySQL result-set reference"); } // Are we pointing to a valid index? m_Handle->ValidateField(m_Index); } #endif // _DEBUG // ------------------------------------------------------------------------------------------------ #if defined(_DEBUG) || defined(SQMOD_EXCEPTLOC) void Field::ValidateStepped(CCStr file, Int32 line) const { // Do we have a valid result-set handle? if (!m_Handle) { SqThrowF("Invalid MySQL result-set reference =>[%s:%d]", file, line); } // Do we have a valid row available? else if (m_Handle->mRow == nullptr) { SqThrowF("No row available in MySQL result-set =>[%s:%d]", file, line); } // Are we pointing to a valid index? m_Handle->ValidateField(m_Index, file, line); } #else void Field::ValidateStepped() const { // Do we have a valid result-set handle? if (!m_Handle) { SqThrowF("Invalid MySQL result-set reference"); } // Do we have a valid row available? else if (m_Handle->mRow == nullptr) { SqThrowF("No row available in MySQL result-set"); } // Are we pointing to a valid index? m_Handle->ValidateField(m_Index); } #endif // _DEBUG // ------------------------------------------------------------------------------------------------ #if defined(_DEBUG) || defined(SQMOD_EXCEPTLOC) const ResRef & Field::GetValid(CCStr file, Int32 line) const { Validate(file, line); return m_Handle; } #else const ResRef & Field::GetValid() const { Validate(); return m_Handle; } #endif // _DEBUG // ------------------------------------------------------------------------------------------------ #if defined(_DEBUG) || defined(SQMOD_EXCEPTLOC) const ResRef & Field::GetCreated(CCStr file, Int32 line) const { ValidateCreated(file, line); return m_Handle; } #else const ResRef & Field::GetCreated() const { ValidateCreated(); return m_Handle; } #endif // _DEBUG // ------------------------------------------------------------------------------------------------ #if defined(_DEBUG) || defined(SQMOD_EXCEPTLOC) const ResRef & Field::GetStepped(CCStr file, Int32 line) const { ValidateStepped(file, line); return m_Handle; } #else const ResRef & Field::GetStepped() const { ValidateStepped(); return m_Handle; } #endif // _DEBUG // ------------------------------------------------------------------------------------------------ #if defined(_DEBUG) || defined(SQMOD_EXCEPTLOC) void Field::ValidateField(Uint32 idx, CCStr file, Int32 line) const { // Do we have a valid result-set handle? if (!m_Handle) { SqThrowF("Invalid MySQL result-set reference =>[%s:%d]", file, line); } // Validate the specified field index m_Handle->ValidateField(idx, file, line); } #else void Field::ValidateField(Uint32 idx) const { // Do we have a valid result-set handle? if (!m_Handle) { SqThrowF("Invalid MySQL result-set reference"); } // Validate the specified field index m_Handle->ValidateField(idx); } #endif // _DEBUG // ------------------------------------------------------------------------------------------------ void Field::SetIndex(const Object & field) { // Where the index will be extracted Uint32 idx = INVALID_INDEX; // Grab the object virtual machine HSQUIRRELVM vm = field.GetVM(); // Remember the current stack size const StackGuard sg(vm); // Push the specified object onto the stack Var< const Object & >::push(vm, field); // Identify the type of field was given switch (field.GetType()) { // Is this a string value? case OT_STRING: { // Obtain the object from the stack as a string StackStrF val(vm, -1); // Validate the result if (SQ_FAILED(val.Proc(false))) { STHROWF("%s", LastErrorString(vm).c_str()); } // Is the obtained string empty? else if (val.mLen <= 0) { STHROWF("Cannot use an empty field name"); } // Attempt to find a field with the specified name idx = m_Handle->GetFieldIndex(val.mPtr); } break; // Is this an integer value? (or at least can be easily converted to one) case OT_INTEGER: case OT_FLOAT: case OT_BOOL: { idx = ConvTo< Uint32 >::From(PopStackInteger(vm, -1)); } break; // Is this an instance that we can extract either a string or integer from it? case OT_INSTANCE: { // Obtain the object from the stack as a string StackStrF val(vm, -1); // Validate the result if (SQ_FAILED(val.Proc(false))) { STHROWF("%s", LastErrorString(vm).c_str()); } // Is the obtained string empty? else if (val.mLen <= 0) { STHROWF("Cannot use an empty field name"); } // Check if this value is made only of digits else if (IsDigitsOnly(val.mPtr)) { idx = ConvNum< Uint32 >::FromStr(val.mPtr); } // Attempt to find a field with the specified name else { idx = m_Handle->GetFieldIndex(val.mPtr); } } break; // We don't recognize this kind of value! default: STHROWF("Unknown field index of type (%s)", SqTypeName(field.GetType())); } // Validate the obtained field index SQMOD_VALIDATE_FIELD(*this, idx); // Assign the new index m_Index = idx; } // ------------------------------------------------------------------------------------------------ Object Field::GetResultSet() const { return Object(); } // ------------------------------------------------------------------------------------------------ Object Field::GetConnection() const { return Object(); } // ------------------------------------------------------------------------------------------------ bool Field::GetBoolean() const { SQMOD_VALIDATE_STEPPED(*this); // Should we retrieve the value from the bind wrapper? if (m_Handle->mStatement) { return ConvTo< bool >::From(m_Handle->mBinds[m_Index].mUint64); } // Retrieve the value directly from the row return DbConvTo< bool >::From(m_Handle->mRow[m_Index], m_Handle->mLengths[m_Index], m_Handle->mFields[m_Index].type); } // ------------------------------------------------------------------------------------------------ SQChar Field::GetChar() const { SQMOD_VALIDATE_STEPPED(*this); // Should we retrieve the value from the bind wrapper? if (m_Handle->mStatement) { return ConvTo< SQChar >::From(m_Handle->mBinds[m_Index].mInt32[0]); } // Retrieve the value directly from the row return DbConvTo< SQChar >::From(m_Handle->mRow[m_Index], m_Handle->mLengths[m_Index], m_Handle->mFields[m_Index].type); } // ------------------------------------------------------------------------------------------------ SQInteger Field::GetInteger() const { SQMOD_VALIDATE_STEPPED(*this); // Should we retrieve the value from the bind wrapper? if (m_Handle->mStatement) { #ifdef _SQ64 return ConvTo< SQInteger >::From(m_Handle->mBinds[m_Index].mInt64); #else return ConvTo< SQInteger >::From(m_Handle->mBinds[m_Index].mInt32[0]); #endif // _SQ64 } // Retrieve the value directly from the row return DbConvTo< SQInteger >::From(m_Handle->mRow[m_Index], m_Handle->mLengths[m_Index], m_Handle->mFields[m_Index].type); } // ------------------------------------------------------------------------------------------------ SQFloat Field::GetFloat() const { SQMOD_VALIDATE_STEPPED(*this); // Should we retrieve the value from the bind wrapper? if (m_Handle->mStatement) { #ifdef SQUSEDOUBLE return ConvTo< SQFloat >::From(m_Handle->mBinds[m_Index].mFloat64); #else return ConvTo< SQFloat >::From(m_Handle->mBinds[m_Index].mFloat32[0]); #endif // SQUSEDOUBLE } // Retrieve the value directly from the row return DbConvTo< SQFloat >::From(m_Handle->mRow[m_Index], m_Handle->mLengths[m_Index], m_Handle->mFields[m_Index].type); } // ------------------------------------------------------------------------------------------------ SQInteger Field::GetInt8() const { SQMOD_VALIDATE_STEPPED(*this); // Should we retrieve the value from the bind wrapper? if (m_Handle->mStatement) { return ConvTo< Int8 >::From(m_Handle->mBinds[m_Index].mInt64); } // Retrieve the value directly from the row return DbConvTo< Int8 >::From(m_Handle->mRow[m_Index], m_Handle->mLengths[m_Index], m_Handle->mFields[m_Index].type); } // ------------------------------------------------------------------------------------------------ SQInteger Field::GetUint8() const { SQMOD_VALIDATE_STEPPED(*this); // Should we retrieve the value from the bind wrapper? if (m_Handle->mStatement) { return ConvTo< Uint8 >::From(m_Handle->mBinds[m_Index].mInt64); } // Retrieve the value directly from the row return DbConvTo< Uint8 >::From(m_Handle->mRow[m_Index], m_Handle->mLengths[m_Index], m_Handle->mFields[m_Index].type); } // ------------------------------------------------------------------------------------------------ SQInteger Field::GetInt16() const { SQMOD_VALIDATE_STEPPED(*this); // Should we retrieve the value from the bind wrapper? if (m_Handle->mStatement) { return ConvTo< Int16 >::From(m_Handle->mBinds[m_Index].mInt64); } // Retrieve the value directly from the row return DbConvTo< Int16 >::From(m_Handle->mRow[m_Index], m_Handle->mLengths[m_Index], m_Handle->mFields[m_Index].type); } // ------------------------------------------------------------------------------------------------ SQInteger Field::GetUint16() const { SQMOD_VALIDATE_STEPPED(*this); // Should we retrieve the value from the bind wrapper? if (m_Handle->mStatement) { return ConvTo< Uint16 >::From(m_Handle->mBinds[m_Index].mInt64); } // Retrieve the value directly from the row return DbConvTo< Uint16 >::From(m_Handle->mRow[m_Index], m_Handle->mLengths[m_Index], m_Handle->mFields[m_Index].type); } // ------------------------------------------------------------------------------------------------ SQInteger Field::GetInt32() const { SQMOD_VALIDATE_STEPPED(*this); // Should we retrieve the value from the bind wrapper? if (m_Handle->mStatement) { return ConvTo< Int32 >::From(m_Handle->mBinds[m_Index].mInt64); } // Retrieve the value directly from the row return DbConvTo< Int32 >::From(m_Handle->mRow[m_Index], m_Handle->mLengths[m_Index], m_Handle->mFields[m_Index].type); } // ------------------------------------------------------------------------------------------------ SQInteger Field::GetUint32() const { SQMOD_VALIDATE_STEPPED(*this); // Should we retrieve the value from the bind wrapper? if (m_Handle->mStatement) { return ConvTo< Uint32 >::From(m_Handle->mBinds[m_Index].mInt64); } // Retrieve the value directly from the row return DbConvTo< Uint32 >::From(m_Handle->mRow[m_Index], m_Handle->mLengths[m_Index], m_Handle->mFields[m_Index].type); } // ------------------------------------------------------------------------------------------------ Object Field::GetInt64() const { SQMOD_VALIDATE_STEPPED(*this); // Obtain the initial stack size const StackGuard sg; // Should we retrieve the value from the bind wrapper? if (m_Handle->mStatement) { return Object(SqTypeIdentity< SLongInt >{}, SqVM(), ConvTo< Int64 >::From(m_Handle->mBinds[m_Index].mInt64)); } // Retrieve the value directly from the row return Object(SqTypeIdentity< SLongInt >{}, SqVM(), DbConvTo< Int64 >::From(m_Handle->mRow[m_Index], m_Handle->mLengths[m_Index], m_Handle->mFields[m_Index].type)); } // ------------------------------------------------------------------------------------------------ Object Field::GetUint64() const { SQMOD_VALIDATE_STEPPED(*this); // Obtain the initial stack size const StackGuard sg; // Should we retrieve the value from the bind wrapper? if (m_Handle->mStatement) { return Object(SqTypeIdentity< ULongInt >{}, SqVM(), ConvTo< Uint64 >::From(m_Handle->mBinds[m_Index].mUint64)); } // Retrieve the value directly from the row return Object(SqTypeIdentity< ULongInt >{}, SqVM(), DbConvTo< Uint64 >::From(m_Handle->mRow[m_Index], m_Handle->mLengths[m_Index], m_Handle->mFields[m_Index].type)); } // ------------------------------------------------------------------------------------------------ SQFloat Field::GetFloat32() const { SQMOD_VALIDATE_STEPPED(*this); // Should we retrieve the value from the bind wrapper? if (m_Handle->mStatement) { return ConvTo< Float32 >::From(m_Handle->mBinds[m_Index].mFloat32[0]); } // Retrieve the value directly from the row return DbConvTo< Float32 >::From(m_Handle->mRow[m_Index], m_Handle->mLengths[m_Index], m_Handle->mFields[m_Index].type); } // ------------------------------------------------------------------------------------------------ SQFloat Field::GetFloat64() const { SQMOD_VALIDATE_STEPPED(*this); // Should we retrieve the value from the bind wrapper? if (m_Handle->mStatement) { return ConvTo< Float64 >::From(m_Handle->mBinds[m_Index].mFloat64); } // Retrieve the value directly from the row return DbConvTo< Float64 >::From(m_Handle->mRow[m_Index], m_Handle->mLengths[m_Index], m_Handle->mFields[m_Index].type); } // ------------------------------------------------------------------------------------------------ Object Field::GetString() const { SQMOD_VALIDATE_STEPPED(*this); // Obtain the initial stack size const StackGuard sg; // Retrieve the value directly from the row and push it on the stack sq_pushstring(DefaultVM::Get(), m_Handle->mRow[m_Index], m_Handle->mLengths[m_Index]); // Obtain the object from the stack Object stro(-1, DefaultVM::Get()); // Restore the stack sg.Restore(); // Return it the string object return stro; } // ------------------------------------------------------------------------------------------------ Object Field::GetBuffer() const { return NullObject(); } // ------------------------------------------------------------------------------------------------ Object Field::GetBlob() const { return NullObject(); } // ------------------------------------------------------------------------------------------------ SQInteger ResultSet::Typename(HSQUIRRELVM vm) { static const SQChar name[] = _SC("SqMySQLResultSet"); sq_pushstring(vm, name, sizeof(name)); return 1; } // ------------------------------------------------------------------------------------------------ #if defined(_DEBUG) || defined(SQMOD_EXCEPTLOC) void ResultSet::Validate(CCStr file, Int32 line) const { // Do we have a valid result-set handle? if (!m_Handle) { SqThrowF("Invalid MySQL result-set reference =>[%s:%d]", file, line); } } #else void ResultSet::Validate() const { // Do we have a valid result-set handle? if (!m_Handle) { SqThrowF("Invalid MySQL result-set reference"); } } #endif // _DEBUG // ------------------------------------------------------------------------------------------------ #if defined(_DEBUG) || defined(SQMOD_EXCEPTLOC) void ResultSet::ValidateCreated(CCStr file, Int32 line) const { // Do we have a valid result-set handle? if (!m_Handle) { SqThrowF("Invalid MySQL result-set reference =>[%s:%d]", file, line); } else if (m_Handle->mPtr == nullptr) { SqThrowF("Invalid MySQL result-set =>[%s:%d]", file, line); } } #else void ResultSet::ValidateCreated() const { // Do we have a valid result-set handle? if (!m_Handle) { SqThrowF("Invalid MySQL result-set reference"); } else if (m_Handle->mPtr == nullptr) { SqThrowF("Invalid MySQL result-set"); } } #endif // _DEBUG // ------------------------------------------------------------------------------------------------ #if defined(_DEBUG) || defined(SQMOD_EXCEPTLOC) void ResultSet::ValidateStepped(CCStr file, Int32 line) const { // Do we have a valid result-set handle? if (!m_Handle) { SqThrowF("Invalid MySQL result-set reference =>[%s:%d]", file, line); } // Do we have a valid row available? else if (m_Handle->mRow == nullptr) { SqThrowF("No row available in MySQL result-set =>[%s:%d]", file, line); } } #else void ResultSet::ValidateStepped() const { // Do we have a valid result-set handle? if (!m_Handle) { SqThrowF("Invalid MySQL result-set reference"); } // Do we have a valid row available? else if (m_Handle->mRow == nullptr) { SqThrowF("No row available in MySQL result-set"); } } #endif // _DEBUG // ------------------------------------------------------------------------------------------------ #if defined(_DEBUG) || defined(SQMOD_EXCEPTLOC) const ResRef & ResultSet::GetValid(CCStr file, Int32 line) const { Validate(file, line); return m_Handle; } #else const ResRef & ResultSet::GetValid() const { Validate(); return m_Handle; } #endif // _DEBUG // ------------------------------------------------------------------------------------------------ #if defined(_DEBUG) || defined(SQMOD_EXCEPTLOC) const ResRef & ResultSet::GetCreated(CCStr file, Int32 line) const { ValidateCreated(file, line); return m_Handle; } #else const ResRef & ResultSet::GetCreated() const { ValidateCreated(); return m_Handle; } #endif // _DEBUG // ------------------------------------------------------------------------------------------------ #if defined(_DEBUG) || defined(SQMOD_EXCEPTLOC) const ResRef & ResultSet::GetStepped(CCStr file, Int32 line) const { ValidateStepped(file, line); return m_Handle; } #else const ResRef & ResultSet::GetStepped() const { ValidateStepped(); return m_Handle; } #endif // _DEBUG // ------------------------------------------------------------------------------------------------ #if defined(_DEBUG) || defined(SQMOD_EXCEPTLOC) void ResultSet::ValidateField(Int32 idx, CCStr file, Int32 line) const { ValidateCreated(file, line); m_Handle->ValidateField(idx, file, line); } #else void ResultSet::ValidateField(Int32 idx) const { ValidateCreated(); m_Handle->ValidateField(idx); } #endif // _DEBUG // ------------------------------------------------------------------------------------------------ Array ResultSet::GetFieldNames() const { SQMOD_VALIDATE_CREATED(*this); // Grab the number of available fields const SQInteger fcount = ConvTo< SQInteger >::From(m_Handle->mFieldCount); // Grab the array with field instances const ResHnd::FieldType * fields = m_Handle->mFields; // Is there even something to process? if (!fcount || !fields) { return Array(DefaultVM::Get(), 0); } // Allocate an array with the same amount of elements as the number of fields Array arr(DefaultVM::Get(), fcount); // Iterate over all the available fields and insert them into the created array for (SQInteger n = 0; n < fcount; ++n) { arr.SetValue(n, (fields[n].name == nullptr) ? ToStrF("", n) : fields[n].name); } // Return the resulted array return arr; } // ------------------------------------------------------------------------------------------------ Array ResultSet::GetFieldsArray() const { SQMOD_VALIDATE_CREATED(*this); // Grab the number of available fields const SQInteger fcount = ConvTo< SQInteger >::From(m_Handle->mFieldCount); // Is there even something to process? if (!fcount) { return Array(DefaultVM::Get(), 0); } // Create a field instance to insert as copy Field field(m_Handle); // Allocate an array with the same amount of elements as the number of fields Array arr(DefaultVM::Get(), fcount); // Iterate over all the available fields and insert them into the created array for (SQInteger n = 0; n < fcount; ++n) { // Update the field index field.SetIndex(ConvTo< Int32 >::From(n)); // Insert a copy of the field instance into the array arr.SetValue(n, field); } // Return the resulted array return arr; } // ------------------------------------------------------------------------------------------------ Table ResultSet::GetFieldsTable() const { SQMOD_VALIDATE_CREATED(*this); // Grab the number of available fields const SQInteger fcount = ConvTo< SQInteger >::From(m_Handle->mFieldCount); // Grab the array with field instances const ResHnd::FieldType * fields = m_Handle->mFields; // Is there even something to process? if (!fcount || !fields) { return Table(); } // Create a field instance to insert as copy Field field(m_Handle); // Allocate a table to be populated with field instances Table tbl(DefaultVM::Get(), fcount); // Iterate over all the available fields and insert them into the created table for (SQInteger n = 0; n < fcount; ++n) { // Update the field index field.SetIndex(ConvTo< Int32 >::From(n)); // Insert a copy of the field instance into the table tbl.SetValue((fields[n].name == nullptr) ? ToStrF("", n) : fields[n].name, field); } // Return the resulted table return tbl; } // ------------------------------------------------------------------------------------------------ SQInteger Statement::Typename(HSQUIRRELVM vm) { static const SQChar name[] = _SC("SqMySQLStatement"); sq_pushstring(vm, name, sizeof(name)); return 1; } // ------------------------------------------------------------------------------------------------ #if defined(_DEBUG) || defined(SQMOD_EXCEPTLOC) void Statement::Validate(CCStr file, Int32 line) const { if (!m_Handle) { SqThrowF("Invalid MySQL statement reference =>[%s:%d]", file, line); } } #else void Statement::Validate() const { if (!m_Handle) { SqThrowF("Invalid MySQL statement reference"); } } #endif // _DEBUG // ------------------------------------------------------------------------------------------------ #if defined(_DEBUG) || defined(SQMOD_EXCEPTLOC) void Statement::ValidateCreated(CCStr file, Int32 line) const { if (!m_Handle) { SqThrowF("Invalid MySQL statement reference =>[%s:%d]", file, line); } else if (m_Handle->mPtr == nullptr) { SqThrowF("Invalid MySQL statement =>[%s:%d]", file, line); } } #else void Statement::ValidateCreated() const { if (!m_Handle) { SqThrowF("Invalid MySQL statement reference"); } else if (m_Handle->mPtr == nullptr) { SqThrowF("Invalid MySQL statement"); } } #endif // _DEBUG // ------------------------------------------------------------------------------------------------ #if defined(_DEBUG) || defined(SQMOD_EXCEPTLOC) const StmtRef & Statement::GetValid(CCStr file, Int32 line) const { Validate(file, line); return m_Handle; } #else const StmtRef & Statement::GetValid() const { Validate(); return m_Handle; } #endif // _DEBUG // ------------------------------------------------------------------------------------------------ #if defined(_DEBUG) || defined(SQMOD_EXCEPTLOC) const StmtRef & Statement::GetCreated(CCStr file, Int32 line) const { ValidateCreated(file, line); return m_Handle; } #else const StmtRef & Statement::GetCreated() const { ValidateCreated(); return m_Handle; } #endif // _DEBUG // ------------------------------------------------------------------------------------------------ #if defined(_DEBUG) || defined(SQMOD_EXCEPTLOC) void Statement::ValidateParam(Int32 idx, CCStr file, Int32 line) const { ValidateCreated(file, line); m_Handle->ValidateParam(idx, file, line); } #else void Statement::ValidateParam(Int32 idx) const { ValidateCreated(); m_Handle->ValidateParam(idx); } #endif // _DEBUG // ------------------------------------------------------------------------------------------------ Statement::Statement(const Connection & connection, CSStr query) : Statement(connection.GetHandle(), query) { /* ... */ } // ------------------------------------------------------------------------------------------------ Connection Statement::GetConnection() const { return Connection(SQMOD_GET_VALID(*this)->mConnection); } // ------------------------------------------------------------------------------------------------ void Statement::SetConnection(const Connection & conn) { SQMOD_GET_VALID(*this)->mConnection = conn.GetHandle(); } // ------------------------------------------------------------------------------------------------ Int32 Statement::Execute() { // Attempt to bind the parameters if (mysql_stmt_bind_param(SQMOD_GET_CREATED(*this)->mPtr, m_Handle->mMyBinds)) { SQMOD_THROW_CURRENT(*m_Handle, "Cannot bind MySQL statement parameters"); } // Attempt to execute the statement else if (mysql_stmt_execute(m_Handle->mPtr)) { SQMOD_THROW_CURRENT(*m_Handle, "Cannot execute MySQL statement"); } // Return the number of rows affected by this query return mysql_stmt_affected_rows(m_Handle->mPtr); } // ------------------------------------------------------------------------------------------------ Uint32 Statement::Insert() { // Attempt to bind the parameters if (mysql_stmt_bind_param(SQMOD_GET_CREATED(*this)->mPtr, m_Handle->mMyBinds)) { SQMOD_THROW_CURRENT(*m_Handle, "Cannot bind MySQL statement parameters"); } // Attempt to execute the statement else if (mysql_stmt_execute(m_Handle->mPtr)) { SQMOD_THROW_CURRENT(*m_Handle, "Cannot execute MySQL statement"); } // Return the identifier of the inserted row return mysql_stmt_insert_id(m_Handle->mPtr); } // ------------------------------------------------------------------------------------------------ ResultSet Statement::Query() { // Attempt to bind the parameters if (mysql_stmt_bind_param(SQMOD_GET_CREATED(*this)->mPtr, m_Handle->mMyBinds)) { SQMOD_THROW_CURRENT(*m_Handle, "Cannot bind MySQL statement parameters"); } // Attempt to execute the statement else if (mysql_stmt_execute(m_Handle->mPtr)) { SQMOD_THROW_CURRENT(*m_Handle, "Cannot execute MySQL statement"); } // Return the results of this query return ResultSet(m_Handle); } // ------------------------------------------------------------------------------------------------ void Statement::SetInt8(Uint32 idx, SQInteger val) const { SQMOD_VALIDATE_PARAM(*this, idx); // Attempt to set the input value m_Handle->mBinds[idx].SetInput(MYSQL_TYPE_TINY, &(m_Handle->mMyBinds[idx])); // Assign the value to the input m_Handle->mBinds[idx].mInt64 = ConvTo< Int8 >::From(val); } // ------------------------------------------------------------------------------------------------ void Statement::SetUint8(Uint32 idx, SQInteger val) const { SQMOD_VALIDATE_PARAM(*this, idx); // Attempt to set the input value m_Handle->mBinds[idx].SetInput(MYSQL_TYPE_TINY, &(m_Handle->mMyBinds[idx])); // Assign the value to the input m_Handle->mBinds[idx].mUint64 = ConvTo< Uint8 >::From(val); // Specify that this value is unsigned m_Handle->mMyBinds[idx].is_unsigned = true; } // ------------------------------------------------------------------------------------------------ void Statement::SetInt16(Uint32 idx, SQInteger val) const { SQMOD_VALIDATE_PARAM(*this, idx); // Attempt to set the input value m_Handle->mBinds[idx].SetInput(MYSQL_TYPE_SHORT, &(m_Handle->mMyBinds[idx])); // Assign the value to the input m_Handle->mBinds[idx].mInt64 = ConvTo< Int16 >::From(val); } // ------------------------------------------------------------------------------------------------ void Statement::SetUint16(Uint32 idx, SQInteger val) const { SQMOD_VALIDATE_PARAM(*this, idx); // Attempt to set the input value m_Handle->mBinds[idx].SetInput(MYSQL_TYPE_SHORT, &(m_Handle->mMyBinds[idx])); // Assign the value to the input m_Handle->mBinds[idx].mUint64 = ConvTo< Uint16 >::From(val); // Specify that this value is unsigned m_Handle->mMyBinds[idx].is_unsigned = true; } // ------------------------------------------------------------------------------------------------ void Statement::SetInt32(Uint32 idx, SQInteger val) const { SQMOD_VALIDATE_PARAM(*this, idx); // Attempt to set the input value m_Handle->mBinds[idx].SetInput(MYSQL_TYPE_LONG, &(m_Handle->mMyBinds[idx])); // Assign the value to the input m_Handle->mBinds[idx].mInt64 = ConvTo< Int32 >::From(val); } // ------------------------------------------------------------------------------------------------ void Statement::SetUint32(Uint32 idx, SQInteger val) const { SQMOD_VALIDATE_PARAM(*this, idx); // Attempt to set the input value m_Handle->mBinds[idx].SetInput(MYSQL_TYPE_LONG, &(m_Handle->mMyBinds[idx])); // Assign the value to the input m_Handle->mBinds[idx].mUint64 = ConvTo< Uint32 >::From(val); // Specify that this value is unsigned m_Handle->mMyBinds[idx].is_unsigned = true; } // ------------------------------------------------------------------------------------------------ void Statement::SetInt64(Uint32 idx, SQInteger val) const { SQMOD_VALIDATE_PARAM(*this, idx); // Attempt to set the input value m_Handle->mBinds[idx].SetInput(MYSQL_TYPE_LONGLONG, &(m_Handle->mMyBinds[idx])); // Assign the value to the input m_Handle->mBinds[idx].mInt64 = ConvTo< Int64 >::From(val); } // ------------------------------------------------------------------------------------------------ void Statement::SetUint64(Uint32 idx, SQInteger val) const { SQMOD_VALIDATE_PARAM(*this, idx); // Attempt to set the input value m_Handle->mBinds[idx].SetInput(MYSQL_TYPE_LONGLONG, &(m_Handle->mMyBinds[idx])); // Assign the value to the input m_Handle->mBinds[idx].mUint64 = ConvTo< Uint64 >::From(val); // Specify that this value is unsigned m_Handle->mMyBinds[idx].is_unsigned = true; } // ------------------------------------------------------------------------------------------------ void Statement::SetSLongInt(Uint32 idx, const SLongInt & val) const { SQMOD_VALIDATE_PARAM(*this, idx); // Attempt to set the input value m_Handle->mBinds[idx].SetInput(MYSQL_TYPE_LONGLONG, &(m_Handle->mMyBinds[idx])); // Attempt to assign the numeric value inside the specified object m_Handle->mBinds[idx].mInt64 = val.GetNum(); } // ------------------------------------------------------------------------------------------------ void Statement::SetULongInt(Uint32 idx, const ULongInt & val) const { SQMOD_VALIDATE_PARAM(*this, idx); // Attempt to set the input value m_Handle->mBinds[idx].SetInput(MYSQL_TYPE_LONGLONG, &(m_Handle->mMyBinds[idx])); // Attempt to assign the numeric value inside the specified object m_Handle->mBinds[idx].mUint64 = val.GetNum(); // Specify that this value is unsigned m_Handle->mMyBinds[idx].is_unsigned = true; } // ------------------------------------------------------------------------------------------------ void Statement::SetInteger(Uint32 idx, SQInteger val) const { #ifdef _SQ64 SetInt64(idx, val); #else SetInt32(idx, val); #endif // _SQ64 } // ------------------------------------------------------------------------------------------------ void Statement::SetFloat32(Uint32 idx, SQFloat val) const { SQMOD_VALIDATE_PARAM(*this, idx); // Attempt to set the input value m_Handle->mBinds[idx].SetInput(MYSQL_TYPE_FLOAT, &(m_Handle->mMyBinds[idx])); // Assign the value to the input m_Handle->mBinds[idx].mFloat32[0] = ConvTo< Float32 >::From(val); } // ------------------------------------------------------------------------------------------------ void Statement::SetFloat64(Uint32 idx, SQFloat val) const { SQMOD_VALIDATE_PARAM(*this, idx); // Attempt to set the input value m_Handle->mBinds[idx].SetInput(MYSQL_TYPE_DOUBLE, &(m_Handle->mMyBinds[idx])); // Assign the value to the input m_Handle->mBinds[idx].mFloat64 = ConvTo< Float64 >::From(val); } // ------------------------------------------------------------------------------------------------ void Statement::SetFloat(Uint32 idx, SQFloat val) const { #ifdef SQUSEDOUBLE SetFloat64(idx, val); #else SetFloat32(idx, val); #endif // SQUSEDOUBLE } // ------------------------------------------------------------------------------------------------ void Statement::SetBoolean(Uint32 idx, bool val) const { SQMOD_VALIDATE_PARAM(*this, idx); // Attempt to set the input value m_Handle->mBinds[idx].SetInput(MYSQL_TYPE_TINY, &(m_Handle->mMyBinds[idx])); // Assign the value to the input m_Handle->mBinds[idx].mUint64 = val; } // ------------------------------------------------------------------------------------------------ void Statement::SetDate(Uint32 idx, const Date & val) const { SQMOD_VALIDATE_PARAM(*this, idx); // Attempt to set the input value m_Handle->mBinds[idx].SetInput(MYSQL_TYPE_DATE, &(m_Handle->mMyBinds[idx])); // Assign the value to the input SqDateToMySQLTime(val, m_Handle->mBinds[idx].mTime); } // ------------------------------------------------------------------------------------------------ void Statement::SetTime(Uint32 idx, const Time & val) const { SQMOD_VALIDATE_PARAM(*this, idx); // Attempt to set the input value m_Handle->mBinds[idx].SetInput(MYSQL_TYPE_TIME, &(m_Handle->mMyBinds[idx])); // Assign the value to the input SqTimeToMySQLTime(val, m_Handle->mBinds[idx].mTime); } // ------------------------------------------------------------------------------------------------ void Statement::SetDatetime(Uint32 idx, const Datetime & val) const { SQMOD_VALIDATE_PARAM(*this, idx); // Attempt to set the input value m_Handle->mBinds[idx].SetInput(MYSQL_TYPE_DATETIME, &(m_Handle->mMyBinds[idx])); // Assign the value to the input SqDatetimeToMySQLTime(val, m_Handle->mBinds[idx].mTime); } // ------------------------------------------------------------------------------------------------ void Statement::SetString(Uint32 idx, CSStr val) const { SQMOD_VALIDATE_PARAM(*this, idx); // Attempt to set the input value m_Handle->mBinds[idx].SetInput(MYSQL_TYPE_STRING, &(m_Handle->mMyBinds[idx]), val, std::strlen(val)); } // ------------------------------------------------------------------------------------------------ void Statement::SetEnum(Uint32 idx, CSStr val) const { SQMOD_VALIDATE_PARAM(*this, idx); // Attempt to set the input value m_Handle->mBinds[idx].SetInput(MYSQL_TYPE_ENUM, &(m_Handle->mMyBinds[idx]), val, std::strlen(val)); } // ------------------------------------------------------------------------------------------------ void Statement::SetSet(Uint32 idx, CSStr val) const { SQMOD_VALIDATE_PARAM(*this, idx); // Attempt to set the input value m_Handle->mBinds[idx].SetInput(MYSQL_TYPE_SET, &(m_Handle->mMyBinds[idx]), val, std::strlen(val)); } // ------------------------------------------------------------------------------------------------ void Statement::SetBlob(Uint32 /*idx*/, Object & /*val*/) const { // TODO... } // ------------------------------------------------------------------------------------------------ void Statement::SetData(Uint32 /*idx*/, Object & /*val*/) const { // TODO... } // ------------------------------------------------------------------------------------------------ void Statement::SetNull(Uint32 idx) const { SQMOD_VALIDATE_PARAM(*this, idx); // Attempt to set the input value m_Handle->mBinds[idx].SetInput(MYSQL_TYPE_NULL, &(m_Handle->mMyBinds[idx])); } // ================================================================================================ void Register_MySQL(HSQUIRRELVM vm) { Table sqlns(vm); sqlns.Bind(_SC("Account") , Class< Account >(sqlns.GetVM(), _SC("SqMySQLAccount")) // Constructors .Ctor< const Account & >() .Ctor< CSStr, CSStr >() .Ctor< CSStr, CSStr, CSStr >() .Ctor< CSStr, CSStr, CSStr, CSStr >() .Ctor< CSStr, CSStr, CSStr, CSStr, SQInteger >() .Ctor< CSStr, CSStr, CSStr, CSStr, SQInteger, CSStr >() // Core Meta-methods .Func(_SC("_cmp"), &Account::Cmp) .SquirrelFunc(_SC("_typename"), &Account::Typename) .Func(_SC("_tostring"), &Account::ToString) // Properties .Prop(_SC("Port"), &Account::GetPortNum, &Account::SetPortNum) .Prop(_SC("Host"), &Account::GetHost, &Account::SetHost) .Prop(_SC("User"), &Account::GetUser, &Account::SetUser) .Prop(_SC("Pass"), &Account::GetPass, &Account::SetPass) .Prop(_SC("Socket"), &Account::GetSocket, &Account::SetSocket) .Prop(_SC("Flags"), &Account::GetFlags, &Account::SetFlags) .Prop(_SC("SSL_Key"), &Account::GetSSL_Key, &Account::SetSSL_Key) .Prop(_SC("SSL_Cert"), &Account::GetSSL_Cert, &Account::SetSSL_Cert) .Prop(_SC("SSL_CA"), &Account::GetSSL_CA, &Account::SetSSL_CA) .Prop(_SC("SSL_CA_Path"), &Account::GetSSL_CA_Path, &Account::SetSSL_CA_Path) .Prop(_SC("SSL_Cipher"), &Account::GetSSL_Cipher, &Account::SetSSL_Cipher) .Prop(_SC("AutoCommit"), &Account::GetAutoCommit, &Account::SetAutoCommit) .Prop(_SC("Options"), &Account::GetOptionsTable) .Prop(_SC("OptionsCount"), &Account::OptionsCount) .Prop(_SC("OptionsEmpty"), &Account::OptionsEmpty) // Member Methods .Func(_SC("EnableFlags"), &Account::EnableFlags) .Func(_SC("DisableFlags"), &Account::DisableFlags) .Func(_SC("SetSSL"), &Account::SetSSL) .Func(_SC("GetOption"), &Account::GetOption) .Func(_SC("SetOption"), &Account::SetOption) .Func(_SC("RemoveOption"), &Account::RemoveOption) .Func(_SC("OptionsClear"), &Account::OptionsClear) .Func(_SC("Connect"), &Account::Connect) ); sqlns.Bind(_SC("Connection") , Class< Connection >(sqlns.GetVM(), _SC("SqMySQLConnection")) // Constructors .Ctor() .Ctor< const Account & >() // Core Meta-methods .Func(_SC("_cmp"), &Connection::Cmp) .SquirrelFunc(_SC("_typename"), &Connection::Typename) .Func(_SC("_tostring"), &Connection::ToString) // Properties .Prop(_SC("IsValid"), &Connection::IsValid) .Prop(_SC("Connected"), &Connection::IsConnected) .Prop(_SC("References"), &Connection::GetRefCount) .Prop(_SC("ErrNo"), &Connection::GetErrNo) .Prop(_SC("ErrStr"), &Connection::GetErrStr) .Prop(_SC("LastErrNo"), &Connection::GetLastErrNo) .Prop(_SC("LastErrStr"), &Connection::GetLastErrStr) .Prop(_SC("Port"), &Connection::GetPortNum) .Prop(_SC("Host"), &Connection::GetHost) .Prop(_SC("User"), &Connection::GetUser) .Prop(_SC("Pass"), &Connection::GetPass) .Prop(_SC("Name"), &Connection::GetName, &Connection::SetName) .Prop(_SC("Socket"), &Connection::GetSocket) .Prop(_SC("Flags"), &Connection::GetFlags) .Prop(_SC("SSL_Key"), &Connection::GetSSL_Key) .Prop(_SC("SSL_Cert"), &Connection::GetSSL_Cert) .Prop(_SC("SSL_CA"), &Connection::GetSSL_CA) .Prop(_SC("SSL_CA_Path"), &Connection::GetSSL_CA_Path) .Prop(_SC("SSL_Cipher"), &Connection::GetSSL_Cipher) .Prop(_SC("Charset"), &Connection::GetCharset, &Connection::SetCharset) .Prop(_SC("AutoCommit"), &Connection::GetAutoCommit, &Connection::SetAutoCommit) .Prop(_SC("InTransaction"), &Connection::GetInTransaction) // Member Methods .Func(_SC("Disconnect"), &Connection::Disconnect) .Func(_SC("SelectDb"), &Connection::SetName) .Func(_SC("Execute"), &Connection::Execute) .Func(_SC("Insert"), &Connection::Insert) .Func(_SC("Query"), &Connection::Query) .Func(_SC("Statement"), &Connection::GetStatement) //.Func(_SC("Transaction"), &Connection::GetTransaction) .FmtFunc(_SC("EscapeString"), &Connection::EscapeString) // Squirrel Methods .SquirrelFunc(_SC("ExecuteF"), &Connection::ExecuteF) .SquirrelFunc(_SC("InsertF"), &Connection::InsertF) .SquirrelFunc(_SC("QueryF"), &Connection::QueryF) ); sqlns.Bind(_SC("Field"), Class< Field >(sqlns.GetVM(), _SC("SqMySQLField")) // Constructors .Ctor() .Ctor< const Field & >() // Meta-methods .Func(_SC("_cmp"), &Field::Cmp) .SquirrelFunc(_SC("_typename"), &Field::Typename) .Func(_SC("_tostring"), &Field::ToString) // Properties .Prop(_SC("IsValid"), &Field::IsValid) .Prop(_SC("References"), &Field::GetRefCount) .Prop(_SC("Index"), &Field::GetIndex) .Prop(_SC("ResultSet"), &Field::GetResultSet) .Prop(_SC("Connection"), &Field::GetConnection) .Prop(_SC("Bool"), &Field::GetBoolean) .Prop(_SC("Boolean"), &Field::GetBoolean) .Prop(_SC("Char"), &Field::GetChar) .Prop(_SC("Integer"), &Field::GetInteger) .Prop(_SC("Float"), &Field::GetFloat) .Prop(_SC("Int8"), &Field::GetInt8) .Prop(_SC("Uint8"), &Field::GetUint8) .Prop(_SC("Int16"), &Field::GetInt16) .Prop(_SC("Uint16"), &Field::GetUint16) .Prop(_SC("Int32"), &Field::GetInt32) .Prop(_SC("Uint32"), &Field::GetUint32) .Prop(_SC("Int64"), &Field::GetInt64) .Prop(_SC("Uint64"), &Field::GetUint64) .Prop(_SC("Float32"), &Field::GetFloat32) .Prop(_SC("Float64"), &Field::GetFloat64) .Prop(_SC("String"), &Field::GetString) .Prop(_SC("Buffer"), &Field::GetBuffer) .Prop(_SC("Blob"), &Field::GetBlob) // Member Methods .Func(_SC("Release"), &Field::Release) ); sqlns.Bind(_SC("ResultSet") , Class< ResultSet >(sqlns.GetVM(), _SC("SqMySQLResultSet")) // Constructors .Ctor() .Ctor< const ResultSet & >() // Core Meta-methods .Func(_SC("_cmp"), &ResultSet::Cmp) .SquirrelFunc(_SC("_typename"), &ResultSet::Typename) .Func(_SC("_tostring"), &ResultSet::ToString) // Properties .Prop(_SC("IsValid"), &ResultSet::IsValid) .Prop(_SC("FieldNames"), &ResultSet::GetFieldNames) .Prop(_SC("FieldsArray"), &ResultSet::GetFieldsArray) .Prop(_SC("FieldsTable"), &ResultSet::GetFieldsTable) .Prop(_SC("RowIndex"), &ResultSet::RowIndex) .Prop(_SC("RowCount"), &ResultSet::RowCount) // Member Methods .Func(_SC("Next"), &ResultSet::Next) .Func(_SC("Step"), &ResultSet::Next) .Func(_SC("SetRowIndex"), &ResultSet::SetRowIndex) .Func(_SC("SetLongRowIndex"), &ResultSet::SetLongRowIndex) .Func(_SC("Get"), &ResultSet::GetField) .Func(_SC("GetField"), &ResultSet::GetField) .Func(_SC("GetBool"), &ResultSet::GetBoolean) .Func(_SC("GetBoolean"), &ResultSet::GetBoolean) .Func(_SC("GetChar"), &ResultSet::GetChar) .Func(_SC("GetInteger"), &ResultSet::GetInteger) .Func(_SC("GetFloat"), &ResultSet::GetFloat) .Func(_SC("GetInt8"), &ResultSet::GetInt8) .Func(_SC("GetUint8"), &ResultSet::GetUint8) .Func(_SC("GetInt16"), &ResultSet::GetInt16) .Func(_SC("GetUint16"), &ResultSet::GetUint16) .Func(_SC("GetInt32"), &ResultSet::GetInt32) .Func(_SC("GetUint32"), &ResultSet::GetUint32) .Func(_SC("GetInt64"), &ResultSet::GetInt64) .Func(_SC("GetUint64"), &ResultSet::GetUint64) .Func(_SC("GetFloat32"), &ResultSet::GetFloat32) .Func(_SC("GetFloat64"), &ResultSet::GetFloat64) .Func(_SC("GetString"), &ResultSet::GetString) .Func(_SC("GetBuffer"), &ResultSet::GetBuffer) .Func(_SC("GetBlob"), &ResultSet::GetBlob) ); sqlns.Bind(_SC("Statement") , Class< Statement >(sqlns.GetVM(), _SC("SqMySQLStatement")) // Constructors .Ctor() .Ctor< const Statement & >() .Ctor< const Connection &, CSStr >() // Core Meta-methods .Func(_SC("_cmp"), &Statement::Cmp) .SquirrelFunc(_SC("_typename"), &Statement::Typename) .Func(_SC("_tostring"), &Statement::ToString) // Properties .Prop(_SC("IsValid"), &Statement::IsValid) .Prop(_SC("Connection"), &Statement::GetConnection, &Statement::SetConnection) // Member Methods .Func(_SC("Execute"), &Statement::Execute) .Func(_SC("Insert"), &Statement::Insert) .Func(_SC("Query"), &Statement::Query) .Func(_SC("SetInt8"), &Statement::SetInt8) .Func(_SC("SetUint8"), &Statement::SetUint8) .Func(_SC("SetInt16"), &Statement::SetInt16) .Func(_SC("SetUint16"), &Statement::SetUint16) .Func(_SC("SetInt32"), &Statement::SetInt32) .Func(_SC("SetUint32"), &Statement::SetUint32) .Func(_SC("SetInt64"), &Statement::SetInt64) .Func(_SC("SetUint64"), &Statement::SetUint64) .Func(_SC("SetSLongInt"), &Statement::SetSLongInt) .Func(_SC("SetULongInt"), &Statement::SetULongInt) .Func(_SC("SetInteger"), &Statement::SetInteger) .Func(_SC("SetFloat32"), &Statement::SetFloat32) .Func(_SC("SetFloat64"), &Statement::SetFloat64) .Func(_SC("SetFloat"), &Statement::SetFloat) .Func(_SC("SetBoolean"), &Statement::SetBoolean) .Func(_SC("SetDate"), &Statement::SetDate) .Func(_SC("SetTime"), &Statement::SetTime) .Func(_SC("SetDatetime"), &Statement::SetDatetime) .Func(_SC("SetString"), &Statement::SetString) .Func(_SC("SetEnum"), &Statement::SetEnum) .Func(_SC("SetSet"), &Statement::SetSet) .Func(_SC("SetBlob"), &Statement::SetBlob) .Func(_SC("SetData"), &Statement::SetData) .Func(_SC("SetBuffer"), &Statement::SetData) .Func(_SC("SetNull"), &Statement::SetNull) ); RootTable(vm).Bind(_SC("MySQL"), sqlns); } } // Namespace:: SqMod