Christina Quast | b0a0570 | 2014-11-28 10:27:32 +0100 | [diff] [blame] | 1 | /* ----------------------------------------------------------------------------
|
| 2 | * ATMEL Microcontroller Software Support
|
| 3 | * ----------------------------------------------------------------------------
|
| 4 | * Copyright (c) 2009, Atmel Corporation
|
| 5 | *
|
| 6 | * All rights reserved.
|
| 7 | *
|
| 8 | * Redistribution and use in source and binary forms, with or without
|
| 9 | * modification, are permitted provided that the following conditions are met:
|
| 10 | *
|
| 11 | * - Redistributions of source code must retain the above copyright notice,
|
| 12 | * this list of conditions and the disclaimer below.
|
| 13 | *
|
| 14 | * Atmel's name may not be used to endorse or promote products derived from
|
| 15 | * this software without specific prior written permission.
|
| 16 | *
|
| 17 | * DISCLAIMER: THIS SOFTWARE IS PROVIDED BY ATMEL "AS IS" AND ANY EXPRESS OR
|
| 18 | * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF
|
| 19 | * MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NON-INFRINGEMENT ARE
|
| 20 | * DISCLAIMED. IN NO EVENT SHALL ATMEL BE LIABLE FOR ANY DIRECT, INDIRECT,
|
| 21 | * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT
|
| 22 | * LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA,
|
| 23 | * OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF
|
| 24 | * LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING
|
| 25 | * NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE,
|
| 26 | * EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
|
| 27 | * ----------------------------------------------------------------------------
|
| 28 | */
|
| 29 |
|
| 30 | /**
|
| 31 | * \file
|
| 32 | *
|
| 33 | * Provides the low-level initialization function that called on chip startup.
|
| 34 | */
|
| 35 |
|
| 36 | /*----------------------------------------------------------------------------
|
| 37 | * Headers
|
| 38 | *----------------------------------------------------------------------------*/
|
| 39 |
|
| 40 | #include "board.h"
|
Christina Quast | b0a0570 | 2014-11-28 10:27:32 +0100 | [diff] [blame] | 41 |
|
| 42 | /*----------------------------------------------------------------------------
|
| 43 | * Local definitions
|
| 44 | *----------------------------------------------------------------------------*/
|
| 45 |
|
Christina Quast | b0a0570 | 2014-11-28 10:27:32 +0100 | [diff] [blame] | 46 | #if (BOARD_MCK == 48000000)
|
Harald Welte | a02b641 | 2016-08-21 18:32:12 +0200 | [diff] [blame] | 47 | #ifndef qmod
|
| 48 | /* Clock settings at 48MHz for 18 MHz crystal */
|
Christina Quast | b0a0570 | 2014-11-28 10:27:32 +0100 | [diff] [blame] | 49 | #define BOARD_OSCOUNT (CKGR_MOR_MOSCXTST(0x8))
|
| 50 | #define BOARD_PLLAR (CKGR_PLLAR_STUCKTO1 \
|
Christina Quast | 530f208 | 2014-12-05 13:03:59 +0100 | [diff] [blame] | 51 | | CKGR_PLLAR_MULA(0xc) \
|
Christina Quast | b0a0570 | 2014-11-28 10:27:32 +0100 | [diff] [blame] | 52 | | CKGR_PLLAR_PLLACOUNT(0x1) \
|
Christina Quast | 530f208 | 2014-12-05 13:03:59 +0100 | [diff] [blame] | 53 | | CKGR_PLLAR_DIVA(0x5))
|
| 54 | #define BOARD_MCKR (PMC_MCKR_PRES_CLK | PMC_MCKR_CSS_PLLA_CLK)
|
Harald Welte | a02b641 | 2016-08-21 18:32:12 +0200 | [diff] [blame] | 55 | #else /* qmod */
|
Harald Welte | 7861132 | 2017-01-12 11:07:04 +0100 | [diff] [blame] | 56 | /* QMod has 12 MHz clock, so multply by 8 (96 MHz) and divide by 2 */
|
Harald Welte | a02b641 | 2016-08-21 18:32:12 +0200 | [diff] [blame] | 57 | #define BOARD_PLLAR (CKGR_PLLAR_STUCKTO1 \
|
Harald Welte | 7861132 | 2017-01-12 11:07:04 +0100 | [diff] [blame] | 58 | | CKGR_PLLAR_MULA(8-1) \
|
Harald Welte | a02b641 | 2016-08-21 18:32:12 +0200 | [diff] [blame] | 59 | | CKGR_PLLAR_PLLACOUNT(0x1) \
|
Harald Welte | 7861132 | 2017-01-12 11:07:04 +0100 | [diff] [blame] | 60 | | CKGR_PLLAR_DIVA(2))
|
Harald Welte | a02b641 | 2016-08-21 18:32:12 +0200 | [diff] [blame] | 61 | #define BOARD_MCKR (PMC_MCKR_PRES_CLK | PMC_MCKR_CSS_PLLA_CLK)
|
| 62 | #endif
|
Christina Quast | 530f208 | 2014-12-05 13:03:59 +0100 | [diff] [blame] | 63 | /* Clock settings at 64MHz for 18 MHz crystal */
|
Christina Quast | b0a0570 | 2014-11-28 10:27:32 +0100 | [diff] [blame] | 64 | #elif (BOARD_MCK == 64000000)
|
| 65 | #define BOARD_OSCOUNT (CKGR_MOR_MOSCXTST(0x8))
|
| 66 | #define BOARD_PLLAR (CKGR_PLLAR_STUCKTO1 \
|
Christina Quast | 530f208 | 2014-12-05 13:03:59 +0100 | [diff] [blame] | 67 | | CKGR_PLLAR_MULA(0x06) \
|
Christina Quast | b0a0570 | 2014-11-28 10:27:32 +0100 | [diff] [blame] | 68 | | CKGR_PLLAR_PLLACOUNT(0x1) \
|
Christina Quast | 530f208 | 2014-12-05 13:03:59 +0100 | [diff] [blame] | 69 | | CKGR_PLLAR_DIVA(0x2))
|
Christina Quast | b0a0570 | 2014-11-28 10:27:32 +0100 | [diff] [blame] | 70 | #define BOARD_MCKR (PMC_MCKR_PRES_CLK | PMC_MCKR_CSS_PLLA_CLK)
|
| 71 |
|
| 72 | #else
|
| 73 | #error "No settings for current BOARD_MCK."
|
| 74 | #endif
|
| 75 |
|
| 76 | /* Define clock timeout */
|
| 77 | #define CLOCK_TIMEOUT 0xFFFFFFFF
|
| 78 |
|
| 79 | /*----------------------------------------------------------------------------
|
| 80 | * Exported functions
|
| 81 | *----------------------------------------------------------------------------*/
|
| 82 |
|
| 83 | /**
|
| 84 | * \brief Performs the low-level initialization of the chip.
|
| 85 | * This includes EFC and master clock configuration.
|
| 86 | * It also enable a low level on the pin NRST triggers a user reset.
|
| 87 | */
|
Christina Quast | 8be71e4 | 2014-12-02 13:06:01 +0100 | [diff] [blame] | 88 | extern WEAK void LowLevelInit( void )
|
Christina Quast | b0a0570 | 2014-11-28 10:27:32 +0100 | [diff] [blame] | 89 | {
|
| 90 | uint32_t timeout = 0;
|
| 91 |
|
Harald Welte | 372f4cc | 2016-03-16 22:17:39 +0100 | [diff] [blame] | 92 | /* enable both LED and green LED */
|
| 93 | PIOA->PIO_PER |= LED_RED | LED_GREEN;
|
| 94 | PIOA->PIO_OER |= LED_RED | LED_GREEN;
|
| 95 | PIOA->PIO_CODR |= LED_RED | LED_GREEN;
|
Harald Welte | 7abdb51 | 2016-03-03 17:48:32 +0100 | [diff] [blame] | 96 |
|
Christina Quast | b0a0570 | 2014-11-28 10:27:32 +0100 | [diff] [blame] | 97 | /* Set 3 FWS for Embedded Flash Access */
|
| 98 | EFC->EEFC_FMR = EEFC_FMR_FWS(3);
|
| 99 |
|
| 100 | /* Select external slow clock */
|
Christina Quast | 8be71e4 | 2014-12-02 13:06:01 +0100 | [diff] [blame] | 101 | /* if ((SUPC->SUPC_SR & SUPC_SR_OSCSEL) != SUPC_SR_OSCSEL_CRYST)
|
Christina Quast | b0a0570 | 2014-11-28 10:27:32 +0100 | [diff] [blame] | 102 | {
|
| 103 | SUPC->SUPC_CR = (uint32_t)(SUPC_CR_XTALSEL_CRYSTAL_SEL | SUPC_CR_KEY(0xA5));
|
| 104 | timeout = 0;
|
| 105 | while (!(SUPC->SUPC_SR & SUPC_SR_OSCSEL_CRYST) );
|
| 106 | }
|
Christina Quast | 8be71e4 | 2014-12-02 13:06:01 +0100 | [diff] [blame] | 107 | */
|
Christina Quast | b0a0570 | 2014-11-28 10:27:32 +0100 | [diff] [blame] | 108 |
|
Harald Welte | a02b641 | 2016-08-21 18:32:12 +0200 | [diff] [blame] | 109 | #ifndef qmod
|
Christina Quast | b0a0570 | 2014-11-28 10:27:32 +0100 | [diff] [blame] | 110 | /* Initialize main oscillator */
|
Harald Welte | 5e00400 | 2016-03-16 20:40:19 +0100 | [diff] [blame] | 111 | if ( !(PMC->CKGR_MOR & CKGR_MOR_MOSCSEL) )
|
Christina Quast | b0a0570 | 2014-11-28 10:27:32 +0100 | [diff] [blame] | 112 | {
|
| 113 | PMC->CKGR_MOR = CKGR_MOR_KEY(0x37) | BOARD_OSCOUNT | CKGR_MOR_MOSCRCEN | CKGR_MOR_MOSCXTEN;
|
| 114 | timeout = 0;
|
| 115 | while (!(PMC->PMC_SR & PMC_SR_MOSCXTS) && (timeout++ < CLOCK_TIMEOUT));
|
Harald Welte | 5e00400 | 2016-03-16 20:40:19 +0100 | [diff] [blame] | 116 | }
|
Christina Quast | b0a0570 | 2014-11-28 10:27:32 +0100 | [diff] [blame] | 117 |
|
| 118 | /* Switch to 3-20MHz Xtal oscillator */
|
Harald Welte | 5e00400 | 2016-03-16 20:40:19 +0100 | [diff] [blame] | 119 | PIOB->PIO_PDR = (1 << 8) | (1 << 9);
|
| 120 | PIOB->PIO_PUDR = (1 << 8) | (1 << 9);
|
| 121 | PIOB->PIO_PPDDR = (1 << 8) | (1 << 9);
|
Christina Quast | b0a0570 | 2014-11-28 10:27:32 +0100 | [diff] [blame] | 122 | PMC->CKGR_MOR = CKGR_MOR_KEY(0x37) | BOARD_OSCOUNT | CKGR_MOR_MOSCRCEN | CKGR_MOR_MOSCXTEN | CKGR_MOR_MOSCSEL;
|
Harald Welte | 4678388 | 2016-02-29 19:45:59 +0100 | [diff] [blame] | 123 | /* wait for Main XTAL oscillator stabilization */
|
Christina Quast | b0a0570 | 2014-11-28 10:27:32 +0100 | [diff] [blame] | 124 | timeout = 0;
|
| 125 | while (!(PMC->PMC_SR & PMC_SR_MOSCSELS) && (timeout++ < CLOCK_TIMEOUT));
|
Harald Welte | a02b641 | 2016-08-21 18:32:12 +0200 | [diff] [blame] | 126 | #else
|
| 127 | /* QMOD has external 12MHz clock source */
|
| 128 | PIOB->PIO_PDR = (1 << 9);
|
| 129 | PIOB->PIO_PUDR = (1 << 9);
|
| 130 | PIOB->PIO_PPDDR = (1 << 9);
|
| 131 | PMC->CKGR_MOR = CKGR_MOR_KEY(0x37) | CKGR_MOR_MOSCRCEN | CKGR_MOR_MOSCXTBY| CKGR_MOR_MOSCSEL;
|
| 132 | #endif
|
Harald Welte | 4678388 | 2016-02-29 19:45:59 +0100 | [diff] [blame] | 133 |
|
Harald Welte | 372f4cc | 2016-03-16 22:17:39 +0100 | [diff] [blame] | 134 | /* disable the red LED after main clock initialization */
|
| 135 | PIOA->PIO_SODR = LED_RED;
|
Harald Welte | 7abdb51 | 2016-03-03 17:48:32 +0100 | [diff] [blame] | 136 |
|
Harald Welte | 4678388 | 2016-02-29 19:45:59 +0100 | [diff] [blame] | 137 | /* "switch" to main clock as master clock source (should already be the case */
|
Christina Quast | b0a0570 | 2014-11-28 10:27:32 +0100 | [diff] [blame] | 138 | PMC->PMC_MCKR = (PMC->PMC_MCKR & ~(uint32_t)PMC_MCKR_CSS_Msk) | PMC_MCKR_CSS_MAIN_CLK;
|
Harald Welte | 4678388 | 2016-02-29 19:45:59 +0100 | [diff] [blame] | 139 | /* wait for master clock to be ready */
|
Christina Quast | b0a0570 | 2014-11-28 10:27:32 +0100 | [diff] [blame] | 140 | for ( timeout = 0; !(PMC->PMC_SR & PMC_SR_MCKRDY) && (timeout++ < CLOCK_TIMEOUT) ; );
|
| 141 |
|
| 142 | /* Initialize PLLA */
|
| 143 | PMC->CKGR_PLLAR = BOARD_PLLAR;
|
Harald Welte | 4678388 | 2016-02-29 19:45:59 +0100 | [diff] [blame] | 144 | /* Wait for PLLA to lock */
|
Christina Quast | b0a0570 | 2014-11-28 10:27:32 +0100 | [diff] [blame] | 145 | timeout = 0;
|
| 146 | while (!(PMC->PMC_SR & PMC_SR_LOCKA) && (timeout++ < CLOCK_TIMEOUT));
|
| 147 |
|
Harald Welte | 4678388 | 2016-02-29 19:45:59 +0100 | [diff] [blame] | 148 | /* Switch to main clock (again ?!?) */
|
Christina Quast | b0a0570 | 2014-11-28 10:27:32 +0100 | [diff] [blame] | 149 | PMC->PMC_MCKR = (BOARD_MCKR & ~PMC_MCKR_CSS_Msk) | PMC_MCKR_CSS_MAIN_CLK;
|
Harald Welte | 4678388 | 2016-02-29 19:45:59 +0100 | [diff] [blame] | 150 | /* wait for master clock to be ready */
|
Christina Quast | b0a0570 | 2014-11-28 10:27:32 +0100 | [diff] [blame] | 151 | for ( timeout = 0; !(PMC->PMC_SR & PMC_SR_MCKRDY) && (timeout++ < CLOCK_TIMEOUT) ; );
|
| 152 |
|
Harald Welte | 4678388 | 2016-02-29 19:45:59 +0100 | [diff] [blame] | 153 | /* switch to PLLA as master clock source */
|
Christina Quast | b0a0570 | 2014-11-28 10:27:32 +0100 | [diff] [blame] | 154 | PMC->PMC_MCKR = BOARD_MCKR ;
|
Harald Welte | 4678388 | 2016-02-29 19:45:59 +0100 | [diff] [blame] | 155 | /* wait for master clock to be ready */
|
Christina Quast | b0a0570 | 2014-11-28 10:27:32 +0100 | [diff] [blame] | 156 | for ( timeout = 0; !(PMC->PMC_SR & PMC_SR_MCKRDY) && (timeout++ < CLOCK_TIMEOUT) ; );
|
| 157 | }
|