moneyrail 0.0.2

data/.gitignore

@@ -0,0 +1,5 @@
+db/*.sqlite3
+db/schema.rb
+log
+tmp
+public/stylesheets/*.css

data/.gitmodules

@@ -0,0 +1,6 @@
+[submodule "vendor/plugins/less"]
+	path = vendor/plugins/less
+	url = git://github.com/augustl/less-for-rails.git
+[submodule "vendor/plugins/acts_as_list"]
+	path = vendor/plugins/acts_as_list
+	url = git://github.com/rails/acts_as_list.git

data/Changelog

@@ -0,0 +1,21 @@
+2009-08-19  Yutaka HARA  <yhara(at)kmc.gr.jp>
+
+	* Released 0.0.1
+
+  * new: delete an item when title and amount are both empty
+
+  * fix: item deletion raises an error
+
+	* fix: fails to update cells whose position > 0
+
+2009-08-17  Yutaka HARA  <yhara(at)kmc.gr.jp>
+
+	* new: show logs
+
+2009-08-16  Yutaka HARA  <yhara(at)kmc.gr.jp>
+
+	* Released 0.0.0
+
+
+
+

data/README

@@ -0,0 +1 @@
+see http://wiki.github.com/yhara/moneyrail

data/Rakefile

@@ -0,0 +1,32 @@
+# Add your own tasks in files placed in lib/tasks ending in .rake,
+# for example lib/tasks/capistrano.rake, and they will automatically be available to Rake.
+
+require(File.join(File.dirname(__FILE__), 'config', 'boot'))
+
+require 'rake'
+require 'rake/testtask'
+require 'rake/rdoctask'
+
+require 'tasks/rails'
+
+# -- gem creation
+
+PROJECT_NAME = "moneyrail"
+
+begin
+  require 'jeweler'
+rescue LoadError
+  puts "Jeweler not available. Install it with: sudo gem install technicalpickles-jeweler -s http://gems.github.com"
+end
+
+Jeweler::Tasks.new do |gemspec|
+  gemspec.name = "#{PROJECT_NAME}"
+  gemspec.summary = "Household account book, written in Rails"
+  gemspec.email = "yutaka.hara/at/gmail.com"
+  gemspec.homepage = "http://github.com/yhara/#{PROJECT_NAME}"
+  gemspec.description = gemspec.summary
+  gemspec.authors = ["Yutaka HARA"]
+  gemspec.add_dependency('rails', '= 2.3.3')
+  gemspec.add_dependency('ruby-station-runtime', '>= 0.0.2')
+  gemspec.files.concat Dir["vendor/plugins/**/*"]
+end

data/VERSION

@@ -0,0 +1 @@
+0.0.2

data/app/controllers/accounts_controller.rb

@@ -0,0 +1,99 @@
+class AccountsController < ApplicationController
+  # GET /accounts
+  # GET /accounts.xml
+  def index
+    @accounts = Account.all(:order => "position")
+
+    respond_to do |format|
+      format.html # index.html.erb
+      format.xml  { render :xml => @accounts }
+    end
+  end
+
+  # GET /accounts/1
+  # GET /accounts/1.xml
+  def show
+    @account = Account.find(params[:id])
+
+    respond_to do |format|
+      format.html # show.html.erb
+      format.xml  { render :xml => @account }
+    end
+  end
+
+  # GET /accounts/new
+  # GET /accounts/new.xml
+  def new
+    @account = Account.new
+
+    respond_to do |format|
+      format.html # new.html.erb
+      format.xml  { render :xml => @account }
+    end
+  end
+
+  # GET /accounts/1/edit
+  def edit
+    @account = Account.find(params[:id])
+  end
+
+  # POST /accounts
+  # POST /accounts.xml
+  def create
+    @account = Account.new(params[:account])
+
+    respond_to do |format|
+      if @account.save
+        flash[:notice] = 'Account was successfully created.'
+        format.html { redirect_to(@account) }
+        format.xml  { render :xml => @account, :status => :created, :location => @account }
+      else
+        format.html { render :action => "new" }
+        format.xml  { render :xml => @account.errors, :status => :unprocessable_entity }
+      end
+    end
+  end
+
+  # PUT /accounts/1
+  # PUT /accounts/1.xml
+  def update
+    @account = Account.find(params[:id])
+
+    respond_to do |format|
+      if @account.update_attributes(params[:account])
+        flash[:notice] = 'Account was successfully updated.'
+        format.html { redirect_to(@account) }
+        format.xml  { head :ok }
+      else
+        format.html { render :action => "edit" }
+        format.xml  { render :xml => @account.errors, :status => :unprocessable_entity }
+      end
+    end
+  end
+
+  # DELETE /accounts/1
+  # DELETE /accounts/1.xml
+  def destroy
+    @account = Account.find(params[:id])
+    @account.destroy
+
+    respond_to do |format|
+      format.html { redirect_to(accounts_url) }
+      format.xml  { head :ok }
+    end
+  end
+
+  def move_up
+    @account = Account.find(params[:id])
+    @account.move_higher
+
+    redirect_to :back
+  end
+
+  def move_down
+    @account = Account.find(params[:id])
+    @account.move_lower
+
+    redirect_to :back
+  end
+end

data/app/controllers/application_controller.rb

@@ -0,0 +1,10 @@
+# Filters added to this controller apply to all controllers in the application.
+# Likewise, all the methods added will be available for all controllers.
+
+class ApplicationController < ActionController::Base
+  helper :all # include all helpers, all the time
+  protect_from_forgery # See ActionController::RequestForgeryProtection for details
+
+  # Scrub sensitive parameters from your log
+  # filter_parameter_logging :password
+end

data/app/controllers/categories_controller.rb

@@ -0,0 +1,99 @@
+class CategoriesController < ApplicationController
+  # GET /categories
+  # GET /categories.xml
+  def index
+    @categories = Category.all(:order => "kind, position")
+
+    respond_to do |format|
+      format.html # index.html.erb
+      format.xml  { render :xml => @categories }
+    end
+  end
+
+  # GET /categories/1
+  # GET /categories/1.xml
+  def show
+    @category = Category.find(params[:id])
+
+    respond_to do |format|
+      format.html # show.html.erb
+      format.xml  { render :xml => @category }
+    end
+  end
+
+  # GET /categories/new
+  # GET /categories/new.xml
+  def new
+    @category = Category.new
+
+    respond_to do |format|
+      format.html # new.html.erb
+      format.xml  { render :xml => @category }
+    end
+  end
+
+  # GET /categories/1/edit
+  def edit
+    @category = Category.find(params[:id])
+  end
+
+  # POST /categories
+  # POST /categories.xml
+  def create
+    @category = Category.new(params[:category])
+
+    respond_to do |format|
+      if @category.save
+        flash[:notice] = 'Category was successfully created.'
+        format.html { redirect_to(@category) }
+        format.xml  { render :xml => @category, :status => :created, :location => @category }
+      else
+        format.html { render :action => "new" }
+        format.xml  { render :xml => @category.errors, :status => :unprocessable_entity }
+      end
+    end
+  end
+
+  # PUT /categories/1
+  # PUT /categories/1.xml
+  def update
+    @category = Category.find(params[:id])
+
+    respond_to do |format|
+      if @category.update_attributes(params[:category])
+        flash[:notice] = 'Category was successfully updated.'
+        format.html { redirect_to(@category) }
+        format.xml  { head :ok }
+      else
+        format.html { render :action => "edit" }
+        format.xml  { render :xml => @category.errors, :status => :unprocessable_entity }
+      end
+    end
+  end
+
+  # DELETE /categories/1
+  # DELETE /categories/1.xml
+  def destroy
+    @category = Category.find(params[:id])
+    @category.destroy
+
+    respond_to do |format|
+      format.html { redirect_to(categories_url) }
+      format.xml  { head :ok }
+    end
+  end
+
+  def move_up
+    @account = Category.find(params[:id])
+    @account.move_higher
+
+    redirect_to :action => :index
+  end
+
+  def move_down
+    @account = Category.find(params[:id])
+    @account.move_lower
+
+    redirect_to :action => :index
+  end
+end

data/app/controllers/home_controller.rb

@@ -0,0 +1,31 @@
+class HomeController < ApplicationController
+
+  def index
+    @months = []
+    collect_months(@months)
+    append_current_month(@months)
+  end
+
+  private
+
+  def collect_months(months)
+    oldest = Item.minimum("date")
+    newest = Item.maximum("date")
+
+    if oldest and newest
+      m = newest.beginning_of_month
+      while m >= oldest.beginning_of_month
+        months.push m
+        m <<= 1
+      end
+    end
+  end
+
+  def append_current_month(months)
+    current = Time.now.to_date.beginning_of_month
+    unless months.include?(current)
+      months.push current
+    end
+  end
+
+end

data/app/controllers/items_controller.rb

@@ -0,0 +1,105 @@
+class ItemsController < ApplicationController
+  # GET /items
+  # GET /items.xml
+  def index
+    @items = Item.all(:order => "updated_at DESC")
+
+    respond_to do |format|
+      format.html # index.html.erb
+      format.xml  { render :xml => @items }
+    end
+  end
+
+  # GET /items/1
+  # GET /items/1.xml
+  def show
+    @item = Item.find(params[:id])
+
+    respond_to do |format|
+      format.html # show.html.erb
+      format.xml  { render :xml => @item }
+    end
+  end
+
+  # GET /items/new
+  # GET /items/new.xml
+  def new
+    @item = Item.new
+    @accounts = Account.all
+    @categories = Category.all
+
+    respond_to do |format|
+      format.html # new.html.erb
+      format.xml  { render :xml => @item }
+    end
+  end
+
+  # GET /items/1/edit
+  def edit
+    @item = Item.find(params[:id])
+    @accounts = Account.all
+    @categories = Category.all
+  end
+
+  # POST /items
+  # POST /items.xml
+  def create
+    @item = Item.new(params[:item])
+    @item.type = @item.category.kind
+    @accounts = Account.all
+    @categories = Category.all
+
+    respond_to do |format|
+      if @item.save
+        format.html {
+          flash[:notice] = 'Item was successfully created.'
+          redirect_to(@item) 
+        }
+        format.xml  { render :xml => @item, :status => :created, :location => @item }
+        format.json { render :text => "['ok', #{@item.id}]" }
+      else
+        logger.debug @item.errors.inspect
+        format.html { render :action => "new" }
+        format.xml  { render :xml => @item.errors, :status => :unprocessable_entity }
+        format.json { render :text => "['error']" }
+      end
+    end
+  end
+
+  # PUT /items/1
+  # PUT /items/1.xml
+  def update
+    @item = Item.find(params[:id])
+    @accounts = Account.all
+    @categories = Category.all
+
+    respond_to do |format|
+      if @item.update_attributes(params[:item])
+        format.html { 
+          flash[:notice] = 'Item was successfully updated.'
+          redirect_to(@item) 
+        }
+        format.xml  { head :ok }
+        format.json { render :text => "['ok']" }
+      else
+        logger.debug @item.errors.inspect
+        format.html { render :action => "edit" }
+        format.xml  { render :xml => @item.errors, :status => :unprocessable_entity }
+        format.json { render :text => "['error']" }
+      end
+    end
+  end
+
+  # DELETE /items/1
+  # DELETE /items/1.xml
+  def destroy
+    @item = Item.find(params[:id])
+    @item.destroy
+
+    respond_to do |format|
+      format.html { redirect_to(items_url) }
+      format.xml  { head :ok }
+      format.json { render :text => "['ok']" }
+    end
+  end
+end

data/app/controllers/logs_controller.rb

@@ -0,0 +1,20 @@
+class LogsController < ApplicationController
+
+  def view
+    @mode = params[:mode]
+    @year, @month = params[:year].to_i, params[:month].to_i
+
+    first_day = Date.new(@year, @month)
+    @month_range = first_day .. ((first_day >> 1) - 1)
+
+    @accounts = Account.all(:order => "position")
+    @categories = Category.hashed
+    @cat_all = [
+      @categories[:expense],
+      @categories[:income],
+      @categories[:move],
+    ].flatten(1)
+  end
+  attr_reader :mode
+
+end

data/app/helpers/accounts_helper.rb

@@ -0,0 +1,2 @@
+module AccountsHelper
+end

data/app/helpers/application_helper.rb

@@ -0,0 +1,3 @@
+# Methods added to this helper will be available to all templates in the application.
+module ApplicationHelper
+end

data/app/helpers/categories_helper.rb

@@ -0,0 +1,2 @@
+module CategoriesHelper
+end

data/app/helpers/home_helper.rb

@@ -0,0 +1,2 @@
+module HomeHelper
+end

data/app/helpers/items_helper.rb

@@ -0,0 +1,2 @@
+module ItemsHelper
+end

data/app/helpers/logs_helper.rb

@@ -0,0 +1,42 @@
+module LogsHelper
+
+  def cell(value)
+    if @mode == :edit
+      "<input type='text' value='#{h value}' />"
+    else
+      "<div>#{h value}</div>"
+    end
+  end
+
+  # returns [Date(2009/8/1), nil, nil, Income, ..]
+  def make_table_data(account)
+    condition = {
+      :conditions => {:date => @month_range},
+    }
+    items = [
+      account.expenses.all(condition),
+      account.incomes.all(condition),
+      account.moves_from.all(condition),
+      account.moves_to.all(condition),
+    ].flatten(1)
+
+    @month_range.map{|today|
+      todays, items = items.partition{|m| m.date == today}
+      positions = todays.map(&:position)
+      max_position = (positions.empty?) ? 0 : positions.max
+
+      (0..max_position).map{|i|
+        day = (i==0) ? today : :no_date
+        [
+          today,
+          i,
+          i == max_position, 
+          @cat_all.map{|cat|
+            todays.find{|m| m.category == cat && m.position == i}
+          }.unshift(day)
+        ]
+      }
+    }.flatten(1)
+  end
+
+end

data/app/models/account.rb

@@ -0,0 +1,12 @@
+class Account < ActiveRecord::Base
+  has_many :incomes
+  has_many :expenses
+  has_many :moves_from, :class_name => "Move", :foreign_key => :account_id_from
+  has_many :moves_to,   :class_name => "Move", :foreign_key => :account_id_to
+
+  validates_presence_of :name
+  validates_uniqueness_of :name
+
+  # provides move_higher, move_lower, etc.
+  acts_as_list
+end

data/app/models/category.rb

@@ -0,0 +1,26 @@
+class Category < ActiveRecord::Base
+  validates_presence_of :name
+  validates_uniqueness_of :name
+  
+  def validate
+    unless %w(Income Expense Move).include?(self.kind)
+      errors.add("kind", "#{self.kind.inspect} must be either of Income, Expense, Move")
+    end
+  end
+
+  # provides move_higher, move_lower, etc.
+  # categories are indexed in those of the same kind
+  acts_as_list :scope => 'kind == \'#{kind}\''
+
+  def self.hashed
+    {
+      :income =>
+      self.all(:conditions => {:kind => "Income"},  :order => "position"),
+      :expense =>
+      self.all(:conditions => {:kind => "Expense"}, :order => "position"),
+      :move =>
+      self.all(:conditions => {:kind => "Move"},    :order => "position") 
+    }
+  end
+
+end

data/app/models/expense.rb

@@ -0,0 +1,2 @@
+class Expense < SimpleItem
+end

data/app/models/income.rb

@@ -0,0 +1,2 @@
+class Income < SimpleItem
+end

data/app/models/item.rb

@@ -0,0 +1,31 @@
+class Item < ActiveRecord::Base
+  belongs_to :category
+
+  # validations
+  
+  def before_validation
+    self.title = "" if self.title.nil?
+    self.amount = 0 if self.amount.blank?
+  end
+
+  validates_presence_of :date
+
+  validates_presence_of :amount, :position
+  validates_numericality_of :amount, :position
+
+  def self.find_conflict(item)
+    item.type.constantize.find_conflict(item)
+  end
+
+  def validate
+    # validate category
+    unless self.category && self.category.kind == self.type
+      errors.add("category", "the category is not for #{self.type}")
+    end
+
+    # validate index of day
+    if same = self.class.find_conflict(self)
+      errors.add("position", "position #{position} conflicts with #{same.title} (#{same.amount}, #{same.date})")
+    end
+  end
+end

data/app/models/move.rb

@@ -0,0 +1,37 @@
+class Move < Item
+  # associations
+  
+  belongs_to :account_from, :class_name => "Account", :foreign_key => :account_id_from
+  belongs_to :account_to, :class_name => "Account", :foreign_key => :account_id_to
+
+  # validations
+
+  validates_presence_of :account_from
+  validates_presence_of :account_to
+
+  def self.find_conflict(item)
+    Move.all(:conditions => {
+      :date => item.date,
+      :account_id_from => item.account_id_from,
+      :account_id_to => item.account_id_to,
+      :category_id => item.category_id,
+      :position => item.position,
+    }).reject{|x| x.id == item.id}.first
+  end
+
+  def validate
+    if account_id_from == account_id_to
+      errors.add("account_id_from", "from and to must not be same")
+    end
+    super
+  end
+  
+  # featues
+
+  acts_as_list :scope => [
+    'date = #{date}',
+    'account_id_from = #{account_id_from}',
+    'account_id_to = #{account_id_to}',
+    'category_id = #{category_id}',
+  ].join(" AND ")
+end

data/app/models/simple_item.rb

@@ -0,0 +1,27 @@
+class SimpleItem < Item
+  # associations
+  
+  belongs_to :account
+  
+  # validations
+
+  validates_presence_of :account
+
+  def self.find_conflict(item)
+    Item.all(:conditions => {
+      :type => item.type,
+      :date => item.date, 
+      :account_id => item.account_id,
+      :category_id => item.category_id,
+      :position => item.position,
+    }).reject{|x| x.id == item.id}.first
+  end
+  
+  # featues
+
+  acts_as_list :scope => [
+    'date = #{date}',
+    'account_id = #{account_id}',
+    'category_id = #{category_id}',
+  ].join(" AND ")
+end

data/app/views/accounts/edit.html.erb

@@ -0,0 +1,16 @@
+<h2>Editing account</h2>
+
+<% form_for(@account) do |f| %>
+  <%= f.error_messages %>
+
+  <p>
+    <%= f.label :name %><br />
+    <%= f.text_field :name %>
+  </p>
+  <p>
+    <%= f.submit 'Update' %>
+  </p>
+<% end %>
+
+<%= link_to 'Show', @account %> |
+<%= link_to 'Back', accounts_path %>