// File: /workspace/github_c_makefile_star2_O1/Tarsnap[P]kivaloo/liball/../libcperciva/aws/aws_sign.c
// Function: aws_sign_svc_headers
int
aws_sign_svc_headers(const char * key_id, const char * key_secret,
    const char * region, const char * svc,
    const uint8_t * body, size_t bodylen,
    char ** x_amz_content_sha256, char ** x_amz_date, char ** authorization)
{
	time_t t_now;
	struct tm r_result;
	char date[9];
	char datetime[17];
	uint8_t hbuf[32];
	char content_sha256[65];
	char * canonical_request;
	char sigbuf[65];

	/* Get the current time. */
	if (time(&t_now) == (time_t)(-1)) {
		warnp("time");
		goto err0;
	}

	/* Construct date string <yyyymmdd>. */
	if (strftime(date, 9, "%Y%m%d", gmtime_r(&t_now, &r_result)) == 0) {
		warnp("strftime");
		goto err0;
	}

	/* Construct date-and-time string <yyyymmddThhmmssZ>. */
	if (strftime(datetime, 17, "%Y%m%dT%H%M%SZ",
	    gmtime_r(&t_now, &r_result)) == 0) {
		warnp("strftime");
		goto err0;
	}

	/* Compute the hexified SHA256 of the payload. */
	SHA256_Buf(body, body ? bodylen : 0, hbuf);
	hexify(hbuf, content_sha256, 32);

	/* Construct Canonical Request. */
	if (asprintf(&canonical_request,
	    "POST\n"
	    "/\n"
	    "\n"
	    "host:%s.%s.amazonaws.com\n"
	    "x-amz-content-sha256:%s\n"
	    "x-amz-date:%s\n"
	    "\n"
	    "host;x-amz-content-sha256;x-amz-date\n"
	    "%s",
	    svc, region, content_sha256, datetime, content_sha256) == -1)
		goto err0;

	/* Compute request signature. */
	if (aws_sign(key_secret, date, datetime, region,
	    svc, canonical_request, sigbuf))
		goto err1;

	/* Construct Authorization header. */
	if (asprintf(authorization,
	    "AWS4-HMAC-SHA256 "
	    "Credential=%s/%s/%s/%s/aws4_request,"
	    "SignedHeaders=host;x-amz-content-sha256;x-amz-date,"
	    "Signature=%s",
	    key_id, date, region, svc, sigbuf) == -1)
		goto err1;

	/* Duplicate X-Amz-Content-SHA256 and X-Amz-Date headers. */
	if ((*x_amz_content_sha256 = strdup(content_sha256)) == NULL)
		goto err2;
	if ((*x_amz_date = strdup(datetime)) == NULL)
		goto err3;

	/* Free string allocated by asprintf. */
	free(canonical_request);

	/* Success! */
	return (0);

err3:
	free(*x_amz_content_sha256);
err2:
	free(*authorization);
err1:
	free(canonical_request);
err0:
	/* Failure! */
	return (-1);
}

// Assembly:
pushq %rbp
pushq %r15
pushq %r14
pushq %r13
pushq %r12
pushq %rbx
subq $0x138, %rsp            # imm = 0x138
movq %r9, %r13
movq %r8, %rbp
movq %rcx, %rbx
movq %rdx, %r14
movq %rsi, %r12
movq %rdi, %r15
leaq 0x10(%rsp), %rdi
callq 0x3320
cmpq $-0x1, %rax
je 0xd43a
leaq 0x10(%rsp), %rdi
leaq 0x48(%rsp), %rsi
callq 0x3660
leaq 0x5962(%rip), %rdx      # 0x12c94
leaq 0x1f(%rsp), %rdi
movl $0x9, %esi
movq %rax, %rcx
callq 0x3270
testq %rax, %rax
je 0xd424
leaq 0x10(%rsp), %rdi
leaq 0x48(%rsp), %rsi
callq 0x3660
leaq 0x5938(%rip), %rdx      # 0x12c9b
leaq 0x30(%rsp), %rdi
movl $0x11, %esi
movq %rax, %rcx
callq 0x3270
testq %rax, %rax
je 0xd424
movq %r15, 0x28(%rsp)
testq %rbp, %rbp
cmoveq %rbp, %r13
leaq 0x80(%rsp), %r15
movq %rbp, %rdi
movq %r13, %rsi
movq %r15, %rdx
callq 0xe971
leaq 0xa0(%rsp), %r13
movl $0x20, %edx
movq %r15, %rdi
movq %r13, %rsi
callq 0xe3e4
movq %r13, (%rsp)
leaq 0x5b35(%rip), %rsi      # 0x12ef8
leaq 0x8(%rsp), %rdi
leaq 0x30(%rsp), %r9
movq %rbx, %rdx
movq %r14, %rcx
movq %r13, %r8
xorl %eax, %eax
callq 0xe2e0
movl $0xffffffff, %ebp       # imm = 0xFFFFFFFF
cmpl $-0x1, %eax
je 0xd479
movq 0x8(%rsp), %r9
leaq 0xf0(%rsp), %r15
movq %r15, (%rsp)
leaq 0x1f(%rsp), %rsi
leaq 0x30(%rsp), %rdx
movq %r12, %rdi
movq %r14, %rcx
movq %rbx, %r8
callq 0xcf42
testl %eax, %eax
je 0xd48d
movq 0x8(%rsp), %rdi
callq 0x3450
jmp 0xd479
callq 0x3040
cmpl $0x0, (%rax)
je 0xd45d
movq %rax, %rbx
leaq 0x45cd(%rip), %rdi      # 0x11a05
jmp 0xd44e
callq 0x3040
cmpl $0x0, (%rax)
je 0xd466
movq %rax, %rbx
leaq 0x45bb(%rip), %rdi      # 0x11a09
xorl %eax, %eax
callq 0x578c
movl $0x0, (%rbx)
jmp 0xd474
leaq 0x45a1(%rip), %rdi      # 0x11a05
jmp 0xd46d
leaq 0x459c(%rip), %rdi      # 0x11a09
xorl %eax, %eax
callq 0x58ab
movl $0xffffffff, %ebp       # imm = 0xFFFFFFFF
movl %ebp, %eax
addq $0x138, %rsp            # imm = 0x138
popq %rbx
popq %r12
popq %r13
popq %r14
popq %r15
popq %rbp
retq
movq 0x180(%rsp), %r12
movq %r15, (%rsp)
leaq 0x5ac8(%rip), %rsi      # 0x12f68
leaq 0x1f(%rsp), %rcx
movq %r12, %rdi
movq 0x28(%rsp), %rdx
movq %r14, %r8
movq %rbx, %r9
xorl %eax, %eax
callq 0xe2e0
cmpl $-0x1, %eax
je 0xd418
movq 0x170(%rsp), %rbx
leaq 0xa0(%rsp), %rdi
callq 0x35e0
movq %rax, (%rbx)
testq %rax, %rax
je 0xd513
movq 0x178(%rsp), %r14
leaq 0x30(%rsp), %rdi
callq 0x35e0
movq %rax, (%r14)
testq %rax, %rax
je 0xd50b
movq 0x8(%rsp), %rdi
callq 0x3450
xorl %ebp, %ebp
jmp 0xd479
movq (%rbx), %rdi
callq 0x3450
movq (%r12), %rdi
callq 0x3450
jmp 0xd418