seppdroid/Digital-Research-Source-Code
1
0
Fork 0
mirror of https://github.com/SEPPDROID/Digital-Research-Source-Code.git synced 2025-10-24 17:04:19 +00:00
Code Issues Actions Packages Projects Releases Wiki Activity

Upload

Browse Source 
Digital Research
This commit is contained in:
Sepp J Morris
2020-11-06 18:50:37 +01:00
parent 621ed8ccaf
commit 31738079c4
8481 changed files with 1888323 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

57
CPM OPERATING SYSTEMS/CPM 68K/1.0X SOURCES/v101/test/wtest.c Normal file
View File

@@ -0,0 +1,57 @@
#define MAXNUM 1266
main()
{
int fd; /* Out descriptor */
int i;
int length;
short buffer[MAXNUM];
short chk[MAXNUM];
if((fd=creat("test.dat",0,1)) < 0)
{
printf("Cannot create test.dat\n");
exit();
}
for(i=0; i<MAXNUM; i++)
buffer[i] = i; /* Unique tag */
if(write(fd,&buffer[0],2*MAXNUM/3) != 2*MAXNUM/3)
{
printf("Write error 1\n");
exit();
}
if(write(fd,&buffer[MAXNUM/3],2*MAXNUM/3) != 2*MAXNUM/3)
{
printf("Write error 2\n");
exit();
}
if(write(fd,&buffer[(2*MAXNUM)/3],2*MAXNUM/3) != 2*MAXNUM/3)
{
printf("Write error 3\n");
exit();
}
if(lseek(fd,0L,0) != 0)
{
printf("Seek error\n");
}
close(fd);
if((fd=open("test.dat",0,1)) < 0)
{
printf("Cannot re-open test file\n");
exit();
}
for(i=0; i<MAXNUM; i++)
{
if(read(fd,&chk[i],2) != 2)
{
printf("Read failure at offset=%d\n",i*2);
}
}
for(i=0; i<MAXNUM; i++)
{
if(chk[i] != i)
printf("Compare error file=%4d i=%4d\n",buffer[i],i);
}
exit();
}