1
0
mirror of https://github.com/arduino/Arduino.git synced 2024-12-04 15:24:12 +01:00
Arduino/hardware/arduino/sam/system/libsam/source/pmc.c
2012-04-28 11:49:28 +02:00

1048 lines
23 KiB
C

/* ----------------------------------------------------------------------------
* SAM Software Package License
* ----------------------------------------------------------------------------
* Copyright (c) 2012, Atmel Corporation
*
* All rights reserved.
*
* Redistribution and use in source and binary forms, with or without
* modification, are permitted provided that the following conditions are met:
*
* - Redistributions of source code must retain the above copyright notice,
* this list of conditions and the disclaimer below.
*
* Atmel's name may not be used to endorse or promote products derived from
* this software without specific prior written permission.
*
* DISCLAIMER: THIS SOFTWARE IS PROVIDED BY ATMEL "AS IS" AND ANY EXPRESS OR
* IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF
* MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NON-INFRINGEMENT ARE
* DISCLAIMED. IN NO EVENT SHALL ATMEL BE LIABLE FOR ANY DIRECT, INDIRECT,
* INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT
* LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA,
* OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF
* LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING
* NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE,
* EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
* ----------------------------------------------------------------------------
*/
#include "chip.h"
#if (SAM3N_SERIES)
# define MAX_PERIPH_ID 31
#elif (SAM3XA_SERIES)
# define MAX_PERIPH_ID 44
#elif (SAM3U_SERIES)
# define MAX_PERIPH_ID 29
#elif (SAM3S_SERIES || SAM4S_SERIES)
# define MAX_PERIPH_ID 34
#endif
/// @cond 0
/**INDENT-OFF**/
#ifdef __cplusplus
extern "C" {
#endif
/**INDENT-ON**/
/// @endcond
/**
* \defgroup sam_drivers_pmc_group Power Management Controller (PMC)
*
* \par Purpose
*
* The Power Management Controller (PMC) optimizes power consumption by controlling
* all system and user peripheral clocks. The PMC enables/disables the clock inputs
* to many of the peripherals and the Cortex-M Processor.
*
* @{
*/
/**
* \brief Set the prescaler of the MCK.
*
* \param ul_pres Prescaler value.
*/
void pmc_mck_set_prescaler(uint32_t ul_pres)
{
PMC->PMC_MCKR =
(PMC->PMC_MCKR & (~PMC_MCKR_PRES_Msk)) | ul_pres;
while (!(PMC->PMC_SR & PMC_SR_MCKRDY));
}
/**
* \brief Set the source of the MCK.
*
* \param ul_source Source selection value.
*/
void pmc_mck_set_source(uint32_t ul_source)
{
PMC->PMC_MCKR =
(PMC->PMC_MCKR & (~PMC_MCKR_CSS_Msk)) | ul_source;
while (!(PMC->PMC_SR & PMC_SR_MCKRDY));
}
/**
* \brief Switch master clock source selection to slow clock.
*
* \param ul_pres Processor clock prescaler.
*
* \retval 0 Success.
* \retval 1 Timeout error.
*/
uint32_t pmc_switch_mck_to_sclk(uint32_t ul_pres)
{
uint32_t ul_timeout;
PMC->PMC_MCKR = (PMC->PMC_MCKR & (~PMC_MCKR_CSS_Msk)) | PMC_MCKR_CSS_SLOW_CLK;
for (ul_timeout = PMC_TIMEOUT; !(PMC->PMC_SR & PMC_SR_MCKRDY); --ul_timeout) {
if (ul_timeout == 0) {
return 1;
}
}
PMC->PMC_MCKR = (PMC->PMC_MCKR & (~PMC_MCKR_PRES_Msk)) | ul_pres;
for (ul_timeout = PMC_TIMEOUT; !(PMC->PMC_SR & PMC_SR_MCKRDY); --ul_timeout) {
if (ul_timeout == 0) {
return 1;
}
}
return 0;
}
/**
* \brief Switch master clock source selection to main clock.
*
* \param ul_pres Processor clock prescaler.
*
* \retval 0 Success.
* \retval 1 Timeout error.
*/
uint32_t pmc_switch_mck_to_mainck(uint32_t ul_pres)
{
uint32_t ul_timeout;
PMC->PMC_MCKR = (PMC->PMC_MCKR & (~PMC_MCKR_CSS_Msk)) |
PMC_MCKR_CSS_MAIN_CLK;
for (ul_timeout = PMC_TIMEOUT; !(PMC->PMC_SR & PMC_SR_MCKRDY);
--ul_timeout) {
if (ul_timeout == 0) {
return 1;
}
}
PMC->PMC_MCKR = (PMC->PMC_MCKR & (~PMC_MCKR_PRES_Msk)) | ul_pres;
for (ul_timeout = PMC_TIMEOUT; !(PMC->PMC_SR & PMC_SR_MCKRDY);
--ul_timeout) {
if (ul_timeout == 0) {
return 1;
}
}
return 0;
}
/**
* \brief Switch master clock source selection to PLLA clock.
*
* \param ul_pres Processor clock prescaler.
*
* \retval 0 Success.
* \retval 1 Timeout error.
*/
uint32_t pmc_switch_mck_to_pllack(uint32_t ul_pres)
{
uint32_t ul_timeout;
PMC->PMC_MCKR = (PMC->PMC_MCKR & (~PMC_MCKR_PRES_Msk)) | ul_pres;
for (ul_timeout = PMC_TIMEOUT; !(PMC->PMC_SR & PMC_SR_MCKRDY);
--ul_timeout) {
if (ul_timeout == 0) {
return 1;
}
}
PMC->PMC_MCKR = (PMC->PMC_MCKR & (~PMC_MCKR_CSS_Msk)) |
PMC_MCKR_CSS_PLLA_CLK;
for (ul_timeout = PMC_TIMEOUT; !(PMC->PMC_SR & PMC_SR_MCKRDY);
--ul_timeout) {
if (ul_timeout == 0) {
return 1;
}
}
return 0;
}
#if (SAM3S_SERIES || SAM4S_SERIES)
/**
* \brief Switch master clock source selection to PLLB clock.
*
* \param ul_pres Processor clock prescaler.
*
* \retval 0 Success.
* \retval 1 Timeout error.
*/
uint32_t pmc_switch_mck_to_pllbck(uint32_t ul_pres)
{
uint32_t ul_timeout;
PMC->PMC_MCKR = (PMC->PMC_MCKR & (~PMC_MCKR_PRES_Msk)) | ul_pres;
for (ul_timeout = PMC_TIMEOUT; !(PMC->PMC_SR & PMC_SR_MCKRDY);
--ul_timeout) {
if (ul_timeout == 0) {
return 1;
}
}
PMC->PMC_MCKR = (PMC->PMC_MCKR & (~PMC_MCKR_CSS_Msk)) |
PMC_MCKR_CSS_PLLB_CLK;
for (ul_timeout = PMC_TIMEOUT; !(PMC->PMC_SR & PMC_SR_MCKRDY);
--ul_timeout) {
if (ul_timeout == 0) {
return 1;
}
}
return 0;
}
#endif
#if (SAM3XA_SERIES || SAM3U_SERIES)
/**
* \brief Switch master clock source selection to UPLL clock.
*
* \param ul_pres Processor clock prescaler.
*
* \retval 0 Success.
* \retval 1 Timeout error.
*/
uint32_t pmc_switch_mck_to_upllck(uint32_t ul_pres)
{
uint32_t ul_timeout;
PMC->PMC_MCKR = (PMC->PMC_MCKR & (~PMC_MCKR_PRES_Msk)) | ul_pres;
for (ul_timeout = PMC_TIMEOUT; !(PMC->PMC_SR & PMC_SR_MCKRDY);
--ul_timeout) {
if (ul_timeout == 0) {
return 1;
}
}
PMC->PMC_MCKR = (PMC->PMC_MCKR & (~PMC_MCKR_CSS_Msk)) |
PMC_MCKR_CSS_UPLL_CLK;
for (ul_timeout = PMC_TIMEOUT; !(PMC->PMC_SR & PMC_SR_MCKRDY);
--ul_timeout) {
if (ul_timeout == 0) {
return 1;
}
}
return 0;
}
#endif
/**
* \brief Switch slow clock source selection to external 32k (Xtal or Bypass).
*
* \note This function disables the PLLs.
*
* \note Switching SCLK back to 32krc is only possible by shutting down the VDDIO
* power supply.
*
* \param ul_bypass 0 for Xtal, 1 for bypass.
*/
void pmc_switch_sclk_to_32kxtal(uint32_t ul_bypass)
{
/* Set Bypass mode if required */
if (ul_bypass == 1) {
SUPC->SUPC_MR |= SUPC_MR_KEY(SUPC_KEY_VALUE) |
SUPC_MR_OSCBYPASS;
}
SUPC->SUPC_CR |= SUPC_CR_KEY(SUPC_KEY_VALUE) | SUPC_CR_XTALSEL;
}
/**
* \brief Check if the external 32k Xtal is ready.
*
* \retval 1 External 32k Xtal is ready.
* \retval 0 External 32k Xtal is not ready.
*/
uint32_t pmc_osc_is_ready_32kxtal(void)
{
return ((SUPC->SUPC_SR & SUPC_SR_OSCSEL)
&& (PMC->PMC_SR & PMC_SR_OSCSELS));
}
/**
* \brief Switch main clock source selection to internal fast RC.
*
* \param ul_moscrcf Fast RC oscillator(4/8/12Mhz).
*
* \retval 0 Success.
* \retval 1 Timeout error.
* \retval 2 Invalid frequency.
*/
void pmc_switch_mainck_to_fastrc(uint32_t ul_moscrcf)
{
uint32_t ul_needXTEN = 0;
/* Enable Fast RC oscillator but DO NOT switch to RC now */
if (PMC->CKGR_MOR & CKGR_MOR_MOSCXTEN) {
PMC->CKGR_MOR = (PMC->CKGR_MOR & ~CKGR_MOR_MOSCRCF_Msk) |
PMC_CKGR_MOR_KEY_VALUE | CKGR_MOR_MOSCRCEN |
ul_moscrcf;
} else {
ul_needXTEN = 1;
PMC->CKGR_MOR = (PMC->CKGR_MOR & ~CKGR_MOR_MOSCRCF_Msk) |
PMC_CKGR_MOR_KEY_VALUE | CKGR_MOR_MOSCRCEN |
CKGR_MOR_MOSCXTEN | CKGR_MOR_MOSCXTST(PMC_XTAL_STARTUP_TIME) |
ul_moscrcf;
}
/* Wait the Fast RC to stabilize */
while (!(PMC->PMC_SR & PMC_SR_MOSCRCS));
/* Switch to Fast RC */
PMC->CKGR_MOR = (PMC->CKGR_MOR & ~CKGR_MOR_MOSCSEL) | PMC_CKGR_MOR_KEY_VALUE;
// BUG FIX : clock_example3_SAM3S_SERIES does not switch sclk->mainck with XT disabled.
if (ul_needXTEN) {
PMC->CKGR_MOR = (PMC->CKGR_MOR & ~CKGR_MOR_MOSCXTEN) |
PMC_CKGR_MOR_KEY_VALUE;
}
}
/**
* \brief Enable fast RC oscillator.
*
* \param ul_rc Fast RC oscillator(4/8/12Mhz).
*/
void pmc_osc_enable_fastrc(uint32_t ul_rc)
{
/* Enable Fast RC oscillator but DO NOT switch to RC now. Keep MOSCSEL to 1 */
PMC->CKGR_MOR = PMC_CKGR_MOR_KEY_VALUE | CKGR_MOR_MOSCSEL |
CKGR_MOR_MOSCXTEN | CKGR_MOR_MOSCRCEN | ul_rc;
/* Wait the Fast RC to stabilize */
while (!(PMC->PMC_SR & PMC_SR_MOSCRCS));
}
/**
* \brief Disable the internal fast RC.
*/
void pmc_osc_disable_fastrc(void)
{
/* Disable Fast RC oscillator */
PMC->CKGR_MOR = (PMC->CKGR_MOR & ~CKGR_MOR_MOSCRCEN) | PMC_CKGR_MOR_KEY_VALUE;
}
/**
* \brief Switch main clock source selection to external Xtal/Bypass.
* The function may switch MCK to SCLK if MCK source is MAINCK to avoid any
* system crash.
*
* \note If used in Xtal mode, the Xtal is automatically enabled.
*
* \param ul_bypass 0 for Xtal, 1 for bypass.
*
* \retval 0 Success.
* \retval 1 Timeout error.
*/
void pmc_switch_mainck_to_xtal(uint32_t ul_bypass)
{
/* Enable Main Xtal oscillator */
if (ul_bypass) {
PMC->CKGR_MOR = (PMC->CKGR_MOR & ~CKGR_MOR_MOSCXTEN) |
PMC_CKGR_MOR_KEY_VALUE | CKGR_MOR_MOSCXTBY |
CKGR_MOR_MOSCSEL;
} else {
PMC->CKGR_MOR = (PMC->CKGR_MOR & ~CKGR_MOR_MOSCXTBY) |
PMC_CKGR_MOR_KEY_VALUE | CKGR_MOR_MOSCXTEN |
CKGR_MOR_MOSCXTST(PMC_XTAL_STARTUP_TIME);
/* Wait the Xtal to stabilize */
while (!(PMC->PMC_SR & PMC_SR_MOSCXTS));
PMC->CKGR_MOR |= PMC_CKGR_MOR_KEY_VALUE | CKGR_MOR_MOSCSEL;
}
}
/**
* \brief Disable the external Xtal.
*
* \param ul_bypass 0 for Xtal, 1 for bypass.
*/
void pmc_osc_disable_xtal(uint32_t ul_bypass)
{
/* Disable xtal oscillator */
if (ul_bypass) {
PMC->CKGR_MOR = (PMC->CKGR_MOR & ~CKGR_MOR_MOSCXTBY) |
PMC_CKGR_MOR_KEY_VALUE;
} else {
PMC->CKGR_MOR = (PMC->CKGR_MOR & ~CKGR_MOR_MOSCXTEN) |
PMC_CKGR_MOR_KEY_VALUE;
}
}
/**
* \brief Check if the MAINCK is ready. Depending on MOSCEL, MAINCK can be one
* of Xtal, bypass or internal RC.
*
* \retval 1 Xtal is ready.
* \retval 0 Xtal is not ready.
*/
uint32_t pmc_osc_is_ready_mainck(void)
{
return PMC->PMC_SR & PMC_SR_MOSCSELS;
}
/**
* \brief Enable PLLA clock.
*
* \param mula PLLA multiplier.
* \param pllacount PLLA counter.
* \param diva Divider.
*/
void pmc_enable_pllack(uint32_t mula, uint32_t pllacount, uint32_t diva)
{
pmc_disable_pllack(); // Hardware BUG FIX : first disable the PLL to unlock the lock!
// It occurs when re-enabling the PLL with the same parameters.
PMC->CKGR_PLLAR = CKGR_PLLAR_ONE | CKGR_PLLAR_DIVA(diva) |
CKGR_PLLAR_PLLACOUNT(pllacount) | CKGR_PLLAR_MULA(mula);
while ((PMC->PMC_SR & PMC_SR_LOCKA) == 0);
}
/**
* \brief Disable PLLA clock.
*/
void pmc_disable_pllack(void)
{
PMC->CKGR_PLLAR = CKGR_PLLAR_ONE | CKGR_PLLAR_MULA(0);
}
/**
* \brief Is PLLA locked?
*
* \retval 0 Not locked.
* \retval 1 Locked.
*/
uint32_t pmc_is_locked_pllack(void)
{
return (PMC->PMC_SR & PMC_SR_LOCKA);
}
#if (SAM3S_SERIES || SAM4S_SERIES)
/**
* \brief Enable PLLB clock.
*
* \param mulb PLLB multiplier.
* \param pllbcount PLLB counter.
* \param divb Divider.
*/
void pmc_enable_pllbck(uint32_t mulb, uint32_t pllbcount, uint32_t divb)
{
pmc_disable_pllbck(); // Hardware BUG FIX : first disable the PLL to unlock the lock!
// It occurs when re-enabling the PLL with the same parameters.
PMC->CKGR_PLLBR =
CKGR_PLLBR_DIVB(divb) | CKGR_PLLBR_PLLBCOUNT(pllbcount)
| CKGR_PLLBR_MULB(mulb);
while ((PMC->PMC_SR & PMC_SR_LOCKB) == 0);
}
/**
* \brief Disable PLLB clock.
*/
void pmc_disable_pllbck(void)
{
PMC->CKGR_PLLBR = CKGR_PLLBR_MULB(0);
}
/**
* \brief Is PLLB locked?
*
* \retval 0 Not locked.
* \retval 1 Locked.
*/
uint32_t pmc_is_locked_pllbck(void)
{
return (PMC->PMC_SR & PMC_SR_LOCKB);
}
#endif
#if (SAM3XA_SERIES || SAM3U_SERIES)
/**
* \brief Enable UPLL clock.
*/
void pmc_enable_upll_clock(void)
{
PMC->CKGR_UCKR = CKGR_UCKR_UPLLCOUNT(3) | CKGR_UCKR_UPLLEN;
/* Wait UTMI PLL Lock Status */
while (!(PMC->PMC_SR & PMC_SR_LOCKU));
}
/**
* \brief Disable UPLL clock.
*/
void pmc_disable_upll_clock(void)
{
PMC->CKGR_UCKR &= ~CKGR_UCKR_UPLLEN;
}
/**
* \brief Is UPLL locked?
*
* \retval 0 Not locked.
* \retval 1 Locked.
*/
uint32_t pmc_is_locked_upll(void)
{
return (PMC->PMC_SR & PMC_SR_LOCKU);
}
#endif
/**
* \brief Enable the specified peripheral clock.
*
* \note The ID must NOT be shifted (i.e., 1 << ID_xxx).
*
* \param ul_id Peripheral ID (ID_xxx).
*
* \retval 0 Success.
* \retval 1 Invalid parameter.
*/
uint32_t pmc_enable_periph_clk(uint32_t ul_id)
{
if (ul_id > MAX_PERIPH_ID) {
return 1;
}
if (ul_id < 32) {
if ((PMC->PMC_PCSR0 & (1u << ul_id)) != (1u << ul_id)) {
PMC->PMC_PCER0 = 1 << ul_id;
}
#if (SAM3S_SERIES || SAM3XA_SERIES || SAM4S_SERIES)
} else {
ul_id -= 32;
if ((PMC->PMC_PCSR1 & (1u << ul_id)) != (1u << ul_id)) {
PMC->PMC_PCER1 = 1 << ul_id;
}
#endif
}
return 0;
}
/**
* \brief Disable the specified peripheral clock.
*
* \note The ID must NOT be shifted (i.e., 1 << ID_xxx).
*
* \param ul_id Peripheral ID (ID_xxx).
*
* \retval 0 Success.
* \retval 1 Invalid parameter.
*/
uint32_t pmc_disable_periph_clk(uint32_t ul_id)
{
if (ul_id > MAX_PERIPH_ID) {
return 1;
}
if (ul_id < 32) {
if ((PMC->PMC_PCSR0 & (1u << ul_id)) == (1u << ul_id)) {
PMC->PMC_PCDR0 = 1 << ul_id;
}
#if (SAM3S_SERIES || SAM3XA_SERIES || SAM4S_SERIES)
} else {
ul_id -= 32;
if ((PMC->PMC_PCSR1 & (1u << ul_id)) == (1u << ul_id)) {
PMC->PMC_PCDR1 = 1 << ul_id;
}
#endif
}
return 0;
}
/**
* \brief Enable all peripheral clocks.
*/
void pmc_enable_all_periph_clk(void)
{
PMC->PMC_PCER0 = PMC_MASK_STATUS0;
while ((PMC->PMC_PCSR0 & PMC_MASK_STATUS0) != PMC_MASK_STATUS0);
#if (SAM3S_SERIES || SAM3XA_SERIES || SAM4S_SERIES)
PMC->PMC_PCER1 = PMC_MASK_STATUS1;
while ((PMC->PMC_PCSR1 & PMC_MASK_STATUS1) != PMC_MASK_STATUS1);
#endif
}
/**
* \brief Disable all peripheral clocks.
*/
void pmc_disable_all_periph_clk(void)
{
PMC->PMC_PCDR0 = PMC_MASK_STATUS0;
while ((PMC->PMC_PCSR0 & PMC_MASK_STATUS0) != 0);
#if (SAM3S_SERIES || SAM3XA_SERIES || SAM4S_SERIES)
PMC->PMC_PCDR1 = PMC_MASK_STATUS1;
while ((PMC->PMC_PCSR1 & PMC_MASK_STATUS1) != 0);
#endif
}
/**
* \brief Check if the specified peripheral clock is enabled.
*
* \note The ID must NOT be shifted (i.e., 1 << ID_xxx).
*
* \param ul_id Peripheral ID (ID_xxx).
*
* \retval 0 Peripheral clock is disabled or unknown.
* \retval 1 Peripheral clock is enabled.
*/
uint32_t pmc_is_periph_clk_enabled(uint32_t ul_id)
{
if (ul_id > MAX_PERIPH_ID) {
return 0;
}
#if (SAM3S_SERIES || SAM3XA_SERIES || SAM4S_SERIES)
if (ul_id < 32) {
#endif
if ((PMC->PMC_PCSR0 & (1u << ul_id))) {
return 1;
} else {
return 0;
}
#if (SAM3S_SERIES || SAM3XA_SERIES || SAM4S_SERIES)
} else {
ul_id -= 32;
if ((PMC->PMC_PCSR1 & (1u << ul_id))) {
return 1;
} else {
return 0;
}
}
#endif
}
/**
* \brief Set the prescaler for the specified programmable clock.
*
* \param ul_id Peripheral ID.
* \param ul_pres Prescaler value.
*/
void pmc_pck_set_prescaler(uint32_t ul_id, uint32_t ul_pres)
{
PMC->PMC_PCK[ul_id] =
(PMC->PMC_PCK[ul_id] & ~PMC_PCK_PRES_Msk) | ul_pres;
while ((PMC->PMC_SCER & (PMC_SCER_PCK0 << ul_id))
&& !(PMC->PMC_SR & (PMC_SR_PCKRDY0 << ul_id)));
}
/**
* \brief Set the source oscillator for the specified programmable clock.
*
* \param ul_id Peripheral ID.
* \param ul_source Source selection value.
*/
void pmc_pck_set_source(uint32_t ul_id, uint32_t ul_source)
{
PMC->PMC_PCK[ul_id] =
(PMC->PMC_PCK[ul_id] & ~PMC_PCK_CSS_Msk) | ul_source;
while ((PMC->PMC_SCER & (PMC_SCER_PCK0 << ul_id))
&& !(PMC->PMC_SR & (PMC_SR_PCKRDY0 << ul_id)));
}
/**
* \brief Switch programmable clock source selection to slow clock.
*
* \param ul_id Id of the programmable clock.
* \param ul_pres Programmable clock prescaler.
*
* \retval 0 Success.
* \retval 1 Timeout error.
*/
uint32_t pmc_switch_pck_to_sclk(uint32_t ul_id, uint32_t ul_pres)
{
uint32_t ul_timeout;
PMC->PMC_PCK[ul_id] = PMC_PCK_CSS_SLOW_CLK | ul_pres;
for (ul_timeout = PMC_TIMEOUT; !(PMC->PMC_SR & (PMC_SR_PCKRDY0 << ul_id));
--ul_timeout) {
if (ul_timeout == 0) {
return 1;
}
}
return 0;
}
/**
* \brief Switch programmable clock source selection to main clock.
*
* \param ul_id Id of the programmable clock.
* \param ul_pres Programmable clock prescaler.
*
* \retval 0 Success.
* \retval 1 Timeout error.
*/
uint32_t pmc_switch_pck_to_mainck(uint32_t ul_id, uint32_t ul_pres)
{
uint32_t ul_timeout;
PMC->PMC_PCK[ul_id] = PMC_PCK_CSS_MAIN_CLK | ul_pres;
for (ul_timeout = PMC_TIMEOUT; !(PMC->PMC_SR & (PMC_SR_PCKRDY0 << ul_id));
--ul_timeout) {
if (ul_timeout == 0) {
return 1;
}
}
return 0;
}
/**
* \brief Switch programmable clock source selection to PLLA clock.
*
* \param ul_id Id of the programmable clock.
* \param ul_pres Programmable clock prescaler.
*
* \retval 0 Success.
* \retval 1 Timeout error.
*/
uint32_t pmc_switch_pck_to_pllack(uint32_t ul_id, uint32_t ul_pres)
{
uint32_t ul_timeout;
PMC->PMC_PCK[ul_id] = PMC_PCK_CSS_PLLA_CLK | ul_pres;
for (ul_timeout = PMC_TIMEOUT; !(PMC->PMC_SR & (PMC_SR_PCKRDY0 << ul_id));
--ul_timeout) {
if (ul_timeout == 0) {
return 1;
}
}
return 0;
}
#if (SAM3S_SERIES || SAM4S_SERIES)
/**
* \brief Switch programmable clock source selection to PLLB clock.
*
* \param ul_id Id of the programmable clock.
* \param ul_pres Programmable clock prescaler.
*
* \retval 0 Success.
* \retval 1 Timeout error.
*/
uint32_t pmc_switch_pck_to_pllbck(uint32_t ul_id, uint32_t ul_pres)
{
uint32_t ul_timeout;
PMC->PMC_PCK[ul_id] = PMC_PCK_CSS_PLLB_CLK | ul_pres;
for (ul_timeout = PMC_TIMEOUT;
!(PMC->PMC_SR & (PMC_SR_PCKRDY0 << ul_id));
--ul_timeout) {
if (ul_timeout == 0) {
return 1;
}
}
return 0;
}
#endif
#if (SAM3XA_SERIES || SAM3U_SERIES)
/**
* \brief Switch programmable clock source selection to UPLL clock.
*
* \param ul_id Id of the programmable clock.
* \param ul_pres Programmable clock prescaler.
*
* \retval 0 Success.
* \retval 1 Timeout error.
*/
uint32_t pmc_switch_pck_to_upllck(uint32_t ul_id, uint32_t ul_pres)
{
uint32_t ul_timeout;
PMC->PMC_PCK[ul_id] = PMC_PCK_CSS_UPLL_CLK | ul_pres;
for (ul_timeout = PMC_TIMEOUT;
!(PMC->PMC_SR & (PMC_SR_PCKRDY0 << ul_id));
--ul_timeout) {
if (ul_timeout == 0) {
return 1;
}
}
return 0;
}
#endif
/**
* \brief Enable the specified programmable clock.
*
* \param ul_id Id of the programmable clock.
*/
void pmc_enable_pck(uint32_t ul_id)
{
PMC->PMC_SCER = PMC_SCER_PCK0 << ul_id;
}
/**
* \brief Disable the specified programmable clock.
*
* \param ul_id Id of the programmable clock.
*/
void pmc_disable_pck(uint32_t ul_id)
{
PMC->PMC_SCDR = PMC_SCER_PCK0 << ul_id;
}
/**
* \brief Enable all programmable clocks.
*/
void pmc_enable_all_pck(void)
{
PMC->PMC_SCER = PMC_SCER_PCK0 | PMC_SCER_PCK1 | PMC_SCER_PCK2;
}
/**
* \brief Disable all programmable clocks.
*/
void pmc_disable_all_pck(void)
{
PMC->PMC_SCDR = PMC_SCDR_PCK0 | PMC_SCDR_PCK1 | PMC_SCDR_PCK2;
}
/**
* \brief Check if the specified programmable clock is enabled.
*
* \param ul_id Id of the programmable clock.
*
* \retval 0 Programmable clock is disabled or unknown.
* \retval 1 Programmable clock is enabled.
*/
uint32_t pmc_is_pck_enabled(uint32_t ul_id)
{
if (ul_id > 2) {
return 0;
}
return (PMC->PMC_SCSR & (PMC_SCSR_PCK0 << ul_id));
}
#if (SAM3S_SERIES || SAM3XA_SERIES || SAM4S_SERIES)
/**
* \brief Switch UDP (USB) clock source selection to PLLA clock.
*
* \param ul_usbdiv Clock divisor.
*/
void pmc_switch_udpck_to_pllack(uint32_t ul_usbdiv)
{
PMC->PMC_USB = PMC_USB_USBDIV(ul_usbdiv);
}
#endif
#if (SAM3S_SERIES || SAM4S_SERIES)
/**
* \brief Switch UDP (USB) clock source selection to PLLB clock.
*
* \param ul_usbdiv Clock divisor.
*/
void pmc_switch_udpck_to_pllbck(uint32_t ul_usbdiv)
{
PMC->PMC_USB = PMC_USB_USBDIV(ul_usbdiv) | PMC_USB_USBS;
}
#endif
#if (SAM3XA_SERIES)
/**
* \brief Switch UDP (USB) clock source selection to UPLL clock.
*
* \param dw_usbdiv Clock divisor.
*/
void pmc_switch_udpck_to_upllck(uint32_t ul_usbdiv)
{
PMC->PMC_USB = PMC_USB_USBS | PMC_USB_USBDIV(ul_usbdiv);
}
#endif
#if (SAM3S_SERIES || SAM3XA_SERIES || SAM4S_SERIES)
/**
* \brief Enable UDP (USB) clock.
*/
void pmc_enable_udpck(void)
{
# if (SAM3S_SERIES || SAM4S_SERIES)
PMC->PMC_SCER = PMC_SCER_UDP;
# else
PMC->PMC_SCER = PMC_SCER_UOTGCLK;
# endif
}
/**
* \brief Disable UDP (USB) clock.
*/
void pmc_disable_udpck(void)
{
# if (SAM3S_SERIES || SAM4S_SERIES)
PMC->PMC_SCDR = PMC_SCDR_UDP;
# else
PMC->PMC_SCDR = PMC_SCDR_UOTGCLK;
# endif
}
#endif
/**
* \brief Enable PMC interrupts.
*
* \param ul_sources Interrupt sources bit map.
*/
void pmc_enable_interrupt(uint32_t ul_sources)
{
PMC->PMC_IER = ul_sources;
}
/**
* \brief Disable PMC interrupts.
*
* \param ul_sources Interrupt sources bit map.
*/
void pmc_disable_interrupt(uint32_t ul_sources)
{
PMC->PMC_IDR = ul_sources;
}
/**
* \brief Get PMC interrupt mask.
*
* \return The interrupt mask value.
*/
uint32_t pmc_get_interrupt_mask(void)
{
return PMC->PMC_IMR;
}
/**
* \brief Get current status.
*
* \return The current PMC status.
*/
uint32_t pmc_get_status(void)
{
return PMC->PMC_SR;
}
/**
* \brief Set the wake-up inputs for fast startup mode registers (event generation).
*
* \param ul_inputs Wake up inputs to enable.
*/
void pmc_set_fast_startup_input(uint32_t ul_inputs)
{
ul_inputs &= (~ PMC_FAST_STARTUP_Msk);
PMC->PMC_FSMR |= ul_inputs;
}
/**
* \brief Clear the wake-up inputs for fast startup mode registers (remove event generation).
*
* \param ul_inputs Wake up inputs to disable.
*/
void pmc_clr_fast_startup_input(uint32_t ul_inputs)
{
ul_inputs &= (~ PMC_FAST_STARTUP_Msk);
PMC->PMC_FSMR &= ~ul_inputs;
}
/**
* \brief Enable Sleep Mode.
* Enter condition: (WFE or WFI) + (SLEEPDEEP bit = 0) + (LPM bit = 0)
*
* \param uc_type 0 for wait for interrupt, 1 for wait for event.
*/
void pmc_enable_sleepmode(uint8_t uc_type)
{
PMC->PMC_FSMR &= (uint32_t) ~ PMC_FSMR_LPM; // Enter Sleep mode
SCB->SCR &= (uint32_t) ~ SCB_SCR_SLEEPDEEP_Msk; // Deep sleep
if (uc_type == 0) {
__WFI();
} else {
__WFE();
}
}
/**
* \brief Enable Wait Mode.
* Enter condition: WFE + (SLEEPDEEP bit = 0) + (LPM bit = 1)
*/
void pmc_enable_waitmode(void)
{
uint32_t i;
PMC->PMC_FSMR |= PMC_FSMR_LPM; // Enter Wait mode
SCB->SCR &= (uint32_t) ~ SCB_SCR_SLEEPDEEP_Msk; // Deep sleep
__WFE();
/* Waiting for MOSCRCEN bit cleared is strongly recommended
* to ensure that the core will not execute undesired instructions
*/
for (i = 0; i < 500; i++) {
__NOP();
}
while (!(PMC->CKGR_MOR & CKGR_MOR_MOSCRCEN));
}
/**
* \brief Enable Backup Mode.
* Enter condition: WFE + (SLEEPDEEP bit = 1)
*/
void pmc_enable_backupmode(void)
{
SCB->SCR |= SCB_SCR_SLEEPDEEP_Msk;
__WFE();
}
/**
* \brief Enable or disable write protect of PMC registers.
*
* \param ul_enable 1 to enable, 0 to disable.
*/
void pmc_set_writeprotect(uint32_t ul_enable)
{
if (ul_enable) {
PMC->PMC_WPMR = PMC_WPMR_WPKEY_VALUE | PMC_WPMR_WPEN;
} else {
PMC->PMC_WPMR = PMC_WPMR_WPKEY_VALUE;
}
}
/**
* \brief Return write protect status.
*
* \retval 0 Protection disabled.
* \retval 1 Protection enabled.
*/
uint32_t pmc_get_writeprotect_status(void)
{
return PMC->PMC_WPMR & PMC_WPMR_WPEN;
}
/// @cond 0
/**INDENT-OFF**/
#ifdef __cplusplus
}
#endif
/**INDENT-ON**/
/// @endcond