push
This commit is contained in:
74
srcs/srcs_vm/cw_ldi_lldi.c
Normal file
74
srcs/srcs_vm/cw_ldi_lldi.c
Normal file
@@ -0,0 +1,74 @@
|
||||
/* ************************************************************************** */
|
||||
/* */
|
||||
/* ::: :::::::: */
|
||||
/* cw_ldi_lldi.c :+: :+: :+: */
|
||||
/* +:+ +:+ +:+ */
|
||||
/* By: tmaze <tmaze@student.42.fr> +#+ +:+ +#+ */
|
||||
/* +#+#+#+#+#+ +#+ */
|
||||
/* Created: 2019/06/19 20:43:31 by tmaze #+# #+# */
|
||||
/* Updated: 2019/07/16 14:20:24 by igarbuz ### ########.fr */
|
||||
/* */
|
||||
/* ************************************************************************** */
|
||||
|
||||
#include "corewar.h"
|
||||
|
||||
void print_ldi(t_process *p, char *name, int *arg)
|
||||
{
|
||||
ft_printf("P %4d | %s %d %d r%d\n", \
|
||||
p->pid, name, arg[0], arg[1], arg[2]);
|
||||
if (name[1] == 'd')
|
||||
ft_printf("%7c| -> load from %d + %d = %d (with pc and mod %d)\n"
|
||||
, ' ', arg[0], arg[1], arg[4], arg[5]);
|
||||
else
|
||||
ft_printf("%7c| -> load from %d + %d = %d (with pc %d)\n"
|
||||
, ' ', arg[0], arg[1], arg[4], arg[5]);
|
||||
}
|
||||
|
||||
int cw_ldi_args(t_process *p, t_vm *vm, t_args *ag, int *arg)
|
||||
{
|
||||
return (((ag[0].t == REG_CODE && (arg[0] = check_reg(vm, p->pc + 2)))
|
||||
|| (ag[0].t != 0 && ag[0].t != REG_CODE))
|
||||
&& ((ag[1].t == REG_CODE
|
||||
&& (arg[1] = check_reg(vm, p->pc + ag[1].i)))
|
||||
|| ag[1].t == DIR_CODE) && ag[2].t == REG_CODE
|
||||
&& (arg[2] = check_reg(vm, p->pc + ag[2].i)));
|
||||
}
|
||||
|
||||
void cw_ldi_common(t_process *p, t_vm *vm, char *n)
|
||||
{
|
||||
t_args ag[4];
|
||||
int arg[6];
|
||||
|
||||
init_args(ag, p, vm);
|
||||
arg[3] = cw_ocp(3, ag, 2);
|
||||
if (cw_ldi_args(p, vm, ag, arg))
|
||||
{
|
||||
if (ag[0].t == DIR_CODE)
|
||||
arg[0] = read_two(vm, p->pc + 2);
|
||||
else if (ag[0].t == IND_CODE)
|
||||
arg[0] = read_four(vm, p->pc + (read_two(vm, p->pc + 2) % IDX_MOD));
|
||||
else
|
||||
arg[0] = p->regs[arg[0]];
|
||||
if (ag[1].t == DIR_CODE)
|
||||
arg[1] = read_two(vm, p->pc + ag[1].i);
|
||||
else
|
||||
arg[1] = p->regs[arg[1]];
|
||||
arg[4] = arg[0] + arg[1];
|
||||
arg[5] = (n[1] != 'd') ? (p->pc + arg[4]) % MEM_SIZE
|
||||
: (p->pc + (arg[4] % IDX_MOD)) % MEM_SIZE;
|
||||
if (vm->args & AG_VERB && vm->verb & VB_OPS)
|
||||
print_ldi(p, n, arg);
|
||||
p->regs[arg[2]] = read_four(vm, arg[5]);
|
||||
}
|
||||
cw_move_pc(vm, p, arg[3]);
|
||||
}
|
||||
|
||||
void cw_ldi(t_process *p, t_vm *vm)
|
||||
{
|
||||
cw_ldi_common(p, vm, "ldi");
|
||||
}
|
||||
|
||||
void cw_lldi(t_process *p, t_vm *vm)
|
||||
{
|
||||
cw_ldi_common(p, vm, "lldi");
|
||||
}
|
||||
Reference in New Issue
Block a user