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