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 #ifdef OLD_CODE
 144 static int fitText(char *text, WMFont * font, int width, int wrap)
 145 {
 146         int i, j;
 147         int w;
 148
 149         if (text[0] == 0)
 150                 return 0;
 151
 152         i = 0;
 153         if (wrap) {
 154                 if (text[0] == '\n')
 155                         return 0;
 156
 157                 do {
 158                         i++;
 159                         w = WMWidthOfString(font, text, i);
 160                 } while (w < width && text[i] != '\n' && text[i] != 0);
 161
 162                 if (text[i] == '\n')
 163                         return i;
 164
 165                 /* keep words complete */
 166                 if (!isspace(text[i])) {
 167                         j = i;
 168                         while (j > 1 && !isspace(text[j]) && text[j] != 0)
 169                                 j--;
 170                         if (j > 1)
 171                                 i = j;
 172                 }
 173         } else {
 174                 i = strcspn(text, "\n");
 175         }
 176         return i;
 177 }
 178 #endif
 179
 180 int W_GetTextHeight(WMFont * font, char *text, int width, int wrap)
 181 {
 182         char *ptr = text;
 183         int count;
 184         int length = strlen(text);
 185         int h;
 186         int fheight = WMFontHeight(font);
 187
 188         h = 0;
 189         while (length > 0) {
 190                 count = fitText(ptr, font, width, wrap);
 191
 192                 h += fheight;
 193
 194                 if (isspace(ptr[count]))
 195                         count++;
 196
 197                 ptr += count;
 198                 length -= count;
 199         }
 200         return h;
 201 }
 202
 203 void
 204 W_PaintText(W_View * view, Drawable d, WMFont * font, int x, int y,
 205             int width, WMAlignment alignment, WMColor * color, int wrap, char *text, int length)
 206 {
 207         char *ptr = text;
 208         int line_width;
 209         int line_x;
 210         int count;
 211         int fheight = WMFontHeight(font);
 212
 213         while (length > 0) {
 214                 count = fitText(ptr, font, width, wrap);
 215
 216                 line_width = WMWidthOfString(font, ptr, count);
 217                 if (alignment == WALeft)
 218                         line_x = x;
 219                 else if (alignment == WARight)
 220                         line_x = x + width - line_width;
 221                 else
 222                         line_x = x + (width - line_width) / 2;
 223
 224                 WMDrawString(view->screen, d, color, font, line_x, y, ptr, count);
 225
 226                 if (wrap && ptr[count] != '\n')
 227                         y += fheight;
 228
 229                 while (ptr[count] && ptr[count] == '\n') {
 230                         y += fheight;
 231                         count++;
 232                 }
 233
 234                 ptr += count;
 235                 length -= count;
 236         }
 237 }
 238
 239 void
 240 W_PaintTextAndImage(W_View * view, int wrap, WMColor * textColor, W_Font * font,
 241                     WMReliefType relief, char *text,
 242                     WMAlignment alignment, W_Pixmap * image,
 243                     WMImagePosition position, WMColor * backColor, int ofs)
 244 {
 245         W_Screen *screen = view->screen;
 246         int ix, iy;
 247         int x, y, w, h;
 248         Drawable d = view->window;
 249
 250 #ifdef DOUBLE_BUFFER
 251         d = XCreatePixmap(screen->display, view->window, view->size.width, view->size.height, screen->depth);
 252 #endif
 253
 254         /* background */
 255         if (backColor) {
 256                 XFillRectangle(screen->display, d, WMColorGC(backColor),
 257                                0, 0, view->size.width, view->size.height);
 258         } else {
 259 #ifndef DOUBLE_BUFFER
 260                 XClearWindow(screen->display, d);
 261 #else
 262                 XSetForeground(screen->display, screen->copyGC, view->attribs.background_pixel);
 263                 XFillRectangle(screen->display, d, screen->copyGC, 0, 0, view->size.width, view->size.height);
 264 #endif
 265         }
 266
 267         if (relief == WRFlat) {
 268                 x = 0;
 269                 y = 0;
 270                 w = view->size.width;
 271                 h = view->size.height;
 272         } else {
 273                 x = 1;
 274                 y = 1;
 275                 w = view->size.width - 3;
 276                 h = view->size.height - 3;
 277         }
 278
 279         /* calc. image alignment */
 280         if (position != WIPNoImage && image != NULL) {
 281                 switch (position) {
 282                 case WIPOverlaps:
 283                 case WIPImageOnly:
 284                         ix = (view->size.width - image->width) / 2;
 285                         iy = (view->size.height - image->height) / 2;
 286                         /*
 287                            x = 2;
 288                            y = 0;
 289                          */
 290                         break;
 291
 292                 case WIPLeft:
 293                         ix = x;
 294                         iy = y + (h - image->height) / 2;
 295                         x = x + image->width + 5;
 296                         y = 0;
 297                         w -= image->width + 5;
 298                         break;
 299
 300                 case WIPRight:
 301                         ix = view->size.width - image->width - x;
 302                         iy = y + (h - image->height) / 2;
 303                         w -= image->width + 5;
 304                         break;
 305
 306                 case WIPBelow:
 307                         ix = (view->size.width - image->width) / 2;
 308                         iy = h - image->height;
 309                         y = 0;
 310                         h -= image->height;
 311                         break;
 312
 313                 default:
 314                 case WIPAbove:
 315                         ix = (view->size.width - image->width) / 2;
 316                         iy = y;
 317                         y = image->height;
 318                         h -= image->height;
 319                         break;
 320                 }
 321
 322                 ix += ofs;
 323                 iy += ofs;
 324
 325                 XSetClipOrigin(screen->display, screen->clipGC, ix, iy);
 326                 XSetClipMask(screen->display, screen->clipGC, image->mask);
 327
 328                 if (image->depth == 1)
 329                         XCopyPlane(screen->display, image->pixmap, d, screen->clipGC,
 330                                    0, 0, image->width, image->height, ix, iy, 1);
 331                 else
 332                         XCopyArea(screen->display, image->pixmap, d, screen->clipGC,
 333                                   0, 0, image->width, image->height, ix, iy);
 334         }
 335
 336         /* draw text */
 337         if (position != WIPImageOnly && text != NULL) {
 338                 int textHeight;
 339
 340                 textHeight = W_GetTextHeight(font, text, w - 8, wrap);
 341                 W_PaintText(view, d, font, x + ofs + 4, y + ofs + (h - textHeight) / 2, w - 8,
 342                             alignment, textColor, wrap, text, strlen(text));
 343         }
 344
 345         /* draw relief */
 346         W_DrawRelief(screen, d, 0, 0, view->size.width, view->size.height, relief);
 347
 348 #ifdef DOUBLE_BUFFER
 349         XCopyArea(screen->display, d, view->window, screen->copyGC, 0, 0,
 350                   view->size.width, view->size.height, 0, 0);
 351         XFreePixmap(screen->display, d);
 352 #endif
 353 }
 354
 355 WMPoint wmkpoint(int x, int y)
 356 {
 357         WMPoint point;
 358
 359         point.x = x;
 360         point.y = y;
 361
 362         return point;
 363 }
 364
 365 WMSize wmksize(unsigned int width, unsigned int height)
 366 {
 367         WMSize size;
 368
 369         size.width = width;
 370         size.height = height;
 371
 372         return size;
 373 }
 374
 375 WMRect wmkrect(int x, int y, unsigned int width, unsigned int height)
 376 {
 377         WMRect rect;
 378
 379         rect.pos.x = x;
 380         rect.pos.y = y;
 381         rect.size.width = width;
 382         rect.size.height = height;
 383
 384         return rect;
 385 }