Mercurial > emacs
annotate src/s/usg5-4.h @ 1719:48f539ac6921
* frame.h (struct frame): New fields `can_have_scrollbars' and
`has_vertical_scrollbars'.
(FRAME_CAN_HAVE_SCROLLBARS, FRAME_HAS_VERTICAL_SCROLLBARS): New
accessors, for both the MULTI_FRAME and non-MULTI_FRAME.
(VERTICAL_SCROLLBAR_WIDTH, WINDOW_VERTICAL_SCROLLBAR,
WINDOW_VERTICAL_SCROLLBAR_COLUMN,
WINDOW_VERTICAL_SCROLLBAR_HEIGHT): New macros.
* window.h (struct window): New field `vertical_scrollbar'.
* xterm.h (struct x_display): vertical_scrollbars,
judge_timestamp, vertical_scrollbar_extra: New fields.
(struct scrollbar): New struct.
(VERTICAL_SCROLLBAR_PIXEL_WIDTH, VERTICAL_SCROLLBAR_PIXEL_HEIGHT,
VERTICAL_SCROLLBAR_LEFT_BORDER, VERTICAL_SCROLLBAR_RIGHT_BORDER,
VERTICAL_SCROLLBAR_TOP_BORDER, VERTICAL_SCROLLBAR_BOTTOM_BORDER,
CHAR_TO_PIXEL_WIDTH, CHAR_TO_PIXEL_HEIGHT, PIXEL_TO_CHAR_WIDTH,
PIXEL_TO_CHAR_HEIGHT): New accessors and macros.
* frame.c (make_frame): Initialize the `can_have_scrollbars' and
`has_vertical_scrollbars' fields of the frame.
* term.c (term_init): Note that TERMCAP terminals don't support
scrollbars.
(mouse_position_hook): Document new args.
(set_vertical_scrollbar_hook, condemn_scrollbars_hook,
redeem_scrollbar_hook, judge_scrollbars_hook): New hooks.
* termhooks.h: Declare and document them.
(enum scrollbar_part): New type.
(struct input_event): Describe the new form of the scrollbar_click
event type. Change `part' from a Lisp_Object to an enum
scrollbar_part. Add a new field `scrollbar'.
* keyboard.c (kbd_buffer_get_event): Pass appropriate new
parameters to *mouse_position_hook, and make_lispy_movement.
* xfns.c (x_set_vertical_scrollbar): New function.
(x_figure_window_size): Use new macros to calculate frame size.
(Fx_create_frame): Note that X Windows frames do support scroll
bars. Default to "yes".
* xterm.c: #include <X11/cursorfont.h> and "window.h".
(x_vertical_scrollbar_cursor): New variable.
(x_term_init): Initialize it.
(last_mouse_bar, last_mouse_bar_frame, last_mouse_part,
last_mouse_scroll_range_start, last_mouse_scroll_range_end): New
variables.
(XTmouse_position): Use them to return scrollbar movement events.
Take new arguments, for that purpose.
(x_window_to_scrollbar, x_scrollbar_create,
x_scrollbar_set_handle, x_scrollbar_remove, x_scrollbar_move,
XTset_scrollbar, XTcondemn_scrollbars, XTredeem_scrollbar,
XTjudge_scrollbars, x_scrollbar_expose,
x_scrollbar_background_expose, x_scrollbar_handle_click,
x_scrollbar_handle_motion): New functions to implement scrollbars.
(x_term_init): Set the termhooks.h hooks to point to them.
(x_set_window_size): Use new macros to calculate frame size. Set
vertical_scrollbar_extra field.
(x_make_frame_visible): Use the frame accessor
FRAME_HAS_VERTICAL_SCROLLBARS to decide if we need to map the
frame's subwindows as well.
(XTread_socket): Use new size-calculation macros from xterm.h when
processing ConfigureNotify events.
(x_wm_set_size_hint): Use PIXEL_TO_CHAR_WIDTH and
PIXEL_TO_CHAR_HEIGHT macros.
* ymakefile (xdisp.o): This now depends on termhooks.h.
(xterm.o): This now depends on window.h.
* xterm.h (struct x_display): Delete v_scrollbar, v_thumbup,
v_thumbdown, v_slider, h_scrollbar, h_thumbup,
h_thumbdown, h_slider, v_scrollbar_width, h_scrollbar_height
fields.
* keyboard.c (Qvscrollbar_part, Qvslider_part, Qvthumbup_part,
Qvthumbdown_part, Qhscrollbar_part, Qhslider_part, Qhthumbup_part,
Qhthumbdown_part, Qscrollbar_click): Deleted; part of an obsolete
interface.
(head_table): Removed from here as well.
(syms_of_keyboard): And here.
* keyboard.h: And here.
(POSN_SCROLLBAR_BUTTON): Removed.
* xscrollbar.h: File removed - no longer necessary.
* xfns.c: Don't #include it any more.
(Qhorizontal_scroll_bar, Qvertical_scroll_bar): Deleted.
(syms_of_xfns): Don't initialize or staticpro them.
(gray_bits): Salvaged from xscrollbar.h.
(x_window_to_scrollbar): Deleted.
(x_set_horizontal_scrollbar): Deleted.
(enum x_frame_parm, x_frame_parms): Remove references to
x_set_horizontal_scrollbar.
(x_set_foreground_color, x_set_background_color,
x_set_border_pixel): Remove special code to support scrollbars.
(Fx_create_frame): Remove old scrollbar setup code.
(install_vertical_scrollbar, install_horizontal_scrollbar,
adjust_scrollbars, x_resize_scrollbars): Deleted.
* xterm.c (construct_mouse_click): This doesn't need to take care of
scrollbar clicks anymore.
(XTread_socket): Remove old code to support scrollbars. Call new
functions instead for events which occur in scrollbar windows.
(XTupdate_end): Remove call to adjust_scrollbars; the main
redisplay code takes care of that now.
(enum window_type): Deleted.
* ymakefile: Note that xfns.o no longer depends on xscrollbar.h.
* xfns.c (syms_of_xfns): Delete defvars for x_mouse_x and
x_mouse_y. That interface hasn't been live for years.
(x_mouse_x, x_mouse_y): Delete these variables.
* xfns.c (Fx_create_frame): Don't initialize the wm_hints field here.
(x_window): Do it here, along with all the similar stuff.
It's a pain to remember that you can't assign to FRAME->visible.
Let's change all references to the `visible' member of struct
frame to use the accessor macros, and then write a setter for the
`visible' field that does the right thing.
* frame.h (FRAME_VISIBLE_P): Make this not an l-value.
(FRAME_SET_VISIBLE): New macro.
* frame.c (make_terminal_frame, Fdelete_frame): Use FRAME_SET_VISIBLE.
(Fframe_visible_p, Fvisible_frame_list): Use FRAME_VISIBLE_P and
FRAME_ICONIFIED_P.
* dispnew.c (Fredraw_display): Use the FRAME_VISIBLE_P and
FRAME_GARBAGED_P accessors.
* xdisp.c (redisplay): Use the FRAME_VISIBLE_P accessor.
* xfns.c (x_set_foreground_color, x_set_background_color,
x_set_cursor_color, x_set_border_pixel, x_set_icon_type): Use the
FRAME_VISIBLE_P accessor.
(Fx_create_frame): Use FRAME_SET_VISIBILITY.
* xterm.c (clear_cursor, x_display_bar_cursor,
x_display_box_cursor): Use FRAME_SET_VISIBILITY.
author | Jim Blandy <jimb@redhat.com> |
---|---|
date | Thu, 24 Dec 1992 06:19:31 +0000 |
parents | 7961d1af11a7 |
children | f84d4b4b53da |
rev | line source |
---|---|
456 | 1 /* Definitions file for GNU Emacs running on AT&T's System V Release 4 |
1039 | 2 Copyright (C) 1987, 1990 Free Software Foundation, Inc. |
456 | 3 |
4 This file is part of GNU Emacs. | |
5 | |
1039 | 6 GNU Emacs is free software; you can redistribute it and/or modify |
7 it under the terms of the GNU General Public License as published by | |
8 the Free Software Foundation; either version 1, or (at your option) | |
9 any later version. | |
456 | 10 |
1039 | 11 GNU Emacs is distributed in the hope that it will be useful, |
12 but WITHOUT ANY WARRANTY; without even the implied warranty of | |
13 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the | |
14 GNU General Public License for more details. | |
15 | |
16 You should have received a copy of the GNU General Public License | |
17 along with GNU Emacs; see the file COPYING. If not, write to | |
18 the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA. */ | |
456 | 19 |
20 /* This file written by James Van Artsdalen of Dell Computer Corporation. | |
21 * james@bigtex.cactus.org. | |
22 */ | |
23 | |
24 /* Use the SysVr3 file for at least base configuration. */ | |
25 | |
1039 | 26 #include "s-usg5-3.h" |
456 | 27 |
28 #define USG5_4 | |
29 | |
30 /* We do have multiple jobs. Handle ^Z. */ | |
31 | |
32 #undef NOMULTIPLEJOBS | |
33 | |
1179 | 34 #define LIBS_SYSTEM -lsocket -lnsl -lelf |
35 #define ORDINARY_LINK | |
456 | 36 |
1179 | 37 #if 0 /* These should be unnecessary now because of ORDINARY_LINK. */ |
38 #define START_FILES pre-crt0.o /usr/ccs/lib/crt1.o /usr/ccs/lib/crti.o /usr/ccs/lib/values-Xt.o | |
39 #define LIB_STANDARD -lc /usr/ucblib/libucb.a /usr/ccs/lib/crtn.o | |
40 #endif | |
456 | 41 |
1039 | 42 /* No <sioctl.h> */ |
456 | 43 |
1039 | 44 #define NO_SIOCTL_H |
456 | 45 |
46 /* Undump with ELF */ | |
47 | |
48 #undef COFF | |
49 | |
50 #define UNEXEC unexelf.o | |
51 | |
52 /* Get FIONREAD from <sys/filio.h>. Get <sys/ttold.h> to get struct | |
53 * tchars. But get <termio.h> first to make sure ttold.h doesn't | |
54 * interfere. And don't try to use SIGIO yet. | |
55 */ | |
56 | |
57 #ifdef emacs | |
58 #include <sys/filio.h> | |
59 #include <termio.h> | |
60 #include <sys/ttold.h> | |
61 #include <signal.h> | |
1039 | 62 #include <sys/wait.h> |
63 #include <sys/stream.h> | |
64 #include <sys/stropts.h> | |
65 #include <sys/termios.h> | |
456 | 66 #undef SIGIO |
67 #endif | |
68 | |
1039 | 69 /* libc has this stuff, but not utimes. */ |
456 | 70 |
71 #define HAVE_RENAME | |
72 #define HAVE_SELECT | |
73 #define HAVE_TIMEVAL | |
74 #define HAVE_CLOSEDIR | |
75 #define HAVE_GETTIMEOFDAY | |
76 #define HAVE_DUP2 | |
77 | |
78 /* <sys/stat.h> *defines* stat(2) as a static function. If "static" | |
79 * is blank, then many files will have a public definition for stat(2). | |
80 */ | |
81 | |
82 #undef static | |
83 | |
84 /* We need bss_end from emacs.c for undumping */ | |
85 | |
86 #ifndef USG_SHARED_LIBRARIES | |
87 #define USG_SHARED_LIBRARIES | |
88 #endif | |
89 | |
90 /* We can support this */ | |
91 | |
92 #define CLASH_DETECTION | |
93 | |
94 #define HAVE_PTYS | |
95 #define HAVE_SETSID | |
1039 | 96 #define HAVE_TCATTR |
456 | 97 |
98 /* It is possible to receive SIGCHLD when there are no children | |
99 waiting, because a previous waitsys(2) cleaned up the carcass of child | |
100 without clearing the SIGCHLD pending info. So, use a non-blocking | |
101 wait3 instead, which maps to waitpid(2) in SysVr4. */ | |
102 | |
103 #define HAVE_WAIT_HEADER | |
104 #define WAITTYPE int | |
105 #define wait3(status, options, rusage) \ | |
106 waitpid((pid_t) -1, (status), (options)) | |
107 #define WRETCODE(w) (w >> 8) | |
108 | |
109 /* TIOCGPGRP is broken in SysVr4, so we can't send signals to PTY | |
110 subprocesses the usual way. But TIOCSIGNAL does work for PTYs, and | |
111 this is all we need. */ | |
112 | |
113 #define TIOCSIGSEND TIOCSIGNAL | |
114 | |
115 /* This change means that we don't loop through allocate_pty too many | |
116 times in the (rare) event of a failure. */ | |
117 | |
118 #undef FIRST_PTY_LETTER | |
119 #define FIRST_PTY_LETTER 'z' | |
120 | |
121 /* This sets the name of the master side of the PTY. */ | |
122 | |
123 #define PTY_NAME_SPRINTF strcpy (pty_name, "/dev/ptmx"); | |
124 | |
125 /* This sets the name of the slave side of the PTY. On SysVr4, | |
126 grantpt(3) forks a subprocess, so keep sigchld_handler() from | |
127 intercepting that death. If any child but grantpt's should die | |
128 within, it should be caught after sigrelse(2). */ | |
129 | |
130 #define PTY_TTY_NAME_SPRINTF \ | |
131 { \ | |
132 char *ptsname(), *ptyname; \ | |
133 \ | |
134 sighold(SIGCLD); \ | |
135 if (grantpt(fd) == -1) \ | |
136 fatal("could not grant slave pty"); \ | |
137 sigrelse(SIGCLD); \ | |
138 if (unlockpt(fd) == -1) \ | |
139 fatal("could not unlock slave pty"); \ | |
140 if (!(ptyname = ptsname(fd))) \ | |
141 fatal ("could not enable slave pty"); \ | |
142 strncpy(pty_name, ptyname, sizeof(pty_name)); \ | |
143 pty_name[sizeof(pty_name) - 1] = 0; \ | |
144 } | |
145 | |
146 /* Push various streams modules onto a PTY channel. */ | |
147 | |
148 #define SETUP_SLAVE_PTY \ | |
149 if (ioctl (xforkin, I_PUSH, "ptem") == -1) \ | |
150 fatal ("ioctl I_PUSH ptem", errno); \ | |
151 if (ioctl (xforkin, I_PUSH, "ldterm") == -1) \ | |
152 fatal ("ioctl I_PUSH ldterm", errno); \ | |
153 if (ioctl (xforkin, I_PUSH, "ttcompat") == -1) \ | |
154 fatal ("ioctl I_PUSH ttcompat", errno); | |
155 | |
1039 | 156 /* The definition of this in s-usg5-3.h is not needed in 5.4. */ |
157 /* liblnsl_s should never be used. The _s suffix implies a shared | |
158 library, as opposed to a DLL. Share libraries were used in SVR3, and are | |
159 available only in order to allow SVR3 binaries to run. They should not be | |
160 linked in to new binaries. -- caraway!pinkas@caraway.intel.com. */ | |
161 #undef LIBX10_SYSTEM | |
162 #undef LIBX11_SYSTEM | |
456 | 163 |
1039 | 164 /* Tell x11term.c and keyboard.c we have the system V streams feature. */ |
165 #define SYSV_STREAMS | |
166 | |
167 /* This definition was suggested for next release. | |
168 So give it a try. */ | |
169 #define HAVE_SOCKETS |