Group 3_ESE519 / Mbed 2 deprecated lab5-gateway

Dependencies:   mbed

Committer:
mfrede
Date:
Sun Nov 08 22:07:10 2015 +0000
Revision:
0:6830fa3899e3
Child:
6:9daa56b8a027
initial gateway code

Who changed what in which revision?

UserRevisionLine numberNew contents of line
mfrede 0:6830fa3899e3 1 /* mbed MRF24J40 (IEEE 802.15.4 tranceiver) Library
mfrede 0:6830fa3899e3 2 * Copyright (c) 2011 Jeroen Hilgers
mfrede 0:6830fa3899e3 3 *
mfrede 0:6830fa3899e3 4 * Permission is hereby granted, free of charge, to any person obtaining a copy
mfrede 0:6830fa3899e3 5 * of this software and associated documentation files (the "Software"), to deal
mfrede 0:6830fa3899e3 6 * in the Software without restriction, including without limitation the rights
mfrede 0:6830fa3899e3 7 * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
mfrede 0:6830fa3899e3 8 * copies of the Software, and to permit persons to whom the Software is
mfrede 0:6830fa3899e3 9 * furnished to do so, subject to the following conditions:
mfrede 0:6830fa3899e3 10 *
mfrede 0:6830fa3899e3 11 * The above copyright notice and this permission notice shall be included in
mfrede 0:6830fa3899e3 12 * all copies or substantial portions of the Software.
mfrede 0:6830fa3899e3 13 *
mfrede 0:6830fa3899e3 14 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
mfrede 0:6830fa3899e3 15 * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
mfrede 0:6830fa3899e3 16 * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
mfrede 0:6830fa3899e3 17 * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
mfrede 0:6830fa3899e3 18 * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
mfrede 0:6830fa3899e3 19 * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
mfrede 0:6830fa3899e3 20 * THE SOFTWARE.
mfrede 0:6830fa3899e3 21 */
mfrede 0:6830fa3899e3 22
mfrede 0:6830fa3899e3 23 #include "MRF24J40.h"
mfrede 0:6830fa3899e3 24
mfrede 0:6830fa3899e3 25 // MRF20J40 Short address control register mapping.
mfrede 0:6830fa3899e3 26 #define RXMCR 0x00
mfrede 0:6830fa3899e3 27 #define PANIDL 0x01
mfrede 0:6830fa3899e3 28 #define PANIDH 0x02
mfrede 0:6830fa3899e3 29 #define SADRL 0x03
mfrede 0:6830fa3899e3 30 #define SADRH 0x04
mfrede 0:6830fa3899e3 31 #define EADR0 0x05
mfrede 0:6830fa3899e3 32 #define EADR1 0x06
mfrede 0:6830fa3899e3 33 #define EADR2 0x07
mfrede 0:6830fa3899e3 34 #define EADR3 0x08
mfrede 0:6830fa3899e3 35 #define EADR4 0x09
mfrede 0:6830fa3899e3 36 #define EADR5 0x0a
mfrede 0:6830fa3899e3 37 #define EADR6 0x0b
mfrede 0:6830fa3899e3 38 #define EADR7 0x0c
mfrede 0:6830fa3899e3 39 #define RXFLUSH 0x0d
mfrede 0:6830fa3899e3 40
mfrede 0:6830fa3899e3 41 #define TXNMTRIG 0x1b
mfrede 0:6830fa3899e3 42 #define TXSR 0x24
mfrede 0:6830fa3899e3 43
mfrede 0:6830fa3899e3 44 #define ISRSTS 0x31
mfrede 0:6830fa3899e3 45 #define INTMSK 0x32
mfrede 0:6830fa3899e3 46 #define GPIO 0x33
mfrede 0:6830fa3899e3 47 #define TRISGPIO 0x34
mfrede 0:6830fa3899e3 48
mfrede 0:6830fa3899e3 49 #define RFCTL 0x36
mfrede 0:6830fa3899e3 50
mfrede 0:6830fa3899e3 51 #define BBREG2 0x3A
mfrede 0:6830fa3899e3 52
mfrede 0:6830fa3899e3 53 #define BBREG6 0x3E
mfrede 0:6830fa3899e3 54 #define RSSITHCCA 0x3F
mfrede 0:6830fa3899e3 55
mfrede 0:6830fa3899e3 56 // MRF20J40 Long address control register mapping.
mfrede 0:6830fa3899e3 57 #define RFCTRL0 0x200
mfrede 0:6830fa3899e3 58
mfrede 0:6830fa3899e3 59 #define RFCTRL2 0x202
mfrede 0:6830fa3899e3 60 #define RFCTRL3 0x203
mfrede 0:6830fa3899e3 61
mfrede 0:6830fa3899e3 62 #define RFCTRL6 0x206
mfrede 0:6830fa3899e3 63 #define RFCTRL7 0x207
mfrede 0:6830fa3899e3 64 #define RFCTRL8 0x208
mfrede 0:6830fa3899e3 65
mfrede 0:6830fa3899e3 66 #define CLKINTCR 0x211
mfrede 0:6830fa3899e3 67 #define CLCCTRL 0x220
mfrede 0:6830fa3899e3 68
mfrede 0:6830fa3899e3 69 MRF24J40::MRF24J40(PinName mosi, PinName miso, PinName sck, PinName cs, PinName reset) ://, PinName irq, PinName wake) :
mfrede 0:6830fa3899e3 70 mSpi(mosi, miso, sck), // mosi, miso, sclk
mfrede 0:6830fa3899e3 71 mCs(cs),
mfrede 0:6830fa3899e3 72 mReset(reset)
mfrede 0:6830fa3899e3 73 // mIrq(irq),
mfrede 0:6830fa3899e3 74 // mWake(wake)
mfrede 0:6830fa3899e3 75 {
mfrede 0:6830fa3899e3 76 mSpi.format(8, 0); // 8 bits, cpol=0; cpha=0
mfrede 0:6830fa3899e3 77 mSpi.frequency(500000);
mfrede 0:6830fa3899e3 78 Reset();
mfrede 0:6830fa3899e3 79 }
mfrede 0:6830fa3899e3 80
mfrede 0:6830fa3899e3 81 /*
mfrede 0:6830fa3899e3 82 void MRF24J40::DebugDump(Serial &ser)
mfrede 0:6830fa3899e3 83 {
mfrede 0:6830fa3899e3 84 ser.printf("MRF24J40 registers:\r");
mfrede 0:6830fa3899e3 85 ser.printf("RXMCR=0x%X\r", MrfReadShort(RXMCR));
mfrede 0:6830fa3899e3 86 ser.printf("RXFLUSH=0x%X\r", MrfReadShort(RXFLUSH));
mfrede 0:6830fa3899e3 87 ser.printf("TXNMTRIG=0x%X\r", MrfReadShort(TXNMTRIG));
mfrede 0:6830fa3899e3 88 ser.printf("TXSR=0x%X\r", MrfReadShort(TXSR));
mfrede 0:6830fa3899e3 89 ser.printf("ISRSTS=0x%X\r", MrfReadShort(ISRSTS));
mfrede 0:6830fa3899e3 90 ser.printf("INTMSK=0x%X\r", MrfReadShort(INTMSK));
mfrede 0:6830fa3899e3 91 ser.printf("GPIO=0x%X\r", MrfReadShort(GPIO));
mfrede 0:6830fa3899e3 92 ser.printf("TRISGPIO=0x%X\r", MrfReadShort(TRISGPIO));
mfrede 0:6830fa3899e3 93 ser.printf("RFCTL=0x%X\r", MrfReadShort(RFCTL));
mfrede 0:6830fa3899e3 94 ser.printf("BBREG2=0x%X\r", MrfReadShort(BBREG2));
mfrede 0:6830fa3899e3 95 ser.printf("BBREG6=0x%X\r", MrfReadShort(BBREG6));
mfrede 0:6830fa3899e3 96 ser.printf("RSSITHCCA=0x%X\r", MrfReadShort(RSSITHCCA));
mfrede 0:6830fa3899e3 97
mfrede 0:6830fa3899e3 98
mfrede 0:6830fa3899e3 99 ser.printf("RFCTRL0=0x%X\r", MrfReadLong(RFCTRL0));
mfrede 0:6830fa3899e3 100 ser.printf("RFCTRL2=0x%X\r", MrfReadLong(RFCTRL2));
mfrede 0:6830fa3899e3 101 ser.printf("RFCTRL3=0x%X\r", MrfReadLong(RFCTRL3));
mfrede 0:6830fa3899e3 102 ser.printf("RFCTRL6=0x%X\r", MrfReadLong(RFCTRL6));
mfrede 0:6830fa3899e3 103 ser.printf("RFCTRL7=0x%X\r", MrfReadLong(RFCTRL7));
mfrede 0:6830fa3899e3 104 ser.printf("RFCTRL8=0x%X\r", MrfReadLong(RFCTRL8));
mfrede 0:6830fa3899e3 105 ser.printf("CLKINTCR=0x%X\r", MrfReadLong(CLKINTCR));
mfrede 0:6830fa3899e3 106 ser.printf("CLCCTRL=0x%X\r", MrfReadLong(CLCCTRL));
mfrede 0:6830fa3899e3 107 ser.printf("\r");
mfrede 0:6830fa3899e3 108 }
mfrede 0:6830fa3899e3 109 */
mfrede 0:6830fa3899e3 110
mfrede 0:6830fa3899e3 111 void MRF24J40::Reset(void)
mfrede 0:6830fa3899e3 112 {
mfrede 0:6830fa3899e3 113 mCs = 1;
mfrede 0:6830fa3899e3 114 // Pulse hardware reset.
mfrede 0:6830fa3899e3 115 mReset = 0;
mfrede 0:6830fa3899e3 116 wait_us(100);
mfrede 0:6830fa3899e3 117 mReset = 1;
mfrede 0:6830fa3899e3 118 wait_us(100);
mfrede 0:6830fa3899e3 119
mfrede 0:6830fa3899e3 120 // Reset RF module.
mfrede 0:6830fa3899e3 121 WriteShort(RFCTL, 0x04);
mfrede 0:6830fa3899e3 122 WriteShort(RFCTL, 0x00);
mfrede 0:6830fa3899e3 123
mfrede 0:6830fa3899e3 124 WriteShort(RFCTL, 0x00);
mfrede 0:6830fa3899e3 125
mfrede 0:6830fa3899e3 126 WriteShort(PANIDL, 0xAA);
mfrede 0:6830fa3899e3 127 WriteShort(PANIDH, 0xAA);
mfrede 0:6830fa3899e3 128 WriteShort(SADRL, 0xAA);
mfrede 0:6830fa3899e3 129 WriteShort(SADRH, 0xAA);
mfrede 0:6830fa3899e3 130
mfrede 0:6830fa3899e3 131 // Flush RX fifo.
mfrede 0:6830fa3899e3 132 WriteShort(RXFLUSH, 0x01);
mfrede 0:6830fa3899e3 133
mfrede 0:6830fa3899e3 134 // Write MAC addresses here. We don't care.
mfrede 0:6830fa3899e3 135
mfrede 0:6830fa3899e3 136 WriteLong(RFCTRL2, 0x80); // Enable RF PLL.
mfrede 0:6830fa3899e3 137
mfrede 0:6830fa3899e3 138 WriteLong(RFCTRL3, 0x00); // Full power.
mfrede 0:6830fa3899e3 139 WriteLong(RFCTRL6, 0x80); // Enable TX filter (recommended)
mfrede 0:6830fa3899e3 140 WriteLong(RFCTRL8, 0x10); // Enhanced VCO (recommended)
mfrede 0:6830fa3899e3 141
mfrede 0:6830fa3899e3 142 WriteShort(BBREG2,0x78); // Clear Channel Assesment use carrier sense.
mfrede 0:6830fa3899e3 143 WriteShort(BBREG6,0x40); // Calculate RSSI for Rx packet.
mfrede 0:6830fa3899e3 144 WriteShort(RSSITHCCA,0x00);// RSSI threshold for CCA.
mfrede 0:6830fa3899e3 145
mfrede 0:6830fa3899e3 146 WriteLong(RFCTRL0, 0x00); // Channel 11.
mfrede 0:6830fa3899e3 147
mfrede 0:6830fa3899e3 148 WriteShort(RXMCR, 0x01); // Don't check address upon reception.
mfrede 0:6830fa3899e3 149 // MrfWriteShort(RXMCR, 0x00); // Check address upon reception.
mfrede 0:6830fa3899e3 150
mfrede 0:6830fa3899e3 151 // Reset RF module with new settings.
mfrede 0:6830fa3899e3 152 WriteShort(RFCTL, 0x04);
mfrede 0:6830fa3899e3 153 WriteShort(RFCTL, 0x00);
mfrede 0:6830fa3899e3 154 }
mfrede 0:6830fa3899e3 155
mfrede 0:6830fa3899e3 156 void MRF24J40::Send(uint8_t *data, uint8_t length)
mfrede 0:6830fa3899e3 157 {
mfrede 0:6830fa3899e3 158 uint8_t i;
mfrede 0:6830fa3899e3 159
mfrede 0:6830fa3899e3 160 WriteLong(0x000, 0); // No addresses in header.
mfrede 0:6830fa3899e3 161 WriteLong(0x001, length); // 11 bytes
mfrede 0:6830fa3899e3 162 for(i=0; i<length; i++)
mfrede 0:6830fa3899e3 163 WriteLong(0x002+i, data[i]);
mfrede 0:6830fa3899e3 164
mfrede 0:6830fa3899e3 165 WriteShort(TXNMTRIG, 0x01);
mfrede 0:6830fa3899e3 166 }
mfrede 0:6830fa3899e3 167
mfrede 0:6830fa3899e3 168 uint8_t MRF24J40::Receive(uint8_t *data, uint8_t maxLength)
mfrede 0:6830fa3899e3 169 {
mfrede 0:6830fa3899e3 170 uint8_t i, length;
mfrede 0:6830fa3899e3 171 uint8_t lqi, rssi;
mfrede 0:6830fa3899e3 172
mfrede 0:6830fa3899e3 173 if(ReadShort(ISRSTS)& 0x08)
mfrede 0:6830fa3899e3 174 {
mfrede 0:6830fa3899e3 175 length = ReadLong(0x300);
mfrede 0:6830fa3899e3 176 lqi = ReadLong(0x301 + length);
mfrede 0:6830fa3899e3 177 rssi = ReadLong(0x302 + length);
mfrede 0:6830fa3899e3 178 for(i=0; i<length; i++)
mfrede 0:6830fa3899e3 179 if(i<maxLength)
mfrede 0:6830fa3899e3 180 *data++ = ReadLong(0x301 + (uint16_t)i);
mfrede 0:6830fa3899e3 181 else
mfrede 0:6830fa3899e3 182 ReadLong(0x301 + (uint16_t)i);
mfrede 0:6830fa3899e3 183 if(length < maxLength)
mfrede 0:6830fa3899e3 184 return length;
mfrede 0:6830fa3899e3 185 }
mfrede 0:6830fa3899e3 186 return 0;
mfrede 0:6830fa3899e3 187 }
mfrede 0:6830fa3899e3 188
mfrede 0:6830fa3899e3 189 uint8_t MRF24J40::ReadShort (uint8_t address)
mfrede 0:6830fa3899e3 190 {
mfrede 0:6830fa3899e3 191 uint8_t value;
mfrede 0:6830fa3899e3 192 mCs = 0;
mfrede 0:6830fa3899e3 193 wait_us(1);
mfrede 0:6830fa3899e3 194 mSpi.write((address<<1) & 0x7E);
mfrede 0:6830fa3899e3 195 wait_us(1);
mfrede 0:6830fa3899e3 196 value = mSpi.write(0xFF);
mfrede 0:6830fa3899e3 197 wait_us(1);
mfrede 0:6830fa3899e3 198 mCs = 1;
mfrede 0:6830fa3899e3 199 wait_us(1);
mfrede 0:6830fa3899e3 200 return value;
mfrede 0:6830fa3899e3 201 }
mfrede 0:6830fa3899e3 202
mfrede 0:6830fa3899e3 203 void MRF24J40::WriteShort (uint8_t address, uint8_t data)
mfrede 0:6830fa3899e3 204 {
mfrede 0:6830fa3899e3 205 mCs = 0;
mfrede 0:6830fa3899e3 206 wait_us(1);
mfrede 0:6830fa3899e3 207 mSpi.write(((address<<1) & 0x7E) | 0x01);
mfrede 0:6830fa3899e3 208 wait_us(1);
mfrede 0:6830fa3899e3 209 mSpi.write(data);
mfrede 0:6830fa3899e3 210 wait_us(1);
mfrede 0:6830fa3899e3 211 mCs = 1;
mfrede 0:6830fa3899e3 212 wait_us(1);
mfrede 0:6830fa3899e3 213 }
mfrede 0:6830fa3899e3 214
mfrede 0:6830fa3899e3 215 uint8_t MRF24J40::ReadLong (uint16_t address)
mfrede 0:6830fa3899e3 216 {
mfrede 0:6830fa3899e3 217 uint8_t value;
mfrede 0:6830fa3899e3 218 mCs = 0;
mfrede 0:6830fa3899e3 219 wait_us(1);
mfrede 0:6830fa3899e3 220 mSpi.write((address>>3) | 0x80);
mfrede 0:6830fa3899e3 221 wait_us(1);
mfrede 0:6830fa3899e3 222 mSpi.write((address<<5) & 0xE0);
mfrede 0:6830fa3899e3 223 wait_us(1);
mfrede 0:6830fa3899e3 224 value = mSpi.write(0xFF);
mfrede 0:6830fa3899e3 225 wait_us(1);
mfrede 0:6830fa3899e3 226 mCs = 1;
mfrede 0:6830fa3899e3 227 wait_us(1);
mfrede 0:6830fa3899e3 228 return value;
mfrede 0:6830fa3899e3 229 }
mfrede 0:6830fa3899e3 230
mfrede 0:6830fa3899e3 231 void MRF24J40::WriteLong (uint16_t address, uint8_t data)
mfrede 0:6830fa3899e3 232 {
mfrede 0:6830fa3899e3 233 mCs = 0;
mfrede 0:6830fa3899e3 234 wait_us(1);
mfrede 0:6830fa3899e3 235 mSpi.write((address>>3) | 0x80);
mfrede 0:6830fa3899e3 236 wait_us(1);
mfrede 0:6830fa3899e3 237 mSpi.write(((address<<5) & 0xE0) | 0x10);
mfrede 0:6830fa3899e3 238 wait_us(1);
mfrede 0:6830fa3899e3 239 mSpi.write(data);
mfrede 0:6830fa3899e3 240 wait_us(1);
mfrede 0:6830fa3899e3 241 mCs = 1;
mfrede 0:6830fa3899e3 242 wait_us(1);
mfrede 0:6830fa3899e3 243 }
mfrede 0:6830fa3899e3 244
mfrede 0:6830fa3899e3 245 void MRF24J40::SetChannel(uint8_t channel)
mfrede 0:6830fa3899e3 246 {
mfrede 0:6830fa3899e3 247 WriteLong(RFCTRL0, (channel & 0x0F)<<4 | 0x03); // Set channel, leave RFOPT bits at recommended
mfrede 0:6830fa3899e3 248
mfrede 0:6830fa3899e3 249 //Reset the board by first writing a 4 to RFCTL, then writing a 0
mfrede 0:6830fa3899e3 250 WriteShort(RFCTL, 0x04);
mfrede 0:6830fa3899e3 251 WriteShort(RFCTL, 0x00);
mfrede 0:6830fa3899e3 252 wait(0.5);
mfrede 0:6830fa3899e3 253 }