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