Marlowe Noll / MODSERIAL

Important changes to repositories hosted on mbed.com

Mbed hosted mercurial repositories are deprecated and are due to be permanently deleted in July 2026.

To keep a copy of this software download the repository Zip archive or clone locally using Mercurial.

It is also possible to export all your personal repositories from the account settings page.

Fork of MODSERIAL by Erik -

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?

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