Mercurial > emacs
annotate admin/alloc-colors.c @ 70493:6c25fb5679a7
(mac_set_font): New function.
(mac_frame_parm_handlers, syms_of_macfns): Replace x_set_font with it.
(mac_window) [TARGET_API_MAC_CARBON && MAC_OSX]: Specify
kWindowToolbarButtonAttribute when creating window.
(Fmac_clear_font_name_table): Move from macfns.c.
(syms_of_macfns): Likewise for defsubr.
[USE_MAC_FONT_PANEL] (Fmac_set_font_panel_visibility): New defun.
(syms_of_macfns) [USE_MAC_FONT_PANEL]: Defsubr it.
author | YAMAMOTO Mitsuharu <mituharu@math.s.chiba-u.ac.jp> |
---|---|
date | Sun, 07 May 2006 08:05:02 +0000 |
parents | a8b22f12b3dc |
children | ddcbd2c1b70d 72dea2ff0142 |
rev | line source |
---|---|
39991 | 1 /* Allocate X colors. Used for testing with dense colormaps. |
70120
a8b22f12b3dc
updated copyright year(s)
Ramprasad B <ramprasad_i82@yahoo.com>
parents:
64079
diff
changeset
|
2 Copyright (C) 2001, 2006 Free Software Foundation, Inc. |
39991 | 3 |
4 This file is part of GNU Emacs. | |
5 | |
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 2, or (at your option) | |
9 any later version. | |
10 | |
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 | |
64079 | 18 the Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor, |
19 Boston, MA 02110-1301, USA. */ | |
39991 | 20 |
21 #include <X11/Xlib.h> | |
22 #include <stdio.h> | |
23 #include <stdlib.h> | |
24 #include <stdarg.h> | |
25 #include <unistd.h> | |
26 | |
27 void | |
28 fatal (const char *fmt, ...) | |
29 { | |
30 va_list ap; | |
31 | |
32 va_start (ap, fmt); | |
33 vfprintf (stderr, fmt, ap); | |
34 fputc ('\n', stderr); | |
35 va_end (ap); | |
36 exit (1); | |
37 } | |
38 | |
39 void | |
40 usage (const char *progname) | |
41 { | |
42 fprintf (stderr, "Usage %s options\n", progname); | |
43 fprintf (stderr, "-n NCOLORS allcoate NCOLORS colors\n"); | |
44 exit (1); | |
45 } | |
46 | |
47 int | |
48 main (int argc, char **argv) | |
49 { | |
50 Display *dpy; | |
51 int opt, ncolors = 0, i; | |
52 XColor *allocated; | |
53 int nallocated; | |
54 XColor color; | |
55 Colormap cmap; | |
56 | |
57 while ((opt = getopt (argc, argv, "n:")) != EOF) | |
58 switch (opt) | |
59 { | |
60 case 'n': | |
61 ncolors = atoi (optarg); | |
62 break; | |
49600
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
39991
diff
changeset
|
63 |
39991 | 64 case '?': |
65 usage (argv[0]); | |
66 } | |
67 | |
68 if (ncolors == 0) | |
69 usage (argv[0]); | |
70 | |
71 dpy = XOpenDisplay (""); | |
72 if (dpy == NULL) | |
73 fatal ("Cannot open display"); | |
74 cmap = DefaultColormap (dpy, 0); | |
75 | |
76 allocated = malloc (ncolors * sizeof *allocated); | |
77 nallocated = 0; | |
78 memset (&color, 0, sizeof color); | |
79 | |
80 while (nallocated < ncolors | |
81 && color.red < 65536) | |
82 { | |
83 allocated[nallocated] = color; | |
84 if (XAllocColor (dpy, cmap, &allocated[nallocated])) | |
85 { | |
86 for (i = 0; i < nallocated; ++i) | |
87 if (allocated[i].red == allocated[nallocated].red | |
88 && allocated[i].green == allocated[nallocated].green | |
89 && allocated[i].blue == allocated[nallocated].blue) | |
90 break; | |
91 | |
92 if (i == nallocated) | |
93 { | |
94 printf ("allocated %d/%d/%d\n", | |
95 allocated[nallocated].red, | |
96 allocated[nallocated].green, | |
97 allocated[nallocated].blue); | |
98 ++nallocated; | |
99 } | |
100 } | |
49600
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
39991
diff
changeset
|
101 |
39991 | 102 ++color.red; |
103 ++color.green; | |
104 ++color.blue; | |
105 } | |
106 | |
107 fprintf (stderr, "Waiting. Press ^C to stop.\n"); | |
108 while (1) | |
109 sleep (10); | |
110 | |
111 XCloseDisplay (dpy); | |
112 return 0; | |
113 } | |
52401 | 114 |
115 /* arch-tag: f1be90ac-5b70-43c2-835e-5a6432a25145 | |
116 (do not change this comment) */ |