可对任意类型数据进行编码的Base64编解码源码

// 测试平台: 在Win2K下的Cygwin gcc编译通过，测试没有发现问题（如果你发现了还请告诉我，谢谢！）
// 调用的库： strlen() (  其实可以自己写一个类似的功能函数来取长度的 )

/*
*********************************************************************************************************
*                                         昆明XXXX有限公司
*                                             技术研发部
*
*                                  (c) Copyright 2005-2006, kmajian
*                                        All Rights Reserved
*
*                                       Base-64的编解码程序文件
*
* File : BASE64.C
* By   : kmajian
* Date : 2006-6-23
*********************************************************************************************************
*/
#include "CONFIG.H"
#include "base64.h"

#define  CH_EMPTY                     0xFF
static const uint8 baseAlp[] = "ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789+/";
/*
*********************************************************************************************************
*                                              Base64编码
*
* 函数名称 : base64enc
* 功能描述 : 把特定内存块编码为Base64编码, 存入目的字符串
* 调用模块 : 无
* 参    数 : *sOut      目标字符缓冲区
*            *pIn       需要转变为Base64编码的内存块
*            iLen       内存块长度
* 返    回 : uint16     生成编码的长度
*********************************************************************************************************
*/
uint16 base64enc(void *pIn, uint16 iLen, char * sOut)
{
    uint8 *pBuf = ( uint8 * )pIn;
    uint8 swiBuf[ 4 ];
   
    uint16 i, n;
    uint16 iReturn = 0;
    uint16 iLenM3 = iLen % 3;
    uint16 iLenD3 = iLen / 3;
    uint16 iLenD3p;
   
    if( iLenM3 == 0 )                                 // 如果iLenM3等于0则iLenD3p就为iLenD3，否则为(iLenD3+1)
     iLenD3p = iLenD3;
    else
     iLenD3p = iLenD3;
   
    if( iLen < 1 )
    {
      return iReturn;
    }
   
    for( i = 0; i < iLenD3p; i++ )
    {
      swiBuf[ 0 ] = ( *pBuf ) >> 2;                   // 把第一个字符右移2位得到一个个目标字符
      swiBuf[ 1 ] = ( ( *pBuf ) << 4 ) & 0x30;        // 把第一个字符左移四位，然后与0x30相与，
                                                      // 得到第二个目标字符的第5、6位
      pBuf++;
      swiBuf[ 1 ] = swiBuf[ 1 ] + ( ( *pBuf ) >> 4 ); // 把第二个字符右移4位，然后与得到的目标5、6位相加
                                                      // 得到第二个目标字符
      swiBuf[ 2 ] = ( ( *pBuf ) << 2 ) & 0x3C;        // 把第二个字符左移2位，然后与0x3C相与，
                                                      // 得到第二个目标字符的第3、4、5、6位
      pBuf++;
      swiBuf[ 2 ] = swiBuf[ 2 ] + ( ( *pBuf ) >> 6 ); // 把第三个字符右移6位，然后与得到的目标3、4、5、6
                                                      // 位相加，得到第三个目标字符
      swiBuf[ 3 ] = ( *pBuf ) & 0x3F;                 // 第三个字符与0x3F相与，得到第四个目标字符
      pBuf++;
      for( n = 0; n < 4; n++ )                        // 取得需要的Base64编码
      {
        *sOut = baseAlp[ swiBuf[ n ] ];
        sOut++;
        iReturn++;
      }
    }
    switch( iLenM3 )                                  // 对不足三个字符的编码处理
    {
      case 1: swiBuf[ 0 ] = ( *pBuf ) >> 2;         
              swiBuf[ 1 ] = ( ( *pBuf ) << 4 ) & 0x30;
              swiBuf[ 2 ] = '=';
              swiBuf[ 3 ] = '=';
              for( n = 0; n < 4; n++ )
              {
                if( swiBuf[ n ] == '=' )
                {
                 *sOut = '=';
                }
                else
                {
                 *sOut = baseAlp[ swiBuf[ n ] ];
                }
                sOut++;
                iReturn++;
              }
              break;
      case 2: swiBuf[ 0 ] = ( *pBuf ) >> 2;         
              swiBuf[ 1 ] = ( ( *pBuf ) << 4 ) & 0x30;
              pBuf++;
              swiBuf[ 1 ] = swiBuf[ 1 ] + ( ( *pBuf ) >> 4 );
              swiBuf[ 2 ] = ( ( *pBuf ) << 2 ) & 0x3C;
              swiBuf[ 3 ] = '=';
              for( n = 0; n < 4; n++ )
              {
                if( swiBuf[ n ] == '=' )
                {
                 *sOut = '=';
                }
                else
                {
                 *sOut = baseAlp[ swiBuf[ n ] ];
                }
                sOut++;
                iReturn++;
              }
              break;
      default:break;
    }
   
    *sOut = '/0';
   
    return iReturn;
}

/*
*********************************************************************************************************
*                                              Base64解码
*
* 函数名称 : base64dec
* 功能描述 : 把送入的字符串按Base64方式解码, 存入目的缓冲区
* 调用模块 : 无
* 参    数 : *sIn       源字符串
*            *pOut      输出内存块
* 返    回 : uint16     解码后内容的长度
*********************************************************************************************************
*/
uint16 base64dec(const char *sIn, void * const pOut)
{
  uint8 *outBuf = ( uint8 * )pOut;
  uint8 cTemp;
  uint8 cBuf[ 3 ];
  uint16 iReturn = 0;
  uint16 i, n;
  uint16 cLen;
  uint16 aLen;
 
  cLen = strlen( sIn );
  if( ( cLen % 4 ) != 0 )
  {
   return iReturn;
  }
 
  aLen = cLen / 4;
  for( i = 0; i < aLen; i++ )
  {
   cTemp = GetB64Char( *sIn );
   sIn++;
   cBuf[ 0 ] = cTemp << 2;
   cTemp = GetB64Char( *sIn );
   sIn++;
   cBuf[ 0 ] = cBuf[ 0 ] + ( cTemp >> 4 );
   cBuf[ 1 ] = cTemp << 4;
   cTemp = GetB64Char( *sIn );
   sIn++;
   if( cTemp == CH_EMPTY )
   {
    *outBuf = cBuf[ 0 ];
    outBuf++;
    *outBuf = cBuf[ 1 ];
    iReturn = iReturn + 2;
    
    return iReturn;
   }
   else
   {
    cBuf[ 1 ] = cBuf[ 1 ] + ( cTemp >> 2 );
    cBuf[ 2 ] = cTemp << 6;
   }
   cTemp = GetB64Char( *sIn );
   sIn++;
   if( cTemp == CH_EMPTY )
   {
    *outBuf = cBuf[ 0 ];
    outBuf++;
    *outBuf = cBuf[ 1 ];
    outBuf++;
    *outBuf = cBuf[ 2 ];
    iReturn = iReturn + 3;
    
    return iReturn;
   }
   else
   {
    cBuf[ 2 ] = cBuf[ 2 ] + cTemp;
   }
   
   for( n = 0; n < 3; n++ )
   {
    *outBuf = cBuf[ n ];
    outBuf++;
    iReturn++;
   }
  }
   
  return iReturn;
}

// 获取Base64编码值
uint8 GetB64Char( const uint8 ch )
{
 uint8 n;
 
 if( ch == '=' )
 {
  return CH_EMPTY;
 }
 else
 {
  for( n = 0; n < strlen( baseAlp ); n++ )
  {
   if( ch == baseAlp[ n ] )
   {
    break;
   }
  }
  
  return n;
 }
}

/*
*********************************************************************************************************
*                                             END
*********************************************************************************************************
*/