WINGs/wmisc.c

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