home *** CD-ROM | disk | FTP | other *** search
- /*
-
- EDILZSS.DLL - Test program
- Copyright 1991 Robert Salesas, All Rights Reserved.
-
- See Pascal example for more information.
-
- */
-
- #include <windows.h>
- #include <dos.h>
- #include <string.h>
-
-
- int FAR PASCAL LZSSPackFile(LPSTR SrcFile, LPSTR DstFile);
- // Packs SrcFile to DstFile using a LZSS algorithm.
-
- int FAR PASCAL LZSSUnPackFile(LPSTR SrcFile, LPSTR DstFile);
- // Unpacks SrcFile to DstFile using a LZSS algorithm.
-
-
- int PASCAL WinMain(HANDLE hInstance, HANDLE hPrevInstance,
- LPSTR lpszCmdLine, int nCmdShow )
-
- {
- int cmdCode;
- int errCode;
- char *srcFile;
- char *dstFile;
- char *p;
- char buf[255];
-
- lstrcpy((LPSTR)buf, lpszCmdLine);
- p = strtok(buf, " ");
- if (p)
- {
- if (stricmp(p, "e") == 0)
- cmdCode = 1;
- else
- cmdCode = 0;
-
- srcFile = strtok(NULL, " ");
- if (srcFile)
- {
- dstFile = strtok(NULL, " ");
- if (dstFile)
- {
- if (cmdCode == 1)
- errCode = LZSSPackFile(srcFile, dstFile);
- else
- errCode = LZSSUnPackFile(srcFile, dstFile);
-
- if (errCode)
- MessageBox(0, "ERROR #--, unable to complete operation.",
- "EDI LZSS TEST", MB_OK | MB_ICONINFORMATION);
- else
- MessageBox(0, "All done.",
- "EDI LZSS TEST", MB_OK | MB_ICONEXCLAMATION);
-
- return 0;
- }
- }
- }
-
- MessageBox(0, "USAGE: LZSSTEST e|d infile outfile", "EDI LZSS TEST",
- MB_OK | MB_ICONINFORMATION);
- }
-
-
-
-
-