3 * Purpose: Implementation of the XForms object bmtable.
4 * Author: Alejandro Aguilar Sierra <asierra@servidor.unam.mx>
5 * Created: November 1995
6 * Description: A bitmap table uses a single bitmap to simulate a 2d array
7 * of bitmap buttons. It can be used to build bitmap menus.
9 * Copyright (C) 1995,1996 Alejandro Aguilar Sierra
11 * You are free to use and modify this code under the terms of
12 * the GNU General Public Licence version 2 or later.
18 // $Id: bmtable.C,v 1.1 1999/09/27 18:44:37 larsbj Exp $
20 #if !defined(lint) && !defined(WITH_WARNINGS)
21 static char vcid[] = "$Id: bmtable.C,v 1.1 1999/09/27 18:44:37 larsbj Exp $";
26 #include XPM_H_LOCATION
29 int nx, ny; /* Dimensions of the table */
30 int dx, dy; /* Size of each item */
31 int bx, by; /* Bitmap's position */
32 int bw, bh; /* Bitmap dimensions */
33 char* bdata; /* Bitmap data */
34 int maxi; /* Number of items */
35 int i; /* Current position */
36 int mousebut; /* mouse button pushed */
37 Pixmap pix; /* Pixmap from data (temporal) */
41 static int handle_bitmaptable(FL_OBJECT *ob, int event, FL_Coord mx,
42 FL_Coord my, int key, void *xev);
45 FL_OBJECT *fl_create_bmtable(int type, FL_Coord x, FL_Coord y,
46 FL_Coord w, FL_Coord h, char const *label)
50 ob = fl_make_object(FL_BMTABLE, type, x, y, w, h, label, handle_bitmaptable);
51 ob->boxtype = FL_BMTABLE_BOXTYPE;
52 ob->spec = fl_calloc(1, sizeof(BMTABLE_SPEC));
53 ((BMTABLE_SPEC *)ob->spec)->pix = 0;
54 ((BMTABLE_SPEC *)ob->spec)->bdata= 0;
55 ((BMTABLE_SPEC *)ob->spec)->mousebut= -1;
60 FL_OBJECT *fl_add_bmtable(int type, FL_Coord x, FL_Coord y,
61 FL_Coord w, FL_Coord h, char const *label)
65 ob = fl_create_bmtable(type, x, y, w,h, label);
66 fl_add_object(fl_current_form, ob);
72 static void draw_bitmaptable(FL_OBJECT *ob)
76 FL_Coord xx, yy, ww, hh;
77 BMTABLE_SPEC *sp = (BMTABLE_SPEC *)ob->spec;
79 GC gc = fl_state[fl_get_vclass()].gc[0];
81 /* draw the bounding box first */
82 lx = sp->maxi % sp->nx;
83 fl_drw_box(ob->boxtype, ob->x, ob->y, ob->w, ob->h, ob->col1, ob->bw);
86 xx = ob->x+ sp->dx*lx + i;
87 yy = ob->y+ (sp->ny-1)*sp->dy+i;
88 ww = ob->x+ob->w - xx - i;
89 hh = ob->y+ob->h-yy-i;
90 fl_drw_frame(FL_DOWN_FRAME, xx, yy, ww, hh, ob->col1, ob->bw);
91 fl_rectf(xx, yy, ww+i, hh+i, ob->col1);
94 /* draw the background bitmap */
97 sp->pix = XCreatePixmapFromBitmapData(fl_display, fl_winget(),
98 sp->bdata, sp->bw, sp->bh,
99 fl_get_flcolor(ob->lcol), fl_get_flcolor(ob->col1),
100 DefaultDepth(fl_display, DefaultScreen(fl_display)));
105 /* Adjust position */
106 if (sp->bx < FL_abs(ob->bw) + 1) {
107 xx = FL_abs(ob->bw) - sp->bx + 1;
108 mx = ob->x + FL_abs(ob->bw) + 1;
113 if (sp->by < FL_abs(ob->bw) + 1) {
114 yy = FL_abs(ob->bw) - sp->by + 1;
115 my = ob->y + FL_abs(ob->bw) + 1;
120 ww = (mx + sp->bw < ob->x + ob->w - FL_abs(ob->bw)) ?
121 sp->bw: ob->x + ob->w - FL_abs(ob->bw) - mx;
122 hh = (my + sp->bh < ob->y + ob->h - FL_abs(ob->bw)) ?
123 sp->bh: ob->y + ob->h - FL_abs(ob->bw) - my;
126 j = hh - ((lx) ? sp->dy+2*i: 0);
127 XCopyArea(fl_display, sp->pix, fl_winget(), gc, xx, yy, ww, j, mx, my);
130 XCopyArea(fl_display, sp->pix, fl_winget(), gc, xx,
131 yy+j, lx*sp->dx-2*i, hh-j, mx, my+j);
137 /* draw the grid if type > FLAT */
138 if (ob->type > FL_BMTABLE_FLAT) {
142 for (yy=ob->y; yy<=my; yy+=sp->dy) {
143 if (ob->boxtype!=FL_FLAT_BOX && (yy==ob->y || yy>my-sp->dy))
145 if (lx>0 && yy>=my-sp->dy - sp->dy/2)
147 fl_diagline(ob->x, yy, ww, 1, FL_BOTTOM_BCOL);
148 fl_diagline(ob->x, yy+1, ww-2, 1, FL_TOP_BCOL);
151 for (xx=ob->x; xx<=mx; xx+=sp->dx) {
152 if (ob->boxtype!=FL_FLAT_BOX && (xx==ob->x || xx>mx-sp->dx))
154 if (lx>0 && xx>=ob->x+lx*sp->dx)
155 hh = (sp->ny-1)*sp->dy;
156 fl_diagline(xx, ob->y, 1, hh, FL_RIGHT_BCOL);
157 fl_diagline(xx+1, ob->y+1, 1, hh-2, FL_LEFT_BCOL);
161 /* Simulate a pushed button */
162 if (ob->pushed && 0 <= sp->i && sp->i < sp->maxi) {
165 ww = sp->dx-2*FL_abs(ob->bw);
166 hh = sp->dy-2*FL_abs(ob->bw);
167 xx = ob->x + sp->dx*i + FL_abs(ob->bw);
168 yy = ob->y + sp->dy*j + FL_abs(ob->bw);
169 fl_drw_frame(FL_DOWN_FRAME, xx, yy, ww, hh, ob->col1, ob->bw);
174 static int handle_bitmaptable(FL_OBJECT *ob, int event, FL_Coord mx,
175 FL_Coord my, int key, void */*xev*/)
178 BMTABLE_SPEC *sp = (BMTABLE_SPEC *)ob->spec;
182 draw_bitmaptable(ob);
185 if (!ob->belowmouse) { /* This never happens. Why? */
187 fl_redraw_object(ob);
190 i = (mx - ob->x)/sp->dx; j = (my - ob->y)/sp->dy;
191 if (i>=0 && i< sp->nx && j>=0 && j< sp->ny) {
193 if (i >= sp->maxi) i = -1;
196 fl_redraw_object(ob);
202 i = (mx - ob->x)/sp->dx + ((my - ob->y)/sp->dy)*sp->nx;
203 if (0 <= i && i < sp->maxi) {
205 fl_redraw_object(ob);
210 fl_redraw_object(ob);
214 XFreePixmap(fl_display, sp->pix);
217 fl_free(((BMTABLE_SPEC*)ob->spec));
225 * The table has nx columns of dx width each and ny rows of dy height each.
226 * Initially the position of the firts item is supposed to be the same that
227 * the object position (x, y), and the number of items is supposed to be
230 * The user could change these later. See below.
232 void fl_set_bmtable_data(FL_OBJECT *ob, int nx, int ny, int bw, int bh,
235 BMTABLE_SPEC *sp = (BMTABLE_SPEC *)ob->spec;
239 sp->bx = FL_abs(ob->bw);
240 sp->by = FL_abs(ob->bw);
244 sp->maxi = sp->nx * sp->ny;
252 void fl_set_bmtable_pixmap_data(FL_OBJECT *ob, int nx, int ny,
255 BMTABLE_SPEC *sp = (BMTABLE_SPEC *)ob->spec;
256 extern Colormap color_map;
260 sp->bx = FL_abs(ob->bw);
261 sp->by = FL_abs(ob->bw);
265 sp->maxi = sp->nx * sp->ny;
267 Pixmap dummy_shapemask = 0;
268 XpmAttributes dumb_attributes= {0};
269 dumb_attributes.colormap = color_map;
270 dumb_attributes.closeness = 30000;
271 dumb_attributes.valuemask = XpmColormap | XpmCloseness;
272 if (XCreatePixmapFromData(fl_display, fl_winget(), pdata,
273 &(sp->pix), &dummy_shapemask,
274 &dumb_attributes) == XpmSuccess) {
275 sp->bw = dumb_attributes.width;
276 sp->bh = dumb_attributes.height;
277 XpmFreeAttributes(&dumb_attributes);
278 if (dummy_shapemask) {
279 XFreePixmap(fl_display, dummy_shapemask);
288 * This function works only for X11R6 or later
290 #if XlibSpecificationRelease > 5
292 void fl_set_bmtable_file(FL_OBJECT *ob, int nx, int ny, char const *filename)
297 if(XReadBitmapFileData(filename, (unsigned int *) &bw, (unsigned int *) &bh,
298 (unsigned char **) &bdata, &xh, &yh)==BitmapSuccess)
299 fl_set_bmtable_data(ob, nx, ny, bw, bh, bdata);
305 void fl_set_bmtable_file(FL_OBJECT *, int, int, char const *)
307 fprintf(stderr, "Set bmtable file: Sorry, I need X11 release 6 to do "
315 void fl_set_bmtable_pixmap_file(FL_OBJECT *ob, int nx, int ny, char const *filename)
317 extern Colormap color_map;
318 BMTABLE_SPEC *sp = (BMTABLE_SPEC *)ob->spec;
322 sp->bx = FL_abs(ob->bw);
323 sp->by = FL_abs(ob->bw);
327 sp->maxi = sp->nx * sp->ny;
330 Pixmap dummy_shapemask = 0;
331 XpmAttributes dumb_attributes= {0};
332 dumb_attributes.colormap = color_map;
333 dumb_attributes.closeness = 30000;
334 dumb_attributes.valuemask = XpmColormap | XpmCloseness;
336 if (XReadPixmapFile(fl_display, fl_winget(), (char *)filename,
337 &(sp->pix), &dummy_shapemask,
338 &dumb_attributes) == XpmSuccess) {
339 sp->bw = dumb_attributes.width;
340 sp->bh = dumb_attributes.height;
341 XpmFreeAttributes(&dumb_attributes);
342 if (dummy_shapemask) {
343 XFreePixmap(fl_display, dummy_shapemask);
352 * This function allows to adjust the position of the first item and its
353 * size (dx, dy). The input values are incremental, not absolute.
355 void fl_set_bmtable_adjust(FL_OBJECT *ob, int px, int py, int dx, int dy)
357 BMTABLE_SPEC *sp = (BMTABLE_SPEC *)ob->spec;
367 * This function returns the table's selected position.
369 int fl_get_bmtable(FL_OBJECT *ob)
371 if ((BMTABLE_SPEC *)ob->spec)
372 return ((BMTABLE_SPEC *)ob->spec)->i;
379 * You can change the max number of items if you want.
381 void fl_set_bmtable_maxitems(FL_OBJECT *ob, int i)
383 if (i>0 && (BMTABLE_SPEC *)ob->spec)
384 ((BMTABLE_SPEC *)ob->spec)->maxi = i;
388 int fl_get_bmtable_maxitems(FL_OBJECT *ob)
390 if ((BMTABLE_SPEC *)ob->spec)
391 return ((BMTABLE_SPEC *)ob->spec)->maxi;
397 void fl_replace_bmtable_item(FL_OBJECT */*ob*/, int /*id*/, int /*cw*/, int /*ch*/, char */*data*/)
399 fprintf(stderr, "Replace bmtable item: Sorry, not yet implemented!\n");
403 void fl_get_bmtable_item(FL_OBJECT */*ob*/, int /*id*/, int */*cw*/, int */*ch*/, char */*data*/)
405 fprintf(stderr, "Get bmtable item: Sorry, not yet implemented!\n");
408 void fl_set_bmtable(FL_OBJECT *ob, int pushed, int pos)
410 if ((BMTABLE_SPEC *)ob->spec)
411 ((BMTABLE_SPEC *)ob->spec)->i = (pushed) ? pos: -1;
415 int fl_get_bmtable_numb(FL_OBJECT *ob)
417 if ((BMTABLE_SPEC *)ob->spec)
418 return ((BMTABLE_SPEC *)ob->spec)->mousebut;
424 Pixmap fl_get_bmtable_pixmap(FL_OBJECT *ob)
426 if ((BMTABLE_SPEC *)ob->spec)
427 return ((BMTABLE_SPEC *)ob->spec)->pix;
433 void fl_draw_bmtable_item(FL_OBJECT *ob, int i, Drawable d, int xx, int yy)
436 GC gc = fl_state[fl_get_vclass()].gc[0];
437 BMTABLE_SPEC *sp = (BMTABLE_SPEC *)ob->spec;
440 x = (i % sp->nx)*sp->dx + FL_abs(ob->bw);
441 y = (i/sp->nx)*sp->dy + FL_abs(ob->bw);
442 w = sp->dx-2*FL_abs(ob->bw);
443 h = sp->dy-2*FL_abs(ob->bw);
444 XCopyArea(fl_display, sp->pix, d, gc, x, y, w, h, xx, yy);
449 /* Free the current bitmap and pixmap in preparation for installing a new one */
450 void fl_free_bmtable_bitmap(FL_OBJECT *ob)
452 BMTABLE_SPEC *sp = (BMTABLE_SPEC *)ob->spec;
454 /* dump the temporary pixmap */
456 XFreePixmap(fl_display, sp->pix);
461 /* and free the space taken by bdata etc. */
462 if (sp && sp->bdata) {
468 /* Free the current pixmap in preparation for installing a new one */
469 /* This is needed when using data instead of files to set bitmaps */
470 void fl_free_bmtable_pixmap(FL_OBJECT *ob)
472 BMTABLE_SPEC *sp = (BMTABLE_SPEC *)ob->spec;
474 /* dump the temporary pixmap */
476 XFreePixmap(fl_display, sp->pix);