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 * (float)(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 char *WMSetBrowserPath(WMBrowser * bPtr, char *path)
 623 {
 624         int i;
 625         char *str;
 626         char *tmp, *retPtr = NULL;
 627         int item;
 628         WMListItem *listItem;
 629
 630         /* WMLoadBrowserColumnZero must be call first */
 631         if (!bPtr->flags.loaded) {
 632                 return False;
 633         }
 634
 635         removeColumn(bPtr, 1);
 636
 637         WMSelectListItem(bPtr->columns[0], -1);
 638         WMSetListPosition(bPtr->columns[0], 0);
 639
 640         i = 0;
 641         str = wstrdup(path);
 642         tmp = strtok(str, bPtr->pathSeparator);
 643         while (tmp) {
 644                 /* select it in the column */
 645                 item = WMFindRowOfListItemWithTitle(bPtr->columns[i], tmp);
 646                 if (item < 0) {
 647                         retPtr = &path[(int)(tmp - str)];
 648                         break;
 649                 }
 650                 WMSelectListItem(bPtr->columns[i], item);
 651                 WMSetListPosition(bPtr->columns[i], item);
 652
 653                 listItem = WMGetListItem(bPtr->columns[i], item);
 654                 if (!listItem || !listItem->isBranch) {
 655                         break;
 656                 }
 657
 658                 /* load next column */
 659                 WMAddBrowserColumn(bPtr);
 660
 661                 loadColumn(bPtr, i + 1);
 662
 663                 tmp = strtok(NULL, bPtr->pathSeparator);
 664
 665                 i++;
 666         }
 667
 668         wfree(str);
 669
 670         for (i = bPtr->usedColumnCount - 1; (i > -1) && !WMGetListSelectedItem(bPtr->columns[i]); i--) ;
 671
 672         bPtr->selectedColumn = i;
 673
 674         if (bPtr->columnCount < bPtr->maxVisibleColumns) {
 675                 int i = bPtr->maxVisibleColumns - bPtr->columnCount;
 676                 int curUsedColumnCount = bPtr->usedColumnCount;
 677                 bPtr->usedColumnCount = bPtr->columnCount;
 678                 while (i--) {
 679                         WMAddBrowserColumn(bPtr);
 680                 }
 681                 bPtr->usedColumnCount = curUsedColumnCount;
 682         }
 683
 684         scrollToColumn(bPtr, bPtr->columnCount - bPtr->maxVisibleColumns, True);
 685
 686         return retPtr;
 687 }
 688
 689 char *WMGetBrowserPath(WMBrowser * bPtr)
 690 {
 691         return WMGetBrowserPathToColumn(bPtr, bPtr->columnCount);
 692 }
 693
 694 char *WMGetBrowserPathToColumn(WMBrowser * bPtr, int column)
 695 {
 696         int i, size;
 697         char *path;
 698         size_t slen;
 699         WMListItem *item;
 700
 701         if (column >= bPtr->usedColumnCount)
 702                 column = bPtr->usedColumnCount - 1;
 703
 704         if (column < 0) {
 705                 return wstrdup(bPtr->pathSeparator);
 706         }
 707
 708         /* calculate size of buffer */
 709         size = 0;
 710         for (i = 0; i <= column; i++) {
 711                 item = WMGetListSelectedItem(bPtr->columns[i]);
 712                 if (!item)
 713                         break;
 714                 size += strlen(item->text);
 715         }
 716
 717         /* get the path */
 718         slen = size + (column + 1) * strlen(bPtr->pathSeparator) + 1;
 719         path = wmalloc(slen);
 720         /* ignore first `/' */
 721         for (i = 0; i <= column; i++) {
 722                 if (wstrlcat(path, bPtr->pathSeparator, slen) >= slen)
 723                         goto error;
 724
 725                 item = WMGetListSelectedItem(bPtr->columns[i]);
 726                 if (!item)
 727                         break;
 728
 729                 if (wstrlcat(path, item->text, slen) >= slen)
 730                         goto error;
 731
 732         }
 733
 734         return path;
 735
 736 error:
 737         wfree(path);
 738         return NULL;
 739 }
 740
 741 WMArray *WMGetBrowserPaths(WMBrowser * bPtr)
 742 {
 743         int column, i, k, size, selNo;
 744         char *path;
 745         size_t slen;
 746         WMListItem *item, *lastItem;
 747         WMArray *paths, *items;
 748
 749         column = bPtr->usedColumnCount - 1;
 750
 751         if (column < 0) {
 752                 paths = WMCreateArrayWithDestructor(1, wfree);
 753                 WMAddToArray(paths, wstrdup(bPtr->pathSeparator));
 754                 return paths;
 755         }
 756
 757         items = WMGetListSelectedItems(bPtr->columns[column]);
 758         selNo = WMGetArrayItemCount(items);
 759         paths = WMCreateArrayWithDestructor(selNo, wfree);
 760
 761         if (selNo <= 1) {
 762                 WMAddToArray(paths, WMGetBrowserPath(bPtr));
 763                 return paths;
 764         }
 765
 766         /* calculate size of buffer */
 767         size = 0;
 768         for (i = 0; i < column; i++) {
 769                 item = WMGetListSelectedItem(bPtr->columns[i]);
 770                 if (!item)
 771                         break;
 772                 size += strlen(item->text);
 773         }
 774
 775         size += (column + 1) * strlen(bPtr->pathSeparator) + 1;
 776
 777         for (k = 0; k < selNo; k++) {
 778                 /* get the path */
 779                 lastItem = WMGetFromArray(items, k);
 780                 slen = size + (lastItem != NULL ? strlen(lastItem->text) : 0);
 781                 path = wmalloc(slen);
 782                 /* ignore first `/' */
 783                 for (i = 0; i <= column; i++) {
 784                         wstrlcat(path, bPtr->pathSeparator, slen);
 785                         if (i == column) {
 786                                 item = lastItem;
 787                         } else {
 788                                 item = WMGetListSelectedItem(bPtr->columns[i]);
 789                         }
 790                         if (!item)
 791                                 break;
 792                         wstrlcat(path, item->text, slen);
 793                 }
 794                 WMAddToArray(paths, path);
 795         }
 796
 797         return paths;
 798 }
 799
 800 Bool WMBrowserAllowsMultipleSelection(WMBrowser * bPtr)
 801 {
 802         return bPtr->flags.allowMultipleSelection;
 803 }
 804
 805 Bool WMBrowserAllowsEmptySelection(WMBrowser * bPtr)
 806 {
 807         return bPtr->flags.allowEmptySelection;
 808 }
 809
 810 static void loadColumn(WMBrowser * bPtr, int column)
 811 {
 812         assert(bPtr->delegate);
 813         assert(bPtr->delegate->createRowsForColumn);
 814
 815         bPtr->flags.loadingColumn = 1;
 816         (*bPtr->delegate->createRowsForColumn) (bPtr->delegate, bPtr, column, bPtr->columns[column]);
 817         bPtr->flags.loadingColumn = 0;
 818
 819         if (bPtr->delegate->titleOfColumn) {
 820                 char *title;
 821
 822                 title = (*bPtr->delegate->titleOfColumn) (bPtr->delegate, bPtr, column);
 823
 824                 if (bPtr->titles[column])
 825                         wfree(bPtr->titles[column]);
 826
 827                 bPtr->titles[column] = wstrdup(title);
 828
 829                 if (COLUMN_IS_VISIBLE(bPtr, column) && bPtr->flags.isTitled) {
 830                         drawTitleOfColumn(bPtr, column);
 831                 }
 832         }
 833 }
 834
 835 static void paintBrowser(WMBrowser * bPtr)
 836 {
 837         int i;
 838
 839         if (!bPtr->view->flags.mapped)
 840                 return;
 841
 842         W_DrawRelief(bPtr->view->screen, bPtr->view->window, 0,
 843                      bPtr->view->size.height - SCROLLER_WIDTH - 2, bPtr->view->size.width, 22, WRSunken);
 844
 845         if (bPtr->flags.isTitled) {
 846                 for (i = 0; i < bPtr->maxVisibleColumns; i++) {
 847                         drawTitleOfColumn(bPtr, i + bPtr->firstVisibleColumn);
 848                 }
 849         }
 850 }
 851
 852 static void handleEvents(XEvent * event, void *data)
 853 {
 854         WMBrowser *bPtr = (WMBrowser *) data;
 855
 856         CHECK_CLASS(data, WC_Browser);
 857
 858         switch (event->type) {
 859         case Expose:
 860                 paintBrowser(bPtr);
 861                 break;
 862
 863         case DestroyNotify:
 864                 destroyBrowser(bPtr);
 865                 break;
 866
 867         }
 868 }
 869
 870 static void scrollToColumn(WMBrowser * bPtr, int column, Bool updateScroller)
 871 {
 872         int i;
 873         int x;
 874         int notify = 0;
 875
 876         if (column != bPtr->firstVisibleColumn) {
 877                 notify = 1;
 878         }
 879
 880         if (column < 0)
 881                 column = 0;
 882
 883         if (notify && bPtr->delegate && bPtr->delegate->willScroll) {
 884                 (*bPtr->delegate->willScroll) (bPtr->delegate, bPtr);
 885         }
 886
 887         x = 0;
 888         bPtr->firstVisibleColumn = column;
 889         for (i = 0; i < bPtr->columnCount; i++) {
 890                 if (COLUMN_IS_VISIBLE(bPtr, i)) {
 891                         WMMoveWidget(bPtr->columns[i], x, WMWidgetView(bPtr->columns[i])->pos.y);
 892                         if (!WMWidgetView(bPtr->columns[i])->flags.realized)
 893                                 WMRealizeWidget(bPtr->columns[i]);
 894                         WMMapWidget(bPtr->columns[i]);
 895                         x += bPtr->columnSize.width + COLUMN_SPACING;
 896                 } else {
 897                         WMUnmapWidget(bPtr->columns[i]);
 898                 }
 899         }
 900
 901         /* update the scroller */
 902         if (updateScroller) {
 903                 if (bPtr->columnCount > bPtr->maxVisibleColumns) {
 904                         float value, proportion;
 905
 906                         value = bPtr->firstVisibleColumn / (float)(bPtr->columnCount - bPtr->maxVisibleColumns);
 907                         proportion = bPtr->maxVisibleColumns / (float)bPtr->columnCount;
 908                         WMSetScrollerParameters(bPtr->scroller, value, proportion);
 909                 } else {
 910                         WMSetScrollerParameters(bPtr->scroller, 0, 1);
 911                 }
 912         }
 913
 914         if (bPtr->view->flags.mapped)
 915                 paintBrowser(bPtr);
 916
 917         if (notify && bPtr->delegate && bPtr->delegate->didScroll) {
 918                 (*bPtr->delegate->didScroll) (bPtr->delegate, bPtr);
 919         }
 920 }
 921
 922 static void listCallback(void *self, void *clientData)
 923 {
 924         WMBrowser *bPtr = (WMBrowser *) clientData;
 925         WMList *lPtr = (WMList *) self;
 926         WMListItem *item;
 927         int i, selNo;
 928         static WMListItem *oldItem = NULL;
 929         static int oldSelNo = 0;
 930
 931         item = WMGetListSelectedItem(lPtr);
 932         selNo = WMGetArrayItemCount(WMGetListSelectedItems(lPtr));
 933
 934         if (oldItem == NULL || oldItem != item || oldSelNo != selNo) {
 935                 for (i = 0; i < bPtr->columnCount; i++) {
 936                         if (lPtr == bPtr->columns[i])
 937                                 break;
 938                 }
 939                 assert(i < bPtr->columnCount);
 940
 941                 bPtr->selectedColumn = i;
 942
 943                 /* columns at right must be cleared */
 944                 removeColumn(bPtr, i + 1);
 945                 /* open directory */
 946                 if (item && item->isBranch && selNo == 1) {
 947                         WMAddBrowserColumn(bPtr);
 948                 }
 949                 if (bPtr->usedColumnCount < bPtr->maxVisibleColumns)
 950                         i = 0;
 951                 else
 952                         i = bPtr->usedColumnCount - bPtr->maxVisibleColumns;
 953                 scrollToColumn(bPtr, i, True);
 954                 if (item && item->isBranch && selNo == 1) {
 955                         loadColumn(bPtr, bPtr->usedColumnCount - 1);
 956                 }
 957         }
 958
 959         /* call callback for click */
 960         if (bPtr->action)
 961                 (*bPtr->action) (bPtr, bPtr->clientData);
 962
 963         oldItem = item;
 964         oldSelNo = selNo;
 965 }
 966
 967 static void listDoubleCallback(void *self, void *clientData)
 968 {
 969         WMBrowser *bPtr = (WMBrowser *) clientData;
 970         WMList *lPtr = (WMList *) self;
 971         WMListItem *item;
 972
 973         item = WMGetListSelectedItem(lPtr);
 974         if (!item)
 975                 return;
 976
 977         /* call callback for double click */
 978         if (bPtr->doubleAction)
 979                 (*bPtr->doubleAction) (bPtr, bPtr->doubleClientData);
 980 }
 981
 982 void WMLoadBrowserColumnZero(WMBrowser * bPtr)
 983 {
 984         if (!bPtr->flags.loaded) {
 985                 /* create column 0 */
 986                 WMAddBrowserColumn(bPtr);
 987
 988                 loadColumn(bPtr, 0);
 989
 990                 /* make column 0 visible */
 991                 scrollToColumn(bPtr, 0, True);
 992
 993                 bPtr->flags.loaded = 1;
 994         }
 995 }
 996
 997 void WMRemoveBrowserItem(WMBrowser * bPtr, int column, int row)
 998 {
 999         WMList *list;
1000
1001         if (column < 0 || column >= bPtr->usedColumnCount)
1002                 return;
1003
1004         list = WMGetBrowserListInColumn(bPtr, column);
1005
1006         if (row < 0 || row >= WMGetListNumberOfRows(list))
1007                 return;
1008
1009         removeColumn(bPtr, column + 1);
1010         if (bPtr->usedColumnCount < bPtr->maxVisibleColumns)
1011                 scrollToColumn(bPtr, 0, True);
1012         else
1013                 scrollToColumn(bPtr, bPtr->usedColumnCount - bPtr->maxVisibleColumns, True);
1014
1015         WMRemoveListItem(list, row);
1016 }
1017
1018 static void listSelectionObserver(void *observerData, WMNotification * notification)
1019 {
1020         WMBrowser *bPtr = (WMBrowser *) observerData;
1021         int column;
1022         WMList *lPtr = (WMList *) WMGetNotificationObject(notification);
1023
1024         for (column = 0; column < bPtr->usedColumnCount; column++)
1025                 if (bPtr->columns[column] == lPtr)
1026                         break;
1027
1028         /* this can happen when a list is being cleared with WMClearList
1029          * after the column was removed */
1030         if (column >= bPtr->usedColumnCount) {
1031                 return;
1032         }
1033
1034         if (WMGetArrayItemCount(WMGetListSelectedItems(lPtr)) == 0)
1035                 column--;
1036
1037         bPtr->selectedColumn = column;
1038 }
1039
1040 int WMAddBrowserColumn(WMBrowser * bPtr)
1041 {
1042         WMList *list;
1043         WMList **clist;
1044         char **tlist;
1045         int colY;
1046         int index;
1047
1048         if (bPtr->usedColumnCount < bPtr->columnCount) {
1049                 return bPtr->usedColumnCount++;
1050         }
1051
1052         bPtr->usedColumnCount++;
1053
1054         if (bPtr->flags.isTitled) {
1055                 colY = TITLE_SPACING + bPtr->titleHeight;
1056         } else {
1057                 colY = 0;
1058         }
1059
1060         index = bPtr->columnCount;
1061         bPtr->columnCount++;
1062         clist = wmalloc(sizeof(WMList *) * bPtr->columnCount);
1063         tlist = wmalloc(sizeof(char *) * bPtr->columnCount);
1064         memcpy(clist, bPtr->columns, sizeof(WMList *) * (bPtr->columnCount - 1));
1065         memcpy(tlist, bPtr->titles, sizeof(char *) * (bPtr->columnCount - 1));
1066         if (bPtr->columns)
1067                 wfree(bPtr->columns);
1068         if (bPtr->titles)
1069                 wfree(bPtr->titles);
1070         bPtr->columns = clist;
1071         bPtr->titles = tlist;
1072
1073         bPtr->titles[index] = NULL;
1074
1075         list = WMCreateList(bPtr);
1076         WMSetListAllowMultipleSelection(list, bPtr->flags.allowMultipleSelection);
1077         WMSetListAllowEmptySelection(list, bPtr->flags.allowEmptySelection);
1078         WMSetListAction(list, listCallback, bPtr);
1079         WMSetListDoubleAction(list, listDoubleCallback, bPtr);
1080         WMSetListUserDrawProc(list, paintItem);
1081         WMAddNotificationObserver(listSelectionObserver, bPtr, WMListSelectionDidChangeNotification, list);
1082
1083         bPtr->columns[index] = list;
1084
1085         WMResizeWidget(list, bPtr->columnSize.width, bPtr->columnSize.height);
1086         WMMoveWidget(list, (bPtr->columnSize.width + COLUMN_SPACING) * index, colY);
1087         if (COLUMN_IS_VISIBLE(bPtr, index))
1088                 WMMapWidget(list);
1089
1090         /* update the scroller */
1091         if (bPtr->columnCount > bPtr->maxVisibleColumns) {
1092                 float value, proportion;
1093
1094                 value = bPtr->firstVisibleColumn / (float)(bPtr->columnCount - bPtr->maxVisibleColumns);
1095                 proportion = bPtr->maxVisibleColumns / (float)bPtr->columnCount;
1096                 WMSetScrollerParameters(bPtr->scroller, value, proportion);
1097         }
1098
1099         return index;
1100 }
1101
1102 static void destroyBrowser(WMBrowser * bPtr)
1103 {
1104         int i;
1105
1106         for (i = 0; i < bPtr->columnCount; i++) {
1107                 if (bPtr->titles[i])
1108                         wfree(bPtr->titles[i]);
1109         }
1110         wfree(bPtr->titles);
1111
1112         wfree(bPtr->pathSeparator);
1113
1114         WMRemoveNotificationObserver(bPtr);
1115
1116         wfree(bPtr);
1117 }
1118
1119 static char *createTruncatedString(WMFont * font, const char *text, int *textLen, int width)
1120 {
1121         size_t slen;
1122         int dLen;
1123         char *textBuf;
1124
1125         dLen = WMWidthOfString(font, ".", 1);
1126         slen = *textLen + 4;
1127         textBuf = wmalloc(slen);
1128
1129         if (width >= 3 * dLen) {
1130                 int tmpTextLen = *textLen;
1131
1132                 if (wstrlcpy(textBuf, text, slen) >= slen)
1133                         goto error;
1134
1135                 while (tmpTextLen && (WMWidthOfString(font, textBuf, tmpTextLen) + 3 * dLen > width))
1136                         tmpTextLen--;
1137
1138                 if (wstrlcpy(textBuf + tmpTextLen, "...", slen) >= slen)
1139                         goto error;
1140
1141                 *textLen = tmpTextLen + 3;
1142
1143         } else if (width >= 2 * dLen) {
1144                 if (wstrlcpy(textBuf, "..", slen) >= slen)
1145                         goto error;
1146
1147                 *textLen = 2;
1148
1149         } else if (width >= dLen) {
1150                 if (wstrlcpy(textBuf, ".", slen) >= slen)
1151                         goto error;
1152
1153                 *textLen = 1;
1154
1155         } else {
1156                 *textBuf = '\0';
1157                 *textLen = 0;
1158         }
1159
1160         return textBuf;
1161
1162 error:
1163         wfree(textBuf);
1164         return NULL;
1165 }