annotate packages/io/serial/current/src/common/serial.c @ 107:7f461c3a372c

Merge from eCos master repository on 2000-07-04-08:04:30-BST
author jlarmour
date Tue, 04 Jul 2000 07:34:17 +0000
parents afdeb44241de
children 6ed91473a1cd
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
1 //==========================================================================
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
2 //
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
3 // io/serial/common/serial.c
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
4 //
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
5 // High level serial driver
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
6 //
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
7 //==========================================================================
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
8 //####COPYRIGHTBEGIN####
64
c38311975d4f Merge from eCos master repository on 2000-01-28-04:28:11-GMT
jlarmour
parents: 62
diff changeset
9 //
c38311975d4f Merge from eCos master repository on 2000-01-28-04:28:11-GMT
jlarmour
parents: 62
diff changeset
10 // -------------------------------------------
c38311975d4f Merge from eCos master repository on 2000-01-28-04:28:11-GMT
jlarmour
parents: 62
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: 62
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: 62
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: 62
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: 62
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: 62
diff changeset
19 // the License.
c38311975d4f Merge from eCos master repository on 2000-01-28-04:28:11-GMT
jlarmour
parents: 62
diff changeset
20 //
c38311975d4f Merge from eCos master repository on 2000-01-28-04:28:11-GMT
jlarmour
parents: 62
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: 62
diff changeset
22 // released September 30, 1998.
c38311975d4f Merge from eCos master repository on 2000-01-28-04:28:11-GMT
jlarmour
parents: 62
diff changeset
23 //
c38311975d4f Merge from eCos master repository on 2000-01-28-04:28:11-GMT
jlarmour
parents: 62
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: 62
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: 62
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: 62
diff changeset
27 // All Rights Reserved.
c38311975d4f Merge from eCos master repository on 2000-01-28-04:28:11-GMT
jlarmour
parents: 62
diff changeset
28 // -------------------------------------------
c38311975d4f Merge from eCos master repository on 2000-01-28-04:28:11-GMT
jlarmour
parents: 62
diff changeset
29 //
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
30 //####COPYRIGHTEND####
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
31 //==========================================================================
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
32 //#####DESCRIPTIONBEGIN####
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
33 //
86
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
34 // Author(s): gthomas
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
35 // Contributors: gthomas, grante
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
36 // Date: 1999-02-04
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
37 // Purpose: Top level serial driver
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
38 // Description:
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
39 //
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
40 //####DESCRIPTIONEND####
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
41 //
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
42 //==========================================================================
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
43
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
44 #include <pkgconf/io.h>
86
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
45 #include <pkgconf/io_serial.h>
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
46
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
47 #include <cyg/io/io.h>
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
48 #include <cyg/io/devtab.h>
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
49 #include <cyg/io/serial.h>
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
50 #include <cyg/infra/diag.h>
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
51
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
52 static Cyg_ErrNo serial_write(cyg_io_handle_t handle, const void *buf, cyg_uint32 *len);
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
53 static Cyg_ErrNo serial_read(cyg_io_handle_t handle, void *buf, cyg_uint32 *len);
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
54 static Cyg_ErrNo serial_get_config(cyg_io_handle_t handle, cyg_uint32 key, void *buf, cyg_uint32 *len);
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
55 static Cyg_ErrNo serial_set_config(cyg_io_handle_t handle, cyg_uint32 key, const void *buf, cyg_uint32 *len);
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
56
62
7a6ac9edc838 Merge from eCos master repository on 2000-01-24-19:43:49-GMT
jlarmour
parents: 20
diff changeset
57 DEVIO_TABLE(cyg_io_serial_devio,
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
58 serial_write,
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
59 serial_read,
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
60 serial_get_config,
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
61 serial_set_config
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
62 );
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
63
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
64 static void serial_init(serial_channel *chan);
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
65 static void serial_xmt_char(serial_channel *chan);
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
66 static void serial_rcv_char(serial_channel *chan, unsigned char c);
86
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
67 #ifdef CYGINT_IO_SERIAL_BLOCK_TRANSFER
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
68 static bool serial_data_rcv_req(serial_channel *chan, int avail,
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
69 int* space_avail, unsigned char** space);
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
70 static void serial_data_rcv_done(serial_channel *chan);
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
71 static bool serial_data_xmt_req(serial_channel *chan, int space,
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
72 int* chars_avail, unsigned char** chars);
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
73 static void serial_data_xmt_done(serial_channel *chan);
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
74 SERIAL_CALLBACKS(cyg_io_serial_callbacks,
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
75 serial_init,
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
76 serial_xmt_char,
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
77 serial_rcv_char,
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
78 serial_data_rcv_req,
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
79 serial_data_rcv_done,
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
80 serial_data_xmt_req,
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
81 serial_data_xmt_done);
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
82 #else
62
7a6ac9edc838 Merge from eCos master repository on 2000-01-24-19:43:49-GMT
jlarmour
parents: 20
diff changeset
83 SERIAL_CALLBACKS(cyg_io_serial_callbacks,
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
84 serial_init,
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
85 serial_xmt_char,
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
86 serial_rcv_char);
86
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
87 #endif
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
88
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
89
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
90 static void
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
91 serial_init(serial_channel *chan)
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
92 {
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
93 if (chan->init) return;
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
94 if (chan->out_cbuf.len != 0) {
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
95 #ifdef CYGDBG_IO_INIT
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
96 diag_printf("Set output buffer - buf: %x len: %d\n", chan->out_cbuf.data, chan->out_cbuf.len);
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
97 #endif
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
98 chan->out_cbuf.waiting = false;
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
99 chan->out_cbuf.abort = false;
86
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
100 #ifdef CYGOPT_IO_SERIAL_SUPPORT_NONBLOCKING
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
101 chan->out_cbuf.blocking = true;
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
102 #endif
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
103 chan->out_cbuf.pending = 0;
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
104 cyg_drv_mutex_init(&chan->out_cbuf.lock);
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
105 cyg_drv_cond_init(&chan->out_cbuf.wait, &chan->out_cbuf.lock);
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
106 chan->out_cbuf.low_water = chan->out_cbuf.len / 4;
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
107 }
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
108 if (chan->in_cbuf.len != 0) {
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
109 #ifdef CYGDBG_IO_INIT
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
110 diag_printf("Set input buffer - buf: %x len: %d\n", chan->in_cbuf.data, chan->in_cbuf.len);
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
111 #endif
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
112 chan->in_cbuf.waiting = false;
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
113 chan->in_cbuf.abort = false;
86
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
114 #ifdef CYGOPT_IO_SERIAL_SUPPORT_NONBLOCKING
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
115 chan->in_cbuf.blocking = true;
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
116 #endif
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
117 cyg_drv_mutex_init(&chan->in_cbuf.lock);
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
118 cyg_drv_cond_init(&chan->in_cbuf.wait, &chan->in_cbuf.lock);
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
119 }
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
120 chan->init = true;
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
121 }
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
122
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
123 static Cyg_ErrNo
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
124 serial_write(cyg_io_handle_t handle, const void *_buf, cyg_uint32 *len)
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
125 {
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
126 cyg_devtab_entry_t *t = (cyg_devtab_entry_t *)handle;
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
127 serial_channel *chan = (serial_channel *)t->priv;
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
128 serial_funs *funs = chan->funs;
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
129 cyg_int32 size = *len;
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
130 cyg_uint8 *buf = (cyg_uint8 *)_buf;
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
131 int next;
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
132 cbuf_t *cbuf = &chan->out_cbuf;
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
133 Cyg_ErrNo res = ENOERR;
20
5f5102441818 Merge from eCos master repository on 1999-07-02-23:17:07-BST
jlarmour
parents: 4
diff changeset
134
4
1d7f19c9e4d1 Merge from eCos master repository on 1999-05-11-21:11:10-BST
jlarmour
parents: 2
diff changeset
135 cbuf->abort = false;
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
136 cyg_drv_mutex_lock(&cbuf->lock);
86
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
137
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
138 if (cbuf->len == 0) {
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
139 // Non interrupt driven (i.e. polled) operation
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
140 while (size-- > 0) {
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
141 while ((funs->putc)(chan, *buf) == false) ; // Ignore full, keep trying
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
142 buf++;
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
143 }
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
144 } else {
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
145 cyg_drv_dsr_lock(); // Avoid race condition testing pointers
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
146 while (size > 0) {
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
147 next = cbuf->put + 1;
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
148 if (next == cbuf->len) next = 0;
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
149 if (next == cbuf->get) {
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
150 cbuf->waiting = true;
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
151 // Buffer full - wait for space
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
152 (funs->start_xmit)(chan); // Make sure xmit is running
86
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
153 // Check flag: 'start_xmit' may have obviated the need to wait :-)
62
7a6ac9edc838 Merge from eCos master repository on 2000-01-24-19:43:49-GMT
jlarmour
parents: 20
diff changeset
154 if (cbuf->waiting) {
86
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
155 #ifdef CYGOPT_IO_SERIAL_SUPPORT_NONBLOCKING
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
156 // Optionally return if configured for non-blocking mode.
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
157 if (!cbuf->blocking) {
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
158 *len -= size; // number of characters actually sent
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
159 cbuf->waiting = false;
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
160 res = -EAGAIN;
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
161 break;
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
162 }
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
163 #endif // CYGOPT_IO_SERIAL_SUPPORT_NONBLOCKING
62
7a6ac9edc838 Merge from eCos master repository on 2000-01-24-19:43:49-GMT
jlarmour
parents: 20
diff changeset
164 cbuf->pending += size; // Have this much more to send [eventually]
7a6ac9edc838 Merge from eCos master repository on 2000-01-24-19:43:49-GMT
jlarmour
parents: 20
diff changeset
165 cyg_drv_cond_wait(&cbuf->wait);
7a6ac9edc838 Merge from eCos master repository on 2000-01-24-19:43:49-GMT
jlarmour
parents: 20
diff changeset
166 cbuf->pending -= size;
7a6ac9edc838 Merge from eCos master repository on 2000-01-24-19:43:49-GMT
jlarmour
parents: 20
diff changeset
167 }
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
168 if (cbuf->abort) {
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
169 // Give up!
86
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
170 *len -= size; // number of characters actually sent
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
171 cbuf->abort = false;
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
172 cbuf->waiting = false;
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
173 res = -EINTR;
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
174 break;
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
175 }
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
176 } else {
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
177 cbuf->data[cbuf->put++] = *buf++;
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
178 cbuf->put = next;
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
179 size--; // Only count if actually sent!
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
180 }
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
181 }
82
6736c52df507 Merge from eCos master repository on 2000-04-14-13:35:46-BST
jlarmour
parents: 66
diff changeset
182 (funs->start_xmit)(chan); // Start output as necessary
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
183 cyg_drv_dsr_unlock();
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
184 }
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
185 cyg_drv_mutex_unlock(&cbuf->lock);
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
186 return res;
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
187 }
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
188
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
189 static Cyg_ErrNo
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
190 serial_read(cyg_io_handle_t handle, void *_buf, cyg_uint32 *len)
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
191 {
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
192 cyg_devtab_entry_t *t = (cyg_devtab_entry_t *)handle;
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
193 serial_channel *chan = (serial_channel *)t->priv;
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
194 serial_funs *funs = chan->funs;
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
195 cyg_uint8 *buf = (cyg_uint8 *)_buf;
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
196 cyg_int32 size = 0;
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
197 cbuf_t *cbuf = &chan->in_cbuf;
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
198 Cyg_ErrNo res = ENOERR;
20
5f5102441818 Merge from eCos master repository on 1999-07-02-23:17:07-BST
jlarmour
parents: 4
diff changeset
199 #ifdef XX_CYGDBG_DIAG_BUF
5f5102441818 Merge from eCos master repository on 1999-07-02-23:17:07-BST
jlarmour
parents: 4
diff changeset
200 extern int enable_diag_uart;
5f5102441818 Merge from eCos master repository on 1999-07-02-23:17:07-BST
jlarmour
parents: 4
diff changeset
201 int _enable = enable_diag_uart;
5f5102441818 Merge from eCos master repository on 1999-07-02-23:17:07-BST
jlarmour
parents: 4
diff changeset
202 int _time, _stime;
5f5102441818 Merge from eCos master repository on 1999-07-02-23:17:07-BST
jlarmour
parents: 4
diff changeset
203 externC cyg_tick_count_t cyg_current_time(void);
5f5102441818 Merge from eCos master repository on 1999-07-02-23:17:07-BST
jlarmour
parents: 4
diff changeset
204 #endif // CYGDBG_DIAG_BUF
5f5102441818 Merge from eCos master repository on 1999-07-02-23:17:07-BST
jlarmour
parents: 4
diff changeset
205
4
1d7f19c9e4d1 Merge from eCos master repository on 1999-05-11-21:11:10-BST
jlarmour
parents: 2
diff changeset
206 cbuf->abort = false;
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
207 cyg_drv_mutex_lock(&cbuf->lock);
86
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
208
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
209 if (cbuf->len == 0) {
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
210 // Non interrupt driven (i.e. polled) operation
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
211 while (size++ < *len) {
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
212 *buf++ = (funs->getc)(chan);
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
213 }
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
214 } else {
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
215 cyg_drv_dsr_lock(); // Avoid races
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
216 while (size < *len) {
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
217 if (cbuf->get != cbuf->put) {
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
218 *buf++ = cbuf->data[cbuf->get];
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
219 if (++cbuf->get == cbuf->len) cbuf->get = 0;
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
220 size++;
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
221 } else {
86
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
222 #ifdef CYGOPT_IO_SERIAL_SUPPORT_NONBLOCKING
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
223 if (!cbuf->blocking) {
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
224 *len = size; // characters actually read
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
225 res = -EAGAIN;
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
226 break;
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
227 }
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
228 #endif // CYGOPT_IO_SERIAL_SUPPORT_NONBLOCKING
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
229 cbuf->waiting = true;
20
5f5102441818 Merge from eCos master repository on 1999-07-02-23:17:07-BST
jlarmour
parents: 4
diff changeset
230 #ifdef XX_CYGDBG_DIAG_BUF
5f5102441818 Merge from eCos master repository on 1999-07-02-23:17:07-BST
jlarmour
parents: 4
diff changeset
231 enable_diag_uart = 0;
5f5102441818 Merge from eCos master repository on 1999-07-02-23:17:07-BST
jlarmour
parents: 4
diff changeset
232 HAL_CLOCK_READ(&_time);
5f5102441818 Merge from eCos master repository on 1999-07-02-23:17:07-BST
jlarmour
parents: 4
diff changeset
233 _stime = (int)cyg_current_time();
5f5102441818 Merge from eCos master repository on 1999-07-02-23:17:07-BST
jlarmour
parents: 4
diff changeset
234 diag_printf("READ wait - get: %d, put: %d, time: %x.%x\n", cbuf->get, cbuf->put, _stime, _time);
5f5102441818 Merge from eCos master repository on 1999-07-02-23:17:07-BST
jlarmour
parents: 4
diff changeset
235 enable_diag_uart = _enable;
5f5102441818 Merge from eCos master repository on 1999-07-02-23:17:07-BST
jlarmour
parents: 4
diff changeset
236 #endif // CYGDBG_DIAG_BUF
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
237 cyg_drv_cond_wait(&cbuf->wait);
20
5f5102441818 Merge from eCos master repository on 1999-07-02-23:17:07-BST
jlarmour
parents: 4
diff changeset
238 #ifdef XX_CYGDBG_DIAG_BUF
5f5102441818 Merge from eCos master repository on 1999-07-02-23:17:07-BST
jlarmour
parents: 4
diff changeset
239 enable_diag_uart = 0;
5f5102441818 Merge from eCos master repository on 1999-07-02-23:17:07-BST
jlarmour
parents: 4
diff changeset
240 HAL_CLOCK_READ(&_time);
5f5102441818 Merge from eCos master repository on 1999-07-02-23:17:07-BST
jlarmour
parents: 4
diff changeset
241 _stime = (int)cyg_current_time();
5f5102441818 Merge from eCos master repository on 1999-07-02-23:17:07-BST
jlarmour
parents: 4
diff changeset
242 diag_printf("READ continue - get: %d, put: %d, time: %x.%x\n", cbuf->get, cbuf->put, _stime, _time);
5f5102441818 Merge from eCos master repository on 1999-07-02-23:17:07-BST
jlarmour
parents: 4
diff changeset
243 enable_diag_uart = _enable;
5f5102441818 Merge from eCos master repository on 1999-07-02-23:17:07-BST
jlarmour
parents: 4
diff changeset
244 #endif // CYGDBG_DIAG_BUF
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
245 if (cbuf->abort) {
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
246 // Give up!
86
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
247 *len = size; // characters actually read
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
248 cbuf->abort = false;
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
249 cbuf->waiting = false;
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
250 res = -EINTR;
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
251 break;
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
252 }
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
253 }
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
254 }
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
255 cyg_drv_dsr_unlock();
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
256 }
82
6736c52df507 Merge from eCos master repository on 2000-04-14-13:35:46-BST
jlarmour
parents: 66
diff changeset
257 #ifdef XX_CYGDBG_DIAG_BUF
20
5f5102441818 Merge from eCos master repository on 1999-07-02-23:17:07-BST
jlarmour
parents: 4
diff changeset
258 cyg_drv_isr_lock();
82
6736c52df507 Merge from eCos master repository on 2000-04-14-13:35:46-BST
jlarmour
parents: 66
diff changeset
259 enable_diag_uart = 0;
6736c52df507 Merge from eCos master repository on 2000-04-14-13:35:46-BST
jlarmour
parents: 66
diff changeset
260 HAL_CLOCK_READ(&_time);
6736c52df507 Merge from eCos master repository on 2000-04-14-13:35:46-BST
jlarmour
parents: 66
diff changeset
261 _stime = (int)cyg_current_time();
6736c52df507 Merge from eCos master repository on 2000-04-14-13:35:46-BST
jlarmour
parents: 66
diff changeset
262 diag_printf("READ done - size: %d, len: %d, time: %x.%x\n", size, *len, _stime, _time);
6736c52df507 Merge from eCos master repository on 2000-04-14-13:35:46-BST
jlarmour
parents: 66
diff changeset
263 enable_diag_uart = _enable;
6736c52df507 Merge from eCos master repository on 2000-04-14-13:35:46-BST
jlarmour
parents: 66
diff changeset
264 cyg_drv_isr_unlock();
20
5f5102441818 Merge from eCos master repository on 1999-07-02-23:17:07-BST
jlarmour
parents: 4
diff changeset
265 #endif // CYGDBG_DIAG_BUF
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
266 cyg_drv_mutex_unlock(&cbuf->lock);
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
267 return res;
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
268 }
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
269
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
270 static Cyg_ErrNo
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
271 serial_get_config(cyg_io_handle_t handle, cyg_uint32 key, void *xbuf, cyg_uint32 *len)
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
272 {
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
273 cyg_devtab_entry_t *t = (cyg_devtab_entry_t *)handle;
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
274 serial_channel *chan = (serial_channel *)t->priv;
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
275 cyg_serial_info_t *buf = (cyg_serial_info_t *)xbuf;
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
276 Cyg_ErrNo res = ENOERR;
86
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
277 cbuf_t *out_cbuf = &chan->out_cbuf;
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
278 cbuf_t *in_cbuf = &chan->in_cbuf;
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
279 serial_funs *funs = chan->funs;
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
280
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
281 switch (key) {
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
282 case CYG_IO_GET_CONFIG_SERIAL_INFO:
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
283 if (*len < sizeof(cyg_serial_info_t)) {
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
284 return -EINVAL;
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
285 }
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
286 *buf = chan->config;
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
287 *len = sizeof(chan->config);
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
288 break;
86
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
289
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
290 case CYG_IO_GET_CONFIG_SERIAL_BUFFER_INFO:
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
291 // return rx/tx buffer sizes and counts
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
292 {
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
293 cyg_serial_buf_info_t *p;
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
294 if (*len < sizeof(cyg_serial_buf_info_t))
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
295 return -EINVAL;
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
296
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
297 *len = sizeof(cyg_serial_buf_info_t);
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
298 p = (cyg_serial_buf_info_t *)xbuf;
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
299
88
afdeb44241de Merge from eCos master repository on 2000-05-12-07:47:04-BST
jlarmour
parents: 86
diff changeset
300 p->rx_bufsize = in_cbuf->len;
86
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
301 if (p->rx_bufsize) {
88
afdeb44241de Merge from eCos master repository on 2000-05-12-07:47:04-BST
jlarmour
parents: 86
diff changeset
302 p->rx_count = in_cbuf->put - in_cbuf->get;
86
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
303 if (p->rx_count < 0)
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
304 p->rx_count += p->rx_bufsize;
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
305 }
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
306 else
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
307 p->rx_count = 0;
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
308
88
afdeb44241de Merge from eCos master repository on 2000-05-12-07:47:04-BST
jlarmour
parents: 86
diff changeset
309 p->tx_bufsize = out_cbuf->len;
86
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
310 if (p->tx_bufsize) {
88
afdeb44241de Merge from eCos master repository on 2000-05-12-07:47:04-BST
jlarmour
parents: 86
diff changeset
311 p->tx_count = out_cbuf->put - out_cbuf->get;
86
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
312 if (p->tx_count < 0)
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
313 p->tx_count += p->tx_bufsize;
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
314 }
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
315 else
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
316 p->tx_count = 0;
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
317 }
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
318 break;
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
319
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
320 case CYG_IO_GET_CONFIG_SERIAL_OUTPUT_DRAIN:
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
321 // Wait for any pending output to complete
86
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
322 if (out_cbuf->len == 0) break; // Nothing to do if not buffered
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
323 cyg_drv_mutex_lock(&out_cbuf->lock); // Stop any further output processing
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
324 cyg_drv_dsr_lock();
86
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
325 while (out_cbuf->pending || (out_cbuf->get != out_cbuf->put)) {
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
326 out_cbuf->waiting = true;
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
327 cyg_drv_cond_wait(&out_cbuf->wait);
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
328 }
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
329 cyg_drv_dsr_unlock();
86
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
330 cyg_drv_mutex_unlock(&out_cbuf->lock);
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
331 break;
86
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
332
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
333 case CYG_IO_GET_CONFIG_SERIAL_INPUT_FLUSH:
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
334 // Flush any buffered input
86
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
335 if (in_cbuf->len == 0) break; // Nothing to do if not buffered
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
336 cyg_drv_mutex_lock(&in_cbuf->lock); // Stop any further input processing
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
337 cyg_drv_dsr_lock();
86
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
338 if (in_cbuf->waiting) {
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
339 in_cbuf->abort = true;
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
340 cyg_drv_cond_signal(&in_cbuf->wait);
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
341 in_cbuf->waiting = false;
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
342 }
86
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
343 in_cbuf->get = in_cbuf->put; // Flush buffered input
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
344 cyg_drv_dsr_unlock();
86
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
345 cyg_drv_mutex_unlock(&in_cbuf->lock);
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
346 break;
86
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
347
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
348 case CYG_IO_GET_CONFIG_SERIAL_ABORT:
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
349 // Abort any outstanding I/O, including blocked reads
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
350 // Caution - assumed to be called from 'timeout' (i.e. DSR) code
86
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
351 if (in_cbuf->len != 0) {
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
352 in_cbuf->abort = true;
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
353 cyg_drv_cond_signal(&in_cbuf->wait);
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
354 }
86
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
355 if (out_cbuf->len != 0) {
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
356 out_cbuf->abort = true;
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
357 cyg_drv_cond_signal(&out_cbuf->wait);
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
358 }
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
359 break;
86
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
360
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
361 case CYG_IO_GET_CONFIG_SERIAL_OUTPUT_FLUSH:
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
362 // Throw away any pending output
86
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
363 if (out_cbuf->len == 0) break; // Nothing to do if not buffered
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
364 cyg_drv_mutex_lock(&out_cbuf->lock); // Stop any further output processing
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
365 cyg_drv_dsr_lock();
86
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
366 if (out_cbuf->get != out_cbuf->put) {
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
367 out_cbuf->get = out_cbuf->put; // Empties queue!
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
368 (funs->stop_xmit)(chan); // Done with transmit
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
369 }
86
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
370 if (out_cbuf->waiting) {
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
371 out_cbuf->abort = true;
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
372 cyg_drv_cond_signal(&out_cbuf->wait);
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
373 out_cbuf->waiting = false;
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
374 }
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
375 cyg_drv_dsr_unlock();
86
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
376 cyg_drv_mutex_unlock(&out_cbuf->lock);
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
377 break;
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
378
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
379 #ifdef CYGOPT_IO_SERIAL_SUPPORT_NONBLOCKING
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
380 case CYG_IO_GET_CONFIG_SERIAL_READ_BLOCKING:
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
381 if (*len < sizeof(cyg_uint32)) {
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
382 return -EINVAL;
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
383 }
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
384 *(cyg_uint32*)xbuf = (in_cbuf->blocking) ? 1 : 0;
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
385 break;
86
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
386
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
387 case CYG_IO_GET_CONFIG_SERIAL_WRITE_BLOCKING:
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
388 if (*len < sizeof(cyg_uint32)) {
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
389 return -EINVAL;
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
390 }
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
391 *(cyg_uint32*)xbuf = (out_cbuf->blocking) ? 1 : 0;
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
392 break;
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
393 #endif // CYGOPT_IO_SERIAL_SUPPORT_NONBLOCKING
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
394
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
395 default:
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
396 res = -EINVAL;
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
397 }
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
398 return res;
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
399 }
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
400
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
401 static Cyg_ErrNo
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
402 serial_set_config(cyg_io_handle_t handle, cyg_uint32 key, const void *xbuf, cyg_uint32 *len)
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
403 {
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
404 Cyg_ErrNo res = ENOERR;
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
405 cyg_devtab_entry_t *t = (cyg_devtab_entry_t *)handle;
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
406 serial_channel *chan = (serial_channel *)t->priv;
86
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
407 #ifdef CYGOPT_IO_SERIAL_SUPPORT_NONBLOCKING
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
408 cbuf_t *out_cbuf = &chan->out_cbuf;
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
409 cbuf_t *in_cbuf = &chan->in_cbuf;
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
410 #endif
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
411 serial_funs *funs = chan->funs;
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
412 cyg_serial_info_t *buf = (cyg_serial_info_t *)xbuf;
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
413
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
414 switch (key) {
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
415 case CYG_IO_SET_CONFIG_SERIAL_INFO:
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
416 if (*len != sizeof(cyg_serial_info_t)) {
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
417 return -EINVAL;
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
418 }
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
419 if ((funs->set_config)(chan, buf) != true) {
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
420 // Device is not happy with paramters or they cannot be set
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
421 res = -EINVAL;
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
422 }
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
423 break;
86
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
424 #ifdef CYGOPT_IO_SERIAL_SUPPORT_NONBLOCKING
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
425 case CYG_IO_SET_CONFIG_SERIAL_READ_BLOCKING:
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
426 if (*len < sizeof(cyg_uint32) || 0 == in_cbuf->len) {
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
427 return -EINVAL;
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
428 }
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
429 in_cbuf->blocking = (1 == *(cyg_uint32*)xbuf) ? true : false;
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
430 break;
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
431 case CYG_IO_SET_CONFIG_SERIAL_WRITE_BLOCKING:
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
432 if (*len < sizeof(cyg_uint32) || 0 == out_cbuf->len) {
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
433 return -EINVAL;
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
434 }
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
435 out_cbuf->blocking = (1 == *(cyg_uint32*)xbuf) ? true : false;
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
436 break;
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
437 #endif // CYGOPT_IO_SERIAL_SUPPORT_NONBLOCKING
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
438 default:
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
439 res = -EINVAL;
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
440 }
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
441 return res;
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
442 }
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
443
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
444 static void
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
445 serial_xmt_char(serial_channel *chan)
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
446 {
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
447 cbuf_t *cbuf = &chan->out_cbuf;
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
448 serial_funs *funs = chan->funs;
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
449 unsigned char c;
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
450 int space;
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
451
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
452 while (cbuf->get != cbuf->put) {
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
453 c = cbuf->data[cbuf->get];
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
454 if ((funs->putc)(chan, c)) {
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
455 cbuf->get++;
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
456 if (cbuf->get == cbuf->len) cbuf->get = 0;
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
457 if (cbuf->waiting) {
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
458 // See if there is now enough room to restart writer
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
459 space = (cbuf->len + cbuf->get) - cbuf->put;
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
460 if (space > cbuf->len) space -= cbuf->len;
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
461 if (space >= cbuf->low_water) {
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
462 cbuf->waiting = false;
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
463 cyg_drv_cond_broadcast(&cbuf->wait);
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
464 }
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
465 }
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
466 } else {
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
467 return; // Need to wait for more space
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
468 }
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
469 }
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
470 (funs->stop_xmit)(chan); // Done with transmit
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
471 if (cbuf->waiting) {
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
472 cbuf->waiting = false;
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
473 cyg_drv_cond_signal(&cbuf->wait);
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
474 }
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
475 }
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
476
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
477 static void
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
478 serial_rcv_char(serial_channel *chan, unsigned char c)
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
479 {
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
480 cbuf_t *cbuf = &chan->in_cbuf;
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
481
86
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
482 #if 0
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
483 // FIXME: add error handling
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
484 int space;
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
485 // Check for overflow
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
486 space = (cbuf->len + cbuf->put - cbuf->get) % cbuf->len;
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
487 if (space == (cbuf->len - 1))
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
488 ; // full since put==get means empty
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
489 #endif
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
490
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
491 cbuf->data[cbuf->put++] = c;
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
492 if (cbuf->put == cbuf->len) cbuf->put = 0;
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
493 if (cbuf->waiting) {
20
5f5102441818 Merge from eCos master repository on 1999-07-02-23:17:07-BST
jlarmour
parents: 4
diff changeset
494 #ifdef XX_CYGDBG_DIAG_BUF
5f5102441818 Merge from eCos master repository on 1999-07-02-23:17:07-BST
jlarmour
parents: 4
diff changeset
495 extern int enable_diag_uart;
5f5102441818 Merge from eCos master repository on 1999-07-02-23:17:07-BST
jlarmour
parents: 4
diff changeset
496 int _enable = enable_diag_uart;
5f5102441818 Merge from eCos master repository on 1999-07-02-23:17:07-BST
jlarmour
parents: 4
diff changeset
497 int _time, _stime;
5f5102441818 Merge from eCos master repository on 1999-07-02-23:17:07-BST
jlarmour
parents: 4
diff changeset
498 externC cyg_tick_count_t cyg_current_time(void);
5f5102441818 Merge from eCos master repository on 1999-07-02-23:17:07-BST
jlarmour
parents: 4
diff changeset
499 enable_diag_uart = 0;
5f5102441818 Merge from eCos master repository on 1999-07-02-23:17:07-BST
jlarmour
parents: 4
diff changeset
500 HAL_CLOCK_READ(&_time);
5f5102441818 Merge from eCos master repository on 1999-07-02-23:17:07-BST
jlarmour
parents: 4
diff changeset
501 _stime = (int)cyg_current_time();
5f5102441818 Merge from eCos master repository on 1999-07-02-23:17:07-BST
jlarmour
parents: 4
diff changeset
502 diag_printf("Signal reader - time: %x.%x\n", _stime, _time);
5f5102441818 Merge from eCos master repository on 1999-07-02-23:17:07-BST
jlarmour
parents: 4
diff changeset
503 enable_diag_uart = _enable;
5f5102441818 Merge from eCos master repository on 1999-07-02-23:17:07-BST
jlarmour
parents: 4
diff changeset
504 #endif // CYGDBG_DIAG_BUF
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
505 cbuf->waiting = false;
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
506 cyg_drv_cond_signal(&cbuf->wait);
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
507 }
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
508 }
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
509
86
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
510 //----------------------------------------------------------------------------
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
511 // Block transfer functions. Not all drivers require these.
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
512 #ifdef CYGINT_IO_SERIAL_BLOCK_TRANSFER
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
513
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
514 static bool
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
515 serial_data_rcv_req(serial_channel *chan, int avail,
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
516 int* space_avail, unsigned char** space)
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
517 {
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
518 cbuf_t *cbuf = &chan->in_cbuf;
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
519 int gap;
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
520
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
521 // Check for space
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
522 gap = (cbuf->len + cbuf->put - cbuf->get) % cbuf->len;
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
523 if (gap == (cbuf->len - 1))
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
524 return false; // full since put==get means empty
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
525
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
526 if (0 == gap) {
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
527 // Buffer is empty. Reset put/get indexes to get max transfer in
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
528 // one chunk.
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
529 cbuf->get = 0;
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
530 cbuf->put = 0;
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
531 gap = cbuf->len - 1;
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
532 } else {
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
533 // Free space (G = get, P = put, x = data, . = empty)
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
534 // positive: xxxxP.....Gxxx
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
535 // negative: ..GxxxxxP..... [offer last chunk only]
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
536
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
537 // First try for a gap between put and get locations
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
538 gap = cbuf->get - cbuf->put - 1;
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
539 if (gap < 0) {
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
540 // If failed, the gap is between put and the end of buffer
107
7f461c3a372c Merge from eCos master repository on 2000-07-04-08:04:30-BST
jlarmour
parents: 88
diff changeset
541 gap = cbuf->len - cbuf->put;
7f461c3a372c Merge from eCos master repository on 2000-07-04-08:04:30-BST
jlarmour
parents: 88
diff changeset
542
7f461c3a372c Merge from eCos master repository on 2000-07-04-08:04:30-BST
jlarmour
parents: 88
diff changeset
543 // If get is at the beginning of the buffer, we cannot
7f461c3a372c Merge from eCos master repository on 2000-07-04-08:04:30-BST
jlarmour
parents: 88
diff changeset
544 // fill the last character, since that would make put==get
7f461c3a372c Merge from eCos master repository on 2000-07-04-08:04:30-BST
jlarmour
parents: 88
diff changeset
545 // implying empty. In this case we must offer last chunk-1 only.
7f461c3a372c Merge from eCos master repository on 2000-07-04-08:04:30-BST
jlarmour
parents: 88
diff changeset
546 // GxxxxxP.......
7f461c3a372c Merge from eCos master repository on 2000-07-04-08:04:30-BST
jlarmour
parents: 88
diff changeset
547 if (cbuf->get == 0)
7f461c3a372c Merge from eCos master repository on 2000-07-04-08:04:30-BST
jlarmour
parents: 88
diff changeset
548 gap--;
86
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
549 }
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
550 }
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
551
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
552 if (avail < gap) gap = avail; // bound by what's available from hw
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
553
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
554 *space_avail = gap;
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
555 *space = &cbuf->data[cbuf->put];
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
556 cbuf->put += gap;
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
557
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
558 if (cbuf->put == cbuf->len) cbuf->put = 0;
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
559
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
560 return true;
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
561 }
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
562
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
563 static void
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
564 serial_data_rcv_done(serial_channel *chan)
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
565 {
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
566 cbuf_t *cbuf = &chan->in_cbuf;
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
567 if (cbuf->waiting) {
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
568 cbuf->waiting = false;
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
569 cyg_drv_cond_signal(&cbuf->wait);
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
570 }
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
571 }
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
572
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
573 static bool
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
574 serial_data_xmt_req(serial_channel *chan, int space,
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
575 int* chars_avail, unsigned char** chars)
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
576 {
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
577 cbuf_t *cbuf = &chan->out_cbuf;
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
578 int avail;
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
579
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
580 // Available data (G = get, P = put, x = data, . = empty)
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
581 // 0: no data
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
582 // negative: xxxxP.....Gxxx [offer last chunk only]
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
583 // positive: ..GxxxxxP.....
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
584 avail = cbuf->put - cbuf->get;
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
585 if (0 == avail)
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
586 return false;
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
587 if (avail < 0) {
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
588 avail = cbuf->len - cbuf->get;
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
589 }
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
590
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
591 if (avail > space) avail = space; // bound by space in hardware
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
592
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
593 *chars_avail = avail;
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
594 *chars = &cbuf->data[cbuf->get];
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
595 cbuf->get += avail;
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
596
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
597 if (cbuf->get == cbuf->len) cbuf->get = 0;
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
598
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
599 return true;
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
600 }
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
601
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
602 static void
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
603 serial_data_xmt_done(serial_channel *chan)
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
604 {
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
605 cbuf_t *cbuf = &chan->out_cbuf;
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
606 serial_funs *funs = chan->funs;
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
607 int space;
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
608
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
609 (funs->stop_xmit)(chan); // Done with transmit
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
610
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
611 if (cbuf->waiting) {
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
612 // See if there is now enough room to restart writer
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
613 space = (cbuf->len + cbuf->get) - cbuf->put;
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
614 if (space > cbuf->len) space -= cbuf->len;
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
615 if (space >= cbuf->low_water) {
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
616 cbuf->waiting = false;
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
617 cyg_drv_cond_broadcast(&cbuf->wait);
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
618 }
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
619 }
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
620 }
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
621
6512add4f5d6 Merge from eCos master repository on 2000-05-05-07:47:05-BST
jlarmour
parents: 82
diff changeset
622 #endif // CYGINT_IO_SERIAL_BLOCK_TRANSFER