osd-contiki/platform/msb430/contiki-msb430-main.c

236 lines
5.5 KiB
C
Raw Normal View History

2007-06-28 14:49:57 +02:00
/*
* Copyright (c) 2007, Swedish Institute of Computer Science
* 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 the Contiki operating system.
*
*/
/**
* \file
* Main system file for the MSB-430 port.
* \author
* Michael Baar <baar@inf.fu-berlin.de>, Nicolas Tsiftes <nvt@sics.se>
*/
#include <io.h>
#include <signal.h>
#include <stdio.h>
#include <string.h>
#include "contiki-msb430.h"
#include "sys/procinit.h"
#include "sys/autostart.h"
#include "dev/adc.h"
#include "dev/dma.h"
#include "dev/sht11.h"
2007-06-28 14:49:57 +02:00
#include "net/mac/nullmac.h"
#include "net/mac/xmac.h"
#include "dev/slip.h"
extern volatile bool uart_edge;
2007-06-28 14:49:57 +02:00
SENSORS(NULL);
#if WITH_UIP
static struct uip_fw_netif slipif =
{UIP_FW_NETIF(192,168,1,2, 255,255,255,255, slip_send)};
#else
int
putchar(int c)
{
rs232_send(c);
return c;
}
#endif /* WITH_UIP */
2007-06-28 14:49:57 +02:00
static void
set_rime_addr(void)
{
rimeaddr_t addr;
2007-06-28 14:49:57 +02:00
addr.u16[0] = node_id;
rimeaddr_set_node_addr(&addr);
}
static void
msb_ports_init(void)
{
P1SEL = 0x00; P1OUT = 0x00; P1DIR = 0x00;
P2SEL = 0x00; P2OUT = 0x18; P2DIR = 0x1A;
P3SEL = 0x00; P3OUT = 0x09; P3DIR = 0x21;
P4SEL = 0x00; P4OUT = 0x00; P4DIR = 0x00;
P5SEL = 0x0E; P5OUT = 0xF9; P5DIR = 0xFD;
P6SEL = 0x07; P6OUT = 0x00; P6DIR = 0xC8;
2007-06-28 14:49:57 +02:00
}
int
main(void)
{
msp430_cpu_init();
/* Platform-specific initialization. */
msb_ports_init();
adc_init();
dma_init();
2007-06-28 14:49:57 +02:00
clock_init();
rtimer_init();
ctimer_init();
sht11_init();
2007-06-28 14:49:57 +02:00
leds_init();
leds_on(LEDS_ALL);
// low level
irq_init();
process_init();
// serial interface
rs232_init();
#ifdef WITH_SDC
spi_init();
#endif
uart_lock(UART_MODE_RS232);
uart_unlock(UART_MODE_RS232);
#if WITH_UIP
slip_arch_init(BAUD2UBR(115200));
#endif
/* System services */
process_start(&etimer_process, NULL);
//process_start(&sensors_process, NULL);
2007-06-28 14:49:57 +02:00
//cc1020_init(cc1020_config_19200);
2007-06-28 14:49:57 +02:00
// network configuration
node_id_restore();
#if WITH_UIP
uip_init();
uip_sethostaddr(&slipif.ipaddr);
uip_setnetmask(&slipif.netmask);
uip_fw_default(&slipif); /* Point2point, no default router. */
tcpip_set_forwarding(0);
#endif /* WITH_UIP */
2007-06-28 14:49:57 +02:00
nullmac_init(&cc1020_driver);
rime_init(&nullmac_driver);
set_rime_addr();
energest_init();
#if WITH_UIP
process_start(&tcpip_process, NULL);
process_start(&uip_fw_process, NULL); /* Start IP output */
process_start(&slip_process, NULL);
#endif /* WITH_UIP */
#if PROFILE_CONF_ON
profile_init();
#endif /* PROFILE_CONF_ON */
leds_off(LEDS_ALL);
lpm_on();
printf(CONTIKI_VERSION_STRING " started. Node id %u.", node_id);
2007-06-28 14:49:57 +02:00
autostart_start((struct process **) autostart_processes);
/*
* This is the scheduler loop.
*/
ENERGEST_ON(ENERGEST_TYPE_CPU);
while (1) {
int r;
#if PROFILE_CONF_ON
profile_episode_start();
#endif /* PROFILE_CONF_ON */
do {
/* Reset watchdog. */
r = process_run();
} while(r > 0);
#if PROFILE_CONF_ON
profile_episode_end();
#endif /* PROFILE_CONF_ON */
/*
* Idle processing.
*/
int s = splhigh(); /* Disable interrupts. */
if (process_nevents() != 0) {
splx(s); /* Re-enable interrupts. */
} else {
static unsigned long irq_energest = 0;
/* Re-enable interrupts and go to sleep atomically. */
2007-12-10 13:49:08 +01:00
ENERGEST_OFF(ENERGEST_TYPE_CPU);
ENERGEST_ON(ENERGEST_TYPE_LPM);
/*
* We only want to measure the processing done in IRQs when we
* are asleep, so we discard the processing time done when we
* were awake.
*/
energest_type_set(ENERGEST_TYPE_IRQ, irq_energest);
if (uart_edge) {
_BIS_SR(LPM1_bits + GIE);
} else {
_BIS_SR(LPM1_bits + GIE);
}
/*
* We get the current processing time for interrupts that was
* done during the LPM and store it for next time around.
*/
dint();
irq_energest = energest_type_time(ENERGEST_TYPE_IRQ);
eint();
2007-12-10 13:49:08 +01:00
ENERGEST_OFF(ENERGEST_TYPE_LPM);
ENERGEST_ON(ENERGEST_TYPE_CPU);
#if PROFILE_CONF_ON
profile_clear_timestamps();
#endif /* PROFILE_CONF_ON */
}
2007-06-28 14:49:57 +02:00
}
return 0;
}