adler32.c 2.48 KB
Newer Older
1 2
/*
 * Compute the Adler-32 checksum of a data stream.
3 4
 * This is a modified version based on adler32.c from the zlib library.
 *
5
 * Copyright (C) 1995 Mark Adler
6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21
 *
 * This software is provided 'as-is', without any express or implied
 * warranty.  In no event will the authors be held liable for any damages
 * arising from the use of this software.
 *
 * Permission is granted to anyone to use this software for any purpose,
 * including commercial applications, and to alter it and redistribute it
 * freely, subject to the following restrictions:
 *
 * 1. The origin of this software must not be misrepresented; you must not
 *    claim that you wrote the original software. If you use this software
 *    in a product, an acknowledgment in the product documentation would be
 *    appreciated but is not required.
 * 2. Altered source versions must be plainly marked as such, and must not be
 *    misrepresented as being the original software.
 * 3. This notice may not be removed or altered from any source distribution.
22 23
 */

24
#include "config.h"
25 26 27 28
#include "adler32.h"

#define BASE 65521L /* largest prime smaller than 65536 */

29
#define DO1(buf)  { s1 += *buf++; s2 += s1; }
Michael Niedermayer's avatar
Michael Niedermayer committed
30 31
#define DO4(buf)  DO1(buf); DO1(buf); DO1(buf); DO1(buf);
#define DO16(buf) DO4(buf); DO4(buf); DO4(buf); DO4(buf);
32

33 34
unsigned long av_adler32_update(unsigned long adler, const uint8_t * buf,
                                unsigned int len)
35 36
{
    unsigned long s1 = adler & 0xffff;
37
    unsigned long s2 = adler >> 16;
38

39
    while (len > 0) {
40
#if CONFIG_SMALL
41 42 43 44
        while (len > 4  && s2 < (1U << 31)) {
            DO4(buf);
            len -= 4;
        }
45
#else
46 47 48
        while (len > 16 && s2 < (1U << 31)) {
            DO16(buf);
            len -= 16;
49
        }
50
#endif
51
        DO1(buf); len--;
52 53 54 55 56
        s1 %= BASE;
        s2 %= BASE;
    }
    return (s2 << 16) | s1;
}
57 58

#ifdef TEST
59
#include <string.h>
60
#include "log.h"
61
#include "timer.h"
62 63
#define LEN 7001
volatile int checksum;
64 65
int main(int argc, char **argv)
{
66 67
    int i;
    char data[LEN];
68

69
    av_log_set_level(AV_LOG_DEBUG);
70 71 72

    for (i = 0; i < LEN; i++)
        data[i] = ((i * i) >> 3) + 123 * i;
73 74 75 76 77 78 79 80 81

    if (argc > 1 && !strcmp(argv[1], "-t")) {
        for (i = 0; i < 1000; i++) {
            START_TIMER;
            checksum = av_adler32_update(1, data, LEN);
            STOP_TIMER("adler");
        }
    } else {
        checksum = av_adler32_update(1, data, LEN);
82
    }
83 84

    av_log(NULL, AV_LOG_DEBUG, "%X (expected 50E6E508)\n", checksum);
85
    return checksum == 0x50e6e508 ? 0 : 1;
86 87
}
#endif