/*
 Copyright (©) 2003-2025 Teus Benschop.
 
 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 3 of the License, or
 (at your option) any later version.
 
 This program is distributed in the hope that it will be useful,
 but WITHOUT ANY WARRANTY; without even the implied warranty of
 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 GNU General Public License for more details.
 
 You should have received a copy of the GNU General Public License
 along with this program; if not, write to the Free Software
 Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
 */


#include <checks/settings.h>
#include <assets/view.h>
#include <assets/page.h>
#include <filter/roles.h>
#include <filter/url.h>
#include <filter/string.h>
#include <filter/md5.h>
#include <webserver/request.h>
#include <locale/translate.h>
#include <database/check.h>
#include <database/config/bible.h>
#include <client/logic.h>
#include <demo/logic.h>
#include <sendreceive/logic.h>
#include <access/bible.h>
#include <dialog/select.h>
#include <checks/logic.h>
#include <assets/header.h>
#include <menu/logic.h>
#include <journal/logic.h>


std::string checks_settings_url ()
{
  return "checks/settings";
}


bool checks_settings_acl ([[maybe_unused]] Webserver_Request& webserver_request)
{
#ifdef HAVE_CLIENT
  return true;
#else
  return roles::access_control (webserver_request, roles::manager);
#endif
}


std::string checks_settings (Webserver_Request& webserver_request)
{
  std::string page {};
  Assets_Header header = Assets_Header (translate("Manage Checks"), webserver_request);
  header.add_bread_crumb (menu_logic_settings_menu (), menu_logic_settings_text ());
  page = header.run ();
  Assets_View view {};
    
  
  {
    constexpr const char* identification {"bible"};
    if (webserver_request.post_count (identification)) {
      const std::string bible {webserver_request.post_get(identification)};
      webserver_request.database_config_user()->set_bible (bible);
    }
    dialog::select::Settings settings {
      .identification = identification,
      .values = access_bible::bibles (webserver_request),
      .selected = access_bible::clamp (webserver_request, webserver_request.database_config_user()->get_bible ()),
    };
    dialog::select::Form form { .auto_submit = true };
    view.set_variable(identification, dialog::select::form(settings, form));
  }
  const std::string bible = access_bible::clamp (webserver_request, webserver_request.database_config_user()->get_bible ());

  
  if (webserver_request.query.count ("run")) {
    checks::logic::start (bible);
    view.set_variable ("success", translate("Will run the checks."));
    view.set_variable ("journal", journal_logic_see_journal_for_progress ());
  }
  
  
  const std::string checkbox = webserver_request.post_get("checkbox");
  const bool checked = filter::strings::convert_to_bool (webserver_request.post_get("checked"));
  
                        
  if (checkbox == "doublespacesusfm") {
    database::config::bible::set_check_double_spaces_usfm (bible, checked);
  }
  view.set_variable ("doublespacesusfm", filter::strings::get_checkbox_status (database::config::bible::get_check_double_spaces_usfm (bible)));
   
  
  if (checkbox == "fullstopheadings") {
    database::config::bible::set_check_full_stop_in_headings (bible, checked);
  }
  view.set_variable ("fullstopheadings", filter::strings::get_checkbox_status (database::config::bible::get_check_full_stop_in_headings (bible)));

  
  if (checkbox == "spacebeforepunctuation") {
    database::config::bible::set_check_space_before_punctuation (bible, checked);
  }
  view.set_variable ("spacebeforepunctuation", filter::strings::get_checkbox_status (database::config::bible::get_check_space_before_punctuation (bible)));

  
  if (checkbox == "spacebeforefinalnotemarkup") {
    database::config::bible::set_check_space_before_final_note_marker (bible, checked);
  }
  view.set_variable ("spacebeforefinalnotemarkup", filter::strings::get_checkbox_status (database::config::bible::get_check_space_before_final_note_marker (bible)));

                      
  if (checkbox == "sentencestructure") {
    database::config::bible::set_check_sentence_structure (bible, checked);
  }
  view.set_variable ("sentencestructure", filter::strings::get_checkbox_status (database::config::bible::get_check_sentence_structure (bible)));
                      
                      
  if (checkbox == "paragraphstructure") {
    database::config::bible::set_check_paragraph_structure (bible, checked);
  }
  view.set_variable ("paragraphstructure", filter::strings::get_checkbox_status (database::config::bible::get_check_paragraph_structure (bible)));
                      
                      
  if (checkbox == "booksversification") {
    database::config::bible::set_check_books_versification (bible, checked);
  }
  view.set_variable ("booksversification", filter::strings::get_checkbox_status (database::config::bible::get_check_books_versification (bible)));
  
  
  if (checkbox == "chaptersversesversification") {
    database::config::bible::set_check_chaptes_verses_versification (bible, checked);
  }
  view.set_variable ("chaptersversesversification", filter::strings::get_checkbox_status (database::config::bible::get_check_chaptes_verses_versification (bible)));
                      
                      
  if (checkbox == "wellformedusfm") {
    database::config::bible::set_check_well_formed_usfm (bible, checked);
  }
  view.set_variable ("wellformedusfm", filter::strings::get_checkbox_status (database::config::bible::get_check_well_formed_usfm (bible)));
                      
                      
  if (checkbox == "punctuationatendverse") {
    database::config::bible::set_check_missing_punctuation_end_verse (bible, checked);
  }
  view.set_variable ("punctuationatendverse", filter::strings::get_checkbox_status (database::config::bible::get_check_missing_punctuation_end_verse (bible)));
                      
                      
  if (checkbox == "patterns") {
    database::config::bible::set_check_patterns (bible, checked);
  }
  view.set_variable ("patterns", filter::strings::get_checkbox_status (database::config::bible::get_check_patterns (bible)));

  
  if (checkbox == "pairs") {
    database::config::bible::set_check_matching_pairs (bible, checked);
  }
  view.set_variable ("pairs", filter::strings::get_checkbox_status (database::config::bible::get_check_matching_pairs (bible)));

  
  if (checkbox == "spaceendverse") {
    database::config::bible::set_check_space_end_verse (bible, checked);
  }
  view.set_variable ("spaceendverse", filter::strings::get_checkbox_status (database::config::bible::get_check_space_end_verse (bible)));

  
  if (checkbox == "frenchpunctuation") {
    database::config::bible::set_check_french_punctuation (bible, checked);
  }
  view.set_variable ("frenchpunctuation", filter::strings::get_checkbox_status (database::config::bible::get_check_french_punctuation (bible)));

  
  if (checkbox == "frenchcitation") {
    database::config::bible::set_check_french_citation_style (bible, checked);
  }
  view.set_variable ("frenchcitation", filter::strings::get_checkbox_status (database::config::bible::get_check_french_citation_style (bible)));

  
  if (checkbox == "transposenotes") {
    database::config::bible::set_transpose_fix_spaces_notes (bible, checked);
  }
  view.set_variable ("transposenotes", filter::strings::get_checkbox_status (database::config::bible::get_transpose_fix_spaces_notes (bible)));

  
  if (checkbox == "validutf8") {
    database::config::bible::set_check_valid_utf8_text (bible, checked);
  }
  view.set_variable ("validutf8", filter::strings::get_checkbox_status (database::config::bible::get_check_valid_utf8_text (bible)));

  
#ifdef HAVE_CLIENT
  view.enable_zone ("client");
#else
  view.enable_zone ("cloud");
#endif

  
  page += view.render ("checks", "settings");
  page += assets_page::footer ();
  return page;
}
