many bug fixes, finished some delegate code, updated menu file bug from EXEC
[wmaker-crm.git] / WINGs / wlabel.c
blob1b0ef5216fae278fc6c8b7a1755f7bc9d295d9ec
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 free(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 free(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);
173 void
174 WMSetLabelWraps(WMLabel *lPtr, Bool flag)
176 if (lPtr->flags.noWrap != !flag) {
177 lPtr->flags.noWrap = !flag;
178 if (lPtr->view->flags.realized)
179 paintLabel(lPtr);
184 static void
185 paintLabel(Label *lPtr)
187 W_Screen *scrPtr = lPtr->view->screen;
188 GC gc;
190 if (lPtr->textColor)
191 gc = WMColorGC(lPtr->textColor);
192 else
193 gc = WMColorGC(scrPtr->black);
195 W_PaintTextAndImage(lPtr->view, !lPtr->flags.noWrap, gc,
196 (lPtr->font!=NULL ? lPtr->font : scrPtr->normalFont),
197 lPtr->flags.relief, lPtr->caption,
198 lPtr->flags.alignment, lPtr->image,
199 lPtr->flags.imagePosition, NULL, 0);
204 static void
205 handleEvents(XEvent *event, void *data)
207 Label *lPtr = (Label*)data;
209 CHECK_CLASS(data, WC_Label);
212 switch (event->type) {
213 case Expose:
214 if (event->xexpose.count!=0)
215 break;
216 paintLabel(lPtr);
217 break;
219 case DestroyNotify:
220 destroyLabel(lPtr);
221 break;
226 static void
227 destroyLabel(Label *lPtr)
229 if (lPtr->textColor)
230 WMReleaseColor(lPtr->textColor);
232 if (lPtr->caption)
233 free(lPtr->caption);
235 if (lPtr->font)
236 WMReleaseFont(lPtr->font);
238 if (lPtr->image)
239 WMReleasePixmap(lPtr->image);
241 free(lPtr);