// File: /workspace/github_c_makefile_star2_O2/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 0x3330
cmpq $-0x1, %rax
je 0xc45a
leaq 0x10(%rsp), %rdi
leaq 0x48(%rsp), %rsi
callq 0x3670
leaq 0x573d(%rip), %rdx      # 0x11a97
leaq 0x1f(%rsp), %rdi
pushq $0x9
popq %rsi
movq %rax, %rcx
callq 0x3280
testq %rax, %rax
je 0xc444
leaq 0x10(%rsp), %rdi
leaq 0x48(%rsp), %rsi
callq 0x3670
leaq 0x5715(%rip), %rdx      # 0x11a9e
leaq 0x30(%rsp), %rdi
pushq $0x11
popq %rsi
movq %rax, %rcx
callq 0x3280
testq %rax, %rax
je 0xc444
movq %r15, 0x28(%rsp)
testq %rbp, %rbp
cmoveq %rbp, %r13
leaq 0x80(%rsp), %r15
movq %rbp, %rdi
movq %r13, %rsi
movq %r15, %rdx
callq 0xd7b4
leaq 0xa0(%rsp), %r13
pushq $0x20
popq %rdx
movq %r15, %rdi
movq %r13, %rsi
callq 0xd370
movq %r13, (%rsp)
leaq 0x5916(%rip), %rsi      # 0x11cfb
leaq 0x8(%rsp), %rdi
leaq 0x30(%rsp), %r9
movq %rbx, %rdx
movq %r14, %rcx
movq %r13, %r8
xorl %eax, %eax
callq 0xd27c
pushq $-0x1
popq %rbp
cmpl $-0x1, %eax
je 0xc494
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 0xbf79
testl %eax, %eax
je 0xc4a8
movq 0x8(%rsp), %rdi
callq 0x3460
jmp 0xc494
callq 0x3040
cmpl $0x0, (%rax)
je 0xc47a
movq %rax, %rbx
leaq 0x43f5(%rip), %rdi      # 0x1084d
jmp 0xc46e
callq 0x3040
cmpl $0x0, (%rax)
je 0xc483
movq %rax, %rbx
leaq 0x43e3(%rip), %rdi      # 0x10851
xorl %eax, %eax
callq 0x53ad
andl $0x0, (%rbx)
jmp 0xc491
leaq 0x43cc(%rip), %rdi      # 0x1084d
jmp 0xc48a
leaq 0x43c7(%rip), %rdi      # 0x10851
xorl %eax, %eax
callq 0x553c
pushq $-0x1
popq %rbp
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 0x58b0(%rip), %rsi      # 0x11d6b
leaq 0x1f(%rsp), %rcx
movq %r12, %rdi
movq 0x28(%rsp), %rdx
movq %r14, %r8
movq %rbx, %r9
xorl %eax, %eax
callq 0xd27c
cmpl $-0x1, %eax
je 0xc438
movq 0x170(%rsp), %rbx
leaq 0xa0(%rsp), %rdi
callq 0x35f0
movq %rax, (%rbx)
testq %rax, %rax
je 0xc52e
movq 0x178(%rsp), %r14
leaq 0x30(%rsp), %rdi
callq 0x35f0
movq %rax, (%r14)
testq %rax, %rax
je 0xc526
movq 0x8(%rsp), %rdi
callq 0x3460
xorl %ebp, %ebp
jmp 0xc494
movq (%rbx), %rdi
callq 0x3460
movq (%r12), %rdi
callq 0x3460
jmp 0xc438