// File: /workspace/github_c_makefile_star2_O1/phoboslab[P]pl_mpeg/pl_mpeg_player_sdl.c
// Function: app_update
void app_update(app_t *self) {
	double seek_to = -1;

	SDL_Event ev;
	while (SDL_PollEvent(&ev)) {
		if (
			ev.type == SDL_QUIT || 
			(ev.type == SDL_KEYUP && ev.key.keysym.sym == SDLK_ESCAPE)
		) {
			self->wants_to_quit = TRUE;
		}
		// Seek 3sec forward/backward using arrow keys
		if (ev.type == SDL_KEYDOWN && ev.key.keysym.sym == SDLK_RIGHT) {
			seek_to = plm_get_time(self->plm) + 3;
		}
		else if (ev.type == SDL_KEYDOWN && ev.key.keysym.sym == SDLK_LEFT) {
			seek_to = plm_get_time(self->plm) - 3;
		}
	}


	// Clear renderer, copy texture and present
	SDL_RenderClear(self->renderer);
        
	SDL_RenderCopy(self->renderer, self->texture, NULL, &self->rectangle);

	SDL_RenderPresent(self->renderer);

	// Compute the delta time since the last app_update(), limit max step to 
	// 1/30th of a second
	double current_time = (double)SDL_GetTicks() / 1000.0;
	double elapsed_time = current_time - self->last_time;
	if (elapsed_time > 1.0 / 30.0) {
		elapsed_time = 1.0 / 30.0;
	}
	self->last_time = current_time;

	// Seek using mouse position
	int mouse_x, mouse_y;
	if (SDL_GetMouseState(&mouse_x, &mouse_y) & SDL_BUTTON(SDL_BUTTON_LEFT)) {
		int sx, sy;
		SDL_GetWindowSize(self->window, &sx, &sy);
		seek_to = plm_get_duration(self->plm) * ((float)mouse_x / (float)sx);
	}
	
	// Seek or advance decode
	if (seek_to != -1) {
		SDL_ClearQueuedAudio(self->audio_device);
		plm_seek(self->plm, seek_to, FALSE);
	}
	else {
		plm_decode(self->plm, elapsed_time);
	}

	if (plm_has_ended(self->plm)) {
		self->wants_to_quit = TRUE;
	}
}

// Assembly:
pushq %r14
pushq %rbx
subq $0x68, %rsp
movq %rdi, %rbx
leaq 0x30(%rsp), %rdi
callq 0x20f0
movsd 0x336(%rip), %xmm0      # 0x9008
testl %eax, %eax
je 0x8d4c
movsd %xmm0, 0x8(%rsp)
leaq 0x30(%rsp), %r14
movl 0x30(%rsp), %eax
cmpl $0x100, %eax            # imm = 0x100
je 0x8cfa
cmpl $0x301, %eax            # imm = 0x301
jne 0x8d01
cmpl $0x1b, 0x44(%rsp)
jne 0x8d01
movl $0x1, 0x10(%rbx)
xorl $0x300, %eax            # imm = 0x300
movl 0x44(%rsp), %ecx
movl %ecx, %edx
xorl $0x4000004f, %edx       # imm = 0x4000004F
orl %eax, %edx
movsd 0x304(%rip), %xmm0      # 0x9020
je 0x8d30
xorl $0x40000050, %ecx       # imm = 0x40000050
orl %ecx, %eax
movsd 0x2fa(%rip), %xmm0      # 0x9028
jne 0x8d3e
movq (%rbx), %rax
addsd 0x8(%rax), %xmm0
movsd %xmm0, 0x8(%rsp)
movq %r14, %rdi
callq 0x20f0
testl %eax, %eax
jne 0x8ce1
jmp 0x8d52
movsd %xmm0, 0x8(%rsp)
movq 0x20(%rbx), %rdi
callq 0x2150
movq 0x20(%rbx), %rdi
movq 0x28(%rbx), %rsi
leaq 0x30(%rbx), %rcx
xorl %edx, %edx
callq 0x2190
movq 0x20(%rbx), %rdi
callq 0x2080
callq 0x2170
movl %eax, %eax
xorps %xmm0, %xmm0
cvtsi2sd %rax, %xmm0
divsd 0x2a2(%rip), %xmm0      # 0x9030
movapd %xmm0, %xmm1
subsd 0x8(%rbx), %xmm1
movsd %xmm1, 0x18(%rsp)
movsd %xmm0, 0x8(%rbx)
leaq 0x14(%rsp), %rdi
leaq 0x2c(%rsp), %rsi
callq 0x2230
testb $0x1, %al
movsd 0x8(%rsp), %xmm0
je 0x8dff
movq 0x18(%rbx), %rdi
leaq 0x28(%rsp), %r14
leaq 0x24(%rsp), %rdx
movq %r14, %rsi
callq 0x20a0
movq (%rbx), %rax
movq (%rax), %rdi
movl $0xe0, %esi
callq 0x30d8
xorps %xmm1, %xmm1
cvtsi2ssl 0x14(%rsp), %xmm1
cvtsi2ssl (%r14), %xmm2
divss %xmm2, %xmm1
cvtss2sd %xmm1, %xmm1
mulsd %xmm0, %xmm1
movapd %xmm1, %xmm0
ucomisd 0x201(%rip), %xmm0      # 0x9008
jne 0x8e0b
jnp 0x8e2b
movl 0x40(%rbx), %edi
movsd %xmm0, 0x8(%rsp)
callq 0x2220
movq (%rbx), %rdi
movsd 0x8(%rsp), %xmm0
xorl %esi, %esi
callq 0x3fea
jmp 0x8e41
movsd 0x205(%rip), %xmm0      # 0x9038
minsd 0x18(%rsp), %xmm0
movq (%rbx), %rdi
callq 0x33a3
movq (%rbx), %rax
cmpl $0x0, 0x10(%rax)
je 0x8e51
movl $0x1, 0x10(%rbx)
addq $0x68, %rsp
popq %rbx
popq %r14
retq