reachableceo/xlhtml
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Initial revision

Browse Source
This commit is contained in:
slidedraw
2002-03-20 15:31:36 +00:00
commit 89c4cdb2d7
148 changed files with 40909 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

192
cole/examples/file.c Normal file
View File

@@ -0,0 +1,192 @@
/*
cole - A free C OLE library.
cole test.
Copyright 1998, 1999 Roberto Arturo Tena Sanchez
This program is free software; you can redistribute it and/or modify
it under the terms of the GNU General Public License as published by
the Free Software Foundation; either version 2 of the License, or
(at your option) any later version.
This program is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
GNU General Public License for more details.
You should have received a copy of the GNU General Public License
along with this program; if not, write to the Free Software
Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
*/
/*
Arturo Tena <arturo@directmail.org>
*/
#include <stdio.h>
#include <cole.h>
#include <topsrcdir.h>
/* cole_fopen_direntry is tested in `directory.c' */
#define PRGNAME "file"
#define BUFFER_SIZE 128
#define FILENAME2_SIZE 108004
int
main (int argc, char **argv)
{
COLEFS * cfs;
COLEFILE * cf;
COLERRNO colerrno;
char buffer[BUFFER_SIZE];
size_t char_read;
size_t char_read_total;
char *filename2 = "/ObjectPool/_994231763/\001Ole10Native";
char *filename2_pretty = "/ObjectPool/_994231763/\\001Ole10Native";
cfs = cole_mount (COLE_TOPSRCDIR"/examples/text.doc", &colerrno);
if (cfs == NULL) {
cole_perror (PRGNAME, colerrno);
exit (1);
}
cf = cole_fopen (cfs, filename2, &colerrno);
if (cf == NULL) {
cole_perror (PRGNAME, colerrno);
cole_umount (cfs, NULL);
exit (1);
}
printf ("File size: %d\n", cole_fsize (cf));
if (cole_fsize (cf) != FILENAME2_SIZE) {
fprintf (stderr, "Test failed\n");
cole_fclose (cf, NULL);
cole_umount (cfs, NULL);
exit (1);
}
printf ("File position: %d\n", cole_ftell (cf));
char_read_total = 0;
while ((char_read = cole_fread (cf, buffer, BUFFER_SIZE, &colerrno)))
char_read_total += char_read;
cole_perror (PRGNAME, colerrno);
printf ("File position: %d\n", cole_ftell (cf));
printf ("Read %d bytes from the stream `%s'\n", char_read_total,
filename2_pretty);
if (cole_frewind (cf, &colerrno)) {
fprintf (stderr, "Test failed\n");
cole_fclose (cf, NULL);
cole_umount (cfs, NULL);
exit (1);
}
printf ("File position: %d\n", cole_ftell (cf));
if (cole_ftell (cf) != 0) {
fprintf (stderr, "Test failed\n");
cole_fclose (cf, NULL);
cole_umount (cfs, NULL);
exit (1);
}
if (cole_fseek (cf, 0, COLE_SEEK_END, &colerrno)) {
cole_perror (PRGNAME, colerrno);
cole_fclose (cf, NULL);
cole_umount (cfs, NULL);
exit (1);
}
printf ("File position: %d\n", cole_ftell (cf));
if (cole_ftell (cf) != FILENAME2_SIZE) {
fprintf (stderr, "Test failed\n");
cole_fclose (cf, NULL);
cole_umount (cfs, NULL);
exit (1);
}
if (cole_fseek (cf, 200, COLE_SEEK_END, &colerrno)) {
cole_perror (PRGNAME, colerrno);
cole_fclose (cf, NULL);
cole_umount (cfs, NULL);
exit (1);
}
printf ("File position: %d\n", cole_ftell (cf));
if (cole_ftell (cf) != FILENAME2_SIZE - 200) {
fprintf (stderr, "Test failed\n");
cole_fclose (cf, NULL);
cole_umount (cfs, NULL);
exit (1);
}
if (cole_fseek (cf, 100, COLE_SEEK_FORWARD, &colerrno)) {
cole_perror (PRGNAME, colerrno);
cole_fclose (cf, NULL);
cole_umount (cfs, NULL);
exit (1);
}
printf ("File position: %d\n", cole_ftell (cf));
if (cole_ftell (cf) != FILENAME2_SIZE - 200 + 100) {
fprintf (stderr, "Test failed\n");
cole_fclose (cf, NULL);
cole_umount (cfs, NULL);
exit (1);
}
if (cole_fseek (cf, 200, COLE_SEEK_BACKWARD, &colerrno)) {
cole_perror (PRGNAME, colerrno);
cole_fclose (cf, NULL);
cole_umount (cfs, NULL);
exit (1);
}
printf ("File position: %d\n", cole_ftell (cf));
if (cole_ftell (cf) != FILENAME2_SIZE - 200 + 100 - 200) {
fprintf (stderr, "Test failed\n");
cole_fclose (cf, NULL);
cole_umount (cfs, NULL);
exit (1);
}
if (!cole_fseek (cf, FILENAME2_SIZE + 1, COLE_SEEK_SET, &colerrno)) {
cole_perror (PRGNAME, colerrno);
cole_fclose (cf, NULL);
cole_umount (cfs, NULL);
exit (1);
}
printf ("File position: %d\n", cole_ftell (cf));
if (cole_fseek (cf, FILENAME2_SIZE, COLE_SEEK_END, &colerrno)) {
cole_perror (PRGNAME, colerrno);
cole_fclose (cf, NULL);
cole_umount (cfs, NULL);
exit (1);
}
if (cole_ftell (cf) != 0) {
fprintf (stderr, "Test failed\n");
cole_fclose (cf, NULL);
cole_umount (cfs, NULL);
exit (1);
}
printf ("File position: %d\n", cole_ftell (cf));
if (cole_fclose (cf, &colerrno)) {
cole_perror (PRGNAME, colerrno);
cole_umount (cfs, NULL);
exit (1);
}
if (cole_umount (cfs, &colerrno)) {
cole_perror (PRGNAME, colerrno);
exit (1);
}
exit (0);
}