ref: 1bb60e045eb1e64864dfc16e4356f134353bc331
dir: /libc/adler32.c/
long adler32(char *data) { const int prime = 65521; int i = 0; int a = 0, b = 1; while (i < strlen(data)) { b += data[i]; a += b; i++; } b = b % prime; a = a % prime; return(b << 16 | a); }