WINGs/wmisc.c

   1
   2 #include "WINGsP.h"
   3
   4 #include <wraster.h>
   5 #include <ctype.h>
   6
   7 void
   8 W_DrawRelief(W_Screen * scr, Drawable d, int x, int y, unsigned int width,
   9              unsigned int height, WMReliefType relief)
  10 {
  11         W_DrawReliefWithGC(scr, d, x, y, width, height, relief,
  12                            WMColorGC(scr->black), WMColorGC(scr->darkGray),
  13                            WMColorGC(scr->gray), WMColorGC(scr->white));
  14 }
  15
  16 void
  17 W_DrawReliefWithGC(W_Screen * scr, Drawable d, int x, int y, unsigned int width,
  18                    unsigned int height, WMReliefType relief, GC black, GC dark, GC light, GC white)
  19 {
  20         Display *dpy = scr->display;
  21         GC bgc;
  22         GC wgc;
  23         GC lgc;
  24         GC dgc;
  25
  26         switch (relief) {
  27         case WRSimple:
  28                 XDrawRectangle(dpy, d, black, x, y, width - 1, height - 1);
  29                 return;
  30
  31         case WRRaised:
  32                 bgc = black;
  33                 dgc = dark;
  34                 wgc = white;
  35                 lgc = light;
  36                 break;
  37
  38         case WRSunken:
  39                 wgc = dark;
  40                 lgc = black;
  41                 bgc = white;
  42                 dgc = light;
  43                 break;
  44
  45         case WRPushed:
  46                 lgc = wgc = black;
  47                 dgc = bgc = white;
  48                 break;
  49
  50         case WRRidge:
  51                 lgc = bgc = dark;
  52                 dgc = wgc = white;
  53                 break;
  54
  55         case WRGroove:
  56                 wgc = dgc = dark;
  57                 lgc = bgc = white;
  58                 break;
  59
  60         default:
  61                 return;
  62         }
  63         /* top left */
  64         XDrawLine(dpy, d, wgc, x, y, x + width - 1, y);
  65         if (width > 2 && relief != WRRaised && relief != WRPushed) {
  66                 XDrawLine(dpy, d, lgc, x + 1, y + 1, x + width - 3, y + 1);
  67         }
  68
  69         XDrawLine(dpy, d, wgc, x, y, x, y + height - 1);
  70         if (height > 2 && relief != WRRaised && relief != WRPushed) {
  71                 XDrawLine(dpy, d, lgc, x + 1, y + 1, x + 1, y + height - 3);
  72         }
  73
  74         /* bottom right */
  75         XDrawLine(dpy, d, bgc, x, y + height - 1, x + width - 1, y + height - 1);
  76         if (width > 2 && relief != WRPushed) {
  77                 XDrawLine(dpy, d, dgc, x + 1, y + height - 2, x + width - 2, y + height - 2);
  78         }
  79
  80         XDrawLine(dpy, d, bgc, x + width - 1, y, x + width - 1, y + height - 1);
  81         if (height > 2 && relief != WRPushed) {
  82                 XDrawLine(dpy, d, dgc, x + width - 2, y + 1, x + width - 2, y + height - 2);
  83         }
  84 }
  85
  86 static int findNextWord(char *text, int limit)
  87 {
  88         int pos, len;
  89
  90         len = strcspn(text, " \t\n\r");
  91         pos = len + strspn(text + len, " \t\n\r");
  92         if (pos > limit)
  93                 pos = limit;
  94
  95         return pos;
  96 }
  97
  98 static int fitText(char *text, WMFont * font, int width, int wrap)
  99 {
 100         int i, w, beforecrlf, word1, word2;
 101
 102         /* text length before first cr/lf */
 103         beforecrlf = strcspn(text, "\n");
 104
 105         if (!wrap || beforecrlf == 0)
 106                 return beforecrlf;
 107
 108         w = WMWidthOfString(font, text, beforecrlf);
 109         if (w <= width) {
 110                 /* text up to first crlf fits */
 111                 return beforecrlf;
 112         }
 113
 114         word1 = 0;
 115         while (1) {
 116                 word2 = word1 + findNextWord(text + word1, beforecrlf - word1);
 117                 if (word2 >= beforecrlf)
 118                         break;
 119                 w = WMWidthOfString(font, text, word2);
 120                 if (w > width)
 121                         break;
 122                 word1 = word2;
 123         }
 124
 125         for (i = word1; i < word2; i++) {
 126                 w = WMWidthOfString(font, text, i);
 127                 if (w > width) {
 128                         break;
 129                 }
 130         }
 131
 132         /* keep words complete if possible */
 133         if (!isspace(text[i]) && word1 > 0) {
 134                 i = word1;
 135         } else if (isspace(text[i]) && i < beforecrlf) {
 136                 /* keep space on current row, so new row has next word in column 1 */
 137                 i++;
 138         }
 139
 140         return i;
 141 }
 142
 143 int W_GetTextHeight(WMFont * font, char *text, int width, int wrap)
 144 {
 145         char *ptr = text;
 146         int count;
 147         int length = strlen(text);
 148         int h;
 149         int fheight = WMFontHeight(font);
 150
 151         h = 0;
 152         while (length > 0) {
 153                 count = fitText(ptr, font, width, wrap);
 154
 155                 h += fheight;
 156
 157                 if (isspace(ptr[count]))
 158                         count++;
 159
 160                 ptr += count;
 161                 length -= count;
 162         }
 163         return h;
 164 }
 165
 166 void
 167 W_PaintText(W_View * view, Drawable d, WMFont * font, int x, int y,
 168             int width, WMAlignment alignment, WMColor * color, int wrap, char *text, int length)
 169 {
 170         char *ptr = text;
 171         int line_width;
 172         int line_x;
 173         int count;
 174         int fheight = WMFontHeight(font);
 175
 176         while (length > 0) {
 177                 count = fitText(ptr, font, width, wrap);
 178
 179                 line_width = WMWidthOfString(font, ptr, count);
 180                 if (alignment == WALeft)
 181                         line_x = x;
 182                 else if (alignment == WARight)
 183                         line_x = x + width - line_width;
 184                 else
 185                         line_x = x + (width - line_width) / 2;
 186
 187                 WMDrawString(view->screen, d, color, font, line_x, y, ptr, count);
 188
 189                 if (wrap && ptr[count] != '\n')
 190                         y += fheight;
 191
 192                 while (ptr[count] && ptr[count] == '\n') {
 193                         y += fheight;
 194                         count++;
 195                 }
 196
 197                 ptr += count;
 198                 length -= count;
 199         }
 200 }
 201
 202 void
 203 W_PaintTextAndImage(W_View * view, int wrap, WMColor * textColor, W_Font * font,
 204                     WMReliefType relief, char *text,
 205                     WMAlignment alignment, W_Pixmap * image,
 206                     WMImagePosition position, WMColor * backColor, int ofs)
 207 {
 208         W_Screen *screen = view->screen;
 209         int ix, iy;
 210         int x, y, w, h;
 211         Drawable d = view->window;
 212
 213 #ifdef DOUBLE_BUFFER
 214         d = XCreatePixmap(screen->display, view->window, view->size.width, view->size.height, screen->depth);
 215 #endif
 216
 217         /* background */
 218         if (backColor) {
 219                 XFillRectangle(screen->display, d, WMColorGC(backColor),
 220                                0, 0, view->size.width, view->size.height);
 221         } else {
 222 #ifndef DOUBLE_BUFFER
 223                 XClearWindow(screen->display, d);
 224 #else
 225                 XSetForeground(screen->display, screen->copyGC, view->attribs.background_pixel);
 226                 XFillRectangle(screen->display, d, screen->copyGC, 0, 0, view->size.width, view->size.height);
 227 #endif
 228         }
 229
 230         if (relief == WRFlat) {
 231                 x = 0;
 232                 y = 0;
 233                 w = view->size.width;
 234                 h = view->size.height;
 235         } else {
 236                 x = 1;
 237                 y = 1;
 238                 w = view->size.width - 3;
 239                 h = view->size.height - 3;
 240         }
 241
 242         /* calc. image alignment */
 243         if (position != WIPNoImage && image != NULL) {
 244                 switch (position) {
 245                 case WIPOverlaps:
 246                 case WIPImageOnly:
 247                         ix = (view->size.width - image->width) / 2;
 248                         iy = (view->size.height - image->height) / 2;
 249                         /*
 250                            x = 2;
 251                            y = 0;
 252                          */
 253                         break;
 254
 255                 case WIPLeft:
 256                         ix = x;
 257                         iy = y + (h - image->height) / 2;
 258                         x = x + image->width + 5;
 259                         y = 0;
 260                         w -= image->width + 5;
 261                         break;
 262
 263                 case WIPRight:
 264                         ix = view->size.width - image->width - x;
 265                         iy = y + (h - image->height) / 2;
 266                         w -= image->width + 5;
 267                         break;
 268
 269                 case WIPBelow:
 270                         ix = (view->size.width - image->width) / 2;
 271                         iy = h - image->height;
 272                         y = 0;
 273                         h -= image->height;
 274                         break;
 275
 276                 default:
 277                 case WIPAbove:
 278                         ix = (view->size.width - image->width) / 2;
 279                         iy = y;
 280                         y = image->height;
 281                         h -= image->height;
 282                         break;
 283                 }
 284
 285                 ix += ofs;
 286                 iy += ofs;
 287
 288                 XSetClipOrigin(screen->display, screen->clipGC, ix, iy);
 289                 XSetClipMask(screen->display, screen->clipGC, image->mask);
 290
 291                 if (image->depth == 1)
 292                         XCopyPlane(screen->display, image->pixmap, d, screen->clipGC,
 293                                    0, 0, image->width, image->height, ix, iy, 1);
 294                 else
 295                         XCopyArea(screen->display, image->pixmap, d, screen->clipGC,
 296                                   0, 0, image->width, image->height, ix, iy);
 297         }
 298
 299         /* draw text */
 300         if (position != WIPImageOnly && text != NULL) {
 301                 int textHeight;
 302
 303                 textHeight = W_GetTextHeight(font, text, w - 8, wrap);
 304                 W_PaintText(view, d, font, x + ofs + 4, y + ofs + (h - textHeight) / 2, w - 8,
 305                             alignment, textColor, wrap, text, strlen(text));
 306         }
 307
 308         /* draw relief */
 309         W_DrawRelief(screen, d, 0, 0, view->size.width, view->size.height, relief);
 310
 311 #ifdef DOUBLE_BUFFER
 312         XCopyArea(screen->display, d, view->window, screen->copyGC, 0, 0,
 313                   view->size.width, view->size.height, 0, 0);
 314         XFreePixmap(screen->display, d);
 315 #endif
 316 }
 317
 318 WMPoint wmkpoint(int x, int y)
 319 {
 320         WMPoint point;
 321
 322         point.x = x;
 323         point.y = y;
 324
 325         return point;
 326 }
 327
 328 WMSize wmksize(unsigned int width, unsigned int height)
 329 {
 330         WMSize size;
 331
 332         size.width = width;
 333         size.height = height;
 334
 335         return size;
 336 }
 337
 338 WMRect wmkrect(int x, int y, unsigned int width, unsigned int height)
 339 {
 340         WMRect rect;
 341
 342         rect.pos.x = x;
 343         rect.pos.y = y;
 344         rect.size.width = width;
 345         rect.size.height = height;
 346
 347         return rect;
 348 }