| File: | out/../deps/openssl/openssl/crypto/des/cbc_cksm.c |
| Warning: | line 49, column 5 Value stored to 'tout0' is never read |
Press '?' to see keyboard shortcuts
Keyboard shortcuts:
| 1 | /* |
| 2 | * Copyright 1995-2020 The OpenSSL Project Authors. All Rights Reserved. |
| 3 | * |
| 4 | * Licensed under the Apache License 2.0 (the "License"). You may not use |
| 5 | * this file except in compliance with the License. You can obtain a copy |
| 6 | * in the file LICENSE in the source distribution or at |
| 7 | * https://www.openssl.org/source/license.html |
| 8 | */ |
| 9 | |
| 10 | /* |
| 11 | * DES low level APIs are deprecated for public use, but still ok for internal |
| 12 | * use. |
| 13 | */ |
| 14 | #include "internal/deprecated.h" |
| 15 | |
| 16 | #include "des_local.h" |
| 17 | |
| 18 | DES_LONG DES_cbc_cksum(const unsigned char *in, DES_cblock *output, |
| 19 | long length, DES_key_schedule *schedule, |
| 20 | const_DES_cblock *ivec) |
| 21 | { |
| 22 | register DES_LONG tout0, tout1, tin0, tin1; |
| 23 | register long l = length; |
| 24 | DES_LONG tin[2]; |
| 25 | unsigned char *out = &(*output)[0]; |
| 26 | const unsigned char *iv = &(*ivec)[0]; |
| 27 | |
| 28 | c2l(iv, tout0)(tout0 =((DES_LONG)(*((iv)++))) , tout0|=((DES_LONG)(*((iv)++ )))<< 8L, tout0|=((DES_LONG)(*((iv)++)))<<16L, tout0 |=((DES_LONG)(*((iv)++)))<<24L); |
| 29 | c2l(iv, tout1)(tout1 =((DES_LONG)(*((iv)++))) , tout1|=((DES_LONG)(*((iv)++ )))<< 8L, tout1|=((DES_LONG)(*((iv)++)))<<16L, tout1 |=((DES_LONG)(*((iv)++)))<<24L); |
| 30 | for (; l > 0; l -= 8) { |
| 31 | if (l >= 8) { |
| 32 | c2l(in, tin0)(tin0 =((DES_LONG)(*((in)++))) , tin0|=((DES_LONG)(*((in)++)) )<< 8L, tin0|=((DES_LONG)(*((in)++)))<<16L, tin0|= ((DES_LONG)(*((in)++)))<<24L); |
| 33 | c2l(in, tin1)(tin1 =((DES_LONG)(*((in)++))) , tin1|=((DES_LONG)(*((in)++)) )<< 8L, tin1|=((DES_LONG)(*((in)++)))<<16L, tin1|= ((DES_LONG)(*((in)++)))<<24L); |
| 34 | } else |
| 35 | c2ln(in, tin0, tin1, l){ in+=l; tin0=tin1=0; switch (l) { case 8: tin1 =((DES_LONG)( *(--(in))))<<24L; case 7: tin1|=((DES_LONG)(*(--(in)))) <<16L; case 6: tin1|=((DES_LONG)(*(--(in))))<< 8L ; case 5: tin1|=((DES_LONG)(*(--(in)))); case 4: tin0 =((DES_LONG )(*(--(in))))<<24L; case 3: tin0|=((DES_LONG)(*(--(in)) ))<<16L; case 2: tin0|=((DES_LONG)(*(--(in))))<< 8L ; case 1: tin0|=((DES_LONG)(*(--(in)))); } }; |
| 36 | |
| 37 | tin0 ^= tout0; |
| 38 | tin[0] = tin0; |
| 39 | tin1 ^= tout1; |
| 40 | tin[1] = tin1; |
| 41 | DES_encrypt1((DES_LONG *)tin, schedule, DES_ENCRYPT1); |
| 42 | tout0 = tin[0]; |
| 43 | tout1 = tin[1]; |
| 44 | } |
| 45 | if (out != NULL((void*)0)) { |
| 46 | l2c(tout0, out)(*((out)++)=(unsigned char)(((tout0) )&0xff), *((out)++)= (unsigned char)(((tout0)>> 8L)&0xff), *((out)++)=(unsigned char)(((tout0)>>16L)&0xff), *((out)++)=(unsigned char )(((tout0)>>24L)&0xff)); |
| 47 | l2c(tout1, out)(*((out)++)=(unsigned char)(((tout1) )&0xff), *((out)++)= (unsigned char)(((tout1)>> 8L)&0xff), *((out)++)=(unsigned char)(((tout1)>>16L)&0xff), *((out)++)=(unsigned char )(((tout1)>>24L)&0xff)); |
| 48 | } |
| 49 | tout0 = tin0 = tin1 = tin[0] = tin[1] = 0; |
Value stored to 'tout0' is never read | |
| 50 | /* |
| 51 | * Transform the data in tout1 so that it will match the return value |
| 52 | * that the MIT Kerberos mit_des_cbc_cksum API returns. |
| 53 | */ |
| 54 | tout1 = ((tout1 >> 24L) & 0x000000FF) |
| 55 | | ((tout1 >> 8L) & 0x0000FF00) |
| 56 | | ((tout1 << 8L) & 0x00FF0000) |
| 57 | | ((tout1 << 24L) & 0xFF000000); |
| 58 | return tout1; |
| 59 | } |