Changeset 474 for trunk/src/lz32/lz32.cpp

Timestamp:

Aug 11, 1999, 2:49:22 PM (26 years ago)

Author:

phaller

Message:

Fix: Applied FS wrappers

File:

• trunk/src/lz32/lz32.cpp (modified) (21 diffs)

trunk/src/lz32/lz32.cpp

@@ -1 @@
-/* $Id: lz32.cpp,v 1.1 1999-08-10 12:37:33 phaller Exp $ */
+/* $Id: lz32.cpp,v 1.2 1999-08-11 12:49:21 phaller Exp $ */
 
 /*
@@ -15 +15 @@
 #include <ctype.h>
 #include <odincrt.h>
+#include <odinwrap.h>
 #include <windef.h>
 #include <winbase.h>
@@ -28 +29 @@
 LPWSTR WINAPI lstrcpyAtoW    (LPWSTR unicode, LPSTR ascii);
 #define SystemHeap GetProcessHeap()
+#define dprintf(a)
+
 
 /****************************************************************************
@@ -86 +89 @@
 
 /****************************************************************************
+ * Internal Prototypes                                                      *
+ ****************************************************************************/
+
+#define ODIN_INTERNAL _Optlink
+
+// internal interface
+VOID        ODIN_INTERNAL LZDone(void);
+LONG        ODIN_INTERNAL CopyLZFile(HFILE,HFILE);
+HFILE       ODIN_INTERNAL LZOpenFileA(LPCSTR,LPOFSTRUCT,UINT);
+HFILE       ODIN_INTERNAL LZOpenFileW(LPCWSTR,LPOFSTRUCT,UINT);
+INT         ODIN_INTERNAL LZRead(HFILE,LPVOID,UINT);
+INT         ODIN_INTERNAL LZStart(void);
+void        ODIN_INTERNAL LZClose(HFILE);
+LONG        ODIN_INTERNAL LZCopy(HFILE,HFILE);
+HFILE       ODIN_INTERNAL LZInit(HFILE);
+LONG        ODIN_INTERNAL LZSeek(HFILE,LONG,INT);
+INT         ODIN_INTERNAL GetExpandedNameA(LPCSTR,LPSTR);
+INT         ODIN_INTERNAL GetExpandedNameW(LPCWSTR,LPWSTR);
+
+static int _lzget(struct lzstate *lzs,BYTE *b);
+static INT read_header(HFILE fd,struct lzfileheader *head);
+
+
+/****************************************************************************
  * Implementation                                                           *
  ****************************************************************************/
 
-static int
-_lzget(struct lzstate *lzs,BYTE *b) {
+static int _lzget(struct lzstate *lzs,BYTE *b)
+{
    if (lzs->getcur<lzs->getlen) {
       *b    = lzs->get[lzs->getcur++];
@@ -106 +133 @@
    }
 }
+
+
 /* internal function, reads lzheader
  * returns BADINHANDLE for non filedescriptors
@@ -139 +168 @@
 
 
-/*****************************************************************************
- * Name      :
- * Purpose   :
- * Parameters:
- * Variables :
- * Result    :
- * Remark    :
- * Status    :
- *
- * Author    : Patrick Haller [Tue, 1999/08/10 21:55]
- *****************************************************************************/
-
-
 /***********************************************************************
  *           LZStart32   (LZ32.6)
  */
-INT WINAPI LZStart(void)
-{
-    TRACE("(void)\n");
-    return 1;
+
+ODINFUNCTION0(INT,LZStart)
+{
+  dprintf(("LZ32: LZStart32()\n"));
+  return 1;
 }
 
@@ -173 +190 @@
  *  libc
  */
-HFILE WINAPI LZInit( HFILE hfSrc )
-{
-
+ODINFUNCTION1(HFILE,LZInit,HFILE,hfSrc)
+{
    struct   lzfileheader                 head;
    struct   lzstate                         *lzs;
@@ -181 +197 @@
         int i;
 
-   TRACE("(%d)\n",hfSrc);
+   dprintf(("LZ32: LZInit(%08xh)\n",
+            hfSrc));
+
    ret=read_header(hfSrc,&head);
    if (ret<=0) {
@@ -212 +230 @@
  *           LZDone   (LZEXPAND.9) (LZ32.8)
  */
-void WINAPI LZDone(void)
+ODINPROCEDURE0(LZDone)
 {
     TRACE("(void)\n");
@@ -228 +246 @@
  */
 
-INT WINAPI GetExpandedNameA( LPCSTR in, LPSTR out )
+ODINFUNCTION2(INT,GetExpandedNameA,LPCSTR,in,LPSTR,out)
 {
    struct lzfileheader                   head;
@@ -236 +254 @@
    LPSTR    s,t;
 
-   TRACE("(%s)\n",in);
+   dprintf(("LZ32: GetExpandedNameA(%s,%08xh)\n",
+            in,
+            out));
+
    fd=OpenFile(in,&ofs,OF_READ);
    if (fd==HFILE_ERROR)
@@ -298 +319 @@
  *           GetExpandedName32W   (LZ32.11)
  */
-INT WINAPI GetExpandedNameW( LPCWSTR in, LPWSTR out )
+ODINFUNCTION2(INT,GetExpandedNameW,LPCWSTR,in,LPWSTR,out)
 {
    char  *xin,*xout;
    INT   ret;
+
+   dprintf(("LZ32: GetExpandedNameW(%08xh,%08xh)\n",
+            in,
+            out));
 
    xout  = (char*)HeapAlloc( GetProcessHeap(), 0, lstrlenW(in)+3 );
@@ -316 +341 @@
  *           LZRead32   (LZ32.4)
  */
-INT WINAPI LZRead( HFILE fd, LPVOID vbuf, UINT toread )
+ODINFUNCTION3(INT,LZRead,HFILE,fd,LPVOID,vbuf,UINT,toread)
 {
    int   howmuch;
@@ -322 +347 @@
    struct   lzstate                      *lzs;
 
+   dprintf(("LZ32: LZRead(%08xh,%08xh,%08h)\n",
+            fd,
+            vbuf,
+            toread));
+
    buf=(LPBYTE)vbuf;
-   TRACE("(%d,%p,%d)\n",fd,buf,toread);
    howmuch=toread;
    if (!(lzs = GET_LZ_STATE(fd))) return _lread(fd,buf,toread);
@@ -407 +436 @@
  *           LZSeek32   (LZ32.3)
  */
-LONG WINAPI LZSeek( HFILE fd, LONG off, INT type )
+
+ODINFUNCTION3(LONG,LZSeek,HFILE,fd,LONG,off,INT,type)
 {
    struct   lzstate                      *lzs;
    LONG  newwanted;
 
-   TRACE("(%d,%ld,%d)\n",fd,off,type);
+   dprintf(("LZ32: LZSeek(%08xh,%08xh,%08xh)\n",
+            fd,
+            off,
+            type));
+
    /* not compressed? just use normal _llseek() */
         if (!(lzs = GET_LZ_STATE(fd))) return _llseek(fd,off,type);
@@ -446 +480 @@
 typedef  UINT (WINAPI *_readfun)(HFILE,LPVOID,UINT);
 
-LONG WINAPI LZCopy( HFILE src, HFILE dest )
+ODINFUNCTION2(LONG,LZCopy,HFILE,src,HFILE,dest)
 {
    int   usedlzinit=0,ret,wret;
@@ -459 +493 @@
    _readfun xread;
 
-   TRACE("(%d,%d)\n",src,dest);
+   dprintf(("LZ32: LZCopy(%08x,h%08xh)\n",
+            src,
+            dest));
+
    if (!IS_LZ_HANDLE(src)) {
       src = LZInit(src);
@@ -516 +553 @@
  * Opens a file. If not compressed, open it as a normal file.
  */
-HFILE WINAPI LZOpenFileA( LPCSTR fn, LPOFSTRUCT ofs, UINT mode )
+
+ODINFUNCTION3(HFILE,LZOpenFileA,LPCSTR,fn,LPOFSTRUCT,ofs,UINT,mode)
 {
    HFILE fd,cfd;
 
-   TRACE("(%s,%p,%d)\n",fn,ofs,mode);
+   dprintf(("LZ32: LZOpenFileA(%s,%08xh,%08xh)\n",
+            fn,
+            ofs,
+            mode));
+
    /* 0x70 represents all OF_SHARE_* flags, ignore them for the check */
    fd=OpenFile(fn,ofs,mode);
@@ -542 +584 @@
  *           LZOpenFile32W   (LZ32.10)
  */
-HFILE WINAPI LZOpenFileW( LPCWSTR fn, LPOFSTRUCT ofs, UINT mode )
+ODINFUNCTION3(HFILE,LZOpenFileW,LPCWSTR,fn,LPOFSTRUCT,ofs,UINT,mode)
 {
    LPSTR xfn;
    LPWSTR   yfn;
    HFILE ret;
+
+   dprintf(("LZ32: LZOpenFileW(%08xh,%08xh,%08xh)\n",
+            fn,
+            ofs,
+            mode));
 
    xfn   = HEAP_strdupWtoA( GetProcessHeap(), 0, fn);
@@ -564 +611 @@
  *           LZClose32   (LZ32.5)
  */
-void WINAPI LZClose( HFILE fd )
+
+ODINPROCEDURE1(LZClose,HFILE,fd)
 {
    struct lzstate *lzs;
 
-   TRACE("(%d)\n",fd);
+   dprintf(("LZ32: LZClose(%08xh)\n",
+            fd));
+
         if (!(lzs = GET_LZ_STATE(fd))) _lclose(fd);
         else
@@ -586 +636 @@
  * NOTE: Yes. This is exactly the same function as LZCopy.
  */
-LONG WINAPI CopyLZFile( HFILE src, HFILE dest )
-{
-    TRACE("(%d,%d)\n",src,dest);
-    return LZCopy(src,dest);
-}
+
+ODINFUNCTION2(LONG,CopyLZFile,HFILE,src,HFILE,dest)
+{
+  dprintf(("LZ32: CopyLZFile(%08xh,%08xh)\n",
+           src,
+           dest));
+
+  return LZCopy(src,dest);
+}