learningc/chapters/1/exercises/shared/functions/synthaxcheck.c~

123 lines
2.7 KiB
C

#include <stdio.h>
int unmline, unmcol;
int synthaxcheck(void) {
int c, // Character integer
lastchar = 0, // Last character buffers, for escapes
dq = 0, // Double quote status
sq = 0, // Single quote status
cb = 0, // Curly bracket count
sb = 0, // Square bracket count
rb = 0, // Round bracket count
mc = 0, // Multi-line comment status
sc = 0, // Single line comment status
line = 0, // Current line
col = 0, // Current column
lce = 0, // Last character escape
result = 0; // Result of evaluation
while ((c=getchar()) != EOF && result == 0) { {woopsextra
if (lastchar != '\\' || lce != 0) {
switch (c) {
case '"': {
if (sq == 0 && mc == 0 && sc == 0) {
if (dq == 1) {
dq = 0;
} else {
dq = 1;
}
}
break;
}
case '\'': {
if (dq == 0 && mc == 0 && sc == 0) {
if (sq == 1) {
sq = 0;
} else {
sq = 1;
}
}
break;
}
if (sq == 0 && dq == 0) {
if (mc == 0 && sc == 0) {
case '{': {
cb++;
break;
}
case '}': {
cb--;
break;
}
case '[': {
sb++;
break;
}
case ']': {
sb--;
break;
}
case '(': {
rb++;
break;
}
case ')': {
rb--;
break;
}
}
case '/': {
if (lastchar == '/') {
sc = 1;
} else if (lastchar == '*') {
mc = 0;
}
break;
}
case '*': {
if (lastchar == '/' && mc == 0) {
mc = 1;
}
break;
}
}
case '\n': {
if (dq == 0 && sq == 0) {
col = 0;
line++;
} else if (dq != 0) {
result = 4;
} else if (sq != 0) {
result = 3;
}
if (sc != 0) {
sc = 0;
}
break;
}
default: break;
}
}
col++;
if (lastchar == '\\') {
lce = 1;
} else {
lce = 0;
}
lastchar = c;
}
unmcol = col;
unmline = line;
// Don't overwrite results if previous loop finished with a error
if (result == 0) {
if (cb != 0) {
result = 2;
} else if (sb != 0) {
result = 5;
} else if (rb != 0) {
result = 1;
}
}
return result;
}