X-Git-Url: http://4ch.mooo.com/gitweb/?a=blobdiff_plain;f=src%2Flib%2Flib_head.c;h=0053446f965d4a2accf812e15c89a37b0c75e3f6;hb=75e7cf251be21eb29a7c5df05b4b1320393214ff;hp=e9004d5e508d27a7a120a122f0e44a9132dff239;hpb=56bb29bded61d906400612e14b81f2d5f34b7600;p=16.git

diff --git a/src/lib/lib_head.c b/src/lib/lib_head.c
index e9004d5e..0053446f 100644
--- a/src/lib/lib_head.c
+++ b/src/lib/lib_head.c
@@ -3,7 +3,8 @@
 /* local function */
 void wait(clock_t wait);
 void* AllocateLargestFreeBlock(size_t* Size);
-size_t GetFreeSize(void);
+size_t GetFreeSize(void);
+long int filesize(FILE *fp);
 
 /* Function: Wait **********************************************************
 *
@@ -93,3 +94,15 @@ size_t GetFreeSize(void)
 
   return total;
 }
+
+long int
+filesize(FILE *fp)
+{
+	long int save_pos, size_of_file;
+
+	save_pos = ftell(fp);
+	fseek(fp, 0L, SEEK_END);
+	size_of_file = ftell(fp);
+	fseek(fp, save_pos, SEEK_SET);
+	return(size_of_file);
+}