home *** CD-ROM | disk | FTP | other *** search
/ Power-Programmierung / CD2.mdf / c / library / os2 / sl / src / patches.os2 < prev    next >
Encoding:
Text File  |  1993-11-21  |  28.1 KB  |  1,157 lines
  1. Only in sc-6.21: bugs.msg
  2. diff -c sc-6.21/cmds.c new/cmds.c
  3. *** sc-6.21/cmds.c    Mon Jun 01 07:35:52 1992
  4. --- new/cmds.c    Sun Nov 21 11:01:14 1993
  5. ***************
  6. *** 19,24 ****
  7. --- 19,40 ----
  8.   #endif
  9.   #endif
  10.   
  11. + /* emx and MSC can produce bound versions, but the usual popen is only
  12. +    available in OS2_MODE. For bound versions, both __OS2__ and MSDOS 
  13. +    will be defined. PDCurses can "#undef MSDOS", so keep this before 
  14. +    the curses.h include. */
  15. + #if defined(MSDOS) || defined(__OS2__)
  16. + #include <stdlib.h>
  17. + #if defined(MSDOS)
  18. + #include "popen.h"
  19. + #define popen os_popen
  20. + #define pclose os_pclose
  21. + #elif defined(_MSC_VER)
  22. + #define popen _popen
  23. + #define pclose _pclose
  24. + #endif
  25. + #endif
  26. + 
  27.   #include <curses.h>
  28.   #if defined(BSD42) || defined(BSD43) || defined(VMS)
  29.   #include <sys/file.h>
  30. ***************
  31. *** 28,38 ****
  32.   #include "sc.h"
  33.   #include <signal.h>
  34.   #include <errno.h>
  35. ! 
  36. ! #ifdef SYSV3
  37. ! extern void exit();
  38. ! #else
  39. ! extern int exit();
  40.   #endif
  41.   
  42.   void    openrow();
  43. --- 44,51 ----
  44.   #include "sc.h"
  45.   #include <signal.h>
  46.   #include <errno.h>
  47. ! #if !defined(__OS2__) && !defined(MSDOS)
  48. ! extern    int    errno;
  49.   #endif
  50.   
  51.   void    openrow();
  52. ***************
  53. *** 39,46 ****
  54.   void    syncref();
  55.   void    unspecial();
  56.   
  57. - extern    int    errno;
  58. - 
  59.   /* a linked list of free [struct ent]'s, uses .next as the pointer */
  60.   extern    struct ent *freeents;
  61.   
  62. --- 52,57 ----
  63. ***************
  64. *** 687,692 ****
  65. --- 698,860 ----
  66.       (void) fprintf(f, "\n");
  67.   }
  68.   
  69. + 
  70. + /* The Jun-92 updates included default filenames for listings, with
  71. +    a 14-char limit on names. IsHPFSFileSystem(), getname(), add_ext(),
  72. +    and mangle() provide the necessary changes for OS/2 and DOS. */
  73. + 
  74. + #if defined(__OS2__)
  75. + int IsHPFSFileSystem (char *directory)
  76. + {
  77. +     ULONG        lMap;
  78. +     BYTE        bData[128];
  79. +     BYTE        bName[3];
  80. +     int            i;
  81. +     char        *FName;
  82. + #if defined (_MSC_VER)
  83. +     USHORT        cbData;
  84. +     USHORT        nDrive;
  85. + #define DosQueryCurrentDisk DosQCurDisk
  86. + #else
  87. +     ULONG        cbData;
  88. +     ULONG        nDrive;
  89. +     PFSQBUFFER2        pFSQ = (PFSQBUFFER2)bData;
  90. + #endif
  91. + 
  92. +     if ( _osmode == DOS_MODE )
  93. +     return FALSE;
  94. + 
  95. +     if (isalpha (directory[0]) && (directory[1] == ':'))
  96. +     nDrive = toupper (directory[0]) - '@';
  97. +     else
  98. +     DosQueryCurrentDisk (&nDrive, &lMap);
  99. + 
  100. + /* Set up the drive name */
  101. + 
  102. +     bName[0] = (char) (nDrive + '@');
  103. +     bName[1] = ':';
  104. +     bName[2] = 0;
  105. + 
  106. +     cbData = sizeof (bData);
  107. + 
  108. + #if defined(_MSC_VER)
  109. +     if (DosQFSAttach (bName, 0, FSAIL_QUERYNAME, bData, &cbData, 0L))
  110. + #else
  111. +     if (DosQueryFSAttach (bName, 0, FSAIL_QUERYNAME, pFSQ, &cbData))
  112. + #endif
  113. +       return FALSE;
  114. + 
  115. + #if defined(_MSC_VER)
  116. +     FName = bData + (*((USHORT *) (bData + 2)) + 7);
  117. + #else
  118. +     FName = pFSQ->szName + pFSQ->cbName + 1;
  119. + #endif
  120. + 
  121. +     if (strcmp(FName, "HPFS"))
  122. +       return FALSE;
  123. +     return(TRUE);
  124. + }
  125. + #endif
  126. + 
  127. + #if defined(__OS2__) || defined(MSDOS)
  128. + char *getshell(shellbuf *shell)
  129. + {
  130. +   static char *sname[] = {"cmd", "command", "4os2", "4dos", NULL};
  131. +   char cmd[_MAX_PATH], *shl, *opt;
  132. +   int i;
  133. + 
  134. +   opt = "-c";
  135. +   if ((shl = getenv("SHELL")) == NULL)
  136. +     shl = getenv("COMSPEC");
  137. +   if (shl) {
  138. +     _splitpath(shl, NULL, NULL, cmd, NULL);
  139. +     for (i = 0; sname[i]; i++)
  140. +       if (stricmp(cmd, sname[i]) == 0) {
  141. +     opt = "/c"; break;
  142. +       }
  143. +   }
  144. +   else
  145. +     shl = "/bin/sh";
  146. +   if (shell) {
  147. +     strcpy(shell->name, shl);
  148. +     strcpy(shell->opt, opt);
  149. +   }
  150. +   return(shl);
  151. + }
  152. + #endif
  153. + 
  154. + char *
  155. + getname(path)
  156. + char *path;
  157. + {
  158. +   char *tpp;
  159. + 
  160. + #if defined(__EMX__)
  161. +   tpp = _getname(path);
  162. + #elif defined(__OS2__) || defined(MSDOS)
  163. +   for (tpp = path + strlen(path); tpp > path; tpp--)
  164. +     if (strchr(":/\\", *(tpp-1))) break;
  165. + #else
  166. +   if ((tpp = strrchr(path, '/'))  == NULL)
  167. +     tpp = path;
  168. +   else
  169. +     tpp++;
  170. + #endif
  171. +   return(tpp);
  172. + }
  173. + 
  174. + char *
  175. + mangle(filename)
  176. + char *filename;
  177. + {
  178. + #if defined(__OS2__) || defined(MSDOS)
  179. +   char drive[_MAX_DRIVE], dir[_MAX_DIR], fname[_MAX_FNAME], ext[_MAX_EXT];
  180. +   char *p;
  181. +   int i, j;
  182. + 
  183. + #if defined(__OS2__)
  184. +   if (IsHPFSFileSystem(filename)) 
  185. +     return(filename);
  186. + #endif
  187. + 
  188. +   /* Simple mangling tries to get most of the filename characters. */
  189. +   _splitpath(filename, drive, dir, fname, ext);
  190. +   if ((i = strlen(fname)) > 8) {   /* try to put chars in extension */
  191. +     if (*ext == '\0') sprintf(ext, ".%.3s", fname + 8);
  192. +   }
  193. +   else if ((j = strlen(ext)) > 4) {  /* try to put chars in fname portion */
  194. +     if (i < 7) {
  195. +       j = (7-i < j-4) ? 7-i : j-4;
  196. +       sprintf(fname + i, "_%*s", j, ext+1);
  197. +       strcpy(ext + 1, ext + 1 + j);
  198. +     }
  199. +   }
  200. +   fname[8] = '\0'; ext[4] = '\0';
  201. +   while (p = strchr(fname, '.')) *p = '_';
  202. +   _makepath(filename, drive, dir, fname, ext);
  203. + #else                   /* put 14-char limit on filename */
  204. +   if (strlen(filename) > 14) filename[14] = '\0';
  205. + #endif
  206. +   return(filename);
  207. + }
  208. + 
  209. + char *
  210. + add_ext(path, ext)
  211. + char *path, *ext;
  212. + {
  213. +   char *fname;
  214. + 
  215. +   if (ext == NULL || *ext == '\0') return path;
  216. + #if defined(__OS2__) || defined(MSDOS)
  217. +   mangle(strcat(path, ext));
  218. + #else    /* filename is limited to 14 characters */
  219. +   fname = getname(path);
  220. +   fname[10] = '\0';
  221. +   strcat(fname, ext);
  222. + #endif
  223. +   return(path);
  224. + }
  225. + 
  226.   void
  227.   printfile (fname, r0, c0, rn, cn)
  228.   char *fname;
  229. ***************
  230. *** 700,723 ****
  231.       int fieldlen, nextcol;
  232.       register row, col;
  233.       register struct ent **pp;
  234. -     char file[32];
  235.       char path[256];
  236. -     char *tpp;
  237.   
  238. -     /* printfile will be the [path/]file ---> [path/]file.out,
  239. -      * file is limited to 14 characters.
  240. -      */
  241.       if (*fname == '\0') {
  242. !     strcpy(path, curfile);
  243. ! 
  244. !     if ((tpp = strrchr(path, '/'))  == NULL)
  245. !         tpp = path;
  246. !     else
  247. !         tpp++;
  248. !     strcpy(file, tpp);
  249. !     file[10] = '\0';
  250. !     sprintf(tpp, "%s.asc", file);
  251. !     fname = path;
  252.       }
  253.   
  254.       if ((strcmp(fname, curfile) == 0) &&
  255. --- 868,881 ----
  256.       int fieldlen, nextcol;
  257.       register row, col;
  258.       register struct ent **pp;
  259.       char path[256];
  260.   
  261.       if (*fname == '\0') {
  262. !       /* printfile will be the [path/]file ---> [path/]file.out,
  263. !        * possibly with some mangling by add_ext().
  264. !        */
  265. !       strcpy(path, curfile);
  266. !       add_ext(fname = path, ".asc");
  267.       }
  268.   
  269.       if ((strcmp(fname, curfile) == 0) &&
  270. ***************
  271. *** 886,915 ****
  272.       register row, col;
  273.       register struct ent **pp;
  274.       char coldelim = DEFCOLDELIM;
  275. -     char file[32];
  276.       char path[256];
  277. -     char *tpp;
  278.   
  279. -     /* tblprintfile will be the [path/]file ---> [path/]file.out,
  280. -      * file is limited to 14 characters.
  281. -      */
  282.       if (*fname == '\0') {
  283. !     strcpy(path, curfile);
  284. !     if ((tpp = strrchr(path, '/'))  == NULL)
  285. !       tpp = path;
  286. !     else
  287. !       tpp++;
  288. !     strcpy(file, tpp);
  289. !     file[10] = '\0';
  290. !     if (tbl_style == 0)
  291. !       sprintf(tpp, "%s.cln", file);
  292. !     else if (tbl_style == TBL)
  293. !       sprintf(tpp, "%s.tbl", file);
  294. !     else if (tbl_style == LATEX)
  295. !       sprintf(tpp, "%s.lat", file);
  296. !     else if (tbl_style == TEX)
  297. !       sprintf(tpp, "%s.tex", file);
  298. !     fname = path;
  299.       }
  300.   
  301.       if ((strcmp(fname, curfile) == 0) &&
  302. --- 1044,1065 ----
  303.       register row, col;
  304.       register struct ent **pp;
  305.       char coldelim = DEFCOLDELIM;
  306.       char path[256];
  307.   
  308.       if (*fname == '\0') {
  309. !       /* tblprintfile will be the [path/]file ---> [path/]file.out,
  310. !        * possibly with some mangling by add_ext().
  311. !        */
  312. !       strcpy(path, curfile);
  313. !       if (tbl_style == 0)
  314. !     add_ext(path, ".cln");
  315. !       else if (tbl_style == TBL)
  316. !     add_ext(path, ".tbl");
  317. !       else if (tbl_style == LATEX)
  318. !     add_ext(path, ".lat");
  319. !       else if (tbl_style == TEX)
  320. !     add_ext(path, ".tex");
  321. !       fname = path;
  322.       }
  323.   
  324.       if ((strcmp(fname, curfile) == 0) &&
  325. ***************
  326. *** 1306,1316 ****
  327.       return(fopen(efname, "w"));
  328.       }
  329.   
  330. - #if defined(MSDOS)
  331. -     error("Piping not available under MS-DOS\n");
  332. -     return(0);
  333. - #else
  334.       fname++;                /* Skip | */
  335.       if ( pipe (pipefd) < 0) {
  336.       error("Can't make pipe to child");
  337.       *rpid = 0;
  338. --- 1456,1481 ----
  339.       return(fopen(efname, "w"));
  340.       }
  341.   
  342.       fname++;                /* Skip | */
  343. + 
  344. + #if defined(MSDOS) || defined(__OS2__) 
  345. +     { 
  346. +       shellbuf shell;
  347. +       char cmd[256];
  348. + 
  349. +       getshell(&shell);
  350. +       sprintf(cmd, "%s %s %s", shell.name, shell.opt, fname);
  351. +       if ((f = popen(cmd, "w")) == NULL) {
  352. +     error ("Can't popen output");
  353. +     *rpid = 0;
  354. +     return(0);
  355. +       }
  356. +       else
  357. +     *rpid = -1;
  358. +     }
  359. + 
  360. + #else
  361. + 
  362.       if ( pipe (pipefd) < 0) {
  363.       error("Can't make pipe to child");
  364.       *rpid = 0;
  365. ***************
  366. *** 1343,1351 ****
  367.           return(0);
  368.       }
  369.       }
  370. ! #endif /* VMS */
  371.       return(f);
  372. - #endif /* MSDOS */
  373.   }
  374.   
  375.   /* close a file opened by openout(), if process wait for return */
  376. --- 1508,1516 ----
  377.           return(0);
  378.       }
  379.       }
  380. ! #endif
  381. ! #endif
  382.       return(f);
  383.   }
  384.   
  385.   /* close a file opened by openout(), if process wait for return */
  386. ***************
  387. *** 1356,1363 ****
  388.   {
  389.       int temp;
  390.   
  391.       (void) fclose (f);
  392. - #if !defined(MSDOS)
  393.       if (pid) {
  394.            while (pid != wait(&temp)) /**/;
  395.        (void) printf("Press RETURN to continue ");
  396. --- 1521,1538 ----
  397.   {
  398.       int temp;
  399.   
  400. + #if defined(MSDOS) || defined(__OS2__)
  401. +     if (pid == -1) {
  402. +       pclose(f);
  403. +       (void) printf("Press RETURN to continue ");
  404. +       (void) fflush(stdout);
  405. +       (void) nmgetch();
  406. +       goraw();
  407. +     }
  408. +     else
  409. +       fclose(f);
  410. + #else
  411.       (void) fclose (f);
  412.       if (pid) {
  413.            while (pid != wait(&temp)) /**/;
  414.        (void) printf("Press RETURN to continue ");
  415. ***************
  416. *** 1365,1371 ****
  417.        (void) nmgetch();
  418.        goraw();
  419.       }
  420. ! #endif /* MSDOS */
  421.   }
  422.   
  423.   void
  424. --- 1540,1546 ----
  425.        (void) nmgetch();
  426.        goraw();
  427.       }
  428. ! #endif
  429.   }
  430.   
  431.   void
  432. ***************
  433. *** 1466,1472 ****
  434.       (void) strcpy(save,fname);
  435.   
  436.       if ((f= openout(fname, &pid)) == (FILE *)0)
  437. !     {    error ("Can't create file \"%s\"", fname);
  438.       return (-1);
  439.       }
  440.   
  441. --- 1641,1647 ----
  442.       (void) strcpy(save,fname);
  443.   
  444.       if ((f= openout(fname, &pid)) == (FILE *)0)
  445. !     { error ("Can't create file \"%s\"", fname);
  446.       return (-1);
  447.       }
  448.   
  449. ***************
  450. *** 1772,1778 ****
  451.   }
  452.   
  453.   /* expand a ~ in a path to your home directory */
  454. ! #if !defined(MSDOS) && !defined(VMS)
  455.   #include <pwd.h>
  456.   #endif
  457.   char    *
  458. --- 1947,1953 ----
  459.   }
  460.   
  461.   /* expand a ~ in a path to your home directory */
  462. ! #if !defined(MSDOS) && !defined(__OS2__) && !defined(VMS)
  463.   #include <pwd.h>
  464.   #endif
  465.   char    *
  466. ***************
  467. *** 1795,1801 ****
  468.           if ((*pathptr == '/') || (*pathptr == '\0'))
  469.           {    strcpy(tmppath, HomeDir);
  470.           }
  471. ! #if !defined(MSDOS) && !defined(VMS)
  472.           else
  473.           {    struct    passwd *pwent;
  474.               extern    struct    passwd *getpwnam();
  475. --- 1970,1976 ----
  476.           if ((*pathptr == '/') || (*pathptr == '\0'))
  477.           {    strcpy(tmppath, HomeDir);
  478.           }
  479. ! #if !defined(MSDOS) && !defined(__OS2__) && !defined(VMS)
  480.           else
  481.           {    struct    passwd *pwent;
  482.               extern    struct    passwd *getpwnam();
  483. ***************
  484. *** 1846,1857 ****
  485.   
  486.       /* tpath will be the [path/]file ---> [path/]#file~ */
  487.       strcpy(tpath, path);
  488. !     if ((tpp = strrchr(tpath, '/')) == NULL)
  489. !         tpp = tpath;
  490. !     else
  491. !         tpp++;
  492. !     strcpy(fname, tpp);
  493.       (void) sprintf(tpp, "#%s~", fname);
  494.   
  495.       if (stat(path, &statbuf) == 0)
  496.       {
  497. --- 2021,2029 ----
  498.   
  499.       /* tpath will be the [path/]file ---> [path/]#file~ */
  500.       strcpy(tpath, path);
  501. !     strcpy(fname, tpp = getname(tpath));
  502.       (void) sprintf(tpp, "#%s~", fname);
  503. +     mangle(tpath);
  504.   
  505.       if (stat(path, &statbuf) == 0)
  506.       {
  507. diff -c sc-6.21/format.c new/format.c
  508. *** sc-6.21/format.c    Mon Jun 01 07:35:54 1992
  509. --- new/format.c    Tue Nov 09 19:02:04 1993
  510. ***************
  511. *** 95,103 ****
  512.   #define EOS    '\0'
  513.   #define MAXBUF    256
  514.   
  515. ! extern char
  516. !   *strcpy(),
  517. !   *strcat();
  518.   
  519.   static char
  520.     *fmt_int(),
  521. --- 95,106 ----
  522.   #define EOS    '\0'
  523.   #define MAXBUF    256
  524.   
  525. ! #if defined(__OS2__)
  526. ! # include <string.h>
  527. ! #else
  528. ! extern char *strcpy();
  529. ! extern char *strcat();
  530. ! #endif
  531.   
  532.   static char
  533.     *fmt_int(),
  534. ***************
  535. *** 578,584 ****
  536.     }
  537.     if (fmt == REFMTDATE) {
  538.       int i;
  539. !     char *time;
  540.       long int secs;
  541.   
  542.       if (buflen < 9) {
  543. --- 581,587 ----
  544.     }
  545.     if (fmt == REFMTDATE) {
  546.       int i;
  547. !     char *time_of_day;
  548.       long int secs;
  549.   
  550.       if (buflen < 9) {
  551. ***************
  552. *** 587,602 ****
  553.       }
  554.       else {
  555.         secs = (time_t)val;
  556. !       time = ctime(&secs);
  557. !       buf[0] = time[8];
  558. !       buf[1] = time[9];
  559.         buf[2] = ' ';
  560. !       buf[3] = time[4];
  561. !       buf[4] = time[5];
  562. !       buf[5] = time[6];
  563.         buf[6] = ' ';
  564. !       buf[7] = time[22];
  565. !       buf[8] = time[23];
  566.         for (i = 9; i < width; i++) buf[i] = ' ';
  567.         buf[i] = '\0';
  568.       }
  569. --- 590,605 ----
  570.       }
  571.       else {
  572.         secs = (time_t)val;
  573. !       time_of_day = ctime(&secs);
  574. !       buf[0] = time_of_day[8];
  575. !       buf[1] = time_of_day[9];
  576.         buf[2] = ' ';
  577. !       buf[3] = time_of_day[4];
  578. !       buf[4] = time_of_day[5];
  579. !       buf[5] = time_of_day[6];
  580.         buf[6] = ' ';
  581. !       buf[7] = time_of_day[22];
  582. !       buf[8] = time_of_day[23];
  583.         for (i = 9; i < width; i++) buf[i] = ' ';
  584.         buf[i] = '\0';
  585.       }
  586. Only in new: getopt.c
  587. Only in new: getopt.h
  588. Only in new: gram.c
  589. Only in new: gram.err
  590. diff -c sc-6.21/help.c new/help.c
  591. *** sc-6.21/help.c    Mon Jun 01 07:35:54 1992
  592. --- new/help.c    Wed Nov 10 21:28:58 1993
  593. ***************
  594. *** 610,619 ****
  595.       while (*pagep)
  596.       {
  597.   #ifndef TROFF
  598. !     (void) fputs(SCNAME, stdout);
  599. !     (void) fputs(header);
  600. !     (void) printf("\n");
  601. !     (void) puts(revision);
  602.   #endif
  603.   
  604.       for (lineno = 0; (*pagep)[lineno]; lineno++) {
  605. --- 610,616 ----
  606.       while (*pagep)
  607.       {
  608.   #ifndef TROFF
  609. !     (void) printf("%s%s\n%s", SCNAME, header, revision);
  610.   #endif
  611.   
  612.       for (lineno = 0; (*pagep)[lineno]; lineno++) {
  613. diff -c sc-6.21/interp.c new/interp.c
  614. *** sc-6.21/interp.c    Mon Jun 01 07:38:50 1992
  615. --- new/interp.c    Sat Nov 20 09:24:10 1993
  616. ***************
  617. *** 26,33 ****
  618.   #include <setjmp.h>
  619.   #include <stdio.h>
  620.   #include <ctype.h>
  621. ! 
  622.   extern int errno;        /* set by math functions */
  623.   #ifdef BSD42
  624.   #include <strings.h>
  625.   #include <sys/time.h>
  626. --- 26,36 ----
  627.   #include <setjmp.h>
  628.   #include <stdio.h>
  629.   #include <ctype.h>
  630. ! #include <errno.h>
  631. ! #if !defined(__OS2__) && !defined(MSDOS)
  632.   extern int errno;        /* set by math functions */
  633. + #endif
  634. + 
  635.   #ifdef BSD42
  636.   #include <strings.h>
  637.   #include <sys/time.h>
  638. ***************
  639. *** 41,46 ****
  640. --- 44,65 ----
  641.   #endif
  642.   #endif
  643.   
  644. + /* emx and MSC can produce bound versions, but the usual popen is only
  645. +    available in OS2_MODE. For bound versions, both __OS2__ and MSDOS 
  646. +    will be defined. PDCurses can "#undef MSDOS", so keep this before 
  647. +    the curses.h include. */
  648. + #if defined(MSDOS) || defined(__OS2__)
  649. + #include <stdlib.h>
  650. + #if defined(MSDOS)
  651. + #include "popen.h"
  652. + #define popen os_popen
  653. + #define pclose os_pclose
  654. + #elif defined(_MSC_VER)
  655. + #define popen _popen
  656. + #define pclose _pclose
  657. + #endif
  658. + #endif
  659. + 
  660.   #include <curses.h>
  661.   #include "sc.h"
  662.   
  663. ***************
  664. *** 551,557 ****
  665. --- 570,578 ----
  666.   int which;
  667.   double when;
  668.   {
  669. + #if !defined(__OS2__)
  670.       long time();
  671. + #endif
  672.   
  673.       static long t_cache;
  674.       static struct tm tm_cache;
  675. ***************
  676. *** 1023,1029 ****
  677.    * written to files, etc.
  678.    */
  679.   
  680. ! #if defined(VMS) || defined(MSDOS)
  681.   char *
  682.   doext(command, value)
  683.   char *command;
  684. --- 1044,1050 ----
  685.    * written to files, etc.
  686.    */
  687.   
  688. ! #if defined(VMS)
  689.   char *
  690.   doext(command, value)
  691.   char *command;
  692. ***************
  693. *** 1336,1348 ****
  694.       for (i=0; i<=maxrow; i++)
  695.           for (j=0; j<=maxcol; j++)
  696.           if ((p = *ATBL(tbl,i,j)) && !(p->flags&is_locked) && p->expr) RealEvalOne(p,i,j,&chgct);
  697. !     }
  698.       else if ( calc_order == BYCOLS ) {
  699. !     for (j=0; j<=maxcol; j++)
  700.       {   for (i=0; i<=maxrow; i++)
  701.           if ((p = *ATBL(tbl,i,j)) && !(p->flags&is_locked) && p->expr) RealEvalOne(p,i,j,&chgct);
  702.       }
  703. !     }
  704.       else error("Internal error calc_order");
  705.    
  706.       return(chgct);
  707. --- 1357,1369 ----
  708.       for (i=0; i<=maxrow; i++)
  709.           for (j=0; j<=maxcol; j++)
  710.           if ((p = *ATBL(tbl,i,j)) && !(p->flags&is_locked) && p->expr) RealEvalOne(p,i,j,&chgct);
  711. !     } 
  712.       else if ( calc_order == BYCOLS ) {
  713. !     for (j=0; j<=maxcol; j++) 
  714.       {   for (i=0; i<=maxrow; i++)
  715.           if ((p = *ATBL(tbl,i,j)) && !(p->flags&is_locked) && p->expr) RealEvalOne(p,i,j,&chgct);
  716.       }
  717. !     } 
  718.       else error("Internal error calc_order");
  719.    
  720.       return(chgct);
  721. diff -c sc-6.21/lex.c new/lex.c
  722. *** sc-6.21/lex.c    Mon Jun 01 07:38:50 1992
  723. --- new/lex.c    Wed Nov 10 21:25:28 1993
  724. ***************
  725. *** 544,550 ****
  726.   
  727.   #endif
  728.   
  729. ! #if defined(SYSV2) || defined(SYSV3) || defined(MSDOS)
  730.   
  731.   void
  732.   initkbd()
  733. --- 544,550 ----
  734.   
  735.   #endif
  736.   
  737. ! #if defined(SYSV2) || defined(SYSV3) || defined(MSDOS) || defined(__OS2__)
  738.   
  739.   void
  740.   initkbd()
  741. Only in new: Makefile.os2
  742. Only in new: popen.c
  743. Only in new: popen.h
  744. diff -c sc-6.21/psc.c new/psc.c
  745. *** sc-6.21/psc.c    Mon Jun 01 07:38:50 1992
  746. --- new/psc.c    Sun Nov 21 11:09:10 1993
  747. ***************
  748. *** 35,46 ****
  749.   char    *progname;
  750.   int    getrow(), getcol(), scan();
  751.   
  752. - #ifdef SYSV3
  753. - extern void exit();
  754. - #else
  755. - extern int exit();
  756. - #endif
  757. - 
  758.   int *fwidth;
  759.   int *precision;
  760.   int maxcols;
  761. --- 35,40 ----
  762. Only in new: regex.c
  763. Only in new: regex.h
  764. Only in new: sc-32.def
  765. diff -c sc-6.21/sc.c new/sc.c
  766. *** sc-6.21/sc.c    Mon Jun 01 07:38:50 1992
  767. --- new/sc.c    Sun Nov 21 11:07:10 1993
  768. ***************
  769. *** 27,32 ****
  770. --- 27,36 ----
  771.   
  772.   #include <stdio.h>
  773.   #include "sc.h"
  774. + #if defined(MSDOS) || defined(__OS2__)
  775. + #include <stdlib.h>    /* Use _splitpath to get progname */
  776. + #include <process.h>   /* use spawn instead of fork     */
  777. + #endif
  778.   
  779.   extern    char    *getenv();
  780.   extern    void    startdisp(), stopdisp();
  781. ***************
  782. *** 177,182 ****
  783. --- 181,197 ----
  784.       to_fix = NULL;
  785.   }
  786.   
  787. + void *
  788. + default_file_is(filename, ext)
  789. + char *filename, *ext;
  790. + {
  791. +   extern char *add_ext();
  792. +   char path[256];
  793. + 
  794. +   strcpy(path, filename);
  795. +   error ("Default file is \"%s\"",add_ext(path, ext));
  796. + }
  797. + 
  798.   char    *progname;
  799.   
  800.   int
  801. ***************
  802. *** 206,213 ****
  803.   
  804.       int tempx, tempy;     /* Temp versions of curx, cury */
  805.   
  806. ! #if defined(MSDOS)
  807. !     if ((revi = strrchr(argv[0], '\\')) != NULL)
  808.   #else
  809.   #ifdef VMS
  810.       if ((revi = strrchr(argv[0], ']')) != NULL)
  811. --- 221,229 ----
  812.   
  813.       int tempx, tempy;     /* Temp versions of curx, cury */
  814.   
  815. ! #if defined(MSDOS) || defined(__OS2__)
  816. !     static char fname[_MAX_FNAME];
  817. !     _splitpath(argv[0], NULL, NULL, progname = fname, NULL);
  818.   #else
  819.   #ifdef VMS
  820.       if ((revi = strrchr(argv[0], ']')) != NULL)
  821. ***************
  822. *** 214,223 ****
  823.   #else
  824.       if ((revi = strrchr(argv[0], '/')) != NULL)
  825.   #endif
  826. - #endif
  827.       progname = revi+1;
  828.       else
  829.       progname = argv[0];
  830.   
  831.       while (argc > 1 && argv[1][0] == '-') {
  832.       argv++;
  833. --- 230,239 ----
  834.   #else
  835.       if ((revi = strrchr(argv[0], '/')) != NULL)
  836.   #endif
  837.       progname = revi+1;
  838.       else
  839.       progname = argv[0];
  840. + #endif
  841.   
  842.       while (argc > 1 && argv[1][0] == '-') {
  843.       argv++;
  844. ***************
  845. *** 736,752 ****
  846.                *  "!"    forks a shell
  847.                *  "!!" repeats last command
  848.                */
  849. ! #if VMS || MSDOS
  850. !             error("Not implemented on VMS or MS-DOS");
  851.   #else /* VMS */
  852. !             char *shl;
  853.               int pid, temp;
  854.               char cmd[MAXCMD];
  855.               static char lastcmd[MAXCMD];
  856.   
  857.               if (!(shl = getenv("SHELL")))
  858.               shl = "/bin/sh";
  859. ! 
  860.               deraw();
  861.               (void) fputs("! ", stdout);
  862.               (void) fflush(stdout);
  863. --- 752,775 ----
  864.                *  "!"    forks a shell
  865.                *  "!!" repeats last command
  866.                */
  867. ! #if defined(VMS)
  868. !             error("Not implemented");
  869.   #else /* VMS */
  870. !             char *shl, *opt;
  871.               int pid, temp;
  872.               char cmd[MAXCMD];
  873.               static char lastcmd[MAXCMD];
  874.   
  875. + #if defined(MSDOS) || defined(__OS2__)
  876. +             shellbuf shell;
  877. + 
  878. +             shl = getshell(&shell);
  879. +             opt = shell.opt;
  880. + #else
  881.               if (!(shl = getenv("SHELL")))
  882.               shl = "/bin/sh";
  883. !             opt = "-c";
  884. ! #endif
  885.               deraw();
  886.               (void) fputs("! ", stdout);
  887.               (void) fflush(stdout);
  888. ***************
  889. *** 763,773 ****
  890.               (void) fflush (stdout);
  891.               }
  892.   
  893.               if (!(pid = fork()))
  894.               {
  895.               (void) signal (SIGINT, SIG_DFL);  /* reset */
  896.               if(strlen(cmd))
  897. !                 (void)execl(shl,shl,"-c",cmd,(char *)0);
  898.               else
  899.                   (void) execl(shl, shl, (char *)0);
  900.               exit(-127);
  901. --- 786,802 ----
  902.               (void) fflush (stdout);
  903.               }
  904.   
  905. + #if defined(MSDOS) || defined(__OS2__)
  906. +             if(strlen(cmd))
  907. +               (void) spawnl(P_WAIT, shl, shl, opt, cmd, (char *)0);
  908. +             else
  909. +               (void) spawnl(P_WAIT, shl, shl, (char *)0);
  910. + #else
  911.               if (!(pid = fork()))
  912.               {
  913.               (void) signal (SIGINT, SIG_DFL);  /* reset */
  914.               if(strlen(cmd))
  915. !                 (void)execl(shl,shl,opt,cmd,(char *)0);
  916.               else
  917.                   (void) execl(shl, shl, (char *)0);
  918.               exit(-127);
  919. ***************
  920. *** 774,780 ****
  921.               }
  922.   
  923.               while (pid != wait(&temp));
  924. ! 
  925.               (void) printf("Press RETURN to continue ");
  926.               fflush(stdout);
  927.               (void)nmgetch();
  928. --- 803,809 ----
  929.               }
  930.   
  931.               while (pid != wait(&temp));
  932. ! #endif
  933.               (void) printf("Press RETURN to continue ");
  934.               fflush(stdout);
  935.               (void)nmgetch();
  936. ***************
  937. *** 1131,1137 ****
  938.           case 'W':
  939.               (void) sprintf (line, "write [\"dest\" range] \"");
  940.               if (*curfile)
  941. !                        error ("Default file is \"%s.asc\"",curfile);
  942.               linelim = strlen (line);
  943.               insert_mode();
  944.               break;
  945. --- 1160,1166 ----
  946.           case 'W':
  947.               (void) sprintf (line, "write [\"dest\" range] \"");
  948.               if (*curfile)
  949. !                        default_file_is(curfile, ".asc");
  950.               linelim = strlen (line);
  951.               insert_mode();
  952.               break;
  953. ***************
  954. *** 1144,1158 ****
  955.           case 'T':    /* tbl output */
  956.               (void) sprintf (line, "tbl [\"dest\" range] \"");
  957.               if (*curfile && tbl_style == 0)
  958. !                        error ("Default file is \"%s.cln\"",curfile);
  959.                       else if (*curfile && tbl_style == TBL)
  960. !                        error ("Default file is \"%s.tbl\"",curfile);
  961.                       else if (*curfile && tbl_style == LATEX)
  962. !                        error ("Default file is \"%s.lat\"",curfile);
  963.                       else if (*curfile && tbl_style == SLATEX)
  964. !                        error ("Default file is \"%s.stx\"",curfile);
  965.                       else if (*curfile && tbl_style == TEX)
  966. !                        error ("Default file is \"%s.tex\"",curfile);
  967.               linelim = strlen (line);
  968.               insert_mode();
  969.               break;
  970. --- 1173,1187 ----
  971.           case 'T':    /* tbl output */
  972.               (void) sprintf (line, "tbl [\"dest\" range] \"");
  973.               if (*curfile && tbl_style == 0)
  974. !                        default_file_is(curfile, ".cln");
  975.                       else if (*curfile && tbl_style == TBL)
  976. !                        default_file_is(curfile, ".tbl");
  977.                       else if (*curfile && tbl_style == LATEX)
  978. !                        default_file_is(curfile, ".lat");
  979.                       else if (*curfile && tbl_style == SLATEX)
  980. !                        default_file_is(curfile, ".stx");
  981.                       else if (*curfile && tbl_style == TEX)
  982. !                        default_file_is(curfile, ".tex");
  983.               linelim = strlen (line);
  984.               insert_mode();
  985.               break;
  986. ***************
  987. *** 1330,1336 ****
  988.   #endif
  989.   
  990.       (void) signal(SIGINT, SIG_IGN);
  991. ! #if !defined(MSDOS)
  992.       (void) signal(SIGQUIT, dump_me);
  993.       (void) signal(SIGPIPE, doquit);
  994.       (void) signal(SIGALRM, time_out);
  995. --- 1359,1365 ----
  996.   #endif
  997.   
  998.       (void) signal(SIGINT, SIG_IGN);
  999. ! #if !defined(MSDOS) && !defined(__OS2__)
  1000.       (void) signal(SIGQUIT, dump_me);
  1001.       (void) signal(SIGPIPE, doquit);
  1002.       (void) signal(SIGALRM, time_out);
  1003. ***************
  1004. *** 1385,1391 ****
  1005.   {   char    path[PATHLEN];
  1006.   
  1007.       if (modcheck(" before Spreadsheet dies") == 1)
  1008. !     {    (void) sprintf(path, "~/%s", SAVENAME);
  1009.       if (writefile(path, 0, 0, maxrow, maxcol) < 0)
  1010.       {
  1011.           (void) sprintf(path, "/tmp/%s", SAVENAME);
  1012. --- 1414,1425 ----
  1013.   {   char    path[PATHLEN];
  1014.   
  1015.       if (modcheck(" before Spreadsheet dies") == 1)
  1016. !     {
  1017. ! #if defined(MSDOS) || defined(__OS2__)
  1018. !     (void) sprintf(path, "%s", SAVENAME);
  1019. ! #else
  1020. !         (void) sprintf(path, "~/%s", SAVENAME);
  1021. ! #endif
  1022.       if (writefile(path, 0, 0, maxrow, maxcol) < 0)
  1023.       {
  1024.           (void) sprintf(path, "/tmp/%s", SAVENAME);
  1025. Only in new: sc.def
  1026. diff -c sc-6.21/sc.h new/sc.h
  1027. *** sc-6.21/sc.h    Mon Jun 01 07:38:50 1992
  1028. --- new/sc.h    Sun Nov 21 11:58:38 1993
  1029. ***************
  1030. *** 10,17 ****
  1031.    *
  1032.    */
  1033.   
  1034. ! #if defined(MSDOS)
  1035. ! #include <stdio.h>
  1036.   #endif
  1037.   
  1038.   #define    ATBL(tbl, row, col)    (*(tbl + row) + (col))
  1039. --- 10,19 ----
  1040.    *
  1041.    */
  1042.   
  1043. ! #if defined(MSDOS) || defined(__OS2__)
  1044. ! #define STDC_HEADERS 1
  1045. ! # include <stdio.h>
  1046. ! # include <stdlib.h>
  1047.   #endif
  1048.   
  1049.   #define    ATBL(tbl, row, col)    (*(tbl + row) + (col))
  1050. ***************
  1051. *** 267,272 ****
  1052. --- 269,280 ----
  1053.   extern    struct ent *to_fix;
  1054.   extern    int showsc, showsr;
  1055.   
  1056. + #ifdef __STDC__
  1057. + #define P(x) x
  1058. + #else
  1059. + #define P(x) ()
  1060. + #endif
  1061. + 
  1062.   extern    FILE *openout();
  1063.   extern    FILE *fdopen(), *fopen();
  1064.   extern    char *coltoa();
  1065. ***************
  1066. *** 385,390 ****
  1067. --- 393,416 ----
  1068.   extern    int backup_file();
  1069.   #endif
  1070.   
  1071. + #if defined(SYSV3)
  1072. + extern void exit();
  1073. + #elif !defined(__OS2__) && !defined(MSDOS)
  1074. + extern int exit();
  1075. + #endif
  1076. + 
  1077. + char *mangle P((char *filename));
  1078. + char *getname P((char *path));
  1079. + char *add_ext P((char *path, char *ext));
  1080. + 
  1081. + #if defined(__OS2__) || defined(MSDOS)
  1082. + typedef struct {
  1083. +   char name[_MAX_PATH];
  1084. +   char opt[3];
  1085. + } shellbuf;
  1086. + char *getshell(shellbuf *);
  1087. + #endif
  1088. + 
  1089.   extern    int modflg;
  1090.   #if !defined(VMS) && !defined(MSDOS) && defined(CRYPT_PATH)
  1091.   extern    int Crypt;
  1092. ***************
  1093. *** 419,426 ****
  1094.   #endif
  1095.   
  1096.   #if defined(BSD42) || defined(BSD43) && !defined(ultrix)
  1097. ! #define    memcpy(dest, source, len)    bcopy(source, dest, (unsigned int)len);
  1098. ! #define    memset(dest, zero, len)        bzero((dest), (unsigned int)(len));
  1099.   #else
  1100.   #include <memory.h>
  1101.   #endif
  1102. --- 445,452 ----
  1103.   #endif
  1104.   
  1105.   #if defined(BSD42) || defined(BSD43) && !defined(ultrix)
  1106. ! # define memcpy(dest, source, len)    bcopy(source, dest, (unsigned int)len);
  1107. ! # define memset(dest, zero, len)    bzero((dest), (unsigned int)(len));
  1108.   #else
  1109.   #include <memory.h>
  1110.   #endif
  1111. diff -c sc-6.21/screen.c new/screen.c
  1112. *** sc-6.21/screen.c    Mon Jun 01 07:38:50 1992
  1113. --- new/screen.c    Sun Nov 14 20:31:46 1993
  1114. ***************
  1115. *** 445,452 ****
  1116.           if (p1 -> flags & is_valid) {
  1117.               /* has value or num expr */
  1118.               if ((! (p1 -> expr)) || (p1 -> flags & is_strexpr))
  1119.               (void) sprintf (line, "%.15g", p1 -> v);
  1120. ! 
  1121.               (void) addch ('[');
  1122.               (void) addstr (line);
  1123.               (void) addch (']');
  1124. --- 445,455 ----
  1125.           if (p1 -> flags & is_valid) {
  1126.               /* has value or num expr */
  1127.               if ((! (p1 -> expr)) || (p1 -> flags & is_strexpr))
  1128. + #if defined(__EMX__)
  1129. +             (void) sprintf (line, "%.13g", p1 -> v);
  1130. + #else
  1131.               (void) sprintf (line, "%.15g", p1 -> v);
  1132. ! #endif
  1133.               (void) addch ('[');
  1134.               (void) addstr (line);
  1135.               (void) addch (']');
  1136. Only in new: SUMS
  1137. diff -c sc-6.21/xmalloc.c new/xmalloc.c
  1138. *** sc-6.21/xmalloc.c    Mon Jun 01 07:38:52 1992
  1139. --- new/xmalloc.c    Sun Nov 21 11:57:12 1993
  1140. ***************
  1141. *** 7,15 ****
  1142. --- 7,19 ----
  1143.   #include <curses.h>
  1144.   #include "sc.h"
  1145.   
  1146. + #if defined(STDC_HEADERS)
  1147. + #include <stdlib.h>
  1148. + #else
  1149.   extern    char *malloc();
  1150.   extern    char *realloc();
  1151.   extern    void free();
  1152. + #endif
  1153.   void    fatal();
  1154.   
  1155.   #ifdef SYSV3
  1156. Only in new: y_tab.h
  1157.