MG51使用UART0实现ISP

/*---------------------------------------------------------------------------------------------------------*/

/*                                                                                                         */

/* SPDX-License-Identifier: Apache-2.0                                                                     */

/* Copyright(c) 2023 Nuvoton Technology Corp. All rights reserved.                                         */

/*                                                                                                         */

/*---------------------------------------------------------------------------------------------------------*/







//***********************************************************************************************************

//  File Function: ML51 UART0 ISP demo code

//***********************************************************************************************************

#include "MG51_SDCC.H"

#include "isp_uart0.h"



//#define  isp_with_wdt

unsigned int __xdata start_address,u16_addr;



void Serial_ISR(void) __interrupt (4)

{

    PUSH_SFRS;



    if (RI == 1)

    {

        uart_rcvbuf[bufhead++] =  SBUF;

        clr_SCON_RI;                                         // Clear RI (Receive Interrupt).

    }

    if (TI == 1)

    {

        clr_SCON_TI;                                         // Clear TI (Transmit Interrupt).

    }

    if (bufhead == 1)

    {

        g_timer1Over = 0;

        g_timer1Counter = 90; //for check uart timeout using

    }

    if (bufhead == 64)

    {

        bUartDataReady = TRUE;

        g_timer1Counter = 0;

        g_timer1Over = 0;

        bufhead = 0;

    }

    POP_SFRS;

}



void Timer0_ISR(void) __interrupt (1)

{

    PUSH_SFRS;

    if (g_timer0Counter)

    {

        g_timer0Counter--;

        if (!g_timer0Counter)

        {

            g_timer0Over = 1;

        }

    }

    if (g_timer1Counter)

    {

        g_timer1Counter--;

        if (!g_timer1Counter)

        {

            g_timer1Over = 1;

        }

    }

    POP_SFRS;

}



/************************************************************************************************************

*    Main function 

************************************************************************************************************/

void main (void)

{



  set_CHPCON_IAPEN;

  MODIFY_HIRC_24();

#ifdef  isp_with_wdt

  TA=0x55;TA=0xAA;WDCON=0x07;

#endif

//uart initial for ISP programmer GUI, always use 115200 baudrate

  UART0_ini_115200_24MHz();

  TM0_ini();



  g_timer0Over=0;

  g_timer0Counter=Timer0Out_Counter;

  g_programflag=0;



while(1)

{

        if(bUartDataReady == TRUE)

        {

          EA=0; //DISABLE ALL INTERRUPT

          if(g_programflag==1)

          {

            for(count=8;count<64;count++)

            {

//              g_timer0Counter=Timer0Out_Counter;

              IAPCN = BYTE_PROGRAM_AP;          //program byte

              IAPAL = flash_address&0xff;

              IAPAH = (flash_address>>8)&0xff;

              IAPFD=uart_rcvbuf[count];

#ifdef isp_with_wdt

              set_IAPTRG_IAPGO_WDCLR;

#else

              set_IAPTRG_IAPGO;

#endif

          

              IAPCN = BYTE_READ_AP;              //program byte verify

              if(IAPFD!=uart_rcvbuf[count])

              while(1);                          

              if (CHPCON==0x43)              //if error flag set, program error stop ISP

              while(1);

              

              g_totalchecksum=g_totalchecksum+uart_rcvbuf[count];

              flash_address++;

  

              if(flash_address==AP_size)

              {

                 g_programflag=0;

                 g_timer0Over =1;

                 goto END_2;

              }

            } 

END_2:

            Package_checksum();

            uart_txbuf[8]=g_totalchecksum&0xff;

            uart_txbuf[9]=(g_totalchecksum>>8)&0xff;

            Send_64byte_To_UART0();

          }

            

          switch(uart_rcvbuf[0])

          {

            case CMD_CONNECT:

            case CMD_SYNC_PACKNO:

            {

              Package_checksum();

              Send_64byte_To_UART0();    

              g_timer0Counter=0; //clear timer 0 for no reset

              g_timer0Over=0;

              break;

            }



            case CMD_GET_FWVER:

            {

              Package_checksum();

              uart_txbuf[8]=FW_VERSION;

              Send_64byte_To_UART0();

              break;

            }

            

            case CMD_RUN_APROM:

            {

              goto _APROM;

              break;

            }



            //please for ISP programmer GUI, ID always use following rule to transmit.

            case CMD_GET_DEVICEID:

            {

              READ_ID();

              Package_checksum();

              uart_txbuf[8]=DID_lowB;  

              uart_txbuf[9]=DID_highB;  

              uart_txbuf[10]=PID_lowB;  

              uart_txbuf[11]=PID_highB;  

              Send_64byte_To_UART0();  

              break;

            }



            case CMD_ERASE_ALL:

            {

              set_IAPUEN_APUEN;

              IAPFD = 0xFF;          //Erase must set IAPFD = 0xFF

              IAPCN = PAGE_ERASE_AP;

              for(flash_address=0x0000;flash_address<APROM_SIZE/PAGE_SIZE;flash_address++)

              {        

                IAPAL = LOBYTE(flash_address*PAGE_SIZE);

                IAPAH = HIBYTE(flash_address*PAGE_SIZE);

#ifdef isp_with_wdt

              set_IAPTRG_IAPGO_WDCLR;

#else

              set_IAPTRG_IAPGO;

#endif

              }

              Package_checksum();

              Send_64byte_To_UART0();  

              break;

            }



            case CMD_READ_CONFIG:

            {

              READ_CONFIG();

              Package_checksum();

              uart_txbuf[8]=CONF0;

              uart_txbuf[9]=CONF1;

              uart_txbuf[10]=CONF2;

              uart_txbuf[11]=0xff;

              uart_txbuf[12]=CONF4;

              uart_txbuf[13]=0xff;

              uart_txbuf[14]=0xff;

              uart_txbuf[15]=0xff;

              Send_64byte_To_UART0();

            break;

            }

            

            case CMD_UPDATE_CONFIG:

            {

              recv_CONF0 = uart_rcvbuf[8];

              recv_CONF1 = uart_rcvbuf[9];

              recv_CONF2 = uart_rcvbuf[10];

              recv_CONF4 = uart_rcvbuf[12];



              set_IAPUEN_CFUEN;                  /*Erase CONFIG */

              IAPCN = PAGE_ERASE_CONFIG;

              IAPAL = 0x00;

              IAPAH = 0x00;

              IAPFD = 0xFF;

#ifdef isp_with_wdt

              set_IAPTRG_IAPGO_WDCLR;

#else

              set_IAPTRG_IAPGO;

#endif

              IAPCN = BYTE_PROGRAM_CONFIG;        /*Program CONFIG*/ 

              IAPFD = recv_CONF0;

#ifdef isp_with_wdt

              set_IAPTRG_IAPGO_WDCLR;

#else

              set_IAPTRG_IAPGO;

#endif

              IAPFD = recv_CONF1;

              IAPAL = 0x01;

#ifdef isp_with_wdt

              set_IAPTRG_IAPGO_WDCLR;

#else

              set_IAPTRG_IAPGO;

#endif

              IAPAL = 0x02;

              IAPFD = recv_CONF2;

  #ifdef isp_with_wdt

              set_IAPTRG_IAPGO_WDCLR;

#else

              set_IAPTRG_IAPGO;

#endif

              IAPAL = 0x04;

              IAPFD = recv_CONF4;

#ifdef isp_with_wdt

              set_IAPTRG_IAPGO_WDCLR;

#else

              set_IAPTRG_IAPGO;

#endif

              clr_IAPUEN_CFUEN;



              READ_CONFIG();                        /*Read new CONFIG*/  

              Package_checksum();

              uart_txbuf[8]=CONF0;

              uart_txbuf[9]=CONF1;

              uart_txbuf[10]=CONF2;

              uart_txbuf[11]=0xff;

              uart_txbuf[12]=CONF4;

              uart_txbuf[13]=0xff;

              uart_txbuf[14]=0xff;

              uart_txbuf[15]=0xff;

              Send_64byte_To_UART0();

              break;

            }



            case CMD_UPDATE_APROM:

            {

//              g_timer0Counter=Timer0Out_Counter;

              set_IAPUEN_APUEN;

              IAPFD = 0xFF;          //Erase must set IAPFD = 0xFF

              IAPCN = PAGE_ERASE_AP;

              

              start_address = 0;

              start_address = uart_rcvbuf[8];

              start_address |= ((uart_rcvbuf[9]<<8)&0xFF00);

              AP_size = 0;

              AP_size = uart_rcvbuf[12];

              AP_size |= ((uart_rcvbuf[13]<<8)&0xFF00);



              u16_addr = start_address + AP_size;

              flash_address = (start_address&0xFF00);

 

              while(flash_address< u16_addr)

              {

                IAPAL = LOBYTE(flash_address);

                IAPAH = HIBYTE(flash_address);

#ifdef isp_with_wdt

                set_IAPTRG_IAPGO_WDCLR;

#else

                set_IAPTRG_IAPGO;

#endif

                flash_address += PAGE_SIZE;

              }

              

              g_totalchecksum = 0;

              flash_address = start_address;

              g_programflag = 1;



              for(count=16;count<64;count++)

              {

                IAPCN = BYTE_PROGRAM_AP;

                IAPAL = flash_address&0xff;

                IAPAH = (flash_address>>8)&0xff;

                IAPFD = uart_rcvbuf[count];

#ifdef isp_with_wdt

              set_IAPTRG_IAPGO_WDCLR;

#else

              set_IAPTRG_IAPGO;

#endif

                IAPCN = BYTE_READ_AP;                //program byte verify

                set_IAPTRG_IAPGO;



                if(IAPFD!=uart_rcvbuf[count])

                while(1);

                if (CHPCON==0x43)                //if error flag set, program error stop ISP

                while(1);

                

                g_totalchecksum=g_totalchecksum+uart_rcvbuf[count];

                flash_address++;



                if(flash_address==AP_size)

                {

                  g_programflag=0;

                   goto END_1;

                }

              }

END_1:                

              Package_checksum();

              uart_txbuf[8]=g_totalchecksum&0xff;

              uart_txbuf[9]=(g_totalchecksum>>8)&0xff;

              Send_64byte_To_UART0();  

              break;

            }

          }  

          bUartDataReady = FALSE;

          bufhead = 0;



          EA=1;

      }

      /*For connect timer out   */

      if(g_timer0Over==1)

      {

        CALL_NOP;

        goto _APROM;

      }

      

      /*for uart time out or buffer error  */

       if(g_timer1Over==1)

      {

       if((bufhead<64)&&(bufhead>0)||(bufhead>64))

         {

             bufhead=0;

         }

      }  

}   



_APROM:

    EA=0;

    MODIFY_HIRC_16();

    clr_CHPCON_IAPEN;

    TA = 0xAA; TA = 0x55; CHPCON = 0x80;                   //software reset enable boot from APROM

    /* Trap the CPU */

    while(1);  

}