以前的裸板程序都是通过u-boot下载到内存运行，今天实现更新程序update,程序运行时会输出一个菜单供选择。
系统：ubuntu 10.04.4
单板：tq2440
编译器：arm-linux-gcc-4.3.2
搭建开发环境详见ubuntu 10.04.4开发环境配置。
目标：实现自我更新程序，串口输出菜单，有以下·功能供选择
*********************************
update program with serial port
The board:TQ2440
The NAND:K9F1216U0A 256MB
The NOR:EN29LV160AB 2MB
The SRAM:HY57V561620 x2 64MB
The NET:DM9000AEP
date: 2013.4.26
***********************************
the menu of the update programe:
[w] write the nand flash
[r] read the nand flash
[e] erase the nand flash
[g] get file, and write to nand flash 0 block
[x] get file to ddr(0x32000000), run it
[s] reset the programe
Please enter the chose:
一、编写源代码
根据s3c2440手册编写代码，包括文件：start.S init.c main.c boot.lds Makefile
文件start.S:
#define S3C2440_MPLL_200MHZ ((0x5c<<12)|(0x01<<4)|(0x02))
#define MEM_CTL_BASE 0x48000000
.text
.global _start
_start:
/*1.关看门狗*/
ldr r0, =0x53000000
mov r1, #0
str r1, [r0]
/*2.设置时钟*/
ldr r0, =0x4c000014
mov r1, #0x03
str r1, [r0]
/* 如果HDIVN非0，CPU的总线模式应该从“fast bus mode”变为“asynchronous bus mode” */
mrc p15, 0, r1, c1, c0, 0 /* 读出控制寄存器 */
orr r1, r1, #0xc0000000 /* 设置为“asynchronous bus mode” */
mcr p15, 0, r1, c1, c0, 0 /* 写入控制寄存器 */
/* MPLLCON = S3C2440_MPLL_200MHZ */
ldr r0, =0x4c000004
ldr r1, =S3C2440_MPLL_200MHZ
str r1, [r0]
/*3.初始化SDRAM*/
ldr r0, =MEM_CTL_BASE
adr r1, sdram_config /*当前地址*/
add r3, r0, #(13*4)
1:
ldr r2, [r1], #4
str r2, [r0], #4
cmp r0 ,r3
bne 1b
/*4.重定位：把bootloader本身代码从flash复制到他的链接地址*/
ldr sp, =0x34000000
bl nand_init
mov r0, #0
ldr r1, =_start
ldr r2, =__bss_start
sub r2 ,r2, r1
bl copy_code_to_sdram
bl clear_bss
/*5.执行main*/
//bl main
ldr lr, =halt
ldr pc, =main
halt:
b halt
sdram_config:
.long 0x22011110 //BWSCON
.long 0x00000700 //BANKCON0
.long 0x00000700 //BANKCON1
.long 0x00000700 //BANKCON2
.long 0x00000700 //BANKCON3
.long 0x00000700 //BANKCON4
.long 0x00000700 //BANKCON5
.long 0x00018005 //BANKCON6
.long 0x00018005 //BANKCON7
.long 0x008C04F4 // REFRESH
.long 0x000000B1 //BANKSIZE
.long 0x00000030 //MRSRB6
.long 0x00000030 //MRSRB7
文件init.c:
/* NAND FLASH控制器 */
#define NFCONF (*((volatile unsigned long *)0x4E000000))
#define NFCONT (*((volatile unsigned long *)0x4E000004))
#define NFCMMD (*((volatile unsigned char *)0x4E000008))
#define NFADDR (*((volatile unsigned char *)0x4E00000C))
#define NFDATA (*((volatile unsigned char *)0x4E000010))
#define NFSTAT (*((volatile unsigned char *)0x4E000020))
/* GPIO */
#define GPHCON (*(volatile unsigned long *)0x56000070)
#define GPHUP (*(volatile unsigned long *)0x56000078)
/* UART registers*/
#define ULCON0 (*(volatile unsigned long *)0x50000000)
#define UCON0 (*(volatile unsigned long *)0x50000004)
#define UFCON0 (*(volatile unsigned long *)0x50000008)
#define UMCON0 (*(volatile unsigned long *)0x5000000c)
#define UTRSTAT0 (*(volatile unsigned long *)0x50000010)
#define UFSTAT0 (*(volatile unsigned long *)0x50000018)
#define UTXH0 (*(volatile unsigned char *)0x50000020)
#define URXH0 (*(volatile unsigned char *)0x50000024)
#define UBRDIV0 (*(volatile unsigned long *)0x50000028)
#define TXD0READY (1<<2)
void nand_read(unsigned int nand_start, unsigned int ddr_start, unsigned int len);
int isBootFromNorFlash(void)
{
volatile int *p = (volatile int *)0;
int val;
val = *p;
*p = 0x12345678;
if (*p == 0x12345678)
{
/*写成功，是nand启动*/
*p = val;
return 0;
}
else
{
/*Nor不能像内存一样写*/
return 1;
}
}
void copy_code_to_sdram(unsigned int src, unsigned int dest, unsigned int len)
{
int i = 0;
unsigned char *src_start = (unsigned char *)src;
unsigned char *dest_start = (unsigned char *)dest;
/*如果是Nor启动*/
if(isBootFromNorFlash())
{
while (i < len)
{
//dest[i] = src[i];
dest_start[i] = src_start[i];
i++;
}
}
else
{
//nand_init();
//nand_resd(src, dest, len)
nand_read(src, dest, len);
}
}
void clear_bss(void)
{
extern int __bss_start, __bss_end;
int *p = &__bss_start;
for (; p < &__bss_end; p++)
*p = 0;
}
void nand_select(void)
{
NFCONT &= ~(1<<1);
}
void nand_deselect(void)
{
NFCONT |= (1<<1);
}
void nand_cmd(unsigned char cmd)
{
volatile int i;
NFCMMD = cmd;
for (i = 0; i < 10; i++);
}
void nand_addr(unsigned int addr)
{
unsigned int col = addr % 2048;
unsigned int page = addr / 2048;
volatile int i;
NFADDR = col & 0xff;
for (i = 0; i < 10; i++);
NFADDR = (col >> 8) & 0xff;
for (i = 0; i < 10; i++);
NFADDR = page & 0xff;
for (i = 0; i < 10; i++);
NFADDR = (page >> 8) & 0xff;
for (i = 0; i < 10; i++);
NFADDR = (page >> 16) & 0xff;
for (i = 0; i < 10; i++);
}
void wait_ready(void)
{
while (!(NFSTAT & 1));
}
unsigned char nand_get_data(void)
{
return NFDATA;
}
void nand_send_data(unsigned char data)
{
NFDATA = data;
}
void nand_reset(void)
{
/* 选中 */
nand_select();
/* 发出0xff命令 */
nand_cmd(0xff);
/* 等待就绪 */
wait_ready();
/* 取消选中 */
nand_deselect();
}
void nand_read(unsigned int nand_start, unsigned int ddr_start, unsigned int len)
{
unsigned int addr = nand_start;
int col = addr % 2048;
int i = 0;
unsigned char *dest = (unsigned char *)ddr_start;
/* 1. 选中 */
nand_select();
while (i < len)
{
/* 2. 发出读命令00h */
nand_cmd(0x00);
/* 3. 发出地址(分5步发出) */
nand_addr(addr);
/* 4. 发出读命令30h */
nand_cmd(0x30);
/* 5. 判断状态 */
wait_ready();
/* 6. 读数据 */
for (; (col < 2048) && (i < len); col++)
{
dest[i] = nand_get_data();
i++;
addr++;
}
col = 0;
}
/* 7. 取消选中 */
nand_deselect();
}
void nand_erase_block(unsigned long addr)
{
int page = addr / 2048;
nand_select();
nand_cmd(0x60);
nand_addr(page & 0xff);
nand_addr((page >> 8) & 0xff);
nand_addr((page >> 16) & 0xff);
nand_cmd(0xd0);
wait_ready();
nand_deselect();
}
void nand_write(unsigned int nand_start, unsigned char * buf, unsigned int len)
{
unsigned long count = 0;
unsigned long addr = nand_start;
int i = nand_start % 2048;
//int left = i;
nand_select();
while (count < len)
{
nand_cmd(0x80);
nand_addr(addr);
//for (; i < (2048-left) && count < len; i++)
for (; i < 2048 && count < len; i++)
{
/*if(addr<16384)//写前2K
{
if(i<(2048-left))//前2页每页只能写2K
{
nand_send_data(buf[count++]);
}
}
else
{
nand_send_data(buf[count++]);
}*/
nand_send_data(buf[count++]);
addr++;
}
nand_cmd(0x10);
wait_ready();
i = 0;
//left = i;
}
nand_deselect();
}
void nand_init(void)
{
#define TACLS 0
#define TWRPH0 1
#define TWRPH1 0
/* 设置时序 */
NFCONF = (TACLS<<12)|(TWRPH0<<8)|(TWRPH1<<4);
/* 使能NAND Flash控制器, 初始化ECC, 禁止片选 */
NFCONT = (1<<4)|(1<<1)|(1<<0);
nand_reset();
}
#define PCLK 50000000 // init.c中的clock_init函数设置PCLK为50MHz
#define UART_CLK PCLK // UART0的时钟源设为PCLK
#define UART_BAUD_RATE 115200 // 波特率
#define UART_BRD ((UART_CLK / (UART_BAUD_RATE * 16)) - 1)
#define ENABLE_FIFO
static void delay(void)
{
volatile int i = 10;
while (i--);
}
/*
* 初始化UART0
* 115200,8N1,无流控
*/
void uart0_init(void)
{
GPHCON |= 0xa0; // GPH2,GPH3用作TXD0,RXD0
GPHUP = 0x0c; // GPH2,GPH3内部上拉
ULCON0 = 0x03; // 8N1(8个数据位，无较验，1个停止位)
UCON0 = 0x05; // 查询方式，UART时钟源为PCLK
#ifdef ENABLE_FIFO
UFCON0 = 0x07; /* FIFO enable */
#else
UFCON0 = 0x00; /* FIFO disable */
#endif
UMCON0 = 0x00; // 不使用流控
UBRDIV0 = UART_BRD; // 波特率为115200
}
/*
* 发送一个字符
*/
void putc(unsigned char c)
{
/* 等待，直到发送缓冲区中的数据已经全部发送出去 */
//while (!(UTRSTAT0 & TXD0READY));
#ifdef ENABLE_FIFO
while (UFSTAT0 & (1<<14))delay();
#else
while ((UTRSTAT0 & (1<<2)) == 0);
#endif
/* 向UTXH0寄存器中写入数据，UART即自动将它发送出去 */
UTXH0 = c;
}
/*
* 接收字符
*/
unsigned char getc(void)
{
/* 等待，直到接收缓冲区中的有数据 */
//while (!(UTRSTAT0 & RXD0READY));
#ifdef ENABLE_FIFO
while ((UFSTAT0 & (1<<6)) == 0 && (UFSTAT0 & 0x3f) == 0)delay();
#else
while ((UTRSTAT0 & (1<<0)) == 0);
#endif
/* 直接读取URXH0寄存器，即可获得接收到的数据 */
return URXH0;
}
int getc_nowait(unsigned char *pChar)
{
#ifdef ENABLE_FIFO
if ((UFSTAT0 & (1<<6)) == 0 && (UFSTAT0 & 0x3f) == 0)
#else
if ((UTRSTAT0 & (1<<0)) == 0)
#endif
{
return -1;
}
else
{
*pChar = URXH0;
return 0;
}
}
void puts(char *str)
{
int i = 0;
while (str[i])
{
putc(str[i]);
i++;
}
}
void puthex(unsigned int val)
{
/* 0x1234abcd */
int i;
int j;
puts("0x");
for (i = 0; i < 8; i++)
{
j = (val >> ((7-i)*4)) & 0xf;
if ((j >= 0) && (j <= 9))
putc('0' + j);
else
putc('A' + j - 0xa);
}
}
void putbyte(unsigned char val)
{
/* 0x1234abcd */
int i;
int j;
puts("0x");
for (i = 0; i < 2; i++)
{
j = (val >> ((1-i)*4)) & 0xf;
if ((j >= 0) && (j <= 9))
putc('0' + j);
else
putc('A' + j - 0xa);
}
}
文件main.c:
extern void uart0_init(void);
extern void nand_read(unsigned int nand_start, unsigned int ddr_start, unsigned int len);
extern void putc(char c);
extern void puts(char *str);
extern void puthex(unsigned int val);
extern unsigned char getc(void);
extern int getc_nowait(unsigned char *pChar);
extern void putbyte(unsigned char val);
extern void nand_erase_block(unsigned long addr);
extern void nand_write(unsigned int nand_start, unsigned char * buf, unsigned int len);
int strlen(char *str)
{
int i = 0;
while (str[i])
{
i++;
}
return i;
}
void nand_write_test(void)
{
char buf[20] = {"abcd1234ABCD"};
unsigned long addr;
unsigned long size;
puts("enter the start address:0x80000 ");
//scanf("%s", buf);
//addr = strtoul(buf, NULL, 0);
addr = 0x80000;
puts("enter the string:abcd1234ABCD ");
//scanf("%s", buf);
size = strlen(buf) + 1;
puts(" size= ");
puthex(size);
puts("\n\r");
nand_write(addr, buf, size);
}
void nand_read_test(void)
{
int i;
char buf[100];
unsigned long addr;
unsigned long size;
puts("enter the start address: 0x80000");
//scanf("%s", buf);
//addr = strtoul(buf, NULL, 0);
addr = 0x80000;
//puts("read addr = 0x%x\n\r", addr);
puts("enter the size: 0x60");
//scanf("%s", buf);
//size = strtoul(buf, NULL, 0);
size = 0x60;
if (size > 100)
{
puts("the max size is 100\n\r");
size = 100;
}
nand_read(addr, buf, size);
puts("datas: \n\r");
for (i = 0; i < size; i++)
{
// printf("%02x ", buf[i]);
putbyte(buf[i]);
puts("\t");
if ((i+1) % 8 == 0)
{
puts("\n\r");
}
}
puts("\n\r");
}
void nand_erase_test(void)
{
//char buf[100];
unsigned long addr;
puts("enter the start address: ");
//scanf("%s", buf);
//addr = strtoul(buf, NULL, 0);
addr = 0x80000;
puts("erase addr = ");
puthex(addr);
puts("\n\r");
nand_erase_block(addr);
}
void update_program(void)
{
unsigned char *buf = (unsigned char *)0x32000000;
//unsigned char *buf = (unsigned char *)0xD0036000;
unsigned long len = 0;
int have_begin = 0;
int nodata_time = 0;
unsigned long erase_addr;
char c;
int i;
/* 璇讳覆鍙ｈ幏寰楁暟鎹?*/
puts("\n\ruse V2.2.exe/gtkterm to send file\n\r");
while (1)
{
if (getc_nowait(&buf[len]) == 0)
{
have_begin = 1;
nodata_time = 0;
len++;
}
else
{
if (have_begin)
{
nodata_time++;
}
}
if (nodata_time == 1000)
{
break;
}
}
puts("\n\rhave get data:");
puthex(len);
puts(" bytes\n\r");
puts("the first 16 bytes data: \n\r");
for (i = 0; i < 16; i++)
{
// put("%02x ", buf[i]);
putbyte(buf[i]);
puts("\t");
}
puts("\n\r");
puts("Press Y to program the flash: \n\r");
c = getc();
putc(c);
puts("\n\r");
if (c == 'y' || c == 'Y')
{
/* 鐑у啓鍒皀and flash block 0 */
for (erase_addr = 0; erase_addr < ((len + 0x1FFFF) & ~0x1FFFF); erase_addr += 0x20000)
{
nand_erase_block(erase_addr);
}
nand_write(0, buf, len);
puts("update program successful\n\r");
}
else
{
puts("Cancel program!\n\r");
}
}
void run_program(void)
{
unsigned char *buf = (unsigned char *)0x32000000;
//unsigned char *buf = (unsigned char *)0xD0036000;
unsigned long len = 0;
int have_begin = 0;
int nodata_time = 0;
void (*theProgram)(void);
int i;
/* 璇讳覆鍙ｈ幏寰楁暟鎹?*/
puts("\n\r use gtkterm to send file\n\r");
while (1)
{
if (getc_nowait(&buf[len]) == 0)
{
have_begin = 1;
nodata_time = 0;
len++;
}
else
{
if (have_begin)
{
nodata_time++;
}
}
if (nodata_time == 10000)
{
break;
}
}
//printf("have get %d bytes data\n\r", len);
puts("\n\r have get data:");
puthex(len);
puts(" bytes\n\r");
puts("the first 16 bytes data: \n\r");
for (i = 0; i < 16; i++)
{
// put("%02x ", buf[i]);
putbyte(buf[i]);
puts("\t");
//putc('\0');
}
puts("\n\r");
puts("jump to 0x32000000 to run it\n\r");
theProgram = (void (*)(void))0x32000000;
theProgram();
}
int main(void)
{
char c;
uart0_init();
puts("\n\r*********************************\n\r");
puts("update program with serial port\n\r");
puts("The board:TQ2440\n\r");
puts("The NAND:K9F1216U0A 256MB\n\r");
puts("The NOR:EN29LV160AB 2MB\n\r");
puts("The SRAM:HY57V561620 x2 64MB\n\r");
puts("The NET:DM9000AEP\n\r");
puts(" date: 2013.4.26\n\r");
puts("***********************************\n\r");
while (1)
{
puts("the menu of the update programe:\n\r");
puts("[w] write the nand flash\n\r");
puts("[r] read the nand flash\n\r");
puts("[e] erase the nand flash\n\r");
puts("[g] get file, and write to nand flash 0 block\n\r");
puts("[x] get file to ddr(0x32000000), run it\n\r");
puts("[s] reset the programe\n\r");
puts("Please enter the chose:\n\r");
do {
c = getc();
if (c == '\n' || c == '\r')
{
puts("\n\r");
}
else
{
putc(c);
}
} while (c == '\n' || c == '\r');
switch (c)
{
case 'w':
case 'W':
{
nand_write_test();
break;
}
case 'r':
case 'R':
{
nand_read_test();
break;
}
case 'e':
case 'E':
{
nand_erase_test();
break;
}
case 'g':
case 'G':
{
update_program();
break;
}
case 'x':
case 'X':
{
run_program();
break;
}
case 's':
case 'S':
{
void (*theProgram)(void);
theProgram = (void (*)(void))0x33f80000;
theProgram();
break;
}
}
}
return 0;
}
文件boot.lds:
SECTIONS {
. = 0x33f80000;
.text : { *(.text) }
. = ALIGN(4);
.rodata : {*(.rodata*)}
. = ALIGN(4);
.data : { *(.data) }
. = ALIGN(4);
__bss_start = .;
.bss : { *(.bss) *(COMMON) }
__bss_end = .;
}
文件Makefile:
CC = arm-linux-gcc
LD = arm-linux-ld
AR = arm-linux-ar
OBJCOPY = arm-linux-objcopy
OBJDUMP = arm-linux-objdump
CFLAGS := -Wall -O2
CPPFLAGS := -nostdinc -nostdlib -fno-builtin
objs := start.o init.o main.o
update.bin: $(objs)
${LD} -Tboot.lds -o boot.elf $^
${OBJCOPY} -O binary -S boot.elf $@
${OBJDUMP} -D -m arm boot.elf > update.dis
%.o:%.c
${CC} $(CPPFLAGS) $(CFLAGS) -c -o $@ $<
%.o:%.S
${CC} $(CPPFLAGS) $(CFLAGS) -c -o $@ $<
clean:
rm -f *.o *.bin *.elf *.dis
二、编译源代码
change@change:~$
cd Si/TQ2440/update/
change@change:~/Si/TQ2440/update$
make clean
rm -f *.o *.bin *.elf *.dis
change@change:~/Si/TQ2440/update$
ls
boot.lds init.c main.c Makefile start.S
change@change:~/Si/TQ2440/update$
make
arm-linux-gcc -nostdinc -nostdlib -fno-builtin -Wall -O2 -c -o start.o start.S
arm-linux-gcc -nostdinc -nostdlib -fno-builtin -Wall -O2 -c -o init.o init.c
arm-linux-gcc -nostdinc -nostdlib -fno-builtin -Wall -O2 -c -o main.o main.c
main.c: In function 'nand_write_test':
main.c:38: warning: pointer targets in passing argument 2 of 'nand_write' differ in signedness
main.c: In function 'nand_read_test':
main.c:69: warning: passing argument 2 of 'nand_read' makes integer from pointer without a cast
arm-linux-ld -Tboot.lds -o boot.elf start.o init.o main.o
arm-linux-objcopy -O binary -S boot.elf update.bin
arm-linux-objdump -D -m arm boot.elf > update.dis
change@change:~/Si/TQ2440/update$
cp update.bin /home/change/work/tftpboot/
change@change:~/Si/TQ2440/update$
三、烧写、测试
单板从NOR flash启动，用u-boot下载上面编译的程序update.bin到NAND Flash
U-Boot 1.1.6 (Mar 24 2012 - 03:44:51)
DRAM: 64 MB
Flash: 2 MB
NAND: 256 MiB
In: serial
Out: serial
Err: serial
Hit any key to stop autoboot: 0
TQ2440 # set ipaddr 172.16.1.133
TQ2440 # set gatewayip 172.16.1.1
TQ2440 # set serverip 172.16.1.131
TQ2440 # tftp 0x32000000 update.bin
dm9000 i/o: 0x20000000, id: 0x90000a46
MAC: 00:80:00:80:00:80
could not establish link
TFTP from server 172.16.1.131; our IP address is 172.16.1.133
Filename 'update.bin'.
Load address: 0x32000000
Loading: ##
done
Bytes transferred = 5136 (1410 hex)
TQ2440 # nand erase 0 0x40000
NAND erase: device 0 offset 0x0, size 0x40000
Erasing at 0x20000 -- 100% complete.
OK
TQ2440 # nand write 0x32000000 0 0x40000
NAND write: device 0 offset 0x0, size 0x40000
262144 bytes written: OK
TQ2440 # save
Saving Environment to NAND...
Erasing Nand...Writing to Nand... done
TQ2440 #
程序烧写完毕，接着单板断电从NAND启动，设置串口115200 8 n 1输出如下：
*********************************
update program with serial port
The board:TQ2440
The NAND:K9F1216U0A 256MB
The NOR:EN29LV160AB 2MB
The SRAM:HY57V561620 x2 64MB
The NET:DM9000AEP
date: 2013.4.26
***********************************
the menu of the update programe:
[w] write the nand flash
[r] read the nand flash
[e] erase the nand flash
[g] get file, and write to nand flash 0 block
[x] get file to ddr(0x32000000), run it
[s] reset the programe
Please enter the chose:
下面开始用串口v2.2.exe测试更新程序：
*********************************
update program with serial port
The board:TQ2440
The NAND:K9F1216U0A 256MB
The NOR:EN29LV160AB 2MB
The SRAM:HY57V561620 x2 64MB
The NET:DM9000AEP
date: 2013.4.26
***********************************
the menu of the update programe:
[w] write the nand flash
[r] read the nand flash
[e] erase the nand flash
[g] get file, and write to nand flash 0 block
[x] get file to ddr(0x32000000), run it
[s] reset the programe
Please enter the chose:
手动发送g
g
use V2.2.exe/gtkterm to send file
选择要发送的程序文件eg:boot.bin,并发送文件
have get data:0x000008BC bytes
the first 16 bytes data:
0x530x04 0xA00xE3 0x000x10 0xA00xE3 0x000x10 0x800xE5 0x980x00 0x9F0xE5
Press Y to program the flash:
y
此时需谨慎，手动发送y，会擦除以前的程序，向NAND写新的程序
update program successful
这表明程序更新完毕，断电重启就会启动上面发送文件程序，这里串口输出如下：
Copy kernel from nand
0x1234ABCD
0x7D98ACBA
Set boot params
Boot kernel
测试OK，程序跑起来了。
