mbed library sources. Supersedes mbed-src.
Dependents: Nucleo_Hello_Encoder BLE_iBeaconScan AM1805_DEMO DISCO-F429ZI_ExportTemplate1 ... more
targets/TARGET_NUVOTON/TARGET_M2351/analogout_api.c@189:f392fc9709a3, 2019-02-20 (annotated)
- Committer:
- AnnaBridge
- Date:
- Wed Feb 20 22:31:08 2019 +0000
- Revision:
- 189:f392fc9709a3
mbed library release version 165
Who changed what in which revision?
User | Revision | Line number | New contents of line |
---|---|---|---|
AnnaBridge | 189:f392fc9709a3 | 1 | /* |
AnnaBridge | 189:f392fc9709a3 | 2 | * Copyright (c) 2018, Nuvoton Technology Corporation |
AnnaBridge | 189:f392fc9709a3 | 3 | * SPDX-License-Identifier: Apache-2.0 |
AnnaBridge | 189:f392fc9709a3 | 4 | * |
AnnaBridge | 189:f392fc9709a3 | 5 | * Licensed under the Apache License, Version 2.0 (the "License"); |
AnnaBridge | 189:f392fc9709a3 | 6 | * you may not use this file except in compliance with the License. |
AnnaBridge | 189:f392fc9709a3 | 7 | * You may obtain a copy of the License at |
AnnaBridge | 189:f392fc9709a3 | 8 | * |
AnnaBridge | 189:f392fc9709a3 | 9 | * http://www.apache.org/licenses/LICENSE-2.0 |
AnnaBridge | 189:f392fc9709a3 | 10 | * |
AnnaBridge | 189:f392fc9709a3 | 11 | * Unless required by applicable law or agreed to in writing, software |
AnnaBridge | 189:f392fc9709a3 | 12 | * distributed under the License is distributed on an "AS IS" BASIS, |
AnnaBridge | 189:f392fc9709a3 | 13 | * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied. |
AnnaBridge | 189:f392fc9709a3 | 14 | * See the License for the specific language governing permissions and |
AnnaBridge | 189:f392fc9709a3 | 15 | * limitations under the License. |
AnnaBridge | 189:f392fc9709a3 | 16 | */ |
AnnaBridge | 189:f392fc9709a3 | 17 | |
AnnaBridge | 189:f392fc9709a3 | 18 | #include "analogout_api.h" |
AnnaBridge | 189:f392fc9709a3 | 19 | |
AnnaBridge | 189:f392fc9709a3 | 20 | #if DEVICE_ANALOGOUT |
AnnaBridge | 189:f392fc9709a3 | 21 | |
AnnaBridge | 189:f392fc9709a3 | 22 | #include "cmsis.h" |
AnnaBridge | 189:f392fc9709a3 | 23 | #include "pinmap.h" |
AnnaBridge | 189:f392fc9709a3 | 24 | #include "PeripheralPins.h" |
AnnaBridge | 189:f392fc9709a3 | 25 | #include "nu_modutil.h" |
AnnaBridge | 189:f392fc9709a3 | 26 | |
AnnaBridge | 189:f392fc9709a3 | 27 | /* Maximum DAC modules */ |
AnnaBridge | 189:f392fc9709a3 | 28 | #define NU_DACMOD_MAXNUM 2 |
AnnaBridge | 189:f392fc9709a3 | 29 | /* Maximum DAC channels per module */ |
AnnaBridge | 189:f392fc9709a3 | 30 | #define NU_DACCHN_MAXNUM 1 |
AnnaBridge | 189:f392fc9709a3 | 31 | |
AnnaBridge | 189:f392fc9709a3 | 32 | static uint32_t dac_modinit_mask[NU_DACMOD_MAXNUM]; |
AnnaBridge | 189:f392fc9709a3 | 33 | |
AnnaBridge | 189:f392fc9709a3 | 34 | static const struct nu_modinit_s dac_modinit_tab[] = { |
AnnaBridge | 189:f392fc9709a3 | 35 | {DAC_0_0, DAC_MODULE, 0, 0, DAC_RST, DAC_IRQn, NULL}, |
AnnaBridge | 189:f392fc9709a3 | 36 | {DAC_1_0, DAC_MODULE, 0, 0, DAC_RST, DAC_IRQn, NULL} |
AnnaBridge | 189:f392fc9709a3 | 37 | }; |
AnnaBridge | 189:f392fc9709a3 | 38 | |
AnnaBridge | 189:f392fc9709a3 | 39 | void analogout_init(dac_t *obj, PinName pin) |
AnnaBridge | 189:f392fc9709a3 | 40 | { |
AnnaBridge | 189:f392fc9709a3 | 41 | obj->dac = (DACName) pinmap_peripheral(pin, PinMap_DAC); |
AnnaBridge | 189:f392fc9709a3 | 42 | MBED_ASSERT(obj->dac != (DACName) NC); |
AnnaBridge | 189:f392fc9709a3 | 43 | |
AnnaBridge | 189:f392fc9709a3 | 44 | const struct nu_modinit_s *modinit = get_modinit(obj->dac, dac_modinit_tab); |
AnnaBridge | 189:f392fc9709a3 | 45 | MBED_ASSERT(modinit != NULL); |
AnnaBridge | 189:f392fc9709a3 | 46 | MBED_ASSERT(modinit->modname == obj->dac); |
AnnaBridge | 189:f392fc9709a3 | 47 | |
AnnaBridge | 189:f392fc9709a3 | 48 | /* Module index */ |
AnnaBridge | 189:f392fc9709a3 | 49 | uint32_t modidx = NU_MODINDEX(obj->dac); |
AnnaBridge | 189:f392fc9709a3 | 50 | MBED_ASSERT(modidx < NU_DACMOD_MAXNUM); |
AnnaBridge | 189:f392fc9709a3 | 51 | |
AnnaBridge | 189:f392fc9709a3 | 52 | /* Module subindex (aka channel) */ |
AnnaBridge | 189:f392fc9709a3 | 53 | uint32_t chn = NU_MODSUBINDEX(obj->dac); |
AnnaBridge | 189:f392fc9709a3 | 54 | MBED_ASSERT(chn < NU_DACCHN_MAXNUM); |
AnnaBridge | 189:f392fc9709a3 | 55 | |
AnnaBridge | 189:f392fc9709a3 | 56 | DAC_T *dac_base = (DAC_T *) NU_MODBASE(obj->dac); |
AnnaBridge | 189:f392fc9709a3 | 57 | |
AnnaBridge | 189:f392fc9709a3 | 58 | /* Module-level setup from here */ |
AnnaBridge | 189:f392fc9709a3 | 59 | |
AnnaBridge | 189:f392fc9709a3 | 60 | /* DAC0/DAC1 are designed to share the same RESET/clock/IRQ for group |
AnnaBridge | 189:f392fc9709a3 | 61 | * function. So we: |
AnnaBridge | 189:f392fc9709a3 | 62 | * |
AnnaBridge | 189:f392fc9709a3 | 63 | * 1. Go to setup flow (analogout_init()) only when none of DAC0/DAC1 |
AnnaBridge | 189:f392fc9709a3 | 64 | * channels are activated. |
AnnaBridge | 189:f392fc9709a3 | 65 | * 2. Go to windup flow (analogout_free()) only when all DAC0/DAC1 |
AnnaBridge | 189:f392fc9709a3 | 66 | * channels are deactivated. |
AnnaBridge | 189:f392fc9709a3 | 67 | */ |
AnnaBridge | 189:f392fc9709a3 | 68 | if ((! dac_modinit_mask[0]) && (! dac_modinit_mask[1])) { |
AnnaBridge | 189:f392fc9709a3 | 69 | /* Reset IP |
AnnaBridge | 189:f392fc9709a3 | 70 | * |
AnnaBridge | 189:f392fc9709a3 | 71 | * NOTE: We must call secure version (from non-secure domain) because SYS/CLK regions are secure. |
AnnaBridge | 189:f392fc9709a3 | 72 | */ |
AnnaBridge | 189:f392fc9709a3 | 73 | SYS_ResetModule_S(modinit->rsetidx); |
AnnaBridge | 189:f392fc9709a3 | 74 | |
AnnaBridge | 189:f392fc9709a3 | 75 | /* Select IP clock source and clock divider |
AnnaBridge | 189:f392fc9709a3 | 76 | * |
AnnaBridge | 189:f392fc9709a3 | 77 | * NOTE: We must call secure version (from non-secure domain) because SYS/CLK regions are secure. |
AnnaBridge | 189:f392fc9709a3 | 78 | */ |
AnnaBridge | 189:f392fc9709a3 | 79 | CLK_SetModuleClock_S(modinit->clkidx, modinit->clksrc, modinit->clkdiv); |
AnnaBridge | 189:f392fc9709a3 | 80 | |
AnnaBridge | 189:f392fc9709a3 | 81 | /* Enable IP clock |
AnnaBridge | 189:f392fc9709a3 | 82 | * |
AnnaBridge | 189:f392fc9709a3 | 83 | * NOTE: We must call secure version (from non-secure domain) because SYS/CLK regions are secure. |
AnnaBridge | 189:f392fc9709a3 | 84 | */ |
AnnaBridge | 189:f392fc9709a3 | 85 | CLK_EnableModuleClock_S(modinit->clkidx); |
AnnaBridge | 189:f392fc9709a3 | 86 | |
AnnaBridge | 189:f392fc9709a3 | 87 | /* The conversion settling time is 8us when 12-bit input code transition from |
AnnaBridge | 189:f392fc9709a3 | 88 | * lowest code (0x000) to highest code (0xFFF). */ |
AnnaBridge | 189:f392fc9709a3 | 89 | DAC_SetDelayTime(dac_base, 8); |
AnnaBridge | 189:f392fc9709a3 | 90 | |
AnnaBridge | 189:f392fc9709a3 | 91 | /* Configure DAT data format to left-aligned |
AnnaBridge | 189:f392fc9709a3 | 92 | * Effective 12-bits are aligned to left of 16-bit DAC_DAT. */ |
AnnaBridge | 189:f392fc9709a3 | 93 | DAC_ENABLE_LEFT_ALIGN(dac_base); |
AnnaBridge | 189:f392fc9709a3 | 94 | } |
AnnaBridge | 189:f392fc9709a3 | 95 | |
AnnaBridge | 189:f392fc9709a3 | 96 | /* Channel-level setup from here: */ |
AnnaBridge | 189:f392fc9709a3 | 97 | |
AnnaBridge | 189:f392fc9709a3 | 98 | /* Set the software trigger, enable DAC event trigger mode and enable D/A converter */ |
AnnaBridge | 189:f392fc9709a3 | 99 | DAC_Open(dac_base, chn, DAC_SOFTWARE_TRIGGER); |
AnnaBridge | 189:f392fc9709a3 | 100 | |
AnnaBridge | 189:f392fc9709a3 | 101 | /* Wire pinout */ |
AnnaBridge | 189:f392fc9709a3 | 102 | pinmap_pinout(pin, PinMap_DAC); |
AnnaBridge | 189:f392fc9709a3 | 103 | |
AnnaBridge | 189:f392fc9709a3 | 104 | /* Mark channel allocated */ |
AnnaBridge | 189:f392fc9709a3 | 105 | dac_modinit_mask[modidx] |= 1 << chn; |
AnnaBridge | 189:f392fc9709a3 | 106 | } |
AnnaBridge | 189:f392fc9709a3 | 107 | |
AnnaBridge | 189:f392fc9709a3 | 108 | void analogout_free(dac_t *obj) |
AnnaBridge | 189:f392fc9709a3 | 109 | { |
AnnaBridge | 189:f392fc9709a3 | 110 | const struct nu_modinit_s *modinit = get_modinit(obj->dac, dac_modinit_tab); |
AnnaBridge | 189:f392fc9709a3 | 111 | MBED_ASSERT(modinit != NULL); |
AnnaBridge | 189:f392fc9709a3 | 112 | MBED_ASSERT(modinit->modname == obj->dac); |
AnnaBridge | 189:f392fc9709a3 | 113 | |
AnnaBridge | 189:f392fc9709a3 | 114 | /* Module index */ |
AnnaBridge | 189:f392fc9709a3 | 115 | uint32_t modidx = NU_MODINDEX(obj->dac); |
AnnaBridge | 189:f392fc9709a3 | 116 | MBED_ASSERT(modidx < NU_DACMOD_MAXNUM); |
AnnaBridge | 189:f392fc9709a3 | 117 | |
AnnaBridge | 189:f392fc9709a3 | 118 | /* Module subindex (aka channel) */ |
AnnaBridge | 189:f392fc9709a3 | 119 | uint32_t chn = NU_MODSUBINDEX(obj->dac); |
AnnaBridge | 189:f392fc9709a3 | 120 | MBED_ASSERT(chn < NU_DACCHN_MAXNUM); |
AnnaBridge | 189:f392fc9709a3 | 121 | |
AnnaBridge | 189:f392fc9709a3 | 122 | DAC_T *dac_base = (DAC_T *) NU_MODBASE(obj->dac); |
AnnaBridge | 189:f392fc9709a3 | 123 | |
AnnaBridge | 189:f392fc9709a3 | 124 | /* Channel-level windup from here */ |
AnnaBridge | 189:f392fc9709a3 | 125 | |
AnnaBridge | 189:f392fc9709a3 | 126 | /* Mark channel free */ |
AnnaBridge | 189:f392fc9709a3 | 127 | dac_modinit_mask[modidx] &= ~(1 << modidx); |
AnnaBridge | 189:f392fc9709a3 | 128 | |
AnnaBridge | 189:f392fc9709a3 | 129 | /* Close channel */ |
AnnaBridge | 189:f392fc9709a3 | 130 | DAC_Close(dac_base, chn); |
AnnaBridge | 189:f392fc9709a3 | 131 | |
AnnaBridge | 189:f392fc9709a3 | 132 | /* Module-level windup from here: */ |
AnnaBridge | 189:f392fc9709a3 | 133 | |
AnnaBridge | 189:f392fc9709a3 | 134 | /* See analogout_init() for reason */ |
AnnaBridge | 189:f392fc9709a3 | 135 | if ((! dac_modinit_mask[0]) && (! dac_modinit_mask[1])) { |
AnnaBridge | 189:f392fc9709a3 | 136 | |
AnnaBridge | 189:f392fc9709a3 | 137 | /* Disable IP clock |
AnnaBridge | 189:f392fc9709a3 | 138 | * |
AnnaBridge | 189:f392fc9709a3 | 139 | * NOTE: We must call secure version (from non-secure domain) because SYS/CLK regions are secure. |
AnnaBridge | 189:f392fc9709a3 | 140 | */ |
AnnaBridge | 189:f392fc9709a3 | 141 | CLK_DisableModuleClock_S(modinit->clkidx); |
AnnaBridge | 189:f392fc9709a3 | 142 | } |
AnnaBridge | 189:f392fc9709a3 | 143 | } |
AnnaBridge | 189:f392fc9709a3 | 144 | |
AnnaBridge | 189:f392fc9709a3 | 145 | void analogout_write(dac_t *obj, float value) |
AnnaBridge | 189:f392fc9709a3 | 146 | { |
AnnaBridge | 189:f392fc9709a3 | 147 | if (value <= 0.0f) { |
AnnaBridge | 189:f392fc9709a3 | 148 | analogout_write_u16(obj, 0); |
AnnaBridge | 189:f392fc9709a3 | 149 | } else if (value >= 1.0f) { |
AnnaBridge | 189:f392fc9709a3 | 150 | analogout_write_u16(obj, 0xFFFF); |
AnnaBridge | 189:f392fc9709a3 | 151 | } else { |
AnnaBridge | 189:f392fc9709a3 | 152 | analogout_write_u16(obj, (uint16_t) (value * ((float) 0xFFFF))); |
AnnaBridge | 189:f392fc9709a3 | 153 | } |
AnnaBridge | 189:f392fc9709a3 | 154 | } |
AnnaBridge | 189:f392fc9709a3 | 155 | |
AnnaBridge | 189:f392fc9709a3 | 156 | void analogout_write_u16(dac_t *obj, uint16_t value) |
AnnaBridge | 189:f392fc9709a3 | 157 | { |
AnnaBridge | 189:f392fc9709a3 | 158 | DAC_T *dac_base = (DAC_T *) NU_MODBASE(obj->dac); |
AnnaBridge | 189:f392fc9709a3 | 159 | uint32_t chn = NU_MODSUBINDEX(obj->dac); |
AnnaBridge | 189:f392fc9709a3 | 160 | |
AnnaBridge | 189:f392fc9709a3 | 161 | /* We should have configured DAC data format to left-aligned */ |
AnnaBridge | 189:f392fc9709a3 | 162 | MBED_ASSERT(dac_base->CTL & DAC_CTL_LALIGN_Msk); |
AnnaBridge | 189:f392fc9709a3 | 163 | DAC_WRITE_DATA(dac_base, chn, value); |
AnnaBridge | 189:f392fc9709a3 | 164 | |
AnnaBridge | 189:f392fc9709a3 | 165 | /* Clear the DAC conversion complete finish flag for safe */ |
AnnaBridge | 189:f392fc9709a3 | 166 | DAC_CLR_INT_FLAG(dac_base, chn); |
AnnaBridge | 189:f392fc9709a3 | 167 | |
AnnaBridge | 189:f392fc9709a3 | 168 | /* Start A/D conversion */ |
AnnaBridge | 189:f392fc9709a3 | 169 | DAC_START_CONV(dac_base); |
AnnaBridge | 189:f392fc9709a3 | 170 | |
AnnaBridge | 189:f392fc9709a3 | 171 | /* Wait for completed */ |
AnnaBridge | 189:f392fc9709a3 | 172 | while (DAC_IS_BUSY(dac_base, chn)); |
AnnaBridge | 189:f392fc9709a3 | 173 | } |
AnnaBridge | 189:f392fc9709a3 | 174 | |
AnnaBridge | 189:f392fc9709a3 | 175 | float analogout_read(dac_t *obj) |
AnnaBridge | 189:f392fc9709a3 | 176 | { |
AnnaBridge | 189:f392fc9709a3 | 177 | uint32_t value = analogout_read_u16(obj); |
AnnaBridge | 189:f392fc9709a3 | 178 | return (float) value * (1.0f / (float) 0xFFFF); |
AnnaBridge | 189:f392fc9709a3 | 179 | } |
AnnaBridge | 189:f392fc9709a3 | 180 | |
AnnaBridge | 189:f392fc9709a3 | 181 | uint16_t analogout_read_u16(dac_t *obj) |
AnnaBridge | 189:f392fc9709a3 | 182 | { |
AnnaBridge | 189:f392fc9709a3 | 183 | DAC_T *dac_base = (DAC_T *) NU_MODBASE(obj->dac); |
AnnaBridge | 189:f392fc9709a3 | 184 | uint32_t chn = NU_MODSUBINDEX(obj->dac); |
AnnaBridge | 189:f392fc9709a3 | 185 | |
AnnaBridge | 189:f392fc9709a3 | 186 | /* We should have configured DAC data format to left-aligned */ |
AnnaBridge | 189:f392fc9709a3 | 187 | MBED_ASSERT(dac_base->CTL & DAC_CTL_LALIGN_Msk); |
AnnaBridge | 189:f392fc9709a3 | 188 | uint16_t dat12_4 = DAC_READ_DATA(dac_base, chn); |
AnnaBridge | 189:f392fc9709a3 | 189 | /* Just 12 bits are effective. Convert to 16 bits. |
AnnaBridge | 189:f392fc9709a3 | 190 | * |
AnnaBridge | 189:f392fc9709a3 | 191 | * dat12_4 : b11b10b9b8 b7b6b5b4 b3b2b1b0 0000 |
AnnaBridge | 189:f392fc9709a3 | 192 | * dat16 : b11b10b9b8 b7b6b5b4 b3b2b1b0 b11b10b9b8 |
AnnaBridge | 189:f392fc9709a3 | 193 | */ |
AnnaBridge | 189:f392fc9709a3 | 194 | uint16_t dat16 = (dat12_4 & 0xFFF0) | (dat12_4 >> 12); |
AnnaBridge | 189:f392fc9709a3 | 195 | |
AnnaBridge | 189:f392fc9709a3 | 196 | return dat16; |
AnnaBridge | 189:f392fc9709a3 | 197 | } |
AnnaBridge | 189:f392fc9709a3 | 198 | |
AnnaBridge | 189:f392fc9709a3 | 199 | #endif |