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
  91
  92 static int
  93 fitText(char *text, WMFont *font, int width, int wrap)
  94 {
  95     int i, j;
  96     int w;
  97
  98     if (text[0]==0)
  99         return 0;
 100     i = 0;
 101     if (wrap) {
 102         do {
 103             i++;
 104             w = WMWidthOfString(font, text, i);
 105         } while (w < width && text[i]!='\n' && text[i]!=0);
 106
 107         /* keep words complete */
 108         if (!isspace(text[i])) {
 109             j = i;
 110             while (j>1 && !isspace(text[j]) && text[j]!=0)
 111                 j--;
 112             if (j>1)
 113                 i = j;
 114         }
 115     } else {
 116         while (text[i]!='\n' && text[i]!=0)
 117             i++;
 118     }
 119
 120     return i;
 121 }
 122
 123
 124 int
 125 W_GetTextHeight(WMFont *font, char *text, int width, int wrap)
 126 {
 127     char *ptr = text;
 128     int count;
 129     int length = strlen(text);
 130     int h;
 131     int fheight = WMFontHeight(font);
 132
 133     h = 0;
 134     while (length > 0) {
 135         count = fitText(ptr, font, width, wrap);
 136
 137         h += fheight;
 138
 139         if (isspace(ptr[count]))
 140             count++;
 141
 142         ptr += count;
 143         length -= count;
 144     }
 145     return h;
 146 }
 147
 148
 149 void
 150 W_PaintText(W_View *view, Drawable d, WMFont *font,  int x, int y,
 151             int width, WMAlignment alignment, GC gc,
 152             int wrap, char *text, int length)
 153 {
 154     char *ptr = text;
 155     int line_width;
 156     int line_x;
 157     int count;
 158     int fheight = WMFontHeight(font);
 159
 160     while (length > 0) {
 161         count = fitText(ptr, font, width, wrap);
 162
 163         line_width = WMWidthOfString(font, ptr, count);
 164         if (alignment==WALeft)
 165             line_x = x;
 166         else if (alignment==WARight)
 167             line_x = x + width - line_width;
 168         else
 169             line_x = x + (width - line_width) / 2;
 170
 171         WMDrawString(view->screen, d, gc, font, line_x, y, ptr, count);
 172
 173         y += fheight;
 174
 175         if (isspace(ptr[count]))
 176             count++;
 177
 178         ptr += count;
 179         length -= count;
 180     }
 181 }
 182
 183
 184 void
 185 W_PaintTextAndImage(W_View *view, int wrap, GC textGC, W_Font *font,
 186                     WMReliefType relief, char *text,
 187                     WMAlignment alignment,  W_Pixmap *image,
 188                     WMImagePosition position, GC backGC, int ofs)
 189 {
 190     W_Screen *screen = view->screen;
 191     int ix, iy;
 192     int x, y, w, h;
 193     Drawable d = view->window;
 194
 195
 196 #ifdef DOUBLE_BUFFER
 197     d = XCreatePixmap(screen->display, view->window,
 198                       view->size.width, view->size.height, screen->depth);
 199 #endif
 200
 201     /* background */
 202 #ifndef DOUBLE_BUFFER
 203     if (backGC) {
 204         XFillRectangle(screen->display, d, backGC,
 205                        0, 0, view->size.width, view->size.height);
 206     } else {
 207         XClearWindow(screen->display, d);
 208     }
 209 #else
 210     if (backGC)
 211         XFillRectangle(screen->display, d, backGC, 0, 0,
 212                        view->size.width, view->size.height);
 213     else {
 214         XSetForeground(screen->display, screen->copyGC,
 215                        view->attribs.background_pixel);
 216         XFillRectangle(screen->display, d, screen->copyGC, 0, 0,
 217                        view->size.width, view->size.height);
 218     }
 219 #endif
 220
 221
 222     if (relief == WRFlat) {
 223         x = 0;
 224         y = 0;
 225         w = view->size.width;
 226         h = view->size.height;
 227     } else {
 228         x = 2;
 229         y = 2;
 230         w = view->size.width - 4;
 231         h = view->size.height - 4;
 232     }
 233
 234     /* calc. image alignment */
 235     if (position!=WIPNoImage && image!=NULL) {
 236         switch (position) {
 237          case WIPOverlaps:
 238          case WIPImageOnly:
 239             ix = (view->size.width - image->width) / 2;
 240             iy = (view->size.height - image->height) / 2;
 241             /*
 242             x = 2;
 243             y = 0;
 244              */
 245             break;
 246
 247          case WIPLeft:
 248             ix = x;
 249             iy = y + (h - image->height) / 2;
 250             x = x + image->width + 5;
 251             y = 0;
 252             w -= image->width + 5;
 253             break;
 254
 255          case WIPRight:
 256             ix = view->size.width - image->width - x;
 257             iy = y + (h - image->height) / 2;
 258             w -= image->width + 5;
 259             break;
 260
 261          case WIPBelow:
 262             ix = (view->size.width - image->width) / 2;
 263             iy = h - image->height;
 264             y = 0;
 265             h -= image->height;
 266             break;
 267
 268          default:
 269          case WIPAbove:
 270             ix = (view->size.width - image->width) / 2;
 271             iy = y;
 272             y = image->height;
 273             h -= image->height;
 274             break;
 275         }
 276
 277         ix += ofs;
 278         iy += ofs;
 279
 280         XSetClipOrigin(screen->display, screen->clipGC, ix, iy);
 281         XSetClipMask(screen->display, screen->clipGC, image->mask);
 282
 283         if (image->depth==1)
 284             XCopyPlane(screen->display, image->pixmap, d, screen->clipGC,
 285                        0, 0, image->width, image->height, ix, iy, 1);
 286         else
 287             XCopyArea(screen->display, image->pixmap, d, screen->clipGC,
 288                       0, 0, image->width, image->height, ix, iy);
 289     }
 290
 291     /* draw text */
 292     if (position != WIPImageOnly && text!=NULL) {
 293         int textHeight;
 294
 295         textHeight = W_GetTextHeight(font, text, w-8, wrap);
 296         W_PaintText(view, d, font, x+ofs+4, y+ofs + (h-textHeight)/2, w-8,
 297                     alignment, textGC, wrap, text, strlen(text));
 298     }
 299
 300
 301     /* draw relief */
 302     W_DrawRelief(screen, d, 0, 0, view->size.width, view->size.height, relief);
 303
 304 #ifdef DOUBLE_BUFFER
 305     XCopyArea(screen->display, d, view->window, screen->copyGC, 0, 0,
 306               view->size.width, view->size.height, 0, 0);
 307     XFreePixmap(screen->display, d);
 308 #endif
 309 }
 310
 311
 312
 313 WMRange
 314 wmkrange(int start, int count)
 315 {
 316     WMRange range;
 317
 318     range.position = start;
 319     range.count = count;
 320
 321     return range;
 322 }
 323
 324
 325 WMPoint
 326 wmkpoint(int x, int y)
 327 {
 328     WMPoint point;
 329
 330     point.x = x;
 331     point.y = y;
 332
 333     return point;
 334 }
 335
 336
 337 WMSize
 338 wmksize(unsigned int width, unsigned int height)
 339 {
 340     WMSize size;
 341
 342     size.width = width;
 343     size.height = height;
 344
 345     return size;
 346 }
 347
 348
 349
 350
 351