mbed official
The official Mbed 2 C/C++ SDK provides the software platform and libraries to build your applications.
Dependents: hello SerialTestv11 SerialTestv12 Sierpinski ... more
mbed 2
This is the mbed 2 library. If you'd like to learn about Mbed OS please see the mbed-os docs.
TARGET_MTM_MTCONNECT04S/core_cmInstr.h@136:ef9c61f8c49f, 2017-02-14 (annotated)
- Committer:
- Kojto
- Date:
- Tue Feb 14 11:24:20 2017 +0000
- Revision:
- 136:ef9c61f8c49f
- Parent:
- 126:abea610beb85
Release 136 of the mbed library
Ports for Upcoming Targets
Fixes and Changes
3432: Target STM USBHOST support https://github.com/ARMmbed/mbed-os/pull/3432
3181: NUCLEO_F207ZG extending PeripheralPins.c: all available alternate functions can be used now https://github.com/ARMmbed/mbed-os/pull/3181
3626: NUCLEO_F412ZG : Add USB Device +Host https://github.com/ARMmbed/mbed-os/pull/3626
3628: Fix warnings https://github.com/ARMmbed/mbed-os/pull/3628
3629: STM32: L0 LL layer https://github.com/ARMmbed/mbed-os/pull/3629
3632: IDE Export support for platform VK_RZ_A1H https://github.com/ARMmbed/mbed-os/pull/3632
3642: Missing IRQ pin fix for platform VK_RZ_A1H https://github.com/ARMmbed/mbed-os/pull/3642
3664: Fix ncs36510 sleep definitions https://github.com/ARMmbed/mbed-os/pull/3664
3655: [STM32F4] Modify folder structure https://github.com/ARMmbed/mbed-os/pull/3655
3657: [STM32L4] Modify folder structure https://github.com/ARMmbed/mbed-os/pull/3657
3658: [STM32F3] Modify folder structure https://github.com/ARMmbed/mbed-os/pull/3658
3685: STM32: I2C: reset state machine https://github.com/ARMmbed/mbed-os/pull/3685
3692: uVisor: Standardize available legacy heap and stack https://github.com/ARMmbed/mbed-os/pull/3692
3621: Fix for #2884, LPC824: export to LPCXpresso, target running with wron https://github.com/ARMmbed/mbed-os/pull/3621
3649: [STM32F7] Modify folder structure https://github.com/ARMmbed/mbed-os/pull/3649
3695: Enforce device_name is valid in targets.json https://github.com/ARMmbed/mbed-os/pull/3695
3723: NCS36510: spi_format function bug fix https://github.com/ARMmbed/mbed-os/pull/3723
Who changed what in which revision?
| User | Revision | Line number | New contents of line |
|---|---|---|---|
| AnnaBridge | 126:abea610beb85 | 1 | /**************************************************************************//** |
| AnnaBridge | 126:abea610beb85 | 2 | * @file core_cmInstr.h |
| AnnaBridge | 126:abea610beb85 | 3 | * @brief CMSIS Cortex-M Core Instruction Access Header File |
| AnnaBridge | 126:abea610beb85 | 4 | * @version V4.10 |
| AnnaBridge | 126:abea610beb85 | 5 | * @date 18. March 2015 |
| AnnaBridge | 126:abea610beb85 | 6 | * |
| AnnaBridge | 126:abea610beb85 | 7 | * @note |
| AnnaBridge | 126:abea610beb85 | 8 | * |
| AnnaBridge | 126:abea610beb85 | 9 | ******************************************************************************/ |
| AnnaBridge | 126:abea610beb85 | 10 | /* Copyright (c) 2009 - 2014 ARM LIMITED |
| AnnaBridge | 126:abea610beb85 | 11 | |
| AnnaBridge | 126:abea610beb85 | 12 | All rights reserved. |
| AnnaBridge | 126:abea610beb85 | 13 | Redistribution and use in source and binary forms, with or without |
| AnnaBridge | 126:abea610beb85 | 14 | modification, are permitted provided that the following conditions are met: |
| AnnaBridge | 126:abea610beb85 | 15 | - Redistributions of source code must retain the above copyright |
| AnnaBridge | 126:abea610beb85 | 16 | notice, this list of conditions and the following disclaimer. |
| AnnaBridge | 126:abea610beb85 | 17 | - Redistributions in binary form must reproduce the above copyright |
| AnnaBridge | 126:abea610beb85 | 18 | notice, this list of conditions and the following disclaimer in the |
| AnnaBridge | 126:abea610beb85 | 19 | documentation and/or other materials provided with the distribution. |
| AnnaBridge | 126:abea610beb85 | 20 | - Neither the name of ARM nor the names of its contributors may be used |
| AnnaBridge | 126:abea610beb85 | 21 | to endorse or promote products derived from this software without |
| AnnaBridge | 126:abea610beb85 | 22 | specific prior written permission. |
| AnnaBridge | 126:abea610beb85 | 23 | * |
| AnnaBridge | 126:abea610beb85 | 24 | THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS" |
| AnnaBridge | 126:abea610beb85 | 25 | AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE |
| AnnaBridge | 126:abea610beb85 | 26 | IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE |
| AnnaBridge | 126:abea610beb85 | 27 | ARE DISCLAIMED. IN NO EVENT SHALL COPYRIGHT HOLDERS AND CONTRIBUTORS BE |
| AnnaBridge | 126:abea610beb85 | 28 | LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR |
| AnnaBridge | 126:abea610beb85 | 29 | CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF |
| AnnaBridge | 126:abea610beb85 | 30 | SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS |
| AnnaBridge | 126:abea610beb85 | 31 | INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN |
| AnnaBridge | 126:abea610beb85 | 32 | CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) |
| AnnaBridge | 126:abea610beb85 | 33 | ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE |
| AnnaBridge | 126:abea610beb85 | 34 | POSSIBILITY OF SUCH DAMAGE. |
| AnnaBridge | 126:abea610beb85 | 35 | ---------------------------------------------------------------------------*/ |
| AnnaBridge | 126:abea610beb85 | 36 | |
| AnnaBridge | 126:abea610beb85 | 37 | |
| AnnaBridge | 126:abea610beb85 | 38 | #ifndef __CORE_CMINSTR_H |
| AnnaBridge | 126:abea610beb85 | 39 | #define __CORE_CMINSTR_H |
| AnnaBridge | 126:abea610beb85 | 40 | |
| AnnaBridge | 126:abea610beb85 | 41 | |
| AnnaBridge | 126:abea610beb85 | 42 | /* ########################## Core Instruction Access ######################### */ |
| AnnaBridge | 126:abea610beb85 | 43 | /** \defgroup CMSIS_Core_InstructionInterface CMSIS Core Instruction Interface |
| AnnaBridge | 126:abea610beb85 | 44 | Access to dedicated instructions |
| AnnaBridge | 126:abea610beb85 | 45 | @{ |
| AnnaBridge | 126:abea610beb85 | 46 | */ |
| AnnaBridge | 126:abea610beb85 | 47 | |
| AnnaBridge | 126:abea610beb85 | 48 | #if defined ( __CC_ARM ) /*------------------RealView Compiler -----------------*/ |
| AnnaBridge | 126:abea610beb85 | 49 | /* ARM armcc specific functions */ |
| AnnaBridge | 126:abea610beb85 | 50 | |
| AnnaBridge | 126:abea610beb85 | 51 | #if (__ARMCC_VERSION < 400677) |
| AnnaBridge | 126:abea610beb85 | 52 | #error "Please use ARM Compiler Toolchain V4.0.677 or later!" |
| AnnaBridge | 126:abea610beb85 | 53 | #endif |
| AnnaBridge | 126:abea610beb85 | 54 | |
| AnnaBridge | 126:abea610beb85 | 55 | |
| AnnaBridge | 126:abea610beb85 | 56 | /** \brief No Operation |
| AnnaBridge | 126:abea610beb85 | 57 | |
| AnnaBridge | 126:abea610beb85 | 58 | No Operation does nothing. This instruction can be used for code alignment purposes. |
| AnnaBridge | 126:abea610beb85 | 59 | */ |
| AnnaBridge | 126:abea610beb85 | 60 | #define __NOP __nop |
| AnnaBridge | 126:abea610beb85 | 61 | |
| AnnaBridge | 126:abea610beb85 | 62 | |
| AnnaBridge | 126:abea610beb85 | 63 | /** \brief Wait For Interrupt |
| AnnaBridge | 126:abea610beb85 | 64 | |
| AnnaBridge | 126:abea610beb85 | 65 | Wait For Interrupt is a hint instruction that suspends execution |
| AnnaBridge | 126:abea610beb85 | 66 | until one of a number of events occurs. |
| AnnaBridge | 126:abea610beb85 | 67 | */ |
| AnnaBridge | 126:abea610beb85 | 68 | #define __WFI __wfi |
| AnnaBridge | 126:abea610beb85 | 69 | |
| AnnaBridge | 126:abea610beb85 | 70 | |
| AnnaBridge | 126:abea610beb85 | 71 | /** \brief Wait For Event |
| AnnaBridge | 126:abea610beb85 | 72 | |
| AnnaBridge | 126:abea610beb85 | 73 | Wait For Event is a hint instruction that permits the processor to enter |
| AnnaBridge | 126:abea610beb85 | 74 | a low-power state until one of a number of events occurs. |
| AnnaBridge | 126:abea610beb85 | 75 | */ |
| AnnaBridge | 126:abea610beb85 | 76 | #define __WFE __wfe |
| AnnaBridge | 126:abea610beb85 | 77 | |
| AnnaBridge | 126:abea610beb85 | 78 | |
| AnnaBridge | 126:abea610beb85 | 79 | /** \brief Send Event |
| AnnaBridge | 126:abea610beb85 | 80 | |
| AnnaBridge | 126:abea610beb85 | 81 | Send Event is a hint instruction. It causes an event to be signaled to the CPU. |
| AnnaBridge | 126:abea610beb85 | 82 | */ |
| AnnaBridge | 126:abea610beb85 | 83 | #define __SEV __sev |
| AnnaBridge | 126:abea610beb85 | 84 | |
| AnnaBridge | 126:abea610beb85 | 85 | |
| AnnaBridge | 126:abea610beb85 | 86 | /** \brief Instruction Synchronization Barrier |
| AnnaBridge | 126:abea610beb85 | 87 | |
| AnnaBridge | 126:abea610beb85 | 88 | Instruction Synchronization Barrier flushes the pipeline in the processor, |
| AnnaBridge | 126:abea610beb85 | 89 | so that all instructions following the ISB are fetched from cache or |
| AnnaBridge | 126:abea610beb85 | 90 | memory, after the instruction has been completed. |
| AnnaBridge | 126:abea610beb85 | 91 | */ |
| AnnaBridge | 126:abea610beb85 | 92 | #define __ISB() do {\ |
| AnnaBridge | 126:abea610beb85 | 93 | __schedule_barrier();\ |
| AnnaBridge | 126:abea610beb85 | 94 | __isb(0xF);\ |
| AnnaBridge | 126:abea610beb85 | 95 | __schedule_barrier();\ |
| AnnaBridge | 126:abea610beb85 | 96 | } while (0) |
| AnnaBridge | 126:abea610beb85 | 97 | |
| AnnaBridge | 126:abea610beb85 | 98 | /** \brief Data Synchronization Barrier |
| AnnaBridge | 126:abea610beb85 | 99 | |
| AnnaBridge | 126:abea610beb85 | 100 | This function acts as a special kind of Data Memory Barrier. |
| AnnaBridge | 126:abea610beb85 | 101 | It completes when all explicit memory accesses before this instruction complete. |
| AnnaBridge | 126:abea610beb85 | 102 | */ |
| AnnaBridge | 126:abea610beb85 | 103 | #define __DSB() do {\ |
| AnnaBridge | 126:abea610beb85 | 104 | __schedule_barrier();\ |
| AnnaBridge | 126:abea610beb85 | 105 | __dsb(0xF);\ |
| AnnaBridge | 126:abea610beb85 | 106 | __schedule_barrier();\ |
| AnnaBridge | 126:abea610beb85 | 107 | } while (0) |
| AnnaBridge | 126:abea610beb85 | 108 | |
| AnnaBridge | 126:abea610beb85 | 109 | /** \brief Data Memory Barrier |
| AnnaBridge | 126:abea610beb85 | 110 | |
| AnnaBridge | 126:abea610beb85 | 111 | This function ensures the apparent order of the explicit memory operations before |
| AnnaBridge | 126:abea610beb85 | 112 | and after the instruction, without ensuring their completion. |
| AnnaBridge | 126:abea610beb85 | 113 | */ |
| AnnaBridge | 126:abea610beb85 | 114 | #define __DMB() do {\ |
| AnnaBridge | 126:abea610beb85 | 115 | __schedule_barrier();\ |
| AnnaBridge | 126:abea610beb85 | 116 | __dmb(0xF);\ |
| AnnaBridge | 126:abea610beb85 | 117 | __schedule_barrier();\ |
| AnnaBridge | 126:abea610beb85 | 118 | } while (0) |
| AnnaBridge | 126:abea610beb85 | 119 | |
| AnnaBridge | 126:abea610beb85 | 120 | /** \brief Reverse byte order (32 bit) |
| AnnaBridge | 126:abea610beb85 | 121 | |
| AnnaBridge | 126:abea610beb85 | 122 | This function reverses the byte order in integer value. |
| AnnaBridge | 126:abea610beb85 | 123 | |
| AnnaBridge | 126:abea610beb85 | 124 | \param [in] value Value to reverse |
| AnnaBridge | 126:abea610beb85 | 125 | \return Reversed value |
| AnnaBridge | 126:abea610beb85 | 126 | */ |
| AnnaBridge | 126:abea610beb85 | 127 | #define __REV __rev |
| AnnaBridge | 126:abea610beb85 | 128 | |
| AnnaBridge | 126:abea610beb85 | 129 | |
| AnnaBridge | 126:abea610beb85 | 130 | /** \brief Reverse byte order (16 bit) |
| AnnaBridge | 126:abea610beb85 | 131 | |
| AnnaBridge | 126:abea610beb85 | 132 | This function reverses the byte order in two unsigned short values. |
| AnnaBridge | 126:abea610beb85 | 133 | |
| AnnaBridge | 126:abea610beb85 | 134 | \param [in] value Value to reverse |
| AnnaBridge | 126:abea610beb85 | 135 | \return Reversed value |
| AnnaBridge | 126:abea610beb85 | 136 | */ |
| AnnaBridge | 126:abea610beb85 | 137 | #ifndef __NO_EMBEDDED_ASM |
| AnnaBridge | 126:abea610beb85 | 138 | __attribute__((section(".rev16_text"))) __STATIC_INLINE __ASM uint32_t __REV16(uint32_t value) |
| AnnaBridge | 126:abea610beb85 | 139 | { |
| AnnaBridge | 126:abea610beb85 | 140 | rev16 r0, r0 |
| AnnaBridge | 126:abea610beb85 | 141 | bx lr |
| AnnaBridge | 126:abea610beb85 | 142 | } |
| AnnaBridge | 126:abea610beb85 | 143 | #endif |
| AnnaBridge | 126:abea610beb85 | 144 | |
| AnnaBridge | 126:abea610beb85 | 145 | /** \brief Reverse byte order in signed short value |
| AnnaBridge | 126:abea610beb85 | 146 | |
| AnnaBridge | 126:abea610beb85 | 147 | This function reverses the byte order in a signed short value with sign extension to integer. |
| AnnaBridge | 126:abea610beb85 | 148 | |
| AnnaBridge | 126:abea610beb85 | 149 | \param [in] value Value to reverse |
| AnnaBridge | 126:abea610beb85 | 150 | \return Reversed value |
| AnnaBridge | 126:abea610beb85 | 151 | */ |
| AnnaBridge | 126:abea610beb85 | 152 | #ifndef __NO_EMBEDDED_ASM |
| AnnaBridge | 126:abea610beb85 | 153 | __attribute__((section(".revsh_text"))) __STATIC_INLINE __ASM int32_t __REVSH(int32_t value) |
| AnnaBridge | 126:abea610beb85 | 154 | { |
| AnnaBridge | 126:abea610beb85 | 155 | revsh r0, r0 |
| AnnaBridge | 126:abea610beb85 | 156 | bx lr |
| AnnaBridge | 126:abea610beb85 | 157 | } |
| AnnaBridge | 126:abea610beb85 | 158 | #endif |
| AnnaBridge | 126:abea610beb85 | 159 | |
| AnnaBridge | 126:abea610beb85 | 160 | |
| AnnaBridge | 126:abea610beb85 | 161 | /** \brief Rotate Right in unsigned value (32 bit) |
| AnnaBridge | 126:abea610beb85 | 162 | |
| AnnaBridge | 126:abea610beb85 | 163 | This function Rotate Right (immediate) provides the value of the contents of a register rotated by a variable number of bits. |
| AnnaBridge | 126:abea610beb85 | 164 | |
| AnnaBridge | 126:abea610beb85 | 165 | \param [in] value Value to rotate |
| AnnaBridge | 126:abea610beb85 | 166 | \param [in] value Number of Bits to rotate |
| AnnaBridge | 126:abea610beb85 | 167 | \return Rotated value |
| AnnaBridge | 126:abea610beb85 | 168 | */ |
| AnnaBridge | 126:abea610beb85 | 169 | #define __ROR __ror |
| AnnaBridge | 126:abea610beb85 | 170 | |
| AnnaBridge | 126:abea610beb85 | 171 | |
| AnnaBridge | 126:abea610beb85 | 172 | /** \brief Breakpoint |
| AnnaBridge | 126:abea610beb85 | 173 | |
| AnnaBridge | 126:abea610beb85 | 174 | This function causes the processor to enter Debug state. |
| AnnaBridge | 126:abea610beb85 | 175 | Debug tools can use this to investigate system state when the instruction at a particular address is reached. |
| AnnaBridge | 126:abea610beb85 | 176 | |
| AnnaBridge | 126:abea610beb85 | 177 | \param [in] value is ignored by the processor. |
| AnnaBridge | 126:abea610beb85 | 178 | If required, a debugger can use it to store additional information about the breakpoint. |
| AnnaBridge | 126:abea610beb85 | 179 | */ |
| AnnaBridge | 126:abea610beb85 | 180 | #define __BKPT(value) __breakpoint(value) |
| AnnaBridge | 126:abea610beb85 | 181 | |
| AnnaBridge | 126:abea610beb85 | 182 | |
| AnnaBridge | 126:abea610beb85 | 183 | /** \brief Reverse bit order of value |
| AnnaBridge | 126:abea610beb85 | 184 | |
| AnnaBridge | 126:abea610beb85 | 185 | This function reverses the bit order of the given value. |
| AnnaBridge | 126:abea610beb85 | 186 | |
| AnnaBridge | 126:abea610beb85 | 187 | \param [in] value Value to reverse |
| AnnaBridge | 126:abea610beb85 | 188 | \return Reversed value |
| AnnaBridge | 126:abea610beb85 | 189 | */ |
| AnnaBridge | 126:abea610beb85 | 190 | #if (__CORTEX_M >= 0x03) || (__CORTEX_SC >= 300) |
| AnnaBridge | 126:abea610beb85 | 191 | #define __RBIT __rbit |
| AnnaBridge | 126:abea610beb85 | 192 | #else |
| AnnaBridge | 126:abea610beb85 | 193 | __attribute__((always_inline)) __STATIC_INLINE uint32_t __RBIT(uint32_t value) |
| AnnaBridge | 126:abea610beb85 | 194 | { |
| AnnaBridge | 126:abea610beb85 | 195 | uint32_t result; |
| AnnaBridge | 126:abea610beb85 | 196 | int32_t s = 4 /*sizeof(v)*/ * 8 - 1; // extra shift needed at end |
| AnnaBridge | 126:abea610beb85 | 197 | |
| AnnaBridge | 126:abea610beb85 | 198 | result = value; // r will be reversed bits of v; first get LSB of v |
| AnnaBridge | 126:abea610beb85 | 199 | for (value >>= 1; value; value >>= 1) |
| AnnaBridge | 126:abea610beb85 | 200 | { |
| AnnaBridge | 126:abea610beb85 | 201 | result <<= 1; |
| AnnaBridge | 126:abea610beb85 | 202 | result |= value & 1; |
| AnnaBridge | 126:abea610beb85 | 203 | s--; |
| AnnaBridge | 126:abea610beb85 | 204 | } |
| AnnaBridge | 126:abea610beb85 | 205 | result <<= s; // shift when v's highest bits are zero |
| AnnaBridge | 126:abea610beb85 | 206 | return(result); |
| AnnaBridge | 126:abea610beb85 | 207 | } |
| AnnaBridge | 126:abea610beb85 | 208 | #endif |
| AnnaBridge | 126:abea610beb85 | 209 | |
| AnnaBridge | 126:abea610beb85 | 210 | |
| AnnaBridge | 126:abea610beb85 | 211 | /** \brief Count leading zeros |
| AnnaBridge | 126:abea610beb85 | 212 | |
| AnnaBridge | 126:abea610beb85 | 213 | This function counts the number of leading zeros of a data value. |
| AnnaBridge | 126:abea610beb85 | 214 | |
| AnnaBridge | 126:abea610beb85 | 215 | \param [in] value Value to count the leading zeros |
| AnnaBridge | 126:abea610beb85 | 216 | \return number of leading zeros in value |
| AnnaBridge | 126:abea610beb85 | 217 | */ |
| AnnaBridge | 126:abea610beb85 | 218 | #define __CLZ __clz |
| AnnaBridge | 126:abea610beb85 | 219 | |
| AnnaBridge | 126:abea610beb85 | 220 | |
| AnnaBridge | 126:abea610beb85 | 221 | #if (__CORTEX_M >= 0x03) || (__CORTEX_SC >= 300) |
| AnnaBridge | 126:abea610beb85 | 222 | |
| AnnaBridge | 126:abea610beb85 | 223 | /** \brief LDR Exclusive (8 bit) |
| AnnaBridge | 126:abea610beb85 | 224 | |
| AnnaBridge | 126:abea610beb85 | 225 | This function executes a exclusive LDR instruction for 8 bit value. |
| AnnaBridge | 126:abea610beb85 | 226 | |
| AnnaBridge | 126:abea610beb85 | 227 | \param [in] ptr Pointer to data |
| AnnaBridge | 126:abea610beb85 | 228 | \return value of type uint8_t at (*ptr) |
| AnnaBridge | 126:abea610beb85 | 229 | */ |
| AnnaBridge | 126:abea610beb85 | 230 | #define __LDREXB(ptr) ((uint8_t ) __ldrex(ptr)) |
| AnnaBridge | 126:abea610beb85 | 231 | |
| AnnaBridge | 126:abea610beb85 | 232 | |
| AnnaBridge | 126:abea610beb85 | 233 | /** \brief LDR Exclusive (16 bit) |
| AnnaBridge | 126:abea610beb85 | 234 | |
| AnnaBridge | 126:abea610beb85 | 235 | This function executes a exclusive LDR instruction for 16 bit values. |
| AnnaBridge | 126:abea610beb85 | 236 | |
| AnnaBridge | 126:abea610beb85 | 237 | \param [in] ptr Pointer to data |
| AnnaBridge | 126:abea610beb85 | 238 | \return value of type uint16_t at (*ptr) |
| AnnaBridge | 126:abea610beb85 | 239 | */ |
| AnnaBridge | 126:abea610beb85 | 240 | #define __LDREXH(ptr) ((uint16_t) __ldrex(ptr)) |
| AnnaBridge | 126:abea610beb85 | 241 | |
| AnnaBridge | 126:abea610beb85 | 242 | |
| AnnaBridge | 126:abea610beb85 | 243 | /** \brief LDR Exclusive (32 bit) |
| AnnaBridge | 126:abea610beb85 | 244 | |
| AnnaBridge | 126:abea610beb85 | 245 | This function executes a exclusive LDR instruction for 32 bit values. |
| AnnaBridge | 126:abea610beb85 | 246 | |
| AnnaBridge | 126:abea610beb85 | 247 | \param [in] ptr Pointer to data |
| AnnaBridge | 126:abea610beb85 | 248 | \return value of type uint32_t at (*ptr) |
| AnnaBridge | 126:abea610beb85 | 249 | */ |
| AnnaBridge | 126:abea610beb85 | 250 | #define __LDREXW(ptr) ((uint32_t ) __ldrex(ptr)) |
| AnnaBridge | 126:abea610beb85 | 251 | |
| AnnaBridge | 126:abea610beb85 | 252 | |
| AnnaBridge | 126:abea610beb85 | 253 | /** \brief STR Exclusive (8 bit) |
| AnnaBridge | 126:abea610beb85 | 254 | |
| AnnaBridge | 126:abea610beb85 | 255 | This function executes a exclusive STR instruction for 8 bit values. |
| AnnaBridge | 126:abea610beb85 | 256 | |
| AnnaBridge | 126:abea610beb85 | 257 | \param [in] value Value to store |
| AnnaBridge | 126:abea610beb85 | 258 | \param [in] ptr Pointer to location |
| AnnaBridge | 126:abea610beb85 | 259 | \return 0 Function succeeded |
| AnnaBridge | 126:abea610beb85 | 260 | \return 1 Function failed |
| AnnaBridge | 126:abea610beb85 | 261 | */ |
| AnnaBridge | 126:abea610beb85 | 262 | #define __STREXB(value, ptr) __strex(value, ptr) |
| AnnaBridge | 126:abea610beb85 | 263 | |
| AnnaBridge | 126:abea610beb85 | 264 | |
| AnnaBridge | 126:abea610beb85 | 265 | /** \brief STR Exclusive (16 bit) |
| AnnaBridge | 126:abea610beb85 | 266 | |
| AnnaBridge | 126:abea610beb85 | 267 | This function executes a exclusive STR instruction for 16 bit values. |
| AnnaBridge | 126:abea610beb85 | 268 | |
| AnnaBridge | 126:abea610beb85 | 269 | \param [in] value Value to store |
| AnnaBridge | 126:abea610beb85 | 270 | \param [in] ptr Pointer to location |
| AnnaBridge | 126:abea610beb85 | 271 | \return 0 Function succeeded |
| AnnaBridge | 126:abea610beb85 | 272 | \return 1 Function failed |
| AnnaBridge | 126:abea610beb85 | 273 | */ |
| AnnaBridge | 126:abea610beb85 | 274 | #define __STREXH(value, ptr) __strex(value, ptr) |
| AnnaBridge | 126:abea610beb85 | 275 | |
| AnnaBridge | 126:abea610beb85 | 276 | |
| AnnaBridge | 126:abea610beb85 | 277 | /** \brief STR Exclusive (32 bit) |
| AnnaBridge | 126:abea610beb85 | 278 | |
| AnnaBridge | 126:abea610beb85 | 279 | This function executes a exclusive STR instruction for 32 bit values. |
| AnnaBridge | 126:abea610beb85 | 280 | |
| AnnaBridge | 126:abea610beb85 | 281 | \param [in] value Value to store |
| AnnaBridge | 126:abea610beb85 | 282 | \param [in] ptr Pointer to location |
| AnnaBridge | 126:abea610beb85 | 283 | \return 0 Function succeeded |
| AnnaBridge | 126:abea610beb85 | 284 | \return 1 Function failed |
| AnnaBridge | 126:abea610beb85 | 285 | */ |
| AnnaBridge | 126:abea610beb85 | 286 | #define __STREXW(value, ptr) __strex(value, ptr) |
| AnnaBridge | 126:abea610beb85 | 287 | |
| AnnaBridge | 126:abea610beb85 | 288 | |
| AnnaBridge | 126:abea610beb85 | 289 | /** \brief Remove the exclusive lock |
| AnnaBridge | 126:abea610beb85 | 290 | |
| AnnaBridge | 126:abea610beb85 | 291 | This function removes the exclusive lock which is created by LDREX. |
| AnnaBridge | 126:abea610beb85 | 292 | |
| AnnaBridge | 126:abea610beb85 | 293 | */ |
| AnnaBridge | 126:abea610beb85 | 294 | #define __CLREX __clrex |
| AnnaBridge | 126:abea610beb85 | 295 | |
| AnnaBridge | 126:abea610beb85 | 296 | |
| AnnaBridge | 126:abea610beb85 | 297 | /** \brief Signed Saturate |
| AnnaBridge | 126:abea610beb85 | 298 | |
| AnnaBridge | 126:abea610beb85 | 299 | This function saturates a signed value. |
| AnnaBridge | 126:abea610beb85 | 300 | |
| AnnaBridge | 126:abea610beb85 | 301 | \param [in] value Value to be saturated |
| AnnaBridge | 126:abea610beb85 | 302 | \param [in] sat Bit position to saturate to (1..32) |
| AnnaBridge | 126:abea610beb85 | 303 | \return Saturated value |
| AnnaBridge | 126:abea610beb85 | 304 | */ |
| AnnaBridge | 126:abea610beb85 | 305 | #define __SSAT __ssat |
| AnnaBridge | 126:abea610beb85 | 306 | |
| AnnaBridge | 126:abea610beb85 | 307 | |
| AnnaBridge | 126:abea610beb85 | 308 | /** \brief Unsigned Saturate |
| AnnaBridge | 126:abea610beb85 | 309 | |
| AnnaBridge | 126:abea610beb85 | 310 | This function saturates an unsigned value. |
| AnnaBridge | 126:abea610beb85 | 311 | |
| AnnaBridge | 126:abea610beb85 | 312 | \param [in] value Value to be saturated |
| AnnaBridge | 126:abea610beb85 | 313 | \param [in] sat Bit position to saturate to (0..31) |
| AnnaBridge | 126:abea610beb85 | 314 | \return Saturated value |
| AnnaBridge | 126:abea610beb85 | 315 | */ |
| AnnaBridge | 126:abea610beb85 | 316 | #define __USAT __usat |
| AnnaBridge | 126:abea610beb85 | 317 | |
| AnnaBridge | 126:abea610beb85 | 318 | |
| AnnaBridge | 126:abea610beb85 | 319 | /** \brief Rotate Right with Extend (32 bit) |
| AnnaBridge | 126:abea610beb85 | 320 | |
| AnnaBridge | 126:abea610beb85 | 321 | This function moves each bit of a bitstring right by one bit. |
| AnnaBridge | 126:abea610beb85 | 322 | The carry input is shifted in at the left end of the bitstring. |
| AnnaBridge | 126:abea610beb85 | 323 | |
| AnnaBridge | 126:abea610beb85 | 324 | \param [in] value Value to rotate |
| AnnaBridge | 126:abea610beb85 | 325 | \return Rotated value |
| AnnaBridge | 126:abea610beb85 | 326 | */ |
| AnnaBridge | 126:abea610beb85 | 327 | #ifndef __NO_EMBEDDED_ASM |
| AnnaBridge | 126:abea610beb85 | 328 | __attribute__((section(".rrx_text"))) __STATIC_INLINE __ASM uint32_t __RRX(uint32_t value) |
| AnnaBridge | 126:abea610beb85 | 329 | { |
| AnnaBridge | 126:abea610beb85 | 330 | rrx r0, r0 |
| AnnaBridge | 126:abea610beb85 | 331 | bx lr |
| AnnaBridge | 126:abea610beb85 | 332 | } |
| AnnaBridge | 126:abea610beb85 | 333 | #endif |
| AnnaBridge | 126:abea610beb85 | 334 | |
| AnnaBridge | 126:abea610beb85 | 335 | |
| AnnaBridge | 126:abea610beb85 | 336 | /** \brief LDRT Unprivileged (8 bit) |
| AnnaBridge | 126:abea610beb85 | 337 | |
| AnnaBridge | 126:abea610beb85 | 338 | This function executes a Unprivileged LDRT instruction for 8 bit value. |
| AnnaBridge | 126:abea610beb85 | 339 | |
| AnnaBridge | 126:abea610beb85 | 340 | \param [in] ptr Pointer to data |
| AnnaBridge | 126:abea610beb85 | 341 | \return value of type uint8_t at (*ptr) |
| AnnaBridge | 126:abea610beb85 | 342 | */ |
| AnnaBridge | 126:abea610beb85 | 343 | #define __LDRBT(ptr) ((uint8_t ) __ldrt(ptr)) |
| AnnaBridge | 126:abea610beb85 | 344 | |
| AnnaBridge | 126:abea610beb85 | 345 | |
| AnnaBridge | 126:abea610beb85 | 346 | /** \brief LDRT Unprivileged (16 bit) |
| AnnaBridge | 126:abea610beb85 | 347 | |
| AnnaBridge | 126:abea610beb85 | 348 | This function executes a Unprivileged LDRT instruction for 16 bit values. |
| AnnaBridge | 126:abea610beb85 | 349 | |
| AnnaBridge | 126:abea610beb85 | 350 | \param [in] ptr Pointer to data |
| AnnaBridge | 126:abea610beb85 | 351 | \return value of type uint16_t at (*ptr) |
| AnnaBridge | 126:abea610beb85 | 352 | */ |
| AnnaBridge | 126:abea610beb85 | 353 | #define __LDRHT(ptr) ((uint16_t) __ldrt(ptr)) |
| AnnaBridge | 126:abea610beb85 | 354 | |
| AnnaBridge | 126:abea610beb85 | 355 | |
| AnnaBridge | 126:abea610beb85 | 356 | /** \brief LDRT Unprivileged (32 bit) |
| AnnaBridge | 126:abea610beb85 | 357 | |
| AnnaBridge | 126:abea610beb85 | 358 | This function executes a Unprivileged LDRT instruction for 32 bit values. |
| AnnaBridge | 126:abea610beb85 | 359 | |
| AnnaBridge | 126:abea610beb85 | 360 | \param [in] ptr Pointer to data |
| AnnaBridge | 126:abea610beb85 | 361 | \return value of type uint32_t at (*ptr) |
| AnnaBridge | 126:abea610beb85 | 362 | */ |
| AnnaBridge | 126:abea610beb85 | 363 | #define __LDRT(ptr) ((uint32_t ) __ldrt(ptr)) |
| AnnaBridge | 126:abea610beb85 | 364 | |
| AnnaBridge | 126:abea610beb85 | 365 | |
| AnnaBridge | 126:abea610beb85 | 366 | /** \brief STRT Unprivileged (8 bit) |
| AnnaBridge | 126:abea610beb85 | 367 | |
| AnnaBridge | 126:abea610beb85 | 368 | This function executes a Unprivileged STRT instruction for 8 bit values. |
| AnnaBridge | 126:abea610beb85 | 369 | |
| AnnaBridge | 126:abea610beb85 | 370 | \param [in] value Value to store |
| AnnaBridge | 126:abea610beb85 | 371 | \param [in] ptr Pointer to location |
| AnnaBridge | 126:abea610beb85 | 372 | */ |
| AnnaBridge | 126:abea610beb85 | 373 | #define __STRBT(value, ptr) __strt(value, ptr) |
| AnnaBridge | 126:abea610beb85 | 374 | |
| AnnaBridge | 126:abea610beb85 | 375 | |
| AnnaBridge | 126:abea610beb85 | 376 | /** \brief STRT Unprivileged (16 bit) |
| AnnaBridge | 126:abea610beb85 | 377 | |
| AnnaBridge | 126:abea610beb85 | 378 | This function executes a Unprivileged STRT instruction for 16 bit values. |
| AnnaBridge | 126:abea610beb85 | 379 | |
| AnnaBridge | 126:abea610beb85 | 380 | \param [in] value Value to store |
| AnnaBridge | 126:abea610beb85 | 381 | \param [in] ptr Pointer to location |
| AnnaBridge | 126:abea610beb85 | 382 | */ |
| AnnaBridge | 126:abea610beb85 | 383 | #define __STRHT(value, ptr) __strt(value, ptr) |
| AnnaBridge | 126:abea610beb85 | 384 | |
| AnnaBridge | 126:abea610beb85 | 385 | |
| AnnaBridge | 126:abea610beb85 | 386 | /** \brief STRT Unprivileged (32 bit) |
| AnnaBridge | 126:abea610beb85 | 387 | |
| AnnaBridge | 126:abea610beb85 | 388 | This function executes a Unprivileged STRT instruction for 32 bit values. |
| AnnaBridge | 126:abea610beb85 | 389 | |
| AnnaBridge | 126:abea610beb85 | 390 | \param [in] value Value to store |
| AnnaBridge | 126:abea610beb85 | 391 | \param [in] ptr Pointer to location |
| AnnaBridge | 126:abea610beb85 | 392 | */ |
| AnnaBridge | 126:abea610beb85 | 393 | #define __STRT(value, ptr) __strt(value, ptr) |
| AnnaBridge | 126:abea610beb85 | 394 | |
| AnnaBridge | 126:abea610beb85 | 395 | #endif /* (__CORTEX_M >= 0x03) || (__CORTEX_SC >= 300) */ |
| AnnaBridge | 126:abea610beb85 | 396 | |
| AnnaBridge | 126:abea610beb85 | 397 | |
| AnnaBridge | 126:abea610beb85 | 398 | #elif defined ( __GNUC__ ) /*------------------ GNU Compiler ---------------------*/ |
| AnnaBridge | 126:abea610beb85 | 399 | /* GNU gcc specific functions */ |
| AnnaBridge | 126:abea610beb85 | 400 | |
| AnnaBridge | 126:abea610beb85 | 401 | /* Define macros for porting to both thumb1 and thumb2. |
| AnnaBridge | 126:abea610beb85 | 402 | * For thumb1, use low register (r0-r7), specified by constrant "l" |
| AnnaBridge | 126:abea610beb85 | 403 | * Otherwise, use general registers, specified by constrant "r" */ |
| AnnaBridge | 126:abea610beb85 | 404 | #if defined (__thumb__) && !defined (__thumb2__) |
| AnnaBridge | 126:abea610beb85 | 405 | #define __CMSIS_GCC_OUT_REG(r) "=l" (r) |
| AnnaBridge | 126:abea610beb85 | 406 | #define __CMSIS_GCC_USE_REG(r) "l" (r) |
| AnnaBridge | 126:abea610beb85 | 407 | #else |
| AnnaBridge | 126:abea610beb85 | 408 | #define __CMSIS_GCC_OUT_REG(r) "=r" (r) |
| AnnaBridge | 126:abea610beb85 | 409 | #define __CMSIS_GCC_USE_REG(r) "r" (r) |
| AnnaBridge | 126:abea610beb85 | 410 | #endif |
| AnnaBridge | 126:abea610beb85 | 411 | |
| AnnaBridge | 126:abea610beb85 | 412 | /** \brief No Operation |
| AnnaBridge | 126:abea610beb85 | 413 | |
| AnnaBridge | 126:abea610beb85 | 414 | No Operation does nothing. This instruction can be used for code alignment purposes. |
| AnnaBridge | 126:abea610beb85 | 415 | */ |
| AnnaBridge | 126:abea610beb85 | 416 | __attribute__((always_inline)) __STATIC_INLINE void __NOP(void) |
| AnnaBridge | 126:abea610beb85 | 417 | { |
| AnnaBridge | 126:abea610beb85 | 418 | __ASM volatile ("nop"); |
| AnnaBridge | 126:abea610beb85 | 419 | } |
| AnnaBridge | 126:abea610beb85 | 420 | |
| AnnaBridge | 126:abea610beb85 | 421 | |
| AnnaBridge | 126:abea610beb85 | 422 | /** \brief Wait For Interrupt |
| AnnaBridge | 126:abea610beb85 | 423 | |
| AnnaBridge | 126:abea610beb85 | 424 | Wait For Interrupt is a hint instruction that suspends execution |
| AnnaBridge | 126:abea610beb85 | 425 | until one of a number of events occurs. |
| AnnaBridge | 126:abea610beb85 | 426 | */ |
| AnnaBridge | 126:abea610beb85 | 427 | __attribute__((always_inline)) __STATIC_INLINE void __WFI(void) |
| AnnaBridge | 126:abea610beb85 | 428 | { |
| AnnaBridge | 126:abea610beb85 | 429 | __ASM volatile ("wfi"); |
| AnnaBridge | 126:abea610beb85 | 430 | } |
| AnnaBridge | 126:abea610beb85 | 431 | |
| AnnaBridge | 126:abea610beb85 | 432 | |
| AnnaBridge | 126:abea610beb85 | 433 | /** \brief Wait For Event |
| AnnaBridge | 126:abea610beb85 | 434 | |
| AnnaBridge | 126:abea610beb85 | 435 | Wait For Event is a hint instruction that permits the processor to enter |
| AnnaBridge | 126:abea610beb85 | 436 | a low-power state until one of a number of events occurs. |
| AnnaBridge | 126:abea610beb85 | 437 | */ |
| AnnaBridge | 126:abea610beb85 | 438 | __attribute__((always_inline)) __STATIC_INLINE void __WFE(void) |
| AnnaBridge | 126:abea610beb85 | 439 | { |
| AnnaBridge | 126:abea610beb85 | 440 | __ASM volatile ("wfe"); |
| AnnaBridge | 126:abea610beb85 | 441 | } |
| AnnaBridge | 126:abea610beb85 | 442 | |
| AnnaBridge | 126:abea610beb85 | 443 | |
| AnnaBridge | 126:abea610beb85 | 444 | /** \brief Send Event |
| AnnaBridge | 126:abea610beb85 | 445 | |
| AnnaBridge | 126:abea610beb85 | 446 | Send Event is a hint instruction. It causes an event to be signaled to the CPU. |
| AnnaBridge | 126:abea610beb85 | 447 | */ |
| AnnaBridge | 126:abea610beb85 | 448 | __attribute__((always_inline)) __STATIC_INLINE void __SEV(void) |
| AnnaBridge | 126:abea610beb85 | 449 | { |
| AnnaBridge | 126:abea610beb85 | 450 | __ASM volatile ("sev"); |
| AnnaBridge | 126:abea610beb85 | 451 | } |
| AnnaBridge | 126:abea610beb85 | 452 | |
| AnnaBridge | 126:abea610beb85 | 453 | |
| AnnaBridge | 126:abea610beb85 | 454 | /** \brief Instruction Synchronization Barrier |
| AnnaBridge | 126:abea610beb85 | 455 | |
| AnnaBridge | 126:abea610beb85 | 456 | Instruction Synchronization Barrier flushes the pipeline in the processor, |
| AnnaBridge | 126:abea610beb85 | 457 | so that all instructions following the ISB are fetched from cache or |
| AnnaBridge | 126:abea610beb85 | 458 | memory, after the instruction has been completed. |
| AnnaBridge | 126:abea610beb85 | 459 | */ |
| AnnaBridge | 126:abea610beb85 | 460 | __attribute__((always_inline)) __STATIC_INLINE void __ISB(void) |
| AnnaBridge | 126:abea610beb85 | 461 | { |
| AnnaBridge | 126:abea610beb85 | 462 | __ASM volatile ("isb 0xF":::"memory"); |
| AnnaBridge | 126:abea610beb85 | 463 | } |
| AnnaBridge | 126:abea610beb85 | 464 | |
| AnnaBridge | 126:abea610beb85 | 465 | |
| AnnaBridge | 126:abea610beb85 | 466 | /** \brief Data Synchronization Barrier |
| AnnaBridge | 126:abea610beb85 | 467 | |
| AnnaBridge | 126:abea610beb85 | 468 | This function acts as a special kind of Data Memory Barrier. |
| AnnaBridge | 126:abea610beb85 | 469 | It completes when all explicit memory accesses before this instruction complete. |
| AnnaBridge | 126:abea610beb85 | 470 | */ |
| AnnaBridge | 126:abea610beb85 | 471 | __attribute__((always_inline)) __STATIC_INLINE void __DSB(void) |
| AnnaBridge | 126:abea610beb85 | 472 | { |
| AnnaBridge | 126:abea610beb85 | 473 | __ASM volatile ("dsb 0xF":::"memory"); |
| AnnaBridge | 126:abea610beb85 | 474 | } |
| AnnaBridge | 126:abea610beb85 | 475 | |
| AnnaBridge | 126:abea610beb85 | 476 | |
| AnnaBridge | 126:abea610beb85 | 477 | /** \brief Data Memory Barrier |
| AnnaBridge | 126:abea610beb85 | 478 | |
| AnnaBridge | 126:abea610beb85 | 479 | This function ensures the apparent order of the explicit memory operations before |
| AnnaBridge | 126:abea610beb85 | 480 | and after the instruction, without ensuring their completion. |
| AnnaBridge | 126:abea610beb85 | 481 | */ |
| AnnaBridge | 126:abea610beb85 | 482 | __attribute__((always_inline)) __STATIC_INLINE void __DMB(void) |
| AnnaBridge | 126:abea610beb85 | 483 | { |
| AnnaBridge | 126:abea610beb85 | 484 | __ASM volatile ("dmb 0xF":::"memory"); |
| AnnaBridge | 126:abea610beb85 | 485 | } |
| AnnaBridge | 126:abea610beb85 | 486 | |
| AnnaBridge | 126:abea610beb85 | 487 | |
| AnnaBridge | 126:abea610beb85 | 488 | /** \brief Reverse byte order (32 bit) |
| AnnaBridge | 126:abea610beb85 | 489 | |
| AnnaBridge | 126:abea610beb85 | 490 | This function reverses the byte order in integer value. |
| AnnaBridge | 126:abea610beb85 | 491 | |
| AnnaBridge | 126:abea610beb85 | 492 | \param [in] value Value to reverse |
| AnnaBridge | 126:abea610beb85 | 493 | \return Reversed value |
| AnnaBridge | 126:abea610beb85 | 494 | */ |
| AnnaBridge | 126:abea610beb85 | 495 | __attribute__((always_inline)) __STATIC_INLINE uint32_t __REV(uint32_t value) |
| AnnaBridge | 126:abea610beb85 | 496 | { |
| AnnaBridge | 126:abea610beb85 | 497 | #if (__GNUC__ > 4) || (__GNUC__ == 4 && __GNUC_MINOR__ >= 5) |
| AnnaBridge | 126:abea610beb85 | 498 | return __builtin_bswap32(value); |
| AnnaBridge | 126:abea610beb85 | 499 | #else |
| AnnaBridge | 126:abea610beb85 | 500 | uint32_t result; |
| AnnaBridge | 126:abea610beb85 | 501 | |
| AnnaBridge | 126:abea610beb85 | 502 | __ASM volatile ("rev %0, %1" : __CMSIS_GCC_OUT_REG (result) : __CMSIS_GCC_USE_REG (value) ); |
| AnnaBridge | 126:abea610beb85 | 503 | return(result); |
| AnnaBridge | 126:abea610beb85 | 504 | #endif |
| AnnaBridge | 126:abea610beb85 | 505 | } |
| AnnaBridge | 126:abea610beb85 | 506 | |
| AnnaBridge | 126:abea610beb85 | 507 | |
| AnnaBridge | 126:abea610beb85 | 508 | /** \brief Reverse byte order (16 bit) |
| AnnaBridge | 126:abea610beb85 | 509 | |
| AnnaBridge | 126:abea610beb85 | 510 | This function reverses the byte order in two unsigned short values. |
| AnnaBridge | 126:abea610beb85 | 511 | |
| AnnaBridge | 126:abea610beb85 | 512 | \param [in] value Value to reverse |
| AnnaBridge | 126:abea610beb85 | 513 | \return Reversed value |
| AnnaBridge | 126:abea610beb85 | 514 | */ |
| AnnaBridge | 126:abea610beb85 | 515 | __attribute__((always_inline)) __STATIC_INLINE uint32_t __REV16(uint32_t value) |
| AnnaBridge | 126:abea610beb85 | 516 | { |
| AnnaBridge | 126:abea610beb85 | 517 | uint32_t result; |
| AnnaBridge | 126:abea610beb85 | 518 | |
| AnnaBridge | 126:abea610beb85 | 519 | __ASM volatile ("rev16 %0, %1" : __CMSIS_GCC_OUT_REG (result) : __CMSIS_GCC_USE_REG (value) ); |
| AnnaBridge | 126:abea610beb85 | 520 | return(result); |
| AnnaBridge | 126:abea610beb85 | 521 | } |
| AnnaBridge | 126:abea610beb85 | 522 | |
| AnnaBridge | 126:abea610beb85 | 523 | |
| AnnaBridge | 126:abea610beb85 | 524 | /** \brief Reverse byte order in signed short value |
| AnnaBridge | 126:abea610beb85 | 525 | |
| AnnaBridge | 126:abea610beb85 | 526 | This function reverses the byte order in a signed short value with sign extension to integer. |
| AnnaBridge | 126:abea610beb85 | 527 | |
| AnnaBridge | 126:abea610beb85 | 528 | \param [in] value Value to reverse |
| AnnaBridge | 126:abea610beb85 | 529 | \return Reversed value |
| AnnaBridge | 126:abea610beb85 | 530 | */ |
| AnnaBridge | 126:abea610beb85 | 531 | __attribute__((always_inline)) __STATIC_INLINE int32_t __REVSH(int32_t value) |
| AnnaBridge | 126:abea610beb85 | 532 | { |
| AnnaBridge | 126:abea610beb85 | 533 | #if (__GNUC__ > 4) || (__GNUC__ == 4 && __GNUC_MINOR__ >= 8) |
| AnnaBridge | 126:abea610beb85 | 534 | return (short)__builtin_bswap16(value); |
| AnnaBridge | 126:abea610beb85 | 535 | #else |
| AnnaBridge | 126:abea610beb85 | 536 | uint32_t result; |
| AnnaBridge | 126:abea610beb85 | 537 | |
| AnnaBridge | 126:abea610beb85 | 538 | __ASM volatile ("revsh %0, %1" : __CMSIS_GCC_OUT_REG (result) : __CMSIS_GCC_USE_REG (value) ); |
| AnnaBridge | 126:abea610beb85 | 539 | return(result); |
| AnnaBridge | 126:abea610beb85 | 540 | #endif |
| AnnaBridge | 126:abea610beb85 | 541 | } |
| AnnaBridge | 126:abea610beb85 | 542 | |
| AnnaBridge | 126:abea610beb85 | 543 | |
| AnnaBridge | 126:abea610beb85 | 544 | /** \brief Rotate Right in unsigned value (32 bit) |
| AnnaBridge | 126:abea610beb85 | 545 | |
| AnnaBridge | 126:abea610beb85 | 546 | This function Rotate Right (immediate) provides the value of the contents of a register rotated by a variable number of bits. |
| AnnaBridge | 126:abea610beb85 | 547 | |
| AnnaBridge | 126:abea610beb85 | 548 | \param [in] value Value to rotate |
| AnnaBridge | 126:abea610beb85 | 549 | \param [in] value Number of Bits to rotate |
| AnnaBridge | 126:abea610beb85 | 550 | \return Rotated value |
| AnnaBridge | 126:abea610beb85 | 551 | */ |
| AnnaBridge | 126:abea610beb85 | 552 | __attribute__((always_inline)) __STATIC_INLINE uint32_t __ROR(uint32_t op1, uint32_t op2) |
| AnnaBridge | 126:abea610beb85 | 553 | { |
| AnnaBridge | 126:abea610beb85 | 554 | return (op1 >> op2) | (op1 << (32 - op2)); |
| AnnaBridge | 126:abea610beb85 | 555 | } |
| AnnaBridge | 126:abea610beb85 | 556 | |
| AnnaBridge | 126:abea610beb85 | 557 | |
| AnnaBridge | 126:abea610beb85 | 558 | /** \brief Breakpoint |
| AnnaBridge | 126:abea610beb85 | 559 | |
| AnnaBridge | 126:abea610beb85 | 560 | This function causes the processor to enter Debug state. |
| AnnaBridge | 126:abea610beb85 | 561 | Debug tools can use this to investigate system state when the instruction at a particular address is reached. |
| AnnaBridge | 126:abea610beb85 | 562 | |
| AnnaBridge | 126:abea610beb85 | 563 | \param [in] value is ignored by the processor. |
| AnnaBridge | 126:abea610beb85 | 564 | If required, a debugger can use it to store additional information about the breakpoint. |
| AnnaBridge | 126:abea610beb85 | 565 | */ |
| AnnaBridge | 126:abea610beb85 | 566 | #define __BKPT(value) __ASM volatile ("bkpt "#value) |
| AnnaBridge | 126:abea610beb85 | 567 | |
| AnnaBridge | 126:abea610beb85 | 568 | |
| AnnaBridge | 126:abea610beb85 | 569 | /** \brief Reverse bit order of value |
| AnnaBridge | 126:abea610beb85 | 570 | |
| AnnaBridge | 126:abea610beb85 | 571 | This function reverses the bit order of the given value. |
| AnnaBridge | 126:abea610beb85 | 572 | |
| AnnaBridge | 126:abea610beb85 | 573 | \param [in] value Value to reverse |
| AnnaBridge | 126:abea610beb85 | 574 | \return Reversed value |
| AnnaBridge | 126:abea610beb85 | 575 | */ |
| AnnaBridge | 126:abea610beb85 | 576 | __attribute__((always_inline)) __STATIC_INLINE uint32_t __RBIT(uint32_t value) |
| AnnaBridge | 126:abea610beb85 | 577 | { |
| AnnaBridge | 126:abea610beb85 | 578 | uint32_t result; |
| AnnaBridge | 126:abea610beb85 | 579 | |
| AnnaBridge | 126:abea610beb85 | 580 | #if (__CORTEX_M >= 0x03) || (__CORTEX_SC >= 300) |
| AnnaBridge | 126:abea610beb85 | 581 | __ASM volatile ("rbit %0, %1" : "=r" (result) : "r" (value) ); |
| AnnaBridge | 126:abea610beb85 | 582 | #else |
| AnnaBridge | 126:abea610beb85 | 583 | int32_t s = 4 /*sizeof(v)*/ * 8 - 1; // extra shift needed at end |
| AnnaBridge | 126:abea610beb85 | 584 | |
| AnnaBridge | 126:abea610beb85 | 585 | result = value; // r will be reversed bits of v; first get LSB of v |
| AnnaBridge | 126:abea610beb85 | 586 | for (value >>= 1; value; value >>= 1) |
| AnnaBridge | 126:abea610beb85 | 587 | { |
| AnnaBridge | 126:abea610beb85 | 588 | result <<= 1; |
| AnnaBridge | 126:abea610beb85 | 589 | result |= value & 1; |
| AnnaBridge | 126:abea610beb85 | 590 | s--; |
| AnnaBridge | 126:abea610beb85 | 591 | } |
| AnnaBridge | 126:abea610beb85 | 592 | result <<= s; // shift when v's highest bits are zero |
| AnnaBridge | 126:abea610beb85 | 593 | #endif |
| AnnaBridge | 126:abea610beb85 | 594 | return(result); |
| AnnaBridge | 126:abea610beb85 | 595 | } |
| AnnaBridge | 126:abea610beb85 | 596 | |
| AnnaBridge | 126:abea610beb85 | 597 | |
| AnnaBridge | 126:abea610beb85 | 598 | /** \brief Count leading zeros |
| AnnaBridge | 126:abea610beb85 | 599 | |
| AnnaBridge | 126:abea610beb85 | 600 | This function counts the number of leading zeros of a data value. |
| AnnaBridge | 126:abea610beb85 | 601 | |
| AnnaBridge | 126:abea610beb85 | 602 | \param [in] value Value to count the leading zeros |
| AnnaBridge | 126:abea610beb85 | 603 | \return number of leading zeros in value |
| AnnaBridge | 126:abea610beb85 | 604 | */ |
| AnnaBridge | 126:abea610beb85 | 605 | #define __CLZ __builtin_clz |
| AnnaBridge | 126:abea610beb85 | 606 | |
| AnnaBridge | 126:abea610beb85 | 607 | |
| AnnaBridge | 126:abea610beb85 | 608 | #if (__CORTEX_M >= 0x03) || (__CORTEX_SC >= 300) |
| AnnaBridge | 126:abea610beb85 | 609 | |
| AnnaBridge | 126:abea610beb85 | 610 | /** \brief LDR Exclusive (8 bit) |
| AnnaBridge | 126:abea610beb85 | 611 | |
| AnnaBridge | 126:abea610beb85 | 612 | This function executes a exclusive LDR instruction for 8 bit value. |
| AnnaBridge | 126:abea610beb85 | 613 | |
| AnnaBridge | 126:abea610beb85 | 614 | \param [in] ptr Pointer to data |
| AnnaBridge | 126:abea610beb85 | 615 | \return value of type uint8_t at (*ptr) |
| AnnaBridge | 126:abea610beb85 | 616 | */ |
| AnnaBridge | 126:abea610beb85 | 617 | __attribute__((always_inline)) __STATIC_INLINE uint8_t __LDREXB(volatile uint8_t *addr) |
| AnnaBridge | 126:abea610beb85 | 618 | { |
| AnnaBridge | 126:abea610beb85 | 619 | uint32_t result; |
| AnnaBridge | 126:abea610beb85 | 620 | |
| AnnaBridge | 126:abea610beb85 | 621 | #if (__GNUC__ > 4) || (__GNUC__ == 4 && __GNUC_MINOR__ >= 8) |
| AnnaBridge | 126:abea610beb85 | 622 | __ASM volatile ("ldrexb %0, %1" : "=r" (result) : "Q" (*addr) ); |
| AnnaBridge | 126:abea610beb85 | 623 | #else |
| AnnaBridge | 126:abea610beb85 | 624 | /* Prior to GCC 4.8, "Q" will be expanded to [rx, #0] which is not |
| AnnaBridge | 126:abea610beb85 | 625 | accepted by assembler. So has to use following less efficient pattern. |
| AnnaBridge | 126:abea610beb85 | 626 | */ |
| AnnaBridge | 126:abea610beb85 | 627 | __ASM volatile ("ldrexb %0, [%1]" : "=r" (result) : "r" (addr) : "memory" ); |
| AnnaBridge | 126:abea610beb85 | 628 | #endif |
| AnnaBridge | 126:abea610beb85 | 629 | return ((uint8_t) result); /* Add explicit type cast here */ |
| AnnaBridge | 126:abea610beb85 | 630 | } |
| AnnaBridge | 126:abea610beb85 | 631 | |
| AnnaBridge | 126:abea610beb85 | 632 | |
| AnnaBridge | 126:abea610beb85 | 633 | /** \brief LDR Exclusive (16 bit) |
| AnnaBridge | 126:abea610beb85 | 634 | |
| AnnaBridge | 126:abea610beb85 | 635 | This function executes a exclusive LDR instruction for 16 bit values. |
| AnnaBridge | 126:abea610beb85 | 636 | |
| AnnaBridge | 126:abea610beb85 | 637 | \param [in] ptr Pointer to data |
| AnnaBridge | 126:abea610beb85 | 638 | \return value of type uint16_t at (*ptr) |
| AnnaBridge | 126:abea610beb85 | 639 | */ |
| AnnaBridge | 126:abea610beb85 | 640 | __attribute__((always_inline)) __STATIC_INLINE uint16_t __LDREXH(volatile uint16_t *addr) |
| AnnaBridge | 126:abea610beb85 | 641 | { |
| AnnaBridge | 126:abea610beb85 | 642 | uint32_t result; |
| AnnaBridge | 126:abea610beb85 | 643 | |
| AnnaBridge | 126:abea610beb85 | 644 | #if (__GNUC__ > 4) || (__GNUC__ == 4 && __GNUC_MINOR__ >= 8) |
| AnnaBridge | 126:abea610beb85 | 645 | __ASM volatile ("ldrexh %0, %1" : "=r" (result) : "Q" (*addr) ); |
| AnnaBridge | 126:abea610beb85 | 646 | #else |
| AnnaBridge | 126:abea610beb85 | 647 | /* Prior to GCC 4.8, "Q" will be expanded to [rx, #0] which is not |
| AnnaBridge | 126:abea610beb85 | 648 | accepted by assembler. So has to use following less efficient pattern. |
| AnnaBridge | 126:abea610beb85 | 649 | */ |
| AnnaBridge | 126:abea610beb85 | 650 | __ASM volatile ("ldrexh %0, [%1]" : "=r" (result) : "r" (addr) : "memory" ); |
| AnnaBridge | 126:abea610beb85 | 651 | #endif |
| AnnaBridge | 126:abea610beb85 | 652 | return ((uint16_t) result); /* Add explicit type cast here */ |
| AnnaBridge | 126:abea610beb85 | 653 | } |
| AnnaBridge | 126:abea610beb85 | 654 | |
| AnnaBridge | 126:abea610beb85 | 655 | |
| AnnaBridge | 126:abea610beb85 | 656 | /** \brief LDR Exclusive (32 bit) |
| AnnaBridge | 126:abea610beb85 | 657 | |
| AnnaBridge | 126:abea610beb85 | 658 | This function executes a exclusive LDR instruction for 32 bit values. |
| AnnaBridge | 126:abea610beb85 | 659 | |
| AnnaBridge | 126:abea610beb85 | 660 | \param [in] ptr Pointer to data |
| AnnaBridge | 126:abea610beb85 | 661 | \return value of type uint32_t at (*ptr) |
| AnnaBridge | 126:abea610beb85 | 662 | */ |
| AnnaBridge | 126:abea610beb85 | 663 | __attribute__((always_inline)) __STATIC_INLINE uint32_t __LDREXW(volatile uint32_t *addr) |
| AnnaBridge | 126:abea610beb85 | 664 | { |
| AnnaBridge | 126:abea610beb85 | 665 | uint32_t result; |
| AnnaBridge | 126:abea610beb85 | 666 | |
| AnnaBridge | 126:abea610beb85 | 667 | __ASM volatile ("ldrex %0, %1" : "=r" (result) : "Q" (*addr) ); |
| AnnaBridge | 126:abea610beb85 | 668 | return(result); |
| AnnaBridge | 126:abea610beb85 | 669 | } |
| AnnaBridge | 126:abea610beb85 | 670 | |
| AnnaBridge | 126:abea610beb85 | 671 | |
| AnnaBridge | 126:abea610beb85 | 672 | /** \brief STR Exclusive (8 bit) |
| AnnaBridge | 126:abea610beb85 | 673 | |
| AnnaBridge | 126:abea610beb85 | 674 | This function executes a exclusive STR instruction for 8 bit values. |
| AnnaBridge | 126:abea610beb85 | 675 | |
| AnnaBridge | 126:abea610beb85 | 676 | \param [in] value Value to store |
| AnnaBridge | 126:abea610beb85 | 677 | \param [in] ptr Pointer to location |
| AnnaBridge | 126:abea610beb85 | 678 | \return 0 Function succeeded |
| AnnaBridge | 126:abea610beb85 | 679 | \return 1 Function failed |
| AnnaBridge | 126:abea610beb85 | 680 | */ |
| AnnaBridge | 126:abea610beb85 | 681 | __attribute__((always_inline)) __STATIC_INLINE uint32_t __STREXB(uint8_t value, volatile uint8_t *addr) |
| AnnaBridge | 126:abea610beb85 | 682 | { |
| AnnaBridge | 126:abea610beb85 | 683 | uint32_t result; |
| AnnaBridge | 126:abea610beb85 | 684 | |
| AnnaBridge | 126:abea610beb85 | 685 | __ASM volatile ("strexb %0, %2, %1" : "=&r" (result), "=Q" (*addr) : "r" ((uint32_t)value) ); |
| AnnaBridge | 126:abea610beb85 | 686 | return(result); |
| AnnaBridge | 126:abea610beb85 | 687 | } |
| AnnaBridge | 126:abea610beb85 | 688 | |
| AnnaBridge | 126:abea610beb85 | 689 | |
| AnnaBridge | 126:abea610beb85 | 690 | /** \brief STR Exclusive (16 bit) |
| AnnaBridge | 126:abea610beb85 | 691 | |
| AnnaBridge | 126:abea610beb85 | 692 | This function executes a exclusive STR instruction for 16 bit values. |
| AnnaBridge | 126:abea610beb85 | 693 | |
| AnnaBridge | 126:abea610beb85 | 694 | \param [in] value Value to store |
| AnnaBridge | 126:abea610beb85 | 695 | \param [in] ptr Pointer to location |
| AnnaBridge | 126:abea610beb85 | 696 | \return 0 Function succeeded |
| AnnaBridge | 126:abea610beb85 | 697 | \return 1 Function failed |
| AnnaBridge | 126:abea610beb85 | 698 | */ |
| AnnaBridge | 126:abea610beb85 | 699 | __attribute__((always_inline)) __STATIC_INLINE uint32_t __STREXH(uint16_t value, volatile uint16_t *addr) |
| AnnaBridge | 126:abea610beb85 | 700 | { |
| AnnaBridge | 126:abea610beb85 | 701 | uint32_t result; |
| AnnaBridge | 126:abea610beb85 | 702 | |
| AnnaBridge | 126:abea610beb85 | 703 | __ASM volatile ("strexh %0, %2, %1" : "=&r" (result), "=Q" (*addr) : "r" ((uint32_t)value) ); |
| AnnaBridge | 126:abea610beb85 | 704 | return(result); |
| AnnaBridge | 126:abea610beb85 | 705 | } |
| AnnaBridge | 126:abea610beb85 | 706 | |
| AnnaBridge | 126:abea610beb85 | 707 | |
| AnnaBridge | 126:abea610beb85 | 708 | /** \brief STR Exclusive (32 bit) |
| AnnaBridge | 126:abea610beb85 | 709 | |
| AnnaBridge | 126:abea610beb85 | 710 | This function executes a exclusive STR instruction for 32 bit values. |
| AnnaBridge | 126:abea610beb85 | 711 | |
| AnnaBridge | 126:abea610beb85 | 712 | \param [in] value Value to store |
| AnnaBridge | 126:abea610beb85 | 713 | \param [in] ptr Pointer to location |
| AnnaBridge | 126:abea610beb85 | 714 | \return 0 Function succeeded |
| AnnaBridge | 126:abea610beb85 | 715 | \return 1 Function failed |
| AnnaBridge | 126:abea610beb85 | 716 | */ |
| AnnaBridge | 126:abea610beb85 | 717 | __attribute__((always_inline)) __STATIC_INLINE uint32_t __STREXW(uint32_t value, volatile uint32_t *addr) |
| AnnaBridge | 126:abea610beb85 | 718 | { |
| AnnaBridge | 126:abea610beb85 | 719 | uint32_t result; |
| AnnaBridge | 126:abea610beb85 | 720 | |
| AnnaBridge | 126:abea610beb85 | 721 | __ASM volatile ("strex %0, %2, %1" : "=&r" (result), "=Q" (*addr) : "r" (value) ); |
| AnnaBridge | 126:abea610beb85 | 722 | return(result); |
| AnnaBridge | 126:abea610beb85 | 723 | } |
| AnnaBridge | 126:abea610beb85 | 724 | |
| AnnaBridge | 126:abea610beb85 | 725 | |
| AnnaBridge | 126:abea610beb85 | 726 | /** \brief Remove the exclusive lock |
| AnnaBridge | 126:abea610beb85 | 727 | |
| AnnaBridge | 126:abea610beb85 | 728 | This function removes the exclusive lock which is created by LDREX. |
| AnnaBridge | 126:abea610beb85 | 729 | |
| AnnaBridge | 126:abea610beb85 | 730 | */ |
| AnnaBridge | 126:abea610beb85 | 731 | __attribute__((always_inline)) __STATIC_INLINE void __CLREX(void) |
| AnnaBridge | 126:abea610beb85 | 732 | { |
| AnnaBridge | 126:abea610beb85 | 733 | __ASM volatile ("clrex" ::: "memory"); |
| AnnaBridge | 126:abea610beb85 | 734 | } |
| AnnaBridge | 126:abea610beb85 | 735 | |
| AnnaBridge | 126:abea610beb85 | 736 | |
| AnnaBridge | 126:abea610beb85 | 737 | /** \brief Signed Saturate |
| AnnaBridge | 126:abea610beb85 | 738 | |
| AnnaBridge | 126:abea610beb85 | 739 | This function saturates a signed value. |
| AnnaBridge | 126:abea610beb85 | 740 | |
| AnnaBridge | 126:abea610beb85 | 741 | \param [in] value Value to be saturated |
| AnnaBridge | 126:abea610beb85 | 742 | \param [in] sat Bit position to saturate to (1..32) |
| AnnaBridge | 126:abea610beb85 | 743 | \return Saturated value |
| AnnaBridge | 126:abea610beb85 | 744 | */ |
| AnnaBridge | 126:abea610beb85 | 745 | #define __SSAT(ARG1,ARG2) \ |
| AnnaBridge | 126:abea610beb85 | 746 | ({ \ |
| AnnaBridge | 126:abea610beb85 | 747 | uint32_t __RES, __ARG1 = (ARG1); \ |
| AnnaBridge | 126:abea610beb85 | 748 | __ASM ("ssat %0, %1, %2" : "=r" (__RES) : "I" (ARG2), "r" (__ARG1) ); \ |
| AnnaBridge | 126:abea610beb85 | 749 | __RES; \ |
| AnnaBridge | 126:abea610beb85 | 750 | }) |
| AnnaBridge | 126:abea610beb85 | 751 | |
| AnnaBridge | 126:abea610beb85 | 752 | |
| AnnaBridge | 126:abea610beb85 | 753 | /** \brief Unsigned Saturate |
| AnnaBridge | 126:abea610beb85 | 754 | |
| AnnaBridge | 126:abea610beb85 | 755 | This function saturates an unsigned value. |
| AnnaBridge | 126:abea610beb85 | 756 | |
| AnnaBridge | 126:abea610beb85 | 757 | \param [in] value Value to be saturated |
| AnnaBridge | 126:abea610beb85 | 758 | \param [in] sat Bit position to saturate to (0..31) |
| AnnaBridge | 126:abea610beb85 | 759 | \return Saturated value |
| AnnaBridge | 126:abea610beb85 | 760 | */ |
| AnnaBridge | 126:abea610beb85 | 761 | #define __USAT(ARG1,ARG2) \ |
| AnnaBridge | 126:abea610beb85 | 762 | ({ \ |
| AnnaBridge | 126:abea610beb85 | 763 | uint32_t __RES, __ARG1 = (ARG1); \ |
| AnnaBridge | 126:abea610beb85 | 764 | __ASM ("usat %0, %1, %2" : "=r" (__RES) : "I" (ARG2), "r" (__ARG1) ); \ |
| AnnaBridge | 126:abea610beb85 | 765 | __RES; \ |
| AnnaBridge | 126:abea610beb85 | 766 | }) |
| AnnaBridge | 126:abea610beb85 | 767 | |
| AnnaBridge | 126:abea610beb85 | 768 | |
| AnnaBridge | 126:abea610beb85 | 769 | /** \brief Rotate Right with Extend (32 bit) |
| AnnaBridge | 126:abea610beb85 | 770 | |
| AnnaBridge | 126:abea610beb85 | 771 | This function moves each bit of a bitstring right by one bit. |
| AnnaBridge | 126:abea610beb85 | 772 | The carry input is shifted in at the left end of the bitstring. |
| AnnaBridge | 126:abea610beb85 | 773 | |
| AnnaBridge | 126:abea610beb85 | 774 | \param [in] value Value to rotate |
| AnnaBridge | 126:abea610beb85 | 775 | \return Rotated value |
| AnnaBridge | 126:abea610beb85 | 776 | */ |
| AnnaBridge | 126:abea610beb85 | 777 | __attribute__((always_inline)) __STATIC_INLINE uint32_t __RRX(uint32_t value) |
| AnnaBridge | 126:abea610beb85 | 778 | { |
| AnnaBridge | 126:abea610beb85 | 779 | uint32_t result; |
| AnnaBridge | 126:abea610beb85 | 780 | |
| AnnaBridge | 126:abea610beb85 | 781 | __ASM volatile ("rrx %0, %1" : __CMSIS_GCC_OUT_REG (result) : __CMSIS_GCC_USE_REG (value) ); |
| AnnaBridge | 126:abea610beb85 | 782 | return(result); |
| AnnaBridge | 126:abea610beb85 | 783 | } |
| AnnaBridge | 126:abea610beb85 | 784 | |
| AnnaBridge | 126:abea610beb85 | 785 | |
| AnnaBridge | 126:abea610beb85 | 786 | /** \brief LDRT Unprivileged (8 bit) |
| AnnaBridge | 126:abea610beb85 | 787 | |
| AnnaBridge | 126:abea610beb85 | 788 | This function executes a Unprivileged LDRT instruction for 8 bit value. |
| AnnaBridge | 126:abea610beb85 | 789 | |
| AnnaBridge | 126:abea610beb85 | 790 | \param [in] ptr Pointer to data |
| AnnaBridge | 126:abea610beb85 | 791 | \return value of type uint8_t at (*ptr) |
| AnnaBridge | 126:abea610beb85 | 792 | */ |
| AnnaBridge | 126:abea610beb85 | 793 | __attribute__((always_inline)) __STATIC_INLINE uint8_t __LDRBT(volatile uint8_t *addr) |
| AnnaBridge | 126:abea610beb85 | 794 | { |
| AnnaBridge | 126:abea610beb85 | 795 | uint32_t result; |
| AnnaBridge | 126:abea610beb85 | 796 | |
| AnnaBridge | 126:abea610beb85 | 797 | #if (__GNUC__ > 4) || (__GNUC__ == 4 && __GNUC_MINOR__ >= 8) |
| AnnaBridge | 126:abea610beb85 | 798 | __ASM volatile ("ldrbt %0, %1" : "=r" (result) : "Q" (*addr) ); |
| AnnaBridge | 126:abea610beb85 | 799 | #else |
| AnnaBridge | 126:abea610beb85 | 800 | /* Prior to GCC 4.8, "Q" will be expanded to [rx, #0] which is not |
| AnnaBridge | 126:abea610beb85 | 801 | accepted by assembler. So has to use following less efficient pattern. |
| AnnaBridge | 126:abea610beb85 | 802 | */ |
| AnnaBridge | 126:abea610beb85 | 803 | __ASM volatile ("ldrbt %0, [%1]" : "=r" (result) : "r" (addr) : "memory" ); |
| AnnaBridge | 126:abea610beb85 | 804 | #endif |
| AnnaBridge | 126:abea610beb85 | 805 | return ((uint8_t) result); /* Add explicit type cast here */ |
| AnnaBridge | 126:abea610beb85 | 806 | } |
| AnnaBridge | 126:abea610beb85 | 807 | |
| AnnaBridge | 126:abea610beb85 | 808 | |
| AnnaBridge | 126:abea610beb85 | 809 | /** \brief LDRT Unprivileged (16 bit) |
| AnnaBridge | 126:abea610beb85 | 810 | |
| AnnaBridge | 126:abea610beb85 | 811 | This function executes a Unprivileged LDRT instruction for 16 bit values. |
| AnnaBridge | 126:abea610beb85 | 812 | |
| AnnaBridge | 126:abea610beb85 | 813 | \param [in] ptr Pointer to data |
| AnnaBridge | 126:abea610beb85 | 814 | \return value of type uint16_t at (*ptr) |
| AnnaBridge | 126:abea610beb85 | 815 | */ |
| AnnaBridge | 126:abea610beb85 | 816 | __attribute__((always_inline)) __STATIC_INLINE uint16_t __LDRHT(volatile uint16_t *addr) |
| AnnaBridge | 126:abea610beb85 | 817 | { |
| AnnaBridge | 126:abea610beb85 | 818 | uint32_t result; |
| AnnaBridge | 126:abea610beb85 | 819 | |
| AnnaBridge | 126:abea610beb85 | 820 | #if (__GNUC__ > 4) || (__GNUC__ == 4 && __GNUC_MINOR__ >= 8) |
| AnnaBridge | 126:abea610beb85 | 821 | __ASM volatile ("ldrht %0, %1" : "=r" (result) : "Q" (*addr) ); |
| AnnaBridge | 126:abea610beb85 | 822 | #else |
| AnnaBridge | 126:abea610beb85 | 823 | /* Prior to GCC 4.8, "Q" will be expanded to [rx, #0] which is not |
| AnnaBridge | 126:abea610beb85 | 824 | accepted by assembler. So has to use following less efficient pattern. |
| AnnaBridge | 126:abea610beb85 | 825 | */ |
| AnnaBridge | 126:abea610beb85 | 826 | __ASM volatile ("ldrht %0, [%1]" : "=r" (result) : "r" (addr) : "memory" ); |
| AnnaBridge | 126:abea610beb85 | 827 | #endif |
| AnnaBridge | 126:abea610beb85 | 828 | return ((uint16_t) result); /* Add explicit type cast here */ |
| AnnaBridge | 126:abea610beb85 | 829 | } |
| AnnaBridge | 126:abea610beb85 | 830 | |
| AnnaBridge | 126:abea610beb85 | 831 | |
| AnnaBridge | 126:abea610beb85 | 832 | /** \brief LDRT Unprivileged (32 bit) |
| AnnaBridge | 126:abea610beb85 | 833 | |
| AnnaBridge | 126:abea610beb85 | 834 | This function executes a Unprivileged LDRT instruction for 32 bit values. |
| AnnaBridge | 126:abea610beb85 | 835 | |
| AnnaBridge | 126:abea610beb85 | 836 | \param [in] ptr Pointer to data |
| AnnaBridge | 126:abea610beb85 | 837 | \return value of type uint32_t at (*ptr) |
| AnnaBridge | 126:abea610beb85 | 838 | */ |
| AnnaBridge | 126:abea610beb85 | 839 | __attribute__((always_inline)) __STATIC_INLINE uint32_t __LDRT(volatile uint32_t *addr) |
| AnnaBridge | 126:abea610beb85 | 840 | { |
| AnnaBridge | 126:abea610beb85 | 841 | uint32_t result; |
| AnnaBridge | 126:abea610beb85 | 842 | |
| AnnaBridge | 126:abea610beb85 | 843 | __ASM volatile ("ldrt %0, %1" : "=r" (result) : "Q" (*addr) ); |
| AnnaBridge | 126:abea610beb85 | 844 | return(result); |
| AnnaBridge | 126:abea610beb85 | 845 | } |
| AnnaBridge | 126:abea610beb85 | 846 | |
| AnnaBridge | 126:abea610beb85 | 847 | |
| AnnaBridge | 126:abea610beb85 | 848 | /** \brief STRT Unprivileged (8 bit) |
| AnnaBridge | 126:abea610beb85 | 849 | |
| AnnaBridge | 126:abea610beb85 | 850 | This function executes a Unprivileged STRT instruction for 8 bit values. |
| AnnaBridge | 126:abea610beb85 | 851 | |
| AnnaBridge | 126:abea610beb85 | 852 | \param [in] value Value to store |
| AnnaBridge | 126:abea610beb85 | 853 | \param [in] ptr Pointer to location |
| AnnaBridge | 126:abea610beb85 | 854 | */ |
| AnnaBridge | 126:abea610beb85 | 855 | __attribute__((always_inline)) __STATIC_INLINE void __STRBT(uint8_t value, volatile uint8_t *addr) |
| AnnaBridge | 126:abea610beb85 | 856 | { |
| AnnaBridge | 126:abea610beb85 | 857 | __ASM volatile ("strbt %1, %0" : "=Q" (*addr) : "r" ((uint32_t)value) ); |
| AnnaBridge | 126:abea610beb85 | 858 | } |
| AnnaBridge | 126:abea610beb85 | 859 | |
| AnnaBridge | 126:abea610beb85 | 860 | |
| AnnaBridge | 126:abea610beb85 | 861 | /** \brief STRT Unprivileged (16 bit) |
| AnnaBridge | 126:abea610beb85 | 862 | |
| AnnaBridge | 126:abea610beb85 | 863 | This function executes a Unprivileged STRT instruction for 16 bit values. |
| AnnaBridge | 126:abea610beb85 | 864 | |
| AnnaBridge | 126:abea610beb85 | 865 | \param [in] value Value to store |
| AnnaBridge | 126:abea610beb85 | 866 | \param [in] ptr Pointer to location |
| AnnaBridge | 126:abea610beb85 | 867 | */ |
| AnnaBridge | 126:abea610beb85 | 868 | __attribute__((always_inline)) __STATIC_INLINE void __STRHT(uint16_t value, volatile uint16_t *addr) |
| AnnaBridge | 126:abea610beb85 | 869 | { |
| AnnaBridge | 126:abea610beb85 | 870 | __ASM volatile ("strht %1, %0" : "=Q" (*addr) : "r" ((uint32_t)value) ); |
| AnnaBridge | 126:abea610beb85 | 871 | } |
| AnnaBridge | 126:abea610beb85 | 872 | |
| AnnaBridge | 126:abea610beb85 | 873 | |
| AnnaBridge | 126:abea610beb85 | 874 | /** \brief STRT Unprivileged (32 bit) |
| AnnaBridge | 126:abea610beb85 | 875 | |
| AnnaBridge | 126:abea610beb85 | 876 | This function executes a Unprivileged STRT instruction for 32 bit values. |
| AnnaBridge | 126:abea610beb85 | 877 | |
| AnnaBridge | 126:abea610beb85 | 878 | \param [in] value Value to store |
| AnnaBridge | 126:abea610beb85 | 879 | \param [in] ptr Pointer to location |
| AnnaBridge | 126:abea610beb85 | 880 | */ |
| AnnaBridge | 126:abea610beb85 | 881 | __attribute__((always_inline)) __STATIC_INLINE void __STRT(uint32_t value, volatile uint32_t *addr) |
| AnnaBridge | 126:abea610beb85 | 882 | { |
| AnnaBridge | 126:abea610beb85 | 883 | __ASM volatile ("strt %1, %0" : "=Q" (*addr) : "r" (value) ); |
| AnnaBridge | 126:abea610beb85 | 884 | } |
| AnnaBridge | 126:abea610beb85 | 885 | |
| AnnaBridge | 126:abea610beb85 | 886 | #endif /* (__CORTEX_M >= 0x03) || (__CORTEX_SC >= 300) */ |
| AnnaBridge | 126:abea610beb85 | 887 | |
| AnnaBridge | 126:abea610beb85 | 888 | |
| AnnaBridge | 126:abea610beb85 | 889 | #elif defined ( __ICCARM__ ) /*------------------ ICC Compiler -------------------*/ |
| AnnaBridge | 126:abea610beb85 | 890 | /* IAR iccarm specific functions */ |
| AnnaBridge | 126:abea610beb85 | 891 | #include <cmsis_iar.h> |
| AnnaBridge | 126:abea610beb85 | 892 | |
| AnnaBridge | 126:abea610beb85 | 893 | |
| AnnaBridge | 126:abea610beb85 | 894 | #elif defined ( __TMS470__ ) /*---------------- TI CCS Compiler ------------------*/ |
| AnnaBridge | 126:abea610beb85 | 895 | /* TI CCS specific functions */ |
| AnnaBridge | 126:abea610beb85 | 896 | #include <cmsis_ccs.h> |
| AnnaBridge | 126:abea610beb85 | 897 | |
| AnnaBridge | 126:abea610beb85 | 898 | |
| AnnaBridge | 126:abea610beb85 | 899 | #elif defined ( __TASKING__ ) /*------------------ TASKING Compiler --------------*/ |
| AnnaBridge | 126:abea610beb85 | 900 | /* TASKING carm specific functions */ |
| AnnaBridge | 126:abea610beb85 | 901 | /* |
| AnnaBridge | 126:abea610beb85 | 902 | * The CMSIS functions have been implemented as intrinsics in the compiler. |
| AnnaBridge | 126:abea610beb85 | 903 | * Please use "carm -?i" to get an up to date list of all intrinsics, |
| AnnaBridge | 126:abea610beb85 | 904 | * Including the CMSIS ones. |
| AnnaBridge | 126:abea610beb85 | 905 | */ |
| AnnaBridge | 126:abea610beb85 | 906 | |
| AnnaBridge | 126:abea610beb85 | 907 | |
| AnnaBridge | 126:abea610beb85 | 908 | #elif defined ( __CSMC__ ) /*------------------ COSMIC Compiler -------------------*/ |
| AnnaBridge | 126:abea610beb85 | 909 | /* Cosmic specific functions */ |
| AnnaBridge | 126:abea610beb85 | 910 | #include <cmsis_csm.h> |
| AnnaBridge | 126:abea610beb85 | 911 | |
| AnnaBridge | 126:abea610beb85 | 912 | #endif |
| AnnaBridge | 126:abea610beb85 | 913 | |
| AnnaBridge | 126:abea610beb85 | 914 | /*@}*/ /* end of group CMSIS_Core_InstructionInterface */ |
| AnnaBridge | 126:abea610beb85 | 915 | |
| AnnaBridge | 126:abea610beb85 | 916 | #endif /* __CORE_CMINSTR_H */ |
