Mouse wheel code enhancement (need to check if its correctly implemented)
[wmaker-crm.git] / WINGs / wlabel.c
blob6e1580460088e3e65c3e8a59c38efed05083ac3f
5 #include "WINGsP.h"
9 typedef struct W_Label {
10 W_Class widgetClass;
11 W_View *view;
13 char *caption;
15 WMColor *textColor;
16 WMFont *font; /* if NULL, use default */
18 W_Pixmap *image;
20 struct {
21 WMReliefType relief:3;
22 WMImagePosition imagePosition:4;
23 WMAlignment alignment:2;
25 unsigned int noWrap:1;
27 unsigned int redrawPending:1;
28 } flags;
29 } Label;
32 #define DEFAULT_WIDTH 60
33 #define DEFAULT_HEIGHT 14
34 #define DEFAULT_ALIGNMENT WALeft
35 #define DEFAULT_RELIEF WRFlat
36 #define DEFAULT_IMAGE_POSITION WIPNoImage
39 static void destroyLabel(Label *lPtr);
40 static void paintLabel(Label *lPtr);
43 static void handleEvents(XEvent *event, void *data);
46 WMLabel*
47 WMCreateLabel(WMWidget *parent)
49 Label *lPtr;
51 lPtr = wmalloc(sizeof(Label));
52 memset(lPtr, 0, sizeof(Label));
54 lPtr->widgetClass = WC_Label;
56 lPtr->view = W_CreateView(W_VIEW(parent));
57 if (!lPtr->view) {
58 wfree(lPtr);
59 return NULL;
61 lPtr->view->self = lPtr;
63 lPtr->textColor = WMRetainColor(lPtr->view->screen->black);
65 WMCreateEventHandler(lPtr->view, ExposureMask|StructureNotifyMask,
66 handleEvents, lPtr);
68 W_ResizeView(lPtr->view, DEFAULT_WIDTH, DEFAULT_HEIGHT);
69 lPtr->flags.alignment = DEFAULT_ALIGNMENT;
70 lPtr->flags.relief = DEFAULT_RELIEF;
71 lPtr->flags.imagePosition = DEFAULT_IMAGE_POSITION;
73 return lPtr;
77 void
78 WMSetLabelImage(WMLabel *lPtr, WMPixmap *image)
80 if (lPtr->image!=NULL)
81 WMReleasePixmap(lPtr->image);
83 if (image)
84 lPtr->image = WMRetainPixmap(image);
85 else
86 lPtr->image = NULL;
88 if (lPtr->view->flags.realized) {
89 paintLabel(lPtr);
94 WMPixmap*
95 WMGetLabelImage(WMLabel *lPtr)
97 return lPtr->image;
101 void
102 WMSetLabelImagePosition(WMLabel *lPtr, WMImagePosition position)
104 lPtr->flags.imagePosition = position;
105 if (lPtr->view->flags.realized) {
106 paintLabel(lPtr);
111 void
112 WMSetLabelTextAlignment(WMLabel *lPtr, WMAlignment alignment)
114 lPtr->flags.alignment = alignment;
115 if (lPtr->view->flags.realized) {
116 paintLabel(lPtr);
121 void
122 WMSetLabelRelief(WMLabel *lPtr, WMReliefType relief)
124 lPtr->flags.relief = relief;
125 if (lPtr->view->flags.realized) {
126 paintLabel(lPtr);
131 void
132 WMSetLabelText(WMLabel *lPtr, char *text)
134 if (lPtr->caption)
135 wfree(lPtr->caption);
137 if (text!=NULL) {
138 lPtr->caption = wstrdup(text);
139 } else {
140 lPtr->caption = NULL;
142 if (lPtr->view->flags.realized) {
143 paintLabel(lPtr);
148 void
149 WMSetLabelFont(WMLabel *lPtr, WMFont *font)
151 if (lPtr->font!=NULL)
152 WMReleaseFont(lPtr->font);
153 if (font)
154 lPtr->font = WMRetainFont(font);
155 else
156 lPtr->font = NULL;
158 if (lPtr->view->flags.realized) {
159 paintLabel(lPtr);
164 void
165 WMSetLabelTextColor(WMLabel *lPtr, WMColor *color)
167 if (lPtr->textColor)
168 WMReleaseColor(lPtr->textColor);
169 lPtr->textColor = WMRetainColor(color);
171 if (lPtr->view->flags.realized) {
172 paintLabel(lPtr);
177 void
178 WMSetLabelWraps(WMLabel *lPtr, Bool flag)
180 if (lPtr->flags.noWrap != !flag) {
181 lPtr->flags.noWrap = !flag;
182 if (lPtr->view->flags.realized)
183 paintLabel(lPtr);
188 static void
189 paintLabel(Label *lPtr)
191 W_Screen *scrPtr = lPtr->view->screen;
192 GC gc;
194 if (lPtr->textColor)
195 gc = WMColorGC(lPtr->textColor);
196 else
197 gc = WMColorGC(scrPtr->black);
199 W_PaintTextAndImage(lPtr->view, !lPtr->flags.noWrap, gc,
200 (lPtr->font!=NULL ? lPtr->font : scrPtr->normalFont),
201 lPtr->flags.relief, lPtr->caption,
202 lPtr->flags.alignment, lPtr->image,
203 lPtr->flags.imagePosition, NULL, 0);
208 static void
209 handleEvents(XEvent *event, void *data)
211 Label *lPtr = (Label*)data;
213 CHECK_CLASS(data, WC_Label);
216 switch (event->type) {
217 case Expose:
218 if (event->xexpose.count!=0)
219 break;
220 paintLabel(lPtr);
221 break;
223 case DestroyNotify:
224 destroyLabel(lPtr);
225 break;
230 static void
231 destroyLabel(Label *lPtr)
233 if (lPtr->textColor)
234 WMReleaseColor(lPtr->textColor);
236 if (lPtr->caption)
237 wfree(lPtr->caption);
239 if (lPtr->font)
240 WMReleaseFont(lPtr->font);
242 if (lPtr->image)
243 WMReleasePixmap(lPtr->image);
245 wfree(lPtr);