calo/unpacking/lundata.c

#include <stdlib.h>
#include <stdio.h>


void lundata_(long *dataLength,int *fd){
    

   int         ERROR;

  FILE *pFile;
  pFile = fopen("DWTemp.dat", "r");
  
  if (pFile==NULL) exit (1);

  // obtain file size.
  fseek (pFile , 0 , SEEK_END);
  dataLength = ftell (pFile);
  rewind (pFile);
  fclose (pFile);
  return 0;
}
1	mocchiut	1.1	#include <stdlib.h>
2			#include <stdio.h>
3
4
5
6			void lundata_(long dataLength,int fd){
7
8
9			int ERROR;
10
11			FILE *pFile;
12			pFile = fopen("DWTemp.dat", "r");
13
14			if (pFile==NULL) exit (1);
15
16			// obtain file size.
17			fseek (pFile , 0 , SEEK_END);
18			dataLength = ftell (pFile);
19			rewind (pFile);
20			fclose (pFile);
21			return 0;
22			}