/************************************************************************** * tiny4412 UART for C printf Demo * 声明： * 这主要是在tiny4412的串口上实现C语言中的printf函数的Demo，当然， * 除了实现printf，还提供了由此产生的一些常用函数(ntoi，trim)。 * * 2015-7-5 晴 深圳 南山平山村 曾剑锋 *************************************************************************/ \\-*- 目录 -*-///// | 一、cat uart.h | 二、cat uart.c \\\\\////////// 一、cat uart.h #ifndef __UART_H__ #define __UART_H__ typedef volatile unsigned int U32 ; //Uart #define GPA0CON *(U32 *)0x11400000 #define com0base 0x13800000 //com3 #define ULCON0 *(U32 *)(com0base + 0x0000) #define UCON0 *(U32 *)(com0base + 0x0004) #define UFCON0 *(U32 *)(com0base + 0x0008) #define UMCON0 *(U32 *)(com0base + 0x000C) #define UTRSTAT0 *(U32 *)(com0base + 0x0010) #define UERSTAT0 *(U32 *)(com0base + 0x0014) #define UFSTAT0 *(U32 *)(com0base + 0x0018) #define UMSTAT0 *(U32 *)(com0base + 0x001C) #define UTXH0 *(U32 *)(com0base + 0x0020) #define URXH0 *(U32 *)(com0base + 0x0024) #define UBRDIV0 *(U32 *)(com0base + 0x0028) #define UFRACVAL0 *(U32 *)(com0base + 0x002C) #define UINTP0 *(U32 *)(com0base + 0x0030) // 初始化Uart0 int init_uart(void) // 获取一个字符 char get_char(void); // 输出一个字符 void put_char(char ch); // 获取一个字符串 int gets(char* string); // 输出一个字符串 int puts(char* string); // 字符串比较 int strcmp(char* srcstr, char* diststr); // 打印输出printf int printf(char* fmt, ...); // 计算字符串的长度 int strlen(char* str); // 输出一个数字 void put_num(int num); // 以十六进制输出数字 void put_hex(int num); // 数字转换成十六进制字符 char ntohex(int num); // 以2进制输出数字 void put_bin(int num); // 输出一行字符串 void put_line(char* string); // 修剪字符串右侧的空白字符 char* trimr(char* string); // 修剪字符串左侧的空白字符 char* triml(char* string); // 修剪字符串左右的空白字符 char* trim(char* string); #endif //__UART_H__ 二、cat uart.c #include "uart.h" /** * 初始化Uart0 */ int init_uart(void) { //configure RX0,TX0 as Uart GPA0CON &= ~(0xff); GPA0CON |= 0x22; //controler //configure Uart as 8N1 ULCON0 &= ~0x3 ; ULCON0 |= 0x3 ; //set RX TX as polling mode UCON0 &= ~0x3f ; UCON0 |= 5 ; //set baud rate as 115200 Pclock as 100M UBRDIV0 = 53 ; UFRACVAL0 = 4 ; } char get_char(void) { /** * 尽可能等待数据 */ while((UTRSTAT0 & 0x1) == 0) delays( 0xffff); return URXH0; } void put_char(char ch) { /** * 一定要等待数据写完 */ while((UTRSTAT0 & 0x4) == 0) delays( 0xffff); UTXH0 = ch; } int gets(char* string) { puts("[zjf@root ]# "); int i = 0; for(i = 0; i < 1024-1; i++){ while((UTRSTAT0 & 0x1) == 0) delays( 0xffffff); string[i] = URXH0; if(string[i] == ' '){ put_char(' '); put_char(' '); string[i] = ' '; return i+1; } if(string[i] == ''){ if (i == 0){ string[i] = ' '; continue; } //清除当前输入的'', 并换成' '，并用空格覆盖前面那个字符，同时输出一次 string[i--] = ' '; string[i] = ' '; put_char(' '); puts("[zjf@root ]# "); puts(string); //将前面换成空格的字符换成' '结束符, 在输出一次， //主要是为了让光标往前移一个字符 string[i--] = ' '; put_char(' '); puts("[zjf@root ]# "); puts(string); continue; } if(string[i] == 3){ //ctrl+c //清除string中所有的数据 int j = 0; for(j = 0; j <= i; j++){ string[j] = ' '; } //输出<ctrl+c>等字符 puts("<Ctrl+c> "); puts("[zjf@root ]# "); //将i置为起始位 i = -1; continue; } if(string[i] == 4){ //清除string中所有的数据 int j = 0; for(j = 0; j <= i; j++){ string[j] = ' '; } //输出<ctrl+c>等字符 puts("<Ctrl+d> "); return 0; } put_char(string[i]); } } int puts(char* string) { int i = 0; while(string[i]){ put_char(string[i]); i++; } return i; } void put_line(char* string) { puts(string); puts(" "); } int strcmp(char* srcstr, char* diststr) { while((*srcstr) && (*diststr) && ((*srcstr) == (*diststr))){ srcstr++; diststr++; } return (*srcstr)-(*diststr); } int bzero(char* string, int size) { if(size < 0){ return 0; } int i = 0; if(strlen(string) >= size){ for (i = 0; i < size; i++){ string[i] = ' '; } return i; }else{ int length = strlen(string); for (i = 0; i < length; i++){ string[i] = ' '; } return length; } } int printf(char* fmt, ...) { unsigned int ** begin_add = (unsigned int **)(&fmt); char ch = ' '; int num = 0; while (ch = (*(fmt++))) { if (ch == '%') { ch = (*(fmt++)); if (ch == 'd') { num = (int)(*(++begin_add)); if(num >= 0){ put_num(num); }else{ put_char('-'); put_num((~num)+1); } } if (ch == 's') { puts((char *)(*(++begin_add))); } if ((ch == 'x') || (ch == 'p')){ put_char('0'); put_char('x'); put_hex((int)(*(++begin_add))); } if (ch == 'b') { put_char('0'); put_char('b'); put_bin((int)(*(++begin_add))); } if (ch == '%'){ put_char(ch); } continue; } put_char(ch); } } void put_num(int num){ if(num < 10){ put_char(num+'0'); return; } put_num(num/10); put_char(num%10+'0'); } int atoi (char* string) { int i = 0; trim(string); char ch = ' '; int num = 0; if(string[0] != '-'){ while(ch = string[i++]){ if ((ch < '0') || (ch > '9')) { return 99999999; } num *= 10; num += (ch-'0'); } }else{ //pass the '-' i++; while(ch = string[i++]){ if ((ch < '0') || (ch > '9')) { return 99999999; } num *= 10; num += (ch-'0'); } num = (~num) + 1; } return num; } int strlen(char* str) { int count = 0; while(str[count++]); return count-1; } void put_bin(int num){ if(num < 2){ put_char(num+'0'); return ; } put_bin(num/2); put_char(num%2+'0'); } void put_hex(int num){ char ch = ' '; if(num < 16){ ch = ntohex(num); put_char(ch); return ; } put_hex(num/16); ch = ntohex(num%16); put_char(ch); } char ntohex(int num) { if (num < 0 || num > 15) { return ' '; } if (num < 10) { return '0'+num; } switch (num) { case 10 : return 'A'; case 11 : return 'B'; case 12 : return 'C'; case 13 : return 'D'; case 14 : return 'E'; case 15 : return 'F'; } } char* trimr(char* string) { if(string == ' ' || string[0] == ' ') return ' '; int i = 0; i = strlen(string); for(i--; i >= 0; i--){ if((string[i] == ' ') || (string[i] == ' ')){ string[i] = ' '; }else{ return string; } } } char* triml(char* string) { if(string == ' ' || string[0] == ' ') return ' '; int i = 0; int j = 0; while((string[i] == ' ') || (string[i] == ' ')) i++; while(string[i]){ string[j++] = string[i++]; } string[j] = ' '; return string; } char * trim(char* string) { if(string == ' ' || string[0] == ' ') return ' '; return trimr(triml(string)); }