?  search:
summary | log | graphiclog1 | graphiclog2 | commit | commitdiff | tree | refs | edit | fork
blame | history | raw | HEAD
MenuStyle option
[wmaker-crm.git] / WINGs / wcolorpanel.c
blobaee598b42b5308c62088a96943934c51da114df6
1 /*
2 * ColorPanel for WINGs
3 *
4 * by ]d : Original idea and basic initial code
5 * Pascal Hofstee : Code for wheeldrawing and calculating
6 * colors from it.
7 * Primary coder of this Color Panel.
8 * Alban Hertroys : Optimizations for algorithms for color-
9 * wheel. Also custom ColorPalettes and
10 * magnifying glass. Secondary coder ;)
11 * Alfredo K. Kojima : For pointing out memory-allocation
12 * problems and similair code-issues
13 * Marco van Hylckama-Vlieg : For once again doing the artwork ;-)
14 *
15 * small note: Tabstop size = 4
16 *
17 */
18
19
20 #include "WINGsP.h"
21 #include <math.h>
22 #include <unistd.h>
23 #include <ctype.h>
24 #include <fcntl.h>
25 #include <sys/types.h>
26 #include <sys/stat.h>
27 #include <dirent.h>
28 #include <errno.h>
29
30
31 #ifndef PATH_MAX
32 # define PATH_MAX 1024
33 #endif
34
35
36 /*
37 * Bitmaps for magnifying glass cursor
38 */
39
40 /* Cursor */
41 #define Cursor_x_hot 11
42 #define Cursor_y_hot 11
43 #define Cursor_width 32
44 #define Cursor_height 32
45 static unsigned char Cursor_bits[] = {
46 0x00,0x7e,0x00,0x00,0xc0,0x81,0x03,0x00,0x20,0x00,0x04,0x00,0x10,0x00,0x08,
47 0x00,0x08,0x00,0x10,0x00,0x04,0x00,0x20,0x00,0x02,0x00,0x40,0x00,0x02,0x00,
48 0x40,0x00,0x02,0x00,0x40,0x00,0x01,0x42,0x80,0x00,0x01,0x24,0x80,0x00,0x01,
49 0x00,0x80,0x00,0x01,0x00,0x80,0x00,0x01,0x24,0x80,0x00,0x01,0x42,0x80,0x00,
50 0x02,0x00,0x40,0x00,0x02,0x00,0x40,0x00,0x02,0x00,0x40,0x00,0x04,0x00,0x20,
51 0x00,0x08,0x00,0x50,0x00,0x10,0x00,0x88,0x00,0x20,0x00,0x5c,0x01,0xc0,0x81,
52 0x3b,0x02,0x00,0x7e,0x70,0x05,0x00,0x00,0xe0,0x08,0x00,0x00,0xc0,0x15,0x00,
53 0x00,0x80,0x23,0x00,0x00,0x00,0x57,0x00,0x00,0x00,0x8e,0x00,0x00,0x00,0x5c,
54 0x00,0x00,0x00,0xb8,0x00,0x00,0x00,0x70};
55
56 /* Cursor shape-mask */
57 #define Cursor_shape_width 32
58 #define Cursor_shape_height 32
59 static unsigned char Cursor_shape_bits[] = {
60 0x00,0x7e,0x00,0x00,0xc0,0x81,0x03,0x00,0x20,0x00,0x04,0x00,0x10,0x00,0x08,
61 0x00,0x08,0x00,0x10,0x00,0x04,0x00,0x20,0x00,0x02,0x00,0x40,0x00,0x02,0x00,
62 0x40,0x00,0x02,0x00,0x40,0x00,0x01,0x42,0x80,0x00,0x01,0x24,0x80,0x00,0x01,
63 0x00,0x80,0x00,0x01,0x00,0x80,0x00,0x01,0x24,0x80,0x00,0x01,0x42,0x80,0x00,
64 0x02,0x00,0x40,0x00,0x02,0x00,0x40,0x00,0x02,0x00,0x40,0x00,0x04,0x00,0x20,
65 0x00,0x08,0x00,0x70,0x00,0x10,0x00,0xf8,0x00,0x20,0x00,0xfc,0x01,0xc0,0x81,
66 0xfb,0x03,0x00,0x7e,0xf0,0x07,0x00,0x00,0xe0,0x0f,0x00,0x00,0xc0,0x1f,0x00,
67 0x00,0x80,0x3f,0x00,0x00,0x00,0x7f,0x00,0x00,0x00,0xfe,0x00,0x00,0x00,0xfc,
68 0x00,0x00,0x00,0xf8,0x00,0x00,0x00,0x70};
69
70 /* Clip-mask for magnified pixels */
71 #define Cursor_mask_width 22
72 #define Cursor_mask_height 22
73 static unsigned char Cursor_mask_bits[] = {
74 0x00,0x3f,0x00,0xe0,0xff,0x01,0xf0,0xff,0x03,0xf8,0xff,0x07,0xfc,0xff,0x0f,
75 0xfe,0xff,0x1f,0xfe,0xff,0x1f,0xfe,0xff,0x1f,0xff,0xff,0x3f,0xff,0xff,0x3f,
76 0xff,0xff,0x3f,0xff,0xff,0x3f,0xff,0xff,0x3f,0xff,0xff,0x3f,0xfe,0xff,0x1f,
77 0xfe,0xff,0x1f,0xfe,0xff,0x1f,0xfc,0xff,0x0f,0xf8,0xff,0x07,0xf0,0xff,0x03,
78 0xe0,0xff,0x01,0x00,0x3f,0x00};
79
80
81 typedef struct MovingView {
82 WMView *view; /* The view this is all about */
83 Pixmap pixmap; /* What's under the view */
84 Pixmap mask; /* Pixmap mask for view-contents */
85 int valid; /* Are contents still valid ? */
86 RColor color; /* Color of a pixel in the image */
87 } MovingView;
88
89 typedef struct WheelMatrix {
90 unsigned int width, height; /* Size of the colorwheel */
91 unsigned char *data[3]; /* Wheel data (R,G,B) */
92 unsigned char values[256]; /* Precalculated values R,G & B = 0-255 */
93 } wheelMatrix;
94
95 typedef struct W_ColorPanel {
96 WMWindow *win;
97 WMFont *font8;
98 WMFont *font12;
99
100 void *clientData;
101 WMAction *action;
102
103 /* Common Stuff */
104 WMColorWell *colorWell;
105 WMButton *magnifyBtn;
106 WMButton *wheelBtn;
107 WMButton *slidersBtn;
108 WMButton *customPaletteBtn;
109 WMButton *colorListBtn;
110
111 /* Magnifying Glass */
112 MovingView *magnifyGlass;
113
114 /* ColorWheel Panel */
115 WMFrame *wheelFrm;
116 WMSlider *wheelBrightnessS;
117 WMView *wheelView;
118
119 /* Slider Panels */
120 WMFrame *slidersFrm;
121 WMFrame *seperatorFrm;
122 WMButton *grayBtn;
123 WMButton *rgbBtn;
124 WMButton *cmykBtn;
125 WMButton *hsbBtn;
126 /* Gray Scale Panel */
127 WMFrame *grayFrm;
128 WMLabel *grayMinL;
129 WMLabel *grayMaxL;
130 WMSlider *grayBrightnessS;
131 WMTextField *grayBrightnessT;
132 WMButton *grayPresetBtn[7];
133
134 /* RGB Panel */
135 WMFrame *rgbFrm;
136 WMLabel *rgbMinL;
137 WMLabel *rgbMaxL;
138 WMSlider *rgbRedS;
139 WMSlider *rgbGreenS;
140 WMSlider *rgbBlueS;
141 WMTextField *rgbRedT;
142 WMTextField *rgbGreenT;
143 WMTextField *rgbBlueT;
144
145 /* CMYK Panel */
146 WMFrame *cmykFrm;
147 WMLabel *cmykMinL;
148 WMLabel *cmykMaxL;
149 WMSlider *cmykCyanS;
150 WMSlider *cmykMagentaS;
151 WMSlider *cmykYellowS;
152 WMSlider *cmykBlackS;
153 WMTextField *cmykCyanT;
154 WMTextField *cmykMagentaT;
155 WMTextField *cmykYellowT;
156 WMTextField *cmykBlackT;
157
158 /* HSB Panel */
159 WMFrame *hsbFrm;
160 WMSlider *hsbHueS;
161 WMSlider *hsbSaturationS;
162 WMSlider *hsbBrightnessS;
163 WMTextField *hsbHueT;
164 WMTextField *hsbSaturationT;
165 WMTextField *hsbBrightnessT;
166
167 /* Custom Palette Panel*/
168 WMFrame *customPaletteFrm;
169 WMPopUpButton *customPaletteHistoryBtn;
170 WMFrame *customPaletteContentFrm;
171 WMPopUpButton *customPaletteMenuBtn;
172 WMView *customPaletteContentView;
173
174 /* Color List Panel */
175 WMFrame *colorListFrm;
176 WMPopUpButton *colorListHistoryBtn;
177 WMList *colorListContentLst;
178 WMPopUpButton *colorListColorMenuBtn;
179 WMPopUpButton *colorListListMenuBtn;
180
181 /* Look-Up Tables and Images */
182 wheelMatrix *wheelMtrx;
183 Pixmap wheelImg;
184 Pixmap selectionImg;
185 Pixmap selectionBackImg;
186 RImage *customPaletteImg;
187 char *lastBrowseDir;
188
189 /* Common Data Fields */
190 RColor color; /* Current color */
191 Bool colorSet; /* Is color already set ? */
192 RHSVColor hsvcolor; /* Backup HSV Color */
193 WMColorPanelMode mode; /* Current color selection mode */
194 WMColorPanelMode slidersmode;/* Current color sel. mode sliders panel */
195 WMColorPanelMode lastChanged;/* Panel that last changed the color */
196 int colx, coly; /* (x,y) of sel.-marker in WheelMode */
197 int palx, paly; /* (x,y) of sel.-marker in
198 CustomPaletteMode */
199 float palXRatio, palYRatio; /* Ratios in x & y between
200 original and scaled
201 palettesize */
202 int currentPalette;
203 char *configurationPath;
204
205 struct {
206 unsigned int continuous:1;
207
208 unsigned int dragging:1;
209 } flags;
210 } W_ColorPanel;
211
212 enum {
213 CPmenuNewFromFile,
214 CPmenuRename,
215 CPmenuRemove,
216 CPmenuCopy,
217 CPmenuNewFromClipboard
218 } customPaletteMenuItem;
219
220 enum {
221 CLmenuAdd,
222 CLmenuRename,
223 CLmenuRemove
224 } colorListMenuItem;
225
226
227 #define PWIDTH 194
228 #define PHEIGHT 266
229 #define colorWheelSize 150
230 #define customPaletteWidth 182
231 #define customPaletteHeight 106
232 #define knobThickness 8
233
234 #define SPECTRUM_WIDTH 511
235 #define SPECTRUM_HEIGHT 360
236
237 #define COLORWHEEL_PART 1
238 #define CUSTOMPALETTE_PART 2
239 #define BUFSIZE 1024
240
241 #undef EASTEREGG
242
243 #define RGBTXT "/usr/X11R6/lib/X11/rgb.txt"
244 #define MAX_LENGTH 1024
245
246 static int fetchFile(char* toPath, char *imageSrcFile,
247 char *imageDestFileName);
248 char *generateNewFilename(char *curName);
249
250 static void modeButtonCallback(WMWidget *w, void *data);
251 static int getPickerPart(W_ColorPanel *panel, int x, int y);
252 static void readConfiguration(W_ColorPanel *panel);
253 static void readXColors(W_ColorPanel *panel);
254
255 static void closeWindowCallback(WMWidget *w, void *data);
256
257 static Cursor magnifyGrabPointer(W_ColorPanel *panel);
258 static WMPoint magnifyInitialize(W_ColorPanel *panel);
259 static void magnifyPutCursor(WMWidget *w, void *data);
260 static Pixmap magnifyCreatePixmap(WMColorPanel *panel);
261 static Pixmap magnifyGetStorePixmap(W_ColorPanel *panel, int x1, int y1,
262 int x2, int y2);
263 static Pixmap magnifyGetImage(WMScreen *scr, int x, int y);
264
265 static wheelMatrix* wheelCreateMatrix(unsigned int width , unsigned int height);
266 static void wheelDestroyMatrix(wheelMatrix *matrix);
267 static wheelMatrix* wheelInitMatrix(W_ColorPanel *panel);
268 static void wheelRender(W_ColorPanel *panel);
269 static Bool wheelInsideColorWheel(W_ColorPanel *panel, unsigned long ofs);
270 static void wheelPaint(W_ColorPanel *panel);
271
272 static void wheelHandleEvents(XEvent *event, void *data);
273 static void wheelHandleActionEvents(XEvent *event, void *data);
274 static void wheelBrightnessSliderCallback(WMWidget *w, void *data);
275 static void wheelUpdateSelection(W_ColorPanel *panel);
276 static void wheelUndrawSelection(W_ColorPanel *panel);
277
278 static void wheelPositionSelection(W_ColorPanel *panel, int x, int y);
279 static void wheelPositionSelectionOutBounds(W_ColorPanel *panel, int x, int y);
280 static void wheelUpdateBrightnessGradientFromHSV (W_ColorPanel *panel,
281 RHSVColor topColor);
282 static void wheelUpdateBrightnessGradientFromLocation (W_ColorPanel *panel);
283 static void wheelUpdateBrightnessGradient(W_ColorPanel *panel, RColor topColor);
284
285 static void grayBrightnessSliderCallback(WMWidget *w, void *data);
286 static void grayPresetButtonCallback(WMWidget *w, void *data);
287 static void grayBrightnessTextFieldCallback(void *observerData,
288 WMNotification *notification);
289
290 static void rgbSliderCallback(WMWidget *w, void *data);
291 static void rgbTextFieldCallback(void *observerData,
292 WMNotification *notification);
293
294 static void cmykSliderCallback(WMWidget *w, void *data);
295 static void cmykTextFieldCallback(void *observerData,
296 WMNotification *notification);
297
298 static void hsbSliderCallback(WMWidget *w, void *data);
299 static void hsbTextFieldCallback(void *observerData,
300 WMNotification *notification);
301 static void hsbUpdateBrightnessGradient(W_ColorPanel *panel);
302 static void hsbUpdateSaturationGradient(W_ColorPanel *panel);
303 static void hsbUpdateHueGradient(W_ColorPanel *panel);
304
305 static void customRenderSpectrum(W_ColorPanel *panel);
306 static void customSetPalette(W_ColorPanel *panel);
307 static void customPaletteHandleEvents(XEvent *event, void *data);
308 static void customPaletteHandleActionEvents(XEvent *event, void *data);
309 static void customPalettePositionSelection(W_ColorPanel *panel, int x, int y);
310 static void customPalettePositionSelectionOutBounds(W_ColorPanel *panel,
311 int x, int y);
312 static void customPaletteMenuCallback(WMWidget *w, void *data);
313 static void customPaletteHistoryCallback(WMWidget *w, void *data);
314
315 static void customPaletteMenuNewFromFile(W_ColorPanel *panel);
316 static void customPaletteMenuRename(W_ColorPanel *panel);
317 static void customPaletteMenuRemove(W_ColorPanel *panel);
318
319 static void colorListPaintItem(WMList *lPtr, int index, Drawable d, char *text,
320 int state, WMRect *rect);
321 static void colorListSelect(WMWidget *w, void *data);
322 static void colorListColorMenuCallback(WMWidget *w, void *data);
323 static void colorListListMenuCallback(WMWidget *w, void *data);
324 static void colorListListMenuNew(W_ColorPanel *panel);
325
326 static void wheelInit(W_ColorPanel *panel);
327 static void grayInit(W_ColorPanel *panel);
328 static void rgbInit(W_ColorPanel *panel);
329 static void cmykInit(W_ColorPanel *panel);
330 static void hsbInit(W_ColorPanel *panel);
331
332
333
334 void
335 WMSetColorPanelAction(WMColorPanel *panel, WMAction *action, void *data)
336 {
337 panel->action = action;
338 panel->clientData = data;
339 }
340
341 static WMColorPanel*
342 makeColorPanel(WMScreen *scrPtr, char *name)
343 {
344 WMColorPanel *panel;
345 RImage *image;
346 WMPixmap *pixmap;
347 RColor from;
348 RColor to;
349 WMColor *textcolor;
350 int i;
351 int x,y;
352
353
354 panel = wmalloc(sizeof(WMColorPanel));
355 memset(panel, 0, sizeof(WMColorPanel));
356
357 panel->colorSet = False; /* Color has not been set yet */
358
359 panel->font8 = WMSystemFontOfSize(scrPtr, 8);
360 panel->font12 = WMSystemFontOfSize(scrPtr, 12);
361
362 panel->win = WMCreateWindowWithStyle(scrPtr, name,
363 WMTitledWindowMask | WMClosableWindowMask | WMResizableWindowMask);
364 WMResizeWidget(panel->win, PWIDTH, PHEIGHT);
365 WMSetWindowTitle(panel->win, "Colors");
366 WMSetWindowCloseAction(panel->win, closeWindowCallback, panel);
367
368
369 /* Set Default ColorPanel Mode(s) */
370 panel->mode = WMWheelModeColorPanel;
371 panel->lastChanged = WMWheelModeColorPanel;
372 panel->slidersmode = WMRGBModeColorPanel;
373 panel->configurationPath = wstrappend(wusergnusteppath(),
374 "/Library/Colors/");
375
376 /* Some General Purpose Widgets */
377 panel->colorWell = WMCreateColorWell(panel->win);
378 WMResizeWidget(panel->colorWell, 134, 36);
379 WSetColorWellBordered(panel->colorWell, False);
380 WMMoveWidget(panel->colorWell, 56, 4);
381
382 panel->magnifyBtn = WMCreateCustomButton(panel->win,
383 WBBStateLightMask|WBBStateChangeMask);
384 WMResizeWidget(panel->magnifyBtn, 46, 36);
385 WMMoveWidget(panel->magnifyBtn, 6,4);
386 WMSetButtonAction(panel->magnifyBtn, magnifyPutCursor, panel);
387 WMSetButtonImagePosition(panel->magnifyBtn, WIPImageOnly);
388 WMSetButtonImage(panel->magnifyBtn, scrPtr->magnifyIcon);
389
390 panel->wheelBtn = WMCreateCustomButton(panel->win,
391 WBBStateLightMask|WBBStateChangeMask);
392 WMResizeWidget(panel->wheelBtn, 46, 32);
393 WMMoveWidget(panel->wheelBtn, 6, 44);
394 WMSetButtonAction(panel->wheelBtn, modeButtonCallback, panel);
395 WMSetButtonImagePosition(panel->wheelBtn, WIPImageOnly);
396 WMSetButtonImage(panel->wheelBtn, scrPtr->wheelIcon);
397
398 panel->slidersBtn = WMCreateCustomButton(panel->win,
399 WBBStateLightMask|WBBStateChangeMask);
400 WMResizeWidget(panel->slidersBtn, 46, 32);
401 WMMoveWidget(panel->slidersBtn, 52, 44);
402 WMSetButtonAction(panel->slidersBtn, modeButtonCallback, panel);
403 WMSetButtonImagePosition(panel->slidersBtn, WIPImageOnly);
404 WMSetButtonImage(panel->slidersBtn, scrPtr->rgbIcon);
405
406 panel->customPaletteBtn = WMCreateCustomButton(panel->win,
407 WBBStateLightMask|WBBStateChangeMask);
408 WMResizeWidget(panel->customPaletteBtn, 46, 32);
409 WMMoveWidget(panel->customPaletteBtn, 98, 44);
410 WMSetButtonAction(panel->customPaletteBtn, modeButtonCallback, panel);
411 WMSetButtonImagePosition(panel->customPaletteBtn, WIPImageOnly);
412 WMSetButtonImage(panel->customPaletteBtn, scrPtr->customPaletteIcon);
413
414 panel->colorListBtn = WMCreateCustomButton(panel->win,
415 WBBStateLightMask|WBBStateChangeMask);
416 WMResizeWidget(panel->colorListBtn, 46, 32);
417 WMMoveWidget(panel->colorListBtn, 144, 44);
418 WMSetButtonAction(panel->colorListBtn, modeButtonCallback, panel);
419 WMSetButtonImagePosition(panel->colorListBtn, WIPImageOnly);
420 WMSetButtonImage(panel->colorListBtn, scrPtr->colorListIcon);
421
422 /* Let's Group some of them together */
423 WMGroupButtons(panel->wheelBtn, panel->slidersBtn);
424 WMGroupButtons(panel->wheelBtn, panel->customPaletteBtn);
425 WMGroupButtons(panel->wheelBtn, panel->colorListBtn);
426
427 /* Widgets for the ColorWheel Panel */
428 panel->wheelFrm = WMCreateFrame(panel->win);
429 WMSetFrameRelief(panel->wheelFrm, WRFlat);
430 WMResizeWidget(panel->wheelFrm, PWIDTH - 8, PHEIGHT - 80 - 26);
431 WMMoveWidget(panel->wheelFrm, 5, 80);
432
433 panel->wheelView = W_CreateView(W_VIEW(panel->wheelFrm));
434 /* XXX Can we create a view ? */
435 W_ResizeView(panel->wheelView, colorWheelSize+4, colorWheelSize+4);
436 W_MoveView(panel->wheelView, 0, 0);
437
438 /* Create an event handler to handle expose/click events in ColorWheel */
439 WMCreateEventHandler(panel->wheelView,
440 ButtonPressMask|ButtonReleaseMask|EnterWindowMask|
441 LeaveWindowMask|ButtonMotionMask, wheelHandleActionEvents, panel);
442
443 WMCreateEventHandler(panel->wheelView, ExposureMask, wheelHandleEvents,
444 panel);
445
446 panel->wheelBrightnessS = WMCreateSlider(panel->wheelFrm);
447 WMResizeWidget(panel->wheelBrightnessS, 16, 153);
448 WMMoveWidget(panel->wheelBrightnessS, 5+colorWheelSize+14, 1);
449 WMSetSliderMinValue(panel->wheelBrightnessS, 0);
450 WMSetSliderMaxValue(panel->wheelBrightnessS, 255);
451 WMSetSliderAction(panel->wheelBrightnessS, wheelBrightnessSliderCallback,
452 panel);
453 WMSetSliderKnobThickness(panel->wheelBrightnessS, knobThickness);
454
455
456 /* Widgets for the Slider Panels */
457 panel->slidersFrm = WMCreateFrame(panel->win);
458 WMSetFrameRelief(panel->slidersFrm, WRFlat);
459 WMResizeWidget(panel->slidersFrm, PWIDTH - 8, PHEIGHT - 80 - 26);
460 WMMoveWidget(panel->slidersFrm, 4, 80);
461
462 panel->seperatorFrm = WMCreateFrame(panel->slidersFrm);
463 WMSetFrameRelief(panel->seperatorFrm, WRPushed);
464 WMResizeWidget(panel->seperatorFrm, PWIDTH - 8, 2);
465 WMMoveWidget(panel->seperatorFrm, 0, 1);
466
467 panel->grayBtn = WMCreateCustomButton(panel->slidersFrm,
468 WBBStateLightMask|WBBStateChangeMask);
469 WMResizeWidget(panel->grayBtn, 46, 24);
470 WMMoveWidget(panel->grayBtn, 1, 8);
471 WMSetButtonAction(panel->grayBtn, modeButtonCallback, panel);
472 WMSetButtonImagePosition(panel->grayBtn, WIPImageOnly);
473 WMSetButtonImage(panel->grayBtn, scrPtr->grayIcon);
474
475 panel->rgbBtn = WMCreateCustomButton(panel->slidersFrm,
476 WBBStateLightMask|WBBStateChangeMask);
477 WMResizeWidget(panel->rgbBtn, 46, 24);
478 WMMoveWidget(panel->rgbBtn, 47, 8);
479 WMSetButtonAction(panel->rgbBtn, modeButtonCallback, panel);
480 WMSetButtonImagePosition(panel->rgbBtn, WIPImageOnly);
481 WMSetButtonImage(panel->rgbBtn, scrPtr->rgbIcon);
482
483 panel->cmykBtn = WMCreateCustomButton(panel->slidersFrm,
484 WBBStateLightMask|WBBStateChangeMask);
485 WMResizeWidget(panel->cmykBtn, 46, 24);
486 WMMoveWidget(panel->cmykBtn, 93, 8);
487 WMSetButtonAction(panel->cmykBtn, modeButtonCallback, panel);
488 WMSetButtonImagePosition(panel->cmykBtn, WIPImageOnly);
489 WMSetButtonImage(panel->cmykBtn, scrPtr->cmykIcon);
490
491 panel->hsbBtn = WMCreateCustomButton(panel->slidersFrm,
492 WBBStateLightMask|WBBStateChangeMask);
493 WMResizeWidget(panel->hsbBtn, 46, 24);
494 WMMoveWidget(panel->hsbBtn, 139, 8);
495 WMSetButtonAction(panel->hsbBtn, modeButtonCallback, panel);
496 WMSetButtonImagePosition(panel->hsbBtn, WIPImageOnly);
497 WMSetButtonImage(panel->hsbBtn, scrPtr->hsbIcon);
498
499 /* Let's Group the Slider Panel Buttons Together */
500 WMGroupButtons(panel->grayBtn, panel->rgbBtn);
501 WMGroupButtons(panel->grayBtn, panel->cmykBtn);
502 WMGroupButtons(panel->grayBtn, panel->hsbBtn);
503
504 textcolor = WMDarkGrayColor(scrPtr);
505
506 /* Widgets for GrayScale Panel */
507 panel->grayFrm = WMCreateFrame(panel->slidersFrm);
508 WMSetFrameRelief(panel->grayFrm, WRFlat);
509 WMResizeWidget(panel->grayFrm, PWIDTH - 8, PHEIGHT - 80 - 26 - 32);
510 WMMoveWidget(panel->grayFrm, 0, 34);
511
512 panel->grayMinL = WMCreateLabel(panel->grayFrm);
513 WMResizeWidget(panel->grayMinL, 20, 10);
514 WMMoveWidget(panel->grayMinL, 2, 2);
515 WMSetLabelText(panel->grayMinL, "0");
516 WMSetLabelTextAlignment(panel->grayMinL, WALeft);
517 WMSetLabelTextColor(panel->grayMinL, textcolor);
518 WMSetLabelFont(panel->grayMinL, panel->font8);
519
520 panel->grayMaxL = WMCreateLabel(panel->grayFrm);
521 WMResizeWidget(panel->grayMaxL, 40, 10);
522 WMMoveWidget(panel->grayMaxL, 104, 2);
523 WMSetLabelText(panel->grayMaxL, "100");
524 WMSetLabelTextAlignment(panel->grayMaxL, WARight);
525 WMSetLabelTextColor(panel->grayMaxL, textcolor);
526 WMSetLabelFont(panel->grayMaxL, panel->font8);
527
528 panel->grayBrightnessS = WMCreateSlider(panel->grayFrm);
529 WMResizeWidget(panel->grayBrightnessS, 141, 16);
530 WMMoveWidget(panel->grayBrightnessS, 2, 14);
531 WMSetSliderMinValue(panel->grayBrightnessS, 0);
532 WMSetSliderMaxValue(panel->grayBrightnessS, 100);
533 WMSetSliderKnobThickness(panel->grayBrightnessS, knobThickness);
534 WMSetSliderAction(panel->grayBrightnessS, grayBrightnessSliderCallback,
535 panel);
536
537 from.red = 0;
538 from.green = 0;
539 from.blue = 0;
540
541 to.red = 255;
542 to.green = 255;
543 to.blue = 255;
544
545 image = RRenderGradient(141, 16, &from, &to, RGRD_HORIZONTAL);
546 pixmap = WMCreatePixmapFromRImage(scrPtr, image, 0);
547 RDestroyImage(image);
548 W_PaintText(W_VIEW(panel->grayBrightnessS), pixmap->pixmap,
549 panel->font12, 2, 0, 100, WALeft, WMColorGC(scrPtr->white),
550 False, "Brightness", strlen("Brightness"));
551 WMSetSliderImage(panel->grayBrightnessS, pixmap);
552 WMReleasePixmap(pixmap);
553
554 panel->grayBrightnessT = WMCreateTextField(panel->grayFrm);
555 WMResizeWidget(panel->grayBrightnessT, 40, 18);
556 WMMoveWidget(panel->grayBrightnessT, 146, 13);
557 WMSetTextFieldAlignment(panel->grayBrightnessT, WALeft);
558 WMAddNotificationObserver(grayBrightnessTextFieldCallback, panel,
559 WMTextDidEndEditingNotification, panel->grayBrightnessT);
560
561 image = RCreateImage(13,13,False);
562 for (i=0; i < 7; i++) {
563 for (x=0; x < 13; x++) {
564 for (y=0; y < 13; y++) {
565 image->data[0][y*13+x] = 255/6*i;
566 image->data[1][y*13+x] = 255/6*i;
567 image->data[2][y*13+x] = 255/6*i;
568 }
569 }
570 panel->grayPresetBtn[i] = WMCreateCommandButton(panel->grayFrm);
571 WMResizeWidget(panel->grayPresetBtn[i], 20, 24);
572 WMMoveWidget(panel->grayPresetBtn[i], 2+(i*20), 34);
573 WMSetButtonAction(panel->grayPresetBtn[i],
574 grayPresetButtonCallback, panel);
575 pixmap = WMCreatePixmapFromRImage(scrPtr, image, 0);
576 WMSetButtonImage(panel->grayPresetBtn[i], pixmap);
577 WMSetButtonImagePosition(panel->grayPresetBtn[i], WIPImageOnly);
578 WMReleasePixmap(pixmap);
579 }
580 RDestroyImage(image);
581 /* End of GrayScale Panel */
582
583 /* Widgets for RGB Panel */
584 panel->rgbFrm = WMCreateFrame(panel->slidersFrm);
585 WMSetFrameRelief(panel->rgbFrm, WRFlat);
586 WMResizeWidget(panel->rgbFrm, PWIDTH - 8, PHEIGHT - 80 - 26 - 32);
587 WMMoveWidget(panel->rgbFrm, 0, 34);
588
589 panel->rgbMinL = WMCreateLabel(panel->rgbFrm);
590 WMResizeWidget(panel->rgbMinL, 20, 10);
591 WMMoveWidget(panel->rgbMinL, 2, 2);
592 WMSetLabelText(panel->rgbMinL, "0");
593 WMSetLabelTextAlignment(panel->rgbMinL, WALeft);
594 WMSetLabelTextColor(panel->rgbMinL, textcolor);
595 WMSetLabelFont(panel->rgbMinL, panel->font8);
596
597 panel->rgbMaxL = WMCreateLabel(panel->rgbFrm);
598 WMResizeWidget(panel->rgbMaxL, 40, 10);
599 WMMoveWidget(panel->rgbMaxL, 104, 2);
600 WMSetLabelText(panel->rgbMaxL, "255");
601 WMSetLabelTextAlignment(panel->rgbMaxL, WARight);
602 WMSetLabelTextColor(panel->rgbMaxL, textcolor);
603 WMSetLabelFont(panel->rgbMaxL, panel->font8);
604
605 panel->rgbRedS = WMCreateSlider(panel->rgbFrm);
606 WMResizeWidget(panel->rgbRedS, 141, 16);
607 WMMoveWidget(panel->rgbRedS, 2, 14);
608 WMSetSliderMinValue(panel->rgbRedS, 0);
609 WMSetSliderMaxValue(panel->rgbRedS, 255);
610 WMSetSliderKnobThickness(panel->rgbRedS, knobThickness);
611 WMSetSliderAction(panel->rgbRedS, rgbSliderCallback, panel);
612
613 to.red = 255;
614 to.green = 0;
615 to.blue = 0;
616
617 image = RRenderGradient(141, 16, &from, &to, RGRD_HORIZONTAL);
618 pixmap = WMCreatePixmapFromRImage(scrPtr, image, 0);
619 W_PaintText(W_VIEW(panel->rgbRedS), pixmap->pixmap, panel->font12,
620 2, 0, 100, WALeft, WMColorGC(scrPtr->white), False, "Red",
621 strlen("Red"));
622 RDestroyImage(image);
623 WMSetSliderImage(panel->rgbRedS, pixmap);
624 WMReleasePixmap(pixmap);
625
626 panel->rgbRedT = WMCreateTextField(panel->rgbFrm);
627 WMResizeWidget(panel->rgbRedT, 40, 18);
628 WMMoveWidget(panel->rgbRedT, 146, 13);
629 WMSetTextFieldAlignment(panel->rgbRedT, WALeft);
630 WMAddNotificationObserver(rgbTextFieldCallback, panel,
631 WMTextDidEndEditingNotification, panel->rgbRedT);
632
633
634 panel->rgbGreenS = WMCreateSlider(panel->rgbFrm);
635 WMResizeWidget(panel->rgbGreenS, 141, 16);
636 WMMoveWidget(panel->rgbGreenS, 2, 36);
637 WMSetSliderMinValue(panel->rgbGreenS, 0);
638 WMSetSliderMaxValue(panel->rgbGreenS, 255);
639 WMSetSliderKnobThickness(panel->rgbGreenS, knobThickness);
640 WMSetSliderAction(panel->rgbGreenS, rgbSliderCallback, panel);
641
642 to.red = 0;
643 to.green = 255;
644 to.blue = 0;
645
646 image = RRenderGradient(141, 16, &from, &to, RGRD_HORIZONTAL);
647 pixmap = WMCreatePixmapFromRImage(scrPtr, image, 0);
648 W_PaintText(W_VIEW(panel->rgbGreenS), pixmap->pixmap, panel->font12,
649 2, 0, 100, WALeft, WMColorGC(scrPtr->white), False, "Green",
650 strlen("Green"));
651 RDestroyImage(image);
652 WMSetSliderImage(panel->rgbGreenS, pixmap);
653 WMReleasePixmap(pixmap);
654
655 panel->rgbGreenT = WMCreateTextField(panel->rgbFrm);
656 WMResizeWidget(panel->rgbGreenT, 40, 18);
657 WMMoveWidget(panel->rgbGreenT, 146, 35);
658 WMSetTextFieldAlignment(panel->rgbGreenT, WALeft);
659 WMAddNotificationObserver(rgbTextFieldCallback, panel,
660 WMTextDidEndEditingNotification, panel->rgbGreenT);
661
662
663 panel->rgbBlueS = WMCreateSlider(panel->rgbFrm);
664 WMResizeWidget(panel->rgbBlueS, 141, 16);
665 WMMoveWidget(panel->rgbBlueS, 2, 58);
666 WMSetSliderMinValue(panel->rgbBlueS, 0);
667 WMSetSliderMaxValue(panel->rgbBlueS, 255);
668 WMSetSliderKnobThickness(panel->rgbBlueS, knobThickness);
669 WMSetSliderAction(panel->rgbBlueS, rgbSliderCallback, panel);
670
671 to.red = 0;
672 to.green = 0;
673 to.blue = 255;
674
675 image = RRenderGradient(141, 16, &from, &to, RGRD_HORIZONTAL);
676 pixmap = WMCreatePixmapFromRImage(scrPtr, image, 0);
677 W_PaintText(W_VIEW(panel->rgbBlueS), pixmap->pixmap, panel->font12,
678 2, 0, 100, WALeft, WMColorGC(scrPtr->white), False, "Blue",
679 strlen("Blue"));
680 RDestroyImage(image);
681 WMSetSliderImage(panel->rgbBlueS, pixmap);
682 WMReleasePixmap(pixmap);
683
684 panel->rgbBlueT = WMCreateTextField(panel->rgbFrm);
685 WMResizeWidget(panel->rgbBlueT, 40, 18);
686 WMMoveWidget(panel->rgbBlueT, 146, 57);
687 WMSetTextFieldAlignment(panel->rgbBlueT, WALeft);
688 WMAddNotificationObserver(rgbTextFieldCallback, panel,
689 WMTextDidEndEditingNotification, panel->rgbBlueT);
690 /* End of RGB Panel */
691
692 /* Widgets for CMYK Panel */
693 panel->cmykFrm = WMCreateFrame(panel->slidersFrm);
694 WMSetFrameRelief(panel->cmykFrm, WRFlat);
695 WMResizeWidget(panel->cmykFrm, PWIDTH - 8, PHEIGHT - 80 - 26 - 32);
696 WMMoveWidget(panel->cmykFrm, 0, 34);
697
698 panel->cmykMinL = WMCreateLabel(panel->cmykFrm);
699 WMResizeWidget(panel->cmykMinL, 20, 10);
700 WMMoveWidget(panel->cmykMinL, 2, 2);
701 WMSetLabelText(panel->cmykMinL, "0");
702 WMSetLabelTextAlignment(panel->cmykMinL, WALeft);
703 WMSetLabelTextColor(panel->cmykMinL, textcolor);
704 WMSetLabelFont(panel->cmykMinL, panel->font8);
705
706 panel->cmykMaxL = WMCreateLabel(panel->cmykFrm);
707 WMResizeWidget(panel->cmykMaxL, 40, 10);
708 WMMoveWidget(panel->cmykMaxL, 104, 2);
709 WMSetLabelText(panel->cmykMaxL, "100");
710 WMSetLabelTextAlignment(panel->cmykMaxL, WARight);
711 WMSetLabelTextColor(panel->cmykMaxL, textcolor);
712 WMSetLabelFont(panel->cmykMaxL, panel->font8);
713
714 panel->cmykCyanS = WMCreateSlider(panel->cmykFrm);
715 WMResizeWidget(panel->cmykCyanS, 141, 16);
716 WMMoveWidget(panel->cmykCyanS, 2, 14);
717 WMSetSliderMinValue(panel->cmykCyanS, 0);
718 WMSetSliderMaxValue(panel->cmykCyanS, 100);
719 WMSetSliderKnobThickness(panel->cmykCyanS, knobThickness);
720 WMSetSliderAction(panel->cmykCyanS, cmykSliderCallback, panel);
721
722 from.red = 255;
723 from.green = 255;
724 from.blue = 255;
725
726 to.red = 0;
727 to.green = 255;
728 to.blue = 255;
729
730 image = RRenderGradient(141, 16, &from, &to, RGRD_HORIZONTAL);
731 pixmap = WMCreatePixmapFromRImage(scrPtr, image, 0);
732 W_PaintText(W_VIEW(panel->cmykCyanS), pixmap->pixmap, panel->font12,
733 2, 0, 100, WALeft, WMColorGC(scrPtr->black), False, "Cyan",
734 strlen("Cyan"));
735 RDestroyImage(image);
736 WMSetSliderImage(panel->cmykCyanS, pixmap);
737 WMReleasePixmap(pixmap);
738
739 panel->cmykCyanT = WMCreateTextField(panel->cmykFrm);
740 WMResizeWidget(panel->cmykCyanT, 40, 18);
741 WMMoveWidget(panel->cmykCyanT, 146, 13);
742 WMSetTextFieldAlignment(panel->cmykCyanT, WALeft);
743 WMAddNotificationObserver(cmykTextFieldCallback, panel,
744 WMTextDidEndEditingNotification, panel->cmykCyanT);
745
746
747 panel->cmykMagentaS = WMCreateSlider(panel->cmykFrm);
748 WMResizeWidget(panel->cmykMagentaS, 141, 16);
749 WMMoveWidget(panel->cmykMagentaS, 2, 36);
750 WMSetSliderMinValue(panel->cmykMagentaS, 0);
751 WMSetSliderMaxValue(panel->cmykMagentaS, 100);
752 WMSetSliderKnobThickness(panel->cmykMagentaS, knobThickness);
753 WMSetSliderAction(panel->cmykMagentaS, cmykSliderCallback, panel);
754
755 to.red = 255;
756 to.green = 0;
757 to.blue = 255;
758
759 image = RRenderGradient(141, 16, &from, &to, RGRD_HORIZONTAL);
760 pixmap = WMCreatePixmapFromRImage(scrPtr, image, 0);
761 W_PaintText(W_VIEW(panel->cmykMagentaS), pixmap->pixmap, panel->font12,
762 2, 0, 100, WALeft, WMColorGC(scrPtr->black), False, "Magenta",
763 strlen("Magenta"));
764 RDestroyImage(image);
765 WMSetSliderImage(panel->cmykMagentaS, pixmap);
766 WMReleasePixmap(pixmap);
767
768 panel->cmykMagentaT = WMCreateTextField(panel->cmykFrm);
769 WMResizeWidget(panel->cmykMagentaT, 40, 18);
770 WMMoveWidget(panel->cmykMagentaT, 146, 35);
771 WMSetTextFieldAlignment(panel->cmykMagentaT, WALeft);
772 WMAddNotificationObserver(cmykTextFieldCallback, panel,
773 WMTextDidEndEditingNotification, panel->cmykMagentaT);
774
775
776 panel->cmykYellowS = WMCreateSlider(panel->cmykFrm);
777 WMResizeWidget(panel->cmykYellowS, 141, 16);
778 WMMoveWidget(panel->cmykYellowS, 2, 58);
779 WMSetSliderMinValue(panel->cmykYellowS, 0);
780 WMSetSliderMaxValue(panel->cmykYellowS, 100);
781 WMSetSliderKnobThickness(panel->cmykYellowS, knobThickness);
782 WMSetSliderAction(panel->cmykYellowS, cmykSliderCallback, panel);
783
784 to.red = 255;
785 to.green = 255;
786 to.blue = 0;
787
788 image = RRenderGradient(141, 16, &from, &to, RGRD_HORIZONTAL);
789 pixmap = WMCreatePixmapFromRImage(scrPtr, image, 0);
790 W_PaintText(W_VIEW(panel->cmykYellowS), pixmap->pixmap, panel->font12,
791 2, 0, 100, WALeft, WMColorGC(scrPtr->black), False, "Yellow",
792 strlen("Yellow"));
793 RDestroyImage(image);
794 WMSetSliderImage(panel->cmykYellowS, pixmap);
795 WMReleasePixmap(pixmap);
796
797 panel->cmykYellowT = WMCreateTextField(panel->cmykFrm);
798 WMResizeWidget(panel->cmykYellowT, 40, 18);
799 WMMoveWidget(panel->cmykYellowT, 146, 57);
800 WMSetTextFieldAlignment(panel->cmykYellowT, WALeft);
801 WMAddNotificationObserver(cmykTextFieldCallback, panel,
802 WMTextDidEndEditingNotification, panel->cmykYellowT);
803
804
805 panel->cmykBlackS = WMCreateSlider(panel->cmykFrm);
806 WMResizeWidget(panel->cmykBlackS, 141, 16);
807 WMMoveWidget(panel->cmykBlackS, 2, 80);
808 WMSetSliderMinValue(panel->cmykBlackS, 0);
809 WMSetSliderMaxValue(panel->cmykBlackS, 100);
810 WMSetSliderValue(panel->cmykBlackS, 0);
811 WMSetSliderKnobThickness(panel->cmykBlackS, knobThickness);
812 WMSetSliderAction(panel->cmykBlackS, cmykSliderCallback, panel);
813
814 to.red = 0;
815 to.green = 0;
816 to.blue = 0;
817
818 image = RRenderGradient(141, 16, &from, &to, RGRD_HORIZONTAL);
819 pixmap = WMCreatePixmapFromRImage(scrPtr, image, 0);
820 W_PaintText(W_VIEW(panel->cmykBlackS), pixmap->pixmap, panel->font12,
821 2, 0, 100, WALeft, WMColorGC(scrPtr->black), False, "Black",
822 strlen("Black"));
823 RDestroyImage(image);
824 WMSetSliderImage(panel->cmykBlackS, pixmap);
825 WMReleasePixmap(pixmap);
826
827 panel->cmykBlackT = WMCreateTextField(panel->cmykFrm);
828 WMResizeWidget(panel->cmykBlackT, 40, 18);
829 WMMoveWidget(panel->cmykBlackT, 146, 79);
830 WMSetTextFieldAlignment(panel->cmykBlackT, WALeft);
831 WMAddNotificationObserver(cmykTextFieldCallback, panel,
832 WMTextDidEndEditingNotification, panel->cmykBlackT);
833 /* End of CMYK Panel */
834
835 /* Widgets for HSB Panel */
836 panel->hsbFrm = WMCreateFrame(panel->slidersFrm);
837 WMSetFrameRelief(panel->hsbFrm, WRFlat);
838 WMResizeWidget(panel->hsbFrm, PWIDTH - 8, PHEIGHT - 80 - 26 - 32);
839 WMMoveWidget(panel->hsbFrm, 0, 34);
840
841 panel->hsbHueS = WMCreateSlider(panel->hsbFrm);
842 WMResizeWidget(panel->hsbHueS, 141, 16);
843 WMMoveWidget(panel->hsbHueS, 2, 14);
844 WMSetSliderMinValue(panel->hsbHueS, 0);
845 WMSetSliderMaxValue(panel->hsbHueS, 359);
846 WMSetSliderKnobThickness(panel->hsbHueS, knobThickness);
847 WMSetSliderAction(panel->hsbHueS, hsbSliderCallback, panel);
848
849 panel->hsbHueT = WMCreateTextField(panel->hsbFrm);
850 WMResizeWidget(panel->hsbHueT, 40, 18);
851 WMMoveWidget(panel->hsbHueT, 146, 13);
852 WMSetTextFieldAlignment(panel->hsbHueT, WALeft);
853 WMAddNotificationObserver(hsbTextFieldCallback, panel,
854 WMTextDidEndEditingNotification, panel->hsbHueT);
855
856
857 panel->hsbSaturationS = WMCreateSlider(panel->hsbFrm);
858 WMResizeWidget(panel->hsbSaturationS, 141, 16);
859 WMMoveWidget(panel->hsbSaturationS, 2, 36);
860 WMSetSliderMinValue(panel->hsbSaturationS, 0);
861 WMSetSliderMaxValue(panel->hsbSaturationS, 100);
862 WMSetSliderKnobThickness(panel->hsbSaturationS, knobThickness);
863 WMSetSliderAction(panel->hsbSaturationS, hsbSliderCallback, panel);
864
865 panel->hsbSaturationT = WMCreateTextField(panel->hsbFrm);
866 WMResizeWidget(panel->hsbSaturationT, 40, 18);
867 WMMoveWidget(panel->hsbSaturationT, 146, 35);
868 WMSetTextFieldAlignment(panel->hsbSaturationT, WALeft);
869 WMAddNotificationObserver(hsbTextFieldCallback, panel,
870 WMTextDidEndEditingNotification, panel->hsbSaturationT);
871
872
873 panel->hsbBrightnessS = WMCreateSlider(panel->hsbFrm);
874 WMResizeWidget(panel->hsbBrightnessS, 141, 16);
875 WMMoveWidget(panel->hsbBrightnessS, 2, 58);
876 WMSetSliderMinValue(panel->hsbBrightnessS, 0);
877 WMSetSliderMaxValue(panel->hsbBrightnessS, 100);
878 WMSetSliderKnobThickness(panel->hsbBrightnessS, knobThickness);
879 WMSetSliderAction(panel->hsbBrightnessS, hsbSliderCallback, panel);
880
881 panel->hsbBrightnessT = WMCreateTextField(panel->hsbFrm);
882 WMResizeWidget(panel->hsbBrightnessT, 40, 18);
883 WMMoveWidget(panel->hsbBrightnessT, 146, 57);
884 WMSetTextFieldAlignment(panel->hsbBrightnessT, WALeft);
885 WMAddNotificationObserver(hsbTextFieldCallback, panel,
886 WMTextDidEndEditingNotification, panel->hsbBrightnessT);
887 /* End of HSB Panel */
888
889
890 WMReleaseColor(textcolor);
891
892 /* Widgets for the CustomPalette Panel */
893 panel->customPaletteFrm = WMCreateFrame(panel->win);
894 WMSetFrameRelief(panel->customPaletteFrm, WRFlat);
895 WMResizeWidget(panel->customPaletteFrm, PWIDTH - 8, PHEIGHT - 80 - 26);
896 WMMoveWidget(panel->customPaletteFrm, 5, 80);
897
898 panel->customPaletteHistoryBtn = WMCreatePopUpButton(
899 panel->customPaletteFrm);
900 WMAddPopUpButtonItem(panel->customPaletteHistoryBtn, "Spectrum");
901 WMSetPopUpButtonSelectedItem(panel->customPaletteHistoryBtn,
902 WMGetPopUpButtonNumberOfItems(panel->customPaletteHistoryBtn)-1);
903 WMSetPopUpButtonAction(panel->customPaletteHistoryBtn,
904 customPaletteHistoryCallback, panel);
905 WMResizeWidget(panel->customPaletteHistoryBtn, PWIDTH - 8, 20);
906 WMMoveWidget(panel->customPaletteHistoryBtn, 0, 0);
907
908 panel->customPaletteContentFrm = WMCreateFrame(panel->customPaletteFrm);
909 WMSetFrameRelief(panel->customPaletteContentFrm, WRSunken);
910 WMResizeWidget(panel->customPaletteContentFrm, PWIDTH - 8, PHEIGHT - 156);
911 WMMoveWidget(panel->customPaletteContentFrm, 0, 23);
912
913 panel->customPaletteContentView = W_CreateView(
914 W_VIEW(panel->customPaletteContentFrm));
915 /* XXX Can we create a view ? */
916 W_ResizeView(panel->customPaletteContentView, customPaletteWidth,
917 customPaletteHeight);
918 W_MoveView(panel->customPaletteContentView, 2, 2);
919
920 /* Create event handler to handle expose/click events in CustomPalette */
921 WMCreateEventHandler(panel->customPaletteContentView,
922 ButtonPressMask|ButtonReleaseMask|EnterWindowMask|
923 LeaveWindowMask|ButtonMotionMask, customPaletteHandleActionEvents,
924 panel);
925
926 WMCreateEventHandler(panel->customPaletteContentView, ExposureMask,
927 customPaletteHandleEvents, panel);
928
929 panel->customPaletteMenuBtn = WMCreatePopUpButton(panel->customPaletteFrm);
930 WMSetPopUpButtonPullsDown(panel->customPaletteMenuBtn, 1);
931 WMSetPopUpButtonText(panel->customPaletteMenuBtn, "Palette");
932 WMSetPopUpButtonAction(panel->customPaletteMenuBtn,
933 customPaletteMenuCallback, panel);
934 WMResizeWidget(panel->customPaletteMenuBtn, PWIDTH - 8, 20);
935 WMMoveWidget(panel->customPaletteMenuBtn, 0, PHEIGHT - 130);
936
937 WMAddPopUpButtonItem(panel->customPaletteMenuBtn, "New from File...");
938 WMAddPopUpButtonItem(panel->customPaletteMenuBtn, "Rename...");
939 WMAddPopUpButtonItem(panel->customPaletteMenuBtn, "Remove");
940 WMAddPopUpButtonItem(panel->customPaletteMenuBtn, "Copy");
941 WMAddPopUpButtonItem(panel->customPaletteMenuBtn, "New from Clipboard");
942
943 WMSetPopUpButtonItemEnabled(panel->customPaletteMenuBtn, CPmenuRename, 0);
944 WMSetPopUpButtonItemEnabled(panel->customPaletteMenuBtn, CPmenuRemove, 0);
945 WMSetPopUpButtonItemEnabled(panel->customPaletteMenuBtn, CPmenuCopy, 0);
946 WMSetPopUpButtonItemEnabled(panel->customPaletteMenuBtn,
947 CPmenuNewFromClipboard, 0);
948
949 customRenderSpectrum(panel);
950 panel->currentPalette = 0;
951
952
953 /* Widgets for the ColorList Panel */
954 panel->colorListFrm = WMCreateFrame(panel->win);
955 WMSetFrameRelief(panel->colorListFrm, WRFlat);
956 WMResizeWidget(panel->colorListFrm, PWIDTH - 8, PHEIGHT - 80 - 26);
957 WMMoveWidget(panel->colorListFrm, 5, 80);
958
959 panel->colorListHistoryBtn = WMCreatePopUpButton(panel->colorListFrm);
960 WMAddPopUpButtonItem(panel->colorListHistoryBtn, "X11-Colors");
961 WMSetPopUpButtonSelectedItem(panel->colorListHistoryBtn,
962 WMGetPopUpButtonNumberOfItems(panel->colorListHistoryBtn)-1);
963 /* WMSetPopUpButtonAction(panel->colorListHistoryBtn,
964 * colorListHistoryCallback, panel); */
965 WMResizeWidget(panel->colorListHistoryBtn, PWIDTH - 8, 20);
966 WMMoveWidget(panel->colorListHistoryBtn, 0, 0);
967
968 panel->colorListContentLst = WMCreateList(panel->colorListFrm);
969 WMSetListAction(panel->colorListContentLst, colorListSelect, panel);
970 WMSetListUserDrawProc(panel->colorListContentLst, colorListPaintItem);
971 WMResizeWidget(panel->colorListContentLst, PWIDTH - 8, PHEIGHT - 156);
972 WMMoveWidget(panel->colorListContentLst, 0, 23);
973 WMHangData(panel->colorListContentLst, panel);
974
975 panel->colorListColorMenuBtn = WMCreatePopUpButton(panel->colorListFrm);
976 WMSetPopUpButtonPullsDown(panel->colorListColorMenuBtn, 1);
977 WMSetPopUpButtonText(panel->colorListColorMenuBtn, "Color");
978 WMSetPopUpButtonAction(panel->colorListColorMenuBtn,
979 colorListColorMenuCallback, panel);
980 WMResizeWidget(panel->colorListColorMenuBtn, (PWIDTH - 16)/2, 20);
981 WMMoveWidget(panel->colorListColorMenuBtn, 0, PHEIGHT - 130);
982
983 WMAddPopUpButtonItem(panel->colorListColorMenuBtn, "Add...");
984 WMAddPopUpButtonItem(panel->colorListColorMenuBtn, "Rename...");
985 WMAddPopUpButtonItem(panel->colorListColorMenuBtn, "Remove");
986
987 WMSetPopUpButtonItemEnabled(panel->colorListColorMenuBtn, CLmenuAdd, 0);
988 WMSetPopUpButtonItemEnabled(panel->colorListColorMenuBtn, CLmenuRename, 0);
989 WMSetPopUpButtonItemEnabled(panel->colorListColorMenuBtn, CLmenuRemove, 0);
990
991 panel->colorListListMenuBtn = WMCreatePopUpButton(panel->colorListFrm);
992 WMSetPopUpButtonPullsDown(panel->colorListListMenuBtn, 1);
993 WMSetPopUpButtonText(panel->colorListListMenuBtn, "List");
994 WMSetPopUpButtonAction(panel->colorListListMenuBtn,
995 colorListListMenuCallback, panel);
996 WMResizeWidget(panel->colorListListMenuBtn, (PWIDTH - 16)/2, 20);
997 WMMoveWidget(panel->colorListListMenuBtn, (PWIDTH - 16)/2 + 8,
998 PHEIGHT - 130);
999
1000 WMAddPopUpButtonItem(panel->colorListListMenuBtn, "New...");
1001 WMAddPopUpButtonItem(panel->colorListListMenuBtn, "Rename...");
1002 WMAddPopUpButtonItem(panel->colorListListMenuBtn, "Remove");
1003
1004 WMSetPopUpButtonItemEnabled(panel->colorListListMenuBtn, CLmenuRename, 0);
1005 WMSetPopUpButtonItemEnabled(panel->colorListListMenuBtn, CLmenuRemove, 0);
1006
1007 WMRealizeWidget(panel->win);
1008 WMMapSubwidgets(panel->win);
1009
1010 WMMapSubwidgets(panel->wheelFrm);
1011 WMMapSubwidgets(panel->slidersFrm);
1012 WMMapSubwidgets(panel->grayFrm);
1013 WMMapSubwidgets(panel->rgbFrm);
1014 WMMapSubwidgets(panel->cmykFrm);
1015 WMMapSubwidgets(panel->hsbFrm);
1016 WMMapSubwidgets(panel->customPaletteFrm);
1017 WMMapSubwidgets(panel->customPaletteContentFrm);
1018 WMMapSubwidgets(panel->colorListFrm);
1019
1020 readConfiguration(panel);
1021 readXColors(panel);
1022
1023 return panel;
1024 }
1025
1026
1027 WMColorPanel*
1028 WMGetColorPanel(WMScreen *scrPtr)
1029 {
1030 WMColorPanel *panel;
1031
1032 if (scrPtr->sharedColorPanel)
1033 return scrPtr->sharedColorPanel;
1034
1035 panel = makeColorPanel(scrPtr, "colorPanel");
1036
1037 scrPtr->sharedColorPanel = panel;
1038
1039 return panel;
1040 }
1041
1042
1043 void
1044 WMFreeColorPanel(WMColorPanel *panel)
1045 {
1046 W_Screen *scr = WMWidgetScreen(panel->win);
1047
1048 if (panel == scr->sharedColorPanel) {
1049 scr->sharedColorPanel = NULL;
1050 }
1051
1052 WMRemoveNotificationObserver(panel);
1053
1054 WMUnmapWidget(panel->win);
1055 WMDestroyWidget(panel->win);
1056
1057 /* fonts */
1058 if (panel->font8)
1059 WMReleaseFont(panel->font8);
1060 if (panel->font12)
1061 WMReleaseFont(panel->font12);
1062
1063 /* pixmaps */
1064 if (panel->wheelMtrx)
1065 wheelDestroyMatrix(panel->wheelMtrx);
1066 if (panel->wheelImg)
1067 XFreePixmap(scr->display, panel->wheelImg);
1068 if (panel->selectionImg)
1069 XFreePixmap(scr->display, panel->selectionImg);
1070 if (panel->selectionBackImg)
1071 XFreePixmap(scr->display, panel->selectionBackImg);
1072 if (panel->customPaletteImg)
1073 RDestroyImage(panel->customPaletteImg);
1074
1075 /* structs */
1076 if (panel->lastBrowseDir)
1077 free(panel->lastBrowseDir);
1078 if (panel->configurationPath)
1079 free(panel->configurationPath);
1080
1081 free(panel);
1082 }
1083
1084
1085 void
1086 WMCloseColorPanel(WMColorPanel *panel)
1087 {
1088 WMCloseWindow(panel->win);
1089 WMFreeColorPanel(panel);
1090 }
1091
1092
1093 void
1094 WMShowColorPanel(WMColorPanel *panel)
1095 {
1096 WMScreen *scr = WMWidgetScreen(panel->win);
1097 WMColor *white = WMWhiteColor(scr);
1098
1099 if (!panel->colorSet )
1100 WMSetColorPanelColor(panel, white);
1101 WMReleaseColor(white);
1102
1103 WMSetColorPanelPickerMode(panel, WMWheelModeColorPanel);
1104 wheelInit(panel);
1105
1106 WMMapWidget(panel->win);
1107 }
1108
1109
1110 static void
1111 closeWindowCallback(WMWidget *w, void *data)
1112 {
1113 W_ColorPanel *panel = (W_ColorPanel*)data;
1114
1115 WMCloseColorPanel(panel);
1116 /* WMUnmapWidget(panel->win); */
1117 }
1118
1119
1120 static void
1121 readConfiguration(W_ColorPanel *panel)
1122 {
1123 /* XXX Doesn't take care of "invalid" files */
1124
1125 DIR *dPtr;
1126 struct dirent *dp;
1127 struct stat stat_buf;
1128
1129
1130 if (stat(panel->configurationPath, &stat_buf)!=0) {
1131 if (mkdir(panel->configurationPath,
1132 S_IRWXU|S_IRGRP|S_IROTH|S_IXGRP|S_IXOTH)!=0) {
1133 wsyserror("ColorPanel could not create directory %s needed"
1134 " to store configurations", panel->configurationPath);
1135 WMSetPopUpButtonEnabled(panel->customPaletteMenuBtn, False);
1136 WMSetPopUpButtonEnabled(panel->colorListColorMenuBtn, False);
1137 WMSetPopUpButtonEnabled(panel->colorListListMenuBtn, False);
1138 WMRunAlertPanel(WMWidgetScreen(panel->win), panel->win,
1139 "File Error", "Could not create ColorPanel configuration"
1140 " directory", "OK", NULL, NULL);
1141 }
1142 return;
1143 }
1144
1145 dPtr = opendir(panel->configurationPath);
1146 while ((dp = readdir(dPtr)) != NULL) {
1147 if (dp->d_name[0] != '.')
1148 WMAddPopUpButtonItem(panel->customPaletteHistoryBtn, dp->d_name);
1149 }
1150 (void)closedir(dPtr);
1151 }
1152
1153
1154 static void
1155 readXColors(W_ColorPanel *panel)
1156 {
1157 struct stat stat_buf;
1158 FILE *rgbtxt;
1159 char line[MAX_LENGTH];
1160 int red, green, blue;
1161 char name[48];
1162 RColor *color;
1163 WMListItem *item;
1164
1165 if (stat(RGBTXT, &stat_buf) != 0) {
1166 wwarning("Cannot find file %s", RGBTXT);
1167 return;
1168 }
1169 else {
1170 rgbtxt = fopen(RGBTXT, "r");
1171 if (rgbtxt) {
1172 while (fgets(line, MAX_LENGTH, rgbtxt)) {
1173 if (sscanf(line, "%d%d%d %[^\n]", &red, &green, &blue, name)) {
1174 color = wmalloc(sizeof(RColor));
1175 color->red = (unsigned char)red;
1176 color->green = (unsigned char)green;
1177 color->blue = (unsigned char)blue;
1178 item = WMAddListItem(panel->colorListContentLst, name);
1179 item->clientData = (void *)color;
1180 }
1181 }
1182 fclose(rgbtxt);
1183 }
1184 else {
1185 wsyserror("Unable to open file %s for reading", RGBTXT);
1186 }
1187 }
1188 }
1189
1190
1191 void
1192 WMSetColorPanelPickerMode(WMColorPanel *panel, WMColorPanelMode mode)
1193 {
1194 W_Screen *scr = WMWidgetScreen(panel->win);
1195
1196 if (mode != WMWheelModeColorPanel) {
1197 WMUnmapWidget(panel->wheelFrm);
1198 if (panel->selectionBackImg) {
1199 XFreePixmap(WMWidgetScreen(panel->win)->display,
1200 panel->selectionBackImg);
1201 panel->selectionBackImg = None;
1202 }
1203 }
1204 if (mode != WMGrayModeColorPanel)
1205 WMUnmapWidget(panel->grayFrm);
1206 if (mode != WMRGBModeColorPanel)
1207 WMUnmapWidget(panel->rgbFrm);
1208 if (mode != WMCMYKModeColorPanel)
1209 WMUnmapWidget(panel->cmykFrm);
1210 if (mode != WMHSBModeColorPanel)
1211 WMUnmapWidget(panel->hsbFrm);
1212 if (mode != WMCustomPaletteModeColorPanel) {
1213 WMUnmapWidget(panel->customPaletteFrm);
1214 if (panel->selectionBackImg) {
1215 XFreePixmap(WMWidgetScreen(panel->win)->display,
1216 panel->selectionBackImg);
1217 panel->selectionBackImg = None;
1218 }
1219 }
1220 if (mode != WMColorListModeColorPanel)
1221 WMUnmapWidget(panel->colorListFrm);
1222 if ((mode != WMGrayModeColorPanel) && (mode != WMRGBModeColorPanel) &&
1223 (mode != WMCMYKModeColorPanel) && (mode != WMHSBModeColorPanel))
1224 WMUnmapWidget(panel->slidersFrm);
1225 else
1226 panel->slidersmode = mode;
1227
1228 if (mode == WMWheelModeColorPanel) {
1229 WMMapWidget(panel->wheelFrm);
1230 WMSetButtonSelected(panel->wheelBtn, True);
1231 if (panel->lastChanged != WMWheelModeColorPanel)
1232 wheelInit(panel);
1233 wheelRender(panel);
1234 wheelPaint(panel);
1235 } else if (mode == WMGrayModeColorPanel) {
1236 WMMapWidget(panel->slidersFrm);
1237 WMSetButtonSelected(panel->slidersBtn, True);
1238 WMMapWidget(panel->grayFrm);
1239 WMSetButtonSelected(panel->grayBtn, True);
1240 WMSetButtonImage(panel->slidersBtn, scr->grayIcon);
1241 if (panel->lastChanged != WMGrayModeColorPanel)
1242 grayInit(panel);
1243 } else if (mode == WMRGBModeColorPanel) {
1244 WMMapWidget(panel->slidersFrm);
1245 WMSetButtonSelected(panel->slidersBtn, True);
1246 WMMapWidget(panel->rgbFrm);
1247 WMSetButtonSelected(panel->rgbBtn, True);
1248 WMSetButtonImage(panel->slidersBtn, scr->rgbIcon);
1249 if (panel->lastChanged != WMRGBModeColorPanel)
1250 rgbInit(panel);
1251 } else if (mode == WMCMYKModeColorPanel) {
1252 WMMapWidget(panel->slidersFrm);
1253 WMSetButtonSelected(panel->slidersBtn, True);
1254 WMMapWidget(panel->cmykFrm);
1255 WMSetButtonSelected(panel->cmykBtn, True);
1256 WMSetButtonImage(panel->slidersBtn, scr->cmykIcon);
1257 if (panel->lastChanged != WMCMYKModeColorPanel)
1258 cmykInit(panel);
1259 } else if (mode == WMHSBModeColorPanel) {
1260 WMMapWidget(panel->slidersFrm);
1261 WMSetButtonSelected(panel->slidersBtn, True);
1262 WMMapWidget(panel->hsbFrm);
1263 WMSetButtonSelected(panel->hsbBtn, True);
1264 WMSetButtonImage(panel->slidersBtn, scr->hsbIcon);
1265 if (panel->lastChanged != WMHSBModeColorPanel)
1266 hsbInit(panel);
1267 } else if (mode == WMCustomPaletteModeColorPanel) {
1268 WMMapWidget(panel->customPaletteFrm);
1269 WMSetButtonSelected(panel->customPaletteBtn, True);
1270 customSetPalette(panel);
1271 } else if (mode == WMColorListModeColorPanel) {
1272 WMMapWidget(panel->colorListFrm);
1273 WMSetButtonSelected(panel->colorListBtn, True);
1274 }
1275
1276
1277 panel->mode = mode;
1278 }
1279
1280 void
1281 WMSetColorPanelColor(WMColorPanel *panel, WMColor *color)
1282 {
1283 WMScreen *scr = WMWidgetScreen(panel->win);
1284 RHSVColor hsvcolor;
1285 RColor intcolor;
1286 GC bgc = WMColorGC(scr->black);
1287 GC wgc = WMColorGC(scr->white);
1288 int originalHue;
1289
1290 WMSetColorWellColor(panel->colorWell, color);
1291
1292 intcolor.red = color->color.red >> 8;
1293 intcolor.green = color->color.green >> 8;
1294 intcolor.blue = color->color.blue >> 8;
1295
1296 panel->color = intcolor;
1297 panel->colorSet = True;
1298
1299 /* If color was set by HSB-Panel do not convert back to hsv */
1300 if (panel->lastChanged != WMHSBModeColorPanel) {
1301
1302 /* if color is black, hue is undetermined, so it must be restored */
1303 if ((panel->color.red == 0) &&
1304 (panel->color.green == 0) &&
1305 (panel->color.blue == 0) &&
1306 (panel->hsvcolor.hue <= 359))
1307 {
1308 originalHue = panel->hsvcolor.hue;
1309 RRGBtoHSV(&panel->color, &panel->hsvcolor);
1310 panel->hsvcolor.hue = originalHue;
1311 } else {
1312 RRGBtoHSV(&panel->color, &panel->hsvcolor);
1313 }
1314 }
1315
1316 panel->wheelMtrx = wheelInitMatrix(panel); /* Needs to be done After Color is set */
1317
1318 /* Maybe put this in a sub-function ... Initialising selected images */
1319 RRGBtoHSV(&intcolor, &hsvcolor);
1320 panel->colx = 2 + rint((colorWheelSize / 2.0) * (1 +
1321 (hsvcolor.saturation/255.0) * cos( hsvcolor.hue*M_PI/180.0)));
1322 panel->coly = 2 + rint((colorWheelSize / 2.0) * (1 +
1323 (hsvcolor.saturation/255.0) * sin(-hsvcolor.hue*M_PI/180.0)));
1324 wheelUpdateBrightnessGradientFromHSV(panel, hsvcolor);
1325 WMSetSliderValue(panel->wheelBrightnessS, 255 - hsvcolor.value);
1326
1327 panel->selectionImg = XCreatePixmap(scr->display,
1328 W_VIEW(panel->wheelFrm)->window, 4, 4, scr->depth);
1329 XFillRectangle(scr->display, panel->selectionImg, bgc, 0, 0, 4, 4);
1330 XFillRectangle(scr->display, panel->selectionImg, wgc, 1, 1, 2, 2);
1331 /* End of initialisation section */
1332
1333 panel->palx = customPaletteWidth/2;
1334 panel->paly = customPaletteHeight/2;
1335
1336 WMSetColorPanelPickerMode(panel, panel->mode);
1337 }
1338
1339
1340 static void
1341 updateSwatch(WMColorPanel *panel, RColor color)
1342 {
1343 WMScreen *scr = WMWidgetScreen(panel->win);
1344 WMColor *wellcolor;
1345 int originalHue;
1346
1347 wellcolor = WMCreateRGBColor(scr, color.red << 8, color.green << 8,
1348 color.blue << 8, True);
1349
1350 WMSetColorWellColor(panel->colorWell, wellcolor);
1351 WMReleaseColor(wellcolor);
1352
1353 panel->color = color;
1354
1355 /* If color was set by HSB-Panel do not convert back to hsv */
1356 if (panel->lastChanged != WMHSBModeColorPanel) {
1357
1358 /* if color is black, hue is undetermined, so it must be restored */
1359 if ((panel->color.red == 0) &&
1360 (panel->color.green == 0) &&
1361 (panel->color.blue == 0) &&
1362 (panel->hsvcolor.hue <= 359))
1363 {
1364 originalHue = panel->hsvcolor.hue;
1365 RRGBtoHSV(&panel->color, &panel->hsvcolor);
1366 panel->hsvcolor.hue = originalHue;
1367 } else {
1368 RRGBtoHSV(&panel->color, &panel->hsvcolor);
1369 }
1370 }
1371
1372 if (panel->action && (!panel->flags.dragging || panel->flags.continuous)) {
1373 (*panel->action)(panel, panel->clientData);
1374 }
1375 }
1376
1377 static void
1378 modeButtonCallback(WMWidget *w, void *data)
1379 {
1380 W_ColorPanel *panel = (W_ColorPanel*)(data);
1381
1382 if (w == panel->wheelBtn)
1383 WMSetColorPanelPickerMode(panel, WMWheelModeColorPanel);
1384 else if (w == panel->slidersBtn)
1385 WMSetColorPanelPickerMode(panel, panel->slidersmode);
1386 else if (w == panel->customPaletteBtn)
1387 WMSetColorPanelPickerMode(panel, WMCustomPaletteModeColorPanel);
1388 else if (w == panel->colorListBtn)
1389 WMSetColorPanelPickerMode(panel, WMColorListModeColorPanel);
1390 else if (w == panel->grayBtn)
1391 WMSetColorPanelPickerMode(panel, WMGrayModeColorPanel);
1392 else if (w == panel->rgbBtn)
1393 WMSetColorPanelPickerMode(panel, WMRGBModeColorPanel);
1394 else if (w == panel->cmykBtn)
1395 WMSetColorPanelPickerMode(panel, WMCMYKModeColorPanel);
1396 else if (w == panel->hsbBtn)
1397 WMSetColorPanelPickerMode(panel, WMHSBModeColorPanel);
1398 }
1399
1400
1401 /****************** Magnifying Cursor Functions *******************/
1402 static Pixmap
1403 magnifyGetImage(WMScreen *scr, int x, int y)
1404 {
1405 XImage *image;
1406 Pixmap pixmap;
1407 int x0, y0, w0, h0;
1408 int displayWidth = DisplayWidth(scr->display, scr->screen);
1409 int displayHeight = DisplayHeight(scr->display, scr->screen);
1410 const int half_mask_width = (Cursor_mask_width +1)/2;
1411 const int half_mask_height = (Cursor_mask_height +1)/2;
1412
1413 /* Coordinate correction for back pixmap
1414 * if magnifying glass is at screen-borders */
1415 x0 = 0; y0 = 0; w0 = Cursor_mask_width; h0 = Cursor_mask_height;
1416
1417 if (x < half_mask_width) {
1418 if (x < 0) x = 0;
1419 x0 = half_mask_width - x;
1420 w0 = Cursor_mask_width - x0;
1421 }
1422
1423 if (x > displayWidth - half_mask_width) {
1424 if (x > displayWidth) x = displayWidth;
1425 w0 = Cursor_mask_width - (half_mask_width - (displayWidth - x));
1426 }
1427
1428 if (y < half_mask_height) {
1429 if (y < 0) y = 0;
1430 y0 = half_mask_height - y;
1431 h0 = Cursor_mask_height - y0;
1432 }
1433
1434 if (y > displayHeight - half_mask_height) {
1435 if (y > displayHeight) y = displayHeight;
1436 h0 = Cursor_mask_height - (half_mask_height - (displayHeight - y));
1437 }
1438 /* end of coordinate correction */
1439
1440 image = XGetImage(scr->display, scr->rootWin, x + x0 - Cursor_x_hot,
1441 y + y0 - Cursor_y_hot, w0, h0, AllPlanes, ZPixmap);
1442
1443 pixmap = XCreatePixmap(scr->display, W_DRAWABLE(scr), Cursor_mask_width,
1444 Cursor_mask_height, scr->depth);
1445 XPutImage(scr->display, pixmap, scr->copyGC, image, 0, 0, x0, y0, w0, h0);
1446 XDestroyImage(image);
1447
1448 return pixmap;
1449 }
1450
1451
1452 static Pixmap
1453 magnifyGetStorePixmap(WMColorPanel *panel, int x1, int y1, int x2, int y2)
1454 {
1455 /*
1456 * (x1, y1) = topleft corner of existing rectangle
1457 * (x2, y2) = topleft corner of new position
1458 */
1459
1460 W_Screen *scr = WMWidgetScreen(panel->win);
1461 Pixmap pixmap;
1462 int xa, ya, xb, yb, w, h;
1463
1464 if (x1 < x2) {
1465 xa = x2 - x1;
1466 xb = 0;
1467 } else {
1468 xa = 0;
1469 xb = x1 - x2;
1470 }
1471
1472 if (y1 < y2) {
1473 ya = y2 - y1;
1474 yb = 0;
1475 } else {
1476 ya = 0;
1477 yb = y1 - y2;
1478 }
1479
1480 w = Cursor_mask_width - abs(x1-x2);
1481 h = Cursor_mask_height - abs(y1-y2);
1482
1483 /* Get pixmap from screen */
1484 pixmap = magnifyGetImage(scr, x2, y2);
1485
1486 /* Copy previously stored pixmap on covered part of above pixmap */
1487 if (panel->magnifyGlass->valid)
1488 {
1489 XCopyArea(scr->display, panel->magnifyGlass->pixmap, pixmap,
1490 scr->copyGC, xa, ya, w, h, xb, yb);
1491
1492 /* Free it, so we can reuse it */
1493 XFreePixmap(scr->display, panel->magnifyGlass->pixmap);
1494 }
1495
1496 return pixmap;
1497 }
1498
1499
1500 static Pixmap
1501 magnifyCreatePixmap(WMColorPanel *panel)
1502 {
1503 W_Screen *scr = WMWidgetScreen(panel->win);
1504 int u, v;
1505 int i, j;
1506 int ofs;
1507 Pixmap magPix;
1508 Pixmap backPix;
1509 RImage *pixelImg;
1510 const int half_mask_width = Cursor_mask_width/2;
1511 const int half_mask_height = Cursor_mask_height/2;
1512
1513
1514 /*
1515 * Get image
1516 */
1517
1518 /* Rectangle that's going to be the background */
1519 backPix = XCreatePixmap(scr->display, W_DRAWABLE(scr), Cursor_mask_width,
1520 Cursor_mask_height , scr->depth);
1521 XCopyArea(scr->display, panel->magnifyGlass->pixmap, backPix, scr->copyGC,
1522 0, 0, Cursor_mask_width, Cursor_mask_height, 0, 0);
1523
1524 /*
1525 * Magnify image
1526 */
1527
1528 magPix = XCreatePixmap(scr->display, W_DRAWABLE(scr), Cursor_mask_width +2,
1529 Cursor_mask_height +2, scr->depth);
1530
1531 for (u=0; u<5+1; u++) /* Copy an area of 5x5 pixels from the center */
1532 for (v=0; v<5+1; v++)
1533 for (i=u*5; i < (u+1)*5; i++) /* magnify it 5 times */
1534 for (j=v*5; j < (v+1)*5; j++)
1535 XCopyArea(scr->display, backPix, magPix, scr->copyGC,
1536 u +9, v +9, 1, 1, i, j);
1537
1538 /* Get color under hotspot */
1539 ofs = half_mask_width + half_mask_height * Cursor_mask_width;
1540 pixelImg = RCreateImageFromDrawable(scr->rcontext, backPix, backPix);
1541 panel->magnifyGlass->color.red = pixelImg->data[0][ofs];
1542 panel->magnifyGlass->color.green = pixelImg->data[1][ofs];
1543 panel->magnifyGlass->color.blue = pixelImg->data[2][ofs];
1544 RDestroyImage(pixelImg);
1545
1546 /* Copy the magnified pixmap, with the clip mask, to background pixmap */
1547 XSetClipMask(scr->display, scr->clipGC, panel->magnifyGlass->mask);
1548 XSetClipOrigin(scr->display, scr->clipGC, 0, 0);
1549
1550 XCopyArea(scr->display, magPix, backPix, scr->clipGC, 2, 2,
1551 Cursor_mask_width, Cursor_mask_height, 0, 0);
1552 /* (2,2) puts center pixel on center of glass */
1553
1554 XFreePixmap(scr->display, magPix);
1555
1556 return backPix;
1557 }
1558
1559
1560 static WMView*
1561 magnifyCreateView(W_ColorPanel *panel)
1562 {
1563 W_Screen *scr = WMWidgetScreen(panel->win);
1564 WMView *magView;
1565
1566 magView = W_CreateTopView(scr);
1567 magView->self = panel;
1568
1569 W_ResizeView(magView, Cursor_mask_width, Cursor_mask_height);
1570
1571 magView->attribFlags |= CWOverrideRedirect | CWSaveUnder;
1572 magView->attribs.event_mask = StructureNotifyMask;
1573 magView->attribs.override_redirect = True;
1574 magView->attribs.save_under = True;
1575
1576 W_RealizeView(magView);
1577
1578 return magView;
1579 }
1580
1581
1582 static Cursor
1583 magnifyGrabPointer(W_ColorPanel *panel)
1584 {
1585 W_Screen *scr = WMWidgetScreen(panel->win);
1586 Pixmap magPixmap, magPixmap2;
1587 Cursor magCursor;
1588 XColor fgColor = {0, 0,0,0, DoRed|DoGreen|DoBlue};
1589 XColor bgColor = {0, 0xbf00, 0xa000, 0x5000, DoRed|DoGreen|DoBlue};
1590
1591 /* Cursor creation stuff */
1592 magPixmap = XCreatePixmapFromBitmapData(scr->display, W_DRAWABLE(scr),
1593 Cursor_bits, Cursor_width, Cursor_height, 1, 0, 1);
1594 magPixmap2 = XCreatePixmapFromBitmapData(scr->display, W_DRAWABLE(scr),
1595 Cursor_shape_bits, Cursor_width, Cursor_height, 1, 0, 1);
1596
1597 magCursor = XCreatePixmapCursor(scr->display, magPixmap, magPixmap2,
1598 &fgColor, &bgColor, Cursor_x_hot, Cursor_y_hot);
1599
1600 XFreePixmap(scr->display, magPixmap);
1601 XFreePixmap(scr->display, magPixmap2);
1602
1603 XRecolorCursor(scr->display, magCursor, &fgColor, &bgColor);
1604
1605 /* Set up Pointer */
1606 XGrabPointer (scr->display, panel->magnifyGlass->view->window, True,
1607 PointerMotionMask | ButtonPressMask,
1608 GrabModeAsync, GrabModeAsync,
1609 scr->rootWin, magCursor, CurrentTime);
1610
1611 return magCursor;
1612 }
1613
1614
1615 static WMPoint
1616 magnifyInitialize(W_ColorPanel *panel)
1617 {
1618 W_Screen *scr = WMWidgetScreen(panel->win);
1619 int x, y, u, v;
1620 unsigned int mask;
1621 Pixmap pixmap;
1622 WMPoint point;
1623
1624 XQueryPointer(scr->display, scr->rootWin, &scr->rootWin,
1625 &W_VIEW(panel->win)->window, &x, &y, &u, &v, &mask);
1626
1627
1628 /* Clipmask to make magnified view-contents circular */
1629 panel->magnifyGlass->mask = XCreatePixmapFromBitmapData(scr->display,
1630 W_DRAWABLE(scr), Cursor_mask_bits,
1631 Cursor_mask_width, Cursor_mask_height, 1, 0, 1);
1632
1633 /* Draw initial magnified part */
1634 panel->magnifyGlass->valid = False;
1635 /* also free's magnifyGlass->pixmap */
1636 panel->magnifyGlass->pixmap = magnifyGetStorePixmap(panel, x, y, x, y);
1637 panel->magnifyGlass->valid = True;
1638
1639 pixmap = magnifyCreatePixmap(panel);
1640
1641 XSetWindowBackgroundPixmap(scr->display, panel->magnifyGlass->view->window,
1642 pixmap);
1643 XClearWindow(scr->display, panel->magnifyGlass->view->window);
1644 XFlush(scr->display);
1645
1646 XFreePixmap(scr->display, pixmap);
1647
1648 point.x = x;
1649 point.y = y;
1650
1651 return point;
1652 }
1653
1654
1655 static void
1656 magnifyPutCursor(WMWidget *w, void *data)
1657 {
1658 W_ColorPanel *panel = (W_ColorPanel*)(data);
1659 W_Screen *scr = WMWidgetScreen(panel->win);
1660 Cursor magCursor;
1661 int x, y;
1662 Pixmap pixmap;
1663 XEvent event;
1664 WMPoint initialPosition;
1665
1666 /* Destroy wheelBackImg, so it'll update properly */
1667 if (panel->selectionBackImg) {
1668 XFreePixmap(WMWidgetScreen(panel->win)->display,
1669 panel->selectionBackImg);
1670 panel->selectionBackImg = None;
1671 }
1672
1673 /* Create magnifying glass */
1674 panel->magnifyGlass = wmalloc(sizeof(MovingView));
1675 panel->magnifyGlass->view = magnifyCreateView(panel);
1676
1677 initialPosition = magnifyInitialize(panel);
1678 x = initialPosition.x;
1679 y = initialPosition.y;
1680
1681 W_MoveView(panel->magnifyGlass->view, x - Cursor_x_hot +1,
1682 y - Cursor_y_hot +1);
1683 W_MapView(panel->magnifyGlass->view);
1684
1685 magCursor = magnifyGrabPointer(panel);
1686
1687 while(panel->magnifyGlass->valid)
1688 {
1689 WMNextEvent(scr->display, &event);
1690
1691 switch (event.type)
1692 {
1693 case ButtonPress:
1694 if (event.xbutton.button == Button1) {
1695 updateSwatch(panel, panel->magnifyGlass->color);
1696 switch (panel->mode) {
1697 case WMWheelModeColorPanel:
1698 wheelInit(panel);
1699 wheelRender(panel);
1700 wheelPaint(panel);
1701 break;
1702 case WMGrayModeColorPanel:
1703 grayInit(panel);
1704 break;
1705 case WMRGBModeColorPanel:
1706 rgbInit(panel);
1707 break;
1708 case WMCMYKModeColorPanel:
1709 cmykInit(panel);
1710 break;
1711 case WMHSBModeColorPanel:
1712 hsbInit(panel);
1713 break;
1714 default:
1715 break;
1716 }
1717 panel->lastChanged = panel->mode;
1718 }
1719
1720 panel->magnifyGlass->valid = False;
1721 WMSetButtonSelected(panel->magnifyBtn, False);
1722 break;
1723
1724 case MotionNotify:
1725 /* Get a "dirty rectangle" */
1726 panel->magnifyGlass->pixmap = magnifyGetStorePixmap(
1727 panel, x+1, y+1,
1728 event.xmotion.x_root+1, event.xmotion.y_root+1);
1729 /* also free's magnifyGlass->pixmap */
1730
1731 /* Update coordinates */
1732 x = event.xmotion.x_root;
1733 y = event.xmotion.y_root;
1734
1735 /* Move view */
1736 W_MoveView(panel->magnifyGlass->view, x - Cursor_x_hot +1,
1737 y - Cursor_y_hot +1);
1738
1739 /* Put new image (with magn.) in view */
1740 pixmap = magnifyCreatePixmap(panel);
1741 XSetWindowBackgroundPixmap(scr->display,
1742 panel->magnifyGlass->view->window, pixmap);
1743 XClearWindow(scr->display, panel->magnifyGlass->view->window);
1744
1745 XFreePixmap(scr->display, pixmap);
1746 break;
1747
1748 case FocusOut: /* fall through */
1749 case FocusIn:
1750 /*
1751 * Color Panel window (panel->win) lost or received focus.
1752 * We need to update the pixmap in the magnifying glass.
1753 */
1754 XUngrabPointer(scr->display, CurrentTime);
1755 W_UnmapView(panel->magnifyGlass->view);
1756
1757 magnifyInitialize(panel);
1758
1759 W_MapView(panel->magnifyGlass->view);
1760 XGrabPointer (scr->display,
1761 panel->magnifyGlass->view->window,
1762 True,
1763 PointerMotionMask | ButtonPressMask,
1764 GrabModeAsync,
1765 GrabModeAsync,
1766 scr->rootWin,
1767 magCursor,
1768 CurrentTime);
1769 break;
1770
1771 default:
1772 WMHandleEvent(&event);
1773 break;
1774 } /* of switch */
1775 }
1776 panel->magnifyGlass->valid = False;
1777
1778 XUngrabPointer(scr->display, CurrentTime);
1779 XFreeCursor(scr->display, magCursor);
1780 W_DestroyView(panel->magnifyGlass->view);
1781
1782 XFreePixmap(scr->display, panel->magnifyGlass->mask);
1783 panel->magnifyGlass->mask = None;
1784
1785 XFreePixmap(scr->display, panel->magnifyGlass->pixmap);
1786 panel->magnifyGlass->pixmap = None;
1787
1788 free(panel->magnifyGlass);
1789 }
1790
1791
1792
1793 /****************** WheelMatrix Functions ************************/
1794
1795 static wheelMatrix*
1796 wheelCreateMatrix(unsigned int width, unsigned int height)
1797 {
1798 wheelMatrix *matrix = NULL;
1799 int i;
1800
1801 assert((width > 0) && (height > 0));
1802
1803 matrix = malloc(sizeof(wheelMatrix));
1804 if (!matrix) {
1805 RErrorCode = RERR_NOMEMORY;
1806 return NULL;
1807 }
1808
1809 memset(matrix, 0, sizeof(wheelMatrix));
1810 matrix->width = width;
1811 matrix->height = height;
1812 for (i = 0; i < 3; i++) {
1813 matrix->data[i] = malloc(width*height*sizeof(unsigned char));
1814 if (!matrix->data[i])
1815 goto error;
1816 }
1817
1818 return matrix;
1819
1820 error:
1821 for (i = 0; i < 3; i++) {
1822 if (matrix->data[i])
1823 free(matrix->data[i]);
1824 }
1825 if (matrix)
1826 free(matrix);
1827 RErrorCode = RERR_NOMEMORY;
1828 return NULL;
1829 }
1830
1831
1832 static void
1833 wheelDestroyMatrix(wheelMatrix *matrix)
1834 {
1835 int i;
1836
1837 assert (matrix!=NULL);
1838
1839 for (i = 0; i < 3; i++) {
1840 if (matrix->data[i])
1841 free(matrix->data[i]);
1842 }
1843 free(matrix);
1844 }
1845
1846
1847 static wheelMatrix*
1848 wheelInitMatrix(W_ColorPanel *panel)
1849 {
1850 int i;
1851 int x,y;
1852 wheelMatrix *matrix;
1853 unsigned char *rp, *gp, *bp;
1854 RHSVColor cur_hsv;
1855 RColor cur_rgb;
1856 long ofs[4];
1857 float hue;
1858 int sat;
1859 float xcor, ycor;
1860 int dhue[4];
1861
1862 matrix = wheelCreateMatrix(colorWheelSize+4, colorWheelSize+4);
1863 if (!matrix)
1864 return NULL;
1865
1866 RRGBtoHSV(&panel->color, &cur_hsv);
1867
1868 for (i = 0; i < 256; i++)
1869 matrix->values[i] = (unsigned char)(rint(i*cur_hsv.value/255));
1870
1871 cur_hsv.value = 255;
1872
1873 ofs[0] = -1;
1874 ofs[1] = -(colorWheelSize + 4);
1875 /* ofs[2] = 0; superfluous
1876 ofs[3] = 0;
1877 */
1878 for (y = 0; y < (colorWheelSize+4)/2; y++) {
1879 for (x = y; x < (colorWheelSize+4-y); x++) {
1880 xcor = ((float)(2.0*x - 4.0) / colorWheelSize) - 1;
1881 ycor = ((float)(2.0*y - 4.0) / colorWheelSize) - 1;
1882
1883 sat = rint(255.0 * sqrt((xcor*xcor) + (ycor*ycor)));
1884
1885
1886
1887 /* offsets are counterclockwise (in triangles) */
1888
1889 /* top quarter */
1890 if (y < (colorWheelSize+4)/2)
1891 ofs[0]++;
1892
1893 /* left quarter */
1894 ofs[1] += colorWheelSize + 4;
1895
1896 /* bottom quarter */
1897 ofs[2] = (colorWheelSize + 4) * (colorWheelSize + 4) - 1 - ofs[0];
1898
1899 /* right quarter */
1900 ofs[3] = (colorWheelSize + 4) * (colorWheelSize + 4) - 1 - ofs[1];
1901
1902 if (sat < 256) {
1903 cur_hsv.saturation = (unsigned char)sat;
1904
1905 if (xcor != 0)
1906 hue = atan(ycor/xcor);
1907 else {
1908 if (ycor > 0)
1909 hue = M_PI * 0.5;
1910 else
1911 hue = M_PI * 1.5;
1912 }
1913
1914 if (xcor < 0)
1915 hue += M_PI;
1916 if ((xcor > 0) && (ycor < 0))
1917 hue += M_PI * 2.0;
1918
1919 hue = -hue; /* Reverse direction of ColorWheel */
1920
1921 if (hue < 0)
1922 hue += M_PI * 2.0;
1923
1924 dhue[0] = (hue*360) / (M_PI * 2.0);
1925
1926 for (i = 0; i < 4; i++) {
1927
1928 if (i > 0)
1929 dhue[i] = (dhue[i-1] + 90) % 360;
1930
1931 if ((i == 1) || (i == 3))
1932 dhue[i] = 360 - dhue[i];
1933
1934 if (i == 2)
1935 dhue[i] = 360 - dhue[i] + 180;
1936
1937 rp = matrix->data[0] + (ofs[i] * sizeof(unsigned char));
1938 gp = matrix->data[1] + (ofs[i] * sizeof(unsigned char));
1939 bp = matrix->data[2] + (ofs[i] * sizeof(unsigned char));
1940
1941 cur_hsv.hue = dhue[i];
1942 RHSVtoRGB(&cur_hsv, &cur_rgb);
1943
1944 *rp = (unsigned char)(cur_rgb.red);
1945 *gp = (unsigned char)(cur_rgb.green);
1946 *bp = (unsigned char)(cur_rgb.blue);
1947 }
1948 }
1949 else {
1950 for (i = 0; i < 4; i++) {
1951 rp = matrix->data[0] + (ofs[i] * sizeof(unsigned char));
1952 gp = matrix->data[1] + (ofs[i] * sizeof(unsigned char));
1953 bp = matrix->data[2] + (ofs[i] * sizeof(unsigned char));
1954
1955 *rp = (unsigned char)(0);
1956 *gp = (unsigned char)(0);
1957 *bp = (unsigned char)(0);
1958 }
1959 }
1960 }
1961 if (y < (colorWheelSize+4)/2)
1962 ofs[0] += 2*y+1;
1963
1964 ofs[1] += 1 - (colorWheelSize + 4) * (colorWheelSize + 4 - 1 - 2*y);
1965 }
1966
1967 return matrix;
1968 }
1969
1970 /****************** ColorWheel Functions *******************/
1971
1972 static void
1973 wheelRender(W_ColorPanel *panel)
1974 {
1975 W_Screen *scr = WMWidgetScreen(panel->win);
1976 int x,y;
1977 RImage *image;
1978 unsigned char *rp, *gp, *bp;
1979 RColor gray;
1980 unsigned long ofs;
1981
1982 image = RCreateImage(colorWheelSize+4, colorWheelSize+4, False);
1983 if (!image)
1984 return;
1985
1986 gray.red = gray.green = gray.blue = 0xaa;
1987
1988 for (x = 0; x < colorWheelSize+4; x++) {
1989 for (y = 0; y < colorWheelSize+4; y++) {
1990
1991 ofs = (y * image->width) + x;
1992 rp = image->data[0] + ofs;
1993 gp = image->data[1] + ofs;
1994 bp = image->data[2] + ofs;
1995
1996 if (wheelInsideColorWheel(panel, ofs)) {
1997 *rp = (unsigned int)(panel->wheelMtrx->values[
1998 panel->wheelMtrx->data[0][ofs] ]);
1999 *gp = (unsigned int)(panel->wheelMtrx->values[
2000 panel->wheelMtrx->data[1][ofs] ]);
2001 *bp = (unsigned int)(panel->wheelMtrx->values[
2002 panel->wheelMtrx->data[2][ofs] ]);
2003 }
2004 else {
2005 *rp = (unsigned char)(gray.red);
2006 *gp = (unsigned char)(gray.green);
2007 *bp = (unsigned char)(gray.blue);
2008 }
2009 }
2010 }
2011
2012 if (panel->wheelImg)
2013 XFreePixmap(scr->display, panel->wheelImg);
2014
2015 panel->wheelImg = XCreatePixmap(scr->display, W_DRAWABLE(scr),
2016 colorWheelSize+4, colorWheelSize+4, scr->depth);
2017 RConvertImage(scr->rcontext, image, &panel->wheelImg);
2018
2019 /* Check if backimage exists. If it doesn't, allocate and fill it */
2020 if (!panel->selectionBackImg) {
2021 panel->selectionBackImg = XCreatePixmap(scr->display,
2022 W_VIEW(panel->wheelFrm)->window, 4, 4, scr->depth);
2023 XCopyArea(scr->display, panel->wheelImg, panel->selectionBackImg,
2024 scr->copyGC, panel->colx -2, panel->coly -2, 4, 4, 0, 0);
2025 /* -2 is hot spot correction */
2026 }
2027
2028 RDestroyImage(image);
2029 }
2030
2031 static Bool
2032 wheelInsideColorWheel(W_ColorPanel *panel, unsigned long ofs)
2033 {
2034 return ((panel->wheelMtrx->data[0][ofs] != 0) &&
2035 (panel->wheelMtrx->data[1][ofs] != 0) &&
2036 (panel->wheelMtrx->data[2][ofs] != 0));
2037 }
2038
2039 static void
2040 wheelPaint (W_ColorPanel *panel)
2041 {
2042 W_Screen *scr = WMWidgetScreen(panel->win);
2043
2044 XCopyArea(scr->display, panel->wheelImg, panel->wheelView->window,
2045 scr->copyGC, 0, 0, colorWheelSize+4, colorWheelSize+4, 0, 0);
2046
2047 /* Draw selection image */
2048 XCopyArea(scr->display, panel->selectionImg, panel->wheelView->window,
2049 scr->copyGC, 0, 0, 4, 4, panel->colx -2, panel->coly -2);
2050 }
2051
2052 static void
2053 wheelHandleEvents(XEvent *event, void *data)
2054 {
2055 W_ColorPanel *panel = (W_ColorPanel*)data;
2056
2057 switch (event->type) {
2058 case Expose:
2059 if (event->xexpose.count != 0)
2060 break;
2061 wheelPaint(panel);
2062 break;
2063 }
2064 }
2065
2066 static void
2067 wheelHandleActionEvents(XEvent *event, void *data)
2068 {
2069 W_ColorPanel *panel = (W_ColorPanel*)data;
2070
2071 switch (event->type) {
2072 case ButtonPress:
2073 if (getPickerPart(panel, event->xbutton.x, event->xbutton.y) ==
2074 COLORWHEEL_PART) {
2075 panel->flags.dragging = 1;
2076 wheelPositionSelection(panel, event->xbutton.x,
2077 event->xbutton.y);
2078 }
2079 break;
2080
2081 case ButtonRelease:
2082 panel->flags.dragging = 0;
2083 if (!panel->flags.continuous) {
2084 if (panel->action)
2085 (*panel->action)(panel->action, panel->clientData);
2086 }
2087 break;
2088
2089 case MotionNotify:
2090 if (panel->flags.dragging) {
2091 if (getPickerPart(panel, event->xmotion.x, event->xmotion.y) ==
2092 COLORWHEEL_PART) {
2093 wheelPositionSelection(panel, event->xmotion.x,
2094 event->xmotion.y);
2095 }
2096 else
2097 wheelPositionSelectionOutBounds(panel, event->xmotion.x,
2098 event->xmotion.y);
2099 }
2100 break;
2101 }
2102 }
2103
2104
2105 static int
2106 getPickerPart(W_ColorPanel *panel, int x, int y)
2107 {
2108 int lx, ly;
2109 unsigned long ofs;
2110
2111 lx = x;
2112 ly = y;
2113
2114 if (panel->mode == WMWheelModeColorPanel) {
2115 if ((lx >= 2) && (lx <= 2+colorWheelSize) && (ly >= 2) &&
2116 (ly <= 2+colorWheelSize)) {
2117
2118 ofs = ly*panel->wheelMtrx->width+lx;
2119
2120 if (wheelInsideColorWheel(panel, ofs))
2121 return COLORWHEEL_PART;
2122 }
2123 }
2124
2125 if (panel->mode == WMCustomPaletteModeColorPanel) {
2126 if ((lx >= 2) && (lx < customPaletteWidth-2) && (ly >= 2) &&
2127 (ly < customPaletteHeight-2)) {
2128 return CUSTOMPALETTE_PART;
2129 }
2130 }
2131
2132 return 0;
2133 }
2134
2135
2136 static void
2137 wheelBrightnessSliderCallback(WMWidget *w, void *data)
2138 {
2139 int i;
2140 unsigned int v;
2141 int value;
2142 unsigned long ofs;
2143 RColor cur_rgb;
2144
2145 W_ColorPanel *panel = (W_ColorPanel*)data;
2146
2147 value = 255-WMGetSliderValue(panel->wheelBrightnessS);
2148
2149 for (i = 0; i < 256; i++) {
2150 /* We divide by 128 in advance, and check whether that number divides
2151 * by 2 properly. If not, we add one to round the number correctly
2152 */
2153 v = (i*value) >> 7;
2154 #ifdef EASTEREGG
2155 panel->wheelMtrx->values[i] = (unsigned char)((v >> 1) + v);
2156 #else
2157 panel->wheelMtrx->values[i] = (unsigned char)((v >> 1) +(v & 0x01));
2158 #endif
2159 }
2160
2161 ofs = (panel->coly * panel->wheelMtrx->width) + panel->colx;
2162
2163 if (!wheelInsideColorWheel(panel, ofs)) {
2164 panel->hsvcolor.saturation = 255;
2165 panel->hsvcolor.value = value;
2166 RHSVtoRGB(&panel->hsvcolor, &cur_rgb);
2167
2168 panel->color = cur_rgb;
2169 }
2170 else {
2171 panel->color.red = panel->wheelMtrx->values[
2172 panel->wheelMtrx->data[0][ofs] ];
2173 panel->color.green = panel->wheelMtrx->values[
2174 panel->wheelMtrx->data[1][ofs] ];
2175 panel->color.blue = panel->wheelMtrx->values[
2176 panel->wheelMtrx->data[2][ofs] ];
2177 }
2178
2179 wheelRender(panel);
2180 wheelPaint(panel);
2181 wheelUpdateSelection(panel);
2182 }
2183
2184
2185 static void
2186 wheelUpdateSelection(W_ColorPanel *panel)
2187 {
2188 W_Screen *scr = WMWidgetScreen(panel->win);
2189
2190 updateSwatch(panel, panel->color);
2191 panel->lastChanged = WMWheelModeColorPanel;
2192
2193 /* Redraw color selector (and make a backup of the part it will cover) */
2194 XCopyArea(scr->display, panel->wheelImg, panel->selectionBackImg,
2195 scr->copyGC, panel->colx -2, panel->coly -2, 4, 4, 0, 0);
2196 /* "-2" is correction for hotspot location */
2197 XCopyArea(scr->display, panel->selectionImg, panel->wheelView->window,
2198 scr->copyGC, 0, 0, 4, 4, panel->colx -2, panel->coly -2);
2199 /* see above */
2200 }
2201
2202 static void
2203 wheelUndrawSelection(W_ColorPanel *panel)
2204 {
2205 W_Screen *scr = WMWidgetScreen(panel->win);
2206
2207 XCopyArea(scr->display, panel->selectionBackImg, panel->wheelView->window,
2208 scr->copyGC, 0, 0, 4, 4, panel->colx -2, panel->coly -2);
2209 /* see above */
2210 }
2211
2212 static void
2213 wheelPositionSelection(W_ColorPanel *panel, int x, int y)
2214 {
2215 unsigned long ofs = (y * panel->wheelMtrx->width)+ x;
2216
2217
2218 panel->color.red = panel->wheelMtrx->values[
2219 panel->wheelMtrx->data[0][ofs] ];
2220 panel->color.green = panel->wheelMtrx->values[
2221 panel->wheelMtrx->data[1][ofs] ];
2222 panel->color.blue = panel->wheelMtrx->values[
2223 panel->wheelMtrx->data[2][ofs] ];
2224
2225 wheelUndrawSelection(panel);
2226
2227 panel->colx = x;
2228 panel->coly = y;
2229
2230 wheelUpdateSelection(panel);
2231 wheelUpdateBrightnessGradientFromLocation(panel);
2232 }
2233
2234 static void
2235 wheelPositionSelectionOutBounds(W_ColorPanel *panel, int x, int y)
2236 {
2237 RHSVColor cur_hsv;
2238 float hue;
2239 float xcor, ycor;
2240
2241 xcor = ((x*2.0) / (colorWheelSize+4)) - 1.0;
2242 ycor = ((y*2.0) / (colorWheelSize+4)) - 1.0;
2243
2244 cur_hsv.saturation = 255;
2245 cur_hsv.value = 255 - WMGetSliderValue(panel->wheelBrightnessS);
2246
2247 if (xcor != 0)
2248 hue = atan(ycor/xcor);
2249 else {
2250 if (ycor > 0)
2251 hue = M_PI * 0.5;
2252 else
2253 hue = M_PI * 1.5;
2254 }
2255
2256 if (xcor < 0)
2257 hue += M_PI;
2258 if ((xcor > 0) && (ycor < 0))
2259 hue += M_PI * 2.0;
2260
2261 hue = -hue;
2262
2263 if (hue < 0)
2264 hue += M_PI * 2.0;
2265
2266 cur_hsv.hue = (hue*180.0)/(M_PI);
2267 RHSVtoRGB(&cur_hsv, &panel->color);
2268
2269 wheelUndrawSelection(panel);
2270
2271 panel->colx = 2 + rint((colorWheelSize * (1.0 +
2272 cos( cur_hsv.hue*M_PI/180))) /2.0);
2273 /* "+2" because of "colorWheelSize + 4" */
2274 panel->coly = 2 + rint((colorWheelSize * (1.0 +
2275 sin(-cur_hsv.hue*M_PI/180))) /2.0);
2276
2277 wheelUpdateSelection(panel);
2278 wheelUpdateBrightnessGradientFromHSV(panel, cur_hsv);
2279 }
2280
2281 static void
2282 wheelUpdateBrightnessGradientFromHSV(W_ColorPanel *panel, RHSVColor topColor)
2283 {
2284 RColor from;
2285
2286 /* Update Brightness-Slider */
2287 topColor.value = 255;
2288 RHSVtoRGB(&topColor, &from);
2289
2290 wheelUpdateBrightnessGradient(panel, from);
2291 }
2292
2293 static void
2294 wheelUpdateBrightnessGradientFromLocation(W_ColorPanel *panel)
2295 {
2296 RColor from;
2297 unsigned long ofs;
2298
2299 ofs = panel->coly * panel->wheelMtrx->width + panel->colx;
2300
2301 from.red = panel->wheelMtrx->data[0][ofs];
2302 from.green = panel->wheelMtrx->data[1][ofs];
2303 from.blue = panel->wheelMtrx->data[2][ofs];
2304
2305 wheelUpdateBrightnessGradient(panel, from);
2306 }
2307
2308 static void
2309 wheelUpdateBrightnessGradient(W_ColorPanel *panel, RColor topColor)
2310 {
2311 RColor to;
2312 RImage *sliderImg;
2313 WMPixmap *sliderPxmp;
2314
2315 to.red = to.green = to.blue = 0;
2316
2317 sliderImg = RRenderGradient(16, 153, &topColor, &to, RGRD_VERTICAL);
2318 sliderPxmp = WMCreatePixmapFromRImage(WMWidgetScreen(panel->win),
2319 sliderImg, 0);
2320 RDestroyImage(sliderImg);
2321 WMSetSliderImage(panel->wheelBrightnessS, sliderPxmp);
2322 WMReleasePixmap(sliderPxmp);
2323 }
2324
2325 /****************** Grayscale Panel Functions ***************/
2326
2327 static void
2328 grayBrightnessSliderCallback(WMWidget *w, void *data)
2329 {
2330 RColor color;
2331 int value;
2332 char tmp[4];
2333
2334 W_ColorPanel *panel = (W_ColorPanel*)data;
2335
2336 value = WMGetSliderValue(panel->grayBrightnessS);
2337
2338 sprintf(tmp, "%d", value);
2339
2340 WMSetTextFieldText(panel->grayBrightnessT, tmp);
2341 color.red = color.green = color.blue = rint(2.55*value);
2342
2343 updateSwatch(panel, color);
2344 panel->lastChanged = WMGrayModeColorPanel;
2345 }
2346
2347 static void
2348 grayPresetButtonCallback(WMWidget *w, void *data)
2349 {
2350 RColor color;
2351 char tmp[4];
2352 int value;
2353 int i=0;
2354
2355 W_ColorPanel *panel = (W_ColorPanel*)data;
2356
2357 while (i < 7) {
2358 if (w == panel->grayPresetBtn[i])
2359 break;
2360 i++;
2361 }
2362
2363 value = rint(100.0/6.0*i);
2364 sprintf(tmp, "%d", value);
2365
2366 WMSetTextFieldText(panel->grayBrightnessT, tmp);
2367 color.red = color.green = color.blue = rint(255.0*i/6.0);
2368
2369 WMSetSliderValue(panel->grayBrightnessS, rint(100.0*i/6.0));
2370
2371 updateSwatch(panel, color);
2372 panel->lastChanged = WMGrayModeColorPanel;
2373 }
2374
2375 static void
2376 grayBrightnessTextFieldCallback(void *observerData,
2377 WMNotification *notification)
2378 {
2379 RColor color;
2380 char tmp[4];
2381 int value;
2382 W_ColorPanel *panel = (W_ColorPanel*)observerData;
2383
2384 value = atoi(WMGetTextFieldText(panel->grayBrightnessT));
2385 if (value > 100)
2386 value = 100;
2387 if (value < 0)
2388 value = 0;
2389
2390 sprintf(tmp, "%d", value);
2391 WMSetTextFieldText(panel->grayBrightnessT, tmp);
2392 WMSetSliderValue(panel->grayBrightnessS, value);
2393
2394 color.red = color.green = color.blue = rint(255.0*value/100.0);
2395 updateSwatch(panel, color);
2396 panel->lastChanged = WMGrayModeColorPanel;
2397 }
2398
2399 /******************* RGB Panel Functions *****************/
2400
2401 static void
2402 rgbSliderCallback(WMWidget *w, void *data)
2403 {
2404 RColor color;
2405 int value[3];
2406 char tmp[4];
2407
2408 W_ColorPanel *panel = (W_ColorPanel*)data;
2409
2410 value[0] = WMGetSliderValue(panel->rgbRedS);
2411 value[1] = WMGetSliderValue(panel->rgbGreenS);
2412 value[2] = WMGetSliderValue(panel->rgbBlueS);
2413
2414 sprintf(tmp, "%d", value[0]);
2415 WMSetTextFieldText(panel->rgbRedT, tmp);
2416 sprintf(tmp, "%d", value[1]);
2417 WMSetTextFieldText(panel->rgbGreenT, tmp);
2418 sprintf(tmp, "%d", value[2]);
2419 WMSetTextFieldText(panel->rgbBlueT, tmp);
2420
2421 color.red = value[0];
2422 color.green = value[1];
2423 color.blue = value[2];
2424
2425 updateSwatch(panel, color);
2426 panel->lastChanged = WMRGBModeColorPanel;
2427 }
2428
2429 static void
2430 rgbTextFieldCallback(void *observerData, WMNotification *notification)
2431 {
2432 RColor color;
2433 int value[3];
2434 char tmp[4];
2435 int n;
2436 W_ColorPanel *panel = (W_ColorPanel*)observerData;
2437
2438 value[0] = atoi(WMGetTextFieldText(panel->rgbRedT));
2439 value[1] = atoi(WMGetTextFieldText(panel->rgbGreenT));
2440 value[2] = atoi(WMGetTextFieldText(panel->rgbBlueT));
2441
2442 for (n=0; n < 3; n++) {
2443 if (value[n] > 255)
2444 value[n] = 255;
2445 if (value[n] < 0)
2446 value[n] = 0;
2447 }
2448
2449 sprintf(tmp, "%d", value[0]);
2450 WMSetTextFieldText(panel->rgbRedT, tmp);
2451 sprintf(tmp, "%d", value[1]);
2452 WMSetTextFieldText(panel->rgbGreenT, tmp);
2453 sprintf(tmp, "%d", value[2]);
2454 WMSetTextFieldText(panel->rgbBlueT, tmp);
2455
2456 WMSetSliderValue(panel->rgbRedS, value[0]);
2457 WMSetSliderValue(panel->rgbGreenS, value[1]);
2458 WMSetSliderValue(panel->rgbBlueS, value[2]);
2459
2460 color.red = value[0];
2461 color.green = value[1];
2462 color.blue = value[2];
2463
2464 updateSwatch(panel, color);
2465 panel->lastChanged = WMRGBModeColorPanel;
2466 }
2467
2468
2469 /******************* CMYK Panel Functions *****************/
2470
2471 static void
2472 cmykSliderCallback(WMWidget *w, void *data)
2473 {
2474 RColor color;
2475 int value[4];
2476 char tmp[4];
2477
2478 W_ColorPanel *panel = (W_ColorPanel*)data;
2479
2480 value[0] = WMGetSliderValue(panel->cmykCyanS);
2481 value[1] = WMGetSliderValue(panel->cmykMagentaS);
2482 value[2] = WMGetSliderValue(panel->cmykYellowS);
2483 value[3] = WMGetSliderValue(panel->cmykBlackS);
2484
2485 sprintf(tmp, "%d", value[0]);
2486 WMSetTextFieldText(panel->cmykCyanT, tmp);
2487 sprintf(tmp, "%d", value[1]);
2488 WMSetTextFieldText(panel->cmykMagentaT, tmp);
2489 sprintf(tmp, "%d", value[2]);
2490 WMSetTextFieldText(panel->cmykYellowT, tmp);
2491 sprintf(tmp, "%d", value[3]);
2492 WMSetTextFieldText(panel->cmykBlackT, tmp);
2493
2494 color.red = rint((255.0 - (value[0] * 2.55)) * (1.0 - (value[3] / 100.0)));
2495 color.green = rint((255.0 - (value[1] * 2.55)) * (1.0 - (value[3]/100.0)));
2496 color.blue = rint((255.0 - (value[2] * 2.55)) * (1.0 - (value[3] /100.0)));
2497
2498 updateSwatch(panel, color);
2499 panel->lastChanged = WMCMYKModeColorPanel;
2500 }
2501
2502 static void
2503 cmykTextFieldCallback(void *observerData, WMNotification *notification)
2504 {
2505 RColor color;
2506 int value[4];
2507 char tmp[4];
2508 int n;
2509 W_ColorPanel *panel = (W_ColorPanel*)observerData;
2510
2511 value[0] = atoi(WMGetTextFieldText(panel->cmykCyanT));
2512 value[1] = atoi(WMGetTextFieldText(panel->cmykMagentaT));
2513 value[2] = atoi(WMGetTextFieldText(panel->cmykYellowT));
2514 value[3] = atoi(WMGetTextFieldText(panel->cmykBlackT));
2515
2516 for (n=0; n < 4; n++) {
2517 if (value[n] > 100)
2518 value[n] = 100;
2519 if (value[n] < 0)
2520 value[n] = 0;
2521 }
2522
2523 sprintf(tmp, "%d", value[0]);
2524 WMSetTextFieldText(panel->cmykCyanT, tmp);
2525 sprintf(tmp, "%d", value[1]);
2526 WMSetTextFieldText(panel->cmykMagentaT, tmp);
2527 sprintf(tmp, "%d", value[2]);
2528 WMSetTextFieldText(panel->cmykYellowT, tmp);
2529 sprintf(tmp, "%d", value[3]);
2530 WMSetTextFieldText(panel->cmykBlackT, tmp);
2531
2532 WMSetSliderValue(panel->cmykCyanS, value[0]);
2533 WMSetSliderValue(panel->cmykMagentaS, value[1]);
2534 WMSetSliderValue(panel->cmykYellowS, value[2]);
2535 WMSetSliderValue(panel->cmykBlackS, value[3]);
2536
2537 color.red = rint((255.0 - (value[0] * 2.55)) * (1.0 - (value[3] / 100.0)));
2538 color.green = rint((255.0 - (value[1] * 2.55)) * (1.0 - (value[3]/100.0)));
2539 color.blue = rint((255.0 - (value[2] * 2.55)) * (1.0 - (value[3] /100.0)));
2540
2541 updateSwatch(panel, color);
2542 panel->lastChanged = WMCMYKModeColorPanel;
2543 }
2544
2545 /********************** HSB Panel Functions ***********************/
2546
2547 static void
2548 hsbSliderCallback(WMWidget *w, void *data)
2549 {
2550 RColor color;
2551 int value[3];
2552 char tmp[4];
2553
2554 W_ColorPanel *panel = (W_ColorPanel*)data;
2555
2556 value[0] = WMGetSliderValue(panel->hsbHueS);
2557 value[1] = WMGetSliderValue(panel->hsbSaturationS);
2558 value[2] = WMGetSliderValue(panel->hsbBrightnessS);
2559
2560 sprintf(tmp, "%d", value[0]);
2561 WMSetTextFieldText(panel->hsbHueT, tmp);
2562 sprintf(tmp, "%d", value[1]);
2563 WMSetTextFieldText(panel->hsbSaturationT, tmp);
2564 sprintf(tmp, "%d", value[2]);
2565 WMSetTextFieldText(panel->hsbBrightnessT, tmp);
2566
2567 panel->hsvcolor.hue = value[0];
2568 panel->hsvcolor.saturation = value[1]*2.55;
2569 panel->hsvcolor.value = value[2]*2.55;
2570
2571 RHSVtoRGB(&panel->hsvcolor, &color);
2572
2573 panel->lastChanged = WMHSBModeColorPanel;
2574 updateSwatch(panel, color);
2575
2576 if (w != panel->hsbBrightnessS)
2577 hsbUpdateBrightnessGradient(panel);
2578 if (w != panel->hsbSaturationS)
2579 hsbUpdateSaturationGradient(panel);
2580 if (w != panel->hsbHueS)
2581 hsbUpdateHueGradient(panel);
2582 }
2583
2584 static void
2585 hsbTextFieldCallback(void *observerData, WMNotification *notification)
2586 {
2587 RColor color;
2588 int value[3];
2589 char tmp[4];
2590 int n;
2591 W_ColorPanel *panel = (W_ColorPanel*)observerData;
2592
2593 value[0] = atoi(WMGetTextFieldText(panel->hsbHueT));
2594 value[1] = atoi(WMGetTextFieldText(panel->hsbSaturationT));
2595 value[2] = atoi(WMGetTextFieldText(panel->hsbBrightnessT));
2596
2597 if (value[0] > 359)
2598 value[0] = 359;
2599 if (value[0] < 0)
2600 value[0] = 0;
2601
2602 for (n=1; n < 3; n++) {
2603 if (value[n] > 100)
2604 value[n] = 100;
2605 if (value[n] < 0)
2606 value[n] = 0;
2607 }
2608
2609 sprintf(tmp, "%d", value[0]);
2610 WMSetTextFieldText(panel->hsbHueT, tmp);
2611 sprintf(tmp, "%d", value[1]);
2612 WMSetTextFieldText(panel->hsbSaturationT, tmp);
2613 sprintf(tmp, "%d", value[2]);
2614 WMSetTextFieldText(panel->hsbBrightnessT, tmp);
2615
2616 WMSetSliderValue(panel->hsbHueS, value[0]);
2617 WMSetSliderValue(panel->hsbSaturationS, value[1]);
2618 WMSetSliderValue(panel->hsbBrightnessS, value[2]);
2619
2620 panel->hsvcolor.hue = value[0];
2621 panel->hsvcolor.saturation = value[1]*2.55;
2622 panel->hsvcolor.value = value[2]*2.55;
2623
2624 RHSVtoRGB(&panel->hsvcolor, &color);
2625
2626 panel->lastChanged = WMHSBModeColorPanel;
2627 updateSwatch(panel, color);
2628
2629 hsbUpdateBrightnessGradient(panel);
2630 hsbUpdateSaturationGradient(panel);
2631 hsbUpdateHueGradient(panel);
2632 }
2633
2634 static void
2635 hsbUpdateBrightnessGradient(W_ColorPanel *panel)
2636 {
2637 W_Screen *scr = WMWidgetScreen(panel->win);
2638 RColor from;
2639 RColor to;
2640 RHSVColor hsvcolor;
2641 RImage *sliderImg;
2642 WMPixmap *sliderPxmp;
2643
2644 from.red = from.green = from.blue = 0;
2645 hsvcolor = panel->hsvcolor;
2646 hsvcolor.value = 255;
2647
2648 RHSVtoRGB(&hsvcolor, &to);
2649
2650 sliderImg = RRenderGradient(141, 16, &from, &to, RGRD_HORIZONTAL);
2651 sliderPxmp = WMCreatePixmapFromRImage(scr, sliderImg, 0);
2652 RDestroyImage(sliderImg);
2653 W_PaintText(W_VIEW(panel->hsbBrightnessS), sliderPxmp->pixmap,
2654 panel->font12, 2, 0, 100, WALeft, WMColorGC(scr->white), False,
2655 "Brightness", strlen("Brightness"));
2656 WMSetSliderImage(panel->hsbBrightnessS, sliderPxmp);
2657 WMReleasePixmap(sliderPxmp);
2658 }
2659
2660 static void
2661 hsbUpdateSaturationGradient(W_ColorPanel *panel)
2662 {
2663 W_Screen *scr = WMWidgetScreen(panel->win);
2664 RColor from;
2665 RColor to;
2666 RHSVColor hsvcolor;
2667 RImage *sliderImg;
2668 WMPixmap *sliderPxmp;
2669
2670 hsvcolor = panel->hsvcolor;
2671 hsvcolor.saturation = 0;
2672 RHSVtoRGB(&hsvcolor, &from);
2673
2674 hsvcolor.saturation = 255;
2675 RHSVtoRGB(&hsvcolor, &to);
2676
2677 sliderImg = RRenderGradient(141, 16, &from, &to, RGRD_HORIZONTAL);
2678 sliderPxmp = WMCreatePixmapFromRImage(scr, sliderImg, 0);
2679 RDestroyImage(sliderImg);
2680 if (hsvcolor.value < 128)
2681 W_PaintText(W_VIEW(panel->hsbSaturationS), sliderPxmp->pixmap,
2682 panel->font12, 2, 0, 100, WALeft, WMColorGC(scr->white), False,
2683 "Saturation", strlen("Saturation"));
2684 else
2685 W_PaintText(W_VIEW(panel->hsbSaturationS), sliderPxmp->pixmap,
2686 panel->font12, 2, 0, 100, WALeft, WMColorGC(scr->black), False,
2687 "Saturation", strlen("Saturation"));
2688
2689 WMSetSliderImage(panel->hsbSaturationS, sliderPxmp);
2690 WMReleasePixmap(sliderPxmp);
2691 }
2692
2693 static void
2694 hsbUpdateHueGradient(W_ColorPanel *panel)
2695 {
2696 W_Screen *scr = WMWidgetScreen(panel->win);
2697 RColor **colors = NULL;
2698 RHSVColor hsvcolor;
2699 RImage *sliderImg;
2700 WMPixmap *sliderPxmp;
2701 int i;
2702
2703 hsvcolor = panel->hsvcolor;
2704
2705 colors = malloc(sizeof(RColor*)*(8));
2706 for (i=0; i<7; i++) {
2707 hsvcolor.hue = (360*i)/6;
2708 colors[i] = malloc(sizeof(RColor));
2709 RHSVtoRGB(&hsvcolor, colors[i]);
2710 }
2711 colors[7] = NULL;
2712
2713 sliderImg = RRenderMultiGradient(141, 16, colors, RGRD_HORIZONTAL);
2714 sliderPxmp = WMCreatePixmapFromRImage(scr, sliderImg, 0);
2715 RDestroyImage(sliderImg);
2716 if (hsvcolor.value < 128)
2717 W_PaintText(W_VIEW(panel->hsbHueS), sliderPxmp->pixmap,
2718 panel->font12, 2, 0, 100, WALeft, WMColorGC(scr->white), False,
2719 "Hue", strlen("Hue"));
2720 else
2721 W_PaintText(W_VIEW(panel->hsbHueS), sliderPxmp->pixmap,
2722 panel->font12, 2, 0, 100, WALeft, WMColorGC(scr->black), False,
2723 "Hue", strlen("Hue"));
2724
2725 WMSetSliderImage(panel->hsbHueS, sliderPxmp);
2726 WMReleasePixmap(sliderPxmp);
2727
2728 for (i=0; i<7; i++) {
2729 if (colors[i])
2730 free(colors[i]);
2731 }
2732 if (colors)
2733 free(colors);
2734 }
2735
2736 /*************** Custom Palette Functions ****************/
2737
2738 static void
2739 customRenderSpectrum(W_ColorPanel *panel)
2740 {
2741 RImage *spectrum;
2742 int hue, sat, val;
2743 int x,y;
2744 unsigned long ofs;
2745 unsigned char *rp, *gp, *bp;
2746 RColor color;
2747 RHSVColor cur_hsv;
2748
2749 spectrum = RCreateImage(SPECTRUM_WIDTH, SPECTRUM_HEIGHT, 0);
2750
2751 for (y=0; y<360; y++) {
2752 val = 255;
2753 sat = 0;
2754 hue = y;
2755 for (x=0; x<511; x++) {
2756 ofs = (y * 511) + x;
2757
2758 cur_hsv.hue = hue;
2759 cur_hsv.saturation = sat;
2760 cur_hsv.value = val;
2761
2762 RHSVtoRGB (&cur_hsv, &color);
2763
2764 rp = spectrum->data[0] + ofs;
2765 gp = spectrum->data[1] + ofs;
2766 bp = spectrum->data[2] + ofs;
2767
2768 *rp = (unsigned char)color.red;
2769 *gp = (unsigned char)color.green;
2770 *bp = (unsigned char)color.blue;
2771
2772 if (x<255)
2773 sat++;
2774
2775 if (x>255)
2776 val--;
2777 }
2778 }
2779 if (panel->customPaletteImg) {
2780 RDestroyImage(panel->customPaletteImg);
2781 panel->customPaletteImg = NULL;
2782 }
2783 panel->customPaletteImg = spectrum;
2784 }
2785
2786
2787
2788 static void
2789 customSetPalette(W_ColorPanel *panel)
2790 {
2791 W_Screen *scr = WMWidgetScreen(panel->win);
2792 RImage *scaledImg;
2793 Pixmap image;
2794 int item;
2795
2796 image = XCreatePixmap(scr->display, W_DRAWABLE(scr), customPaletteWidth,
2797 customPaletteHeight, scr->depth);
2798
2799 scaledImg = RScaleImage(panel->customPaletteImg, customPaletteWidth,
2800 customPaletteHeight);
2801 RConvertImage(scr->rcontext, scaledImg, &image);
2802 RDestroyImage(scaledImg);
2803
2804 XCopyArea(scr->display, image, panel->customPaletteContentView->window,
2805 scr->copyGC, 0, 0, customPaletteWidth, customPaletteHeight, 0, 0);
2806
2807 /* Check backimage exists. If it doesn't, allocate and fill it */
2808 if (!panel->selectionBackImg) {
2809 panel->selectionBackImg = XCreatePixmap(scr->display,
2810 panel->customPaletteContentView->window, 4, 4, scr->depth);
2811 }
2812
2813 XCopyArea(scr->display, image, panel->selectionBackImg, scr->copyGC,
2814 panel->palx-2, panel->paly-2, 4, 4, 0, 0);
2815 XCopyArea(scr->display, panel->selectionImg,
2816 panel->customPaletteContentView->window, scr->copyGC, 0 , 0, 4, 4,
2817 panel->palx-2, panel->paly-2);
2818 XFreePixmap(scr->display, image);
2819
2820 panel->palXRatio = (float)(panel->customPaletteImg->width) /
2821 (float)(customPaletteWidth);
2822 panel->palYRatio = (float)(panel->customPaletteImg->height) /
2823 (float)(customPaletteHeight);
2824
2825 item = WMGetPopUpButtonSelectedItem (panel->customPaletteHistoryBtn);
2826
2827 /* if palette != "Spectrum", we are allowed to rename and remove it */
2828 WMSetPopUpButtonItemEnabled(panel->customPaletteMenuBtn, CPmenuRename,
2829 (item > 0) );
2830 WMSetPopUpButtonItemEnabled(panel->customPaletteMenuBtn, CPmenuRemove,
2831 (item > 0) );
2832 }
2833
2834
2835 static void
2836 customPalettePositionSelection(W_ColorPanel *panel, int x, int y)
2837 {
2838 W_Screen *scr = WMWidgetScreen(panel->win);
2839 unsigned long ofs;
2840
2841
2842 /* undraw selection */
2843 XCopyArea(scr->display, panel->selectionBackImg,
2844 panel->customPaletteContentView->window, scr->copyGC, 0, 0, 4, 4,
2845 panel->palx-2, panel->paly-2);
2846
2847 panel->palx = x;
2848 panel->paly = y;
2849
2850 ofs = rint(x * panel->palXRatio) + rint(y * panel->palYRatio) *
2851 panel->customPaletteImg->width;
2852
2853 panel->color.red = panel->customPaletteImg->data[0][ofs];
2854 panel->color.green = panel->customPaletteImg->data[1][ofs];
2855 panel->color.blue = panel->customPaletteImg->data[2][ofs];
2856
2857 updateSwatch(panel, panel->color);
2858 panel->lastChanged = WMCustomPaletteModeColorPanel;
2859
2860 /* Redraw color selector (and make a backup of the part it will cover) */
2861 XCopyArea(scr->display, panel->customPaletteContentView->window,
2862 panel->selectionBackImg, scr->copyGC, panel->palx-2, panel->paly-2,
2863 4, 4, 0, 0); /* "-2" is correction for hotspot location */
2864 XCopyArea(scr->display, panel->selectionImg,
2865 panel->customPaletteContentView->window, scr->copyGC, 0, 0, 4, 4,
2866 panel->palx-2, panel->paly-2); /* see above */
2867 }
2868
2869
2870 static void
2871 customPalettePositionSelectionOutBounds(W_ColorPanel *panel, int x, int y)
2872 {
2873 if (x < 2)
2874 x = 2;
2875 if (y < 2)
2876 y = 2;
2877 if (x >= customPaletteWidth)
2878 x = customPaletteWidth -2;
2879 if (y >= customPaletteHeight)
2880 y = customPaletteHeight -2;
2881
2882 customPalettePositionSelection(panel, x, y);
2883 }
2884
2885
2886 static void
2887 customPaletteHandleEvents(XEvent *event, void *data)
2888 {
2889 W_ColorPanel *panel = (W_ColorPanel*)data;
2890
2891 switch (event->type) {
2892 case Expose:
2893 if (event->xexpose.count != 0)
2894 break;
2895 customSetPalette(panel);
2896 break;
2897 }
2898 }
2899
2900 static void
2901 customPaletteHandleActionEvents(XEvent *event, void *data)
2902 {
2903 W_ColorPanel *panel = (W_ColorPanel*)data;
2904 int x, y;
2905
2906 switch (event->type) {
2907 case ButtonPress:
2908 x = event->xbutton.x;
2909 y = event->xbutton.y;
2910
2911 if (getPickerPart(panel, x, y) == CUSTOMPALETTE_PART) {
2912 panel->flags.dragging = 1;
2913 customPalettePositionSelection(panel, x, y);
2914 }
2915 break;
2916
2917 case ButtonRelease:
2918 panel->flags.dragging = 0;
2919 if (!panel->flags.continuous) {
2920 if (panel->action)
2921 (*panel->action)(panel->action, panel->clientData);
2922 }
2923 break;
2924
2925 case MotionNotify:
2926 x = event->xmotion.x;
2927 y = event->xmotion.y;
2928
2929 if (panel->flags.dragging) {
2930 if (getPickerPart(panel, x, y) == CUSTOMPALETTE_PART) {
2931 customPalettePositionSelection(panel, x, y);
2932 }
2933 else
2934 customPalettePositionSelectionOutBounds(panel, x, y);
2935 }
2936 break;
2937 }
2938 }
2939
2940
2941 static void
2942 customPaletteMenuCallback(WMWidget *w, void *data)
2943 {
2944 W_ColorPanel *panel = (W_ColorPanel*)data;
2945 int item = WMGetPopUpButtonSelectedItem(panel->customPaletteMenuBtn);
2946
2947 switch (item) {
2948 case CPmenuNewFromFile:
2949 customPaletteMenuNewFromFile(panel);
2950 break;
2951 case CPmenuRename:
2952 customPaletteMenuRename(panel);
2953 break;
2954 case CPmenuRemove:
2955 customPaletteMenuRemove(panel);
2956 break;
2957 case CPmenuCopy:
2958 break;
2959 case CPmenuNewFromClipboard:
2960 break;
2961 }
2962 }
2963
2964
2965 static void
2966 customPaletteMenuNewFromFile(W_ColorPanel *panel)
2967 {
2968 W_Screen *scr = WMWidgetScreen(panel->win);
2969 WMOpenPanel *browseP;
2970 char *filepath;
2971 char *filename = NULL;
2972 char *spath;
2973 char *tmp;
2974 int i;
2975 RImage *tmpImg = NULL;
2976
2977 if ((!panel->lastBrowseDir) || (strcmp(panel->lastBrowseDir,"\0") == 0))
2978 spath = wexpandpath(wgethomedir());
2979 else
2980 spath = wexpandpath(panel->lastBrowseDir);
2981
2982 browseP = WMGetOpenPanel(scr);
2983 WMSetFilePanelCanChooseDirectories(browseP, 0);
2984 WMSetFilePanelCanChooseFiles(browseP, 1);
2985
2986 /* Get a filename */
2987 if (WMRunModalFilePanelForDirectory(browseP, panel->win, spath,
2988 "Open Palette",
2989 RSupportedFileFormats()) ) {
2990 filepath = WMGetFilePanelFileName(browseP);
2991
2992 /* Get seperation position between path and filename */
2993 i = strrchr(filepath, '/') - filepath + 1;
2994 if (i > strlen(filepath))
2995 i = strlen(filepath);
2996
2997 /* Store last browsed path */
2998 if (panel->lastBrowseDir)
2999 free(panel->lastBrowseDir);
3000 panel->lastBrowseDir = wmalloc((i+1)*sizeof(char));
3001 strncpy(panel->lastBrowseDir, filepath, i);
3002 panel->lastBrowseDir[i] = '\0';
3003
3004 /* Get filename from path */
3005 filename = wstrdup(filepath + i);
3006
3007 /* Check for duplicate files, and rename it if there are any */
3008 tmp = wstrappend(panel->configurationPath, filename);
3009 while (access (tmp, F_OK) == 0) {
3010 char *newName;
3011
3012 free(tmp);
3013
3014 newName = generateNewFilename(filename);
3015 free(filename);
3016 filename = newName;
3017
3018 tmp = wstrappend(panel->configurationPath, filename);
3019 }
3020 free(tmp);
3021
3022 /* Copy image to $(gnustepdir)/Library/Colors/ &
3023 * Add filename to history menu */
3024 if (fetchFile (panel->configurationPath, filepath, filename) == 0) {
3025
3026 /* filepath is a "local" path now the file has been copied */
3027 free(filepath);
3028 filepath = wstrappend(panel->configurationPath, filename);
3029
3030 /* load the image & add menu entries */
3031 tmpImg = RLoadImage(scr->rcontext, filepath, 0);
3032 if (tmpImg) {
3033 if (panel->customPaletteImg)
3034 RDestroyImage(panel->customPaletteImg);
3035 panel->customPaletteImg = tmpImg;
3036
3037 customSetPalette(panel);
3038 WMAddPopUpButtonItem(panel->customPaletteHistoryBtn, filename);
3039
3040 panel->currentPalette = WMGetPopUpButtonNumberOfItems(
3041 panel->customPaletteHistoryBtn)-1;
3042
3043 WMSetPopUpButtonSelectedItem(panel->customPaletteHistoryBtn,
3044 panel->currentPalette);
3045 }
3046 }
3047 else
3048 {
3049 tmp = wstrappend(panel->configurationPath, filename);
3050
3051 i = remove(tmp); /* Delete the file, it doesn't belong here */
3052 WMRunAlertPanel(scr, panel->win, "File Error",
3053 "Invalid file format !", "OK", NULL, NULL);
3054 if (i != 0) {
3055 wsyserror("can't remove file %s", tmp);
3056 WMRunAlertPanel(scr, panel->win, "File Error",
3057 "Couldn't remove file from Configuration Directory !",
3058 "OK", NULL, NULL);
3059 }
3060 free(tmp);
3061 }
3062 free(filepath);
3063 free(filename);
3064 }
3065 WMFreeFilePanel(browseP);
3066
3067 free(spath);
3068 }
3069
3070
3071 static void
3072 customPaletteMenuRename(W_ColorPanel *panel)
3073 {
3074 W_Screen *scr = WMWidgetScreen(panel->win);
3075 char *toName = NULL;
3076 char *fromName;
3077 char *toPath, *fromPath;
3078 int item;
3079 int index;
3080
3081 item = WMGetPopUpButtonSelectedItem(panel->customPaletteHistoryBtn);
3082 fromName = WMGetPopUpButtonItem(panel->customPaletteHistoryBtn, item);
3083
3084 toName = WMRunInputPanel(scr, panel->win, "Rename", "Rename palette to:",
3085 fromName, "OK", "Cancel");
3086
3087 if (toName) {
3088
3089 /* As some people do certain stupid things... */
3090 if (strcmp(toName, fromName) == 0) {
3091 free(toName);
3092 return;
3093 }
3094
3095 /* For normal people */
3096 fromPath = wstrappend(panel->configurationPath, fromName);
3097 toPath = wstrappend(panel->configurationPath, toName);
3098
3099 if (access (toPath, F_OK) == 0) {
3100 /* Careful, this palette exists already */
3101 if (WMRunAlertPanel(scr, panel->win, "Warning",
3102 "Palette already exists !\n\nOverwrite ?", "No", "Yes",
3103 NULL) == 1) {
3104 /* "No" = 0, "Yes" = 1 */
3105 int items = WMGetPopUpButtonNumberOfItems(
3106 panel->customPaletteHistoryBtn);
3107
3108 remove(toPath);
3109
3110 /* Remove from History list too */
3111 index = 1;
3112 while ((index < items) && (strcmp(WMGetPopUpButtonItem(
3113 panel->customPaletteHistoryBtn, index),
3114 toName) != 0 ))
3115 index++;
3116
3117 if (index < items) {
3118 WMRemovePopUpButtonItem(panel->customPaletteHistoryBtn,
3119 index);
3120 if (index < item)
3121 item--;
3122 }
3123
3124 } else {
3125 free(fromPath);
3126 free(toName);
3127 free(toPath);
3128
3129 return;
3130 }
3131 }
3132
3133 if ( rename(fromPath, toPath) != 0)
3134 wsyserror("Couldn't rename palette %s to %s\n", fromName, toName);
3135 else {
3136 WMRemovePopUpButtonItem(panel->customPaletteHistoryBtn, item);
3137 WMInsertPopUpButtonItem(panel->customPaletteHistoryBtn, item,
3138 toName);
3139
3140 WMSetPopUpButtonSelectedItem(panel->customPaletteHistoryBtn, item);
3141 }
3142 free(fromPath);
3143 free(toPath);
3144 free(toName);
3145 }
3146 }
3147
3148
3149 static void
3150 customPaletteMenuRemove(W_ColorPanel *panel)
3151 {
3152 W_Screen *scr = WMWidgetScreen(panel->win);
3153 char *text;
3154 char *tmp;
3155 int choice;
3156 int item;
3157
3158 item = WMGetPopUpButtonSelectedItem(panel->customPaletteHistoryBtn);
3159
3160 tmp = wstrappend( "This will permanently remove the palette ",
3161 WMGetPopUpButtonItem(panel->customPaletteHistoryBtn, item ));
3162 text = wstrappend( tmp, ".\n\nAre you sure you want to remove this"
3163 " palette ?");
3164 free(tmp);
3165
3166 choice = WMRunAlertPanel(scr, panel->win, NULL, text, "Yes", "No", NULL);
3167 /* returns 0 (= "Yes") or 1 (="No") */
3168 free(text);
3169
3170 if (choice == 0) {
3171
3172 tmp = wstrappend(panel->configurationPath,
3173 WMGetPopUpButtonItem(panel->customPaletteHistoryBtn, item ));
3174
3175 if ( remove(tmp) != 0)
3176 wsyserror("Couldn't remove palette %s\n", tmp);
3177 free(tmp);
3178
3179 /* item -1 always exists */
3180 WMSetPopUpButtonSelectedItem(panel->customPaletteHistoryBtn, item-1);
3181
3182 customPaletteHistoryCallback(panel->customPaletteHistoryBtn, panel);
3183 customSetPalette(panel);
3184
3185 WMRemovePopUpButtonItem(panel->customPaletteHistoryBtn, item);
3186 }
3187 }
3188
3189
3190 static void
3191 customPaletteHistoryCallback(WMWidget *w, void *data)
3192 {
3193 W_ColorPanel *panel = (W_ColorPanel*)data;
3194 W_Screen *scr = WMWidgetScreen(panel->win);
3195 int item;
3196 char *filename;
3197 RImage *tmp = NULL;
3198
3199 item = WMGetPopUpButtonSelectedItem(panel->customPaletteHistoryBtn);
3200 if (item == panel->currentPalette)
3201 return;
3202
3203 if (item == 0)
3204 customRenderSpectrum(panel);
3205 else {
3206 /* Load file from configpath */
3207 filename = wstrappend( panel->configurationPath,
3208 WMGetPopUpButtonItem(panel->customPaletteHistoryBtn, item) );
3209
3210 /* XXX To do: Check existence of file and remove it from the history
3211 * if it doesn't exist */
3212
3213 tmp = RLoadImage(scr->rcontext, filename, 0);
3214 if (tmp) {
3215 if (panel->customPaletteImg) {
3216 RDestroyImage(panel->customPaletteImg);
3217 panel->customPaletteImg = NULL;
3218 }
3219 panel->customPaletteImg = tmp;
3220 }
3221 free(filename);
3222 }
3223 customSetPalette(panel);
3224
3225 panel->currentPalette = item;
3226 }
3227
3228
3229 /*************** Panel Initialisation Functions *****************/
3230
3231 static void
3232 wheelInit(W_ColorPanel *panel)
3233 {
3234 RHSVColor cur_hsv;
3235 int i;
3236 int v;
3237
3238 RRGBtoHSV(&panel->color, &cur_hsv);
3239
3240 WMSetSliderValue(panel->wheelBrightnessS, 255-cur_hsv.value);
3241 wheelUpdateBrightnessGradientFromHSV(panel, cur_hsv);
3242
3243 panel->colx = 2 + rint((colorWheelSize / 2.0) * (1 + (
3244 cur_hsv.saturation/255.0) * cos( cur_hsv.hue*M_PI/180.0)));
3245 panel->coly = 2 + rint((colorWheelSize / 2.0) * (1 + (
3246 cur_hsv.saturation/255.0) * sin(-cur_hsv.hue*M_PI/180.0)));
3247
3248 for (i = 0; i < 256; i++) {
3249 /* We divide by 128 in advance, and check whether that number divides
3250 * by 2 properly. If not, we add one to round the number correctly
3251 */
3252 v = (i*cur_hsv.value) >> 7;
3253 panel->wheelMtrx->values[i] = (unsigned char)((v >> 1) + (v & 1));
3254 }
3255 }
3256
3257 static void
3258 grayInit(W_ColorPanel *panel)
3259 {
3260 RHSVColor cur_hsv;
3261 int value;
3262 char tmp[4];
3263
3264 RRGBtoHSV(&panel->color, &cur_hsv);
3265
3266 value = rint(cur_hsv.value/2.55);
3267 WMSetSliderValue(panel->grayBrightnessS, value);
3268
3269 sprintf(tmp, "%d", value);
3270 WMSetTextFieldText(panel->grayBrightnessT, tmp);
3271 }
3272
3273 static void
3274 rgbInit(W_ColorPanel *panel)
3275 {
3276 char tmp[4];
3277
3278 WMSetSliderValue(panel->rgbRedS,panel->color.red);
3279 WMSetSliderValue(panel->rgbGreenS,panel->color.green);
3280 WMSetSliderValue(panel->rgbBlueS,panel->color.blue);
3281
3282 sprintf(tmp, "%d", panel->color.red);
3283 WMSetTextFieldText(panel->rgbRedT, tmp);
3284 sprintf(tmp, "%d", panel->color.green);
3285 WMSetTextFieldText(panel->rgbGreenT, tmp);
3286 sprintf(tmp, "%d", panel->color.blue);
3287 WMSetTextFieldText(panel->rgbBlueT, tmp);
3288 }
3289
3290 static void
3291 cmykInit(W_ColorPanel *panel)
3292 {
3293 int value[3];
3294 char tmp[4];
3295
3296 value[0] = rint((255-panel->color.red)/2.55);
3297 value[1] = rint((255-panel->color.green)/2.55);
3298 value[2] = rint((255-panel->color.blue)/2.55);
3299
3300 WMSetSliderValue(panel->cmykCyanS, value[0]);
3301 WMSetSliderValue(panel->cmykMagentaS, value[1]);
3302 WMSetSliderValue(panel->cmykYellowS, value[2]);
3303 WMSetSliderValue(panel->cmykBlackS, 0);
3304
3305 sprintf(tmp, "%d", value[0]);
3306 WMSetTextFieldText(panel->cmykCyanT, tmp);
3307 sprintf(tmp, "%d", value[1]);
3308 WMSetTextFieldText(panel->cmykMagentaT, tmp);
3309 sprintf(tmp, "%d", value[2]);
3310 WMSetTextFieldText(panel->cmykYellowT, tmp);
3311 WMSetTextFieldText(panel->cmykBlackT, "0");
3312 }
3313
3314 static void
3315 hsbInit(W_ColorPanel *panel)
3316 {
3317 int value[3];
3318 char tmp[4];
3319
3320 value[0] = panel->hsvcolor.hue;
3321 value[1] = rint(panel->hsvcolor.saturation/2.55);
3322 value[2] = rint(panel->hsvcolor.value/2.55);
3323
3324 WMSetSliderValue(panel->hsbHueS,value[0]);
3325 WMSetSliderValue(panel->hsbSaturationS,value[1]);
3326 WMSetSliderValue(panel->hsbBrightnessS,value[2]);
3327
3328 sprintf(tmp, "%d", value[0]);
3329 WMSetTextFieldText(panel->hsbHueT, tmp);
3330 sprintf(tmp, "%d", value[1]);
3331 WMSetTextFieldText(panel->hsbSaturationT, tmp);
3332 sprintf(tmp, "%d", value[2]);
3333 WMSetTextFieldText(panel->hsbBrightnessT, tmp);
3334
3335 hsbUpdateBrightnessGradient(panel);
3336 hsbUpdateSaturationGradient(panel);
3337 hsbUpdateHueGradient(panel);
3338 }
3339
3340
3341
3342
3343 /************************* ColorList Panel Functions **********************/
3344
3345 static void
3346 colorListPaintItem(WMList *lPtr, int index, Drawable d, char *text,
3347 int state, WMRect *rect)
3348 {
3349 int width, height, x, y;
3350 RColor color = *((RColor *)WMGetListItem(lPtr, index)->clientData);
3351 WMScreen *scr = WMWidgetScreen(lPtr);
3352 Display *dpy = WMScreenDisplay(scr);
3353 W_ColorPanel *panel = WMGetHangedData(lPtr);
3354 WMColor *white = WMWhiteColor(scr);
3355 WMColor *black = WMBlackColor(scr);
3356 WMColor *fillColor;
3357
3358 width = rect->size.width;
3359 height = rect->size.height;
3360 x = rect->pos.x;
3361 y = rect->pos.y;
3362
3363 if (state & WLDSSelected)
3364 WMPaintColorSwatch(white, d, x +15, y, width -15, height);
3365 else
3366 XClearArea(dpy, d, x +15, y, width -15, height, False);
3367
3368 fillColor = WMCreateRGBColor(scr, color.red*256, color.green*256,
3369 color.blue*256, False);
3370
3371 WMSetColorInGC(fillColor, WMColorGC(fillColor));
3372 WMPaintColorSwatch(fillColor, d, x, y, 15, 15);
3373 WMReleaseColor(fillColor);
3374
3375 WMDrawString(scr, d, WMColorGC(black), panel->font12, x+18, y, text,
3376 strlen(text));
3377
3378 WMReleaseColor(white);
3379 WMReleaseColor(black);
3380 }
3381
3382
3383 static void
3384 colorListSelect(WMWidget *w, void *data)
3385 {
3386 W_ColorPanel *panel = (W_ColorPanel *)data;
3387 RColor color = *((RColor *)WMGetListSelectedItem(w)->clientData);
3388
3389 panel->lastChanged = WMColorListModeColorPanel;
3390 updateSwatch(panel, color);
3391 }
3392
3393
3394 static void
3395 colorListColorMenuCallback(WMWidget *w, void *data)
3396 {
3397 W_ColorPanel *panel = (W_ColorPanel *)data;
3398 int item = WMGetPopUpButtonSelectedItem(panel->colorListColorMenuBtn);
3399
3400 switch (item) {
3401 case CLmenuAdd:
3402 break;
3403 case CLmenuRename:
3404 break;
3405 case CLmenuRemove:
3406 break;
3407 }
3408 }
3409
3410
3411 static void
3412 colorListListMenuCallback(WMWidget *w, void *data)
3413 {
3414 W_ColorPanel *panel = (W_ColorPanel *)data;
3415 int item = WMGetPopUpButtonSelectedItem(panel->colorListListMenuBtn);
3416
3417 switch (item) {
3418 case CLmenuAdd:
3419 /* New Color List */
3420 colorListListMenuNew(panel);
3421 break;
3422 case CLmenuRename:
3423 break;
3424 case CLmenuRemove:
3425 break;
3426 }
3427 }
3428
3429
3430 static void
3431 colorListListMenuNew(W_ColorPanel *panel)
3432 {
3433
3434 }
3435
3436
3437 /************************** Common utility functions ************************/
3438
3439 static int
3440 fetchFile(char *toPath, char *srcFile, char *destFile)
3441 {
3442 int src, dest;
3443 int n;
3444 char *tmp;
3445 char buf[BUFSIZE];
3446
3447 if ((src = open(srcFile, O_RDONLY)) == 0) {
3448 wsyserror("Could not open %s", srcFile);
3449 return -1;
3450 }
3451
3452 tmp = wstrappend(toPath, destFile);
3453 if ((dest = open( tmp, O_RDWR|O_CREAT, S_IRUSR|S_IWUSR|S_IRGRP|S_IROTH))
3454 == 0) {
3455 wsyserror("Could not create %s", tmp);
3456 free(tmp);
3457 return -1;
3458 }
3459 free(tmp);
3460
3461
3462 /* Copy the file */
3463 while ((n = read(src, buf, BUFSIZE)) > 0)
3464 {
3465 if (write (dest, buf, n) != n) {
3466 wsyserror("Write error on file %s", destFile);
3467 return -1;
3468 }
3469 }
3470
3471 return 0;
3472 }
3473
3474
3475 char*
3476 generateNewFilename(char *curName)
3477 {
3478 int n;
3479 char c;
3480 int baseLen;
3481 char *ptr;
3482 char *newName;
3483
3484
3485 assert(curName);
3486
3487 ptr = curName;
3488
3489 if (
3490 ((ptr = strrchr(ptr, '{')) == 0) ||
3491 sscanf(ptr, "{%i}%c", &n, &c) != 1
3492 )
3493 return wstrappend(curName, " {1}");
3494
3495 baseLen = ptr - curName -1;
3496
3497 newName = wmalloc(baseLen + 16);
3498 strncpy(newName, curName, baseLen);
3499 newName[baseLen] = 0;
3500
3501 sprintf(&newName[baseLen], " {%i}", n+1);
3502
3503 return newName;
3504 }
The Window Maker window manager