1 /*------------------------------------------------------------------------- 2 * drawElements Base Portability Library 3 * ------------------------------------- 4 * 5 * Copyright 2015 The Android Open Source Project 6 * 7 * Licensed under the Apache License, Version 2.0 (the "License"); 8 * you may not use this file except in compliance with the License. 9 * You may obtain a copy of the License at 10 * 11 * http://www.apache.org/licenses/LICENSE-2.0 12 * 13 * Unless required by applicable law or agreed to in writing, software 14 * distributed under the License is distributed on an "AS IS" BASIS, 15 * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied. 16 * See the License for the specific language governing permissions and 17 * limitations under the License. 18 * 19 *//*! 20 * \file 21 * \brief SHA1 hash functions. 22 *//*--------------------------------------------------------------------*/ 23 24 #include "deSha1.h" 25 26 #include "deMemory.h" 27 28 DE_BEGIN_EXTERN_C 29 30 enum 31 { 32 CHUNK_BIT_SIZE = 512, 33 CHUNK_BYTE_SIZE = CHUNK_BIT_SIZE / 8 34 }; 35 36 static deUint32 leftRotate (deUint32 val, deUint32 count) 37 { 38 DE_ASSERT(count < 32); 39 40 return (val << count) | (val >> (32 - count)); 41 } 42 43 void deSha1Stream_init (deSha1Stream* stream) 44 { 45 stream->size = 0; 46 47 /* Set the initial 16 deUint32s that contain real data to zeros. */ 48 deMemset(stream->data, 0, 16 * sizeof(deUint32)); 49 50 stream->hash[0] = 0x67452301u; 51 stream->hash[1] = 0xEFCDAB89u; 52 stream->hash[2] = 0x98BADCFEu; 53 stream->hash[3] = 0x10325476u; 54 stream->hash[4] = 0xC3D2E1F0u; 55 } 56 57 static void deSha1Stream_flushChunk (deSha1Stream* stream) 58 { 59 DE_ASSERT(stream->size % CHUNK_BYTE_SIZE == 0 && stream->size > 0); 60 61 { 62 size_t ndx; 63 64 /* Expand the 16 uint32s that contain the data to 80. */ 65 for (ndx = 16; ndx < DE_LENGTH_OF_ARRAY(stream->data); ndx++) 66 { 67 stream->data[ndx] = leftRotate(stream->data[ndx - 3] 68 ^ stream->data[ndx - 8] 69 ^ stream->data[ndx - 14] 70 ^ stream->data[ndx - 16], 1); 71 } 72 } 73 74 { 75 deUint32 a = stream->hash[0]; 76 deUint32 b = stream->hash[1]; 77 deUint32 c = stream->hash[2]; 78 deUint32 d = stream->hash[3]; 79 deUint32 e = stream->hash[4]; 80 size_t ndx; 81 82 for (ndx = 0; ndx < DE_LENGTH_OF_ARRAY(stream->data); ndx++) 83 { 84 deUint32 f; 85 deUint32 k; 86 87 if (ndx < 20) 88 { 89 f = (b & c) | ((~b) & d); 90 k = 0x5A827999u; 91 } 92 else if (ndx < 40) 93 { 94 f = b ^ c ^ d; 95 k = 0x6ED9EBA1u; 96 } 97 else if (ndx < 60) 98 { 99 f = (b & c) | (b & d) | (c & d); 100 k = 0x8F1BBCDCu; 101 } 102 else 103 { 104 f = b ^ c ^ d; 105 k = 0xCA62C1D6u; 106 } 107 108 { 109 const deUint32 tmp = leftRotate(a, 5) + f + e + k + stream->data[ndx]; 110 111 e = d; 112 d = c; 113 c = leftRotate(b, 30); 114 b = a; 115 a = tmp; 116 } 117 } 118 119 stream->hash[0] += a; 120 stream->hash[1] += b; 121 stream->hash[2] += c; 122 stream->hash[3] += d; 123 stream->hash[4] += e; 124 125 /* Set the initial 16 deUint32s that contain the real data to zeros. */ 126 deMemset(stream->data, 0, 16 * sizeof(deUint32)); 127 } 128 } 129 130 void deSha1Stream_process (deSha1Stream* stream, size_t size, const void* data_) 131 { 132 const deUint8* const data = (const deUint8*)data_; 133 size_t bytesProcessed = 0; 134 135 while (bytesProcessed < size) 136 { 137 do 138 { 139 const size_t bitOffset = 8 * (4 - (1 + (stream->size % 4))); 140 141 stream->data[(stream->size / 4) % 16] |= ((deUint32)data[bytesProcessed]) << (deUint32)bitOffset; 142 143 stream->size++; 144 bytesProcessed++; 145 } 146 while (stream->size % CHUNK_BYTE_SIZE != 0 && bytesProcessed < size); 147 148 if (stream->size % CHUNK_BYTE_SIZE == 0) 149 deSha1Stream_flushChunk(stream); 150 } 151 152 DE_ASSERT(bytesProcessed == size); 153 } 154 155 void deSha1Stream_finalize (deSha1Stream* stream, deSha1* hash) 156 { 157 /* \note First element is initialized to 0x80u and rest to 0x0. */ 158 static const deUint8 padding[CHUNK_BYTE_SIZE] = { 0x80u }; 159 const deUint64 length = stream->size * 8; 160 deUint8 lengthData[sizeof(deUint64)]; 161 size_t ndx; 162 163 DE_ASSERT(padding[0] == 0x80u); 164 DE_ASSERT(padding[1] == 0x0u); 165 166 for (ndx = 0; ndx < sizeof(deUint64); ndx++) 167 lengthData[ndx] = (deUint8)(0xffu & (length >> (8 * (sizeof(deUint64) - 1 - ndx)))); 168 169 { 170 const deUint64 spaceLeftInChunk = CHUNK_BYTE_SIZE - (stream->size % CHUNK_BYTE_SIZE); 171 172 if (spaceLeftInChunk >= 1 + sizeof(lengthData)) 173 deSha1Stream_process(stream, (size_t)(spaceLeftInChunk - sizeof(lengthData)), padding); 174 else 175 deSha1Stream_process(stream, (size_t)(CHUNK_BYTE_SIZE - (sizeof(lengthData)) - spaceLeftInChunk), padding); 176 } 177 178 deSha1Stream_process(stream, sizeof(lengthData), lengthData); 179 DE_ASSERT(stream->size % CHUNK_BYTE_SIZE == 0); 180 181 deMemcpy(hash->hash, stream->hash, sizeof(hash->hash)); 182 } 183 184 void deSha1_compute (deSha1* hash, size_t size, const void* data) 185 { 186 deSha1Stream stream; 187 188 deSha1Stream_init(&stream); 189 deSha1Stream_process(&stream, size, data); 190 deSha1Stream_finalize(&stream, hash); 191 } 192 193 void deSha1_render (const deSha1* hash, char* buffer) 194 { 195 size_t charNdx; 196 197 for (charNdx = 0; charNdx < 40; charNdx++) 198 { 199 const deUint32 val32 = hash->hash[charNdx / 8]; 200 const deUint8 val8 = (deUint8)(0x0fu & (val32 >> (4 * (8 - 1 - (charNdx % 8))))); 201 202 if (val8 < 10) 203 buffer[charNdx] = (char)('0' + val8); 204 else 205 buffer[charNdx] = (char)('a' + val8 - 10); 206 } 207 } 208 209 deBool deSha1_parse (deSha1* hash, const char* buffer) 210 { 211 size_t charNdx; 212 213 deMemset(hash->hash, 0, sizeof(hash->hash)); 214 215 for (charNdx = 0; charNdx < 40; charNdx++) 216 { 217 deUint8 val4; 218 219 if (buffer[charNdx] >= '0' && buffer[charNdx] <= '9') 220 val4 = (deUint8)(buffer[charNdx] - '0'); 221 else if (buffer[charNdx] >= 'a' && buffer[charNdx] <= 'f') 222 val4 = (deUint8)(10 + (buffer[charNdx] - 'a')); 223 else if (buffer[charNdx] >= 'A' && buffer[charNdx] <= 'F') 224 val4 = (deUint8)(10 + (buffer[charNdx] - 'A')); 225 else 226 return DE_FALSE; 227 228 hash->hash[charNdx / 8] |= ((deUint32)val4) << (4 * (8u - 1u - (charNdx % 8u))); 229 } 230 231 return DE_TRUE; 232 } 233 234 deBool deSha1_equal (const deSha1* a, const deSha1* b) 235 { 236 /* \note deMemcmp() can only be used for equality. It doesn't provide correct ordering between hashes. */ 237 return deMemCmp(a->hash, b->hash, sizeof(b->hash)) == 0; 238 } 239 240 void deSha1_selfTest (void) 241 { 242 const char* const validHashStrings[] = 243 { 244 "ac890cfca05717c05dc831996b2289251da2984e", 245 "0f87ba807acb3e6effe617249f30453a524a2ea3", 246 "6f483cc3fa820e58ed9f83c83bdf8d213293b3ad" 247 }; 248 249 const char* const invalidHashStrings[] = 250 { 251 " c890cfca05717c05dc831996b2289251da2984e", 252 "0f87ba807acb3e6 ffe617249f30453a524a2ea3", 253 "6f483cc3fa820e58ed9f83c83bdf8d213293b3a ", 254 255 "mc890cfca05717c05dc831996b2289251da2984e", 256 "0f87ba807acb3e6effe617249fm0453a524a2ea3", 257 "6f483cc3fa820e58ed9f83c83bdf8d213293b3an", 258 259 "ac890cfca05717c05dc83\n996b2289251da2984e", 260 "0f87ba807acb3e6effe617\t49f30453a524a2ea3", 261 "ac890cfca05717c05dc831\096b2289251da2984e", 262 "6f483cc3fa{20e58ed9f83c83bdf8d213293b3ad" 263 }; 264 265 const struct 266 { 267 const char* const hash; 268 const char* const data; 269 } stringHashPairs[] = 270 { 271 /* Generated using sha1sum. */ 272 { "da39a3ee5e6b4b0d3255bfef95601890afd80709", "" }, 273 { "aaf4c61ddcc5e8a2dabede0f3b482cd9aea9434d", "hello" }, 274 { "ec1919e856540f42bd0e6f6c1ffe2fbd73419975", 275 "Cherry is a browser-based GUI for controlling deqp test runs and analysing the test results." 276 } 277 }; 278 279 const int garbage = 0xde; 280 281 /* Test parsing valid sha1 strings. */ 282 { 283 size_t stringNdx; 284 285 for (stringNdx = 0; stringNdx < DE_LENGTH_OF_ARRAY(validHashStrings); stringNdx++) 286 { 287 deSha1 hash; 288 deMemset(&hash, garbage, sizeof(deSha1)); 289 DE_TEST_ASSERT(deSha1_parse(&hash, validHashStrings[stringNdx])); 290 } 291 } 292 293 /* Test parsing invalid sha1 strings. */ 294 { 295 size_t stringNdx; 296 297 for (stringNdx = 0; stringNdx < DE_LENGTH_OF_ARRAY(invalidHashStrings); stringNdx++) 298 { 299 deSha1 hash; 300 deMemset(&hash, garbage, sizeof(deSha1)); 301 DE_TEST_ASSERT(!deSha1_parse(&hash, invalidHashStrings[stringNdx])); 302 } 303 } 304 305 /* Compare valid hash strings for equality. */ 306 { 307 size_t stringNdx; 308 309 for (stringNdx = 0; stringNdx < DE_LENGTH_OF_ARRAY(validHashStrings); stringNdx++) 310 { 311 deSha1 hashA; 312 deSha1 hashB; 313 314 deMemset(&hashA, garbage, sizeof(deSha1)); 315 deMemset(&hashB, garbage, sizeof(deSha1)); 316 317 DE_TEST_ASSERT(deSha1_parse(&hashA, validHashStrings[stringNdx])); 318 DE_TEST_ASSERT(deSha1_parse(&hashB, validHashStrings[stringNdx])); 319 320 DE_TEST_ASSERT(deSha1_equal(&hashA, &hashA)); 321 DE_TEST_ASSERT(deSha1_equal(&hashA, &hashB)); 322 DE_TEST_ASSERT(deSha1_equal(&hashB, &hashA)); 323 } 324 } 325 326 /* Compare valid different hash strings for equality. */ 327 { 328 size_t stringANdx; 329 size_t stringBNdx; 330 331 for (stringANdx = 0; stringANdx < DE_LENGTH_OF_ARRAY(validHashStrings); stringANdx++) 332 for (stringBNdx = 0; stringBNdx < DE_LENGTH_OF_ARRAY(validHashStrings); stringBNdx++) 333 { 334 deSha1 hashA; 335 deSha1 hashB; 336 337 if (stringANdx == stringBNdx) 338 continue; 339 340 deMemset(&hashA, garbage, sizeof(deSha1)); 341 deMemset(&hashB, garbage, sizeof(deSha1)); 342 343 DE_TEST_ASSERT(deSha1_parse(&hashA, validHashStrings[stringANdx])); 344 DE_TEST_ASSERT(deSha1_parse(&hashB, validHashStrings[stringBNdx])); 345 346 DE_TEST_ASSERT(!deSha1_equal(&hashA, &hashB)); 347 DE_TEST_ASSERT(!deSha1_equal(&hashB, &hashA)); 348 } 349 } 350 351 /* Test rendering hash as string. */ 352 { 353 size_t stringNdx; 354 355 for (stringNdx = 0; stringNdx < DE_LENGTH_OF_ARRAY(validHashStrings); stringNdx++) 356 { 357 char result[40]; 358 deSha1 hash; 359 360 deMemset(&hash, garbage, sizeof(hash)); 361 deMemset(&result, garbage, sizeof(result)); 362 363 DE_TEST_ASSERT(deSha1_parse(&hash, validHashStrings[stringNdx])); 364 deSha1_render(&hash, result); 365 366 DE_TEST_ASSERT(strncmp(result, validHashStrings[stringNdx], 40) == 0); 367 } 368 } 369 370 /* Test hash against few pre-computed cases. */ 371 { 372 size_t ndx; 373 374 for (ndx = 0; ndx < DE_LENGTH_OF_ARRAY(stringHashPairs); ndx++) 375 { 376 deSha1 result; 377 deSha1 reference; 378 379 deSha1_compute(&result, strlen(stringHashPairs[ndx].data), stringHashPairs[ndx].data); 380 DE_TEST_ASSERT(deSha1_parse(&reference, stringHashPairs[ndx].hash)); 381 382 DE_TEST_ASSERT(deSha1_equal(&reference, &result)); 383 } 384 } 385 386 /* Test hash stream against few pre-computed cases. */ 387 { 388 size_t ndx; 389 390 for (ndx = 0; ndx < DE_LENGTH_OF_ARRAY(stringHashPairs); ndx++) 391 { 392 const char* const data = stringHashPairs[ndx].data; 393 const size_t size = strlen(data); 394 395 deSha1Stream stream; 396 deSha1 result; 397 deSha1 reference; 398 399 deSha1Stream_init(&stream); 400 401 deSha1Stream_process(&stream, size/2, data); 402 deSha1Stream_process(&stream, size - (size/2), data + size/2); 403 404 deSha1Stream_finalize(&stream, &result); 405 406 deSha1_compute(&result, strlen(stringHashPairs[ndx].data), stringHashPairs[ndx].data); 407 DE_TEST_ASSERT(deSha1_parse(&reference, stringHashPairs[ndx].hash)); 408 409 DE_TEST_ASSERT(deSha1_equal(&reference, &result)); 410 } 411 } 412 } 413 414 DE_END_EXTERN_C 415