// File: karel-brinda[P]ococo/ext/htslib/cram/cram_codecs.c
// Function: cram_external_decode_init
cram_codec *cram_external_decode_init(char *data, int size,
				      enum cram_external_type option,
				      int version) {
    cram_codec *c;
    char *cp = data;

    if (!(c = malloc(sizeof(*c))))
	return NULL;

    c->codec  = E_EXTERNAL;
    if (option == E_INT || option == E_LONG)
	c->decode = cram_external_decode_int;
    else if (option == E_BYTE_ARRAY || option == E_BYTE)
	c->decode = cram_external_decode_char;
    else
	c->decode = cram_external_decode_block;
    c->free   = cram_external_decode_free;
    
    cp += itf8_get(cp, &c->external.content_id);

    if (cp - data != size) {
	fprintf(stderr, "Malformed external header stream\n");
	free(c);
	return NULL;
    }

    c->external.type = option;

    return c;
}

// Assembly:
pushq %rbp
movq %rsp, %rbp
subq $0x40, %rsp
movq %rdi, -0x10(%rbp)
movl %esi, -0x14(%rbp)
movl %edx, -0x18(%rbp)
movl %ecx, -0x1c(%rbp)
movq -0x10(%rbp), %rax
movq %rax, -0x30(%rbp)
movl $0x240, %edi            # imm = 0x240
callq 0x47a0
movq %rax, -0x28(%rbp)
cmpq $0x0, %rax
jne 0x6e1fe
movq $0x0, -0x8(%rbp)
jmp 0x6e427
movq -0x28(%rbp), %rax
movl $0x1, (%rax)
cmpl $0x1, -0x18(%rbp)
je 0x6e214
cmpl $0x2, -0x18(%rbp)
jne 0x6e225
movq -0x28(%rbp), %rax
leaq -0x4bf(%rip), %rcx      # 0x6dd60
movq %rcx, 0x18(%rax)
jmp 0x6e253
cmpl $0x4, -0x18(%rbp)
je 0x6e231
cmpl $0x3, -0x18(%rbp)
jne 0x6e242
movq -0x28(%rbp), %rax
leaq -0x1ac(%rip), %rcx      # 0x6e090
movq %rcx, 0x18(%rax)
jmp 0x6e251
movq -0x28(%rbp), %rax
leaq 0x1f3(%rip), %rcx       # 0x6e440
movq %rcx, 0x18(%rax)
jmp 0x6e253
movq -0x28(%rbp), %rax
leaq -0xce(%rip), %rcx       # 0x6e190
movq %rcx, 0x10(%rax)
movq -0x30(%rbp), %rax
movzbl (%rax), %eax
cmpl $0x80, %eax
jge 0x6e28b
movq -0x30(%rbp), %rax
movzbl (%rax), %ecx
movq -0x28(%rbp), %rax
movl %ecx, 0x30(%rax)
movl $0x1, %eax
movl %eax, -0x34(%rbp)
jmp 0x6e3c5
movq -0x30(%rbp), %rax
movzbl (%rax), %eax
cmpl $0xc0, %eax
jge 0x6e2c7
movq -0x30(%rbp), %rax
movzbl (%rax), %ecx
shll $0x8, %ecx
movq -0x30(%rbp), %rax
movzbl 0x1(%rax), %eax
orl %eax, %ecx
andl $0x3fff, %ecx           # imm = 0x3FFF
movq -0x28(%rbp), %rax
movl %ecx, 0x30(%rax)
movl $0x2, %eax
movl %eax, -0x38(%rbp)
jmp 0x6e3bf
movq -0x30(%rbp), %rax
movzbl (%rax), %eax
cmpl $0xe0, %eax
jge 0x6e310
movq -0x30(%rbp), %rax
movzbl (%rax), %ecx
shll $0x10, %ecx
movq -0x30(%rbp), %rax
movzbl 0x1(%rax), %eax
shll $0x8, %eax
orl %eax, %ecx
movq -0x30(%rbp), %rax
movzbl 0x2(%rax), %eax
orl %eax, %ecx
andl $0x1fffff, %ecx         # imm = 0x1FFFFF
movq -0x28(%rbp), %rax
movl %ecx, 0x30(%rax)
movl $0x3, %eax
movl %eax, -0x3c(%rbp)
jmp 0x6e3b9
movq -0x30(%rbp), %rax
movzbl (%rax), %eax
cmpl $0xf0, %eax
jge 0x6e363
movq -0x30(%rbp), %rax
movzbl (%rax), %ecx
shll $0x18, %ecx
movq -0x30(%rbp), %rax
movzbl 0x1(%rax), %eax
shll $0x10, %eax
orl %eax, %ecx
movq -0x30(%rbp), %rax
movzbl 0x2(%rax), %eax
shll $0x8, %eax
orl %eax, %ecx
movq -0x30(%rbp), %rax
movzbl 0x3(%rax), %eax
orl %eax, %ecx
andl $0xfffffff, %ecx        # imm = 0xFFFFFFF
movq -0x28(%rbp), %rax
movl %ecx, 0x30(%rax)
movl $0x4, %eax
movl %eax, -0x40(%rbp)
jmp 0x6e3b3
movq -0x30(%rbp), %rax
movzbl (%rax), %ecx
andl $0xf, %ecx
shll $0x1c, %ecx
movq -0x30(%rbp), %rax
movzbl 0x1(%rax), %eax
shll $0x14, %eax
orl %eax, %ecx
movq -0x30(%rbp), %rax
movzbl 0x2(%rax), %eax
shll $0xc, %eax
orl %eax, %ecx
movq -0x30(%rbp), %rax
movzbl 0x3(%rax), %eax
shll $0x4, %eax
orl %eax, %ecx
movq -0x30(%rbp), %rax
movzbl 0x4(%rax), %eax
andl $0xf, %eax
orl %eax, %ecx
movq -0x28(%rbp), %rax
movl %ecx, 0x30(%rax)
movl $0x5, %eax
movl %eax, -0x40(%rbp)
movl -0x40(%rbp), %eax
movl %eax, -0x3c(%rbp)
movl -0x3c(%rbp), %eax
movl %eax, -0x38(%rbp)
movl -0x38(%rbp), %eax
movl %eax, -0x34(%rbp)
movl -0x34(%rbp), %ecx
movq -0x30(%rbp), %rax
movslq %ecx, %rcx
addq %rcx, %rax
movq %rax, -0x30(%rbp)
movq -0x30(%rbp), %rax
movq -0x10(%rbp), %rcx
subq %rcx, %rax
movslq -0x14(%rbp), %rcx
cmpq %rcx, %rax
je 0x6e415
movq 0x1bbdf(%rip), %rax     # 0x89fd0
movq (%rax), %rdi
leaq 0x1063d(%rip), %rsi     # 0x7ea38
movb $0x0, %al
callq 0x4830
movq -0x28(%rbp), %rdi
callq 0x46a0
movq $0x0, -0x8(%rbp)
jmp 0x6e427
movl -0x18(%rbp), %ecx
movq -0x28(%rbp), %rax
movl %ecx, 0x34(%rax)
movq -0x28(%rbp), %rax
movq %rax, -0x8(%rbp)
movq -0x8(%rbp), %rax
addq $0x40, %rsp
popq %rbp
retq
nopw %cs:(%rax,%rax)