b6d423a1b3
git-svn-id: https://svn.code.sf.net/p/freedos/svn/kernel/trunk@329 6ac86273-5f31-0410-b378-82cca8765d1b
158 lines
4.9 KiB
C
158 lines
4.9 KiB
C
/****************************************************************/
|
|
/* */
|
|
/* syspack.c */
|
|
/* */
|
|
/* System Disk Byte Order Packing Functions */
|
|
/* */
|
|
/* Copyright (c) 1995 */
|
|
/* Pasquale J. Villani */
|
|
/* All Rights Reserved */
|
|
/* */
|
|
/* This file is part of DOS-C. */
|
|
/* */
|
|
/* DOS-C 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, or (at your option) any later version. */
|
|
/* */
|
|
/* DOS-C 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 DOS-C; see the file COPYING. If not, */
|
|
/* write to the Free Software Foundation, 675 Mass Ave, */
|
|
/* Cambridge, MA 02139, USA. */
|
|
/* */
|
|
/****************************************************************/
|
|
|
|
#include "portab.h"
|
|
#include "globals.h"
|
|
|
|
#ifdef VERSION_STRINGS
|
|
static BYTE *syspackRcsId =
|
|
"$Id$";
|
|
#endif
|
|
|
|
#ifdef NONNATIVE
|
|
VOID getlong(REG VOID * vp, LONG * lp)
|
|
{
|
|
*lp = (((BYTE *) vp)[0] & 0xff) +
|
|
((((BYTE *) vp)[1] & 0xff) << 8) +
|
|
((((BYTE *) vp)[2] & 0xff) << 16) +
|
|
((((BYTE *) vp)[3] & 0xff) << 24);
|
|
}
|
|
|
|
VOID getword(REG VOID * vp, WORD * wp)
|
|
{
|
|
*wp = (((BYTE *) vp)[0] & 0xff) + ((((BYTE *) vp)[1] & 0xff) << 8);
|
|
}
|
|
|
|
VOID getbyte(VOID * vp, BYTE * bp)
|
|
{
|
|
*bp = *((BYTE *) vp);
|
|
}
|
|
|
|
VOID fgetword(REG VOID FAR * vp, WORD FAR * wp)
|
|
{
|
|
*wp =
|
|
(((BYTE FAR *) vp)[0] & 0xff) + ((((BYTE FAR *) vp)[1] & 0xff) << 8);
|
|
}
|
|
|
|
VOID fgetlong(REG VOID FAR * vp, LONG FAR * lp)
|
|
{
|
|
*lp = (((BYTE *) vp)[0] & 0xff) +
|
|
((((BYTE *) vp)[1] & 0xff) << 8) +
|
|
((((BYTE *) vp)[2] & 0xff) << 16) +
|
|
((((BYTE *) vp)[3] & 0xff) << 24);
|
|
}
|
|
|
|
VOID fgetbyte(VOID FAR * vp, BYTE FAR * bp)
|
|
{
|
|
*bp = *((BYTE FAR *) vp);
|
|
}
|
|
|
|
VOID fputlong(LONG FAR * lp, VOID FAR * vp)
|
|
{
|
|
REG BYTE FAR *bp = (BYTE FAR *) vp;
|
|
|
|
bp[0] = *lp & 0xff;
|
|
bp[1] = (*lp >> 8) & 0xff;
|
|
bp[2] = (*lp >> 16) & 0xff;
|
|
bp[3] = (*lp >> 24) & 0xff;
|
|
}
|
|
|
|
VOID fputword(WORD FAR * wp, VOID FAR * vp)
|
|
{
|
|
REG BYTE FAR *bp = (BYTE FAR *) vp;
|
|
|
|
bp[0] = *wp & 0xff;
|
|
bp[1] = (*wp >> 8) & 0xff;
|
|
}
|
|
|
|
VOID fputbyte(BYTE FAR * bp, VOID FAR * vp)
|
|
{
|
|
*(BYTE FAR *) vp = *bp;
|
|
}
|
|
|
|
VOID getdirent(BYTE FAR * vp, struct dirent FAR * dp)
|
|
{
|
|
fmemcpy(dp->dir_name, &vp[DIR_NAME], FNAME_SIZE);
|
|
fmemcpy(dp->dir_ext, &vp[DIR_EXT], FEXT_SIZE);
|
|
fgetbyte(&vp[DIR_ATTRIB], (BYTE FAR *) & dp->dir_attrib);
|
|
fgetword(&vp[DIR_TIME], (WORD FAR *) & dp->dir_time);
|
|
fgetword(&vp[DIR_DATE], (WORD FAR *) & dp->dir_date);
|
|
fgetword(&vp[DIR_START], (WORD FAR *) & dp->dir_start);
|
|
fgetlong(&vp[DIR_SIZE], (LONG FAR *) & dp->dir_size);
|
|
}
|
|
|
|
VOID putdirent(struct dirent FAR * dp, BYTE FAR * vp)
|
|
{
|
|
REG COUNT i;
|
|
REG BYTE FAR *p;
|
|
|
|
fmemcpy(&vp[DIR_NAME], dp->dir_name, FNAME_SIZE);
|
|
fmemcpy(&vp[DIR_EXT], dp->dir_ext, FEXT_SIZE);
|
|
fputbyte((BYTE FAR *) & dp->dir_attrib, &vp[DIR_ATTRIB]);
|
|
fputword((WORD FAR *) & dp->dir_time, &vp[DIR_TIME]);
|
|
fputword((WORD FAR *) & dp->dir_date, &vp[DIR_DATE]);
|
|
fputword((WORD FAR *) & dp->dir_start, &vp[DIR_START]);
|
|
fputlong((LONG FAR *) & dp->dir_size, &vp[DIR_SIZE]);
|
|
for (i = 0, p = (BYTE FAR *) & vp[DIR_RESERVED]; i < 10; i++)
|
|
*p++ = NULL;
|
|
}
|
|
#endif
|
|
|
|
/*
|
|
* Log: syspack.c,v - for newer entries see "cvs log syspack.c"
|
|
*
|
|
* Revision 1.1.1.1 1999/03/29 15:42:21 jprice
|
|
* New version without IPL.SYS
|
|
*
|
|
* Revision 1.3 1999/02/01 01:43:28 jprice
|
|
* Fixed findfirst function to find volume label with Windows long filenames
|
|
*
|
|
* Revision 1.2 1999/01/22 04:15:28 jprice
|
|
* Formating
|
|
*
|
|
* Revision 1.1.1.1 1999/01/20 05:51:00 jprice
|
|
* Imported sources
|
|
*
|
|
*
|
|
* Rev 1.4 04 Jan 1998 23:14:38 patv
|
|
* Changed Log for strip utility
|
|
*
|
|
* Rev 1.3 29 May 1996 21:15:12 patv
|
|
* bug fixes for v0.91a
|
|
*
|
|
* Rev 1.2 01 Sep 1995 17:48:42 patv
|
|
* First GPL release.
|
|
*
|
|
* Rev 1.1 30 Jul 1995 20:50:26 patv
|
|
* Eliminated version strings in ipl
|
|
*
|
|
* Rev 1.0 02 Jul 1995 8:05:34 patv
|
|
* Initial revision.
|
|
*/
|