]> cvs.zerfleddert.de Git - micropolis/blob - src/tk/tk.h
projects / micropolis / blob
? search:
summary | shortlog | log | commit | commitdiff | tree
blame | history | raw | HEAD
sh compatibility fixes
[micropolis] / src / tk / tk.h
1 /*
2 * tk.h --
3 *
4 * Declarations for Tk-related things that are visible
5 * outside of the Tk module itself.
6 *
7 * Copyright 1989-1992 Regents of the University of California.
8 * Permission to use, copy, modify, and distribute this
9 * software and its documentation for any purpose and without
10 * fee is hereby granted, provided that the above copyright
11 * notice appear in all copies. The University of California
12 * makes no representations about the suitability of this
13 * software for any purpose. It is provided "as is" without
14 * express or implied warranty.
15 *
16 * $Header: /user6/ouster/wish/RCS/tk.h,v 1.90 92/08/20 16:36:30 ouster Exp $ SPRITE (Berkeley)
17 */
18
19 #ifndef _TK
20 #define _TK
21
22 #ifndef _TCL
23 #include <tcl.h>
24 #endif
25 #ifndef _XLIB_H
26 #include <X11/Xlib.h>
27 #endif
28 #ifdef __STDC__
29
30 /* This is so gcc's stddef.h doesn't clash with sunos4.1.1's stdtypes.h */
31 #ifdef __sys_stdtypes_h
32 #define _PTRDIFF_T
33 #define _SIZE_T
34 #define _WCHAR_T
35 #endif
36
37 #include <stddef.h>
38 #endif
39
40 /*
41 * Dummy types that are used by clients:
42 */
43
44 typedef struct Tk_ErrorHandler_ *Tk_ErrorHandler;
45 typedef struct Tk_TimerToken_ *Tk_TimerToken;
46 typedef struct Tk_Window_ *Tk_Window;
47 typedef struct Tk_3DBorder_ *Tk_3DBorder;
48 typedef struct Tk_BindingTable_ *Tk_BindingTable;
49
50 /*
51 * Additional types exported to clients.
52 */
53
54 typedef char *Tk_Uid;
55
56 /*
57 * Structure used to specify how to handle argv options.
58 */
59
60 typedef struct {
61 char *key; /* The key string that flags the option in the
62 * argv array. */
63 int type; /* Indicates option type; see below. */
64 char *src; /* Value to be used in setting dst; usage
65 * depends on type. */
66 char *dst; /* Address of value to be modified; usage
67 * depends on type. */
68 char *help; /* Documentation message describing this option. */
69 } Tk_ArgvInfo;
70
71 /*
72 * Legal values for the type field of a Tk_ArgvInfo: see the user
73 * documentation for details.
74 */
75
76 #define TK_ARGV_CONSTANT 15
77 #define TK_ARGV_INT 16
78 #define TK_ARGV_STRING 17
79 #define TK_ARGV_UID 18
80 #define TK_ARGV_REST 19
81 #define TK_ARGV_FLOAT 20
82 #define TK_ARGV_FUNC 21
83 #define TK_ARGV_GENFUNC 22
84 #define TK_ARGV_HELP 23
85 #define TK_ARGV_CONST_OPTION 24
86 #define TK_ARGV_OPTION_VALUE 25
87 #define TK_ARGV_OPTION_NAME_VALUE 26
88 #define TK_ARGV_END 27
89
90 /*
91 * Flag bits for passing to Tk_ParseArgv:
92 */
93
94 #define TK_ARGV_NO_DEFAULTS 0x1
95 #define TK_ARGV_NO_LEFTOVERS 0x2
96 #define TK_ARGV_NO_ABBREV 0x4
97 #define TK_ARGV_DONT_SKIP_FIRST_ARG 0x8
98
99 /*
100 * Structure used to describe application-specific configuration
101 * options: indicates procedures to call to parse an option and
102 * to return a text string describing an option.
103 */
104
105 typedef int (Tk_OptionParseProc) _ANSI_ARGS_((ClientData clientData,
106 Tcl_Interp *interp, Tk_Window tkwin, char *value, char *widgRec,
107 int offset));
108 typedef char *(Tk_OptionPrintProc) _ANSI_ARGS_((ClientData clientData,
109 Tk_Window tkwin, char *widgRec, int offset,
110 Tcl_FreeProc **freeProcPtr));
111
112 typedef struct Tk_CustomOption {
113 Tk_OptionParseProc *parseProc; /* Procedure to call to parse an
114 * option and store it in converted
115 * form. */
116 Tk_OptionPrintProc *printProc; /* Procedure to return a printable
117 * string describing an existing
118 * option. */
119 ClientData clientData; /* Arbitrary one-word value used by
120 * option parser: passed to
121 * parseProc and printProc. */
122 } Tk_CustomOption;
123
124 /*
125 * Structure used to specify information for Tk_ConfigureWidget. Each
126 * structure gives complete information for one option, including
127 * how the option is specified on the command line, where it appears
128 * in the option database, etc.
129 */
130
131 typedef struct Tk_ConfigSpec {
132 int type; /* Type of option, such as TK_CONFIG_COLOR;
133 * see definitions below. Last option in
134 * table must have type TK_CONFIG_END. */
135 char *argvName; /* Switch used to specify option in argv.
136 * NULL means this spec is part of a group. */
137 char *dbName; /* Name for option in option database. */
138 char *dbClass; /* Class for option in database. */
139 char *defValue; /* Default value for option if not
140 * specified in command line or database. */
141 int offset; /* Where in widget record to store value;
142 * use Tk_Offset macro to generate values
143 * for this. */
144 int specFlags; /* Any combination of the values defined
145 * below; other bits are used internally
146 * by tkConfig.c. */
147 Tk_CustomOption *customPtr; /* If type is TK_CONFIG_CUSTOM then this is
148 * a pointer to info about how to parse and
149 * print the option. Otherwise it is
150 * irrelevant. */
151 } Tk_ConfigSpec;
152
153 /*
154 * Type values for Tk_ConfigSpec structures. See the user
155 * documentation for details.
156 */
157
158 #define TK_CONFIG_BOOLEAN 1
159 #define TK_CONFIG_INT 2
160 #define TK_CONFIG_DOUBLE 3
161 #define TK_CONFIG_STRING 4
162 #define TK_CONFIG_UID 5
163 #define TK_CONFIG_COLOR 6
164 #define TK_CONFIG_FONT 7
165 #define TK_CONFIG_BITMAP 8
166 #define TK_CONFIG_BORDER 9
167 #define TK_CONFIG_RELIEF 10
168 #define TK_CONFIG_CURSOR 11
169 #define TK_CONFIG_ACTIVE_CURSOR 12
170 #define TK_CONFIG_JUSTIFY 13
171 #define TK_CONFIG_ANCHOR 14
172 #define TK_CONFIG_SYNONYM 15
173 #define TK_CONFIG_CAP_STYLE 16
174 #define TK_CONFIG_JOIN_STYLE 17
175 #define TK_CONFIG_PIXELS 18
176 #define TK_CONFIG_MM 19
177 #define TK_CONFIG_WINDOW 20
178 #define TK_CONFIG_CUSTOM 21
179 #define TK_CONFIG_END 22
180 #define TK_CONFIG_PIXMAP 30
181
182 /*
183 * Macro to use to fill in "offset" fields of Tk_ConfigInfos.
184 * Computes number of bytes from beginning of structure to a
185 * given field.
186 */
187
188 #ifdef offsetof
189 #define Tk_Offset(type, field) ((int) offsetof(type, field))
190 #else
191 #define Tk_Offset(type, field) ((int) ((char *) &((type *) 0)->field))
192 #endif
193
194 /*
195 * Possible values for flags argument to Tk_ConfigureWidget:
196 */
197
198 #define TK_CONFIG_ARGV_ONLY 1
199
200 /*
201 * Possible flag values for Tk_ConfigInfo structures. Any bits at
202 * or above TK_CONFIG_USER_BIT may be used by clients for selecting
203 * certain entries. Before changing any values here, coordinate with
204 * tkConfig.c (internal-use-only flags are defined there).
205 */
206
207 #define TK_CONFIG_COLOR_ONLY 1
208 #define TK_CONFIG_MONO_ONLY 2
209 #define TK_CONFIG_NULL_OK 4
210 #define TK_CONFIG_DONT_SET_DEFAULT 8
211 #define TK_CONFIG_OPTION_SPECIFIED 0x10
212 #define TK_CONFIG_USER_BIT 0x100
213
214 /*
215 * Bits to pass to Tk_CreateFileHandler to indicate what sorts
216 * of events are of interest:
217 */
218
219 #define TK_READABLE 1
220 #define TK_WRITABLE 2
221 #define TK_EXCEPTION 4
222
223 /*
224 * Flag values to pass to Tk_DoOneEvent to disable searches
225 * for some kinds of events:
226 */
227
228 #define TK_DONT_WAIT 1
229 #define TK_X_EVENTS 2
230 #define TK_FILE_EVENTS 4
231 #define TK_TIMER_EVENTS 8
232 #define TK_IDLE_EVENTS 0x10
233 #define TK_ALL_EVENTS 0x1e
234
235 /*
236 * Priority levels to pass to Tk_AddOption:
237 */
238
239 #define TK_WIDGET_DEFAULT_PRIO 20
240 #define TK_STARTUP_FILE_PRIO 40
241 #define TK_USER_DEFAULT_PRIO 60
242 #define TK_INTERACTIVE_PRIO 80
243 #define TK_MAX_PRIO 100
244
245 /*
246 * Relief values returned by Tk_GetRelief:
247 */
248
249 #define TK_RELIEF_RAISED 1
250 #define TK_RELIEF_FLAT 2
251 #define TK_RELIEF_SUNKEN 4
252
253 /*
254 * Special EnterNotify/LeaveNotify "mode" for use in events
255 * generated by tkShare.c. Pick a high enough value that it's
256 * unlikely to conflict with existing values (like NotifyNormal)
257 * or any new values defined in the future.
258 */
259
260 #define TK_NOTIFY_SHARE 20
261
262 /*
263 * Enumerated type for describing a point by which to anchor something:
264 */
265
266 typedef enum {
267 TK_ANCHOR_N, TK_ANCHOR_NE, TK_ANCHOR_E, TK_ANCHOR_SE,
268 TK_ANCHOR_S, TK_ANCHOR_SW, TK_ANCHOR_W, TK_ANCHOR_NW,
269 TK_ANCHOR_CENTER
270 } Tk_Anchor;
271
272 /*
273 * Enumerated type for describing a style of justification:
274 */
275
276 typedef enum {
277 TK_JUSTIFY_LEFT, TK_JUSTIFY_RIGHT,
278 TK_JUSTIFY_CENTER, TK_JUSTIFY_FILL
279 } Tk_Justify;
280 \f
281 /*
282 *--------------------------------------------------------------
283 *
284 * Macros for querying Tk_Window structures. See the
285 * manual entries for documentation.
286 *
287 *--------------------------------------------------------------
288 */
289
290 #define Tk_Display(tkwin) (((Tk_FakeWin *) (tkwin))->display)
291 #define Tk_ScreenNumber(tkwin) (((Tk_FakeWin *) (tkwin))->screenNum)
292 #define Tk_Screen(tkwin) (ScreenOfDisplay(Tk_Display(tkwin), \
293 Tk_ScreenNumber(tkwin)))
294 #define Tk_WindowId(tkwin) (((Tk_FakeWin *) (tkwin))->window)
295 #define Tk_PathName(tkwin) (((Tk_FakeWin *) (tkwin))->pathName)
296 #define Tk_Name(tkwin) (((Tk_FakeWin *) (tkwin))->nameUid)
297 #define Tk_Class(tkwin) (((Tk_FakeWin *) (tkwin))->classUid)
298 #define Tk_X(tkwin) (((Tk_FakeWin *) (tkwin))->changes.x)
299 #define Tk_Y(tkwin) (((Tk_FakeWin *) (tkwin))->changes.y)
300 #define Tk_Width(tkwin) (((Tk_FakeWin *) (tkwin))->changes.width)
301 #define Tk_Height(tkwin) \
302 (((Tk_FakeWin *) (tkwin))->changes.height)
303 #define Tk_Changes(tkwin) (&((Tk_FakeWin *) (tkwin))->changes)
304 #define Tk_Attributes(tkwin) (&((Tk_FakeWin *) (tkwin))->atts)
305 #define Tk_IsMapped(tkwin) \
306 (((Tk_FakeWin *) (tkwin))->flags & TK_MAPPED)
307 #define Tk_ReqWidth(tkwin) (((Tk_FakeWin *) (tkwin))->reqWidth)
308 #define Tk_ReqHeight(tkwin) (((Tk_FakeWin *) (tkwin))->reqHeight)
309 #define Tk_InternalBorderWidth(tkwin) \
310 (((Tk_FakeWin *) (tkwin))->internalBorderWidth)
311 #define Tk_Parent(tkwin) (((Tk_FakeWin *) (tkwin))->parentPtr)
312
313 /*
314 * The structure below is needed by the macros above so that they can
315 * access the fields of a Tk_Window. The fields not needed by the macros
316 * are declared as "dummyX". The structure has its own type in order to
317 * prevent applications from accessing Tk_Window fields except using
318 * official macros. WARNING!! The structure definition must be kept
319 * consistent with the TkWindow structure in tkInt.h. If you change one,
320 * then change the other. See the declaration in tkInt.h for
321 * documentation on what the fields are used for internally.
322 */
323
324 typedef struct Tk_FakeWin {
325 Display *display;
326 char *dummy1;
327 int screenNum;
328 Window window;
329 char *dummy2;
330 Tk_Window parentPtr;
331 char *dummy4;
332 char *dummy5;
333 char *pathName;
334 Tk_Uid nameUid;
335 Tk_Uid classUid;
336 XWindowChanges changes;
337 unsigned int dummy6;
338 XSetWindowAttributes atts;
339 unsigned long dummy7;
340 unsigned int flags;
341 char *dummy8;
342 char *dummy9;
343 ClientData dummy10;
344 int dummy12;
345 char *dummy13;
346 char *dummy14;
347 ClientData dummy15;
348 char *dummy16;
349 ClientData dummy17;
350 int reqWidth, reqHeight;
351 int internalBorderWidth;
352 char *dummyX;
353 } Tk_FakeWin;
354
355 /*
356 * Flag values for TkWindow (and Tk_FakeWin) structures are:
357 *
358 * TK_MAPPED: 1 means window is currently mapped,
359 * 0 means unmapped.
360 * TK_RECURSIVE_DESTROY: 1 means a recursive destroy is in
361 * progress, so some cleanup operations
362 * can be omitted.
363 * TK_TOP_LEVEL: 1 means this is a top-level window (it
364 * was or will be created as a child of
365 * a root window).
366 * TK_ALREADY_DEAD: 1 means the window is in the process of
367 * being destroyed already.
368 * TK_NEED_CONFIG_NOTIFY: 1 means that the window has been reconfigured
369 * before it was made to exist. At the time of
370 * making it exist a ConfigureNotify event needs
371 * to be generated.
372 * TK_GRAB_FLAG: Used to manage grabs. See tkGrab.c for
373 * details.
374 */
375
376 #define TK_MAPPED 1
377 #define TK_RECURSIVE_DESTROY 2
378 #define TK_TOP_LEVEL 4
379 #define TK_ALREADY_DEAD 8
380 #define TK_NEED_CONFIG_NOTIFY 0x10
381 #define TK_GRAB_FLAG 0x20
382 \f
383 /*
384 *--------------------------------------------------------------
385 *
386 * Additional procedure types defined by Tk.
387 *
388 *--------------------------------------------------------------
389 */
390
391 typedef int (Tk_ErrorProc) _ANSI_ARGS_((ClientData clientData,
392 XErrorEvent *errEventPtr));
393 typedef void (Tk_EventProc) _ANSI_ARGS_((ClientData clientData,
394 XEvent *eventPtr));
395 typedef void (Tk_FileProc) _ANSI_ARGS_((ClientData clientData, int mask));
396 typedef void (Tk_FocusProc) _ANSI_ARGS_((ClientData clientData, int gotFocus));
397 typedef void (Tk_FreeProc) _ANSI_ARGS_((ClientData clientData));
398 typedef int (Tk_GenericProc) _ANSI_ARGS_((ClientData clientData,
399 XEvent *eventPtr));
400 typedef void (Tk_GeometryProc) _ANSI_ARGS_((ClientData clientData,
401 Tk_Window tkwin));
402 typedef int (Tk_GetSelProc) _ANSI_ARGS_((ClientData clientData,
403 Tcl_Interp *interp, char *portion));
404 typedef void (Tk_IdleProc) _ANSI_ARGS_((ClientData clientData));
405 typedef void (Tk_LostSelProc) _ANSI_ARGS_((ClientData clientData));
406 typedef Bool (Tk_RestrictProc) _ANSI_ARGS_((Display *display, XEvent *eventPtr,
407 char *arg));
408 typedef int (Tk_SelectionProc) _ANSI_ARGS_((ClientData clientData,
409 int offset, char *buffer, int maxBytes));
410 typedef void (Tk_TimerProc) _ANSI_ARGS_((ClientData clientData));
411 \f
412 /*
413 *--------------------------------------------------------------
414 *
415 * Exported procedures and variables.
416 *
417 *--------------------------------------------------------------
418 */
419
420 extern XColor * Tk_3DBorderColor _ANSI_ARGS_((Tk_3DBorder border));
421 extern void Tk_AddOption _ANSI_ARGS_((Tk_Window tkwin, char *name,
422 char *value, int priority));
423 extern void Tk_BindEvent _ANSI_ARGS_((Tk_BindingTable bindingTable,
424 XEvent *eventPtr, Tk_Window tkwin, int numObjects,
425 ClientData *objectPtr));
426 extern void Tk_CancelIdleCall _ANSI_ARGS_((Tk_IdleProc *idleProc,
427 ClientData clientData));
428 extern void Tk_ChangeWindowAttributes _ANSI_ARGS_((Tk_Window tkwin,
429 unsigned long valueMask,
430 XSetWindowAttributes *attsPtr));
431 extern int Tk_ConfigureInfo _ANSI_ARGS_((Tcl_Interp *interp,
432 Tk_Window tkwin, Tk_ConfigSpec *specs,
433 char *widgRec, char *argvName, int flags));
434 extern int Tk_ConfigureWidget _ANSI_ARGS_((Tcl_Interp *interp,
435 Tk_Window tkwin, Tk_ConfigSpec *specs,
436 int argc, char **argv, char *widgRec,
437 int flags));
438 extern Tk_Window Tk_CoordsToWindow _ANSI_ARGS_((int rootX, int rootY,
439 Tk_Window tkwin));
440 extern unsigned long Tk_CreateBinding _ANSI_ARGS_((Tcl_Interp *interp,
441 Tk_BindingTable bindingTable, ClientData object,
442 char *eventString, char *command, int append));
443 extern Tk_BindingTable Tk_CreateBindingTable _ANSI_ARGS_((Tcl_Interp *interp));
444 extern Tk_ErrorHandler Tk_CreateErrorHandler _ANSI_ARGS_((Display *display,
445 int error, int request, int minorCode,
446 Tk_ErrorProc *errorProc, ClientData clientData));
447 extern void Tk_CreateEventHandler _ANSI_ARGS_((Tk_Window token,
448 unsigned long mask, Tk_EventProc *proc,
449 ClientData clientData));
450 extern void Tk_CreateFileHandler _ANSI_ARGS_((int fd, int mask,
451 Tk_FileProc *proc, ClientData clientData));
452 extern void Tk_CreateFocusHandler _ANSI_ARGS_((Tk_Window tkwin,
453 Tk_FocusProc *proc, ClientData clientData));
454 extern void Tk_CreateGenericHandler _ANSI_ARGS_((
455 Tk_GenericProc *proc, ClientData clientData));
456 extern Tk_Window Tk_CreateMainWindow _ANSI_ARGS_((Tcl_Interp *interp,
457 char *screenName, char *baseName));
458 extern void Tk_CreateSelHandler _ANSI_ARGS_((Tk_Window tkwin,
459 Atom target, Tk_SelectionProc *proc,
460 ClientData clientData, Atom format));
461 extern Tk_TimerToken Tk_CreateTimerHandler _ANSI_ARGS_((int milliseconds,
462 Tk_TimerProc *proc, ClientData clientData));
463 // Added by Don to support finer timer resolution.
464 extern Tk_TimerToken Tk_CreateMicroTimerHandler _ANSI_ARGS_((int seconds,
465 int microseconds, Tk_TimerProc *proc, ClientData clientData));
466 extern Tk_Window Tk_CreateWindow _ANSI_ARGS_((Tcl_Interp *interp,
467 Tk_Window parent, char *name, char *screenName));
468 extern Tk_Window Tk_CreateWindowFromPath _ANSI_ARGS_((
469 Tcl_Interp *interp, Tk_Window tkwin,
470 char *pathName, char *screenName));
471 extern int Tk_DefineBitmap _ANSI_ARGS_((Tcl_Interp *interp,
472 Tk_Uid name, char *source, unsigned int width,
473 unsigned int height));
474 extern int Tk_DefinePixmap _ANSI_ARGS_((Tcl_Interp *interp,
475 Tk_Uid name, Tk_Window, Pixmap pixmap,
476 char *source, unsigned int width,
477 unsigned int height));
478 extern void Tk_DefineCursor _ANSI_ARGS_((Tk_Window window,
479 Cursor cursor));
480 extern void Tk_DeleteAllBindings _ANSI_ARGS_((
481 Tk_BindingTable bindingTable, ClientData object));
482 extern int Tk_DeleteBinding _ANSI_ARGS_((Tcl_Interp *interp,
483 Tk_BindingTable bindingTable, ClientData object,
484 char *eventString));
485 extern void Tk_DeleteBindingTable _ANSI_ARGS_((
486 Tk_BindingTable bindingTable));
487 extern void Tk_DeleteErrorHandler _ANSI_ARGS_((
488 Tk_ErrorHandler handler));
489 extern void Tk_DeleteEventHandler _ANSI_ARGS_((Tk_Window token,
490 unsigned long mask, Tk_EventProc *proc,
491 ClientData clientData));
492 extern void Tk_DeleteFileHandler _ANSI_ARGS_((int fd));
493 extern void Tk_DeleteGenericHandler _ANSI_ARGS_((
494 Tk_GenericProc *proc, ClientData clientData));
495 extern void Tk_DeleteTimerHandler _ANSI_ARGS_((
496 Tk_TimerToken token));
497 extern void Tk_DestroyWindow _ANSI_ARGS_((Tk_Window tkwin));
498 extern char * Tk_DisplayName _ANSI_ARGS_((Tk_Window tkwin));
499 extern int Tk_DoOneEvent _ANSI_ARGS_((int flags));
500 extern void Tk_DoWhenIdle _ANSI_ARGS_((Tk_IdleProc *proc,
501 ClientData clientData));
502 extern void Tk_Draw3DPolygon _ANSI_ARGS_((Display *display,
503 Drawable drawable, Tk_3DBorder border,
504 XPoint *pointPtr, int numPoints, int borderWidth,
505 int leftRelief));
506 extern void Tk_Draw3DRectangle _ANSI_ARGS_((Display *display,
507 Drawable drawable, Tk_3DBorder border, int x,
508 int y, int width, int height, int borderWidth,
509 int relief));
510 extern void Tk_EventuallyFree _ANSI_ARGS_((ClientData clientData,
511 Tk_FreeProc *freeProc));
512 extern void Tk_Fill3DPolygon _ANSI_ARGS_((Display *display,
513 Drawable drawable, Tk_3DBorder border,
514 XPoint *pointPtr, int numPoints, int borderWidth,
515 int leftRelief));
516 extern void Tk_Fill3DRectangle _ANSI_ARGS_((Display *display,
517 Drawable drawable, Tk_3DBorder border, int x,
518 int y, int width, int height, int borderWidth,
519 int relief));
520 extern void Tk_Free3DBorder _ANSI_ARGS_((Tk_3DBorder border));
521 extern void Tk_FreeBitmap _ANSI_ARGS_((Pixmap bitmap));
522 extern void Tk_FreePixmap _ANSI_ARGS_((Pixmap bitmap));
523 extern void Tk_FreeColor _ANSI_ARGS_((XColor *colorPtr));
524 extern int Tk_IndexOfScreen _ANSI_ARGS_((Screen *screen));
525 extern int Tk_DefaultDepth _ANSI_ARGS_((Screen *screen));
526 extern Visual *Tk_DefaultVisual _ANSI_ARGS_((Screen *screen));
527 extern Colormap Tk_DefaultColormap _ANSI_ARGS_((Screen *screen));
528 extern Window Tk_DefaultRootWindow _ANSI_ARGS_((Display *dpy));
529 extern GC Tk_DefaultGC _ANSI_ARGS_((Screen *screen));
530 extern Pixmap Tk_DefaultPixmap _ANSI_ARGS_((Screen *screen));
531 extern void Tk_FreeCursor _ANSI_ARGS_((Cursor cursor));
532 extern void Tk_FreeFontStruct _ANSI_ARGS_((
533 XFontStruct *fontStructPtr));
534 extern void Tk_FreeGC _ANSI_ARGS_((GC gc));
535 extern void Tk_GeometryRequest _ANSI_ARGS_((Tk_Window tkwin,
536 int reqWidth, int reqHeight));
537 extern Tk_3DBorder Tk_Get3DBorder _ANSI_ARGS_((Tcl_Interp *interp,
538 Tk_Window tkwin, Colormap colormap,
539 Tk_Uid colorName));
540 extern void Tk_GetAllBindings _ANSI_ARGS_((Tcl_Interp *interp,
541 Tk_BindingTable bindingTable, ClientData object));
542 extern int Tk_GetAnchor _ANSI_ARGS_((Tcl_Interp *interp,
543 char *string, Tk_Anchor *anchorPtr));
544 extern char * Tk_GetAtomName _ANSI_ARGS_((Tk_Window tkwin,
545 Atom atom));
546 extern char * Tk_GetBinding _ANSI_ARGS_((Tcl_Interp *interp,
547 Tk_BindingTable bindingTable, ClientData object,
548 char *eventString));
549 extern Pixmap Tk_GetBitmap _ANSI_ARGS_((Tcl_Interp *interp,
550 Tk_Window tkwin, Tk_Uid string));
551 extern Pixmap Tk_GetPixmap _ANSI_ARGS_((Tcl_Interp *interp,
552 Tk_Window tkwin, Tk_Uid string));
553 extern Pixmap Tk_GetBitmapFromData _ANSI_ARGS_((Tcl_Interp *interp,
554 Tk_Window tkwin, char *source,
555 unsigned int width, unsigned int height));
556 extern Pixmap Tk_GetPixmapFromData _ANSI_ARGS_((Tcl_Interp *interp,
557 Tk_Window tkwin, char *source,
558 unsigned int width, unsigned int height));
559 extern int Tk_GetCapStyle _ANSI_ARGS_((Tcl_Interp *interp,
560 char *string, int *capPtr));
561 extern XColor * Tk_GetColor _ANSI_ARGS_((Tcl_Interp *interp,
562 Tk_Window tkwin, Colormap colormap, Tk_Uid name));
563 extern XColor * Tk_GetColorByValue _ANSI_ARGS_((Tcl_Interp *interp,
564 Tk_Window tkwin, Colormap colormap,
565 XColor *colorPtr));
566 extern Cursor Tk_GetCursor _ANSI_ARGS_((Tcl_Interp *interp,
567 Tk_Window tkwin, Tk_Uid string));
568 extern Cursor Tk_GetCursorFromData _ANSI_ARGS_((Tcl_Interp *interp,
569 Tk_Window tkwin, char *source, char *mask,
570 unsigned int width, unsigned int height,
571 int xHot, int yHot, Tk_Uid fg, Tk_Uid bg));
572 extern XFontStruct * Tk_GetFontStruct _ANSI_ARGS_((Tcl_Interp *interp,
573 Tk_Window tkwin, Tk_Uid name));
574 extern GC Tk_GetGC _ANSI_ARGS_((Tk_Window tkwin,
575 unsigned long valueMask, XGCValues *valuePtr));
576 extern int Tk_GetJoinStyle _ANSI_ARGS_((Tcl_Interp *interp,
577 char *string, int *joinPtr));
578 extern int Tk_GetJustify _ANSI_ARGS_((Tcl_Interp *interp,
579 char *string, Tk_Justify *justifyPtr));
580 extern Tk_Uid Tk_GetOption _ANSI_ARGS_((Tk_Window tkwin, char *name,
581 char *className));
582 extern int Tk_GetPixels _ANSI_ARGS_((Tcl_Interp *interp,
583 Tk_Window tkwin, char *string, int *intPtr));
584 extern int Tk_GetRelief _ANSI_ARGS_((Tcl_Interp *interp,
585 char *name, int *reliefPtr));
586 extern void Tk_GetRootCoords _ANSI_ARGS_ ((Tk_Window tkwin,
587 int *xPtr, int *yPtr));
588 extern int Tk_GetScreenMM _ANSI_ARGS_((Tcl_Interp *interp,
589 Tk_Window tkwin, char *string, double *doublePtr));
590 extern int Tk_GetSelection _ANSI_ARGS_((Tcl_Interp *interp,
591 Tk_Window tkwin, Atom target, Tk_GetSelProc *proc,
592 ClientData clientData));
593 extern Tk_Uid Tk_GetUid _ANSI_ARGS_((char *string));
594 extern int Tk_Grab _ANSI_ARGS_((Tcl_Interp *interp,
595 Tk_Window tkwin, int grabGlobal));
596 extern void Tk_HandleEvent _ANSI_ARGS_((XEvent *eventPtr));
597 extern Atom Tk_InternAtom _ANSI_ARGS_((Tk_Window tkwin,
598 char *name));
599 extern void Tk_MainLoop _ANSI_ARGS_((void));
600 extern void Tk_MakeWindowExist _ANSI_ARGS_((Tk_Window tkwin));
601 extern void Tk_ManageGeometry _ANSI_ARGS_((Tk_Window tkwin,
602 Tk_GeometryProc *proc, ClientData clientData));
603 extern void Tk_MapWindow _ANSI_ARGS_((Tk_Window tkwin));
604 extern void Tk_MoveResizeWindow _ANSI_ARGS_((Tk_Window tkwin,
605 int x, int y, unsigned int width,
606 unsigned int height));
607 extern void Tk_MoveWindow _ANSI_ARGS_((Tk_Window tkwin, int x,
608 int y));
609 extern char * Tk_NameOf3DBorder _ANSI_ARGS_((Tk_3DBorder border));
610 extern char * Tk_NameOfAnchor _ANSI_ARGS_((Tk_Anchor anchor));
611 extern char * Tk_NameOfBitmap _ANSI_ARGS_((Pixmap bitmap));
612 extern char * Tk_NameOfPixmap _ANSI_ARGS_((Pixmap bitmap));
613 extern char * Tk_NameOfCapStyle _ANSI_ARGS_((int cap));
614 extern char * Tk_NameOfColor _ANSI_ARGS_((XColor *colorPtr));
615 extern char * Tk_NameOfCursor _ANSI_ARGS_((Cursor cursor));
616 extern char * Tk_NameOfFontStruct _ANSI_ARGS_((
617 XFontStruct *fontStructPtr));
618 extern char * Tk_NameOfJoinStyle _ANSI_ARGS_((int join));
619 extern char * Tk_NameOfJustify _ANSI_ARGS_((Tk_Justify justify));
620 extern char * Tk_NameOfRelief _ANSI_ARGS_((int relief));
621 extern Tk_Window Tk_NameToWindow _ANSI_ARGS_((Tcl_Interp *interp,
622 char *pathName, Tk_Window tkwin));
623 extern void Tk_OwnSelection _ANSI_ARGS_((Tk_Window tkwin,
624 Tk_LostSelProc *proc, ClientData clientData));
625 extern int Tk_ParseArgv _ANSI_ARGS_((Tcl_Interp *interp,
626 Tk_Window tkwin, int *argcPtr, char **argv,
627 Tk_ArgvInfo *argTable, int flags));
628 extern void Tk_Preserve _ANSI_ARGS_((ClientData clientData));
629 extern int Tk_RegisterInterp _ANSI_ARGS_((Tcl_Interp *interp,
630 char *name, Tk_Window tkwin));
631 extern void Tk_Release _ANSI_ARGS_((ClientData clientData));
632 extern void Tk_ResizeWindow _ANSI_ARGS_((Tk_Window tkwin,
633 unsigned int width, unsigned int height));
634 extern Tk_RestrictProc *Tk_RestrictEvents _ANSI_ARGS_((Tk_RestrictProc *proc,
635 char *arg, char **prevArgPtr));
636 extern void Tk_SetBackgroundFromBorder _ANSI_ARGS_((
637 Tk_Window tkwin, Tk_3DBorder border));
638 extern void Tk_SetClass _ANSI_ARGS_((Tk_Window tkwin,
639 char *className));
640 extern void Tk_SetGrid _ANSI_ARGS_((Tk_Window tkwin,
641 int reqWidth, int reqHeight, int gridWidth,
642 int gridHeight));
643 extern void Tk_SetInternalBorder _ANSI_ARGS_((Tk_Window tkwin,
644 int width));
645 extern void Tk_SetWindowBackground _ANSI_ARGS_((Tk_Window tkwin,
646 unsigned long pixel));
647 extern void Tk_SetWindowBackgroundPixmap _ANSI_ARGS_((
648 Tk_Window tkwin, Pixmap pixmap));
649 extern void Tk_SetWindowBorder _ANSI_ARGS_((Tk_Window tkwin,
650 unsigned long pixel));
651 extern void Tk_SetWindowBorderWidth _ANSI_ARGS_((Tk_Window tkwin,
652 int width));
653 extern void Tk_SetWindowBorderPixmap _ANSI_ARGS_((Tk_Window tkwin,
654 Pixmap pixmap));
655 extern void Tk_ShareEvents _ANSI_ARGS_((Tk_Window tkwin,
656 Tk_Uid groupId));
657 extern void Tk_SizeOfBitmap _ANSI_ARGS_((Pixmap bitmap,
658 unsigned int *widthPtr, unsigned int *heightPtr));
659 extern void Tk_SizeOfPixmap _ANSI_ARGS_((Pixmap bitmap,
660 unsigned int *widthPtr, unsigned int *heightPtr));
661 extern void Tk_Sleep _ANSI_ARGS_((int ms));
662 extern void Tk_UndefineCursor _ANSI_ARGS_((Tk_Window window));
663 extern int Tk_UndefinePixmap _ANSI_ARGS_((Tcl_Interp *interp,
664 Tk_Uid name, Tk_Window tkwin));
665 extern void Tk_Ungrab _ANSI_ARGS_((Tk_Window tkwin));
666 extern void Tk_UnmapWindow _ANSI_ARGS_((Tk_Window tkwin));
667 extern void Tk_UnshareEvents _ANSI_ARGS_((Tk_Window tkwin,
668 Tk_Uid groupId));
669
670
671 extern int tk_NumMainWindows;
672
673 /*
674 * Added by dhopkins for OLPC Micropolis gtk.Socket integration.
675 */
676 extern Window tk_RootWindow;
677
678 /*
679 * Tcl commands exported by Tk:
680 */
681
682 extern int Tk_AfterCmd _ANSI_ARGS_((ClientData clientData,
683 Tcl_Interp *interp, int argc, char **argv));
684 extern int Tk_ApplicationCmd _ANSI_ARGS_((ClientData clientData,
685 Tcl_Interp *interp, int argc, char **argv));
686 extern int Tk_BindCmd _ANSI_ARGS_((ClientData clientData,
687 Tcl_Interp *interp, int argc, char **argv));
688 extern int Tk_ButtonCmd _ANSI_ARGS_((ClientData clientData,
689 Tcl_Interp *interp, int argc, char **argv));
690 extern int Tk_CanvasCmd _ANSI_ARGS_((ClientData clientData,
691 Tcl_Interp *interp, int argc, char **argv));
692 extern int Tk_DestroyCmd _ANSI_ARGS_((ClientData clientData,
693 Tcl_Interp *interp, int argc, char **argv));
694 extern int Tk_EntryCmd _ANSI_ARGS_((ClientData clientData,
695 Tcl_Interp *interp, int argc, char **argv));
696 extern int Tk_FrameCmd _ANSI_ARGS_((ClientData clientData,
697 Tcl_Interp *interp, int argc, char **argv));
698 extern int Tk_FocusCmd _ANSI_ARGS_((ClientData clientData,
699 Tcl_Interp *interp, int argc, char **argv));
700 extern int Tk_GrabCmd _ANSI_ARGS_((ClientData clientData,
701 Tcl_Interp *interp, int argc, char **argv));
702 extern int Tk_ListboxCmd _ANSI_ARGS_((ClientData clientData,
703 Tcl_Interp *interp, int argc, char **argv));
704 extern int Tk_MenuCmd _ANSI_ARGS_((ClientData clientData,
705 Tcl_Interp *interp, int argc, char **argv));
706 extern int Tk_MenubuttonCmd _ANSI_ARGS_((ClientData clientData,
707 Tcl_Interp *interp, int argc, char **argv));
708 extern int Tk_MessageCmd _ANSI_ARGS_((ClientData clientData,
709 Tcl_Interp *interp, int argc, char **argv));
710 extern int Tk_OptionCmd _ANSI_ARGS_((ClientData clientData,
711 Tcl_Interp *interp, int argc, char **argv));
712 extern int Tk_PackCmd _ANSI_ARGS_((ClientData clientData,
713 Tcl_Interp *interp, int argc, char **argv));
714 extern int Tk_PlaceCmd _ANSI_ARGS_((ClientData clientData,
715 Tcl_Interp *interp, int argc, char **argv));
716 extern int Tk_ScaleCmd _ANSI_ARGS_((ClientData clientData,
717 Tcl_Interp *interp, int argc, char **argv));
718 extern int Tk_ScrollbarCmd _ANSI_ARGS_((ClientData clientData,
719 Tcl_Interp *interp, int argc, char **argv));
720 extern int Tk_SelectionCmd _ANSI_ARGS_((ClientData clientData,
721 Tcl_Interp *interp, int argc, char **argv));
722 extern int Tk_SendCmd _ANSI_ARGS_((ClientData clientData,
723 Tcl_Interp *interp, int argc, char **argv));
724 extern int Tk_TextCmd _ANSI_ARGS_((ClientData clientData,
725 Tcl_Interp *interp, int argc, char **argv));
726 extern int Tk_TkwaitCmd _ANSI_ARGS_((ClientData clientData,
727 Tcl_Interp *interp, int argc, char **argv));
728 extern int Tk_UpdateCmd _ANSI_ARGS_((ClientData clientData,
729 Tcl_Interp *interp, int argc, char **argv));
730 extern int Tk_WinfoCmd _ANSI_ARGS_((ClientData clientData,
731 Tcl_Interp *interp, int argc, char **argv));
732 extern int Tk_WmCmd _ANSI_ARGS_((ClientData clientData,
733 Tcl_Interp *interp, int argc, char **argv));
734 extern int Tcp_AcceptCmd _ANSI_ARGS_((ClientData clientData,
735 Tcl_Interp *interp, int argc, char **argv));
736 extern int Tcp_ConnectCmd _ANSI_ARGS_((ClientData clientData,
737 Tcl_Interp *interp, int argc, char **argv));
738 extern int Tcp_ShutdownCmd _ANSI_ARGS_((ClientData clientData,
739 Tcl_Interp *interp, int argc, char **argv));
740 extern int Tcp_FileHandlerCmd _ANSI_ARGS_((ClientData clientData,
741 Tcl_Interp *interp, int argc, char **argv));
742
743 #endif /* _TK */
Micropolis
Impressum, Datenschutz