mbed official / mbed-dev

mbed library sources. Supersedes mbed-src.

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

targets/TARGET_NUVOTON/TARGET_M451/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?

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