transactd 1.0.1

data/source/bzs/db/engine/mysql/fieldAccess.h

@@ -0,0 +1,158 @@
+#ifndef FIELDACCESS_H
+#define FIELDACCESS_H
+/*=================================================================
+   Copyright (C) 2013 BizStation Corp All rights reserved.
+
+   This program is free software; you can redistribute it and/or
+   modify it under the terms of the GNU General Public License
+   as published by the Free Software Foundation; either version 2
+   of the License, or (at your option) any later version.
+
+   This program is distributed in the hope that it will be useful,
+   but WITHOUT ANY WARRANTY; without even the implied warranty of
+   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+   GNU General Public License for more details.
+
+   You should have received a copy of the GNU General Public License
+   along with this program; if not, write to the Free Software 
+   Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  
+   02111-1307, USA.
+=================================================================*/
+#include "mysqlInternal.h"
+
+
+
+namespace bzs
+{
+namespace db
+{
+namespace engine
+{
+namespace mysql
+{
+
+//-----------------------------------------------------------------------------
+/** 
+ *	var or bolob type sub functions;
+ */
+//-----------------------------------------------------------------------------
+inline uint var_bytes(Field* fd)
+{
+	return (uint)HA_VARCHAR_PACKLENGTH(fd->field_length);
+}
+
+/** sizeof var text body
+ */
+inline uint var_strlen(const uchar* ptr, uint varlen)
+{
+	return (varlen==1)? *ptr:*((const unsigned short*)ptr);
+}
+
+inline uint var_strlen(Field* fd)
+{
+	return var_strlen(fd->ptr, var_bytes(fd));
+}
+
+/** sizeof var text body + size bytes
+ */
+inline uint var_total_len(Field* fd)
+{
+	uint varlen = var_bytes(fd);
+	return var_strlen(fd->ptr, varlen) + varlen;
+}
+
+inline uint var_total_len(const uchar* ptr, uint varlen)
+{
+	return var_strlen(ptr, varlen) + varlen;
+}
+
+
+/** var text body length on key buffer
+ *  size bytes is 2 byte fixed in key buffer.
+ */
+inline uint var_strlen_key(const uchar* ptr)
+{
+	return *((const unsigned short*)ptr);
+}
+
+/** return Is type var type
+ */
+inline bool isVarType(enum_field_types type)
+{
+	return ((type==MYSQL_TYPE_VAR_STRING) || (type==MYSQL_TYPE_VARCHAR));
+}
+/** return Is type blob type
+ */
+inline bool isBlobType(enum_field_types type)
+{
+	return ((type==MYSQL_TYPE_TINY_BLOB) || (type==MYSQL_TYPE_BLOB)
+			|| (type==MYSQL_TYPE_MEDIUM_BLOB) || (type==MYSQL_TYPE_LONG_BLOB));
+}
+
+inline uint blob_var_bytes(Field* fd)
+{
+	return fd->pack_length() - portable_sizeof_char_ptr;
+	
+}
+/** sizeof blob body
+ */
+inline uint blob_len(const uchar* ptr, uint varlen)
+{
+	uint v = 0;
+	memcpy(&v, ptr, varlen);
+	return v;
+}
+
+inline uint blob_len(Field* fd)
+{
+	return blob_len(fd->ptr, blob_var_bytes(fd));
+}
+
+/** sizeof blob body ptr + size bytes. not include blob body length
+ */
+inline uint blob_total_len(Field* fd)
+{
+	return sizeof(char*) + blob_var_bytes(fd);
+}
+
+inline uint blob_total_len(uint varlen)
+{
+	return sizeof(char*) + varlen;
+}
+
+inline const uchar** blobBodyPtrRef(Field* fd)
+{
+	return (const uchar**)(fd->ptr + blob_var_bytes(fd));	
+}
+
+inline const uchar* blobBodyPtr(Field* fd)
+{
+	return *(blobBodyPtrRef(fd));	
+}
+
+/** return size bytes
+ */
+inline uint var_bytes_if(Field* fd)
+{
+	if (isVarType(fd->type()))
+		return var_bytes(fd);
+	else if (isBlobType(fd->type()))
+		return blob_var_bytes(fd);
+	return 0;
+}
+
+/** Is this field name NIS?
+ */
+inline bool isNisField(const char* name) 
+{
+	return (name[0] && (name[0] == '$')
+		 && name[1] && (name[1] == 'n')
+		 && name[2] && (name[2] == 'f'));
+}
+
+}//namespace mysql
+}//namespace engine
+}//namespace db
+}//namespace bzs
+#endif
+

data/source/bzs/db/engine/mysql/mydebuglog.cpp

@@ -0,0 +1,349 @@
+/*=================================================================
+   Copyright (C) 2012 2013 BizStation Corp All rights reserved.
+
+   This program is free software; you can redistribute it and/or
+   modify it under the terms of the GNU General Public License
+   as published by the Free Software Foundation; either version 2
+   of the License, or (at your option) any later version.
+
+   This program is distributed in the hope that it will be useful,
+   but WITHOUT ANY WARRANTY; without even the implied warranty of
+   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+   GNU General Public License for more details.
+
+   You should have received a copy of the GNU General Public License
+   along with this program; if not, write to the Free Software 
+   Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  
+   02111-1307, USA.
+=================================================================*/
+
+#include "mydebuglog.h"
+#include "dbManager.h"
+#include <bzs/db/protocol/tdap/mysql/tdapCommandExecuter.h>
+#include <bzs/env/crosscompile.h>
+#include <bzs/env/fileopen.h>
+
+using namespace bzs::db::protocol::tdap::mysql;
+
+#ifdef DEBUG_LOG
+	bzs::db::engine::mysql::debugdb dbg;
+#endif
+
+
+void bzs::rtl::debuglog::init()
+{
+	#ifdef DEBUG_LOG
+	bzs::rtl::debuglog::regist(&dbg);
+	#endif
+	fn_format(logfilename, "transctd_debug","",".log",MY_REPLACE_EXT|MY_UNPACK_FILENAME); 
+
+	FILE* fp = fileOpen(logfilename, "w");
+	if (fp)
+	{
+		fputs(dateTime(), fp);
+		fputs("Transctd debug Start\n", fp);
+		fclose(fp);
+	}
+}
+
+namespace bzs
+{
+namespace db
+{
+namespace engine
+{
+namespace mysql
+{
+
+char msg[1024];
+
+void debugdb::stop()
+{
+	bzs::rtl::debuglog::write("Transctd debug End");
+}
+
+void debugdb::write(ushort_td op, request& req,  bool error)
+{
+	bool writeflag = false;
+
+	switch(op)
+	{
+	case TD_RESET_CLIENT:
+	{
+		std::string dbname = getDatabaseName(req);
+		sprintf_s(msg,1024, "TD_RESET_CLIENT result = %d \tdbname = %s\t cid = %d \n"
+			, req.result,  dbname.c_str(), req.cid);
+		writeflag = true;
+		break;
+	}
+	case TD_CREATETABLE:
+	{	
+		std::string dbname = getDatabaseName(req);
+		sprintf_s(msg, 1024, "TD_CREATETABLE result = %d \tdbname = %s\t table=%s\n"
+			, req.result,  dbname.c_str(), getTableName(req).c_str());
+		writeflag = true;
+		break;
+	}
+	case TD_OPENTABLE:
+	{	
+		std::string dbname = getDatabaseName(req);
+		sprintf_s(msg, 1024, "TD_OPENTABLE result = %d \tHandle = %d \tdbname = %s\n"
+			, req.result, req.pbk->handle,  dbname.c_str());
+		writeflag = true;
+		break;
+	}
+	case TD_CLOSETABLE:
+		sprintf_s(msg, 1024, "TD_CLOSETABLE result = %d \tHandle = %d\n"
+			, req.result, req.pbk->handle);
+		writeflag = true;
+		break;
+	case TD_KEY_SEEK:
+		sprintf_s(msg, 1024, "TD_KEY_SEEK result = %d \tHandle = %d\n"	, req.result, req.pbk->handle);
+		writeflag = true;
+		break;
+	case TD_KEY_AFTER:
+		sprintf_s(msg, 1024, "TD_KEY_AFTER result = %d \tHandle = %d\n"	, req.result, req.pbk->handle);
+		writeflag = true;
+		break;
+	case TD_KEY_OR_AFTER:
+		sprintf_s(msg, 1024, "TD_KEY_OR_AFTER result = %d \tHandle = %d\n" , req.result, req.pbk->handle);
+		writeflag = true;
+		break;
+	case TD_KEY_BEFORE:
+		sprintf_s(msg, 1024, "TD_KEY_BEFORE result = %d \tHandle = %d\n", req.result, req.pbk->handle);
+		writeflag = true;
+		break;
+	case TD_KEY_OR_BEFORE:
+		sprintf_s(msg, 1024, "TD_KEY_OR_BEFORE result = %d \tHandle = %d\n"	, req.result, req.pbk->handle);
+		writeflag = true;
+		break;
+	case TD_KEY_FIRST:
+		sprintf_s(msg, 1024, "TD_KEY_FIRST result = %d \tHandle = %d\n"	, req.result, req.pbk->handle);
+		writeflag = true;
+		break;
+	case TD_KEY_PREV:
+		sprintf_s(msg, 1024, "TD_KEY_PREV result = %d \tHandle = %d\n"	, req.result, req.pbk->handle);
+		writeflag = true;
+		break;
+	case TD_KEY_LAST:
+		sprintf_s(msg, 1024, "TD_KEY_LAST result = %d \tHandle = %d\n", req.result, req.pbk->handle);
+		writeflag = true;
+		break;
+	case TD_KEY_NEXT:
+		sprintf_s(msg, 1024, "TD_KEY_NEXT result = %d \tHandle = %d\n", req.result, req.pbk->handle);
+		writeflag = true;
+		break;
+	case TD_REC_INSERT:
+		sprintf_s(msg, 1024, "TD_REC_INSERT result = %d \tHandle = %d\n"
+			, req.result, req.pbk->handle);
+		writeflag = true;
+		break;
+	case TD_REC_UPDATE:
+		sprintf_s(msg, 1024, "TD_REC_UPDATE result = %d \tHandle = %d\n"
+			, req.result, req.pbk->handle);
+		writeflag = true;
+		break;
+	case TD_REC_DELETE:
+		sprintf_s(msg, 1024, "TD_REC_DELETE result = %d \tHandle = %d\n"
+			, req.result, req.pbk->handle);
+		writeflag = true;
+		break;
+	case TD_BEGIN_TRANSACTION:
+		sprintf_s(msg, 1024, "TD_BEGIN_TRANSACTION cid = %d \n", req.cid);
+		writeflag = true;
+		break;
+	case TD_END_TRANSACTION:
+		sprintf_s(msg, 1024, "TD_END_TRANSACTION cid = %d \n", req.cid);
+		writeflag = true;
+		break;
+	case TD_ABORT_TRANSACTION:
+		sprintf_s(msg, 1024, "TD_ABORT_TRANSACTION cid = %d \n", req.cid);
+		writeflag = true;
+		break;
+	case TD_BEGIN_SHAPSHOT:
+		sprintf_s(msg, 1024, "TD_BEGIN_SHAPSHOT cid = %d \n", req.cid);
+		writeflag = true;
+		break;
+	case TD_END_SNAPSHOT:
+		sprintf_s(msg, 1024, "TD_END_SNAPSHOT cid = %d \n", req.cid);
+		writeflag = true;
+		break;
+	case TD_TABLE_INFO: 
+	{
+		std::string dbname = getDatabaseName(req);
+		sprintf_s(msg, 1024, "TD_TABLE_INFO result = %d \tHandle = %d\n"
+			, req.result, req.pbk->handle);
+		writeflag = true;
+		break;
+	}
+	
+	case TD_POS_FIRST:
+		sprintf_s(msg, 1024, "TD_POS_FIRST result = %d \tHandle = %d\n", req.result, req.pbk->handle);
+		writeflag = true;
+		break;
+	case TD_POS_LAST:
+		sprintf_s(msg, 1024, "TD_POS_LAST result = %d \tHandle = %d\n", req.result, req.pbk->handle);
+		writeflag = true;
+		break;
+	case TD_POS_NEXT:
+		sprintf_s(msg, 1024, "TD_POS_NEXT result = %d \tHandle = %d\n", req.result, req.pbk->handle);
+		writeflag = true;
+		break;
+	case TD_POS_PREV:
+		sprintf_s(msg, 1024, "TD_POS_PREV result = %d \tHandle = %d\n", req.result, req.pbk->handle);
+		writeflag = true;
+		break;
+	case TD_BOOKMARK:
+		if (req.result==0)
+			sprintf_s(msg, 1024, "TD_BOOKMARK result = %d \tHandle = %d key = %d pos = %d\n"
+				, req.result, req.pbk->handle, req.keyNum, *((uint*)req.data));
+		else
+			sprintf_s(msg, 1024, "TD_BOOKMARK result = %d \tHandle = %d key = %d \n"
+				, req.result, req.pbk->handle, req.keyNum);
+		writeflag = true;
+		break;
+
+	case TD_MOVE_BOOKMARK:
+		sprintf_s(msg, 1024, "TD_MOVE_BOOKMARK result = %d \tHandle = %d key = %d pos = %d\n"
+			, req.result, req.pbk->handle, req.keyNum, *((uchar*)req.data));
+		writeflag = true;
+		break;
+		
+	case TD_GETDIRECTORY:
+		sprintf_s(msg, 1024, "TD_GETDIRECTORY cid = %d \n", req.cid);
+		writeflag = true;
+		break;
+
+	
+	case TD_SET_OWNERNAME:
+		sprintf_s(msg, 1024, "TD_SET_OWNERNAME result = %d \tHandle = %d\n", req.result, req.pbk->handle);
+		writeflag = true;
+		break;
+	case TD_DROP_INDEX:
+		sprintf_s(msg, 1024, "TD_DROP_INDEX result = %d \tHandle = %d\n", req.result, req.pbk->handle);
+		writeflag = true;
+		break;
+	case TD_KEY_NEXT_MULTI:
+		sprintf_s(msg, 1024, "TD_KEY_NEXT_MULTI result = %d \tHandle = %d\n", req.result, req.pbk->handle);
+		writeflag = true;
+		break;
+	case TD_KEY_PREV_MULTI:
+		sprintf_s(msg, 1024, "TD_KEY_PREV_MULTI result = %d \tHandle = %d\n", req.result, req.pbk->handle);
+		writeflag = true;
+		break;
+	case TD_POS_NEXT_MULTI:
+		sprintf_s(msg, 1024, "TD_POS_NEXT_MULTI result = %d \tHandle = %d\n", req.result, req.pbk->handle);
+		writeflag = true;
+		break;
+	case TD_POS_PREV_MULTI:
+		sprintf_s(msg, 1024, "TD_POS_PREV_MULTI result = %d \tHandle = %d\n", req.result, req.pbk->handle);
+		writeflag = true;
+		break;
+	case TD_MOVE_PER:
+		sprintf_s(msg, 1024, "TD_MOVE_PER result = %d \tHandle = %d\n", req.result, req.pbk->handle);
+		writeflag = true;
+		break;
+	case TD_GET_PER:
+		sprintf_s(msg, 1024, "TD_GET_PER result = %d \tHandle = %d\n", req.result, req.pbk->handle);
+		writeflag = true;
+		break;
+	case TD_INSERT_BULK:
+		sprintf_s(msg, 1024, "TD_INSERT_BULK result = %d \tHandle = %d\n", req.result, req.pbk->handle);
+		writeflag = true;
+		break;
+	case TD_VERSION:
+		sprintf_s(msg, 1024, "TD_VERSION result = %d \n", req.result);
+		writeflag = true;
+		break;
+
+	}
+	if (error)
+	{
+		sprintf_s(msg, 1024, "ERROR result = %d op=%d\t\tHandle = %d\n"
+			, req.result, op,  req.pbk?req.pbk->handle:0);
+		writeflag = true;
+	}
+	if (writeflag)
+		bzs::rtl::debuglog::write(msg);
+	
+}
+
+void debugdb::fieldDump(table* tb)	
+{
+	boost::mutex::scoped_lock lck(m_mutex);
+	FILE* fp = fileOpen(logfilename, "a+");
+	if (fp)
+	{
+		int size;
+		for (int j=0;j<(int)tb->internalTable()->s->fields;j++)
+		{
+			fputs(tb->internalTable()->s->field[j]->field_name, fp);
+			fputs("=", fp);
+			fputs(tb->valStr(j, size), fp);
+			fputs("\n", fp);
+		}
+		fclose(fp);
+	}
+}
+
+void debugdb::writeInsert(table* tb, const char* packPtr,int packlen, int row, int errorCount)
+{
+	char tmp[64];
+	sprintf(tmp, "INSERT PACKED   Row=%d len=%d ErrorRows=%d ", packlen, row, errorCount);
+	writeDump(tmp, packPtr + sizeof(ushort_td), packlen);
+	uint len = tb->recordLen()-tb->nullBytes();
+	sprintf(tmp, "INSERT UNPACKED Row=%d len=%d stat=%d", row, len, tb->stat());
+	writeDump(tmp, (const char*)tb->record(), len);
+	fieldDump(tb);
+}
+
+#ifdef DEBUG_READRECORDS
+void debugdb::writeReadRecordsBegin(extResultDef* resultDef, extRequest* req)
+{
+	char tmp[2048];
+	char tmp2[1024]={0x00};
+	sprintf(tmp, "READS RESULTDEF maxRows=%d fieldCount=%d\n", resultDef->maxRows, resultDef->fieldCount);
+	for (int i=0;i<resultDef->fieldCount;i++)
+	{
+		resultField* fd = &resultDef->field[i];
+		sprintf(tmp2,"RESULTDEF FIELD%d pos =%d len=%d \n",i+1, fd->pos, fd->len); 
+		strcat(tmp, tmp2);
+	}
+	sprintf(tmp2, "READS REQ len=%d reject=%d logicalCount=%d\n", req->len, req->rejectCount, req->logicalCount);
+	strcat(tmp, tmp2);
+	logicalField* field = &req->field;
+	while(1)	
+	{
+		sprintf(tmp2,"REQUEST FIELD1 type =%d len=%d pos=%d logType=%d opr=%d "
+				, field->type, field->len, field->pos, field->logType, field->opr);
+		strcat(tmp, tmp2);
+		if  (field->logType & CMPLOGICAL_FIELD)
+			sprintf(tmp2, "offset=%d\n", field->offset);
+		else
+		{
+			strcat(tmp, "Value=");
+			for (int j=0;j<field->len;j++)
+			{
+				sprintf(tmp2, "%02X ", *(field->ptr+j));
+				strcat(tmp, tmp2);
+			}
+			strcat(tmp, "\n");
+		}
+		if (field->opr == 0) break;//this is last
+		field = field->next();
+	}
+	write(tmp);
+}
+
+void debugdb::writeReadRecordsEnd(resultWriter* rw)
+{
+	dump("READS RESULT DUMP", rw->resultBuffer()+RETBUF_EXT_RESERVE_SIZE
+			, rw->resultLen()-RETBUF_EXT_RESERVE_SIZE);
+}
+#endif //DEBUG_READRECORDS 
+
+}//namespace mysql
+}//namespace engine
+}//namespace db
+}//namespace bzs
+

data/source/bzs/db/engine/mysql/mydebuglog.h

@@ -0,0 +1,89 @@
+#ifndef MYDEBUGLOG_H
+#define MYDEBUGLOG_H
+/*=================================================================
+   Copyright (C) 2012 2013 BizStation Corp All rights reserved.
+
+   This program is free software; you can redistribute it and/or
+   modify it under the terms of the GNU General Public License
+   as published by the Free Software Foundation; either version 2
+   of the License, or (at your option) any later version.
+
+   This program is distributed in the hope that it will be useful,
+   but WITHOUT ANY WARRANTY; without even the implied warranty of
+   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+   GNU General Public License for more details.
+
+   You should have received a copy of the GNU General Public License
+   along with this program; if not, write to the Free Software 
+   Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  
+   02111-1307, USA.
+=================================================================*/
+#include <bzs/db/protocol/tdap/mysql/request.h>
+#include <boost/noncopyable.hpp>
+#include <stdio.h>
+#include <bzs/rtl/debuglog.h>
+
+using namespace bzs::rtl;	
+
+namespace bzs
+{
+	
+namespace db
+{
+	using namespace protocol::tdap::mysql;
+namespace engine
+{
+namespace mysql
+{
+
+class table;
+
+class debugdb : public rtl::debuglog
+{
+	void fieldDump(table* tb);
+public:
+	virtual ~debugdb(){};
+	
+	virtual void stop();
+	void write(ushort_td op, protocol::tdap::mysql::request& req,  bool error = false);
+	void writeInsert(table* tb, const char* packPtr,int packlen, int row, int errorCount);
+};
+
+extern char msg[1024];
+
+#ifdef DEBUG_LOG
+	
+	#define DEBUG_WRITELOG2(OP, REQ) ((debugdb*)debuglog::get())->write(OP, REQ);
+	#define DEBUG_WRITELOG3(OP, REQ, ERR) ((debugdb*)debuglog::get())->write(OP, REQ, ERR);
+	#define DEBUG_WRITELOG_SP1(FORMAT, PARAM) \
+		sprintf_s(msg,FORMAT, PARAM); \
+		debuglog::get()->write(msg);
+
+#else  //DEBUG_LOG
+	#define DEBUG_WRITELOG2(OP, REQ)
+	#define DEBUG_WRITELOG3(OP, REQ, ERR)
+	#define DEBUG_WRITELOG_SP1(FORMAT, PARAM)
+#endif //DEBUG_LOG
+
+#ifdef DEBUG_LOG_BINSERT
+	#define DEBUG_INSERT(TB,PTR,LEN,ROW,ERRORS) ((debugdb*)debuglog::get())->writeInsert(TB, PTR, LEN, ROW, ERRORS);
+#else
+	#define DEBUG_INSERT(TB,PTR,LEN,ROW,ERRORS)
+#endif
+
+
+#ifdef	DEBUG_READRECORDS
+	#define DEBUG_RECORDS_BEGIN( RDEF, REQ)	debuglog::get()->writeReadRecordsBegin(RDEF, REQ);
+	#define DEBUG_RECORDS_END( WRITER) debuglog::get()->writeReadRecordsEnd(WRITER);
+#else
+	#define DEBUG_RECORDS_BEGIN( RDEF, REQ)
+	#define DEBUG_RECORDS_END( WRITER)
+#endif
+
+
+}//namespace mysql
+}//namespace engine
+}//namespace db
+}//namespace bzs
+
+#endif //MYDEBUGLOG_H