void _cole_fopen_action(COLEDIRENT * cde, void *_info)
{
struct _cole_fopen_info *info;
info = (struct _cole_fopen_info *) _info;
if (!cole_direntry_isfile(cde)) {
info->colerrno = COLE_EFILENAMEISNOTFILE;
info->succ = 0;
return;
}
info->file = cole_fopen_direntry(cde, &info->colerrno);
if (info->file == NULL) {
/* colerrno is set */
info->succ = 0;
return;
}
info->succ = 1;
}
int
main (int argc, char **argv)
{
COLEFS * cfs;
COLEDIR * cd;
COLEDIRENT * cde;
COLEFILE * cf;
COLERRNO colerrno;
char * entry_name;
char buffer[BUFFER_SIZE];
size_t char_read;
size_t char_read_total;
if (argc != 2) {
fprintf (stderr, "cole demo. cole is a free C OLE library.\n"
"Usage: demo <FILE>\n");
return 1;
}
/*
* version info
*/
printf ("Version info: (%d.%d.%d) (%d.%d.%d) (%s)\n",
COLE_MAJOR_VERSION, COLE_MINOR_VERSION, COLE_MICRO_VERSION,
cole_major_version, cole_minor_version, cole_micro_version,
cole_version);
printf ("Host info: (%s)\n", cole_host_info);
cfs = cole_mount (argv[1], &colerrno);
if (cfs == NULL) {
cole_perror (PRGNAME, colerrno);
exit (1);
}
if (cole_print_tree (cfs, &colerrno)) {
cole_perror (PRGNAME, colerrno);
cole_umount (cfs, NULL);
exit (1);
}
cd = cole_opendir_rootdir (cfs, &colerrno);
if (cd == NULL) {
cole_perror (PRGNAME, colerrno);
cole_umount (cfs, NULL);
exit (1);
}
for (cde = cole_visiteddirentry (cd); cde != NULL;
cde = cole_nextdirentry (cd)) {
if (cole_direntry_isdir (cde))
printf ("DIR ");
else if (cole_direntry_isfile (cde)) {
printf ("FILE ");
/* open the file using their direntry */
cf = cole_fopen_direntry (cde, &colerrno);
if (cf == NULL) {
cole_perror ("travel", colerrno);
cole_closedir (cd, NULL);
cole_umount (cfs, NULL);
exit (1);
}
if (cole_fclose (cf, &colerrno)) {
cole_perror (PRGNAME, colerrno);
cole_closedir (cd, NULL);
cole_umount (cfs, NULL);
exit (1);
}
} else
printf ("???? ");
printf ("%7u ", cole_direntry_getsize (cde));
entry_name = cole_direntry_getname (cde);
printf ("%08lx-%08lx %08lx-%08lx\t",
cole_direntry_getdays1 (cde),
cole_direntry_getsec1 (cde),
cole_direntry_getdays2 (cde),
cole_direntry_getsec2 (cde));
if (!isprint ((int)entry_name[0]))
printf ("'\\x%02x%s'\n", entry_name[0], entry_name+1);
else
printf ("'%s'\n", entry_name);
}
if (cole_closedir (cd, &colerrno)) {
cole_umount (cfs, NULL);
exit (1);
}
cf = cole_fopen (cfs, "\005SummaryInformation", &colerrno);
if (cf == NULL) {
cole_perror (PRGNAME, colerrno);
cole_umount (cfs, NULL);
exit (1);
}
char_read_total = 0;
printf ("Reading: ");
while ((char_read = cole_fread (cf, buffer, BUFFER_SIZE, &colerrno))) {
printf ("[%d]", char_read);
char_read_total += char_read;
}
cole_perror (PRGNAME, colerrno);
printf ("\nRead %d bytes from the stream '\\005SummaryInformation'\n",
char_read_total);
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);
}
void dump_file(COLEDIRENT *cde, void *_info)
{
unsigned int length=0, opcode=0, target=0, count = 0;
unsigned char buf[16];
COLEFILE *cf;
COLERRNO err;
cf = cole_fopen_direntry(cde, &err);
/* Ouput Header */
printf("<!DOCTYPE HTML PUBLIC \"-//W3C//DTD HTML 3.2//EN\">\n");
printf("<HTML><HEAD><TITLE>%s", filename);
printf("</TITLE></HEAD><BODY>\n");
/* Output body */
#if (MODE == 1)
while (cole_fread(cf, buf, 8, &err)) /* For mode >= 1 */
#else
while (cole_fread(cf, buf, 1, &err))
#endif
{
if (MODE == 0)
{
if (count == 0)
{
length = 0;
opcode = (unsigned)buf[0];
target = 80; /* ficticious number */
printf("<br>");
}
else if (count == 1)
opcode |= (buf[0]<<8)&0x0000FFFFL;
else if (count == 2)
length = (unsigned)buf[0];
else if (count == 3)
{
length |= (buf[0]<<8);
target = length;
printf("<br>\nLength:%04X Opcode:%04X - ", length, opcode);
output_opcode_string(opcode);
puts("<br>\n");
}
if (count > 3)
{ /* Here is where we want to process the data */
/* based on the opcode... */
#if (TEXT == 0)
if (isprint(buf[0]))
putc(buf[0], stdout);
#else
printf("%02X ", buf[0]);
if (((count-3) % 8) == 0)
printf("<br>\n");
#endif
}
if (count == (target+3))
count = 0;
else
count++;
}
else /* mode >= 1 */
{
printf("%02x %02x %02x %02x %02x %02x %02x %02x ",
(unsigned)buf[0], (unsigned)buf[1], (unsigned)buf[2], (unsigned)buf[3],
(unsigned)buf[4], (unsigned)buf[5], (unsigned)buf[6], (unsigned)buf[7]);
putchar(buf[0]); putchar(buf[1]);
putchar(buf[2]); putchar(buf[3]);
putchar(buf[4]); putchar(buf[5]);
putchar(buf[6]); putchar(buf[7]);
printf("<br>\n");
}
}
/* Output Tail */
printf("</BODY></HTML>\n");
cole_fclose(cf, &err);
}
int
main (int argc, char **argv)
{
COLEFS * cfs;
COLEDIR * cd;
COLEDIRENT * cde;
COLEFILE * cf;
char * entry_name;
COLERRNO colerrno;
cfs = cole_mount (COLE_TOPSRCDIR"/examples/text.doc", &colerrno);
if (cfs == NULL) {
cole_perror (PRGNAME, colerrno);
exit (1);
}
cd = cole_opendir_rootdir (cfs, &colerrno);
if (cd == NULL) {
cole_perror (PRGNAME, colerrno);
cole_umount (cfs, NULL);
exit (1);
}
for (cde = cole_visiteddirentry (cd); cde != NULL;
cde = cole_nextdirentry (cd)) {
if (cole_direntry_isdir (cde))
printf ("DIR ");
else if (cole_direntry_isfile (cde)) {
printf ("FILE");
/* open the file using their direntry */
cf = cole_fopen_direntry (cde, &colerrno);
if (cf == NULL) {
cole_perror ("travel", colerrno);
cole_closedir (cd, NULL);
cole_umount (cfs, NULL);
exit (1);
}
/* Here we process cf */
if (cole_fclose (cf, &colerrno)) {
cole_perror ("travel", colerrno);
cole_closedir (cd, NULL);
cole_umount (cfs, NULL);
exit (1);
}
} else
printf ("????");
printf (" %7u", cole_direntry_getsize (cde));
entry_name = cole_direntry_getname (cde);
if (!isprint ((int)entry_name[0]))
printf ("' \\x%02x%s'", entry_name[0], entry_name+1);
else
printf ("'%s'", entry_name);
printf ("\t%08lx-%08lx %08lx-%08lx",
cole_direntry_getdays1 (cde),
cole_direntry_getsec1 (cde),
cole_direntry_getdays2 (cde),
cole_direntry_getsec2 (cde));
printf ("\n");
}
if (cole_closedir (cd, &colerrno)) {
cole_perror ("travel", colerrno);
cole_umount (cfs, NULL);
exit (1);
}
if (cole_umount (cfs, &colerrno)) {
cole_perror ("travel", colerrno);
exit (1);
}
exit (0);
}
