projects
/
my-code
/
arm.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
|
inline
| side by side (parent:
c085074
)
firmware upload to ram possible
author
hackbard
<hackbard@staubsauger.localdomain>
Sat, 4 Aug 2007 22:05:53 +0000
(
00:05
+0200)
committer
hackbard
<hackbard@staubsauger.localdomain>
Sat, 4 Aug 2007 22:05:53 +0000
(
00:05
+0200)
betty/lpcload.c
patch
|
blob
|
history
diff --git
a/betty/lpcload.c
b/betty/lpcload.c
index
905ebbd
..
6ec1186
100644
(file)
--- a/
betty/lpcload.c
+++ b/
betty/lpcload.c
@@
-1,8
+1,10
@@
/*
* lpcload.c - load firmware into ram of lpc2220 via uart0
*
/*
* lpcload.c - load firmware into ram of lpc2220 via uart0
*
- * author: hackbard@hackdaworld.org
+ * author: hackbard@hackdaworld.org
, rolf.anders@physik.uni-augsburg.de
*
*
+ * build: make
+ * usage: sudo ./lpcload -d /dev/ttyS0 -f firmware.hex [-v]
*/
#include <stdio.h>
*/
#include <stdio.h>
@@
-56,8
+58,6
@@
typedef struct s_lpc {
char fwfile[128]; /* firmware file */
u8 info; /* info/mode */
char freq[8]; /* frequency */
char fwfile[128]; /* firmware file */
u8 info; /* info/mode */
char freq[8]; /* frequency */
- int partid; /* part id */
- u8 bcv[2]; /* boot code version */
u32 hoff; /* start addr of ihex file */
u32 roff; /* ram offset of uc */
} t_lpc;
u32 hoff; /* start addr of ihex file */
u32 roff; /* ram offset of uc */
} t_lpc;
@@
-110,8
+110,8
@@
int open_serial_device(t_lpc *lpc) {
// input options -> enable flow control
//term.c_iflag&=~(IXON|IXOFF|IXANY|INLCR|ICRNL);
// input options -> enable flow control
//term.c_iflag&=~(IXON|IXOFF|IXANY|INLCR|ICRNL);
- term.c_iflag&=~(INLCR|ICRNL);
- term.c_iflag|=(IXON|IXOFF
|IXANY
);
+ term.c_iflag&=~(INLCR|ICRNL
|IXANY
);
+ term.c_iflag|=(IXON|IXOFF);
// more control options -> timeout / flow control
// more control options -> timeout / flow control
@@
-184,79
+184,68
@@
int txrx(t_lpc *lpc,char *buf,int len,u8 type) {
/* cut the echo if not of type auto baud */
if(type!=TXRX_TYPE_BAUD) {
/* cut the echo if not of type auto baud */
if(type!=TXRX_TYPE_BAUD) {
- while(cnt
>0
) {
+ while(cnt) {
ret=read(lpc->sfd,buf,cnt);
if(ret<0) {
perror("txrx echo cut");
return ret;
}
ret=read(lpc->sfd,buf,cnt);
if(ret<0) {
perror("txrx echo cut");
return ret;
}
- if(type==TXRX_TYPE_CKSM) {
- printf(" cksm resp: ");
- for(i=0;i<ret;i++)
- printf("%02x ",buf[i]);
- printf("\n");
- }
- for(i=0;i<ret;i++) {
- if(buf[i]==0x13)
- printf("STOP !!!\n");
- }
cnt-=ret;
}
}
/* return here if type is data */
cnt-=ret;
}
}
/* return here if type is data */
- if(type==TXRX_TYPE_DATA) {
- ret=1;
- while(ret) {
- ret=read(lpc->sfd,buf,BUFSIZE);
- for(i=0;i<ret;i++) {
- if(buf[i]!='\n') {
- printf("FATAL!!!\n");
- int j;
- for(j=0;j<ret;j++) printf("%02x ",buf[j]);
- printf("\n");
- }
- }
- }
+ if(type==TXRX_TYPE_DATA)
return cnt;
return cnt;
- }
-
- /* wait, if cksum has to be verified */
-
- //if(type==TXRX_TYPE_CKSM)
- // sleep(3);
/* read */
/* read */
- if(lpc->info&VERBOSE)
- printf(" << ");
+ ret=read(lpc->sfd,buf,1);
+ if(ret<0) {
+ perror("txrx read (first byte)");
+ return ret;
+ }
+
+ switch(buf[0]) {
+ case 'S':
+ cnt=13;
+ break;
+ case 'O':
+ cnt=3;
+ break;
+ case 'R':
+ cnt=7;
+ break;
+ case '0':
+ cnt=2;
+ break;
+ default:
+ printf("txrx read: bad return byte '%02x'\n",buf[0]);
+ break;
+ }
+
ret=1;
ret=1;
-
cnt=0
;
- while(
ret
) {
- ret=read(lpc->sfd,buf+
cnt,BUFSIZE-cnt
);
+
i=cnt
;
+ while(
i
) {
+ ret=read(lpc->sfd,buf+
1+cnt-i,i
);
if(ret<0) {
if(ret<0) {
- perror("txrx read");
+ perror("txrx read
(next bytes)
");
return ret;
}
return ret;
}
- if(ret+cnt>BUFSIZE) {
- printf("txrx read: too small buf size (%d)!\n",BUFSIZE);
- return -1;
- }
- if(lpc->info&VERBOSE)
- for(i=0;i<ret;i++)
- printf("%c",
- ((buf[cnt+i]>0x19)&(buf[cnt+i]<0x7f))?
- buf[cnt+i]:'.');
- cnt+=ret;
+ i-=ret;
}
if(lpc->info&VERBOSE) {
}
if(lpc->info&VERBOSE) {
+ printf(" << ");
+ for(i=0;i<cnt+1;i++)
+ printf("%c",((buf[i]>0x19)&(buf[i]<0x7f))?
+ buf[i]:'.');
printf(" | ");
printf(" | ");
- for(i=0;i<cnt;i++)
+ for(i=0;i<cnt
+1
;i++)
printf("%02x ",buf[i]);
printf("%02x ",buf[i]);
- printf("| (%d)\n",cnt);
+ printf("| (%d)\n",cnt
+1
);
}
}
- buf[cnt]='\0';
+ buf[cnt
+1
]='\0';
/* check/strip return code if type is cmd */
/* check/strip return code if type is cmd */
@@
-284,7
+273,7
@@
int bl_init(t_lpc *lpc) {
/* auto baud sequence */
buf[0]='?';
txrx(lpc,buf,1,TXRX_TYPE_BAUD);
/* auto baud sequence */
buf[0]='?';
txrx(lpc,buf,1,TXRX_TYPE_BAUD);
- if(strncmp(buf,"Synchronized
",12
)) {
+ if(strncmp(buf,"Synchronized
\r\n",14
)) {
printf("auto baud detection failed\n");
return -1;
}
printf("auto baud detection failed\n");
return -1;
}
@@
-310,32
+299,6
@@
int bl_init(t_lpc *lpc) {
return 0;
}
return 0;
}
-int read_part_id(t_lpc *lpc) {
-
- char buf[BUFSIZE];
-
- memcpy(buf,"J\r\n",3);
- txrx(lpc,buf,3,TXRX_TYPE_CMD);
- lpc->partid=atoi(buf);
-
- return lpc->partid;
-}
-
-int read_bcv(t_lpc *lpc) {
-
- char buf[BUFSIZE];
- char *ptr;
-
- memcpy(buf,"K\r\n",3);
- txrx(lpc,buf,3,TXRX_TYPE_CMD);
- ptr=strtok(buf,"\r\n");
- lpc->bcv[0]=strtol(ptr,NULL,16);
- ptr=strtok(NULL,"\r\n");
- lpc->bcv[1]=strtol(ptr,NULL,16);
-
- return 0;
-}
-
int unlock_go(t_lpc *lpc) {
char buf[BUFSIZE];
int unlock_go(t_lpc *lpc) {
char buf[BUFSIZE];
@@
-359,22
+322,13
@@
int go(t_lpc *lpc) {
return ret;
}
return ret;
}
-int uuencode(char *in,char *out) {
-
- int i;
-
- out[0]=0x20+((in[0]>>2)&0x3f);
- out[1]=0x20+(((in[0]<<4)|(in[1]>>4))&0x3f);
- out[2]=0x20+(((in[1]<<2)|(in[2]>>6))&0x3f);
- out[3]=0x20+(in[2]&0x3f);
+int uuencode(u8 *in,u8 *out,int len) {
- printf(" enc: ");
- for(i=0;i<3;i++)
- printf("%02x ",in[i]);
- printf("-> ");
- for(i=0;i<4;i++)
- printf("%02x ",out[i]);
- printf("\n");
+ out[0]=0x20+len;
+ out[1]=0x20+((in[0]>>2)&0x3f);
+ out[2]=0x20+(((in[0]<<4)|(in[1]>>4))&0x3f);
+ out[3]=0x20+(((in[1]<<2)|(in[2]>>6))&0x3f);
+ out[4]=0x20+(in[2]&0x3f);
return 0;
}
return 0;
}
@@
-413,10
+367,6
@@
int write_to_ram(t_lpc *lpc,char *buf,u32 addr,int len) {
/* send command and check return code */
txrx(lpc,txrxbuf,slen,TXRX_TYPE_CMD);
/* send command and check return code */
txrx(lpc,txrxbuf,slen,TXRX_TYPE_CMD);
- //if(strncmp(txrxbuf,"OK\r\n",4)) {
- // printf("ram write: write command failed\n");
- // return -1;
- //}
/* send data */
lcount=0;
/* send data */
lcount=0;
@@
-426,13
+376,12
@@
int write_to_ram(t_lpc *lpc,char *buf,u32 addr,int len) {
while(bcnt<nlen) {
/* uuencode / prepare data bytes */
while(bcnt<nlen) {
/* uuencode / prepare data bytes */
- uuencode(
buf+bcnt,txrxbuf
);
- txrxbuf[
4
]='\r';
- txrxbuf[
5
]='\n';
+ uuencode(
(u8 *)(buf+bcnt),(u8 *)(txrxbuf),bcnt==nlen-3?len%3:3
);
+ txrxbuf[
5
]='\r';
+ txrxbuf[
6
]='\n';
/* checksum */
/* checksum */
- checksum+=(buf[bcnt]+buf[bcnt+1]+buf[bcnt+2]);
- printf("----> %d %d\n",checksum,bcnt);
+ checksum+=((u8)buf[bcnt]+(u8)buf[bcnt+1]+(u8)buf[bcnt+2]);
/* send a data line */
txrx(lpc,txrxbuf,6,TXRX_TYPE_DATA);
/* send a data line */
txrx(lpc,txrxbuf,6,TXRX_TYPE_DATA);
@@
-444,11
+393,15
@@
int write_to_ram(t_lpc *lpc,char *buf,u32 addr,int len) {
/* checksum */
if((!(lcount%20))|(bcnt==nlen)) {
/* checksum */
if((!(lcount%20))|(bcnt==nlen)) {
+ /* send backtick */
+ memcpy(txrxbuf,"`\r\n",3);
+ //txrx(lpc,txrxbuf,3,TXRX_TYPE_DATA);
/* send checksum */
/* send checksum */
- snprintf(txrxbuf,BUFSIZE,"%d\r\n",checksum
%0x100
);
+ snprintf(txrxbuf,BUFSIZE,"%d\r\n",checksum);
slen=strlen(txrxbuf);
txrx(lpc,txrxbuf,slen,TXRX_TYPE_CKSM);
slen=strlen(txrxbuf);
txrx(lpc,txrxbuf,slen,TXRX_TYPE_CKSM);
- if(!strncmp(txrxbuf,"RESEND\r\n",8)) {
+ if(!strncmp(txrxbuf,"RESE",4)) {
+ read(lpc->sfd,txrxbuf+4,4);
printf("ram write: resending ...\n");
bcnt-=count;
}
printf("ram write: resending ...\n");
bcnt-=count;
}
@@
-470,9
+423,10
@@
int firmware_to_ram(t_lpc *lpc) {
char buf[BUFSIZE];
u32 addr,len,type;
char buf[BUFSIZE];
u32 addr,len,type;
- int ret;
+ int ret
,temp
;
/* read a line */
/* read a line */
+ ret=1;
while(ret) {
/* sync line */
ret=read(lpc->fwfd,buf,1);
while(ret) {
/* sync line */
ret=read(lpc->fwfd,buf,1);
@@
-504,14
+458,16
@@
int firmware_to_ram(t_lpc *lpc) {
/* successfull return if type is end of file */
if(type==0x01)
return 0;
/* successfull return if type is end of file */
if(type==0x01)
return 0;
- /* read data */
- ret=read(lpc->fwfd,buf,2*
len
);
- if(ret!=(2*
len
)) {
+ /* read data
(and cksum)
*/
+ ret=read(lpc->fwfd,buf,2*
(len+1)
);
+ if(ret!=(2*
(len+1)
)) {
printf("fw to ram: data missing\n");
return -1;
}
printf("fw to ram: data missing\n");
return -1;
}
- /* checksum */
- ret=read(lpc->fwfd,buf,2);
+ for(ret=0;ret<len;ret++) {
+ sscanf(buf+2*ret,"%02x",&temp);
+ buf[ret]=temp;
+ }
/* act according to type */
switch(type) {
case 0x03:
/* act according to type */
switch(type) {
case 0x03:
@@
-585,15
+541,8
@@
int main(int argc,char **argv) {
if(bl_init(&lpc)<0)
return -1;
if(bl_init(&lpc)<0)
return -1;
- /* read part id */
- read_part_id(&lpc);
- printf("part id: %d\n",lpc.partid);
-
- /* read boot code version */
- read_bcv(&lpc);
- printf("boot code version: %02x %02x\n",lpc.bcv[0],lpc.bcv[1]);
-
/* parse intel hex file and write to ram */
/* parse intel hex file and write to ram */
+ printf("write firmware to ram ...\n");
firmware_to_ram(&lpc);
/* unlock go cmd */
firmware_to_ram(&lpc);
/* unlock go cmd */