// File: /workspace/github_c_makefile_star2_O0/aquaxis[P]synverll/src/parser.c
// Function: parser_c_source
int parser_c_source()
{
    char *token;
    TOKEN_ORDER *token_order_now, *token_order_next;
//    PARSER_TREE *now_parser_tree;
    int level = 0;
    int procvalid = 0;
//    int iflevel = 0;
    int i, max, leng;

	token = calloc(STR_MAX, 1);

    parser_level ++;

    printf(" -> Parser for C Source\n");

    while(!read_token(token)){
        insert_parser_tree(token);
        if(!strcmp(token,"#")){
            // 宣言文の処理
            // 宣言文には以下のものがある
            //  #define     : 定義宣言
            //  #include    : インクルードファイル宣言
            read_token(token);
            if(!strcmp(token,"define")){
                // #defineの取得
                // #defineは基本的に取得しない
                // 一行を読み込む
                parser_tree_current->flag = PARSER_FLAG_DEFINE;
                parser_tree_current->level = parser_level;
				read_token(token);
                strcat(parser_tree_current->define.name,token);
                while(strcmp(token,"\n")){
					read_token(token);
					strcat(parser_tree_current->define.value,token);
				}
            }else if(!strcmp(token,"include")){
                // #includeの取得
                // #inculdeの場合、標準ヘッダやシステムで提供されているヘッダは読み込まず、ユーザー定義のインクルードファイルのみ読み込む
                read_token(token);
                if(!strcmp(token,"<")){
                    // 標準インクルード・ヘッダ
                    parser_tree_current->flag = PARSER_FLAG_INCLUDE_SYS;
                    parser_tree_current->level = parser_level;
                    do{
                        read_token(token);
                        if(strcmp(token,">")){
                            strcat(parser_tree_current->include.filename,token);
                        }
                    }while(strcmp(token,">"));
                }else{
                    // ユーザー・インクルード・ヘッダ
                    // ユーザー・インクルード・ヘッダはソースの一部として抜き出し、追加する
                    parser_tree_current->flag   = PARSER_FLAG_INCLUDE_USER;
                    parser_tree_current->level  = parser_level;
                    strcat(parser_tree_current->include.filename, token);

                    //
                    max = strlen(token);
                    for(i=1;i<max-1;i++){
                        token[i-1] = token[i];
                    }
                    token[i-1] = 0x00;
//                    printf(" - include file: %s\n",token);

                    token_order_now     = get_token_order_prev();
                    token_order_next    = get_token_order_current();
                    set_token_order_current(token_order_now);
                    // ユーザー・インクルード・ヘッダの読み込み
                    read_file(token);
                    set_token_order_current_next(token_order_next);
                    set_token_order_current(token_order_now->next_ptr);
                }
            }
        }
		else if((level == 0) && !strcmp(token,"\n")){
			// 行頭で改行コードなら無視する
		}
        else{
			// この時点でフラグは確定しない
            parser_tree_current->flag = PARSER_FLAG_NOP;
            parser_tree_current->level = parser_level;
//            leng = strlen(token) + 1;
            parser_tree_current->line.body = charalloc(token);
//            memset(parser_tree_current->line.body, 0, leng);
//            strcat(parser_tree_current->line.body, token);
			while(1){
                read_token(token);
                if(token == NULL) break;
				leng = strlen(parser_tree_current->line.body) + strlen(token) + 2;
                parser_tree_current->line.body = realloc(parser_tree_current->line.body, leng);
				parser_tree_current->line.body[leng-1] = 0;
				strcat(parser_tree_current->line.body, " ");
				strcat(parser_tree_current->line.body, token);
                if(!strcmp(token,"(")){
					if(level == 0){
						// 関数検出（引数宣言開始）
						procvalid = 1;
					}
				}else if(!strcmp(token,")")){
					// 関数：引数宣言終了
				}else if(!strcmp(token,"{")){
					level++;
				}else if(!strcmp(token,"}")){
					level--;
					if((procvalid == 1) && (level == 0)){
						// 関数確定
						parser_tree_current->flag = PARSER_FLAG_PROCESS;
						break;
					}
				}else if(!strcmp(token,";")){
					if(level == 0){
						if(procvalid == 0){
							// 通常文として確定
							parser_tree_current->flag = PARSER_FLAG_LINE;
						}else{
							// 関数宣言と判断する
							parser_tree_current->flag = PARSER_FLAG_NOP;
						}
							break;
					}
				}
			}
        }
    }
    parser_level --;

    free(token);

    return 0;
}

// Assembly:
pushq %rbp
movq %rsp, %rbp
subq $0x40, %rsp
movl $0x0, -0x1c(%rbp)
movl $0x0, -0x20(%rbp)
movl $0x400, %edi            # imm = 0x400
movl $0x1, %esi
callq 0x10c0
movq %rax, -0x8(%rbp)
movl 0x16189(%rip), %eax     # 0x180e8
addl $0x1, %eax
movl %eax, 0x16180(%rip)     # 0x180e8
leaq 0x11163(%rip), %rdi     # 0x130d2
movb $0x0, %al
callq 0x1090
movq -0x8(%rbp), %rdi
callq 0x11aa0
cmpl $0x0, %eax
setne %al
xorb $-0x1, %al
testb $0x1, %al
jne 0x1f90
jmp 0x23ce
movq -0x8(%rbp), %rdi
callq 0x1550
movq -0x8(%rbp), %rdi
leaq 0x11147(%rip), %rsi     # 0x130eb
callq 0x10d0
cmpl $0x0, %eax
jne 0x21c3
movq -0x8(%rbp), %rdi
callq 0x11aa0
movq -0x8(%rbp), %rdi
leaq 0x11127(%rip), %rsi     # 0x130ed
callq 0x10d0
cmpl $0x0, %eax
jne 0x204b
movq 0x16121(%rip), %rax     # 0x180f8
movl $0x3, 0x10(%rax)
movl 0x16104(%rip), %ecx     # 0x180e8
movq 0x1610d(%rip), %rax     # 0x180f8
movl %ecx, 0x14(%rax)
movq -0x8(%rbp), %rdi
callq 0x11aa0
movq 0x160fa(%rip), %rdi     # 0x180f8
addq $0x20, %rdi
movq -0x8(%rbp), %rsi
callq 0x1150
movq -0x8(%rbp), %rdi
leaq 0x12faa(%rip), %rsi     # 0x14fc0
callq 0x10d0
cmpl $0x0, %eax
je 0x2046
movq -0x8(%rbp), %rdi
callq 0x11aa0
movq 0x160c8(%rip), %rdi     # 0x180f8
addq $0x20, %rdi
addq $0x400, %rdi            # imm = 0x400
movq -0x8(%rbp), %rsi
callq 0x1150
jmp 0x200b
jmp 0x21be
movq -0x8(%rbp), %rdi
leaq 0x1109e(%rip), %rsi     # 0x130f4
callq 0x10d0
cmpl $0x0, %eax
jne 0x21bc
movq -0x8(%rbp), %rdi
callq 0x11aa0
movq -0x8(%rbp), %rdi
leaq 0x11084(%rip), %rsi     # 0x130fc
callq 0x10d0
cmpl $0x0, %eax
jne 0x20f1
movq 0x1606f(%rip), %rax     # 0x180f8
movl $0x1, 0x10(%rax)
movl 0x16052(%rip), %ecx     # 0x180e8
movq 0x1605b(%rip), %rax     # 0x180f8
movl %ecx, 0x14(%rax)
movq -0x8(%rbp), %rdi
callq 0x11aa0
movq -0x8(%rbp), %rdi
leaq 0x1104a(%rip), %rsi     # 0x130fe
callq 0x10d0
cmpl $0x0, %eax
je 0x20d5
movq 0x16033(%rip), %rdi     # 0x180f8
addq $0x820, %rdi            # imm = 0x820
movq -0x8(%rbp), %rsi
callq 0x1150
jmp 0x20d7
movq -0x8(%rbp), %rdi
leaq 0x1101c(%rip), %rsi     # 0x130fe
callq 0x10d0
cmpl $0x0, %eax
jne 0x20a0
jmp 0x21ba
movq 0x16000(%rip), %rax     # 0x180f8
movl $0x2, 0x10(%rax)
movl 0x15fe3(%rip), %ecx     # 0x180e8
movq 0x15fec(%rip), %rax     # 0x180f8
movl %ecx, 0x14(%rax)
movq 0x15fe2(%rip), %rdi     # 0x180f8
addq $0x820, %rdi            # imm = 0x820
movq -0x8(%rbp), %rsi
callq 0x1150
movq -0x8(%rbp), %rdi
callq 0x1070
movl %eax, -0x28(%rbp)
movl $0x1, -0x24(%rbp)
movl -0x24(%rbp), %eax
movl -0x28(%rbp), %ecx
subl $0x1, %ecx
cmpl %ecx, %eax
jge 0x216c
movq -0x8(%rbp), %rax
movslq -0x24(%rbp), %rcx
movb (%rax,%rcx), %dl
movq -0x8(%rbp), %rax
movl -0x24(%rbp), %ecx
subl $0x1, %ecx
movslq %ecx, %rcx
movb %dl, (%rax,%rcx)
movl -0x24(%rbp), %eax
addl $0x1, %eax
movl %eax, -0x24(%rbp)
jmp 0x2139
movq -0x8(%rbp), %rax
movl -0x24(%rbp), %ecx
subl $0x1, %ecx
movslq %ecx, %rcx
movb $0x0, (%rax,%rcx)
movb $0x0, %al
callq 0x11b30
movq %rax, -0x10(%rbp)
movb $0x0, %al
callq 0x11b10
movq %rax, -0x18(%rbp)
movq -0x10(%rbp), %rdi
callq 0x11b40
movq -0x8(%rbp), %rdi
callq 0x11ba0
movq -0x18(%rbp), %rdi
callq 0x11b60
movq -0x10(%rbp), %rax
movq (%rax), %rdi
callq 0x11b40
jmp 0x21bc
jmp 0x21be
jmp 0x23c9
cmpl $0x0, -0x1c(%rbp)
jne 0x21e3
movq -0x8(%rbp), %rdi
leaq 0x12dec(%rip), %rsi     # 0x14fc0
callq 0x10d0
cmpl $0x0, %eax
jne 0x21e3
jmp 0x23c7
movq 0x15f0e(%rip), %rax     # 0x180f8
movl $0x0, 0x10(%rax)
movl 0x15ef1(%rip), %ecx     # 0x180e8
movq 0x15efa(%rip), %rax     # 0x180f8
movl %ecx, 0x14(%rax)
movq -0x8(%rbp), %rdi
callq 0x13b0
movq %rax, %rcx
movq 0x15ee4(%rip), %rax     # 0x180f8
movq %rcx, 0x6c50(%rax)
movq -0x8(%rbp), %rdi
callq 0x11aa0
cmpq $0x0, -0x8(%rbp)
jne 0x2230
jmp 0x23c5
movq 0x15ec1(%rip), %rax     # 0x180f8
movq 0x6c50(%rax), %rdi
callq 0x1070
movq %rax, -0x38(%rbp)
movq -0x8(%rbp), %rdi
callq 0x1070
movq %rax, %rcx
movq -0x38(%rbp), %rax
addq %rcx, %rax
addq $0x2, %rax
movl %eax, -0x2c(%rbp)
movq 0x15e90(%rip), %rax     # 0x180f8
movq 0x6c50(%rax), %rdi
movslq -0x2c(%rbp), %rsi
callq 0x1110
movq %rax, %rcx
movq 0x15e76(%rip), %rax     # 0x180f8
movq %rcx, 0x6c50(%rax)
movq 0x15e68(%rip), %rax     # 0x180f8
movq 0x6c50(%rax), %rax
movl -0x2c(%rbp), %ecx
subl $0x1, %ecx
movslq %ecx, %rcx
movb $0x0, (%rax,%rcx)
movq 0x15e4d(%rip), %rax     # 0x180f8
movq 0x6c50(%rax), %rdi
leaq 0x110c5(%rip), %rsi     # 0x1337e
callq 0x1150
movq 0x15e33(%rip), %rax     # 0x180f8
movq 0x6c50(%rax), %rdi
movq -0x8(%rbp), %rsi
callq 0x1150
movq -0x8(%rbp), %rdi
leaq 0x10e20(%rip), %rsi     # 0x13100
callq 0x10d0
cmpl $0x0, %eax
jne 0x22fc
cmpl $0x0, -0x1c(%rbp)
jne 0x22f7
movl $0x1, -0x20(%rbp)
jmp 0x23c0
movq -0x8(%rbp), %rdi
leaq 0x11e12(%rip), %rsi     # 0x14119
callq 0x10d0
cmpl $0x0, %eax
jne 0x2316
jmp 0x23be
movq -0x8(%rbp), %rdi
leaq 0x10de1(%rip), %rsi     # 0x13102
callq 0x10d0
cmpl $0x0, %eax
jne 0x2339
movl -0x1c(%rbp), %eax
addl $0x1, %eax
movl %eax, -0x1c(%rbp)
jmp 0x23bc
movq -0x8(%rbp), %rdi
leaq 0x10dc0(%rip), %rsi     # 0x13104
callq 0x10d0
cmpl $0x0, %eax
jne 0x2375
movl -0x1c(%rbp), %eax
addl $-0x1, %eax
movl %eax, -0x1c(%rbp)
cmpl $0x1, -0x20(%rbp)
jne 0x2373
cmpl $0x0, -0x1c(%rbp)
jne 0x2373
movq 0x15d8e(%rip), %rax     # 0x180f8
movl $0x19, 0x10(%rax)
jmp 0x23c5
jmp 0x23ba
movq -0x8(%rbp), %rdi
leaq 0x12354(%rip), %rsi     # 0x146d4
callq 0x10d0
cmpl $0x0, %eax
jne 0x23b8
cmpl $0x0, -0x1c(%rbp)
jne 0x23b6
cmpl $0x0, -0x20(%rbp)
jne 0x23a6
movq 0x15d5b(%rip), %rax     # 0x180f8
movl $0x3d, 0x10(%rax)
jmp 0x23b4
movq 0x15d4b(%rip), %rax     # 0x180f8
movl $0x0, 0x10(%rax)
jmp 0x23c5
jmp 0x23b8
jmp 0x23ba
jmp 0x23bc
jmp 0x23be
jmp 0x23c0
jmp 0x221b
jmp 0x23c7
jmp 0x23c9
jmp 0x1f76
movl 0x15d14(%rip), %eax     # 0x180e8
addl $-0x1, %eax
movl %eax, 0x15d0b(%rip)     # 0x180e8
movq -0x8(%rbp), %rdi
callq 0x1030
xorl %eax, %eax
addq $0x40, %rsp
popq %rbp
retq
nop