Getting proper locations through flex/bison was more effort than was advertised.
63 lines
1.4 KiB
C
63 lines
1.4 KiB
C
#include <stdlib.h>
|
|
#include <stdio.h>
|
|
#include <assert.h>
|
|
typedef struct {
|
|
int start, end;
|
|
} location;
|
|
|
|
struct locfile {
|
|
const char* data;
|
|
int length;
|
|
int* linemap;
|
|
int nlines;
|
|
};
|
|
|
|
static void locfile_init(struct locfile* l, const char* data, int length) {
|
|
l->data = data;
|
|
l->length = length;
|
|
l->nlines = 1;
|
|
for (int i=0; i<length; i++) {
|
|
if (data[i] == '\n') l->nlines++;
|
|
}
|
|
l->linemap = malloc(sizeof(int) * (l->nlines + 1));
|
|
l->linemap[0] = 0;
|
|
int line = 1;
|
|
for (int i=0; i<length; i++) {
|
|
if (data[i] == '\n') {
|
|
l->linemap[line] = i;
|
|
line++;
|
|
}
|
|
}
|
|
l->linemap[l->nlines] = length;
|
|
}
|
|
|
|
static void locfile_free(struct locfile* l) {
|
|
free(l->linemap);
|
|
}
|
|
|
|
static int locfile_get_line(struct locfile* l, int pos) {
|
|
assert(pos < l->length);
|
|
int line = 0;
|
|
while (l->linemap[line+1] < pos) line++;
|
|
assert(line < l->nlines);
|
|
return line;
|
|
}
|
|
|
|
static int locfile_line_length(struct locfile* l, int line) {
|
|
assert(line < l->nlines);
|
|
return l->linemap[line+1] - l->linemap[line];
|
|
}
|
|
|
|
static void locfile_locate(struct locfile* l, location loc) {
|
|
int startline = locfile_get_line(l, loc.start);
|
|
int offset = l->linemap[startline];
|
|
printf("%.*s\n", locfile_line_length(l, startline), l->data + offset);
|
|
printf("%*s", loc.start - offset, "");
|
|
for (int i = loc.start;
|
|
i < loc.end && i < offset + locfile_line_length(l, startline);
|
|
i++){
|
|
printf("^");
|
|
}
|
|
printf("\n");
|
|
}
|