revert most of r52820 (patch to fix [#33452]), this caused a regression in text stepp...
[blender.git] / source / blender / blenlib / intern / string_cursor_utf8.c
1 /*
2  * ***** BEGIN GPL LICENSE BLOCK *****
3  *
4  * This program is free software; you can redistribute it and/or
5  * modify it under the terms of the GNU General Public License
6  * as published by the Free Software Foundation; either version 2
7  * of the License, or (at your option) any later version.
8  *
9  * This program is distributed in the hope that it will be useful,
10  * but WITHOUT ANY WARRANTY; without even the implied warranty of
11  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
12  * GNU General Public License for more details.
13  *
14  * You should have received a copy of the GNU General Public License
15  * along with this program; if not, write to the Free Software Foundation,
16  * Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.
17  *
18  * The Original Code is Copyright (C) 2011 Blender Foundation.
19  * All rights reserved.
20  *
21  * Contributor(s): Campbell Barton.
22  *
23  * ***** END GPL LICENSE BLOCK *****
24  *
25  */
26
27 /** \file blender/blenlib/intern/string_cursor_utf8.c
28  *  \ingroup bli
29  */
30
31 #include <stdio.h>
32 #include <stdlib.h>
33
34 #include "BLI_utildefines.h"
35 #include "BLI_string_utf8.h"
36
37 #include "BLI_string_cursor_utf8.h" /* own include */
38
39 typedef enum strCursorDelimType {
40         STRCUR_DELIM_NONE,
41         STRCUR_DELIM_ALPHANUMERIC,
42         STRCUR_DELIM_PUNCT,
43         STRCUR_DELIM_BRACE,
44         STRCUR_DELIM_OPERATOR,
45         STRCUR_DELIM_QUOTE,
46         STRCUR_DELIM_WHITESPACE,
47         STRCUR_DELIM_OTHER
48 } strCursorDelimType;
49
50 static strCursorDelimType cursor_delim_type(const char *ch_utf8)
51 {
52         /* for full unicode support we really need to have large lookup tables to figure
53          * out whats what in every possible char set - and python, glib both have these. */
54         unsigned int uch = BLI_str_utf8_as_unicode(ch_utf8);
55
56         switch (uch) {
57                 case ',':
58                 case '.':
59                         return STRCUR_DELIM_PUNCT;
60
61                 case '{':
62                 case '}':
63                 case '[':
64                 case ']':
65                 case '(':
66                 case ')':
67                         return STRCUR_DELIM_BRACE;
68
69                 case '+':
70                 case '-':
71                 case '=':
72                 case '~':
73                 case '%':
74                 case '/':
75                 case '<':
76                 case '>':
77                 case '^':
78                 case '*':
79                 case '&':
80                 case '|':
81                         return STRCUR_DELIM_OPERATOR;
82
83                 case '\'':
84                 case '\"':
85                         return STRCUR_DELIM_QUOTE;
86
87                 case ' ':
88                 case '\t':
89                         return STRCUR_DELIM_WHITESPACE;
90
91                 case '\\':
92                 case '@':
93                 case '#':
94                 case '$':
95                 case ':':
96                 case ';':
97                 case '?':
98                 case '!':
99                 case 0xA3:  /* pound */
100                 case 0x80:  /* euro */
101                         /* case '_': *//* special case, for python */
102                         return STRCUR_DELIM_OTHER;
103
104                 default:
105                         break;
106         }
107         return STRCUR_DELIM_ALPHANUMERIC; /* Not quite true, but ok for now */
108 }
109
110 int BLI_str_cursor_step_next_utf8(const char *str, size_t maxlen, int *pos)
111 {
112         const char *str_end = str + (maxlen + 1);
113         const char *str_pos = str + (*pos);
114         const char *str_next = BLI_str_find_next_char_utf8(str_pos, str_end);
115         if (str_next) {
116                 (*pos) += (str_next - str_pos);
117                 if ((*pos) > maxlen) {
118                         (*pos) = maxlen;
119                 }
120                 return TRUE;
121         }
122
123         return FALSE;
124 }
125
126 int BLI_str_cursor_step_prev_utf8(const char *str, size_t UNUSED(maxlen), int *pos)
127 {
128         if ((*pos) > 0) {
129                 const char *str_pos = str + (*pos);
130                 const char *str_prev = BLI_str_find_prev_char_utf8(str, str_pos);
131                 if (str_prev) {
132                         (*pos) -= (str_pos - str_prev);
133                         return TRUE;
134                 }
135         }
136
137         return FALSE;
138 }
139
140 void BLI_str_cursor_step_utf8(const char *str, size_t maxlen,
141                               int *pos, strCursorJumpDirection direction,
142                               strCursorJumpType jump)
143 {
144         const int pos_prev = *pos;
145
146         if (direction == STRCUR_DIR_NEXT) {
147                 BLI_str_cursor_step_next_utf8(str, maxlen, pos);
148
149                 if (jump != STRCUR_JUMP_NONE) {
150                         const strCursorDelimType delim_type = (*pos) < maxlen ? cursor_delim_type(&str[*pos]) : STRCUR_DELIM_NONE;
151                         /* jump between special characters (/,\,_,-, etc.),
152                          * look at function cursor_delim_type() for complete
153                          * list of special character, ctr -> */
154                         while ((*pos) < maxlen) {
155                                 if (BLI_str_cursor_step_next_utf8(str, maxlen, pos)) {
156                                         if ((jump != STRCUR_JUMP_ALL) && (delim_type != cursor_delim_type(&str[*pos])))
157                                         break;
158                                 }
159                                 else {
160                                         break; /* unlikely but just in case */
161                                 }
162                         }
163                 }
164         }
165         else if (direction == STRCUR_DIR_PREV) {
166                 BLI_str_cursor_step_prev_utf8(str, maxlen, pos);
167
168                 if (jump != STRCUR_JUMP_NONE) {
169                         const strCursorDelimType delim_type = (*pos) > 1 ? cursor_delim_type(&str[(*pos) - 1]) : STRCUR_DELIM_NONE;
170                         /* jump between special characters (/,\,_,-, etc.),
171                          * look at function cursor_delim_type() for complete
172                          * list of special character, ctr -> */
173                         while ((*pos) > 0) {
174                                 if (BLI_str_cursor_step_prev_utf8(str, maxlen, pos)) {
175                                         if ((jump != STRCUR_JUMP_ALL) && (delim_type != cursor_delim_type(&str[*pos])))
176                                                 break;
177                                 }
178                                 else {
179                                         break;
180                                 }
181                         }
182
183                         /* left only: compensate for index/change in direction */
184                         if (((*pos) != 0) && ABS(pos_prev - (*pos)) >= 1) {
185                                 BLI_str_cursor_step_next_utf8(str, maxlen, pos);
186                         }
187                 }
188         }
189         else {
190                 BLI_assert(0);
191         }
192 }