awk编写的base64编码程序

awk < $1 '
BEGIN{
lineChars=72
totalChars=0
ch64="ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789+/";
rest=""
}
function base64_asc(char)
{
        l_found=-1;
        for (i=1;i<=255;i++){
        if (sprintf("%c",i)==char) {l_found=i;break;}
        }
        #maybe the char is '\0':
        if(l_found==-1) l_found=0 
        return l_found;
}

function base64_and(var,x,l_res,l_i)
{
 l_res=0;
 for (l_i=0;l_i<8;l_i++){
     if (var%2==1 && x%2==1) l_res=l_res/2+128;
     else l_res/=2;
     var=int(var/2);
     x=int(x/2);
 }
 return l_res;
}