#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 */

/* Variables and functions */
int /*<<< orphan*/ dohash(unsigned char *, unsigned char *, unsigned char *,
                          unsigned int);
int /*<<< orphan*/ str_to_key(unsigned char const *, unsigned char *);
void crypt_des_ecb(unsigned char *out, const unsigned char *in,
                   const unsigned char *key, unsigned forw) {
  int i;
  unsigned char outb[64];
  unsigned char inb[64];
  unsigned char keyb[64];
  unsigned char key2[8];
  str_to_key(key, key2);
  for (i = 0; i < 64; i++) {
    inb[i] = (unsigned char)((in[i / 8] & (1 << (7 - (i % 8)))) ? 1 : 0);
    keyb[i] = (unsigned char)((key2[i / 8] & (1 << (7 - (i % 8)))) ? 1 : 0);
    outb[i] = 0;
  }
  dohash(outb, inb, keyb, forw);
  for (i = 0; i < 8; i++) {
    out[i] = 0;
  }
  for (i = 0; i < 64; i++) {
    if (outb[i])
      out[i / 8] |= (1 << (7 - (i % 8)));
  }
}


x86 assembly (clang, -O0):
<crypt_des_ecb>:
push   %rbp
mov    %rsp,%rbp
sub    $0x100,%rsp
mov    %rdi,-0x8(%rbp)
mov    %rsi,-0x10(%rbp)
mov    %rdx,-0x18(%rbp)
mov    %ecx,-0x1c(%rbp)
mov    -0x18(%rbp),%rdi
lea    -0xe8(%rbp),%rsi
call   1030 <str_to_key@plt>
movl   $0x0,-0x20(%rbp)
cmpl   $0x40,-0x20(%rbp)
jge    1233 <crypt_des_ecb+0x113>
mov    -0x10(%rbp),%rax
mov    %rax,-0xf8(%rbp)
mov    -0x20(%rbp),%eax
mov    $0x8,%ecx
cltd
idiv   %ecx
mov    %eax,%ecx
mov    -0xf8(%rbp),%rax
movslq %ecx,%rcx
movzbl (%rax,%rcx,1),%eax
mov    %eax,-0xf0(%rbp)
mov    -0x20(%rbp),%eax
mov    $0x8,%ecx
cltd
idiv   %ecx
mov    %edx,%eax
mov    -0xf0(%rbp),%edx
mov    $0x7,%ecx
sub    %eax,%ecx
mov    $0x1,%eax
shl    %cl,%eax
and    %eax,%edx
xor    %eax,%eax
mov    $0x1,%ecx
cmp    $0x0,%edx
cmovne %ecx,%eax
mov    %al,%cl
movslq -0x20(%rbp),%rax
mov    %cl,-0xa0(%rbp,%rax,1)
mov    -0x20(%rbp),%eax
mov    $0x8,%ecx
cltd
idiv   %ecx
cltq
movzbl -0xe8(%rbp,%rax,1),%eax
ff
mov    %eax,-0xec(%rbp)
mov    -0x20(%rbp),%eax
mov    $0x8,%ecx
cltd
idiv   %ecx
mov    %edx,%eax
mov    -0xec(%rbp),%edx
mov    $0x7,%ecx
sub    %eax,%ecx
mov    $0x1,%eax
shl    %cl,%eax
and    %eax,%edx
xor    %eax,%eax
mov    $0x1,%ecx
cmp    $0x0,%edx
cmovne %ecx,%eax
mov    %al,%cl
movslq -0x20(%rbp),%rax
mov    %cl,-0xe0(%rbp,%rax,1)
movslq -0x20(%rbp),%rax
movb   $0x0,-0x60(%rbp,%rax,1)
mov    -0x20(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x20(%rbp)
jmp    1151 <crypt_des_ecb+0x31>
lea    -0x60(%rbp),%rdi
lea    -0xa0(%rbp),%rsi
lea    -0xe0(%rbp),%rdx
mov    -0x1c(%rbp),%ecx
call   1040 <dohash@plt>
movl   $0x0,-0x20(%rbp)
cmpl   $0x8,-0x20(%rbp)
jge    1278 <crypt_des_ecb+0x158>
mov    -0x8(%rbp),%rax
movslq -0x20(%rbp),%rcx
movb   $0x0,(%rax,%rcx,1)
mov    -0x20(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x20(%rbp)
jmp    1254 <crypt_des_ecb+0x134>
movl   $0x0,-0x20(%rbp)
cmpl   $0x40,-0x20(%rbp)
jge    12ef <crypt_des_ecb+0x1cf>
movslq -0x20(%rbp),%rax
cmpb   $0x0,-0x60(%rbp,%rax,1)
je     12dc <crypt_des_ecb+0x1bc>
mov    -0x20(%rbp),%eax
mov    $0x8,%ecx
cltd
idiv   %ecx
mov    $0x7,%ecx
sub    %edx,%ecx
mov    $0x1,%esi
shl    %cl,%esi
mov    -0x8(%rbp),%rax
mov    %rax,-0x100(%rbp)
mov    -0x20(%rbp),%eax
mov    $0x8,%ecx
cltd
idiv   %ecx
mov    %eax,%ecx
mov    -0x100(%rbp),%rax
movslq %ecx,%rcx
movzbl (%rax,%rcx,1),%edx
or     %esi,%edx
mov    %dl,(%rax,%rcx,1)
jmp    12e1 <crypt_des_ecb+0x1c1>
mov    -0x20(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x20(%rbp)
jmp    127f <crypt_des_ecb+0x15f>
add    $0x100,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<crypt_des_ecb>:
push   %rbp
push   %r15
push   %r14
push   %rbx
sub    $0xd8,%rsp
mov    %ecx,%r14d
mov    %rsi,%rbp
mov    %rdi,%r15
lea    0x8(%rsp),%rsi
mov    %rdx,%rdi
call   1030 <str_to_key@plt>
xorps  %xmm0,%xmm0
movaps %xmm0,0x10(%rsp)
movaps %xmm0,0x20(%rsp)
movaps %xmm0,0x30(%rsp)
movaps %xmm0,0x40(%rsp)
xor    %eax,%eax
nopl   0x0(%rax)
mov    %eax,%ecx
shr    $0x3,%ecx
movzbl 0x0(%rbp,%rcx,1),%edx
mov    %eax,%ebx
not    %bl
and    $0x7,%bl
movzbl %bl,%esi
bt     %esi,%edx
setb   0x90(%rsp,%rax,1)
movzbl 0x8(%rsp,%rcx,1),%ecx
bt     %esi,%ecx
setb   0x50(%rsp,%rax,1)
add    $0x1,%rax
cmp    $0x40,%rax
jne    1160 <crypt_des_ecb+0x40>
lea    0x10(%rsp),%rdi
lea    0x90(%rsp),%rsi
lea    0x50(%rsp),%rdx
mov    %r14d,%ecx
call   1040 <dohash@plt>
movq   $0x0,(%r15)
xor    %eax,%eax
jmp    11ca <crypt_des_ecb+0xaa>
nopl   0x0(%rax,%rax,1)
add    $0x1,%rax
cmp    $0x40,%rax
je     11e7 <crypt_des_ecb+0xc7>
cmpb   $0x0,0x10(%rsp,%rax,1)
je     11c0 <crypt_des_ecb+0xa0>
mov    %eax,%ecx
not    %cl
and    $0x7,%cl
mov    $0x1,%dl
shl    %cl,%dl
mov    %eax,%ecx
shr    $0x3,%ecx
or     %dl,(%r15,%rcx,1)
jmp    11c0 <crypt_des_ecb+0xa0>
add    $0xd8,%rsp
pop    %rbx
pop    %r14
pop    %r15
pop    %rbp
ret

LLVM IR (-O0):
define void @crypt_des_ecb(i8* %0, i8* %1, i8* %2, i32 %3) {
%5 = alloca i8*
%6 = alloca i8*
%7 = alloca i8*
%8 = alloca i32
%9 = alloca i32
%10 = alloca [64 x i8]
%11 = alloca [64 x i8]
%12 = alloca [64 x i8]
%13 = alloca [8 x i8]
store i8* %0, i8** %5
store i8* %1, i8** %6
store i8* %2, i8** %7
store i32 %3, i32* %8
%14 = load i8*, i8** %7
%15 = getelementptr inbounds [8 x i8], [8 x i8]* %13, i64 0, i64 0
%16 = call i32 @str_to_key(i8* %14, i8* %15)
store i32 0, i32* %9
br label %17
17: ; preds = %61, %4
%18 = load i32, i32* %9
%19 = icmp slt i32 %18, 64
br i1 %19, label %20, label %64
20: ; preds = %17
%21 = load i8*, i8** %6
%22 = load i32, i32* %9
%23 = sdiv i32 %22, 8
%24 = sext i32 %23 to i64
%25 = getelementptr inbounds i8, i8* %21, i64 %24
%26 = load i8, i8* %25
%27 = zext i8 %26 to i32
%28 = load i32, i32* %9
%29 = srem i32 %28, 8
%30 = sub nsw i32 7, %29
%31 = shl i32 1, %30
%32 = and i32 %27, %31
%33 = icmp ne i32 %32, 0
%34 = zext i1 %33 to i64
%35 = select i1 %33, i32 1, i32 0
%36 = trunc i32 %35 to i8
%37 = load i32, i32* %9
%38 = sext i32 %37 to i64
%39 = getelementptr inbounds [64 x i8], [64 x i8]* %11, i64 0, i64 %38
store i8 %36, i8* %39
%40 = load i32, i32* %9
%41 = sdiv i32 %40, 8
%42 = sext i32 %41 to i64
%43 = getelementptr inbounds [8 x i8], [8 x i8]* %13, i64 0, i64 %42
%44 = load i8, i8* %43
%45 = zext i8 %44 to i32
%46 = load i32, i32* %9
%47 = srem i32 %46, 8
%48 = sub nsw i32 7, %47
%49 = shl i32 1, %48
%50 = and i32 %45, %49
%51 = icmp ne i32 %50, 0
%52 = zext i1 %51 to i64
%53 = select i1 %51, i32 1, i32 0
%54 = trunc i32 %53 to i8
%55 = load i32, i32* %9
%56 = sext i32 %55 to i64
%57 = getelementptr inbounds [64 x i8], [64 x i8]* %12, i64 0, i64 %56
store i8 %54, i8* %57
%58 = load i32, i32* %9
%59 = sext i32 %58 to i64
%60 = getelementptr inbounds [64 x i8], [64 x i8]* %10, i64 0, i64 %59
store i8 0, i8* %60
br label %61
61: ; preds = %20
%62 = load i32, i32* %9
%63 = add nsw i32 %62, 1
store i32 %63, i32* %9
br label %17
64: ; preds = %17
%65 = getelementptr inbounds [64 x i8], [64 x i8]* %10, i64 0, i64 0
%66 = getelementptr inbounds [64 x i8], [64 x i8]* %11, i64 0, i64 0
%67 = getelementptr inbounds [64 x i8], [64 x i8]* %12, i64 0, i64 0
%68 = load i32, i32* %8
%69 = call i32 @dohash(i8* %65, i8* %66, i8* %67, i32 %68)
store i32 0, i32* %9
br label %70
70: ; preds = %78, %64
%71 = load i32, i32* %9
%72 = icmp slt i32 %71, 8
br i1 %72, label %73, label %81
73: ; preds = %70
%74 = load i8*, i8** %5
%75 = load i32, i32* %9
%76 = sext i32 %75 to i64
%77 = getelementptr inbounds i8, i8* %74, i64 %76
store i8 0, i8* %77
br label %78
78: ; preds = %73
%79 = load i32, i32* %9
%80 = add nsw i32 %79, 1
store i32 %80, i32* %9
br label %70
81: ; preds = %70
store i32 0, i32* %9
br label %82
82: ; preds = %106, %81
%83 = load i32, i32* %9
%84 = icmp slt i32 %83, 64
br i1 %84, label %85, label %109
85: ; preds = %82
%86 = load i32, i32* %9
%87 = sext i32 %86 to i64
%88 = getelementptr inbounds [64 x i8], [64 x i8]* %10, i64 0, i64 %87
%89 = load i8, i8* %88
%90 = icmp ne i8 %89, 0
br i1 %90, label %91, label %105
91: ; preds = %85
%92 = load i32, i32* %9
%93 = srem i32 %92, 8
%94 = sub nsw i32 7, %93
%95 = shl i32 1, %94
%96 = load i8*, i8** %5
%97 = load i32, i32* %9
%98 = sdiv i32 %97, 8
%99 = sext i32 %98 to i64
%100 = getelementptr inbounds i8, i8* %96, i64 %99
%101 = load i8, i8* %100
%102 = zext i8 %101 to i32
%103 = or i32 %102, %95
%104 = trunc i32 %103 to i8
store i8 %104, i8* %100
br label %105
105: ; preds = %91, %85
br label %106
106: ; preds = %105
%107 = load i32, i32* %9
%108 = add nsw i32 %107, 1
store i32 %108, i32* %9
br label %82
109: ; preds = %82
ret void
}

LLVM IR (-O2):
define void @crypt_des_ecb(i8* nocapture %0, i8* nocapture %1, i8* %2, i32 %3) {
%5 = alloca [64 x i8]
%6 = getelementptr inbounds [64 x i8], [64 x i8]* %5, i64 0, i64 0
%7 = alloca [64 x i8]
%8 = alloca [64 x i8]
%9 = alloca [8 x i8]
%10 = getelementptr inbounds [64 x i8], [64 x i8]* %5, i64 0, i64 0
%11 = getelementptr inbounds [64 x i8], [64 x i8]* %7, i64 0, i64 0
%12 = getelementptr inbounds [64 x i8], [64 x i8]* %8, i64 0, i64 0
%13 = getelementptr inbounds [8 x i8], [8 x i8]* %9, i64 0, i64 0
%14 = call i32 @str_to_key(i8* %2, i8* %13)
br label %15
15: ; preds = %4, %15
%16 = phi i64 [ 0, %4 ], [ %37, %15 ]
%17 = trunc i64 %16 to i32
%18 = lshr i64 %16, 3
%19 = and i64 %18, 536870911
%20 = getelementptr inbounds i8, i8* %1, i64 %19
%21 = load i8, i8* %20
%22 = zext i8 %21 to i32
%23 = and i32 %17, 7
%24 = xor i32 %23, 7
%25 = shl nuw i32 1, %24
%26 = and i32 %25, %22
%27 = icmp ne i32 %26, 0
%28 = zext i1 %27 to i8
%29 = getelementptr inbounds [64 x i8], [64 x i8]* %7, i64 0, i64 %16
store i8 %28, i8* %29
%30 = getelementptr inbounds [8 x i8], [8 x i8]* %9, i64 0, i64 %19
%31 = load i8, i8* %30
%32 = zext i8 %31 to i32
%33 = and i32 %25, %32
%34 = icmp ne i32 %33, 0
%35 = zext i1 %34 to i8
%36 = getelementptr inbounds [64 x i8], [64 x i8]* %8, i64 0, i64 %16
store i8 %35, i8* %36
%37 = add nuw nsw i64 %16, 1
%38 = icmp eq i64 %37, 64
br i1 %38, label %39, label %15
39: ; preds = %15
%40 = call i32 @dohash(i8* %10, i8* %11, i8* %12, i32 %3)
%41 = bitcast i8* %0 to i64*
store i64 0, i64* %41
br label %42
42: ; preds = %39, %57
%43 = phi i64 [ 0, %39 ], [ %58, %57 ]
%44 = getelementptr inbounds [64 x i8], [64 x i8]* %5, i64 0, i64 %43
%45 = load i8, i8* %44
%46 = icmp eq i8 %45, 0
br i1 %46, label %57, label %47
47: ; preds = %42
%48 = trunc i64 %43 to i8
%49 = and i8 %48, 7
%50 = xor i8 %49, 7
%51 = shl nuw i8 1, %50
%52 = lshr i64 %43, 3
%53 = and i64 %52, 536870911
%54 = getelementptr inbounds i8, i8* %0, i64 %53
%55 = load i8, i8* %54
%56 = or i8 %55, %51
store i8 %56, i8* %54
br label %57
57: ; preds = %42, %47
%58 = add nuw nsw i64 %43, 1
%59 = icmp eq i64 %58, 64
br i1 %59, label %60, label %42
60: ; preds = %57
ret void
}