#define NULL ((void *)0)
typedef unsigned long size_t; // Customize by platform.
typedef long intptr_t;
typedef unsigned long uintptr_t;
typedef long scalar_t__; // Either arithmetic or pointer type.
/* By default, we understand bool (as a convenience). */
typedef int bool;
#define false 0
#define true 1

/* Forward declarations */

/* Type definitions */
typedef int /*<<< orphan*/ const_DES_cblock;
typedef unsigned char DES_key_schedule;
typedef unsigned char *DES_cblock;

/* Variables and functions */
int /*<<< orphan*/ DES_ENCRYPT;
int /*<<< orphan*/ DES_ecb_encrypt(int /*<<< orphan*/ *, void *,
                                   unsigned char *, int /*<<< orphan*/);
int /*<<< orphan*/ DES_set_key(unsigned char **, unsigned char *);
int /*<<< orphan*/ DES_set_odd_parity(unsigned char **);
int /*<<< orphan*/ memcpy(unsigned char *, void const *, size_t);
int /*<<< orphan*/ memset(unsigned char *, int /*<<< orphan*/, int);
size_t strlen(void const *);
void lm_deshash(void *result, const_DES_cblock *iv, const void *secret) {
  DES_cblock key;
  DES_key_schedule ks;
  unsigned char key_56[8];
  size_t len;
  len = strlen(secret);
  if (len > sizeof key_56)
    len = sizeof key_56;
  memcpy(key_56, secret, len);
  if (sizeof key_56 - len > 0)
    memset(key_56 + len, 0, sizeof key_56 - len);
  key[0] = key_56[0];
  key[1] = (key_56[0] << 7) | (key_56[1] >> 1);
  key[2] = (key_56[1] << 6) | (key_56[2] >> 2);
  key[3] = (key_56[2] << 5) | (key_56[3] >> 3);
  key[4] = (key_56[3] << 4) | (key_56[4] >> 4);
  key[5] = (key_56[4] << 3) | (key_56[5] >> 5);
  key[6] = (key_56[5] << 2) | (key_56[6] >> 6);
  key[7] = (key_56[6] << 1);
  DES_set_odd_parity(&key);
  DES_set_key(&key, &ks);
  DES_ecb_encrypt(iv, result, &ks, DES_ENCRYPT);
  memset(key, 0, sizeof key);
  memset(&ks, 0, sizeof ks);
}


x86 assembly (clang, -O0):
<lm_deshash>:
push   %rbp
mov    %rsp,%rbp
sub    $0x40,%rsp
mov    %rdi,-0x8(%rbp)
mov    %rsi,-0x10(%rbp)
mov    %rdx,-0x18(%rbp)
mov    -0x18(%rbp),%rdi
call   1030 <strlen@plt>
mov    %rax,-0x38(%rbp)
cmpq   $0x8,-0x38(%rbp)
jbe    1194 <lm_deshash+0x34>
movq   $0x8,-0x38(%rbp)
lea    -0x29(%rbp),%rdi
mov    -0x18(%rbp),%rsi
mov    -0x38(%rbp),%rdx
call   1060 <memcpy@plt>
mov    $0x8,%eax
sub    -0x38(%rbp),%rax
cmp    $0x0,%rax
jbe    11d2 <lm_deshash+0x72>
lea    -0x29(%rbp),%rdi
add    -0x38(%rbp),%rdi
mov    $0x8,%eax
sub    -0x38(%rbp),%rax
mov    %eax,%edx
xor    %esi,%esi
call   1040 <memset@plt>
mov    -0x29(%rbp),%cl
mov    -0x20(%rbp),%rax
mov    %cl,(%rax)
movzbl -0x29(%rbp),%eax
shl    $0x7,%eax
movzbl -0x28(%rbp),%ecx
sar    $0x1,%ecx
or     %ecx,%eax
mov    %al,%cl
mov    -0x20(%rbp),%rax
mov    %cl,0x1(%rax)
movzbl -0x28(%rbp),%eax
shl    $0x6,%eax
movzbl -0x27(%rbp),%ecx
sar    $0x2,%ecx
or     %ecx,%eax
mov    %al,%cl
mov    -0x20(%rbp),%rax
mov    %cl,0x2(%rax)
movzbl -0x27(%rbp),%eax
shl    $0x5,%eax
movzbl -0x26(%rbp),%ecx
sar    $0x3,%ecx
or     %ecx,%eax
mov    %al,%cl
mov    -0x20(%rbp),%rax
mov    %cl,0x3(%rax)
movzbl -0x26(%rbp),%eax
shl    $0x4,%eax
movzbl -0x25(%rbp),%ecx
sar    $0x4,%ecx
or     %ecx,%eax
mov    %al,%cl
mov    -0x20(%rbp),%rax
mov    %cl,0x4(%rax)
movzbl -0x25(%rbp),%eax
shl    $0x3,%eax
movzbl -0x24(%rbp),%ecx
sar    $0x5,%ecx
or     %ecx,%eax
mov    %al,%cl
mov    -0x20(%rbp),%rax
mov    %cl,0x5(%rax)
movzbl -0x24(%rbp),%eax
shl    $0x2,%eax
movzbl -0x23(%rbp),%ecx
sar    $0x6,%ecx
or     %ecx,%eax
mov    %al,%cl
mov    -0x20(%rbp),%rax
mov    %cl,0x6(%rax)
movzbl -0x23(%rbp),%eax
shl    $0x1,%eax
mov    %al,%cl
mov    -0x20(%rbp),%rax
mov    %cl,0x7(%rax)
lea    -0x20(%rbp),%rdi
call   1080 <DES_set_odd_parity@plt>
lea    -0x20(%rbp),%rdi
lea    -0x21(%rbp),%rsi
call   1070 <DES_set_key@plt>
mov    -0x10(%rbp),%rdi
mov    -0x8(%rbp),%rsi
mov    0x2d3a(%rip),%rax
mov    (%rax),%ecx
lea    -0x21(%rbp),%rdx
call   1050 <DES_ecb_encrypt@plt>
mov    -0x20(%rbp),%rdi
xor    %esi,%esi
mov    $0x8,%edx
call   1040 <memset@plt>
lea    -0x21(%rbp),%rdi
xor    %esi,%esi
mov    $0x1,%edx
call   1040 <memset@plt>
add    $0x40,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<lm_deshash>:
push   %r14
push   %rbx
push   %rax
mov    %rdx,%r14
mov    %rdx,%rdi
call   1030 <strlen@plt>
cmp    $0x8,%rax
mov    $0x8,%ebx
cmovb  %rax,%rbx
mov    %rsp,%rdi
mov    %r14,%rsi
mov    %rbx,%rdx
call   1050 <memcpy@plt>
lea    (%rsp,%rbx,1),%rdi
mov    $0x8,%edx
sub    %ebx,%edx
xor    %esi,%esi
call   1040 <memset@plt>

LLVM IR (-O0):
@DES_ENCRYPT = global i32 0
define void @lm_deshash(i8* %0, i32* %1, i8* %2) {
%4 = alloca i8*
%5 = alloca i32*
%6 = alloca i8*
%7 = alloca i8*
%8 = alloca i8
%9 = alloca [8 x i8]
%10 = alloca i64
store i8* %0, i8** %4
store i32* %1, i32** %5
store i8* %2, i8** %6
%11 = load i8*, i8** %6
%12 = call i64 @strlen(i8* %11)
store i64 %12, i64* %10
%13 = load i64, i64* %10
%14 = icmp ugt i64 %13, 8
br i1 %14, label %15, label %16
15: ; preds = %3
store i64 8, i64* %10
br label %16
16: ; preds = %15, %3
%17 = getelementptr inbounds [8 x i8], [8 x i8]* %9, i64 0, i64 0
%18 = load i8*, i8** %6
%19 = load i64, i64* %10
%20 = call i32 @memcpy(i8* %17, i8* %18, i64 %19)
%21 = load i64, i64* %10
%22 = sub i64 8, %21
%23 = icmp ugt i64 %22, 0
br i1 %23, label %24, label %32
24: ; preds = %16
%25 = getelementptr inbounds [8 x i8], [8 x i8]* %9, i64 0, i64 0
%26 = load i64, i64* %10
%27 = getelementptr inbounds i8, i8* %25, i64 %26
%28 = load i64, i64* %10
%29 = sub i64 8, %28
%30 = trunc i64 %29 to i32
%31 = call i32 @memset(i8* %27, i32 0, i32 %30)
br label %32
32: ; preds = %24, %16
%33 = getelementptr inbounds [8 x i8], [8 x i8]* %9, i64 0, i64 0
%34 = load i8, i8* %33
%35 = load i8*, i8** %7
%36 = getelementptr inbounds i8, i8* %35, i64 0
store i8 %34, i8* %36
%37 = getelementptr inbounds [8 x i8], [8 x i8]* %9, i64 0, i64 0
%38 = load i8, i8* %37
%39 = zext i8 %38 to i32
%40 = shl i32 %39, 7
%41 = getelementptr inbounds [8 x i8], [8 x i8]* %9, i64 0, i64 1
%42 = load i8, i8* %41
%43 = zext i8 %42 to i32
%44 = ashr i32 %43, 1
%45 = or i32 %40, %44
%46 = trunc i32 %45 to i8
%47 = load i8*, i8** %7
%48 = getelementptr inbounds i8, i8* %47, i64 1
store i8 %46, i8* %48
%49 = getelementptr inbounds [8 x i8], [8 x i8]* %9, i64 0, i64 1
%50 = load i8, i8* %49
%51 = zext i8 %50 to i32
%52 = shl i32 %51, 6
%53 = getelementptr inbounds [8 x i8], [8 x i8]* %9, i64 0, i64 2
%54 = load i8, i8* %53
%55 = zext i8 %54 to i32
%56 = ashr i32 %55, 2
%57 = or i32 %52, %56
%58 = trunc i32 %57 to i8
%59 = load i8*, i8** %7
%60 = getelementptr inbounds i8, i8* %59, i64 2
store i8 %58, i8* %60
%61 = getelementptr inbounds [8 x i8], [8 x i8]* %9, i64 0, i64 2
%62 = load i8, i8* %61
%63 = zext i8 %62 to i32
%64 = shl i32 %63, 5
%65 = getelementptr inbounds [8 x i8], [8 x i8]* %9, i64 0, i64 3
%66 = load i8, i8* %65
%67 = zext i8 %66 to i32
%68 = ashr i32 %67, 3
%69 = or i32 %64, %68
%70 = trunc i32 %69 to i8
%71 = load i8*, i8** %7
%72 = getelementptr inbounds i8, i8* %71, i64 3
store i8 %70, i8* %72
%73 = getelementptr inbounds [8 x i8], [8 x i8]* %9, i64 0, i64 3
%74 = load i8, i8* %73
%75 = zext i8 %74 to i32
%76 = shl i32 %75, 4
%77 = getelementptr inbounds [8 x i8], [8 x i8]* %9, i64 0, i64 4
%78 = load i8, i8* %77
%79 = zext i8 %78 to i32
%80 = ashr i32 %79, 4
%81 = or i32 %76, %80
%82 = trunc i32 %81 to i8
%83 = load i8*, i8** %7
%84 = getelementptr inbounds i8, i8* %83, i64 4
store i8 %82, i8* %84
%85 = getelementptr inbounds [8 x i8], [8 x i8]* %9, i64 0, i64 4
%86 = load i8, i8* %85
%87 = zext i8 %86 to i32
%88 = shl i32 %87, 3
%89 = getelementptr inbounds [8 x i8], [8 x i8]* %9, i64 0, i64 5
%90 = load i8, i8* %89
%91 = zext i8 %90 to i32
%92 = ashr i32 %91, 5
%93 = or i32 %88, %92
%94 = trunc i32 %93 to i8
%95 = load i8*, i8** %7
%96 = getelementptr inbounds i8, i8* %95, i64 5
store i8 %94, i8* %96
%97 = getelementptr inbounds [8 x i8], [8 x i8]* %9, i64 0, i64 5
%98 = load i8, i8* %97
%99 = zext i8 %98 to i32
%100 = shl i32 %99, 2
%101 = getelementptr inbounds [8 x i8], [8 x i8]* %9, i64 0, i64 6
%102 = load i8, i8* %101
%103 = zext i8 %102 to i32
%104 = ashr i32 %103, 6
%105 = or i32 %100, %104
%106 = trunc i32 %105 to i8
%107 = load i8*, i8** %7
%108 = getelementptr inbounds i8, i8* %107, i64 6
store i8 %106, i8* %108
%109 = getelementptr inbounds [8 x i8], [8 x i8]* %9, i64 0, i64 6
%110 = load i8, i8* %109
%111 = zext i8 %110 to i32
%112 = shl i32 %111, 1
%113 = trunc i32 %112 to i8
%114 = load i8*, i8** %7
%115 = getelementptr inbounds i8, i8* %114, i64 7
store i8 %113, i8* %115
%116 = call i32 @DES_set_odd_parity(i8** %7)
%117 = call i32 @DES_set_key(i8** %7, i8* %8)
%118 = load i32*, i32** %5
%119 = load i8*, i8** %4
%120 = load i32, i32* @DES_ENCRYPT
%121 = call i32 @DES_ecb_encrypt(i32* %118, i8* %119, i8* %8, i32 %120)
%122 = load i8*, i8** %7
%123 = call i32 @memset(i8* %122, i32 0, i32 8)
%124 = call i32 @memset(i8* %8, i32 0, i32 1)
ret void
}

LLVM IR (-O2):
@DES_ENCRYPT = global i32 0
define void @lm_deshash(i8* %0, i32* %1, i8* %2) {
%4 = alloca [8 x i8]
%5 = getelementptr inbounds [8 x i8], [8 x i8]* %4, i64 0, i64 0
%6 = tail call i64 @strlen(i8* dereferenceable(1) %2)
%7 = icmp ult i64 %6, 8
%8 = select i1 %7, i64 %6, i64 8
%9 = call i32 @memcpy(i8* %5, i8* %2, i64 %8)
%10 = icmp ult i64 %6, 8
%11 = getelementptr inbounds [8 x i8], [8 x i8]* %4, i64 0, i64 %8
%12 = trunc i64 %8 to i32
%13 = sub nuw nsw i32 8, %12
%14 = call i32 @memset(i8* %11, i32 0, i32 %13)
unreachable
}