/*
 * binary_buf是二进制缓存
 * 这里用字符串，来存储雷达的通信消息的原始数据
 * Binary_buf 的内容格式：消息类型 + 消息数据
 *
 * 例如思科的雷达的消息类型
 * ready->ready->start->data->data->data->stop->ready->ready
 *
 * 提供了 is_equal 系列的函数，来进行判断前面的消息类型
 * 
 * 注意了：m_buf是中间可以允许有‘\0’的，不是单纯的字符串格式
 * 			末尾也不一定是‘\0’
 */

#include "binary_buf.h"

#include <string>
#include <string.h>

Binary_buf::Binary_buf()
{
	mp_buf = NULL;
	m_length = 0;
}

Binary_buf::Binary_buf(const Binary_buf& other)
{
	mp_buf = NULL;
	m_length = 0;

	if ( other.m_length > 0 && other.mp_buf != NULL)
	{
		mp_buf = (char*)malloc(other.m_length);
		memcpy(mp_buf, other.mp_buf, other.m_length);
		m_length = other.m_length;
	}
}

Binary_buf::~Binary_buf()
{
	if ( mp_buf )
	{
		free(mp_buf);
		mp_buf = NULL;
	}
	m_length = 0;

//	std::cout << "Binary_buf::~Binary_buf()" << std::endl;
}


//使用参数构造，深拷贝，len为0时，使用strlen(buf)，不存储结束符'\0'
Binary_buf::Binary_buf(const char* p_buf, int len)
{
	mp_buf = NULL;
	m_length = 0;

	if ( p_buf != NULL)
	{
		if (len <= 0)
		{
			len = strlen(p_buf);
		}

		mp_buf = (char*)malloc(len);
		memcpy(mp_buf, p_buf, len);
		m_length = len;
	}
}


//使用参数构造，深拷贝，len为0时，使用strlen(buf)，不存储结束符'\0'
Binary_buf::Binary_buf(char* p_buf, int len)
{
	mp_buf = NULL;
	m_length = 0;

	if ( p_buf != NULL)
	{
		if (len <= 0)
		{
			len = strlen(p_buf);
		}

		mp_buf = (char*)malloc(len);
		memcpy(mp_buf, p_buf, len);
		m_length = len;
	}
}

//重载=，深拷贝，
Binary_buf& Binary_buf::operator=(const Binary_buf& other)
{
	clear();

	if ( other.m_length > 0 && other.mp_buf != NULL)
	{
		mp_buf = (char*)malloc(other.m_length);
		memcpy(mp_buf, other.mp_buf, other.m_length);
		m_length = other.m_length;
	}
	return *this;
}

//重载=，深拷贝，使用strlen(buf)，不存储结束符'\0'
Binary_buf& Binary_buf::operator=(const char* p_buf)
{
	clear();

	if ( p_buf != NULL)
	{
		int len = strlen(p_buf);
		mp_buf = (char*)malloc(len);
		memcpy(mp_buf, p_buf, len);
		m_length = len;
	}
	return *this;
}

//重载+，other追加在this的后面，
Binary_buf& Binary_buf::operator+(Binary_buf& other)
{
	if (other.mp_buf != NULL && other.m_length > 0)
	{
		int t_length_total = m_length + other.m_length;
		char* tp_buf_total = (char*)malloc(t_length_total);
		memcpy(tp_buf_total, mp_buf, m_length);
		memcpy(tp_buf_total + m_length, other.mp_buf, other.m_length);
		free(mp_buf);
		mp_buf = tp_buf_total;
		m_length = t_length_total;
	}
	return *this;
}

//重载+，追加在this的后面，使用strlen(buf)，不存储结束符'\0'
Binary_buf& Binary_buf::operator+(const char* p_buf)
{
	if (p_buf != NULL )
	{
		int t_length_back = strlen(p_buf);
		int t_length_total = m_length + t_length_back;
		char* tp_buf_total = (char*)malloc(t_length_total);
		memcpy(tp_buf_total, mp_buf, m_length);
		memcpy(tp_buf_total + m_length, p_buf, t_length_back);
		free(mp_buf);
		mp_buf = tp_buf_total;
		m_length = t_length_total;
	}
	return *this;
}

//重载[]，允许直接使用数组的形式，直接访问buf的内存。注意，n值必须在0～m_length之间，
char& Binary_buf::operator[](int n)
{
	if (n >= 0 && n < m_length)
	{
		return mp_buf[n];
	}
	else
	{
		throw (n);
	}
}


//判空
bool Binary_buf::is_empty()
{
	if ( mp_buf != NULL && m_length > 0 )
	{
		return false;
	}
	else
	{
		return true;
	}
}

//清空
void Binary_buf::clear()
{
	if ( mp_buf )
	{
		free(mp_buf);
		mp_buf = NULL;
	}
	m_length = 0;
}


//比较前面部分的buf是否相等，使用 other.m_length 为标准
bool Binary_buf::is_equal_front(const Binary_buf& other)
{
	if ( other.mp_buf == NULL || other.m_length <= 0 )
	{
		if ( mp_buf == NULL || m_length <= 0 )
		{
			return true;
		}
		else
		{
			return false;
		}
	}
	else
	{
		if ( mp_buf != NULL && m_length > 0 )
		{
			if ( other.m_length > m_length )
			{
				return false;
			}
			return  (strncmp((const char*)mp_buf, other.mp_buf, other.m_length) == 0);
		}
		else
		{
			return false;
		}

	}
}

//比较前面部分的buf是否相等，len为0时，使用strlen(buf)为标准，不比较结束符'\0'
bool Binary_buf::is_equal_front(const char* p_buf, int len)
{
	if ( p_buf == NULL )
	{
		if ( mp_buf == NULL || m_length <= 0 )
		{
			return true;
		}
		else
		{
			return false;
		}
	}
	else
	{
		if ( mp_buf != NULL && m_length > 0 )
		{
			if ( len == 0 )
			{
				len = strlen(p_buf);
			}
			if ( len > m_length )
			{
				return false;
			}
			return  (strncmp((const char*)mp_buf, p_buf, len) == 0);
		}
		else
		{
			return false;
		}

	}
}

//比较的buf是否全部相等，
bool Binary_buf::is_equal_all(const Binary_buf& other)
{
	if ( other.mp_buf == NULL || other.m_length <= 0 )
	{
		if ( mp_buf == NULL || m_length <= 0 )
		{
			return true;
		}
		else
		{
			return false;
		}
	}
	else
	{
		if ( mp_buf != NULL && m_length > 0 )
		{
			if ( other.m_length != m_length )
			{
				return false;
			}
			return  (strncmp((const char*)mp_buf, other.mp_buf, other.m_length) == 0);
		}
		else
		{
			return false;
		}

	}
}
//比较的buf是否全部相等，不比较结束符'\0'
bool Binary_buf::is_equal_all(const char* p_buf)
{
	if ( p_buf == NULL )
	{
		if ( mp_buf == NULL || m_length <= 0 )
		{
			return true;
		}
		else
		{
			return false;
		}
	}
	else
	{
		if ( mp_buf != NULL && m_length > 0 )
		{
			int	len = strlen(p_buf);
			if ( len != m_length )
			{
				return false;
			}
			return  (strncmp((const char*)mp_buf, p_buf, len) == 0);
		}
		else
		{
			return false;
		}

	}
}




char*	Binary_buf::get_buf()const
{
	return mp_buf;
}

int		Binary_buf::get_length()const
{
	return m_length;
}