WINGs/wbrowser.c

   1
   2 #include "WINGsP.h"
   3 #include <math.h>               /* for : double rint (double) */
   4
   5 typedef struct W_Browser {
   6         W_Class widgetClass;
   7         W_View *view;
   8
   9         char **titles;
  10         WMList **columns;
  11
  12         short columnCount;
  13         short usedColumnCount;  /* columns actually being used */
  14         short minColumnWidth;
  15
  16         short maxVisibleColumns;
  17         short firstVisibleColumn;
  18
  19         short titleHeight;
  20
  21         short selectedColumn;
  22
  23         WMSize columnSize;
  24
  25         void *clientData;
  26         WMAction *action;
  27         void *doubleClientData;
  28         WMAction *doubleAction;
  29
  30         WMBrowserDelegate *delegate;
  31
  32         WMScroller *scroller;
  33
  34         char *pathSeparator;
  35
  36         struct {
  37                 unsigned int isTitled:1;
  38                 unsigned int allowMultipleSelection:1;
  39                 unsigned int allowEmptySelection:1;
  40                 unsigned int hasScroller:1;
  41
  42                 /* */
  43                 unsigned int loaded:1;
  44                 unsigned int loadingColumn:1;
  45         } flags;
  46 } Browser;
  47
  48 #define COLUMN_SPACING  4
  49 #define TITLE_SPACING 2
  50
  51 #define DEFAULT_WIDTH                 305
  52 #define DEFAULT_HEIGHT                200
  53 #define DEFAULT_HAS_SCROLLER          True
  54 #define DEFAULT_TITLE_HEIGHT          20
  55 #define DEFAULT_IS_TITLED             True
  56 #define DEFAULT_MAX_VISIBLE_COLUMNS   2
  57 #define DEFAULT_SEPARATOR             "/"
  58
  59 #define MIN_VISIBLE_COLUMNS           1
  60 #define MAX_VISIBLE_COLUMNS           32
  61
  62 #define COLUMN_IS_VISIBLE(b, c) ((c) >= (b)->firstVisibleColumn \
  63     && (c) < (b)->firstVisibleColumn + (b)->maxVisibleColumns)
  64
  65 static void handleEvents(XEvent * event, void *data);
  66 static void destroyBrowser(WMBrowser * bPtr);
  67
  68 static void setupScroller(WMBrowser * bPtr);
  69
  70 static void scrollToColumn(WMBrowser * bPtr, int column, Bool updateScroller);
  71
  72 static void paintItem(WMList * lPtr, int index, Drawable d, char *text, int state, WMRect * rect);
  73
  74 static void loadColumn(WMBrowser * bPtr, int column);
  75
  76 static void removeColumn(WMBrowser * bPtr, int column);
  77
  78 static char *createTruncatedString(WMFont * font, const char *text, int *textLen, int width);
  79
  80 static void willResizeBrowser(W_ViewDelegate *, WMView *, unsigned int *, unsigned int *);
  81
  82 W_ViewDelegate _BrowserViewDelegate = {
  83         NULL,
  84         NULL,
  85         NULL,
  86         NULL,
  87         willResizeBrowser
  88 };
  89
  90 WMBrowser *WMCreateBrowser(WMWidget * parent)
  91 {
  92         WMBrowser *bPtr;
  93         int i;
  94
  95         wassertrv(parent, NULL);
  96
  97         bPtr = wmalloc(sizeof(WMBrowser));
  98
  99         bPtr->widgetClass = WC_Browser;
 100
 101         bPtr->view = W_CreateView(W_VIEW(parent));
 102         if (!bPtr->view) {
 103                 wfree(bPtr);
 104                 return NULL;
 105         }
 106         bPtr->view->self = bPtr;
 107
 108         bPtr->view->delegate = &_BrowserViewDelegate;
 109
 110         WMCreateEventHandler(bPtr->view, ExposureMask | StructureNotifyMask
 111                              | ClientMessageMask, handleEvents, bPtr);
 112
 113         /* default configuration */
 114         bPtr->flags.hasScroller = DEFAULT_HAS_SCROLLER;
 115
 116         bPtr->titleHeight = DEFAULT_TITLE_HEIGHT;
 117         bPtr->flags.isTitled = DEFAULT_IS_TITLED;
 118         bPtr->maxVisibleColumns = DEFAULT_MAX_VISIBLE_COLUMNS;
 119
 120         WMResizeWidget(bPtr, DEFAULT_WIDTH, DEFAULT_HEIGHT);
 121
 122         bPtr->pathSeparator = wstrdup(DEFAULT_SEPARATOR);
 123
 124         if (bPtr->flags.hasScroller)
 125                 setupScroller(bPtr);
 126
 127         for (i = 0; i < bPtr->maxVisibleColumns; i++) {
 128                 WMAddBrowserColumn(bPtr);
 129         }
 130         bPtr->usedColumnCount = 0;
 131
 132         bPtr->selectedColumn = -1;
 133
 134         return bPtr;
 135 }
 136
 137 void WMSetBrowserAllowMultipleSelection(WMBrowser * bPtr, Bool flag)
 138 {
 139         int i;
 140
 141         bPtr->flags.allowMultipleSelection = ((flag == 0) ? 0 : 1);
 142         for (i = 0; i < bPtr->columnCount; i++) {
 143                 WMSetListAllowMultipleSelection(bPtr->columns[i], flag);
 144         }
 145 }
 146
 147 void WMSetBrowserAllowEmptySelection(WMBrowser * bPtr, Bool flag)
 148 {
 149         int i;
 150
 151         bPtr->flags.allowEmptySelection = ((flag == 0) ? 0 : 1);
 152         for (i = 0; i < bPtr->columnCount; i++) {
 153                 WMSetListAllowEmptySelection(bPtr->columns[i], flag);
 154         }
 155 }
 156
 157 int WMGetBrowserMaxVisibleColumns(WMBrowser * bPtr)
 158 {
 159         return bPtr->maxVisibleColumns;
 160 }
 161
 162 void WMSetBrowserMaxVisibleColumns(WMBrowser * bPtr, int columns)
 163 {
 164         int curMaxVisibleColumns;
 165         int newFirstVisibleColumn = 0;
 166
 167         assert(bPtr != NULL);
 168
 169         columns = (columns < MIN_VISIBLE_COLUMNS) ? MIN_VISIBLE_COLUMNS : columns;
 170         columns = (columns > MAX_VISIBLE_COLUMNS) ? MAX_VISIBLE_COLUMNS : columns;
 171         if (columns == bPtr->maxVisibleColumns) {
 172                 return;
 173         }
 174         curMaxVisibleColumns = bPtr->maxVisibleColumns;
 175         bPtr->maxVisibleColumns = columns;
 176         /* browser not loaded */
 177         if (!bPtr->flags.loaded) {
 178                 if ((columns > curMaxVisibleColumns) && (columns > bPtr->columnCount)) {
 179                         int i = columns - bPtr->columnCount;
 180                         bPtr->usedColumnCount = bPtr->columnCount;
 181                         while (i--) {
 182                                 WMAddBrowserColumn(bPtr);
 183                         }
 184                         bPtr->usedColumnCount = 0;
 185                 }
 186                 /* browser loaded and columns > curMaxVisibleColumns */
 187         } else if (columns > curMaxVisibleColumns) {
 188                 if (bPtr->usedColumnCount > columns) {
 189                         newFirstVisibleColumn = bPtr->usedColumnCount - columns;
 190                 }
 191                 if (newFirstVisibleColumn > bPtr->firstVisibleColumn) {
 192                         newFirstVisibleColumn = bPtr->firstVisibleColumn;
 193                 }
 194                 if (columns > bPtr->columnCount) {
 195                         int i = columns - bPtr->columnCount;
 196                         int curUsedColumnCount = bPtr->usedColumnCount;
 197                         bPtr->usedColumnCount = bPtr->columnCount;
 198                         while (i--) {
 199                                 WMAddBrowserColumn(bPtr);
 200                         }
 201                         bPtr->usedColumnCount = curUsedColumnCount;
 202                 }
 203                 /* browser loaded and columns < curMaxVisibleColumns */
 204         } else {
 205                 newFirstVisibleColumn = bPtr->firstVisibleColumn;
 206                 if (newFirstVisibleColumn + columns >= bPtr->usedColumnCount) {
 207                         removeColumn(bPtr, newFirstVisibleColumn + columns);
 208                 }
 209         }
 210         WMResizeWidget(bPtr, bPtr->view->size.width, bPtr->view->size.height);
 211         if (bPtr->flags.loaded) {
 212                 XClearArea(bPtr->view->screen->display, bPtr->view->window, 0, 0,
 213                            bPtr->view->size.width, bPtr->titleHeight, False);
 214                 scrollToColumn(bPtr, newFirstVisibleColumn, True);
 215         }
 216 }
 217
 218 int WMGetBrowserNumberOfColumns(WMBrowser * bPtr)
 219 {
 220         return bPtr->usedColumnCount;
 221 }
 222
 223 void WMSetBrowserPathSeparator(WMBrowser * bPtr, const char *separator)
 224 {
 225         if (bPtr->pathSeparator)
 226                 wfree(bPtr->pathSeparator);
 227         bPtr->pathSeparator = wstrdup(separator);
 228 }
 229
 230 static void drawTitleOfColumn(WMBrowser * bPtr, int column)
 231 {
 232         WMScreen *scr = bPtr->view->screen;
 233         int x;
 234
 235         x = (column - bPtr->firstVisibleColumn) * (bPtr->columnSize.width + COLUMN_SPACING);
 236
 237         XFillRectangle(scr->display, bPtr->view->window, WMColorGC(scr->darkGray), x, 0,
 238                        bPtr->columnSize.width, bPtr->titleHeight);
 239         W_DrawRelief(scr, bPtr->view->window, x, 0, bPtr->columnSize.width, bPtr->titleHeight, WRSunken);
 240
 241         if (column < bPtr->usedColumnCount && bPtr->titles[column]) {
 242                 int titleLen = strlen(bPtr->titles[column]);
 243                 int widthC = bPtr->columnSize.width - 8;
 244
 245                 if (WMWidthOfString(scr->boldFont, bPtr->titles[column], titleLen)
 246                     > widthC) {
 247                         char *titleBuf = createTruncatedString(scr->boldFont,
 248                                                                bPtr->titles[column],
 249                                                                &titleLen, widthC);
 250                         W_PaintText(bPtr->view, bPtr->view->window, scr->boldFont, x,
 251                                     (bPtr->titleHeight - WMFontHeight(scr->boldFont)) / 2,
 252                                     bPtr->columnSize.width, WACenter, scr->white, False, titleBuf, titleLen);
 253                         wfree(titleBuf);
 254                 } else {
 255                         W_PaintText(bPtr->view, bPtr->view->window, scr->boldFont, x,
 256                                     (bPtr->titleHeight - WMFontHeight(scr->boldFont)) / 2,
 257                                     bPtr->columnSize.width, WACenter, scr->white,
 258                                     False, bPtr->titles[column], titleLen);
 259                 }
 260         }
 261 }
 262
 263 WMList *WMGetBrowserListInColumn(WMBrowser * bPtr, int column)
 264 {
 265         if (column < 0 || column >= bPtr->usedColumnCount)
 266                 return NULL;
 267
 268         return bPtr->columns[column];
 269 }
 270
 271 void WMSetBrowserDelegate(WMBrowser * bPtr, WMBrowserDelegate * delegate)
 272 {
 273         bPtr->delegate = delegate;
 274 }
 275
 276 int WMGetBrowserFirstVisibleColumn(WMBrowser * bPtr)
 277 {
 278         return bPtr->firstVisibleColumn;
 279 }
 280
 281 static void removeColumn(WMBrowser * bPtr, int column)
 282 {
 283         int i, clearEnd, destroyEnd;
 284         WMList **clist;
 285         char **tlist;
 286
 287         assert(bPtr != NULL);
 288
 289         column = (column < 0) ? 0 : column;
 290         if (column >= bPtr->columnCount) {
 291                 return;
 292         }
 293         if (column < bPtr->maxVisibleColumns) {
 294                 clearEnd = bPtr->maxVisibleColumns;
 295                 destroyEnd = bPtr->columnCount;
 296                 bPtr->columnCount = bPtr->maxVisibleColumns;
 297         } else {
 298                 clearEnd = column;
 299                 destroyEnd = bPtr->columnCount;
 300                 bPtr->columnCount = column;
 301         }
 302         if (column < bPtr->usedColumnCount) {
 303                 bPtr->usedColumnCount = column;
 304         }
 305         for (i = column; i < clearEnd; i++) {
 306                 if (bPtr->titles[i]) {
 307                         wfree(bPtr->titles[i]);
 308                         bPtr->titles[i] = NULL;
 309                 }
 310                 WMClearList(bPtr->columns[i]);
 311         }
 312         for (; i < destroyEnd; i++) {
 313                 if (bPtr->titles[i]) {
 314                         wfree(bPtr->titles[i]);
 315                         bPtr->titles[i] = NULL;
 316                 }
 317                 WMRemoveNotificationObserverWithName(bPtr, WMListSelectionDidChangeNotification, bPtr->columns[i]);
 318                 WMDestroyWidget(bPtr->columns[i]);
 319                 bPtr->columns[i] = NULL;
 320         }
 321         clist = wmalloc(sizeof(WMList *) * (bPtr->columnCount));
 322         tlist = wmalloc(sizeof(char *) * (bPtr->columnCount));
 323         memcpy(clist, bPtr->columns, sizeof(WMList *) * (bPtr->columnCount));
 324         memcpy(tlist, bPtr->titles, sizeof(char *) * (bPtr->columnCount));
 325         wfree(bPtr->titles);
 326         wfree(bPtr->columns);
 327         bPtr->titles = tlist;
 328         bPtr->columns = clist;
 329 }
 330
 331 WMListItem *WMGetBrowserSelectedItemInColumn(WMBrowser * bPtr, int column)
 332 {
 333         if ((column < 0) || (column >= bPtr->usedColumnCount))
 334                 return NULL;
 335
 336         return WMGetListSelectedItem(bPtr->columns[column]);
 337 }
 338
 339 int WMGetBrowserSelectedColumn(WMBrowser * bPtr)
 340 {
 341         return bPtr->selectedColumn;
 342 }
 343
 344 int WMGetBrowserSelectedRowInColumn(WMBrowser * bPtr, int column)
 345 {
 346         if (column >= 0 && column < bPtr->columnCount) {
 347                 return WMGetListSelectedItemRow(bPtr->columns[column]);
 348         } else {
 349                 return -1;
 350         }
 351 }
 352
 353 void WMSetBrowserColumnTitle(WMBrowser * bPtr, int column, const char *title)
 354 {
 355         assert(column >= 0);
 356         assert(column < bPtr->usedColumnCount);
 357
 358         if (bPtr->titles[column])
 359                 wfree(bPtr->titles[column]);
 360
 361         bPtr->titles[column] = wstrdup(title);
 362
 363         if (COLUMN_IS_VISIBLE(bPtr, column) && bPtr->flags.isTitled) {
 364                 drawTitleOfColumn(bPtr, column);
 365         }
 366 }
 367
 368 void WMSetBrowserTitled(WMBrowser * bPtr, Bool flag)
 369 {
 370         int i;
 371         int columnX, columnY;
 372
 373         flag = ((flag == 0) ? 0 : 1);
 374
 375         if (bPtr->flags.isTitled == flag)
 376                 return;
 377
 378         if (!bPtr->flags.isTitled) {
 379                 columnY = TITLE_SPACING + bPtr->titleHeight;
 380
 381                 bPtr->columnSize.height -= columnY;
 382
 383                 for (i = 0; i < bPtr->columnCount; i++) {
 384                         WMResizeWidget(bPtr->columns[i], bPtr->columnSize.width, bPtr->columnSize.height);
 385
 386                         columnX = WMWidgetView(bPtr->columns[i])->pos.x;
 387
 388                         WMMoveWidget(bPtr->columns[i], columnX, columnY);
 389                 }
 390         } else {
 391                 bPtr->columnSize.height += TITLE_SPACING + bPtr->titleHeight;
 392
 393                 for (i = 0; i < bPtr->columnCount; i++) {
 394                         WMResizeWidget(bPtr->columns[i], bPtr->columnSize.width, bPtr->columnSize.height);
 395
 396                         columnX = WMWidgetView(bPtr->columns[i])->pos.x;
 397
 398                         WMMoveWidget(bPtr->columns[i], columnX, 0);
 399                 }
 400         }
 401
 402         bPtr->flags.isTitled = flag;
 403 }
 404
 405 void WMSortBrowserColumn(WMBrowser * bPtr, int column)
 406 {
 407         WMSortListItems(bPtr->columns[column]);
 408 }
 409
 410 void WMSortBrowserColumnWithComparer(WMBrowser * bPtr, int column, WMCompareDataProc * func)
 411 {
 412         WMSortListItemsWithComparer(bPtr->columns[column], func);
 413 }
 414
 415 WMListItem *WMInsertBrowserItem(WMBrowser * bPtr, int column, int row, const char *text, Bool isBranch)
 416 {
 417         WMListItem *item;
 418
 419         if (column < 0 || column >= bPtr->columnCount)
 420                 return NULL;
 421
 422         item = WMInsertListItem(bPtr->columns[column], row, text);
 423         item->isBranch = isBranch;
 424
 425         return item;
 426 }
 427
 428 static void willResizeBrowser(W_ViewDelegate * self, WMView * view, unsigned int *width, unsigned int *height)
 429 {
 430         WMBrowser *bPtr = (WMBrowser *) view->self;
 431         int cols = bPtr->maxVisibleColumns;
 432         int colX, colY;
 433         int i;
 434
 435         /* Parameter not used, but tell the compiler that it is ok */
 436         (void) self;
 437
 438         assert(*width > 0);
 439         assert(*height > 0);
 440
 441         bPtr->columnSize.width = (*width - (cols - 1) * COLUMN_SPACING) / cols;
 442         bPtr->columnSize.height = *height;
 443
 444         if (bPtr->flags.isTitled) {
 445                 colY = TITLE_SPACING + bPtr->titleHeight;
 446                 bPtr->columnSize.height -= colY;
 447         } else {
 448                 colY = 0;
 449         }
 450
 451         if (bPtr->flags.hasScroller) {
 452                 bPtr->columnSize.height -= SCROLLER_WIDTH + 4;
 453
 454                 if (bPtr->scroller) {
 455                         WMResizeWidget(bPtr->scroller, *width - 2, 1);
 456                         WMMoveWidget(bPtr->scroller, 1, *height - SCROLLER_WIDTH - 1);
 457                 }
 458         }
 459
 460         colX = 0;
 461         for (i = 0; i < bPtr->columnCount; i++) {
 462                 WMResizeWidget(bPtr->columns[i], bPtr->columnSize.width, bPtr->columnSize.height);
 463
 464                 WMMoveWidget(bPtr->columns[i], colX, colY);
 465
 466                 if (COLUMN_IS_VISIBLE(bPtr, i)) {
 467                         colX += bPtr->columnSize.width + COLUMN_SPACING;
 468                 }
 469         }
 470 }
 471
 472 static void paintItem(WMList * lPtr, int index, Drawable d, char *text, int state, WMRect * rect)
 473 {
 474         WMView *view = W_VIEW(lPtr);
 475         W_Screen *scr = view->screen;
 476         Display *display = scr->display;
 477         WMFont *font = ((state & WLDSIsBranch) ? scr->boldFont : scr->normalFont);
 478         WMColor *backColor = ((state & WLDSSelected) ? scr->white : view->backColor);
 479         int width, height, x, y;
 480
 481         /* Parameter not used, but tell the compiler that it is ok */
 482         (void) index;
 483
 484         width = rect->size.width;
 485         height = rect->size.height;
 486         x = rect->pos.x;
 487         y = rect->pos.y;
 488
 489         XFillRectangle(display, d, WMColorGC(backColor), x, y, width, height);
 490
 491         if (text) {
 492                 int widthC, textLen;
 493
 494                 /* Avoid overlaping... */
 495                 widthC = (state & WLDSIsBranch) ? width - 20 : width - 8;
 496                 textLen = strlen(text);
 497                 if (WMWidthOfString(font, text, textLen) > widthC) {
 498                         char *textBuf = createTruncatedString(font, text, &textLen, widthC);
 499                         W_PaintText(view, d, font, x + 4, y, widthC, WALeft, scr->black, False, textBuf, textLen);
 500                         wfree(textBuf);
 501                 } else {
 502                         W_PaintText(view, d, font, x + 4, y, widthC, WALeft, scr->black, False, text, textLen);
 503                 }
 504         }
 505
 506         if (state & WLDSIsBranch) {
 507                 WMColor *lineColor = ((state & WLDSSelected) ? scr->gray : scr->white);
 508
 509                 XDrawLine(display, d, WMColorGC(scr->darkGray), x + width - 11, y + 3,
 510                           x + width - 6, y + height / 2);
 511                 XDrawLine(display, d, WMColorGC(lineColor), x + width - 11, y + height - 5,
 512                           x + width - 6, y + height / 2);
 513                 XDrawLine(display, d, WMColorGC(scr->black), x + width - 12, y + 3,
 514                           x + width - 12, y + height - 5);
 515         }
 516 }
 517
 518 static void scrollCallback(WMWidget * scroller, void *self)
 519 {
 520         WMBrowser *bPtr = (WMBrowser *) self;
 521         WMScroller *sPtr = (WMScroller *) scroller;
 522         int newFirst;
 523 #define LAST_VISIBLE_COLUMN  bPtr->firstVisibleColumn+bPtr->maxVisibleColumns
 524
 525         switch (WMGetScrollerHitPart(sPtr)) {
 526         case WSDecrementLine:
 527                 if (bPtr->firstVisibleColumn > 0) {
 528                         scrollToColumn(bPtr, bPtr->firstVisibleColumn - 1, True);
 529                 }
 530                 break;
 531
 532         case WSDecrementPage:
 533         case WSDecrementWheel:
 534                 if (bPtr->firstVisibleColumn > 0) {
 535                         newFirst = bPtr->firstVisibleColumn - bPtr->maxVisibleColumns;
 536
 537                         scrollToColumn(bPtr, newFirst, True);
 538                 }
 539                 break;
 540
 541         case WSIncrementLine:
 542                 if (LAST_VISIBLE_COLUMN < bPtr->usedColumnCount) {
 543                         scrollToColumn(bPtr, bPtr->firstVisibleColumn + 1, True);
 544                 }
 545                 break;
 546
 547         case WSIncrementPage:
 548         case WSIncrementWheel:
 549                 if (LAST_VISIBLE_COLUMN < bPtr->usedColumnCount) {
 550                         newFirst = bPtr->firstVisibleColumn + bPtr->maxVisibleColumns;
 551
 552                         if (newFirst + bPtr->maxVisibleColumns >= bPtr->columnCount)
 553                                 newFirst = bPtr->columnCount - bPtr->maxVisibleColumns;
 554
 555                         scrollToColumn(bPtr, newFirst, True);
 556                 }
 557                 break;
 558
 559         case WSKnob:
 560                 {
 561                         double floatValue;
 562                         double value = bPtr->columnCount - bPtr->maxVisibleColumns;
 563
 564                         floatValue = WMGetScrollerValue(bPtr->scroller);
 565
 566                         floatValue = (floatValue * value) / value;
 567
 568                         newFirst = rint(floatValue * (double)(bPtr->columnCount - bPtr->maxVisibleColumns));
 569
 570                         if (bPtr->firstVisibleColumn != newFirst)
 571                                 scrollToColumn(bPtr, newFirst, False);
 572                         /*else
 573                            WMSetScrollerParameters(bPtr->scroller, floatValue,
 574                            bPtr->maxVisibleColumns/(float)bPtr->columnCount);
 575                          */
 576
 577                 }
 578                 break;
 579
 580         case WSKnobSlot:
 581         case WSNoPart:
 582                 /* do nothing */
 583                 break;
 584         }
 585 #undef LAST_VISIBLE_COLUMN
 586 }
 587
 588 static void setupScroller(WMBrowser * bPtr)
 589 {
 590         WMScroller *sPtr;
 591         int y;
 592
 593         y = bPtr->view->size.height - SCROLLER_WIDTH - 1;
 594
 595         sPtr = WMCreateScroller(bPtr);
 596         WMSetScrollerAction(sPtr, scrollCallback, bPtr);
 597         WMMoveWidget(sPtr, 1, y);
 598         WMResizeWidget(sPtr, bPtr->view->size.width - 2, SCROLLER_WIDTH);
 599
 600         bPtr->scroller = sPtr;
 601
 602         WMMapWidget(sPtr);
 603 }
 604
 605 void WMSetBrowserAction(WMBrowser * bPtr, WMAction * action, void *clientData)
 606 {
 607         bPtr->action = action;
 608         bPtr->clientData = clientData;
 609 }
 610
 611 void WMSetBrowserDoubleAction(WMBrowser * bPtr, WMAction * action, void *clientData)
 612 {
 613         bPtr->doubleAction = action;
 614         bPtr->doubleClientData = clientData;
 615 }
 616
 617 void WMSetBrowserHasScroller(WMBrowser * bPtr, int hasScroller)
 618 {
 619         bPtr->flags.hasScroller = hasScroller;
 620 }
 621
 622 const char *WMSetBrowserPath(WMBrowser * bPtr, const char *path)
 623 {
 624         int i;
 625         char *str;
 626         char *tmp;
 627         const char *retPtr = NULL;
 628         int item;
 629         WMListItem *listItem;
 630
 631         /* WMLoadBrowserColumnZero must be call first */
 632         if (!bPtr->flags.loaded) {
 633                 return False;
 634         }
 635
 636         removeColumn(bPtr, 1);
 637
 638         WMSelectListItem(bPtr->columns[0], -1);
 639         WMSetListPosition(bPtr->columns[0], 0);
 640
 641         i = 0;
 642         str = wstrdup(path);
 643         tmp = strtok(str, bPtr->pathSeparator);
 644         while (tmp) {
 645                 /* select it in the column */
 646                 item = WMFindRowOfListItemWithTitle(bPtr->columns[i], tmp);
 647                 if (item < 0) {
 648                         retPtr = &path[(int)(tmp - str)];
 649                         break;
 650                 }
 651                 WMSelectListItem(bPtr->columns[i], item);
 652                 WMSetListPosition(bPtr->columns[i], item);
 653
 654                 listItem = WMGetListItem(bPtr->columns[i], item);
 655                 if (!listItem || !listItem->isBranch) {
 656                         break;
 657                 }
 658
 659                 /* load next column */
 660                 WMAddBrowserColumn(bPtr);
 661
 662                 loadColumn(bPtr, i + 1);
 663
 664                 tmp = strtok(NULL, bPtr->pathSeparator);
 665
 666                 i++;
 667         }
 668
 669         wfree(str);
 670
 671         for (i = bPtr->usedColumnCount - 1; (i > -1) && !WMGetListSelectedItem(bPtr->columns[i]); i--) ;
 672
 673         bPtr->selectedColumn = i;
 674
 675         if (bPtr->columnCount < bPtr->maxVisibleColumns) {
 676                 int i = bPtr->maxVisibleColumns - bPtr->columnCount;
 677                 int curUsedColumnCount = bPtr->usedColumnCount;
 678                 bPtr->usedColumnCount = bPtr->columnCount;
 679                 while (i--) {
 680                         WMAddBrowserColumn(bPtr);
 681                 }
 682                 bPtr->usedColumnCount = curUsedColumnCount;
 683         }
 684
 685         scrollToColumn(bPtr, bPtr->columnCount - bPtr->maxVisibleColumns, True);
 686
 687         return retPtr;
 688 }
 689
 690 char *WMGetBrowserPath(WMBrowser * bPtr)
 691 {
 692         return WMGetBrowserPathToColumn(bPtr, bPtr->columnCount);
 693 }
 694
 695 char *WMGetBrowserPathToColumn(WMBrowser * bPtr, int column)
 696 {
 697         int i, size;
 698         char *path;
 699         size_t slen;
 700         WMListItem *item;
 701
 702         if (column >= bPtr->usedColumnCount)
 703                 column = bPtr->usedColumnCount - 1;
 704
 705         if (column < 0) {
 706                 return wstrdup(bPtr->pathSeparator);
 707         }
 708
 709         /* calculate size of buffer */
 710         size = 0;
 711         for (i = 0; i <= column; i++) {
 712                 item = WMGetListSelectedItem(bPtr->columns[i]);
 713                 if (!item)
 714                         break;
 715                 size += strlen(item->text);
 716         }
 717
 718         /* get the path */
 719         slen = size + (column + 1) * strlen(bPtr->pathSeparator) + 1;
 720         path = wmalloc(slen);
 721         /* ignore first `/' */
 722         for (i = 0; i <= column; i++) {
 723                 if (wstrlcat(path, bPtr->pathSeparator, slen) >= slen)
 724                         goto error;
 725
 726                 item = WMGetListSelectedItem(bPtr->columns[i]);
 727                 if (!item)
 728                         break;
 729
 730                 if (wstrlcat(path, item->text, slen) >= slen)
 731                         goto error;
 732
 733         }
 734
 735         return path;
 736
 737 error:
 738         wfree(path);
 739         return NULL;
 740 }
 741
 742 WMArray *WMGetBrowserPaths(WMBrowser * bPtr)
 743 {
 744         int column, i, k, size, selNo;
 745         char *path;
 746         size_t slen;
 747         WMListItem *item, *lastItem;
 748         WMArray *paths, *items;
 749
 750         column = bPtr->usedColumnCount - 1;
 751
 752         if (column < 0) {
 753                 paths = WMCreateArrayWithDestructor(1, wfree);
 754                 WMAddToArray(paths, wstrdup(bPtr->pathSeparator));
 755                 return paths;
 756         }
 757
 758         items = WMGetListSelectedItems(bPtr->columns[column]);
 759         selNo = WMGetArrayItemCount(items);
 760         paths = WMCreateArrayWithDestructor(selNo, wfree);
 761
 762         if (selNo <= 1) {
 763                 WMAddToArray(paths, WMGetBrowserPath(bPtr));
 764                 return paths;
 765         }
 766
 767         /* calculate size of buffer */
 768         size = 0;
 769         for (i = 0; i < column; i++) {
 770                 item = WMGetListSelectedItem(bPtr->columns[i]);
 771                 if (!item)
 772                         break;
 773                 size += strlen(item->text);
 774         }
 775
 776         size += (column + 1) * strlen(bPtr->pathSeparator) + 1;
 777
 778         for (k = 0; k < selNo; k++) {
 779                 /* get the path */
 780                 lastItem = WMGetFromArray(items, k);
 781                 slen = size + (lastItem != NULL ? strlen(lastItem->text) : 0);
 782                 path = wmalloc(slen);
 783                 /* ignore first `/' */
 784                 for (i = 0; i <= column; i++) {
 785                         wstrlcat(path, bPtr->pathSeparator, slen);
 786                         if (i == column) {
 787                                 item = lastItem;
 788                         } else {
 789                                 item = WMGetListSelectedItem(bPtr->columns[i]);
 790                         }
 791                         if (!item)
 792                                 break;
 793                         wstrlcat(path, item->text, slen);
 794                 }
 795                 WMAddToArray(paths, path);
 796         }
 797
 798         return paths;
 799 }
 800
 801 Bool WMBrowserAllowsMultipleSelection(WMBrowser * bPtr)
 802 {
 803         return bPtr->flags.allowMultipleSelection;
 804 }
 805
 806 Bool WMBrowserAllowsEmptySelection(WMBrowser * bPtr)
 807 {
 808         return bPtr->flags.allowEmptySelection;
 809 }
 810
 811 static void loadColumn(WMBrowser * bPtr, int column)
 812 {
 813         assert(bPtr->delegate);
 814         assert(bPtr->delegate->createRowsForColumn);
 815
 816         bPtr->flags.loadingColumn = 1;
 817         (*bPtr->delegate->createRowsForColumn) (bPtr->delegate, bPtr, column, bPtr->columns[column]);
 818         bPtr->flags.loadingColumn = 0;
 819
 820         if (bPtr->delegate->titleOfColumn) {
 821                 char *title;
 822
 823                 title = (*bPtr->delegate->titleOfColumn) (bPtr->delegate, bPtr, column);
 824
 825                 if (bPtr->titles[column])
 826                         wfree(bPtr->titles[column]);
 827
 828                 bPtr->titles[column] = wstrdup(title);
 829
 830                 if (COLUMN_IS_VISIBLE(bPtr, column) && bPtr->flags.isTitled) {
 831                         drawTitleOfColumn(bPtr, column);
 832                 }
 833         }
 834 }
 835
 836 static void paintBrowser(WMBrowser * bPtr)
 837 {
 838         int i;
 839
 840         if (!bPtr->view->flags.mapped)
 841                 return;
 842
 843         W_DrawRelief(bPtr->view->screen, bPtr->view->window, 0,
 844                      bPtr->view->size.height - SCROLLER_WIDTH - 2, bPtr->view->size.width, 22, WRSunken);
 845
 846         if (bPtr->flags.isTitled) {
 847                 for (i = 0; i < bPtr->maxVisibleColumns; i++) {
 848                         drawTitleOfColumn(bPtr, i + bPtr->firstVisibleColumn);
 849                 }
 850         }
 851 }
 852
 853 static void handleEvents(XEvent * event, void *data)
 854 {
 855         WMBrowser *bPtr = (WMBrowser *) data;
 856
 857         CHECK_CLASS(data, WC_Browser);
 858
 859         switch (event->type) {
 860         case Expose:
 861                 paintBrowser(bPtr);
 862                 break;
 863
 864         case DestroyNotify:
 865                 destroyBrowser(bPtr);
 866                 break;
 867
 868         }
 869 }
 870
 871 static void scrollToColumn(WMBrowser * bPtr, int column, Bool updateScroller)
 872 {
 873         int i;
 874         int x;
 875         int notify = 0;
 876
 877         if (column != bPtr->firstVisibleColumn) {
 878                 notify = 1;
 879         }
 880
 881         if (column < 0)
 882                 column = 0;
 883
 884         if (notify && bPtr->delegate && bPtr->delegate->willScroll) {
 885                 (*bPtr->delegate->willScroll) (bPtr->delegate, bPtr);
 886         }
 887
 888         x = 0;
 889         bPtr->firstVisibleColumn = column;
 890         for (i = 0; i < bPtr->columnCount; i++) {
 891                 if (COLUMN_IS_VISIBLE(bPtr, i)) {
 892                         WMMoveWidget(bPtr->columns[i], x, WMWidgetView(bPtr->columns[i])->pos.y);
 893                         if (!WMWidgetView(bPtr->columns[i])->flags.realized)
 894                                 WMRealizeWidget(bPtr->columns[i]);
 895                         WMMapWidget(bPtr->columns[i]);
 896                         x += bPtr->columnSize.width + COLUMN_SPACING;
 897                 } else {
 898                         WMUnmapWidget(bPtr->columns[i]);
 899                 }
 900         }
 901
 902         /* update the scroller */
 903         if (updateScroller) {
 904                 if (bPtr->columnCount > bPtr->maxVisibleColumns) {
 905                         float value, proportion;
 906
 907                         value = bPtr->firstVisibleColumn / (float)(bPtr->columnCount - bPtr->maxVisibleColumns);
 908                         proportion = bPtr->maxVisibleColumns / (float)bPtr->columnCount;
 909                         WMSetScrollerParameters(bPtr->scroller, value, proportion);
 910                 } else {
 911                         WMSetScrollerParameters(bPtr->scroller, 0, 1);
 912                 }
 913         }
 914
 915         if (bPtr->view->flags.mapped)
 916                 paintBrowser(bPtr);
 917
 918         if (notify && bPtr->delegate && bPtr->delegate->didScroll) {
 919                 (*bPtr->delegate->didScroll) (bPtr->delegate, bPtr);
 920         }
 921 }
 922
 923 static void listCallback(void *self, void *clientData)
 924 {
 925         WMBrowser *bPtr = (WMBrowser *) clientData;
 926         WMList *lPtr = (WMList *) self;
 927         WMListItem *item;
 928         int i, selNo;
 929         static WMListItem *oldItem = NULL;
 930         static int oldSelNo = 0;
 931
 932         item = WMGetListSelectedItem(lPtr);
 933         selNo = WMGetArrayItemCount(WMGetListSelectedItems(lPtr));
 934
 935         if (oldItem == NULL || oldItem != item || oldSelNo != selNo) {
 936                 for (i = 0; i < bPtr->columnCount; i++) {
 937                         if (lPtr == bPtr->columns[i])
 938                                 break;
 939                 }
 940                 assert(i < bPtr->columnCount);
 941
 942                 bPtr->selectedColumn = i;
 943
 944                 /* columns at right must be cleared */
 945                 removeColumn(bPtr, i + 1);
 946                 /* open directory */
 947                 if (item && item->isBranch && selNo == 1) {
 948                         WMAddBrowserColumn(bPtr);
 949                 }
 950                 if (bPtr->usedColumnCount < bPtr->maxVisibleColumns)
 951                         i = 0;
 952                 else
 953                         i = bPtr->usedColumnCount - bPtr->maxVisibleColumns;
 954                 scrollToColumn(bPtr, i, True);
 955                 if (item && item->isBranch && selNo == 1) {
 956                         loadColumn(bPtr, bPtr->usedColumnCount - 1);
 957                 }
 958         }
 959
 960         /* call callback for click */
 961         if (bPtr->action)
 962                 (*bPtr->action) (bPtr, bPtr->clientData);
 963
 964         oldItem = item;
 965         oldSelNo = selNo;
 966 }
 967
 968 static void listDoubleCallback(void *self, void *clientData)
 969 {
 970         WMBrowser *bPtr = (WMBrowser *) clientData;
 971         WMList *lPtr = (WMList *) self;
 972         WMListItem *item;
 973
 974         item = WMGetListSelectedItem(lPtr);
 975         if (!item)
 976                 return;
 977
 978         /* call callback for double click */
 979         if (bPtr->doubleAction)
 980                 (*bPtr->doubleAction) (bPtr, bPtr->doubleClientData);
 981 }
 982
 983 void WMLoadBrowserColumnZero(WMBrowser * bPtr)
 984 {
 985         if (!bPtr->flags.loaded) {
 986                 /* create column 0 */
 987                 WMAddBrowserColumn(bPtr);
 988
 989                 loadColumn(bPtr, 0);
 990
 991                 /* make column 0 visible */
 992                 scrollToColumn(bPtr, 0, True);
 993
 994                 bPtr->flags.loaded = 1;
 995         }
 996 }
 997
 998 void WMRemoveBrowserItem(WMBrowser * bPtr, int column, int row)
 999 {
1000         WMList *list;
1001
1002         if (column < 0 || column >= bPtr->usedColumnCount)
1003                 return;
1004
1005         list = WMGetBrowserListInColumn(bPtr, column);
1006
1007         if (row < 0 || row >= WMGetListNumberOfRows(list))
1008                 return;
1009
1010         removeColumn(bPtr, column + 1);
1011         if (bPtr->usedColumnCount < bPtr->maxVisibleColumns)
1012                 scrollToColumn(bPtr, 0, True);
1013         else
1014                 scrollToColumn(bPtr, bPtr->usedColumnCount - bPtr->maxVisibleColumns, True);
1015
1016         WMRemoveListItem(list, row);
1017 }
1018
1019 static void listSelectionObserver(void *observerData, WMNotification * notification)
1020 {
1021         WMBrowser *bPtr = (WMBrowser *) observerData;
1022         int column;
1023         WMList *lPtr = (WMList *) WMGetNotificationObject(notification);
1024
1025         for (column = 0; column < bPtr->usedColumnCount; column++)
1026                 if (bPtr->columns[column] == lPtr)
1027                         break;
1028
1029         /* this can happen when a list is being cleared with WMClearList
1030          * after the column was removed */
1031         if (column >= bPtr->usedColumnCount) {
1032                 return;
1033         }
1034
1035         if (WMGetArrayItemCount(WMGetListSelectedItems(lPtr)) == 0)
1036                 column--;
1037
1038         bPtr->selectedColumn = column;
1039 }
1040
1041 int WMAddBrowserColumn(WMBrowser * bPtr)
1042 {
1043         WMList *list;
1044         WMList **clist;
1045         char **tlist;
1046         int colY;
1047         int index;
1048
1049         if (bPtr->usedColumnCount < bPtr->columnCount) {
1050                 return bPtr->usedColumnCount++;
1051         }
1052
1053         bPtr->usedColumnCount++;
1054
1055         if (bPtr->flags.isTitled) {
1056                 colY = TITLE_SPACING + bPtr->titleHeight;
1057         } else {
1058                 colY = 0;
1059         }
1060
1061         index = bPtr->columnCount;
1062         bPtr->columnCount++;
1063         clist = wmalloc(sizeof(WMList *) * bPtr->columnCount);
1064         tlist = wmalloc(sizeof(char *) * bPtr->columnCount);
1065         memcpy(clist, bPtr->columns, sizeof(WMList *) * (bPtr->columnCount - 1));
1066         memcpy(tlist, bPtr->titles, sizeof(char *) * (bPtr->columnCount - 1));
1067         if (bPtr->columns)
1068                 wfree(bPtr->columns);
1069         if (bPtr->titles)
1070                 wfree(bPtr->titles);
1071         bPtr->columns = clist;
1072         bPtr->titles = tlist;
1073
1074         bPtr->titles[index] = NULL;
1075
1076         list = WMCreateList(bPtr);
1077         WMSetListAllowMultipleSelection(list, bPtr->flags.allowMultipleSelection);
1078         WMSetListAllowEmptySelection(list, bPtr->flags.allowEmptySelection);
1079         WMSetListAction(list, listCallback, bPtr);
1080         WMSetListDoubleAction(list, listDoubleCallback, bPtr);
1081         WMSetListUserDrawProc(list, paintItem);
1082         WMAddNotificationObserver(listSelectionObserver, bPtr, WMListSelectionDidChangeNotification, list);
1083
1084         bPtr->columns[index] = list;
1085
1086         WMResizeWidget(list, bPtr->columnSize.width, bPtr->columnSize.height);
1087         WMMoveWidget(list, (bPtr->columnSize.width + COLUMN_SPACING) * index, colY);
1088         if (COLUMN_IS_VISIBLE(bPtr, index))
1089                 WMMapWidget(list);
1090
1091         /* update the scroller */
1092         if (bPtr->columnCount > bPtr->maxVisibleColumns) {
1093                 float value, proportion;
1094
1095                 value = bPtr->firstVisibleColumn / (float)(bPtr->columnCount - bPtr->maxVisibleColumns);
1096                 proportion = bPtr->maxVisibleColumns / (float)bPtr->columnCount;
1097                 WMSetScrollerParameters(bPtr->scroller, value, proportion);
1098         }
1099
1100         return index;
1101 }
1102
1103 static void destroyBrowser(WMBrowser * bPtr)
1104 {
1105         int i;
1106
1107         for (i = 0; i < bPtr->columnCount; i++) {
1108                 if (bPtr->titles[i])
1109                         wfree(bPtr->titles[i]);
1110         }
1111         wfree(bPtr->titles);
1112
1113         wfree(bPtr->pathSeparator);
1114
1115         WMRemoveNotificationObserver(bPtr);
1116
1117         wfree(bPtr);
1118 }
1119
1120 static char *createTruncatedString(WMFont * font, const char *text, int *textLen, int width)
1121 {
1122         size_t slen;
1123         int dLen;
1124         char *textBuf;
1125
1126         dLen = WMWidthOfString(font, ".", 1);
1127         slen = *textLen + 4;
1128         textBuf = wmalloc(slen);
1129
1130         if (width >= 3 * dLen) {
1131                 int tmpTextLen = *textLen;
1132
1133                 if (wstrlcpy(textBuf, text, slen) >= slen)
1134                         goto error;
1135
1136                 while (tmpTextLen && (WMWidthOfString(font, textBuf, tmpTextLen) + 3 * dLen > width))
1137                         tmpTextLen--;
1138
1139                 if (wstrlcpy(textBuf + tmpTextLen, "...", slen) >= slen)
1140                         goto error;
1141
1142                 *textLen = tmpTextLen + 3;
1143
1144         } else if (width >= 2 * dLen) {
1145                 if (wstrlcpy(textBuf, "..", slen) >= slen)
1146                         goto error;
1147
1148                 *textLen = 2;
1149
1150         } else if (width >= dLen) {
1151                 if (wstrlcpy(textBuf, ".", slen) >= slen)
1152                         goto error;
1153
1154                 *textLen = 1;
1155
1156         } else {
1157                 *textBuf = '\0';
1158                 *textLen = 0;
1159         }
1160
1161         return textBuf;
1162
1163 error:
1164         wfree(textBuf);
1165         return NULL;
1166 }