1 /*
2 * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS HEADER.
3 *
4 * Copyright 2014 Olaf Wintermann. All rights reserved.
5 *
6 * Redistribution and use in source and binary forms, with or without
7 * modification, are permitted provided that the following conditions are met:
8 *
9 * 1. Redistributions of source code must retain the above copyright
10 * notice, this list of conditions and the following disclaimer.
11 *
12 * 2. Redistributions in binary form must reproduce the above copyright
13 * notice, this list of conditions and the following disclaimer in the
14 * documentation and/or other materials provided with the distribution.
15 *
16 * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
17 * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
18 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
19 * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT HOLDER OR CONTRIBUTORS BE
20 * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
21 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
22 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
23 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
24 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
25 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
26 * POSSIBILITY OF SUCH DAMAGE.
27 */
28
29 #include <stdio.h>
30 #include <stdlib.h>
31
32 #include "container.h"
33
34 #include "list.h"
35 #include "../common/object.h"
36
37
38 void* ui_strmodel_getvalue(void *elm, int column) {
39 return column == 0 ? elm : NULL;
40 }
41
42
43 UIWIDGET ui_listview_str(UiObject *obj, UiList *list, ui_callback f, void *udata) {
44 return ui_listview(obj, list, ui_strmodel_getvalue, f, udata);
45 }
46
47 UIWIDGET ui_listview_var(UiObject *obj, UiVar *var, ui_getvaluefunc getvalue, ui_callback f, void *udata) {
48 int count;
49 XmStringTable items = ui_create_stringlist(var->value, getvalue, &count);
50
51 Arg args[8];
52 int n = 0;
53 XtSetArg(args[n], XmNitemCount, count);
54 n++;
55 XtSetArg(args[n], XmNitems, count == 0 ? NULL : items);
56 n++;
57
58 UiContainer *ct = uic_get_current_container(obj);
59 Widget parent = ct->prepare(ct, args, &n, TRUE);
60 Widget widget = XmCreateScrolledList(parent, "listview", args, n);
61 ct->add(ct, XtParent(widget));
62 XtManageChild(widget);
63
64 UiListView *listview = ucx_mempool_malloc(obj->ctx->mempool, sizeof(UiListView));
65 listview->widget = widget;
66 listview->list = var;
67 listview->getvalue = getvalue;
68
69 for (int i=0;i<count;i++) {
70 XmStringFree(items[i]);
71 }
72 XtFree((char *)items);
73
74 if(f) {
75 UiListViewEventData *event = ucx_mempool_malloc(
76 obj->ctx->mempool,
77 sizeof(UiListViewEventData));
78 event->event.obj = obj;
79 event->event.userdata = udata;
80 event->event.callback = f;
81 event->event.value = 0;
82 event->var = var;
83 XtAddCallback(
84 widget,
85 XmNdefaultActionCallback,
86 (XtCallbackProc)ui_list_selection_callback,
87 event);
88 }
89
90 return widget;
91 }
92
93 UIWIDGET ui_listview(UiObject *obj, UiList *list, ui_getvaluefunc getvalue, ui_callback f, void *udata) {
94 UiVar *var = malloc(sizeof(UiVar));
95 var->value = list;
96 var->type = UI_VAR_SPECIAL;
97 return ui_listview_var(obj, var, getvalue, f, udata);
98 }
99
100 UIWIDGET ui_listview_nv(UiObject *obj, char *varname, ui_getvaluefunc getvalue, ui_callback f, void *udata) {
101 UiVar *var = uic_create_var(obj->ctx, varname, UI_VAR_LIST);
102 if(var) {
103 UiListVar *value = var->value;
104 return ui_listview_var(obj, var, getvalue, f, udata);
105 } else {
106 // TODO: error
107 }
108 return NULL;
109 }
110
111
112 XmStringTable ui_create_stringlist(UiList *list, ui_getvaluefunc getvalue, int *count) {
113 int num = list->count(list);
114 XmStringTable items = (XmStringTable)XtMalloc(num * sizeof(XmString));
115 void *data = list->first(list);
116 for(int i=0;i<num;i++) {
117 items[i] = XmStringCreateLocalized(getvalue(data, 0));
118 data = list->next(list);
119 }
120
121 *count = num;
122 return items;
123 }
124
125
126 void ui_listview_update(UiEvent *event, UiListView *view) {
127 int count;
128 XmStringTable items = ui_create_stringlist(
129 view->list->value,
130 view->getvalue,
131 &count);
132
133 XtVaSetValues(
134 view->widget,
135 XmNitems, count == 0 ? NULL : items,
136 XmNitemCount,
137 count,
138 NULL);
139
140 for (int i=0;i<count;i++) {
141 XmStringFree(items[i]);
142 }
143 XtFree((char *)items);
144 }
145
146 void ui_list_selection_callback (Widget widget, UiListViewEventData *event, XtPointer data) {
147 XmListCallbackStruct *cbs = (XmListCallbackStruct *)data;
148
149 UiEvent e;
150 e.obj = event->event.obj;
151 e.window = event->event.obj->window;
152 e.document = event->event.obj->ctx->document;
153 UiList *list = event->var->value;
154 e.eventdata = list->get(list, cbs->item_position - 1);
155 e.intval = cbs->item_position - 1;
156 event->event.callback(&e, event->event.userdata);
157 }
158
159
160 /* --------------------------- ComboBox --------------------------- */
161
162 UIWIDGET ui_combobox_str(UiObject *obj, UiList *list, ui_callback f, void *udata) {
163 return ui_combobox(obj, list, ui_strmodel_getvalue, f, udata);
164 }
165
166 UIWIDGET ui_combobox(UiObject *obj, UiList *list, ui_getvaluefunc getvalue, ui_callback f, void *udata) {
167 UiVar *var = malloc(sizeof(UiVar));
168 var->value = list;
169 var->type = UI_VAR_SPECIAL;
170 return ui_combobox_var(obj, var, getvalue, f, udata);
171 }
172
173 UIWIDGET ui_combobox_nv(UiObject *obj, char *varname, ui_getvaluefunc getvalue, ui_callback f, void *udata) {
174 UiVar *var = uic_create_var(obj->ctx, varname, UI_VAR_LIST);
175 if(var) {
176 UiListVar *value = var->value;
177 return ui_combobox_var(obj, var, getvalue, f, udata);
178 } else {
179 // TODO: error
180 }
181 return NULL;
182 }
183
184 UIWIDGET ui_combobox_var(UiObject *obj, UiVar *var, ui_getvaluefunc getvalue, ui_callback f, void *udata) {
185 UiListView *listview = ucx_mempool_malloc(
186 obj->ctx->mempool,
187 sizeof(UiListView));
188
189 UiContainer *ct = uic_get_current_container(obj);
190 Arg args[16];
191 int n = 0;
192 XtSetArg(args[n], XmNindicatorOn, XmINDICATOR_NONE);
193 n++;
194 XtSetArg(args[n], XmNtraversalOn, FALSE);
195 n++;
196 XtSetArg(args[n], XmNwidth, 160);
197 n++;
198 Widget parent = ct->prepare(ct, args, &n, FALSE);
199 Widget combobox = XmCreateDropDownList(parent, "combobox", args, n);
200 XtManageChild(combobox);
201 listview->widget = combobox;
202 listview->list = var;
203 listview->getvalue = getvalue;
204
205 ui_listview_update(NULL, listview);
206
207 }
208