ui/cocoa/text.m

Sun, 03 Aug 2025 10:53:58 +0200

author
Olaf Wintermann <olaf.wintermann@gmail.com>
date
Sun, 03 Aug 2025 10:53:58 +0200
changeset 686
1e2f3a44d455
parent 685
36e08a9aff8e
child 718
06eec75a6fd5
permissions
-rw-r--r--

implement missing ui_textarea functions (Cocoa)

500
95ab1710993f fix nested box containers (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
1 /*
95ab1710993f fix nested box containers (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
2 * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS HEADER.
95ab1710993f fix nested box containers (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
3 *
95ab1710993f fix nested box containers (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
4 * Copyright 2025 Olaf Wintermann. All rights reserved.
95ab1710993f fix nested box containers (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
5 *
95ab1710993f fix nested box containers (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
6 * Redistribution and use in source and binary forms, with or without
95ab1710993f fix nested box containers (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
7 * modification, are permitted provided that the following conditions are met:
95ab1710993f fix nested box containers (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
8 *
95ab1710993f fix nested box containers (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
9 * 1. Redistributions of source code must retain the above copyright
95ab1710993f fix nested box containers (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
10 * notice, this list of conditions and the following disclaimer.
95ab1710993f fix nested box containers (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
11 *
95ab1710993f fix nested box containers (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
12 * 2. Redistributions in binary form must reproduce the above copyright
95ab1710993f fix nested box containers (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
13 * notice, this list of conditions and the following disclaimer in the
95ab1710993f fix nested box containers (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
14 * documentation and/or other materials provided with the distribution.
95ab1710993f fix nested box containers (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
15 *
95ab1710993f fix nested box containers (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
16 * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
95ab1710993f fix nested box containers (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
17 * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
95ab1710993f fix nested box containers (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
18 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
95ab1710993f fix nested box containers (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
19 * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT HOLDER OR CONTRIBUTORS BE
95ab1710993f fix nested box containers (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
20 * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
95ab1710993f fix nested box containers (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
21 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
95ab1710993f fix nested box containers (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
22 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
95ab1710993f fix nested box containers (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
23 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
95ab1710993f fix nested box containers (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
24 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
95ab1710993f fix nested box containers (Cocoa)
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
95ab1710993f fix nested box containers (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
26 * POSSIBILITY OF SUCH DAMAGE.
95ab1710993f fix nested box containers (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
27 */
95ab1710993f fix nested box containers (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
28
95ab1710993f fix nested box containers (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
29 #import "text.h"
95ab1710993f fix nested box containers (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
30 #import "EventData.h"
95ab1710993f fix nested box containers (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
31 #import "Container.h"
95ab1710993f fix nested box containers (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
32 #import <objc/runtime.h>
95ab1710993f fix nested box containers (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
33
603
8d2b7b934230 refactore widget args passing (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 590
diff changeset
34 UIWIDGET ui_textarea_create(UiObject *obj, UiTextAreaArgs *args) {
539
96f466ceaf23 fix textview creation (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 538
diff changeset
35 NSTextView *textview = [[NSTextView alloc] init];
540
d8b86f66721c another textview/scrollview layout fix (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 539
diff changeset
36 textview.autoresizingMask = NSViewWidthSizable;
d8b86f66721c another textview/scrollview layout fix (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 539
diff changeset
37 textview.minSize = NSMakeSize(0, 0);
d8b86f66721c another textview/scrollview layout fix (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 539
diff changeset
38 textview.maxSize = NSMakeSize(FLT_MAX, FLT_MAX);
539
96f466ceaf23 fix textview creation (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 538
diff changeset
39
538
5004b4a9b16d use view.fittingSize as backup to intrisicContentSize in GridLayout (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 500
diff changeset
40 NSScrollView *scrollview = [[NSScrollView alloc] init];
539
96f466ceaf23 fix textview creation (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 538
diff changeset
41 scrollview.hasVerticalScroller = YES;
538
5004b4a9b16d use view.fittingSize as backup to intrisicContentSize in GridLayout (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 500
diff changeset
42 scrollview.documentView = textview;
500
95ab1710993f fix nested box containers (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
43
95ab1710993f fix nested box containers (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
44 UiLayout layout = UI_INIT_LAYOUT(args);
538
5004b4a9b16d use view.fittingSize as backup to intrisicContentSize in GridLayout (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 500
diff changeset
45 ui_container_add(obj, scrollview, &layout, TRUE);
500
95ab1710993f fix nested box containers (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
46
584
12cca226c1eb implement textarea value binding (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 540
diff changeset
47
603
8d2b7b934230 refactore widget args passing (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 590
diff changeset
48 UiVar* var = uic_widget_var(obj->ctx, obj->ctx, args->value, args->varname, UI_VAR_TEXT);
584
12cca226c1eb implement textarea value binding (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 540
diff changeset
49 if(var) {
12cca226c1eb implement textarea value binding (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 540
diff changeset
50 UiText *text = var->value;
12cca226c1eb implement textarea value binding (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 540
diff changeset
51 text->obj = (__bridge void*)textview;
12cca226c1eb implement textarea value binding (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 540
diff changeset
52 ui_textarea_restore(text);
12cca226c1eb implement textarea value binding (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 540
diff changeset
53
12cca226c1eb implement textarea value binding (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 540
diff changeset
54 text->save = ui_textarea_save;
12cca226c1eb implement textarea value binding (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 540
diff changeset
55 text->destroy = ui_textarea_destroy;
12cca226c1eb implement textarea value binding (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 540
diff changeset
56 text->restore = ui_textarea_restore;
12cca226c1eb implement textarea value binding (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 540
diff changeset
57 text->set = ui_textarea_set;
12cca226c1eb implement textarea value binding (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 540
diff changeset
58 text->get = ui_textarea_get;
12cca226c1eb implement textarea value binding (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 540
diff changeset
59 text->getsubstr = ui_textarea_getsubstr;
12cca226c1eb implement textarea value binding (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 540
diff changeset
60 text->insert = ui_textarea_insert;
12cca226c1eb implement textarea value binding (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 540
diff changeset
61 text->setposition = ui_textarea_setposition;
12cca226c1eb implement textarea value binding (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 540
diff changeset
62 text->position = ui_textarea_position;
12cca226c1eb implement textarea value binding (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 540
diff changeset
63 text->setselection = ui_textarea_setselection;
12cca226c1eb implement textarea value binding (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 540
diff changeset
64 text->selection = ui_textarea_selection;
12cca226c1eb implement textarea value binding (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 540
diff changeset
65 text->length = ui_textarea_length;
12cca226c1eb implement textarea value binding (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 540
diff changeset
66 text->remove = ui_textarea_remove;
12cca226c1eb implement textarea value binding (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 540
diff changeset
67 }
12cca226c1eb implement textarea value binding (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 540
diff changeset
68
538
5004b4a9b16d use view.fittingSize as backup to intrisicContentSize in GridLayout (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 500
diff changeset
69 return (__bridge void*)scrollview;
500
95ab1710993f fix nested box containers (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
70 }
584
12cca226c1eb implement textarea value binding (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 540
diff changeset
71
12cca226c1eb implement textarea value binding (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 540
diff changeset
72
12cca226c1eb implement textarea value binding (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 540
diff changeset
73
12cca226c1eb implement textarea value binding (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 540
diff changeset
74
12cca226c1eb implement textarea value binding (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 540
diff changeset
75 void ui_textarea_save(UiText *text) {
12cca226c1eb implement textarea value binding (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 540
diff changeset
76
12cca226c1eb implement textarea value binding (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 540
diff changeset
77 }
12cca226c1eb implement textarea value binding (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 540
diff changeset
78
12cca226c1eb implement textarea value binding (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 540
diff changeset
79 void ui_textarea_destroy(UiText *text) {
12cca226c1eb implement textarea value binding (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 540
diff changeset
80 (void)(__bridge_transfer NSTextStorage*)text->data1;
12cca226c1eb implement textarea value binding (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 540
diff changeset
81 }
12cca226c1eb implement textarea value binding (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 540
diff changeset
82
12cca226c1eb implement textarea value binding (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 540
diff changeset
83 void ui_textarea_restore(UiText *text) {
12cca226c1eb implement textarea value binding (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 540
diff changeset
84 NSTextView *textview = (__bridge NSTextView*)text->obj;
12cca226c1eb implement textarea value binding (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 540
diff changeset
85 NSTextStorage *textStorage;
12cca226c1eb implement textarea value binding (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 540
diff changeset
86 if(text->data1) {
12cca226c1eb implement textarea value binding (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 540
diff changeset
87 textStorage = (__bridge NSTextStorage*)text->data1;
12cca226c1eb implement textarea value binding (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 540
diff changeset
88 } else {
12cca226c1eb implement textarea value binding (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 540
diff changeset
89 textStorage = [[NSTextStorage alloc] init];
12cca226c1eb implement textarea value binding (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 540
diff changeset
90 }
12cca226c1eb implement textarea value binding (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 540
diff changeset
91 [textview.layoutManager replaceTextStorage:textStorage];
12cca226c1eb implement textarea value binding (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 540
diff changeset
92 text->data1 = (__bridge_retained void*)textStorage;
12cca226c1eb implement textarea value binding (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 540
diff changeset
93 }
12cca226c1eb implement textarea value binding (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 540
diff changeset
94
12cca226c1eb implement textarea value binding (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 540
diff changeset
95 void ui_textarea_set(UiText *text, const char *str) {
685
36e08a9aff8e implement textarea UiText functions (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 603
diff changeset
96 NSTextView *textview = (__bridge NSTextView*)text->obj;
36e08a9aff8e implement textarea UiText functions (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 603
diff changeset
97 if(text->value.free) {
36e08a9aff8e implement textarea UiText functions (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 603
diff changeset
98 text->value.free(text->value.ptr);
36e08a9aff8e implement textarea UiText functions (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 603
diff changeset
99 }
36e08a9aff8e implement textarea UiText functions (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 603
diff changeset
100 text->value.ptr = strdup(str);
36e08a9aff8e implement textarea UiText functions (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 603
diff changeset
101 text->value.free = free;
36e08a9aff8e implement textarea UiText functions (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 603
diff changeset
102 textview.string = [[NSString alloc] initWithUTF8String:str];
584
12cca226c1eb implement textarea value binding (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 540
diff changeset
103 }
12cca226c1eb implement textarea value binding (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 540
diff changeset
104
12cca226c1eb implement textarea value binding (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 540
diff changeset
105 char* ui_textarea_get(UiText *text) {
685
36e08a9aff8e implement textarea UiText functions (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 603
diff changeset
106 NSTextView *textview = (__bridge NSTextView*)text->obj;
36e08a9aff8e implement textarea UiText functions (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 603
diff changeset
107 if(text->value.free) {
36e08a9aff8e implement textarea UiText functions (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 603
diff changeset
108 text->value.free(text->value.ptr);
36e08a9aff8e implement textarea UiText functions (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 603
diff changeset
109 }
36e08a9aff8e implement textarea UiText functions (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 603
diff changeset
110 text->value.ptr = strdup(textview.string.UTF8String);
36e08a9aff8e implement textarea UiText functions (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 603
diff changeset
111 text->value.free = free;
36e08a9aff8e implement textarea UiText functions (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 603
diff changeset
112 return text->value.ptr;
584
12cca226c1eb implement textarea value binding (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 540
diff changeset
113 }
12cca226c1eb implement textarea value binding (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 540
diff changeset
114
12cca226c1eb implement textarea value binding (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 540
diff changeset
115 char* ui_textarea_getsubstr(UiText *text, int begin, int end) {
685
36e08a9aff8e implement textarea UiText functions (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 603
diff changeset
116 NSTextView *textview = (__bridge NSTextView*)text->obj;
36e08a9aff8e implement textarea UiText functions (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 603
diff changeset
117 NSString *str = textview.string;
36e08a9aff8e implement textarea UiText functions (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 603
diff changeset
118 NSRange range = NSMakeRange(begin, end-begin);
36e08a9aff8e implement textarea UiText functions (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 603
diff changeset
119 NSString *sub = [str substringWithRange:range];
36e08a9aff8e implement textarea UiText functions (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 603
diff changeset
120 return strdup(sub.UTF8String);
584
12cca226c1eb implement textarea value binding (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 540
diff changeset
121 }
12cca226c1eb implement textarea value binding (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 540
diff changeset
122
12cca226c1eb implement textarea value binding (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 540
diff changeset
123 void ui_textarea_insert(UiText *text, int pos, char *str) {
685
36e08a9aff8e implement textarea UiText functions (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 603
diff changeset
124 NSTextView *textview = (__bridge NSTextView*)text->obj;
36e08a9aff8e implement textarea UiText functions (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 603
diff changeset
125 NSString *s = [[NSString alloc] initWithUTF8String:str];
36e08a9aff8e implement textarea UiText functions (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 603
diff changeset
126 NSAttributedString *attributedStr = [[NSAttributedString alloc] initWithString:s];
36e08a9aff8e implement textarea UiText functions (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 603
diff changeset
127 [textview.textStorage insertAttributedString:attributedStr atIndex:pos];
584
12cca226c1eb implement textarea value binding (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 540
diff changeset
128 }
12cca226c1eb implement textarea value binding (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 540
diff changeset
129
12cca226c1eb implement textarea value binding (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 540
diff changeset
130 void ui_textarea_setposition(UiText *text, int pos) {
685
36e08a9aff8e implement textarea UiText functions (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 603
diff changeset
131 NSTextView *textview = (__bridge NSTextView*)text->obj;
36e08a9aff8e implement textarea UiText functions (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 603
diff changeset
132 NSRange range = NSMakeRange(pos, 0);
36e08a9aff8e implement textarea UiText functions (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 603
diff changeset
133 [textview setSelectedRange:range];
584
12cca226c1eb implement textarea value binding (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 540
diff changeset
134 }
12cca226c1eb implement textarea value binding (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 540
diff changeset
135
12cca226c1eb implement textarea value binding (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 540
diff changeset
136 int ui_textarea_position(UiText *text) {
686
1e2f3a44d455 implement missing ui_textarea functions (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 685
diff changeset
137 NSTextView *textview = (__bridge NSTextView*)text->obj;
1e2f3a44d455 implement missing ui_textarea functions (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 685
diff changeset
138 NSRange range = textview.selectedRange;
1e2f3a44d455 implement missing ui_textarea functions (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 685
diff changeset
139 return (int)range.location;
584
12cca226c1eb implement textarea value binding (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 540
diff changeset
140 }
12cca226c1eb implement textarea value binding (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 540
diff changeset
141
12cca226c1eb implement textarea value binding (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 540
diff changeset
142 void ui_textarea_setselection(UiText *text, int begin, int end) {
685
36e08a9aff8e implement textarea UiText functions (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 603
diff changeset
143 NSTextView *textview = (__bridge NSTextView*)text->obj;
36e08a9aff8e implement textarea UiText functions (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 603
diff changeset
144 NSRange range = NSMakeRange(begin, end-begin);
36e08a9aff8e implement textarea UiText functions (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 603
diff changeset
145 [textview setSelectedRange:range];
584
12cca226c1eb implement textarea value binding (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 540
diff changeset
146 }
12cca226c1eb implement textarea value binding (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 540
diff changeset
147
12cca226c1eb implement textarea value binding (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 540
diff changeset
148 void ui_textarea_selection(UiText *text, int *begin, int *end) {
686
1e2f3a44d455 implement missing ui_textarea functions (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 685
diff changeset
149 NSTextView *textview = (__bridge NSTextView*)text->obj;
1e2f3a44d455 implement missing ui_textarea functions (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 685
diff changeset
150 NSRange range = textview.selectedRange;
1e2f3a44d455 implement missing ui_textarea functions (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 685
diff changeset
151 if(begin) {
1e2f3a44d455 implement missing ui_textarea functions (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 685
diff changeset
152 *begin = (int)range.location;
1e2f3a44d455 implement missing ui_textarea functions (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 685
diff changeset
153 }
1e2f3a44d455 implement missing ui_textarea functions (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 685
diff changeset
154 if(end) {
1e2f3a44d455 implement missing ui_textarea functions (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 685
diff changeset
155 *end = (int)(range.location+range.length);
1e2f3a44d455 implement missing ui_textarea functions (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 685
diff changeset
156 }
584
12cca226c1eb implement textarea value binding (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 540
diff changeset
157 }
12cca226c1eb implement textarea value binding (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 540
diff changeset
158
12cca226c1eb implement textarea value binding (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 540
diff changeset
159 int ui_textarea_length(UiText *text) {
686
1e2f3a44d455 implement missing ui_textarea functions (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 685
diff changeset
160 NSTextView *textview = (__bridge NSTextView*)text->obj;
1e2f3a44d455 implement missing ui_textarea functions (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 685
diff changeset
161 return (int)textview.string.length;
584
12cca226c1eb implement textarea value binding (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 540
diff changeset
162 }
12cca226c1eb implement textarea value binding (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 540
diff changeset
163
12cca226c1eb implement textarea value binding (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 540
diff changeset
164 void ui_textarea_remove(UiText *text, int begin, int end) {
686
1e2f3a44d455 implement missing ui_textarea functions (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 685
diff changeset
165 NSTextView *textview = (__bridge NSTextView*)text->obj;
584
12cca226c1eb implement textarea value binding (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 540
diff changeset
166
686
1e2f3a44d455 implement missing ui_textarea functions (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 685
diff changeset
167 if (begin < 0 || end < begin || end > textview.string.length) {
1e2f3a44d455 implement missing ui_textarea functions (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 685
diff changeset
168 return;
1e2f3a44d455 implement missing ui_textarea functions (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 685
diff changeset
169 }
1e2f3a44d455 implement missing ui_textarea functions (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 685
diff changeset
170
1e2f3a44d455 implement missing ui_textarea functions (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 685
diff changeset
171 NSRange range = NSMakeRange(begin, end - begin);
1e2f3a44d455 implement missing ui_textarea functions (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 685
diff changeset
172 [[textview textStorage] deleteCharactersInRange:range];
584
12cca226c1eb implement textarea value binding (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 540
diff changeset
173 }
590
07ecff1fa805 add textfield (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 584
diff changeset
174
07ecff1fa805 add textfield (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 584
diff changeset
175
07ecff1fa805 add textfield (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 584
diff changeset
176
07ecff1fa805 add textfield (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 584
diff changeset
177 /* -------------------------- TextField -------------------------- */
07ecff1fa805 add textfield (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 584
diff changeset
178
603
8d2b7b934230 refactore widget args passing (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 590
diff changeset
179 static UIWIDGET textfield_create(UiObject *obj, UiTextFieldArgs *args, BOOL password, BOOL frameless) {
590
07ecff1fa805 add textfield (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 584
diff changeset
180 NSTextField *textfield;
07ecff1fa805 add textfield (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 584
diff changeset
181 if(password) {
07ecff1fa805 add textfield (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 584
diff changeset
182 textfield = [[NSSecureTextField alloc] init];
07ecff1fa805 add textfield (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 584
diff changeset
183 } else {
07ecff1fa805 add textfield (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 584
diff changeset
184 textfield = [[NSTextField alloc] init];
07ecff1fa805 add textfield (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 584
diff changeset
185 }
07ecff1fa805 add textfield (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 584
diff changeset
186
07ecff1fa805 add textfield (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 584
diff changeset
187 if(frameless) {
07ecff1fa805 add textfield (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 584
diff changeset
188 [textfield setBezeled: NO];
07ecff1fa805 add textfield (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 584
diff changeset
189 }
07ecff1fa805 add textfield (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 584
diff changeset
190
07ecff1fa805 add textfield (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 584
diff changeset
191 UiLayout layout = UI_INIT_LAYOUT(args);
07ecff1fa805 add textfield (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 584
diff changeset
192 ui_container_add(obj, textfield, &layout, FALSE);
07ecff1fa805 add textfield (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 584
diff changeset
193
603
8d2b7b934230 refactore widget args passing (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 590
diff changeset
194 UiVar* var = uic_widget_var(obj->ctx, obj->ctx, args->value, args->varname, UI_VAR_STRING);
590
07ecff1fa805 add textfield (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 584
diff changeset
195 if(var) {
07ecff1fa805 add textfield (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 584
diff changeset
196 UiString *s = var->value;
07ecff1fa805 add textfield (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 584
diff changeset
197 if(s->value.ptr) {
07ecff1fa805 add textfield (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 584
diff changeset
198 textfield.stringValue = [[NSString alloc] initWithUTF8String:s->value.ptr];
07ecff1fa805 add textfield (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 584
diff changeset
199 if(s->value.free) {
07ecff1fa805 add textfield (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 584
diff changeset
200 s->value.free(s->value.ptr);
07ecff1fa805 add textfield (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 584
diff changeset
201 }
07ecff1fa805 add textfield (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 584
diff changeset
202 }
07ecff1fa805 add textfield (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 584
diff changeset
203 s->obj = (__bridge void*)textfield;
07ecff1fa805 add textfield (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 584
diff changeset
204 s->get = ui_textfield_get;
07ecff1fa805 add textfield (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 584
diff changeset
205 s->set = ui_textfield_set;
07ecff1fa805 add textfield (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 584
diff changeset
206 }
07ecff1fa805 add textfield (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 584
diff changeset
207
07ecff1fa805 add textfield (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 584
diff changeset
208 return (__bridge void*)textfield;
07ecff1fa805 add textfield (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 584
diff changeset
209 }
07ecff1fa805 add textfield (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 584
diff changeset
210
603
8d2b7b934230 refactore widget args passing (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 590
diff changeset
211 UIWIDGET ui_textfield_create(UiObject *obj, UiTextFieldArgs *args) {
590
07ecff1fa805 add textfield (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 584
diff changeset
212 return textfield_create(obj, args, FALSE, FALSE);
07ecff1fa805 add textfield (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 584
diff changeset
213 }
07ecff1fa805 add textfield (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 584
diff changeset
214
603
8d2b7b934230 refactore widget args passing (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 590
diff changeset
215 UIWIDGET ui_frameless_textfield_create(UiObject* obj, UiTextFieldArgs *args) {
590
07ecff1fa805 add textfield (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 584
diff changeset
216 return textfield_create(obj, args, FALSE, TRUE);
07ecff1fa805 add textfield (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 584
diff changeset
217 }
07ecff1fa805 add textfield (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 584
diff changeset
218
603
8d2b7b934230 refactore widget args passing (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 590
diff changeset
219 UIWIDGET ui_passwordfield_create(UiObject* obj, UiTextFieldArgs *args) {
590
07ecff1fa805 add textfield (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 584
diff changeset
220 return textfield_create(obj, args, TRUE, FALSE);
07ecff1fa805 add textfield (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 584
diff changeset
221 }
07ecff1fa805 add textfield (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 584
diff changeset
222
07ecff1fa805 add textfield (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 584
diff changeset
223 char* ui_textfield_get(UiString *s) {
07ecff1fa805 add textfield (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 584
diff changeset
224 NSTextField *textfield = (__bridge NSTextField*)s->obj;
07ecff1fa805 add textfield (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 584
diff changeset
225 NSString *str = textfield.stringValue;
07ecff1fa805 add textfield (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 584
diff changeset
226 const char *cstr = str.UTF8String;
07ecff1fa805 add textfield (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 584
diff changeset
227 if(s->value.free) {
07ecff1fa805 add textfield (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 584
diff changeset
228 s->value.free(s->value.ptr);
07ecff1fa805 add textfield (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 584
diff changeset
229 }
07ecff1fa805 add textfield (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 584
diff changeset
230 s->value.ptr = strdup(cstr);
07ecff1fa805 add textfield (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 584
diff changeset
231 s->value.free = free;
07ecff1fa805 add textfield (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 584
diff changeset
232 return s->value.ptr;
07ecff1fa805 add textfield (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 584
diff changeset
233 }
07ecff1fa805 add textfield (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 584
diff changeset
234
07ecff1fa805 add textfield (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 584
diff changeset
235 void ui_textfield_set(UiString *s, const char *value) {
07ecff1fa805 add textfield (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 584
diff changeset
236 if(s->value.free) {
07ecff1fa805 add textfield (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 584
diff changeset
237 s->value.free(s->value.ptr);
07ecff1fa805 add textfield (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 584
diff changeset
238 }
07ecff1fa805 add textfield (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 584
diff changeset
239 s->value.ptr = NULL;
07ecff1fa805 add textfield (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 584
diff changeset
240 s->value.free = NULL;
07ecff1fa805 add textfield (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 584
diff changeset
241 NSTextField *textfield = (__bridge NSTextField*)s->obj;
07ecff1fa805 add textfield (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 584
diff changeset
242 textfield.stringValue = [[NSString alloc] initWithUTF8String:value];
07ecff1fa805 add textfield (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 584
diff changeset
243 }

mercurial