8 char *WMBrowserDidScrollNotification
= "WMBrowserDidScrollNotification";
11 typedef struct W_Browser
{
19 short usedColumnCount
; /* columns actually being used */
22 short maxVisibleColumns
;
23 short firstVisibleColumn
;
34 void *doubleClientData
;
35 WMAction
*doubleAction
;
37 WMBrowserFillColumnProc
*fillColumn
;
44 unsigned int isTitled
:1;
45 unsigned int allowMultipleSelection
:1;
46 unsigned int hasScroller
:1;
49 unsigned int loaded
:1;
50 unsigned int loadingColumn
:1;
55 #define COLUMN_SPACING 4
56 #define TITLE_SPACING 2
58 #define DEFAULT_WIDTH 305
59 #define DEFAULT_HEIGHT 200
60 #define DEFAULT_HAS_SCROLLER True
62 #define DEFAULT_SEPARATOR "/"
64 #define COLUMN_IS_VISIBLE(b, c) ((c) >= (b)->firstVisibleColumn \
65 && (c) < (b)->firstVisibleColumn + (b)->maxVisibleColumns)
68 static void handleEvents(XEvent
*event
, void *data
);
69 static void destroyBrowser(WMBrowser
*bPtr
);
71 static void setupScroller(WMBrowser
*bPtr
);
73 static void scrollToColumn(WMBrowser
*bPtr
, int column
);
75 static void paintItem(WMList
*lPtr
, Drawable d
, char *text
, int state
,
78 static void loadColumn(WMBrowser
*bPtr
, int column
);
81 static void resizeBrowser(WMWidget
*, unsigned int, unsigned int);
83 W_ViewProcedureTable _BrowserViewProcedures
= {
92 WMCreateBrowser(WMWidget
*parent
)
97 bPtr
= wmalloc(sizeof(WMBrowser
));
98 memset(bPtr
, 0, sizeof(WMBrowser
));
100 bPtr
->widgetClass
= WC_Browser
;
102 bPtr
->view
= W_CreateView(W_VIEW(parent
));
107 bPtr
->view
->self
= bPtr
;
109 WMCreateEventHandler(bPtr
->view
, ExposureMask
|StructureNotifyMask
110 |ClientMessageMask
, handleEvents
, bPtr
);
112 /* default configuration */
113 bPtr
->flags
.hasScroller
= DEFAULT_HAS_SCROLLER
;
115 bPtr
->titleHeight
= 20;
116 bPtr
->flags
.isTitled
= 1;
117 bPtr
->maxVisibleColumns
= 2;
119 resizeBrowser(bPtr
, DEFAULT_WIDTH
, DEFAULT_HEIGHT
);
121 bPtr
->pathSeparator
= wstrdup(DEFAULT_SEPARATOR
);
123 if (bPtr
->flags
.hasScroller
)
126 for (i
=0; i
<bPtr
->maxVisibleColumns
; i
++) {
127 WMAddBrowserColumn(bPtr
);
129 bPtr
->usedColumnCount
= 0;
131 bPtr
->selectedColumn
= -1;
138 WMGetBrowserNumberOfColumns(WMBrowser
*bPtr
)
140 return bPtr
->usedColumnCount
;
144 WMSetBrowserPathSeparator(WMBrowser
*bPtr
, char *separator
)
146 if (bPtr
->pathSeparator
)
147 free(bPtr
->pathSeparator
);
148 bPtr
->pathSeparator
= wstrdup(separator
);
154 drawTitleOfColumn(WMBrowser
*bPtr
, int column
)
156 WMScreen
*scr
= bPtr
->view
->screen
;
159 x
=(column
-bPtr
->firstVisibleColumn
)*(bPtr
->columnSize
.width
+COLUMN_SPACING
);
161 XFillRectangle(scr
->display
, bPtr
->view
->window
, W_GC(scr
->darkGray
), x
, 0,
162 bPtr
->columnSize
.width
, bPtr
->titleHeight
);
163 W_DrawRelief(scr
, bPtr
->view
->window
, x
, 0,
164 bPtr
->columnSize
.width
, bPtr
->titleHeight
, WRSunken
);
166 if (column
< bPtr
->usedColumnCount
&& bPtr
->titles
[column
])
167 W_PaintText(bPtr
->view
, bPtr
->view
->window
, scr
->boldFont
, x
,
168 (bPtr
->titleHeight
-scr
->boldFont
->height
)/2,
169 bPtr
->columnSize
.width
, WACenter
, W_GC(scr
->white
),
170 False
, bPtr
->titles
[column
], strlen(bPtr
->titles
[column
]));
175 WMSetBrowserColumnTitle(WMBrowser
*bPtr
, int column
, char *title
)
178 assert(column
< bPtr
->usedColumnCount
);
180 if (bPtr
->titles
[column
])
181 free(bPtr
->titles
[column
]);
183 bPtr
->titles
[column
] = wstrdup(title
);
185 if (COLUMN_IS_VISIBLE(bPtr
, column
) && bPtr
->flags
.isTitled
) {
186 drawTitleOfColumn(bPtr
, column
);
192 WMGetBrowserListInColumn(WMBrowser
*bPtr
, int column
)
194 if (column
< 0 || column
>= bPtr
->usedColumnCount
)
197 return bPtr
->columns
[column
];
202 WMSetBrowserFillColumnProc(WMBrowser
*bPtr
, WMBrowserFillColumnProc
*proc
)
204 bPtr
->fillColumn
= proc
;
209 WMGetBrowserFirstVisibleColumn(WMBrowser
*bPtr
)
211 return bPtr
->firstVisibleColumn
;
216 removeColumn(WMBrowser
*bPtr
, int column
)
222 if (column
>= bPtr
->usedColumnCount
)
225 if (column
< bPtr
->maxVisibleColumns
) {
227 for (i
=column
; i
< bPtr
->maxVisibleColumns
; i
++) {
229 free(bPtr
->titles
[i
]);
230 bPtr
->titles
[i
] = NULL
;
232 WMClearList(bPtr
->columns
[i
]);
233 bPtr
->usedColumnCount
--;
235 tmp
= bPtr
->columnCount
;
236 for (i
=bPtr
->maxVisibleColumns
; i
< tmp
; i
++) {
238 free(bPtr
->titles
[i
]);
239 bPtr
->titles
[i
] = NULL
;
241 WMDestroyWidget(bPtr
->columns
[i
]);
242 bPtr
->columns
[i
] = NULL
;
244 bPtr
->usedColumnCount
--;
247 int tmp
= bPtr
->columnCount
;
248 for (i
=column
; i
< tmp
; i
++) {
250 free(bPtr
->titles
[i
]);
251 bPtr
->titles
[i
] = NULL
;
253 WMDestroyWidget(bPtr
->columns
[i
]);
254 bPtr
->columns
[i
] = NULL
;
256 bPtr
->usedColumnCount
--;
259 clist
= wmalloc(sizeof(WMList
*)*bPtr
->columnCount
);
260 tlist
= wmalloc(sizeof(char*)*bPtr
->columnCount
);
261 memcpy(clist
, bPtr
->columns
, sizeof(WMList
*)*bPtr
->columnCount
);
262 memcpy(tlist
, bPtr
->titles
, sizeof(char*)*bPtr
->columnCount
);
265 bPtr
->titles
= tlist
;
266 bPtr
->columns
= clist
;
272 WMGetBrowserSelectedItemInColumn(WMBrowser
*bPtr
, int column
)
274 if ((column
< 0) || (column
> bPtr
->columnCount
))
277 return WMGetListSelectedItem(bPtr
->columns
[column
]);
283 WMGetBrowserSelectedColumn(WMBrowser
*bPtr
)
285 return bPtr
->selectedColumn
;
290 WMGetBrowserSelectedRowInColumn(WMBrowser
*bPtr
, int column
)
292 if (column
>= 0 && column
< bPtr
->columnCount
) {
293 return WMGetListSelectedItemRow(bPtr
->columns
[column
]);
301 WMSetBrowserTitled(WMBrowser
*bPtr
, Bool flag
)
304 int columnX
, columnY
;
306 if (bPtr
->flags
.isTitled
== flag
)
311 if (!bPtr
->flags
.isTitled
) {
312 columnY
= TITLE_SPACING
+ bPtr
->titleHeight
;
314 bPtr
->columnSize
.height
-= columnY
;
316 for (i
=0; i
<bPtr
->columnCount
; i
++) {
317 WMResizeWidget(bPtr
->columns
[i
], bPtr
->columnSize
.width
,
318 bPtr
->columnSize
.height
);
320 columnX
= WMWidgetView(bPtr
->columns
[i
])->pos
.x
;
322 WMMoveWidget(bPtr
->columns
[i
], columnX
, columnY
);
325 bPtr
->columnSize
.height
+= TITLE_SPACING
+ bPtr
->titleHeight
;
327 for (i
=0; i
<bPtr
->columnCount
; i
++) {
328 WMResizeWidget(bPtr
->columns
[i
], bPtr
->columnSize
.width
,
329 bPtr
->columnSize
.height
);
331 columnX
= WMWidgetView(bPtr
->columns
[i
])->pos
.x
;
333 WMMoveWidget(bPtr
->columns
[i
], columnX
, 0);
337 bPtr
->flags
.isTitled
= flag
;
342 WMAddSortedBrowserItem(WMBrowser
*bPtr
, int column
, char *text
, Bool isBranch
)
346 if (column
< 0 || column
>= bPtr
->columnCount
)
349 item
= WMAddSortedListItem(bPtr
->columns
[column
], text
);
350 item
->isBranch
= isBranch
;
358 WMInsertBrowserItem(WMBrowser
*bPtr
, int column
, int row
, char *text
,
363 if (column
< 0 || column
>= bPtr
->columnCount
)
366 item
= WMInsertListItem(bPtr
->columns
[column
], row
, text
);
367 item
->isBranch
= isBranch
;
376 resizeBrowser(WMWidget
*w
, unsigned int width
, unsigned int height
)
378 WMBrowser
*bPtr
= (WMBrowser
*)w
;
379 int cols
= bPtr
->maxVisibleColumns
;
386 bPtr
->columnSize
.width
= (width
-(cols
-1)*COLUMN_SPACING
) / cols
;
387 bPtr
->columnSize
.height
= height
;
389 if (bPtr
->flags
.isTitled
) {
390 bPtr
->columnSize
.height
-= TITLE_SPACING
+ bPtr
->titleHeight
;
391 colY
= TITLE_SPACING
+ bPtr
->titleHeight
;
396 if (bPtr
->flags
.hasScroller
) {
397 bPtr
->columnSize
.height
-= SCROLLER_WIDTH
+ 4;
399 if (bPtr
->scroller
) {
400 WMResizeWidget(bPtr
->scroller
, width
-2, 1);
401 WMMoveWidget(bPtr
->scroller
, 1, height
-SCROLLER_WIDTH
-1);
406 for (i
= 0; i
< bPtr
->columnCount
; i
++) {
407 WMResizeWidget(bPtr
->columns
[i
], bPtr
->columnSize
.width
,
408 bPtr
->columnSize
.height
);
410 WMMoveWidget(bPtr
->columns
[i
], colX
, colY
);
412 if (COLUMN_IS_VISIBLE(bPtr
, i
)) {
413 colX
+= bPtr
->columnSize
.width
+COLUMN_SPACING
;
417 W_ResizeView(bPtr
->view
, width
, height
);
422 paintItem(WMList
*lPtr
, Drawable d
, char *text
, int state
, WMRect
*rect
)
424 WMView
*view
= W_VIEW(lPtr
);
425 W_Screen
*scr
= view
->screen
;
426 int width
, height
, x
, y
;
428 width
= rect
->size
.width
;
429 height
= rect
->size
.height
;
433 if (state
& WLDSSelected
)
434 XFillRectangle(scr
->display
, d
, W_GC(scr
->white
), x
, y
,
437 XClearArea(scr
->display
, d
, x
, y
, width
, height
, False
);
440 W_PaintText(view
, d
, scr
->normalFont
, x
+4, y
, width
,
441 WALeft
, W_GC(scr
->black
), False
, text
, strlen(text
));
443 if (state
& WLDSIsBranch
) {
444 XDrawLine(scr
->display
, d
, W_GC(scr
->darkGray
), x
+width
-11, y
+3,
445 x
+width
-6, y
+height
/2);
446 if (state
& WLDSSelected
)
447 XDrawLine(scr
->display
, d
,W_GC(scr
->gray
), x
+width
-11, y
+height
-5,
448 x
+width
-6, y
+height
/2);
450 XDrawLine(scr
->display
, d
,W_GC(scr
->white
), x
+width
-11, y
+height
-5,
451 x
+width
-6, y
+height
/2);
452 XDrawLine(scr
->display
, d
, W_GC(scr
->black
), x
+width
-12, y
+3,
453 x
+width
-12, y
+height
-5);
459 scrollCallback(WMWidget
*scroller
, void *self
)
461 WMBrowser
*bPtr
= (WMBrowser
*)self
;
462 WMScroller
*sPtr
= (WMScroller
*)scroller
;
464 #define LAST_VISIBLE_COLUMN bPtr->firstVisibleColumn+bPtr->maxVisibleColumns
466 switch (WMGetScrollerHitPart(sPtr
)) {
467 case WSDecrementLine
:
468 if (bPtr
->firstVisibleColumn
> 0) {
469 scrollToColumn(bPtr
, bPtr
->firstVisibleColumn
-1);
473 case WSDecrementPage
:
474 if (bPtr
->firstVisibleColumn
> 0) {
475 newFirst
= bPtr
->firstVisibleColumn
- bPtr
->maxVisibleColumns
;
477 scrollToColumn(bPtr
, newFirst
);
482 case WSIncrementLine
:
483 if (LAST_VISIBLE_COLUMN
< bPtr
->columnCount
) {
484 scrollToColumn(bPtr
, bPtr
->firstVisibleColumn
+1);
488 case WSIncrementPage
:
489 if (LAST_VISIBLE_COLUMN
< bPtr
->columnCount
) {
490 newFirst
= bPtr
->firstVisibleColumn
+ bPtr
->maxVisibleColumns
;
492 if (newFirst
+bPtr
->maxVisibleColumns
>= bPtr
->columnCount
)
493 newFirst
= bPtr
->columnCount
- bPtr
->maxVisibleColumns
;
495 scrollToColumn(bPtr
, newFirst
);
502 float value
= bPtr
->columnCount
- bPtr
->maxVisibleColumns
;
504 floatValue
= WMGetScrollerValue(bPtr
->scroller
);
506 floatValue
= (floatValue
*value
)/value
;
508 newFirst
= floatValue
*(float)(bPtr
->columnCount
- bPtr
->maxVisibleColumns
);
510 if (bPtr
->firstVisibleColumn
!= newFirst
)
511 scrollToColumn(bPtr
, newFirst
);
513 WMSetScrollerParameters(bPtr
->scroller
, floatValue
,
514 bPtr
->maxVisibleColumns
/(float)bPtr
->columnCount
);
524 #undef LAST_VISIBLE_COLUMN
529 setupScroller(WMBrowser
*bPtr
)
534 y
= bPtr
->view
->size
.height
- SCROLLER_WIDTH
- 1;
536 sPtr
= WMCreateScroller(bPtr
);
537 WMSetScrollerAction(sPtr
, scrollCallback
, bPtr
);
538 WMMoveWidget(sPtr
, 1, y
);
539 WMResizeWidget(sPtr
, bPtr
->view
->size
.width
-2, SCROLLER_WIDTH
);
541 bPtr
->scroller
= sPtr
;
548 WMSetBrowserAction(WMBrowser
*bPtr
, WMAction
*action
, void *clientData
)
550 bPtr
->action
= action
;
551 bPtr
->clientData
= clientData
;
556 WMSetBrowserHasScroller(WMBrowser
*bPtr
, int hasScroller
)
558 bPtr
->flags
.hasScroller
= hasScroller
;
564 WMSetBrowserPath(WMBrowser
*bPtr
, char *path
)
567 char *str
= wstrdup(path
);
571 WMListItem
*listItem
;
573 removeColumn(bPtr
, 1);
576 tmp
= strtok(str
, bPtr
->pathSeparator
);
578 /* select it in the column */
579 item
= WMFindRowOfListItemWithTitle(bPtr
->columns
[i
], tmp
);
584 WMSelectListItem(bPtr
->columns
[i
], item
);
585 WMSetListPosition(bPtr
->columns
[i
], item
);
587 listItem
= WMGetListItem(bPtr
->columns
[i
], item
);
588 if (!listItem
|| !listItem
->isBranch
) {
592 /* load next column */
593 WMAddBrowserColumn(bPtr
);
595 loadColumn(bPtr
, i
+1);
597 tmp
= strtok(NULL
, bPtr
->pathSeparator
);
603 bPtr
->selectedColumn
= bPtr
->usedColumnCount
- 1;
605 scrollToColumn(bPtr
, bPtr
->columnCount
-bPtr
->maxVisibleColumns
);
612 WMGetBrowserPath(WMBrowser
*bPtr
)
614 return WMGetBrowserPathToColumn(bPtr
, bPtr
->columnCount
);
619 WMGetBrowserPathToColumn(WMBrowser
*bPtr
, int column
)
625 if (column
>= bPtr
->usedColumnCount
)
626 column
= bPtr
->usedColumnCount
-1;
628 /* calculate size of buffer */
630 for (i
= 0; i
<= column
; i
++) {
631 item
= WMGetListSelectedItem(bPtr
->columns
[i
]);
634 size
+= strlen(item
->text
);
638 path
= wmalloc(size
+(column
+1)*strlen(bPtr
->pathSeparator
)+1);
641 for (i
= 0; i
<= column
; i
++) {
642 strcat(path
, bPtr
->pathSeparator
);
643 item
= WMGetListSelectedItem(bPtr
->columns
[i
]);
646 strcat(path
, item
->text
);
654 loadColumn(WMBrowser
*bPtr
, int column
)
656 assert(bPtr
->fillColumn
);
658 bPtr
->flags
.loadingColumn
= 1;
659 (*bPtr
->fillColumn
)(bPtr
, column
);
660 bPtr
->flags
.loadingColumn
= 0;
665 paintBrowser(WMBrowser
*bPtr
)
669 if (!bPtr
->view
->flags
.mapped
)
672 W_DrawRelief(bPtr
->view
->screen
, bPtr
->view
->window
, 0,
673 bPtr
->view
->size
.height
-SCROLLER_WIDTH
-2,
674 bPtr
->view
->size
.width
, 22, WRSunken
);
676 if (bPtr
->flags
.isTitled
) {
677 for (i
=0; i
<bPtr
->maxVisibleColumns
; i
++) {
678 drawTitleOfColumn(bPtr
, i
+bPtr
->firstVisibleColumn
);
685 handleEvents(XEvent
*event
, void *data
)
687 WMBrowser
*bPtr
= (WMBrowser
*)data
;
689 CHECK_CLASS(data
, WC_Browser
);
692 switch (event
->type
) {
698 destroyBrowser(bPtr
);
707 scrollToColumn(WMBrowser
*bPtr
, int column
)
714 if (column
!= bPtr
->firstVisibleColumn
)
721 bPtr
->firstVisibleColumn
= column
;
722 for (i
= 0; i
< bPtr
->usedColumnCount
; i
++) {
723 if (COLUMN_IS_VISIBLE(bPtr
, i
)) {
724 WMMoveWidget(bPtr
->columns
[i
], x
,
725 WMWidgetView(bPtr
->columns
[i
])->pos
.y
);
726 if (!WMWidgetView(bPtr
->columns
[i
])->flags
.realized
)
727 WMRealizeWidget(bPtr
->columns
[i
]);
728 WMMapWidget(bPtr
->columns
[i
]);
729 x
+= bPtr
->columnSize
.width
+COLUMN_SPACING
;
731 WMUnmapWidget(bPtr
->columns
[i
]);
735 /* update the scroller */
736 if (bPtr
->columnCount
> bPtr
->maxVisibleColumns
) {
737 float value
, proportion
;
739 value
= bPtr
->firstVisibleColumn
740 /(float)(bPtr
->columnCount
-bPtr
->maxVisibleColumns
);
741 proportion
= bPtr
->maxVisibleColumns
/(float)bPtr
->columnCount
;
742 WMSetScrollerParameters(bPtr
->scroller
, value
, proportion
);
744 WMSetScrollerParameters(bPtr
->scroller
, 0, 1);
747 if (bPtr
->view
->flags
.mapped
)
751 WMPostNotificationName(WMBrowserDidScrollNotification
, bPtr
, NULL
);
756 listCallback(void *self
, void *clientData
)
758 WMBrowser
*bPtr
= (WMBrowser
*)clientData
;
759 WMList
*lPtr
= (WMList
*)self
;
763 item
= WMGetListSelectedItem(lPtr
);
767 for (i
=0; i
<bPtr
->columnCount
; i
++) {
768 if (lPtr
== bPtr
->columns
[i
])
771 assert(i
<bPtr
->columnCount
);
773 bPtr
->selectedColumn
= i
;
775 /* columns at right must be cleared */
776 removeColumn(bPtr
, i
+1);
778 if (item
->isBranch
) {
779 WMAddBrowserColumn(bPtr
);
780 loadColumn(bPtr
, bPtr
->usedColumnCount
-1);
782 if (bPtr
->usedColumnCount
< bPtr
->maxVisibleColumns
)
785 i
= bPtr
->usedColumnCount
-bPtr
->maxVisibleColumns
;
786 scrollToColumn(bPtr
, i
);
788 /* call callback for click */
790 (*bPtr
->action
)(bPtr
, bPtr
->clientData
);
795 WMLoadBrowserColumnZero(WMBrowser
*bPtr
)
797 if (!bPtr
->flags
.loaded
) {
798 /* create column 0 */
799 WMAddBrowserColumn(bPtr
);
803 /* make column 0 visible */
804 scrollToColumn(bPtr
, 0);
806 bPtr
->flags
.loaded
= 1;
812 WMRemoveBrowserItem(WMBrowser
*bPtr
, int column
, int row
)
816 if (column
< 0 || column
>= bPtr
->usedColumnCount
)
819 list
= WMGetBrowserListInColumn(bPtr
, column
);
821 if (row
< 0 || row
>= WMGetListNumberOfRows(list
))
824 removeColumn(bPtr
, column
+1);
825 if (bPtr
->usedColumnCount
< bPtr
->maxVisibleColumns
)
826 scrollToColumn(bPtr
, 0);
828 scrollToColumn(bPtr
, bPtr
->usedColumnCount
-bPtr
->maxVisibleColumns
);
830 WMRemoveListItem(list
, row
);
835 WMAddBrowserColumn(WMBrowser
*bPtr
)
844 if (bPtr
->usedColumnCount
< bPtr
->columnCount
) {
845 return bPtr
->usedColumnCount
++;
848 bPtr
->usedColumnCount
++;
850 if (bPtr
->flags
.isTitled
) {
851 colY
= TITLE_SPACING
+ bPtr
->titleHeight
;
856 index
= bPtr
->columnCount
;
858 clist
= wmalloc(sizeof(WMList
*)*bPtr
->columnCount
);
859 tlist
= wmalloc(sizeof(char*)*bPtr
->columnCount
);
860 memcpy(clist
, bPtr
->columns
, sizeof(WMList
*)*(bPtr
->columnCount
-1));
861 memcpy(tlist
, bPtr
->titles
, sizeof(char*)*(bPtr
->columnCount
-1));
866 bPtr
->columns
= clist
;
867 bPtr
->titles
= tlist
;
869 bPtr
->titles
[index
] = NULL
;
871 list
= WMCreateList(bPtr
);
872 WMSetListAction(list
, listCallback
, bPtr
);
873 WMSetListUserDrawProc(list
, paintItem
);
874 bPtr
->columns
[index
] = list
;
876 WMResizeWidget(list
, bPtr
->columnSize
.width
, bPtr
->columnSize
.height
);
877 WMMoveWidget(list
, (bPtr
->columnSize
.width
+COLUMN_SPACING
)*index
, colY
);
878 if (COLUMN_IS_VISIBLE(bPtr
, index
))
881 /* update the scroller */
882 if (bPtr
->columnCount
> bPtr
->maxVisibleColumns
) {
883 float value
, proportion
;
885 value
= bPtr
->firstVisibleColumn
886 /(float)(bPtr
->columnCount
-bPtr
->maxVisibleColumns
);
887 proportion
= bPtr
->maxVisibleColumns
/(float)bPtr
->columnCount
;
888 WMSetScrollerParameters(bPtr
->scroller
, value
, proportion
);
897 destroyBrowser(WMBrowser
*bPtr
)
901 for (i
=0; i
<bPtr
->columnCount
; i
++) {
903 free(bPtr
->titles
[i
]);
907 free(bPtr
->pathSeparator
);