#include <stdlib.h>
#include <stdio.h>
#include <string.h>
#include <unixio.h>
#ifdef VAX
#include <file.h> 
#else
#include <fcntl.h> 
#endif
int file_length(int f);
main()
{
	char *bf="1234\n";
	int i;
	int len = strlen(bf);
	int h_his;
	int total=0;

	h_his =  open("test.dat",O_RDWR | O_CREAT,0);
	write(h_his,bf,len);
	close(h_his);
	for (i=0; i<10; i++) {
		h_his =  open("test.dat",O_RDWR,0);
		printf("File Length %d \n",file_length(h_his));
		write(h_his,bf,len);
		close(h_his);
	}
}
#ifdef VMS
#include <stat.h>
#else
#include <sys/stat.h>
#endif
int file_length(int f)
{
	struct stat bf;
	fstat(f,&bf);
	return bf.st_size;
}