comparison: ui/motif/list.c
ui/motif/list.c
- changeset 100
- d2bd73d28ff1
- parent 0
- 2483f517c562
equal
deleted
inserted
replaced
| 99:b9767cb5b06b | 100:d2bd73d28ff1 |
|---|---|
| 32 #include "container.h" | 32 #include "container.h" |
| 33 | 33 |
| 34 #include "list.h" | 34 #include "list.h" |
| 35 #include "../common/object.h" | 35 #include "../common/object.h" |
| 36 | 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 = cxMalloc(obj->ctx->allocator, 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 = cxMalloc( | |
| 76 obj->ctx->allocator, | |
| 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 = cxMalloc( | |
| 186 obj->ctx->allocator, | |
| 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 return parent; | |
| 208 } |
