mbed official / mbed-dev

mbed library sources. Supersedes mbed-src.

Dependents:   Nucleo_Hello_Encoder BLE_iBeaconScan AM1805_DEMO DISCO-F429ZI_ExportTemplate1 ... more

cmsis/TARGET_CORTEX_M/cmsis_gcc.h@180:96ed750bd169, 2018-01-17 (annotated)

Committer:
Anna Bridge
Date:
Wed Jan 17 15:23:54 2018 +0000
Revision:
180:96ed750bd169
Child:
186:707f6e361f3e
mbed-dev libray. Release version 158

Who changed what in which revision?

UserRevisionLine numberNew contents of line
Anna Bridge 180:96ed750bd169 1 /**************************************************************************//**
Anna Bridge 180:96ed750bd169 2 * @file cmsis_gcc.h
Anna Bridge 180:96ed750bd169 3 * @brief CMSIS compiler GCC header file
Anna Bridge 180:96ed750bd169 4 * @version V5.0.2
Anna Bridge 180:96ed750bd169 5 * @date 13. February 2017
Anna Bridge 180:96ed750bd169 6 ******************************************************************************/
Anna Bridge 180:96ed750bd169 7 /*
Anna Bridge 180:96ed750bd169 8 * Copyright (c) 2009-2017 ARM Limited. All rights reserved.
Anna Bridge 180:96ed750bd169 9 *
Anna Bridge 180:96ed750bd169 10 * SPDX-License-Identifier: Apache-2.0
Anna Bridge 180:96ed750bd169 11 *
Anna Bridge 180:96ed750bd169 12 * Licensed under the Apache License, Version 2.0 (the License); you may
Anna Bridge 180:96ed750bd169 13 * not use this file except in compliance with the License.
Anna Bridge 180:96ed750bd169 14 * You may obtain a copy of the License at
Anna Bridge 180:96ed750bd169 15 *
Anna Bridge 180:96ed750bd169 16 * www.apache.org/licenses/LICENSE-2.0
Anna Bridge 180:96ed750bd169 17 *
Anna Bridge 180:96ed750bd169 18 * Unless required by applicable law or agreed to in writing, software
Anna Bridge 180:96ed750bd169 19 * distributed under the License is distributed on an AS IS BASIS, WITHOUT
Anna Bridge 180:96ed750bd169 20 * WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
Anna Bridge 180:96ed750bd169 21 * See the License for the specific language governing permissions and
Anna Bridge 180:96ed750bd169 22 * limitations under the License.
Anna Bridge 180:96ed750bd169 23 */
Anna Bridge 180:96ed750bd169 24
Anna Bridge 180:96ed750bd169 25 #ifndef __CMSIS_GCC_H
Anna Bridge 180:96ed750bd169 26 #define __CMSIS_GCC_H
Anna Bridge 180:96ed750bd169 27
Anna Bridge 180:96ed750bd169 28 /* ignore some GCC warnings */
Anna Bridge 180:96ed750bd169 29 #pragma GCC diagnostic push
Anna Bridge 180:96ed750bd169 30 #pragma GCC diagnostic ignored "-Wsign-conversion"
Anna Bridge 180:96ed750bd169 31 #pragma GCC diagnostic ignored "-Wconversion"
Anna Bridge 180:96ed750bd169 32 #pragma GCC diagnostic ignored "-Wunused-parameter"
Anna Bridge 180:96ed750bd169 33
Anna Bridge 180:96ed750bd169 34 /* Fallback for __has_builtin */
Anna Bridge 180:96ed750bd169 35 #ifndef __has_builtin
Anna Bridge 180:96ed750bd169 36 #define __has_builtin(x) (0)
Anna Bridge 180:96ed750bd169 37 #endif
Anna Bridge 180:96ed750bd169 38
Anna Bridge 180:96ed750bd169 39 /* CMSIS compiler specific defines */
Anna Bridge 180:96ed750bd169 40 #ifndef __ASM
Anna Bridge 180:96ed750bd169 41 #define __ASM __asm
Anna Bridge 180:96ed750bd169 42 #endif
Anna Bridge 180:96ed750bd169 43 #ifndef __INLINE
Anna Bridge 180:96ed750bd169 44 #define __INLINE inline
Anna Bridge 180:96ed750bd169 45 #endif
Anna Bridge 180:96ed750bd169 46 #ifndef __STATIC_INLINE
Anna Bridge 180:96ed750bd169 47 #define __STATIC_INLINE static inline
Anna Bridge 180:96ed750bd169 48 #endif
Anna Bridge 180:96ed750bd169 49 #ifndef __NO_RETURN
Anna Bridge 180:96ed750bd169 50 #define __NO_RETURN __attribute__((noreturn))
Anna Bridge 180:96ed750bd169 51 #endif
Anna Bridge 180:96ed750bd169 52 #ifndef __USED
Anna Bridge 180:96ed750bd169 53 #define __USED __attribute__((used))
Anna Bridge 180:96ed750bd169 54 #endif
Anna Bridge 180:96ed750bd169 55 #ifndef __WEAK
Anna Bridge 180:96ed750bd169 56 #define __WEAK __attribute__((weak))
Anna Bridge 180:96ed750bd169 57 #endif
Anna Bridge 180:96ed750bd169 58 #ifndef __PACKED
Anna Bridge 180:96ed750bd169 59 #define __PACKED __attribute__((packed, aligned(1)))
Anna Bridge 180:96ed750bd169 60 #endif
Anna Bridge 180:96ed750bd169 61 #ifndef __PACKED_STRUCT
Anna Bridge 180:96ed750bd169 62 #define __PACKED_STRUCT struct __attribute__((packed, aligned(1)))
Anna Bridge 180:96ed750bd169 63 #endif
Anna Bridge 180:96ed750bd169 64 #ifndef __PACKED_UNION
Anna Bridge 180:96ed750bd169 65 #define __PACKED_UNION union __attribute__((packed, aligned(1)))
Anna Bridge 180:96ed750bd169 66 #endif
Anna Bridge 180:96ed750bd169 67 #ifndef __UNALIGNED_UINT32 /* deprecated */
Anna Bridge 180:96ed750bd169 68 #pragma GCC diagnostic push
Anna Bridge 180:96ed750bd169 69 #pragma GCC diagnostic ignored "-Wpacked"
Anna Bridge 180:96ed750bd169 70 #pragma GCC diagnostic ignored "-Wattributes"
Anna Bridge 180:96ed750bd169 71 struct __attribute__((packed)) T_UINT32 { uint32_t v; };
Anna Bridge 180:96ed750bd169 72 #pragma GCC diagnostic pop
Anna Bridge 180:96ed750bd169 73 #define __UNALIGNED_UINT32(x) (((struct T_UINT32 *)(x))->v)
Anna Bridge 180:96ed750bd169 74 #endif
Anna Bridge 180:96ed750bd169 75 #ifndef __UNALIGNED_UINT16_WRITE
Anna Bridge 180:96ed750bd169 76 #pragma GCC diagnostic push
Anna Bridge 180:96ed750bd169 77 #pragma GCC diagnostic ignored "-Wpacked"
Anna Bridge 180:96ed750bd169 78 #pragma GCC diagnostic ignored "-Wattributes"
Anna Bridge 180:96ed750bd169 79 __PACKED_STRUCT T_UINT16_WRITE { uint16_t v; };
Anna Bridge 180:96ed750bd169 80 #pragma GCC diagnostic pop
Anna Bridge 180:96ed750bd169 81 #define __UNALIGNED_UINT16_WRITE(addr, val) (void)((((struct T_UINT16_WRITE *)(void *)(addr))->v) = (val))
Anna Bridge 180:96ed750bd169 82 #endif
Anna Bridge 180:96ed750bd169 83 #ifndef __UNALIGNED_UINT16_READ
Anna Bridge 180:96ed750bd169 84 #pragma GCC diagnostic push
Anna Bridge 180:96ed750bd169 85 #pragma GCC diagnostic ignored "-Wpacked"
Anna Bridge 180:96ed750bd169 86 #pragma GCC diagnostic ignored "-Wattributes"
Anna Bridge 180:96ed750bd169 87 __PACKED_STRUCT T_UINT16_READ { uint16_t v; };
Anna Bridge 180:96ed750bd169 88 #pragma GCC diagnostic pop
Anna Bridge 180:96ed750bd169 89 #define __UNALIGNED_UINT16_READ(addr) (((const struct T_UINT16_READ *)(const void *)(addr))->v)
Anna Bridge 180:96ed750bd169 90 #endif
Anna Bridge 180:96ed750bd169 91 #ifndef __UNALIGNED_UINT32_WRITE
Anna Bridge 180:96ed750bd169 92 #pragma GCC diagnostic push
Anna Bridge 180:96ed750bd169 93 #pragma GCC diagnostic ignored "-Wpacked"
Anna Bridge 180:96ed750bd169 94 #pragma GCC diagnostic ignored "-Wattributes"
Anna Bridge 180:96ed750bd169 95 __PACKED_STRUCT T_UINT32_WRITE { uint32_t v; };
Anna Bridge 180:96ed750bd169 96 #pragma GCC diagnostic pop
Anna Bridge 180:96ed750bd169 97 #define __UNALIGNED_UINT32_WRITE(addr, val) (void)((((struct T_UINT32_WRITE *)(void *)(addr))->v) = (val))
Anna Bridge 180:96ed750bd169 98 #endif
Anna Bridge 180:96ed750bd169 99 #ifndef __UNALIGNED_UINT32_READ
Anna Bridge 180:96ed750bd169 100 #pragma GCC diagnostic push
Anna Bridge 180:96ed750bd169 101 #pragma GCC diagnostic ignored "-Wpacked"
Anna Bridge 180:96ed750bd169 102 #pragma GCC diagnostic ignored "-Wattributes"
Anna Bridge 180:96ed750bd169 103 __PACKED_STRUCT T_UINT32_READ { uint32_t v; };
Anna Bridge 180:96ed750bd169 104 #pragma GCC diagnostic pop
Anna Bridge 180:96ed750bd169 105 #define __UNALIGNED_UINT32_READ(addr) (((const struct T_UINT32_READ *)(const void *)(addr))->v)
Anna Bridge 180:96ed750bd169 106 #endif
Anna Bridge 180:96ed750bd169 107 #ifndef __ALIGNED
Anna Bridge 180:96ed750bd169 108 #define __ALIGNED(x) __attribute__((aligned(x)))
Anna Bridge 180:96ed750bd169 109 #endif
Anna Bridge 180:96ed750bd169 110 #ifndef __RESTRICT
Anna Bridge 180:96ed750bd169 111 #define __RESTRICT __restrict
Anna Bridge 180:96ed750bd169 112 #endif
Anna Bridge 180:96ed750bd169 113
Anna Bridge 180:96ed750bd169 114
Anna Bridge 180:96ed750bd169 115 /* ########################### Core Function Access ########################### */
Anna Bridge 180:96ed750bd169 116 /** \ingroup CMSIS_Core_FunctionInterface
Anna Bridge 180:96ed750bd169 117 \defgroup CMSIS_Core_RegAccFunctions CMSIS Core Register Access Functions
Anna Bridge 180:96ed750bd169 118 @{
Anna Bridge 180:96ed750bd169 119 */
Anna Bridge 180:96ed750bd169 120
Anna Bridge 180:96ed750bd169 121 /**
Anna Bridge 180:96ed750bd169 122 \brief Enable IRQ Interrupts
Anna Bridge 180:96ed750bd169 123 \details Enables IRQ interrupts by clearing the I-bit in the CPSR.
Anna Bridge 180:96ed750bd169 124 Can only be executed in Privileged modes.
Anna Bridge 180:96ed750bd169 125 */
Anna Bridge 180:96ed750bd169 126 __attribute__((always_inline)) __STATIC_INLINE void __enable_irq(void)
Anna Bridge 180:96ed750bd169 127 {
Anna Bridge 180:96ed750bd169 128 __ASM volatile ("cpsie i" : : : "memory");
Anna Bridge 180:96ed750bd169 129 }
Anna Bridge 180:96ed750bd169 130
Anna Bridge 180:96ed750bd169 131
Anna Bridge 180:96ed750bd169 132 /**
Anna Bridge 180:96ed750bd169 133 \brief Disable IRQ Interrupts
Anna Bridge 180:96ed750bd169 134 \details Disables IRQ interrupts by setting the I-bit in the CPSR.
Anna Bridge 180:96ed750bd169 135 Can only be executed in Privileged modes.
Anna Bridge 180:96ed750bd169 136 */
Anna Bridge 180:96ed750bd169 137 __attribute__((always_inline)) __STATIC_INLINE void __disable_irq(void)
Anna Bridge 180:96ed750bd169 138 {
Anna Bridge 180:96ed750bd169 139 __ASM volatile ("cpsid i" : : : "memory");
Anna Bridge 180:96ed750bd169 140 }
Anna Bridge 180:96ed750bd169 141
Anna Bridge 180:96ed750bd169 142
Anna Bridge 180:96ed750bd169 143 /**
Anna Bridge 180:96ed750bd169 144 \brief Get Control Register
Anna Bridge 180:96ed750bd169 145 \details Returns the content of the Control Register.
Anna Bridge 180:96ed750bd169 146 \return Control Register value
Anna Bridge 180:96ed750bd169 147 */
Anna Bridge 180:96ed750bd169 148 __attribute__((always_inline)) __STATIC_INLINE uint32_t __get_CONTROL(void)
Anna Bridge 180:96ed750bd169 149 {
Anna Bridge 180:96ed750bd169 150 uint32_t result;
Anna Bridge 180:96ed750bd169 151
Anna Bridge 180:96ed750bd169 152 __ASM volatile ("MRS %0, control" : "=r" (result) );
Anna Bridge 180:96ed750bd169 153 return(result);
Anna Bridge 180:96ed750bd169 154 }
Anna Bridge 180:96ed750bd169 155
Anna Bridge 180:96ed750bd169 156
Anna Bridge 180:96ed750bd169 157 #if (defined (__ARM_FEATURE_CMSE ) && (__ARM_FEATURE_CMSE == 3))
Anna Bridge 180:96ed750bd169 158 /**
Anna Bridge 180:96ed750bd169 159 \brief Get Control Register (non-secure)
Anna Bridge 180:96ed750bd169 160 \details Returns the content of the non-secure Control Register when in secure mode.
Anna Bridge 180:96ed750bd169 161 \return non-secure Control Register value
Anna Bridge 180:96ed750bd169 162 */
Anna Bridge 180:96ed750bd169 163 __attribute__((always_inline)) __STATIC_INLINE uint32_t __TZ_get_CONTROL_NS(void)
Anna Bridge 180:96ed750bd169 164 {
Anna Bridge 180:96ed750bd169 165 uint32_t result;
Anna Bridge 180:96ed750bd169 166
Anna Bridge 180:96ed750bd169 167 __ASM volatile ("MRS %0, control_ns" : "=r" (result) );
Anna Bridge 180:96ed750bd169 168 return(result);
Anna Bridge 180:96ed750bd169 169 }
Anna Bridge 180:96ed750bd169 170 #endif
Anna Bridge 180:96ed750bd169 171
Anna Bridge 180:96ed750bd169 172
Anna Bridge 180:96ed750bd169 173 /**
Anna Bridge 180:96ed750bd169 174 \brief Set Control Register
Anna Bridge 180:96ed750bd169 175 \details Writes the given value to the Control Register.
Anna Bridge 180:96ed750bd169 176 \param [in] control Control Register value to set
Anna Bridge 180:96ed750bd169 177 */
Anna Bridge 180:96ed750bd169 178 __attribute__((always_inline)) __STATIC_INLINE void __set_CONTROL(uint32_t control)
Anna Bridge 180:96ed750bd169 179 {
Anna Bridge 180:96ed750bd169 180 __ASM volatile ("MSR control, %0" : : "r" (control) : "memory");
Anna Bridge 180:96ed750bd169 181 }
Anna Bridge 180:96ed750bd169 182
Anna Bridge 180:96ed750bd169 183
Anna Bridge 180:96ed750bd169 184 #if (defined (__ARM_FEATURE_CMSE ) && (__ARM_FEATURE_CMSE == 3))
Anna Bridge 180:96ed750bd169 185 /**
Anna Bridge 180:96ed750bd169 186 \brief Set Control Register (non-secure)
Anna Bridge 180:96ed750bd169 187 \details Writes the given value to the non-secure Control Register when in secure state.
Anna Bridge 180:96ed750bd169 188 \param [in] control Control Register value to set
Anna Bridge 180:96ed750bd169 189 */
Anna Bridge 180:96ed750bd169 190 __attribute__((always_inline)) __STATIC_INLINE void __TZ_set_CONTROL_NS(uint32_t control)
Anna Bridge 180:96ed750bd169 191 {
Anna Bridge 180:96ed750bd169 192 __ASM volatile ("MSR control_ns, %0" : : "r" (control) : "memory");
Anna Bridge 180:96ed750bd169 193 }
Anna Bridge 180:96ed750bd169 194 #endif
Anna Bridge 180:96ed750bd169 195
Anna Bridge 180:96ed750bd169 196
Anna Bridge 180:96ed750bd169 197 /**
Anna Bridge 180:96ed750bd169 198 \brief Get IPSR Register
Anna Bridge 180:96ed750bd169 199 \details Returns the content of the IPSR Register.
Anna Bridge 180:96ed750bd169 200 \return IPSR Register value
Anna Bridge 180:96ed750bd169 201 */
Anna Bridge 180:96ed750bd169 202 __attribute__((always_inline)) __STATIC_INLINE uint32_t __get_IPSR(void)
Anna Bridge 180:96ed750bd169 203 {
Anna Bridge 180:96ed750bd169 204 uint32_t result;
Anna Bridge 180:96ed750bd169 205
Anna Bridge 180:96ed750bd169 206 __ASM volatile ("MRS %0, ipsr" : "=r" (result) );
Anna Bridge 180:96ed750bd169 207 return(result);
Anna Bridge 180:96ed750bd169 208 }
Anna Bridge 180:96ed750bd169 209
Anna Bridge 180:96ed750bd169 210
Anna Bridge 180:96ed750bd169 211 /**
Anna Bridge 180:96ed750bd169 212 \brief Get APSR Register
Anna Bridge 180:96ed750bd169 213 \details Returns the content of the APSR Register.
Anna Bridge 180:96ed750bd169 214 \return APSR Register value
Anna Bridge 180:96ed750bd169 215 */
Anna Bridge 180:96ed750bd169 216 __attribute__((always_inline)) __STATIC_INLINE uint32_t __get_APSR(void)
Anna Bridge 180:96ed750bd169 217 {
Anna Bridge 180:96ed750bd169 218 uint32_t result;
Anna Bridge 180:96ed750bd169 219
Anna Bridge 180:96ed750bd169 220 __ASM volatile ("MRS %0, apsr" : "=r" (result) );
Anna Bridge 180:96ed750bd169 221 return(result);
Anna Bridge 180:96ed750bd169 222 }
Anna Bridge 180:96ed750bd169 223
Anna Bridge 180:96ed750bd169 224
Anna Bridge 180:96ed750bd169 225 /**
Anna Bridge 180:96ed750bd169 226 \brief Get xPSR Register
Anna Bridge 180:96ed750bd169 227 \details Returns the content of the xPSR Register.
Anna Bridge 180:96ed750bd169 228 \return xPSR Register value
Anna Bridge 180:96ed750bd169 229 */
Anna Bridge 180:96ed750bd169 230 __attribute__((always_inline)) __STATIC_INLINE uint32_t __get_xPSR(void)
Anna Bridge 180:96ed750bd169 231 {
Anna Bridge 180:96ed750bd169 232 uint32_t result;
Anna Bridge 180:96ed750bd169 233
Anna Bridge 180:96ed750bd169 234 __ASM volatile ("MRS %0, xpsr" : "=r" (result) );
Anna Bridge 180:96ed750bd169 235 return(result);
Anna Bridge 180:96ed750bd169 236 }
Anna Bridge 180:96ed750bd169 237
Anna Bridge 180:96ed750bd169 238
Anna Bridge 180:96ed750bd169 239 /**
Anna Bridge 180:96ed750bd169 240 \brief Get Process Stack Pointer
Anna Bridge 180:96ed750bd169 241 \details Returns the current value of the Process Stack Pointer (PSP).
Anna Bridge 180:96ed750bd169 242 \return PSP Register value
Anna Bridge 180:96ed750bd169 243 */
Anna Bridge 180:96ed750bd169 244 __attribute__((always_inline)) __STATIC_INLINE uint32_t __get_PSP(void)
Anna Bridge 180:96ed750bd169 245 {
Anna Bridge 180:96ed750bd169 246 register uint32_t result;
Anna Bridge 180:96ed750bd169 247
Anna Bridge 180:96ed750bd169 248 __ASM volatile ("MRS %0, psp" : "=r" (result) );
Anna Bridge 180:96ed750bd169 249 return(result);
Anna Bridge 180:96ed750bd169 250 }
Anna Bridge 180:96ed750bd169 251
Anna Bridge 180:96ed750bd169 252
Anna Bridge 180:96ed750bd169 253 #if (defined (__ARM_FEATURE_CMSE ) && (__ARM_FEATURE_CMSE == 3))
Anna Bridge 180:96ed750bd169 254 /**
Anna Bridge 180:96ed750bd169 255 \brief Get Process Stack Pointer (non-secure)
Anna Bridge 180:96ed750bd169 256 \details Returns the current value of the non-secure Process Stack Pointer (PSP) when in secure state.
Anna Bridge 180:96ed750bd169 257 \return PSP Register value
Anna Bridge 180:96ed750bd169 258 */
Anna Bridge 180:96ed750bd169 259 __attribute__((always_inline)) __STATIC_INLINE uint32_t __TZ_get_PSP_NS(void)
Anna Bridge 180:96ed750bd169 260 {
Anna Bridge 180:96ed750bd169 261 register uint32_t result;
Anna Bridge 180:96ed750bd169 262
Anna Bridge 180:96ed750bd169 263 __ASM volatile ("MRS %0, psp_ns" : "=r" (result) );
Anna Bridge 180:96ed750bd169 264 return(result);
Anna Bridge 180:96ed750bd169 265 }
Anna Bridge 180:96ed750bd169 266 #endif
Anna Bridge 180:96ed750bd169 267
Anna Bridge 180:96ed750bd169 268
Anna Bridge 180:96ed750bd169 269 /**
Anna Bridge 180:96ed750bd169 270 \brief Set Process Stack Pointer
Anna Bridge 180:96ed750bd169 271 \details Assigns the given value to the Process Stack Pointer (PSP).
Anna Bridge 180:96ed750bd169 272 \param [in] topOfProcStack Process Stack Pointer value to set
Anna Bridge 180:96ed750bd169 273 */
Anna Bridge 180:96ed750bd169 274 __attribute__((always_inline)) __STATIC_INLINE void __set_PSP(uint32_t topOfProcStack)
Anna Bridge 180:96ed750bd169 275 {
Anna Bridge 180:96ed750bd169 276 __ASM volatile ("MSR psp, %0" : : "r" (topOfProcStack) : );
Anna Bridge 180:96ed750bd169 277 }
Anna Bridge 180:96ed750bd169 278
Anna Bridge 180:96ed750bd169 279
Anna Bridge 180:96ed750bd169 280 #if (defined (__ARM_FEATURE_CMSE ) && (__ARM_FEATURE_CMSE == 3))
Anna Bridge 180:96ed750bd169 281 /**
Anna Bridge 180:96ed750bd169 282 \brief Set Process Stack Pointer (non-secure)
Anna Bridge 180:96ed750bd169 283 \details Assigns the given value to the non-secure Process Stack Pointer (PSP) when in secure state.
Anna Bridge 180:96ed750bd169 284 \param [in] topOfProcStack Process Stack Pointer value to set
Anna Bridge 180:96ed750bd169 285 */
Anna Bridge 180:96ed750bd169 286 __attribute__((always_inline)) __STATIC_INLINE void __TZ_set_PSP_NS(uint32_t topOfProcStack)
Anna Bridge 180:96ed750bd169 287 {
Anna Bridge 180:96ed750bd169 288 __ASM volatile ("MSR psp_ns, %0" : : "r" (topOfProcStack) : );
Anna Bridge 180:96ed750bd169 289 }
Anna Bridge 180:96ed750bd169 290 #endif
Anna Bridge 180:96ed750bd169 291
Anna Bridge 180:96ed750bd169 292
Anna Bridge 180:96ed750bd169 293 /**
Anna Bridge 180:96ed750bd169 294 \brief Get Main Stack Pointer
Anna Bridge 180:96ed750bd169 295 \details Returns the current value of the Main Stack Pointer (MSP).
Anna Bridge 180:96ed750bd169 296 \return MSP Register value
Anna Bridge 180:96ed750bd169 297 */
Anna Bridge 180:96ed750bd169 298 __attribute__((always_inline)) __STATIC_INLINE uint32_t __get_MSP(void)
Anna Bridge 180:96ed750bd169 299 {
Anna Bridge 180:96ed750bd169 300 register uint32_t result;
Anna Bridge 180:96ed750bd169 301
Anna Bridge 180:96ed750bd169 302 __ASM volatile ("MRS %0, msp" : "=r" (result) );
Anna Bridge 180:96ed750bd169 303 return(result);
Anna Bridge 180:96ed750bd169 304 }
Anna Bridge 180:96ed750bd169 305
Anna Bridge 180:96ed750bd169 306
Anna Bridge 180:96ed750bd169 307 #if (defined (__ARM_FEATURE_CMSE ) && (__ARM_FEATURE_CMSE == 3))
Anna Bridge 180:96ed750bd169 308 /**
Anna Bridge 180:96ed750bd169 309 \brief Get Main Stack Pointer (non-secure)
Anna Bridge 180:96ed750bd169 310 \details Returns the current value of the non-secure Main Stack Pointer (MSP) when in secure state.
Anna Bridge 180:96ed750bd169 311 \return MSP Register value
Anna Bridge 180:96ed750bd169 312 */
Anna Bridge 180:96ed750bd169 313 __attribute__((always_inline)) __STATIC_INLINE uint32_t __TZ_get_MSP_NS(void)
Anna Bridge 180:96ed750bd169 314 {
Anna Bridge 180:96ed750bd169 315 register uint32_t result;
Anna Bridge 180:96ed750bd169 316
Anna Bridge 180:96ed750bd169 317 __ASM volatile ("MRS %0, msp_ns" : "=r" (result) );
Anna Bridge 180:96ed750bd169 318 return(result);
Anna Bridge 180:96ed750bd169 319 }
Anna Bridge 180:96ed750bd169 320 #endif
Anna Bridge 180:96ed750bd169 321
Anna Bridge 180:96ed750bd169 322
Anna Bridge 180:96ed750bd169 323 /**
Anna Bridge 180:96ed750bd169 324 \brief Set Main Stack Pointer
Anna Bridge 180:96ed750bd169 325 \details Assigns the given value to the Main Stack Pointer (MSP).
Anna Bridge 180:96ed750bd169 326 \param [in] topOfMainStack Main Stack Pointer value to set
Anna Bridge 180:96ed750bd169 327 */
Anna Bridge 180:96ed750bd169 328 __attribute__((always_inline)) __STATIC_INLINE void __set_MSP(uint32_t topOfMainStack)
Anna Bridge 180:96ed750bd169 329 {
Anna Bridge 180:96ed750bd169 330 __ASM volatile ("MSR msp, %0" : : "r" (topOfMainStack) : );
Anna Bridge 180:96ed750bd169 331 }
Anna Bridge 180:96ed750bd169 332
Anna Bridge 180:96ed750bd169 333
Anna Bridge 180:96ed750bd169 334 #if (defined (__ARM_FEATURE_CMSE ) && (__ARM_FEATURE_CMSE == 3))
Anna Bridge 180:96ed750bd169 335 /**
Anna Bridge 180:96ed750bd169 336 \brief Set Main Stack Pointer (non-secure)
Anna Bridge 180:96ed750bd169 337 \details Assigns the given value to the non-secure Main Stack Pointer (MSP) when in secure state.
Anna Bridge 180:96ed750bd169 338 \param [in] topOfMainStack Main Stack Pointer value to set
Anna Bridge 180:96ed750bd169 339 */
Anna Bridge 180:96ed750bd169 340 __attribute__((always_inline)) __STATIC_INLINE void __TZ_set_MSP_NS(uint32_t topOfMainStack)
Anna Bridge 180:96ed750bd169 341 {
Anna Bridge 180:96ed750bd169 342 __ASM volatile ("MSR msp_ns, %0" : : "r" (topOfMainStack) : );
Anna Bridge 180:96ed750bd169 343 }
Anna Bridge 180:96ed750bd169 344 #endif
Anna Bridge 180:96ed750bd169 345
Anna Bridge 180:96ed750bd169 346
Anna Bridge 180:96ed750bd169 347 #if (defined (__ARM_FEATURE_CMSE ) && (__ARM_FEATURE_CMSE == 3))
Anna Bridge 180:96ed750bd169 348 /**
Anna Bridge 180:96ed750bd169 349 \brief Get Stack Pointer (non-secure)
Anna Bridge 180:96ed750bd169 350 \details Returns the current value of the non-secure Stack Pointer (SP) when in secure state.
Anna Bridge 180:96ed750bd169 351 \return SP Register value
Anna Bridge 180:96ed750bd169 352 */
Anna Bridge 180:96ed750bd169 353 __attribute__((always_inline)) __STATIC_INLINE uint32_t __TZ_get_SP_NS(void)
Anna Bridge 180:96ed750bd169 354 {
Anna Bridge 180:96ed750bd169 355 register uint32_t result;
Anna Bridge 180:96ed750bd169 356
Anna Bridge 180:96ed750bd169 357 __ASM volatile ("MRS %0, sp_ns" : "=r" (result) );
Anna Bridge 180:96ed750bd169 358 return(result);
Anna Bridge 180:96ed750bd169 359 }
Anna Bridge 180:96ed750bd169 360
Anna Bridge 180:96ed750bd169 361
Anna Bridge 180:96ed750bd169 362 /**
Anna Bridge 180:96ed750bd169 363 \brief Set Stack Pointer (non-secure)
Anna Bridge 180:96ed750bd169 364 \details Assigns the given value to the non-secure Stack Pointer (SP) when in secure state.
Anna Bridge 180:96ed750bd169 365 \param [in] topOfStack Stack Pointer value to set
Anna Bridge 180:96ed750bd169 366 */
Anna Bridge 180:96ed750bd169 367 __attribute__((always_inline)) __STATIC_INLINE void __TZ_set_SP_NS(uint32_t topOfStack)
Anna Bridge 180:96ed750bd169 368 {
Anna Bridge 180:96ed750bd169 369 __ASM volatile ("MSR sp_ns, %0" : : "r" (topOfStack) : );
Anna Bridge 180:96ed750bd169 370 }
Anna Bridge 180:96ed750bd169 371 #endif
Anna Bridge 180:96ed750bd169 372
Anna Bridge 180:96ed750bd169 373
Anna Bridge 180:96ed750bd169 374 /**
Anna Bridge 180:96ed750bd169 375 \brief Get Priority Mask
Anna Bridge 180:96ed750bd169 376 \details Returns the current state of the priority mask bit from the Priority Mask Register.
Anna Bridge 180:96ed750bd169 377 \return Priority Mask value
Anna Bridge 180:96ed750bd169 378 */
Anna Bridge 180:96ed750bd169 379 __attribute__((always_inline)) __STATIC_INLINE uint32_t __get_PRIMASK(void)
Anna Bridge 180:96ed750bd169 380 {
Anna Bridge 180:96ed750bd169 381 uint32_t result;
Anna Bridge 180:96ed750bd169 382
Anna Bridge 180:96ed750bd169 383 __ASM volatile ("MRS %0, primask" : "=r" (result) );
Anna Bridge 180:96ed750bd169 384 return(result);
Anna Bridge 180:96ed750bd169 385 }
Anna Bridge 180:96ed750bd169 386
Anna Bridge 180:96ed750bd169 387
Anna Bridge 180:96ed750bd169 388 #if (defined (__ARM_FEATURE_CMSE ) && (__ARM_FEATURE_CMSE == 3))
Anna Bridge 180:96ed750bd169 389 /**
Anna Bridge 180:96ed750bd169 390 \brief Get Priority Mask (non-secure)
Anna Bridge 180:96ed750bd169 391 \details Returns the current state of the non-secure priority mask bit from the Priority Mask Register when in secure state.
Anna Bridge 180:96ed750bd169 392 \return Priority Mask value
Anna Bridge 180:96ed750bd169 393 */
Anna Bridge 180:96ed750bd169 394 __attribute__((always_inline)) __STATIC_INLINE uint32_t __TZ_get_PRIMASK_NS(void)
Anna Bridge 180:96ed750bd169 395 {
Anna Bridge 180:96ed750bd169 396 uint32_t result;
Anna Bridge 180:96ed750bd169 397
Anna Bridge 180:96ed750bd169 398 __ASM volatile ("MRS %0, primask_ns" : "=r" (result) );
Anna Bridge 180:96ed750bd169 399 return(result);
Anna Bridge 180:96ed750bd169 400 }
Anna Bridge 180:96ed750bd169 401 #endif
Anna Bridge 180:96ed750bd169 402
Anna Bridge 180:96ed750bd169 403
Anna Bridge 180:96ed750bd169 404 /**
Anna Bridge 180:96ed750bd169 405 \brief Set Priority Mask
Anna Bridge 180:96ed750bd169 406 \details Assigns the given value to the Priority Mask Register.
Anna Bridge 180:96ed750bd169 407 \param [in] priMask Priority Mask
Anna Bridge 180:96ed750bd169 408 */
Anna Bridge 180:96ed750bd169 409 __attribute__((always_inline)) __STATIC_INLINE void __set_PRIMASK(uint32_t priMask)
Anna Bridge 180:96ed750bd169 410 {
Anna Bridge 180:96ed750bd169 411 __ASM volatile ("MSR primask, %0" : : "r" (priMask) : "memory");
Anna Bridge 180:96ed750bd169 412 }
Anna Bridge 180:96ed750bd169 413
Anna Bridge 180:96ed750bd169 414
Anna Bridge 180:96ed750bd169 415 #if (defined (__ARM_FEATURE_CMSE ) && (__ARM_FEATURE_CMSE == 3))
Anna Bridge 180:96ed750bd169 416 /**
Anna Bridge 180:96ed750bd169 417 \brief Set Priority Mask (non-secure)
Anna Bridge 180:96ed750bd169 418 \details Assigns the given value to the non-secure Priority Mask Register when in secure state.
Anna Bridge 180:96ed750bd169 419 \param [in] priMask Priority Mask
Anna Bridge 180:96ed750bd169 420 */
Anna Bridge 180:96ed750bd169 421 __attribute__((always_inline)) __STATIC_INLINE void __TZ_set_PRIMASK_NS(uint32_t priMask)
Anna Bridge 180:96ed750bd169 422 {
Anna Bridge 180:96ed750bd169 423 __ASM volatile ("MSR primask_ns, %0" : : "r" (priMask) : "memory");
Anna Bridge 180:96ed750bd169 424 }
Anna Bridge 180:96ed750bd169 425 #endif
Anna Bridge 180:96ed750bd169 426
Anna Bridge 180:96ed750bd169 427
Anna Bridge 180:96ed750bd169 428 #if ((defined (__ARM_ARCH_7M__ ) && (__ARM_ARCH_7M__ == 1)) || \
Anna Bridge 180:96ed750bd169 429 (defined (__ARM_ARCH_7EM__ ) && (__ARM_ARCH_7EM__ == 1)) || \
Anna Bridge 180:96ed750bd169 430 (defined (__ARM_ARCH_8M_MAIN__ ) && (__ARM_ARCH_8M_MAIN__ == 1)) )
Anna Bridge 180:96ed750bd169 431 /**
Anna Bridge 180:96ed750bd169 432 \brief Enable FIQ
Anna Bridge 180:96ed750bd169 433 \details Enables FIQ interrupts by clearing the F-bit in the CPSR.
Anna Bridge 180:96ed750bd169 434 Can only be executed in Privileged modes.
Anna Bridge 180:96ed750bd169 435 */
Anna Bridge 180:96ed750bd169 436 __attribute__((always_inline)) __STATIC_INLINE void __enable_fault_irq(void)
Anna Bridge 180:96ed750bd169 437 {
Anna Bridge 180:96ed750bd169 438 __ASM volatile ("cpsie f" : : : "memory");
Anna Bridge 180:96ed750bd169 439 }
Anna Bridge 180:96ed750bd169 440
Anna Bridge 180:96ed750bd169 441
Anna Bridge 180:96ed750bd169 442 /**
Anna Bridge 180:96ed750bd169 443 \brief Disable FIQ
Anna Bridge 180:96ed750bd169 444 \details Disables FIQ interrupts by setting the F-bit in the CPSR.
Anna Bridge 180:96ed750bd169 445 Can only be executed in Privileged modes.
Anna Bridge 180:96ed750bd169 446 */
Anna Bridge 180:96ed750bd169 447 __attribute__((always_inline)) __STATIC_INLINE void __disable_fault_irq(void)
Anna Bridge 180:96ed750bd169 448 {
Anna Bridge 180:96ed750bd169 449 __ASM volatile ("cpsid f" : : : "memory");
Anna Bridge 180:96ed750bd169 450 }
Anna Bridge 180:96ed750bd169 451
Anna Bridge 180:96ed750bd169 452
Anna Bridge 180:96ed750bd169 453 /**
Anna Bridge 180:96ed750bd169 454 \brief Get Base Priority
Anna Bridge 180:96ed750bd169 455 \details Returns the current value of the Base Priority register.
Anna Bridge 180:96ed750bd169 456 \return Base Priority register value
Anna Bridge 180:96ed750bd169 457 */
Anna Bridge 180:96ed750bd169 458 __attribute__((always_inline)) __STATIC_INLINE uint32_t __get_BASEPRI(void)
Anna Bridge 180:96ed750bd169 459 {
Anna Bridge 180:96ed750bd169 460 uint32_t result;
Anna Bridge 180:96ed750bd169 461
Anna Bridge 180:96ed750bd169 462 __ASM volatile ("MRS %0, basepri" : "=r" (result) );
Anna Bridge 180:96ed750bd169 463 return(result);
Anna Bridge 180:96ed750bd169 464 }
Anna Bridge 180:96ed750bd169 465
Anna Bridge 180:96ed750bd169 466
Anna Bridge 180:96ed750bd169 467 #if (defined (__ARM_FEATURE_CMSE ) && (__ARM_FEATURE_CMSE == 3))
Anna Bridge 180:96ed750bd169 468 /**
Anna Bridge 180:96ed750bd169 469 \brief Get Base Priority (non-secure)
Anna Bridge 180:96ed750bd169 470 \details Returns the current value of the non-secure Base Priority register when in secure state.
Anna Bridge 180:96ed750bd169 471 \return Base Priority register value
Anna Bridge 180:96ed750bd169 472 */
Anna Bridge 180:96ed750bd169 473 __attribute__((always_inline)) __STATIC_INLINE uint32_t __TZ_get_BASEPRI_NS(void)
Anna Bridge 180:96ed750bd169 474 {
Anna Bridge 180:96ed750bd169 475 uint32_t result;
Anna Bridge 180:96ed750bd169 476
Anna Bridge 180:96ed750bd169 477 __ASM volatile ("MRS %0, basepri_ns" : "=r" (result) );
Anna Bridge 180:96ed750bd169 478 return(result);
Anna Bridge 180:96ed750bd169 479 }
Anna Bridge 180:96ed750bd169 480 #endif
Anna Bridge 180:96ed750bd169 481
Anna Bridge 180:96ed750bd169 482
Anna Bridge 180:96ed750bd169 483 /**
Anna Bridge 180:96ed750bd169 484 \brief Set Base Priority
Anna Bridge 180:96ed750bd169 485 \details Assigns the given value to the Base Priority register.
Anna Bridge 180:96ed750bd169 486 \param [in] basePri Base Priority value to set
Anna Bridge 180:96ed750bd169 487 */
Anna Bridge 180:96ed750bd169 488 __attribute__((always_inline)) __STATIC_INLINE void __set_BASEPRI(uint32_t basePri)
Anna Bridge 180:96ed750bd169 489 {
Anna Bridge 180:96ed750bd169 490 __ASM volatile ("MSR basepri, %0" : : "r" (basePri) : "memory");
Anna Bridge 180:96ed750bd169 491 }
Anna Bridge 180:96ed750bd169 492
Anna Bridge 180:96ed750bd169 493
Anna Bridge 180:96ed750bd169 494 #if (defined (__ARM_FEATURE_CMSE ) && (__ARM_FEATURE_CMSE == 3))
Anna Bridge 180:96ed750bd169 495 /**
Anna Bridge 180:96ed750bd169 496 \brief Set Base Priority (non-secure)
Anna Bridge 180:96ed750bd169 497 \details Assigns the given value to the non-secure Base Priority register when in secure state.
Anna Bridge 180:96ed750bd169 498 \param [in] basePri Base Priority value to set
Anna Bridge 180:96ed750bd169 499 */
Anna Bridge 180:96ed750bd169 500 __attribute__((always_inline)) __STATIC_INLINE void __TZ_set_BASEPRI_NS(uint32_t basePri)
Anna Bridge 180:96ed750bd169 501 {
Anna Bridge 180:96ed750bd169 502 __ASM volatile ("MSR basepri_ns, %0" : : "r" (basePri) : "memory");
Anna Bridge 180:96ed750bd169 503 }
Anna Bridge 180:96ed750bd169 504 #endif
Anna Bridge 180:96ed750bd169 505
Anna Bridge 180:96ed750bd169 506
Anna Bridge 180:96ed750bd169 507 /**
Anna Bridge 180:96ed750bd169 508 \brief Set Base Priority with condition
Anna Bridge 180:96ed750bd169 509 \details Assigns the given value to the Base Priority register only if BASEPRI masking is disabled,
Anna Bridge 180:96ed750bd169 510 or the new value increases the BASEPRI priority level.
Anna Bridge 180:96ed750bd169 511 \param [in] basePri Base Priority value to set
Anna Bridge 180:96ed750bd169 512 */
Anna Bridge 180:96ed750bd169 513 __attribute__((always_inline)) __STATIC_INLINE void __set_BASEPRI_MAX(uint32_t basePri)
Anna Bridge 180:96ed750bd169 514 {
Anna Bridge 180:96ed750bd169 515 __ASM volatile ("MSR basepri_max, %0" : : "r" (basePri) : "memory");
Anna Bridge 180:96ed750bd169 516 }
Anna Bridge 180:96ed750bd169 517
Anna Bridge 180:96ed750bd169 518
Anna Bridge 180:96ed750bd169 519 /**
Anna Bridge 180:96ed750bd169 520 \brief Get Fault Mask
Anna Bridge 180:96ed750bd169 521 \details Returns the current value of the Fault Mask register.
Anna Bridge 180:96ed750bd169 522 \return Fault Mask register value
Anna Bridge 180:96ed750bd169 523 */
Anna Bridge 180:96ed750bd169 524 __attribute__((always_inline)) __STATIC_INLINE uint32_t __get_FAULTMASK(void)
Anna Bridge 180:96ed750bd169 525 {
Anna Bridge 180:96ed750bd169 526 uint32_t result;
Anna Bridge 180:96ed750bd169 527
Anna Bridge 180:96ed750bd169 528 __ASM volatile ("MRS %0, faultmask" : "=r" (result) );
Anna Bridge 180:96ed750bd169 529 return(result);
Anna Bridge 180:96ed750bd169 530 }
Anna Bridge 180:96ed750bd169 531
Anna Bridge 180:96ed750bd169 532
Anna Bridge 180:96ed750bd169 533 #if (defined (__ARM_FEATURE_CMSE ) && (__ARM_FEATURE_CMSE == 3))
Anna Bridge 180:96ed750bd169 534 /**
Anna Bridge 180:96ed750bd169 535 \brief Get Fault Mask (non-secure)
Anna Bridge 180:96ed750bd169 536 \details Returns the current value of the non-secure Fault Mask register when in secure state.
Anna Bridge 180:96ed750bd169 537 \return Fault Mask register value
Anna Bridge 180:96ed750bd169 538 */
Anna Bridge 180:96ed750bd169 539 __attribute__((always_inline)) __STATIC_INLINE uint32_t __TZ_get_FAULTMASK_NS(void)
Anna Bridge 180:96ed750bd169 540 {
Anna Bridge 180:96ed750bd169 541 uint32_t result;
Anna Bridge 180:96ed750bd169 542
Anna Bridge 180:96ed750bd169 543 __ASM volatile ("MRS %0, faultmask_ns" : "=r" (result) );
Anna Bridge 180:96ed750bd169 544 return(result);
Anna Bridge 180:96ed750bd169 545 }
Anna Bridge 180:96ed750bd169 546 #endif
Anna Bridge 180:96ed750bd169 547
Anna Bridge 180:96ed750bd169 548
Anna Bridge 180:96ed750bd169 549 /**
Anna Bridge 180:96ed750bd169 550 \brief Set Fault Mask
Anna Bridge 180:96ed750bd169 551 \details Assigns the given value to the Fault Mask register.
Anna Bridge 180:96ed750bd169 552 \param [in] faultMask Fault Mask value to set
Anna Bridge 180:96ed750bd169 553 */
Anna Bridge 180:96ed750bd169 554 __attribute__((always_inline)) __STATIC_INLINE void __set_FAULTMASK(uint32_t faultMask)
Anna Bridge 180:96ed750bd169 555 {
Anna Bridge 180:96ed750bd169 556 __ASM volatile ("MSR faultmask, %0" : : "r" (faultMask) : "memory");
Anna Bridge 180:96ed750bd169 557 }
Anna Bridge 180:96ed750bd169 558
Anna Bridge 180:96ed750bd169 559
Anna Bridge 180:96ed750bd169 560 #if (defined (__ARM_FEATURE_CMSE ) && (__ARM_FEATURE_CMSE == 3))
Anna Bridge 180:96ed750bd169 561 /**
Anna Bridge 180:96ed750bd169 562 \brief Set Fault Mask (non-secure)
Anna Bridge 180:96ed750bd169 563 \details Assigns the given value to the non-secure Fault Mask register when in secure state.
Anna Bridge 180:96ed750bd169 564 \param [in] faultMask Fault Mask value to set
Anna Bridge 180:96ed750bd169 565 */
Anna Bridge 180:96ed750bd169 566 __attribute__((always_inline)) __STATIC_INLINE void __TZ_set_FAULTMASK_NS(uint32_t faultMask)
Anna Bridge 180:96ed750bd169 567 {
Anna Bridge 180:96ed750bd169 568 __ASM volatile ("MSR faultmask_ns, %0" : : "r" (faultMask) : "memory");
Anna Bridge 180:96ed750bd169 569 }
Anna Bridge 180:96ed750bd169 570 #endif
Anna Bridge 180:96ed750bd169 571
Anna Bridge 180:96ed750bd169 572 #endif /* ((defined (__ARM_ARCH_7M__ ) && (__ARM_ARCH_7M__ == 1)) || \
Anna Bridge 180:96ed750bd169 573 (defined (__ARM_ARCH_7EM__ ) && (__ARM_ARCH_7EM__ == 1)) || \
Anna Bridge 180:96ed750bd169 574 (defined (__ARM_ARCH_8M_MAIN__ ) && (__ARM_ARCH_8M_MAIN__ == 1)) ) */
Anna Bridge 180:96ed750bd169 575
Anna Bridge 180:96ed750bd169 576
Anna Bridge 180:96ed750bd169 577 #if ((defined (__ARM_ARCH_8M_MAIN__ ) && (__ARM_ARCH_8M_MAIN__ == 1)) || \
Anna Bridge 180:96ed750bd169 578 (defined (__ARM_ARCH_8M_BASE__ ) && (__ARM_ARCH_8M_BASE__ == 1)) )
Anna Bridge 180:96ed750bd169 579
Anna Bridge 180:96ed750bd169 580 /**
Anna Bridge 180:96ed750bd169 581 \brief Get Process Stack Pointer Limit
Anna Bridge 180:96ed750bd169 582 \details Returns the current value of the Process Stack Pointer Limit (PSPLIM).
Anna Bridge 180:96ed750bd169 583 \return PSPLIM Register value
Anna Bridge 180:96ed750bd169 584 */
Anna Bridge 180:96ed750bd169 585 __attribute__((always_inline)) __STATIC_INLINE uint32_t __get_PSPLIM(void)
Anna Bridge 180:96ed750bd169 586 {
Anna Bridge 180:96ed750bd169 587 register uint32_t result;
Anna Bridge 180:96ed750bd169 588
Anna Bridge 180:96ed750bd169 589 __ASM volatile ("MRS %0, psplim" : "=r" (result) );
Anna Bridge 180:96ed750bd169 590 return(result);
Anna Bridge 180:96ed750bd169 591 }
Anna Bridge 180:96ed750bd169 592
Anna Bridge 180:96ed750bd169 593
Anna Bridge 180:96ed750bd169 594 #if ((defined (__ARM_FEATURE_CMSE ) && (__ARM_FEATURE_CMSE == 3)) && \
Anna Bridge 180:96ed750bd169 595 (defined (__ARM_ARCH_8M_MAIN__) && (__ARM_ARCH_8M_MAIN__ == 1)) )
Anna Bridge 180:96ed750bd169 596 /**
Anna Bridge 180:96ed750bd169 597 \brief Get Process Stack Pointer Limit (non-secure)
Anna Bridge 180:96ed750bd169 598 \details Returns the current value of the non-secure Process Stack Pointer Limit (PSPLIM) when in secure state.
Anna Bridge 180:96ed750bd169 599 \return PSPLIM Register value
Anna Bridge 180:96ed750bd169 600 */
Anna Bridge 180:96ed750bd169 601 __attribute__((always_inline)) __STATIC_INLINE uint32_t __TZ_get_PSPLIM_NS(void)
Anna Bridge 180:96ed750bd169 602 {
Anna Bridge 180:96ed750bd169 603 register uint32_t result;
Anna Bridge 180:96ed750bd169 604
Anna Bridge 180:96ed750bd169 605 __ASM volatile ("MRS %0, psplim_ns" : "=r" (result) );
Anna Bridge 180:96ed750bd169 606 return(result);
Anna Bridge 180:96ed750bd169 607 }
Anna Bridge 180:96ed750bd169 608 #endif
Anna Bridge 180:96ed750bd169 609
Anna Bridge 180:96ed750bd169 610
Anna Bridge 180:96ed750bd169 611 /**
Anna Bridge 180:96ed750bd169 612 \brief Set Process Stack Pointer Limit
Anna Bridge 180:96ed750bd169 613 \details Assigns the given value to the Process Stack Pointer Limit (PSPLIM).
Anna Bridge 180:96ed750bd169 614 \param [in] ProcStackPtrLimit Process Stack Pointer Limit value to set
Anna Bridge 180:96ed750bd169 615 */
Anna Bridge 180:96ed750bd169 616 __attribute__((always_inline)) __STATIC_INLINE void __set_PSPLIM(uint32_t ProcStackPtrLimit)
Anna Bridge 180:96ed750bd169 617 {
Anna Bridge 180:96ed750bd169 618 __ASM volatile ("MSR psplim, %0" : : "r" (ProcStackPtrLimit));
Anna Bridge 180:96ed750bd169 619 }
Anna Bridge 180:96ed750bd169 620
Anna Bridge 180:96ed750bd169 621
Anna Bridge 180:96ed750bd169 622 #if ((defined (__ARM_FEATURE_CMSE ) && (__ARM_FEATURE_CMSE == 3)) && \
Anna Bridge 180:96ed750bd169 623 (defined (__ARM_ARCH_8M_MAIN__) && (__ARM_ARCH_8M_MAIN__ == 1)) )
Anna Bridge 180:96ed750bd169 624 /**
Anna Bridge 180:96ed750bd169 625 \brief Set Process Stack Pointer (non-secure)
Anna Bridge 180:96ed750bd169 626 \details Assigns the given value to the non-secure Process Stack Pointer Limit (PSPLIM) when in secure state.
Anna Bridge 180:96ed750bd169 627 \param [in] ProcStackPtrLimit Process Stack Pointer Limit value to set
Anna Bridge 180:96ed750bd169 628 */
Anna Bridge 180:96ed750bd169 629 __attribute__((always_inline)) __STATIC_INLINE void __TZ_set_PSPLIM_NS(uint32_t ProcStackPtrLimit)
Anna Bridge 180:96ed750bd169 630 {
Anna Bridge 180:96ed750bd169 631 __ASM volatile ("MSR psplim_ns, %0\n" : : "r" (ProcStackPtrLimit));
Anna Bridge 180:96ed750bd169 632 }
Anna Bridge 180:96ed750bd169 633 #endif
Anna Bridge 180:96ed750bd169 634
Anna Bridge 180:96ed750bd169 635
Anna Bridge 180:96ed750bd169 636 /**
Anna Bridge 180:96ed750bd169 637 \brief Get Main Stack Pointer Limit
Anna Bridge 180:96ed750bd169 638 \details Returns the current value of the Main Stack Pointer Limit (MSPLIM).
Anna Bridge 180:96ed750bd169 639 \return MSPLIM Register value
Anna Bridge 180:96ed750bd169 640 */
Anna Bridge 180:96ed750bd169 641 __attribute__((always_inline)) __STATIC_INLINE uint32_t __get_MSPLIM(void)
Anna Bridge 180:96ed750bd169 642 {
Anna Bridge 180:96ed750bd169 643 register uint32_t result;
Anna Bridge 180:96ed750bd169 644
Anna Bridge 180:96ed750bd169 645 __ASM volatile ("MRS %0, msplim" : "=r" (result) );
Anna Bridge 180:96ed750bd169 646
Anna Bridge 180:96ed750bd169 647 return(result);
Anna Bridge 180:96ed750bd169 648 }
Anna Bridge 180:96ed750bd169 649
Anna Bridge 180:96ed750bd169 650
Anna Bridge 180:96ed750bd169 651 #if ((defined (__ARM_FEATURE_CMSE ) && (__ARM_FEATURE_CMSE == 3)) && \
Anna Bridge 180:96ed750bd169 652 (defined (__ARM_ARCH_8M_MAIN__) && (__ARM_ARCH_8M_MAIN__ == 1)) )
Anna Bridge 180:96ed750bd169 653 /**
Anna Bridge 180:96ed750bd169 654 \brief Get Main Stack Pointer Limit (non-secure)
Anna Bridge 180:96ed750bd169 655 \details Returns the current value of the non-secure Main Stack Pointer Limit(MSPLIM) when in secure state.
Anna Bridge 180:96ed750bd169 656 \return MSPLIM Register value
Anna Bridge 180:96ed750bd169 657 */
Anna Bridge 180:96ed750bd169 658 __attribute__((always_inline)) __STATIC_INLINE uint32_t __TZ_get_MSPLIM_NS(void)
Anna Bridge 180:96ed750bd169 659 {
Anna Bridge 180:96ed750bd169 660 register uint32_t result;
Anna Bridge 180:96ed750bd169 661
Anna Bridge 180:96ed750bd169 662 __ASM volatile ("MRS %0, msplim_ns" : "=r" (result) );
Anna Bridge 180:96ed750bd169 663 return(result);
Anna Bridge 180:96ed750bd169 664 }
Anna Bridge 180:96ed750bd169 665 #endif
Anna Bridge 180:96ed750bd169 666
Anna Bridge 180:96ed750bd169 667
Anna Bridge 180:96ed750bd169 668 /**
Anna Bridge 180:96ed750bd169 669 \brief Set Main Stack Pointer Limit
Anna Bridge 180:96ed750bd169 670 \details Assigns the given value to the Main Stack Pointer Limit (MSPLIM).
Anna Bridge 180:96ed750bd169 671 \param [in] MainStackPtrLimit Main Stack Pointer Limit value to set
Anna Bridge 180:96ed750bd169 672 */
Anna Bridge 180:96ed750bd169 673 __attribute__((always_inline)) __STATIC_INLINE void __set_MSPLIM(uint32_t MainStackPtrLimit)
Anna Bridge 180:96ed750bd169 674 {
Anna Bridge 180:96ed750bd169 675 __ASM volatile ("MSR msplim, %0" : : "r" (MainStackPtrLimit));
Anna Bridge 180:96ed750bd169 676 }
Anna Bridge 180:96ed750bd169 677
Anna Bridge 180:96ed750bd169 678
Anna Bridge 180:96ed750bd169 679 #if ((defined (__ARM_FEATURE_CMSE ) && (__ARM_FEATURE_CMSE == 3)) && \
Anna Bridge 180:96ed750bd169 680 (defined (__ARM_ARCH_8M_MAIN__) && (__ARM_ARCH_8M_MAIN__ == 1)) )
Anna Bridge 180:96ed750bd169 681 /**
Anna Bridge 180:96ed750bd169 682 \brief Set Main Stack Pointer Limit (non-secure)
Anna Bridge 180:96ed750bd169 683 \details Assigns the given value to the non-secure Main Stack Pointer Limit (MSPLIM) when in secure state.
Anna Bridge 180:96ed750bd169 684 \param [in] MainStackPtrLimit Main Stack Pointer value to set
Anna Bridge 180:96ed750bd169 685 */
Anna Bridge 180:96ed750bd169 686 __attribute__((always_inline)) __STATIC_INLINE void __TZ_set_MSPLIM_NS(uint32_t MainStackPtrLimit)
Anna Bridge 180:96ed750bd169 687 {
Anna Bridge 180:96ed750bd169 688 __ASM volatile ("MSR msplim_ns, %0" : : "r" (MainStackPtrLimit));
Anna Bridge 180:96ed750bd169 689 }
Anna Bridge 180:96ed750bd169 690 #endif
Anna Bridge 180:96ed750bd169 691
Anna Bridge 180:96ed750bd169 692 #endif /* ((defined (__ARM_ARCH_8M_MAIN__ ) && (__ARM_ARCH_8M_MAIN__ == 1)) || \
Anna Bridge 180:96ed750bd169 693 (defined (__ARM_ARCH_8M_BASE__ ) && (__ARM_ARCH_8M_BASE__ == 1)) ) */
Anna Bridge 180:96ed750bd169 694
Anna Bridge 180:96ed750bd169 695
Anna Bridge 180:96ed750bd169 696 #if ((defined (__ARM_ARCH_7EM__ ) && (__ARM_ARCH_7EM__ == 1)) || \
Anna Bridge 180:96ed750bd169 697 (defined (__ARM_ARCH_8M_MAIN__ ) && (__ARM_ARCH_8M_MAIN__ == 1)) )
Anna Bridge 180:96ed750bd169 698
Anna Bridge 180:96ed750bd169 699 /**
Anna Bridge 180:96ed750bd169 700 \brief Get FPSCR
Anna Bridge 180:96ed750bd169 701 \details Returns the current value of the Floating Point Status/Control register.
Anna Bridge 180:96ed750bd169 702 \return Floating Point Status/Control register value
Anna Bridge 180:96ed750bd169 703 */
Anna Bridge 180:96ed750bd169 704 __attribute__((always_inline)) __STATIC_INLINE uint32_t __get_FPSCR(void)
Anna Bridge 180:96ed750bd169 705 {
Anna Bridge 180:96ed750bd169 706 #if ((defined (__FPU_PRESENT) && (__FPU_PRESENT == 1U)) && \
Anna Bridge 180:96ed750bd169 707 (defined (__FPU_USED ) && (__FPU_USED == 1U)) )
Anna Bridge 180:96ed750bd169 708 #if __has_builtin(__builtin_arm_get_fpscr) || (__GNUC__ > 7) || (__GNUC__ == 7 && __GNUC_MINOR__ >= 2)
Anna Bridge 180:96ed750bd169 709 /* see https://gcc.gnu.org/ml/gcc-patches/2017-04/msg00443.html */
Anna Bridge 180:96ed750bd169 710 return __builtin_arm_get_fpscr();
Anna Bridge 180:96ed750bd169 711 #else
Anna Bridge 180:96ed750bd169 712 uint32_t result;
Anna Bridge 180:96ed750bd169 713
Anna Bridge 180:96ed750bd169 714 __ASM volatile ("VMRS %0, fpscr" : "=r" (result) );
Anna Bridge 180:96ed750bd169 715 return(result);
Anna Bridge 180:96ed750bd169 716 #endif
Anna Bridge 180:96ed750bd169 717 #else
Anna Bridge 180:96ed750bd169 718 return(0U);
Anna Bridge 180:96ed750bd169 719 #endif
Anna Bridge 180:96ed750bd169 720 }
Anna Bridge 180:96ed750bd169 721
Anna Bridge 180:96ed750bd169 722
Anna Bridge 180:96ed750bd169 723 /**
Anna Bridge 180:96ed750bd169 724 \brief Set FPSCR
Anna Bridge 180:96ed750bd169 725 \details Assigns the given value to the Floating Point Status/Control register.
Anna Bridge 180:96ed750bd169 726 \param [in] fpscr Floating Point Status/Control value to set
Anna Bridge 180:96ed750bd169 727 */
Anna Bridge 180:96ed750bd169 728 __attribute__((always_inline)) __STATIC_INLINE void __set_FPSCR(uint32_t fpscr)
Anna Bridge 180:96ed750bd169 729 {
Anna Bridge 180:96ed750bd169 730 #if ((defined (__FPU_PRESENT) && (__FPU_PRESENT == 1U)) && \
Anna Bridge 180:96ed750bd169 731 (defined (__FPU_USED ) && (__FPU_USED == 1U)) )
Anna Bridge 180:96ed750bd169 732 #if __has_builtin(__builtin_arm_set_fpscr) || (__GNUC__ > 7) || (__GNUC__ == 7 && __GNUC_MINOR__ >= 2)
Anna Bridge 180:96ed750bd169 733 /* see https://gcc.gnu.org/ml/gcc-patches/2017-04/msg00443.html */
Anna Bridge 180:96ed750bd169 734 __builtin_arm_set_fpscr(fpscr);
Anna Bridge 180:96ed750bd169 735 #else
Anna Bridge 180:96ed750bd169 736 __ASM volatile ("VMSR fpscr, %0" : : "r" (fpscr) : "vfpcc", "memory");
Anna Bridge 180:96ed750bd169 737 #endif
Anna Bridge 180:96ed750bd169 738 #else
Anna Bridge 180:96ed750bd169 739 (void)fpscr;
Anna Bridge 180:96ed750bd169 740 #endif
Anna Bridge 180:96ed750bd169 741 }
Anna Bridge 180:96ed750bd169 742
Anna Bridge 180:96ed750bd169 743 #endif /* ((defined (__ARM_ARCH_7EM__ ) && (__ARM_ARCH_7EM__ == 1)) || \
Anna Bridge 180:96ed750bd169 744 (defined (__ARM_ARCH_8M_MAIN__ ) && (__ARM_ARCH_8M_MAIN__ == 1)) ) */
Anna Bridge 180:96ed750bd169 745
Anna Bridge 180:96ed750bd169 746
Anna Bridge 180:96ed750bd169 747
Anna Bridge 180:96ed750bd169 748 /*@} end of CMSIS_Core_RegAccFunctions */
Anna Bridge 180:96ed750bd169 749
Anna Bridge 180:96ed750bd169 750
Anna Bridge 180:96ed750bd169 751 /* ########################## Core Instruction Access ######################### */
Anna Bridge 180:96ed750bd169 752 /** \defgroup CMSIS_Core_InstructionInterface CMSIS Core Instruction Interface
Anna Bridge 180:96ed750bd169 753 Access to dedicated instructions
Anna Bridge 180:96ed750bd169 754 @{
Anna Bridge 180:96ed750bd169 755 */
Anna Bridge 180:96ed750bd169 756
Anna Bridge 180:96ed750bd169 757 /* Define macros for porting to both thumb1 and thumb2.
Anna Bridge 180:96ed750bd169 758 * For thumb1, use low register (r0-r7), specified by constraint "l"
Anna Bridge 180:96ed750bd169 759 * Otherwise, use general registers, specified by constraint "r" */
Anna Bridge 180:96ed750bd169 760 #if defined (__thumb__) && !defined (__thumb2__)
Anna Bridge 180:96ed750bd169 761 #define __CMSIS_GCC_OUT_REG(r) "=l" (r)
Anna Bridge 180:96ed750bd169 762 #define __CMSIS_GCC_RW_REG(r) "+l" (r)
Anna Bridge 180:96ed750bd169 763 #define __CMSIS_GCC_USE_REG(r) "l" (r)
Anna Bridge 180:96ed750bd169 764 #else
Anna Bridge 180:96ed750bd169 765 #define __CMSIS_GCC_OUT_REG(r) "=r" (r)
Anna Bridge 180:96ed750bd169 766 #define __CMSIS_GCC_RW_REG(r) "+r" (r)
Anna Bridge 180:96ed750bd169 767 #define __CMSIS_GCC_USE_REG(r) "r" (r)
Anna Bridge 180:96ed750bd169 768 #endif
Anna Bridge 180:96ed750bd169 769
Anna Bridge 180:96ed750bd169 770 /**
Anna Bridge 180:96ed750bd169 771 \brief No Operation
Anna Bridge 180:96ed750bd169 772 \details No Operation does nothing. This instruction can be used for code alignment purposes.
Anna Bridge 180:96ed750bd169 773 */
Anna Bridge 180:96ed750bd169 774 //__attribute__((always_inline)) __STATIC_INLINE void __NOP(void)
Anna Bridge 180:96ed750bd169 775 //{
Anna Bridge 180:96ed750bd169 776 // __ASM volatile ("nop");
Anna Bridge 180:96ed750bd169 777 //}
Anna Bridge 180:96ed750bd169 778 #define __NOP() __ASM volatile ("nop") /* This implementation generates debug information */
Anna Bridge 180:96ed750bd169 779
Anna Bridge 180:96ed750bd169 780 /**
Anna Bridge 180:96ed750bd169 781 \brief Wait For Interrupt
Anna Bridge 180:96ed750bd169 782 \details Wait For Interrupt is a hint instruction that suspends execution until one of a number of events occurs.
Anna Bridge 180:96ed750bd169 783 */
Anna Bridge 180:96ed750bd169 784 //__attribute__((always_inline)) __STATIC_INLINE void __WFI(void)
Anna Bridge 180:96ed750bd169 785 //{
Anna Bridge 180:96ed750bd169 786 // __ASM volatile ("wfi");
Anna Bridge 180:96ed750bd169 787 //}
Anna Bridge 180:96ed750bd169 788 #define __WFI() __ASM volatile ("wfi") /* This implementation generates debug information */
Anna Bridge 180:96ed750bd169 789
Anna Bridge 180:96ed750bd169 790
Anna Bridge 180:96ed750bd169 791 /**
Anna Bridge 180:96ed750bd169 792 \brief Wait For Event
Anna Bridge 180:96ed750bd169 793 \details Wait For Event is a hint instruction that permits the processor to enter
Anna Bridge 180:96ed750bd169 794 a low-power state until one of a number of events occurs.
Anna Bridge 180:96ed750bd169 795 */
Anna Bridge 180:96ed750bd169 796 //__attribute__((always_inline)) __STATIC_INLINE void __WFE(void)
Anna Bridge 180:96ed750bd169 797 //{
Anna Bridge 180:96ed750bd169 798 // __ASM volatile ("wfe");
Anna Bridge 180:96ed750bd169 799 //}
Anna Bridge 180:96ed750bd169 800 #define __WFE() __ASM volatile ("wfe") /* This implementation generates debug information */
Anna Bridge 180:96ed750bd169 801
Anna Bridge 180:96ed750bd169 802
Anna Bridge 180:96ed750bd169 803 /**
Anna Bridge 180:96ed750bd169 804 \brief Send Event
Anna Bridge 180:96ed750bd169 805 \details Send Event is a hint instruction. It causes an event to be signaled to the CPU.
Anna Bridge 180:96ed750bd169 806 */
Anna Bridge 180:96ed750bd169 807 //__attribute__((always_inline)) __STATIC_INLINE void __SEV(void)
Anna Bridge 180:96ed750bd169 808 //{
Anna Bridge 180:96ed750bd169 809 // __ASM volatile ("sev");
Anna Bridge 180:96ed750bd169 810 //}
Anna Bridge 180:96ed750bd169 811 #define __SEV() __ASM volatile ("sev") /* This implementation generates debug information */
Anna Bridge 180:96ed750bd169 812
Anna Bridge 180:96ed750bd169 813
Anna Bridge 180:96ed750bd169 814 /**
Anna Bridge 180:96ed750bd169 815 \brief Instruction Synchronization Barrier
Anna Bridge 180:96ed750bd169 816 \details Instruction Synchronization Barrier flushes the pipeline in the processor,
Anna Bridge 180:96ed750bd169 817 so that all instructions following the ISB are fetched from cache or memory,
Anna Bridge 180:96ed750bd169 818 after the instruction has been completed.
Anna Bridge 180:96ed750bd169 819 */
Anna Bridge 180:96ed750bd169 820 __attribute__((always_inline)) __STATIC_INLINE void __ISB(void)
Anna Bridge 180:96ed750bd169 821 {
Anna Bridge 180:96ed750bd169 822 __ASM volatile ("isb 0xF":::"memory");
Anna Bridge 180:96ed750bd169 823 }
Anna Bridge 180:96ed750bd169 824
Anna Bridge 180:96ed750bd169 825
Anna Bridge 180:96ed750bd169 826 /**
Anna Bridge 180:96ed750bd169 827 \brief Data Synchronization Barrier
Anna Bridge 180:96ed750bd169 828 \details Acts as a special kind of Data Memory Barrier.
Anna Bridge 180:96ed750bd169 829 It completes when all explicit memory accesses before this instruction complete.
Anna Bridge 180:96ed750bd169 830 */
Anna Bridge 180:96ed750bd169 831 __attribute__((always_inline)) __STATIC_INLINE void __DSB(void)
Anna Bridge 180:96ed750bd169 832 {
Anna Bridge 180:96ed750bd169 833 __ASM volatile ("dsb 0xF":::"memory");
Anna Bridge 180:96ed750bd169 834 }
Anna Bridge 180:96ed750bd169 835
Anna Bridge 180:96ed750bd169 836
Anna Bridge 180:96ed750bd169 837 /**
Anna Bridge 180:96ed750bd169 838 \brief Data Memory Barrier
Anna Bridge 180:96ed750bd169 839 \details Ensures the apparent order of the explicit memory operations before
Anna Bridge 180:96ed750bd169 840 and after the instruction, without ensuring their completion.
Anna Bridge 180:96ed750bd169 841 */
Anna Bridge 180:96ed750bd169 842 __attribute__((always_inline)) __STATIC_INLINE void __DMB(void)
Anna Bridge 180:96ed750bd169 843 {
Anna Bridge 180:96ed750bd169 844 __ASM volatile ("dmb 0xF":::"memory");
Anna Bridge 180:96ed750bd169 845 }
Anna Bridge 180:96ed750bd169 846
Anna Bridge 180:96ed750bd169 847
Anna Bridge 180:96ed750bd169 848 /**
Anna Bridge 180:96ed750bd169 849 \brief Reverse byte order (32 bit)
Anna Bridge 180:96ed750bd169 850 \details Reverses the byte order in unsigned integer value.
Anna Bridge 180:96ed750bd169 851 \param [in] value Value to reverse
Anna Bridge 180:96ed750bd169 852 \return Reversed value
Anna Bridge 180:96ed750bd169 853 */
Anna Bridge 180:96ed750bd169 854 __attribute__((always_inline)) __STATIC_INLINE uint32_t __REV(uint32_t value)
Anna Bridge 180:96ed750bd169 855 {
Anna Bridge 180:96ed750bd169 856 #if (__GNUC__ > 4) || (__GNUC__ == 4 && __GNUC_MINOR__ >= 5)
Anna Bridge 180:96ed750bd169 857 return __builtin_bswap32(value);
Anna Bridge 180:96ed750bd169 858 #else
Anna Bridge 180:96ed750bd169 859 uint32_t result;
Anna Bridge 180:96ed750bd169 860
Anna Bridge 180:96ed750bd169 861 __ASM volatile ("rev %0, %1" : __CMSIS_GCC_OUT_REG (result) : __CMSIS_GCC_USE_REG (value) );
Anna Bridge 180:96ed750bd169 862 return(result);
Anna Bridge 180:96ed750bd169 863 #endif
Anna Bridge 180:96ed750bd169 864 }
Anna Bridge 180:96ed750bd169 865
Anna Bridge 180:96ed750bd169 866
Anna Bridge 180:96ed750bd169 867 /**
Anna Bridge 180:96ed750bd169 868 \brief Reverse byte order (16 bit)
Anna Bridge 180:96ed750bd169 869 \details Reverses the byte order in unsigned short value.
Anna Bridge 180:96ed750bd169 870 \param [in] value Value to reverse
Anna Bridge 180:96ed750bd169 871 \return Reversed value
Anna Bridge 180:96ed750bd169 872 */
Anna Bridge 180:96ed750bd169 873 __attribute__((always_inline)) __STATIC_INLINE uint16_t __REV16(uint16_t value)
Anna Bridge 180:96ed750bd169 874 {
Anna Bridge 180:96ed750bd169 875 uint16_t result;
Anna Bridge 180:96ed750bd169 876
Anna Bridge 180:96ed750bd169 877 __ASM volatile ("rev16 %0, %1" : __CMSIS_GCC_OUT_REG (result) : __CMSIS_GCC_USE_REG (value) );
Anna Bridge 180:96ed750bd169 878 return(result);
Anna Bridge 180:96ed750bd169 879 }
Anna Bridge 180:96ed750bd169 880
Anna Bridge 180:96ed750bd169 881
Anna Bridge 180:96ed750bd169 882 /**
Anna Bridge 180:96ed750bd169 883 \brief Reverse byte order in signed short value
Anna Bridge 180:96ed750bd169 884 \details Reverses the byte order in a signed short value with sign extension to integer.
Anna Bridge 180:96ed750bd169 885 \param [in] value Value to reverse
Anna Bridge 180:96ed750bd169 886 \return Reversed value
Anna Bridge 180:96ed750bd169 887 */
Anna Bridge 180:96ed750bd169 888 __attribute__((always_inline)) __STATIC_INLINE int16_t __REVSH(int16_t value)
Anna Bridge 180:96ed750bd169 889 {
Anna Bridge 180:96ed750bd169 890 #if (__GNUC__ > 4) || (__GNUC__ == 4 && __GNUC_MINOR__ >= 8)
Anna Bridge 180:96ed750bd169 891 return (int16_t)__builtin_bswap16(value);
Anna Bridge 180:96ed750bd169 892 #else
Anna Bridge 180:96ed750bd169 893 int16_t result;
Anna Bridge 180:96ed750bd169 894
Anna Bridge 180:96ed750bd169 895 __ASM volatile ("revsh %0, %1" : __CMSIS_GCC_OUT_REG (result) : __CMSIS_GCC_USE_REG (value) );
Anna Bridge 180:96ed750bd169 896 return result;
Anna Bridge 180:96ed750bd169 897 #endif
Anna Bridge 180:96ed750bd169 898 }
Anna Bridge 180:96ed750bd169 899
Anna Bridge 180:96ed750bd169 900
Anna Bridge 180:96ed750bd169 901 /**
Anna Bridge 180:96ed750bd169 902 \brief Rotate Right in unsigned value (32 bit)
Anna Bridge 180:96ed750bd169 903 \details Rotate Right (immediate) provides the value of the contents of a register rotated by a variable number of bits.
Anna Bridge 180:96ed750bd169 904 \param [in] op1 Value to rotate
Anna Bridge 180:96ed750bd169 905 \param [in] op2 Number of Bits to rotate
Anna Bridge 180:96ed750bd169 906 \return Rotated value
Anna Bridge 180:96ed750bd169 907 */
Anna Bridge 180:96ed750bd169 908 __attribute__((always_inline)) __STATIC_INLINE uint32_t __ROR(uint32_t op1, uint32_t op2)
Anna Bridge 180:96ed750bd169 909 {
Anna Bridge 180:96ed750bd169 910 return (op1 >> op2) | (op1 << (32U - op2));
Anna Bridge 180:96ed750bd169 911 }
Anna Bridge 180:96ed750bd169 912
Anna Bridge 180:96ed750bd169 913
Anna Bridge 180:96ed750bd169 914 /**
Anna Bridge 180:96ed750bd169 915 \brief Breakpoint
Anna Bridge 180:96ed750bd169 916 \details Causes the processor to enter Debug state.
Anna Bridge 180:96ed750bd169 917 Debug tools can use this to investigate system state when the instruction at a particular address is reached.
Anna Bridge 180:96ed750bd169 918 \param [in] value is ignored by the processor.
Anna Bridge 180:96ed750bd169 919 If required, a debugger can use it to store additional information about the breakpoint.
Anna Bridge 180:96ed750bd169 920 */
Anna Bridge 180:96ed750bd169 921 #define __BKPT(value) __ASM volatile ("bkpt "#value)
Anna Bridge 180:96ed750bd169 922
Anna Bridge 180:96ed750bd169 923
Anna Bridge 180:96ed750bd169 924 /**
Anna Bridge 180:96ed750bd169 925 \brief Reverse bit order of value
Anna Bridge 180:96ed750bd169 926 \details Reverses the bit order of the given value.
Anna Bridge 180:96ed750bd169 927 \param [in] value Value to reverse
Anna Bridge 180:96ed750bd169 928 \return Reversed value
Anna Bridge 180:96ed750bd169 929 */
Anna Bridge 180:96ed750bd169 930 __attribute__((always_inline)) __STATIC_INLINE uint32_t __RBIT(uint32_t value)
Anna Bridge 180:96ed750bd169 931 {
Anna Bridge 180:96ed750bd169 932 uint32_t result;
Anna Bridge 180:96ed750bd169 933
Anna Bridge 180:96ed750bd169 934 #if ((defined (__ARM_ARCH_7M__ ) && (__ARM_ARCH_7M__ == 1)) || \
Anna Bridge 180:96ed750bd169 935 (defined (__ARM_ARCH_7EM__ ) && (__ARM_ARCH_7EM__ == 1)) || \
Anna Bridge 180:96ed750bd169 936 (defined (__ARM_ARCH_8M_MAIN__ ) && (__ARM_ARCH_8M_MAIN__ == 1)) )
Anna Bridge 180:96ed750bd169 937 __ASM volatile ("rbit %0, %1" : "=r" (result) : "r" (value) );
Anna Bridge 180:96ed750bd169 938 #else
Anna Bridge 180:96ed750bd169 939 uint32_t s = (4U /*sizeof(v)*/ * 8U) - 1U; /* extra shift needed at end */
Anna Bridge 180:96ed750bd169 940
Anna Bridge 180:96ed750bd169 941 result = value; /* r will be reversed bits of v; first get LSB of v */
Anna Bridge 180:96ed750bd169 942 for (value >>= 1U; value != 0U; value >>= 1U)
Anna Bridge 180:96ed750bd169 943 {
Anna Bridge 180:96ed750bd169 944 result <<= 1U;
Anna Bridge 180:96ed750bd169 945 result |= value & 1U;
Anna Bridge 180:96ed750bd169 946 s--;
Anna Bridge 180:96ed750bd169 947 }
Anna Bridge 180:96ed750bd169 948 result <<= s; /* shift when v's highest bits are zero */
Anna Bridge 180:96ed750bd169 949 #endif
Anna Bridge 180:96ed750bd169 950 return result;
Anna Bridge 180:96ed750bd169 951 }
Anna Bridge 180:96ed750bd169 952
Anna Bridge 180:96ed750bd169 953
Anna Bridge 180:96ed750bd169 954 /**
Anna Bridge 180:96ed750bd169 955 \brief Count leading zeros
Anna Bridge 180:96ed750bd169 956 \details Counts the number of leading zeros of a data value.
Anna Bridge 180:96ed750bd169 957 \param [in] value Value to count the leading zeros
Anna Bridge 180:96ed750bd169 958 \return number of leading zeros in value
Anna Bridge 180:96ed750bd169 959 */
Anna Bridge 180:96ed750bd169 960 #define __CLZ __builtin_clz
Anna Bridge 180:96ed750bd169 961
Anna Bridge 180:96ed750bd169 962
Anna Bridge 180:96ed750bd169 963 #if ((defined (__ARM_ARCH_7M__ ) && (__ARM_ARCH_7M__ == 1)) || \
Anna Bridge 180:96ed750bd169 964 (defined (__ARM_ARCH_7EM__ ) && (__ARM_ARCH_7EM__ == 1)) || \
Anna Bridge 180:96ed750bd169 965 (defined (__ARM_ARCH_8M_MAIN__ ) && (__ARM_ARCH_8M_MAIN__ == 1)) || \
Anna Bridge 180:96ed750bd169 966 (defined (__ARM_ARCH_8M_BASE__ ) && (__ARM_ARCH_8M_BASE__ == 1)) )
Anna Bridge 180:96ed750bd169 967 /**
Anna Bridge 180:96ed750bd169 968 \brief LDR Exclusive (8 bit)
Anna Bridge 180:96ed750bd169 969 \details Executes a exclusive LDR instruction for 8 bit value.
Anna Bridge 180:96ed750bd169 970 \param [in] ptr Pointer to data
Anna Bridge 180:96ed750bd169 971 \return value of type uint8_t at (*ptr)
Anna Bridge 180:96ed750bd169 972 */
Anna Bridge 180:96ed750bd169 973 __attribute__((always_inline)) __STATIC_INLINE uint8_t __LDREXB(volatile uint8_t *addr)
Anna Bridge 180:96ed750bd169 974 {
Anna Bridge 180:96ed750bd169 975 uint32_t result;
Anna Bridge 180:96ed750bd169 976
Anna Bridge 180:96ed750bd169 977 #if (__GNUC__ > 4) || (__GNUC__ == 4 && __GNUC_MINOR__ >= 8)
Anna Bridge 180:96ed750bd169 978 __ASM volatile ("ldrexb %0, %1" : "=r" (result) : "Q" (*addr) );
Anna Bridge 180:96ed750bd169 979 #else
Anna Bridge 180:96ed750bd169 980 /* Prior to GCC 4.8, "Q" will be expanded to [rx, #0] which is not
Anna Bridge 180:96ed750bd169 981 accepted by assembler. So has to use following less efficient pattern.
Anna Bridge 180:96ed750bd169 982 */
Anna Bridge 180:96ed750bd169 983 __ASM volatile ("ldrexb %0, [%1]" : "=r" (result) : "r" (addr) : "memory" );
Anna Bridge 180:96ed750bd169 984 #endif
Anna Bridge 180:96ed750bd169 985 return ((uint8_t) result); /* Add explicit type cast here */
Anna Bridge 180:96ed750bd169 986 }
Anna Bridge 180:96ed750bd169 987
Anna Bridge 180:96ed750bd169 988
Anna Bridge 180:96ed750bd169 989 /**
Anna Bridge 180:96ed750bd169 990 \brief LDR Exclusive (16 bit)
Anna Bridge 180:96ed750bd169 991 \details Executes a exclusive LDR instruction for 16 bit values.
Anna Bridge 180:96ed750bd169 992 \param [in] ptr Pointer to data
Anna Bridge 180:96ed750bd169 993 \return value of type uint16_t at (*ptr)
Anna Bridge 180:96ed750bd169 994 */
Anna Bridge 180:96ed750bd169 995 __attribute__((always_inline)) __STATIC_INLINE uint16_t __LDREXH(volatile uint16_t *addr)
Anna Bridge 180:96ed750bd169 996 {
Anna Bridge 180:96ed750bd169 997 uint32_t result;
Anna Bridge 180:96ed750bd169 998
Anna Bridge 180:96ed750bd169 999 #if (__GNUC__ > 4) || (__GNUC__ == 4 && __GNUC_MINOR__ >= 8)
Anna Bridge 180:96ed750bd169 1000 __ASM volatile ("ldrexh %0, %1" : "=r" (result) : "Q" (*addr) );
Anna Bridge 180:96ed750bd169 1001 #else
Anna Bridge 180:96ed750bd169 1002 /* Prior to GCC 4.8, "Q" will be expanded to [rx, #0] which is not
Anna Bridge 180:96ed750bd169 1003 accepted by assembler. So has to use following less efficient pattern.
Anna Bridge 180:96ed750bd169 1004 */
Anna Bridge 180:96ed750bd169 1005 __ASM volatile ("ldrexh %0, [%1]" : "=r" (result) : "r" (addr) : "memory" );
Anna Bridge 180:96ed750bd169 1006 #endif
Anna Bridge 180:96ed750bd169 1007 return ((uint16_t) result); /* Add explicit type cast here */
Anna Bridge 180:96ed750bd169 1008 }
Anna Bridge 180:96ed750bd169 1009
Anna Bridge 180:96ed750bd169 1010
Anna Bridge 180:96ed750bd169 1011 /**
Anna Bridge 180:96ed750bd169 1012 \brief LDR Exclusive (32 bit)
Anna Bridge 180:96ed750bd169 1013 \details Executes a exclusive LDR instruction for 32 bit values.
Anna Bridge 180:96ed750bd169 1014 \param [in] ptr Pointer to data
Anna Bridge 180:96ed750bd169 1015 \return value of type uint32_t at (*ptr)
Anna Bridge 180:96ed750bd169 1016 */
Anna Bridge 180:96ed750bd169 1017 __attribute__((always_inline)) __STATIC_INLINE uint32_t __LDREXW(volatile uint32_t *addr)
Anna Bridge 180:96ed750bd169 1018 {
Anna Bridge 180:96ed750bd169 1019 uint32_t result;
Anna Bridge 180:96ed750bd169 1020
Anna Bridge 180:96ed750bd169 1021 __ASM volatile ("ldrex %0, %1" : "=r" (result) : "Q" (*addr) );
Anna Bridge 180:96ed750bd169 1022 return(result);
Anna Bridge 180:96ed750bd169 1023 }
Anna Bridge 180:96ed750bd169 1024
Anna Bridge 180:96ed750bd169 1025
Anna Bridge 180:96ed750bd169 1026 /**
Anna Bridge 180:96ed750bd169 1027 \brief STR Exclusive (8 bit)
Anna Bridge 180:96ed750bd169 1028 \details Executes a exclusive STR instruction for 8 bit values.
Anna Bridge 180:96ed750bd169 1029 \param [in] value Value to store
Anna Bridge 180:96ed750bd169 1030 \param [in] ptr Pointer to location
Anna Bridge 180:96ed750bd169 1031 \return 0 Function succeeded
Anna Bridge 180:96ed750bd169 1032 \return 1 Function failed
Anna Bridge 180:96ed750bd169 1033 */
Anna Bridge 180:96ed750bd169 1034 __attribute__((always_inline)) __STATIC_INLINE uint32_t __STREXB(uint8_t value, volatile uint8_t *addr)
Anna Bridge 180:96ed750bd169 1035 {
Anna Bridge 180:96ed750bd169 1036 uint32_t result;
Anna Bridge 180:96ed750bd169 1037
Anna Bridge 180:96ed750bd169 1038 __ASM volatile ("strexb %0, %2, %1" : "=&r" (result), "=Q" (*addr) : "r" ((uint32_t)value) );
Anna Bridge 180:96ed750bd169 1039 return(result);
Anna Bridge 180:96ed750bd169 1040 }
Anna Bridge 180:96ed750bd169 1041
Anna Bridge 180:96ed750bd169 1042
Anna Bridge 180:96ed750bd169 1043 /**
Anna Bridge 180:96ed750bd169 1044 \brief STR Exclusive (16 bit)
Anna Bridge 180:96ed750bd169 1045 \details Executes a exclusive STR instruction for 16 bit values.
Anna Bridge 180:96ed750bd169 1046 \param [in] value Value to store
Anna Bridge 180:96ed750bd169 1047 \param [in] ptr Pointer to location
Anna Bridge 180:96ed750bd169 1048 \return 0 Function succeeded
Anna Bridge 180:96ed750bd169 1049 \return 1 Function failed
Anna Bridge 180:96ed750bd169 1050 */
Anna Bridge 180:96ed750bd169 1051 __attribute__((always_inline)) __STATIC_INLINE uint32_t __STREXH(uint16_t value, volatile uint16_t *addr)
Anna Bridge 180:96ed750bd169 1052 {
Anna Bridge 180:96ed750bd169 1053 uint32_t result;
Anna Bridge 180:96ed750bd169 1054
Anna Bridge 180:96ed750bd169 1055 __ASM volatile ("strexh %0, %2, %1" : "=&r" (result), "=Q" (*addr) : "r" ((uint32_t)value) );
Anna Bridge 180:96ed750bd169 1056 return(result);
Anna Bridge 180:96ed750bd169 1057 }
Anna Bridge 180:96ed750bd169 1058
Anna Bridge 180:96ed750bd169 1059
Anna Bridge 180:96ed750bd169 1060 /**
Anna Bridge 180:96ed750bd169 1061 \brief STR Exclusive (32 bit)
Anna Bridge 180:96ed750bd169 1062 \details Executes a exclusive STR instruction for 32 bit values.
Anna Bridge 180:96ed750bd169 1063 \param [in] value Value to store
Anna Bridge 180:96ed750bd169 1064 \param [in] ptr Pointer to location
Anna Bridge 180:96ed750bd169 1065 \return 0 Function succeeded
Anna Bridge 180:96ed750bd169 1066 \return 1 Function failed
Anna Bridge 180:96ed750bd169 1067 */
Anna Bridge 180:96ed750bd169 1068 __attribute__((always_inline)) __STATIC_INLINE uint32_t __STREXW(uint32_t value, volatile uint32_t *addr)
Anna Bridge 180:96ed750bd169 1069 {
Anna Bridge 180:96ed750bd169 1070 uint32_t result;
Anna Bridge 180:96ed750bd169 1071
Anna Bridge 180:96ed750bd169 1072 __ASM volatile ("strex %0, %2, %1" : "=&r" (result), "=Q" (*addr) : "r" (value) );
Anna Bridge 180:96ed750bd169 1073 return(result);
Anna Bridge 180:96ed750bd169 1074 }
Anna Bridge 180:96ed750bd169 1075
Anna Bridge 180:96ed750bd169 1076
Anna Bridge 180:96ed750bd169 1077 /**
Anna Bridge 180:96ed750bd169 1078 \brief Remove the exclusive lock
Anna Bridge 180:96ed750bd169 1079 \details Removes the exclusive lock which is created by LDREX.
Anna Bridge 180:96ed750bd169 1080 */
Anna Bridge 180:96ed750bd169 1081 __attribute__((always_inline)) __STATIC_INLINE void __CLREX(void)
Anna Bridge 180:96ed750bd169 1082 {
Anna Bridge 180:96ed750bd169 1083 __ASM volatile ("clrex" ::: "memory");
Anna Bridge 180:96ed750bd169 1084 }
Anna Bridge 180:96ed750bd169 1085
Anna Bridge 180:96ed750bd169 1086 #endif /* ((defined (__ARM_ARCH_7M__ ) && (__ARM_ARCH_7M__ == 1)) || \
Anna Bridge 180:96ed750bd169 1087 (defined (__ARM_ARCH_7EM__ ) && (__ARM_ARCH_7EM__ == 1)) || \
Anna Bridge 180:96ed750bd169 1088 (defined (__ARM_ARCH_8M_MAIN__ ) && (__ARM_ARCH_8M_MAIN__ == 1)) || \
Anna Bridge 180:96ed750bd169 1089 (defined (__ARM_ARCH_8M_BASE__ ) && (__ARM_ARCH_8M_BASE__ == 1)) ) */
Anna Bridge 180:96ed750bd169 1090
Anna Bridge 180:96ed750bd169 1091
Anna Bridge 180:96ed750bd169 1092 #if ((defined (__ARM_ARCH_7M__ ) && (__ARM_ARCH_7M__ == 1)) || \
Anna Bridge 180:96ed750bd169 1093 (defined (__ARM_ARCH_7EM__ ) && (__ARM_ARCH_7EM__ == 1)) || \
Anna Bridge 180:96ed750bd169 1094 (defined (__ARM_ARCH_8M_MAIN__ ) && (__ARM_ARCH_8M_MAIN__ == 1)) )
Anna Bridge 180:96ed750bd169 1095 /**
Anna Bridge 180:96ed750bd169 1096 \brief Signed Saturate
Anna Bridge 180:96ed750bd169 1097 \details Saturates a signed value.
Anna Bridge 180:96ed750bd169 1098 \param [in] ARG1 Value to be saturated
Anna Bridge 180:96ed750bd169 1099 \param [in] ARG2 Bit position to saturate to (1..32)
Anna Bridge 180:96ed750bd169 1100 \return Saturated value
Anna Bridge 180:96ed750bd169 1101 */
Anna Bridge 180:96ed750bd169 1102 #define __SSAT(ARG1,ARG2) \
Anna Bridge 180:96ed750bd169 1103 __extension__ \
Anna Bridge 180:96ed750bd169 1104 ({ \
Anna Bridge 180:96ed750bd169 1105 int32_t __RES, __ARG1 = (ARG1); \
Anna Bridge 180:96ed750bd169 1106 __ASM ("ssat %0, %1, %2" : "=r" (__RES) : "I" (ARG2), "r" (__ARG1) ); \
Anna Bridge 180:96ed750bd169 1107 __RES; \
Anna Bridge 180:96ed750bd169 1108 })
Anna Bridge 180:96ed750bd169 1109
Anna Bridge 180:96ed750bd169 1110
Anna Bridge 180:96ed750bd169 1111 /**
Anna Bridge 180:96ed750bd169 1112 \brief Unsigned Saturate
Anna Bridge 180:96ed750bd169 1113 \details Saturates an unsigned value.
Anna Bridge 180:96ed750bd169 1114 \param [in] ARG1 Value to be saturated
Anna Bridge 180:96ed750bd169 1115 \param [in] ARG2 Bit position to saturate to (0..31)
Anna Bridge 180:96ed750bd169 1116 \return Saturated value
Anna Bridge 180:96ed750bd169 1117 */
Anna Bridge 180:96ed750bd169 1118 #define __USAT(ARG1,ARG2) \
Anna Bridge 180:96ed750bd169 1119 __extension__ \
Anna Bridge 180:96ed750bd169 1120 ({ \
Anna Bridge 180:96ed750bd169 1121 uint32_t __RES, __ARG1 = (ARG1); \
Anna Bridge 180:96ed750bd169 1122 __ASM ("usat %0, %1, %2" : "=r" (__RES) : "I" (ARG2), "r" (__ARG1) ); \
Anna Bridge 180:96ed750bd169 1123 __RES; \
Anna Bridge 180:96ed750bd169 1124 })
Anna Bridge 180:96ed750bd169 1125
Anna Bridge 180:96ed750bd169 1126
Anna Bridge 180:96ed750bd169 1127 /**
Anna Bridge 180:96ed750bd169 1128 \brief Rotate Right with Extend (32 bit)
Anna Bridge 180:96ed750bd169 1129 \details Moves each bit of a bitstring right by one bit.
Anna Bridge 180:96ed750bd169 1130 The carry input is shifted in at the left end of the bitstring.
Anna Bridge 180:96ed750bd169 1131 \param [in] value Value to rotate
Anna Bridge 180:96ed750bd169 1132 \return Rotated value
Anna Bridge 180:96ed750bd169 1133 */
Anna Bridge 180:96ed750bd169 1134 __attribute__((always_inline)) __STATIC_INLINE uint32_t __RRX(uint32_t value)
Anna Bridge 180:96ed750bd169 1135 {
Anna Bridge 180:96ed750bd169 1136 uint32_t result;
Anna Bridge 180:96ed750bd169 1137
Anna Bridge 180:96ed750bd169 1138 __ASM volatile ("rrx %0, %1" : __CMSIS_GCC_OUT_REG (result) : __CMSIS_GCC_USE_REG (value) );
Anna Bridge 180:96ed750bd169 1139 return(result);
Anna Bridge 180:96ed750bd169 1140 }
Anna Bridge 180:96ed750bd169 1141
Anna Bridge 180:96ed750bd169 1142
Anna Bridge 180:96ed750bd169 1143 /**
Anna Bridge 180:96ed750bd169 1144 \brief LDRT Unprivileged (8 bit)
Anna Bridge 180:96ed750bd169 1145 \details Executes a Unprivileged LDRT instruction for 8 bit value.
Anna Bridge 180:96ed750bd169 1146 \param [in] ptr Pointer to data
Anna Bridge 180:96ed750bd169 1147 \return value of type uint8_t at (*ptr)
Anna Bridge 180:96ed750bd169 1148 */
Anna Bridge 180:96ed750bd169 1149 __attribute__((always_inline)) __STATIC_INLINE uint8_t __LDRBT(volatile uint8_t *ptr)
Anna Bridge 180:96ed750bd169 1150 {
Anna Bridge 180:96ed750bd169 1151 uint32_t result;
Anna Bridge 180:96ed750bd169 1152
Anna Bridge 180:96ed750bd169 1153 #if (__GNUC__ > 4) || (__GNUC__ == 4 && __GNUC_MINOR__ >= 8)
Anna Bridge 180:96ed750bd169 1154 __ASM volatile ("ldrbt %0, %1" : "=r" (result) : "Q" (*ptr) );
Anna Bridge 180:96ed750bd169 1155 #else
Anna Bridge 180:96ed750bd169 1156 /* Prior to GCC 4.8, "Q" will be expanded to [rx, #0] which is not
Anna Bridge 180:96ed750bd169 1157 accepted by assembler. So has to use following less efficient pattern.
Anna Bridge 180:96ed750bd169 1158 */
Anna Bridge 180:96ed750bd169 1159 __ASM volatile ("ldrbt %0, [%1]" : "=r" (result) : "r" (ptr) : "memory" );
Anna Bridge 180:96ed750bd169 1160 #endif
Anna Bridge 180:96ed750bd169 1161 return ((uint8_t) result); /* Add explicit type cast here */
Anna Bridge 180:96ed750bd169 1162 }
Anna Bridge 180:96ed750bd169 1163
Anna Bridge 180:96ed750bd169 1164
Anna Bridge 180:96ed750bd169 1165 /**
Anna Bridge 180:96ed750bd169 1166 \brief LDRT Unprivileged (16 bit)
Anna Bridge 180:96ed750bd169 1167 \details Executes a Unprivileged LDRT instruction for 16 bit values.
Anna Bridge 180:96ed750bd169 1168 \param [in] ptr Pointer to data
Anna Bridge 180:96ed750bd169 1169 \return value of type uint16_t at (*ptr)
Anna Bridge 180:96ed750bd169 1170 */
Anna Bridge 180:96ed750bd169 1171 __attribute__((always_inline)) __STATIC_INLINE uint16_t __LDRHT(volatile uint16_t *ptr)
Anna Bridge 180:96ed750bd169 1172 {
Anna Bridge 180:96ed750bd169 1173 uint32_t result;
Anna Bridge 180:96ed750bd169 1174
Anna Bridge 180:96ed750bd169 1175 #if (__GNUC__ > 4) || (__GNUC__ == 4 && __GNUC_MINOR__ >= 8)
Anna Bridge 180:96ed750bd169 1176 __ASM volatile ("ldrht %0, %1" : "=r" (result) : "Q" (*ptr) );
Anna Bridge 180:96ed750bd169 1177 #else
Anna Bridge 180:96ed750bd169 1178 /* Prior to GCC 4.8, "Q" will be expanded to [rx, #0] which is not
Anna Bridge 180:96ed750bd169 1179 accepted by assembler. So has to use following less efficient pattern.
Anna Bridge 180:96ed750bd169 1180 */
Anna Bridge 180:96ed750bd169 1181 __ASM volatile ("ldrht %0, [%1]" : "=r" (result) : "r" (ptr) : "memory" );
Anna Bridge 180:96ed750bd169 1182 #endif
Anna Bridge 180:96ed750bd169 1183 return ((uint16_t) result); /* Add explicit type cast here */
Anna Bridge 180:96ed750bd169 1184 }
Anna Bridge 180:96ed750bd169 1185
Anna Bridge 180:96ed750bd169 1186
Anna Bridge 180:96ed750bd169 1187 /**
Anna Bridge 180:96ed750bd169 1188 \brief LDRT Unprivileged (32 bit)
Anna Bridge 180:96ed750bd169 1189 \details Executes a Unprivileged LDRT instruction for 32 bit values.
Anna Bridge 180:96ed750bd169 1190 \param [in] ptr Pointer to data
Anna Bridge 180:96ed750bd169 1191 \return value of type uint32_t at (*ptr)
Anna Bridge 180:96ed750bd169 1192 */
Anna Bridge 180:96ed750bd169 1193 __attribute__((always_inline)) __STATIC_INLINE uint32_t __LDRT(volatile uint32_t *ptr)
Anna Bridge 180:96ed750bd169 1194 {
Anna Bridge 180:96ed750bd169 1195 uint32_t result;
Anna Bridge 180:96ed750bd169 1196
Anna Bridge 180:96ed750bd169 1197 __ASM volatile ("ldrt %0, %1" : "=r" (result) : "Q" (*ptr) );
Anna Bridge 180:96ed750bd169 1198 return(result);
Anna Bridge 180:96ed750bd169 1199 }
Anna Bridge 180:96ed750bd169 1200
Anna Bridge 180:96ed750bd169 1201
Anna Bridge 180:96ed750bd169 1202 /**
Anna Bridge 180:96ed750bd169 1203 \brief STRT Unprivileged (8 bit)
Anna Bridge 180:96ed750bd169 1204 \details Executes a Unprivileged STRT instruction for 8 bit values.
Anna Bridge 180:96ed750bd169 1205 \param [in] value Value to store
Anna Bridge 180:96ed750bd169 1206 \param [in] ptr Pointer to location
Anna Bridge 180:96ed750bd169 1207 */
Anna Bridge 180:96ed750bd169 1208 __attribute__((always_inline)) __STATIC_INLINE void __STRBT(uint8_t value, volatile uint8_t *ptr)
Anna Bridge 180:96ed750bd169 1209 {
Anna Bridge 180:96ed750bd169 1210 __ASM volatile ("strbt %1, %0" : "=Q" (*ptr) : "r" ((uint32_t)value) );
Anna Bridge 180:96ed750bd169 1211 }
Anna Bridge 180:96ed750bd169 1212
Anna Bridge 180:96ed750bd169 1213
Anna Bridge 180:96ed750bd169 1214 /**
Anna Bridge 180:96ed750bd169 1215 \brief STRT Unprivileged (16 bit)
Anna Bridge 180:96ed750bd169 1216 \details Executes a Unprivileged STRT instruction for 16 bit values.
Anna Bridge 180:96ed750bd169 1217 \param [in] value Value to store
Anna Bridge 180:96ed750bd169 1218 \param [in] ptr Pointer to location
Anna Bridge 180:96ed750bd169 1219 */
Anna Bridge 180:96ed750bd169 1220 __attribute__((always_inline)) __STATIC_INLINE void __STRHT(uint16_t value, volatile uint16_t *ptr)
Anna Bridge 180:96ed750bd169 1221 {
Anna Bridge 180:96ed750bd169 1222 __ASM volatile ("strht %1, %0" : "=Q" (*ptr) : "r" ((uint32_t)value) );
Anna Bridge 180:96ed750bd169 1223 }
Anna Bridge 180:96ed750bd169 1224
Anna Bridge 180:96ed750bd169 1225
Anna Bridge 180:96ed750bd169 1226 /**
Anna Bridge 180:96ed750bd169 1227 \brief STRT Unprivileged (32 bit)
Anna Bridge 180:96ed750bd169 1228 \details Executes a Unprivileged STRT instruction for 32 bit values.
Anna Bridge 180:96ed750bd169 1229 \param [in] value Value to store
Anna Bridge 180:96ed750bd169 1230 \param [in] ptr Pointer to location
Anna Bridge 180:96ed750bd169 1231 */
Anna Bridge 180:96ed750bd169 1232 __attribute__((always_inline)) __STATIC_INLINE void __STRT(uint32_t value, volatile uint32_t *ptr)
Anna Bridge 180:96ed750bd169 1233 {
Anna Bridge 180:96ed750bd169 1234 __ASM volatile ("strt %1, %0" : "=Q" (*ptr) : "r" (value) );
Anna Bridge 180:96ed750bd169 1235 }
Anna Bridge 180:96ed750bd169 1236
Anna Bridge 180:96ed750bd169 1237 #else /* ((defined (__ARM_ARCH_7M__ ) && (__ARM_ARCH_7M__ == 1)) || \
Anna Bridge 180:96ed750bd169 1238 (defined (__ARM_ARCH_7EM__ ) && (__ARM_ARCH_7EM__ == 1)) || \
Anna Bridge 180:96ed750bd169 1239 (defined (__ARM_ARCH_8M_MAIN__ ) && (__ARM_ARCH_8M_MAIN__ == 1)) ) */
Anna Bridge 180:96ed750bd169 1240
Anna Bridge 180:96ed750bd169 1241 /**
Anna Bridge 180:96ed750bd169 1242 \brief Signed Saturate
Anna Bridge 180:96ed750bd169 1243 \details Saturates a signed value.
Anna Bridge 180:96ed750bd169 1244 \param [in] value Value to be saturated
Anna Bridge 180:96ed750bd169 1245 \param [in] sat Bit position to saturate to (1..32)
Anna Bridge 180:96ed750bd169 1246 \return Saturated value
Anna Bridge 180:96ed750bd169 1247 */
Anna Bridge 180:96ed750bd169 1248 __attribute__((always_inline)) __STATIC_INLINE int32_t __SSAT(int32_t val, uint32_t sat)
Anna Bridge 180:96ed750bd169 1249 {
Anna Bridge 180:96ed750bd169 1250 if ((sat >= 1U) && (sat <= 32U)) {
Anna Bridge 180:96ed750bd169 1251 const int32_t max = (int32_t)((1U << (sat - 1U)) - 1U);
Anna Bridge 180:96ed750bd169 1252 const int32_t min = -1 - max ;
Anna Bridge 180:96ed750bd169 1253 if (val > max) {
Anna Bridge 180:96ed750bd169 1254 return max;
Anna Bridge 180:96ed750bd169 1255 } else if (val < min) {
Anna Bridge 180:96ed750bd169 1256 return min;
Anna Bridge 180:96ed750bd169 1257 }
Anna Bridge 180:96ed750bd169 1258 }
Anna Bridge 180:96ed750bd169 1259 return val;
Anna Bridge 180:96ed750bd169 1260 }
Anna Bridge 180:96ed750bd169 1261
Anna Bridge 180:96ed750bd169 1262 /**
Anna Bridge 180:96ed750bd169 1263 \brief Unsigned Saturate
Anna Bridge 180:96ed750bd169 1264 \details Saturates an unsigned value.
Anna Bridge 180:96ed750bd169 1265 \param [in] value Value to be saturated
Anna Bridge 180:96ed750bd169 1266 \param [in] sat Bit position to saturate to (0..31)
Anna Bridge 180:96ed750bd169 1267 \return Saturated value
Anna Bridge 180:96ed750bd169 1268 */
Anna Bridge 180:96ed750bd169 1269 __attribute__((always_inline)) __STATIC_INLINE uint32_t __USAT(int32_t val, uint32_t sat)
Anna Bridge 180:96ed750bd169 1270 {
Anna Bridge 180:96ed750bd169 1271 if (sat <= 31U) {
Anna Bridge 180:96ed750bd169 1272 const uint32_t max = ((1U << sat) - 1U);
Anna Bridge 180:96ed750bd169 1273 if (val > (int32_t)max) {
Anna Bridge 180:96ed750bd169 1274 return max;
Anna Bridge 180:96ed750bd169 1275 } else if (val < 0) {
Anna Bridge 180:96ed750bd169 1276 return 0U;
Anna Bridge 180:96ed750bd169 1277 }
Anna Bridge 180:96ed750bd169 1278 }
Anna Bridge 180:96ed750bd169 1279 return (uint32_t)val;
Anna Bridge 180:96ed750bd169 1280 }
Anna Bridge 180:96ed750bd169 1281
Anna Bridge 180:96ed750bd169 1282 #endif /* ((defined (__ARM_ARCH_7M__ ) && (__ARM_ARCH_7M__ == 1)) || \
Anna Bridge 180:96ed750bd169 1283 (defined (__ARM_ARCH_7EM__ ) && (__ARM_ARCH_7EM__ == 1)) || \
Anna Bridge 180:96ed750bd169 1284 (defined (__ARM_ARCH_8M_MAIN__ ) && (__ARM_ARCH_8M_MAIN__ == 1)) ) */
Anna Bridge 180:96ed750bd169 1285
Anna Bridge 180:96ed750bd169 1286
Anna Bridge 180:96ed750bd169 1287 #if ((defined (__ARM_ARCH_8M_MAIN__ ) && (__ARM_ARCH_8M_MAIN__ == 1)) || \
Anna Bridge 180:96ed750bd169 1288 (defined (__ARM_ARCH_8M_BASE__ ) && (__ARM_ARCH_8M_BASE__ == 1)) )
Anna Bridge 180:96ed750bd169 1289 /**
Anna Bridge 180:96ed750bd169 1290 \brief Load-Acquire (8 bit)
Anna Bridge 180:96ed750bd169 1291 \details Executes a LDAB instruction for 8 bit value.
Anna Bridge 180:96ed750bd169 1292 \param [in] ptr Pointer to data
Anna Bridge 180:96ed750bd169 1293 \return value of type uint8_t at (*ptr)
Anna Bridge 180:96ed750bd169 1294 */
Anna Bridge 180:96ed750bd169 1295 __attribute__((always_inline)) __STATIC_INLINE uint8_t __LDAB(volatile uint8_t *ptr)
Anna Bridge 180:96ed750bd169 1296 {
Anna Bridge 180:96ed750bd169 1297 uint32_t result;
Anna Bridge 180:96ed750bd169 1298
Anna Bridge 180:96ed750bd169 1299 __ASM volatile ("ldab %0, %1" : "=r" (result) : "Q" (*ptr) );
Anna Bridge 180:96ed750bd169 1300 return ((uint8_t) result);
Anna Bridge 180:96ed750bd169 1301 }
Anna Bridge 180:96ed750bd169 1302
Anna Bridge 180:96ed750bd169 1303
Anna Bridge 180:96ed750bd169 1304 /**
Anna Bridge 180:96ed750bd169 1305 \brief Load-Acquire (16 bit)
Anna Bridge 180:96ed750bd169 1306 \details Executes a LDAH instruction for 16 bit values.
Anna Bridge 180:96ed750bd169 1307 \param [in] ptr Pointer to data
Anna Bridge 180:96ed750bd169 1308 \return value of type uint16_t at (*ptr)
Anna Bridge 180:96ed750bd169 1309 */
Anna Bridge 180:96ed750bd169 1310 __attribute__((always_inline)) __STATIC_INLINE uint16_t __LDAH(volatile uint16_t *ptr)
Anna Bridge 180:96ed750bd169 1311 {
Anna Bridge 180:96ed750bd169 1312 uint32_t result;
Anna Bridge 180:96ed750bd169 1313
Anna Bridge 180:96ed750bd169 1314 __ASM volatile ("ldah %0, %1" : "=r" (result) : "Q" (*ptr) );
Anna Bridge 180:96ed750bd169 1315 return ((uint16_t) result);
Anna Bridge 180:96ed750bd169 1316 }
Anna Bridge 180:96ed750bd169 1317
Anna Bridge 180:96ed750bd169 1318
Anna Bridge 180:96ed750bd169 1319 /**
Anna Bridge 180:96ed750bd169 1320 \brief Load-Acquire (32 bit)
Anna Bridge 180:96ed750bd169 1321 \details Executes a LDA instruction for 32 bit values.
Anna Bridge 180:96ed750bd169 1322 \param [in] ptr Pointer to data
Anna Bridge 180:96ed750bd169 1323 \return value of type uint32_t at (*ptr)
Anna Bridge 180:96ed750bd169 1324 */
Anna Bridge 180:96ed750bd169 1325 __attribute__((always_inline)) __STATIC_INLINE uint32_t __LDA(volatile uint32_t *ptr)
Anna Bridge 180:96ed750bd169 1326 {
Anna Bridge 180:96ed750bd169 1327 uint32_t result;
Anna Bridge 180:96ed750bd169 1328
Anna Bridge 180:96ed750bd169 1329 __ASM volatile ("lda %0, %1" : "=r" (result) : "Q" (*ptr) );
Anna Bridge 180:96ed750bd169 1330 return(result);
Anna Bridge 180:96ed750bd169 1331 }
Anna Bridge 180:96ed750bd169 1332
Anna Bridge 180:96ed750bd169 1333
Anna Bridge 180:96ed750bd169 1334 /**
Anna Bridge 180:96ed750bd169 1335 \brief Store-Release (8 bit)
Anna Bridge 180:96ed750bd169 1336 \details Executes a STLB instruction for 8 bit values.
Anna Bridge 180:96ed750bd169 1337 \param [in] value Value to store
Anna Bridge 180:96ed750bd169 1338 \param [in] ptr Pointer to location
Anna Bridge 180:96ed750bd169 1339 */
Anna Bridge 180:96ed750bd169 1340 __attribute__((always_inline)) __STATIC_INLINE void __STLB(uint8_t value, volatile uint8_t *ptr)
Anna Bridge 180:96ed750bd169 1341 {
Anna Bridge 180:96ed750bd169 1342 __ASM volatile ("stlb %1, %0" : "=Q" (*ptr) : "r" ((uint32_t)value) );
Anna Bridge 180:96ed750bd169 1343 }
Anna Bridge 180:96ed750bd169 1344
Anna Bridge 180:96ed750bd169 1345
Anna Bridge 180:96ed750bd169 1346 /**
Anna Bridge 180:96ed750bd169 1347 \brief Store-Release (16 bit)
Anna Bridge 180:96ed750bd169 1348 \details Executes a STLH instruction for 16 bit values.
Anna Bridge 180:96ed750bd169 1349 \param [in] value Value to store
Anna Bridge 180:96ed750bd169 1350 \param [in] ptr Pointer to location
Anna Bridge 180:96ed750bd169 1351 */
Anna Bridge 180:96ed750bd169 1352 __attribute__((always_inline)) __STATIC_INLINE void __STLH(uint16_t value, volatile uint16_t *ptr)
Anna Bridge 180:96ed750bd169 1353 {
Anna Bridge 180:96ed750bd169 1354 __ASM volatile ("stlh %1, %0" : "=Q" (*ptr) : "r" ((uint32_t)value) );
Anna Bridge 180:96ed750bd169 1355 }
Anna Bridge 180:96ed750bd169 1356
Anna Bridge 180:96ed750bd169 1357
Anna Bridge 180:96ed750bd169 1358 /**
Anna Bridge 180:96ed750bd169 1359 \brief Store-Release (32 bit)
Anna Bridge 180:96ed750bd169 1360 \details Executes a STL instruction for 32 bit values.
Anna Bridge 180:96ed750bd169 1361 \param [in] value Value to store
Anna Bridge 180:96ed750bd169 1362 \param [in] ptr Pointer to location
Anna Bridge 180:96ed750bd169 1363 */
Anna Bridge 180:96ed750bd169 1364 __attribute__((always_inline)) __STATIC_INLINE void __STL(uint32_t value, volatile uint32_t *ptr)
Anna Bridge 180:96ed750bd169 1365 {
Anna Bridge 180:96ed750bd169 1366 __ASM volatile ("stl %1, %0" : "=Q" (*ptr) : "r" ((uint32_t)value) );
Anna Bridge 180:96ed750bd169 1367 }
Anna Bridge 180:96ed750bd169 1368
Anna Bridge 180:96ed750bd169 1369
Anna Bridge 180:96ed750bd169 1370 /**
Anna Bridge 180:96ed750bd169 1371 \brief Load-Acquire Exclusive (8 bit)
Anna Bridge 180:96ed750bd169 1372 \details Executes a LDAB exclusive instruction for 8 bit value.
Anna Bridge 180:96ed750bd169 1373 \param [in] ptr Pointer to data
Anna Bridge 180:96ed750bd169 1374 \return value of type uint8_t at (*ptr)
Anna Bridge 180:96ed750bd169 1375 */
Anna Bridge 180:96ed750bd169 1376 __attribute__((always_inline)) __STATIC_INLINE uint8_t __LDAEXB(volatile uint8_t *ptr)
Anna Bridge 180:96ed750bd169 1377 {
Anna Bridge 180:96ed750bd169 1378 uint32_t result;
Anna Bridge 180:96ed750bd169 1379
Anna Bridge 180:96ed750bd169 1380 __ASM volatile ("ldaexb %0, %1" : "=r" (result) : "Q" (*ptr) );
Anna Bridge 180:96ed750bd169 1381 return ((uint8_t) result);
Anna Bridge 180:96ed750bd169 1382 }
Anna Bridge 180:96ed750bd169 1383
Anna Bridge 180:96ed750bd169 1384
Anna Bridge 180:96ed750bd169 1385 /**
Anna Bridge 180:96ed750bd169 1386 \brief Load-Acquire Exclusive (16 bit)
Anna Bridge 180:96ed750bd169 1387 \details Executes a LDAH exclusive instruction for 16 bit values.
Anna Bridge 180:96ed750bd169 1388 \param [in] ptr Pointer to data
Anna Bridge 180:96ed750bd169 1389 \return value of type uint16_t at (*ptr)
Anna Bridge 180:96ed750bd169 1390 */
Anna Bridge 180:96ed750bd169 1391 __attribute__((always_inline)) __STATIC_INLINE uint16_t __LDAEXH(volatile uint16_t *ptr)
Anna Bridge 180:96ed750bd169 1392 {
Anna Bridge 180:96ed750bd169 1393 uint32_t result;
Anna Bridge 180:96ed750bd169 1394
Anna Bridge 180:96ed750bd169 1395 __ASM volatile ("ldaexh %0, %1" : "=r" (result) : "Q" (*ptr) );
Anna Bridge 180:96ed750bd169 1396 return ((uint16_t) result);
Anna Bridge 180:96ed750bd169 1397 }
Anna Bridge 180:96ed750bd169 1398
Anna Bridge 180:96ed750bd169 1399
Anna Bridge 180:96ed750bd169 1400 /**
Anna Bridge 180:96ed750bd169 1401 \brief Load-Acquire Exclusive (32 bit)
Anna Bridge 180:96ed750bd169 1402 \details Executes a LDA exclusive instruction for 32 bit values.
Anna Bridge 180:96ed750bd169 1403 \param [in] ptr Pointer to data
Anna Bridge 180:96ed750bd169 1404 \return value of type uint32_t at (*ptr)
Anna Bridge 180:96ed750bd169 1405 */
Anna Bridge 180:96ed750bd169 1406 __attribute__((always_inline)) __STATIC_INLINE uint32_t __LDAEX(volatile uint32_t *ptr)
Anna Bridge 180:96ed750bd169 1407 {
Anna Bridge 180:96ed750bd169 1408 uint32_t result;
Anna Bridge 180:96ed750bd169 1409
Anna Bridge 180:96ed750bd169 1410 __ASM volatile ("ldaex %0, %1" : "=r" (result) : "Q" (*ptr) );
Anna Bridge 180:96ed750bd169 1411 return(result);
Anna Bridge 180:96ed750bd169 1412 }
Anna Bridge 180:96ed750bd169 1413
Anna Bridge 180:96ed750bd169 1414
Anna Bridge 180:96ed750bd169 1415 /**
Anna Bridge 180:96ed750bd169 1416 \brief Store-Release Exclusive (8 bit)
Anna Bridge 180:96ed750bd169 1417 \details Executes a STLB exclusive instruction for 8 bit values.
Anna Bridge 180:96ed750bd169 1418 \param [in] value Value to store
Anna Bridge 180:96ed750bd169 1419 \param [in] ptr Pointer to location
Anna Bridge 180:96ed750bd169 1420 \return 0 Function succeeded
Anna Bridge 180:96ed750bd169 1421 \return 1 Function failed
Anna Bridge 180:96ed750bd169 1422 */
Anna Bridge 180:96ed750bd169 1423 __attribute__((always_inline)) __STATIC_INLINE uint32_t __STLEXB(uint8_t value, volatile uint8_t *ptr)
Anna Bridge 180:96ed750bd169 1424 {
Anna Bridge 180:96ed750bd169 1425 uint32_t result;
Anna Bridge 180:96ed750bd169 1426
Anna Bridge 180:96ed750bd169 1427 __ASM volatile ("stlexb %0, %2, %1" : "=&r" (result), "=Q" (*ptr) : "r" ((uint32_t)value) );
Anna Bridge 180:96ed750bd169 1428 return(result);
Anna Bridge 180:96ed750bd169 1429 }
Anna Bridge 180:96ed750bd169 1430
Anna Bridge 180:96ed750bd169 1431
Anna Bridge 180:96ed750bd169 1432 /**
Anna Bridge 180:96ed750bd169 1433 \brief Store-Release Exclusive (16 bit)
Anna Bridge 180:96ed750bd169 1434 \details Executes a STLH exclusive instruction for 16 bit values.
Anna Bridge 180:96ed750bd169 1435 \param [in] value Value to store
Anna Bridge 180:96ed750bd169 1436 \param [in] ptr Pointer to location
Anna Bridge 180:96ed750bd169 1437 \return 0 Function succeeded
Anna Bridge 180:96ed750bd169 1438 \return 1 Function failed
Anna Bridge 180:96ed750bd169 1439 */
Anna Bridge 180:96ed750bd169 1440 __attribute__((always_inline)) __STATIC_INLINE uint32_t __STLEXH(uint16_t value, volatile uint16_t *ptr)
Anna Bridge 180:96ed750bd169 1441 {
Anna Bridge 180:96ed750bd169 1442 uint32_t result;
Anna Bridge 180:96ed750bd169 1443
Anna Bridge 180:96ed750bd169 1444 __ASM volatile ("stlexh %0, %2, %1" : "=&r" (result), "=Q" (*ptr) : "r" ((uint32_t)value) );
Anna Bridge 180:96ed750bd169 1445 return(result);
Anna Bridge 180:96ed750bd169 1446 }
Anna Bridge 180:96ed750bd169 1447
Anna Bridge 180:96ed750bd169 1448
Anna Bridge 180:96ed750bd169 1449 /**
Anna Bridge 180:96ed750bd169 1450 \brief Store-Release Exclusive (32 bit)
Anna Bridge 180:96ed750bd169 1451 \details Executes a STL exclusive instruction for 32 bit values.
Anna Bridge 180:96ed750bd169 1452 \param [in] value Value to store
Anna Bridge 180:96ed750bd169 1453 \param [in] ptr Pointer to location
Anna Bridge 180:96ed750bd169 1454 \return 0 Function succeeded
Anna Bridge 180:96ed750bd169 1455 \return 1 Function failed
Anna Bridge 180:96ed750bd169 1456 */
Anna Bridge 180:96ed750bd169 1457 __attribute__((always_inline)) __STATIC_INLINE uint32_t __STLEX(uint32_t value, volatile uint32_t *ptr)
Anna Bridge 180:96ed750bd169 1458 {
Anna Bridge 180:96ed750bd169 1459 uint32_t result;
Anna Bridge 180:96ed750bd169 1460
Anna Bridge 180:96ed750bd169 1461 __ASM volatile ("stlex %0, %2, %1" : "=&r" (result), "=Q" (*ptr) : "r" ((uint32_t)value) );
Anna Bridge 180:96ed750bd169 1462 return(result);
Anna Bridge 180:96ed750bd169 1463 }
Anna Bridge 180:96ed750bd169 1464
Anna Bridge 180:96ed750bd169 1465 #endif /* ((defined (__ARM_ARCH_8M_MAIN__ ) && (__ARM_ARCH_8M_MAIN__ == 1)) || \
Anna Bridge 180:96ed750bd169 1466 (defined (__ARM_ARCH_8M_BASE__ ) && (__ARM_ARCH_8M_BASE__ == 1)) ) */
Anna Bridge 180:96ed750bd169 1467
Anna Bridge 180:96ed750bd169 1468 /*@}*/ /* end of group CMSIS_Core_InstructionInterface */
Anna Bridge 180:96ed750bd169 1469
Anna Bridge 180:96ed750bd169 1470
Anna Bridge 180:96ed750bd169 1471 /* ################### Compiler specific Intrinsics ########################### */
Anna Bridge 180:96ed750bd169 1472 /** \defgroup CMSIS_SIMD_intrinsics CMSIS SIMD Intrinsics
Anna Bridge 180:96ed750bd169 1473 Access to dedicated SIMD instructions
Anna Bridge 180:96ed750bd169 1474 @{
Anna Bridge 180:96ed750bd169 1475 */
Anna Bridge 180:96ed750bd169 1476
Anna Bridge 180:96ed750bd169 1477 #if (__ARM_FEATURE_DSP == 1) /* ToDo ARMCLANG: This should be ARCH >= ARMv7-M + SIMD */
Anna Bridge 180:96ed750bd169 1478
Anna Bridge 180:96ed750bd169 1479 __attribute__((always_inline)) __STATIC_INLINE uint32_t __SADD8(uint32_t op1, uint32_t op2)
Anna Bridge 180:96ed750bd169 1480 {
Anna Bridge 180:96ed750bd169 1481 uint32_t result;
Anna Bridge 180:96ed750bd169 1482
Anna Bridge 180:96ed750bd169 1483 __ASM volatile ("sadd8 %0, %1, %2" : "=r" (result) : "r" (op1), "r" (op2) );
Anna Bridge 180:96ed750bd169 1484 return(result);
Anna Bridge 180:96ed750bd169 1485 }
Anna Bridge 180:96ed750bd169 1486
Anna Bridge 180:96ed750bd169 1487 __attribute__((always_inline)) __STATIC_INLINE uint32_t __QADD8(uint32_t op1, uint32_t op2)
Anna Bridge 180:96ed750bd169 1488 {
Anna Bridge 180:96ed750bd169 1489 uint32_t result;
Anna Bridge 180:96ed750bd169 1490
Anna Bridge 180:96ed750bd169 1491 __ASM volatile ("qadd8 %0, %1, %2" : "=r" (result) : "r" (op1), "r" (op2) );
Anna Bridge 180:96ed750bd169 1492 return(result);
Anna Bridge 180:96ed750bd169 1493 }
Anna Bridge 180:96ed750bd169 1494
Anna Bridge 180:96ed750bd169 1495 __attribute__((always_inline)) __STATIC_INLINE uint32_t __SHADD8(uint32_t op1, uint32_t op2)
Anna Bridge 180:96ed750bd169 1496 {
Anna Bridge 180:96ed750bd169 1497 uint32_t result;
Anna Bridge 180:96ed750bd169 1498
Anna Bridge 180:96ed750bd169 1499 __ASM volatile ("shadd8 %0, %1, %2" : "=r" (result) : "r" (op1), "r" (op2) );
Anna Bridge 180:96ed750bd169 1500 return(result);
Anna Bridge 180:96ed750bd169 1501 }
Anna Bridge 180:96ed750bd169 1502
Anna Bridge 180:96ed750bd169 1503 __attribute__((always_inline)) __STATIC_INLINE uint32_t __UADD8(uint32_t op1, uint32_t op2)
Anna Bridge 180:96ed750bd169 1504 {
Anna Bridge 180:96ed750bd169 1505 uint32_t result;
Anna Bridge 180:96ed750bd169 1506
Anna Bridge 180:96ed750bd169 1507 __ASM volatile ("uadd8 %0, %1, %2" : "=r" (result) : "r" (op1), "r" (op2) );
Anna Bridge 180:96ed750bd169 1508 return(result);
Anna Bridge 180:96ed750bd169 1509 }
Anna Bridge 180:96ed750bd169 1510
Anna Bridge 180:96ed750bd169 1511 __attribute__((always_inline)) __STATIC_INLINE uint32_t __UQADD8(uint32_t op1, uint32_t op2)
Anna Bridge 180:96ed750bd169 1512 {
Anna Bridge 180:96ed750bd169 1513 uint32_t result;
Anna Bridge 180:96ed750bd169 1514
Anna Bridge 180:96ed750bd169 1515 __ASM volatile ("uqadd8 %0, %1, %2" : "=r" (result) : "r" (op1), "r" (op2) );
Anna Bridge 180:96ed750bd169 1516 return(result);
Anna Bridge 180:96ed750bd169 1517 }
Anna Bridge 180:96ed750bd169 1518
Anna Bridge 180:96ed750bd169 1519 __attribute__((always_inline)) __STATIC_INLINE uint32_t __UHADD8(uint32_t op1, uint32_t op2)
Anna Bridge 180:96ed750bd169 1520 {
Anna Bridge 180:96ed750bd169 1521 uint32_t result;
Anna Bridge 180:96ed750bd169 1522
Anna Bridge 180:96ed750bd169 1523 __ASM volatile ("uhadd8 %0, %1, %2" : "=r" (result) : "r" (op1), "r" (op2) );
Anna Bridge 180:96ed750bd169 1524 return(result);
Anna Bridge 180:96ed750bd169 1525 }
Anna Bridge 180:96ed750bd169 1526
Anna Bridge 180:96ed750bd169 1527
Anna Bridge 180:96ed750bd169 1528 __attribute__((always_inline)) __STATIC_INLINE uint32_t __SSUB8(uint32_t op1, uint32_t op2)
Anna Bridge 180:96ed750bd169 1529 {
Anna Bridge 180:96ed750bd169 1530 uint32_t result;
Anna Bridge 180:96ed750bd169 1531
Anna Bridge 180:96ed750bd169 1532 __ASM volatile ("ssub8 %0, %1, %2" : "=r" (result) : "r" (op1), "r" (op2) );
Anna Bridge 180:96ed750bd169 1533 return(result);
Anna Bridge 180:96ed750bd169 1534 }
Anna Bridge 180:96ed750bd169 1535
Anna Bridge 180:96ed750bd169 1536 __attribute__((always_inline)) __STATIC_INLINE uint32_t __QSUB8(uint32_t op1, uint32_t op2)
Anna Bridge 180:96ed750bd169 1537 {
Anna Bridge 180:96ed750bd169 1538 uint32_t result;
Anna Bridge 180:96ed750bd169 1539
Anna Bridge 180:96ed750bd169 1540 __ASM volatile ("qsub8 %0, %1, %2" : "=r" (result) : "r" (op1), "r" (op2) );
Anna Bridge 180:96ed750bd169 1541 return(result);
Anna Bridge 180:96ed750bd169 1542 }
Anna Bridge 180:96ed750bd169 1543
Anna Bridge 180:96ed750bd169 1544 __attribute__((always_inline)) __STATIC_INLINE uint32_t __SHSUB8(uint32_t op1, uint32_t op2)
Anna Bridge 180:96ed750bd169 1545 {
Anna Bridge 180:96ed750bd169 1546 uint32_t result;
Anna Bridge 180:96ed750bd169 1547
Anna Bridge 180:96ed750bd169 1548 __ASM volatile ("shsub8 %0, %1, %2" : "=r" (result) : "r" (op1), "r" (op2) );
Anna Bridge 180:96ed750bd169 1549 return(result);
Anna Bridge 180:96ed750bd169 1550 }
Anna Bridge 180:96ed750bd169 1551
Anna Bridge 180:96ed750bd169 1552 __attribute__((always_inline)) __STATIC_INLINE uint32_t __USUB8(uint32_t op1, uint32_t op2)
Anna Bridge 180:96ed750bd169 1553 {
Anna Bridge 180:96ed750bd169 1554 uint32_t result;
Anna Bridge 180:96ed750bd169 1555
Anna Bridge 180:96ed750bd169 1556 __ASM volatile ("usub8 %0, %1, %2" : "=r" (result) : "r" (op1), "r" (op2) );
Anna Bridge 180:96ed750bd169 1557 return(result);
Anna Bridge 180:96ed750bd169 1558 }
Anna Bridge 180:96ed750bd169 1559
Anna Bridge 180:96ed750bd169 1560 __attribute__((always_inline)) __STATIC_INLINE uint32_t __UQSUB8(uint32_t op1, uint32_t op2)
Anna Bridge 180:96ed750bd169 1561 {
Anna Bridge 180:96ed750bd169 1562 uint32_t result;
Anna Bridge 180:96ed750bd169 1563
Anna Bridge 180:96ed750bd169 1564 __ASM volatile ("uqsub8 %0, %1, %2" : "=r" (result) : "r" (op1), "r" (op2) );
Anna Bridge 180:96ed750bd169 1565 return(result);
Anna Bridge 180:96ed750bd169 1566 }
Anna Bridge 180:96ed750bd169 1567
Anna Bridge 180:96ed750bd169 1568 __attribute__((always_inline)) __STATIC_INLINE uint32_t __UHSUB8(uint32_t op1, uint32_t op2)
Anna Bridge 180:96ed750bd169 1569 {
Anna Bridge 180:96ed750bd169 1570 uint32_t result;
Anna Bridge 180:96ed750bd169 1571
Anna Bridge 180:96ed750bd169 1572 __ASM volatile ("uhsub8 %0, %1, %2" : "=r" (result) : "r" (op1), "r" (op2) );
Anna Bridge 180:96ed750bd169 1573 return(result);
Anna Bridge 180:96ed750bd169 1574 }
Anna Bridge 180:96ed750bd169 1575
Anna Bridge 180:96ed750bd169 1576
Anna Bridge 180:96ed750bd169 1577 __attribute__((always_inline)) __STATIC_INLINE uint32_t __SADD16(uint32_t op1, uint32_t op2)
Anna Bridge 180:96ed750bd169 1578 {
Anna Bridge 180:96ed750bd169 1579 uint32_t result;
Anna Bridge 180:96ed750bd169 1580
Anna Bridge 180:96ed750bd169 1581 __ASM volatile ("sadd16 %0, %1, %2" : "=r" (result) : "r" (op1), "r" (op2) );
Anna Bridge 180:96ed750bd169 1582 return(result);
Anna Bridge 180:96ed750bd169 1583 }
Anna Bridge 180:96ed750bd169 1584
Anna Bridge 180:96ed750bd169 1585 __attribute__((always_inline)) __STATIC_INLINE uint32_t __QADD16(uint32_t op1, uint32_t op2)
Anna Bridge 180:96ed750bd169 1586 {
Anna Bridge 180:96ed750bd169 1587 uint32_t result;
Anna Bridge 180:96ed750bd169 1588
Anna Bridge 180:96ed750bd169 1589 __ASM volatile ("qadd16 %0, %1, %2" : "=r" (result) : "r" (op1), "r" (op2) );
Anna Bridge 180:96ed750bd169 1590 return(result);
Anna Bridge 180:96ed750bd169 1591 }
Anna Bridge 180:96ed750bd169 1592
Anna Bridge 180:96ed750bd169 1593 __attribute__((always_inline)) __STATIC_INLINE uint32_t __SHADD16(uint32_t op1, uint32_t op2)
Anna Bridge 180:96ed750bd169 1594 {
Anna Bridge 180:96ed750bd169 1595 uint32_t result;
Anna Bridge 180:96ed750bd169 1596
Anna Bridge 180:96ed750bd169 1597 __ASM volatile ("shadd16 %0, %1, %2" : "=r" (result) : "r" (op1), "r" (op2) );
Anna Bridge 180:96ed750bd169 1598 return(result);
Anna Bridge 180:96ed750bd169 1599 }
Anna Bridge 180:96ed750bd169 1600
Anna Bridge 180:96ed750bd169 1601 __attribute__((always_inline)) __STATIC_INLINE uint32_t __UADD16(uint32_t op1, uint32_t op2)
Anna Bridge 180:96ed750bd169 1602 {
Anna Bridge 180:96ed750bd169 1603 uint32_t result;
Anna Bridge 180:96ed750bd169 1604
Anna Bridge 180:96ed750bd169 1605 __ASM volatile ("uadd16 %0, %1, %2" : "=r" (result) : "r" (op1), "r" (op2) );
Anna Bridge 180:96ed750bd169 1606 return(result);
Anna Bridge 180:96ed750bd169 1607 }
Anna Bridge 180:96ed750bd169 1608
Anna Bridge 180:96ed750bd169 1609 __attribute__((always_inline)) __STATIC_INLINE uint32_t __UQADD16(uint32_t op1, uint32_t op2)
Anna Bridge 180:96ed750bd169 1610 {
Anna Bridge 180:96ed750bd169 1611 uint32_t result;
Anna Bridge 180:96ed750bd169 1612
Anna Bridge 180:96ed750bd169 1613 __ASM volatile ("uqadd16 %0, %1, %2" : "=r" (result) : "r" (op1), "r" (op2) );
Anna Bridge 180:96ed750bd169 1614 return(result);
Anna Bridge 180:96ed750bd169 1615 }
Anna Bridge 180:96ed750bd169 1616
Anna Bridge 180:96ed750bd169 1617 __attribute__((always_inline)) __STATIC_INLINE uint32_t __UHADD16(uint32_t op1, uint32_t op2)
Anna Bridge 180:96ed750bd169 1618 {
Anna Bridge 180:96ed750bd169 1619 uint32_t result;
Anna Bridge 180:96ed750bd169 1620
Anna Bridge 180:96ed750bd169 1621 __ASM volatile ("uhadd16 %0, %1, %2" : "=r" (result) : "r" (op1), "r" (op2) );
Anna Bridge 180:96ed750bd169 1622 return(result);
Anna Bridge 180:96ed750bd169 1623 }
Anna Bridge 180:96ed750bd169 1624
Anna Bridge 180:96ed750bd169 1625 __attribute__((always_inline)) __STATIC_INLINE uint32_t __SSUB16(uint32_t op1, uint32_t op2)
Anna Bridge 180:96ed750bd169 1626 {
Anna Bridge 180:96ed750bd169 1627 uint32_t result;
Anna Bridge 180:96ed750bd169 1628
Anna Bridge 180:96ed750bd169 1629 __ASM volatile ("ssub16 %0, %1, %2" : "=r" (result) : "r" (op1), "r" (op2) );
Anna Bridge 180:96ed750bd169 1630 return(result);
Anna Bridge 180:96ed750bd169 1631 }
Anna Bridge 180:96ed750bd169 1632
Anna Bridge 180:96ed750bd169 1633 __attribute__((always_inline)) __STATIC_INLINE uint32_t __QSUB16(uint32_t op1, uint32_t op2)
Anna Bridge 180:96ed750bd169 1634 {
Anna Bridge 180:96ed750bd169 1635 uint32_t result;
Anna Bridge 180:96ed750bd169 1636
Anna Bridge 180:96ed750bd169 1637 __ASM volatile ("qsub16 %0, %1, %2" : "=r" (result) : "r" (op1), "r" (op2) );
Anna Bridge 180:96ed750bd169 1638 return(result);
Anna Bridge 180:96ed750bd169 1639 }
Anna Bridge 180:96ed750bd169 1640
Anna Bridge 180:96ed750bd169 1641 __attribute__((always_inline)) __STATIC_INLINE uint32_t __SHSUB16(uint32_t op1, uint32_t op2)
Anna Bridge 180:96ed750bd169 1642 {
Anna Bridge 180:96ed750bd169 1643 uint32_t result;
Anna Bridge 180:96ed750bd169 1644
Anna Bridge 180:96ed750bd169 1645 __ASM volatile ("shsub16 %0, %1, %2" : "=r" (result) : "r" (op1), "r" (op2) );
Anna Bridge 180:96ed750bd169 1646 return(result);
Anna Bridge 180:96ed750bd169 1647 }
Anna Bridge 180:96ed750bd169 1648
Anna Bridge 180:96ed750bd169 1649 __attribute__((always_inline)) __STATIC_INLINE uint32_t __USUB16(uint32_t op1, uint32_t op2)
Anna Bridge 180:96ed750bd169 1650 {
Anna Bridge 180:96ed750bd169 1651 uint32_t result;
Anna Bridge 180:96ed750bd169 1652
Anna Bridge 180:96ed750bd169 1653 __ASM volatile ("usub16 %0, %1, %2" : "=r" (result) : "r" (op1), "r" (op2) );
Anna Bridge 180:96ed750bd169 1654 return(result);
Anna Bridge 180:96ed750bd169 1655 }
Anna Bridge 180:96ed750bd169 1656
Anna Bridge 180:96ed750bd169 1657 __attribute__((always_inline)) __STATIC_INLINE uint32_t __UQSUB16(uint32_t op1, uint32_t op2)
Anna Bridge 180:96ed750bd169 1658 {
Anna Bridge 180:96ed750bd169 1659 uint32_t result;
Anna Bridge 180:96ed750bd169 1660
Anna Bridge 180:96ed750bd169 1661 __ASM volatile ("uqsub16 %0, %1, %2" : "=r" (result) : "r" (op1), "r" (op2) );
Anna Bridge 180:96ed750bd169 1662 return(result);
Anna Bridge 180:96ed750bd169 1663 }
Anna Bridge 180:96ed750bd169 1664
Anna Bridge 180:96ed750bd169 1665 __attribute__((always_inline)) __STATIC_INLINE uint32_t __UHSUB16(uint32_t op1, uint32_t op2)
Anna Bridge 180:96ed750bd169 1666 {
Anna Bridge 180:96ed750bd169 1667 uint32_t result;
Anna Bridge 180:96ed750bd169 1668
Anna Bridge 180:96ed750bd169 1669 __ASM volatile ("uhsub16 %0, %1, %2" : "=r" (result) : "r" (op1), "r" (op2) );
Anna Bridge 180:96ed750bd169 1670 return(result);
Anna Bridge 180:96ed750bd169 1671 }
Anna Bridge 180:96ed750bd169 1672
Anna Bridge 180:96ed750bd169 1673 __attribute__((always_inline)) __STATIC_INLINE uint32_t __SASX(uint32_t op1, uint32_t op2)
Anna Bridge 180:96ed750bd169 1674 {
Anna Bridge 180:96ed750bd169 1675 uint32_t result;
Anna Bridge 180:96ed750bd169 1676
Anna Bridge 180:96ed750bd169 1677 __ASM volatile ("sasx %0, %1, %2" : "=r" (result) : "r" (op1), "r" (op2) );
Anna Bridge 180:96ed750bd169 1678 return(result);
Anna Bridge 180:96ed750bd169 1679 }
Anna Bridge 180:96ed750bd169 1680
Anna Bridge 180:96ed750bd169 1681 __attribute__((always_inline)) __STATIC_INLINE uint32_t __QASX(uint32_t op1, uint32_t op2)
Anna Bridge 180:96ed750bd169 1682 {
Anna Bridge 180:96ed750bd169 1683 uint32_t result;
Anna Bridge 180:96ed750bd169 1684
Anna Bridge 180:96ed750bd169 1685 __ASM volatile ("qasx %0, %1, %2" : "=r" (result) : "r" (op1), "r" (op2) );
Anna Bridge 180:96ed750bd169 1686 return(result);
Anna Bridge 180:96ed750bd169 1687 }
Anna Bridge 180:96ed750bd169 1688
Anna Bridge 180:96ed750bd169 1689 __attribute__((always_inline)) __STATIC_INLINE uint32_t __SHASX(uint32_t op1, uint32_t op2)
Anna Bridge 180:96ed750bd169 1690 {
Anna Bridge 180:96ed750bd169 1691 uint32_t result;
Anna Bridge 180:96ed750bd169 1692
Anna Bridge 180:96ed750bd169 1693 __ASM volatile ("shasx %0, %1, %2" : "=r" (result) : "r" (op1), "r" (op2) );
Anna Bridge 180:96ed750bd169 1694 return(result);
Anna Bridge 180:96ed750bd169 1695 }
Anna Bridge 180:96ed750bd169 1696
Anna Bridge 180:96ed750bd169 1697 __attribute__((always_inline)) __STATIC_INLINE uint32_t __UASX(uint32_t op1, uint32_t op2)
Anna Bridge 180:96ed750bd169 1698 {
Anna Bridge 180:96ed750bd169 1699 uint32_t result;
Anna Bridge 180:96ed750bd169 1700
Anna Bridge 180:96ed750bd169 1701 __ASM volatile ("uasx %0, %1, %2" : "=r" (result) : "r" (op1), "r" (op2) );
Anna Bridge 180:96ed750bd169 1702 return(result);
Anna Bridge 180:96ed750bd169 1703 }
Anna Bridge 180:96ed750bd169 1704
Anna Bridge 180:96ed750bd169 1705 __attribute__((always_inline)) __STATIC_INLINE uint32_t __UQASX(uint32_t op1, uint32_t op2)
Anna Bridge 180:96ed750bd169 1706 {
Anna Bridge 180:96ed750bd169 1707 uint32_t result;
Anna Bridge 180:96ed750bd169 1708
Anna Bridge 180:96ed750bd169 1709 __ASM volatile ("uqasx %0, %1, %2" : "=r" (result) : "r" (op1), "r" (op2) );
Anna Bridge 180:96ed750bd169 1710 return(result);
Anna Bridge 180:96ed750bd169 1711 }
Anna Bridge 180:96ed750bd169 1712
Anna Bridge 180:96ed750bd169 1713 __attribute__((always_inline)) __STATIC_INLINE uint32_t __UHASX(uint32_t op1, uint32_t op2)
Anna Bridge 180:96ed750bd169 1714 {
Anna Bridge 180:96ed750bd169 1715 uint32_t result;
Anna Bridge 180:96ed750bd169 1716
Anna Bridge 180:96ed750bd169 1717 __ASM volatile ("uhasx %0, %1, %2" : "=r" (result) : "r" (op1), "r" (op2) );
Anna Bridge 180:96ed750bd169 1718 return(result);
Anna Bridge 180:96ed750bd169 1719 }
Anna Bridge 180:96ed750bd169 1720
Anna Bridge 180:96ed750bd169 1721 __attribute__((always_inline)) __STATIC_INLINE uint32_t __SSAX(uint32_t op1, uint32_t op2)
Anna Bridge 180:96ed750bd169 1722 {
Anna Bridge 180:96ed750bd169 1723 uint32_t result;
Anna Bridge 180:96ed750bd169 1724
Anna Bridge 180:96ed750bd169 1725 __ASM volatile ("ssax %0, %1, %2" : "=r" (result) : "r" (op1), "r" (op2) );
Anna Bridge 180:96ed750bd169 1726 return(result);
Anna Bridge 180:96ed750bd169 1727 }
Anna Bridge 180:96ed750bd169 1728
Anna Bridge 180:96ed750bd169 1729 __attribute__((always_inline)) __STATIC_INLINE uint32_t __QSAX(uint32_t op1, uint32_t op2)
Anna Bridge 180:96ed750bd169 1730 {
Anna Bridge 180:96ed750bd169 1731 uint32_t result;
Anna Bridge 180:96ed750bd169 1732
Anna Bridge 180:96ed750bd169 1733 __ASM volatile ("qsax %0, %1, %2" : "=r" (result) : "r" (op1), "r" (op2) );
Anna Bridge 180:96ed750bd169 1734 return(result);
Anna Bridge 180:96ed750bd169 1735 }
Anna Bridge 180:96ed750bd169 1736
Anna Bridge 180:96ed750bd169 1737 __attribute__((always_inline)) __STATIC_INLINE uint32_t __SHSAX(uint32_t op1, uint32_t op2)
Anna Bridge 180:96ed750bd169 1738 {
Anna Bridge 180:96ed750bd169 1739 uint32_t result;
Anna Bridge 180:96ed750bd169 1740
Anna Bridge 180:96ed750bd169 1741 __ASM volatile ("shsax %0, %1, %2" : "=r" (result) : "r" (op1), "r" (op2) );
Anna Bridge 180:96ed750bd169 1742 return(result);
Anna Bridge 180:96ed750bd169 1743 }
Anna Bridge 180:96ed750bd169 1744
Anna Bridge 180:96ed750bd169 1745 __attribute__((always_inline)) __STATIC_INLINE uint32_t __USAX(uint32_t op1, uint32_t op2)
Anna Bridge 180:96ed750bd169 1746 {
Anna Bridge 180:96ed750bd169 1747 uint32_t result;
Anna Bridge 180:96ed750bd169 1748
Anna Bridge 180:96ed750bd169 1749 __ASM volatile ("usax %0, %1, %2" : "=r" (result) : "r" (op1), "r" (op2) );
Anna Bridge 180:96ed750bd169 1750 return(result);
Anna Bridge 180:96ed750bd169 1751 }
Anna Bridge 180:96ed750bd169 1752
Anna Bridge 180:96ed750bd169 1753 __attribute__((always_inline)) __STATIC_INLINE uint32_t __UQSAX(uint32_t op1, uint32_t op2)
Anna Bridge 180:96ed750bd169 1754 {
Anna Bridge 180:96ed750bd169 1755 uint32_t result;
Anna Bridge 180:96ed750bd169 1756
Anna Bridge 180:96ed750bd169 1757 __ASM volatile ("uqsax %0, %1, %2" : "=r" (result) : "r" (op1), "r" (op2) );
Anna Bridge 180:96ed750bd169 1758 return(result);
Anna Bridge 180:96ed750bd169 1759 }
Anna Bridge 180:96ed750bd169 1760
Anna Bridge 180:96ed750bd169 1761 __attribute__((always_inline)) __STATIC_INLINE uint32_t __UHSAX(uint32_t op1, uint32_t op2)
Anna Bridge 180:96ed750bd169 1762 {
Anna Bridge 180:96ed750bd169 1763 uint32_t result;
Anna Bridge 180:96ed750bd169 1764
Anna Bridge 180:96ed750bd169 1765 __ASM volatile ("uhsax %0, %1, %2" : "=r" (result) : "r" (op1), "r" (op2) );
Anna Bridge 180:96ed750bd169 1766 return(result);
Anna Bridge 180:96ed750bd169 1767 }
Anna Bridge 180:96ed750bd169 1768
Anna Bridge 180:96ed750bd169 1769 __attribute__((always_inline)) __STATIC_INLINE uint32_t __USAD8(uint32_t op1, uint32_t op2)
Anna Bridge 180:96ed750bd169 1770 {
Anna Bridge 180:96ed750bd169 1771 uint32_t result;
Anna Bridge 180:96ed750bd169 1772
Anna Bridge 180:96ed750bd169 1773 __ASM volatile ("usad8 %0, %1, %2" : "=r" (result) : "r" (op1), "r" (op2) );
Anna Bridge 180:96ed750bd169 1774 return(result);
Anna Bridge 180:96ed750bd169 1775 }
Anna Bridge 180:96ed750bd169 1776
Anna Bridge 180:96ed750bd169 1777 __attribute__((always_inline)) __STATIC_INLINE uint32_t __USADA8(uint32_t op1, uint32_t op2, uint32_t op3)
Anna Bridge 180:96ed750bd169 1778 {
Anna Bridge 180:96ed750bd169 1779 uint32_t result;
Anna Bridge 180:96ed750bd169 1780
Anna Bridge 180:96ed750bd169 1781 __ASM volatile ("usada8 %0, %1, %2, %3" : "=r" (result) : "r" (op1), "r" (op2), "r" (op3) );
Anna Bridge 180:96ed750bd169 1782 return(result);
Anna Bridge 180:96ed750bd169 1783 }
Anna Bridge 180:96ed750bd169 1784
Anna Bridge 180:96ed750bd169 1785 #define __SSAT16(ARG1,ARG2) \
Anna Bridge 180:96ed750bd169 1786 ({ \
Anna Bridge 180:96ed750bd169 1787 int32_t __RES, __ARG1 = (ARG1); \
Anna Bridge 180:96ed750bd169 1788 __ASM ("ssat16 %0, %1, %2" : "=r" (__RES) : "I" (ARG2), "r" (__ARG1) ); \
Anna Bridge 180:96ed750bd169 1789 __RES; \
Anna Bridge 180:96ed750bd169 1790 })
Anna Bridge 180:96ed750bd169 1791
Anna Bridge 180:96ed750bd169 1792 #define __USAT16(ARG1,ARG2) \
Anna Bridge 180:96ed750bd169 1793 ({ \
Anna Bridge 180:96ed750bd169 1794 uint32_t __RES, __ARG1 = (ARG1); \
Anna Bridge 180:96ed750bd169 1795 __ASM ("usat16 %0, %1, %2" : "=r" (__RES) : "I" (ARG2), "r" (__ARG1) ); \
Anna Bridge 180:96ed750bd169 1796 __RES; \
Anna Bridge 180:96ed750bd169 1797 })
Anna Bridge 180:96ed750bd169 1798
Anna Bridge 180:96ed750bd169 1799 __attribute__((always_inline)) __STATIC_INLINE uint32_t __UXTB16(uint32_t op1)
Anna Bridge 180:96ed750bd169 1800 {
Anna Bridge 180:96ed750bd169 1801 uint32_t result;
Anna Bridge 180:96ed750bd169 1802
Anna Bridge 180:96ed750bd169 1803 __ASM volatile ("uxtb16 %0, %1" : "=r" (result) : "r" (op1));
Anna Bridge 180:96ed750bd169 1804 return(result);
Anna Bridge 180:96ed750bd169 1805 }
Anna Bridge 180:96ed750bd169 1806
Anna Bridge 180:96ed750bd169 1807 __attribute__((always_inline)) __STATIC_INLINE uint32_t __UXTAB16(uint32_t op1, uint32_t op2)
Anna Bridge 180:96ed750bd169 1808 {
Anna Bridge 180:96ed750bd169 1809 uint32_t result;
Anna Bridge 180:96ed750bd169 1810
Anna Bridge 180:96ed750bd169 1811 __ASM volatile ("uxtab16 %0, %1, %2" : "=r" (result) : "r" (op1), "r" (op2) );
Anna Bridge 180:96ed750bd169 1812 return(result);
Anna Bridge 180:96ed750bd169 1813 }
Anna Bridge 180:96ed750bd169 1814
Anna Bridge 180:96ed750bd169 1815 __attribute__((always_inline)) __STATIC_INLINE uint32_t __SXTB16(uint32_t op1)
Anna Bridge 180:96ed750bd169 1816 {
Anna Bridge 180:96ed750bd169 1817 uint32_t result;
Anna Bridge 180:96ed750bd169 1818
Anna Bridge 180:96ed750bd169 1819 __ASM volatile ("sxtb16 %0, %1" : "=r" (result) : "r" (op1));
Anna Bridge 180:96ed750bd169 1820 return(result);
Anna Bridge 180:96ed750bd169 1821 }
Anna Bridge 180:96ed750bd169 1822
Anna Bridge 180:96ed750bd169 1823 __attribute__((always_inline)) __STATIC_INLINE uint32_t __SXTAB16(uint32_t op1, uint32_t op2)
Anna Bridge 180:96ed750bd169 1824 {
Anna Bridge 180:96ed750bd169 1825 uint32_t result;
Anna Bridge 180:96ed750bd169 1826
Anna Bridge 180:96ed750bd169 1827 __ASM volatile ("sxtab16 %0, %1, %2" : "=r" (result) : "r" (op1), "r" (op2) );
Anna Bridge 180:96ed750bd169 1828 return(result);
Anna Bridge 180:96ed750bd169 1829 }
Anna Bridge 180:96ed750bd169 1830
Anna Bridge 180:96ed750bd169 1831 __attribute__((always_inline)) __STATIC_INLINE uint32_t __SMUAD (uint32_t op1, uint32_t op2)
Anna Bridge 180:96ed750bd169 1832 {
Anna Bridge 180:96ed750bd169 1833 uint32_t result;
Anna Bridge 180:96ed750bd169 1834
Anna Bridge 180:96ed750bd169 1835 __ASM volatile ("smuad %0, %1, %2" : "=r" (result) : "r" (op1), "r" (op2) );
Anna Bridge 180:96ed750bd169 1836 return(result);
Anna Bridge 180:96ed750bd169 1837 }
Anna Bridge 180:96ed750bd169 1838
Anna Bridge 180:96ed750bd169 1839 __attribute__((always_inline)) __STATIC_INLINE uint32_t __SMUADX (uint32_t op1, uint32_t op2)
Anna Bridge 180:96ed750bd169 1840 {
Anna Bridge 180:96ed750bd169 1841 uint32_t result;
Anna Bridge 180:96ed750bd169 1842
Anna Bridge 180:96ed750bd169 1843 __ASM volatile ("smuadx %0, %1, %2" : "=r" (result) : "r" (op1), "r" (op2) );
Anna Bridge 180:96ed750bd169 1844 return(result);
Anna Bridge 180:96ed750bd169 1845 }
Anna Bridge 180:96ed750bd169 1846
Anna Bridge 180:96ed750bd169 1847 __attribute__((always_inline)) __STATIC_INLINE uint32_t __SMLAD (uint32_t op1, uint32_t op2, uint32_t op3)
Anna Bridge 180:96ed750bd169 1848 {
Anna Bridge 180:96ed750bd169 1849 uint32_t result;
Anna Bridge 180:96ed750bd169 1850
Anna Bridge 180:96ed750bd169 1851 __ASM volatile ("smlad %0, %1, %2, %3" : "=r" (result) : "r" (op1), "r" (op2), "r" (op3) );
Anna Bridge 180:96ed750bd169 1852 return(result);
Anna Bridge 180:96ed750bd169 1853 }
Anna Bridge 180:96ed750bd169 1854
Anna Bridge 180:96ed750bd169 1855 __attribute__((always_inline)) __STATIC_INLINE uint32_t __SMLADX (uint32_t op1, uint32_t op2, uint32_t op3)
Anna Bridge 180:96ed750bd169 1856 {
Anna Bridge 180:96ed750bd169 1857 uint32_t result;
Anna Bridge 180:96ed750bd169 1858
Anna Bridge 180:96ed750bd169 1859 __ASM volatile ("smladx %0, %1, %2, %3" : "=r" (result) : "r" (op1), "r" (op2), "r" (op3) );
Anna Bridge 180:96ed750bd169 1860 return(result);
Anna Bridge 180:96ed750bd169 1861 }
Anna Bridge 180:96ed750bd169 1862
Anna Bridge 180:96ed750bd169 1863 __attribute__((always_inline)) __STATIC_INLINE uint64_t __SMLALD (uint32_t op1, uint32_t op2, uint64_t acc)
Anna Bridge 180:96ed750bd169 1864 {
Anna Bridge 180:96ed750bd169 1865 union llreg_u{
Anna Bridge 180:96ed750bd169 1866 uint32_t w32[2];
Anna Bridge 180:96ed750bd169 1867 uint64_t w64;
Anna Bridge 180:96ed750bd169 1868 } llr;
Anna Bridge 180:96ed750bd169 1869 llr.w64 = acc;
Anna Bridge 180:96ed750bd169 1870
Anna Bridge 180:96ed750bd169 1871 #ifndef __ARMEB__ /* Little endian */
Anna Bridge 180:96ed750bd169 1872 __ASM volatile ("smlald %0, %1, %2, %3" : "=r" (llr.w32[0]), "=r" (llr.w32[1]): "r" (op1), "r" (op2) , "0" (llr.w32[0]), "1" (llr.w32[1]) );
Anna Bridge 180:96ed750bd169 1873 #else /* Big endian */
Anna Bridge 180:96ed750bd169 1874 __ASM volatile ("smlald %0, %1, %2, %3" : "=r" (llr.w32[1]), "=r" (llr.w32[0]): "r" (op1), "r" (op2) , "0" (llr.w32[1]), "1" (llr.w32[0]) );
Anna Bridge 180:96ed750bd169 1875 #endif
Anna Bridge 180:96ed750bd169 1876
Anna Bridge 180:96ed750bd169 1877 return(llr.w64);
Anna Bridge 180:96ed750bd169 1878 }
Anna Bridge 180:96ed750bd169 1879
Anna Bridge 180:96ed750bd169 1880 __attribute__((always_inline)) __STATIC_INLINE uint64_t __SMLALDX (uint32_t op1, uint32_t op2, uint64_t acc)
Anna Bridge 180:96ed750bd169 1881 {
Anna Bridge 180:96ed750bd169 1882 union llreg_u{
Anna Bridge 180:96ed750bd169 1883 uint32_t w32[2];
Anna Bridge 180:96ed750bd169 1884 uint64_t w64;
Anna Bridge 180:96ed750bd169 1885 } llr;
Anna Bridge 180:96ed750bd169 1886 llr.w64 = acc;
Anna Bridge 180:96ed750bd169 1887
Anna Bridge 180:96ed750bd169 1888 #ifndef __ARMEB__ /* Little endian */
Anna Bridge 180:96ed750bd169 1889 __ASM volatile ("smlaldx %0, %1, %2, %3" : "=r" (llr.w32[0]), "=r" (llr.w32[1]): "r" (op1), "r" (op2) , "0" (llr.w32[0]), "1" (llr.w32[1]) );
Anna Bridge 180:96ed750bd169 1890 #else /* Big endian */
Anna Bridge 180:96ed750bd169 1891 __ASM volatile ("smlaldx %0, %1, %2, %3" : "=r" (llr.w32[1]), "=r" (llr.w32[0]): "r" (op1), "r" (op2) , "0" (llr.w32[1]), "1" (llr.w32[0]) );
Anna Bridge 180:96ed750bd169 1892 #endif
Anna Bridge 180:96ed750bd169 1893
Anna Bridge 180:96ed750bd169 1894 return(llr.w64);
Anna Bridge 180:96ed750bd169 1895 }
Anna Bridge 180:96ed750bd169 1896
Anna Bridge 180:96ed750bd169 1897 __attribute__((always_inline)) __STATIC_INLINE uint32_t __SMUSD (uint32_t op1, uint32_t op2)
Anna Bridge 180:96ed750bd169 1898 {
Anna Bridge 180:96ed750bd169 1899 uint32_t result;
Anna Bridge 180:96ed750bd169 1900
Anna Bridge 180:96ed750bd169 1901 __ASM volatile ("smusd %0, %1, %2" : "=r" (result) : "r" (op1), "r" (op2) );
Anna Bridge 180:96ed750bd169 1902 return(result);
Anna Bridge 180:96ed750bd169 1903 }
Anna Bridge 180:96ed750bd169 1904
Anna Bridge 180:96ed750bd169 1905 __attribute__((always_inline)) __STATIC_INLINE uint32_t __SMUSDX (uint32_t op1, uint32_t op2)
Anna Bridge 180:96ed750bd169 1906 {
Anna Bridge 180:96ed750bd169 1907 uint32_t result;
Anna Bridge 180:96ed750bd169 1908
Anna Bridge 180:96ed750bd169 1909 __ASM volatile ("smusdx %0, %1, %2" : "=r" (result) : "r" (op1), "r" (op2) );
Anna Bridge 180:96ed750bd169 1910 return(result);
Anna Bridge 180:96ed750bd169 1911 }
Anna Bridge 180:96ed750bd169 1912
Anna Bridge 180:96ed750bd169 1913 __attribute__((always_inline)) __STATIC_INLINE uint32_t __SMLSD (uint32_t op1, uint32_t op2, uint32_t op3)
Anna Bridge 180:96ed750bd169 1914 {
Anna Bridge 180:96ed750bd169 1915 uint32_t result;
Anna Bridge 180:96ed750bd169 1916
Anna Bridge 180:96ed750bd169 1917 __ASM volatile ("smlsd %0, %1, %2, %3" : "=r" (result) : "r" (op1), "r" (op2), "r" (op3) );
Anna Bridge 180:96ed750bd169 1918 return(result);
Anna Bridge 180:96ed750bd169 1919 }
Anna Bridge 180:96ed750bd169 1920
Anna Bridge 180:96ed750bd169 1921 __attribute__((always_inline)) __STATIC_INLINE uint32_t __SMLSDX (uint32_t op1, uint32_t op2, uint32_t op3)
Anna Bridge 180:96ed750bd169 1922 {
Anna Bridge 180:96ed750bd169 1923 uint32_t result;
Anna Bridge 180:96ed750bd169 1924
Anna Bridge 180:96ed750bd169 1925 __ASM volatile ("smlsdx %0, %1, %2, %3" : "=r" (result) : "r" (op1), "r" (op2), "r" (op3) );
Anna Bridge 180:96ed750bd169 1926 return(result);
Anna Bridge 180:96ed750bd169 1927 }
Anna Bridge 180:96ed750bd169 1928
Anna Bridge 180:96ed750bd169 1929 __attribute__((always_inline)) __STATIC_INLINE uint64_t __SMLSLD (uint32_t op1, uint32_t op2, uint64_t acc)
Anna Bridge 180:96ed750bd169 1930 {
Anna Bridge 180:96ed750bd169 1931 union llreg_u{
Anna Bridge 180:96ed750bd169 1932 uint32_t w32[2];
Anna Bridge 180:96ed750bd169 1933 uint64_t w64;
Anna Bridge 180:96ed750bd169 1934 } llr;
Anna Bridge 180:96ed750bd169 1935 llr.w64 = acc;
Anna Bridge 180:96ed750bd169 1936
Anna Bridge 180:96ed750bd169 1937 #ifndef __ARMEB__ /* Little endian */
Anna Bridge 180:96ed750bd169 1938 __ASM volatile ("smlsld %0, %1, %2, %3" : "=r" (llr.w32[0]), "=r" (llr.w32[1]): "r" (op1), "r" (op2) , "0" (llr.w32[0]), "1" (llr.w32[1]) );
Anna Bridge 180:96ed750bd169 1939 #else /* Big endian */
Anna Bridge 180:96ed750bd169 1940 __ASM volatile ("smlsld %0, %1, %2, %3" : "=r" (llr.w32[1]), "=r" (llr.w32[0]): "r" (op1), "r" (op2) , "0" (llr.w32[1]), "1" (llr.w32[0]) );
Anna Bridge 180:96ed750bd169 1941 #endif
Anna Bridge 180:96ed750bd169 1942
Anna Bridge 180:96ed750bd169 1943 return(llr.w64);
Anna Bridge 180:96ed750bd169 1944 }
Anna Bridge 180:96ed750bd169 1945
Anna Bridge 180:96ed750bd169 1946 __attribute__((always_inline)) __STATIC_INLINE uint64_t __SMLSLDX (uint32_t op1, uint32_t op2, uint64_t acc)
Anna Bridge 180:96ed750bd169 1947 {
Anna Bridge 180:96ed750bd169 1948 union llreg_u{
Anna Bridge 180:96ed750bd169 1949 uint32_t w32[2];
Anna Bridge 180:96ed750bd169 1950 uint64_t w64;
Anna Bridge 180:96ed750bd169 1951 } llr;
Anna Bridge 180:96ed750bd169 1952 llr.w64 = acc;
Anna Bridge 180:96ed750bd169 1953
Anna Bridge 180:96ed750bd169 1954 #ifndef __ARMEB__ /* Little endian */
Anna Bridge 180:96ed750bd169 1955 __ASM volatile ("smlsldx %0, %1, %2, %3" : "=r" (llr.w32[0]), "=r" (llr.w32[1]): "r" (op1), "r" (op2) , "0" (llr.w32[0]), "1" (llr.w32[1]) );
Anna Bridge 180:96ed750bd169 1956 #else /* Big endian */
Anna Bridge 180:96ed750bd169 1957 __ASM volatile ("smlsldx %0, %1, %2, %3" : "=r" (llr.w32[1]), "=r" (llr.w32[0]): "r" (op1), "r" (op2) , "0" (llr.w32[1]), "1" (llr.w32[0]) );
Anna Bridge 180:96ed750bd169 1958 #endif
Anna Bridge 180:96ed750bd169 1959
Anna Bridge 180:96ed750bd169 1960 return(llr.w64);
Anna Bridge 180:96ed750bd169 1961 }
Anna Bridge 180:96ed750bd169 1962
Anna Bridge 180:96ed750bd169 1963 __attribute__((always_inline)) __STATIC_INLINE uint32_t __SEL (uint32_t op1, uint32_t op2)
Anna Bridge 180:96ed750bd169 1964 {
Anna Bridge 180:96ed750bd169 1965 uint32_t result;
Anna Bridge 180:96ed750bd169 1966
Anna Bridge 180:96ed750bd169 1967 __ASM volatile ("sel %0, %1, %2" : "=r" (result) : "r" (op1), "r" (op2) );
Anna Bridge 180:96ed750bd169 1968 return(result);
Anna Bridge 180:96ed750bd169 1969 }
Anna Bridge 180:96ed750bd169 1970
Anna Bridge 180:96ed750bd169 1971 __attribute__((always_inline)) __STATIC_INLINE int32_t __QADD( int32_t op1, int32_t op2)
Anna Bridge 180:96ed750bd169 1972 {
Anna Bridge 180:96ed750bd169 1973 int32_t result;
Anna Bridge 180:96ed750bd169 1974
Anna Bridge 180:96ed750bd169 1975 __ASM volatile ("qadd %0, %1, %2" : "=r" (result) : "r" (op1), "r" (op2) );
Anna Bridge 180:96ed750bd169 1976 return(result);
Anna Bridge 180:96ed750bd169 1977 }
Anna Bridge 180:96ed750bd169 1978
Anna Bridge 180:96ed750bd169 1979 __attribute__((always_inline)) __STATIC_INLINE int32_t __QSUB( int32_t op1, int32_t op2)
Anna Bridge 180:96ed750bd169 1980 {
Anna Bridge 180:96ed750bd169 1981 int32_t result;
Anna Bridge 180:96ed750bd169 1982
Anna Bridge 180:96ed750bd169 1983 __ASM volatile ("qsub %0, %1, %2" : "=r" (result) : "r" (op1), "r" (op2) );
Anna Bridge 180:96ed750bd169 1984 return(result);
Anna Bridge 180:96ed750bd169 1985 }
Anna Bridge 180:96ed750bd169 1986
Anna Bridge 180:96ed750bd169 1987 #if 0
Anna Bridge 180:96ed750bd169 1988 #define __PKHBT(ARG1,ARG2,ARG3) \
Anna Bridge 180:96ed750bd169 1989 ({ \
Anna Bridge 180:96ed750bd169 1990 uint32_t __RES, __ARG1 = (ARG1), __ARG2 = (ARG2); \
Anna Bridge 180:96ed750bd169 1991 __ASM ("pkhbt %0, %1, %2, lsl %3" : "=r" (__RES) : "r" (__ARG1), "r" (__ARG2), "I" (ARG3) ); \
Anna Bridge 180:96ed750bd169 1992 __RES; \
Anna Bridge 180:96ed750bd169 1993 })
Anna Bridge 180:96ed750bd169 1994
Anna Bridge 180:96ed750bd169 1995 #define __PKHTB(ARG1,ARG2,ARG3) \
Anna Bridge 180:96ed750bd169 1996 ({ \
Anna Bridge 180:96ed750bd169 1997 uint32_t __RES, __ARG1 = (ARG1), __ARG2 = (ARG2); \
Anna Bridge 180:96ed750bd169 1998 if (ARG3 == 0) \
Anna Bridge 180:96ed750bd169 1999 __ASM ("pkhtb %0, %1, %2" : "=r" (__RES) : "r" (__ARG1), "r" (__ARG2) ); \
Anna Bridge 180:96ed750bd169 2000 else \
Anna Bridge 180:96ed750bd169 2001 __ASM ("pkhtb %0, %1, %2, asr %3" : "=r" (__RES) : "r" (__ARG1), "r" (__ARG2), "I" (ARG3) ); \
Anna Bridge 180:96ed750bd169 2002 __RES; \
Anna Bridge 180:96ed750bd169 2003 })
Anna Bridge 180:96ed750bd169 2004 #endif
Anna Bridge 180:96ed750bd169 2005
Anna Bridge 180:96ed750bd169 2006 #define __PKHBT(ARG1,ARG2,ARG3) ( ((((uint32_t)(ARG1)) ) & 0x0000FFFFUL) | \
Anna Bridge 180:96ed750bd169 2007 ((((uint32_t)(ARG2)) << (ARG3)) & 0xFFFF0000UL) )
Anna Bridge 180:96ed750bd169 2008
Anna Bridge 180:96ed750bd169 2009 #define __PKHTB(ARG1,ARG2,ARG3) ( ((((uint32_t)(ARG1)) ) & 0xFFFF0000UL) | \
Anna Bridge 180:96ed750bd169 2010 ((((uint32_t)(ARG2)) >> (ARG3)) & 0x0000FFFFUL) )
Anna Bridge 180:96ed750bd169 2011
Anna Bridge 180:96ed750bd169 2012 __attribute__((always_inline)) __STATIC_INLINE int32_t __SMMLA (int32_t op1, int32_t op2, int32_t op3)
Anna Bridge 180:96ed750bd169 2013 {
Anna Bridge 180:96ed750bd169 2014 int32_t result;
Anna Bridge 180:96ed750bd169 2015
Anna Bridge 180:96ed750bd169 2016 __ASM volatile ("smmla %0, %1, %2, %3" : "=r" (result): "r" (op1), "r" (op2), "r" (op3) );
Anna Bridge 180:96ed750bd169 2017 return(result);
Anna Bridge 180:96ed750bd169 2018 }
Anna Bridge 180:96ed750bd169 2019
Anna Bridge 180:96ed750bd169 2020 #endif /* (__ARM_FEATURE_DSP == 1) */
Anna Bridge 180:96ed750bd169 2021 /*@} end of group CMSIS_SIMD_intrinsics */
Anna Bridge 180:96ed750bd169 2022
Anna Bridge 180:96ed750bd169 2023
Anna Bridge 180:96ed750bd169 2024 #pragma GCC diagnostic pop
Anna Bridge 180:96ed750bd169 2025
Anna Bridge 180:96ed750bd169 2026 #endif /* __CMSIS_GCC_H */