Publishing (forking) it from Deurklink to Allseas-PHALCON-system.

Fork of MODSERIAL by Andy K

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?

UserRevisionLine numberNew 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