madrona-rad 0.2.2

data/lib/rad/generators/makefile/makefile.erb

@@ -0,0 +1,243 @@
+# Arduino makefile
+#
+# This makefile allows you to build sketches from the command line
+# without the Arduino environment (or Java).
+#
+# The Arduino environment does preliminary processing on a sketch before
+# compiling it.  If you're using this makefile instead, you'll need to do
+# a few things differently:
+#
+#   - Give your program's file a .cpp extension (e.g. foo.cpp).
+#
+#   - Put this line at top of your code: #include <WProgram.h>
+#
+#   - Write prototypes for all your functions (or define them before you
+#     call them).  A prototype declares the types of parameters a
+#     function will take and what type of value it will return.  This
+#     means that you can have a call to a function before the definition
+#     of the function.  A function prototype looks like the first line of
+#     the function, with a semi-colon at the end.  For example:
+#     int digitalRead(int pin);
+#
+#   - Write a main() function for your program that returns an int, calls
+#     init() and setup() once (in that order), and then calls loop()
+#     repeatedly():
+#
+#	int main()
+#	{
+#		init();
+#		setup();
+#
+#		for (;;)
+#			loop();
+#
+#		return 0;
+#	}
+#
+# Instructions for using the makefile:
+#
+#  1. Copy this file into the folder with your sketch.
+#
+#  2. Below, modify the line containing "TARGET" to refer to the name of
+#     of your program's file without an extension (e.g. TARGET = foo).
+#
+#  3. Modify the line containg "ARDUINO" to point the directory that
+#     contains the Arduino core (for normal Arduino installations, this
+#     is the hardware/cores/arduino sub-directory).
+#
+#  4. Modify the line containing "PORT" to refer to the filename
+#     representing the USB or serial connection to your Arduino board
+#     (e.g. PORT = /dev/tty.USB0).  If the exact name of this file
+#     changes, you can use * as a wildcard (e.g. PORT = /dev/tty.USB*).
+#
+#  5. At the command line, change to the directory containing your
+#     program's file and the makefile.
+#
+#  6. Type "make" and press enter to compile/verify your program.
+#
+#  7. Type "make upload", reset your Arduino board, and press enter  to
+#     upload your program to the Arduino board.
+#
+# $Id$
+
+PORT = <%= params['serial_port'] %>
+TARGET = <%= params['target'] %>
+ARDUINO = <%= params['arduino_root'] %>/hardware/cores/arduino
+SOFTWARE_SERIAL = <%= params['arduino_root'] %>/hardware/libraries/SoftwareSerial
+LIBRARY_ROOT = <%= params['libraries_root'] %>
+SRC = $(ARDUINO)/pins_arduino.c $(ARDUINO)/wiring.c \
+$(ARDUINO)/wiring_analog.c $(ARDUINO)/wiring_digital.c \
+$(ARDUINO)/wiring_pulse.c $(ARDUINO)/wiring_serial.c \
+$(ARDUINO)/wiring_shift.c $(ARDUINO)/WInterrupts.c
+CXXSRC = $(ARDUINO)/HardwareSerial.cpp $(SOFTWARE_SERIAL)/SoftwareSerial.cpp<%= params['libraries'].collect{|l| " $(LIBRARY_ROOT)/#{ l }/#{l }.cpp"}.join('') %>
+MCU = <%= params['mcu'] %>
+<% if params['asm_files'] %>ASRC = <%= params['asm_files'].join(' ') %><% end %>
+F_CPU = 16000000
+FORMAT = ihex
+UPLOAD_RATE = 19200
+BIN_DIR = <%= params['arduino_root'] %>/hardware/tools/avr/bin
+
+# Name of this Makefile (used for "make depend").
+MAKEFILE = Makefile
+
+# Debugging format.
+# Native formats for AVR-GCC's -g are stabs [default], or dwarf-2.
+# AVR (extended) COFF requires stabs, plus an avr-objcopy run.
+DEBUG = stabs
+
+OPT = s
+
+# Place -D or -U options here
+CDEFS = -DF_CPU=$(F_CPU)
+CXXDEFS = -DF_CPU=$(F_CPU)
+
+# Place -I options here
+CINCS = -I$(ARDUINO) -I$(SOFTWARE_SERIAL)<% params['libraries'].each do |l| %> -I$(LIBRARY_ROOT)/<%= l %><% end %>
++CXXINCS = -I$(ARDUINO) -I$(SOFTWARE_SERIAL)<% params['libraries'].each do |l| %> -I$(LIBRARY_ROOT)/<%= l %><% end %>
+
+# Compiler flag to set the C Standard level.
+# c89   - "ANSI" C
+# gnu89 - c89 plus GCC extensions
+# c99   - ISO C99 standard (not yet fully implemented)
+# gnu99 - c99 plus GCC extensions
+CSTANDARD = -std=gnu99
+CDEBUG = -g$(DEBUG)
+CWARN = -Wall -Wstrict-prototypes
+CTUNING = -funsigned-char -funsigned-bitfields -fpack-struct -fshort-enums
+#CEXTRA = -Wa,-adhlns=$(<:.c=.lst)
+
+CFLAGS = $(CDEBUG) $(CDEFS) $(CINCS) -O$(OPT) $(CWARN) $(CSTANDARD) $(CEXTRA)
+CXXFLAGS = $(CDEFS) $(CINCS) -O$(OPT)
+#ASFLAGS = -Wa,-adhlns=$(<:.S=.lst),-gstabs 
+LDFLAGS = -lm
+
+
+# Programming support using avrdude. Settings and variables.
+AVRDUDE_PROGRAMMER = stk500
+AVRDUDE_PORT = $(PORT)
+AVRDUDE_WRITE_FLASH = -U flash:w:$(TARGET).hex
+AVRDUDE_FLAGS = -F -p $(MCU) -P $(AVRDUDE_PORT) -c $(AVRDUDE_PROGRAMMER) \
+  -b $(UPLOAD_RATE) -C <%= params['arduino_root'] %>/hardware/tools/avr/etc/avrdude.conf
+
+# Program settings
+CC = $(BIN_DIR)/avr-gcc
+CXX = $(BIN_DIR)/avr-g++
+OBJCOPY = $(BIN_DIR)/avr-objcopy
+OBJDUMP = $(BIN_DIR)/avr-objdump
+AR  = $(BIN_DIR)/avr-ar
+SIZE = $(BIN_DIR)/avr-size
+NM = $(BIN_DIR)/avr-nm
+AVRDUDE = $(BIN_DIR)/avrdude
+REMOVE = rm -f
+MV = mv -f
+
+# Define all object files.
+OBJ = $(SRC:.c=.o) $(CXXSRC:.cpp=.o) $(ASRC:.S=.o)
+
+# Define all listing files.
+LST = $(ASRC:.S=.lst) $(CXXSRC:.cpp=.lst) $(SRC:.c=.lst)
+
+# Combine all necessary flags and optional flags.
+# Add target processor to flags.
+ALL_CFLAGS = -mmcu=$(MCU) -I. $(CFLAGS)
+ALL_CXXFLAGS = -mmcu=$(MCU) -I. $(CXXFLAGS)
+ALL_ASFLAGS = -mmcu=$(MCU) -I. -x assembler-with-cpp $(ASFLAGS)
+
+
+# Default target.
+all: build
+
+build: elf hex
+
+elf: $(TARGET).elf
+hex: $(TARGET).hex
+eep: $(TARGET).eep
+lss: $(TARGET).lss 
+sym: $(TARGET).sym
+
+# Program the device.  
+upload: $(TARGET).hex
+	$(AVRDUDE) $(AVRDUDE_FLAGS) $(AVRDUDE_WRITE_FLASH)
+
+
+
+
+# Convert ELF to COFF for use in debugging / simulating in AVR Studio or VMLAB.
+COFFCONVERT=$(OBJCOPY) --debugging \
+--change-section-address .data-0x800000 \
+--change-section-address .bss-0x800000 \
+--change-section-address .noinit-0x800000 \
+--change-section-address .eeprom-0x810000 
+
+
+coff: $(TARGET).elf
+	$(COFFCONVERT) -O coff-avr $(TARGET).elf $(TARGET).cof
+
+
+extcoff: $(TARGET).elf
+	$(COFFCONVERT) -O coff-ext-avr $(TARGET).elf $(TARGET).cof
+
+
+.SUFFIXES: .elf .hex .eep .lss .sym
+
+.elf.hex:
+	$(OBJCOPY) -O $(FORMAT) -R .eeprom $< $@
+
+.elf.eep:
+	-$(OBJCOPY) -j .eeprom --set-section-flags=.eeprom="alloc,load" \
+	--change-section-lma .eeprom=0 -O $(FORMAT) $< $@
+
+# Create extended listing file from ELF output file.
+.elf.lss:
+	$(OBJDUMP) -h -S $< > $@
+
+# Create a symbol table from ELF output file.
+.elf.sym:
+	$(NM) -n $< > $@
+
+
+core.a: $(OBJ)
+	@for i in $(OBJ); do echo $(AR) rcs core.a $$i; $(AR) rcs core.a $$i; done
+
+# Link: create ELF output file from library.
+$(TARGET).elf: core.a
+	$(CC) $(ALL_CFLAGS) -o $@ $(TARGET).cpp -L. core.a $(LDFLAGS)
+
+# Compile: create object files from C++ source files.
+.cpp.o:
+	$(CXX) -c $(ALL_CXXFLAGS) $< -o $@ 
+
+# Compile: create object files from C source files.
+.c.o:
+	$(CC) -c $(ALL_CFLAGS) $< -o $@ 
+
+
+# Compile: create assembler files from C source files.
+.c.s:
+	$(CC) -S $(ALL_CFLAGS) $< -o $@
+
+
+# Assemble: create object files from assembler source files.
+.S.o:
+	$(CC) -c $(ALL_ASFLAGS) $< -o $@
+
+
+
+# Target: clean project.
+clean:
+	$(REMOVE) $(TARGET).hex $(TARGET).eep $(TARGET).cof $(TARGET).elf \
+	$(TARGET).map $(TARGET).sym $(TARGET).lss core.a \
+	$(OBJ) $(LST) $(SRC:.c=.s) $(SRC:.c=.d) $(CXXSRC:.cpp=.s) $(CXXSRC:.cpp=.d)
+
+depend:
+	if grep '^# DO NOT DELETE' $(MAKEFILE) >/dev/null; \
+	then \
+		sed -e '/^# DO NOT DELETE/,$$d' $(MAKEFILE) > \
+			$(MAKEFILE).$$$$ && \
+		$(MV) $(MAKEFILE).$$$$ $(MAKEFILE); \
+	fi
+	echo '# DO NOT DELETE THIS LINE -- make depend depends on it.' \
+		>> $(MAKEFILE); \
+	$(CC) -M -mmcu=$(MCU) $(CDEFS) $(CINCS) $(SRC) $(ASRC) >> $(MAKEFILE)
+
+.PHONY:	all build elf hex eep lss sym program coff extcoff clean depend

data/lib/rad/generators/makefile/makefile.rb

@@ -0,0 +1,39 @@
+require 'erb'
+require 'yaml'
+
+class Makefile
+  class << self
+    
+    # build the sketch Makefile for the given template based on the values in its software and hardware config files
+    def compose_for_sketch(sketch_name)
+      params = hardware_params.merge software_params
+      params['target'] = sketch_name
+      
+      params['libraries_root'] = "#{File.expand_path(RAD_ROOT)}/vendor/libraries"
+      params['libraries'] = libraries
+      
+      params['asm_files'] = Dir.entries( File.expand_path(RAD_ROOT) + "/" + PROJECT_DIR_NAME ).select{|e| e =~ /\.S/}            
+            
+      e = ERB.new File.read("#{File.dirname(__FILE__)}/makefile.erb")
+      
+      File.open("#{RAD_ROOT}/#{sketch_name}/Makefile", "w") do |f|
+        f << e.result(binding)
+      end
+    end
+    
+    def libraries
+      Dir.entries("#{RAD_ROOT}/vendor/libraries").select{|e| !(e =~ /\./)}
+    end
+    
+    def hardware_params
+      return @hardware_params if @hardware_params
+      return @hardware_params = YAML.load_file( "#{RAD_ROOT}/config/hardware.yml")
+    end
+      
+    def software_params
+      return @software_params if @software_params
+      return @software_params = YAML.load_file( "#{RAD_ROOT}/config/software.yml" )
+    end
+      
+  end
+end

data/lib/rad/init.rb

@@ -0,0 +1,12 @@
+RAD_ROOT = "#{File.dirname(__FILE__)}/../.." unless defined?(RAD_ROOT)
+
+unless defined?(PROJECT_DIR_NAME)
+  a = File.expand_path(File.expand_path("#{RAD_ROOT}")).split("/")
+  PROJECT_DIR_NAME = a[a.length-1]
+end
+
+
+%w(generators/makefile/makefile.rb rad_processor.rb rad_rewriter.rb arduino_sketch.rb arduino_plugin.rb tasks/rad.rb).each do |path|
+  require File.expand_path("#{RAD_ROOT}/vendor/rad/#{path}")
+end
+

data/lib/rad/rad_processor.rb

@@ -0,0 +1,66 @@
+require 'ruby_to_ansi_c'
+
+class RADProcessor < RubyToAnsiC
+
+  def self.translator
+    unless defined? @translator then
+      @translator = CompositeSexpProcessor.new
+      @translator << RADRewriter.new
+      @translator << TypeChecker.new
+      @translator << R2CRewriter.new
+      @translator << self.new
+      @translator.on_error_in(:defn) do |processor, exp, err|
+        result = processor.expected.new
+        case result
+        when Array then
+          result << :error
+        end
+        msg = "// ERROR: #{err.class}: #{err}"
+        msg += " in #{exp.inspect}" unless exp.nil? or $TESTING
+        msg += " from #{caller.join(', ')}" unless $TESTING
+        result << msg
+        result
+      end
+    end
+    @translator
+  end
+    
+  def process_lasgn(exp)
+    out = ""
+
+    var = exp.shift
+    value = exp.shift
+    # grab the size of the args, if any, before process converts to a string
+    arg_count = 0
+    arg_count = value.length - 1 if value.first == :array
+    args = value
+
+    exp_type = exp.sexp_type
+    @env.add var.to_sym, exp_type
+    var_type = self.class.c_type exp_type
+
+    if exp_type.list? then
+      assert_type args, :array
+
+      raise "array must be of one type" unless args.sexp_type == Type.homo
+
+      # HACK: until we figure out properly what to do w/ zarray
+      # before we know what its type is, we will default to long.
+      array_type = args.sexp_types.empty? ? 'void *' : self.class.c_type(args.sexp_types.first)
+      # we can fix array here..
+      args.shift # :arglist
+      out << "#{var} = (#{array_type}) malloc(sizeof(#{array_type}) * #{args.length});\n"
+      args.each_with_index do |o,i|
+        out << "#{var}[#{i}] = #{process o};\n"
+      end
+    else
+      out << "#{var} = #{process args}"
+    end
+
+    out.sub!(/;\n\Z/, '')
+
+    return out
+  end
+
+
+end

data/lib/rad/rad_rewriter.rb

@@ -0,0 +1,94 @@
+require 'ruby_to_ansi_c'
+
+class RADRewriter < Rewriter
+  
+  def process_iter(exp)
+    call = process exp.shift
+    var  = process exp.shift
+    body = process exp.shift
+
+    var = s(:dasgn_curr, Unique.next) if var.nil?
+
+    assert_type call, :call
+
+    if call[2] != :each then # TODO: fix call[n] (api)
+      call.shift # :call
+      lhs = call.shift
+      method_name = call.shift
+
+      case method_name
+      when :downto then
+        var.shift # 
+        start_value = lhs
+        finish_value = call.pop.pop # not sure about this
+        var_name = var.shift
+        body.find_and_replace_all(:dvar, :lvar)
+        result = s(:dummy,
+                   s(:lasgn, var_name, start_value),
+                   s(:while,
+                     s(:call, s(:lvar, var_name), :>=,
+                       s(:arglist, finish_value)),
+                     s(:block,
+                       body,
+                       s(:lasgn, var_name,
+                         s(:call, s(:lvar, var_name), :-,
+                           s(:arglist, s(:lit, 1))))), true))
+      when :upto then
+        # REFACTOR: completely duped from above and direction changed
+        var.shift # 
+        start_value = lhs
+        finish_value = call.pop.pop # not sure about this
+        var_name = var.shift
+        body.find_and_replace_all(:dvar, :lvar)
+        result = s(:dummy,
+                   s(:lasgn, var_name, start_value),
+                   s(:while,
+                     s(:call, s(:lvar, var_name), :<=,
+                       s(:arglist, finish_value)),
+                     s(:block,
+                       body,
+                       s(:lasgn, var_name,
+                         s(:call, s(:lvar, var_name), :+,
+                           s(:arglist, s(:lit, 1))))), true))
+       when :times then
+         # REFACTOR: mostly duped from above and gave default start value of 0
+         # and a finish value that was the start value above
+         var.shift 
+         start_value = s(:lit, 0)
+         finish_value = lhs
+         var_name = var.shift
+         body.find_and_replace_all(:dvar, :lvar)
+         result = s(:dummy,
+                    s(:lasgn, var_name, start_value),
+                    s(:while,
+                      s(:call, s(:lvar, var_name), :<=,
+                        s(:arglist, finish_value)),
+                      s(:block,
+                        body,
+                        s(:lasgn, var_name,
+                          s(:call, s(:lvar, var_name), :+,
+                            s(:arglist, s(:lit, 1))))), true))
+      when :define_method then
+        # BEFORE: [:iter, [:call, nil, :define_method, [:array, [:lit, :bmethod_added]]], [:dasgn_curr, :x], [:call, [:dvar, :x], :+, [:array, [:lit, 1]]]]
+        # we want to get it rewritten for the scope/block context, so:
+        #   - throw call away
+        #   - rewrite to args
+        #   - plop body into a scope
+        # AFTER:  [:block, [:args, :x], [:call, [:lvar, :x], :+, [:arglist, [:lit, 1]]]]
+        var.find_and_replace_all(:dasgn_curr, :args)
+        body.find_and_replace_all(:dvar, :lvar)
+        result = s(:block, var, body)
+      else
+        # HACK we butchered call up top
+        result = s(:iter, s(:call, lhs, method_name, call.shift), var, body)
+      end
+    else
+      if var.nil? then
+        var = s(:lvar, Unique.next)
+      end
+
+      s(:iter, call, var, body)
+    end
+  end
+
+end

data/lib/rad/tasks/build_and_make.rake

@@ -0,0 +1,159 @@
+require File.expand_path(File.dirname(__FILE__) + "/../init.rb")
+require 'ruby_to_ansi_c'
+
+C_VAR_TYPES = "unsigned|int|long|double|str|char"
+
+namespace :make do
+  
+  desc "compile the sketch and then upload it to your Arduino board"
+  task :upload => :compile do
+    if Makefile.hardware_params['physical_reset']
+      puts "Reset the Arduino and hit enter.\n==If your board doesn't need it, you can turn off this prompt in config/software.yml=="
+      STDIN.gets.chomp
+    end
+    sh %{cd #{RAD_ROOT}/#{@sketch_name}; make upload}
+  end
+  
+  desc "generate a makefile and use it to compile the .cpp"
+  task :compile => [:clean_sketch_dir, "build:sketch"] do # should also depend on "build:sketch"
+    Makefile.compose_for_sketch( @sketch_name )
+    # not allowed? sh %{export PATH=#{Makefile.software_params[:arduino_root]}/tools/avr/bin:$PATH}
+    sh %{cd #{RAD_ROOT}/#{@sketch_name}; make depend; make}
+  end
+  
+  desc "generate a makefile and use it to compile the .cpp using the current .cpp file"
+  task :compile_cpp => ["build:sketch_dir", :clean_sketch_dir] do # should also depend on "build:sketch"
+    Makefile.compose_for_sketch( @sketch_name )
+    # not allowed? sh %{export PATH=#{Makefile.software_params[:arduino_root]}/tools/avr/bin:$PATH}
+    sh %{cd #{RAD_ROOT}/#{@sketch_name}; make depend; make}
+  end
+  
+  desc "generate a makefile and use it to compile the .cpp and upload it using current .cpp file"
+  task :upload_cpp => ["build:sketch_dir", :clean_sketch_dir] do # should also depend on "build:sketch"
+    Makefile.compose_for_sketch( @sketch_name )
+    # not allowed? sh %{export PATH=#{Makefile.software_params[:arduino_root]}/tools/avr/bin:$PATH}
+    sh %{cd #{RAD_ROOT}/#{@sketch_name}; make depend; make upload}
+  end
+  
+  task :clean_sketch_dir => ["build:file_list", "build:sketch_dir"] do
+    @sketch_name = @sketch_class.split(".").first
+    FileList.new(Dir.entries("#{RAD_ROOT}/#{@sketch_name}")).exclude("#{@sketch_name}.cpp").exclude(/^\./).each do |f|
+      sh %{rm #{RAD_ROOT}/#{@sketch_name}/#{f}}
+    end
+  end
+end
+
+namespace :build do
+
+  desc "actually build the sketch"
+  task :sketch => [:file_list, :sketch_dir, :gather_required_plugins, :plugin_setup, :setup] do
+    klass = @sketch_class.split(".").first.split("_").collect{|c| c.capitalize}.join("")    
+    eval ArduinoSketch.pre_process(File.read(@sketch_class))
+    c_methods = []
+    sketch_signatures = []
+    $sketch_methods.each {|m| c_methods << RADProcessor.translate(constantize(klass), m) }
+    c_methods.each {|meth| sketch_signatures << "#{meth.scan(/^\w*\s?\*?\n.*\)/)[0].gsub("\n", " ")};" }
+    clean_c_methods = []
+    c_methods.join("\n").each_with_index do |e,i|
+      # need to take a look at the \(unsigned in the line below not sure if we are really trying to catch something like that
+      if e !~ /^\s*(#{C_VAR_TYPES})(\W{1,6}|\(unsigned\()(#{$external_var_identifiers.join("|")})/ || $external_var_identifiers.empty?
+        # use the list of identifers the external_vars method of the sketch and remove the parens the ruby2c sometime adds to variables
+        e.gsub(/((#{$external_var_identifiers.join("|")})\(\))/, '\2')  unless $external_var_identifiers.empty? 
+        clean_c_methods << e
+      end
+    end
+    c_methods_with_timer = clean_c_methods.join.gsub(/loop\(\)\s\{/,"loop() {\ntrack_total_loop_time();")
+    @setup.gsub!("// sketch signatures", "// sketch signatures\n#{ sketch_signatures.join("\n")}") unless sketch_signatures.empty?
+    result = "#{@setup}\n#{c_methods_with_timer}\n"
+    name = @sketch_class.split(".").first
+    File.open("#{name}/#{name}.cpp", "w"){|f| f << result}
+  end
+
+  # needs to write the library include and the method signatures
+  desc "build setup function"
+  task :setup do
+    klass = @sketch_class.split(".").first.split("_").collect{|c| c.capitalize}.join("")
+    eval "class #{klass} < ArduinoSketch; end;"
+    
+    @@as = ArduinoSketch.new
+    
+    delegate_methods = @@as.methods - Object.new.methods
+    delegate_methods.reject!{|m| m == "compose_setup"}
+        
+    delegate_methods.each do |meth|
+       constantize(klass).module_eval <<-CODE
+       def self.#{meth}(*args)
+       @@as.#{meth}(*args)
+       end
+       CODE
+    end
+    eval File.read(@sketch_class)
+    @setup = @@as.compose_setup
+  end
+  
+  desc "add plugin methods"
+  task :plugin_setup do
+    $plugins_to_load.each do |name|
+       klass = name.split(".").first.split("_").collect{|c| c.capitalize}.join("")
+       eval "class #{klass} < ArduinoPlugin; end;"
+    
+       @@ps = ArduinoPlugin.new
+       plugin_delegate_methods = @@ps.methods - Object.new.methods
+       plugin_delegate_methods.reject!{|m| m == "compose_setup"}
+    
+       plugin_delegate_methods.each do |meth|
+         constantize(klass).module_eval <<-CODE
+         def self.#{meth}(*args)
+           @@ps.#{meth}(*args)
+         end
+         CODE
+       end
+
+      eval ArduinoPlugin.process(File.read("vendor/plugins/#{name}"))
+      
+    end
+    @@no_plugins = ArduinoPlugin.new if @plugin_names.empty?
+  end
+  
+  desc "determine which plugins to load based on use of methods in sketch"
+  task :gather_required_plugins do
+    @plugin_names.each do |name|
+       ArduinoPlugin.check_for_plugin_use(File.read(@sketch_class), File.read("vendor/plugins/#{name}"), name )
+    end
+    puts "#{$plugins_to_load.length} of #{$plugin_methods_hash.length} plugins are being loaded:  #{$plugins_to_load.join(", ")}"
+  end
+  
+  desc "setup target directory named after your sketch class"
+  task :sketch_dir => [:file_list] do
+    mkdir_p "#{@sketch_class.split(".").first}"
+  end
+
+  task :file_list do
+    # take another look at this, since if the root directory name is changed, everything breaks
+    # perhaps we generate a constant when the project is generated an pop it here or in the init file
+    @sketch_directory = File.expand_path("#{File.dirname(__FILE__)}/../../../").split("/").last
+    # multiple sketches are possible with rake make:upload sketch=new_sketch
+    @sketch_class = ENV['sketch'] ? "#{ENV['sketch']}.rb" : "#{@sketch_directory}.rb"
+    @file_names = []
+    @plugin_names = []
+    Dir.entries( File.expand_path(RAD_ROOT) ).each do |f|
+      if (f =~ /\.rb$/)
+        @file_names << f
+      end
+    end
+    Dir.entries( File.expand_path("#{RAD_ROOT}/vendor/plugins/") ).each do |f|
+      if (f =~ /\.rb$/)
+        @plugin_names << f
+      end
+    end
+  end
+end
+
+#yoinked from Rails
+def constantize(camel_cased_word)
+  unless /\A(?:::)?([A-Z]\w*(?:::[A-Z]\w*)*)\z/ =~ camel_cased_word
+    raise NameError, "#{camel_cased_word.inspect} is not a valid constant name!"
+  end
+
+  Object.module_eval("::#{$1}", __FILE__, __LINE__)
+end

data/lib/rad/tasks/rad.rb

@@ -0,0 +1,2 @@
+require 'rake'
+Dir["#{File.dirname(__FILE__)}/*.rake"].each { |ext| load ext }

data/lib/rad/todo.txt

@@ -0,0 +1,13 @@
+TODO:
+=====
+	
+Future:
+	- complete library system: script/install library some_library
+	- bin/rad:
+		- setup and use a ~/.rad for new project defaults
+	- put repository on git
+	- project gallery (examples with movies)
+	- testing framework
+	- implement wire lib
+	- subclasses of ArduinoSketch (should just work, but what are they for?)
+	- simulator

data/lib/rad/version.rb

@@ -0,0 +1,9 @@
+module Rad #:nodoc:
+  module VERSION #:nodoc:
+    MAJOR = 0
+    MINOR = 2
+    TINY  = 2
+
+    STRING = [MAJOR, MINOR, TINY].join('.')
+  end
+end

data/lib/rad.rb

@@ -0,0 +1,5 @@
+module Rad
+end
+
+require 'rad/version'
+require 'rad/init'