ui/common/utils.c

Sun, 23 Nov 2025 10:23:10 +0100

author
Olaf Wintermann <olaf.wintermann@gmail.com>
date
Sun, 23 Nov 2025 10:23:10 +0100
changeset 929
43cb1ea4c582
parent 927
b8c0f718b141
child 930
4ce8df2311f0
permissions
-rw-r--r--

implement ui_call_mainthread (Motif)

927
b8c0f718b141 move default path elm func to common
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
1 /*
b8c0f718b141 move default path elm func to common
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
2 * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS HEADER.
b8c0f718b141 move default path elm func to common
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
3 *
b8c0f718b141 move default path elm func to common
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
4 * Copyright 2017 Olaf Wintermann. All rights reserved.
b8c0f718b141 move default path elm func to common
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
5 *
b8c0f718b141 move default path elm func to common
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
6 * Redistribution and use in source and binary forms, with or without
b8c0f718b141 move default path elm func to common
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
7 * modification, are permitted provided that the following conditions are met:
b8c0f718b141 move default path elm func to common
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
8 *
b8c0f718b141 move default path elm func to common
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
9 * 1. Redistributions of source code must retain the above copyright
b8c0f718b141 move default path elm func to common
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
10 * notice, this list of conditions and the following disclaimer.
b8c0f718b141 move default path elm func to common
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
11 *
b8c0f718b141 move default path elm func to common
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
12 * 2. Redistributions in binary form must reproduce the above copyright
b8c0f718b141 move default path elm func to common
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
13 * notice, this list of conditions and the following disclaimer in the
b8c0f718b141 move default path elm func to common
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
14 * documentation and/or other materials provided with the distribution.
b8c0f718b141 move default path elm func to common
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
15 *
b8c0f718b141 move default path elm func to common
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
16 * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
b8c0f718b141 move default path elm func to common
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
17 * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
b8c0f718b141 move default path elm func to common
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
18 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
b8c0f718b141 move default path elm func to common
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
19 * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT HOLDER OR CONTRIBUTORS BE
b8c0f718b141 move default path elm func to common
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
20 * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
b8c0f718b141 move default path elm func to common
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
21 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
b8c0f718b141 move default path elm func to common
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
22 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
b8c0f718b141 move default path elm func to common
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
23 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
b8c0f718b141 move default path elm func to common
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
24 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
b8c0f718b141 move default path elm func to common
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
25 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
b8c0f718b141 move default path elm func to common
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
26 * POSSIBILITY OF SUCH DAMAGE.
b8c0f718b141 move default path elm func to common
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
27 */
b8c0f718b141 move default path elm func to common
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
28
b8c0f718b141 move default path elm func to common
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
29 #include "utils.h"
b8c0f718b141 move default path elm func to common
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
30
b8c0f718b141 move default path elm func to common
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
31 #include <cx/string.h>
b8c0f718b141 move default path elm func to common
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
32
b8c0f718b141 move default path elm func to common
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
33 UiPathElm* ui_default_pathelm_func(const char* full_path, size_t len, size_t* ret_nelm, void* data) {
b8c0f718b141 move default path elm func to common
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
34 cxstring *pathelms;
b8c0f718b141 move default path elm func to common
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
35 size_t nelm = cx_strsplit_a(cxDefaultAllocator, cx_strn(full_path, len), CX_STR("/"), 4096, &pathelms);
b8c0f718b141 move default path elm func to common
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
36
b8c0f718b141 move default path elm func to common
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
37 if (nelm == 0) {
b8c0f718b141 move default path elm func to common
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
38 *ret_nelm = 0;
b8c0f718b141 move default path elm func to common
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
39 return NULL;
b8c0f718b141 move default path elm func to common
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
40 }
b8c0f718b141 move default path elm func to common
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
41
b8c0f718b141 move default path elm func to common
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
42 UiPathElm* elms = (UiPathElm*)calloc(nelm, sizeof(UiPathElm));
b8c0f718b141 move default path elm func to common
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
43 size_t n = nelm;
b8c0f718b141 move default path elm func to common
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
44 int j = 0;
b8c0f718b141 move default path elm func to common
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
45 for (int i = 0; i < nelm; i++) {
b8c0f718b141 move default path elm func to common
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
46 cxstring c = pathelms[i];
b8c0f718b141 move default path elm func to common
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
47 if (c.length == 0) {
b8c0f718b141 move default path elm func to common
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
48 if (i == 0) {
b8c0f718b141 move default path elm func to common
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
49 c.length = 1;
b8c0f718b141 move default path elm func to common
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
50 }
b8c0f718b141 move default path elm func to common
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
51 else {
b8c0f718b141 move default path elm func to common
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
52 n--;
b8c0f718b141 move default path elm func to common
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
53 continue;
b8c0f718b141 move default path elm func to common
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
54 }
b8c0f718b141 move default path elm func to common
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
55 }
b8c0f718b141 move default path elm func to common
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
56
b8c0f718b141 move default path elm func to common
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
57 cxmutstr m = cx_strdup(c);
b8c0f718b141 move default path elm func to common
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
58 elms[j].name = m.ptr;
b8c0f718b141 move default path elm func to common
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
59 elms[j].name_len = m.length;
b8c0f718b141 move default path elm func to common
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
60
b8c0f718b141 move default path elm func to common
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
61 size_t elm_path_len = c.ptr + c.length - full_path;
b8c0f718b141 move default path elm func to common
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
62 cxmutstr elm_path = cx_strdup(cx_strn(full_path, elm_path_len));
b8c0f718b141 move default path elm func to common
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
63 elms[j].path = elm_path.ptr;
b8c0f718b141 move default path elm func to common
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
64 elms[j].path_len = elm_path.length;
b8c0f718b141 move default path elm func to common
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
65
b8c0f718b141 move default path elm func to common
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
66 j++;
b8c0f718b141 move default path elm func to common
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
67 }
b8c0f718b141 move default path elm func to common
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
68 *ret_nelm = n;
b8c0f718b141 move default path elm func to common
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
69
b8c0f718b141 move default path elm func to common
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
70 return elms;
b8c0f718b141 move default path elm func to common
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
71 }

mercurial