madrona-rad 0.2.4 → 0.2.5

data/lib/examples/two_wire.rb

@@ -0,0 +1,14 @@
+class TwoWire < ArduinoSketch
+
+  # just a demo that two_wire loads
+
+  output_pin 19, :as => :wire, :device => :i2c, :enable => :true
+  
+  def loop
+
+	  x = 4    
+  
+  end
+    
+
+end

data/lib/libraries/DS1307/DS1307.cpp

@@ -0,0 +1,161 @@
+extern "C" {
+#include <../Wire/Wire.h>
+}
+#include "DS1307.h"
+
+DS1307::DS1307()
+{
+  // Wire.begin();
+}
+
+DS1307 RTC=DS1307();
+
+// PRIVATE FUNCTIONS
+
+// Aquire data from the RTC chip in BCD format
+// refresh the buffer
+void DS1307::read(void)
+{
+  // use the Wire lib to connect to tho rtc
+  // reset the register pointer to zero
+  Wire.beginTransmission(DS1307_CTRL_ID);
+    Wire.send(0x00);
+  Wire.endTransmission();
+
+  // request the 7 bytes of data    (secs, min, hr, dow, date, mth, yr) 
+  Wire.requestFrom(DS1307_CTRL_ID, 7);
+  for(int i=0; i<7; i++)
+  {
+    // store data in raw bcd format
+    rtc_bcd[i]=Wire.receive();
+  }
+}
+
+// update the data on the IC from the bcd formatted data in the buffer
+void DS1307::save(void)
+{
+  Wire.beginTransmission(DS1307_CTRL_ID);
+  Wire.send(0x00); // reset register pointer
+  for(int i=0; i<7; i++)
+  {
+    Wire.send(rtc_bcd[i]);
+  }
+  Wire.endTransmission();
+}
+
+
+// PUBLIC FUNCTIONS
+/*
+void DS1307::get(int *rtc, boolean refresh)   // Aquire data from buffer and convert to int, refresh buffer if required
+{
+  if(refresh) read();
+  for(int i=0;i<7;i++)  // cycle through each component, create array of data
+  {
+	rtc[i]=get(i, 0);
+  }
+}
+*/
+
+int DS1307::get(int c, boolean refresh)  // aquire individual RTC item from buffer, return as int, refresh buffer if required
+{
+  if(refresh) read();
+  int v=-1;
+  switch(c)
+  {
+  case DS1307_SEC:
+    v=(10*((rtc_bcd[DS1307_SEC] & DS1307_HI_SEC)>>4))+(rtc_bcd[DS1307_SEC] & DS1307_LO_BCD);
+	break;
+  case DS1307_MIN:
+    v=(10*((rtc_bcd[DS1307_MIN] & DS1307_HI_MIN)>>4))+(rtc_bcd[DS1307_MIN] & DS1307_LO_BCD);
+	break;
+  case DS1307_HR:
+    v=(10*((rtc_bcd[DS1307_HR] & DS1307_HI_HR)>>4))+(rtc_bcd[DS1307_HR] & DS1307_LO_BCD);
+	break;
+  case DS1307_DOW:
+    v=rtc_bcd[DS1307_DOW] & DS1307_LO_DOW;
+	break;
+  case DS1307_DATE:
+    v=(10*((rtc_bcd[DS1307_DATE] & DS1307_HI_DATE)>>4))+(rtc_bcd[DS1307_DATE] & DS1307_LO_BCD);
+	break;
+  case DS1307_MTH:
+    v=(10*((rtc_bcd[DS1307_MTH] & DS1307_HI_MTH)>>4))+(rtc_bcd[DS1307_MTH] & DS1307_LO_BCD);
+	break;
+  case DS1307_YR:
+    v=(10*((rtc_bcd[DS1307_YR] & DS1307_HI_YR)>>4))+(rtc_bcd[DS1307_YR] & DS1307_LO_BCD)+DS1307_BASE_YR;
+	break; 
+  } // end switch
+  return v;
+} 
+
+void DS1307::set(int c, int v)  // Update buffer, then update the chip
+{
+  switch(c)
+  {
+  case DS1307_SEC:
+    if(v<60 && v>-1)
+    {
+	//preserve existing clock state (running/stopped)
+	int state=rtc_bcd[DS1307_SEC] & DS1307_CLOCKHALT;
+	rtc_bcd[DS1307_SEC]=state | ((v / 10)<<4) + (v % 10);
+    }
+    break; 
+  case DS1307_MIN:
+    if(v<60 && v>-1)
+    {
+	rtc_bcd[DS1307_MIN]=((v / 10)<<4) + (v % 10);
+    }
+    break;
+  case DS1307_HR:
+  // TODO : AM/PM  12HR/24HR
+    if(v<24 && v>-1)
+    {
+	rtc_bcd[DS1307_HR]=((v / 10)<<4) + (v % 10);
+    }
+    break;
+  case DS1307_DOW: 
+    if(v<8 && v>-1)
+    {
+	rtc_bcd[DS1307_DOW]=v;
+    }
+    break;
+  case DS1307_DATE:
+    if(v<31 && v>-1)
+    {
+	rtc_bcd[DS1307_DATE]=((v / 10)<<4) + (v % 10);
+    }
+    break;
+  case DS1307_MTH:
+    if(v<13 && v>-1)
+    {
+	rtc_bcd[DS1307_MTH]=((v / 10)<<4) + (v % 10);
+    }
+    break;
+  case DS1307_YR:
+    if(v<13 && v>-1)
+    {
+	rtc_bcd[DS1307_YR]=((v / 10)<<4) + (v % 10);
+    }
+    break;
+  } // end switch
+  save();
+}
+
+void DS1307::stop(void)
+{
+	// set the ClockHalt bit high to stop the rtc
+	// this bit is part of the seconds byte
+    rtc_bcd[DS1307_SEC]=rtc_bcd[DS1307_SEC] | DS1307_CLOCKHALT;
+    save();
+}
+
+void DS1307::start(void)
+{
+	// unset the ClockHalt bit to start the rtc
+	// TODO : preserve existing seconds
+    rtc_bcd[DS1307_SEC]=0;
+	save();
+}
+
+
+
+ 

data/lib/libraries/DS1307/DS1307.h

@@ -0,0 +1,64 @@
+/*
+  DS1307.h - library for DS1307 rtc
+*/
+
+// ensure this library description is only included once
+#ifndef DS1307_h
+#define DS1307_h
+
+// include types & constants of Wiring core API
+#include <WConstants.h>
+
+// include types & constants of Wire ic2 lib
+#include <../Wire/Wire.h>
+
+#define DS1307_SEC 0
+#define DS1307_MIN 1
+#define DS1307_HR 2
+#define DS1307_DOW 3
+#define DS1307_DATE 4
+#define DS1307_MTH 5
+#define DS1307_YR 6
+#define DS1307_CTRL	7
+
+#define DS1307_BASE_YR 2000
+
+#define DS1307_CTRL_ID B1101000  //DS1307
+
+ // Define register bit masks  
+#define DS1307_CLOCKHALT B10000000
+ 
+#define DS1307_LO_BCD  B00001111
+#define DS1307_HI_BCD  B11110000
+
+#define DS1307_HI_SEC  B01110000
+#define DS1307_HI_MIN  B01110000
+#define DS1307_HI_HR   B00110000
+#define DS1307_LO_DOW  B00000111
+#define DS1307_HI_DATE B00110000
+#define DS1307_HI_MTH  B00110000
+#define DS1307_HI_YR   B11110000
+
+// library interface description
+class DS1307
+{
+  // user-accessible "public" interface
+  public:
+    DS1307();
+    // void get(int *, boolean);
+    int get(int, boolean);
+	void set(int, int);
+    void start(void);
+    void stop(void);
+
+  // library-accessible "private" interface
+  private:
+    byte rtc_bcd[7]; // used prior to read/set ds1307 registers;
+	void read(void);
+	void save(void);
+};
+
+extern DS1307 RTC;
+
+#endif
+ 

data/lib/libraries/DS1307/keywords.txt

@@ -0,0 +1,18 @@
+#######################################
+# Syntax Coloring Map For Ultrasound
+#######################################
+
+#######################################
+# Datatypes (KEYWORD1)
+#######################################
+
+DS1307	KEYWORD1
+
+#######################################
+# Methods and Functions (KEYWORD2)
+#######################################
+
+#######################################
+# Constants (LITERAL1)
+#######################################
+

data/lib/libraries/OneWire/OneWire.cpp

@@ -0,0 +1,194 @@
+/*
+
+// -----------------------------------------------------------
+// This is an 'abbreviated' OneWire Library with functions
+// only to handle a single device per line, no ROM-IDs will 
+// be read. It is a subset of the original fom the Arduino
+// IDE - Brian Riley, Underhill Center, VT July 2008
+// -----------------------------------------------------------
+Copyright (c) 2007, Jim Studt
+
+Updated to work with arduino-0008 and to include skip() as of
+2007/07/06. --RJL20
+
+Permission is hereby granted, free of charge, to any person obtaining
+a copy of this software and associated documentation files (the
+"Software"), to deal in the Software without restriction, including
+without limitation the rights to use, copy, modify, merge, publish,
+distribute, sublicense, and/or sell copies of the Software, and to
+permit persons to whom the Software is furnished to do so, subject to
+the following conditions:
+
+The above copyright notice and this permission notice shall be
+included in all copies or substantial portions of the Software.
+
+THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
+EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
+MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
+NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE
+LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION
+OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
+WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
+
+Much of the code was inspired by Derek Yerger's code, though I don't
+think much of that remains.  In any event that was..
+    (copyleft) 2006 by Derek Yerger - Free to distribute freely.
+
+The CRC code was excerpted and inspired by the Dallas Semiconductor 
+sample code bearing this copyright.
+//---------------------------------------------------------------------------
+// Copyright (C) 2000 Dallas Semiconductor Corporation, All Rights Reserved.
+//
+// Permission is hereby granted, free of charge, to any person obtaining a
+// copy of this software and associated documentation files (the "Software"),
+// to deal in the Software without restriction, including without limitation
+// the rights to use, copy, modify, merge, publish, distribute, sublicense,
+// and/or sell copies of the Software, and to permit persons to whom the
+// Software is furnished to do so, subject to the following conditions:
+//
+// The above copyright notice and this permission notice shall be included
+// in all copies or substantial portions of the Software.
+//
+// THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS
+// OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
+// MERCHANTABILITY,  FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.
+// IN NO EVENT SHALL DALLAS SEMICONDUCTOR BE LIABLE FOR ANY CLAIM, DAMAGES
+// OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE,
+// ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR
+// OTHER DEALINGS IN THE SOFTWARE.
+//
+// Except as contained in this notice, the name of Dallas Semiconductor
+// shall not be used except as stated in the Dallas Semiconductor
+// Branding Policy.
+//--------------------------------------------------------------------------
+*/
+
+#include "OneWire.h"
+
+extern "C" {
+#include "WConstants.h"
+#include <avr/io.h>
+#include "pins_arduino.h"
+}
+
+
+OneWire::OneWire( uint8_t pinArg)
+{
+    pin = pinArg;
+    port = digitalPinToPort(pin);
+    bitmask =  digitalPinToBitMask(pin);
+    outputReg = portOutputRegister(port);
+    inputReg = portInputRegister(port);
+    modeReg = portModeRegister(port);
+}
+
+//
+// Perform the onewire reset function.  We will wait up to 250uS for
+// the bus to come high, if it doesn't then it is broken or shorted
+// and we return a 0;
+//
+// Returns 1 if a device asserted a presence pulse, 0 otherwise.
+//
+uint8_t OneWire::reset() {
+    uint8_t r;
+    uint8_t retries = 125;
+
+    // wait until the wire is high... just in case
+    pinMode(pin,INPUT);
+    do {
+	if ( retries-- == 0) return 0;
+	delayMicroseconds(2); 
+    } while( !digitalRead( pin));
+    
+    digitalWrite(pin,0);   // pull low for 500uS
+    pinMode(pin,OUTPUT);
+    delayMicroseconds(500);
+    pinMode(pin,INPUT);
+    delayMicroseconds(65);
+    r = !digitalRead(pin);
+    delayMicroseconds(490);
+    return r;
+}
+
+//
+// Write a bit. Port and bit is used to cut lookup time and provide
+// more certain timing.
+//
+void OneWire::write_bit(uint8_t v) {
+    static uint8_t lowTime[] = { 55, 5 };
+    static uint8_t highTime[] = { 5, 55};
+    
+    v = (v&1);
+    *modeReg |= bitmask;  // make pin an output, do first since we
+                          // expect to be at 1
+    *outputReg &= ~bitmask; // zero
+    delayMicroseconds(lowTime[v]);
+    *outputReg |= bitmask; // one, push pin up - important for
+                           // parasites, they might start in here
+    delayMicroseconds(highTime[v]);
+}
+
+//
+// Read a bit. Port and bit is used to cut lookup time and provide
+// more certain timing.
+//
+uint8_t OneWire::read_bit() {
+    uint8_t r;
+    
+    *modeReg |= bitmask;    // make pin an output, do first since we expect to be at 1
+    *outputReg &= ~bitmask; // zero
+    delayMicroseconds(1);
+    *modeReg &= ~bitmask;     // let pin float, pull up will raise
+    delayMicroseconds(5);          // A "read slot" is when 1mcs > t > 2mcs
+    r = ( *inputReg & bitmask) ? 1 : 0; // check the bit
+    delayMicroseconds(50);        // whole bit slot is 60-120uS, need to give some time
+    
+    return r;
+}
+
+//
+// Write a byte. The writing code uses the active drivers to raise the
+// pin high, if you need power after the write (e.g. DS18S20 in
+// parasite power mode) then set 'power' to 1, otherwise the pin will
+// go tri-state at the end of the write to avoid heating in a short or
+// other mishap.
+//
+void OneWire::write(uint8_t v, uint8_t power) {
+    uint8_t bitMask;
+    
+    for (bitMask = 0x01; bitMask; bitMask <<= 1) {
+	OneWire::write_bit( (bitMask & v)?1:0);
+    }
+    if ( !power) {
+	pinMode(pin,INPUT);
+	digitalWrite(pin,0);
+    }
+}
+
+//
+// Read a byte
+//
+uint8_t OneWire::read() {
+    uint8_t bitMask;
+    uint8_t r = 0;
+    
+    for (bitMask = 0x01; bitMask; bitMask <<= 1) {
+	if ( OneWire::read_bit()) r |= bitMask;
+    }
+    return r;
+}
+
+
+//
+// Do a ROM skip
+//
+void OneWire::skip()
+{
+    write(0xCC,0);         // Skip ROM
+}
+
+void OneWire::depower()
+{
+    pinMode(pin,INPUT);
+}
+