mbed library sources. Supersedes mbed-src.

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

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?

UserRevisionLine numberNew 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