【SAM-4S Xplained手记】一个很xxx的词

sky-Hawk where

　　据《战国策.赵策》中《秦围赵之邯郸》记载，“周烈王崩，诸侯皆吊，齐后往。周怒，赴于齐曰：‘天崩地坼，天子下席。东藩之臣田婴齐后至，则斫之！’（齐）威王勃然怒曰：‘叱嗟，而母婢也！’卒为天下笑。”用现在的话简单说就是周烈王挂了，齐威王拖着到最后一个去吊孝，周怒了，说你一住东边欠发达地区的家臣还敢这么怠慢，欠扁！齐王咆哮了“尼玛是丫头！”后来这句话流传开来，逐渐演变，从“尔母婢也”扩展成“尔母X也”，白话变成了“你妈的......”，之后再由第二人称改为第三人称，再用汉语拼音第一个字母代替，最后成了“TMD”三个响当当的字母。鲁迅先生都曾经撰文《论‘他妈的’》以述“这话的分布，大概就跟着中国人足迹之所至罢”，“只要在中国过活的话，便总听得到他妈的”，于是总结这三个字为中国“国骂”。
　　不止中国有国骂，查百科看到各国风俗不同，在此一事上倒是不分伯仲。如果常看USA片，原声中F***恐怕是少不了的。不过大家都知道，骂并不都是表示侮辱，有时只是助词表示语气而已。对比一下fuckbrain和brainfuck，你会发现前者大概是"脑残"的意思而后者是一个很难读懂的摧残脑细胞的计算机语言。由于fuck在英语中是脏话，这种语言有时被称为brainf*ck或brainf***，甚至被简称为BF。BF语言只包括八个运算符，尽管如此，它是图灵完备的，像其它图灵机一样能够正确运行，可以完成任何计算任务。这种语言基于一个简单的机器模型，除了指令，这个机器还包括：一个以字节为单位、被初始化为零的数组、一个指向该数组的指针（初始时指向数组的第一个字节）、以及用于输入输出的两个字节流。下面是这八种状态的描述，其中每个状态由一个字符标识：

字符	含义
>	指针加一
<	指针减一
+	指针指向的字节的值加一
-	指针指向的字节的值减一
.	输出指针指向的单元内容（ASCII码）
,	输入内容到指针指向的单元（ASCII码）
[	如果指针指向的单元值为零，向后跳转到对应的]指令的次一指令处
]	如果指针指向的单元值不为零，向前跳转到对应的[指令的次一指令处

下面我们就来运行一个BF的解释器：
首先，打开串口做的控制台：

输入2，看一下现在的内存：

内存都是0，然后选3输入程序：

程序内容是，注意要在此基础上加@结尾：

1. >;+++++++++[<++++++++>;-]<.>;+++++++[<++++>;-]<+.+++++++..+++.[-]>;++++++++[<++++>;-]<.#>;+++++++++++[<+++++>;-]<.>;++++++++[<+++>;-]<.+++.------.--------.[-]>;++++++++[<++++>;-]<+.[-]++++++++++.

复制代码

然后选4，看一下输入的程序：

之后选5，运行程序，在两排减号之间是输出,

可以看到，和大多数语言的第一个例子一样，这个程序输出“Hello World!”
再按一次2看看内存。可以看到只用了第一个字节:

下面看代码，首先是brainfuck.h：

1. #ifndef BRAINFUCK_H
   
2. #define BRAINFUCK_H
   
3. 
   
4. #define BF_PROG_SIZE   500
   
5. #define BF_MEMORY_SIZE 64
   
6. 
   
7. #define BF_STACK_SIZE  16
   
8. 
   
9. typedef void(*FB_OUT_CHAR)(char c);
   
10. #define FUNC_FB_OUT_CHAR(funcname) void funcname(char c)
    
11. //FUNC_FB_OUT_CHAR(out_char);
    
12. 
    
13. typedef char(*FB_GET_CHAR)();
    
14. #define FUNC_FB_GET_CHAR(funcname) char funcname()
    
15. //FUNC_FB_GET_CHAR(out_char);
    
16. 
    
17. void BrainFuckInterpret(unsigned char *pc_CmdLine,unsigned char *pc_Memory,FB_OUT_CHAR out_char, FB_GET_CHAR get_char);
    
18. 
    
19. #endif //BRAINFUCK_H

复制代码

这是brainfuck.c，里面就是虚机的逻辑：

1. #include "brainfuck.h"
   
2. 
   
3. void BrainFuckInterpret(unsigned char *pc_CmdLine,unsigned char *pc_Memory,FB_OUT_CHAR out_char, FB_GET_CHAR get_char)
   
4. {
   
5.     //unsigned char uc_Memory[BF_MEMORY_SIZE]={0};
   
6.         unsigned char *pc_PM=pc_Memory;
   
7.         unsigned char *pc_PC=(unsigned char *)pc_CmdLine;
   
8.     unsigned short us_CurrentStackCount=0;
   
9.     unsigned short us_tmpStackCount=0;
   
10.     unsigned char *uc_Stack[BF_STACK_SIZE]={0};
    
11.         /*
    
12.         for(us_tmpStackCount=0;us_tmpStackCount<BF_MEMORY_SIZE;us_tmpStackCount++)
    
13.                 pc_Memory[us_tmpStackCount]=0;
    
14.         us_tmpStackCount=0;
    
15.         */
    
16. 
    
17.         while(*pc_PC)
    
18.         {
    
19.                 switch(*pc_PC)
    
20.                 {
    
21.         case '>': //指针加一
    
22.                         pc_PM++;
    
23.                         pc_PC++;
    
24.                         break;
    
25.         case '<': //指针减一
    
26.                         pc_PM--;
    
27.                         pc_PC++;
    
28.                         break;
    
29.         case '+': //指针指向的字节的值加一
    
30.                         (*pc_PM)++;
    
31.                         pc_PC++;
    
32.                         break;
    
33.         case '-': //指针指向的字节的值减一
    
34.                         (*pc_PM)--;
    
35.                         pc_PC++;
    
36.                         break;
    
37.         case '.': //输出指针指向的单元内容（ASCII码）
    
38.                         out_char(*pc_PM);
    
39.                         pc_PC++;
    
40.                         break;
    
41.         case ',': //输入内容到指针指向的单元（ASCII码）
    
42.                         (*pc_PM)=get_char();
    
43.                         pc_PC++;
    
44.                         break;
    
45.         case '[': //如果指针指向的单元值为零，向后跳转到对应的]指令的次一指令处
    
46.                         if((*pc_PM)==0)
    
47.                         {
    
48.                                 us_tmpStackCount=us_CurrentStackCount+1;
    
49.                                 pc_PC++;
    
50.                                 while(us_tmpStackCount>us_CurrentStackCount)
    
51.                                 {
    
52.                                         switch(*pc_PC++)
    
53.                                         {
    
54.                                         case '[':
    
55.                                                 us_tmpStackCount++;
    
56.                                                 break;
    
57.                                         case ']':
    
58.                                                 us_tmpStackCount--;
    
59.                                                 break;
    
60.                                         default:
    
61.                                                 break;
    
62.                                         }
    
63.                                 }
    
64.                         }
    
65.                         else
    
66.                         {
    
67.                                 us_CurrentStackCount++;
    
68.                                 uc_Stack[us_CurrentStackCount]=pc_PC;
    
69.                                 pc_PC++;
    
70.                         }
    
71.                         break;
    
72.         case ']': //如果指针指向的单元值不为零，向前跳转到对应的[指令的次一指令处
    
73.                         if((*pc_PM)!=0)
    
74.                         {
    
75.                                 pc_PC=uc_Stack[us_CurrentStackCount]+1;
    
76.                         }
    
77.                         else
    
78.                         {
    
79.                                 us_CurrentStackCount--;
    
80.                                 pc_PC++;
    
81.                         }
    
82.                         break;
    
83.         default:
    
84.                         pc_PC++;
    
85.                         break;
    
86.                 }
    
87.         }
    
88. }
    

复制代码

最后是菜单项的定义和事件响应以及相关函数：

1. #include "brainfuck.h"
   
2. 
   
3. //bf程序缓冲区
   
4. unsigned char ucg_bf_file[BF_PROG_SIZE]={0};
   
5. //bf内存缓冲区
   
6. unsigned char ucg_bf_mem[BF_MEMORY_SIZE]={0};
   
7. 
   
8. //打印一个字符
   
9. FUNC_FB_OUT_CHAR(console_out_char)
   
10. {
    
11. printf("%c",c);
    
12. }
    
13. //读取一个字符
    
14. FUNC_FB_GET_CHAR(console_get_char)
    
15. {
    
16. char c_char;
    
17. uart_read(CONSOLE_UART, &c_char);
    
18. while(c_char<32 || c_char>126)
    
19. {
    
20. uart_read(CONSOLE_UART, &c_char);
    
21. }
    
22. return c_char;
    
23. }
    
24. 
    
25. //事件响应
    
26. void my_command_event(struct stCosnoleMenuRoot *stRt,unsigned int ui_ID)
    
27. {
    
28. char ac_buff[512]={0};
    
29. unsigned int ui_l,ui_i,ui_j;
    
30. printf("command 0x%x is be selected\r\n",ui_ID);
    
31. switch(ui_ID)
    
32. {
    
33. case 0x11://iCnt=Cosnole_Add_A_Menu(&stMenu,0,0x11,"Clean Memory" ,MENU_TYPE_COMMAND,MENU_CHECK_TRUE,'1');//1
    
34. printf("clearning...\r\n");
    
35. for(ui_l=0;ui_l<BF_MEMORY_SIZE;ui_l++)ucg_bf_mem[ui_l]=0;
    
36. printf("clearning done..\r\n");
    
37. break;
    
38. case 0x12://iCnt=Cosnole_Add_A_Menu(&stMenu,0,0x12,"Show Memory" ,MENU_TYPE_COMMAND,MENU_CHECK_TRUE,'2');//2
    
39. printf("show memory:\r\n");
    
40. printf("[address]");
    
41. for(ui_l=0;ui_l<8;ui_l++)printf(" 0x%02x",ui_l);
    
42. printf("\r\n");
    
43. printf("-------------------------------------------------\r\n");
    
44. for(ui_l=0;ui_l<BF_MEMORY_SIZE;ui_l++)
    
45. {
    
46. if(0==ui_l%8)printf("[0x%05x]",ui_l);
    
47. printf(" 0x%02x",ucg_bf_mem[ui_l]);
    
48. if(7==ui_l%8)printf("\r\n");
    
49. }        
    
50. printf("memory show as above.\r\n");
    
51. break;
    
52. case 0x13://iCnt=Cosnole_Add_A_Menu(&stMenu,0,0x13,"Input Program" ,MENU_TYPE_COMMAND,MENU_CHECK_TRUE,'3');//3
    
53. ui_l=inputLineFromConsole("Input the Prog:",ucg_bf_file,BF_PROG_SIZE);
    
54. printf("the program has %d char.\r\n",ui_l);
    
55. break;
    
56. case 0x14://iCnt=Cosnole_Add_A_Menu(&stMenu,0,0x14,"Show Program" ,MENU_TYPE_COMMAND,MENU_CHECK_TRUE,'4');//4
    
57. printf("Program is:\r\n");
    
58. printf("%s\r\n",ucg_bf_file);
    
59. printf("the program shown as above.\r\n");
    
60. break;
    
61. case 0x15://iCnt=Cosnole_Add_A_Menu(&stMenu,0,0x15,"Run Program " ,MENU_TYPE_COMMAND,MENU_CHECK_TRUE,'5');//5
    
62. printf("Program is running...\r\n-------------------------------------\r\n");
    
63. BrainFuckInterpret(ucg_bf_file,ucg_bf_mem,console_out_char,console_get_char);
    
64. printf("\r\n-------------------------------------\r\n");
    
65. printf("the program is done.\r\n");
    
66. break;
    
67. }
    
68. show_current_menu(&stMenu);
    
69. }
    
70. 
    
71. //菜单项的定义
    
72. ………………
    
73. iCnt=Cosnole_Add_A_Menu(&stMenu,0,0x11,"Clean Memory" ,MENU_TYPE_COMMAND,MENU_CHECK_TRUE,'1');//1
    
74. iCnt=Cosnole_Add_A_Menu(&stMenu,0,0x12,"Show Memory" ,MENU_TYPE_COMMAND,MENU_CHECK_TRUE,'2');//2
    
75. iCnt=Cosnole_Add_A_Menu(&stMenu,0,0x13,"Input Program" ,MENU_TYPE_COMMAND,MENU_CHECK_TRUE,'3');//3
    
76. iCnt=Cosnole_Add_A_Menu(&stMenu,0,0x14,"Show Program" ,MENU_TYPE_COMMAND,MENU_CHECK_TRUE,'4');//4
    
77. iCnt=Cosnole_Add_A_Menu(&stMenu,0,0x15,"Run Program " ,MENU_TYPE_COMMAND,MENU_CHECK_TRUE,'5');//5
    
78. ………………

复制代码

最后，再附一个fb的windows版的ide：
bfdev-1-4-7.rar (330.83 KB, 下载次数: 7)

2013-2-6 14:42 上传

点击文件名下载附件

sky-Hawk where

很好，很强大{:soso_e100:}