All right, up to version 0.9!
I managed to fix that damn error (That'll teach me to code all night), and I've re-written I/O to use the ncurses library. Since this is a dynamic library, you'll need to have the runtime environment installed to run the program, but odds are it came pre-installed with your OS.
I still need to tweak I/O to be less of a pain in the ass for V1 (verbose is a nightmare atm, due to no wraparound). I think I'm going to write a class(yeah, I know this has so far been written in C and mixing is bad, but whatever) to manage the output window, 'cause this would very quickly become more of a mess than it already is is I wrote it inline with the rest of the program.
Little fun fact: a brainfuck interpreter, written in brainfuck, has fewer characters than this interpreter (though you need a brainfuck interpreter or compiler, to execute/compile them, so they can execute your code).
Until I get the window management figured out, I suggest you guys leave verbose off.
Other changes: You must compile with the -lncurses flag (to 'link ncurses' to the dynamic library). You'll need to have the library installed (not the runtime environment) to compile, which you're less likely to have installed by default (though 'nix and osx should come with it).
Anyway, code! This is fully functional (unlike the crippled wrecks above ^^) and should run any brainfuck program.
| c: | /*
* C Brainfuck interpreter
*Author: Jordan Dykstra
* ~FroopWare~
*/
//#define VERBOSE //if VERBOSE is defined, output will describe every command in the brainfuck source while executing.
#include <stdio.h>
#include <ncurses.h>
int processChar (char);
int loop ();
int skipLoop ();
#define EXIT(a, b) \
printw ((b )); \
refresh (); \
getch (); \
endwin (); \
return 0;
char data [30000]; //dataz
char *dp; //data pointer, as per brainfuck specs
char cp; //command 'pointer' (not really, but it does the job of it as described in brainfuck)
FILE *file; //the file pointer, of course.
#ifdef VERBOSE
int depth = 0; //Depth of loops. More for debugging the interpreter, than the code it will run.
int index = 0; //integer representation of the location of the pointer, relative to 'data'.
#endif
int main (int argc, char* args []){
initscr ();
raw ();
noecho ();
printw ("FroopWare Brainfuck Interpreter Version 1.0\nCopyright(c) Jordan Dykstra\n");
refresh ();
for (int x = 0; x < 30000; x++ ){ //zero the array
data [x ]= 0;
}
//file stuff. Making sure the file opened and whatnot.
if (argc > 1) {
if ((file = fopen (args [1], "r")) == NULL){
EXIT (1, "Input file failed to load");
}
}
else {
EXIT (1, "No input file specified");
}
dp = data;
//main loop
while (!feof (file )){
cp = fgetc (file );
if (processChar (cp ) == 2) {
EXIT (1, "Expected '[' before ']'\n");
}
}
printf ("\n");
getch ();
endwin ();
return 0;
}
//returns 0 for success, 1 for eof, and 2 if it finds a ']'
int processChar (char in ){
switch (in ) {
case '>' :
#ifdef VERBOSE
printw ("Shifting pointer right to byte %d\n", ++index );
refresh ();
#endif
dp++;
break;
case '<' :
#ifdef VERBOSE
printw ("Shifting pointer left to byte %d\n", --index );
refresh ();
#endif
dp--;
break;
case '+' :
(*dp )++;
#ifdef VERBOSE
printw ("Incrementing byte %d to %d\n",index, *dp );
refresh ();
#endif
break;
case '-':
(*dp )--;
#ifdef VERBOSE
printw ("Decrementing byte %d to %d\n",index, *dp );
refresh ();
#endif
break;
case '.' :
addch (*dp );
refresh ();
break;
case ',' :
#ifdef VERBOSE
printw ("Inputting to byte %d: ", index );
refresh ();
#endif
*dp = getchar ();
#ifdef VERBOSE
printw ("%c (ASCII value: %d)\n", *dp, *dp );
#else
printw ("%c", *dp );
#endif
refresh ();
break;
case '[' :
#ifdef VERBOSE
printw ("Checking loop condition...");
refresh ();
#endif
return loop ();
break; //This is just here, because I said it should be.
case ']' :
return 2;
break;
case EOF :
return 1;
break;
default :
break;
}
return 0;
}
int loop () {//returns 0 if successful; 1 otherwise
if (*dp <= 0) return skipLoop (); //hackish, but worky?
fpos_t start_of_loop; //stream pointer position at beginning of loop ('[')
int a; //stores return value of processChar();
fgetpos (file, &start_of_loop );
while (*dp > 0) {
fsetpos (file, &start_of_loop );
#ifdef VERBOSE
depth++;
printw ("Loop entered (%d); value at data pointer: %d\n", depth, *dp ); refresh ();
#endif
while (true) {
cp = fgetc (file );
a = processChar (cp );
if (a == 2) {
#ifdef VERBOSE
depth--;
printw ("Bottom of loop %d reached from loop()", depth ); refresh ();
#endif
break;
}
if (a == 1){
printw ("Expected ']' before end of file.\n");refresh ();
return 1;
}
else if (a == 2) printw ("Expected '[' before ']'.\n");refresh ();
}
}
#ifdef VERBOSE
printw ("Exiting loop().\n", depth );refresh ();
#endif
return 0;
}
int skipLoop (){ //called by loop() whenever there's a loop that initially fails the condition (*dp = 0)
#ifdef VERBOSE
depth++;
printw ("Bypassing loop %d\n", depth ); refresh ();
#endif
int return_value;
char bleh; //I'm tired, shuddup.
while (bleh = fgetc (file )){
if (bleh == ']') {
#ifdef VERBOSE
printw ("Bottom of loop %d reached from skipLoop()\n", depth );refresh ();
depth--;
#endif
return 0;
}
else if (bleh == '[') {
if (skipLoop () == 1) return 1;
}
}
return 1;
} |
And as a bonus, here's DBFI, a brainfuck interpreter, written in brainfuck!
| brainfuck: | >>>+[[-]>>[-]++>+>+++++++[<++++>>++<-]++>>+>+>+++++[>++>++++++<<-]+>>>,<++[[>[
->>]<[>>]<<-]<[<]<+>>[>]>[<+>-[[<+>-]>]<[[[-]<]++<-[<+++++++++>[<->-]>>]>>]]<<
]<]<[[<]>[[>]>>[>>]+[<<]<[<]<+>>-]>[>]+[->>]<<<<[[<<]<[<]+<<[+>+<<-[>-->+<<-[>
+<[>>+<<-]]]>[<+>-]<]++>>-->[>]>>[>>]]<<[>>+<[[<]<]>[[<<]<[<]+[-<+>>-[<<+>++>-
[<->[<<+>>-]]]<[>+<-]>]>[>]>]>[>>]>>]<<[>>+>>+>>]<<[->>>>>>>>]<<[>.>>>>>>>]<<[
>->>>>>]<<[>,>>>]<<[>+>]<<[+<<]<] |
Save that as a file and pass it as an arg to my interpreter (henceforth "FroopWare Brainfuck Interpreter" or FWBI), then paste in any brainfuck program, followed by an exclamation point, and the input to that program (lol, I know). I warn you; nested interpreters are slow!
And a final word for this post; if anyone knows of a free, cross-platform console I/O library easier to use than ncurses (I really just need a getch() function) lemme know, 'cause it's gonna be a fair bit of work to make this pretty. |
