File: signal.c

package info (click to toggle)
ed 0.2-17
  • links: PTS
  • area: main
  • in suites: slink
  • size: 1,548 kB
  • ctags: 704
  • sloc: ansic: 7,316; makefile: 201; sh: 179
file content (148 lines) | stat: -rw-r--r-- 2,994 bytes parent folder | download | duplicates (3)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
/* signal.c: This file contains the signal routines for the ed line editor. */
/* ed line editor.
   Copyright (C) 1993, 1994 Andrew Moore, Talke Studio
   All Rights Reserved

   This program is free software; you can redistribute it and/or modify
   it under the terms of the GNU General Public License as published by
   the Free Software Foundation; either version 2, or (at your option)
   any later version.

   This program is distributed in the hope that it will be useful, but
   WITHOUT ANY WARRANTY; without even the implied warranty of
   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
   General Public License for more details.

   You should have received a copy of the GNU General Public License
   along with this program; if not, write to the Free Software
   Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
*/

#ifndef lint
static char *rcsid = "@(#)$Id: signal.c,v 1.9 1994/11/13 04:25:44 alm Exp $";
#endif


#include <setjmp.h>
#include <sys/ioctl.h>

#include "ed.h"


#ifndef SIG_ERR
# define SIG_ERR ((void (*)()) -1)
#endif /* !SIG_ERR */

void
(*reliable_signal (sno, hndlr)) ()
     int sno;
     void (*hndlr) ();
{
#ifndef HAVE_SIGACTION
  signal (sno, hndlr);
#else
  struct sigaction sa, osa;

  sa.sa_handler = hndlr;
  sigemptyset (&sa.sa_mask);
  sa.sa_flags = 0;
#ifdef SA_RESTART
      sa.sa_flags |= SA_RESTART;
#endif
  return (sigaction (sno, &sa, &osa) < 0) ?  SIG_ERR : osa.sa_handler;
#endif /* HAVE_SIGACTION */
}


void
signal_hup (signo)
     int signo;
{
  if (mutex)
    sigflags |= (1 << (signo - 1));
  else
    handle_hup (signo);
}


void
signal_int (signo)
     int signo;
{
  if (mutex)
    sigflags |= (1 << (signo - 1));
  else
    handle_int (signo);
}


#ifdef HAVE_SIGSETJMP
extern sigjmp_buf env;
#else
extern jmp_buf env;
#endif
extern int sigactive;

void
handle_hup (signo)
     int signo;
{
  char *hup = NULL;		/* hup filename */
  char *s;
  int n;

  if (!sigactive)
    quit (1);
  sigflags &= ~(1 << (signo - 1));
  if (addr_last && write_file ("ed.hup", "w", 1, addr_last) < 0 &&
      (s = getenv ("HOME")) != NULL &&
      (n = strlen (s)) + 7 <= PATH_MAX &&	/* "ed.hup" + '/' */
      (hup = (char *) malloc (n + 8)) != NULL)
    {
      strcpy (hup, s);
      if (n && hup[n - 1] != '/')
	  hup[n++] = '/';
      strcpy (hup + n, "ed.hup");
      write_file (hup, "w", 1, addr_last);
    }
  quit (2);
}


void
handle_int (signo)
     int signo;
{
  if (!sigactive)
    quit (1);
  sigflags &= ~(1 << (signo - 1));
#ifdef HAVE_SIGSETJMP
  siglongjmp (env, -1);
#else
  longjmp (env, -1);
#endif
}


extern long rows;
int cols = 72;			/* wrap column */

void
handle_winch (signo)
     int signo;
{
#ifdef TIOCGWINSZ
  struct winsize ws;		/* window size structure */
#endif

  sigflags &= ~(1 << (signo - 1));
#ifdef TIOCGWINSZ
  if (ioctl (0, TIOCGWINSZ, (char *) &ws) >= 0)
    {
      if (ws.ws_row > 2)
	rows = ws.ws_row - 2;
      if (ws.ws_col > 8)
	cols = ws.ws_col - 8;
    }
#endif
}