base64编解码算法

/**********************************************************************
* Copyright (c) 2003

* 文件名称  base64.h
* 摘    要：base64算法程序。
* 当前版本：1.1
* 作    者：杜正涛
* 完成日期：2003年6月20日
* 取代版本：1.0
************************************************************************/
#ifndef BASE64_H
#define BASE64_H
#include
#include
#include

 

char*  ch64="ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789+/";

 

unsigned char *encode(unsigned char *src,int srclen)
{

 int n,buflen,i,j,m;
 int pading=0;
 unsigned char *buf;
 static unsigned char *dst;

 buf=src;
 buflen=n=srclen;
 if(n%3!=0)  /* pad with '=' by using a temp buffer */
 {
  pading=1;
  buflen=n+3-n%3;
  buf=(unsigned char *)malloc(buflen+1);
  memset(buf,0,buflen+1);
  memcpy(buf,src,n);
  for(i=0;i<3-n%3;i++)
   buf[n+i]='=';
 }
 dst=(unsigned char *)malloc(buflen*4/3+1);
 memset(dst,0,buflen*4/3+1);
 for(i=0,j=0;i {
  dst[j]=(buf[i]&0xFC)>>2;
  dst[j+1]=((buf[i]&0x03)<<4) + ((buf[i+1]&0xF0)>>4);
  dst[j+2]=((buf[i+1]&0x0F)<<2) + ((buf[i+2]&0xC0)>>6);
  dst[j+3]=buf[i+2]&0x3F;
 }
 for(i=0;i  dst[i]=ch64[dst[i]];
 if(pading)
  free(buf);

/*此处是我在和PHP互调时的改正*/
 m=strlen((const char *)dst);
 if(n%3!=0)
 {
  for(i=0;i<3-n%3;i++)
   dst[m-(3-n%3)+i]='=';
 }

 return dst;
}

unsigned char *decode(unsigned char *src)
{
 int n,i,j;
 unsigned char *p;
 static unsigned char *dst;

 n=strlen((const char *)src);
 for(i=0;i {
  p=(unsigned char *)strchr(ch64,src[i]);
  if(!p)
   break;
  src[i]=p - (unsigned char *)ch64;
 }
 dst=(unsigned char *)malloc(n*3/4+1);
 memset(dst,0,n*3/4+1);
 for(i=0,j=0;i {
  dst[j]=(src[i]<<2) + ((src[i+1]&0x30)>>4);
  dst[j+1]=((src[i+1]&0x0F)<<4) + ((src[i+2]&0x3C)>>2);
  dst[j+2]=((src[i+2]&0x03)<<6) + src[i+3];
 }
 return dst;
}

void main()
{
 char src[]={'1','2','3',0,'a','b','*',0,'A','B','$'};
 unsigned char *dst1;
 unsigned char *dst2;
 unsigned int i;

 dst1=encode(src,11);  /*the second parameter must accord with the first one */
 printf("%s\n",dst1);
 dst2=decode(dst1);
 for(i=0;i<_msize(dst2);i++)
  printf("%c",dst2[i]);

 free(dst1);
 free(dst2);
}
#endif