home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
rtsi.com
/
2014.01.www.rtsi.com.tar
/
www.rtsi.com
/
OS9
/
OSK
/
APPS
/
macutils.lzh
/
MACUTILS
/
UTIL
/
util.c
< prev
next >
Wrap
C/C++ Source or Header
|
1996-01-31
|
4KB
|
214 lines
#include <stdio.h>
#include "../fileio/fileglob.h"
#include "masks.h"
#include "util.h"
#ifdef OSK
#define fputc(c,path) fprintf(path,"%c",c)
#endif
extern void exit();
#define MACTIMOFFS 1904
static int mlength[] = {0, 31, 61, 92, 122, 153, 184, 214, 245, 275, 306, 337};
unsigned long get4(bp)
char *bp;
{
register int i;
long value = 0;
for(i = 0; i < 4; i++) {
value <<= 8;
value |= (*bp & BYTEMASK);
bp++;
}
return value;
}
/* For if integers are stored wrong-endian. */
unsigned long get4i(bp)
char *bp;
{
register int i;
long value = 0;
bp += 3;
for(i = 0; i < 4; i++) {
value <<= 8;
value |= (*bp & BYTEMASK);
bp--;
}
return value;
}
unsigned long get2(bp)
char *bp;
{
register int i;
int value = 0;
for(i = 0; i < 2; i++) {
value <<= 8;
value |= (*bp & BYTEMASK);
bp++;
}
return value;
}
/* For if integers are stored wrong-endian. */
unsigned long get2i(bp)
char *bp;
{
register int i;
long value = 0;
bp += 1;
for(i = 0; i < 2; i++) {
value <<= 8;
value |= (*bp & BYTEMASK);
bp--;
}
return value;
}
unsigned char getb(fp)
FILE *fp;
{
int c;
bytes_read += 1;
c = getc(fp);
if(c == EOF) {
(void)fprintf(stderr, "\nPremature EOF\n");
exit(1);
}
return c & BYTEMASK;
}
void copy(d, s, n)
char *d, *s;
int n;
{
while(--n >= 0) {
*d++ = *s++;
}
}
int do_query()
{
char *tp, temp[10];
(void)fprintf(stderr, "? ");
(void) fflush(stdout);
(void) read(2, temp, sizeof(temp));
temp[sizeof(temp) - 1] = 0;
tp = temp;
while(*tp != 0) {
if(*tp == 'y' || *tp == 'Y') {
return 1;
} else {
tp++;
}
}
return 0;
}
void put4(dest, value)
char *dest;
unsigned long value;
{
*dest++ = (value >> 24) & BYTEMASK;
*dest++ = (value >> 16) & BYTEMASK;
*dest++ = (value >> 8) & BYTEMASK;
*dest++ = value & BYTEMASK;
}
void put2(dest, value)
char *dest;
unsigned long value;
{
*dest++ = (value >> 8) & BYTEMASK;
*dest++ = value & BYTEMASK;
}
void do_indent(indent)
int indent;
{
int i;
for(i = 0; i < indent; i++) {
(void)fputc(' ', stderr);
}
}
real_time set_time(year, month, day, hours, minutes, seconds)
int year, month, day, hours, minutes, seconds;
{
real_time toset;
toset.year = year;
toset.month = month;
toset.day = day;
toset.hours = hours;
toset.minutes = minutes;
toset.seconds = seconds;
return toset;
}
unsigned long tomactime(time)
real_time time;
{
long accum;
int year;
accum = time.month - 3;
year = time.year;
if(accum < 0) {
accum += 12;
year--;
}
accum = time.day + mlength[accum] + 59;
accum += (year - MACTIMOFFS) * 365 + year / 4 - MACTIMOFFS / 4;
accum = ((accum * 24 + time.hours) * 60 + time.minutes) * 60 + time.seconds;
return (unsigned)accum;
}
real_time frommactime(accum)
unsigned long accum;
{
long tmp1, tmp2;
real_time time;
time.seconds = tmp1 = accum % 60;
accum /= 60;
time.minutes = tmp1 = accum % 60;
accum /= 60;
time.hours = tmp1 = accum % 24;
accum /= 24;
tmp1 = (long)accum - 60;
tmp2 = tmp1 % 1461;
if(tmp2 < 0) {
tmp2 += 1461;
}
tmp1 = (tmp1 - tmp2) / 1461;
time.year = tmp1 * 4;
tmp1 = tmp2 / 365;
if(tmp1 > 3) {
tmp1 = 3;
}
time.year += tmp1 + MACTIMOFFS;
tmp2 -= tmp1 * 365;
tmp1 = 12;
while(mlength[--tmp1] > tmp2);
time.day = tmp2 + 1 - mlength[tmp1];
time.month = tmp1 + 3;
if(tmp1 > 9) {
time.month = tmp1 - 9;
time.year++;
}
return time;
}