wimbeaumont Project / adc_ad9249

sw ADC SPI interface for the SOLID Slow control beta!!

Dependents:   SPItest sscm

SWSPI_BI.cpp@2:1fb81137d906, 2015-10-23 (annotated)

Committer:
wbeaumont
Date:
Fri Oct 23 11:22:44 2015 +0000
Revision:
2:1fb81137d906
Parent:
1:01459a6ab296 
production version archiving

Who changed what in which revision?

UserRevisionLine numberNew contents of line
wbeaumont 0:9efb460e962b 1 /* SWSPI, Software SPI library
wbeaumont 0:9efb460e962b 2 * Copyright (c) 2012-2014, David R. Van Wagner, http://techwithdave.blogspot.com
wbeaumont 0:9efb460e962b 3 *
wbeaumont 0:9efb460e962b 4 * Permission is hereby granted, free of charge, to any person obtaining a copy
wbeaumont 0:9efb460e962b 5 * of this software and associated documentation files (the "Software"), to deal
wbeaumont 0:9efb460e962b 6 * in the Software without restriction, including without limitation the rights
wbeaumont 0:9efb460e962b 7 * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
wbeaumont 0:9efb460e962b 8 * copies of the Software, and to permit persons to whom the Software is
wbeaumont 0:9efb460e962b 9 * furnished to do so, subject to the following conditions:
wbeaumont 0:9efb460e962b 10 *
wbeaumont 0:9efb460e962b 11 * The above copyright notice and this permission notice shall be included in
wbeaumont 0:9efb460e962b 12 * all copies or substantial portions of the Software.
wbeaumont 0:9efb460e962b 13 *
wbeaumont 0:9efb460e962b 14 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
wbeaumont 0:9efb460e962b 15 * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
wbeaumont 0:9efb460e962b 16 * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
wbeaumont 0:9efb460e962b 17 * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
wbeaumont 0:9efb460e962b 18 * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
wbeaumont 0:9efb460e962b 19 * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
wbeaumont 0:9efb460e962b 20 * THE SOFTWARE.
wbeaumont 2:1fb81137d906 21
wbeaumont 2:1fb81137d906 22
wbeaumont 0:9efb460e962b 23 * modified the software for adapt to the AD9249 ADC ( bi directional ) with LVDS interface
wbeaumont 2:1fb81137d906 24 * Software adapted for the SM1 project of the SOLID colaboration
wbeaumont 2:1fb81137d906 25 * (C) Wim Beaumont Univeristeit Antwerpen 2014 , 2015
wbeaumont 0:9efb460e962b 26
wbeaumont 0:9efb460e962b 27 */
wbeaumont 0:9efb460e962b 28
wbeaumont 0:9efb460e962b 29 #include <mbed.h>
wbeaumont 0:9efb460e962b 30 #include "SWSPI_BI.h"
wbeaumont 0:9efb460e962b 31 #include "S_SCTRL_SM1_hwfunct.h"
wbeaumont 0:9efb460e962b 32
wbeaumont 1:01459a6ab296 33 #define SWSPI_BI_SRC_VER "1.50"
wbeaumont 1:01459a6ab296 34
wbeaumont 0:9efb460e962b 35 /**
wbeaumont 0:9efb460e962b 36 PARAM
wbeaumont 0:9efb460e962b 37 @misopin pointer to the input / output pin for the data communication
wbeaumont 0:9efb460e962b 38 @rdir_pin pointer to the output pin that sets the remote LVDS buffer to read / write
wbeaumont 0:9efb460e962b 39 @ldir_pin pointer to the output pin that sets the local LVDS buffer to read / write
wbeaumont 0:9efb460e962b 40 @sclk_pin pointer to the output pin that act as the clock signal for the interface
wbeaumont 0:9efb460e962b 41
wbeaumont 0:9efb460e962b 42 */
wbeaumont 1:01459a6ab296 43 SWSPI_BI::SWSPI_BI(DigitalInOut *msio_pin, DigitalOut *rdir_pin,DigitalOut *ldir_pin, DigitalOut *sclk_pin)
wbeaumont 1:01459a6ab296 44 :getVersion( SWSPI_BI_HDR_VER , SWSPI_BI_SRC_VER , __TIME__, __DATE__)
wbeaumont 1:01459a6ab296 45 {
wbeaumont 0:9efb460e962b 46
wbeaumont 0:9efb460e962b 47 msio = msio_pin;
wbeaumont 0:9efb460e962b 48 rdir = rdir_pin;
wbeaumont 0:9efb460e962b 49 ldir = ldir_pin;
wbeaumont 0:9efb460e962b 50 sclk = sclk_pin;
wbeaumont 0:9efb460e962b 51 set_bi_spi_mo(1, msio,ldir,rdir);
wbeaumont 0:9efb460e962b 52
wbeaumont 0:9efb460e962b 53 format(8);
wbeaumont 0:9efb460e962b 54 frequency(500000);
wbeaumont 0:9efb460e962b 55 }
wbeaumont 0:9efb460e962b 56
wbeaumont 0:9efb460e962b 57 SWSPI_BI::~SWSPI_BI()
wbeaumont 0:9efb460e962b 58 {
wbeaumont 0:9efb460e962b 59 }
wbeaumont 0:9efb460e962b 60
wbeaumont 0:9efb460e962b 61 void SWSPI_BI::format( int bitsin, int modein ){
wbeaumont 0:9efb460e962b 62 bits = bitsin;
wbeaumont 0:9efb460e962b 63 mode = modein;
wbeaumont 0:9efb460e962b 64 polarity = !((modein >> 1) & 1);
wbeaumont 0:9efb460e962b 65 phase = modein & 1;
wbeaumont 0:9efb460e962b 66 sclk->write(polarity);
wbeaumont 0:9efb460e962b 67 }
wbeaumont 0:9efb460e962b 68
wbeaumont 0:9efb460e962b 69 void SWSPI_BI::frequency(int hz)
wbeaumont 0:9efb460e962b 70 {
wbeaumont 0:9efb460e962b 71 this->freq = hz;
wbeaumont 0:9efb460e962b 72 }
wbeaumont 0:9efb460e962b 73
wbeaumont 0:9efb460e962b 74 void SWSPI_BI::write(unsigned int value, DigitalOut * cs, bool lastdata, int cs_pol,bool nxtrd ){
wbeaumont 0:9efb460e962b 75
wbeaumont 0:9efb460e962b 76 // write data to output
wbeaumont 0:9efb460e962b 77 // assumption is that the cs line was just set from high to low so that the SPI slave is in read mode
wbeaumont 0:9efb460e962b 78 value= ~value;
wbeaumont 0:9efb460e962b 79 set_bi_spi_mo(1,msio,ldir,rdir);
wbeaumont 0:9efb460e962b 80 cs->write(cs_pol);
wbeaumont 0:9efb460e962b 81 for (int bit = bits-1; bit >= 0; --bit) {
wbeaumont 0:9efb460e962b 82 msio->write(((value >> bit) & 0x01) != 0);
wbeaumont 0:9efb460e962b 83 if(phase) { sclk->write(!polarity); wait(1.0/freq/2); sclk->write(polarity);
wbeaumont 0:9efb460e962b 84 if(!bit and nxtrd) set_bi_spi_mo(0,msio,ldir,rdir); // set already to input mode
wbeaumont 0:9efb460e962b 85 wait(1.0/freq/2); }
wbeaumont 0:9efb460e962b 86 else { wait(1.0/freq/2); sclk->write(!polarity); wait(1.0/freq/2); sclk->write(polarity); }
wbeaumont 0:9efb460e962b 87
wbeaumont 0:9efb460e962b 88
wbeaumont 0:9efb460e962b 89 }
wbeaumont 0:9efb460e962b 90 if( lastdata) {
wbeaumont 0:9efb460e962b 91 set_bi_spi_mo(0,msio,ldir,rdir);
wbeaumont 0:9efb460e962b 92 cs->write(!cs_pol);
wbeaumont 0:9efb460e962b 93 }
wbeaumont 0:9efb460e962b 94 else {
wbeaumont 0:9efb460e962b 95 }
wbeaumont 0:9efb460e962b 96 }
wbeaumont 0:9efb460e962b 97
wbeaumont 0:9efb460e962b 98 unsigned int SWSPI_BI::read( DigitalOut * cs, bool lastdata, int cs_pol ){
wbeaumont 0:9efb460e962b 99 unsigned int read = 0;
wbeaumont 0:9efb460e962b 100 set_bi_spi_mo(0,msio,ldir,rdir);
wbeaumont 0:9efb460e962b 101 cs->write(cs_pol);
wbeaumont 0:9efb460e962b 102 wait(1.0/freq/2);
wbeaumont 0:9efb460e962b 103 for (int bit = bits-1; bit >= 0; --bit) {
wbeaumont 0:9efb460e962b 104 if (phase == 0) {
wbeaumont 0:9efb460e962b 105 if (msio->read()) read |= (1 << bit);
wbeaumont 0:9efb460e962b 106
wbeaumont 0:9efb460e962b 107 }
wbeaumont 0:9efb460e962b 108 sclk->write(!polarity);
wbeaumont 0:9efb460e962b 109 wait(1.0/freq/2);
wbeaumont 0:9efb460e962b 110 if (phase == 1) {
wbeaumont 0:9efb460e962b 111 if (msio->read()) read |= (1 << bit);
wbeaumont 0:9efb460e962b 112 }
wbeaumont 0:9efb460e962b 113
wbeaumont 0:9efb460e962b 114 sclk->write(polarity);
wbeaumont 0:9efb460e962b 115 wait(1.0/freq/2);
wbeaumont 0:9efb460e962b 116 }
wbeaumont 0:9efb460e962b 117 if( lastdata) {
wbeaumont 0:9efb460e962b 118 cs->write(!cs_pol);
wbeaumont 0:9efb460e962b 119 }
wbeaumont 0:9efb460e962b 120 // else keep current io config
wbeaumont 0:9efb460e962b 121
wbeaumont 0:9efb460e962b 122
wbeaumont 0:9efb460e962b 123 return ~read;
wbeaumont 0:9efb460e962b 124 }
wbeaumont 0:9efb460e962b 125