radio 0.0.1 → 0.0.2

data/lib/radio/filters/fir.rb

@@ -0,0 +1,65 @@
+# Copyright 2012 The ham21/radio Authors
+#
+# Licensed under the Apache License, Version 2.0 (the "License");
+# you may not use this file except in compliance with the License.
+# You may obtain a copy of the License at
+#
+#     http://www.apache.org/licenses/LICENSE-2.0
+#
+# Unless required by applicable law or agreed to in writing, software
+# distributed under the License is distributed on an "AS IS" BASIS,
+# WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
+# See the License for the specific language governing permissions and
+# limitations under the License.
+
+
+class Radio
+  class Filter
+    
+    module FirSetup
+      # It's ok that not all filter patterns use all instance variables.
+      def setup data
+        @mix_phase = 0.0
+        @mix_phase_inc = @options[:mix]
+        @dec_pos = @dec_size = @options[:decimate]
+        coef = @options[:fir]
+        @fir_pos = 0
+        @fir_size = coef.size
+        @fir_coef = NArray.to_na coef.reverse*2
+        @fir_buf = NArray.complex @fir_size
+        super
+      end
+    end
+
+    module FloatEachMixDecimateFir
+      include FirSetup
+      def call data
+        data.each do |energy|
+          @fir_pos = @fir_size if @fir_pos == 0
+          @fir_pos -= 1
+          @fir_buf[@fir_pos] = Complex(Math.cos(@mix_phase)*energy, -Math.sin(@mix_phase)*energy)
+          @mix_phase += @mix_phase_inc
+          @mix_phase -= PI2 if @mix_phase >= PI2
+          @dec_pos -= 1
+          if @dec_pos == 0
+            @dec_pos = @dec_size
+            iq = @fir_buf.mul_accum @fir_coef[@fir_size-@fir_pos..-1-@fir_pos],0
+            yield iq[0]
+          end
+        end
+      end
+    end
+    
+    module ComplexFir
+      include FirSetup
+      def call data
+        @fir_pos = @fir_size if @fir_pos == 0
+        @fir_pos -= 1
+        @fir_buf[@fir_pos] = data
+        iq = @fir_buf.mul_accum @fir_coef[@fir_size-@fir_pos..-1-@fir_pos],0
+        yield iq[0]
+      end
+    end
+    
+  end
+end

data/lib/radio/gif.rb

@@ -0,0 +1,84 @@
+# Copyright 2012 The ham21/radio Authors
+#
+# Licensed under the Apache License, Version 2.0 (the "License");
+# you may not use this file except in compliance with the License.
+# You may obtain a copy of the License at
+#
+#     http://www.apache.org/licenses/LICENSE-2.0
+#
+# Unless required by applicable law or agreed to in writing, software
+# distributed under the License is distributed on an "AS IS" BASIS,
+# WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
+# See the License for the specific language governing permissions and
+# limitations under the License.
+
+
+# 2D Array of numbers will be mapped to 1..127 colors.
+# This 7-bit data is encoded uncompressed and left for
+# http to compress. Background color reserved for future use.
+
+class Radio
+  class Gif
+  
+    # This is an optimized GIF generator for waterfalls. 
+    # It requires 128 RGB colors, the first is unused and
+    # reserved for transparency if we ever need it.
+    def self.waterfall colors, data
+
+      gif = [
+        'GIF87a', # Start Header
+        data[0].size, # width
+        data.size, # height
+        0xF6, # 128 24-bit colors
+        0x00, # background color index
+        0x00 # aspect ratio
+      ].pack 'a6vvCCC'
+
+      gif += colors.flatten.pack 'C*'
+
+      gif += [
+        0x2C, # Start Image Block
+        0x0000, # Left position
+        0x0000, # Top position
+        data[0].size, # width
+        data.size, # height
+        0x00, # No color table, not interlaced
+        0x07 # LZW code size
+      ].pack('CvvvvCC')
+
+      data.each_with_index do |vals, row|
+        col = 0
+        min = vals.min
+        range = [1e-99, vals.max - min].max
+        while col < vals.size
+          # Uncompressed GIF trickery avoids bit packing too
+          # 126 byte chunks with reset keeps LZW in 8 bit codes
+          col_end = [col+126,vals.size].min
+          slice = vals.slice(col...col_end).to_a
+          # This 126 because palette is 1..127
+          slice = slice.collect { |x| (x - min) / range * 126 + 1 }
+          slice = slice.pack 'C*'
+          newstuff = [
+            slice.size+1,
+            slice,
+            0x80 # LZW reset
+          ].pack('Ca*C')
+          gif += newstuff
+          col += 126
+        end
+
+      end
+
+      gif += [
+        0x01, # end image blocks
+        0x81, # final image block: LZW end
+        0x00, # end image blocks
+        0x3B # end gif
+      ].pack('C*')
+
+      return gif
+  
+    end
+
+  end
+end

data/lib/radio/http/file.rb

@@ -0,0 +1,88 @@
+# Copyright 2012 The ham21/radio Authors
+#
+# Licensed under the Apache License, Version 2.0 (the "License");
+# you may not use this file except in compliance with the License.
+# You may obtain a copy of the License at
+#
+#     http://www.apache.org/licenses/LICENSE-2.0
+#
+# Unless required by applicable law or agreed to in writing, software
+# distributed under the License is distributed on an "AS IS" BASIS,
+# WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
+# See the License for the specific language governing permissions and
+# limitations under the License.
+
+
+class Radio
+  class HTTP
+    class FileResponse
+    
+      def initialize(env, filename, content_type = nil)
+        @env = env
+        @filename = filename
+        @status = 200
+        @headers = {}
+        @body = []
+    
+        begin
+          raise Errno::EPERM unless File.file?(filename) and File.readable?(filename)
+        rescue SystemCallError
+          @body = ["404 Not Found\n"]
+          @headers["Content-Length"] = @body.first.size.to_s
+          @headers["Content-Type"] = 'text/plain'
+          @headers["X-Cascade"] = 'pass'
+          @status = 404
+          return
+        end
+    
+        # Caching strategy
+        mod_since = Time.httpdate(env['HTTP_IF_MODIFIED_SINCE']) rescue nil
+        last_modified = File.mtime(filename)
+        @status = 304 and return if last_modified == mod_since
+        @headers["Last-Modified"] = last_modified.httpdate
+        if env['QUERY_STRING'] =~ /^[0-9]{9,10}$/ and last_modified == Time.at(env['QUERY_STRING'].to_i)
+          @headers["Cache-Control"] = 'max-age=86400, public' # one day
+        else
+          @headers["Cache-Control"] = 'max-age=0, private, must-revalidate'
+        end
+    
+        # Sending the file or reading an unknown length stream to send
+        @body = self
+        unless size = File.size?(filename)
+          @body = [File.read(filename)]
+          size = @body.first.respond_to?(:bytesize) ? @body.first.bytesize : @body.first.size
+        end
+        @headers["Content-Length"] = size.to_s
+        @headers["Content-Type"] = content_type || Rack::Mime.mime_type(File.extname(filename), 'text/plain')
+      end
+    
+      # Support using self as a response body.
+      # @yield [String] 8k blocks
+      def each
+        File.open(@filename, "rb") do |file|
+          while part = file.read(8192)
+            yield part
+          end
+        end
+      end
+
+      # Filename attribute.
+      # Alias is used by some rack servers to detach from Ruby early.
+      # @return [String]
+      attr_reader :filename
+      alias :to_path :filename
+
+      # Was the file in the system and ready to be served?
+      def found?
+        @status == 200 or @status == 304
+      end
+
+      # Present the final response for rack.
+      # @return (Array)[status, headers, body]
+      def finish
+        [@status, @headers, @body]
+      end
+
+    end
+  end
+end

data/lib/radio/http/script.rb

@@ -0,0 +1,133 @@
+# Copyright 2012 The ham21/radio Authors
+#
+# Licensed under the Apache License, Version 2.0 (the "License");
+# you may not use this file except in compliance with the License.
+# You may obtain a copy of the License at
+#
+#     http://www.apache.org/licenses/LICENSE-2.0
+#
+# Unless required by applicable law or agreed to in writing, software
+# distributed under the License is distributed on an "AS IS" BASIS,
+# WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
+# See the License for the specific language governing permissions and
+# limitations under the License.
+
+
+require 'erb'
+  
+class Radio
+
+  class HTTP
+    
+    # A Script instance is the context in which scripts are rendered.
+    # It inherits everything from Rack::Request and supplies a Response instance
+    # you can use for redirects, cookies, and other controller actions.
+    class Script < Rack::Request
+      
+      include ERB::Util
+
+      class NotFound < StandardError
+      end
+
+      class RenderStackOverflow < StandardError
+      end
+      
+      def initialize(env, filename)
+        super(env)
+        @render_stack = []
+        @response = original_response = Rack::Response.new
+        rendering = render(filename)
+        if @response == original_response and @response.empty?
+          @response.write rendering
+        end
+      rescue RenderStackOverflow, NotFound => e
+        if @render_stack.size > 0
+          # Make errors appear from the render instead of the engine.call
+          e.set_backtrace e.backtrace[1..-1]
+          raise e 
+        end
+        @response.status = 404
+        @response.write "404 Not Found\n"
+        @response.header["X-Cascade"] = "pass"
+        @response.header["Content-Type"] = "text/plain"
+      end
+
+      # After rendering, #finish will be sent to the client.
+      # If you replace the response or add to the response#body, 
+      # the script engine rendering will not be added.
+      # @return [Rack::Response]
+      attr_accessor :response
+
+      # An array of filenames representing the current render stack.
+      # @example
+      #  <%= if render_stack.size == 1
+      #        render 'html_version' 
+      #      else
+      #        render 'included_version'
+      #      end 
+      #  %>
+      # @return [<Array>]
+      attr_reader :render_stack
+
+      # Render another Script.
+      # @example view_test.erb
+      #   <%= render 'util/logger_popup' %>
+      # @param (String) filename Relative to current Script.
+      # @param (Hash) locals Local variables for the Script.
+      def render(filename, locals = {})
+        if render_stack.size > 100
+          # Since nobody sane should recurse through here, this mainly
+          # finds a render self that you might get after a copy and paste
+          raise RenderStackOverflow 
+        elsif render_stack.size > 0
+          # Hooray for relative paths and easily movable files
+          filename = File.expand_path(filename, File.dirname(render_stack.last))
+        else
+          # Underbar scripts are partials by convention; keep them from rendering at root
+          filename = File.expand_path(filename)
+          raise NotFound if File.basename(filename) =~ /^_/
+        end
+        ext = File.extname(filename)
+        files1 = [filename]
+        files1 << filename + '.html' if ext == ''
+        files1 << filename.sub(/.html$/,'') if ext == '.html'
+        files1.each do |filename1|
+          files2 = [filename1+'.erb']
+          files2 << filename1.gsub(/.html$/, '.erb') if File.extname(filename1) == '.html'
+          unless filename1 =~ /^_/ or render_stack.empty?
+            files2 = files2 + files2.collect {|f| "#{File.dirname(f)}/_#{File.basename(f)}"} 
+          end
+          files2.each do |filename2|
+            if File.file?(filename2) and File.readable?(filename2)
+              if render_stack.empty?
+                response.header["Content-Type"] = Rack::Mime.mime_type(File.extname(filename1), 'text/html')
+              end
+              render_stack.push filename2
+              erb = ::ERB.new(File.read(filename2), nil, '-')
+              erb.filename = filename2
+              set_locals = locals.keys.map { |k| "#{k}=locals[#{k.inspect}];" }.join
+              instance_binding = instance_eval{binding}
+              eval set_locals, instance_binding
+              result = erb.result instance_binding
+              render_stack.pop
+              return result
+            end
+          end
+        end
+        raise NotFound
+      end
+
+      # Helper for finding files relative to Scripts.
+      # @param [String] filename
+      # @return [String] absolute filesystem path
+      def expand_path(filename, dir=nil)
+        dir ||= File.dirname render_stack.last
+        File.expand_path filename, dir
+      end
+
+    end
+
+
+  end
+
+end

data/lib/radio/http/server.rb

@@ -0,0 +1,94 @@
+# Copyright 2012 The ham21/radio Authors
+#
+# Licensed under the Apache License, Version 2.0 (the "License");
+# you may not use this file except in compliance with the License.
+# You may obtain a copy of the License at
+#
+#     http://www.apache.org/licenses/LICENSE-2.0
+#
+# Unless required by applicable law or agreed to in writing, software
+# distributed under the License is distributed on an "AS IS" BASIS,
+# WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
+# See the License for the specific language governing permissions and
+# limitations under the License.
+
+
+require 'rack'
+require 'erb'
+  
+class Radio
+  class HTTP
+    
+    MOUNTS = [
+      ['', File.expand_path(File.join(File.dirname(__FILE__), '../../../www'))]
+    ]
+    
+    class Server
+
+      ENV_THREAD_BYPASS = 'radio.thread_bypass'
+
+      def initialize
+        @working_dir = Dir.getwd
+      end
+      
+      # Thin can run some processes in threads if we provide the logic.
+      # Static files are served without deferring to a thread.
+      # Everything else is tried in the EventMachine thread pool.
+      def deferred? env
+        path_info = Rack::Utils.unescape(env['PATH_INFO'])
+        return false if path_info =~ /\.(\.|erb$)/ # unsafe '..' and '.erb'
+        MOUNTS.each do |path, dir|
+          if path_info =~ %r{^#{Regexp.escape(path)}(/.*|)$}
+            filename = File.join(dir, $1)
+            Dir.chdir @working_dir
+            response = FileResponse.new(env, filename)
+            if !response.found? and File.extname(path_info) == ''
+              response = FileResponse.new(env, filename + '.html')
+            end
+            if response.found?
+              env[ENV_THREAD_BYPASS] = response
+              return false
+            end
+            env[ENV_THREAD_BYPASS] = filename
+          end
+        end
+        return true
+      end
+
+      # Rack interface.
+      # @param (Hash) env Rack environment.
+      # @return (Array)[status, headers, body]
+      def call(env)
+        # The preprocessing left us with nothing, a response,
+        # or a filename that we should try to run.
+        case deferred_result = env.delete(ENV_THREAD_BYPASS)
+        when String
+          filename = deferred_result
+          response = Script.new(env, filename).response
+          if response.header["X-Cascade"] == 'pass'
+            index_response = Script.new(env, filename + '/index').response
+            response = index_response unless index_response.header["X-Cascade"] == 'pass'
+          end
+          response.finish
+        when NilClass
+          not_found
+        else
+          deferred_result.finish
+        end
+      end
+
+      # Status 404 with X-Cascade => pass.
+      # @return (Array)[status, headers, body]
+      def not_found
+        return @not_found if @not_found
+        body = "404 Not Found\n"
+        @not_found = [404, {'Content-Type' => 'text/plain',
+               'Content-Length' => body.size.to_s,
+               'X-Cascade' => 'pass'},
+         [body]]
+        @not_found
+      end
+
+    end
+  end
+end