send.c

Labwindows/CVI方面的例子程序实在太少了

#include <utility.h>
#include <formatio.h>
#include <rs232.h>
#include <ansi_c.h>
#include <cvirte.h>		/* Needed if linking in external compiler; harmless otherwise */
#include <userint.h>
#include "send.h"

static int panelHandle;
char com[10]={"COM1"},filename[260]={"1.txt"};

int main (int argc, char *argv[])
{
	if (InitCVIRTE (0, argv, 0) == 0)	/* Needed if linking in external compiler; harmless otherwise */
		return -1;	/* out of memory */
	if ((panelHandle = LoadPanel (0, "send.uir", PANEL)) < 0)
		return -1;
	DisplayPanel (panelHandle);
	RunUserInterface ();
	return 0;
}

int CVICALLBACK SelectPort (int panel, int control, int event,
		void *callbackData, int eventData1, int eventData2)
{
	switch (event)
	{
		case EVENT_COMMIT:
			GetCtrlVal (panelHandle, PANEL_SELECTPORT, com); 
			break;
	}
	return 0;
}

int CVICALLBACK SelectFile (int panel, int control, int event,
		void *callbackData, int eventData1, int eventData2)
{
	FILE *fp;
	switch (event)
	{
		case EVENT_COMMIT:
			
			FileSelectPopup ( "c:\\", "*.txt", "*.*", "", VAL_SELECT_BUTTON, 0, 0, 1, 0,
							 filename);
			SetCtrlVal (panelHandle, PANEL_TEXTMSG, filename);
			break;
	}
	return 0;
}

int CVICALLBACK Send (int panel, int control, int event,
		void *callbackData, int eventData1, int eventData2)
{   int size,i;
	char *buf;
	FILE *fp;
	     
	switch (event)
	{
		int error;
		case EVENT_COMMIT:
			buf=malloc(100000); 
			fp=fopen(filename,"r");  
			
			DisableBreakOnLibraryErrors ();
		 	OpenComConfig (1, com, 9600, 0, 8, 1,100000, 100000);
  			EnableBreakOnLibraryErrors ();
  			SetXMode (1, 0);
  			SetCTSMode (1, LWRS_HWHANDSHAKE_OFF);
			SetComTime (1, 1.0);
			FlushOutQ (1);
			
			GetFileInfo (filename, &size);
			
			//send file length
			sprintf(buf,"%10ld",size);
			ComWrt (1, buf, 10);
			Delay(0.5);
			/////////////
			//read file to buffer 
			i=0;
			while(1)
			{
				buf[i]=fgetc(fp);
				if(buf[i]==EOF)
				{buf[i]='\0';break;}
				i++;
			}
			//send file 
			ComWrt (1, buf, size);
			while(1)
			{
				size=GetOutQLen (1);
				if(size==0)
					break;
			} 
			fclose(fp);
			CloseCom(1);
			free(buf); 
			QuitUserInterface (0);
			break;
	}
	   
	return 0;
}