| /* ---------------------------------------------------------------------------- |
| * ATMEL Microcontroller Software Support |
| * ---------------------------------------------------------------------------- |
| * Copyright (c) 2010, 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. |
| * ---------------------------------------------------------------------------- |
| */ |
| |
| /** \file */ |
| |
| /*---------------------------------------------------------------------------- |
| * Headers |
| *----------------------------------------------------------------------------*/ |
| #include "chip.h" |
| #include "pio.h" |
| #include "pmc.h" |
| |
| /*---------------------------------------------------------------------------- |
| * Local functions |
| *----------------------------------------------------------------------------*/ |
| |
| /** |
| * \brief Configures one or more pin(s) of a PIO controller as being controlled by |
| * peripheral A. Optionally, the corresponding internal pull-up(s) can be enabled. |
| * |
| * \param pio Pointer to a PIO controller. |
| * \param mask Bitmask of one or more pin(s) to configure. |
| * \param enablePullUp Indicates if the pin(s) internal pull-up shall be |
| * configured. |
| */ |
| static void PIO_SetPeripheralA( |
| Pio *pio, |
| unsigned int mask, |
| unsigned char enablePullUp) |
| { |
| unsigned int abcdsr; |
| /* Disable interrupts on the pin(s) */ |
| pio->PIO_IDR = mask; |
| |
| /* Enable the pull-up(s) if necessary */ |
| if (enablePullUp) { |
| pio->PIO_PUER = mask; |
| } |
| else { |
| |
| pio->PIO_PUDR = mask; |
| } |
| |
| abcdsr = pio->PIO_ABCDSR[0]; |
| pio->PIO_ABCDSR[0] &= (~mask & abcdsr); |
| abcdsr = pio->PIO_ABCDSR[1]; |
| pio->PIO_ABCDSR[1] &= (~mask & abcdsr); |
| pio->PIO_PDR = mask; |
| } |
| |
| /** |
| * \brief Configures one or more pin(s) of a PIO controller as being controlled by |
| * peripheral B. Optionally, the corresponding internal pull-up(s) can be enabled. |
| * |
| * \param pio Pointer to a PIO controller. |
| * \param mask Bitmask of one or more pin(s) to configure. |
| * \param enablePullUp Indicates if the pin(s) internal pull-up shall be |
| * configured. |
| */ |
| static void PIO_SetPeripheralB( |
| Pio *pio, |
| unsigned int mask, |
| unsigned char enablePullUp) |
| { |
| unsigned int abcdsr; |
| /* Disable interrupts on the pin(s) */ |
| pio->PIO_IDR = mask; |
| |
| /* Enable the pull-up(s) if necessary */ |
| if (enablePullUp) { |
| |
| pio->PIO_PUER = mask; |
| } |
| else { |
| |
| pio->PIO_PUDR = mask; |
| } |
| |
| abcdsr = pio->PIO_ABCDSR[0]; |
| pio->PIO_ABCDSR[0] = (mask | abcdsr); |
| abcdsr = pio->PIO_ABCDSR[1]; |
| pio->PIO_ABCDSR[1] &= (~mask & abcdsr); |
| |
| pio->PIO_PDR = mask; |
| } |
| |
| /** |
| * \brief Configures one or more pin(s) of a PIO controller as being controlled by |
| * peripheral C. Optionally, the corresponding internal pull-up(s) can be enabled. |
| * |
| * \param pio Pointer to a PIO controller. |
| * \param mask Bitmask of one or more pin(s) to configure. |
| * \param enablePullUp Indicates if the pin(s) internal pull-up shall be |
| * configured. |
| */ |
| static void PIO_SetPeripheralC( |
| Pio *pio, |
| unsigned int mask, |
| unsigned char enablePullUp) |
| { |
| unsigned int abcdsr; |
| /* Disable interrupts on the pin(s) */ |
| pio->PIO_IDR = mask; |
| |
| /* Enable the pull-up(s) if necessary */ |
| if (enablePullUp) { |
| |
| pio->PIO_PUER = mask; |
| } |
| else { |
| |
| pio->PIO_PUDR = mask; |
| } |
| |
| abcdsr = pio->PIO_ABCDSR[0]; |
| pio->PIO_ABCDSR[0] &= (~mask & abcdsr); |
| abcdsr = pio->PIO_ABCDSR[1]; |
| pio->PIO_ABCDSR[1] = (mask | abcdsr); |
| |
| pio->PIO_PDR = mask; |
| } |
| |
| /** |
| * \brief Configures one or more pin(s) of a PIO controller as being controlled by |
| * peripheral D. Optionally, the corresponding internal pull-up(s) can be enabled. |
| * |
| * \param pio Pointer to a PIO controller. |
| * \param mask Bitmask of one or more pin(s) to configure. |
| * \param enablePullUp Indicates if the pin(s) internal pull-up shall be |
| * configured. |
| */ |
| static void PIO_SetPeripheralD( |
| Pio *pio, |
| unsigned int mask, |
| unsigned char enablePullUp) |
| { |
| unsigned int abcdsr; |
| /* Disable interrupts on the pin(s) */ |
| pio->PIO_IDR = mask; |
| |
| /* Enable the pull-up(s) if necessary */ |
| if (enablePullUp) { |
| |
| pio->PIO_PUER = mask; |
| } |
| else { |
| |
| pio->PIO_PUDR = mask; |
| } |
| |
| abcdsr = pio->PIO_ABCDSR[0]; |
| pio->PIO_ABCDSR[0] = (mask | abcdsr); |
| abcdsr = pio->PIO_ABCDSR[1]; |
| pio->PIO_ABCDSR[1] = (mask | abcdsr); |
| |
| pio->PIO_PDR = mask; |
| } |
| |
| /** |
| * \brief Configures one or more pin(s) or a PIO controller as inputs. Optionally, |
| * the corresponding internal pull-up(s) and glitch filter(s) can be enabled. |
| * |
| * \param pio Pointer to a PIO controller. |
| * \param mask Bitmask indicating which pin(s) to configure as input(s). |
| * \param enablePullUp Indicates if the internal pull-up(s) must be enabled. |
| * \param enableFilter Indicates if the glitch filter(s) must be enabled. |
| */ |
| static void PIO_SetInput( |
| Pio *pio, |
| unsigned int mask, |
| unsigned char attribute) |
| { |
| /* Disable interrupts */ |
| pio->PIO_IDR = mask; |
| |
| /* Enable pull-up(s) if necessary */ |
| if (attribute & PIO_PULLUP) |
| pio->PIO_PUER = mask; |
| else |
| pio->PIO_PUDR = mask; |
| |
| /* Enable Input Filter if necessary */ |
| if (attribute & (PIO_DEGLITCH | PIO_DEBOUNCE)) |
| pio->PIO_IFER = mask; |
| else |
| pio->PIO_IFDR = mask; |
| |
| /* Enable de-glitch or de-bounce if necessary */ |
| if (attribute & PIO_DEGLITCH) |
| { |
| pio->PIO_IFSCDR = mask; |
| } |
| else |
| { |
| if (attribute & PIO_DEBOUNCE) |
| { |
| pio->PIO_IFSCER = mask; |
| } |
| } |
| |
| /* Configure pin as input */ |
| pio->PIO_ODR = mask; |
| pio->PIO_PER = mask; |
| } |
| |
| /** |
| * \brief Configures one or more pin(s) of a PIO controller as outputs, with the |
| * given default value. Optionally, the multi-drive feature can be enabled |
| * on the pin(s). |
| * |
| * \param pio Pointer to a PIO controller. |
| * \param mask Bitmask indicating which pin(s) to configure. |
| * \param defaultValue Default level on the pin(s). |
| * \param enableMultiDrive Indicates if the pin(s) shall be configured as |
| * open-drain. |
| * \param enablePullUp Indicates if the pin shall have its pull-up activated. |
| */ |
| static void PIO_SetOutput( |
| Pio *pio, |
| unsigned int mask, |
| unsigned char defaultValue, |
| unsigned char enableMultiDrive, |
| unsigned char enablePullUp) |
| { |
| /* Disable interrupts */ |
| pio->PIO_IDR = mask; |
| |
| /* Enable pull-up(s) if necessary */ |
| if (enablePullUp) { |
| |
| pio->PIO_PUER = mask; |
| } |
| else { |
| |
| pio->PIO_PUDR = mask; |
| } |
| |
| /* Enable multi-drive if necessary */ |
| if (enableMultiDrive) { |
| |
| pio->PIO_MDER = mask; |
| } |
| else { |
| |
| pio->PIO_MDDR = mask; |
| } |
| |
| /* Set default value */ |
| if (defaultValue) { |
| |
| pio->PIO_SODR = mask; |
| } |
| else { |
| |
| pio->PIO_CODR = mask; |
| } |
| |
| /* Configure pin(s) as output(s) */ |
| pio->PIO_OER = mask; |
| pio->PIO_PER = mask; |
| } |
| |
| /*---------------------------------------------------------------------------- |
| * Global functions |
| *----------------------------------------------------------------------------*/ |
| |
| /** |
| * \brief Configures a list of Pin instances, each of which can either hold a single |
| * pin or a group of pins, depending on the mask value; all pins are configured |
| * by this function. The size of the array must also be provided and is easily |
| * computed using PIO_LISTSIZE whenever its length is not known in advance. |
| * |
| * \param list Pointer to a list of Pin instances. |
| * \param size Size of the Pin list (calculated using PIO_LISTSIZE). |
| * |
| * \return 1 if the pins have been configured properly; otherwise 0. |
| */ |
| uint8_t PIO_Configure( const Pin *list, uint32_t size ) |
| { |
| /* Configure pins */ |
| while ( size > 0 ) |
| { |
| switch ( list->type ) |
| { |
| |
| case PIO_PERIPH_A: |
| PIO_SetPeripheralA(list->pio, |
| list->mask, |
| (list->attribute & PIO_PULLUP) ? 1 : 0); |
| break; |
| |
| case PIO_PERIPH_B: |
| PIO_SetPeripheralB(list->pio, |
| list->mask, |
| (list->attribute & PIO_PULLUP) ? 1 : 0); |
| break; |
| |
| case PIO_PERIPH_C: |
| PIO_SetPeripheralC(list->pio, |
| list->mask, |
| (list->attribute & PIO_PULLUP) ? 1 : 0); |
| break; |
| |
| case PIO_PERIPH_D: |
| PIO_SetPeripheralD(list->pio, |
| list->mask, |
| (list->attribute & PIO_PULLUP) ? 1 : 0); |
| break; |
| case PIO_INPUT: |
| PMC_EnablePeripheral(list->id); |
| PIO_SetInput(list->pio, |
| list->mask, |
| list->attribute); |
| break; |
| |
| case PIO_OUTPUT_0: |
| case PIO_OUTPUT_1: |
| PIO_SetOutput(list->pio, |
| list->mask, |
| (list->type == PIO_OUTPUT_1), |
| (list->attribute & PIO_OPENDRAIN) ? 1 : 0, |
| (list->attribute & PIO_PULLUP) ? 1 : 0); |
| break; |
| |
| default: return 0; |
| } |
| |
| list++; |
| size--; |
| } |
| |
| return 1; |
| } |
| |
| /** |
| * \brief Sets a high output level on all the PIOs defined in the given Pin instance. |
| * This has no immediate effects on PIOs that are not output, but the PIO |
| * controller will memorize the value they are changed to outputs. |
| * |
| * \param pin Pointer to a Pin instance describing one or more pins. |
| */ |
| void PIO_Set(const Pin *pin) |
| { |
| pin->pio->PIO_SODR = pin->mask; |
| } |
| |
| /** |
| * \brief Sets a low output level on all the PIOs defined in the given Pin instance. |
| * This has no immediate effects on PIOs that are not output, but the PIO |
| * controller will memorize the value they are changed to outputs. |
| * |
| * \param pin Pointer to a Pin instance describing one or more pins. |
| */ |
| void PIO_Clear(const Pin *pin) |
| { |
| pin->pio->PIO_CODR = pin->mask; |
| } |
| |
| /** |
| * \brief Returns 1 if one or more PIO of the given Pin instance currently have |
| * a high level; otherwise returns 0. This method returns the actual value that |
| * is being read on the pin. To return the supposed output value of a pin, use |
| * PIO_GetOutputDataStatus() instead. |
| * |
| * \param pin Pointer to a Pin instance describing one or more pins. |
| * |
| * \return 1 if the Pin instance contains at least one PIO that currently has |
| * a high level; otherwise 0. |
| */ |
| unsigned char PIO_Get( const Pin *pin ) |
| { |
| unsigned int reg ; |
| |
| if ( (pin->type == PIO_OUTPUT_0) || (pin->type == PIO_OUTPUT_1) ) |
| { |
| reg = pin->pio->PIO_ODSR ; |
| } |
| else |
| { |
| reg = pin->pio->PIO_PDSR ; |
| } |
| |
| if ( (reg & pin->mask) == 0 ) |
| { |
| return 0 ; |
| } |
| else |
| { |
| return 1 ; |
| } |
| } |
| |
| /** |
| * \brief Returns 1 if one or more PIO of the given Pin are configured to output a |
| * high level (even if they are not output). |
| * To get the actual value of the pin, use PIO_Get() instead. |
| * |
| * \param pin Pointer to a Pin instance describing one or more pins. |
| * |
| * \return 1 if the Pin instance contains at least one PIO that is configured |
| * to output a high level; otherwise 0. |
| */ |
| unsigned char PIO_GetOutputDataStatus(const Pin *pin) |
| { |
| if ((pin->pio->PIO_ODSR & pin->mask) == 0) { |
| |
| return 0; |
| } |
| else { |
| |
| return 1; |
| } |
| } |
| |
| /* |
| * \brief Configures Glitch or Debouncing filter for input. |
| * |
| * \param pin Pointer to a Pin instance describing one or more pins. |
| * \param cuttoff Cutt off frequency for debounce filter. |
| */ |
| void PIO_SetDebounceFilter( const Pin *pin, uint32_t cuttoff ) |
| { |
| Pio *pio = pin->pio; |
| |
| pio->PIO_IFSCER = pin->mask; /* set Debouncing, 0 bit field no effect */ |
| pio->PIO_SCDR = ((32678/(2*(cuttoff))) - 1) & 0x3FFF; /* the lowest 14 bits work */ |
| } |