autoack-tx.c

/*
 * Copyright (c) 2010, Mariano Alvira <mar@devl.org> and other contributors
 * to the MC1322x project (http://mc1322x.devl.org)
 * All rights reserved.
 *
 * Redistribution and use in source and binary forms, with or without
 * modification, are permitted provided that the following conditions
 * are met:
 * 1. Redistributions of source code must retain the above copyright
 *    notice, this list of conditions and the following disclaimer.
 * 2. Redistributions in binary form must reproduce the above copyright
 *    notice, this list of conditions and the following disclaimer in the
 *    documentation and/or other materials provided with the distribution.
 * 3. Neither the name of the Institute nor the names of its contributors
 *    may be used to endorse or promote products derived from this software
 *    without specific prior written permission.
 *
 * THIS SOFTWARE IS PROVIDED BY THE INSTITUTE AND CONTRIBUTORS ``AS IS'' AND
 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
 * ARE DISCLAIMED.  IN NO EVENT SHALL THE INSTITUTE OR CONTRIBUTORS BE LIABLE
 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
 * SUCH DAMAGE.
 *
 * This file is part of libmc1322x: see http://mc1322x.devl.org
 * for details. 
 *
 *
 */

#include <mc1322x.h>
#include <board.h>
#include <stdio.h>

#include "tests.h"
#include "config.h"

#define LED LED_RED

/* 802.15.4 PSDU is 127 MAX */
/* 2 bytes are the FCS */
/* therefore 125 is the max payload length */
#define PAYLOAD_LEN 16
#define DELAY 100000

void fill_packet(volatile packet_t *p) {
        static volatile uint8_t count=0;

        p->length = 16;
        p->offset = 0;
        p->data[0] = 0x71;  /* 0b 10 01 10 000 1 1 0 0 001 data, ack request, short addr */
        p->data[1] = 0x98;  /* 0b 10 01 10 000 1 1 0 0 001 data, ack request, short addr */
        p->data[2] = count++; /* dsn */
        p->data[3] = 0xaa;    /* pan */
        p->data[4] = 0xaa;
        p->data[5] = 0x11;    /* dest. short addr. */
        p->data[6] = 0x11;
        p->data[7] = 0x22;    /* src. short addr. */
        p->data[8] = 0x22;

        /* payload */
        p->data[9] = 'a';
        p->data[10] = 'c';
        p->data[11] = 'k';
        p->data[12] = 't';
        p->data[13] = 'e';
        p->data[14] = 's';
        p->data[15] = 't';

}

void maca_tx_callback(volatile packet_t *p) {
        switch(p->status) {
        case 0:
                printf("TX OK\n\r");
                break;
        case 3:
                printf("CRC ERR\n\r");
                break;
        case 5:
                printf("NO ACK\n\r");
                break;
        default:
                printf("unknown status: %d\n", (int)p->status);
        }
}

void main(void) {
        volatile packet_t *p;
        char c;
        uint16_t r=30; /* start reception 100us before ack should arrive */
        uint16_t end=180; /* 750 us receive window*/

        /* trim the reference osc. to 24MHz */
        trim_xtal();

        uart_init(INC, MOD, SAMP);

        vreg_init();

        maca_init();

        set_channel(0); /* channel 11 */
//      set_power(0x0f); /* 0xf = -1dbm, see 3-22 */
//      set_power(0x11); /* 0x11 = 3dbm, see 3-22 */
        set_power(0x12); /* 0x12 is the highest, not documented */

        /* sets up tx_on, should be a board specific item */
        GPIO->FUNC_SEL_44 = 1;   
        GPIO->PAD_DIR_SET_44 = 1;        

        GPIO->FUNC_SEL_45 = 2;   
        GPIO->PAD_DIR_SET_45 = 1;        

        *MACA_RXACKDELAY = r;
        
        printf("rx warmup: %d\n\r", (int)(*MACA_WARMUP & 0xfff));

        *MACA_RXEND = end;

        printf("rx end: %d\n\r", (int)(*MACA_RXEND & 0xfff));

        set_prm_mode(AUTOACK);

        print_welcome("rftest-tx");

        while(1) {              
                        
                /* call check_maca() periodically --- this works around */
                /* a few lockup conditions */
                check_maca();

                while((p = rx_packet())) {
                        if(p) {
                                printf("RX: ");
                                print_packet(p);
                                free_packet(p);
                        }
                }

                if(uart1_can_get()) {
                        c = uart1_getc();

                        switch(c) {
                        case 'z':
                                r++;
                                if(r > 4095) { r = 0; }
                                *MACA_RXACKDELAY = r;
                                printf("rx ack delay: %d\n\r", r);
                                break;
                        case 'x':
                                if(r == 0) { r = 4095; } else { r--; }
                                *MACA_RXACKDELAY = r;
                                printf("rx ack delay: %d\n\r", r);
                                break;
                        case 'q':
                                end++;
                                if(r > 4095) { r = 0; }
                                *MACA_RXEND = end;
                                printf("rx end: %d\n\r", end);
                                break;
                        case 'w':
                                end--;
                                if(r == 0) { r = 4095; } else { r--; }
                                *MACA_RXEND = end;
                                printf("rx end: %d\n\r", end);
                                break;
                        default:
                                p = get_free_packet();
                                if(p) {
                                        fill_packet(p);
                                        
                                        printf("autoack-tx --- ");
                                        print_packet(p);
                                        
                                        tx_packet(p);                           
                                }
                                break;
                        }
                }
                
        }

}