wolfram 0.1.0

data/.gemspec

@@ -0,0 +1,25 @@
+# -*- encoding: utf-8 -*-
+require 'rubygems' unless Object.const_defined?(:Gem)
+require File.dirname(__FILE__) + "/lib/wolfram/version"
+
+Gem::Specification.new do |s|
+  s.name        = "wolfram"
+  s.version     = Wolfram::VERSION
+  s.authors     = ["Gabriel Horner"]
+  s.email       = "gabriel.horner@gmail.com"
+  s.homepage    = "http://github.com/cldwalker/wolfram"
+  s.summary = "Wolfram V2 API client"
+  s.description =  "Explore the vast world of computational knowledge available for free via Wolfram's v2 API."
+  s.required_rubygems_version = ">= 1.3.6"
+  s.rubyforge_project = 'tagaholic'
+  s.executables = ['wolfram']
+  s.add_dependency 'nokogiri', '>= 1.4.3'
+  s.add_development_dependency 'rr'
+  s.add_development_dependency 'bacon', '>= 1.1.0'
+  s.add_development_dependency 'bacon-rr'
+  s.add_development_dependency 'bacon-bits'
+  s.files = Dir.glob(%w[{lib,test}/**/*.rb bin/* [A-Z]*.{txt,rdoc} ext/**/*.{rb,c} **/deps.rip]) + %w{Rakefile .gemspec}
+  s.files += Dir.glob(['test/fixtures/*.xml'])
+  s.extra_rdoc_files = ["README.rdoc", "LICENSE.txt"]
+  s.license = 'MIT'
+end

data/CHANGELOG.rdoc

@@ -0,0 +1,3 @@
+== 0.1.0
+* Initial release
+

data/LICENSE.txt

@@ -0,0 +1,22 @@
+The MIT LICENSE
+
+Copyright (c) 2011 Gabriel Horner
+
+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.

data/README.rdoc

@@ -0,0 +1,46 @@
+== Description
+Explore the vast world of computational knowledge available for free via Wolfram's v2 API.
+
+== Install
+
+To install this gem:
+
+    gem install wolfram
+
+== Setup
+
+You'll need a Wolfram Appid (api key) by {creating an account
+here}[http://developer.wolframalpha.com/portal/apisignup.html] and
+then clicking on the 'Get an APPID' button.
+
+Once you have your own appid, set it in your shell, preferably in your ~/.bashrc:
+
+    export WOLFRAM_APPID='YOURKEY'
+
+If you want to explicitly set your appid in a script:
+  
+    Wolfram.appid = "YOURKEY"
+
+== Usage
+
+Query away on the commandline!
+
+    # Calculate distance and travel time between places
+    $ wolfram from boston to new york
+
+    # Solve an equation
+    $ wolfram x^3 - 4x^2 + 6x - 24 = 0
+
+    # Find words ending with able
+    $ wolfram words ending with able
+
+For many more examples, {see here}[http://www.wolframalpha.com/examples/].
+  
+== Credits
+
+{Ian White}[https://github.com/ianwhite] is the original author of this gem.
+
+== Todo
+* More tests!
+* A better inspect
+* Handle more api options including format

data/Rakefile

@@ -0,0 +1,35 @@
+require 'rake'
+require 'fileutils'
+
+def gemspec
+  @gemspec ||= eval(File.read('.gemspec'), binding, '.gemspec')
+end
+
+desc "Build the gem"
+task :gem=>:gemspec do
+  sh "gem build .gemspec"
+  FileUtils.mkdir_p 'pkg'
+  FileUtils.mv "#{gemspec.name}-#{gemspec.version}.gem", 'pkg'
+end
+
+desc "Install the gem locally"
+task :install => :gem do
+  sh %{gem install pkg/#{gemspec.name}-#{gemspec.version}}
+end
+
+desc "Generate the gemspec"
+task :generate do
+  puts gemspec.to_ruby
+end
+
+desc "Validate the gemspec"
+task :gemspec do
+  gemspec.validate
+end
+
+desc 'Run tests'
+task :test do |t|
+  sh 'bacon -q -Ilib -I. test/*_test.rb'
+end
+
+task :default => :test

data/bin/wolfram

@@ -0,0 +1,4 @@
+#! /usr/bin/env ruby
+
+require 'wolfram'
+Wolfram.run

data/deps.rip

@@ -0,0 +1 @@
+nokogiri >=1.4.3

data/lib/wolfram.rb

@@ -0,0 +1,41 @@
+require 'nokogiri'
+require 'wolfram/xml_container'
+require 'wolfram/util'
+require 'wolfram/query'
+require 'wolfram/result'
+require 'wolfram/pod'
+require 'wolfram/assumption'
+require 'wolfram/version'
+
+module Wolfram
+  extend self
+
+  DefaultQueryURI = "http://api.wolframalpha.com/v2/query"
+
+  attr_accessor :appid, :query_uri
+
+  def query_uri
+    @query_uri ||= DefaultQueryURI
+  end
+
+  def query(input, options = {})
+    Query.new(input, options)
+  end
+
+  def fetch(input, options = {})
+    query(input, options).fetch
+  end
+
+  def run(argv=ARGV)
+    return puts("Usage: wolfram QUERY") if argv.empty?
+    puts fetch(argv.join(' ')).inspect
+  rescue MissingNodeError
+    warn "Wolfram Error: Invalid response - #{$!.message}"
+  rescue RuntimeError
+    warn "Wolfram Error: #{$!.message}"
+  end
+
+  class MissingNodeError < RuntimeError; end
+end
+
+Wolfram.appid = ENV['WOLFRAM_APPID']

data/lib/wolfram/assumption.rb

@@ -0,0 +1,68 @@
+module Wolfram
+  class Assumption
+    include XmlContainer
+    include Enumerable
+    extend Util
+
+    delegate :[], :each, :to => :values
+
+    def self.collection(xml, options = {})
+      Nokogiri::XML(xml.to_s).search('assumptions').search('assumption').map {|a_xml| new(a_xml, options)}
+    end
+
+    attr_reader :values
+    def initialize(xml, options = {})
+      @query = options[:query]
+      @xml = Nokogiri::XML(xml.to_s).search('assumption').first
+      @xml or raise MissingNodeError, "<assumption> node missing from xml: #{xml[0..20]}..."
+      extend Util.module_get(Assumption, @xml['type'])
+      @values = Value.collection(@xml, options)
+    end
+
+    def name
+      xml['type']
+    end
+
+    def to_s
+      name + ": " + values.map(&:desc).join(', ')
+    end
+
+    def inspect
+      "#<#{to_s}>"
+    end
+
+    class Value
+      include XmlContainer
+
+      def self.collection(xml, options = {})
+        Nokogiri::XML(xml.to_s).search('value').map {|v_xml| new(v_xml, options)}
+      end
+
+      def initialize(xml, options = {})
+        @query = options[:query]
+        @xml = Nokogiri::XML(xml.to_s).search('value').first
+        @xml or raise MissingNodeError, "<value> node missing from xml: #{xml[0..20]}..."
+      end
+
+      def inspect
+        "#<#{to_s}>"
+      end
+
+      def to_s
+        desc
+      end
+
+      def requery
+        Query.new(@query.input, @query.options.merge(:assumption => self))
+      end
+
+      def refetch
+        requery.fetch
+      end
+
+      def to_query(key)
+        Util.to_query(input, key)
+      end
+    end
+  end
+end

data/lib/wolfram/pod.rb

@@ -0,0 +1,112 @@
+module Wolfram
+  class Pod
+    include XmlContainer
+    include Enumerable
+    extend Util
+
+    delegate :[], :each, :to => :subpods
+
+    def self.collection(xml, options = {})
+      Nokogiri::XML(xml.to_s).search('pod').map {|p_xml| new(p_xml, options)}
+    end
+
+    attr_reader :subpods, :query, :states
+    def initialize(xml, options = {})
+      @query = options[:query]
+      @xml = Nokogiri::XML(xml.to_s).search('pod').first
+      @subpods = Subpod.collection(@xml.search('subpod'), options)
+      @states = State.collection(@xml.search('states'), options)
+      @xml or raise MissingNodeError, "<pod> node missing from xml: #{xml[0..20]}..."
+      types.each {|type| extend type}
+    end
+
+    def to_s
+      "#{title}: #{structured? ? plaintext : "'#{markup[0..20]}...'"} #{states.join(", ") if states.any?}"
+    end
+
+    def inspect
+      "#<#{scanner}: #{to_s}>"
+    end
+
+    def types
+      @types ||= scanner.split(',').map {|type| Util.module_get(Result, type)}
+    end
+
+    def plaintext
+      (e = subpods.detect(&:plaintext)) && e.plaintext
+    end
+
+    def img
+      (e = subpods.detect(&:plaintext)) && e.img
+    end
+
+    def markup
+      @markup ||= (xml.search('markup').text || '')
+    end
+
+    def structured?
+      subpods.any?
+    end
+
+    class Subpod
+      include XmlContainer
+
+      def self.collection(xml, options = {})
+        Nokogiri::XML(xml.to_s).search('subpod').map {|s_xml| new(s_xml, options)}
+      end
+
+      def initialize(xml, options = {})
+        @query = options[:query]
+        @xml = Nokogiri::Slop(xml.to_s).search('subpod').first
+        @xml or raise MissingNodeError, "<subpod> node missing from xml: #{xml[0..20]}..."
+      end
+
+      def plaintext
+        (e = xml.plaintext) && e.text
+      end
+
+      def img
+        xml.img
+      end
+    end
+
+    class State
+      attr_reader :name
+
+      def self.collection(xml, options = {})
+        Nokogiri::XML(xml.to_s).search('state').map {|s_xml| new(s_xml['name'], options)}
+      end
+
+      def initialize(name, options = {})
+        @query = options[:query]
+        @name = name
+      end
+
+      def to_query(key)
+        Util.to_query(name, key)
+      end
+
+      def to_s
+        "[#{name}...]"
+      end
+
+      def inspect
+        "#<State: #{to_s}>"
+      end
+
+      def requery
+        if podstate = @query.params[:podstate]
+          podstate = State.new("#{podstate.name},#{name}", :query => @query)
+        else
+          podstate = self
+        end
+
+        Query.new(@query.input, @query.options.merge(:podstate => podstate))
+      end
+
+      def refetch
+        requery.fetch
+      end
+    end
+  end
+end

data/lib/wolfram/query.rb

@@ -0,0 +1,44 @@
+require 'open-uri'
+
+module Wolfram
+  # When given an input, appid and other query params, creates a Result object
+  class Query
+    def self.fetch(uri)
+      open(uri).read
+    end
+
+    attr_accessor :input, :options, :appid, :query_uri
+    def initialize(input, options = {})
+      @input = input
+      @appid = options.delete(:appid) || Wolfram.appid || raise("No APPID set")
+      @query_uri = options.delete(:query_uri) || Wolfram.query_uri
+      @options = options
+    end
+
+    # explicitly fetch the result
+    def fetch
+      @result = Result.new(self.class.fetch(uri), :query => self)
+    end
+
+    def result
+      @result ||= fetch
+    end
+
+    # the uri that this query will issue a get request to
+    def uri
+      "#{query_uri}?#{Util.to_param(params)}"
+    end
+
+    def params
+      options.merge(:input => input, :appid => appid)
+    end
+
+    def inspect
+      out = "q: \"#{input}\""
+      out << " #{options[:podstate]}" if options[:podstate]
+      out << " (assuming #{options[:assumption]})" if options[:assumption]
+      out << ", a: #{result.datatypes}" if @result
+      out
+    end
+  end
+end

data/lib/wolfram/result.rb

@@ -0,0 +1,46 @@
+module Wolfram
+  # Result of a Query. Can have multiple Assumptions and Pods.
+  class Result
+    include XmlContainer
+    include Enumerable
+    extend Util
+
+    delegate :[], :each, :to => :pods
+    delegate :uri, :to => :query
+
+    attr_reader :assumptions, :pods, :query
+
+    def initialize(xml, options = {})
+      @query = options[:query]
+      @xml = Nokogiri::XML(xml.to_s).search('queryresult').first
+      @xml or raise MissingNodeError, "<queryresult> node missing from xml: #{xml[0..20]}..."
+      @assumptions = Assumption.collection(@xml, options)
+      @pods = Pod.collection(@xml, options)
+      types.each {|mod| extend mod}
+    end
+
+    def success?
+      success
+    end
+
+    # shortcut to the first assumption
+    def assumption
+      assumptions[0]
+    end
+
+    def types
+      @types ||= xml['datatypes'].split(',').map {|type| Util.module_get(Result, type)}
+    end
+
+    def inspect
+      out = "a: #{xml['datatypes']}"
+      out << " (assumptions: #{assumptions.map(&:name).join(', ')})" if !Array(assumptions).empty?
+      out << pods.map{|pod| "\n  - #{pod.to_s.gsub("\n", "\n    ")}"}.join
+      out
+    end
+
+    def format
+      @query && @query.options[:format]
+    end
+  end
+end

data/lib/wolfram/util.rb

@@ -0,0 +1,32 @@
+require 'cgi'
+
+module Wolfram
+  module Util
+
+    # From activesupport
+    def self.to_query(obj, key)
+      "#{CGI.escape(key.to_s).gsub(/%(5B|5D)/n) { [$1].pack('H*') }}=#{CGI.escape(obj.to_s)}"
+    end
+
+    # From activesupport
+    def self.to_param(obj)
+      obj.map {|key, value| to_query(value, key) }.sort * '&'
+    end
+
+    # Finds or creates a module by name for a given module
+    def self.module_get(mod, name)
+      mod.const_defined?(name) ? mod.const_get(name) :
+        mod.const_set(name, Module.new)
+    end
+
+    def delegate(*meths)
+      raise ArgumentError unless meths[-1].is_a?(Hash) && meths[-1].key?(:to)
+      to_meth = meths.pop[:to]
+      meths.each do |meth|
+        define_method(meth) do |*args, &block|
+          self.send(to_meth).send(meth, *args, &block)
+        end
+      end
+    end
+  end
+end

data/lib/wolfram/version.rb

@@ -0,0 +1,3 @@
+module Wolfram
+  VERSION = '0.1.0'
+end

data/lib/wolfram/xml_container.rb

@@ -0,0 +1,30 @@
+module Wolfram
+  # include this module to get sensible default methods for xml container classes
+  module XmlContainer
+    attr_reader :xml
+
+    def respond_to?(method, include_private = false)
+      xml.key?(method.to_s) || super
+    end
+
+  protected
+    def xml_value(val)
+      case val
+      when "true" then true
+      when "false" then false
+      when "" then nil
+      when /^\d+$/ then val.to_i
+      when /^\d+\.\d+$/ then val.to_f
+      else val
+      end
+    end
+
+    def method_missing(method, *args)
+      if xml.key?(method.to_s)
+        xml_value(xml[method.to_s])
+      else
+        super
+      end
+    end
+  end
+end

data/test/deps.rip

@@ -0,0 +1,4 @@
+rr >=0
+bacon >=1.1.0
+bacon-rr >=0
+bacon-bits >=0

data/test/fixtures/boston.xml

@@ -0,0 +1,187 @@
+<queryresult success="true" error="false" numpods="13" datatypes="City,MetropolitanArea,UrbanArea,USCounty,USState" timedout="" timing="3.101" parsetiming="0.117" parsetimedout="false" recalculate="" version="2.0">
+ <pod title="Input interpretation" scanner="Identity" id="Input" position="100" error="false" numsubpods="1">
+  <subpod title="">
+   <plaintext>Boston, Massachusetts</plaintext>
+   <img src="http://www1.wolframalpha.com/Calculate/MSP/MSP102619e3b0ea35330h1a000028gg82hdh359db20?MSPStoreType=image/gif&amp;s=12" alt="Boston, Massachusetts" title="Boston, Massachusetts" width="147" height="20"/>
+  </subpod>
+ </pod>
+ <pod title="Populations" scanner="Data" id="Population:CityData" position="200" error="false" numsubpods="1">
+  <subpod title="">
+   <plaintext>city population | 609023 people  (country rank: 22nd)  (2008 estimate)
+urban area population | 4.032 million people  (Boston urban area)  (country rank: 7th)  (2000 estimate)
+metro area population | 4.589 million people  (Boston metro area)  (country rank: 10th)  (2009 estimate)</plaintext>
+   <img src="http://www1.wolframalpha.com/Calculate/MSP/MSP102719e3b0ea35330h1a00001584427c4e8e6cec?MSPStoreType=image/gif&amp;s=12" alt="city population | 609023 people  (country rank: 22nd)  (2008 estimate) urban area population | 4.032 million people  (Boston urban area)  (country rank: 7th)  (2000 estimate) metro area population | 4.589 million people  (Boston metro area)  (country rank: 10th)  (2009 estimate)" title="city population | 609023 people  (country rank: 22nd)  (2008 estimate) urban area population | 4.032 million people  (Boston urban area)  (country rank: 7th)  (2000 estimate) metro area population | 4.589 million people  (Boston metro area)  (country rank: 10th)  (2009 estimate)" width="496" height="160"/>
+  </subpod>
+  <states count="1">
+   <state name="Show history" input="Population:CityData__Show history"/>
+  </states>
+ </pod>
+ <pod title="Location" scanner="Data" id="Location:CityData" position="300" error="false" numsubpods="1">
+  <subpod title="">
+   <plaintext/>
+   <img src="http://www1.wolframalpha.com/Calculate/MSP/MSP102819e3b0ea35330h1a000020e9fi69ecabg1i0?MSPStoreType=image/gif&amp;s=12" alt="" title="" width="300" height="161"/>
+  </subpod>
+  <states count="2">
+   <state name="World map" input="Location:CityData__World map"/>
+   <state name="Show coordinates" input="Location:CityData__Show coordinates"/>
+  </states>
+  <infos count="1">
+   <info>
+    <link url="http://maps.google.com/maps?t=h&amp;ie=UTF8&amp;ll=42.3216,-71.0891&amp;z=12" text="Satellite image"/>
+   </info>
+  </infos>
+ </pod>
+ <pod title="Local map" scanner="Data" id="Map:CityData" position="400" error="false" numsubpods="1">
+  <subpod title="">
+   <plaintext/>
+   <img src="http://www1.wolframalpha.com/Calculate/MSP/MSP102919e3b0ea35330h1a000038e0a9d82ceg5fga?MSPStoreType=image/gif&amp;s=12" alt="" title="" width="256" height="278"/>
+  </subpod>
+  <states count="3">
+   <state name="Metric" input="Map:CityData__Metric"/>
+   <state name="Larger display" input="Map:CityData__Larger display"/>
+   <statelist count="13" value="9 miles across">
+    <state name="2 miles across" input="Map:CityData__2 miles across"/>
+    <state name="4 miles across" input="Map:CityData__4 miles across"/>
+    <state name="9 miles across" input="Map:CityData__9 miles across"/>
+    <state name="18 miles across" input="Map:CityData__18 miles across"/>
+    <state name="36 miles across" input="Map:CityData__36 miles across"/>
+    <state name="72 miles across" input="Map:CityData__72 miles across"/>
+    <state name="140 miles across" input="Map:CityData__140 miles across"/>
+    <state name="290 miles across" input="Map:CityData__290 miles across"/>
+    <state name="570 miles across" input="Map:CityData__570 miles across"/>
+    <state name="1100 miles across" input="Map:CityData__1100 miles across"/>
+    <state name="2200 miles across" input="Map:CityData__2200 miles across"/>
+    <state name="3900 miles across" input="Map:CityData__3900 miles across"/>
+    <state name="7200 miles across" input="Map:CityData__7200 miles across"/>
+   </statelist>
+  </states>
+  <infos count="1">
+   <info>
+    <link url="http://maps.google.com/maps?t=h&amp;ie=UTF8&amp;ll=42.3216,-71.0891&amp;z=12" text="Satellite image"/>
+   </info>
+  </infos>
+ </pod>
+ <pod title="Current local time" scanner="Data" id="CurrentTime:CityData" position="500" error="false" numsubpods="1">
+  <subpod title="">
+   <plaintext>5:32 pm EST | Sunday, January 23, 2011</plaintext>
+   <img src="http://www1.wolframalpha.com/Calculate/MSP/MSP103019e3b0ea35330h1a000025c691cb4f654g5c?MSPStoreType=image/gif&amp;s=12" alt="5:32 pm EST | Sunday, January 23, 2011" title="5:32 pm EST | Sunday, January 23, 2011" width="270" height="20"/>
+  </subpod>
+ </pod>
+ <pod title="Current weather" scanner="Data" id="WeatherPod:CityData" position="600" error="false" numsubpods="1">
+  <subpod title="">
+   <plaintext>19 &#xB0;F  (wind chill: 7 &#xB0;F)  |  relative humidity: 45%  |  wind: 12 mph  |  partly cloudy</plaintext>
+   <img src="http://www1.wolframalpha.com/Calculate/MSP/MSP103119e3b0ea35330h1a000037d137ggg45f08b4?MSPStoreType=image/gif&amp;s=12" alt="19 °F  (wind chill: 7 °F)  |  relative humidity: 45%  |  wind: 12 mph  |  partly cloudy" title="19 °F  (wind chill: 7 °F)  |  relative humidity: 45%  |  wind: 12 mph  |  partly cloudy" width="496" height="42"/>
+  </subpod>
+  <states count="2">
+   <state name="Show history" input="WeatherPod:CityData__Show history"/>
+   <state name="Show metric" input="WeatherPod:CityData__Show metric"/>
+  </states>
+ </pod>
+ <pod title="Economic properties" scanner="Data" id="EconomicProperties:CityData" position="700" error="false" numsubpods="1">
+  <subpod title="">
+   <plaintext>cost of living index | 1.3  &#xD7; national average  (Q3 2010)
+median home price | $332900 (Boston metro area) (annual change: -7.81%)  (2009)
+unemployment rate | 8%  (September 2010)
+total sales tax rate | 6.25%</plaintext>
+   <img src="http://www1.wolframalpha.com/Calculate/MSP/MSP103219e3b0ea35330h1a00003ih0c624f9fcig5g?MSPStoreType=image/gif&amp;s=12" alt="cost of living index | 1.3  × national average  (Q3 2010) median home price | $332900 (Boston metro area) (annual change: -7.81%)  (2009) unemployment rate | 8%  (September 2010) total sales tax rate | 6.25%" title="cost of living index | 1.3  × national average  (Q3 2010) median home price | $332900 (Boston metro area) (annual change: -7.81%)  (2009) unemployment rate | 8%  (September 2010) total sales tax rate | 6.25%" width="496" height="158"/>
+  </subpod>
+ </pod>
+ <pod title="Other indicators" scanner="Data" id="QualityOfLife:CityData" position="800" error="false" numsubpods="1">
+  <subpod title="">
+   <plaintext>total rate of violent crime | 2.4  &#xD7; national average  (2008 estimate)
+total rate of property crime | 1.2  &#xD7; national average  (2008 estimate)
+average daily traffic delay | 7.1 min/day</plaintext>
+   <img src="http://www1.wolframalpha.com/Calculate/MSP/MSP103319e3b0ea35330h1a00002c43ica63fee46b2?MSPStoreType=image/gif&amp;s=12" alt="total rate of violent crime | 2.4  × national average  (2008 estimate) total rate of property crime | 1.2  × national average  (2008 estimate) average daily traffic delay | 7.1 min/day" title="total rate of violent crime | 2.4  × national average  (2008 estimate) total rate of property crime | 1.2  × national average  (2008 estimate) average daily traffic delay | 7.1 min/day" width="474" height="106"/>
+  </subpod>
+  <infos count="1">
+   <info>
+    <units count="1">
+     <unit short="min/day" long="minutes per day"/>
+     <img src="http://www1.wolframalpha.com/Calculate/MSP/MSP103419e3b0ea35330h1a00003eheg0g4i784h0a8?MSPStoreType=image/gif&amp;s=12" width="179" height="26"/>
+    </units>
+   </info>
+  </infos>
+ </pod>
+ <pod title="Geographic properties" scanner="Data" id="GeographicProperties:CityData" position="900" error="false" numsubpods="1">
+  <subpod title="">
+   <plaintext>elevation | 46 ft
+area | 48.43 mi^2
+population density | 12576 people/mi^2</plaintext>
+   <img src="http://www1.wolframalpha.com/Calculate/MSP/MSP103519e3b0ea35330h1a00001a2di1ih5177fie0?MSPStoreType=image/gif&amp;s=12" alt="elevation | 46 ft area | 48.43 mi^2 population density | 12576 people/mi^2" title="elevation | 46 ft area | 48.43 mi^2 population density | 12576 people/mi^2" width="286" height="106"/>
+  </subpod>
+  <states count="1">
+   <state name="Show metric" input="GeographicProperties:CityData__Show metric"/>
+  </states>
+  <infos count="1">
+   <info>
+    <units count="3">
+     <unit short="ft" long="feet"/>
+     <unit short="mi^2" long="square miles"/>
+     <unit short="people/mi^2" long="people per square mile"/>
+     <img src="http://www1.wolframalpha.com/Calculate/MSP/MSP103619e3b0ea35330h1a00003d88iibb6i7093e8?MSPStoreType=image/gif&amp;s=12" width="232" height="74"/>
+    </units>
+   </info>
+  </infos>
+ </pod>
+ <pod title="Nearby cities" scanner="Data" id="CityHierarchyInfo:CityData" position="1000" error="false" numsubpods="1">
+  <subpod title="">
+   <plaintext>Cambridge, Massachusetts | 4 miles north-northwest | 105596 people
+Quincy, Massachusetts | 6 miles southeast | 92339 people
+Providence, Rhode Island | 38 miles south-southwest | 171557 people
+New York City, New York | 184 miles southwest | 8.364 million people
+(straight-line distances between city centers)</plaintext>
+   <img src="http://www1.wolframalpha.com/Calculate/MSP/MSP103719e3b0ea35330h1a00000ddigh995a68547a?MSPStoreType=image/gif&amp;s=12" alt="Cambridge, Massachusetts | 4 miles north-northwest | 105596 people Quincy, Massachusetts | 6 miles southeast | 92339 people Providence, Rhode Island | 38 miles south-southwest | 171557 people New York City, New York | 184 miles southwest | 8.364 million people (straight-line distances between city centers)" title="Cambridge, Massachusetts | 4 miles north-northwest | 105596 people Quincy, Massachusetts | 6 miles southeast | 92339 people Providence, Rhode Island | 38 miles south-southwest | 171557 people New York City, New York | 184 miles southwest | 8.364 million people (straight-line distances between city centers)" width="495" height="209"/>
+  </subpod>
+  <states count="2">
+   <state name="Show metric" input="CityHierarchyInfo:CityData__Show metric"/>
+   <state name="More" input="CityHierarchyInfo:CityData__More"/>
+  </states>
+ </pod>
+ <pod title="County" scanner="Data" id="CountyInfo:CityData" position="1100" error="false" numsubpods="1">
+  <subpod title="">
+   <plaintext>Suffolk County, Massachusetts</plaintext>
+   <img src="http://www1.wolframalpha.com/Calculate/MSP/MSP103819e3b0ea35330h1a000011cc3hc37d56i612?MSPStoreType=image/gif&amp;s=12" alt="Suffolk County, Massachusetts" title="Suffolk County, Massachusetts" width="201" height="20"/>
+  </subpod>
+ </pod>
+ <pod title="Nicknames" scanner="Data" id="BasicInformation:CityData" position="1200" error="false" numsubpods="1">
+  <subpod title="">
+   <plaintext>Athens of America  |  Beantown  |  The Hub  |  The Cradle of Liberty</plaintext>
+   <img src="http://www1.wolframalpha.com/Calculate/MSP/MSP103919e3b0ea35330h1a0000332h1hcg83g4g27a?MSPStoreType=image/gif&amp;s=12" alt="Athens of America  |  Beantown  |  The Hub  |  The Cradle of Liberty" title="Athens of America  |  Beantown  |  The Hub  |  The Cradle of Liberty" width="452" height="20"/>
+  </subpod>
+ </pod>
+ <pod title="Notable people born in Boston" scanner="Data" id="NotablePeople:CityData" position="1300" error="false" numsubpods="1">
+  <subpod title="">
+   <plaintext>Benjamin Franklin  (1706)  |  Edgar Allan Poe  (1809)  |  Michael Bloomberg  (1942)  |  Robert F. Kennedy  (1925)  |  James Taylor  (1948)  |  Ralph Waldo Emerson  (1803)  |  Donna Summer  (1948)  |  Guru  (1961)  |  Leonard Nimoy  (1931)  |  Uma Thurman  (1970)  |  ...</plaintext>
+   <img src="http://www1.wolframalpha.com/Calculate/MSP/MSP104019e3b0ea35330h1a00006509g4f69da8a7i5?MSPStoreType=image/gif&amp;s=12" alt="Benjamin Franklin  (1706)  |  Edgar Allan Poe  (1809)  |  Michael Bloomberg  (1942)  |  Robert F. Kennedy  (1925)  |  James Taylor  (1948)  |  Ralph Waldo Emerson  (1803)  |  Donna Summer  (1948)  |  Guru  (1961)  |  Leonard Nimoy  (1931)  |  Uma Thurman  (1970)  |  ..." title="Benjamin Franklin  (1706)  |  Edgar Allan Poe  (1809)  |  Michael Bloomberg  (1942)  |  Robert F. Kennedy  (1925)  |  James Taylor  (1948)  |  Ralph Waldo Emerson  (1803)  |  Donna Summer  (1948)  |  Guru  (1961)  |  Leonard Nimoy  (1931)  |  Uma Thurman  (1970)  |  ..." width="461" height="101"/>
+  </subpod>
+  <states count="4">
+   <state name="More" input="NotablePeople:CityData__More"/>
+   <state name="Show dates" input="NotablePeople:CityData__Show dates"/>
+   <state name="Show occupations" input="NotablePeople:CityData__Show occupations"/>
+   <state name="Show deaths" input="NotablePeople:CityData__Show deaths"/>
+  </states>
+ </pod>
+ <assumptions count="2">
+  <assumption type="Clash" word="boston" count="4">
+   <value name="City" desc="a city" input="*C.boston-_*City-"/>
+   <value name="Surname" desc="a surname" input="*C.boston-_*Surname-"/>
+   <value name="AdministrativeDivision" desc="an administrative division" input="*C.boston-_*AdministrativeDivision-"/>
+   <value name="GivenName" desc="a given name" input="*C.boston-_*GivenName-"/>
+  </assumption>
+  <assumption type="SubCategory" word="boston" count="7">
+   <value name="{Boston, Massachusetts, UnitedStates}" desc="Boston (Massachusetts, USA)" input="*DPClash.CityE.boston-_**Boston.Massachusetts.UnitedStates--"/>
+   <value name="{Boston, NewYork, UnitedStates}" desc="Boston (New York, USA)" input="*DPClash.CityE.boston-_**Boston.NewYork.UnitedStates--"/>
+   <value name="{Boston, Lincolnshire, UnitedKingdom}" desc="Boston (United Kingdom)" input="*DPClash.CityE.boston-_**Boston.Lincolnshire.UnitedKingdom--"/>
+   <value name="{Boston, Georgia, UnitedStates}" desc="Boston (Georgia, USA)" input="*DPClash.CityE.boston-_**Boston.Georgia.UnitedStates--"/>
+   <value name="{Boston, Karakalpakstan, Uzbekistan}" desc="Boston (Uzbekistan)" input="*DPClash.CityE.boston-_**Boston.Karakalpakstan.Uzbekistan--"/>
+   <value name="{Boston, Indiana, UnitedStates}" desc="Boston (Indiana, USA)" input="*DPClash.CityE.boston-_**Boston.Indiana.UnitedStates--"/>
+   <value name="{Boston, DavaoOriental, Philippines}" desc="Boston (Philippines)" input="*DPClash.CityE.boston-_**Boston.DavaoOriental.Philippines--"/>
+  </assumption>
+ </assumptions>
+ <sources count="4">
+  <source url="http://www.wolframalpha.com/sources/CityDataSourceInformationNotes.html" text="City data"/>
+  <source url="http://www.wolframalpha.com/sources/OpenStreetMapSourceInformationNotes.html" text="Open street map"/>
+  <source url="http://www.wolframalpha.com/sources/PeopleDataSourceInformationNotes.html" text="People data"/>
+  <source url="http://www.wolframalpha.com/sources/WeatherDataSourceInformationNotes.html" text="Weather data"/>
+ </sources>
+</queryresult>

data/test/test_helper.rb

@@ -0,0 +1,34 @@
+require 'bacon'
+require 'bacon/bits'
+require 'rr'
+require 'bacon/rr'
+require 'wolfram'
+Wolfram.appid = 'xxx'
+
+module TestHelpers
+  def capture_stdout(&block)
+    original_stdout = $stdout
+    $stdout = fake = StringIO.new
+    begin
+      yield
+    ensure
+      $stdout = original_stdout
+    end
+    fake.string
+  end
+
+  def capture_stderr(&block)
+    original_stderr = $stderr
+    $stderr = fake = StringIO.new
+    begin
+      yield
+    ensure
+      $stderr = original_stderr
+    end
+    fake.string
+  end
+end
+
+class Bacon::Context
+  include TestHelpers
+end

data/test/util_test.rb

@@ -0,0 +1,25 @@
+require File.join(File.dirname(__FILE__), 'test_helper')
+
+describe "Util" do
+  it "#to_query generates correct string" do
+    Wolfram::Util.to_query('moo', 'sound').should == 'sound=moo'
+  end
+
+  it "#to_param generates correct_string" do
+    Wolfram::Util.to_param(:appid => 'xxx', :input => 'from ny to boston').should ==
+      "appid=xxx&input=from+ny+to+boston"
+  end
+
+  describe "#module_get" do
+    before_all { eval %[module Blah; end] }
+
+    it "creates a new module if it doesn't exist" do
+      Wolfram::Util.module_get(Blah, 'One').should == Blah::One
+    end
+
+    it "returns existing module" do
+      Wolfram::Util.module_get(Blah, 'Two')
+      Wolfram::Util.module_get(Blah, 'Two').should == Blah::Two
+    end
+  end
+end

data/test/wolfram_test.rb

@@ -0,0 +1,32 @@
+require File.join(File.dirname(__FILE__), 'test_helper')
+
+describe "Wolfram" do
+  def wolfram(input)
+    Wolfram.run input.split(/\s+/)
+  end
+
+  describe "#run" do
+    it "with no query returns usage" do
+      capture_stdout { wolfram('') }.should =~ /^Usage: wolfram/
+    end
+
+    it "with normal query returns output" do
+      mock(Wolfram::Query).fetch(anything) { 
+        File.read(File.expand_path(File.dirname(__FILE__) + '/fixtures/boston.xml'))
+      }
+      capture_stdout { wolfram 'boston' }.should =~ /boston/i
+    end
+
+    it "with invalid response prints error" do
+      mock(Wolfram::Query).fetch(anything) { ' ' }
+      capture_stderr { wolfram 'boston' }.should =~ /^Wolfram Error:.*queryresult/
+    end
+
+    it "with no appid prints error" do
+      val = Wolfram.appid
+      Wolfram.appid = nil
+      capture_stderr { wolfram 'boston' }.should =~ /Wolfram Error:.*APPID/
+      Wolfram.appid = val
+    end
+  end
+end

metadata

@@ -0,0 +1,162 @@
+--- !ruby/object:Gem::Specification 
+name: wolfram
+version: !ruby/object:Gem::Version 
+  hash: 27
+  prerelease: false
+  segments: 
+  - 0
+  - 1
+  - 0
+  version: 0.1.0
+platform: ruby
+authors: 
+- Gabriel Horner
+autorequire: 
+bindir: bin
+cert_chain: []
+
+date: 2011-01-24 00:00:00 -05:00
+default_executable: 
+dependencies: 
+- !ruby/object:Gem::Dependency 
+  name: nokogiri
+  prerelease: false
+  requirement: &id001 !ruby/object:Gem::Requirement 
+    none: false
+    requirements: 
+    - - ">="
+      - !ruby/object:Gem::Version 
+        hash: 1
+        segments: 
+        - 1
+        - 4
+        - 3
+        version: 1.4.3
+  type: :runtime
+  version_requirements: *id001
+- !ruby/object:Gem::Dependency 
+  name: rr
+  prerelease: false
+  requirement: &id002 !ruby/object:Gem::Requirement 
+    none: false
+    requirements: 
+    - - ">="
+      - !ruby/object:Gem::Version 
+        hash: 3
+        segments: 
+        - 0
+        version: "0"
+  type: :development
+  version_requirements: *id002
+- !ruby/object:Gem::Dependency 
+  name: bacon
+  prerelease: false
+  requirement: &id003 !ruby/object:Gem::Requirement 
+    none: false
+    requirements: 
+    - - ">="
+      - !ruby/object:Gem::Version 
+        hash: 19
+        segments: 
+        - 1
+        - 1
+        - 0
+        version: 1.1.0
+  type: :development
+  version_requirements: *id003
+- !ruby/object:Gem::Dependency 
+  name: bacon-rr
+  prerelease: false
+  requirement: &id004 !ruby/object:Gem::Requirement 
+    none: false
+    requirements: 
+    - - ">="
+      - !ruby/object:Gem::Version 
+        hash: 3
+        segments: 
+        - 0
+        version: "0"
+  type: :development
+  version_requirements: *id004
+- !ruby/object:Gem::Dependency 
+  name: bacon-bits
+  prerelease: false
+  requirement: &id005 !ruby/object:Gem::Requirement 
+    none: false
+    requirements: 
+    - - ">="
+      - !ruby/object:Gem::Version 
+        hash: 3
+        segments: 
+        - 0
+        version: "0"
+  type: :development
+  version_requirements: *id005
+description: Explore the vast world of computational knowledge available for free via Wolfram's v2 API.
+email: gabriel.horner@gmail.com
+executables: 
+- wolfram
+extensions: []
+
+extra_rdoc_files: 
+- README.rdoc
+- LICENSE.txt
+files: 
+- lib/wolfram/assumption.rb
+- lib/wolfram/pod.rb
+- lib/wolfram/query.rb
+- lib/wolfram/result.rb
+- lib/wolfram/util.rb
+- lib/wolfram/version.rb
+- lib/wolfram/xml_container.rb
+- lib/wolfram.rb
+- test/test_helper.rb
+- test/util_test.rb
+- test/wolfram_test.rb
+- bin/wolfram
+- LICENSE.txt
+- CHANGELOG.rdoc
+- README.rdoc
+- deps.rip
+- test/deps.rip
+- Rakefile
+- .gemspec
+- test/fixtures/boston.xml
+has_rdoc: true
+homepage: http://github.com/cldwalker/wolfram
+licenses: 
+- MIT
+post_install_message: 
+rdoc_options: []
+
+require_paths: 
+- lib
+required_ruby_version: !ruby/object:Gem::Requirement 
+  none: false
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      hash: 3
+      segments: 
+      - 0
+      version: "0"
+required_rubygems_version: !ruby/object:Gem::Requirement 
+  none: false
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      hash: 23
+      segments: 
+      - 1
+      - 3
+      - 6
+      version: 1.3.6
+requirements: []
+
+rubyforge_project: tagaholic
+rubygems_version: 1.3.7
+signing_key: 
+specification_version: 3
+summary: Wolfram V2 API client
+test_files: []
+