from enum import IntEnum
import sys

def main():
    with open("day5.txt", "rt") as input_file:
        codes = parse_input(input_file.read())
    
    # input_value = 1
    input_value = 5
    last_output = run_intcode(codes, input_value)
    print("Last output:", last_output)

def parse_input(text):
    return [int(i) for i in text.rstrip().split(",")]

class Opcode(IntEnum):
    ADD = 1
    MUL = 2
    IN = 3
    OUT = 4
    JNZ = 5
    JEZ = 6
    LT = 7
    EQ = 8
    HALT = 99

class ParamMode(IntEnum):
    POS = 0
    IMM = 1

def run_intcode(codes, input_value):
    last_output = 0
    ip = 0
    while True:
        code, modes = try_parse_code(codes[ip])
        mode1, mode2, _ = modes
        if code == Opcode.ADD:
            print("ADD:", codes[ip : ip + 4])
            operand1 = read_param(codes, ip + 1, mode1)
            operand2 = read_param(codes, ip + 2, mode2)
            output_pos = codes[ip + 3]
            codes[output_pos] = operand1 + operand2
            ip += 4
        elif code == Opcode.MUL:
            print("MUL:", codes[ip : ip + 4])
            operand1 = read_param(codes, ip + 1, mode1)
            operand2 = read_param(codes, ip + 2, mode2)
            output_pos = codes[ip + 3]
            codes[output_pos] = operand1 * operand2
            ip += 4
        elif code == Opcode.IN:
            print("IN:", codes[ip : ip + 2])
            operand_pos = codes[ip + 1]
            codes[operand_pos] = input_value
            ip += 2
        elif code == Opcode.OUT:
            print("OUT:", codes[ip : ip + 2])
            operand = read_param(codes, ip + 1, mode1)
            last_output = operand
            print("  ->", last_output)
            ip += 2
        elif code == Opcode.JNZ:
            print("JNZ:", codes[ip : ip + 3])
            operand = read_param(codes, ip + 1, mode1)
            if operand != 0:
                ip = read_param(codes, ip + 2, mode2)
            else:
                ip += 3
        elif code == Opcode.JEZ:
            print("JEZ:", codes[ip : ip + 3])
            operand = read_param(codes, ip + 1, mode1)
            if operand == 0:
                ip = read_param(codes, ip + 2, mode2)
            else:
                ip += 3
        elif code == Opcode.LT:
            print("LT:", codes[ip : ip + 4])
            operand1 = read_param(codes, ip + 1, mode1)
            operand2 = read_param(codes, ip + 2, mode2)            
            output_pos = codes[ip + 3]
            codes[output_pos] = int(operand1 < operand2)
            ip += 4
        elif code == Opcode.EQ:
            print("EQ:", codes[ip : ip + 4])
            operand1 = read_param(codes, ip + 1, mode1)
            operand2 = read_param(codes, ip + 2, mode2)
            output_pos = codes[ip + 3]
            codes[output_pos] = int(operand1 == operand2)
            ip += 4
        elif code == Opcode.HALT:
            print("HALT.")
            break
        else:
            sys.exit("Wrong opcode: {}".format(code))
    return last_output

def try_parse_code(code):
    try:
        return parse_code(code)
    except ValueError:
        sys.exit("Not a valid code: {}".format(code))

def parse_code(code):
    opcode = get_digit(code, 2)*10 + get_digit(code, 1)
    mode1 = ParamMode(get_digit(code, 3))
    mode2 = ParamMode(get_digit(code, 4))
    mode3 = ParamMode(get_digit(code, 5))
    return opcode, (mode1, mode2, mode3)

def get_digit(value, digit):
    digit_str = str(value)
    if digit > len(digit_str):
        return 0
    try:
        return int(digit_str[len(digit_str) - digit])
    except IndexError:
        return 0

def read_param(codes, pos, mode):
    if mode == ParamMode.POS:
        return codes[codes[pos]]
    elif mode == ParamMode.IMM:
        return codes[pos]


if __name__ == "__main__":
    main()