base64
Base64是网络上最常见的用于传输8Bit字节代码的编码方式之一，大家可以查看RFC2045～RFC2049，上面有MIME的详细规范。00a3ae8d
Base64要求把每三个8Bit的字节转换为四个6Bit的字节（3*8 = 4*6 = 24），然后把6Bit再添两位高位0，组成四个8Bit的字节，也就是说，转换后的字符串理论上将要比原来的长1/3。
这样说会不会太抽象了？不怕，我们来看一个例子：
转换前 aaaaaabb ccccdddd eeffffff
转换后 00aaaaaa 00bbcccc 00ddddee 00ffffff
应该很清楚了吧？上面的三个字节是原文，下面的四个字节是转换后的Base64编码，其前两位均为0。
转换后，我们用一个码表来得到我们想要的字符串（也就是最终的Base64编码），这个表是这样的：（摘自RFC2045）
Table 1: The Base64 Alphabet
Value Encoding Value Encoding Value Encoding Value Encoding
0 A 17 R 34 i 51 z
1 B 18 S 35 j 52 0
2 C 19 T 36 k 53 1
3 D 20 U 37 l 54 2
4 E 21 V 38 m 55 3
5 F 22 W 39 n 56 4
6 G 23 X 40 o 57 5
7 H 24 Y 41 p 58 6
8 I 25 Z 42 q 59 7
9 J 26 a 43 r 60 8
10 K 27 b 44 s 61 9
11 L 28 c 45 t 62 +
12 M 29 d 46 u 63 /
13 N 30 e 47 v
14 O 31 f 48 w (pad) =
15 P 32 g 49 x
16 Q 33 h 50 y
让我们再来看一个实际的例子，加深印象！
转换前 10101101 10111010 01110110
转换后 00101011 00011011 00101001 00110110
十进制 43 27 41 54
对应码表中的值 r b p 2
所以上面的24位编码，编码后的Base64值为 rbp2
解码同理，把 rbq2 的二进制位连接上再重组得到三个8位值，得出原码。
（解码只是编码的逆过程，在此我就不多说了，另外有关MIME的RFC还是有很多的，如果需要详细情况请自行查找。）
用更接近于编程的思维来说，编码的过程是这样的：
第一个字符通过右移2位获得第一个目标字符的Base64表位置，根据这个数值取到表上相应的字符，就是第一个目标字符。
然后将第一个字符左移4位加上第二个字符右移4位，即获得第二个目标字符。
再将第二个字符左移2位加上第三个字符右移6位，获得第三个目标字符。
最后取第三个字符的右6位即获得第四个目标字符。
在以上的每一个步骤之后，再把结果与 0x3F 进行 AND 位操作，就可以得到编码后的字符了。
可是等等……聪明的你可能会问到，原文的字节数量应该是3的倍数啊，如果这个条件不能满足的话，那该怎么办呢？
我们的解决办法是这样的：原文的字节不够的地方可以用全0来补足，转换时Base64编码用=号来代替。这就是为什么有些Base64编码会以一个或两个等号结束的原因，但等号最多只有两个。因为：
余数 = 原文字节数 MOD 3
所以余数任何情况下都只可能是0，1，2这三个数中的一个。如果余数是0的话，就表示原文字节数正好是3的倍数（最理想的情况啦）。如果是1的话，为了让Base64编码是4的倍数，就要补2个等号；同理，如果是2的话，就要补1个等号。
在线转换:http://md5.mmkey.com/base64/
一个很方便的转换工具：http://www.skycn.com/soft/47792.html
BASE64编码基于十进制的实现方法
BASE64编码基于十进制的实现方法
一、BASE64编码的原理 BASE64编码 的原理很简单，其方法是，将输入数据流每次取6 bit（每bit代表1位二进制），不足6bit的补0，这样，每3个8位字节将编码为4个6位字节（3×8 → 4×6）；不满4个字节的以“=”填充。其实这4个六位字节 仍然是8位，只不过高两位被设置为0。当一个字节只有6位有效时，它的取值空间为0 到 2的6次方减1 即63，也就是说被转换的Base64编码的每一个编码的取值空间为（0~63）。事实上，0~63之间的ASCII码有许多不可见字符，所以应该再做一个映射，映射表（码表）为
这样就可以将3个8位字节，转换为4个可见字符。 也就是说，转换后的字符串要比原来的长1/3，扩张率为3:4。 举例说明： 1、当字符串字符个数为3的倍数时；比如字符串“ABC”，其在计算机内存中的十六进制表示为$41、$42、$43，十进制表示为“65”“66”“67”；二进制表示为01000001 01000010 01000011 将这三个二进制数依次取6bit， 010000/01 0100/0010 01/000011 就转换成了： 010000 010100 001001 000011 将这四个二进制数转换成十六制数为：$10，$14，$9，$3，十进制数位为16，20，9，3。对照上面的码表，分别查找出对应的字符为Q，U，J，D。也是就说字符串“ABC”经过BASE64编码后得出“QUJD”。 这是最简单的情况，即ASCII码字符数刚好可以被3整除。接着继续讨论余数为2、为1的情况。 2、当余数为2时，比如字符串“ce”，其在内存中十六进制表示为$63，$65；十进制表示表示99，101；二进制表示为 01100011 01100101 依次取6bit 011000/11 0110/0101 这时，第3个字符不足6位，在后面补零，也就是0101变成010100。转换结果为 011000 110110 010100 这3个二进制数转换成十六制数为$18，$36，$14；十进制数位为24，54，20。对照码表得出结果“Y2U”。编码后的字符个数不足4位，用“＝”填充，最后编码得出“Y2U=”。 3、当余数为1时，比如字符串“{”，其在内存中的十六进制表示为$7B，十进制为123，二进制位表示为 01111011 依次取6bit 011110/11 补0后为 011110/110000 转换结果为011110和110000 这两个二进制数转换成十六进制数为$1E，$30，十进制数为30，48。对照码表得出结果为“ew”，补上“＝”，最后编码得出“ew= =”。 解码也很简单，是编码的逆过程，即将每个字符对照码表换算成6bit的二进制数，然后重组起来，按8位进行截取，得出原码。
二、BASE64编码的实现方法 BASE64编码的实现方法很多，但大多基于二进制数的移位、与或操作，不便于理解。为此，本人经过摸索，想出了一种基于十进制下的易于掌握的编码方法。根据上述原理，每3个字节将转换成４个字节，也就是说每一个半字节（12bit）正好转换成2个编码后的字符（２×6bit）。在十六进制下半个字节可用0~F表示。为此，依次取字符串在十六进制表示下的三位，通过整除和取余运算很容易得出编码后的2个字符。 比如字符串ABC，其十六进制在内存中表示$414243，依次取3位，得出结果为$414和$243，转换成十进制为1044和579。将这两个数分别与64进行整除和取余运算 1044 Div 64=16 1044 Mod 64=20 579 Div 64=9 579 Mod 64=3 得出结果为16，20，9，3。对照上面的码表，编码结果同样为“QUJD”。 在高级语言中，很容易将字符串的十六进制以字符串形式表达出来，然后通过依次截取3个字符转换成整数，最后进行上述运算得出结果。为此，本人编写了一套BASE64编码在Delphi语言中的实现源码：
//定义码表constBaseTable:string='ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789+/';
//编码程序Function StrtoBase64(const test:string):string;vars,s1:string;i,p,len,n,Addnum:integer;begin result:=''; S := ''; for i := 1 to length(test) do S := S + IntToHex(Ord(test), 2); //将字符串的十六进制数以字符串的形式表示出来 case (length(s) mod 3) of 0:addnum:=0; 1:begin s:=s+'00'; addnum:=2; end; 2:begin s:=s+'0'; addnum:=1; end; end; len:=length(s) div 3; for i:=1 to len do begin s1:=midstr(S,i*3-2,3); p:=strtoint('$'+s1); n:=p div 64; result:=result+basetable[n+1]; n:=p mod 64; result:=result+basetable[n+1]; end; if addnum=1 then result:=result+'=='; if addnum=2 then result[length(result)]:='=';end;
//解码程序Function Base64toStr(const test:string):string;vars,s1,m:string;i,len,t:integer;begin Result:=''; if length(test)=0 then exit; s:=test; for i:=0 to 1 do if s[length(s)]='=' then setlength(s,length(s)-1); len:=length(s) div 2; for i:=1 to len do begin s1:=midstr(s,i*2-1,2); t:=(Pos(s1[1],BaseTable)-1)*64+(Pos(s1[2],BaseTable)-1); m:=m+inttohex(t,3) end; if length(s) mod 2=1 then begin t:=(Pos(s[length(s)],BaseTable)-1)*64; m:=m+inttohex(t,3); setlength(m,length(m)-2); end; len:=length(m) div 2; for i:=1 to len do begin s:=midstr(m,i*2-1,2); result:=result+chr(strtoint('$'+s)); end;end;
