mjago/CW

# encoding: utf-8

module CW

  class Book < Tester

    include FileDetails

    def initialize book_details
      init_filenames
      @book_details = book_details
      read_book book_location
      find_sentences
    end

    def sentence             ; @sentence ||= Sentence.new        ; end
    def find_sentences       ; sentence.find_all                 ; end
    def read_book(book)      ; sentence.read_book(book)          ; end
    def play_repeat_tone     ; play.audio.play_tone @repeat_tone ; end
    def complete_word?       ; get_word_last_char == ' '         ; end
    def book_location        ; @book_details.book_location       ; end
    def print_book_advice    ; print.print_advice('Play Book')   ; end

    def convert
      book = @sentence.all.join
      play.audio.convert_book(book)
    end

    def change_or_repeat_sentence?
      sentence.change_or_repeat?
    end

    def change_repeat_or_quit?
      if(change_or_repeat_sentence? || quit?)
        sentence.index += 1
        write_book_progress
        return true
      end
      false
    end

    def check_sentence_navigation chr
      sentence.check_sentence_navigation chr
    end

    def get_book_progress
      sentence.read_progress progress_file
      @current_sentence_index = sentence.index
    end

    def write_book_progress
      sentence.write_progress progress_file
    end

    def audio_play_repeat_tone_maybe
      play_repeat_tone if sentence.repeat?
    end

    def process_input_word_maybe
      if @word_to_process
        if @book_details.args[:output] == :letter
          stream.match_first_active_element @process_input_word # .strip #todo
        else
          stream.match_last_active_element @process_input_word.strip #todo
        end
        @process_input_word = @word_to_process = nil
      end
    end

    def build_word_maybe
      @input_word ||= ''
      @input_word << key_chr if is_relevant_char?
      if @book_details.args[:output] == :letter
        move_word_to_process if is_relevant_char? #todo
      else
        move_word_to_process if complete_word?
      end
    end

    def compile_sentence
      play.audio.convert_words(sentence.current + ' ')
    end

    def compile_and_play
      compile_sentence
      play.start_sync()
      play.audio.play
    end

#    def change_and_kill_audio
#      sentence.change
#      play.stop
#    end

    def next_sentence_or_quit?
      sleep 0.01 if play.still_playing?
      sentence.next unless play.still_playing?
      if change_repeat_or_quit?
        play.stop
#        quit #todo
        sentence.change unless quit?
        #        change_and_kill_audio
        #todo      prn.newline unless quit?
        return true
      end
    end

    def await_next_sentence_or_quit
      loop do
        break if next_sentence_or_quit?
        sleep 0.01
      end
    end

    def quit_or_process_input?
      quit? || @word_to_process
    end

    def process_letter letr
      current_word.process_letter letr
      sleep_char_delay letr
    end

    def print_marked_maybe
      @popped = stream.pop_next_marked
      if @book_details.args[:output] == :letter
        print.char_result(@popped) if(@popped && ! print_letters?) #todo
      else
        print.results(@popped) if(@popped && ! print_letters?)
      end
    end

    def print_words_for_current_sentence
      print_words(sentence.current)
    end

    def make_sentence_index_current
      @current_sentence_index = sentence.index
    end

    def sentence_index_current?
      @current_sentence_index && (@current_sentence_index == sentence.index)
    end

    def play_sentences_until_quit
      get_book_progress

      loop do
        check_sentence_count
        sync_with_print
        audio_play_repeat_tone_maybe
        sentence.reset_flags
        compile_and_play
        await_next_sentence_or_quit
        break if quit?
      end
      print_words_exit
    end

    def check_sentence_count
      if @book_details.session_finished?
        play.stop
        quit
        #      reset_stdin
        #     kill_threads
      end
    end

    def print_sentences_until_quit
      loop do
        check_sentence_count
        sync_with_play
        break if quit?
        sync_with_audio_player
        print_words_for_current_sentence
      end
    end

    def play_sentences_thread
      play_sentences_until_quit
      print "\n\rplay has quit " if @debug
      exit!
    end

    def print_sentences_thread
      print_sentences_until_quit
      print "\n\rprint has quit " if @debug
      exit!
    end

    def thread_processes
      [:monitor_keys_thread,
       :play_sentences_thread,
       :print_sentences_thread
      ]
    end
  end
end