require 'ostruct'
require 'yaml'

def init_liveblog
  @teaser = ""
  @body = ""
  @dest = @teaser
  @meta = ::OpenStruct.new
end

def _errout(*args)
  ::STDERR.puts *args
end

def _passthru(line)
  @dest << "<p>" if line == "\n" and ! @_nopara
  line = _formatting(line)
  @dest << line
end

def title 
  @meta.title = @_data
  @dest << "<h1>#{@meta.title}</h1>"
end

def pubdate 
  _debug "data = #@_data"
  match = /(\d{4}).(\d{2}).(\d{2})/.match @_data
  junk, y, m, d = match.to_a
  y, m, d = y.to_i, m.to_i, d.to_i
  @meta.date = ::Date.new(y, m, d)
  @meta.pubdate = "%04d%02d%02d" % [y, m, d]
end

def categories 
  _debug "args = #{_args}"
  @meta.categories = _args
end

def views
  _debug "data = #{_args}"
  @meta.views = _args # + ["main"]
end

def readmore
  @meta.teaser = @dest
  @dest = @dest + @body
end

def liveblog_version
end

def list
  @dest << "<ul>"
  _body {|line| @dest << "<li>#{line}</li>" }
  @dest << "</ul>"
end

def list!
  @dest << "<ul>"
  lines = _body.each   # {|line| @dest << "<li>#{line}</li>" }
  loop do 
    line = lines.next
    line = _formatting(line)
    if line[0] == " "
      @dest << line
    else
      @dest << "<li>#{line}</li>"
    end
  end
  @dest << "</ul>"
end

def finalize
STDERR.puts "finalize: @meta = #{@meta.inspect}"
  @meta.slug = make_slug(@meta.title, @config.sequence)
  @meta.body = @dest
  @meta
end

#####

def generate(view)
  dir = "views/#{view}"
  _errout("dir = #{dir}")
  out =  "#{dir}/compiled/#{@meta.slug}.html"
  @post_header = ::File.read("#{dir}/post_header.html")
  @post_trailer = ::File.read("#{dir}/post_trailer.html")
  @template = ::File.read("#{dir}/template.html")

  title = @meta.title
  title.gsub!("'",'&#39;')
  title.gsub!('"','_')
  teaser = @meta.teaser
  server, dir = @deployment[view]
  url = "http://#{server}/#{server}/#{@meta.slug}.html"
  tweet = "&#34;#{title}&#34;\n"
  tweet.gsub!("'",'&#39;')

  text = eval("<<HEREDOC\n#@template\nHEREDOC")
  _errout "Writing #{text.size} bytes to #{out}"
  ::File.write(out, text)

  metaname = out.sub(/html/, "yaml")
  _errout "Writing #{@meta.to_yaml.size} bytes to #{metaname}"
  ::File.write(metaname, @meta.to_yaml)
  @list[view] ||= []
  @list[view] << out << metaname
  generate_index(view)
rescue => err
  ::STDERR.puts "#{err}\n#{err.backtrace.map {|x| "  " + x }.join("\n") }"
end

def generate_index(view) # FIXME
  dir = "views/#{view}"
  cdir = "views/#{view}/compiled"
  posts = ::Dir["#{cdir}/*.yaml"].sort {|a,b| b <=> a }
  out = ::File.read("#{dir}/blogheader.html")

  server, destdir = @deployment[view]

  posts.each do |fname|
    meta = ::YAML.load(::File.read(fname))
#   name2 = fname.sub("compiled",)   # FIXME
    name2 = fname.sub("compiled",destdir)
    html = name2.sub(/yaml/, "html")
    out << <<-HTML
    <br>
    <font size=+1>#{meta["pubdate"]}&nbsp;&nbsp;</font>
    <font size=+2 color=blue><a href=../#{html} style="text-decoration: none">#{meta["title"]}</font></a>
    <br>
    #{meta["teaser"]}  
    <a href=../#{html} style="text-decoration: none"><br>Read more...</a>
    <br><br>
    <hr>
    HTML
  end

  out << <<-HTML
  </body>
  </html>
  HTML
  ::File.write("#{cdir}/index.html", out)
  @list[view] << "#{cdir}/index.html"
  _errout @list.inspect
end

def deploy # FIXME
  if @list.empty?
    puts "No changes to deploy."
    return 
  end
  puts "Want to deploy? (y/N):"
  inp = ::File.open("/dev/tty")
  resp = inp.gets.chomp
  return unless resp == "y"

  puts "Deploying:"
  @list.each_pair do |per, files|
    server, dir = @deployment[per]
    cmd = "scp #{files.join(' ')} root@#{server}:#{dir}"
    puts cmd
    system cmd
  end
end

def redeploy(per)
  puts "Redeploying:"
  server, dir = @deployment[per]
  cmd = "scp #{files.join(' ')} root@#{server}:#{dir}"
  puts cmd
# system cmd
end

################ Logic...

=begin
 New post:
   specify file name
   output metadata (yaml), html
   output task list??
 How handle views?
 Generate indices
 Deploy

Handling views:
  Each view has its own index
  Separate boilerplate (header/trailer)
  Separate deployments (separate host info)
  'main' linked to default?
  'test' view
  generate is now dependent on view

Under view dir:
  header/trailer
  index
  host info? (only for deploy)
  separate compiled/ directory??
=end