libowfat/textcode/scan_uuencoded.c
leitner a8f6a1c121 remove special case stralloc textcode functions
write generic stralloc and array textcode wrapper functions
change textcode API to use long instead of int
add cescape fmt and scan functions to textcode
add fmt_foldwhitespace to textcode
2003-09-19 19:08:13 +00:00

24 lines
726 B
C

#include "textcode.h"
unsigned long scan_uuencoded(const char *src,char *dest,unsigned long *destlen) {
unsigned int len;
unsigned long tmp;
register const unsigned char* s=(const unsigned char*) src;
const char* orig=dest;
if ((len=*s-' ')>64) return 0; len&=63;
++s;
while (len>0) {
if (s[0]-' '>64 || s[1]-' '>64 || s[2]-' '>64 || s[3]-' '>64) return 0;
tmp=(((s[0]-' ')&077) << (3*6)) +
(((s[1]-' ')&077) << (2*6)) +
(((s[2]-' ')&077) << (1*6)) +
(((s[3]-' ')&077));
s+=4;
if (len) { *dest=tmp>>16; ++dest; --len; }
if (len) { *dest=tmp>>8; ++dest; --len; }
if (len) { *dest=tmp&0xff; ++dest; --len; }
}
*destlen=dest-orig;
return (const char*)s-src;
}