diff options
| author | Tobias Klauser <tklauser@distanz.ch> | 2008-01-27 11:37:44 +0100 |
|---|---|---|
| committer | Tobias Klauser <tklauser@xenon.tklauser.home> | 2008-01-27 11:37:44 +0100 |
| commit | 7e0f021a9aec35fd8e6725e87e3313b101d26f5e (patch) | |
| tree | b1cacc4b24393f517aeb4610e9e1021f954307a8 /reference/C/CONTRIB/SNIP/ansiflen.c | |
Initial import (2.0.2-6)2.0.2-6
Diffstat (limited to 'reference/C/CONTRIB/SNIP/ansiflen.c')
| -rwxr-xr-x | reference/C/CONTRIB/SNIP/ansiflen.c | 34 |
1 files changed, 34 insertions, 0 deletions
diff --git a/reference/C/CONTRIB/SNIP/ansiflen.c b/reference/C/CONTRIB/SNIP/ansiflen.c new file mode 100755 index 0000000..4dec5cd --- /dev/null +++ b/reference/C/CONTRIB/SNIP/ansiflen.c @@ -0,0 +1,34 @@ +/*
+** FLENGTH.C - a simple function using all ANSI-standard functions
+** to determine the size of a file.
+**
+** Public domain by Bob Jarvis.
+*/
+
+#include <stdio.h>
+
+long flength(char *fname)
+{
+ FILE *fptr;
+ long length = -1L;
+
+ fptr = fopen(fname, "rb");
+ if(fptr != NULL)
+ {
+ fseek(fptr, 0L, SEEK_END);
+ length = ftell(fptr);
+ fclose(fptr);
+ }
+
+ return length;
+}
+
+#ifdef TEST
+
+main(int argc, char *argv[])
+{
+ printf("Length of %s = %ld\n", argv[0], flength(argv[0]));
+ return 0;
+}
+
+#endif /* TEST */
|