Publishing (forking) it from Deurklink to Allseas-PHALCON-system.
Fork of MODSERIAL by
PUTC.cpp@5:8365c4cf8f33, 2010-11-21 (annotated)
- Committer:
- AjK
- Date:
- Sun Nov 21 16:08:36 2010 +0000
- Revision:
- 5:8365c4cf8f33
- Parent:
- 4:28de979b77cf
- Child:
- 6:c8f77fe1cc10
1.5
Who changed what in which revision?
User | Revision | Line number | New contents of line |
---|---|---|---|
AjK | 0:eb2522b41db8 | 1 | /* |
AjK | 0:eb2522b41db8 | 2 | Copyright (c) 2010 Andy Kirkham |
AjK | 0:eb2522b41db8 | 3 | |
AjK | 0:eb2522b41db8 | 4 | Permission is hereby granted, free of charge, to any person obtaining a copy |
AjK | 0:eb2522b41db8 | 5 | of this software and associated documentation files (the "Software"), to deal |
AjK | 0:eb2522b41db8 | 6 | in the Software without restriction, including without limitation the rights |
AjK | 0:eb2522b41db8 | 7 | to use, copy, modify, merge, publish, distribute, sublicense, and/or sell |
AjK | 0:eb2522b41db8 | 8 | copies of the Software, and to permit persons to whom the Software is |
AjK | 0:eb2522b41db8 | 9 | furnished to do so, subject to the following conditions: |
AjK | 0:eb2522b41db8 | 10 | |
AjK | 0:eb2522b41db8 | 11 | The above copyright notice and this permission notice shall be included in |
AjK | 0:eb2522b41db8 | 12 | all copies or substantial portions of the Software. |
AjK | 0:eb2522b41db8 | 13 | |
AjK | 0:eb2522b41db8 | 14 | THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR |
AjK | 0:eb2522b41db8 | 15 | IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, |
AjK | 0:eb2522b41db8 | 16 | FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE |
AjK | 0:eb2522b41db8 | 17 | AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER |
AjK | 0:eb2522b41db8 | 18 | LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, |
AjK | 0:eb2522b41db8 | 19 | OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN |
AjK | 0:eb2522b41db8 | 20 | THE SOFTWARE. |
AjK | 0:eb2522b41db8 | 21 | */ |
AjK | 0:eb2522b41db8 | 22 | |
AjK | 0:eb2522b41db8 | 23 | #include "MODSERIAL.h" |
AjK | 0:eb2522b41db8 | 24 | #include "MACROS.h" |
AjK | 0:eb2522b41db8 | 25 | |
AjK | 0:eb2522b41db8 | 26 | namespace AjK { |
AjK | 0:eb2522b41db8 | 27 | |
AjK | 0:eb2522b41db8 | 28 | int |
AjK | 0:eb2522b41db8 | 29 | MODSERIAL::__putc(int c, bool block) { |
AjK | 0:eb2522b41db8 | 30 | uint32_t lsr = (uint32_t)*((char *)_base + MODSERIAL_LSR); |
AjK | 0:eb2522b41db8 | 31 | |
AjK | 4:28de979b77cf | 32 | if (lsr & 0x20 && MODSERIAL_TX_BUFFER_EMPTY ) { |
AjK | 4:28de979b77cf | 33 | _THR = (uint32_t)c; |
AjK | 4:28de979b77cf | 34 | } |
AjK | 4:28de979b77cf | 35 | else { |
AjK | 4:28de979b77cf | 36 | if (buffer[TxIrq] != (char *)NULL) { |
AjK | 5:8365c4cf8f33 | 37 | if (block) { |
AjK | 5:8365c4cf8f33 | 38 | while ( MODSERIAL_TX_BUFFER_FULL ) { // Blocks! |
AjK | 5:8365c4cf8f33 | 39 | // If putc() is called from an ISR then we are stuffed |
AjK | 5:8365c4cf8f33 | 40 | // because in an ISR no bytes from the TX buffer will |
AjK | 5:8365c4cf8f33 | 41 | // get transferred to teh TX FIFOs while we block here. |
AjK | 5:8365c4cf8f33 | 42 | // So, to work around this, instead of sitting in a |
AjK | 5:8365c4cf8f33 | 43 | // loop waiting for space in the TX buffer (which will |
AjK | 5:8365c4cf8f33 | 44 | // never happen in IRQ context), check to see if the |
AjK | 5:8365c4cf8f33 | 45 | // TX FIFO has space available to move bytes from the |
AjK | 5:8365c4cf8f33 | 46 | // TX buffer to TX FIFO to make space. The easiest way |
AjK | 5:8365c4cf8f33 | 47 | // to do this is to poll the isr_tx() function while we |
AjK | 5:8365c4cf8f33 | 48 | // are blocking. |
AjK | 5:8365c4cf8f33 | 49 | isr_tx(); |
AjK | 5:8365c4cf8f33 | 50 | } |
AjK | 5:8365c4cf8f33 | 51 | } |
AjK | 4:28de979b77cf | 52 | else if( MODSERIAL_TX_BUFFER_FULL ) { |
AjK | 4:28de979b77cf | 53 | buffer_overflow[TxIrq] = c; // Oh dear, no room in buffer. |
AjK | 4:28de979b77cf | 54 | _isr[TxOvIrq].call(); |
AjK | 4:28de979b77cf | 55 | return -1; |
AjK | 0:eb2522b41db8 | 56 | } |
AjK | 4:28de979b77cf | 57 | buffer[TxIrq][buffer_in[TxIrq]] = c; |
AjK | 4:28de979b77cf | 58 | buffer_count[TxIrq]++; |
AjK | 4:28de979b77cf | 59 | buffer_in[TxIrq]++; |
AjK | 4:28de979b77cf | 60 | if (buffer_in[TxIrq] >= buffer_size[TxIrq]) { |
AjK | 4:28de979b77cf | 61 | buffer_in[TxIrq] = 0; |
AjK | 4:28de979b77cf | 62 | } |
AjK | 4:28de979b77cf | 63 | _IER |= 0x2; |
AjK | 0:eb2522b41db8 | 64 | } |
AjK | 0:eb2522b41db8 | 65 | } |
AjK | 4:28de979b77cf | 66 | |
AjK | 0:eb2522b41db8 | 67 | return 0; |
AjK | 0:eb2522b41db8 | 68 | } |
AjK | 0:eb2522b41db8 | 69 | |
AjK | 0:eb2522b41db8 | 70 | }; // namespace AjK ends |