/*****************************************************************************\
*                                                                             *
*  Name   : to_lower                                                          *
*  Author : Chris Koeritz                                                     *
*                                                                             *
*  Purpose:                                                                   *
*                                                                             *
*    Lowers the case used in file names?  contents?                           *
*                                                                             *
*******************************************************************************
* Copyright (c) 1993-$now By Author.  This program is free software; you can  *
* redistribute it and/or modify it under the terms of the GNU General Public  *
* License as published by the Free Software Foundation; either version 2 of   *
* the License or (at your option) any later version.  This is online at:      *
*     http://www.fsf.org/copyleft/gpl.html                                    *
* Please send any updates to: fred@gruntose.com                               *
\*****************************************************************************/

#include <basis/istring.h>
#include <loggers/console_logger.h>
#include <data_struct/static_memory_gremlin.h>

#include <stdio.h>

HOOPLE_STARTUP_CODE;

#define COMMENT_CHARACTER '-'

console_logger out;

enum states {
  TO_LOWER,
  PASS_THROUGH_QUOTE,
//  PASS_THROUGH_APOSTROPHE,
  COMMENT
};

int main(int formal(argc), char *formal(argv)[])
{
  out.eol(log_base::NO_ENDING);
  states state = TO_LOWER;
  char last_char = '\0';
  while (!feof(stdin)) {
    char current = getc(stdin);
    if (feof(stdin)) break;
    if (current == '"') {
      switch (state) {
        case COMMENT: break;
        case PASS_THROUGH_QUOTE: state = TO_LOWER; break;
//        case PASS_THROUGH_APOSTROPHE: break;
        case TO_LOWER: state = PASS_THROUGH_QUOTE; break;
      }
//    } else if (current == '\'') {
//      switch (state) {
//      case COMMENT: break;
//      case PASS_THROUGH_QUOTE: break;
//      case PASS_THROUGH_APOSTROPHE: state = TO_LOWER; break;
//      case TO_LOWER: state = PASS_THROUGH_APOSTROPHE; break;
//      }
    } else if (current == COMMENT_CHARACTER) {
      if ( (state != COMMENT) && (state != PASS_THROUGH_QUOTE)
          && (last_char == COMMENT_CHARACTER) )
        state = COMMENT;
    } else if ( (current == '\n') && (state == COMMENT) ) state = TO_LOWER;
    istring one_char(current, 1);
    switch (state) {
      case COMMENT: break;
      case TO_LOWER: one_char.to_lower(); break;
      case PASS_THROUGH_QUOTE: break;
//      case PASS_THROUGH_APOSTROPHE: break;
    }
    out.log(one_char);
    last_char = one_char[0];
  }
  return 0;
}

#ifdef __BUILD_STATIC_APPLICATION__
  // static dependencies found by buildor_gen_deps.sh:
  #include <basis/array.cpp>
  #include <basis/byte_array.cpp>
  #include <basis/callstack_tracker.cpp>
  #include <basis/chaos.cpp>
  #include <basis/convert_utf.cpp>
  #include <basis/definitions.cpp>
  #include <basis/earth_time.cpp>
  #include <basis/guards.cpp>
  #include <basis/istring.cpp>
  #include <basis/log_base.cpp>
  #include <basis/memory_checker.cpp>
  #include <basis/mutex.cpp>
  #include <basis/object_base.cpp>
  #include <basis/outcome.cpp>
  #include <basis/packable.cpp>
  #include <basis/portable.cpp>
  #include <basis/sequence.cpp>
  #include <basis/set.cpp>
  #include <basis/utility.cpp>
  #include <basis/version_record.cpp>
  #include <data_struct/amorph.cpp>
  #include <data_struct/bit_vector.cpp>
  #include <data_struct/byte_hasher.cpp>
  #include <data_struct/configurator.cpp>
  #include <data_struct/hash_table.cpp>
  #include <data_struct/pointer_hash.cpp>
  #include <data_struct/stack.cpp>
  #include <data_struct/static_memory_gremlin.cpp>
  #include <data_struct/string_hash.cpp>
  #include <data_struct/string_hasher.cpp>
  #include <data_struct/string_table.cpp>
  #include <data_struct/symbol_table.cpp>
  #include <data_struct/table_configurator.cpp>
  #include <loggers/console_logger.cpp>
  #include <loggers/file_logger.cpp>
  #include <loggers/locked_logger.cpp>
  #include <loggers/null_logger.cpp>
  #include <loggers/program_wide_logger.cpp>
  #include <opsystem/byte_filer.cpp>
  #include <opsystem/command_line.cpp>
  #include <opsystem/critical_events.cpp>
  #include <opsystem/directory.cpp>
  #include <opsystem/filename.cpp>
  #include <opsystem/ini_config.cpp>
  #include <opsystem/ini_parser.cpp>
  #include <opsystem/path_configuration.cpp>
  #include <opsystem/rendezvous.cpp>
  #include <textual/byte_format.cpp>
  #include <textual/parser_bits.cpp>
  #include <textual/string_manipulation.cpp>
  #include <textual/tokenizer.cpp>
#endif // __BUILD_STATIC_APPLICATION__