Mercurial > ecos-v3_0-branch
annotate packages/io/serial/current/tests/ser_test_protocol.inl @ 130:eb9fd8c04db3 ecos-sw-2000-10-23
Merge from eCos master repository on 2000-10-23-17:01:37-BST
| author | jlarmour |
|---|---|
| date | Mon, 23 Oct 2000 17:10:57 +0000 |
| parents | 0c2b7be0d798 |
| children | 52c99470ec11 |
| rev | line source |
|---|---|
| 2 | 1 //========================================================================== |
| 2 // | |
| 3 // ser_test_protocol.c | |
| 4 // | |
| 5 // Serial device driver testing protocol | |
| 6 // | |
| 7 //========================================================================== | |
| 8 //####COPYRIGHTBEGIN#### | |
|
64
c38311975d4f
Merge from eCos master repository on 2000-01-28-04:28:11-GMT
jlarmour
parents:
54
diff
changeset
|
9 // |
|
c38311975d4f
Merge from eCos master repository on 2000-01-28-04:28:11-GMT
jlarmour
parents:
54
diff
changeset
|
10 // ------------------------------------------- |
|
c38311975d4f
Merge from eCos master repository on 2000-01-28-04:28:11-GMT
jlarmour
parents:
54
diff
changeset
|
11 // The contents of this file are subject to the Red Hat eCos Public License |
|
66
bf00f99aec69
Merge from eCos master repository on 2000-02-02-19:16:44-GMT
jlarmour
parents:
64
diff
changeset
|
12 // Version 1.1 (the "License"); you may not use this file except in |
|
64
c38311975d4f
Merge from eCos master repository on 2000-01-28-04:28:11-GMT
jlarmour
parents:
54
diff
changeset
|
13 // compliance with the License. You may obtain a copy of the License at |
|
66
bf00f99aec69
Merge from eCos master repository on 2000-02-02-19:16:44-GMT
jlarmour
parents:
64
diff
changeset
|
14 // http://www.redhat.com/ |
|
64
c38311975d4f
Merge from eCos master repository on 2000-01-28-04:28:11-GMT
jlarmour
parents:
54
diff
changeset
|
15 // |
|
66
bf00f99aec69
Merge from eCos master repository on 2000-02-02-19:16:44-GMT
jlarmour
parents:
64
diff
changeset
|
16 // Software distributed under the License is distributed on an "AS IS" |
|
64
c38311975d4f
Merge from eCos master repository on 2000-01-28-04:28:11-GMT
jlarmour
parents:
54
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:
54
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:
54
diff
changeset
|
19 // the License. |
|
c38311975d4f
Merge from eCos master repository on 2000-01-28-04:28:11-GMT
jlarmour
parents:
54
diff
changeset
|
20 // |
|
c38311975d4f
Merge from eCos master repository on 2000-01-28-04:28:11-GMT
jlarmour
parents:
54
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:
54
diff
changeset
|
22 // released September 30, 1998. |
|
c38311975d4f
Merge from eCos master repository on 2000-01-28-04:28:11-GMT
jlarmour
parents:
54
diff
changeset
|
23 // |
|
c38311975d4f
Merge from eCos master repository on 2000-01-28-04:28:11-GMT
jlarmour
parents:
54
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:
54
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:
54
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:
54
diff
changeset
|
27 // All Rights Reserved. |
|
c38311975d4f
Merge from eCos master repository on 2000-01-28-04:28:11-GMT
jlarmour
parents:
54
diff
changeset
|
28 // ------------------------------------------- |
|
c38311975d4f
Merge from eCos master repository on 2000-01-28-04:28:11-GMT
jlarmour
parents:
54
diff
changeset
|
29 // |
| 2 | 30 //####COPYRIGHTEND#### |
| 31 //========================================================================== | |
| 32 //#####DESCRIPTIONBEGIN#### | |
| 33 // | |
| 34 // Author(s): jskov | |
| 35 // Contributors: jskov | |
| 36 // Date: 1999-03-17 | |
| 37 // Description: Protocol implementation used to test eCos serial devices. | |
| 38 // Relies on ser_filter to be present on the host side to | |
| 39 // respond to test requests. | |
| 40 // | |
| 41 // To Do: | |
| 42 // o Clean up. | |
| 43 // o Clean up config change magic. | |
| 44 // o Figure out how to handle kernel dependency | |
| 45 // : without kernel, no timeout. Without timeout, no filter auto detection. | |
| 46 // | |
| 47 //####DESCRIPTIONEND#### | |
| 48 | |
| 49 #include <pkgconf/system.h> | |
| 50 #include <pkgconf/io.h> | |
| 51 #include <pkgconf/io_serial.h> | |
| 52 | |
| 53 #include <cyg/io/io.h> | |
| 54 #include <cyg/io/devtab.h> | |
| 55 #include <cyg/io/ttyio.h> | |
| 56 #include <cyg/infra/diag.h> | |
|
34
29bc183297e1
Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents:
32
diff
changeset
|
57 #include <cyg/infra/cyg_ass.h> |
| 2 | 58 |
| 59 #include <cyg/hal/hal_intr.h> // for reclaiming interrup vector | |
| 60 | |
| 61 //---------------------------------------------------------------------------- | |
| 62 // Definition of which device to run tests on on various platforms. | |
|
4
1d7f19c9e4d1
Merge from eCos master repository on 1999-05-11-21:11:10-BST
jlarmour
parents:
2
diff
changeset
|
63 |
|
1d7f19c9e4d1
Merge from eCos master repository on 1999-05-11-21:11:10-BST
jlarmour
parents:
2
diff
changeset
|
64 #define NA_MSG "No test device specified" |
|
1d7f19c9e4d1
Merge from eCos master repository on 1999-05-11-21:11:10-BST
jlarmour
parents:
2
diff
changeset
|
65 |
|
126
518f42066aba
Merge from eCos master repository on 2000-09-19-06:25:26-BST
jlarmour
parents:
124
diff
changeset
|
66 // Cleaned up drivers will export the testing parameters via CDL. |
|
518f42066aba
Merge from eCos master repository on 2000-09-19-06:25:26-BST
jlarmour
parents:
124
diff
changeset
|
67 // When all drivers are changed, replace the TEST_ macros throughout |
|
518f42066aba
Merge from eCos master repository on 2000-09-19-06:25:26-BST
jlarmour
parents:
124
diff
changeset
|
68 // with the CYGPRI_ equivalents. |
|
518f42066aba
Merge from eCos master repository on 2000-09-19-06:25:26-BST
jlarmour
parents:
124
diff
changeset
|
69 #ifdef CYGPRI_SER_TEST_CRASH_ID |
|
518f42066aba
Merge from eCos master repository on 2000-09-19-06:25:26-BST
jlarmour
parents:
124
diff
changeset
|
70 # define TEST_CRASH_ID CYGPRI_SER_TEST_CRASH_ID |
|
518f42066aba
Merge from eCos master repository on 2000-09-19-06:25:26-BST
jlarmour
parents:
124
diff
changeset
|
71 # define TEST_SER_DEV CYGPRI_SER_TEST_SER_DEV |
|
518f42066aba
Merge from eCos master repository on 2000-09-19-06:25:26-BST
jlarmour
parents:
124
diff
changeset
|
72 # define TEST_TTY_DEV CYGPRI_SER_TEST_TTY_DEV |
|
518f42066aba
Merge from eCos master repository on 2000-09-19-06:25:26-BST
jlarmour
parents:
124
diff
changeset
|
73 #endif |
|
518f42066aba
Merge from eCos master repository on 2000-09-19-06:25:26-BST
jlarmour
parents:
124
diff
changeset
|
74 |
|
130
eb9fd8c04db3
Merge from eCos master repository on 2000-10-23-17:01:37-BST
jlarmour
parents:
128
diff
changeset
|
75 // Note that CYGPRI_SER_TEST_OVERRIDE_INT_1 and CYGPRI_SER_TEST_OVERRIDE_INT_2 |
|
eb9fd8c04db3
Merge from eCos master repository on 2000-10-23-17:01:37-BST
jlarmour
parents:
128
diff
changeset
|
76 // may also be exported. These identify interrupts that should be reclaimed |
|
eb9fd8c04db3
Merge from eCos master repository on 2000-10-23-17:01:37-BST
jlarmour
parents:
128
diff
changeset
|
77 // from the ROM monitor before the test is started. |
|
eb9fd8c04db3
Merge from eCos master repository on 2000-10-23-17:01:37-BST
jlarmour
parents:
128
diff
changeset
|
78 |
|
32
5af43b635655
Merge from eCos master repository on 1999-08-18-15:20:01-BST
jlarmour
parents:
30
diff
changeset
|
79 #if defined(CYGPKG_HAL_POWERPC_MBX) \ |
|
5af43b635655
Merge from eCos master repository on 1999-08-18-15:20:01-BST
jlarmour
parents:
30
diff
changeset
|
80 && defined(CYGPKG_HAL_QUICC) \ |
|
5af43b635655
Merge from eCos master repository on 1999-08-18-15:20:01-BST
jlarmour
parents:
30
diff
changeset
|
81 && defined(CYGPKG_IO_SERIAL_POWERPC_QUICC_SMC) \ |
|
5af43b635655
Merge from eCos master repository on 1999-08-18-15:20:01-BST
jlarmour
parents:
30
diff
changeset
|
82 && defined(CYGPKG_IO_SERIAL_POWERPC_QUICC_SMC_SMC1) |
|
34
29bc183297e1
Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents:
32
diff
changeset
|
83 # define TEST_CRASH_ID "ppcmbx" |
|
32
5af43b635655
Merge from eCos master repository on 1999-08-18-15:20:01-BST
jlarmour
parents:
30
diff
changeset
|
84 # define TEST_SER_DEV CYGDAT_IO_SERIAL_POWERPC_QUICC_SMC_SMC1_NAME |
|
5af43b635655
Merge from eCos master repository on 1999-08-18-15:20:01-BST
jlarmour
parents:
30
diff
changeset
|
85 # if defined(CYGPKG_IO_SERIAL_TTY_TTY1) |
|
5af43b635655
Merge from eCos master repository on 1999-08-18-15:20:01-BST
jlarmour
parents:
30
diff
changeset
|
86 # define TEST_TTY_DEV CYGDAT_IO_SERIAL_TTY_TTY1_DEV |
|
5af43b635655
Merge from eCos master repository on 1999-08-18-15:20:01-BST
jlarmour
parents:
30
diff
changeset
|
87 # endif |
|
5af43b635655
Merge from eCos master repository on 1999-08-18-15:20:01-BST
jlarmour
parents:
30
diff
changeset
|
88 #endif |
|
30
641b639be825
Merge from eCos master repository on 1999-08-16-22:01:37-BST
jlarmour
parents:
22
diff
changeset
|
89 #if defined(CYGPKG_HAL_MN10300_AM31_STDEVAL1) \ |
| 2 | 90 && defined(CYGPKG_IO_SERIAL_MN10300) \ |
|
4
1d7f19c9e4d1
Merge from eCos master repository on 1999-05-11-21:11:10-BST
jlarmour
parents:
2
diff
changeset
|
91 && defined(CYGPKG_IO_SERIAL_MN10300_SERIAL2) |
|
34
29bc183297e1
Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents:
32
diff
changeset
|
92 # define TEST_CRASH_ID "am31st" |
|
4
1d7f19c9e4d1
Merge from eCos master repository on 1999-05-11-21:11:10-BST
jlarmour
parents:
2
diff
changeset
|
93 # define TEST_SER_DEV CYGDAT_IO_SERIAL_MN10300_SERIAL2_NAME |
|
1d7f19c9e4d1
Merge from eCos master repository on 1999-05-11-21:11:10-BST
jlarmour
parents:
2
diff
changeset
|
94 # if defined(CYGPKG_IO_SERIAL_TTY_TTY2) |
| 2 | 95 # define TEST_TTY_DEV CYGDAT_IO_SERIAL_TTY_TTY1_DEV |
| 96 # endif | |
| 97 #endif | |
|
76
435cced73e2f
eCos v1.3.1 merged from eCos master repository on 2000-03-27-23:22:51-BST
jlarmour
parents:
72
diff
changeset
|
98 #if defined(CYGPKG_HAL_MN10300_AM33_STB) \ |
|
435cced73e2f
eCos v1.3.1 merged from eCos master repository on 2000-03-27-23:22:51-BST
jlarmour
parents:
72
diff
changeset
|
99 && defined(CYGPKG_IO_SERIAL_MN10300) \ |
|
435cced73e2f
eCos v1.3.1 merged from eCos master repository on 2000-03-27-23:22:51-BST
jlarmour
parents:
72
diff
changeset
|
100 && defined(CYGPKG_IO_SERIAL_MN10300_SERIAL0) |
|
435cced73e2f
eCos v1.3.1 merged from eCos master repository on 2000-03-27-23:22:51-BST
jlarmour
parents:
72
diff
changeset
|
101 # define TEST_CRASH_ID "am33st" |
|
435cced73e2f
eCos v1.3.1 merged from eCos master repository on 2000-03-27-23:22:51-BST
jlarmour
parents:
72
diff
changeset
|
102 # define TEST_SER_DEV CYGDAT_IO_SERIAL_MN10300_SERIAL0_NAME |
|
435cced73e2f
eCos v1.3.1 merged from eCos master repository on 2000-03-27-23:22:51-BST
jlarmour
parents:
72
diff
changeset
|
103 # if defined(CYGPKG_IO_SERIAL_TTY_TTY0) |
|
435cced73e2f
eCos v1.3.1 merged from eCos master repository on 2000-03-27-23:22:51-BST
jlarmour
parents:
72
diff
changeset
|
104 # define TEST_TTY_DEV CYGDAT_IO_SERIAL_TTY_TTY0_DEV |
|
435cced73e2f
eCos v1.3.1 merged from eCos master repository on 2000-03-27-23:22:51-BST
jlarmour
parents:
72
diff
changeset
|
105 # endif |
|
435cced73e2f
eCos v1.3.1 merged from eCos master repository on 2000-03-27-23:22:51-BST
jlarmour
parents:
72
diff
changeset
|
106 #endif |
| 2 | 107 |
| 108 // We can't rely on haldiag for ser_filter detection - it may not define | |
| 109 // a working character reading function. | |
| 110 #ifndef TEST_SER_DEV | |
| 111 # define SER_NOP_TEST | |
| 112 # define TTY_NOP_TEST | |
| 113 # define TEST_SER_DEV "/dev/null" | |
| 114 # define TEST_TTY_DEV "/dev/null" | |
| 115 #else | |
| 116 # ifndef TEST_TTY_DEV | |
| 117 # define TTY_NOP_TEST | |
| 118 # define TEST_TTY_DEV "/dev/null" | |
| 119 # endif | |
| 120 #endif | |
| 121 | |
|
34
29bc183297e1
Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents:
32
diff
changeset
|
122 #ifndef TEST_CRASH_ID |
|
29bc183297e1
Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents:
32
diff
changeset
|
123 #define TEST_CRASH_ID "......" |
|
29bc183297e1
Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents:
32
diff
changeset
|
124 #endif |
|
29bc183297e1
Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents:
32
diff
changeset
|
125 |
|
29bc183297e1
Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents:
32
diff
changeset
|
126 //---------------------------------------------------------------------------- |
|
29bc183297e1
Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents:
32
diff
changeset
|
127 // Crash types |
|
29bc183297e1
Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents:
32
diff
changeset
|
128 // Eventually this will be moved into a separate header file so a script |
|
29bc183297e1
Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents:
32
diff
changeset
|
129 // can read the definitions and use the output formats/codes to analyze |
|
29bc183297e1
Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents:
32
diff
changeset
|
130 // test results. For now we just keep it here... |
|
29bc183297e1
Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents:
32
diff
changeset
|
131 |
|
29bc183297e1
Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents:
32
diff
changeset
|
132 // FAILCODE:<tttttt:cccc:[optional data, separated by :]!> |
|
29bc183297e1
Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents:
32
diff
changeset
|
133 // tttttt: 6 letter target code |
|
29bc183297e1
Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents:
32
diff
changeset
|
134 // cccc: crash code (16bit hex value) |
|
29bc183297e1
Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents:
32
diff
changeset
|
135 |
|
29bc183297e1
Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents:
32
diff
changeset
|
136 #define TEST_CRASH(__h, __code, __msg, args...) \ |
|
29bc183297e1
Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents:
32
diff
changeset
|
137 CYG_MACRO_START \ |
|
29bc183297e1
Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents:
32
diff
changeset
|
138 int __len = 1; \ |
|
29bc183297e1
Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents:
32
diff
changeset
|
139 /* Try to flush remaining input */ \ |
|
29bc183297e1
Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents:
32
diff
changeset
|
140 cyg_thread_delay(50); \ |
|
29bc183297e1
Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents:
32
diff
changeset
|
141 cyg_io_get_config(__h, CYG_IO_GET_CONFIG_SERIAL_INPUT_FLUSH, \ |
|
29bc183297e1
Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents:
32
diff
changeset
|
142 0, &__len); \ |
|
29bc183297e1
Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents:
32
diff
changeset
|
143 diag_printf("FAILCODE:<" TEST_CRASH_ID ":%04x:" __code, ## args); \ |
|
29bc183297e1
Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents:
32
diff
changeset
|
144 diag_printf("!>\n"); \ |
|
29bc183297e1
Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents:
32
diff
changeset
|
145 CYG_FAIL(__msg); \ |
|
29bc183297e1
Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents:
32
diff
changeset
|
146 hang(); \ |
|
29bc183297e1
Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents:
32
diff
changeset
|
147 CYG_MACRO_END |
|
29bc183297e1
Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents:
32
diff
changeset
|
148 |
|
29bc183297e1
Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents:
32
diff
changeset
|
149 // Target IO |
|
29bc183297e1
Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents:
32
diff
changeset
|
150 #define TEST_CRASH_IO 0x0000 |
|
29bc183297e1
Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents:
32
diff
changeset
|
151 #define TEST_CRASH_IO_READ "%d", 0x0001 |
|
29bc183297e1
Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents:
32
diff
changeset
|
152 #define TEST_CRASH_IO_WRITE "%d", 0x0002 |
|
29bc183297e1
Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents:
32
diff
changeset
|
153 #define TEST_CRASH_IO_DRAIN "%d", 0x0003 |
|
29bc183297e1
Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents:
32
diff
changeset
|
154 #define TEST_CRASH_IO_GET_CFG "%d", 0x0004 |
|
29bc183297e1
Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents:
32
diff
changeset
|
155 #define TEST_CRASH_IO_SET_CFG "%d", 0x0005 |
|
29bc183297e1
Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents:
32
diff
changeset
|
156 |
|
29bc183297e1
Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents:
32
diff
changeset
|
157 // Target |
|
29bc183297e1
Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents:
32
diff
changeset
|
158 #define TEST_CRASH_CRC 0x0010 |
|
29bc183297e1
Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents:
32
diff
changeset
|
159 #define TEST_CRASH_CRC_CHAR "%02x", 0x0011 |
|
29bc183297e1
Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents:
32
diff
changeset
|
160 #define TEST_CRASH_CRC_BAD "%08x:%08x", 0x0012 |
|
29bc183297e1
Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents:
32
diff
changeset
|
161 #define TEST_CRASH_CRC_HOST "", 0x0013 |
|
29bc183297e1
Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents:
32
diff
changeset
|
162 |
|
29bc183297e1
Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents:
32
diff
changeset
|
163 // Protocol errors |
|
29bc183297e1
Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents:
32
diff
changeset
|
164 #define TEST_CRASH_PROT 0x1000 |
|
29bc183297e1
Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents:
32
diff
changeset
|
165 #define TEST_CRASH_PROT_BIN_MODE "%d", 0x1080 |
|
29bc183297e1
Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents:
32
diff
changeset
|
166 #define TEST_CRASH_PROT_TEXT "%d", 0x1100 |
|
29bc183297e1
Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents:
32
diff
changeset
|
167 |
|
29bc183297e1
Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents:
32
diff
changeset
|
168 #define TEST_CRASH_HOST_xx 0xf000 |
|
29bc183297e1
Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents:
32
diff
changeset
|
169 #define TEST_CRASH_HOST_TIMEOUT "%d:%d:%d:%d", 0xf000 |
|
29bc183297e1
Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents:
32
diff
changeset
|
170 // command#, read invocation#, expected, actual |
|
29bc183297e1
Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents:
32
diff
changeset
|
171 #define TEST_CRASH_HOST_CRC_BAD "%d:%08x:%08x:%d:%02x:%02x", 0xf010 |
|
29bc183297e1
Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents:
32
diff
changeset
|
172 // command#, expected CRC, actual, index, expected char, actual |
|
29bc183297e1
Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents:
32
diff
changeset
|
173 #define TEST_CRASH_HOST_DUPLEX_BAD "%d:%d:%02x:%02x", 0xf020 |
|
29bc183297e1
Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents:
32
diff
changeset
|
174 // command#, index, expected char, actual |
|
29bc183297e1
Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents:
32
diff
changeset
|
175 |
| 2 | 176 //---------------------------------------------------------------------------- |
| 177 // The data in buffer and the cmd buffer | |
|
115
6ed91473a1cd
Merge from eCos master repository on 2000-08-21-22:40:54-BST
jlarmour
parents:
108
diff
changeset
|
178 #ifndef IN_BUFFER_SIZE |
|
6ed91473a1cd
Merge from eCos master repository on 2000-08-21-22:40:54-BST
jlarmour
parents:
108
diff
changeset
|
179 # define IN_BUFFER_SIZE 1024 |
|
6ed91473a1cd
Merge from eCos master repository on 2000-08-21-22:40:54-BST
jlarmour
parents:
108
diff
changeset
|
180 #endif |
| 2 | 181 cyg_uint8 in_buffer[IN_BUFFER_SIZE]; |
| 182 | |
| 183 cyg_int8 cmd_buffer[128]; | |
| 184 | |
| 185 //---------------------------------------------------------------------------- | |
| 186 // Some types specific to the testing protocol. | |
| 187 typedef enum { | |
| 188 MODE_NO_ECHO = 0, | |
| 189 MODE_EOP_ECHO, | |
| 190 MODE_DUPLEX_ECHO | |
| 191 } cyg_mode_t; | |
| 192 | |
| 193 typedef enum { | |
| 194 TEST_RETURN_OK = ENOERR, | |
| 195 TEST_RETURN_NA | |
| 196 } cyg_test_return_t; | |
| 197 | |
| 198 typedef struct ser_cfg { | |
|
115
6ed91473a1cd
Merge from eCos master repository on 2000-08-21-22:40:54-BST
jlarmour
parents:
108
diff
changeset
|
199 cyg_serial_baud_rate_t baud_rate; |
|
6ed91473a1cd
Merge from eCos master repository on 2000-08-21-22:40:54-BST
jlarmour
parents:
108
diff
changeset
|
200 cyg_serial_word_length_t data_bits; |
|
6ed91473a1cd
Merge from eCos master repository on 2000-08-21-22:40:54-BST
jlarmour
parents:
108
diff
changeset
|
201 cyg_serial_stop_bits_t stop_bits; |
|
6ed91473a1cd
Merge from eCos master repository on 2000-08-21-22:40:54-BST
jlarmour
parents:
108
diff
changeset
|
202 cyg_serial_parity_t parity; |
|
6ed91473a1cd
Merge from eCos master repository on 2000-08-21-22:40:54-BST
jlarmour
parents:
108
diff
changeset
|
203 cyg_uint32 flags; |
| 2 | 204 // etc... |
| 205 } cyg_ser_cfg_t; | |
| 206 | |
|
10
d3fbcdfa1b2f
Merge from eCos master repository on 1999-05-29-00:13:11-BST
jlarmour
parents:
6
diff
changeset
|
207 typedef enum { |
|
d3fbcdfa1b2f
Merge from eCos master repository on 1999-05-29-00:13:11-BST
jlarmour
parents:
6
diff
changeset
|
208 OPT_SERIAL_DEBUG = 0, |
|
d3fbcdfa1b2f
Merge from eCos master repository on 1999-05-29-00:13:11-BST
jlarmour
parents:
6
diff
changeset
|
209 OPT_VERBOSE_LEVEL |
|
d3fbcdfa1b2f
Merge from eCos master repository on 1999-05-29-00:13:11-BST
jlarmour
parents:
6
diff
changeset
|
210 } cyg_option_t; |
|
d3fbcdfa1b2f
Merge from eCos master repository on 1999-05-29-00:13:11-BST
jlarmour
parents:
6
diff
changeset
|
211 |
|
d3fbcdfa1b2f
Merge from eCos master repository on 1999-05-29-00:13:11-BST
jlarmour
parents:
6
diff
changeset
|
212 typedef enum { |
|
d3fbcdfa1b2f
Merge from eCos master repository on 1999-05-29-00:13:11-BST
jlarmour
parents:
6
diff
changeset
|
213 NONE = 0, |
|
d3fbcdfa1b2f
Merge from eCos master repository on 1999-05-29-00:13:11-BST
jlarmour
parents:
6
diff
changeset
|
214 PROTOCOL_PROGRESS, |
|
d3fbcdfa1b2f
Merge from eCos master repository on 1999-05-29-00:13:11-BST
jlarmour
parents:
6
diff
changeset
|
215 PROTOCOL_DATA, |
|
d3fbcdfa1b2f
Merge from eCos master repository on 1999-05-29-00:13:11-BST
jlarmour
parents:
6
diff
changeset
|
216 } cyg_verbosity_level_t; |
|
d3fbcdfa1b2f
Merge from eCos master repository on 1999-05-29-00:13:11-BST
jlarmour
parents:
6
diff
changeset
|
217 |
|
d3fbcdfa1b2f
Merge from eCos master repository on 1999-05-29-00:13:11-BST
jlarmour
parents:
6
diff
changeset
|
218 |
|
d3fbcdfa1b2f
Merge from eCos master repository on 1999-05-29-00:13:11-BST
jlarmour
parents:
6
diff
changeset
|
219 // A few predifined option macros. Use after test_ping(). |
|
d3fbcdfa1b2f
Merge from eCos master repository on 1999-05-29-00:13:11-BST
jlarmour
parents:
6
diff
changeset
|
220 #define TEST_OPTIONS(__handle, __array) \ |
|
d3fbcdfa1b2f
Merge from eCos master repository on 1999-05-29-00:13:11-BST
jlarmour
parents:
6
diff
changeset
|
221 test_options(__handle, sizeof(__array)/8, __array) |
|
d3fbcdfa1b2f
Merge from eCos master repository on 1999-05-29-00:13:11-BST
jlarmour
parents:
6
diff
changeset
|
222 |
|
d3fbcdfa1b2f
Merge from eCos master repository on 1999-05-29-00:13:11-BST
jlarmour
parents:
6
diff
changeset
|
223 #define TEST_HOST_DEBUG(__handle) \ |
|
d3fbcdfa1b2f
Merge from eCos master repository on 1999-05-29-00:13:11-BST
jlarmour
parents:
6
diff
changeset
|
224 CYG_MACRO_START \ |
|
d3fbcdfa1b2f
Merge from eCos master repository on 1999-05-29-00:13:11-BST
jlarmour
parents:
6
diff
changeset
|
225 cyg_uint32 __options[] = {OPT_SERIAL_DEBUG, 1}; \ |
|
d3fbcdfa1b2f
Merge from eCos master repository on 1999-05-29-00:13:11-BST
jlarmour
parents:
6
diff
changeset
|
226 test_options((__handle), sizeof(__options)/8, \ |
|
d3fbcdfa1b2f
Merge from eCos master repository on 1999-05-29-00:13:11-BST
jlarmour
parents:
6
diff
changeset
|
227 __options); \ |
|
d3fbcdfa1b2f
Merge from eCos master repository on 1999-05-29-00:13:11-BST
jlarmour
parents:
6
diff
changeset
|
228 CYG_MACRO_END |
|
d3fbcdfa1b2f
Merge from eCos master repository on 1999-05-29-00:13:11-BST
jlarmour
parents:
6
diff
changeset
|
229 |
|
d3fbcdfa1b2f
Merge from eCos master repository on 1999-05-29-00:13:11-BST
jlarmour
parents:
6
diff
changeset
|
230 #define TEST_HOST_PROGRESS(__handle) \ |
|
d3fbcdfa1b2f
Merge from eCos master repository on 1999-05-29-00:13:11-BST
jlarmour
parents:
6
diff
changeset
|
231 CYG_MACRO_START \ |
|
d3fbcdfa1b2f
Merge from eCos master repository on 1999-05-29-00:13:11-BST
jlarmour
parents:
6
diff
changeset
|
232 cyg_uint32 __options[] = \ |
|
d3fbcdfa1b2f
Merge from eCos master repository on 1999-05-29-00:13:11-BST
jlarmour
parents:
6
diff
changeset
|
233 {OPT_SERIAL_DEBUG, 1, \ |
|
d3fbcdfa1b2f
Merge from eCos master repository on 1999-05-29-00:13:11-BST
jlarmour
parents:
6
diff
changeset
|
234 OPT_VERBOSE_LEVEL, PROTOCOL_PROGRESS}; \ |
|
d3fbcdfa1b2f
Merge from eCos master repository on 1999-05-29-00:13:11-BST
jlarmour
parents:
6
diff
changeset
|
235 test_options((__handle), sizeof(__options)/8, \ |
|
d3fbcdfa1b2f
Merge from eCos master repository on 1999-05-29-00:13:11-BST
jlarmour
parents:
6
diff
changeset
|
236 __options); \ |
|
d3fbcdfa1b2f
Merge from eCos master repository on 1999-05-29-00:13:11-BST
jlarmour
parents:
6
diff
changeset
|
237 CYG_MACRO_END |
|
d3fbcdfa1b2f
Merge from eCos master repository on 1999-05-29-00:13:11-BST
jlarmour
parents:
6
diff
changeset
|
238 |
|
d3fbcdfa1b2f
Merge from eCos master repository on 1999-05-29-00:13:11-BST
jlarmour
parents:
6
diff
changeset
|
239 #define TEST_HOST_DATA(__handle) \ |
|
d3fbcdfa1b2f
Merge from eCos master repository on 1999-05-29-00:13:11-BST
jlarmour
parents:
6
diff
changeset
|
240 CYG_MACRO_START \ |
|
d3fbcdfa1b2f
Merge from eCos master repository on 1999-05-29-00:13:11-BST
jlarmour
parents:
6
diff
changeset
|
241 cyg_uint32 __options[] = \ |
|
d3fbcdfa1b2f
Merge from eCos master repository on 1999-05-29-00:13:11-BST
jlarmour
parents:
6
diff
changeset
|
242 {OPT_SERIAL_DEBUG, 1, \ |
|
d3fbcdfa1b2f
Merge from eCos master repository on 1999-05-29-00:13:11-BST
jlarmour
parents:
6
diff
changeset
|
243 OPT_VERBOSE_LEVEL, PROTOCOL_DATA}; \ |
|
d3fbcdfa1b2f
Merge from eCos master repository on 1999-05-29-00:13:11-BST
jlarmour
parents:
6
diff
changeset
|
244 test_options((__handle), sizeof(__options)/8, \ |
|
d3fbcdfa1b2f
Merge from eCos master repository on 1999-05-29-00:13:11-BST
jlarmour
parents:
6
diff
changeset
|
245 __options); \ |
|
d3fbcdfa1b2f
Merge from eCos master repository on 1999-05-29-00:13:11-BST
jlarmour
parents:
6
diff
changeset
|
246 CYG_MACRO_END |
|
d3fbcdfa1b2f
Merge from eCos master repository on 1999-05-29-00:13:11-BST
jlarmour
parents:
6
diff
changeset
|
247 |
| 2 | 248 //---------------------------------------------------------------------------- |
| 249 // A few predefined configurations. These must all be valid for any | |
| 250 // given target until change_config is behaving correctly. | |
| 251 cyg_ser_cfg_t test_configs[] = { | |
|
126
518f42066aba
Merge from eCos master repository on 2000-09-19-06:25:26-BST
jlarmour
parents:
124
diff
changeset
|
252 #if (0 == CYGINT_IO_SERIAL_TEST_SKIP_9600) |
|
4
1d7f19c9e4d1
Merge from eCos master repository on 1999-05-11-21:11:10-BST
jlarmour
parents:
2
diff
changeset
|
253 { CYGNUM_SERIAL_BAUD_9600, CYGNUM_SERIAL_WORD_LENGTH_8, |
|
115
6ed91473a1cd
Merge from eCos master repository on 2000-08-21-22:40:54-BST
jlarmour
parents:
108
diff
changeset
|
254 CYGNUM_SERIAL_STOP_1, CYGNUM_SERIAL_PARITY_NONE, |
|
6ed91473a1cd
Merge from eCos master repository on 2000-08-21-22:40:54-BST
jlarmour
parents:
108
diff
changeset
|
255 CYGNUM_SERIAL_FLOW_NONE }, |
|
4
1d7f19c9e4d1
Merge from eCos master repository on 1999-05-11-21:11:10-BST
jlarmour
parents:
2
diff
changeset
|
256 #endif |
|
1d7f19c9e4d1
Merge from eCos master repository on 1999-05-11-21:11:10-BST
jlarmour
parents:
2
diff
changeset
|
257 |
|
126
518f42066aba
Merge from eCos master repository on 2000-09-19-06:25:26-BST
jlarmour
parents:
124
diff
changeset
|
258 #if (0 == CYGINT_IO_SERIAL_TEST_SKIP_14400) |
|
30
641b639be825
Merge from eCos master repository on 1999-08-16-22:01:37-BST
jlarmour
parents:
22
diff
changeset
|
259 #if !defined(CYGPKG_HAL_MN10300_AM31) && \ |
|
115
6ed91473a1cd
Merge from eCos master repository on 2000-08-21-22:40:54-BST
jlarmour
parents:
108
diff
changeset
|
260 !defined(CYGPKG_HAL_MN10300_AM33) |
|
4
1d7f19c9e4d1
Merge from eCos master repository on 1999-05-11-21:11:10-BST
jlarmour
parents:
2
diff
changeset
|
261 { CYGNUM_SERIAL_BAUD_14400, CYGNUM_SERIAL_WORD_LENGTH_8, |
|
115
6ed91473a1cd
Merge from eCos master repository on 2000-08-21-22:40:54-BST
jlarmour
parents:
108
diff
changeset
|
262 CYGNUM_SERIAL_STOP_1, CYGNUM_SERIAL_PARITY_NONE, |
|
6ed91473a1cd
Merge from eCos master repository on 2000-08-21-22:40:54-BST
jlarmour
parents:
108
diff
changeset
|
263 CYGNUM_SERIAL_FLOW_NONE }, |
|
30
641b639be825
Merge from eCos master repository on 1999-08-16-22:01:37-BST
jlarmour
parents:
22
diff
changeset
|
264 #endif |
|
126
518f42066aba
Merge from eCos master repository on 2000-09-19-06:25:26-BST
jlarmour
parents:
124
diff
changeset
|
265 #endif |
|
4
1d7f19c9e4d1
Merge from eCos master repository on 1999-05-11-21:11:10-BST
jlarmour
parents:
2
diff
changeset
|
266 |
|
1d7f19c9e4d1
Merge from eCos master repository on 1999-05-11-21:11:10-BST
jlarmour
parents:
2
diff
changeset
|
267 { CYGNUM_SERIAL_BAUD_19200, CYGNUM_SERIAL_WORD_LENGTH_8, |
|
115
6ed91473a1cd
Merge from eCos master repository on 2000-08-21-22:40:54-BST
jlarmour
parents:
108
diff
changeset
|
268 CYGNUM_SERIAL_STOP_1, CYGNUM_SERIAL_PARITY_NONE, |
|
6ed91473a1cd
Merge from eCos master repository on 2000-08-21-22:40:54-BST
jlarmour
parents:
108
diff
changeset
|
269 CYGNUM_SERIAL_FLOW_NONE }, |
|
4
1d7f19c9e4d1
Merge from eCos master repository on 1999-05-11-21:11:10-BST
jlarmour
parents:
2
diff
changeset
|
270 |
|
126
518f42066aba
Merge from eCos master repository on 2000-09-19-06:25:26-BST
jlarmour
parents:
124
diff
changeset
|
271 #if (0 == CYGINT_IO_SERIAL_TEST_SKIP_38400) |
|
4
1d7f19c9e4d1
Merge from eCos master repository on 1999-05-11-21:11:10-BST
jlarmour
parents:
2
diff
changeset
|
272 { CYGNUM_SERIAL_BAUD_38400, CYGNUM_SERIAL_WORD_LENGTH_8, |
|
115
6ed91473a1cd
Merge from eCos master repository on 2000-08-21-22:40:54-BST
jlarmour
parents:
108
diff
changeset
|
273 CYGNUM_SERIAL_STOP_1, CYGNUM_SERIAL_PARITY_NONE, |
|
6ed91473a1cd
Merge from eCos master repository on 2000-08-21-22:40:54-BST
jlarmour
parents:
108
diff
changeset
|
274 CYGNUM_SERIAL_FLOW_NONE }, |
| 2 | 275 #endif |
| 276 | |
|
126
518f42066aba
Merge from eCos master repository on 2000-09-19-06:25:26-BST
jlarmour
parents:
124
diff
changeset
|
277 #if (0 == CYGINT_IO_SERIAL_TEST_SKIP_57600) |
|
130
eb9fd8c04db3
Merge from eCos master repository on 2000-10-23-17:01:37-BST
jlarmour
parents:
128
diff
changeset
|
278 #if !defined(CYGPKG_HAL_MN10300_AM33) |
| 2 | 279 { CYGNUM_SERIAL_BAUD_57600, CYGNUM_SERIAL_WORD_LENGTH_8, |
|
115
6ed91473a1cd
Merge from eCos master repository on 2000-08-21-22:40:54-BST
jlarmour
parents:
108
diff
changeset
|
280 CYGNUM_SERIAL_STOP_1, CYGNUM_SERIAL_PARITY_NONE, |
|
6ed91473a1cd
Merge from eCos master repository on 2000-08-21-22:40:54-BST
jlarmour
parents:
108
diff
changeset
|
281 CYGNUM_SERIAL_FLOW_NONE }, |
| 2 | 282 #endif |
|
126
518f42066aba
Merge from eCos master repository on 2000-09-19-06:25:26-BST
jlarmour
parents:
124
diff
changeset
|
283 #endif |
| 2 | 284 |
|
126
518f42066aba
Merge from eCos master repository on 2000-09-19-06:25:26-BST
jlarmour
parents:
124
diff
changeset
|
285 #if (0 == CYGINT_IO_SERIAL_TEST_SKIP_115200) |
|
130
eb9fd8c04db3
Merge from eCos master repository on 2000-10-23-17:01:37-BST
jlarmour
parents:
128
diff
changeset
|
286 #if !defined(CYGPKG_HAL_MN10300_STDEVAL1) |
|
4
1d7f19c9e4d1
Merge from eCos master repository on 1999-05-11-21:11:10-BST
jlarmour
parents:
2
diff
changeset
|
287 { CYGNUM_SERIAL_BAUD_115200, CYGNUM_SERIAL_WORD_LENGTH_8, |
|
115
6ed91473a1cd
Merge from eCos master repository on 2000-08-21-22:40:54-BST
jlarmour
parents:
108
diff
changeset
|
288 CYGNUM_SERIAL_STOP_1, CYGNUM_SERIAL_PARITY_NONE, |
|
6ed91473a1cd
Merge from eCos master repository on 2000-08-21-22:40:54-BST
jlarmour
parents:
108
diff
changeset
|
289 CYGNUM_SERIAL_FLOW_NONE }, |
| 2 | 290 #endif |
|
126
518f42066aba
Merge from eCos master repository on 2000-09-19-06:25:26-BST
jlarmour
parents:
124
diff
changeset
|
291 #endif |
| 2 | 292 |
|
126
518f42066aba
Merge from eCos master repository on 2000-09-19-06:25:26-BST
jlarmour
parents:
124
diff
changeset
|
293 #if (0 == CYGINT_IO_SERIAL_TEST_SKIP_PARITY_EVEN) |
| 2 | 294 // One stop bit, even parity |
| 295 { CYGNUM_SERIAL_BAUD_19200, CYGNUM_SERIAL_WORD_LENGTH_8, | |
|
115
6ed91473a1cd
Merge from eCos master repository on 2000-08-21-22:40:54-BST
jlarmour
parents:
108
diff
changeset
|
296 CYGNUM_SERIAL_STOP_1, CYGNUM_SERIAL_PARITY_EVEN, |
|
6ed91473a1cd
Merge from eCos master repository on 2000-08-21-22:40:54-BST
jlarmour
parents:
108
diff
changeset
|
297 CYGNUM_SERIAL_FLOW_NONE }, |
| 2 | 298 #endif |
| 299 | |
|
126
518f42066aba
Merge from eCos master repository on 2000-09-19-06:25:26-BST
jlarmour
parents:
124
diff
changeset
|
300 #if (0 == CYGINT_IO_SERIAL_TEST_SKIP_PARITY_EVEN) |
|
518f42066aba
Merge from eCos master repository on 2000-09-19-06:25:26-BST
jlarmour
parents:
124
diff
changeset
|
301 #if (0 == CYGINT_IO_SERIAL_TEST_SKIP_STOP_2) |
| 2 | 302 // Two stop bits, even parity |
| 303 { CYGNUM_SERIAL_BAUD_19200, CYGNUM_SERIAL_WORD_LENGTH_8, | |
|
115
6ed91473a1cd
Merge from eCos master repository on 2000-08-21-22:40:54-BST
jlarmour
parents:
108
diff
changeset
|
304 CYGNUM_SERIAL_STOP_2, CYGNUM_SERIAL_PARITY_EVEN, |
|
6ed91473a1cd
Merge from eCos master repository on 2000-08-21-22:40:54-BST
jlarmour
parents:
108
diff
changeset
|
305 CYGNUM_SERIAL_FLOW_NONE }, |
| 2 | 306 #endif |
|
126
518f42066aba
Merge from eCos master repository on 2000-09-19-06:25:26-BST
jlarmour
parents:
124
diff
changeset
|
307 #endif |
| 2 | 308 |
|
126
518f42066aba
Merge from eCos master repository on 2000-09-19-06:25:26-BST
jlarmour
parents:
124
diff
changeset
|
309 #if (0 == CYGINT_IO_SERIAL_TEST_SKIP_STOP_2) |
| 2 | 310 // Two stop bits, no parity |
| 311 { CYGNUM_SERIAL_BAUD_19200, CYGNUM_SERIAL_WORD_LENGTH_8, | |
|
115
6ed91473a1cd
Merge from eCos master repository on 2000-08-21-22:40:54-BST
jlarmour
parents:
108
diff
changeset
|
312 CYGNUM_SERIAL_STOP_2, CYGNUM_SERIAL_PARITY_NONE, |
|
6ed91473a1cd
Merge from eCos master repository on 2000-08-21-22:40:54-BST
jlarmour
parents:
108
diff
changeset
|
313 CYGNUM_SERIAL_FLOW_NONE }, |
| 2 | 314 #endif |
| 315 }; | |
| 316 | |
| 317 //---------------------------------------------------------------------------- | |
| 318 // Macros to help extract values from the argument string. | |
| 319 // Note: This is probably not an ideal solution, but it was easy to make :) | |
| 320 | |
| 321 #define INIT_VALUE(__args) \ | |
| 322 unsigned int v; \ | |
| 323 char *__ptr1, *__ptr2 = (__args) | |
| 324 | |
| 325 #define SET_VALUE(__slot) \ | |
| 326 do { \ | |
| 327 __ptr1 = index(__ptr2, (int) ':'); \ | |
| 328 if (__ptr1) \ | |
| 329 *__ptr1 = 0; \ | |
| 330 v = atoi(__ptr2); \ | |
| 331 __ptr2 = __ptr1+1; \ | |
| 332 (__slot) = v; \ | |
| 333 } while (0) | |
| 334 | |
| 335 | |
| 336 //---------------------------------------------------------------------------- | |
| 337 // CRC magic - it's a bit of a hack for now. | |
| 338 // FIXME: standard definition? | |
| 339 #define ADD_CRC_BYTE(__crc, __c) \ | |
| 340 CYG_MACRO_START \ | |
| 341 (__crc) = ((__crc) << 1) ^ (__c); \ | |
| 342 CYG_MACRO_END | |
| 343 | |
| 344 // FIXME: Hack to allow easy ASCII transfer. | |
| 345 #define FIX_CRC(__crc, __icrc) \ | |
| 346 CYG_MACRO_START \ | |
| 347 __icrc = (int) (__crc); \ | |
| 348 if (__icrc < 0) \ | |
| 349 __icrc = -__icrc; \ | |
| 350 CYG_MACRO_END | |
| 351 | |
| 352 //---------------------------------------------------------------------------- | |
| 353 // Macros for read/write to serial with error cheking. | |
|
4
1d7f19c9e4d1
Merge from eCos master repository on 1999-05-11-21:11:10-BST
jlarmour
parents:
2
diff
changeset
|
354 static volatile cyg_uint32 r_stamp; |
|
1d7f19c9e4d1
Merge from eCos master repository on 1999-05-11-21:11:10-BST
jlarmour
parents:
2
diff
changeset
|
355 static volatile int aborted; |
| 2 | 356 |
| 357 // This routine will be called if the read "times out" | |
| 358 static void | |
| 359 do_abort(void *handle) | |
| 360 { | |
| 361 cyg_io_handle_t io_handle = (cyg_io_handle_t)handle; | |
| 362 cyg_int32 len = 1; // Need something here | |
| 363 cyg_io_get_config(io_handle, CYG_IO_GET_CONFIG_SERIAL_ABORT, 0, &len); | |
|
4
1d7f19c9e4d1
Merge from eCos master repository on 1999-05-11-21:11:10-BST
jlarmour
parents:
2
diff
changeset
|
364 aborted = 1; |
| 2 | 365 } |
| 366 #include "timeout.inl" | |
| 367 | |
| 368 // Read with timeout (__t = timeout in ticks, int* __r = result) | |
|
34
29bc183297e1
Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents:
32
diff
changeset
|
369 #define Tcyg_io_read_timeout(__h, __d, __l, __t, __r) \ |
|
29bc183297e1
Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents:
32
diff
changeset
|
370 CYG_MACRO_START \ |
|
29bc183297e1
Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents:
32
diff
changeset
|
371 int __res; \ |
|
29bc183297e1
Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents:
32
diff
changeset
|
372 r_stamp = timeout((__t), do_abort, (__h)); \ |
|
29bc183297e1
Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents:
32
diff
changeset
|
373 __res = cyg_io_read((__h), (__d), (__l)); \ |
|
29bc183297e1
Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents:
32
diff
changeset
|
374 if (ENOERR != __res && -EINTR != __res) { \ |
|
29bc183297e1
Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents:
32
diff
changeset
|
375 TEST_CRASH(__h, TEST_CRASH_IO_READ, \ |
|
29bc183297e1
Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents:
32
diff
changeset
|
376 "cyg_io_read/timeout failed", __res); \ |
|
29bc183297e1
Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents:
32
diff
changeset
|
377 } \ |
|
29bc183297e1
Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents:
32
diff
changeset
|
378 *(__r) = __res; \ |
|
29bc183297e1
Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents:
32
diff
changeset
|
379 untimeout(r_stamp); \ |
| 2 | 380 CYG_MACRO_END |
| 381 | |
|
34
29bc183297e1
Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents:
32
diff
changeset
|
382 #define Tcyg_io_read(__h, __d, __l) \ |
|
29bc183297e1
Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents:
32
diff
changeset
|
383 CYG_MACRO_START \ |
|
29bc183297e1
Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents:
32
diff
changeset
|
384 int __res = cyg_io_read((__h), (__d), (__l)); \ |
|
29bc183297e1
Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents:
32
diff
changeset
|
385 if (ENOERR != __res) { \ |
|
29bc183297e1
Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents:
32
diff
changeset
|
386 TEST_CRASH(__h, TEST_CRASH_IO_READ, \ |
|
29bc183297e1
Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents:
32
diff
changeset
|
387 "cyg_io_read failed", __res); \ |
|
29bc183297e1
Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents:
32
diff
changeset
|
388 } \ |
| 2 | 389 CYG_MACRO_END |
| 390 | |
| 391 #define Tcyg_io_write(__h, __d, __l) \ | |
| 392 CYG_MACRO_START \ | |
| 393 int __res; \ | |
| 394 cyg_uint32 __len = 1; \ | |
| 395 __res = cyg_io_write((__h), (__d), (__l)); \ | |
|
34
29bc183297e1
Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents:
32
diff
changeset
|
396 if (ENOERR != __res) { \ |
|
29bc183297e1
Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents:
32
diff
changeset
|
397 TEST_CRASH(__h, TEST_CRASH_IO_WRITE, \ |
|
29bc183297e1
Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents:
32
diff
changeset
|
398 "cyg_io_write failed", __res); \ |
|
29bc183297e1
Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents:
32
diff
changeset
|
399 } \ |
| 2 | 400 __res = cyg_io_get_config((__h), \ |
| 401 CYG_IO_GET_CONFIG_SERIAL_OUTPUT_DRAIN, \ | |
| 402 0, &__len); \ | |
|
34
29bc183297e1
Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents:
32
diff
changeset
|
403 if (ENOERR != __res) { \ |
|
29bc183297e1
Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents:
32
diff
changeset
|
404 TEST_CRASH(__h, TEST_CRASH_IO_DRAIN, \ |
|
29bc183297e1
Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents:
32
diff
changeset
|
405 "DRAIN failed", __res); \ |
|
29bc183297e1
Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents:
32
diff
changeset
|
406 } \ |
| 2 | 407 CYG_MACRO_END |
| 408 | |
| 409 | |
| 410 //---------------------------------------------------------------------------- | |
| 411 // Some libc like functions that are handy to have around. | |
| 412 static int | |
| 413 strlen(const char *c) | |
| 414 { | |
| 415 int l = 0; | |
| 416 while (*c++) l++; | |
| 417 return l; | |
| 418 } | |
| 419 | |
| 420 static char* | |
| 421 strcpy(char* dest, const char* src) | |
| 422 { | |
| 423 char c; | |
| 424 while ((c = *src++)) { | |
| 425 *dest++ = c; | |
| 426 } | |
| 427 *dest = c; | |
| 428 | |
| 429 return dest; | |
| 430 } | |
| 431 | |
| 432 static char* | |
| 433 itoa(char* dest, int v) | |
| 434 { | |
| 435 char b[16]; | |
| 436 char* p = &b[16]; | |
| 437 | |
| 438 *--p = 0; | |
| 439 if (v) { | |
| 440 while (v){ | |
| 441 *--p = (v % 10) + '0'; | |
| 442 v = v / 10; | |
| 443 } | |
| 444 } else | |
| 445 *--p = '0'; | |
| 446 | |
| 447 return strcpy(dest, p); | |
| 448 } | |
| 449 | |
| 450 #define min(_a, _b) ((_a) < (_b)) ? (_a) : (_b) | |
| 451 | |
| 452 void | |
| 453 hang(void) | |
| 454 { | |
| 455 while (1); | |
| 456 } | |
| 457 | |
| 458 //----------------------------------------------------------------------------- | |
| 459 // Configuration changing function. | |
|
4
1d7f19c9e4d1
Merge from eCos master repository on 1999-05-11-21:11:10-BST
jlarmour
parents:
2
diff
changeset
|
460 // |
|
1d7f19c9e4d1
Merge from eCos master repository on 1999-05-11-21:11:10-BST
jlarmour
parents:
2
diff
changeset
|
461 // First change to the new config and back again to determine if the driver |
|
1d7f19c9e4d1
Merge from eCos master repository on 1999-05-11-21:11:10-BST
jlarmour
parents:
2
diff
changeset
|
462 // can handle the config. |
|
1d7f19c9e4d1
Merge from eCos master repository on 1999-05-11-21:11:10-BST
jlarmour
parents:
2
diff
changeset
|
463 // If not, return error. |
|
1d7f19c9e4d1
Merge from eCos master repository on 1999-05-11-21:11:10-BST
jlarmour
parents:
2
diff
changeset
|
464 // |
|
1d7f19c9e4d1
Merge from eCos master repository on 1999-05-11-21:11:10-BST
jlarmour
parents:
2
diff
changeset
|
465 // Then query the host for its capability to use the config: |
|
1d7f19c9e4d1
Merge from eCos master repository on 1999-05-11-21:11:10-BST
jlarmour
parents:
2
diff
changeset
|
466 // Format out: |
|
115
6ed91473a1cd
Merge from eCos master repository on 2000-08-21-22:40:54-BST
jlarmour
parents:
108
diff
changeset
|
467 // "@CONFIG:<baud rate code>:<#data bits>:<#stop bits>:<parity on/off>:<flow control code>!" |
|
4
1d7f19c9e4d1
Merge from eCos master repository on 1999-05-11-21:11:10-BST
jlarmour
parents:
2
diff
changeset
|
468 // Format in: |
|
1d7f19c9e4d1
Merge from eCos master repository on 1999-05-11-21:11:10-BST
jlarmour
parents:
2
diff
changeset
|
469 // OK/ER |
|
1d7f19c9e4d1
Merge from eCos master repository on 1999-05-11-21:11:10-BST
jlarmour
parents:
2
diff
changeset
|
470 // |
|
1d7f19c9e4d1
Merge from eCos master repository on 1999-05-11-21:11:10-BST
jlarmour
parents:
2
diff
changeset
|
471 // On ER, return error. |
| 2 | 472 // |
|
4
1d7f19c9e4d1
Merge from eCos master repository on 1999-05-11-21:11:10-BST
jlarmour
parents:
2
diff
changeset
|
473 // On OK, change to the new configuration. Resynchronize with the host: |
|
22
53104bbd5f99
Merge from eCos master repository on 1999-07-09-05:47:06-BST
jlarmour
parents:
20
diff
changeset
|
474 // Target waits for host to send S(ync) |
|
53104bbd5f99
Merge from eCos master repository on 1999-07-09-05:47:06-BST
jlarmour
parents:
20
diff
changeset
|
475 // [host will delay at least .1 secs after changing baud rate so the |
|
53104bbd5f99
Merge from eCos master repository on 1999-07-09-05:47:06-BST
jlarmour
parents:
20
diff
changeset
|
476 // line has time to settle.] |
|
4
1d7f19c9e4d1
Merge from eCos master repository on 1999-05-11-21:11:10-BST
jlarmour
parents:
2
diff
changeset
|
477 // |
|
22
53104bbd5f99
Merge from eCos master repository on 1999-07-09-05:47:06-BST
jlarmour
parents:
20
diff
changeset
|
478 // When receiving S(ync), target replies OK to the host which then |
|
53104bbd5f99
Merge from eCos master repository on 1999-07-09-05:47:06-BST
jlarmour
parents:
20
diff
changeset
|
479 // acknowledges with D(one). |
|
53104bbd5f99
Merge from eCos master repository on 1999-07-09-05:47:06-BST
jlarmour
parents:
20
diff
changeset
|
480 // |
|
53104bbd5f99
Merge from eCos master repository on 1999-07-09-05:47:06-BST
jlarmour
parents:
20
diff
changeset
|
481 // Host can also send R(esync) which means it didn't receieve the OK. If |
|
53104bbd5f99
Merge from eCos master repository on 1999-07-09-05:47:06-BST
jlarmour
parents:
20
diff
changeset
|
482 // so the target resends its S(ync) message. |
|
53104bbd5f99
Merge from eCos master repository on 1999-07-09-05:47:06-BST
jlarmour
parents:
20
diff
changeset
|
483 // |
|
53104bbd5f99
Merge from eCos master repository on 1999-07-09-05:47:06-BST
jlarmour
parents:
20
diff
changeset
|
484 // If the synchronization has not succeeded within 1 second |
|
4
1d7f19c9e4d1
Merge from eCos master repository on 1999-05-11-21:11:10-BST
jlarmour
parents:
2
diff
changeset
|
485 // (configurable in the protocol), both host and target will revert to |
|
1d7f19c9e4d1
Merge from eCos master repository on 1999-05-11-21:11:10-BST
jlarmour
parents:
2
diff
changeset
|
486 // the previous configuration and attempt to synchronize again. If |
|
1d7f19c9e4d1
Merge from eCos master repository on 1999-05-11-21:11:10-BST
jlarmour
parents:
2
diff
changeset
|
487 // this fails, this call will hang and the host will consider the test |
|
1d7f19c9e4d1
Merge from eCos master repository on 1999-05-11-21:11:10-BST
jlarmour
parents:
2
diff
changeset
|
488 // a failure. |
|
1d7f19c9e4d1
Merge from eCos master repository on 1999-05-11-21:11:10-BST
jlarmour
parents:
2
diff
changeset
|
489 // |
|
1d7f19c9e4d1
Merge from eCos master repository on 1999-05-11-21:11:10-BST
jlarmour
parents:
2
diff
changeset
|
490 // To Do: |
|
1d7f19c9e4d1
Merge from eCos master repository on 1999-05-11-21:11:10-BST
jlarmour
parents:
2
diff
changeset
|
491 // Host&protocol currently only supports: |
|
1d7f19c9e4d1
Merge from eCos master repository on 1999-05-11-21:11:10-BST
jlarmour
parents:
2
diff
changeset
|
492 // - no/even parity |
| 2 | 493 int |
| 494 change_config(cyg_io_handle_t handle, cyg_ser_cfg_t* cfg) | |
| 495 { | |
|
4
1d7f19c9e4d1
Merge from eCos master repository on 1999-05-11-21:11:10-BST
jlarmour
parents:
2
diff
changeset
|
496 cyg_serial_info_t old_cfg, new_cfg; |
| 2 | 497 const char cmd[] = "@CONFIG:"; |
| 498 char reply[2]; | |
| 499 int msglen; | |
|
4
1d7f19c9e4d1
Merge from eCos master repository on 1999-05-11-21:11:10-BST
jlarmour
parents:
2
diff
changeset
|
500 int res, len; |
| 2 | 501 cyg_uint8 *p1; |
|
4
1d7f19c9e4d1
Merge from eCos master repository on 1999-05-11-21:11:10-BST
jlarmour
parents:
2
diff
changeset
|
502 |
|
1d7f19c9e4d1
Merge from eCos master repository on 1999-05-11-21:11:10-BST
jlarmour
parents:
2
diff
changeset
|
503 // Prepare the command. |
| 2 | 504 p1 = &cmd_buffer[0]; |
| 505 p1 = strcpy(p1, &cmd[0]); | |
| 506 p1 = itoa(p1, cfg->baud_rate); | |
| 507 *p1++ = ':'; | |
| 508 p1 = itoa(p1, cfg->data_bits); | |
| 509 *p1++ = ':'; | |
| 510 p1 = itoa(p1, cfg->stop_bits); | |
| 511 *p1++ = ':'; | |
| 512 p1 = itoa(p1, cfg->parity); | |
|
115
6ed91473a1cd
Merge from eCos master repository on 2000-08-21-22:40:54-BST
jlarmour
parents:
108
diff
changeset
|
513 *p1++ = ':'; |
|
6ed91473a1cd
Merge from eCos master repository on 2000-08-21-22:40:54-BST
jlarmour
parents:
108
diff
changeset
|
514 p1 = itoa(p1, cfg->flags); |
| 2 | 515 *p1++ = '!'; |
|
4
1d7f19c9e4d1
Merge from eCos master repository on 1999-05-11-21:11:10-BST
jlarmour
parents:
2
diff
changeset
|
516 *p1 = 0; // note: we may append to this later |
| 2 | 517 |
|
4
1d7f19c9e4d1
Merge from eCos master repository on 1999-05-11-21:11:10-BST
jlarmour
parents:
2
diff
changeset
|
518 // Tell user what we're up to. |
| 2 | 519 CYG_TEST_INFO(&cmd_buffer[1]); |
| 520 | |
|
4
1d7f19c9e4d1
Merge from eCos master repository on 1999-05-11-21:11:10-BST
jlarmour
parents:
2
diff
changeset
|
521 // Change to new config and then back to determine if the driver likes it. |
|
1d7f19c9e4d1
Merge from eCos master repository on 1999-05-11-21:11:10-BST
jlarmour
parents:
2
diff
changeset
|
522 len = sizeof(old_cfg); |
|
1d7f19c9e4d1
Merge from eCos master repository on 1999-05-11-21:11:10-BST
jlarmour
parents:
2
diff
changeset
|
523 res = cyg_io_get_config(handle, CYG_IO_GET_CONFIG_SERIAL_INFO, |
|
1d7f19c9e4d1
Merge from eCos master repository on 1999-05-11-21:11:10-BST
jlarmour
parents:
2
diff
changeset
|
524 &old_cfg, &len); |
|
1d7f19c9e4d1
Merge from eCos master repository on 1999-05-11-21:11:10-BST
jlarmour
parents:
2
diff
changeset
|
525 res = cyg_io_get_config(handle, CYG_IO_GET_CONFIG_SERIAL_INFO, |
|
1d7f19c9e4d1
Merge from eCos master repository on 1999-05-11-21:11:10-BST
jlarmour
parents:
2
diff
changeset
|
526 &new_cfg, &len); |
|
30
641b639be825
Merge from eCos master repository on 1999-08-16-22:01:37-BST
jlarmour
parents:
22
diff
changeset
|
527 |
|
34
29bc183297e1
Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents:
32
diff
changeset
|
528 if (res != ENOERR) { |
|
29bc183297e1
Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents:
32
diff
changeset
|
529 TEST_CRASH(handle, TEST_CRASH_IO_GET_CFG, |
|
29bc183297e1
Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents:
32
diff
changeset
|
530 "Can't get serial config", res); |
|
4
1d7f19c9e4d1
Merge from eCos master repository on 1999-05-11-21:11:10-BST
jlarmour
parents:
2
diff
changeset
|
531 } |
|
1d7f19c9e4d1
Merge from eCos master repository on 1999-05-11-21:11:10-BST
jlarmour
parents:
2
diff
changeset
|
532 |
|
1d7f19c9e4d1
Merge from eCos master repository on 1999-05-11-21:11:10-BST
jlarmour
parents:
2
diff
changeset
|
533 new_cfg.baud = cfg->baud_rate; |
|
1d7f19c9e4d1
Merge from eCos master repository on 1999-05-11-21:11:10-BST
jlarmour
parents:
2
diff
changeset
|
534 new_cfg.word_length = cfg->data_bits; |
|
1d7f19c9e4d1
Merge from eCos master repository on 1999-05-11-21:11:10-BST
jlarmour
parents:
2
diff
changeset
|
535 new_cfg.stop = cfg->stop_bits; |
|
1d7f19c9e4d1
Merge from eCos master repository on 1999-05-11-21:11:10-BST
jlarmour
parents:
2
diff
changeset
|
536 new_cfg.parity = cfg->parity; |
|
115
6ed91473a1cd
Merge from eCos master repository on 2000-08-21-22:40:54-BST
jlarmour
parents:
108
diff
changeset
|
537 new_cfg.flags = cfg->flags; |
|
4
1d7f19c9e4d1
Merge from eCos master repository on 1999-05-11-21:11:10-BST
jlarmour
parents:
2
diff
changeset
|
538 |
|
1d7f19c9e4d1
Merge from eCos master repository on 1999-05-11-21:11:10-BST
jlarmour
parents:
2
diff
changeset
|
539 res = cyg_io_set_config(handle, CYG_IO_SET_CONFIG_SERIAL_INFO, |
|
1d7f19c9e4d1
Merge from eCos master repository on 1999-05-11-21:11:10-BST
jlarmour
parents:
2
diff
changeset
|
540 &new_cfg, &len); |
|
20
5f5102441818
Merge from eCos master repository on 1999-07-02-23:17:07-BST
jlarmour
parents:
16
diff
changeset
|
541 cyg_thread_delay(10); // Some chips don't like changes to happen to fast... |
|
4
1d7f19c9e4d1
Merge from eCos master repository on 1999-05-11-21:11:10-BST
jlarmour
parents:
2
diff
changeset
|
542 |
|
1d7f19c9e4d1
Merge from eCos master repository on 1999-05-11-21:11:10-BST
jlarmour
parents:
2
diff
changeset
|
543 // Driver didn't like it. It will not have changed anything, so it's |
|
1d7f19c9e4d1
Merge from eCos master repository on 1999-05-11-21:11:10-BST
jlarmour
parents:
2
diff
changeset
|
544 // safe to return now. |
|
1d7f19c9e4d1
Merge from eCos master repository on 1999-05-11-21:11:10-BST
jlarmour
parents:
2
diff
changeset
|
545 if (ENOERR != res) { |
|
1d7f19c9e4d1
Merge from eCos master repository on 1999-05-11-21:11:10-BST
jlarmour
parents:
2
diff
changeset
|
546 // Let user know that the config was skipped due to the target. |
|
1d7f19c9e4d1
Merge from eCos master repository on 1999-05-11-21:11:10-BST
jlarmour
parents:
2
diff
changeset
|
547 const char txt_tskipped[] = "- skipped by target!"; |
|
1d7f19c9e4d1
Merge from eCos master repository on 1999-05-11-21:11:10-BST
jlarmour
parents:
2
diff
changeset
|
548 p1 = strcpy(p1, txt_tskipped); |
|
1d7f19c9e4d1
Merge from eCos master repository on 1999-05-11-21:11:10-BST
jlarmour
parents:
2
diff
changeset
|
549 *p1 = 0; |
|
1d7f19c9e4d1
Merge from eCos master repository on 1999-05-11-21:11:10-BST
jlarmour
parents:
2
diff
changeset
|
550 CYG_TEST_INFO(&cmd_buffer[1]); |
|
1d7f19c9e4d1
Merge from eCos master repository on 1999-05-11-21:11:10-BST
jlarmour
parents:
2
diff
changeset
|
551 return res; |
|
1d7f19c9e4d1
Merge from eCos master repository on 1999-05-11-21:11:10-BST
jlarmour
parents:
2
diff
changeset
|
552 } |
|
1d7f19c9e4d1
Merge from eCos master repository on 1999-05-11-21:11:10-BST
jlarmour
parents:
2
diff
changeset
|
553 |
|
1d7f19c9e4d1
Merge from eCos master repository on 1999-05-11-21:11:10-BST
jlarmour
parents:
2
diff
changeset
|
554 // Succeeded. Change back to the original config so we can communicate |
|
1d7f19c9e4d1
Merge from eCos master repository on 1999-05-11-21:11:10-BST
jlarmour
parents:
2
diff
changeset
|
555 // with the host. |
|
1d7f19c9e4d1
Merge from eCos master repository on 1999-05-11-21:11:10-BST
jlarmour
parents:
2
diff
changeset
|
556 res = cyg_io_set_config(handle, CYG_IO_SET_CONFIG_SERIAL_INFO, |
|
1d7f19c9e4d1
Merge from eCos master repository on 1999-05-11-21:11:10-BST
jlarmour
parents:
2
diff
changeset
|
557 &old_cfg, &len); |
|
22
53104bbd5f99
Merge from eCos master repository on 1999-07-09-05:47:06-BST
jlarmour
parents:
20
diff
changeset
|
558 cyg_thread_delay(10); // Some chips don't like changes to happen to fast... |
|
34
29bc183297e1
Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents:
32
diff
changeset
|
559 |
|
29bc183297e1
Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents:
32
diff
changeset
|
560 if (res != ENOERR) { |
|
29bc183297e1
Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents:
32
diff
changeset
|
561 TEST_CRASH(handle, TEST_CRASH_IO_SET_CFG, |
|
29bc183297e1
Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents:
32
diff
changeset
|
562 "Can't set serial config", res); |
|
4
1d7f19c9e4d1
Merge from eCos master repository on 1999-05-11-21:11:10-BST
jlarmour
parents:
2
diff
changeset
|
563 } |
|
1d7f19c9e4d1
Merge from eCos master repository on 1999-05-11-21:11:10-BST
jlarmour
parents:
2
diff
changeset
|
564 |
|
1d7f19c9e4d1
Merge from eCos master repository on 1999-05-11-21:11:10-BST
jlarmour
parents:
2
diff
changeset
|
565 // Send command to host and read host's reply. |
| 2 | 566 msglen = strlen(&cmd_buffer[0]); |
| 567 Tcyg_io_write(handle, &cmd_buffer[0], &msglen); | |
| 568 msglen = 2; | |
| 569 Tcyg_io_read(handle, &reply[0], &msglen); | |
| 570 | |
|
4
1d7f19c9e4d1
Merge from eCos master repository on 1999-05-11-21:11:10-BST
jlarmour
parents:
2
diff
changeset
|
571 // Did host accept configuration? |
|
1d7f19c9e4d1
Merge from eCos master repository on 1999-05-11-21:11:10-BST
jlarmour
parents:
2
diff
changeset
|
572 if ('O' != reply[0] || 'K' != reply[1]) { |
|
1d7f19c9e4d1
Merge from eCos master repository on 1999-05-11-21:11:10-BST
jlarmour
parents:
2
diff
changeset
|
573 // Let user know that the config was skipped due to the host. |
|
1d7f19c9e4d1
Merge from eCos master repository on 1999-05-11-21:11:10-BST
jlarmour
parents:
2
diff
changeset
|
574 const char txt_hskipped[] = "- skipped by host!"; |
|
1d7f19c9e4d1
Merge from eCos master repository on 1999-05-11-21:11:10-BST
jlarmour
parents:
2
diff
changeset
|
575 p1 = strcpy(p1, txt_hskipped); |
|
1d7f19c9e4d1
Merge from eCos master repository on 1999-05-11-21:11:10-BST
jlarmour
parents:
2
diff
changeset
|
576 *p1 = 0; |
|
1d7f19c9e4d1
Merge from eCos master repository on 1999-05-11-21:11:10-BST
jlarmour
parents:
2
diff
changeset
|
577 CYG_TEST_INFO(&cmd_buffer[1]); |
|
1d7f19c9e4d1
Merge from eCos master repository on 1999-05-11-21:11:10-BST
jlarmour
parents:
2
diff
changeset
|
578 diag_printf("Host didn't accept config (%02x, %02x).\n", |
|
1d7f19c9e4d1
Merge from eCos master repository on 1999-05-11-21:11:10-BST
jlarmour
parents:
2
diff
changeset
|
579 reply[0], reply[1]); |
|
1d7f19c9e4d1
Merge from eCos master repository on 1999-05-11-21:11:10-BST
jlarmour
parents:
2
diff
changeset
|
580 |
|
1d7f19c9e4d1
Merge from eCos master repository on 1999-05-11-21:11:10-BST
jlarmour
parents:
2
diff
changeset
|
581 res = ENOSUPP; |
|
1d7f19c9e4d1
Merge from eCos master repository on 1999-05-11-21:11:10-BST
jlarmour
parents:
2
diff
changeset
|
582 return res; |
|
1d7f19c9e4d1
Merge from eCos master repository on 1999-05-11-21:11:10-BST
jlarmour
parents:
2
diff
changeset
|
583 } |
|
1d7f19c9e4d1
Merge from eCos master repository on 1999-05-11-21:11:10-BST
jlarmour
parents:
2
diff
changeset
|
584 |
|
22
53104bbd5f99
Merge from eCos master repository on 1999-07-09-05:47:06-BST
jlarmour
parents:
20
diff
changeset
|
585 // Now change config and wait for host to send us a S(ync) |
|
53104bbd5f99
Merge from eCos master repository on 1999-07-09-05:47:06-BST
jlarmour
parents:
20
diff
changeset
|
586 // character. |
|
53104bbd5f99
Merge from eCos master repository on 1999-07-09-05:47:06-BST
jlarmour
parents:
20
diff
changeset
|
587 // Loop until protocol exchange completed. This may hang (as seen |
|
53104bbd5f99
Merge from eCos master repository on 1999-07-09-05:47:06-BST
jlarmour
parents:
20
diff
changeset
|
588 // from the host), but only when we get totally lost, in which |
|
53104bbd5f99
Merge from eCos master repository on 1999-07-09-05:47:06-BST
jlarmour
parents:
20
diff
changeset
|
589 // case there's not much else to do really. In this case the host |
|
53104bbd5f99
Merge from eCos master repository on 1999-07-09-05:47:06-BST
jlarmour
parents:
20
diff
changeset
|
590 // will consider the test a FAIL. |
|
4
1d7f19c9e4d1
Merge from eCos master repository on 1999-05-11-21:11:10-BST
jlarmour
parents:
2
diff
changeset
|
591 len = sizeof(new_cfg); |
|
1d7f19c9e4d1
Merge from eCos master repository on 1999-05-11-21:11:10-BST
jlarmour
parents:
2
diff
changeset
|
592 res = cyg_io_set_config(handle, CYG_IO_SET_CONFIG_SERIAL_INFO, |
|
1d7f19c9e4d1
Merge from eCos master repository on 1999-05-11-21:11:10-BST
jlarmour
parents:
2
diff
changeset
|
593 &new_cfg, &len); |
|
20
5f5102441818
Merge from eCos master repository on 1999-07-02-23:17:07-BST
jlarmour
parents:
16
diff
changeset
|
594 cyg_thread_delay(10); // Some chips don't like changes to happen to fast... |
|
34
29bc183297e1
Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents:
32
diff
changeset
|
595 if (res != ENOERR) { |
|
29bc183297e1
Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents:
32
diff
changeset
|
596 TEST_CRASH(handle, TEST_CRASH_IO_SET_CFG, |
|
29bc183297e1
Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents:
32
diff
changeset
|
597 "Can't set serial config/2", res); |
|
4
1d7f19c9e4d1
Merge from eCos master repository on 1999-05-11-21:11:10-BST
jlarmour
parents:
2
diff
changeset
|
598 } |
|
1d7f19c9e4d1
Merge from eCos master repository on 1999-05-11-21:11:10-BST
jlarmour
parents:
2
diff
changeset
|
599 |
|
22
53104bbd5f99
Merge from eCos master repository on 1999-07-09-05:47:06-BST
jlarmour
parents:
20
diff
changeset
|
600 { |
|
4
1d7f19c9e4d1
Merge from eCos master repository on 1999-05-11-21:11:10-BST
jlarmour
parents:
2
diff
changeset
|
601 int change_succeeded = 0; |
|
1d7f19c9e4d1
Merge from eCos master repository on 1999-05-11-21:11:10-BST
jlarmour
parents:
2
diff
changeset
|
602 int using_old_config = 0; |
|
1d7f19c9e4d1
Merge from eCos master repository on 1999-05-11-21:11:10-BST
jlarmour
parents:
2
diff
changeset
|
603 char in_buf[1]; |
|
1d7f19c9e4d1
Merge from eCos master repository on 1999-05-11-21:11:10-BST
jlarmour
parents:
2
diff
changeset
|
604 int len; |
|
22
53104bbd5f99
Merge from eCos master repository on 1999-07-09-05:47:06-BST
jlarmour
parents:
20
diff
changeset
|
605 int saw_host_sync; |
|
4
1d7f19c9e4d1
Merge from eCos master repository on 1999-05-11-21:11:10-BST
jlarmour
parents:
2
diff
changeset
|
606 |
|
22
53104bbd5f99
Merge from eCos master repository on 1999-07-09-05:47:06-BST
jlarmour
parents:
20
diff
changeset
|
607 for (;;) { |
|
53104bbd5f99
Merge from eCos master repository on 1999-07-09-05:47:06-BST
jlarmour
parents:
20
diff
changeset
|
608 aborted = 0; // global abort flag |
| 2 | 609 |
|
22
53104bbd5f99
Merge from eCos master repository on 1999-07-09-05:47:06-BST
jlarmour
parents:
20
diff
changeset
|
610 // FIXME: Timeout time needs to be configurable, and needs to |
|
53104bbd5f99
Merge from eCos master repository on 1999-07-09-05:47:06-BST
jlarmour
parents:
20
diff
changeset
|
611 // be sent to the host before getting here. That would allow |
|
53104bbd5f99
Merge from eCos master repository on 1999-07-09-05:47:06-BST
jlarmour
parents:
20
diff
changeset
|
612 // changing the timeout by just rebuilding the test - without |
|
53104bbd5f99
Merge from eCos master repository on 1999-07-09-05:47:06-BST
jlarmour
parents:
20
diff
changeset
|
613 // changing the host software. |
|
53104bbd5f99
Merge from eCos master repository on 1999-07-09-05:47:06-BST
jlarmour
parents:
20
diff
changeset
|
614 saw_host_sync = 0; |
|
53104bbd5f99
Merge from eCos master repository on 1999-07-09-05:47:06-BST
jlarmour
parents:
20
diff
changeset
|
615 r_stamp = timeout(100, do_abort, handle); |
|
53104bbd5f99
Merge from eCos master repository on 1999-07-09-05:47:06-BST
jlarmour
parents:
20
diff
changeset
|
616 while(!aborted) { |
|
53104bbd5f99
Merge from eCos master repository on 1999-07-09-05:47:06-BST
jlarmour
parents:
20
diff
changeset
|
617 len = 1; |
|
53104bbd5f99
Merge from eCos master repository on 1999-07-09-05:47:06-BST
jlarmour
parents:
20
diff
changeset
|
618 in_buf[0] = 0; |
|
53104bbd5f99
Merge from eCos master repository on 1999-07-09-05:47:06-BST
jlarmour
parents:
20
diff
changeset
|
619 res = cyg_io_read(handle, in_buf, &len); |
|
53104bbd5f99
Merge from eCos master repository on 1999-07-09-05:47:06-BST
jlarmour
parents:
20
diff
changeset
|
620 if (ENOERR != res && -EINTR != res) { |
|
53104bbd5f99
Merge from eCos master repository on 1999-07-09-05:47:06-BST
jlarmour
parents:
20
diff
changeset
|
621 // We may have to reset the driver here if the fail |
|
53104bbd5f99
Merge from eCos master repository on 1999-07-09-05:47:06-BST
jlarmour
parents:
20
diff
changeset
|
622 // was due to a framing or parity error. |
|
53104bbd5f99
Merge from eCos master repository on 1999-07-09-05:47:06-BST
jlarmour
parents:
20
diff
changeset
|
623 break; |
|
53104bbd5f99
Merge from eCos master repository on 1999-07-09-05:47:06-BST
jlarmour
parents:
20
diff
changeset
|
624 } |
|
53104bbd5f99
Merge from eCos master repository on 1999-07-09-05:47:06-BST
jlarmour
parents:
20
diff
changeset
|
625 if ('R' == in_buf[0]) { |
|
53104bbd5f99
Merge from eCos master repository on 1999-07-09-05:47:06-BST
jlarmour
parents:
20
diff
changeset
|
626 // Resync - host didn't see our message. Try again. |
|
53104bbd5f99
Merge from eCos master repository on 1999-07-09-05:47:06-BST
jlarmour
parents:
20
diff
changeset
|
627 saw_host_sync = 0; |
|
53104bbd5f99
Merge from eCos master repository on 1999-07-09-05:47:06-BST
jlarmour
parents:
20
diff
changeset
|
628 } else if ('S' == in_buf[0] && !saw_host_sync) { |
|
53104bbd5f99
Merge from eCos master repository on 1999-07-09-05:47:06-BST
jlarmour
parents:
20
diff
changeset
|
629 // In sync - reply to host if we haven't already |
|
53104bbd5f99
Merge from eCos master repository on 1999-07-09-05:47:06-BST
jlarmour
parents:
20
diff
changeset
|
630 char ok_msg[2] = "OK"; |
|
53104bbd5f99
Merge from eCos master repository on 1999-07-09-05:47:06-BST
jlarmour
parents:
20
diff
changeset
|
631 int ok_len = 2; |
|
53104bbd5f99
Merge from eCos master repository on 1999-07-09-05:47:06-BST
jlarmour
parents:
20
diff
changeset
|
632 Tcyg_io_write(handle, ok_msg, &ok_len); |
|
53104bbd5f99
Merge from eCos master repository on 1999-07-09-05:47:06-BST
jlarmour
parents:
20
diff
changeset
|
633 saw_host_sync = 1; |
|
53104bbd5f99
Merge from eCos master repository on 1999-07-09-05:47:06-BST
jlarmour
parents:
20
diff
changeset
|
634 } else if ('D' == in_buf[0] && saw_host_sync) { |
|
53104bbd5f99
Merge from eCos master repository on 1999-07-09-05:47:06-BST
jlarmour
parents:
20
diff
changeset
|
635 // Done - exchange completed. |
|
4
1d7f19c9e4d1
Merge from eCos master repository on 1999-05-11-21:11:10-BST
jlarmour
parents:
2
diff
changeset
|
636 change_succeeded = 1; |
|
1d7f19c9e4d1
Merge from eCos master repository on 1999-05-11-21:11:10-BST
jlarmour
parents:
2
diff
changeset
|
637 break; |
|
1d7f19c9e4d1
Merge from eCos master repository on 1999-05-11-21:11:10-BST
jlarmour
parents:
2
diff
changeset
|
638 } |
|
1d7f19c9e4d1
Merge from eCos master repository on 1999-05-11-21:11:10-BST
jlarmour
parents:
2
diff
changeset
|
639 } |
|
1d7f19c9e4d1
Merge from eCos master repository on 1999-05-11-21:11:10-BST
jlarmour
parents:
2
diff
changeset
|
640 untimeout(r_stamp); |
|
1d7f19c9e4d1
Merge from eCos master repository on 1999-05-11-21:11:10-BST
jlarmour
parents:
2
diff
changeset
|
641 |
|
22
53104bbd5f99
Merge from eCos master repository on 1999-07-09-05:47:06-BST
jlarmour
parents:
20
diff
changeset
|
642 if (change_succeeded) { |
|
53104bbd5f99
Merge from eCos master repository on 1999-07-09-05:47:06-BST
jlarmour
parents:
20
diff
changeset
|
643 // If we had to revert to the old configuration, return error. |
|
53104bbd5f99
Merge from eCos master repository on 1999-07-09-05:47:06-BST
jlarmour
parents:
20
diff
changeset
|
644 if (using_old_config) |
|
53104bbd5f99
Merge from eCos master repository on 1999-07-09-05:47:06-BST
jlarmour
parents:
20
diff
changeset
|
645 return -EIO; |
|
53104bbd5f99
Merge from eCos master repository on 1999-07-09-05:47:06-BST
jlarmour
parents:
20
diff
changeset
|
646 else |
|
53104bbd5f99
Merge from eCos master repository on 1999-07-09-05:47:06-BST
jlarmour
parents:
20
diff
changeset
|
647 return ENOERR; |
|
53104bbd5f99
Merge from eCos master repository on 1999-07-09-05:47:06-BST
jlarmour
parents:
20
diff
changeset
|
648 } |
| 2 | 649 |
|
22
53104bbd5f99
Merge from eCos master repository on 1999-07-09-05:47:06-BST
jlarmour
parents:
20
diff
changeset
|
650 // We didn't synchronize with the host. Due to an IO error? |
|
53104bbd5f99
Merge from eCos master repository on 1999-07-09-05:47:06-BST
jlarmour
parents:
20
diff
changeset
|
651 if (ENOERR != res && -EINTR != res) { |
|
53104bbd5f99
Merge from eCos master repository on 1999-07-09-05:47:06-BST
jlarmour
parents:
20
diff
changeset
|
652 // We may have to reset the driver if the fail was due to |
|
53104bbd5f99
Merge from eCos master repository on 1999-07-09-05:47:06-BST
jlarmour
parents:
20
diff
changeset
|
653 // a framing or parity error. |
|
53104bbd5f99
Merge from eCos master repository on 1999-07-09-05:47:06-BST
jlarmour
parents:
20
diff
changeset
|
654 } |
|
53104bbd5f99
Merge from eCos master repository on 1999-07-09-05:47:06-BST
jlarmour
parents:
20
diff
changeset
|
655 |
|
53104bbd5f99
Merge from eCos master repository on 1999-07-09-05:47:06-BST
jlarmour
parents:
20
diff
changeset
|
656 // Revert to the old configuration and try again. |
|
53104bbd5f99
Merge from eCos master repository on 1999-07-09-05:47:06-BST
jlarmour
parents:
20
diff
changeset
|
657 len = sizeof(old_cfg); |
|
53104bbd5f99
Merge from eCos master repository on 1999-07-09-05:47:06-BST
jlarmour
parents:
20
diff
changeset
|
658 res = cyg_io_set_config(handle, CYG_IO_SET_CONFIG_SERIAL_INFO, |
|
53104bbd5f99
Merge from eCos master repository on 1999-07-09-05:47:06-BST
jlarmour
parents:
20
diff
changeset
|
659 &old_cfg, &len); |
|
53104bbd5f99
Merge from eCos master repository on 1999-07-09-05:47:06-BST
jlarmour
parents:
20
diff
changeset
|
660 cyg_thread_delay(10); // Some chips don't like changes to happen to fast... |
|
53104bbd5f99
Merge from eCos master repository on 1999-07-09-05:47:06-BST
jlarmour
parents:
20
diff
changeset
|
661 if (res != ENOERR) { |
|
34
29bc183297e1
Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents:
32
diff
changeset
|
662 TEST_CRASH(handle, TEST_CRASH_IO_SET_CFG, |
|
29bc183297e1
Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents:
32
diff
changeset
|
663 "Can't set serial config/3", res); |
|
22
53104bbd5f99
Merge from eCos master repository on 1999-07-09-05:47:06-BST
jlarmour
parents:
20
diff
changeset
|
664 } |
|
53104bbd5f99
Merge from eCos master repository on 1999-07-09-05:47:06-BST
jlarmour
parents:
20
diff
changeset
|
665 using_old_config = 1; |
|
4
1d7f19c9e4d1
Merge from eCos master repository on 1999-05-11-21:11:10-BST
jlarmour
parents:
2
diff
changeset
|
666 } |
| 2 | 667 |
|
22
53104bbd5f99
Merge from eCos master repository on 1999-07-09-05:47:06-BST
jlarmour
parents:
20
diff
changeset
|
668 } |
| 2 | 669 } |
| 670 | |
| 671 | |
| 672 //----------------------------------------------------------------------------- | |
| 673 // Host sends CRC in decimal ASCII, terminated with ! | |
| 674 int | |
| 675 read_host_crc(cyg_io_handle_t handle) | |
| 676 { | |
| 677 int crc, len; | |
| 678 cyg_uint8 ch; | |
| 679 | |
| 680 crc = 0; | |
| 681 while (1) { | |
| 682 len = 1; | |
| 683 Tcyg_io_read(handle, &ch, &len); | |
| 684 if ('!' == ch) | |
| 685 break; | |
| 686 | |
| 687 if (!((ch >= '0' && ch <= '9'))){ | |
|
34
29bc183297e1
Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents:
32
diff
changeset
|
688 TEST_CRASH(handle, TEST_CRASH_CRC_CHAR, |
|
29bc183297e1
Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents:
32
diff
changeset
|
689 "Illegal CRC format from host", ch); |
| 2 | 690 } |
| 691 | |
| 692 crc = crc*10 + (ch - '0'); | |
| 693 } | |
| 694 | |
| 695 return crc; | |
| 696 } | |
| 697 | |
| 698 //--------------------------------------------------------------------------- | |
| 699 // Test binary data transmission. | |
| 700 // Format out: | |
| 701 // "@BINARY:<byte size>:<mode>!" | |
| 702 // Format in: | |
| 703 // <checksum>!<#size bytes data> | |
| 704 // For echo modes, also: | |
| 705 // Format out: | |
| 706 // <#size bytes data> | |
| 707 // Format in: | |
| 708 // OK/ER | |
| 709 // Format out: | |
| 710 // DONE | |
| 711 // | |
| 712 // The last DONE allows the host to eat bytes if target is sending too many. | |
| 713 // | |
| 714 // Mode: | |
| 715 // MODE_NO_ECHO: | |
| 716 // Just receive data and verify CRC. | |
| 717 // MODE_EOP_ECHO: | |
| 718 // Receive data, verify CRC, resend data. | |
| 719 // Expect OK/ER reply from host when done. | |
| 720 // MODE_DUPLEX_ECHO: | |
| 721 // Receive data, echo data, verify CRC. | |
| 722 // Expect OK/ER reply from host when done. | |
| 723 // | |
| 724 // Note: | |
| 725 // Using diag_printf while talking with the host may cause some funky | |
| 726 // errors (bytes from the host side being lost!?!?) | |
| 727 // | |
| 728 // To Do: | |
| 729 // MODE_DUPLEX_ECHO: | |
| 730 // The current implementation is simple and may not stress the | |
| 731 // driver enough. Also, it's command packet format doesn't match | |
| 732 // that of the other modes. | |
|
115
6ed91473a1cd
Merge from eCos master repository on 2000-08-21-22:40:54-BST
jlarmour
parents:
108
diff
changeset
|
733 |
| 2 | 734 cyg_test_return_t |
| 735 test_binary(cyg_io_handle_t handle, int size, cyg_mode_t mode) | |
| 736 { | |
| 737 const char cmd[] = "@BINARY:"; | |
| 738 int msglen; | |
| 739 cyg_uint32 xcrc; | |
| 740 int icrc, host_crc; | |
| 741 cyg_uint8 *p1; | |
| 742 cyg_int8 host_status = 'O'; // host is happy by default | |
| 743 | |
| 744 // Verify that the test can be run with available ressources. | |
| 745 if (MODE_EOP_ECHO == mode && size > IN_BUFFER_SIZE) | |
| 746 return TEST_RETURN_NA; | |
| 747 | |
| 748 // Prepare and send the command. | |
| 749 p1 = &cmd_buffer[0]; | |
| 750 p1 = strcpy(p1, &cmd[0]); | |
| 751 p1 = itoa(p1, size); | |
| 752 *p1++ = ':'; | |
| 753 p1 = itoa(p1, mode); | |
| 754 *p1++ = '!'; | |
| 755 *p1++ = 0; | |
| 756 | |
| 757 CYG_TEST_INFO(&cmd_buffer[1]); | |
| 758 | |
| 759 msglen = strlen(&cmd_buffer[0]); | |
| 760 Tcyg_io_write(handle, &cmd_buffer[0], &msglen); | |
| 761 | |
| 762 // Get CRC back. | |
| 763 host_crc = read_host_crc(handle); | |
| 764 | |
| 765 // Depending on mode, start reading data. | |
| 766 xcrc = 0; | |
| 767 switch (mode) { | |
| 768 case MODE_NO_ECHO: | |
| 769 { | |
| 770 // Break transfers into chunks no larger than the buffer size. | |
| 771 int tx_len, chunk_len, i; | |
| 772 while (size > 0) { | |
| 773 chunk_len = min(IN_BUFFER_SIZE, size); | |
| 774 tx_len = chunk_len; | |
| 775 size -= chunk_len; | |
| 776 | |
| 777 Tcyg_io_read(handle, &in_buffer[0], &chunk_len); | |
| 778 | |
| 779 for (i = 0; i < tx_len; i++) { | |
| 780 ADD_CRC_BYTE(xcrc, in_buffer[i]); | |
| 781 } | |
| 782 } | |
| 783 | |
| 784 // Reply that we have completed the test. | |
| 785 { | |
| 786 const char msg_done[] = "DONE"; | |
| 787 | |
| 788 chunk_len = strlen(&msg_done[0]); | |
| 789 Tcyg_io_write(handle, &msg_done[0], &chunk_len); | |
| 790 } | |
| 791 | |
| 792 } | |
| 793 break; | |
| 794 case MODE_EOP_ECHO: | |
| 795 { | |
| 796 // We have already checked that the in buffer is large enough. | |
| 797 int i, tx_len, chunk_len; | |
| 798 chunk_len = tx_len = size; | |
| 799 Tcyg_io_read(handle, &in_buffer[0], &chunk_len); | |
| 800 | |
| 801 for (i = 0; i < tx_len; i++) { | |
| 802 ADD_CRC_BYTE(xcrc, in_buffer[i]); | |
| 803 } | |
|
115
6ed91473a1cd
Merge from eCos master repository on 2000-08-21-22:40:54-BST
jlarmour
parents:
108
diff
changeset
|
804 |
| 2 | 805 // Echo data back. |
| 806 chunk_len = size; | |
| 807 Tcyg_io_write(handle, &in_buffer[0], &chunk_len); | |
| 808 | |
| 809 // Now read host side's status | |
| 810 chunk_len = 2; | |
| 811 Tcyg_io_read(handle, &in_buffer[0], &chunk_len); | |
| 812 host_status = in_buffer[0]; | |
| 813 | |
| 814 // Reply that we have completed the test. | |
| 815 { | |
| 816 const char msg_done[] = "DONE"; | |
| 817 | |
| 818 chunk_len = strlen(&msg_done[0]); | |
| 819 Tcyg_io_write(handle, &msg_done[0], &chunk_len); | |
| 820 } | |
| 821 } | |
| 822 break; | |
| 823 case MODE_DUPLEX_ECHO: | |
| 824 { | |
| 825 int chunk_len; | |
| 826 int block_size = 64; | |
| 827 | |
| 828 // This is a simple implementation (maybe too simple). | |
| 829 // Host sends 4 packets with the same size (64 bytes atm). | |
| 830 // Target echoes in this way: | |
| 831 // packet1 -> packet1 | |
| 832 // packet2 -> packet2, packet2 | |
| 833 // packet3 -> packet3 | |
| 834 // packet4 -> /dev/null | |
| 835 // | |
| 836 // The reads/writes are interleaved in a way that should ensure | |
| 837 // the target out buffer to be full before the target starts to read | |
| 838 // packet3. That is, the target should be both receiving (packet3) | |
| 839 // and sending (packet2) at the same time. | |
| 840 | |
| 841 while (size--) { | |
| 842 // block_size -> block_size | |
| 843 chunk_len = block_size; | |
| 844 Tcyg_io_read(handle, &in_buffer[0], &chunk_len); | |
| 845 chunk_len = block_size; | |
| 846 Tcyg_io_write(handle, &in_buffer[0], &chunk_len); | |
| 847 | |
| 848 // block_size -> 2 x block_size | |
| 849 chunk_len = block_size; | |
| 850 Tcyg_io_read(handle, &in_buffer[0], &chunk_len); | |
| 851 chunk_len = block_size; | |
| 852 Tcyg_io_write(handle, &in_buffer[0], &chunk_len); | |
| 853 chunk_len = block_size; | |
| 854 Tcyg_io_write(handle, &in_buffer[0], &chunk_len); | |
| 855 | |
| 856 // block_size -> block_size | |
| 857 chunk_len = block_size; | |
| 858 Tcyg_io_read(handle, &in_buffer[0], &chunk_len); | |
| 859 chunk_len = block_size; | |
| 860 Tcyg_io_write(handle, &in_buffer[0], &chunk_len); | |
| 861 | |
| 862 // block_size -> 0 | |
| 863 chunk_len = block_size; | |
| 864 Tcyg_io_read(handle, &in_buffer[0], &chunk_len); | |
| 865 } | |
| 866 | |
| 867 // Kill the CRC. Leave packet verification to the host for now. | |
| 868 xcrc = host_crc = 0; | |
| 869 | |
| 870 // Now read host side's status | |
| 871 chunk_len = 2; | |
| 872 Tcyg_io_read(handle, &in_buffer[0], &chunk_len); | |
| 873 host_status = in_buffer[0]; | |
| 874 | |
| 875 // Reply that we have completed the test. | |
| 876 { | |
| 877 const char msg_done[] = "DONE"; | |
| 878 | |
| 879 chunk_len = strlen(&msg_done[0]); | |
| 880 Tcyg_io_write(handle, &msg_done[0], &chunk_len); | |
| 881 } | |
| 882 } | |
| 883 break; | |
| 884 default: | |
|
34
29bc183297e1
Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents:
32
diff
changeset
|
885 TEST_CRASH(handle, TEST_CRASH_PROT_BIN_MODE, |
|
29bc183297e1
Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents:
32
diff
changeset
|
886 "Unknown mode", mode); |
|
29bc183297e1
Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents:
32
diff
changeset
|
887 break; |
| 2 | 888 } |
| 889 | |
| 890 | |
| 891 // Verify that the CRC matches the one from the host. | |
| 892 FIX_CRC(xcrc, icrc); | |
|
34
29bc183297e1
Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents:
32
diff
changeset
|
893 if (host_crc != icrc) { |
|
29bc183297e1
Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents:
32
diff
changeset
|
894 TEST_CRASH(handle, TEST_CRASH_CRC_BAD, |
|
29bc183297e1
Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents:
32
diff
changeset
|
895 "Input CRC failed", icrc, host_crc); |
|
29bc183297e1
Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents:
32
diff
changeset
|
896 } |
| 2 | 897 |
| 898 // Verify that the host is happy with the data we echoed. | |
|
34
29bc183297e1
Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents:
32
diff
changeset
|
899 if ('O' != host_status) { |
|
29bc183297e1
Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents:
32
diff
changeset
|
900 TEST_CRASH(handle, TEST_CRASH_CRC_HOST, |
|
29bc183297e1
Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents:
32
diff
changeset
|
901 "Output CRC failed"); |
|
29bc183297e1
Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents:
32
diff
changeset
|
902 } |
| 2 | 903 |
| 904 CYG_TEST_PASS("Binary test completed"); | |
| 905 return TEST_RETURN_OK; | |
| 906 } | |
| 907 | |
| 908 //--------------------------------------------------------------------------- | |
| 909 // Test transformations on text transmissions | |
| 910 // Format out: | |
| 911 // "@TEXT:<mode>!<4 bytes binary checksum><C string>" | |
| 912 // Format in: | |
| 913 // "<C string>" | |
| 914 // OK/ER | |
| 915 // | |
| 916 // Mode: | |
| 917 // MODE_EOP_ECHO: | |
| 918 // Receive data, verify CRC, resend data. | |
| 919 // Expect OK/ER reply from host when done. | |
| 920 // MODE_DUPLEX_ECHO: | |
| 921 // Receive data, echo data, verify CRC. | |
| 922 // Expect OK/ER reply from host when done. | |
| 923 // | |
| 924 cyg_test_return_t | |
| 925 test_text(cyg_io_handle_t handle, cyg_mode_t mode, const char* s_base, | |
| 926 const char* s_out, const char* s_in) | |
| 927 { | |
| 928 return TEST_RETURN_NA; | |
| 929 } | |
| 930 | |
| 931 //--------------------------------------------------------------------------- | |
| 932 // Send PING to host, verifying the filter's presence. | |
| 933 // Format out: | |
|
34
29bc183297e1
Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents:
32
diff
changeset
|
934 // "@PING:<crash id>!" |
| 2 | 935 // Format in: |
| 936 // "OK" | |
| 937 // or | |
| 938 // No response if directly connected to GDB. | |
| 939 // | |
| 940 // This call only returns if the ser_filter is listening. Otherwise it | |
| 941 // sends N/A and hangs. | |
| 942 void | |
| 943 test_ping(cyg_io_handle_t handle) | |
| 944 { | |
|
34
29bc183297e1
Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents:
32
diff
changeset
|
945 char msg[] = "@PING:" TEST_CRASH_ID "!"; |
| 2 | 946 char msg2[] = "\n"; |
| 947 int msglen = strlen(msg); | |
| 948 int res; | |
| 949 | |
| 950 msglen = strlen(msg); | |
| 951 Tcyg_io_write(handle, msg, &msglen); | |
| 952 | |
| 953 // Now read host side's status | |
| 954 msglen = 2; | |
| 955 Tcyg_io_read_timeout(handle, &in_buffer[0], &msglen, 100, &res); | |
| 956 if (ENOERR == res && 'O' == in_buffer[0] && 'K' == in_buffer[1]) | |
| 957 return; | |
| 958 | |
| 959 msglen = strlen(msg2); | |
| 960 Tcyg_io_write(handle, msg2, &msglen); | |
| 961 | |
| 962 CYG_TEST_NA("No host side testing harness detected."); | |
| 963 } | |
| 964 | |
|
10
d3fbcdfa1b2f
Merge from eCos master repository on 1999-05-29-00:13:11-BST
jlarmour
parents:
6
diff
changeset
|
965 |
|
d3fbcdfa1b2f
Merge from eCos master repository on 1999-05-29-00:13:11-BST
jlarmour
parents:
6
diff
changeset
|
966 //--------------------------------------------------------------------------- |
|
d3fbcdfa1b2f
Merge from eCos master repository on 1999-05-29-00:13:11-BST
jlarmour
parents:
6
diff
changeset
|
967 // Send OPT to host, setting options in the filter. |
|
d3fbcdfa1b2f
Merge from eCos master repository on 1999-05-29-00:13:11-BST
jlarmour
parents:
6
diff
changeset
|
968 // Format out: |
|
d3fbcdfa1b2f
Merge from eCos master repository on 1999-05-29-00:13:11-BST
jlarmour
parents:
6
diff
changeset
|
969 // "@OPT:option1,value1:...:optionN,valueN!" |
|
d3fbcdfa1b2f
Merge from eCos master repository on 1999-05-29-00:13:11-BST
jlarmour
parents:
6
diff
changeset
|
970 // Format in: |
|
d3fbcdfa1b2f
Merge from eCos master repository on 1999-05-29-00:13:11-BST
jlarmour
parents:
6
diff
changeset
|
971 // "OK" |
|
d3fbcdfa1b2f
Merge from eCos master repository on 1999-05-29-00:13:11-BST
jlarmour
parents:
6
diff
changeset
|
972 // |
|
d3fbcdfa1b2f
Merge from eCos master repository on 1999-05-29-00:13:11-BST
jlarmour
parents:
6
diff
changeset
|
973 // Only integer values can be used. Any option not recognized by the |
|
d3fbcdfa1b2f
Merge from eCos master repository on 1999-05-29-00:13:11-BST
jlarmour
parents:
6
diff
changeset
|
974 // filter will be silently ignored. |
|
d3fbcdfa1b2f
Merge from eCos master repository on 1999-05-29-00:13:11-BST
jlarmour
parents:
6
diff
changeset
|
975 void |
|
d3fbcdfa1b2f
Merge from eCos master repository on 1999-05-29-00:13:11-BST
jlarmour
parents:
6
diff
changeset
|
976 test_options(cyg_io_handle_t handle, int count, cyg_uint32* options) |
|
d3fbcdfa1b2f
Merge from eCos master repository on 1999-05-29-00:13:11-BST
jlarmour
parents:
6
diff
changeset
|
977 { |
|
d3fbcdfa1b2f
Merge from eCos master repository on 1999-05-29-00:13:11-BST
jlarmour
parents:
6
diff
changeset
|
978 const char cmd[] = "@OPT:"; |
|
d3fbcdfa1b2f
Merge from eCos master repository on 1999-05-29-00:13:11-BST
jlarmour
parents:
6
diff
changeset
|
979 int msglen; |
|
d3fbcdfa1b2f
Merge from eCos master repository on 1999-05-29-00:13:11-BST
jlarmour
parents:
6
diff
changeset
|
980 cyg_uint8 *p1; |
|
d3fbcdfa1b2f
Merge from eCos master repository on 1999-05-29-00:13:11-BST
jlarmour
parents:
6
diff
changeset
|
981 |
|
d3fbcdfa1b2f
Merge from eCos master repository on 1999-05-29-00:13:11-BST
jlarmour
parents:
6
diff
changeset
|
982 // Prepare and send the command. |
|
d3fbcdfa1b2f
Merge from eCos master repository on 1999-05-29-00:13:11-BST
jlarmour
parents:
6
diff
changeset
|
983 p1 = &cmd_buffer[0]; |
|
d3fbcdfa1b2f
Merge from eCos master repository on 1999-05-29-00:13:11-BST
jlarmour
parents:
6
diff
changeset
|
984 p1 = strcpy(p1, &cmd[0]); |
|
d3fbcdfa1b2f
Merge from eCos master repository on 1999-05-29-00:13:11-BST
jlarmour
parents:
6
diff
changeset
|
985 while(count--) { |
|
d3fbcdfa1b2f
Merge from eCos master repository on 1999-05-29-00:13:11-BST
jlarmour
parents:
6
diff
changeset
|
986 p1 = itoa(p1, *options++); // option |
|
d3fbcdfa1b2f
Merge from eCos master repository on 1999-05-29-00:13:11-BST
jlarmour
parents:
6
diff
changeset
|
987 *p1++ = ':'; |
|
d3fbcdfa1b2f
Merge from eCos master repository on 1999-05-29-00:13:11-BST
jlarmour
parents:
6
diff
changeset
|
988 p1 = itoa(p1, *options++); // value |
|
d3fbcdfa1b2f
Merge from eCos master repository on 1999-05-29-00:13:11-BST
jlarmour
parents:
6
diff
changeset
|
989 *p1++ = ':'; |
|
d3fbcdfa1b2f
Merge from eCos master repository on 1999-05-29-00:13:11-BST
jlarmour
parents:
6
diff
changeset
|
990 } |
|
d3fbcdfa1b2f
Merge from eCos master repository on 1999-05-29-00:13:11-BST
jlarmour
parents:
6
diff
changeset
|
991 *(p1-1) = '!'; |
|
d3fbcdfa1b2f
Merge from eCos master repository on 1999-05-29-00:13:11-BST
jlarmour
parents:
6
diff
changeset
|
992 *p1++ = 0; |
|
d3fbcdfa1b2f
Merge from eCos master repository on 1999-05-29-00:13:11-BST
jlarmour
parents:
6
diff
changeset
|
993 |
|
d3fbcdfa1b2f
Merge from eCos master repository on 1999-05-29-00:13:11-BST
jlarmour
parents:
6
diff
changeset
|
994 CYG_TEST_INFO(&cmd_buffer[1]); |
|
d3fbcdfa1b2f
Merge from eCos master repository on 1999-05-29-00:13:11-BST
jlarmour
parents:
6
diff
changeset
|
995 |
|
d3fbcdfa1b2f
Merge from eCos master repository on 1999-05-29-00:13:11-BST
jlarmour
parents:
6
diff
changeset
|
996 msglen = strlen(&cmd_buffer[0]); |
|
d3fbcdfa1b2f
Merge from eCos master repository on 1999-05-29-00:13:11-BST
jlarmour
parents:
6
diff
changeset
|
997 Tcyg_io_write(handle, &cmd_buffer[0], &msglen); |
|
d3fbcdfa1b2f
Merge from eCos master repository on 1999-05-29-00:13:11-BST
jlarmour
parents:
6
diff
changeset
|
998 |
|
d3fbcdfa1b2f
Merge from eCos master repository on 1999-05-29-00:13:11-BST
jlarmour
parents:
6
diff
changeset
|
999 // Now read host side's status |
|
d3fbcdfa1b2f
Merge from eCos master repository on 1999-05-29-00:13:11-BST
jlarmour
parents:
6
diff
changeset
|
1000 msglen = 2; |
|
d3fbcdfa1b2f
Merge from eCos master repository on 1999-05-29-00:13:11-BST
jlarmour
parents:
6
diff
changeset
|
1001 Tcyg_io_read(handle, &in_buffer[0], &msglen); |
|
d3fbcdfa1b2f
Merge from eCos master repository on 1999-05-29-00:13:11-BST
jlarmour
parents:
6
diff
changeset
|
1002 } |
|
d3fbcdfa1b2f
Merge from eCos master repository on 1999-05-29-00:13:11-BST
jlarmour
parents:
6
diff
changeset
|
1003 |
|
d3fbcdfa1b2f
Merge from eCos master repository on 1999-05-29-00:13:11-BST
jlarmour
parents:
6
diff
changeset
|
1004 |
| 2 | 1005 //--------------------------------------------------------------------------- |
| 1006 // Some helper functions to get a test started. | |
| 1007 void | |
| 1008 test_open_ser( cyg_io_handle_t* handle ) | |
| 1009 { | |
|
126
518f42066aba
Merge from eCos master repository on 2000-09-19-06:25:26-BST
jlarmour
parents:
124
diff
changeset
|
1010 #if defined(CYGPKG_IO_SERIAL_DEVICES) && !defined(SER_NOP_TEST) |
| 2 | 1011 Cyg_ErrNo res; |
| 1012 | |
| 1013 if (cyg_test_is_simulator) | |
| 1014 CYG_TEST_NA("Cannot run from simulator"); | |
| 1015 | |
| 1016 #if defined(HAL_VSR_SET_TO_ECOS_HANDLER) | |
|
130
eb9fd8c04db3
Merge from eCos master repository on 2000-10-23-17:01:37-BST
jlarmour
parents:
128
diff
changeset
|
1017 # if defined(CYGPRI_SER_TEST_OVERRIDE_INT_1) |
|
eb9fd8c04db3
Merge from eCos master repository on 2000-10-23-17:01:37-BST
jlarmour
parents:
128
diff
changeset
|
1018 HAL_VSR_SET_TO_ECOS_HANDLER(CYGPRI_SER_TEST_OVERRIDE_INT_1, NULL); |
| 2 | 1019 # endif |
|
130
eb9fd8c04db3
Merge from eCos master repository on 2000-10-23-17:01:37-BST
jlarmour
parents:
128
diff
changeset
|
1020 # if defined(CYGPRI_SER_TEST_OVERRIDE_INT_2) |
|
eb9fd8c04db3
Merge from eCos master repository on 2000-10-23-17:01:37-BST
jlarmour
parents:
128
diff
changeset
|
1021 HAL_VSR_SET_TO_ECOS_HANDLER(CYGPRI_SER_TEST_OVERRIDE_INT_2, NULL); |
| 2 | 1022 # endif |
| 1023 #endif | |
| 1024 | |
| 1025 res = cyg_io_lookup(TEST_SER_DEV, handle); | |
| 1026 if (res != ENOERR) { | |
| 1027 CYG_TEST_FAIL_FINISH("Can't lookup " TEST_SER_DEV); | |
| 1028 } | |
| 1029 #else | |
|
4
1d7f19c9e4d1
Merge from eCos master repository on 1999-05-11-21:11:10-BST
jlarmour
parents:
2
diff
changeset
|
1030 CYG_TEST_NA(NA_MSG); |
| 2 | 1031 #endif |
| 1032 } | |
| 1033 | |
| 1034 void | |
| 1035 test_open_tty( cyg_io_handle_t* handle ) | |
| 1036 { | |
|
126
518f42066aba
Merge from eCos master repository on 2000-09-19-06:25:26-BST
jlarmour
parents:
124
diff
changeset
|
1037 #if defined(CYGPKG_IO_SERIAL_TTY) && !defined(TTY_NOP_TEST) |
| 2 | 1038 Cyg_ErrNo res; |
| 1039 | |
| 1040 if (cyg_test_is_simulator) | |
| 1041 CYG_TEST_NA("Cannot run from simulator"); | |
| 1042 | |
| 1043 #if defined(HAL_VSR_SET_TO_ECOS_HANDLER) | |
|
130
eb9fd8c04db3
Merge from eCos master repository on 2000-10-23-17:01:37-BST
jlarmour
parents:
128
diff
changeset
|
1044 # if defined(CYGPRI_SER_TEST_OVERRIDE_INT_1) |
|
eb9fd8c04db3
Merge from eCos master repository on 2000-10-23-17:01:37-BST
jlarmour
parents:
128
diff
changeset
|
1045 HAL_VSR_SET_TO_ECOS_HANDLER(CYGPRI_SER_TEST_OVERRIDE_INT_1, NULL); |
| 2 | 1046 # endif |
|
130
eb9fd8c04db3
Merge from eCos master repository on 2000-10-23-17:01:37-BST
jlarmour
parents:
128
diff
changeset
|
1047 # if defined(CYGPRI_SER_TEST_OVERRIDE_INT_2) |
|
eb9fd8c04db3
Merge from eCos master repository on 2000-10-23-17:01:37-BST
jlarmour
parents:
128
diff
changeset
|
1048 HAL_VSR_SET_TO_ECOS_HANDLER(CYGPRI_SER_TEST_OVERRIDE_INT_2, NULL); |
| 2 | 1049 # endif |
| 1050 #endif | |
| 1051 | |
| 1052 res = cyg_io_lookup(TEST_TTY_DEV, handle); | |
| 1053 if (res != ENOERR) { | |
| 1054 CYG_TEST_FAIL_FINISH("Can't lookup " TEST_TTY_DEV); | |
| 1055 } | |
| 1056 #else | |
|
4
1d7f19c9e4d1
Merge from eCos master repository on 1999-05-11-21:11:10-BST
jlarmour
parents:
2
diff
changeset
|
1057 CYG_TEST_NA(NA_MSG); |
| 2 | 1058 #endif |
| 1059 } | |
| 1060 | |
| 1061 //--------------------------------------------------------------------------- | |
| 1062 // end of ser_test_protocol.inl |