Mercurial > emacs
annotate src/msdos.h @ 71504:2b4e59cd1121
(Qeql): Add extern.
(x_set_mouse_pixel_position) [MAC_OSX]: Use CGWarpMouseCursorPosition.
(fm_style_face_attributes_alist) [USE_ATSUI]: New variable.
(syms_of_macterm) [USE_ATSUI]: Initialize and staticpro it.
Change keys of Vmac_atsu_font_table from strings to numbers.
(fm_style_to_face_attributes) [USE_ATSUI]: New function.
(init_font_name_table) [USE_ATSUI]: Use it.
(saved_ts_script_language_on_focus) [USE_MAC_TSM]: New variable.
(syms_of_macterm) [USE_MAC_TSM]: Initialize and staticpro it.
[USE_MAC_TSM] (mac_tsm_resume): Restore script and language codes
only when saved_ts_script_language_on_focus coincides with
Vmac_ts_script_language_on_focus.
[USE_MAC_TSM] (mac_tsm_suspend): Save value of
Vmac_ts_script_language_on_focus to saved_ts_script_language_on_focus.
(XTread_socket) [USE_MAC_TSM]: Add Mac OS Classic support.
[USE_MAC_TSM] (mac_handle_text_input_event, init_tsm): Likewise.
| author | YAMAMOTO Mitsuharu <mituharu@math.s.chiba-u.ac.jp> |
|---|---|
| date | Wed, 28 Jun 2006 08:31:32 +0000 |
| parents | 3bd95f4f2941 |
| children | 07c34c917584 c5406394f567 |
| rev | line source |
|---|---|
| 5503 | 1 /* MS-DOS specific C utilities, interface. |
|
64770
a0d1312ede66
Update years in copyright notice; nfc.
Thien-Thi Nguyen <ttn@gnuvola.org>
parents:
64084
diff
changeset
|
2 Copyright (C) 1993, 2001, 2002, 2003, 2004, |
|
68651
3bd95f4f2941
Update years in copyright notice; nfc.
Thien-Thi Nguyen <ttn@gnuvola.org>
parents:
64770
diff
changeset
|
3 2005, 2006 Free Software Foundation, Inc. |
| 5503 | 4 |
| 5 This file is part of GNU Emacs. | |
| 6 | |
| 7 GNU Emacs is free software; you can redistribute it and/or modify | |
| 8 it under the terms of the GNU General Public License as published by | |
|
10503
4d94f31dc555
(x_mouse_leave): Add neutralizing define.
Richard M. Stallman <rms@gnu.org>
parents:
9572
diff
changeset
|
9 the Free Software Foundation; either version 2, or (at your option) |
| 5503 | 10 any later version. |
| 11 | |
| 12 GNU Emacs is distributed in the hope that it will be useful, | |
| 13 but WITHOUT ANY WARRANTY; without even the implied warranty of | |
| 14 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the | |
| 15 GNU General Public License for more details. | |
| 16 | |
| 17 You should have received a copy of the GNU General Public License | |
| 18 along with GNU Emacs; see the file COPYING. If not, write to | |
| 64084 | 19 the Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor, |
| 20 Boston, MA 02110-1301, USA. */ | |
| 5503 | 21 |
|
29611
f39e60352427
(EMACS_MSDOS_H): Renamed from MSDOS_H_.
Eli Zaretskii <eliz@gnu.org>
parents:
29557
diff
changeset
|
22 #ifndef EMACS_MSDOS_H |
|
f39e60352427
(EMACS_MSDOS_H): Renamed from MSDOS_H_.
Eli Zaretskii <eliz@gnu.org>
parents:
29557
diff
changeset
|
23 #define EMACS_MSDOS_H |
| 9572 | 24 |
| 5503 | 25 #include <dpmi.h> |
| 26 | |
| 27 int dos_ttraw (); | |
| 28 int dos_ttcooked (); | |
| 13178 | 29 int dos_get_saved_screen (char **, int *, int *); |
| 30 int dos_set_keyboard (int, int); | |
|
14285
6081221167de
(dos_set_window_size): Prototype for a new function.
Karl Heuer <kwzh@gnu.org>
parents:
14186
diff
changeset
|
31 void dos_set_window_size (int *, int *); |
| 13178 | 32 |
| 5503 | 33 int getdefdir (int, char*); |
| 34 void unixtodos_filename (char *); | |
| 35 void dostounix_filename (char *); | |
|
7822
17b96e349369
Add template for rootrelativepath.
Richard M. Stallman <rms@gnu.org>
parents:
7604
diff
changeset
|
36 char *rootrelativepath (char *); |
| 5503 | 37 void init_environment (); |
| 38 void internal_terminal_init (); | |
| 39 void ctrl_break_func (_go32_dpmi_registers *); | |
| 40 void install_ctrl_break_check (); | |
| 41 | |
| 42 extern int have_mouse; | |
| 43 void mouse_init (); | |
| 44 void mouse_on (); | |
| 45 void mouse_off (); | |
| 46 void mouse_moveto (int, int); | |
| 9572 | 47 |
| 48 #ifndef HAVE_X_WINDOWS | |
| 49 /* Dummy types. */ | |
| 50 typedef int XFontStruct; | |
| 51 typedef int GC; | |
| 52 typedef int Pixmap; | |
| 53 typedef int Display; | |
| 54 typedef int Window; | |
|
21784
8de4e2a8cc62
[!HAVE_X_WINDOWS]: Add a dummy typedef for XRectangle
Eli Zaretskii <eliz@gnu.org>
parents:
15386
diff
changeset
|
55 typedef int XRectangle; |
| 9572 | 56 #define PIX_TYPE int |
| 57 #define XDISPLAY | |
| 58 | |
| 27018 | 59 /* A stripped version of struct x_display_info in xterm.h, which see. */ |
| 60 struct display_info | |
| 61 { | |
| 62 /* These variables describe the range of text currently shown in its | |
| 63 mouse-face, together with the window they apply to. As long as | |
| 64 the mouse stays within this range, we need not redraw anything on | |
| 65 its account. Rows and columns are glyph matrix positions in | |
| 66 MOUSE_FACE_WINDOW. */ | |
| 67 int mouse_face_beg_row, mouse_face_beg_col; | |
| 68 int mouse_face_end_row, mouse_face_end_col; | |
| 69 int mouse_face_past_end; | |
| 70 Lisp_Object mouse_face_window; | |
| 71 int mouse_face_face_id; | |
| 72 | |
| 73 /* 1 if a mouse motion event came and we didn't handle it right away because | |
| 74 gc was in progress. */ | |
| 75 int mouse_face_deferred_gc; | |
| 76 | |
| 77 /* FRAME and X, Y position of mouse when last checked for | |
| 78 highlighting. X and Y can be negative or out of range for the frame. */ | |
| 79 struct frame *mouse_face_mouse_frame; | |
| 80 int mouse_face_mouse_x, mouse_face_mouse_y; | |
| 81 | |
| 82 /* Nonzero means defer mouse-motion highlighting. */ | |
| 83 int mouse_face_defer; | |
|
43370
9a4630ba3eae
(struct display_info): Add mouse_face_hidden.
Kim F. Storm <storm@cua.dk>
parents:
40501
diff
changeset
|
84 |
|
9a4630ba3eae
(struct display_info): Add mouse_face_hidden.
Kim F. Storm <storm@cua.dk>
parents:
40501
diff
changeset
|
85 /* Nonzero means that the mouse highlight should not be shown. */ |
|
9a4630ba3eae
(struct display_info): Add mouse_face_hidden.
Kim F. Storm <storm@cua.dk>
parents:
40501
diff
changeset
|
86 int mouse_face_hidden; |
| 27018 | 87 }; |
| 88 | |
|
50226
1ba638ccab28
(Display_Info): Add generic typedef.
Kim F. Storm <storm@cua.dk>
parents:
43370
diff
changeset
|
89 typedef struct display_info Display_Info; |
|
1ba638ccab28
(Display_Info): Add generic typedef.
Kim F. Storm <storm@cua.dk>
parents:
43370
diff
changeset
|
90 |
| 9572 | 91 /* This is a cut-down version of the one in xterm.h, which see. */ |
|
13395
c18547cf191f
(struct x_output): Rename from struct x_display.
Karl Heuer <kwzh@gnu.org>
parents:
13178
diff
changeset
|
92 struct x_output |
| 9572 | 93 { |
|
26729
f5dded41adcc
Changes for automatic remapping of X colors on terminal frames:
Eli Zaretskii <eliz@gnu.org>
parents:
25111
diff
changeset
|
94 PIX_TYPE background_pixel; /* used in xfaces.c and lots of other places */ |
|
f5dded41adcc
Changes for automatic remapping of X colors on terminal frames:
Eli Zaretskii <eliz@gnu.org>
parents:
25111
diff
changeset
|
95 PIX_TYPE foreground_pixel; /* ditto */ |
|
f5dded41adcc
Changes for automatic remapping of X colors on terminal frames:
Eli Zaretskii <eliz@gnu.org>
parents:
25111
diff
changeset
|
96 XFontStruct *font; /* used in x-popup-menu (xmenu.c) */ |
|
36253
6ece4a809131
(struct x_output): Rename busy_window to
Gerd Moellmann <gerd@gnu.org>
parents:
30340
diff
changeset
|
97 Window hourglass_window; /* currently unused (but maybe some day) */ |
|
6ece4a809131
(struct x_output): Rename busy_window to
Gerd Moellmann <gerd@gnu.org>
parents:
30340
diff
changeset
|
98 unsigned hourglass_p : 1; /* ditto */ |
| 27018 | 99 struct display_info display_info; /* used for drawing mouse highlight */ |
| 9572 | 100 }; |
| 101 | |
|
13395
c18547cf191f
(struct x_output): Rename from struct x_display.
Karl Heuer <kwzh@gnu.org>
parents:
13178
diff
changeset
|
102 extern struct x_output the_only_x_display; |
| 9572 | 103 |
| 104 #define FRAME_X_DISPLAY(f) ((Display *) 0) | |
| 105 #define FRAME_FOREGROUND_PIXEL(f) (the_only_x_display.foreground_pixel) | |
| 106 #define FRAME_BACKGROUND_PIXEL(f) (the_only_x_display.background_pixel) | |
| 107 #define FRAME_FONT(f) (the_only_x_display.font) | |
| 27018 | 108 #define FRAME_X_DISPLAY_INFO(f) (&the_only_x_display.display_info) |
|
27957
5210a97b3ac7
(FRAME_INTERNAL_BORDER_WIDTH): Define to zero.
Eli Zaretskii <eliz@gnu.org>
parents:
27463
diff
changeset
|
109 |
|
21784
8de4e2a8cc62
[!HAVE_X_WINDOWS]: Add a dummy typedef for XRectangle
Eli Zaretskii <eliz@gnu.org>
parents:
15386
diff
changeset
|
110 /* Prototypes. */ |
|
8de4e2a8cc62
[!HAVE_X_WINDOWS]: Add a dummy typedef for XRectangle
Eli Zaretskii <eliz@gnu.org>
parents:
15386
diff
changeset
|
111 |
|
8de4e2a8cc62
[!HAVE_X_WINDOWS]: Add a dummy typedef for XRectangle
Eli Zaretskii <eliz@gnu.org>
parents:
15386
diff
changeset
|
112 /* Forward declarations for prototypes. */ |
|
8de4e2a8cc62
[!HAVE_X_WINDOWS]: Add a dummy typedef for XRectangle
Eli Zaretskii <eliz@gnu.org>
parents:
15386
diff
changeset
|
113 struct frame; |
|
8de4e2a8cc62
[!HAVE_X_WINDOWS]: Add a dummy typedef for XRectangle
Eli Zaretskii <eliz@gnu.org>
parents:
15386
diff
changeset
|
114 struct window; |
|
25111
36169f5d88da
Remove redundant declarations (most of them are now in
Eli Zaretskii <eliz@gnu.org>
parents:
21784
diff
changeset
|
115 |
|
36169f5d88da
Remove redundant declarations (most of them are now in
Eli Zaretskii <eliz@gnu.org>
parents:
21784
diff
changeset
|
116 /* Defined in xfns.c; emulated on msdos.c */ |
|
21784
8de4e2a8cc62
[!HAVE_X_WINDOWS]: Add a dummy typedef for XRectangle
Eli Zaretskii <eliz@gnu.org>
parents:
15386
diff
changeset
|
117 |
|
8de4e2a8cc62
[!HAVE_X_WINDOWS]: Add a dummy typedef for XRectangle
Eli Zaretskii <eliz@gnu.org>
parents:
15386
diff
changeset
|
118 extern int have_menus_p P_ ((void)); |
|
8de4e2a8cc62
[!HAVE_X_WINDOWS]: Add a dummy typedef for XRectangle
Eli Zaretskii <eliz@gnu.org>
parents:
15386
diff
changeset
|
119 extern void x_set_menu_bar_lines P_ ((struct frame *, Lisp_Object, Lisp_Object)); |
|
8de4e2a8cc62
[!HAVE_X_WINDOWS]: Add a dummy typedef for XRectangle
Eli Zaretskii <eliz@gnu.org>
parents:
15386
diff
changeset
|
120 extern int x_pixel_width P_ ((struct frame *)); |
|
8de4e2a8cc62
[!HAVE_X_WINDOWS]: Add a dummy typedef for XRectangle
Eli Zaretskii <eliz@gnu.org>
parents:
15386
diff
changeset
|
121 extern int x_pixel_height P_ ((struct frame *)); |
|
8de4e2a8cc62
[!HAVE_X_WINDOWS]: Add a dummy typedef for XRectangle
Eli Zaretskii <eliz@gnu.org>
parents:
15386
diff
changeset
|
122 |
| 9572 | 123 #define XFreeGC (void) |
| 124 #define x_destroy_bitmap(p1,p2) | |
| 125 #define load_pixmap(p1,p2,p3,p4) (0) | |
| 126 #define XGetGeometry(p1,p2,p3,p4,p5,p6,p7,p8,p9) | |
|
51202
62a7506ec831
(struct x_output): Remove members left_pos, top_pos,
Kim F. Storm <storm@cua.dk>
parents:
50247
diff
changeset
|
127 #define DisplayWidth(p1,p2) (SELECTED_FRAME()->text_cols) |
|
62a7506ec831
(struct x_output): Remove members left_pos, top_pos,
Kim F. Storm <storm@cua.dk>
parents:
50247
diff
changeset
|
128 #define DisplayHeight(p1,p2) (SELECTED_FRAME()->text_lines) |
| 9572 | 129 #define XMenuSetAEQ (void) |
| 130 #define XMenuSetFreeze (void) | |
| 131 #define XMenuRecompute (void) | |
| 132 #define FONT_WIDTH(foo) 1 | |
| 133 #define XM_FAILURE -1 | |
| 134 #define XM_SUCCESS 1 | |
| 135 #define XM_NO_SELECT 2 | |
| 136 #define XM_IA_SELECT 3 | |
| 137 #define ButtonReleaseMask 0 | |
| 138 | |
| 139 typedef struct x_menu_struct | |
| 140 { | |
| 141 int count; | |
| 142 char **text; | |
| 143 struct x_menu_struct **submenu; | |
| 144 int *panenumber; /* Also used as enable. */ | |
| 145 int allocated; | |
| 146 int panecount; | |
| 147 int width; | |
|
27463
6e3d60350319
Change prototypes of XMenuAddSelection and XMenuActivate.
Eli Zaretskii <eliz@gnu.org>
parents:
27018
diff
changeset
|
148 char **help_text; |
| 9572 | 149 } XMenu; |
| 150 | |
|
10503
4d94f31dc555
(x_mouse_leave): Add neutralizing define.
Richard M. Stallman <rms@gnu.org>
parents:
9572
diff
changeset
|
151 XMenu *XMenuCreate (Display *, Window, char *); |
|
4d94f31dc555
(x_mouse_leave): Add neutralizing define.
Richard M. Stallman <rms@gnu.org>
parents:
9572
diff
changeset
|
152 int XMenuAddPane (Display *, XMenu *, char *, int); |
|
27463
6e3d60350319
Change prototypes of XMenuAddSelection and XMenuActivate.
Eli Zaretskii <eliz@gnu.org>
parents:
27018
diff
changeset
|
153 int XMenuAddSelection (Display *, XMenu *, int, int, char *, int, char *); |
|
10503
4d94f31dc555
(x_mouse_leave): Add neutralizing define.
Richard M. Stallman <rms@gnu.org>
parents:
9572
diff
changeset
|
154 void XMenuLocate (Display *, XMenu *, int, int, int, int, |
|
4d94f31dc555
(x_mouse_leave): Add neutralizing define.
Richard M. Stallman <rms@gnu.org>
parents:
9572
diff
changeset
|
155 int *, int *, int *, int *); |
|
27463
6e3d60350319
Change prototypes of XMenuAddSelection and XMenuActivate.
Eli Zaretskii <eliz@gnu.org>
parents:
27018
diff
changeset
|
156 int XMenuActivate (Display *, XMenu *, int *, int *, int, int, unsigned, |
|
30340
be29e15ece0e
(XMenuActivate): Update prototype.
Eli Zaretskii <eliz@gnu.org>
parents:
29611
diff
changeset
|
157 char **, void (*callback)(char *, int, int)); |
|
10503
4d94f31dc555
(x_mouse_leave): Add neutralizing define.
Richard M. Stallman <rms@gnu.org>
parents:
9572
diff
changeset
|
158 void XMenuDestroy (Display *, XMenu *); |
|
4d94f31dc555
(x_mouse_leave): Add neutralizing define.
Richard M. Stallman <rms@gnu.org>
parents:
9572
diff
changeset
|
159 |
| 9572 | 160 #endif /* not HAVE_X_WINDOWS */ |
| 161 | |
|
29611
f39e60352427
(EMACS_MSDOS_H): Renamed from MSDOS_H_.
Eli Zaretskii <eliz@gnu.org>
parents:
29557
diff
changeset
|
162 #endif /* not EMACS_MSDOS_H */ |
| 52401 | 163 |
| 164 /* arch-tag: ad21eeed-8fdb-4357-8007-36368a6bdbf3 | |
| 165 (do not change this comment) */ |
