class DynarexDaily

# File lib/dynarex-daily.rb, line 12
def initialize(stringx=nil, dir_archive: :days, xslt: '', 
               filename: 'dynarexdaily.xml', fields: %i(desc), 
               autosave: false, order: 'ascending', debug: false)
  
  @dir_archive = dir_archive

  @filename = filename
  @schema = 'entries[date]/entry(time, ' + fields.join(', ') + ')'
  @default_key = 'uid'
  @debug = debug

  puts 'DynarexDaily::initialize stringx: ' + stringx.inspect  if @debug
  
  if stringx then
    s, type = RXFReader.read(stringx)
    @filename = stringx if type == :file or type == :dfs
  end
  
  puts 'DynarexDaily::initialize @filename: ' + @filename.inspect  if @debug
  
  if FileX.exist?(@filename) then
    
    puts 'file exists!' if @debug
    super @filename, debug: debug
    
    if !summary[:date].empty? and \
        Date.parse(summary[:date]) != Date.today then
      
      archive_file Date.parse(summary[:date])
      create_file
    end  
    
  else
    puts 'before super: stringx: ' + stringx.inspect if @debug
    super( stringx || @schema , order: order, debug: debug)
    puts 'after super' if @debug
    @delimiter = ' # '      
    create_file
  end
                                                      
  @autosave = autosave

  self.xslt = xslt if xslt
end

# File lib/dynarex-daily.rb, line 57
def create(h)
  
  puts 'Date.today: ' + Date.today.inspect if @debug

  if !summary[:date].empty? and \
      Date.parse(summary[:date]) != Date.today then
    
    archive_file Date.parse(summary[:date])
    create_file
  end      
  
  super({time: Time.now.to_f.to_s}.merge(h))
end

# File lib/dynarex-daily.rb, line 72
def save(filename=@filename, options={})

  puts 'inside DynarexDaily::save() filename: ' + filename.inspect if @debug
  super(filename, options)

end

# File lib/dynarex-daily.rb, line 79
def schema=(s)
  super(s.sub(/^\w+(?=\/)/,'\0[date]'))
  summary[:date] = Date.today.to_s
  summary[:order] = 'descending'    
end

# File lib/dynarex-daily.rb, line 98
def archive_file(t)

  puts 'inside DynarexDaily::archive_file' if @debug   
  
  dir, file = if @dir_archive == :days then
    puts 'days archive' if @debug
    ['days', t.strftime("d%d%m%y.xml")]
  else
    puts 'other archive' if @debug
    [t.strftime("%Y/%b/%d").downcase, 'index.xml']
  end

  puts 'about to mkdir ' + dir.inspect if @debug
  FileX.mkdir_p dir unless FileX.exist? dir
  
  if @debug then
    puts 'inside DynarexDaily::archive_file '
    puts '  @filename: %s' % [@filename]
    puts '  dir: %s; file: %s' % [dir, file]
    puts '  FileX: %s' % [dir, FileX.pwd]
  end
  
  FileX.mv(@filename, "%s/%s" % [dir, file])
  puts 'inside DynarexDaily::archive_file after FileX.mv' if @debug
  
end

# File lib/dynarex-daily.rb, line 87
def create_file()
  
  puts 'inside DynarexDaily::create_file' if @debug   
  
  openx(@schema)
  summary[:date] = Date.today.to_s
  summary[:order] = 'descending'

  save
end