/*
- * $Id: hqx.c,v 1.6 2001-05-01 13:58:43 srittau Exp $
+ * $Id: hqx.c,v 1.8.2.1 2002-03-12 14:12:40 srittau Exp $
*/
#ifdef HAVE_CONFIG_H
#include "config.h"
-#endif
+#endif /* HAVE_CONFIG_H */
-#include <stdlib.h>
#include <sys/types.h>
#include <sys/uio.h>
#include <sys/time.h>
#include <sys/param.h>
-#ifdef notdef
-#if BSD >= 199006
-# include <machine/endian.h>
-#else
-# include <netinet/in.h>
-#endif
-#endif notdef
-#include <time.h>
-#include <fcntl.h>
+
#include <string.h>
-#include <syslog.h>
#include <ctype.h>
#include <stdio.h>
+#include <stdlib.h>
+#include <time.h>
+
+#include <unistd.h>
+#ifdef HAVE_FCNTL_H
+#include <fcntl.h>
+#endif /* HAVE_FCNTL_H */
+
+#include <netinet/in.h>
+
#include <atalk/adouble.h>
#include <netatalk/endian.h>
+
#include "megatron.h"
+#include "hqx.h"
#define HEXOUTPUT 0
*/
#ifndef STDIN
# define STDIN "-"
-#endif
+#endif /* ! STDIN */
/* Yes and no
*/
#if HEXOUTPUT
FILE *rawhex, *expandhex;
-#endif
+#endif /* HEXOUTPUT */
struct hqx_file_data {
u_int32_t forklen[ NUMFORKS ];
#if DEBUG
fprintf( stderr, "megatron: entering hqx_open\n" );
-#endif
+#endif /* DEBUG */
if ( flags == O_RDONLY ) {
#if HEXOUTPUT
rawhex = fopen( "rawhex.unhex", "w" );
expandhex = fopen( "expandhex.unhex", "w" );
-#endif
+#endif /* HEXOUTPUT */
first_flag = 0;
#if DEBUG
off_t pos;
- pos = lseek( hqx.filed, 0, L_INCR );
+ pos = lseek( hqx.filed, 0, SEEK_CUR );
fprintf( stderr, "megatron: current position is %ld\n", pos );
-#endif
+#endif /* DEBUG */
return( 0 );
}
}
#if DEBUG >= 3
{
off_t pos;
- pos = lseek( hqx.filed, 0, L_INCR );
+ pos = lseek( hqx.filed, 0, SEEK_CUR );
fprintf( stderr, "hqx_read: current position is %ld\n", pos );
}
fprintf( stderr, "hqx_read: fork is %s\n", forkname[ fork ] );
fprintf( stderr, "hqx_read: remaining length is %d\n", hqx.forklen[fork] );
-#endif
+#endif /* DEBUG >= 3 */
if ( hqx.forklen[ fork ] < 0 ) {
fprintf( stderr, "This should never happen, dude!\n" );
#if DEBUG >= 4
fprintf( stderr, "hqx_read: storedcrc\t\t%x\n", storedcrc );
fprintf( stderr, "hqx_read: observed crc\t\t%x\n\n", hqx.forkcrc[fork] );
-#endif
+#endif /* DEBUG >= 4 */
if ( storedcrc == hqx.forkcrc[ fork ] ) {
return( 0 );
}
}
#if DEBUG >= 3
fprintf( stderr, "hqx_read: readlen is %d\n", readlen );
-#endif
+#endif /* DEBUG >= 3 */
cc = hqx_7tobin( buffer, readlen );
if ( cc > 0 ) {
}
#if DEBUG >= 3
fprintf( stderr, "hqx_read: chars read is %d\n", cc );
-#endif
+#endif /* DEBUG >= 3 */
return( cc );
}
#if HEXOUTPUT
int headerfork;
headerfork = open( "headerfork", O_WRONLY|O_CREAT, 0622 );
-#endif
+#endif /* HEXOUTPUT */
mask = htons( 0xfcee );
hqx.headercrc = 0;
#if HEXOUTPUT
write( headerfork, &namelen, sizeof( namelen ));
-#endif
+#endif /* HEXOUTPUT */
if (( headerbuf =
(char *)malloc( (unsigned int)( namelen + BHH_HEADSIZ ))) == 0 ) {
#if HEXOUTPUT
write( headerfork, headerbuf, ( namelen + BHH_HEADSIZ ));
-#endif
+#endif /* HEXOUTPUT */
/*
* stuff from the hqx file header
fprintf( stderr, "observed crc\t\t%x\n", hqx.headercrc );
fprintf( stderr, "\n" );
}
-#endif
+#endif /* DEBUG >= 5 */
/*
* create and modify times are figured from right now
#if DEBUG
fprintf( stderr, "hqx_7tobin: datalen entering %d\n", datalen );
fprintf( stderr, "hqx_7tobin: hqx8i entering %d\n", hqx8i );
-#endif
+#endif /* DEBUG */
if ( first_flag == 0 ) {
prev_hqx8 = 0;
#if DEBUG
fprintf( stderr, "hqx_7tobin: hqx8i entering %d\n", hqx8i );
-#endif
+#endif /* DEBUG */
out_first = outbuf;
out_last = out_first + datalen;
#if HEXOUTPUT
putc( hqx8i, rawhex );
putc( hqx8[ hqx8i ], rawhex );
-#endif
+#endif /* HEXOUTPUT */
if ( prev_hqx8 == RUNCHAR ) {
if ( hqx8[ hqx8i ] == 0 ) {
*out_first = prev_hqx8;
#if HEXOUTPUT
putc( *out_first, expandhex );
-#endif
+#endif /* HEXOUTPUT */
prev_out = prev_hqx8;
out_first++;
}
*out_first = prev_out;
#if HEXOUTPUT
putc( *out_first, expandhex );
-#endif
+#endif /* HEXOUTPUT */
hqx8[ hqx8i ]--;
out_first++;
}
*out_first = prev_hqx8;
#if HEXOUTPUT
putc( *out_first, expandhex );
-#endif
+#endif /* HEXOUTPUT */
prev_out = prev_hqx8;
out_first++;
}