stedolan-jq/locfile.c

#include <stdlib.h>
#include <stdio.h>
#include <assert.h>
#include <stdarg.h>
#include "jv_alloc.h"
#include "locfile.h"


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 = jv_mem_alloc(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;
}

void locfile_free(struct locfile* l) {
  jv_mem_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];
}

void locfile_locate(struct locfile* l, location loc, const char* fmt, ...) {
  va_list fmtargs;
  va_start(fmtargs, fmt);
  vfprintf(stderr, fmt, fmtargs);
  va_end(fmtargs);
  fprintf(stderr, "\n");
  if (loc.start == -1) {
    fprintf(stderr, "<unknown location>\n");
    return;
  }
  int startline = locfile_get_line(l, loc.start);
  int offset = l->linemap[startline];
	fprintf(stderr, "HERE1\n%.*s\n", locfile_line_length(l, startline)-(startline!=0), l->data + offset +(startline!=0));		// if not first line, this starts at the '\n' in l
  fprintf(stderr, "HERE2\n%*s", loc.start - offset -(startline!=0), "");		// space padding.  If not first line, offset is the '\n' at beginning of line, and one too many
			/* ASIDE: because all this code is in locfile.h instead of locfile.c, it recompiles everything, and takes forever */
			/* I've separated it out, into locfile.h;  removed static */
			/* Problem:  a few files include locfile.h to get the *.h it includes... this seems bad to me */
  for (int i = loc.start; 
       i < loc.end && i < offset + locfile_line_length(l, startline);
       i++){
    fprintf(stderr, "^");
  }
  fprintf(stderr, "\n");
}