# encoding: utf-8
# - Name: SiSU
#
#   - Description: documents, structuring, processing, publishing, search
#     abstraction
#
#   - Author: Ralph Amissah
#     <ralph.amissah@gmail.com>
#
#   - Copyright: (C) 1997, 1998, 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2006,
#     2007, 2008, 2009, 2010, 2011, 2012, 2013, 2014, 2015, 2016, 2017, 2019,
#     2020, 2021, Ralph Amissah,
#     All Rights Reserved.
#
#   - License: GPL 3 or later:
#
#     SiSU, a framework for document structuring, publishing and search
#
#     Copyright (C) Ralph Amissah
#
#     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, see <http://www.gnu.org/licenses/>.
#
#     If you have Internet connection, the latest version of the GPL should be
#     available at these locations:
#     <http://www.fsf.org/licensing/licenses/gpl.html>
#     <http://www.gnu.org/licenses/gpl.html>
#
#     <http://www.sisudoc.org/sisu/en/manifest/gpl.fsf.html>
#
#   - SiSU uses:
#     - Standard SiSU markup syntax,
#     - Standard SiSU meta-markup syntax, and the
#     - Standard SiSU object citation numbering and system
#
#   - Homepages:
#     <http://www.sisudoc.org>
#
#   - Git
#     <https://git.sisudoc.org/projects/>
#     <https://git.sisudoc.org/projects/?p=software/sisu.git;a=summary>
#     <https://git.sisudoc.org/projects/?p=markup/sisu-markup-samples.git;a=summary>
module SiSU_AO_CharacterCheck
  class Check
    def initialize(data)
      @data=data
      @comment='%'
      @endnote_array=[]
    end
    def character_check_and_oldstyle_endnote_array
      data=@data
      @endnote_array=[]
      endnote_no=1
      @tuned_file=data.select do |dob|
        unless dob.is ==:table
          dob.obj=dob.obj.strip.
            gsub(/^[{~}]\s*$/,'').
            gsub(/~#\s*/,"#{Mx[:pa_non_object_no_heading]}").
            gsub(/-#\s*/,"#{Mx[:pa_non_object_dummy_heading]}").
            gsub(/(#{Mx[:en_a_o]})\s*\s+/,'\1 ').
            gsub(/(~\{\s*)\s+/,'\1 ').
            gsub(/ \/\//,"#{Mx[:br_line]}").
            gsub(/<br>/,"#{Mx[:br_line]}").                #needed by xml, xhtml etc.
            gsub(/\t/,' ').
            gsub(/\342\200\231/u,"'"). #if dob =~/’/       #Avoid #&lsquo; &rsquo; #&ldquo; &rdquo;
            gsub(/\\copy(?:right)?\b/,'&#169;').
            gsub(/\\trademark\b|\\tm\b/,'&#174;')
          dob.obj=dob.obj + "\n"
          unless dob.is ==:code
            case dob.obj
            when /\^~/                                     #% Note must do this first (earlier loop) and then enter gathered data into ~^\d+
              sub_dob=dob.obj.dup
              @endnote_array << sub_dob.gsub(/\n/,'').
                gsub(/\^~\s+(.+)\s*/,
                  %{#{Mx[:en_a_o]}#{endnote_no} \\1 #{Mx[:en_a_c]}}).
                  strip
              endnote_no+=1
              dob=nil if dob.obj =~/\^~ .+/                #watch, removes 'binary' endnote now in endnote array for later insertion
            end
          end
        end
        dob if dob.is_a?(Object)
      end.flatten.compact
      [@tuned_file,@endnote_array]
    end
  end
end