MSP430F5xx stuff; 1xx support is probably broken right now.
[goodfet] / firmware / apps / jtag / jtag430x2.c
1 /*! \file jtag430x2.c
2   \author Travis Goodspeed <travis at radiantmachines.com>
3   
4   This is an implementation of the MSP430X2 JTAG protocol
5   for the GoodFET project at http://goodfet.sf.net/
6   
7   See the license file for details of proper use.
8 */
9
10 #include "platform.h"
11 #include "command.h"
12 #include "jtag.h"
13
14 unsigned char jtagid;
15
16 //! Get the JTAG ID
17 unsigned char jtag430x2_jtagid(){
18   jtag430_resettap();
19   return jtagid=jtag_ir_shift8(IR_BYPASS);
20 }
21 //! Start JTAG, take pins
22 unsigned char jtag430x2_start(){
23   jtagsetup();
24   
25   //Known-good starting position.
26   //Might be unnecessary.
27   SETTST;
28   SETRST;
29   
30   delay(0xFFFF);
31   
32   //Entry sequence from Page 67 of SLAU265A for 4-wire MSP430 JTAG
33   CLRRST;
34   delay(10);
35   CLRTST;
36
37   delay(5);
38   SETTST;
39   msdelay(5);
40   SETRST;
41   P5DIR&=~RST;
42   
43   delay(0xFFFF);
44   
45   //Perform a reset and disable watchdog.
46   return jtag430x2_jtagid();
47 }
48
49 //! Grab the core ID.
50 unsigned int jtag430_coreid(){
51   jtag_ir_shift8(IR_COREIP_ID);
52   return jtag_dr_shift16(0);
53 }
54
55 //! Grab the device ID.
56 unsigned long jtag430_deviceid(){
57   jtag_ir_shift8(IR_DEVICE_ID);
58   return jtag_dr_shift20(0);
59 }
60
61
62 //! Write data to address
63 void jtag430x2_writemem(unsigned long adr,
64                         unsigned int data){
65   jtag_ir_shift8(IR_CNTRL_SIG_CAPTURE);
66   if(jtag_dr_shift16(0) & 0x0301){
67     CLRTCLK;
68     jtag_ir_shift8(IR_CNTRL_SIG_16BIT);
69     if(adr>=0x100)
70       jtag_dr_shift16(0x0500);//word mode
71     else
72       jtag_dr_shift16(0x0510);//byte mode
73     jtag_ir_shift8(IR_ADDR_16BIT);
74     jtag_dr_shift20(adr);
75     
76     SETTCLK;
77     
78     jtag_ir_shift8(IR_DATA_TO_ADDR);
79     jtag_dr_shift16(data);//16 word
80
81     CLRTCLK;
82     jtag_ir_shift8(IR_CNTRL_SIG_16BIT);
83     jtag_dr_shift16(0x0501);
84     SETTCLK;
85
86     CLRTCLK;
87     SETTCLK;
88     //init state
89   }else{
90     while(1) P1OUT^=1; //loop if locked up
91   }
92 }
93
94 //! Read data from address
95 unsigned int jtag430x2_readmem(unsigned long adr){
96   unsigned int toret=0;
97   
98   do{
99     jtag_ir_shift8(IR_CNTRL_SIG_CAPTURE);
100   }while(!(jtag_dr_shift16(0) & 0x0301));
101   
102   if(jtag_dr_shift16(0) & 0x0301){
103     // Read Memory
104     CLRTCLK;
105     jtag_ir_shift8(IR_CNTRL_SIG_16BIT);
106     if(adr>=0x100){
107       jtag_dr_shift16(0x0501);//word read
108     }else{
109       jtag_dr_shift16(0x0511);//byte read
110     }
111     
112     jtag_ir_shift8(IR_ADDR_16BIT);
113     jtag_dr_shift20(adr); //20
114
115     jtag_ir_shift8(IR_DATA_TO_ADDR);
116     SETTCLK;
117     CLRTCLK;
118     toret = jtag_dr_shift16(0x0000);
119     
120     SETTCLK;
121     
122     //Cycle a bit.
123     CLRTCLK;
124     SETTCLK;
125   }else{
126     return 0xBABE;
127   }
128   
129   return toret;
130 }
131
132 //! Syncs a POR.
133 unsigned int jtag430x2_syncpor(){
134   jtag_ir_shift8(IR_CNTRL_SIG_16BIT);
135   jtag_dr_shift16(0x1501); //JTAG mode
136   while(!(jtag_dr_shift16(0) & 0x200));
137   return jtag430x2_por();
138 }
139
140 //! Executes an MSP430X2 POR
141 unsigned int jtag430x2_por(){
142   unsigned int i = 0;
143   
144   // tick
145   CLRTCLK;
146   SETTCLK;
147
148   jtag_ir_shift8(IR_CNTRL_SIG_16BIT);
149   jtag_dr_shift16(0x0C01);
150   jtag_dr_shift16(0x0401);
151   
152   //cycle
153   for (i = 0; i < 10; i++){
154     CLRTCLK;
155     SETTCLK;
156   }
157   
158   jtag_dr_shift16(0x0501);
159   
160   // tick
161   CLRTCLK;
162   SETTCLK;
163   
164   
165   // Disable WDT
166   jtag430x2_writemem(0x015C, 0x5A80);
167   
168   // check state
169   jtag_ir_shift8(IR_CNTRL_SIG_CAPTURE);
170   if(jtag_dr_shift16(0) & 0x0301)
171     return(1);//ok
172   
173   return 0;//error
174 }
175
176
177 //! Check the fuse.
178 unsigned int jtag430x2_fusecheck(){
179   int i;
180   for(i=0;i<3;i++){
181     jtag_ir_shift8(IR_CNTRL_SIG_CAPTURE);
182     if(jtag_dr_shift16(0xAAAA)==0x5555)
183       return 1;//blown
184   }
185   return 0;//unblown
186 }
187
188
189 //! Handles MSP430X2 JTAG commands.  Forwards others to JTAG.
190 void jtag430x2handle(unsigned char app,
191                      unsigned char verb,
192                      unsigned char len){
193   register char blocks;
194   
195   unsigned int i,val;
196   unsigned long at;
197   
198   //jtag430_resettap();
199   
200   switch(verb){
201   case START:
202     //Enter JTAG mode.
203     do cmddata[0]=jtag430x2_start();
204     while(cmddata[0]==00 || cmddata[0]==0xFF);
205     
206     //MSP430 or MSP430X
207     if(jtagid==MSP430JTAGID){ 
208       jtag430mode=MSP430MODE;
209       drwidth=16;
210     }else if(jtagid==MSP430X2JTAGID){
211       jtag430mode=MSP430X2MODE;
212       drwidth=20;
213     }else{
214       txdata(app,NOK,1);
215       return;
216     }
217     
218     jtag430x2_fusecheck();
219         
220     jtag430x2_syncpor();
221     
222     jtag430_resettap();
223     
224     txdata(app,verb,1);
225     break;
226   case JTAG430_READMEM:
227   case PEEK:
228     blocks=(len>4?cmddata[4]:1);
229     at=cmddatalong[0];
230     
231     /*
232     cmddataword[0]=jtag430x2_readmem(at);
233     txdata(app,verb,2);
234     break;
235     */
236     
237     len=0x80;
238     serial_tx(app);
239     serial_tx(verb);
240     serial_tx(len);
241     
242     while(blocks--){
243       for(i=0;i<len;i+=2){
244         jtag430_resettap();
245         delay(10);
246         
247         val=jtag430x2_readmem(at);
248                 
249         at+=2;
250         serial_tx(val&0xFF);
251         serial_tx((val&0xFF00)>>8);
252       }
253     }
254     
255     break;
256   case JTAG430_COREIP_ID:
257     cmddataword[0]=jtag430_coreid();
258     txdata(app,verb,2);
259     break;
260   case JTAG430_DEVICE_ID:
261     cmddatalong[0]=jtag430_deviceid();
262     txdata(app,verb,4);
263     break;
264   case JTAG430_HALTCPU:
265     //jtag430x2_haltcpu();
266     break;
267   case JTAG430_RELEASECPU:
268   case JTAG430_SETINSTRFETCH:
269   case JTAG430_WRITEMEM:
270   case POKE:
271     jtag430x2_writemem(cmddatalong[0],
272                        cmddataword[2]);
273     cmddataword[0]=jtag430x2_readmem(cmddatalong[0]);
274     txdata(app,verb,2);
275     break;
276   case JTAG430_WRITEFLASH:
277   case JTAG430_ERASEFLASH:
278   case JTAG430_SETPC:
279   default:
280     jtaghandle(app,verb,len);
281   }
282   jtag430_resettap();
283 }