bf interpreter

SUBMITTED BY: smiley

DATE: Nov. 26, 2015, 2:42 a.m.

FORMAT: C++

SIZE: 3.6 kB

Raw Download

HITS: 916

Report
  1. /*****************************/
  2. /* bf Interpreter */
  3. /* Made by: smiley */
  4. /*****************************/
  6. #include <stdio.h>
  7. #include <string.h>
  8. #include <stdlib.h>
  9. #include <stdbool.h>
  11. #define DEBUG 0 //set to 1 to print "Hello World!" as a test
  13. typedef unsigned char byte;
  15. /*Operators*/
  17. #define INCREMENT_PTR '>'
  18. #define DECREMENT_PTR '<'
  19. #define INCREMENT_VAL '+'
  20. #define DECREMENT_VAL '-'
  21. #define OUTPUT_VAL '.'
  22. #define INPUT_VAL ','
  23. #define START_LOOP '['
  24. #define END_LOOP ']'
  28. /*Globals variables related to the interpreter*/
  29. #define MAX_NUMBER_CELLS 30000 //Each cells are a single byte
  30. #define MAX_CODE_SIZE 100000 //Max size of the source code, that should be enough
  32. byte Cells[MAX_NUMBER_CELLS]; //We will have to null them
  34. int main(int argc, char** argv){
  36. char src[MAX_CODE_SIZE];
  37. int curCell = 0; //Current Cell
  38. int flen = 0; //File Length
  41. /*ZeroMemory*/
  42. memset(src, 0, MAX_CODE_SIZE);
  43. memset(Cells, 0, MAX_NUMBER_CELLS);
  45. if (!DEBUG){ //This variable is set manually at the beginning of the code
  46. if (argc < 2){
  47. printf("Usage:Brainfuck.exe \"Input file\"\nExample: Brainfuck.exe \"C:\\test.txt\"\n\n");
  48. getchar();
  49. return -1;
  50. }
  51. /*Get Source code*/
  52. FILE* in = fopen(argv[1], "r");
  53. if (in != NULL){
  54. fseek(in, 0, SEEK_END);
  55. flen = ftell(in);
  56. if (flen > MAX_CODE_SIZE){
  57. fclose(in);
  58. printf("File is too big! Max length: %i\n", MAX_CODE_SIZE);
  59. getchar();
  60. return -1;
  61. }
  62. fseek(in, 0, SEEK_SET);
  63. fread(src, flen, 1, in);
  64. fclose(in);
  66. }
  67. else{
  68. printf("File cannot be read! Try to move it to your desktop?\n");
  69. getchar();
  70. return -1;
  71. }
  73. }
  74. else{
  75. /*This debug string will print "Hello World!" */
  76. strcpy(src, "++++++++[>++++[>++>+++>+++>+<<<<-]>+>+>->>+[<]<-]>>.>---.+++++++..+++.>>.<-.<.+++.------.--------.>>+.>++.");
  77. }
  81. int srcLen = strlen(src);
  83. /*Iterate through every char*/
  84. for (int i = 0; i < srcLen; i++){
  86. switch (src[i]){
  88. case INCREMENT_PTR:
  89. if (curCell == MAX_NUMBER_CELLS - 1) curCell = 0;
  90. else curCell++;
  91. break;
  93. case DECREMENT_PTR:
  94. if (curCell == 0) curCell = MAX_NUMBER_CELLS - 1;
  95. else curCell--;
  96. break;
  98. case INCREMENT_VAL:
  99. Cells[curCell]++;
  100. break;
  102. case DECREMENT_VAL:
  103. Cells[curCell]--;
  104. break;
  106. case OUTPUT_VAL:
  107. printf("%c", Cells[curCell]);
  108. break;
  110. case INPUT_VAL:
  111. printf("\nInput: ");
  112. Cells[curCell] = _getch();
  113. printf("\n");
  114. break;
  117. /*Gotta test*/
  118. case START_LOOP:
  119. /*incase we start a loop with 0 as a value*/
  120. if (Cells[curCell] == 0){
  121. int occurences = 0; //number of loops after it
  122. for (int a = i+1; a > srcLen; a++){
  123. if (src[a] == START_LOOP){
  124. occurences++; //we found another loop, we will have to skip his 'START_LOOP'
  125. }
  126. else if (src[a] == END_LOOP){
  127. if (occurences > 0){ occurences--; } //we have skipped a loop
  128. else{ break; } //gotta take a break
  129. }
  131. }
  132. }
  133. break;
  136. case END_LOOP:
  137. if (Cells[curCell] != 0){
  138. int occurences = 0; //number of loops before it
  139. for (int a = i-1; a > 0; a--){
  140. if (src[a] == START_LOOP){
  141. if (occurences > 0){ occurences--; }
  142. else{ i = a - 1; break; }
  143. }
  144. else if (src[a] == END_LOOP){
  145. occurences++;
  146. }
  147. if (a == 1){ return -1; }
  148. }
  149. }
  150. break;
  153. }
  155. }
  157. printf("\n\n\n\n****----DONE----****");
  158. getchar(); getchar();
  159. return 0;
  160. }
comments powered by Disqus