license header consistency cosmetics
[ffmpeg.git] / libavutil / sha1.c
1 /*
2  * Copyright (C) 2007 Michael Niedermayer <michaelni@gmx.at>
3  * based on public domain SHA-1 code by Steve Reid <steve@edmweb.com>
4  *
5  * This file is part of FFmpeg.
6  *
7  * FFmpeg is free software; you can redistribute it and/or
8  * modify it under the terms of the GNU Lesser General Public
9  * License as published by the Free Software Foundation; either
10  * version 2.1 of the License, or (at your option) any later version.
11  *
12  * FFmpeg is distributed in the hope that it will be useful,
13  * but WITHOUT ANY WARRANTY; without even the implied warranty of
14  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
15  * Lesser General Public License for more details.
16  *
17  * You should have received a copy of the GNU Lesser General Public
18  * License along with FFmpeg; if not, write to the Free Software
19  * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
20  */
21
22 #include "common.h"
23 #include "bswap.h"
24 #include "sha1.h"
25
26 typedef struct AVSHA1 {
27     uint64_t count;
28     uint8_t buffer[64];
29     uint32_t state[5];
30 } AVSHA1;
31
32 #define rol(value, bits) (((value) << (bits)) | ((value) >> (32 - (bits))))
33
34 /* (R0+R1), R2, R3, R4 are the different operations used in SHA1 */
35 #define blk0(i) (block[i] = be2me_32(((uint32_t*)buffer)[i]))
36 #define blk(i) (block[i] = rol(block[i-3]^block[i-8]^block[i-14]^block[i-16],1))
37
38 #define R0(v,w,x,y,z,i) z+=((w&(x^y))^y)    +blk0(i)+0x5A827999+rol(v,5);w=rol(w,30);
39 #define R1(v,w,x,y,z,i) z+=((w&(x^y))^y)    +blk (i)+0x5A827999+rol(v,5);w=rol(w,30);
40 #define R2(v,w,x,y,z,i) z+=( w^x     ^y)    +blk (i)+0x6ED9EBA1+rol(v,5);w=rol(w,30);
41 #define R3(v,w,x,y,z,i) z+=(((w|x)&y)|(w&x))+blk (i)+0x8F1BBCDC+rol(v,5);w=rol(w,30);
42 #define R4(v,w,x,y,z,i) z+=( w^x     ^y)    +blk (i)+0xCA62C1D6+rol(v,5);w=rol(w,30);
43
44 /* Hash a single 512-bit block. This is the core of the algorithm. */
45
46 static void transform(uint32_t state[5], uint8_t buffer[64]){
47     uint32_t block[80];
48     unsigned int i, a, b, c, d, e;
49
50     a = state[0];
51     b = state[1];
52     c = state[2];
53     d = state[3];
54     e = state[4];
55 #ifdef CONFIG_SMALL
56     for(i=0; i<80; i++){
57         int t;
58         if(i<16) t= be2me_32(((uint32_t*)buffer)[i]);
59         else     t= rol(block[i-3]^block[i-8]^block[i-14]^block[i-16],1);
60         block[i]= t;
61         t+= e+rol(a,5);
62         if(i<40){
63             if(i<20)    t+= ((b&(c^d))^d)    +0x5A827999;
64             else        t+= ( b^c     ^d)    +0x6ED9EBA1;
65         }else{
66             if(i<60)    t+= (((b|c)&d)|(b&c))+0x8F1BBCDC;
67             else        t+= ( b^c     ^d)    +0xCA62C1D6;
68         }
69         e= d;
70         d= c;
71         c= rol(b,30);
72         b= a;
73         a= t;
74     }
75 #else
76     for(i=0; i<15; i+=5){
77         R0(a,b,c,d,e,0+i); R0(e,a,b,c,d,1+i); R0(d,e,a,b,c,2+i); R0(c,d,e,a,b,3+i); R0(b,c,d,e,a,4+i);
78     }
79     R0(a,b,c,d,e,15); R1(e,a,b,c,d,16); R1(d,e,a,b,c,17); R1(c,d,e,a,b,18); R1(b,c,d,e,a,19);
80     for(i=20; i<40; i+=5){
81         R2(a,b,c,d,e,0+i); R2(e,a,b,c,d,1+i); R2(d,e,a,b,c,2+i); R2(c,d,e,a,b,3+i); R2(b,c,d,e,a,4+i);
82     }
83     for(; i<60; i+=5){
84         R3(a,b,c,d,e,0+i); R3(e,a,b,c,d,1+i); R3(d,e,a,b,c,2+i); R3(c,d,e,a,b,3+i); R3(b,c,d,e,a,4+i);
85     }
86     for(; i<80; i+=5){
87         R4(a,b,c,d,e,0+i); R4(e,a,b,c,d,1+i); R4(d,e,a,b,c,2+i); R4(c,d,e,a,b,3+i); R4(b,c,d,e,a,4+i);
88     }
89 #endif
90     state[0] += a;
91     state[1] += b;
92     state[2] += c;
93     state[3] += d;
94     state[4] += e;
95 }
96
97 void av_sha1_init(AVSHA1* ctx){
98     ctx->state[0] = 0x67452301;
99     ctx->state[1] = 0xEFCDAB89;
100     ctx->state[2] = 0x98BADCFE;
101     ctx->state[3] = 0x10325476;
102     ctx->state[4] = 0xC3D2E1F0;
103     ctx->count    = 0;
104 }
105
106 void av_sha1_update(AVSHA1* ctx, uint8_t* data, unsigned int len){
107     unsigned int i, j;
108
109     j = ctx->count & 63;
110     ctx->count += len;
111 #ifdef CONFIG_SMALL
112     for( i = 0; i < len; i++ ){
113         ctx->buffer[ j++ ] = data[i];
114         if( 64 == j ){
115             transform(ctx->state, ctx->buffer);
116             j = 0;
117         }
118     }
119 #else
120     if ((j + len) > 63) {
121         memcpy(&ctx->buffer[j], data, (i = 64-j));
122         transform(ctx->state, ctx->buffer);
123         for ( ; i + 63 < len; i += 64) {
124             transform(ctx->state, &data[i]);
125         }
126         j=0;
127     }
128     else i = 0;
129     memcpy(&ctx->buffer[j], &data[i], len - i);
130 #endif
131 }
132
133 void av_sha1_final(AVSHA1* ctx, uint8_t digest[20]){
134     int i;
135     uint64_t finalcount= be2me_64(ctx->count<<3);
136
137     av_sha1_update(ctx, "\200", 1);
138     while ((ctx->count & 63) != 56) {
139         av_sha1_update(ctx, "", 1);
140     }
141     av_sha1_update(ctx, &finalcount, 8);  /* Should cause a transform() */
142     for(i=0; i<5; i++)
143         ((uint32_t*)digest)[i]= be2me_32(ctx->state[i]);
144 }
145
146 // use the following to test
147 // gcc -DTEST -DHAVE_AV_CONFIG_H -I.. sha1.c -O2 -W -Wall -o sha1 && time ./sha1
148 #ifdef TEST
149 #include <stdio.h>
150 #undef printf
151
152 int main(){
153     int i, k;
154     AVSHA1 ctx;
155     unsigned char digest[20];
156
157     for(k=0; k<3; k++){
158         av_sha1_init(&ctx);
159         if(k==0)
160             av_sha1_update(&ctx, "abc", 3);
161         else if(k==1)
162             av_sha1_update(&ctx, "abcdbcdecdefdefgefghfghighijhijkijkljklmklmnlmnomnopnopq", 56);
163         else
164             for(i=0; i<1000*1000; i++)
165                 av_sha1_update(&ctx, "a", 1);
166         av_sha1_final(&ctx, digest);
167         for (i = 0; i < 20; i++)
168             printf("%02X", digest[i]);
169         putchar('\n');
170     }
171     //Test Vectors (from FIPS PUB 180-1)
172     printf("A9993E36 4706816A BA3E2571 7850C26C 9CD0D89D\n"
173            "84983E44 1C3BD26E BAAE4AA1 F95129E5 E54670F1\n"
174            "34AA973C D4C4DAA4 F61EEB2B DBAD2731 6534016F\n");
175
176     return 0;
177 }
178 #endif