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_NANO100/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 2
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_0_1, 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 if (! dac_modinit_mask[modidx]) {
AnnaBridge 189:f392fc9709a3 61 /* Reset IP */
AnnaBridge 189:f392fc9709a3 62 SYS_ResetModule(modinit->rsetidx);
AnnaBridge 189:f392fc9709a3 63
AnnaBridge 189:f392fc9709a3 64 /* Select IP clock source and clock divider */
AnnaBridge 189:f392fc9709a3 65 CLK_SetModuleClock(modinit->clkidx, modinit->clksrc, modinit->clkdiv);
AnnaBridge 189:f392fc9709a3 66
AnnaBridge 189:f392fc9709a3 67 /* Enable IP clock */
AnnaBridge 189:f392fc9709a3 68 CLK_EnableModuleClock(modinit->clkidx);
AnnaBridge 189:f392fc9709a3 69
AnnaBridge 189:f392fc9709a3 70 /* Configure conversion settling time
AnnaBridge 189:f392fc9709a3 71 *
AnnaBridge 189:f392fc9709a3 72 * DAC_Open() is per-channel, but its implementation involves per-module configuration of
AnnaBridge 189:f392fc9709a3 73 * conversion settling time. Even so, we still use it for default conversion settling time
AnnaBridge 189:f392fc9709a3 74 * rather than call per-module DAC_SetDelayTime(). This is to accommodate BSP driver.
AnnaBridge 189:f392fc9709a3 75 *
AnnaBridge 189:f392fc9709a3 76 * To configure conversion settling time separately to e.g. 8us, we would call:
AnnaBridge 189:f392fc9709a3 77 *
AnnaBridge 189:f392fc9709a3 78 * DAC_SetDelayTime(dac_base, CLK_GetHCLKFreq() * 8 / 1000000);
AnnaBridge 189:f392fc9709a3 79 */
AnnaBridge 189:f392fc9709a3 80 }
AnnaBridge 189:f392fc9709a3 81
AnnaBridge 189:f392fc9709a3 82 /* Channel-level setup from here: */
AnnaBridge 189:f392fc9709a3 83
AnnaBridge 189:f392fc9709a3 84 /* Set the software trigger, enable DAC event trigger mode and enable D/A converter */
AnnaBridge 189:f392fc9709a3 85 DAC_Open(dac_base, chn, DAC_WRITE_DAT_TRIGGER);
AnnaBridge 189:f392fc9709a3 86
AnnaBridge 189:f392fc9709a3 87 /* Wire pinout */
AnnaBridge 189:f392fc9709a3 88 pinmap_pinout(pin, PinMap_DAC);
AnnaBridge 189:f392fc9709a3 89
AnnaBridge 189:f392fc9709a3 90 /* Mark channel allocated */
AnnaBridge 189:f392fc9709a3 91 dac_modinit_mask[modidx] |= 1 << chn;
AnnaBridge 189:f392fc9709a3 92 }
AnnaBridge 189:f392fc9709a3 93
AnnaBridge 189:f392fc9709a3 94 void analogout_free(dac_t *obj)
AnnaBridge 189:f392fc9709a3 95 {
AnnaBridge 189:f392fc9709a3 96 const struct nu_modinit_s *modinit = get_modinit(obj->dac, dac_modinit_tab);
AnnaBridge 189:f392fc9709a3 97 MBED_ASSERT(modinit != NULL);
AnnaBridge 189:f392fc9709a3 98 MBED_ASSERT(modinit->modname == obj->dac);
AnnaBridge 189:f392fc9709a3 99
AnnaBridge 189:f392fc9709a3 100 /* Module index */
AnnaBridge 189:f392fc9709a3 101 uint32_t modidx = NU_MODINDEX(obj->dac);
AnnaBridge 189:f392fc9709a3 102 MBED_ASSERT(modidx < NU_DACMOD_MAXNUM);
AnnaBridge 189:f392fc9709a3 103
AnnaBridge 189:f392fc9709a3 104 /* Module subindex (aka channel) */
AnnaBridge 189:f392fc9709a3 105 uint32_t chn = NU_MODSUBINDEX(obj->dac);
AnnaBridge 189:f392fc9709a3 106 MBED_ASSERT(chn < NU_DACCHN_MAXNUM);
AnnaBridge 189:f392fc9709a3 107
AnnaBridge 189:f392fc9709a3 108 DAC_T *dac_base = (DAC_T *) NU_MODBASE(obj->dac);
AnnaBridge 189:f392fc9709a3 109
AnnaBridge 189:f392fc9709a3 110 /* Channel-level windup from here */
AnnaBridge 189:f392fc9709a3 111
AnnaBridge 189:f392fc9709a3 112 /* Mark channel free */
AnnaBridge 189:f392fc9709a3 113 dac_modinit_mask[modidx] &= ~(1 << modidx);
AnnaBridge 189:f392fc9709a3 114
AnnaBridge 189:f392fc9709a3 115 /* Close channel */
AnnaBridge 189:f392fc9709a3 116 DAC_Close(dac_base, chn);
AnnaBridge 189:f392fc9709a3 117
AnnaBridge 189:f392fc9709a3 118 /* Module-level windup from here: */
AnnaBridge 189:f392fc9709a3 119
AnnaBridge 189:f392fc9709a3 120 if (! dac_modinit_mask[modidx]) {
AnnaBridge 189:f392fc9709a3 121
AnnaBridge 189:f392fc9709a3 122 /* Disable IP clock */
AnnaBridge 189:f392fc9709a3 123 CLK_DisableModuleClock(modinit->clkidx);
AnnaBridge 189:f392fc9709a3 124 }
AnnaBridge 189:f392fc9709a3 125 }
AnnaBridge 189:f392fc9709a3 126
AnnaBridge 189:f392fc9709a3 127 void analogout_write(dac_t *obj, float value)
AnnaBridge 189:f392fc9709a3 128 {
AnnaBridge 189:f392fc9709a3 129 if (value <= 0.0f) {
AnnaBridge 189:f392fc9709a3 130 analogout_write_u16(obj, 0);
AnnaBridge 189:f392fc9709a3 131 } else if (value >= 1.0f) {
AnnaBridge 189:f392fc9709a3 132 analogout_write_u16(obj, 0xFFFF);
AnnaBridge 189:f392fc9709a3 133 } else {
AnnaBridge 189:f392fc9709a3 134 analogout_write_u16(obj, (uint16_t) (value * ((float) 0xFFFF)));
AnnaBridge 189:f392fc9709a3 135 }
AnnaBridge 189:f392fc9709a3 136 }
AnnaBridge 189:f392fc9709a3 137
AnnaBridge 189:f392fc9709a3 138 void analogout_write_u16(dac_t *obj, uint16_t value)
AnnaBridge 189:f392fc9709a3 139 {
AnnaBridge 189:f392fc9709a3 140 DAC_T *dac_base = (DAC_T *) NU_MODBASE(obj->dac);
AnnaBridge 189:f392fc9709a3 141 uint32_t chn = NU_MODSUBINDEX(obj->dac);
AnnaBridge 189:f392fc9709a3 142
AnnaBridge 189:f392fc9709a3 143 /* Convert 16 bits to effective 12 bits by dropping 4 LSB bits. */
AnnaBridge 189:f392fc9709a3 144 DAC_WRITE_DATA(dac_base, chn, value >> 4);
AnnaBridge 189:f392fc9709a3 145
AnnaBridge 189:f392fc9709a3 146 /* Wait for completed */
AnnaBridge 189:f392fc9709a3 147 while (DAC_IS_BUSY(dac_base, chn));
AnnaBridge 189:f392fc9709a3 148 }
AnnaBridge 189:f392fc9709a3 149
AnnaBridge 189:f392fc9709a3 150 float analogout_read(dac_t *obj)
AnnaBridge 189:f392fc9709a3 151 {
AnnaBridge 189:f392fc9709a3 152 uint32_t value = analogout_read_u16(obj);
AnnaBridge 189:f392fc9709a3 153 return (float) value * (1.0f / (float) 0xFFFF);
AnnaBridge 189:f392fc9709a3 154 }
AnnaBridge 189:f392fc9709a3 155
AnnaBridge 189:f392fc9709a3 156 uint16_t analogout_read_u16(dac_t *obj)
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 uint16_t dat12 = chn ? dac_base->DATA1 : dac_base->DATA0;
AnnaBridge 189:f392fc9709a3 162 dat12 = (dat12 & DAC_DATA_DACData_Msk) >> DAC_DATA_DACData_Pos;
AnnaBridge 189:f392fc9709a3 163 /* Just 12 bits are effective. Convert to 16 bits.
AnnaBridge 189:f392fc9709a3 164 *
AnnaBridge 189:f392fc9709a3 165 * dat12 : 0000 b11b10b9b8 b7b6b5b4 b3b2b1b0
AnnaBridge 189:f392fc9709a3 166 * dat16 : b11b10b9b8 b7b6b5b4 b3b2b1b0 b11b10b9b8
AnnaBridge 189:f392fc9709a3 167 */
AnnaBridge 189:f392fc9709a3 168 uint16_t dat16 = (dat12 << 4) | (dat12 >> 8);
AnnaBridge 189:f392fc9709a3 169
AnnaBridge 189:f392fc9709a3 170 return dat16;
AnnaBridge 189:f392fc9709a3 171 }
AnnaBridge 189:f392fc9709a3 172
AnnaBridge 189:f392fc9709a3 173 #endif