Changeset 474 for trunk/src


Ignore:
Timestamp:
Aug 11, 1999, 2:49:22 PM (26 years ago)
Author:
phaller
Message:

Fix: Applied FS wrappers

Location:
trunk/src/lz32
Files:
3 edited

Legend:

Unmodified
Added
Removed

  • trunk/src/lz32/lz32.cpp

    r468 r474  
    1 /* $Id: lz32.cpp,v 1.1 1999-08-10 12:37:33 phaller Exp $ */
     1/* $Id: lz32.cpp,v 1.2 1999-08-11 12:49:21 phaller Exp $ */
    22
    33/*
    … …  
    1515#include <ctype.h>
    1616#include <odincrt.h>
     17#include <odinwrap.h>
    1718#include <windef.h>
    1819#include <winbase.h>
    … …  
    2829LPWSTR WINAPI lstrcpyAtoW    (LPWSTR unicode, LPSTR ascii);
    2930#define SystemHeap GetProcessHeap()
     31#define dprintf(a)
     32
    3033
    3134/****************************************************************************
    … …  
    8689
    8790/****************************************************************************
     91 * Internal Prototypes                                                      *
     92 ****************************************************************************/
     93
     94#define ODIN_INTERNAL _Optlink
     95
     96// internal interface
     97VOID        ODIN_INTERNAL LZDone(void);
     98LONG        ODIN_INTERNAL CopyLZFile(HFILE,HFILE);
     99HFILE       ODIN_INTERNAL LZOpenFileA(LPCSTR,LPOFSTRUCT,UINT);
     100HFILE       ODIN_INTERNAL LZOpenFileW(LPCWSTR,LPOFSTRUCT,UINT);
     101INT         ODIN_INTERNAL LZRead(HFILE,LPVOID,UINT);
     102INT         ODIN_INTERNAL LZStart(void);
     103void        ODIN_INTERNAL LZClose(HFILE);
     104LONG        ODIN_INTERNAL LZCopy(HFILE,HFILE);
     105HFILE       ODIN_INTERNAL LZInit(HFILE);
     106LONG        ODIN_INTERNAL LZSeek(HFILE,LONG,INT);
     107INT         ODIN_INTERNAL GetExpandedNameA(LPCSTR,LPSTR);
     108INT         ODIN_INTERNAL GetExpandedNameW(LPCWSTR,LPWSTR);
     109
     110static int _lzget(struct lzstate *lzs,BYTE *b);
     111static INT read_header(HFILE fd,struct lzfileheader *head);
     112
     113
     114/****************************************************************************
    88115 * Implementation                                                           *
    89116 ****************************************************************************/
    90117
    91 static int
    92 _lzget(struct lzstate *lzs,BYTE *b) {
     118static int _lzget(struct lzstate *lzs,BYTE *b)
     119{
    93120   if (lzs->getcur<lzs->getlen) {
    94121      *b    = lzs->get[lzs->getcur++];
    … …  
    106133   }
    107134}
     135
     136
    108137/* internal function, reads lzheader
    109138 * returns BADINHANDLE for non filedescriptors
    … …  
    139168
    140169
    141 /*****************************************************************************
    142  * Name      :
    143  * Purpose   :
    144  * Parameters:
    145  * Variables :
    146  * Result    :
    147  * Remark    :
    148  * Status    :
    149  *
    150  * Author    : Patrick Haller [Tue, 1999/08/10 21:55]
    151  *****************************************************************************/
    152 
    153 
    154170/***********************************************************************
    155171 *           LZStart32   (LZ32.6)
    156172 */
    157 INT WINAPI LZStart(void)
    158 {
    159     TRACE("(void)\n");
    160     return 1;
     173
     174ODINFUNCTION0(INT,LZStart)
     175{
     176  dprintf(("LZ32: LZStart32()\n"));
     177  return 1;
    161178}
    162179
    … …  
    173190 *  libc
    174191 */
    175 HFILE WINAPI LZInit( HFILE hfSrc )
    176 {
    177 
     192ODINFUNCTION1(HFILE,LZInit,HFILE,hfSrc)
     193{
    178194   struct   lzfileheader                 head;
    179195   struct   lzstate                         *lzs;
    … …  
    181197        int i;
    182198
    183    TRACE("(%d)\n",hfSrc);
     199   dprintf(("LZ32: LZInit(%08xh)\n",
     200            hfSrc));
     201
    184202   ret=read_header(hfSrc,&head);
    185203   if (ret<=0) {
    … …  
    212230 *           LZDone   (LZEXPAND.9) (LZ32.8)
    213231 */
    214 void WINAPI LZDone(void)
     232ODINPROCEDURE0(LZDone)
    215233{
    216234    TRACE("(void)\n");
    … …  
    228246 */
    229247
    230 INT WINAPI GetExpandedNameA( LPCSTR in, LPSTR out )
     248ODINFUNCTION2(INT,GetExpandedNameA,LPCSTR,in,LPSTR,out)
    231249{
    232250   struct lzfileheader                   head;
    … …  
    236254   LPSTR    s,t;
    237255
    238    TRACE("(%s)\n",in);
     256   dprintf(("LZ32: GetExpandedNameA(%s,%08xh)\n",
     257            in,
     258            out));
     259
    239260   fd=OpenFile(in,&ofs,OF_READ);
    240261   if (fd==HFILE_ERROR)
    … …  
    298319 *           GetExpandedName32W   (LZ32.11)
    299320 */
    300 INT WINAPI GetExpandedNameW( LPCWSTR in, LPWSTR out )
     321ODINFUNCTION2(INT,GetExpandedNameW,LPCWSTR,in,LPWSTR,out)
    301322{
    302323   char  *xin,*xout;
    303324   INT   ret;
     325
     326   dprintf(("LZ32: GetExpandedNameW(%08xh,%08xh)\n",
     327            in,
     328            out));
    304329
    305330   xout  = (char*)HeapAlloc( GetProcessHeap(), 0, lstrlenW(in)+3 );
    … …  
    316341 *           LZRead32   (LZ32.4)
    317342 */
    318 INT WINAPI LZRead( HFILE fd, LPVOID vbuf, UINT toread )
     343ODINFUNCTION3(INT,LZRead,HFILE,fd,LPVOID,vbuf,UINT,toread)
    319344{
    320345   int   howmuch;
    … …  
    322347   struct   lzstate                      *lzs;
    323348
     349   dprintf(("LZ32: LZRead(%08xh,%08xh,%08h)\n",
     350            fd,
     351            vbuf,
     352            toread));
     353
    324354   buf=(LPBYTE)vbuf;
    325    TRACE("(%d,%p,%d)\n",fd,buf,toread);
    326355   howmuch=toread;
    327356   if (!(lzs = GET_LZ_STATE(fd))) return _lread(fd,buf,toread);
    … …  
    407436 *           LZSeek32   (LZ32.3)
    408437 */
    409 LONG WINAPI LZSeek( HFILE fd, LONG off, INT type )
     438
     439ODINFUNCTION3(LONG,LZSeek,HFILE,fd,LONG,off,INT,type)
    410440{
    411441   struct   lzstate                      *lzs;
    412442   LONG  newwanted;
    413443
    414    TRACE("(%d,%ld,%d)\n",fd,off,type);
     444   dprintf(("LZ32: LZSeek(%08xh,%08xh,%08xh)\n",
     445            fd,
     446            off,
     447            type));
     448
    415449   /* not compressed? just use normal _llseek() */
    416450        if (!(lzs = GET_LZ_STATE(fd))) return _llseek(fd,off,type);
    … …  
    446480typedef  UINT (WINAPI *_readfun)(HFILE,LPVOID,UINT);
    447481
    448 LONG WINAPI LZCopy( HFILE src, HFILE dest )
     482ODINFUNCTION2(LONG,LZCopy,HFILE,src,HFILE,dest)
    449483{
    450484   int   usedlzinit=0,ret,wret;
    … …  
    459493   _readfun xread;
    460494
    461    TRACE("(%d,%d)\n",src,dest);
     495   dprintf(("LZ32: LZCopy(%08x,h%08xh)\n",
     496            src,
     497            dest));
     498
    462499   if (!IS_LZ_HANDLE(src)) {
    463500      src = LZInit(src);
    … …  
    516553 * Opens a file. If not compressed, open it as a normal file.
    517554 */
    518 HFILE WINAPI LZOpenFileA( LPCSTR fn, LPOFSTRUCT ofs, UINT mode )
     555
     556ODINFUNCTION3(HFILE,LZOpenFileA,LPCSTR,fn,LPOFSTRUCT,ofs,UINT,mode)
    519557{
    520558   HFILE fd,cfd;
    521559
    522    TRACE("(%s,%p,%d)\n",fn,ofs,mode);
     560   dprintf(("LZ32: LZOpenFileA(%s,%08xh,%08xh)\n",
     561            fn,
     562            ofs,
     563            mode));
     564
    523565   /* 0x70 represents all OF_SHARE_* flags, ignore them for the check */
    524566   fd=OpenFile(fn,ofs,mode);
    … …  
    542584 *           LZOpenFile32W   (LZ32.10)
    543585 */
    544 HFILE WINAPI LZOpenFileW( LPCWSTR fn, LPOFSTRUCT ofs, UINT mode )
     586ODINFUNCTION3(HFILE,LZOpenFileW,LPCWSTR,fn,LPOFSTRUCT,ofs,UINT,mode)
    545587{
    546588   LPSTR xfn;
    547589   LPWSTR   yfn;
    548590   HFILE ret;
     591
     592   dprintf(("LZ32: LZOpenFileW(%08xh,%08xh,%08xh)\n",
     593            fn,
     594            ofs,
     595            mode));
    549596
    550597   xfn   = HEAP_strdupWtoA( GetProcessHeap(), 0, fn);
    … …  
    564611 *           LZClose32   (LZ32.5)
    565612 */
    566 void WINAPI LZClose( HFILE fd )
     613
     614ODINPROCEDURE1(LZClose,HFILE,fd)
    567615{
    568616   struct lzstate *lzs;
    569617
    570    TRACE("(%d)\n",fd);
     618   dprintf(("LZ32: LZClose(%08xh)\n",
     619            fd));
     620
    571621        if (!(lzs = GET_LZ_STATE(fd))) _lclose(fd);
    572622        else
    … …  
    586636 * NOTE: Yes. This is exactly the same function as LZCopy.
    587637 */
    588 LONG WINAPI CopyLZFile( HFILE src, HFILE dest )
    589 {
    590     TRACE("(%d,%d)\n",src,dest);
    591     return LZCopy(src,dest);
    592 }
     638
     639ODINFUNCTION2(LONG,CopyLZFile,HFILE,src,HFILE,dest)
     640{
     641  dprintf(("LZ32: CopyLZFile(%08xh,%08xh)\n",
     642           src,
     643           dest));
     644
     645  return LZCopy(src,dest);
     646}

  • trunk/src/lz32/lz32.def

    r468 r474  
    1212
    1313EXPORTS
    14        LZCopy                = _LZCopy@8           @0
    15        LZOpenFileA           = _LZOpenFileA@12     @1
    16        LZInit                = _LZInit@4           @2
    17        LZSeek                = _LZSeek@12          @3
    18        LZRead                = _LZRead@12          @4
    19        LZClose               = _LZClose@4          @5
    20        LZStart               = _LZStart@0          @6
    21        CopyLZFile            = _CopyLZFile@8       @7
    22        LZDone                = _LZDone@0           @8
    23        GetExpandedNameA      = _GetExpandedNameA@8 @9
    24        LZOpenFileW           = _LZOpenFileW@12     @10
    25        GetExpandedNameW      = _GetExpandedNameW@8 @11
     14       LZCopy                = _ODIN_LZCopy@8           @0
     15       LZOpenFileA           = _ODIN_LZOpenFileA@12     @1
     16       LZInit                = _ODIN_LZInit@4           @2
     17       LZSeek                = _ODIN_LZSeek@12          @3
     18       LZRead                = _ODIN_LZRead@12          @4
     19       LZClose               = _ODIN_LZClose@4          @5
     20       LZStart               = _ODIN_LZStart@0          @6
     21       CopyLZFile            = _ODIN_CopyLZFile@8       @7
     22       LZDone                = _ODIN_LZDone@0           @8
     23       GetExpandedNameA      = _ODIN_GetExpandedNameA@8 @9
     24       LZOpenFileW           = _ODIN_LZOpenFileW@12     @10
     25       GetExpandedNameW      = _ODIN_GetExpandedNameW@8 @11
    2626

  • trunk/src/lz32/lz32.h

    r468 r474  
    1 /* $Id: lz32.h,v 1.1 1999-08-10 12:37:33 phaller Exp $ */
     1/* $Id: lz32.h,v 1.2 1999-08-11 12:49:22 phaller Exp $ */
    22
    33/*
    … …  
    5555 ****************************************************************************/
    5656
    57 VOID        WINAPI LZDone(void);
    58 LONG        WINAPI CopyLZFile(HFILE,HFILE);
    59 HFILE       WINAPI LZOpenFileA(LPCSTR,LPOFSTRUCT,UINT);
    60 HFILE       WINAPI LZOpenFileW(LPCWSTR,LPOFSTRUCT,UINT);
    61 INT         WINAPI LZRead(HFILE,LPVOID,UINT);
    62 INT         WINAPI LZStart(void);
    63 void        WINAPI LZClose(HFILE);
    64 LONG        WINAPI LZCopy(HFILE,HFILE);
    65 HFILE       WINAPI LZInit(HFILE);
    66 LONG        WINAPI LZSeek(HFILE,LONG,INT);
    67 INT         WINAPI GetExpandedNameA(LPCSTR,LPSTR);
    68 INT         WINAPI GetExpandedNameW(LPCWSTR,LPWSTR);
     57// external interface
     58VOID        WINAPI ODIN_LZDone(void);
     59LONG        WINAPI ODIN_CopyLZFile(HFILE,HFILE);
     60HFILE       WINAPI ODIN_LZOpenFileA(LPCSTR,LPOFSTRUCT,UINT);
     61HFILE       WINAPI ODIN_LZOpenFileW(LPCWSTR,LPOFSTRUCT,UINT);
     62INT         WINAPI ODIN_LZRead(HFILE,LPVOID,UINT);
     63INT         WINAPI ODIN_LZStart(void);
     64void        WINAPI ODIN_LZClose(HFILE);
     65LONG        WINAPI ODIN_LZCopy(HFILE,HFILE);
     66HFILE       WINAPI ODIN_LZInit(HFILE);
     67LONG        WINAPI ODIN_LZSeek(HFILE,LONG,INT);
     68INT         WINAPI ODIN_GetExpandedNameA(LPCSTR,LPSTR);
     69INT         WINAPI ODIN_GetExpandedNameW(LPCWSTR,LPWSTR);
    6970
    7071
Note: See TracChangeset for help on using the changeset viewer.