Rev 4263 | Go to most recent revision | Only display areas with differences | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed
Rev 4263 | Rev 4327 | ||
---|---|---|---|
1 | /* |
1 | /* |
2 | * Copyright (c) 2009 Jakub Jermar |
2 | * Copyright (c) 2009 Jakub Jermar |
3 | * All rights reserved. |
3 | * All rights reserved. |
4 | * |
4 | * |
5 | * Redistribution and use in source and binary forms, with or without |
5 | * Redistribution and use in source and binary forms, with or without |
6 | * modification, are permitted provided that the following conditions |
6 | * modification, are permitted provided that the following conditions |
7 | * are met: |
7 | * are met: |
8 | * |
8 | * |
9 | * - Redistributions of source code must retain the above copyright |
9 | * - Redistributions of source code must retain the above copyright |
10 | * notice, this list of conditions and the following disclaimer. |
10 | * notice, this list of conditions and the following disclaimer. |
11 | * - Redistributions in binary form must reproduce the above copyright |
11 | * - Redistributions in binary form must reproduce the above copyright |
12 | * notice, this list of conditions and the following disclaimer in the |
12 | * notice, this list of conditions and the following disclaimer in the |
13 | * documentation and/or other materials provided with the distribution. |
13 | * documentation and/or other materials provided with the distribution. |
14 | * - The name of the author may not be used to endorse or promote products |
14 | * - The name of the author may not be used to endorse or promote products |
15 | * derived from this software without specific prior written permission. |
15 | * derived from this software without specific prior written permission. |
16 | * |
16 | * |
17 | * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR |
17 | * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR |
18 | * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES |
18 | * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES |
19 | * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. |
19 | * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. |
20 | * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, |
20 | * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, |
21 | * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT |
21 | * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT |
22 | * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, |
22 | * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, |
23 | * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY |
23 | * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY |
24 | * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT |
24 | * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT |
25 | * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF |
25 | * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF |
26 | * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. |
26 | * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. |
27 | */ |
27 | */ |
28 | 28 | ||
29 | /** @addtogroup genarch |
29 | /** @addtogroup genarch |
30 | * @{ |
30 | * @{ |
31 | */ |
31 | */ |
32 | /** |
32 | /** |
33 | * @file |
33 | * @file |
34 | * @brief Serial line processing. |
34 | * @brief Serial line processing. |
35 | */ |
35 | */ |
36 | 36 | ||
37 | #include <genarch/srln/srln.h> |
37 | #include <genarch/srln/srln.h> |
38 | #include <console/chardev.h> |
38 | #include <console/chardev.h> |
39 | #include <console/console.h> |
39 | #include <console/console.h> |
40 | #include <proc/thread.h> |
40 | #include <proc/thread.h> |
41 | #include <arch.h> |
41 | #include <arch.h> |
42 | #include <string.h> |
42 | #include <string.h> |
43 | 43 | ||
44 | static indev_t srlnout; |
- | |
45 | - | ||
46 | indev_operations_t srlnout_ops = { |
44 | static indev_operations_t srln_raw_ops = { |
47 | .poll = NULL |
45 | .poll = NULL |
48 | }; |
46 | }; |
49 | 47 | ||
50 | static void ksrln(void *arg) |
48 | static void ksrln(void *arg) |
51 | { |
49 | { |
52 | indev_t *in = (indev_t *) arg; |
50 | srln_instance_t *instance = (srln_instance_t *) arg; |
53 | bool cr = false; |
51 | bool cr = false; |
54 | uint32_t escape = 0; |
52 | uint32_t escape = 0; |
55 | 53 | ||
56 | while (true) { |
54 | while (true) { |
57 | wchar_t ch = _getc(in); |
55 | wchar_t ch = indev_pop_character(&instance->raw); |
58 | 56 | ||
59 | /* ANSI escape sequence processing */ |
57 | /* ANSI escape sequence processing */ |
60 | if (escape != 0) { |
58 | if (escape != 0) { |
61 | escape <<= 8; |
59 | escape <<= 8; |
62 | escape |= ch & 0xff; |
60 | escape |= ch & 0xff; |
63 | 61 | ||
64 | if ((escape == 0x1b4f) || (escape == 0x1b5b) || (escape == 0x1b5b33)) |
62 | if ((escape == 0x1b4f) || (escape == 0x1b5b) || (escape == 0x1b5b33)) |
65 | continue; |
63 | continue; |
66 | 64 | ||
67 | switch (escape) { |
65 | switch (escape) { |
68 | case 0x1b4f46: |
66 | case 0x1b4f46: |
69 | case 0x1b5b46: |
67 | case 0x1b5b46: |
70 | ch = U_END_ARROW; |
68 | ch = U_END_ARROW; |
71 | escape = 0; |
69 | escape = 0; |
72 | break; |
70 | break; |
73 | case 0x1b4f48: |
71 | case 0x1b4f48: |
74 | case 0x1b5b48: |
72 | case 0x1b5b48: |
75 | ch = U_HOME_ARROW; |
73 | ch = U_HOME_ARROW; |
76 | escape = 0; |
74 | escape = 0; |
77 | break; |
75 | break; |
78 | case 0x1b5b41: |
76 | case 0x1b5b41: |
79 | ch = U_UP_ARROW; |
77 | ch = U_UP_ARROW; |
80 | escape = 0; |
78 | escape = 0; |
81 | break; |
79 | break; |
82 | case 0x1b5b42: |
80 | case 0x1b5b42: |
83 | ch = U_DOWN_ARROW; |
81 | ch = U_DOWN_ARROW; |
84 | escape = 0; |
82 | escape = 0; |
85 | break; |
83 | break; |
86 | case 0x1b5b43: |
84 | case 0x1b5b43: |
87 | ch = U_RIGHT_ARROW; |
85 | ch = U_RIGHT_ARROW; |
88 | escape = 0; |
86 | escape = 0; |
89 | break; |
87 | break; |
90 | case 0x1b5b44: |
88 | case 0x1b5b44: |
91 | ch = U_LEFT_ARROW; |
89 | ch = U_LEFT_ARROW; |
92 | escape = 0; |
90 | escape = 0; |
93 | break; |
91 | break; |
94 | case 0x1b5b337e: |
92 | case 0x1b5b337e: |
95 | ch = U_DELETE; |
93 | ch = U_DELETE; |
96 | escape = 0; |
94 | escape = 0; |
97 | break; |
95 | break; |
98 | default: |
96 | default: |
99 | escape = 0; |
97 | escape = 0; |
100 | } |
98 | } |
101 | } |
99 | } |
102 | 100 | ||
103 | if (ch == 0x1b) { |
101 | if (ch == 0x1b) { |
104 | escape = ch & 0xff; |
102 | escape = ch & 0xff; |
105 | continue; |
103 | continue; |
106 | } |
104 | } |
107 | 105 | ||
108 | /* Replace carriage return with line feed |
106 | /* Replace carriage return with line feed |
109 | and suppress any following line feed */ |
107 | and suppress any following line feed */ |
110 | if ((ch == '\n') && (cr)) { |
108 | if ((ch == '\n') && (cr)) { |
111 | cr = false; |
109 | cr = false; |
112 | continue; |
110 | continue; |
113 | } |
111 | } |
114 | 112 | ||
115 | if (ch == '\r') { |
113 | if (ch == '\r') { |
116 | ch = '\n'; |
114 | ch = '\n'; |
117 | cr = true; |
115 | cr = true; |
118 | } else |
116 | } else |
119 | cr = false; |
117 | cr = false; |
120 | 118 | ||
121 | /* Backspace */ |
119 | /* Backspace */ |
122 | if (ch == 0x7f) |
120 | if (ch == 0x7f) |
123 | ch = '\b'; |
121 | ch = '\b'; |
124 | 122 | ||
125 | indev_push_character(stdin, ch); |
123 | indev_push_character(instance->sink, ch); |
126 | } |
124 | } |
127 | } |
125 | } |
128 | 126 | ||
129 | void srln_init(indev_t *devin) |
127 | srln_instance_t *srln_init(void) |
130 | { |
128 | { |
- | 129 | srln_instance_t *instance |
|
131 | indev_initialize("srln", &srlnout, &srlnout_ops); |
130 | = malloc(sizeof(srln_instance_t), FRAME_ATOMIC); |
- | 131 | if (instance) { |
|
132 | thread_t *thread |
132 | instance->thread |
133 | = thread_create(ksrln, devin, TASK, 0, "ksrln", false); |
133 | = thread_create(ksrln, (void *) instance, TASK, 0, "ksrln", false); |
134 | 134 | ||
135 | if (thread) { |
135 | if (!instance->thread) { |
136 | stdin = &srlnout; |
136 | free(instance); |
- | 137 | return NULL; |
|
- | 138 | } |
|
- | 139 | ||
137 | thread_ready(thread); |
140 | instance->sink = NULL; |
- | 141 | indev_initialize("srln", &instance->raw, &srln_raw_ops); |
|
138 | } |
142 | } |
- | 143 | ||
- | 144 | return instance; |
|
- | 145 | } |
|
- | 146 | ||
- | 147 | indev_t *srln_wire(srln_instance_t *instance, indev_t *sink) |
|
- | 148 | { |
|
- | 149 | ASSERT(instance); |
|
- | 150 | ASSERT(sink); |
|
- | 151 | ||
- | 152 | instance->sink = sink; |
|
- | 153 | thread_ready(instance->thread); |
|
- | 154 | ||
- | 155 | return &instance->raw; |
|
139 | } |
156 | } |
140 | 157 | ||
141 | /** @} |
158 | /** @} |
142 | */ |
159 | */ |
143 | 160 |