zzy
09f4ac8de0
- Replace `scc_probe_stream_consume` with `scc_probe_stream_next` for consistent stream advancement - Remove redundant `scc_probe_stream_reset` calls before peeking, as `next` and `peek` handle state - Update `scc_cstring_new` to `scc_cstring_create` and `scc_pos_init` to `scc_pos_create` for naming consistency - Change `scc_pp_macro_get` parameter to `const scc_cstring_t*` for better const-correctness - Improves code clarity and maintains proper stream position tracking
94 lines
2.4 KiB
C
94 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 |
|
|
LOG_LEVEL_FATAL);
|
|
}
|
|
|
|
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;
|
|
}
|