Ruben’s blog

/*
  DS160 example
 
  Reading temperature from DS1620 digital temperature sensor 
  and showing the result via serial interface.
 
 
  Arduino    DS1620
  pin 3  ->    RST
  pin 4  ->    CLK
  pin 5  ->    DQ
 
  by Ruben Laguna
  based on examples from Tom Tigoe <http://www.arduino.cc/en/Reference/SoftwareSerialExample>
  and phanderson <http://www.phanderson.com/printer/ds1620/ds1620.html>
  written: 30 Aug 2008
 
 
*/
 
// include the SoftwareSerial library so you can use its functions:
#include <SoftwareSerial.h>
 
#define rxPin 0
#define txPin 1
#define ledPin 13
#define buttonPin 2
 
#define rstPin 3
#define clkPin 4
#define dqPin 5
 
 
 
 
// set up a new serial port
SoftwareSerial mySerial =  SoftwareSerial(rxPin, txPin);
byte pinState = 0;
 
void setup()  {
  // define pin modes for tx, rx, led pins:
  pinMode(rxPin, INPUT);
  pinMode(txPin, OUTPUT);
  pinMode(buttonPin, INPUT);
  pinMode(ledPin, OUTPUT);
  pinMode(rstPin, OUTPUT);
  pinMode(clkPin, OUTPUT);
  pinMode(dqPin, OUTPUT);
 
  // set the data rate for the SoftwareSerial port
  mySerial.begin(9600);
}
 
 
void loop() {
  int val = digitalRead(buttonPin);
 
    rst_low();
 
    clk_high();
    rst_high(); //all data transfer are initiated by driving RST high
    write_command(0x0c); // write config command
    write_command(0x02); // cpu mode
    rst_low();
    delay(200); //wait until the configuration register is written 
 
    clk_high();
    rst_high();
    write_command(0xEE); //start conversion
    rst_low();
    delay(200);
 
    clk_high();
    rst_high();
    write_command(0xAA);
    int raw_data = read_raw_data();
    rst_low();
 
    mySerial.print("temperature:");
    mySerial.print(raw_data/2);
    mySerial.println(" C");
 
 
    delay(100);
 
 
  // toggle an LED just so you see the thing's alive.  
 
  toggle(13);
 
}
 
 
void toggle(int pinNum) {
  // set the LED pin using the pinState variable:
  digitalWrite(pinNum, pinState); 
  // if pinState = 0, set it to 1, and vice versa:
  pinState = !pinState;
}
 
void write_command(int command)
/* sends 8 bit command on DQ output, least sig bit first */ 
{
  int n, bit;
 
  for(n=0;n<8;n++)
  {
    bit = ((command >> n) & (0x01));
    out_bit(bit);
  }
}
 
int read_raw_data(void)
{
  int bit,n;
  int raw_data=0;
 
  pinMode(dqPin,INPUT);
 
     /* jam the dq lead high to use as input */
  for(n=0;n<9;n++)
  {
     clk_low();
     bit=(digitalRead(dqPin));
     clk_high();
     raw_data = raw_data | (bit <<  n);
  }
  pinMode(dqPin, OUTPUT);
  return(raw_data);
}
 
void out_bit(int bit) 
{
  digitalWrite(dqPin, bit);  /* set up the data */
  clk_low();             /* and then provide a clock pulse */   
  clk_high();
}
 
void clk_high(void)
{
  digitalWrite(clkPin,HIGH);
}
 
void clk_low(void)
{
  digitalWrite(clkPin,LOW);
}
 
void rst_high(void)
{
   digitalWrite(rstPin,HIGH);
}
 
void rst_low(void)
{
   digitalWrite(rstPin,LOW);
}

#!/usr/bin/ruby
 
require "rubygems"
require "rubilicious"
require "json"
require "date"
require "time"
 
 
def getTime(item)
  dateadd = item['dateadd']
  return Time.at(dateadd) unless dateadd == false
  return Time.now
end
 
def getIsPrivate(item)
  isprivate = item['private']
  return "checked"==isprivate
end
 
def getTags(item)
  item['tag'].gsub(' ', '_').gsub(',',' ')
end
 
json_string = File.new("blinklist20080710.json").read
 
result = JSON.parse(json_string)
 
r = Rubilicious.new('your_delicious_username','your_delicious_password')
 
i=0
for item in result do 
  i += 1
  puts "#{i}: #{item['url']}"
  #next if i < 3229
  r.add(item['url'],item['name'],item['description'], getTags(item), getTime(item), true, getIsPrivate(item))
end 
puts "ended"

#!/usr/bin/ruby
 
#   Copyright (C) 2006 Maurice Codik - maurice.codik@gmail.com
#
#   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.
 
 
# an example:
#
# class Connection
#   include StatePattern
#   state :initial do # you always need a state named initial. this is where you begin.
#     def connect
#       puts "connected"
#    # move to state :connected. all other args to transition_to are passed to the new state's constructor
#       transition_to :connected, "hello from initial state" 
#     end
#     def disconnect
#       puts "not connected yet"
#     end
#   end
#   state :connected do
#     def initialize(msg)
#       puts "initialize got msg: #{msg}"
#     end
#     def connect
#       puts "already connected"
#     end
#     def disconnect
#       puts "disconnecting"
#       transition_to :initial
#     end
#   end
#   def reset
#     puts "reseting outside a state"
#     # you can also change the state from outside of the state objects
#     transition_to :initial
#   end
# end
 
# how's it work:
# Each call to state defines a new subclass of Connection that is stored in a hash. 
# Then, a call to transition_to instantiates one of these subclasses and sets it to the be the active state.
# Method calls to Connection are delegated to the active state object via method_missing. 
 
module StatePattern
  class UnknownStateException < Exception
  end
 
  def StatePattern.included(mod)
    mod.extend StatePattern::ClassMethods
  end
 
  module ClassMethods
    attr_reader :state_classes
    def state(state_name, &block)
      @state_classes ||= {}
 
      new_klass = Class.new(self, &block)
      new_klass.class_eval do
        alias_method :__old_init, :initialize
        def initialize(context, *args, &block)
          @context = context
          __old_init(*args, &block)
        end
      end
 
      @state_classes[state_name] = new_klass
    end
  end
 
  attr_accessor :current_state, :current_state_obj
 
  def transition_to(state_name, *args, &block)
    new_context = @context || self
 
    klass = new_context.class.state_classes[state_name]
    if klass
      new_context.current_state = state_name
      new_context.current_state_obj = klass.new(new_context, *args, &block)
    else
      raise UnknownStateException, "tried to transition to unknown state, #{state_name}"      
    end
  end
 
  def method_missing(method, *args, &block)
    unless @current_state_obj
      transition_to :initial
    end
    if @current_state_obj
      @current_state_obj.send(method, *args, &block)
    else
      super
    end
  end
 
end

#!/usr/bin/ruby
require "rubygems"
require "rubilicious"
require "json"
require "date"
require "time"
require "state_pattern"
 
class Parser
  include StatePattern
 
  attr_accessor :name, :url,:desc,:tags ,:date , :r
 
  state :initial do     
    def parse(line)
      #puts "initial: #{line}"
      if line  =~ /<a href="(.*)">(.*)<\/a>/
        @context.name = $2 
        @context.url = $1  
        transition_to :read_keywords        
      end
    end
  end
  state :read_keywords do 
    def parse(line)
      if line =~ /<!--keywords-->(.*)$/
        @context.tags = $1.chomp
        transition_to :read_keywords2
      end
    end
  end
 
  state :read_keywords2 do
    def parse(line)      
      #puts "read_keywords2: #{line}"       
      if line =~ /<!--/
        if line =~ /^<!--desc-->/
          transition_to :read_desc
          @context.current_state_obj.parse(line)
        end         
        if line =~ /^<!--mdata/
          transition_to :read_metadata
          @context.current_state_obj.parse(line)
        end
        return
      end
      @context.tags += " " + line.chomp      
    end
  end
 
  state :read_desc do 
    def parse(line)      
      if line =~ /<!--/
        if line =~ /<!--desc-->(.*)/
          @context.desc = $1.chomp
        else
          #puts "not desc"
          if line =~ /<!--mdata/
            transition_to :read_metadata
            @context.current_state_obj.parse(line)            
          else
            raise "don´t know how to parse this in this state #{line}"
          end              
          return
        end               
      else
        @context.desc += " " + line.chomp
      end
    end
  end
 
  state :read_metadata do    
    def parse(line)      
      @context.date = $1.hex if line =~ /<!--mdata=\[\w+\]\[([0-9A-F]+)\]\[([0-9A-F]+)\]\[([0-9A-F]+)\]/
      @context.date = Time.now.to_i if @context.date < 0
 
 
      puts "=============================="      
      puts "name: #{@context.name}"
      puts "url:  #{@context.url}"
      puts "tags: #{@context.tags}"
      puts "date: #{Time.at(@context.date)}"
      puts "desc: #{@context.desc}" unless @context.desc.nil?
      puts "=============================="
      @context.r.add(@context.url,@context.name,@context.desc, @context.tags, Time.at(@context.date), false, true)
      @context.name = @context.url = @context.tags = @context.date = @context.desc = nil
 
      transition_to :initial
    end
  end
 
end
 
 
r = Rubilicious.new('your_delicious_username','your_password')
p = Parser.new
p.r = r;
i = 0
File.new("pm3520070703.htm").each { |line| 
  puts i; 
  i += 1 
  #next unless i >2261
  p.parse(line);  
}
 
puts "ended"