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
);
439 W_PaintText(view
, d
, scr
->normalFont
, x
+4, y
, width
,
440 WALeft
, W_GC(scr
->black
), False
, text
, strlen(text
));
442 if (state
& WLDSIsBranch
) {
443 XDrawLine(scr
->display
, d
, W_GC(scr
->darkGray
), x
+width
-11, y
+3,
444 x
+width
-6, y
+height
/2);
445 if (state
& WLDSSelected
)
446 XDrawLine(scr
->display
, d
,W_GC(scr
->gray
), x
+width
-11, y
+height
-5,
447 x
+width
-6, y
+height
/2);
449 XDrawLine(scr
->display
, d
,W_GC(scr
->white
), x
+width
-11, y
+height
-5,
450 x
+width
-6, y
+height
/2);
451 XDrawLine(scr
->display
, d
, W_GC(scr
->black
), x
+width
-12, y
+3,
452 x
+width
-12, y
+height
-5);
458 scrollCallback(WMWidget
*scroller
, void *self
)
460 WMBrowser
*bPtr
= (WMBrowser
*)self
;
461 WMScroller
*sPtr
= (WMScroller
*)scroller
;
463 #define LAST_VISIBLE_COLUMN bPtr->firstVisibleColumn+bPtr->maxVisibleColumns
465 switch (WMGetScrollerHitPart(sPtr
)) {
466 case WSDecrementLine
:
467 if (bPtr
->firstVisibleColumn
> 0) {
468 scrollToColumn(bPtr
, bPtr
->firstVisibleColumn
-1);
472 case WSDecrementPage
:
473 if (bPtr
->firstVisibleColumn
> 0) {
474 newFirst
= bPtr
->firstVisibleColumn
- bPtr
->maxVisibleColumns
;
476 scrollToColumn(bPtr
, newFirst
);
481 case WSIncrementLine
:
482 if (LAST_VISIBLE_COLUMN
< bPtr
->columnCount
) {
483 scrollToColumn(bPtr
, bPtr
->firstVisibleColumn
+1);
487 case WSIncrementPage
:
488 if (LAST_VISIBLE_COLUMN
< bPtr
->columnCount
) {
489 newFirst
= bPtr
->firstVisibleColumn
+ bPtr
->maxVisibleColumns
;
491 if (newFirst
+bPtr
->maxVisibleColumns
>= bPtr
->columnCount
)
492 newFirst
= bPtr
->columnCount
- bPtr
->maxVisibleColumns
;
494 scrollToColumn(bPtr
, newFirst
);
501 float value
= bPtr
->columnCount
- bPtr
->maxVisibleColumns
;
503 floatValue
= WMGetScrollerValue(bPtr
->scroller
);
505 floatValue
= (floatValue
*value
)/value
;
507 newFirst
= floatValue
*(float)(bPtr
->columnCount
- bPtr
->maxVisibleColumns
);
509 if (bPtr
->firstVisibleColumn
!= newFirst
)
510 scrollToColumn(bPtr
, newFirst
);
512 WMSetScrollerParameters(bPtr
->scroller
, floatValue
,
513 bPtr
->maxVisibleColumns
/(float)bPtr
->columnCount
);
523 #undef LAST_VISIBLE_COLUMN
528 setupScroller(WMBrowser
*bPtr
)
533 y
= bPtr
->view
->size
.height
- SCROLLER_WIDTH
- 1;
535 sPtr
= WMCreateScroller(bPtr
);
536 WMSetScrollerAction(sPtr
, scrollCallback
, bPtr
);
537 WMMoveWidget(sPtr
, 1, y
);
538 WMResizeWidget(sPtr
, bPtr
->view
->size
.width
-2, SCROLLER_WIDTH
);
540 bPtr
->scroller
= sPtr
;
547 WMSetBrowserAction(WMBrowser
*bPtr
, WMAction
*action
, void *clientData
)
549 bPtr
->action
= action
;
550 bPtr
->clientData
= clientData
;
555 WMSetBrowserHasScroller(WMBrowser
*bPtr
, int hasScroller
)
557 bPtr
->flags
.hasScroller
= hasScroller
;
563 WMSetBrowserPath(WMBrowser
*bPtr
, char *path
)
566 char *str
= wstrdup(path
);
570 WMListItem
*listItem
;
572 removeColumn(bPtr
, 1);
575 tmp
= strtok(str
, bPtr
->pathSeparator
);
577 /* select it in the column */
578 item
= WMFindRowOfListItemWithTitle(bPtr
->columns
[i
], tmp
);
583 WMSelectListItem(bPtr
->columns
[i
], item
);
584 WMSetListPosition(bPtr
->columns
[i
], item
);
586 listItem
= WMGetListItem(bPtr
->columns
[i
], item
);
587 if (!listItem
|| !listItem
->isBranch
) {
591 /* load next column */
592 WMAddBrowserColumn(bPtr
);
594 loadColumn(bPtr
, i
+1);
596 tmp
= strtok(NULL
, bPtr
->pathSeparator
);
602 bPtr
->selectedColumn
= bPtr
->usedColumnCount
- 1;
604 scrollToColumn(bPtr
, bPtr
->columnCount
-bPtr
->maxVisibleColumns
);
611 WMGetBrowserPath(WMBrowser
*bPtr
)
613 return WMGetBrowserPathToColumn(bPtr
, bPtr
->columnCount
);
618 WMGetBrowserPathToColumn(WMBrowser
*bPtr
, int column
)
624 if (column
>= bPtr
->usedColumnCount
)
625 column
= bPtr
->usedColumnCount
-1;
627 /* calculate size of buffer */
629 for (i
= 0; i
<= column
; i
++) {
630 item
= WMGetListSelectedItem(bPtr
->columns
[i
]);
633 size
+= strlen(item
->text
);
637 path
= wmalloc(size
+(column
+1)*strlen(bPtr
->pathSeparator
)+1);
640 for (i
= 0; i
<= column
; i
++) {
641 strcat(path
, bPtr
->pathSeparator
);
642 item
= WMGetListSelectedItem(bPtr
->columns
[i
]);
645 strcat(path
, item
->text
);
653 loadColumn(WMBrowser
*bPtr
, int column
)
655 assert(bPtr
->fillColumn
);
657 bPtr
->flags
.loadingColumn
= 1;
658 (*bPtr
->fillColumn
)(bPtr
, column
);
659 bPtr
->flags
.loadingColumn
= 0;
664 paintBrowser(WMBrowser
*bPtr
)
668 if (!bPtr
->view
->flags
.mapped
)
671 W_DrawRelief(bPtr
->view
->screen
, bPtr
->view
->window
, 0,
672 bPtr
->view
->size
.height
-SCROLLER_WIDTH
-2,
673 bPtr
->view
->size
.width
, 22, WRSunken
);
675 if (bPtr
->flags
.isTitled
) {
676 for (i
=0; i
<bPtr
->maxVisibleColumns
; i
++) {
677 drawTitleOfColumn(bPtr
, i
+bPtr
->firstVisibleColumn
);
684 handleEvents(XEvent
*event
, void *data
)
686 WMBrowser
*bPtr
= (WMBrowser
*)data
;
688 CHECK_CLASS(data
, WC_Browser
);
691 switch (event
->type
) {
697 destroyBrowser(bPtr
);
706 scrollToColumn(WMBrowser
*bPtr
, int column
)
713 if (column
!= bPtr
->firstVisibleColumn
)
720 bPtr
->firstVisibleColumn
= column
;
721 for (i
= 0; i
< bPtr
->usedColumnCount
; i
++) {
722 if (COLUMN_IS_VISIBLE(bPtr
, i
)) {
723 WMMoveWidget(bPtr
->columns
[i
], x
,
724 WMWidgetView(bPtr
->columns
[i
])->pos
.y
);
725 if (!WMWidgetView(bPtr
->columns
[i
])->flags
.realized
)
726 WMRealizeWidget(bPtr
->columns
[i
]);
727 WMMapWidget(bPtr
->columns
[i
]);
728 x
+= bPtr
->columnSize
.width
+COLUMN_SPACING
;
730 WMUnmapWidget(bPtr
->columns
[i
]);
734 /* update the scroller */
735 if (bPtr
->columnCount
> bPtr
->maxVisibleColumns
) {
736 float value
, proportion
;
738 value
= bPtr
->firstVisibleColumn
739 /(float)(bPtr
->columnCount
-bPtr
->maxVisibleColumns
);
740 proportion
= bPtr
->maxVisibleColumns
/(float)bPtr
->columnCount
;
741 WMSetScrollerParameters(bPtr
->scroller
, value
, proportion
);
743 WMSetScrollerParameters(bPtr
->scroller
, 0, 1);
746 if (bPtr
->view
->flags
.mapped
)
750 WMPostNotificationName(WMBrowserDidScrollNotification
, bPtr
, NULL
);
755 listCallback(void *self
, void *clientData
)
757 WMBrowser
*bPtr
= (WMBrowser
*)clientData
;
758 WMList
*lPtr
= (WMList
*)self
;
762 item
= WMGetListSelectedItem(lPtr
);
766 for (i
=0; i
<bPtr
->columnCount
; i
++) {
767 if (lPtr
== bPtr
->columns
[i
])
770 assert(i
<bPtr
->columnCount
);
772 bPtr
->selectedColumn
= i
;
774 /* columns at right must be cleared */
775 removeColumn(bPtr
, i
+1);
777 if (item
->isBranch
) {
778 WMAddBrowserColumn(bPtr
);
779 loadColumn(bPtr
, bPtr
->usedColumnCount
-1);
781 if (bPtr
->usedColumnCount
< bPtr
->maxVisibleColumns
)
784 i
= bPtr
->usedColumnCount
-bPtr
->maxVisibleColumns
;
785 scrollToColumn(bPtr
, i
);
787 /* call callback for click */
789 (*bPtr
->action
)(bPtr
, bPtr
->clientData
);
794 WMLoadBrowserColumnZero(WMBrowser
*bPtr
)
796 if (!bPtr
->flags
.loaded
) {
797 /* create column 0 */
798 WMAddBrowserColumn(bPtr
);
802 /* make column 0 visible */
803 scrollToColumn(bPtr
, 0);
805 bPtr
->flags
.loaded
= 1;
811 WMRemoveBrowserItem(WMBrowser
*bPtr
, int column
, int row
)
815 if (column
< 0 || column
>= bPtr
->usedColumnCount
)
818 list
= WMGetBrowserListInColumn(bPtr
, column
);
820 if (row
< 0 || row
>= WMGetListNumberOfRows(list
))
823 removeColumn(bPtr
, column
+1);
824 if (bPtr
->usedColumnCount
< bPtr
->maxVisibleColumns
)
825 scrollToColumn(bPtr
, 0);
827 scrollToColumn(bPtr
, bPtr
->usedColumnCount
-bPtr
->maxVisibleColumns
);
829 WMRemoveListItem(list
, row
);
834 WMAddBrowserColumn(WMBrowser
*bPtr
)
843 if (bPtr
->usedColumnCount
< bPtr
->columnCount
) {
844 return bPtr
->usedColumnCount
++;
847 bPtr
->usedColumnCount
++;
849 if (bPtr
->flags
.isTitled
) {
850 colY
= TITLE_SPACING
+ bPtr
->titleHeight
;
855 index
= bPtr
->columnCount
;
857 clist
= wmalloc(sizeof(WMList
*)*bPtr
->columnCount
);
858 tlist
= wmalloc(sizeof(char*)*bPtr
->columnCount
);
859 memcpy(clist
, bPtr
->columns
, sizeof(WMList
*)*(bPtr
->columnCount
-1));
860 memcpy(tlist
, bPtr
->titles
, sizeof(char*)*(bPtr
->columnCount
-1));
865 bPtr
->columns
= clist
;
866 bPtr
->titles
= tlist
;
868 bPtr
->titles
[index
] = NULL
;
870 list
= WMCreateList(bPtr
);
871 WMSetListAction(list
, listCallback
, bPtr
);
872 WMSetListUserDrawProc(list
, paintItem
);
873 bPtr
->columns
[index
] = list
;
875 WMResizeWidget(list
, bPtr
->columnSize
.width
, bPtr
->columnSize
.height
);
876 WMMoveWidget(list
, (bPtr
->columnSize
.width
+COLUMN_SPACING
)*index
, colY
);
877 if (COLUMN_IS_VISIBLE(bPtr
, index
))
880 /* update the scroller */
881 if (bPtr
->columnCount
> bPtr
->maxVisibleColumns
) {
882 float value
, proportion
;
884 value
= bPtr
->firstVisibleColumn
885 /(float)(bPtr
->columnCount
-bPtr
->maxVisibleColumns
);
886 proportion
= bPtr
->maxVisibleColumns
/(float)bPtr
->columnCount
;
887 WMSetScrollerParameters(bPtr
->scroller
, value
, proportion
);
896 destroyBrowser(WMBrowser
*bPtr
)
900 for (i
=0; i
<bPtr
->columnCount
; i
++) {
902 free(bPtr
->titles
[i
]);
906 free(bPtr
->pathSeparator
);