// File: /workspace/github_c_makefile_star2_O0/tstword[P]MIPSAssemblerC/src/assembler.c
// Function: program_cfg
void program_cfg(struct assembler *assembler) {
    cfg_assembler = assembler;

    instruction_list_cfg();
    
    /* Verify undefined symbol table */
    for(struct list_node *head = assembler->decl_symlist->front; head != NULL; head = head->next) {
        struct symbol_table_entry *sym_entry = (struct symbol_table_entry *)head->value;
        symstat_t status = sym_entry->status;
        if(status == SYMBOL_UNDEFINED) {
            /* Symbol is still undefined, program cannot be assembled */
            fprintf(stderr, "Symbol Error: Undefined symbol '%s'\n", ((struct symbol_table_entry *)head->value)->key);
            struct list_node *instr_ref = sym_entry->instr_list->front;
            while(instr_ref != NULL) {
                destroy_instruction((struct instruction_node *)instr_ref->value);
                instr_ref = instr_ref->next;
            }
            assembler->status = ASSEMBLER_STATUS_FAIL;
        } else {
            struct list_node *instr_ref = sym_entry->instr_list->front;
            while(instr_ref != NULL) {
                if(((struct instruction_node *)instr_ref->value)->mnemonic->token == TOK_MNEMONIC) {
                    assembler->segment = ((struct instruction_node *)instr_ref->value)->segment;
                    assembler->segment_offset[assembler->segment] = ((struct instruction_node *)instr_ref->value)->offset;
                    assemble_instruction((struct instruction_node *)instr_ref->value); 
                    destroy_instruction((struct instruction_node *)instr_ref->value);
                }
                else if(((struct instruction_node *)instr_ref->value)->mnemonic->token == TOK_DIRECTIVE) {
                    assembler->segment = ((struct instruction_node *)instr_ref->value)->segment;
                    assembler->segment_offset[assembler->segment] = ((struct instruction_node *)instr_ref->value)->offset;
                    check_directive((struct instruction_node *)instr_ref->value); 
                    destroy_instruction((struct instruction_node *)instr_ref->value);
                }
                instr_ref = instr_ref->next;
            }
        }
    }
}

// Assembly:
pushq %rbp
movq %rsp, %rbp
subq $0x30, %rsp
movq %rdi, -0x8(%rbp)
movq -0x8(%rbp), %rax
movq %rax, 0x89a1(%rip)      # 0xf5a8
callq 0x6b50
movq -0x8(%rbp), %rax
movq 0x18(%rax), %rax
movq (%rax), %rax
movq %rax, -0x10(%rbp)
cmpq $0x0, -0x10(%rbp)
je 0x6d97
movq -0x10(%rbp), %rax
movq 0x8(%rax), %rax
movq %rax, -0x18(%rbp)
movq -0x18(%rbp), %rax
movb 0x8(%rax), %al
movb %al, -0x19(%rbp)
movzbl -0x19(%rbp), %eax
cmpl $0x0, %eax
jne 0x6ca5
movq 0x73ac(%rip), %rax      # 0xdff8
movq (%rax), %rdi
movq -0x10(%rbp), %rax
movq 0x8(%rax), %rax
movq (%rax), %rdx
leaq 0x3bed(%rip), %rsi      # 0xa84e
movb $0x0, %al
callq 0x30c0
movq -0x18(%rbp), %rax
movq 0x18(%rax), %rax
movq (%rax), %rax
movq %rax, -0x28(%rbp)
cmpq $0x0, -0x28(%rbp)
je 0x6c98
movq -0x28(%rbp), %rax
movq 0x8(%rax), %rdi
callq 0x44d0
movq -0x28(%rbp), %rax
movq (%rax), %rax
movq %rax, -0x28(%rbp)
jmp 0x6c77
movq -0x8(%rbp), %rax
movb $0x2, 0x44(%rax)
jmp 0x6d85
movq -0x18(%rbp), %rax
movq 0x18(%rax), %rax
movq (%rax), %rax
movq %rax, -0x30(%rbp)
cmpq $0x0, -0x30(%rbp)
je 0x6d83
movq -0x30(%rbp), %rax
movq 0x8(%rax), %rax
movq (%rax), %rax
cmpl $0x8, 0x8(%rax)
jne 0x6d19
movq -0x30(%rbp), %rax
movq 0x8(%rax), %rax
movb 0x14(%rax), %cl
movq -0x8(%rbp), %rax
movb %cl, 0x45(%rax)
movq -0x30(%rbp), %rax
movq 0x8(%rax), %rax
movl 0x10(%rax), %edx
movq -0x8(%rbp), %rax
movq -0x8(%rbp), %rcx
movzbl 0x45(%rcx), %ecx
movl %edx, 0x48(%rax,%rcx,4)
movq -0x30(%rbp), %rax
movq 0x8(%rax), %rdi
callq 0x6330
movq -0x30(%rbp), %rax
movq 0x8(%rax), %rdi
callq 0x44d0
jmp 0x6d73
movq -0x30(%rbp), %rax
movq 0x8(%rax), %rax
movq (%rax), %rax
cmpl $0xc, 0x8(%rax)
jne 0x6d71
movq -0x30(%rbp), %rax
movq 0x8(%rax), %rax
movb 0x14(%rax), %cl
movq -0x8(%rbp), %rax
movb %cl, 0x45(%rax)
movq -0x30(%rbp), %rax
movq 0x8(%rax), %rax
movl 0x10(%rax), %edx
movq -0x8(%rbp), %rax
movq -0x8(%rbp), %rcx
movzbl 0x45(%rcx), %ecx
movl %edx, 0x48(%rax,%rcx,4)
movq -0x30(%rbp), %rax
movq 0x8(%rax), %rdi
callq 0x6450
movq -0x30(%rbp), %rax
movq 0x8(%rax), %rdi
callq 0x44d0
jmp 0x6d73
movq -0x30(%rbp), %rax
movq (%rax), %rax
movq %rax, -0x30(%rbp)
jmp 0x6cb4
jmp 0x6d85
jmp 0x6d87
movq -0x10(%rbp), %rax
movq (%rax), %rax
movq %rax, -0x10(%rbp)
jmp 0x6c1b
addq $0x30, %rsp
popq %rbp
retq
nopl (%rax)