zzy
874a58281f
- Change header guard from `__SMCC_LEX_PARSER_H__` to `__SCC_LEX_PARSER_H__` - Prefix all lexer functions with `scc_` (e.g., `lex_parse_char` → `scc_lex_parse_char`) - Add new helper function `scc_lex_parse_is_identifier_header` - Update references in source and test files to use new function names - Replace `core_stream_eof` with `scc_stream_eof` for consistency
93 lines
2.4 KiB
C
93 lines
2.4 KiB
C
#include <lexer.h>
|
|
#include <lexer_log.h>
|
|
#include <stdbool.h>
|
|
#include <stdio.h>
|
|
#include <stdlib.h>
|
|
#include <string.h>
|
|
/// gcc -g ../lexer.c ../token.c test_lexer.c -o test_lexer
|
|
/*
|
|
tok_tConstant {
|
|
int have;
|
|
union {
|
|
char ch;
|
|
int i;
|
|
float f;
|
|
double d;
|
|
long long ll;
|
|
char* str;
|
|
};
|
|
};
|
|
*/
|
|
|
|
int g_num;
|
|
int g_num_arr[3];
|
|
int main(int argc, char *argv[]) {
|
|
// int num = 0;
|
|
if (argc == 3 && strcmp(argv[2], "--debug") == 0) {
|
|
log_set_level(NULL, LOG_LEVEL_ALL);
|
|
} else {
|
|
// FIXME it is a hack lexer_logger
|
|
log_set_level(&__smcc_lexer_log, LOG_LEVEL_NOTSET);
|
|
log_set_level(NULL, LOG_LEVEL_INFO | LOG_LEVEL_WARN | LOG_LEVEL_ERROR);
|
|
}
|
|
|
|
const char *file_name = __FILE__;
|
|
if (argc == 2) {
|
|
file_name = argv[1];
|
|
}
|
|
FILE *fp = fopen(file_name, "rb");
|
|
if (fp == NULL) {
|
|
perror("open file failed");
|
|
return 1;
|
|
}
|
|
|
|
if (fseek(fp, 0, SEEK_END) != 0) {
|
|
perror("fseek failed");
|
|
return 1;
|
|
}
|
|
usize fsize = ftell(fp);
|
|
LOG_INFO("file size: %zu", fsize);
|
|
if (fseek(fp, 0, SEEK_SET)) {
|
|
perror("fseek failed");
|
|
return 1;
|
|
}
|
|
|
|
char *buffer = (char *)malloc(fsize);
|
|
|
|
usize read_ret = fread(buffer, 1, fsize, fp);
|
|
fclose(fp);
|
|
if (read_ret != fsize) {
|
|
LOG_FATAL("fread failed read_ret %u != fsize %u", read_ret, fsize);
|
|
free(buffer);
|
|
return 1;
|
|
}
|
|
|
|
scc_lexer_t lexer;
|
|
scc_mem_probe_stream_t mem_stream = {0};
|
|
scc_probe_stream_t *stream =
|
|
scc_mem_probe_stream_init(&mem_stream, buffer, fsize, false);
|
|
Assert(stream != null);
|
|
scc_cstring_clear(&stream->name);
|
|
scc_cstring_append_cstr(&stream->name, file_name, strlen(file_name));
|
|
scc_lexer_init(&lexer, stream);
|
|
scc_lexer_tok_t tok;
|
|
|
|
while (1) {
|
|
scc_lexer_get_valid_token(&lexer, &tok);
|
|
if (tok.type == SCC_TOK_EOF) {
|
|
break;
|
|
}
|
|
LOG_DEBUG("token `%s` at %s:%u:%u", scc_get_tok_name(tok.type),
|
|
scc_cstring_as_cstr(&tok.loc.name), tok.loc.line,
|
|
tok.loc.col);
|
|
Assert(tok.loc.offset <= fsize);
|
|
// LOG_DEBUG("%s", tok.val.str);
|
|
// printf("line: %d, column: %d, type: %3d, typename: %s\n",
|
|
// lexer.line, lexer.index, tok.type, scc_get_tok_name(tok.type));
|
|
}
|
|
|
|
free(buffer);
|
|
LOG_INFO("Lexer is Ok...");
|
|
return 0;
|
|
}
|