rfm.c

无线传感器网络操作系统源代码

/*									tab:4
 *
 *
 * "Copyright (c) 2000 and The Regents of the University 
 * of California.  All rights reserved.
 *
 * Permission to use, copy, modify, and distribute this software and its
 * documentation for any purpose, without fee, and without written agreement is
 * hereby granted, provided that the above copyright notice and the following
 * two paragraphs appear in all copies of this software.
 * 
 * IN NO EVENT SHALL THE UNIVERSITY OF CALIFORNIA BE LIABLE TO ANY PARTY FOR
 * DIRECT, INDIRECT, SPECIAL, INCIDENTAL, OR CONSEQUENTIAL DAMAGES ARISING OUT
 * OF THE USE OF THIS SOFTWARE AND ITS DOCUMENTATION, EVEN IF THE UNIVERSITY OF
 * CALIFORNIA HAS BEEN ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
 * 
 * THE UNIVERSITY OF CALIFORNIA SPECIFICALLY DISCLAIMS ANY WARRANTIES,
 * INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY
 * AND FITNESS FOR A PARTICULAR PURPOSE.  THE SOFTWARE PROVIDED HEREUNDER IS
 * ON AN "AS IS" BASIS, AND THE UNIVERSITY OF CALIFORNIA HAS NO OBLIGATION TO
 * PROVIDE MAINTENANCE, SUPPORT, UPDATES, ENHANCEMENTS, OR MODIFICATIONS."
 *
 * Authors:		Jason Hill
 *
 *
 */



/*
 * This component performs bit level control over the RF Monolitics radio.
 * Addtionally, it controls the amount of time per bit by using TCNT1.
 * The sample period can be set to 1/2x, 3/4x, and x. Where x is the 
 * bit transmisison period. 1/2 and 3/4 are provided to do sampling 
 * and then read at the point half way between samples.
 * 
 */



#include "tos.h"
#include "RFM.h"
#include "dbg.h"


#define TOS_FRAME_TYPE RFM_frame
TOS_FRAME_BEGIN(RFM_frame) {
        char state;
	char precision;
}
TOS_FRAME_END(RFM_frame);

//states:
// 0 == receive mode;
// 1 == transmit mode;
// 2 == low power mode;

extern int bit_timer;
extern char increment;
extern char value1;
TOS_SIGNAL_HANDLER(SIG_OUTPUT_COMPARE1A, ()){
    //dbg(DBG_RADIO, ("state %d, bitIn %d, first: %x\n", VAR(state), bitIn, VAR(first)));
    char in;
    int avilable = 0x190;
    if (VAR(precision)) {
	value1 += increment;
	avilable = bit_timer;
	if (value1 & 0x10) {
	    avilable++;
	    value1 &= 0xf;
	}
	outp(avilable >> 8, OCR1AH); // set upper byte of comp reg.
	outp(avilable & 0xff, OCR1AL); // set the lower byte compare
    }
    if(VAR(state) == 1){
	//if we are writing, then fire the bit send event.
      TOS_SIGNAL_EVENT(RFM_TX_BIT_EVENT)(); 
    } else if(VAR(state) == 0){
	//if we are reading, read in the value.
        in = READ_RFM_RXD_PIN();
	//fire the bit arrived event and send up the value.
	TOS_SIGNAL_EVENT(RFM_RX_BIT_EVENT)(in);
       }
}

 char TOS_COMMAND(RFM_TX_BIT)(char data){
     //if not in the transmit mote fail.
     if(VAR(state) != 1) return 0;
	//sent the output pin accordingly.
        if(data & 0x01){
            SET_RFM_TXD_PIN();
        }
        else{
            CLR_RFM_TXD_PIN();
        }

       return 1;
 }


 char TOS_COMMAND(RFM_PWR)(char mode){
if(mode == 0){
    //turn off the RFM chip.
    CLR_RFM_CTL0_PIN();
    CLR_RFM_CTL1_PIN();
	// disable timer1 interupt
    outp(0x00, TCCR1B); // scale the counter
    cbi(TIMSK, OCIE1A); 
    //record the current state.
     VAR(state) = 2;
}else if(mode == 1){
    VAR(state) = 3;
    outp(0x09, TCCR1B); // scale the counter
    sbi(TIMSK, OCIE1A); 
}
     return 1;
 }
 char TOS_COMMAND(RFM_TX_MODE)(){
    if(VAR(state) == 2) return 0;
    //set the RFM chip to TX mode.
    SET_RFM_CTL0_PIN();
    CLR_RFM_CTL1_PIN();

	dbg(DBG_RADIO, ("RADIO: set TX mode....\n"));

    //record the current state.
     VAR(state) = 1;
	return 1;
 }
 char TOS_COMMAND(RFM_RX_MODE)(){
    if(VAR(state) == 2) return 0;
    //set the RFM to RX mode.
    SET_RFM_CTL0_PIN();
    SET_RFM_CTL1_PIN();
    CLR_RFM_TXD_PIN();

	dbg(DBG_RADIO, ("RADIO: set RX mode....\n"));

    //record the current state.
     VAR(state) = 0;
	return 1;
}

char TOS_COMMAND(RFM_SET_BIT_RATE)(char level){
    if(level == 0){
	VAR(precision) = 0;
	outp(0x00, OCR1AH); // set upper byte of comp reg.
	outp(0xc8, OCR1AL); // set the lower byte compare
    	outp(0x00, TCNT1H); // clear current counter value
    	outp(0x00, TCNT1L); // clear current couter high byte value
    }else if(level == 1){
	VAR(precision) = 0;
	outp(0x01, OCR1AH); // set upper byte of comp reg.
	outp(0x2c, OCR1AL); // set the lower byte compare
    }else if(level == 2){
	VAR(precision) = 1;
	outp(bit_timer >> 8, OCR1AH); // set upper byte of comp reg.
	outp(bit_timer & 0xff, OCR1AL); // set the lower byte compare
	outp(0x01, OCR1AH); // set upper byte of comp reg.
	outp(0x90, OCR1AL); // set the lower byte compare
    }
	return 1;
}


 char TOS_COMMAND(RFM_INIT)(){
    //assume RX_state.
    VAR(state) = 0;


    //set the RFM pins.
    SET_RFM_CTL0_PIN();
    SET_RFM_CTL1_PIN();
    CLR_RFM_TXD_PIN();

    cbi(TIMSK, OCIE1A); //cear interrupts
    cbi(TIMSK, TICIE1); //cear interrupts
    cbi(TIMSK, TOIE1); //cear interrupts
    cbi(TIMSK, OCIE1B); //cear interrupts
    outp(0x09, TCCR1B); // scale the counter
    outp(0x00, TCCR1A);
    outp(0x00, OCR1AH); // set upper byte of comp reg.
    outp(0xc8, OCR1AL); // set the lower byte compare
    sbi(TIMSK, OCIE1A); // enable timer1 interupt
    outp(0x00, TCNT1H); // clear current counter value
    outp(0x00, TCNT1L); // clear current couter high byte value
    sei(); //enable system interrupts.

	return 1;
 }