mbed library sources. Supersedes mbed-src.
Dependents: Nucleo_Hello_Encoder BLE_iBeaconScan AM1805_DEMO DISCO-F429ZI_ExportTemplate1 ... more
targets/TARGET_NUVOTON/TARGET_M480/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 | SYS_ResetModule(modinit->rsetidx); |
AnnaBridge | 189:f392fc9709a3 | 71 | |
AnnaBridge | 189:f392fc9709a3 | 72 | /* Select IP clock source and clock divider */ |
AnnaBridge | 189:f392fc9709a3 | 73 | CLK_SetModuleClock(modinit->clkidx, modinit->clksrc, modinit->clkdiv); |
AnnaBridge | 189:f392fc9709a3 | 74 | |
AnnaBridge | 189:f392fc9709a3 | 75 | /* Enable IP clock */ |
AnnaBridge | 189:f392fc9709a3 | 76 | CLK_EnableModuleClock(modinit->clkidx); |
AnnaBridge | 189:f392fc9709a3 | 77 | |
AnnaBridge | 189:f392fc9709a3 | 78 | /* The conversion settling time is 8us when 12-bit input code transition from |
AnnaBridge | 189:f392fc9709a3 | 79 | * lowest code (0x000) to highest code (0xFFF). */ |
AnnaBridge | 189:f392fc9709a3 | 80 | DAC_SetDelayTime(dac_base, 8); |
AnnaBridge | 189:f392fc9709a3 | 81 | |
AnnaBridge | 189:f392fc9709a3 | 82 | /* Configure DAT data format to left-aligned |
AnnaBridge | 189:f392fc9709a3 | 83 | * Effective 12-bits are aligned to left of 16-bit DAC_DAT. */ |
AnnaBridge | 189:f392fc9709a3 | 84 | DAC_ENABLE_LEFT_ALIGN(dac_base); |
AnnaBridge | 189:f392fc9709a3 | 85 | } |
AnnaBridge | 189:f392fc9709a3 | 86 | |
AnnaBridge | 189:f392fc9709a3 | 87 | /* Channel-level setup from here: */ |
AnnaBridge | 189:f392fc9709a3 | 88 | |
AnnaBridge | 189:f392fc9709a3 | 89 | /* Set the software trigger, enable DAC event trigger mode and enable D/A converter */ |
AnnaBridge | 189:f392fc9709a3 | 90 | DAC_Open(dac_base, chn, DAC_SOFTWARE_TRIGGER); |
AnnaBridge | 189:f392fc9709a3 | 91 | |
AnnaBridge | 189:f392fc9709a3 | 92 | /* Wire pinout */ |
AnnaBridge | 189:f392fc9709a3 | 93 | pinmap_pinout(pin, PinMap_DAC); |
AnnaBridge | 189:f392fc9709a3 | 94 | |
AnnaBridge | 189:f392fc9709a3 | 95 | /* Mark channel allocated */ |
AnnaBridge | 189:f392fc9709a3 | 96 | dac_modinit_mask[modidx] |= 1 << chn; |
AnnaBridge | 189:f392fc9709a3 | 97 | } |
AnnaBridge | 189:f392fc9709a3 | 98 | |
AnnaBridge | 189:f392fc9709a3 | 99 | void analogout_free(dac_t *obj) |
AnnaBridge | 189:f392fc9709a3 | 100 | { |
AnnaBridge | 189:f392fc9709a3 | 101 | const struct nu_modinit_s *modinit = get_modinit(obj->dac, dac_modinit_tab); |
AnnaBridge | 189:f392fc9709a3 | 102 | MBED_ASSERT(modinit != NULL); |
AnnaBridge | 189:f392fc9709a3 | 103 | MBED_ASSERT(modinit->modname == obj->dac); |
AnnaBridge | 189:f392fc9709a3 | 104 | |
AnnaBridge | 189:f392fc9709a3 | 105 | /* Module index */ |
AnnaBridge | 189:f392fc9709a3 | 106 | uint32_t modidx = NU_MODINDEX(obj->dac); |
AnnaBridge | 189:f392fc9709a3 | 107 | MBED_ASSERT(modidx < NU_DACMOD_MAXNUM); |
AnnaBridge | 189:f392fc9709a3 | 108 | |
AnnaBridge | 189:f392fc9709a3 | 109 | /* Module subindex (aka channel) */ |
AnnaBridge | 189:f392fc9709a3 | 110 | uint32_t chn = NU_MODSUBINDEX(obj->dac); |
AnnaBridge | 189:f392fc9709a3 | 111 | MBED_ASSERT(chn < NU_DACCHN_MAXNUM); |
AnnaBridge | 189:f392fc9709a3 | 112 | |
AnnaBridge | 189:f392fc9709a3 | 113 | DAC_T *dac_base = (DAC_T *) NU_MODBASE(obj->dac); |
AnnaBridge | 189:f392fc9709a3 | 114 | |
AnnaBridge | 189:f392fc9709a3 | 115 | /* Channel-level windup from here */ |
AnnaBridge | 189:f392fc9709a3 | 116 | |
AnnaBridge | 189:f392fc9709a3 | 117 | /* Mark channel free */ |
AnnaBridge | 189:f392fc9709a3 | 118 | dac_modinit_mask[modidx] &= ~(1 << modidx); |
AnnaBridge | 189:f392fc9709a3 | 119 | |
AnnaBridge | 189:f392fc9709a3 | 120 | /* Close channel */ |
AnnaBridge | 189:f392fc9709a3 | 121 | DAC_Close(dac_base, chn); |
AnnaBridge | 189:f392fc9709a3 | 122 | |
AnnaBridge | 189:f392fc9709a3 | 123 | /* Module-level windup from here: */ |
AnnaBridge | 189:f392fc9709a3 | 124 | |
AnnaBridge | 189:f392fc9709a3 | 125 | /* See analogout_init() for reason */ |
AnnaBridge | 189:f392fc9709a3 | 126 | if ((! dac_modinit_mask[0]) && (! dac_modinit_mask[1])) { |
AnnaBridge | 189:f392fc9709a3 | 127 | |
AnnaBridge | 189:f392fc9709a3 | 128 | /* Disable IP clock */ |
AnnaBridge | 189:f392fc9709a3 | 129 | CLK_DisableModuleClock(modinit->clkidx); |
AnnaBridge | 189:f392fc9709a3 | 130 | } |
AnnaBridge | 189:f392fc9709a3 | 131 | } |
AnnaBridge | 189:f392fc9709a3 | 132 | |
AnnaBridge | 189:f392fc9709a3 | 133 | void analogout_write(dac_t *obj, float value) |
AnnaBridge | 189:f392fc9709a3 | 134 | { |
AnnaBridge | 189:f392fc9709a3 | 135 | if (value <= 0.0f) { |
AnnaBridge | 189:f392fc9709a3 | 136 | analogout_write_u16(obj, 0); |
AnnaBridge | 189:f392fc9709a3 | 137 | } else if (value >= 1.0f) { |
AnnaBridge | 189:f392fc9709a3 | 138 | analogout_write_u16(obj, 0xFFFF); |
AnnaBridge | 189:f392fc9709a3 | 139 | } else { |
AnnaBridge | 189:f392fc9709a3 | 140 | analogout_write_u16(obj, (uint16_t) (value * ((float) 0xFFFF))); |
AnnaBridge | 189:f392fc9709a3 | 141 | } |
AnnaBridge | 189:f392fc9709a3 | 142 | } |
AnnaBridge | 189:f392fc9709a3 | 143 | |
AnnaBridge | 189:f392fc9709a3 | 144 | void analogout_write_u16(dac_t *obj, uint16_t value) |
AnnaBridge | 189:f392fc9709a3 | 145 | { |
AnnaBridge | 189:f392fc9709a3 | 146 | DAC_T *dac_base = (DAC_T *) NU_MODBASE(obj->dac); |
AnnaBridge | 189:f392fc9709a3 | 147 | uint32_t chn = NU_MODSUBINDEX(obj->dac); |
AnnaBridge | 189:f392fc9709a3 | 148 | |
AnnaBridge | 189:f392fc9709a3 | 149 | /* We should have configured DAC data format to left-aligned */ |
AnnaBridge | 189:f392fc9709a3 | 150 | MBED_ASSERT(dac_base->CTL & DAC_CTL_LALIGN_Msk); |
AnnaBridge | 189:f392fc9709a3 | 151 | DAC_WRITE_DATA(dac_base, chn, value); |
AnnaBridge | 189:f392fc9709a3 | 152 | |
AnnaBridge | 189:f392fc9709a3 | 153 | /* Clear the DAC conversion complete finish flag for safe */ |
AnnaBridge | 189:f392fc9709a3 | 154 | DAC_CLR_INT_FLAG(dac_base, chn); |
AnnaBridge | 189:f392fc9709a3 | 155 | |
AnnaBridge | 189:f392fc9709a3 | 156 | /* Start A/D conversion */ |
AnnaBridge | 189:f392fc9709a3 | 157 | DAC_START_CONV(dac_base); |
AnnaBridge | 189:f392fc9709a3 | 158 | |
AnnaBridge | 189:f392fc9709a3 | 159 | /* Wait for completed */ |
AnnaBridge | 189:f392fc9709a3 | 160 | while (DAC_IS_BUSY(dac_base, chn)); |
AnnaBridge | 189:f392fc9709a3 | 161 | } |
AnnaBridge | 189:f392fc9709a3 | 162 | |
AnnaBridge | 189:f392fc9709a3 | 163 | float analogout_read(dac_t *obj) |
AnnaBridge | 189:f392fc9709a3 | 164 | { |
AnnaBridge | 189:f392fc9709a3 | 165 | uint32_t value = analogout_read_u16(obj); |
AnnaBridge | 189:f392fc9709a3 | 166 | return (float) value * (1.0f / (float) 0xFFFF); |
AnnaBridge | 189:f392fc9709a3 | 167 | } |
AnnaBridge | 189:f392fc9709a3 | 168 | |
AnnaBridge | 189:f392fc9709a3 | 169 | uint16_t analogout_read_u16(dac_t *obj) |
AnnaBridge | 189:f392fc9709a3 | 170 | { |
AnnaBridge | 189:f392fc9709a3 | 171 | DAC_T *dac_base = (DAC_T *) NU_MODBASE(obj->dac); |
AnnaBridge | 189:f392fc9709a3 | 172 | uint32_t chn = NU_MODSUBINDEX(obj->dac); |
AnnaBridge | 189:f392fc9709a3 | 173 | |
AnnaBridge | 189:f392fc9709a3 | 174 | /* We should have configured DAC data format to left-aligned */ |
AnnaBridge | 189:f392fc9709a3 | 175 | MBED_ASSERT(dac_base->CTL & DAC_CTL_LALIGN_Msk); |
AnnaBridge | 189:f392fc9709a3 | 176 | uint16_t dat12_4 = DAC_READ_DATA(dac_base, chn); |
AnnaBridge | 189:f392fc9709a3 | 177 | /* Just 12 bits are effective. Convert to 16 bits. |
AnnaBridge | 189:f392fc9709a3 | 178 | * |
AnnaBridge | 189:f392fc9709a3 | 179 | * dat12_4 : b11b10b9b8 b7b6b5b4 b3b2b1b0 0000 |
AnnaBridge | 189:f392fc9709a3 | 180 | * dat16 : b11b10b9b8 b7b6b5b4 b3b2b1b0 b11b10b9b8 |
AnnaBridge | 189:f392fc9709a3 | 181 | */ |
AnnaBridge | 189:f392fc9709a3 | 182 | uint16_t dat16 = (dat12_4 & 0xFFF0) | (dat12_4 >> 12); |
AnnaBridge | 189:f392fc9709a3 | 183 | |
AnnaBridge | 189:f392fc9709a3 | 184 | return dat16; |
AnnaBridge | 189:f392fc9709a3 | 185 | } |
AnnaBridge | 189:f392fc9709a3 | 186 | |
AnnaBridge | 189:f392fc9709a3 | 187 | #endif |