// File: /workspace/github_c_makefile_star2_O3/jogolden[P]ps4flashtool/southbridge.c
// Function: replace_emc_ipl
int replace_emc_ipl(unsigned char *flashdata, unsigned char *newipl, int length) {
    struct bldr_hdr *blhdr = flash_locate_emc_ipl(flashdata, 0);
    unsigned char *hdraeskey = keymgr_getkey("emciplaes", KEY_TYPE_AES_128);
    unsigned char *hdrhmackey = keymgr_getkey("emciplhmac", KEY_TYPE_HMAC_SHA1);

    if(verbose) {
        printf("* EMC IPL header aes key: ");
        hexdump(hdraeskey, 0x10, 0);

        printf("* EMC IPL header hmac-sha1 key: ");
        hexdump(hdrhmackey, 0x10, 0);
    }

    char bodyhmac[0x14];
    char hdrhmac[0x14];

    // decrypt header
    aes128_cbc_iv_zero_decrypt(hdraeskey, &blhdr->crypteddata, &blhdr->crypteddata, 0x50);

    // encrypt body and replace it in flash
    if(verbose) {
        printf("* old EMC IPL body_len 0x%X\n", blhdr->body_len);
        printf("* new EMC IPL body_len 0x%X\n", length);
    }

    if(blhdr->body_len != length) {
        printf("warning: new EMC IPL has a different body length\n");
    }

    blhdr->body_len = length;
    aes128_cbc_iv_zero_encrypt(blhdr->crypteddata.iplbodyaeskey, newipl, &blhdr->bodystart, blhdr->body_len);

    // replace body signature
    hmac_sha1(blhdr->crypteddata.iplbodyhmackey, 0x10, &blhdr->bodystart, blhdr->body_len, bodyhmac);

    if(verbose) {
        printf("* old EMC IPL body hmac-sha1: ");
        hexdump(blhdr->crypteddata.iplbodyhmac, 0x14, 0);

        printf("* new EMC IPL body hmac-sha1: ");
        hexdump(bodyhmac, 0x14, 0);
    }

    memcpy(blhdr->crypteddata.iplbodyhmac, bodyhmac, sizeof(bodyhmac));

    // filler null
    memset(blhdr->crypteddata.filler, 0, 8);

    // replace header signature
    hmac_sha1(hdrhmackey, 0x10, (unsigned char *)blhdr, 0x6C, hdrhmac);

    if(verbose) {
        printf("* old EMC IPL header hmac-sha1: ");
        hexdump(blhdr->crypteddata.headerhmac, 0x14, 0);

        printf("* new EMC IPL header hmac-sha1: ");
        hexdump(hdrhmac, 0x14, 0);
    }

    memcpy(blhdr->crypteddata.headerhmac, hdrhmac, sizeof(hdrhmac));

    // encrypt header
    aes128_cbc_iv_zero_encrypt(hdraeskey, &blhdr->crypteddata, &blhdr->crypteddata, 0x50);

    return 0;
}

// Assembly:
pushq %rbp
pushq %r15
pushq %r14
pushq %r13
pushq %r12
pushq %rbx
subq $0x48, %rsp
movl %edx, %ebp
movq %rsi, (%rsp)
xorl %esi, %esi
callq 0x6420
movq %rax, %rbx
leaq 0x2968(%rip), %rdi      # 0x91ef
movl $0xa1, %esi
callq 0x4dbd
movq %rax, %r14
leaq 0x295e(%rip), %rdi      # 0x91f9
movl $0xb1, %esi
callq 0x4dbd
movq %rax, %r15
leaq 0x5a75(%rip), %r13      # 0xc324
cmpl $0x0, (%r13)
je 0x68f0
leaq 0x2947(%rip), %rdi      # 0x9204
xorl %eax, %eax
callq 0x20b0
movq %r14, %rdi
movl $0x10, %esi
xorl %edx, %edx
callq 0x38a5
leaq 0x2945(%rip), %rdi      # 0x921f
xorl %eax, %eax
callq 0x20b0
movq %r15, %rdi
movl $0x10, %esi
xorl %edx, %edx
callq 0x38a5
movq %r15, 0x8(%rsp)
leaq 0x30(%rbx), %r15
movq %r14, %rdi
movq %r15, %rsi
movq %r15, %rdx
movl $0x50, %ecx
callq 0x2cf4
cmpl $0x0, (%r13)
je 0x6934
movl 0xc(%rbx), %esi
leaq 0x29b5(%rip), %rdi      # 0x92d2
xorl %eax, %eax
callq 0x20b0
leaq 0x29c4(%rip), %rdi      # 0x92ef
movl %ebp, %esi
xorl %eax, %eax
callq 0x20b0
cmpl %ebp, 0xc(%rbx)
je 0x6945
leaq 0x2d00(%rip), %rdi      # 0x9640
callq 0x2060
movl %ebp, 0xc(%rbx)
leaq 0x80(%rbx), %r12
movq %r15, %rdi
movq (%rsp), %rsi
movq %r12, %rdx
movl %ebp, %ecx
callq 0x2cdc
leaq 0x40(%rbx), %rdi
movl 0xc(%rbx), %ecx
leaq 0x30(%rsp), %r8
movl $0x10, %esi
movq %r12, %rdx
callq 0x4a2f
cmpl $0x0, (%r13)
je 0x69bd
leaq 0x2985(%rip), %rdi      # 0x930c
xorl %eax, %eax
callq 0x20b0
leaq 0x50(%rbx), %rdi
movl $0x14, %esi
xorl %edx, %edx
callq 0x38a5
leaq 0x2986(%rip), %rdi      # 0x932b
xorl %eax, %eax
callq 0x20b0
leaq 0x30(%rsp), %rdi
movl $0x14, %esi
xorl %edx, %edx
callq 0x38a5
movl 0x40(%rsp), %eax
movl %eax, 0x60(%rbx)
movaps 0x30(%rsp), %xmm0
movups %xmm0, 0x50(%rbx)
movq $0x0, 0x64(%rbx)
leaq 0x10(%rsp), %r8
movl $0x10, %esi
movl $0x6c, %ecx
movq 0x8(%rsp), %rdi
movq %rbx, %rdx
callq 0x4a2f
cmpl $0x0, (%r13)
je 0x6a38
leaq 0x294b(%rip), %rdi      # 0x934a
xorl %eax, %eax
callq 0x20b0
movq %rbx, %rdi
addq $0x6c, %rdi
movl $0x14, %esi
xorl %edx, %edx
callq 0x38a5
leaq 0x294b(%rip), %rdi      # 0x936b
xorl %eax, %eax
callq 0x20b0
leaq 0x10(%rsp), %rdi
movl $0x14, %esi
xorl %edx, %edx
callq 0x38a5
movl 0x20(%rsp), %eax
movl %eax, 0x7c(%rbx)
movaps 0x10(%rsp), %xmm0
movups %xmm0, 0x6c(%rbx)
movq %r14, %rdi
movq %r15, %rsi
movq %r15, %rdx
movl $0x50, %ecx
callq 0x2cdc
xorl %eax, %eax
addq $0x48, %rsp
popq %rbx
popq %r12
popq %r13
popq %r14
popq %r15
popq %rbp
retq