55         signal(SIGALRM, galarm);
  56         longjmp(Getjbuf, 1);
  57 }
  58 
  59 void
  60 pkfail()
  61 {
  62         longjmp(Gfailbuf, 1);
  63 }
  64 
  65 int
  66 gturnon()
  67 {
  68         struct pack *pkopen();
  69         if (setjmp(Gfailbuf))
  70                 return(FAIL);
  71         gsig=signal(SIGALRM, galarm);
  72         if (Debug > 4)
  73                 pkdebug = 1;
  74         Pk = pkopen(Ifn, Ofn);
  75         if ((int) Pk == NULL)
  76                 return(FAIL);
  77         return(0);
  78 }
  79 
  80 int
  81 gturnoff()
  82 {
  83         if(setjmp(Gfailbuf))
  84                 return(FAIL);
  85         pkclose();
  86         (void) signal(SIGALRM, gsig);
  87         return(0);
  88 }
  89 
  90 /*ARGSUSED*/
  91 int
  92 gwrmsg(type, str, fn)
  93 char type, *str;
  94 {
  95         char bufr[BUFSIZ], *s;

  55         signal(SIGALRM, galarm);
  56         longjmp(Getjbuf, 1);
  57 }
  58 
  59 void
  60 pkfail()
  61 {
  62         longjmp(Gfailbuf, 1);
  63 }
  64 
  65 int
  66 gturnon()
  67 {
  68         struct pack *pkopen();
  69         if (setjmp(Gfailbuf))
  70                 return(FAIL);
  71         gsig=signal(SIGALRM, galarm);
  72         if (Debug > 4)
  73                 pkdebug = 1;
  74         Pk = pkopen(Ifn, Ofn);
  75         if ( Pk == NULL)
  76                 return(FAIL);
  77         return(0);
  78 }
  79 
  80 int
  81 gturnoff()
  82 {
  83         if(setjmp(Gfailbuf))
  84                 return(FAIL);
  85         pkclose();
  86         (void) signal(SIGALRM, gsig);
  87         return(0);
  88 }
  89 
  90 /*ARGSUSED*/
  91 int
  92 gwrmsg(type, str, fn)
  93 char type, *str;
  94 {
  95         char bufr[BUFSIZ], *s;