2019-11-15 04:56:33 +00:00
|
|
|
/*************************************
|
|
|
|
* C02 Common Definitions & Routines *
|
|
|
|
*************************************/
|
|
|
|
|
|
|
|
#include <stdio.h>
|
|
|
|
#include <stdlib.h>
|
|
|
|
#include <ctype.h>
|
|
|
|
#include <string.h>
|
|
|
|
#include <errno.h>
|
|
|
|
#include <time.h>
|
|
|
|
#include "common.h"
|
|
|
|
|
|
|
|
struct timespec curtim; //Current Time
|
|
|
|
|
|
|
|
/* Error - Print Input File name & position and exit */
|
|
|
|
void exterr(int errnum) {
|
|
|
|
fprintf(stderr, "Line %d Column %d of File %s\n", curlin, curcol, inpnam);
|
|
|
|
exit(errnum);
|
|
|
|
}
|
|
|
|
|
|
|
|
/* Error - print "Expected" error message *
|
|
|
|
and exit with general failure code *
|
|
|
|
Args: expected - Description of what was expected */
|
|
|
|
void expctd(char *expstr) {
|
|
|
|
fprintf(stderr, "Expected %s, but found '%c'\n", expstr, nxtchr);
|
|
|
|
exterr(EXIT_FAILURE);
|
|
|
|
}
|
|
|
|
|
|
|
|
/* Print current position in file */
|
|
|
|
void prtpos(void) { if (inpnam[0]) printf("(%s: %d,%d) ", inpnam, curlin, curcol); }
|
|
|
|
|
|
|
|
/* Initialize elapsed time counter */
|
|
|
|
void initim(void) {
|
|
|
|
timespec_get (&curtim, TIME_UTC);
|
|
|
|
bgntim = curtim.tv_sec;
|
|
|
|
}
|
|
|
|
|
|
|
|
/* Print elapsed time */
|
|
|
|
void prttim(void) {
|
|
|
|
timespec_get (&curtim, TIME_UTC);
|
|
|
|
printf("[%d", curtim.tv_sec - bgntim);
|
|
|
|
printf(".%06d]",curtim.tv_nsec/1000);
|
|
|
|
}
|
|
|
|
|
|
|
|
/* Set comment to string */
|
|
|
|
void setcmt(char *s) { strcpy(cmtasm, s); }
|
|
|
|
|
|
|
|
/* Append string to comment */
|
|
|
|
void addcmt(char *s) {
|
|
|
|
if (strlen(cmtasm)+strlen(s)<73) strcat(cmtasm, s);
|
|
|
|
}
|
|
|
|
|
|
|
|
/* Append character to comment */
|
|
|
|
void chrcmt(char c) {
|
|
|
|
if (strlen(cmtasm)>72) return;
|
|
|
|
if (cmtasm[0] == 0 && c == ' ') return;
|
|
|
|
int i = strlen(cmtasm);
|
|
|
|
cmtasm[i++] = c;
|
|
|
|
cmtasm[i] = 0;
|
|
|
|
}
|