🚀 go-pugleaf

The patch appended to this message simply fixes the b2m program to use
fgets() instead of gets().

(I also #define'd the constant size of the arrays, since each fgets()
call uses it as an argument, and I wanted to avoid using "256" all
over the place.)

It is relative to the emacs-19.27 source.  I hope it's helpful, though
it sure wasn't much.

Thanks for all your hard work!

-Peter

--
-- pfcouvar@unix.amherst.edu (Peter Couvares)
--

*** b2m.c.orig	Tue Sep 20 18:49:17 1994
--- b2m.c	Tue Sep 20 18:55:09 1994
***************
*** 15,23 ****
   *   Mon Nov 7 15:54:06 PDT 1988
   */
  
- /* Serious bug: This program uses `gets', which is intrinsically
-    unreliable--long lines will cause crashes.
-    Someone should fix this program not to use `gets'.  */
  #include <stdio.h>
  #include <time.h>
  #include <sys/types.h>
--- 15,20 ----
***************
*** 37,45 ****
  #define FALSE (0)
  #endif
  
  int header = FALSE, printing;
  time_t ltoday;
! char from[256], labels[256], data[256], *p, *today;
  
  main (argc, argv)
       int argc;
--- 34,44 ----
  #define FALSE (0)
  #endif
  
+ #define MAX_DATA_LEN 256   /* size for from[], labels[], and data[] arrays */
+ 
  int header = FALSE, printing;
  time_t ltoday;
! char from[MAX_DATA_LEN], labels[MAX_DATA_LEN], data[MAX_DATA_LEN], *p, *today;
  
  main (argc, argv)
       int argc;
***************
*** 58,65 ****
    ltoday = time (0);
    today = ctime (&ltoday);
  
!   /* BUG!  Must not use gets in a reliable program!  */
!   if (gets (data))
      {
        if (strncmp (data, "BABYL OPTIONS:", 14))
  	{
--- 57,63 ----
    ltoday = time (0);
    today = ctime (&ltoday);
  
!   if (fgets (data, MAX_DATA_LEN, stdin))
      {
        if (strncmp (data, "BABYL OPTIONS:", 14))
  	{
***************
*** 74,80 ****
    if (printing)
      puts (data);
  
!   while (gets (data))
      {
  
  #if 0
--- 72,78 ----
    if (printing)
      puts (data);
  
!   while (fgets (data, MAX_DATA_LEN, stdin))
      {
  
  #if 0
***************
*** 94,100 ****
        if (!strcmp (data, "\037\f"))
  	{
  	  /* save labels */
! 	  gets (data);
  	  p = strtok (data, " ,\r\n\t");
  	  strcpy (labels, "X-Babyl-Labels: ");
  
--- 92,98 ----
        if (!strcmp (data, "\037\f"))
  	{
  	  /* save labels */
! 	  fgets (data, MAX_DATA_LEN, stdin);
  	  p = strtok (data, " ,\r\n\t");
  	  strcpy (labels, "X-Babyl-Labels: ");