基于ARM的多线程应用程序设计doc.doc

基于ARM的多线程应用程序设计【实用文档】doc
文档可直接使用可编辑，欢迎下载

开放性实验报告

题目:基于AＲＭ的多线程应用程序设计
院系名称：电气工程学院
专业班级:自动13０2
学生姓名：张鹏涛
学号:20132302０219
指导教师:张晓东

成绩：

指导老师签名：

目　 录

1　系统概述与设计要求1
1．1 系统概述1
1．２ 设计要求２
2　方案论证2
２。1 实现方法2
2.2 线程优势2
３ 硬件设计3
3.1 树莓派接口驱动LED电路设计３
4　软件设计4
4。1 驱动三色LED灯4
4．１．1　驱动实现方法4
4。１.２ wirｉngPi库安装和软件编程4
４．２　服务器和客户端５
4．2。１　服务器设计方法5
4.2.2 客户端设计方法５
５　系统调试6
设计心得6
参考文献7
附录1(ＬED驱动程序）8
附录２（服务器程序）10
附录3（客户端程序代码)１6

1 系统概述与设计要求
1．1 系统概述
　 本系统设计是基于树莓派开发板上实现的，树莓派由注册于英国的慈善组织“Raspbeｒrｙ Ｐi 基金会"开发,Ebｅn·Upｔon/埃·厄普顿为项目带头人。２012年3月,英国剑桥大学埃本·阿普顿(Eｂｅn Epton)正式发售世界上最小的台式机，又称卡片式电脑,外形只有信用卡大小,却具有电脑的所有基本功能，这就是Raspbｅrry Ｐi电脑板,中文译名＂树莓派＂.它是一款基于ARM的微型电脑主板，以SD／MicｒoSD卡为内存硬盘，卡片主板周围有1/２/4个USB接口和一个1０/100 以太网接口（A型没有网口），可连接键盘、鼠标和网线，同时拥有视频模拟信号的电视输出接口和HDMI高清视频输出接口,以上部件全部整合在一张仅比信用卡稍大的主板上,具备所有PC的基本功能。而树莓派2具有9０0MＨz内核频率， 4核 ＡＲM Cortｅx—A7，1GＢ　内存,带Ｍicro ＳD 卡插槽（支持通过它启动 Linuｘ 操作系统，如 Feｄoｒa）,40PIN接口（可以增加驱动外设)。本系统设计正式在树莓派2环境下开发实现多线程设计，设计的主要功能就是两个客户端通过服务器互相收发信息。
１．2 设计要求
　要求多个客户端能够同时连接服务器，而服务器需要创建线程来管理这多个客户端，并且能够把一个客户端发来的数据进行解析，发给另一个客户端，实现两个甚至多个客户端互相收发信息。能够通过驱动三色灯来发现系统运行的状态，红色说明有错误发生，绿色说明正在正常运行,蓝色说明有用户连接,绿色说明有客户端互相收发信息。
2 方案论证
2.1 实现方法
要实现服务器同时管理两个甚至多个客户端，就必须引入进程或线程。
2．2 线程优势
一是和进程相比,它是一种非常”节俭"的多任务操作方式。
　 进程是系统中程序执行和资源分配的基本单位。我们知道，在Lｉnux系统下，启动一个新的进程必须分配给它独立的地址空间，建立众多的数据表来维护它的代码段、堆栈段和数据段,这就导致了进程在进行切换等操作起到了现场保护作用,　这是一种"昂贵＂的多任务工作方式。
　 但是为了进一步减少处理机的空转时间支持多处理器和减少上下文切换开销,进程演化中出现了另外一个概念,这就是线程,也被人称为轻量级的进程。它是一个进程内的基本调度单位。线程是在共享的内存空间中并发的多道执行路径,它们共享一个进程的资源，比如文件描述符和信号处理等。因此,大大减少了上下文切换的开销。
　二是线程间方便的通信机制。
　 对不同进程来说，它们具有独立的数据空间，要进行数据的传递只能通过通信的方式进行，这种方式不仅费时，而且很不方便。线程则不然，由于同一进程下的线程之间共享数据空间,所以一个线程的数据可以直接为其它线程所用，这不仅快捷，而且方便。当然，数据的共享也带来其他一些问题，有的变量不能同时被两个线程所修改，有的子程序中声明为static的数据更有可能给多线程程序带来灾难性的打击,这些正是编写多线程程序时最需要注意的地方.
3 硬件设计
3．1 树莓派接口驱动LEＤ电路设计

图 3．1
　 从图３.1可以知道，要想让三色灯的红色亮起来，首先控制树莓派GPIO．27引脚输出低电平，同理可以控制GＰIO.28、GPIO29引脚电瓶来控制绿、蓝LED的启动和关闭。树莓派开发板上的相关引脚如图３.２。

图　3.2
4　软件设计
4．1 驱动三色ＬED灯
4.１．1 驱动实现方法
控制引脚电瓶的高低就能实现控制ＬＥD灯的变化，实际上三色ＬＥD可以显示无数种颜色，要想超过三种颜色的显示实现，就必须引入PＷM.ＰWM是模拟脉宽调制来控制输出引脚的实际输出电瓶大小，此系统可以控制引脚从0～3．3V变化来显示不同的颜色.wiringPi适合那些具有C语言基础，在接触树莓派之前已经接触过单片机或者嵌入式开发的人群。ｗirｉngPi的ＡＰI函数和ardｕino非常相似,这也使得它广受欢迎。作者给出了大量的说明和示例代码，这些示例代码也包括ＵＡRT设备,Ｉ２Ｃ设备和SPI设备等。
4.1。2　ｗiringPi库安装和软件编程
　 首先需要在树莓派上安装wiringPi库，我们选择直接在网上下载安装源码，输入命令:cd ～ 进入根目录下，输入命令：git clｏne gｉｔ://ｇit.droｇ 从网上下载源码包,输入命令cd ｗiriｎgPｉ　进入安装包目录下，依次输入命令:ｃｏnfigure makｅ 　make iｎstall来配置、编译和安装,最后输入命令ｓudｏ ./ｂｕｉld 来执行编译之后生成的可执行文件，完成安装。最后输入命令：gpio　rｅadaｌl会出来引脚图来确定已经安装成功。
　 接下来就需要运用库的软件编程来驱动lｅd灯啦,在写C文件时首先要加入库的头文件：#ｉｎcｌude <ｗiｒingPｉ。h>和C语言必要的头文件:#inｃlude 〈stｄiｏ.h＞，然后还需要加入实现软件PWM的头文件：#incluｄe <softPｗm。h〉。接下来我们就需要运用库的API函数wiringＰiSetup（）初始化ｗiｒｉｎｇPi，若初始化失败会返回—１；然后运用库的AＰＩ函数sofｔPwmCｒeate（)创建软件PWＭ，此函数有3个输入参数,分别是控制引脚号，ＰWＭ最小值,PWM最大值;运用库的ＡPＩ函数sofｔPwmWritｅ（）写ＰＷM的值，此函数有２个输入参数，分别是控制那个引脚号,写入的PＷM的值，此值需要在最小最大值之间。
完整代码如附录1。
4.2 服务器和客户端
４.2.１ 服务器设计方法
　　 为了方便起见,我们把服务器和客户端都定义在本地ＩＰ上进行测试，服务器端的话，首先我们需要把主函数传入的端口号记录下来,并且利用C语言标准函数ａtｏｉ转换成整型值.接着我们定义两个整型数组来存放两个客户端的套接字，然后我们根据端口去创建服务器，创建服务器需要几个函数来实现，第一个就是sｏｃket()函数来创建一个服务器的套接字,此函数有3个输入参数,我们选择ｉpv4协议族,流式Sockeｔ,TCP协议类型。然后根据端口号和本地IP配置服务器，之后就是调用绑定bind(），监听ｌisten（)函数来完成服务器的创建.之后就是根据创建的套接字来进行循环，如果有客户端连接,就保存客户端套接字创建一个线程去处理，此处我们以两个客户端为例来进行操作。若是套接字编号0发来消息，我们就转发给套接字编号1，若是超过2个的客户端连接进来我们直接关闭创建的线程就行,之后要是有客户端掉线,就把线程和客户端一块销毁。
　　 　具体代码实现见附录2
4。2。2 客户端设计方法
首先我们封装三个函数,分别是连接、读数据、写数据,开始就调用连接函数，在连接函数里我们创建客户端并通过输入的服务器ｉp和端口去连接服务器，然后我们创建两个线程分别是读和写，在读函数里我们不间断读键盘数据并发送给服务器,在写函数里不间断的读服务器发来的数据并显示在屏幕上.
　 　具体代码实现见附录3。
5 系统调试
　 此系统的调试，我们选择Liｎux虚拟机模拟调试,首先运行服务器和两个客户端，然后客户端连接服务器，之后两个客户端互相收发数据.为了方便起见，我在PC机上运行和仿真,首先安装虚拟机ＶMｗare8。0，然后安装VMware Tools，虚拟机的工具是为了共享电脑上的文件,这样可以在电脑上编写代码，在虚拟机上编译运行。
　 编译服务器的代码,输入命令gcｃ serveｒ.c —o serveｒ.exe -lpthread，回车之后会生成ｓerｖeｒ.exe可执行文件，之后我们运行服务器，输入命令．/serveｒ.exe 67８９，运行服务器，其中6789为输入的端口号。之后编译客户端代码，输入命令gｃｃ cｌｉｅｎｔ。c -o　client。exe　—ｌpｔｈrｅａd，回车之后会生成clienｔ.exe可执行文件，我们事先查看虚拟机ｉp，输入命令ｉfcｏnfｉg回车就能看到虚拟机本机ｉp,为我们客户端连接服务器所用。之后我们运行客户端一,输入命令。/clieｎt.ｅｘｅ 192.16８。2０。１09 6789，回车，然后用同样的命令运行客户端二,之后我们在一个客户端输入信息回车,在另一个客户端就能接收到,具体运行结果如图5.1，5。2,５.3。

图 5。1

图5.2

图5.3

设计心得

此次开发性试验设计让我收获甚多.一是要有一个积极的心态,独立解决问题的意识，培养扎实基础的认识。不要什么东西都感觉跟简单(很多东西可能是看似简单)就不去做了或者不屑一做，以至于性网上搜搜就可以了，这样很不好。有自己的东西有自己的付出才会有程序运行成功时的喜悦和小自豪，这样也有助于培养自己的兴趣.要时刻牢记态度决定一切。其次是兴趣，感觉学习工作中兴趣很关键，只是一个引发人积极性的问题，有了兴趣就自觉了,效率自然就高了。再次要敢于尝试和挑战。不要安于现成的程序,而且不要害怕失败,在程序调试的过程中这点尤为重要，“发现出问题然后解决问题”是一个积累经验的过程，而且很高效。最后要不懈追求。对于源代码进行不断的完善,要尽可能的实现课题所要求的功能.对于初学者或者开发较少的人来说,大量大写程序还是有必要的,但同时要注意思考,理解其实现的内在意义。还可以自己添加一些有意义的功能来实现。当看到自己编写的程序正常运行时，兴趣也会随之而来，乐此不疲，形成一个良性循环. 
短短一周的开放性ARM多线程设计很快结束了,我发现我对嵌入式这个方向、对嵌入式技术、对Ｌiｎｕx都有了新的认识。通过这次的编程，我了解到，要真真正正的掌握计算机程序还不是一件简单容易的事儿,但真正掌握后，它带给我们的将是无穷的便捷与科技，我喜欢高端便捷的生活。我希望我能做计算机这个万能机器人的主人而不是奴隶，我会努力加油的！

参考文献

［1］徐千洋．Ｌinux C函数库参考手册．［Ｍ]中国青年出版社.200２  
［2]马忠梅,马广云,徐英慧，田译.ARM嵌入式处理结构与应用基础[Ｍ］．北京航空航天大学出版社。200２ 
［3]邹思铁。嵌入式Linux设计与应用[Ｍ］.北京清华大学出版社。20０２ 
[4]杜春雷。ARM体系结构与编程[Ｍ］.清华大学出版社。20０3 
［5]田泽。嵌入式系统开发与应用［M］。北京航空航天大学出版社。２005 ［11］陈鑫。嵌入式软件技术的现状与发展动向［M]．软件世界。2０01 
[６]田泽。嵌入式系统开发与应用实验教程［Ｍ］.北京航空航天大学出版社.２004 
［７]Alｅssandro Rubinｉ,Ｊonａthan Corbｅｔ．Ｌｉnux设备驱动程序［M］．中国电力出版社.2０02

附录1（ＬEＤ驱动程序）
＃incｌude ＜wiringPi.h＞
#inclｕde 〈softＰｗｍ.h＞
＃incｌｕdｅ 〈ｓtdio.h＞
#define uｃhａr　uｎｓigned cｈar
＃define LｅdPｉnReｄ　 　２7
#define LeｄＰiｎGreen 2８
#dｅfinｅ LedPinＢlue 　 29
voｉd ledIｎｉt(void)｛
sｏftＰwmCreａte（ＬedPｉｎRｅｄ，　 ０,　100)；
softPwmＣｒｅａtｅ(LｅdPinGreen，0，　10０);
soｆtPｗmCrｅate（LeｄPinBlue，　０,　100)；
}
void ｌｅdCoｌorＳet(uｃhａr r_vａｌ，　uchａr g_val， ucｈaｒ b_val)｛
sofｔPｗmWｒite（ＬedPinＲed, r＿val);
sｏfｔＰwｍWrite（LｅdPiｎGｒeen，　g＿val）；
soｆtPｗmＷriｔe（ＬeｄPinBlue, b_vａl）;
}
inｔ maｉn(vｏid){
inｔ i;
if(wiriｎgPiSetup() ＝＝　—1）{
　 prｉntｆ("seｔup wiｒinｇPi ｆaileｄ ！＂）；
　 　 return 1；　
　}
leｄIｎit(）；
while（1){
　　 ｌedColorSet(0xff,0x00，0x0０）； //red
　 ｄｅlay（500）；
leｄCｏlorSｅt(0x00，０xfｆ，0ｘ00）； 　 //gｒeｅn
　delay（50０）；
　 leｄＣolorSet（0ｘ00，0x00,0xff)；　 /／bluｅ
　dｅｌay(500）；
　}
ｒeturn ０；
｝
附录２（服务器程序)
#ｉnclｕdｅ <sｔdio．h>
＃inclｕde <stdlib.h〉
#inｃlude <strｉnｇ．h＞
#include <sigｎal.h＞
＃includｅ 〈unisｔd.h>　
＃incluｄe ＜ｅrrｏr。h>
＃ｉncludｅ <errno。h>
＃inｃlude　〈fcntl．ｈ〉
＃iｎclude　<sys／ｔypes。h>
#iｎｃludｅ ＜sys/socｋｅｔ。ｈ＞　　
＃include ＜sys/epoｌl.h>
＃ｉnclude ＜neｔinet/ｉn.h〉　
#inclｕｄe 〈ａｒpa／iｎet。ｈ>
＃incｌuｄe　<ｐｔhread。h＞
＃deｆｉｎe BUFSIZE　１02４ 　
int　socket_clienｔ［2]；
ｉnt sｏckｅt_creａtｅ（ｉnt　port) ｛
　　 int　st ＝ socket（ＡF_ＩNＥT, SOCK_SＴREAM， 0）； 　
int on = 1; 　
if （ｓetsocｋopt（st，　SOL＿SＯＣＫEＴ， ＳO＿ＲEUSEADDR, ＆ｏn， siｚeof(on）） =＝ —1)｛
　　 pｒintf(＂seｔsoｃｋopt　is fａiled ％s\ｎ＂，　strerror(ｅｒｒno）)；
　 　 　ｒｅtuｒｎ　０;
　 　} 　
　 strｕｃt ｓockaddr_in ａddr；　　
　 memseｔ(&addｒ， 0, sizeｏf（ａddr)）;　　
addr.sｉn_ｆamilｙ = AＦ_INＥT; 　
　 　addr。sin_poｒt ＝ htons（poｒt）；
　　 addr。ｓｉn_aｄdr。s＿ａddr = htonl(INADDR_ANY）; 　
　 if (ｂind(ｓt， (ｓtruct socｋaddr *) ＆ａddr， sｉzeof(adｄr）） =＝　-1){
　 　 prinｔf（＂zhang．pt：bind is failed %s\n"， ｓｔrｅrrｏr（eｒrno）)；
　 return ０; 　
　 ｝ 　
　 ｉｆ　（ｌisten(st， 300）　== -1）｛　　
　 　ｐrintf（”zhang。ｐｔ：listeｎ iｓ faileｄ ％s＼n＂, ｓtrerror（ｅrrno）)；
　 retuｒn 0；　
　　｝　
　 ｒeturn ｓt； 　
｝
void dｅliver(ｉｎt inｄeｘ， ｃonst cｈaｒ ＊buf, ssiｚｅ_t ｌen）{
　　ssize_t　rc ＝ ０;　　
　 ｉｆ（index == 0)｛
　 　 　 if　(ｓｏcｋet_cｌieｎt［１]　== 0）｛
　 　 　 　 prinｔf(＂％ｄ：ｕser not　oｎlｉne＼ｎ", ｉndex）；
　 　 }
　 　 ｅlse｛
　　 　 　 rｃ　= send(socket_clｉｅnt[1］, buf, ｌeｎ， 0）；
　 　 　　　 printf（”send:%s，ｓend：％u ｂｙｔes\ｎ"， ｂuf,　ｒc)；　
　 　 iｆ　(rc <＝　0){
　 　 　　 if (rc =＝ 0）
　 　 ｐrintf(＂zhａng.pt:seｎｄ faｉled, disｃoｎnectiｏn,\n"）；
　 　 　　　 else
　 　 　 priｎtf("zhaｎg.pｔ：seｎｄ　faileｄ，　%s＼ｎ＂,　sｔrerror(ｅrrｎｏ）);
　 　 　 ｝　　
　 　｝ 　
｝ 　
if（ｉｎｄex ＝= 1）｛
　 　 ｉｆ（socket_clieｎｔ［0］ ＝= 0）｛
　 　 　 pｒintｆ（＂%d:useｒ ｎot　online＼n”，　index);
}　　
　 　 ｅlsｅ｛ 　
　　 ｒｃ =　ｓｅnd(sｏckｅt_ｃlient［０]， buf， leｎ, 0）;
　 　 　priｎｔｆ（"send:%ｓ,ｓｅnd:％u bytes\n＂, buf, rc)；
　 　　if(ｒｃ　〈=　0）｛
　　 　　　 　 ｉf (rc ＝=　０）　　
　 　 　 　 　　printf("zhang.pt:send faileｄ， discｏnnｅctiｏn,\ｎ”）;
　　　 　　　 ｅlse　
　　 　 　 　 　 printｆ（”zhaｎg．pt:sｅnｄ ｆaileｄ， %s\ｎ＂， strｅrroｒ(errno）)；
　 ｝
　 　 ｝ 　
　 }
} 　
void sｏckｅt_wｏrｋ（iｎt　inｄeｘ)｛
　 　char buf[BＵFＳＩＺE]；
ssiｚe_t　rｃ = 0；
　　while(1)｛ 　
　 　 　 memｓet（buf, 0， sizeｏf(bｕf））; 　
　 　　ｒc　= rｅcv(sｏckｅｔ_ｃlient［index]，　ｂuf， sｉｚeof（ｂuf)， 0)；　
　 　 if （rc <= 0）｛　　
　 　　　 　 　if (rc == 0)
　 　　priｎｔf（”％d：recｖ　disｃonnｅctｉon\n＂，　ｉｎdex);
elｓe
　　　 　 ｐrｉnｔｆ(”％d：ｒecv fａiled, ％s＼n”， ｉndex, strｅrror（eｒrnｏ)）；　
　 　 ｃlosｅ（ｓoｃｋet＿cｌienｔ[index］）；
　 　 socket＿ｃｌｉenｔ［index］ ＝ 0;
　 　 　 ｂｒeak；　
　 　 　　　 }　
　else｛
　 　 priｎtf(”％d：ｒecv:％s，ｒｅcv：％u bytｅs\n", indｅx, buf, ｒｃ)；
　 　 delｉvｅr(indeｘ， bｕf， rｃ);
　　 ｝ 　
　 ｝　
}　
ｖoiｄ *sｏcket_ｈandle（vｏid ＊ａｒｇ）{ 　
　 iｎt clｉent＿ｓt = *(inｔ　＊)arg；
free（(ｉnt　＊)arｇ)； 　
　 　prｉnｔf（＂zhanｇ．pt：handle_tｈread ｉｓ　ｂeｇin\n＂);
　　　　inｔ inｄex = 0； 　
　 if (sockeｔ＿client［0］ == 0）{
ｓｏcket_ｃlienｔ[0］ ＝ ｃlient_st;　
｝
else｛
　　 　 ｉｆ　(sｏｃkｅt_cｌient[1］　== 0）｛
ｓocket＿clieｎt[1］ = cｌient_ｓt;
　 　 　 index ＝ 1;　
　　 }　
　 　 elｓe｛ 　
　 　 　 cloｓe(client_st);
　 return　NＵLL; 　
　 　 }　
　 　｝
　　socket_ｗork(iｎｄex)； 　
　　 ｐrｉnｔｆ（"ｚｈang。pｔ：ｈandｌe_tｈｒeａd is end\ｎ")；
　 return　NULＬ；
｝
ｖｏid ｓｏｃｋaddｒ＿ｔoa（const struｃt socｋaｄdr_ｉｎ *ａddｒ, char ＊IPAddｒ)　｛
　 　 unsigneｄ　chａr *p = (unｓｉｇneｄ cｈaｒ　＊）&（ａddｒ—>sin_addｒ．s_adｄr）；
　 sprｉntf（IPAdｄr， "％u。％u。％u.%u＂,　p[0］， p[１]，　ｐ［2］， p［3])；　
｝
vｏid ｓoｃｋｅt_aｃcept（inｔ st) {　
　 　 ｐtｈrｅad_t thr＿d；
pthread_atｔr_ｔ aｔtr;　
ｐｔhｒｅad_attr_init(＆ａttr）；
　 　ptｈread_attr_seｔｄetacｈｓtaｔe（＆ａｔtr,　PＴHREAＤ_CREATＥ＿DＥTAＣHED）；
　 ｓtruｃt　sｏckａddr_in ｃlｉent_addr；　
　 　ｓocklｅn＿t len　=　sizeoｆ（cｌｉｅｎt_aｄdr）; 　
　　 wｈile(１）｛
　　 memset(&cｌieｎt_aｄｄｒ， 0， ｓｉzeｏf（client_ａddｒ）)；
ｉnｔ　cｌiｅnt＿ｓt = ａcｃeｐt(st， (voｉｄ　*)＆cｌieｎt_ａdｄｒ， &ｌｅｎ）；
　 ｉf（ｃlient_st　＝=　-1）｛　
　　 　　 　printf（＂zhang．pｔ：accepｔ faiｌed ％s＼n＂, ｓtｒerror（errno）);
　 　 breaｋ;
　　　 　}
　 　 else{
　 　 　 chaｒ sIＰ[3２］;
　 　 memset(sIP， 0， sｉｚeof（sIＰ)）；
　　 　　 socｋaddr＿toa（&cｌient_addr, sIP)；
　 　 　　priｎtf（”zhaｎg.pt：ａccｅpｔ　ｂy ％ｓ\n"，　sＩP)；
　 　 　 int *tｍp　= malloc(sizｅof（int))；
　 　 　 ＊tmｐ =　ｃlient_ｓt；　
　 　 　 pthreａｄ＿create（＆thr＿d, &aｔｔr, ｓocｋet_haｎdlｅ， ｔmp）； 　
　　 }　
｝　
　 　ｐthreaｄ_aｔｔr_dｅstroｙ（&aｔtr）；　
}
iｎt main（int　arg， cｈaｒ　＊aｒgs[］） ｛ 　
　　ｉf(arg 〈　2）{　
prinｔｆ（＂ｚhanｇ.pt:serveｒ poｒｔ　erroｒ！\n”);
　 　 　returｎ 0;
}
int iｐｏｒt ＝ atoi（arｇs［1])； 　
if（iｐoｒｔ =＝ 0)｛
　 　 prｉntf（”ｚhang。pt:ｐort %ｄ ｉs invalid！＼ｎ”， iport）；
　 　　　 ｒeturn 0;
｝
　 printf(＂zｈang。pt:sｅrver ｉs　beｇin*ｖ*!＼n＂)；
　　 meｍset（socｋeｔ＿clｉｅnt，　０， sｉｚeof（sｏcｋｅt_ｃｌient)）；
　 　 int ｓt ＝ socｋet_creａte（ｉport）；
if（sｔ =＝ 0)　ｒeturn　0;
　　 socket_acceｐt（sｔ）；
cloｓe（st）; 　
　printf（"ｚhang．pｔ：serｖｅｒ is　enｄ\n＂）；
ｒeｔurn　0；
}
附录3(客户端程序代码）
＃ｉnclｕde <ｓtdio。h＞
＃iｎｃlude <sｔdliｂ。h〉
＃ｉnｃｌudｅ 〈sｔriｎg。h〉　
＃inｃlude ＜errｎo．ｈ>
#inｃlｕdｅ 〈unistd。h〉
#inclｕｄe 〈ａrpa/ｉｎeｔ．ｈ〉 　
#iｎclude ＜syｓ/types.h>
#includｅ　〈ｓys/socket.ｈ>　
#incluｄe 〈pｔhreａｄ.ｈ＞
#dｅfｉne ＢＵFSＩZE 1０24 　
voｉd ＊socｋet＿reａd（voｉd *ａrｇ)｛
ｉnt st = ＊（ｉnt ＊）arg；
　 ｃｈａr　buｆ［BUFSIZＥ］; 　
　　 whiｌe(１){　
　 meｍseｔ（ｂuf， ０， sizｅｏf（bｕf）)；　
　 　 　　ssiｚe_t rc　= recｖ(st, ｂuf,　sｉzeof(buf)， 0）;　　
　 　 　 if(ｒc 〈=　0)｛
　 　 　 　 ｐriｎｔf（"ｚhang。pt：ｒｅcv ｆaｉled, ％s＼n”， strerror（ｅrｒno)）；
　　 　　 　 ｂｒeａk；
　　 ｝
　 eｌse{　
　 　 priｎtf(”zｈaｎg．pt：reｃv:％ｓ，recv:%u bytｅ\n”， buf，　rc）；
　 　 }　　
}
ｒeｔｕrn NＵＬＬ；
}
void ＊socket_write（void　＊arg）{　
　int　ｓt　= *（int　＊）aｒg； 　
char ｂuf［BUFSIＺE］; 　
　while（1){　
　 　 　ｍemｓet（buf， ０, ｓiｚｅof(ｂuf））； 　
　　　 　　 read(STDIＮ＿FILENO， buｆ,　ｓizeof(buｆ））；　
　 ｉnt ilｅn = strlen（buf）； 　
　　 　 if(buｆ[ｉｌｅn － 1] ＝= ＇\ｎ'）{
　　 　 ｂuf［ilen　-　1］ = 0；　
　 ｝ 　
　 ｓsizｅ_t rc ＝ seｎd（sｔ， ｂuｆ， siｚeｏf(buf)，　0); 　
　 printｆ（”ｚｈanｇ.pｔ:seｎd：％s,sｅnd:％u ｂyte\n”，　buf， rc）；　
　 iｆ(ｒc　〈=　0)｛
　 　 　 printf(＂ｚhaｎｇ.ｐt：send failed， %s\n＂, stｒｅｒror（errno））；　　
　　　　 　 ｝
}　
　 　reｔuｒn　NUＬL; 　
}
int ｓｏcｋet_coｎnｅcｔ（conｓt char ＊hostnaｍe, int iport)｛
　 　 int sｔ = socket（ＡＦ_INEＴ, SＯCK_SＴREAＭ，　0);
　 　strｕct soｃkaddr_in　ａddｒ；
　　 ｍemｓeｔ（＆ａddr, 0, ｓizeｏｆ（addr）);
addr．ｓｉn_fａmily = AF_ＩNET;　
　addｒ。sin_port ＝　htoｎs（iport)； 　
ａddr。sin_aｄdｒ．s_ａdｄr =　iｎeｔ＿addr（hosｔnａｍｅ);　
　if(coｎｎect（ｓｔ， （strucｔ socｋaddr ＊）&addr,　ｓizeｏf（ａdｄr)） == －1){　
　 　　 　priｎtf(”zhaｎg。pt:cｏnｎect ｆaileｄ ％s\ｎ"， ｓtrerror（errno））；　
｝
　 else｛ 　
　　　 　 　printf（＂zhaｎｇ。pt：cｏｎnect succeｓs\n”）;　　
｝
　 　rｅｔurn ｓt; 　
}
int main(ｉnt arg， cｈaｒ *args［］）｛
　　ｉf（aｒg 〈 3)｛
　　 ｐriｎtf（"zhang．pｔ：sｅrｖer ip ＆　poｒt erｒoｒ！\n”);　　
　ｒeturn ０;　　
｝
　inｔ ipoｒｔ =　ａtoi(args［２］);
if（iｐｏrｔ　＝= 0){ 　
　 　 　 printf（"ｚhang。pt:porｔ ％d is　invalｉｄ\n”, ｉｐｏrt）;
　　 　reｔurｎ　0；　
} 　
　　 priｎtｆ（＂ｚｈang。pt：ｃliｅｎｔ　is bｅgin\n"）;
　　　　int st ＝ sockeｔ_cｏnnｅｃt(args[1］，　iporｔ); 　
　 if（ｓt == ０)　rｅturn　0;　
pthreａｄ＿ｔ thｒ_ｒｅａd， thｒ_wriｔe； 　
pthrｅaｄ_creatｅ（&thr_ｒead, NＵＬL， ｓocket_ｒeaｄ， ＆st）；
　　 ptｈread_creaｔｅ（&tｈr_ｗrite，　NULL，　sｏｃkｅt_writｅ， ＆st）；
　 ｐthreａd＿jｏin(thr_reａd, NULL)；
ｃlosｅ（ｓt);　
　priｎtf（”zhanｇ.pｔ：cｌienｔ　ｉs end＼n＂）;　　
　 return ０;
}

ＶFP应用程序设计实例——学生学籍管理系统（1）

图１
MIS是英文Mａnagemenｔ　Iｎformａｔion　Sysｔeｍ的英文缩写，意思是信息管理系统,该系统可用于
中小型企事业单位业务处理和信息交流，从而大大提高了企业运作的效率.微软公司的Viｓual　
FoxPro可视化面向对象的编程软件是一个设计ＭIS系统即简单又快捷的好软件.下面,就以VFＰ 6．0
为开发环境,讲述设计学生学籍管理系统的详细设计过程,也为在看过了前面非表单设计的学生学
籍管理系统的朋友们继续了解并学习采用表单(Fｏrｍ）的方式设计MIS系统的方法.
　一、设计思路：学生学籍管理系统的运行以封面表单开始,如图１所示，要求用户输入登录密码，
并设置三次检查功能，若三次输入的密码均有错，则自动退出系统；否则出现系统菜单,接收用户的
操作，操作完毕后用户可以从系统菜单中退出系统。
二、系统功能：系统的功能主要分成十个功能模块，它们是:录入数据、修改数据、删除数据、查
询数据、统计数据、显示数据、打印数据、导出数据、导入数据和清空数据。录入数据可以实现学生
信息的录入;修改数据可以实现学生信息的修改；删除数据可以实现学生数据的删除；查询数据可以
实现学生信息的查询；统计数据可以实现学生人数、党员人数、学生总平均成绩、高数平均成绩、英
语平均成绩和ＶＦＰ平均成绩的统计;显示数据可以实现以字段分布和二维表两种方式显示学生信息；
打印数据可以实现用报表的形式打印学生的信息；导出数据可以实现学生数据的备份,防止数据丢
失；导入数据可以实现学生数据的还原，保证数据的正确性;清空数据可以实现学生数据的清空操
作。
　三、菜单结构框架图

四、数据库结构：（可定义表名为xj。dbf）
字段名
类型　
宽度　
小数位数　
学号　
字符型　
2

姓名
字符型　
６

性别
字符型
2

出生年月
字符型
10

邮编
字符型
6

高数
数值型
5
1
英语
数值型
5
1
VFP
数值型
5
1
是否党员
字符型
2

电话
字符型
8

通信地址
字符型
３0

备注
备注型
４

五、具体设计：（给出源代码，表单属性可参照图示在VFP属性框中设置，所有程序文件和表单文件
均通过VFP项目管理器建立)
1、学生学籍管理系统主程序源代码(可定义程序名为mａin．prg)
_ＳCＲEEN．ＷＩNDOWＳTATＥ=2　 ＆＆设置窗口规格为第2种系统窗口
_SCREEN.ＣAPＴIＯN=＂学生学籍管理系统" &&设置窗口标题为“学生学籍管理系统"
_ＳCREＥN.CLOＳA