Fri, 15 Nov 2024 21:16:18 +0100
add UiObject reference counting (GTK)
7
431dde3c5fbe
added Cocoa implementation
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff
changeset
|
1 | /* |
431dde3c5fbe
added Cocoa implementation
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff
changeset
|
2 | * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS HEADER. |
431dde3c5fbe
added Cocoa implementation
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff
changeset
|
3 | * |
431dde3c5fbe
added Cocoa implementation
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff
changeset
|
4 | * Copyright 2014 Olaf Wintermann. All rights reserved. |
431dde3c5fbe
added Cocoa implementation
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff
changeset
|
5 | * |
431dde3c5fbe
added Cocoa implementation
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff
changeset
|
6 | * Redistribution and use in source and binary forms, with or without |
431dde3c5fbe
added Cocoa implementation
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff
changeset
|
7 | * modification, are permitted provided that the following conditions are met: |
431dde3c5fbe
added Cocoa implementation
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff
changeset
|
8 | * |
431dde3c5fbe
added Cocoa implementation
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff
changeset
|
9 | * 1. Redistributions of source code must retain the above copyright |
431dde3c5fbe
added Cocoa implementation
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff
changeset
|
10 | * notice, this list of conditions and the following disclaimer. |
431dde3c5fbe
added Cocoa implementation
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff
changeset
|
11 | * |
431dde3c5fbe
added Cocoa implementation
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff
changeset
|
12 | * 2. Redistributions in binary form must reproduce the above copyright |
431dde3c5fbe
added Cocoa implementation
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff
changeset
|
13 | * notice, this list of conditions and the following disclaimer in the |
431dde3c5fbe
added Cocoa implementation
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff
changeset
|
14 | * documentation and/or other materials provided with the distribution. |
431dde3c5fbe
added Cocoa implementation
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff
changeset
|
15 | * |
431dde3c5fbe
added Cocoa implementation
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff
changeset
|
16 | * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS" |
431dde3c5fbe
added Cocoa implementation
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff
changeset
|
17 | * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE |
431dde3c5fbe
added Cocoa implementation
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff
changeset
|
18 | * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE |
431dde3c5fbe
added Cocoa implementation
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff
changeset
|
19 | * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT HOLDER OR CONTRIBUTORS BE |
431dde3c5fbe
added Cocoa implementation
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff
changeset
|
20 | * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR |
431dde3c5fbe
added Cocoa implementation
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff
changeset
|
21 | * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF |
431dde3c5fbe
added Cocoa implementation
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff
changeset
|
22 | * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS |
431dde3c5fbe
added Cocoa implementation
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff
changeset
|
23 | * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN |
431dde3c5fbe
added Cocoa implementation
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff
changeset
|
24 | * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) |
431dde3c5fbe
added Cocoa implementation
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 |
431dde3c5fbe
added Cocoa implementation
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff
changeset
|
26 | * POSSIBILITY OF SUCH DAMAGE. |
431dde3c5fbe
added Cocoa implementation
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff
changeset
|
27 | */ |
431dde3c5fbe
added Cocoa implementation
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff
changeset
|
28 | |
431dde3c5fbe
added Cocoa implementation
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff
changeset
|
29 | #import <stdio.h> |
431dde3c5fbe
added Cocoa implementation
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff
changeset
|
30 | #import <stdlib.h> |
431dde3c5fbe
added Cocoa implementation
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff
changeset
|
31 | #import <string.h> |
431dde3c5fbe
added Cocoa implementation
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff
changeset
|
32 | |
431dde3c5fbe
added Cocoa implementation
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff
changeset
|
33 | #import "text.h" |
431dde3c5fbe
added Cocoa implementation
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff
changeset
|
34 | #import "container.h" |
431dde3c5fbe
added Cocoa implementation
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff
changeset
|
35 | |
13
2dbc56c2323b
added some text functions for the Cocoa implementation
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
7
diff
changeset
|
36 | @implementation TextChangeMgr |
2dbc56c2323b
added some text functions for the Cocoa implementation
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
7
diff
changeset
|
37 | |
23
decc6bf584aa
textarea automatically sets selection group (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
13
diff
changeset
|
38 | - (TextChangeMgr*)initWithValue:(UiText*)text context:(UiContext*)ctx { |
13
2dbc56c2323b
added some text functions for the Cocoa implementation
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
7
diff
changeset
|
39 | value = text; |
23
decc6bf584aa
textarea automatically sets selection group (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
13
diff
changeset
|
40 | context = ctx; |
decc6bf584aa
textarea automatically sets selection group (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
13
diff
changeset
|
41 | last_length = 0; |
13
2dbc56c2323b
added some text functions for the Cocoa implementation
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
7
diff
changeset
|
42 | return self; |
2dbc56c2323b
added some text functions for the Cocoa implementation
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
7
diff
changeset
|
43 | } |
2dbc56c2323b
added some text functions for the Cocoa implementation
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
7
diff
changeset
|
44 | |
2dbc56c2323b
added some text functions for the Cocoa implementation
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
7
diff
changeset
|
45 | - (NSUndoManager*)undoManagerForTextView:(NSTextView*)textview { |
2dbc56c2323b
added some text functions for the Cocoa implementation
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
7
diff
changeset
|
46 | return (NSUndoManager*)value->undomgr; |
2dbc56c2323b
added some text functions for the Cocoa implementation
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
7
diff
changeset
|
47 | } |
2dbc56c2323b
added some text functions for the Cocoa implementation
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
7
diff
changeset
|
48 | |
23
decc6bf584aa
textarea automatically sets selection group (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
13
diff
changeset
|
49 | - (NSRange)textView:(NSTextView *)textview |
decc6bf584aa
textarea automatically sets selection group (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
13
diff
changeset
|
50 | willChangeSelectionFromCharacterRange:(NSRange)oldrange |
decc6bf584aa
textarea automatically sets selection group (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
13
diff
changeset
|
51 | toCharacterRange:(NSRange)newrange |
decc6bf584aa
textarea automatically sets selection group (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
13
diff
changeset
|
52 | { |
decc6bf584aa
textarea automatically sets selection group (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
13
diff
changeset
|
53 | if(newrange.length != last_length) { |
decc6bf584aa
textarea automatically sets selection group (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
13
diff
changeset
|
54 | if(newrange.length == 0) { |
decc6bf584aa
textarea automatically sets selection group (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
13
diff
changeset
|
55 | ui_unset_group(context, UI_GROUP_SELECTION); |
decc6bf584aa
textarea automatically sets selection group (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
13
diff
changeset
|
56 | } else { |
decc6bf584aa
textarea automatically sets selection group (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
13
diff
changeset
|
57 | ui_set_group(context, UI_GROUP_SELECTION); |
decc6bf584aa
textarea automatically sets selection group (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
13
diff
changeset
|
58 | } |
decc6bf584aa
textarea automatically sets selection group (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
13
diff
changeset
|
59 | } |
decc6bf584aa
textarea automatically sets selection group (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
13
diff
changeset
|
60 | |
decc6bf584aa
textarea automatically sets selection group (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
13
diff
changeset
|
61 | last_length = newrange.length; |
decc6bf584aa
textarea automatically sets selection group (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
13
diff
changeset
|
62 | return newrange; |
decc6bf584aa
textarea automatically sets selection group (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
13
diff
changeset
|
63 | } |
decc6bf584aa
textarea automatically sets selection group (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
13
diff
changeset
|
64 | |
13
2dbc56c2323b
added some text functions for the Cocoa implementation
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
7
diff
changeset
|
65 | @end |
2dbc56c2323b
added some text functions for the Cocoa implementation
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
7
diff
changeset
|
66 | |
2dbc56c2323b
added some text functions for the Cocoa implementation
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
7
diff
changeset
|
67 | |
7
431dde3c5fbe
added Cocoa implementation
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff
changeset
|
68 | UIWIDGET ui_textarea(UiObject *obj, UiText *value) { |
431dde3c5fbe
added Cocoa implementation
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff
changeset
|
69 | UiContainer *ct = uic_get_current_container(obj); |
431dde3c5fbe
added Cocoa implementation
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff
changeset
|
70 | |
431dde3c5fbe
added Cocoa implementation
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff
changeset
|
71 | NSRect frame = ct->getframe(ct); |
431dde3c5fbe
added Cocoa implementation
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff
changeset
|
72 | |
431dde3c5fbe
added Cocoa implementation
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff
changeset
|
73 | NSScrollView *scrollview = [[NSScrollView alloc] initWithFrame:frame]; |
431dde3c5fbe
added Cocoa implementation
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff
changeset
|
74 | [scrollview setHasVerticalScroller:YES]; |
431dde3c5fbe
added Cocoa implementation
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff
changeset
|
75 | //[scrollvew setHasHorizontalScroller:YES]; |
431dde3c5fbe
added Cocoa implementation
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff
changeset
|
76 | [scrollview setBorderType:NSNoBorder]; |
431dde3c5fbe
added Cocoa implementation
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff
changeset
|
77 | //[scrollview setAutoresizingMask:NSViewWidthSizable|NSViewHeightSizable]; |
431dde3c5fbe
added Cocoa implementation
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff
changeset
|
78 | |
431dde3c5fbe
added Cocoa implementation
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff
changeset
|
79 | //frame.size.width = frame.size.width - 15; |
431dde3c5fbe
added Cocoa implementation
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff
changeset
|
80 | NSTextView *textview = [[NSTextView alloc]initWithFrame:frame]; |
13
2dbc56c2323b
added some text functions for the Cocoa implementation
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
7
diff
changeset
|
81 | [textview setAllowsUndo:TRUE]; |
7
431dde3c5fbe
added Cocoa implementation
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff
changeset
|
82 | [textview setAutoresizingMask:NSViewWidthSizable|NSViewHeightSizable]; |
431dde3c5fbe
added Cocoa implementation
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff
changeset
|
83 | |
29
c96169444d88
added locale support (Cocoa) and ucx update
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
26
diff
changeset
|
84 | [textview setFont:[NSFont fontWithName:@"Menlo" size:12]]; |
c96169444d88
added locale support (Cocoa) and ucx update
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
26
diff
changeset
|
85 | |
7
431dde3c5fbe
added Cocoa implementation
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff
changeset
|
86 | [scrollview setDocumentView:textview]; |
431dde3c5fbe
added Cocoa implementation
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff
changeset
|
87 | |
431dde3c5fbe
added Cocoa implementation
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff
changeset
|
88 | ct->add(ct, scrollview); |
431dde3c5fbe
added Cocoa implementation
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff
changeset
|
89 | |
431dde3c5fbe
added Cocoa implementation
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff
changeset
|
90 | // bind value |
431dde3c5fbe
added Cocoa implementation
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff
changeset
|
91 | if(value) { |
431dde3c5fbe
added Cocoa implementation
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff
changeset
|
92 | value->get = ui_textarea_get; |
431dde3c5fbe
added Cocoa implementation
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff
changeset
|
93 | value->set = ui_textarea_set; |
13
2dbc56c2323b
added some text functions for the Cocoa implementation
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
7
diff
changeset
|
94 | value->getsubstr = ui_textarea_getsubstr; |
2dbc56c2323b
added some text functions for the Cocoa implementation
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
7
diff
changeset
|
95 | value->insert = ui_textarea_insert; |
26
a137277f9173
added copy & paste (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
23
diff
changeset
|
96 | value->position = ui_textarea_position; |
a137277f9173
added copy & paste (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
23
diff
changeset
|
97 | value->selection = ui_textarea_selection; |
29
c96169444d88
added locale support (Cocoa) and ucx update
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
26
diff
changeset
|
98 | value->length = ui_textarea_length; |
7
431dde3c5fbe
added Cocoa implementation
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff
changeset
|
99 | value->value = NULL; |
431dde3c5fbe
added Cocoa implementation
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff
changeset
|
100 | value->obj = textview; |
431dde3c5fbe
added Cocoa implementation
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff
changeset
|
101 | |
23
decc6bf584aa
textarea automatically sets selection group (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
13
diff
changeset
|
102 | TextChangeMgr *delegate = [[TextChangeMgr alloc]initWithValue:value context:obj->ctx]; |
13
2dbc56c2323b
added some text functions for the Cocoa implementation
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
7
diff
changeset
|
103 | [textview setDelegate:delegate]; |
2dbc56c2323b
added some text functions for the Cocoa implementation
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
7
diff
changeset
|
104 | |
2dbc56c2323b
added some text functions for the Cocoa implementation
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
7
diff
changeset
|
105 | NSUndoManager *undomgr = [[NSUndoManager alloc]init]; |
2dbc56c2323b
added some text functions for the Cocoa implementation
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
7
diff
changeset
|
106 | value->undomgr = undomgr; |
7
431dde3c5fbe
added Cocoa implementation
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff
changeset
|
107 | } |
431dde3c5fbe
added Cocoa implementation
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff
changeset
|
108 | |
431dde3c5fbe
added Cocoa implementation
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff
changeset
|
109 | return textview; |
431dde3c5fbe
added Cocoa implementation
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff
changeset
|
110 | } |
431dde3c5fbe
added Cocoa implementation
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff
changeset
|
111 | |
431dde3c5fbe
added Cocoa implementation
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff
changeset
|
112 | char* ui_textarea_get(UiText *text) { |
13
2dbc56c2323b
added some text functions for the Cocoa implementation
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
7
diff
changeset
|
113 | if(text->value) { |
2dbc56c2323b
added some text functions for the Cocoa implementation
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
7
diff
changeset
|
114 | free(text->value); |
2dbc56c2323b
added some text functions for the Cocoa implementation
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
7
diff
changeset
|
115 | } |
7
431dde3c5fbe
added Cocoa implementation
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff
changeset
|
116 | NSTextView *textview = (NSTextView*)text->obj; |
431dde3c5fbe
added Cocoa implementation
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff
changeset
|
117 | NSString *str = [[textview textStorage]string]; |
13
2dbc56c2323b
added some text functions for the Cocoa implementation
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
7
diff
changeset
|
118 | size_t length = [str lengthOfBytesUsingEncoding:NSUTF8StringEncoding]; |
2dbc56c2323b
added some text functions for the Cocoa implementation
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
7
diff
changeset
|
119 | const char *cstr = [str UTF8String]; |
2dbc56c2323b
added some text functions for the Cocoa implementation
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
7
diff
changeset
|
120 | char *value = malloc(length + 1); |
2dbc56c2323b
added some text functions for the Cocoa implementation
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
7
diff
changeset
|
121 | memcpy(value, cstr, length); |
2dbc56c2323b
added some text functions for the Cocoa implementation
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
7
diff
changeset
|
122 | value[length] = '\0'; |
2dbc56c2323b
added some text functions for the Cocoa implementation
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
7
diff
changeset
|
123 | text->value = value; |
2dbc56c2323b
added some text functions for the Cocoa implementation
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
7
diff
changeset
|
124 | return value; |
7
431dde3c5fbe
added Cocoa implementation
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff
changeset
|
125 | } |
431dde3c5fbe
added Cocoa implementation
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff
changeset
|
126 | |
431dde3c5fbe
added Cocoa implementation
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff
changeset
|
127 | void ui_textarea_set(UiText *text, char *str) { |
13
2dbc56c2323b
added some text functions for the Cocoa implementation
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
7
diff
changeset
|
128 | if(text->value) { |
2dbc56c2323b
added some text functions for the Cocoa implementation
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
7
diff
changeset
|
129 | free(text->value); |
2dbc56c2323b
added some text functions for the Cocoa implementation
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
7
diff
changeset
|
130 | } |
7
431dde3c5fbe
added Cocoa implementation
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff
changeset
|
131 | NSTextView *textview = (NSTextView*)text->obj; |
431dde3c5fbe
added Cocoa implementation
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff
changeset
|
132 | NSString *s = [[NSString alloc]initWithUTF8String:str]; |
431dde3c5fbe
added Cocoa implementation
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff
changeset
|
133 | NSAttributedString *as = [[NSAttributedString alloc]initWithString:s]; |
431dde3c5fbe
added Cocoa implementation
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff
changeset
|
134 | [[textview textStorage] setAttributedString:as]; |
13
2dbc56c2323b
added some text functions for the Cocoa implementation
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
7
diff
changeset
|
135 | text->value = NULL; |
7
431dde3c5fbe
added Cocoa implementation
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff
changeset
|
136 | } |
13
2dbc56c2323b
added some text functions for the Cocoa implementation
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
7
diff
changeset
|
137 | |
2dbc56c2323b
added some text functions for the Cocoa implementation
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
7
diff
changeset
|
138 | char* ui_textarea_getsubstr(UiText *text, int begin, int end) { |
2dbc56c2323b
added some text functions for the Cocoa implementation
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
7
diff
changeset
|
139 | if(text->value) { |
2dbc56c2323b
added some text functions for the Cocoa implementation
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
7
diff
changeset
|
140 | free(text->value); |
2dbc56c2323b
added some text functions for the Cocoa implementation
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
7
diff
changeset
|
141 | } |
2dbc56c2323b
added some text functions for the Cocoa implementation
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
7
diff
changeset
|
142 | NSTextView *textview = (NSTextView*)text->obj; |
2dbc56c2323b
added some text functions for the Cocoa implementation
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
7
diff
changeset
|
143 | NSString *str = [[textview textStorage]string]; |
2dbc56c2323b
added some text functions for the Cocoa implementation
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
7
diff
changeset
|
144 | NSRange range; |
2dbc56c2323b
added some text functions for the Cocoa implementation
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
7
diff
changeset
|
145 | range.location = begin; |
2dbc56c2323b
added some text functions for the Cocoa implementation
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
7
diff
changeset
|
146 | range.length = end - begin; |
2dbc56c2323b
added some text functions for the Cocoa implementation
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
7
diff
changeset
|
147 | |
2dbc56c2323b
added some text functions for the Cocoa implementation
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
7
diff
changeset
|
148 | NSString *substr = [str substringWithRange:range]; |
2dbc56c2323b
added some text functions for the Cocoa implementation
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
7
diff
changeset
|
149 | size_t length = [substr lengthOfBytesUsingEncoding:NSUTF8StringEncoding]; |
2dbc56c2323b
added some text functions for the Cocoa implementation
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
7
diff
changeset
|
150 | const char *cstr = [substr UTF8String]; |
2dbc56c2323b
added some text functions for the Cocoa implementation
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
7
diff
changeset
|
151 | char *value = malloc(length + 1); |
2dbc56c2323b
added some text functions for the Cocoa implementation
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
7
diff
changeset
|
152 | memcpy(value, cstr, length); |
2dbc56c2323b
added some text functions for the Cocoa implementation
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
7
diff
changeset
|
153 | value[length] = '\0'; |
2dbc56c2323b
added some text functions for the Cocoa implementation
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
7
diff
changeset
|
154 | text->value = value; |
2dbc56c2323b
added some text functions for the Cocoa implementation
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
7
diff
changeset
|
155 | return value; |
2dbc56c2323b
added some text functions for the Cocoa implementation
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
7
diff
changeset
|
156 | } |
2dbc56c2323b
added some text functions for the Cocoa implementation
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
7
diff
changeset
|
157 | |
2dbc56c2323b
added some text functions for the Cocoa implementation
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
7
diff
changeset
|
158 | void ui_textarea_insert(UiText *text, int pos, char *str) { |
2dbc56c2323b
added some text functions for the Cocoa implementation
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
7
diff
changeset
|
159 | if(text->value) { |
2dbc56c2323b
added some text functions for the Cocoa implementation
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
7
diff
changeset
|
160 | free(text->value); |
2dbc56c2323b
added some text functions for the Cocoa implementation
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
7
diff
changeset
|
161 | } |
2dbc56c2323b
added some text functions for the Cocoa implementation
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
7
diff
changeset
|
162 | NSTextView *textview = (NSTextView*)text->obj; |
2dbc56c2323b
added some text functions for the Cocoa implementation
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
7
diff
changeset
|
163 | NSString *s = [[NSString alloc]initWithUTF8String:str]; |
2dbc56c2323b
added some text functions for the Cocoa implementation
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
7
diff
changeset
|
164 | NSAttributedString *as = [[NSAttributedString alloc]initWithString:s]; |
2dbc56c2323b
added some text functions for the Cocoa implementation
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
7
diff
changeset
|
165 | [[textview textStorage] insertAttributedString:as atIndex: pos]; |
2dbc56c2323b
added some text functions for the Cocoa implementation
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
7
diff
changeset
|
166 | text->value = NULL; |
2dbc56c2323b
added some text functions for the Cocoa implementation
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
7
diff
changeset
|
167 | } |
2dbc56c2323b
added some text functions for the Cocoa implementation
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
7
diff
changeset
|
168 | |
26
a137277f9173
added copy & paste (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
23
diff
changeset
|
169 | int ui_textarea_position(UiText *text) { |
a137277f9173
added copy & paste (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
23
diff
changeset
|
170 | return [[[(NSTextView*)text->obj selectedRanges] objectAtIndex:0] rangeValue].location; |
a137277f9173
added copy & paste (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
23
diff
changeset
|
171 | } |
a137277f9173
added copy & paste (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
23
diff
changeset
|
172 | |
a137277f9173
added copy & paste (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
23
diff
changeset
|
173 | void ui_textarea_selection(UiText *text, int *begin, int *end) { |
a137277f9173
added copy & paste (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
23
diff
changeset
|
174 | NSRange range = [[[(NSTextView*)text->obj selectedRanges] objectAtIndex:0] rangeValue]; |
a137277f9173
added copy & paste (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
23
diff
changeset
|
175 | *begin = range.location; |
a137277f9173
added copy & paste (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
23
diff
changeset
|
176 | *end = range.location + range.length; |
a137277f9173
added copy & paste (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
23
diff
changeset
|
177 | } |
a137277f9173
added copy & paste (Cocoa)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
23
diff
changeset
|
178 | |
29
c96169444d88
added locale support (Cocoa) and ucx update
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
26
diff
changeset
|
179 | int ui_textarea_length(UiText *text) { |
c96169444d88
added locale support (Cocoa) and ucx update
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
26
diff
changeset
|
180 | return [[(NSTextView*)text->obj textStorage] length]; |
c96169444d88
added locale support (Cocoa) and ucx update
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
26
diff
changeset
|
181 | } |
c96169444d88
added locale support (Cocoa) and ucx update
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
26
diff
changeset
|
182 | |
13
2dbc56c2323b
added some text functions for the Cocoa implementation
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
7
diff
changeset
|
183 | void ui_text_undo(UiText *text) { |
2dbc56c2323b
added some text functions for the Cocoa implementation
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
7
diff
changeset
|
184 | [(NSUndoManager*)text->undomgr undo]; |
2dbc56c2323b
added some text functions for the Cocoa implementation
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
7
diff
changeset
|
185 | } |
2dbc56c2323b
added some text functions for the Cocoa implementation
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
7
diff
changeset
|
186 | |
2dbc56c2323b
added some text functions for the Cocoa implementation
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
7
diff
changeset
|
187 | void ui_text_redo(UiText *text) { |
2dbc56c2323b
added some text functions for the Cocoa implementation
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
7
diff
changeset
|
188 | [(NSUndoManager*)text->undomgr redo]; |
2dbc56c2323b
added some text functions for the Cocoa implementation
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
7
diff
changeset
|
189 | } |
2dbc56c2323b
added some text functions for the Cocoa implementation
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
7
diff
changeset
|
190 |