STM32 cjson的GBK/UTF-8/UNICODE转换、显示中文、GBK字库

#include "gbk_utf8_unicode.h"
#include <stdio.h>
#include <stdlib.h>
#include <string.h>

// 将Unicode（UCS-2LE）编码转换成UTF8编码
int UnicodeToUtf8(char* pInput, char *pOutput)  
{  
	int len = 0; //记录转换后的Utf8字符串的字节数
	while (*pInput)
	{
		//处理一个unicode字符
		char low = *pInput;//取出unicode字符的低8位
		pInput++;
		char high = *pInput;//取出unicode字符的高8位
		int w=high<<8;
		unsigned  wchar = (high<<8)+low;//高8位和低8位组成一个unicode字符,加法运算级别高
 
		if (wchar <= 0x7F ) //英文字符
		{   
			pOutput[len] = (char)wchar;  //取wchar的低8位
			len++;
		}  
		else if (wchar >=0x80 && wchar <= 0x7FF)  //可以转换成双字节pOutput字符
		{  
			pOutput[len] = 0xc0 |((wchar >> 6)&0x1f);  //取出unicode编码低6位后的5位，填充到110yyyyy 10zzzzzz 的yyyyy中
			len++;
			pOutput[len] = 0x80 | (wchar & 0x3f);  //取出unicode编码的低6位，填充到110yyyyy 10zzzzzz 的zzzzzz中
			len++;
		}  
		else if (wchar >=0x800 && wchar < 0xFFFF)  //可以转换成3个字节的pOutput字符
		{  
			pOutput[len] = 0xe0 | ((wchar >> 12)&0x0f);  //高四位填入1110xxxx 10yyyyyy 10zzzzzz中的xxxx
			len++;
			pOutput[len] = 0x80 | ((wchar >> 6) & 0x3f);  //中间6位填入1110xxxx 10yyyyyy 10zzzzzz中的yyyyyy
			len++;
			pOutput[len] = 0x80 | (wchar & 0x3f);  //低6位填入1110xxxx 10yyyyyy 10zzzzzz中的zzzzzz
			len++;
		}  
 
		else //对于其他字节数的unicode字符不进行处理
		{
			return -1;
		}
		pInput ++;//处理下一个unicode字符
	}
	//utf8字符串后面，有个
	pOutput [len]= 0;
	return len;  
}  

/*************************************************************************************************
* 将UTF8编码转换成Unicode（UCS-2LE）编码  低地址存低位字节
* 参数：
*    char* pInput     输入字符串
*    char*pOutput   输出字符串
* 返回值：转换后的Unicode字符串的字节数，如果出错则返回-1
**************************************************************************************************/
//utf8转unicode
int Utf8ToUnicode(char* pInput, char* pOutput)
{
	int outputSize = 0; //记录转换后的Unicode字符串的字节数
 
	while (*pInput)
	{
		if (*pInput > 0x00 && *pInput <= 0x7F) //处理单字节UTF8字符（英文字母、数字）
		{
			*pOutput = *pInput;
			 pOutput++;
			*pOutput = 0; //小端法表示，在高地址填补0
		}
		else if (((*pInput) & 0xE0) == 0xC0) //处理双字节UTF8字符
		{
			char high = *pInput;
			pInput++;
			char low = *pInput;
			if ((low & 0xC0) != 0x80)  //检查是否为合法的UTF8字符表示
			{
				return -1; //如果不是则报错
			}
 
			*pOutput = (high << 6) + (low & 0x3F);
			pOutput++;
			*pOutput = (high >> 2) & 0x07;
		}
		else if (((*pInput) & 0xF0) == 0xE0) //处理三字节UTF8字符
		{
			char high = *pInput;
			pInput++;
			char middle = *pInput;
			pInput++;
			char low = *pInput;
			if (((middle & 0xC0) != 0x80) || ((low & 0xC0) != 0x80))
			{
				return -1;
			}
			*pOutput = (middle << 6) + (low & 0x3F);//取出middle的低两位与low的低6位，组合成unicode字符的低8位
			pOutput++;
			*pOutput = (high << 4) + ((middle >> 2) & 0x0F); //取出high的低四位与middle的中间四位，组合成unicode字符的高8位
		}
		else //对于其他字节数的UTF8字符不进行处理
		{
			return -1;
		}
		pInput ++;//处理下一个utf8字符
		pOutput ++;
		outputSize += 2;
	}
	//unicode字符串后面，有两个
	*pOutput = 0;
	 pOutput++;
	*pOutput = 0;
	return outputSize;
}

// 将Utf8转成字符串形式
int Utf8ToStr(char* pInput, char* pOutput){

	char *ptemp = (char*)malloc(strlen(pInput)/3*2);
	int num = Utf8ToUnicode(pInput, ptemp);
	if (num != -1){
		unsigned char* p = (unsigned char*)ptemp;
		for (int i = 0; i <= num/2; i=i+2)
		{
			sprintf(&pOutput[strlen(pOutput)], "\u%x%x", p[i+1], p[i]);
		}
	}
	return num;
}


//  utf8转为Unicode，让pad可显示中文
int SwitchToGbk(const unsigned char* pszBufIn, int nBufInLen, unsigned char* pszBufOut, int* pnBufOutLen)
{
	int i = 0;
	int j = 0, nLen;
	unsigned short unicode;
	unsigned short gbk;
	unsigned char temp;
	

	for(; i < nBufInLen; i++, j++)
	{
		if((pszBufIn[i] & 0x80) == 0x00)		// 1?
		{
			nLen = 1;
			pszBufOut[j]= pszBufIn[i];
		}
	/*		
		else if((pszBufIn[i] & 0xE0) == 0xC0)// 2?
		{
			nLen = 2;
			unicode = (pszBufIn[i] & 0x1F << 6) | (pszBufIn[i+1]& 0x3F);
		}*/
		else if ((pszBufIn[i] & 0xF0) == 0xE0) // 3? 
		{

			if (i+ 2 >= nBufInLen) return -1; 
			unicode = (((int)(pszBufIn[i] & 0x0F)) << 12) | (((int)(pszBufIn[i+1] & 0x3F)) << 6) | (pszBufIn[i+2]  & 0x3F); 
			gbk = mb_uni2gb_table[unicode-0x4e00];
			
			pszBufOut[j]= gbk/256;
			pszBufOut[j+1] = gbk%256;
			j++;
			i+=2;
		}
		else
		{
			return -1;
		}
	}
//	*pnBufOutLen = j;

	return 0;
}


// hex型字符转hex
char *str2hex(const char *buf, char *dst)
{
 char buf_temp[2400] = {0};
	int x = 0;
	unsigned long i;
	while(*buf != '')
	{
		if(*buf == '\')
		{
			strcpy(buf_temp,buf);
			*buf_temp = '0';
			*(buf_temp + 4) = '';
			i = strtoul(buf_temp, NULL, 16);
			dst[x] = i;
			buf += 3;
		}
		else
		{
			dst[x] = *buf;
		}
		x++;
		buf++;
	}
	dst[x] = '';
	return dst;
}


/***********************************************************************/

//一个调用示例
void EnDeCodeDemo(){
	//汉字“我”的UTF8编码是0xe68891，Unicode编码是 0x6211
	//1、unicode转utf8
	char unicodeStr[3]={0x11,0x62,0x00};//“我”的unicode编码是0x6211，按低地址存低位字节
	char utf8Str[10]={0};
	memset(utf8Str,0,5);
	int num = UnicodeToUtf8(unicodeStr,utf8Str);
 
	unsigned char* p = (unsigned char*)utf8Str;   
	for (int i = 0; i < num; i++)
	{
		printf("%0x", *p);
		p++;
	}//输出e68891
	printf("n");
 
	//2、utf8转unicode
	char utf8Str2[4] = {0xe6, 0x88, 0x91, 0x00}; 
	char unicodeStr2[10]={0};
	memset(unicodeStr2,0,8);
	int num2 = Utf8ToUnicode(utf8Str2, unicodeStr2);
	if (num2 == -1)
	{
		printf("Error!n");
	}
	else
	{
	  unsigned char* p = (unsigned char*)unicodeStr2;
		for (int i = 0; i < num2; i++)
		{
			printf("%0x", *p);
			p++;
		}//输出1162
		printf("n");
	}


	// 3、Utf8转成字符串
	char utf8[10] = {0xe6, 0x88, 0x91, 0xe6, 0x88, 0x91, 0x00}; 
	char utf8Str3[20]={0};
	Utf8ToStr(utf8,utf8Str3);
	printf("%srn", utf8Str3);

    // 4、utf8转为Unicode，让pad可显示中文
	char *utf8str = music_name->valuestring;
	char gbkstr[100]={0};
	int len;
	SwitchToGbk((const u8*)utf8str,strlen(utf8str),(u8 *)gbkstr,&len);
    printf("%srn", gbkstr);
}