home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 9 Archive / 09-Archive.zip / unzip511.zip / os2 / watcom.dif < prev    next >
Internet Message Format  |  1994-07-27  |  12KB
  1. Date: Tue, 26 Jul 1994 00:33:40 +0200
  2. From: Kai Uwe Rommel <rommel@ars.muc.de>
  3.  
  4. Ok, Watcom support is done now. All four targets (MS-DOS and OS/2,
  5. each of them both 16- and 32-bit) work now. The patches are quite
  6. minor, again. The version() code is fixed for Watcom now too.
  7.  
  8. Greg, please ignore the patches sent in the first message, the
  9. following patches are relative to original 5.11g.
  10.  
  11.  
  12. diff -cbr unzip/envargs.c unzip-2/envargs.c
  13. *** unzip/envargs.c    Thu Apr 21 10:02:16 1994
  14. --- unzip-2/envargs.c    Mon Jul 25 23:25:26 1994
  15. ***************
  16. *** 180,186 ****
  17. --- 180,188 ----
  18.       char ***argvp;
  19.   {
  20.   #ifndef MSC /* declared differently in MSC 7.0 headers, at least */
  21. + #ifndef __WATCOMC__
  22.       extern char **environ;          /* environment */
  23. + #endif
  24.   #endif
  25.       char        **envp;             /* pointer into environment */
  26.       char        **newargv;          /* new argument list */
  27. diff -cbr unzip/msdos/msdos.c unzip-2/msdos/msdos.c
  28. *** unzip/msdos/msdos.c    Fri Jul 22 13:18:30 1994
  29. --- unzip-2/msdos/msdos.c    Tue Jul 26 00:02:34 1994
  30. ***************
  31. *** 37,45 ****
  32.   static int renamed_fullpath;   /* ditto */
  33.   static unsigned nLabelDrive;   /* ditto, plus volumelabel() */
  34.   
  35. ! #if (defined(__GO32__) || defined(__EMX__))
  36. ! #  define MKDIR(path,mode)   mkdir(path,mode)
  37.   #  include <dirent.h>        /* use readdir() */
  38.   #  define direct dirent
  39.   #  define Opendir opendir
  40.   #  define Readdir readdir
  41. --- 37,57 ----
  42.   static int renamed_fullpath;   /* ditto */
  43.   static unsigned nLabelDrive;   /* ditto, plus volumelabel() */
  44.   
  45. ! #if (defined(__WATCOMC__) && defined(__386__))
  46. ! #  define WREGS(v,r) (v##.w.##r)
  47. ! #  define int86x int386x
  48. ! #else
  49. ! #  define WREGS(v,r) (v##.x.##r)
  50. ! #endif
  51. ! 
  52. ! #if (defined(__GO32__) || defined(__EMX__) || defined(__WATCOMC__))
  53. ! #  ifdef __WATCOMC__
  54. ! #    include <direct.h>
  55. ! #    define MKDIR(path,mode)   mkdir(path)
  56. ! #  else
  57.   #    include <dirent.h>        /* use readdir() */
  58. + #    define MKDIR(path,mode)   mkdir(path,mode)
  59. + #  endif
  60.   #  define direct dirent
  61.   #  define Opendir opendir
  62.   #  define Readdir readdir
  63. ***************
  64. *** 774,791 ****
  65.       regs.h.bl = (uch)nDrive;
  66.   #ifdef __EMX__
  67.       _int86(0x21, ®s, ®s);
  68. !     if (regs.x.flags & 1)
  69.   #else
  70.       intdos(®s, ®s);
  71. !     if (regs.x.cflag)        /* error:  do default a/b check instead */
  72.   #endif
  73.       {
  74.           Trace((stderr,
  75.             "error in DOS function 0x44 (AX = 0x%04x):  guessing instead...\n",
  76. !           regs.x.ax));
  77.           return (nDrive == 1 || nDrive == 2)? TRUE : FALSE;
  78.       } else
  79. !         return regs.x.ax? FALSE : TRUE;
  80.   }
  81.   
  82.   
  83. --- 786,803 ----
  84.       regs.h.bl = (uch)nDrive;
  85.   #ifdef __EMX__
  86.       _int86(0x21, ®s, ®s);
  87. !     if (WREGS(regs,flags) & 1)
  88.   #else
  89.       intdos(®s, ®s);
  90. !     if (WREGS(regs,cflag))        /* error:  do default a/b check instead */
  91.   #endif
  92.       {
  93.           Trace((stderr,
  94.             "error in DOS function 0x44 (AX = 0x%04x):  guessing instead...\n",
  95. !           WREGS(regs,ax)));
  96.           return (nDrive == 1 || nDrive == 2)? TRUE : FALSE;
  97.       } else
  98. !         return WREGS(regs,ax)? FALSE : TRUE;
  99.   }
  100.   
  101.   
  102. ***************
  103. *** 854,874 ****
  104.   
  105.       /* set the disk transfer address for subsequent FCB calls */
  106.       sregs.ds = FP_SEG(pdta);
  107. !     regs.x.dx = FP_OFF(pdta);
  108. !     Trace((stderr, "segment:offset of pdta = %x:%x\n", sregs.ds, regs.x.dx));
  109.       Trace((stderr, "&dta = %lx, pdta = %lx\n", (ulg)&dta, (ulg)pdta));
  110.       regs.h.ah = 0x1a;
  111.       intdosx(®s, ®s, &sregs);
  112.   
  113.       /* fill in the FCB */
  114.       sregs.ds = FP_SEG(pfcb);
  115. !     regs.x.dx = FP_OFF(pfcb);
  116.       pfcb->flag = 0xff;          /* extended FCB */
  117.       pfcb->vattr = 0x08;         /* attribute:  disk volume label */
  118.       pfcb->drive = (uch)nLabelDrive;
  119.   
  120.   #ifdef DEBUG
  121. !     Trace((stderr, "segment:offset of pfcb = %x:%x\n", sregs.ds, regs.x.dx));
  122.       Trace((stderr, "&fcb = %lx, pfcb = %lx\n", (ulg)&fcb, (ulg)pfcb));
  123.       Trace((stderr, "(2nd check:  labelling drive %c:)\n", pfcb->drive-1+'A'));
  124.       if (pfcb->flag != fcb.flag)
  125. --- 866,886 ----
  126.   
  127.       /* set the disk transfer address for subsequent FCB calls */
  128.       sregs.ds = FP_SEG(pdta);
  129. !     WREGS(regs,dx) = FP_OFF(pdta);
  130. !     Trace((stderr, "segment:offset of pdta = %x:%x\n", sregs.ds, WREGS(regs,dx)));
  131.       Trace((stderr, "&dta = %lx, pdta = %lx\n", (ulg)&dta, (ulg)pdta));
  132.       regs.h.ah = 0x1a;
  133.       intdosx(®s, ®s, &sregs);
  134.   
  135.       /* fill in the FCB */
  136.       sregs.ds = FP_SEG(pfcb);
  137. !     WREGS(regs,dx) = FP_OFF(pfcb);
  138.       pfcb->flag = 0xff;          /* extended FCB */
  139.       pfcb->vattr = 0x08;         /* attribute:  disk volume label */
  140.       pfcb->drive = (uch)nLabelDrive;
  141.   
  142.   #ifdef DEBUG
  143. !     Trace((stderr, "segment:offset of pfcb = %x:%x\n", sregs.ds, WREGS(regs,dx)));
  144.       Trace((stderr, "&fcb = %lx, pfcb = %lx\n", (ulg)&fcb, (ulg)pfcb));
  145.       Trace((stderr, "(2nd check:  labelling drive %c:)\n", pfcb->drive-1+'A'));
  146.       if (pfcb->flag != fcb.flag)
  147. ***************
  148. *** 894,900 ****
  149.       strncpy((char *)fcb.vn, "???????????", 11);   /* i.e., "*.*" */
  150.       Trace((stderr, "fcb.vn = %lx\n", (ulg)fcb.vn));
  151.       Trace((stderr, "regs.h.ah = %x, regs.x.dx = %04x, sregs.ds = %04x\n",
  152. !       regs.h.ah, regs.x.dx, sregs.ds));
  153.       Trace((stderr, "flag = %x, drive = %d, vattr = %x, vn = %s = %s.\n",
  154.         fcb.flag, fcb.drive, fcb.vattr, fcb.vn, pfcb->vn));
  155.       intdosx(®s, ®s, &sregs);
  156. --- 906,912 ----
  157.       strncpy((char *)fcb.vn, "???????????", 11);   /* i.e., "*.*" */
  158.       Trace((stderr, "fcb.vn = %lx\n", (ulg)fcb.vn));
  159.       Trace((stderr, "regs.h.ah = %x, regs.x.dx = %04x, sregs.ds = %04x\n",
  160. !       regs.h.ah, WREGS(regs,dx), sregs.ds));
  161.       Trace((stderr, "flag = %x, drive = %d, vattr = %x, vn = %s = %s.\n",
  162.         fcb.flag, fcb.drive, fcb.vattr, fcb.vn, pfcb->vn));
  163.       intdosx(®s, ®s, &sregs);
  164. ***************
  165. *** 1058,1065 ****
  166.       union REGS regs;
  167.   
  168.       sregs.ds  = FP_SEG(CountryInfo);
  169. !     regs.x.dx = FP_OFF(CountryInfo);
  170. !     regs.x.ax = 0x3800;
  171.       int86x(0x21, ®s, ®s, &sregs);
  172.   
  173.   #else /* __GO32__ || __EMX__ */
  174. --- 1070,1077 ----
  175.       union REGS regs;
  176.   
  177.       sregs.ds  = FP_SEG(CountryInfo);
  178. !     WREGS(regs,dx) = FP_OFF(CountryInfo);
  179. !     WREGS(regs,ax) = 0x3800;
  180.       int86x(0x21, ®s, ®s, &sregs);
  181.   
  182.   #else /* __GO32__ || __EMX__ */
  183. diff -cbr unzip/os2/makefile.os2 unzip-2/os2/makefile.os2
  184. *** unzip/os2/makefile.os2    Sun Jul 10 23:53:12 1994
  185. --- unzip-2/os2/makefile.os2    Tue Jul 26 00:28:12 1994
  186. ***************
  187. *** 32,37 ****
  188. --- 32,38 ----
  189.   #   For Watcom C/386, edit the os2$(OBJ) target so that os2/os2.c reads
  190.   #   os2\os2.c instead.  Watcom can't handle forward slashes; gcc can't
  191.   #   handle backslashes.  We'll see about making this a macro next time...
  192. + #   Same for msdos/msdos.c ...
  193.   
  194.   default:
  195.       @echo "Enter `$(MAKE) -f makefile.os2 target' with makefile.os2 copied"
  196. ***************
  197. *** 59,65 ****
  198.       CC="cl -nologo -AS -Oaict -Gs -I. $(FP)" \
  199.       CFLAGS="-Zp1 -W3" \
  200.       NFLAGS="" \
  201. !     LDFLAGS="-F 0c00 -Lr -Fe" \
  202.       LDFLAGS2="-link /noe /exe" \
  203.       OUT="-Fo" \
  204.       OBJ=".obj" \
  205. --- 60,66 ----
  206.       CC="cl -nologo -AS -Oaict -Gs -I. $(FP)" \
  207.       CFLAGS="-Zp1 -W3" \
  208.       NFLAGS="" \
  209. !     LDFLAGS="-F 0C00 -Lr -Fe" \
  210.       LDFLAGS2="-link /noe /exe" \
  211.       OUT="-Fo" \
  212.       OBJ=".obj" \
  213. ***************
  214. *** 114,130 ****
  215.       OBJ=".obj" \
  216.       DEF="os2\unzip.def"
  217.   
  218. ! # Watcom C/386 9.0
  219.   watcom:
  220.       $(MAKE) -f makefile.os2 all \
  221.       CC="wcl386 -zq -Ox -s -I." \
  222.       CFLAGS="-Zp1 -DOS2" \
  223.       NFLAGS="" \
  224. !     LDFLAGS="-k0x40000 -x -Fe=" \
  225.       LDFLAGS2="" \
  226.       OUT="-Fo" \
  227.       OBJ=".obj" \
  228.       DEF=""
  229.   
  230.   # Borland C++
  231.   borland:
  232. --- 115,168 ----
  233.       OBJ=".obj" \
  234.       DEF="os2\unzip.def"
  235.   
  236. ! # Watcom C/386 9.0 or higher
  237.   watcom:
  238.       $(MAKE) -f makefile.os2 all \
  239.       CC="wcl386 -zq -Ox -s -I." \
  240.       CFLAGS="-Zp1 -DOS2" \
  241.       NFLAGS="" \
  242. !     LDFLAGS="-k0x40000 -x -l=os2v2 -Fe=" \
  243.       LDFLAGS2="" \
  244.       OUT="-Fo" \
  245.       OBJ=".obj" \
  246.       DEF=""
  247. + 
  248. + # Watcom C/286 9.0 or higher
  249. + watcom16:
  250. +     $(MAKE) -f makefile.os2 all \
  251. +     CC="wcl -zq -ml -Ox -s -I." \
  252. +     CFLAGS="-Zp1 -DOS2" \
  253. +     NFLAGS="" \
  254. +     LDFLAGS="-k0x2000 -x -l=os2 -Fe=" \
  255. +     LDFLAGS2="" \
  256. +     OUT="-Fo" \
  257. +     OBJ=".obj"
  258. + 
  259. + # Watcom C/386 9.0 or higher, crosscompilation for DOS
  260. + watcomdos:
  261. +     $(MAKE) -f makefile.os2 all \
  262. +     CC="wcl386 -zq -Ox -s -I." \
  263. +     CFLAGS="-Zp1 -DMSDOS" \
  264. +     NFLAGS="" \
  265. +     LDFLAGS="-k0x40000 -x -l=dos4g -Fe=" \
  266. +     LDFLAGS2="" \
  267. +     OUT="-Fo" \
  268. +     OBJ=".obj" \
  269. +     OBJU2="msdos.obj" \
  270. +     OBJX2="msdos_.obj"
  271. + 
  272. + # Watcom C/286 9.0 or higher, crosscompilation for DOS
  273. + watcom16dos:
  274. +     $(MAKE) -f makefile.os2 all \
  275. +     CC="wcl -zq -mm -Ox -s -I." \
  276. +     CFLAGS="-Zp1 -DMSDOS" \
  277. +     NFLAGS="" \
  278. +     LDFLAGS="-k0xC00 -x -l=dos -Fe=" \
  279. +     LDFLAGS2="" \
  280. +     OUT="-Fo" \
  281. +     OBJ=".obj" \
  282. +     OBJU2="msdos.obj" \
  283. +     OBJX2="msdos_.obj"
  284.   
  285.   # Borland C++
  286.   borland:
  287. diff -cbr unzip/os2/os2.c unzip-2/os2/os2.c
  288. *** unzip/os2/os2.c    Fri Jul 22 13:29:44 1994
  289. --- unzip-2/os2/os2.c    Tue Jul 26 00:29:00 1994
  290. ***************
  291. *** 73,78 ****
  292. --- 73,79 ----
  293.   #define INCL_DOSDEVICES
  294.   #define INCL_DOSDEVIOCTL
  295.   #define INCL_DOSERRORS
  296. + #define INCL_DOSMISC
  297.   #include <os2.h>
  298.   
  299.   #ifdef __32BIT__
  300. ***************
  301. *** 229,238 ****
  302.   #endif
  303.   
  304.   
  305. - #ifdef __WATCOMC__
  306. -    unsigned char __near _osmode = OS2_MODE;
  307. - #endif
  308. - 
  309.   #ifndef SFX
  310.      static char *getdirent(char *);
  311.      static void free_dircontents(struct _dircontents *);
  312. --- 230,235 ----
  313. ***************
  314. *** 450,474 ****
  315.   char *GetLoadPath(void) 
  316.   {
  317.   #ifdef __32BIT__ /* generic for 32-bit API */
  318. - 
  319.     PTIB pptib;
  320.     PPIB pppib;
  321.     char *szPath;
  322.   
  323.     DosGetInfoBlocks(&pptib, &pppib);
  324.     szPath = pppib -> pib_pchenv;
  325.   
  326.     while (*szPath) /* find end of process environment */
  327.       szPath = strchr(szPath, 0) + 1;
  328.   
  329.     return szPath + 1; /* .exe file name follows environment */
  330.   
  331. - #else /* 16-bit, specific for MS C 6.00, note: requires large data model */
  332. - 
  333. -   extern char _far *_pgmptr;
  334. -   return _pgmptr;
  335. - 
  336. - #endif
  337.   } /* end function GetLoadPath() */
  338.   
  339.   
  340. --- 447,472 ----
  341.   char *GetLoadPath(void) 
  342.   {
  343.   #ifdef __32BIT__ /* generic for 32-bit API */
  344.     PTIB pptib;
  345.     PPIB pppib;
  346.     char *szPath;
  347.   
  348.     DosGetInfoBlocks(&pptib, &pppib);
  349.     szPath = pppib -> pib_pchenv;
  350. + #else /* 16-bit, note: requires large data model */
  351. +   SEL selEnv;
  352. +   USHORT offCmd;
  353. +   char *szPath;
  354. + 
  355. +   DosGetEnv(&selEnv, &offCmd);
  356. +   szPath = MAKEP(selEnv, 0);
  357. + #endif
  358.   
  359.     while (*szPath) /* find end of process environment */
  360.       szPath = strchr(szPath, 0) + 1;
  361.   
  362.     return szPath + 1; /* .exe file name follows environment */
  363.   
  364.   } /* end function GetLoadPath() */
  365.   
  366.   
  367. ***************
  368. *** 689,698 ****
  369.     PFSQBUFFER pData = (PFSQBUFFER) bData;
  370.   #endif
  371.   
  372. -   if ( _osmode == DOS_MODE )
  373. -     return TRUE;
  374. -   else
  375. -   {
  376.       /* We separate FAT and HPFS+other file systems here.
  377.          at the moment I consider other systems to be similar to HPFS,
  378.          i.e. support long file names and case sensitive */
  379. --- 687,692 ----
  380. ***************
  381. *** 719,725 ****
  382.   
  383.       /* End of this ugly code */
  384.       return nResult;
  385. -   }
  386.   } /* end function IsFileSystemFAT() */
  387.   
  388.   
  389. --- 713,718 ----
  390. ***************
  391. *** 1398,1404 ****
  392.       ULONG action;
  393.   #else
  394.       USHORT rc;
  395. !     UINT action;
  396.   #endif
  397.   
  398.   
  399. --- 1391,1397 ----
  400.       ULONG action;
  401.   #else
  402.       USHORT rc;
  403. !     USHORT action;
  404.   #endif
  405.   
  406.   
  407. diff -cbr unzip/unzip.h unzip-2/unzip.h
  408. *** unzip/unzip.h    Fri Jul 22 13:32:44 1994
  409. --- unzip-2/unzip.h    Tue Jul 26 00:14:20 1994
  410. ***************
  411. *** 436,446 ****
  412. --- 436,448 ----
  413.   #endif
  414.   
  415.   #ifdef __WATCOMC__
  416. + #  ifdef __386__
  417.   #    define __32BIT__
  418.   #    undef far
  419.   #    define far
  420.   #    undef near
  421.   #    define near
  422. + #  endif
  423.   #  define PIPE_ERROR (errno == -1)
  424.   #endif
  425.   
  426. ***************
  427. *** 769,775 ****
  428.   #endif
  429.   
  430.   /* GRR:  NT defines MSDOS?? */
  431. ! #if (!defined(MSDOS) && !defined(__IBMC__)) || defined(NT)
  432.   #  define near
  433.   #  define far
  434.   #endif
  435. --- 771,777 ----
  436.   #endif
  437.   
  438.   /* GRR:  NT defines MSDOS?? */
  439. ! #if (!defined(MSDOS) && !defined(__IBMC__) && defined(__32BIT__)) || defined(NT)
  440.   #  define near
  441.   #  define far
  442.   #endif
  443.