Mercurial > nand-ecoscentric
annotate packages/io/serial/current/misc/serial.c @ 64:c38311975d4f ecos-sw-2000-01-28
Merge from eCos master repository on 2000-01-28-04:28:11-GMT
| author | jlarmour |
|---|---|
| date | Fri, 28 Jan 2000 04:59:39 +0000 |
| parents | d376b777e2ce |
| children | bf00f99aec69 |
| rev | line source |
|---|---|
| 2 | 1 //========================================================================== |
| 2 // | |
| 3 // serial.c | |
| 4 // | |
| 5 // Initial device I/O tests | |
| 6 // | |
| 7 //========================================================================== | |
| 8 //####COPYRIGHTBEGIN#### | |
|
64
c38311975d4f
Merge from eCos master repository on 2000-01-28-04:28:11-GMT
jlarmour
parents:
6
diff
changeset
|
9 // |
|
c38311975d4f
Merge from eCos master repository on 2000-01-28-04:28:11-GMT
jlarmour
parents:
6
diff
changeset
|
10 // ------------------------------------------- |
|
c38311975d4f
Merge from eCos master repository on 2000-01-28-04:28:11-GMT
jlarmour
parents:
6
diff
changeset
|
11 // The contents of this file are subject to the Red Hat eCos Public License |
|
c38311975d4f
Merge from eCos master repository on 2000-01-28-04:28:11-GMT
jlarmour
parents:
6
diff
changeset
|
12 // Version 1.0 (the "License"); you may not use this file except in |
|
c38311975d4f
Merge from eCos master repository on 2000-01-28-04:28:11-GMT
jlarmour
parents:
6
diff
changeset
|
13 // compliance with the License. You may obtain a copy of the License at |
|
c38311975d4f
Merge from eCos master repository on 2000-01-28-04:28:11-GMT
jlarmour
parents:
6
diff
changeset
|
14 // http://sourceware.cygnus.com/ecos |
|
c38311975d4f
Merge from eCos master repository on 2000-01-28-04:28:11-GMT
jlarmour
parents:
6
diff
changeset
|
15 // |
|
c38311975d4f
Merge from eCos master repository on 2000-01-28-04:28:11-GMT
jlarmour
parents:
6
diff
changeset
|
16 // Software distributed under the License is distributed on an |
|
c38311975d4f
Merge from eCos master repository on 2000-01-28-04:28:11-GMT
jlarmour
parents:
6
diff
changeset
|
17 // basis, WITHOUT WARRANTY OF ANY KIND, either express or implied. See the |
|
c38311975d4f
Merge from eCos master repository on 2000-01-28-04:28:11-GMT
jlarmour
parents:
6
diff
changeset
|
18 // License for the specific language governing rights and limitations under |
|
c38311975d4f
Merge from eCos master repository on 2000-01-28-04:28:11-GMT
jlarmour
parents:
6
diff
changeset
|
19 // the License. |
|
c38311975d4f
Merge from eCos master repository on 2000-01-28-04:28:11-GMT
jlarmour
parents:
6
diff
changeset
|
20 // |
|
c38311975d4f
Merge from eCos master repository on 2000-01-28-04:28:11-GMT
jlarmour
parents:
6
diff
changeset
|
21 // The Original Code is eCos - Embedded Configurable Operating System, |
|
c38311975d4f
Merge from eCos master repository on 2000-01-28-04:28:11-GMT
jlarmour
parents:
6
diff
changeset
|
22 // released September 30, 1998. |
|
c38311975d4f
Merge from eCos master repository on 2000-01-28-04:28:11-GMT
jlarmour
parents:
6
diff
changeset
|
23 // |
|
c38311975d4f
Merge from eCos master repository on 2000-01-28-04:28:11-GMT
jlarmour
parents:
6
diff
changeset
|
24 // The Initial Developer of the Original Code is Red Hat. |
|
c38311975d4f
Merge from eCos master repository on 2000-01-28-04:28:11-GMT
jlarmour
parents:
6
diff
changeset
|
25 // Portions created by Red Hat are |
|
c38311975d4f
Merge from eCos master repository on 2000-01-28-04:28:11-GMT
jlarmour
parents:
6
diff
changeset
|
26 // Copyright (C) 1998, 1999, 2000 Red Hat, Inc. |
|
c38311975d4f
Merge from eCos master repository on 2000-01-28-04:28:11-GMT
jlarmour
parents:
6
diff
changeset
|
27 // All Rights Reserved. |
|
c38311975d4f
Merge from eCos master repository on 2000-01-28-04:28:11-GMT
jlarmour
parents:
6
diff
changeset
|
28 // ------------------------------------------- |
|
c38311975d4f
Merge from eCos master repository on 2000-01-28-04:28:11-GMT
jlarmour
parents:
6
diff
changeset
|
29 // |
| 2 | 30 //####COPYRIGHTEND#### |
| 31 //========================================================================== | |
| 32 //#####DESCRIPTIONBEGIN#### | |
| 33 // | |
| 34 // Author(s): gthomas | |
| 35 // Contributors: gthomas | |
| 36 // Date: 1999-02-05 | |
| 37 // Description: Minimal testing of "serial" I/O | |
| 38 //####DESCRIPTIONEND#### | |
| 39 | |
| 40 #include <pkgconf/kernel.h> | |
| 41 #include <pkgconf/io.h> | |
| 42 #include <cyg/io/io.h> | |
| 43 #include <cyg/io/ttyio.h> | |
| 44 #include <cyg/infra/diag.h> | |
| 45 #include <cyg/infra/testcase.h> | |
| 46 #ifdef CYGFUN_KERNEL_API_C | |
| 47 #include <cyg/kernel/kapi.h> | |
| 48 #include <cyg/hal/hal_arch.h> | |
| 49 #define STACK_SIZE CYGNUM_HAL_STACK_SIZE_TYPICAL | |
| 50 unsigned char stack[STACK_SIZE]; | |
| 51 cyg_thread thread_data; | |
| 52 cyg_handle_t thread_handle; | |
| 53 | |
| 54 // This routine will be called if the read "times out" | |
| 55 static void | |
| 56 do_abort(void *handle) | |
| 57 { | |
| 58 cyg_io_handle_t io_handle = (cyg_io_handle_t)handle; | |
| 59 cyg_int32 len = 1; // Need something here | |
| 60 cyg_io_get_config(io_handle, CYG_IO_GET_CONFIG_SERIAL_ABORT, 0, &len); | |
| 61 } | |
| 62 | |
| 63 #include "timeout.inl" | |
| 64 #endif | |
| 65 | |
| 66 static void | |
| 67 dump_buf_with_offset(unsigned char *p, | |
| 68 int s, | |
| 69 unsigned char *base) | |
| 70 { | |
| 71 int i, c; | |
| 72 if ((unsigned int)s > (unsigned int)p) { | |
| 73 s = (unsigned int)s - (unsigned int)p; | |
| 74 } | |
| 75 while (s > 0) { | |
| 76 if (base) { | |
| 77 diag_printf("%08X: ", (int)p - (int)base); | |
| 78 } else { | |
| 79 diag_printf("%08X: ", p); | |
| 80 } | |
| 81 for (i = 0; i < 16; i++) { | |
| 82 if (i < s) { | |
| 83 diag_printf("%02X", p[i] & 0xFF); | |
| 84 } else { | |
| 85 diag_printf(" "); | |
| 86 } | |
| 87 if ((i % 2) == 1) diag_printf(" "); | |
| 88 if ((i % 8) == 7) diag_printf(" "); | |
| 89 } | |
| 90 diag_printf(" |"); | |
| 91 for (i = 0; i < 16; i++) { | |
| 92 if (i < s) { | |
| 93 c = p[i] & 0xFF; | |
| 94 if ((c < 0x20) || (c >= 0x7F)) c = '.'; | |
| 95 } else { | |
| 96 c = ' '; | |
| 97 } | |
| 98 diag_printf("%c", c); | |
| 99 } | |
| 100 diag_printf("|\n"); | |
| 101 s -= 16; | |
| 102 p += 16; | |
| 103 } | |
| 104 } | |
| 105 | |
| 106 static void | |
| 107 dump_buf(unsigned char *p, int s) | |
| 108 { | |
| 109 dump_buf_with_offset(p, s, 0); | |
| 110 } | |
| 111 | |
| 112 void | |
| 113 hang(void) | |
| 114 { | |
| 115 while (true) ; | |
| 116 } | |
| 117 | |
| 118 static int | |
| 119 strlen(char *c) | |
| 120 { | |
| 121 int l = 0; | |
| 122 while (*c++) l++; | |
| 123 return l; | |
| 124 } | |
| 125 | |
| 126 void | |
| 127 serial_test( void ) | |
| 128 { | |
| 129 Cyg_ErrNo res; | |
| 130 cyg_io_handle_t handle; | |
| 131 char msg[] = "This is a test\n"; | |
| 132 int msglen = sizeof(msg)-1; | |
| 133 char in_msg[80]; | |
| 134 int in_msglen = sizeof(in_msg)-1; | |
| 135 cyg_serial_info_t serial_info; | |
| 136 cyg_tty_info_t tty_info; | |
| 137 char short_msg[] = "This is a short message\n"; | |
| 138 char long_msg[] = "This is a longer message 0123456789abcdefghijklmnopqrstuvwxyz\n"; | |
| 139 char filler[] = " "; | |
| 140 char prompt[] = "\nPlease enter some data: "; | |
| 141 int i, len; | |
| 142 #ifdef CYGFUN_KERNEL_API_C | |
| 143 cyg_uint32 stamp; | |
| 144 #endif | |
| 145 | |
|
6
d376b777e2ce
Merge from eCos master repository on 1999-05-14-19:27:43-BST
jlarmour
parents:
2
diff
changeset
|
146 res = cyg_io_lookup("/dev/tty0", &handle); |
| 2 | 147 if (res != ENOERR) { |
| 148 diag_printf("Can't lookup - DEVIO error: %d\n", res); | |
| 149 return; | |
| 150 } | |
| 151 len = sizeof(serial_info); | |
| 152 res = cyg_io_get_config(handle, CYG_IO_GET_CONFIG_SERIAL_INFO, &serial_info, &len); | |
| 153 if (res != ENOERR) { | |
| 154 diag_printf("Can't get serial config - DEVIO error: %d\n", res); | |
| 155 hang(); | |
| 156 return; | |
| 157 } | |
| 158 len = sizeof(tty_info); | |
| 159 res = cyg_io_get_config(handle, CYG_IO_GET_CONFIG_TTY_INFO, &tty_info, &len); | |
| 160 if (res != ENOERR) { | |
| 161 diag_printf("Can't get tty config - DEVIO error: %d\n", res); | |
| 162 hang(); | |
| 163 return; | |
| 164 } | |
| 165 diag_printf("Config - baud: %d, stop: %d, parity: %d, out flags: %x, in flags: %x\n", | |
| 166 serial_info.baud, serial_info.stop, serial_info.parity, | |
| 167 tty_info.tty_out_flags, tty_info.tty_in_flags); | |
| 168 len = sizeof(serial_info); | |
| 169 res = cyg_io_set_config(handle, CYG_IO_SET_CONFIG_SERIAL_INFO, &serial_info, &len); | |
| 170 if (res != ENOERR) { | |
| 171 diag_printf("Can't set serial config - DEVIO error: %d\n", res); | |
| 172 hang(); | |
| 173 return; | |
| 174 } | |
| 175 len = sizeof(tty_info); | |
| 176 res = cyg_io_set_config(handle, CYG_IO_SET_CONFIG_TTY_INFO, &tty_info, &len); | |
| 177 if (res != ENOERR) { | |
| 178 diag_printf("Can't set tty config - DEVIO error: %d\n", res); | |
| 179 hang(); | |
| 180 return; | |
| 181 } | |
| 182 msglen = strlen(msg); | |
| 183 res = cyg_io_write(handle, msg, &msglen); | |
| 184 if (res != ENOERR) { | |
| 185 diag_printf("Can't write data - DEVIO error: %d\n", res); | |
| 186 hang(); | |
| 187 return; | |
| 188 } | |
| 189 for (i = 0; i < 10; i++) { | |
| 190 len = strlen(short_msg); | |
| 191 res = cyg_io_write(handle, short_msg, &len); | |
| 192 if (res != ENOERR) { | |
| 193 diag_printf("Can't write [short] data - DEVIO error: %d\n", res); | |
| 194 hang(); | |
| 195 return; | |
| 196 } | |
| 197 } | |
| 198 for (i = 0; i < 100; i++) { | |
| 199 len = (i % 10) + 1; | |
| 200 cyg_io_write(handle, filler, &len); | |
| 201 len = strlen(long_msg); | |
| 202 res = cyg_io_write(handle, long_msg, &len); | |
| 203 if (res != ENOERR) { | |
| 204 diag_printf("Can't write [long] data - DEVIO error: %d\n", res); | |
| 205 hang(); | |
| 206 return; | |
| 207 } | |
| 208 } | |
| 209 len = strlen(prompt); | |
| 210 cyg_io_write(handle, prompt, &len); | |
| 211 #ifdef CYGFUN_KERNEL_API_C | |
| 212 stamp = timeout(1000, do_abort, handle); | |
| 213 #endif | |
| 214 res = cyg_io_read(handle, in_msg, &in_msglen); | |
| 215 if (res != ENOERR) { | |
| 216 diag_printf("Can't read data - DEVIO error: %d\n", res); | |
| 217 hang(); | |
| 218 return; | |
| 219 } | |
| 220 #ifdef CYGFUN_KERNEL_API_C | |
| 221 untimeout(stamp); | |
| 222 #endif | |
| 223 diag_printf("Read %d bytes\n", in_msglen); | |
| 224 dump_buf(in_msg, in_msglen); | |
| 225 CYG_TEST_PASS_FINISH("Serial I/O test OK"); | |
| 226 } | |
| 227 | |
| 228 void | |
| 229 cyg_start(void) | |
| 230 { | |
| 231 CYG_TEST_INIT(); | |
| 232 #ifdef CYGFUN_KERNEL_API_C | |
| 233 cyg_thread_create(10, // Priority - just a number | |
| 234 (cyg_thread_entry_t*)serial_test, // entry | |
| 235 (cyg_addrword_t) 0, // entry data | |
| 236 "serial_thread", // Name | |
| 237 &stack[0], // Stack | |
| 238 STACK_SIZE, // Size | |
| 239 &thread_handle, // Handle | |
| 240 &thread_data // Thread data structure | |
| 241 ); | |
| 242 cyg_thread_resume(thread_handle); | |
| 243 cyg_scheduler_start(); | |
| 244 #else | |
| 245 serial_test(); | |
| 246 #endif | |
| 247 } | |
| 248 // EOF serial.c |