Ignore:
Timestamp:
Sep 14, 2009, 5:12:29 PM (15 years ago)
Author:
Tatsukawa, Akimichi
Message:

renamed scanner.rb to adl_scanner.rb

File:
1 moved

Legend:

Unmodified
Added
Removed
  • ruby/trunk/lib/adl_parser/lib/adl_scanner.rb

    r258 r261  
    88    module Scanner
    99      module Common
     10        class START_TERM_CODE_CONSTRAINT
     11          include Yaparc::Parsable
     12          def initialize
     13            @parser = lambda do |input|
     14              Yaparc::Apply.new(Yaparc::Regex.new(/[ \t\n]*\[([a-zA-Z0-9\(\)\._\-]+)::[ \t\n]*/)) do |match|
     15                OpenEHR::LOG.info("START_TERM_CODE_CONSTRAINT: #{match}")
     16                [:START_TERM_CODE_CONSTRAINT, match]
     17              end
     18            end
     19          end
     20        end
     21
     22        # /\A\[[a-zA-Z0-9()\._-]+::[a-zA-Z0-9\._-]+\]/  #V_QUALIFIED_TERM_CODE_REF form [ICD10AM(1998)::F23]
    1023        class V_QUALIFIED_TERM_CODE_REF
    1124          include Yaparc::Parsable
     
    1326            @parser = lambda do |input|
    1427              Yaparc::Apply.new(Yaparc::Regex.new(/\A\[[a-zA-Z0-9()\._-]+::[a-zA-Z0-9\._-]+\]/)) do |match|
    15                 OpenEHR::LOG.debug("V_QUALIFIED_TERM_CODE_REF: #{match}")
     28                OpenEHR::LOG.info("V_QUALIFIED_TERM_CODE_REF: #{match}")
    1629                [:V_QUALIFIED_TERM_CODE_REF, match]
    1730              end
     
    2538            @parser = lambda do |input|
    2639              Yaparc::Apply.new(Yaparc::Regex.new(/\A\[[a-zA-Z0-9][a-zA-Z0-9._\-]*\]/)) do |match|
    27                 OpenEHR::LOG.debug("V_TERM_CODE_REF: #{match}")
     40                OpenEHR::LOG.info("V_TERM_CODE_REF: #{match}")
    2841                [:V_LOCAL_TERM_CODE_REF, match]
    2942              end
     
    3750            @parser = lambda do |input|
    3851              Yaparc::Apply.new(Yaparc::Regex.new(/\A\[[a-zA-Z0-9._\- ]+::[a-zA-Z0-9._\- ]+\]/)) do |match|
    39                 OpenEHR::LOG.debug("ERR_V_QUALIFIED_TERM_CODE_REF: #{match}")
     52                OpenEHR::LOG.info("ERR_V_QUALIFIED_TERM_CODE_REF: #{match}")
    4053                [:ERR_V_QUALIFIED_TERM_CODE_REF, match]
    4154              end
     
    4962            @parser = lambda do |input|
    5063              Yaparc::Apply.new(Yaparc::Regex.new(/\A[A-Z][a-zA-Z0-9_]*/)) do |match|
    51                 OpenEHR::LOG.debug("V_TYPE_IDENTIFIER: #{match}")
     64                OpenEHR::LOG.info("V_TYPE_IDENTIFIER: #{match}")
    5265                [:V_TYPE_IDENTIFIER, match]
    5366              end
     
    6174            @parser = lambda do |input|
    6275              Yaparc::Apply.new(Yaparc::Regex.new(/\A[A-Z][a-zA-Z0-9_]*<[a-zA-Z0-9,_<>]+>/)) do |match|
    63                 OpenEHR::LOG.debug("V_GENERIC_TYPE_IDENTIFIER: #{match}")
     76                OpenEHR::LOG.info("V_GENERIC_TYPE_IDENTIFIER: #{match}")
    6477                [:V_GENERIC_TYPE_IDENTIFIER, match]
    6578              end
     
    7487            @parser = lambda do |input|
    7588              Yaparc::Apply.new(Yaparc::Regex.new(/\Aa[ct][0-9.]+/)) do |match|
    76                 OpenEHR::LOG.debug("V_LOCAL_CODE: #{match}")
     89                OpenEHR::LOG.info("V_LOCAL_CODE: #{match}")
    7790                [:V_LOCAL_CODE, match]
    7891              end
     
    8699            @parser = lambda do |input|
    87100              Yaparc::Apply.new(Yaparc::Regex.new(/\A"([^"]*)"/m)) do |match|
    88                 OpenEHR::LOG.debug("V_STRING: #{match}")
     101                OpenEHR::LOG.info("V_STRING: #{match}")
    89102                [:V_STRING, match]
    90103              end
     
    98111            @parser = lambda do |input|
    99112              Yaparc::Apply.new(Yaparc::Regex.new(/\A[0-9]+\.[0-9]+|[0-9]+\.[0-9]+[eE][+-]?[0-9]+/)) do |match|
    100                 OpenEHR::LOG.debug("V_REAL: #{match}")
     113                OpenEHR::LOG.info("V_REAL: #{match}")
    101114                [:V_REAL, match]
    102115              end
     
    113126                                Yaparc::Alt.new(Yaparc::Regex.new(/\AP([0-9]+|[yY])?([0-9]+|[mM])?([0-9]+|[wW])?([0-9]+|[dD])?T([0-9]+|[hH])?([0-9]+|[mM])?([0-9]+|[sS])?/),
    114127                                                Yaparc::Regex.new(/\AP([0-9]+|[yY])?([0-9]+|[mM])?([0-9]+|[wW])?([0-9]+|[dD])?/))) do |match|
    115                 OpenEHR::LOG.debug("V_ISO8601_DURATION: #{match}")
     128                OpenEHR::LOG.info("V_ISO8601_DURATION: #{match}")
    116129                [:V_ISO8601_DURATION, match]
    117130              end
     
    129142          'infinity' => :SYM_INFINITY # [Ii][Nn][Ff][Ii][Nn][Ii][Tt][Yy] -- -> SYM_INFINITY
    130143        }
    131 
     144        #
     145        # DADL::RootScanner
     146        #
    132147        class RootScanner
    133148          include Yaparc::Parsable
     
    143158                              OpenEHR::ADL::Scanner::Common::V_LOCAL_CODE.new,
    144159                              OpenEHR::ADL::Scanner::Common::V_REAL.new,
    145                               OpenEHR::ADL::Scanner::Common::V_ISO8601_DURATION.new
     160                              OpenEHR::ADL::Scanner::Common::V_ISO8601_DURATION.new#,
     161                              #OpenEHR::ADL::Scanner::Common::START_TERM_CODE_CONSTRAINT.new
    146162                              )
    147163            end
    148164          end
    149165        end
    150 =begin <DADL::Reserved class>
    151 =end
     166
     167        #  <DADL::Reserved class>
    152168        class Reserved
    153169          include Yaparc::Parsable
     
    161177              end
    162178              Yaparc::Alt.new(Yaparc::Apply.new(Yaparc::Alt.new(*reserved_parsers)) do |match|
    163                                 OpenEHR::LOG.debug("Reserved: #{match}")
     179                                OpenEHR::LOG.info("Reserved: #{match}")
    164180                                [OpenEHR::ADL::Scanner::DADL::RESERVED[match], OpenEHR::ADL::Scanner::DADL::RESERVED[match]]
    165181                              end,
    166182                              Yaparc::Apply.new(Yaparc::Regex.new(/\A[a-z][a-zA-Z0-9_]*/)) do |match|
    167                                 OpenEHR::LOG.debug("V_ATTRIBUTE_IDENTIFIER: #{match}")
     183                                OpenEHR::LOG.info("V_ATTRIBUTE_IDENTIFIER: #{match}")
    168184                                [:V_ATTRIBUTE_IDENTIFIER, match]
    169185                              end)
     
    171187          end
    172188        end
    173 
    174 
    175 
    176189      end # of DADL
    177190
     
    213226            @parser = lambda do |input|
    214227              Yaparc::Apply.new(Yaparc::Regex.new(/\A[yY][yY][yY][yY]-[mM?X][mM?X]-[dD?X][dD?X][T\t][hH?X][hH?X]:[mM?X][mM?X]:[sS?X][sS?X]/)) do |match|
    215                 OpenEHR::LOG.debug("V_ISO8601_DATE_TIME_CONSTRAINT_PATTERN: #{match}")
     228                OpenEHR::LOG.info("V_ISO8601_DATE_TIME_CONSTRAINT_PATTERN: #{match}")
    216229                [:V_ISO8601_DATE_TIME_CONSTRAINT_PATTERN, match]
    217230              end
     
    226239            @parser = lambda do |input|
    227240              Yaparc::Apply.new(Yaparc::Regex.new(/\A[yY][yY][yY][yY]-[mM?X][mM?X]-[dD?X][dD?X]/)) do |match|
    228                 OpenEHR::LOG.debug("V_ISO8601_DATE_CONSTRAINT_PATTERN: #{match}")
     241                OpenEHR::LOG.info("V_ISO8601_DATE_CONSTRAINT_PATTERN: #{match}")
    229242                [:V_ISO8601_DATE_CONSTRAINT_PATTERN, match]
    230243              end
     
    239252            @parser = lambda do |input|
    240253              Yaparc::Apply.new(Yaparc::Regex.new(/\A[hH][hH]:[mM?X][mM?X]:[sS?X][sS?X]/)) do |match|
    241                 OpenEHR::LOG.debug("V_ISO8601_TIME_CONSTRAINT_PATTERN: #{match}")
     254                OpenEHR::LOG.info("V_ISO8601_TIME_CONSTRAINT_PATTERN: #{match}")
    242255                [:V_ISO8601_TIME_CONSTRAINT_PATTERN, match]
    243256              end
     
    253266              Yaparc::Apply.new(Yaparc::Alt.new(Yaparc::Regex.new(/\AP[yY]?[mM]?[wW]?[dD]?T[hH]?[mM]?[sS]?/),
    254267                                                Yaparc::Regex.new(/\AP[yY]?[mM]?[wW]?[dD]?/))) do |match|
    255                 OpenEHR::LOG.debug("V_ISO8601_DURATION_CONSTRAINT_PATTERN: #{match}")
     268                OpenEHR::LOG.info("V_ISO8601_DURATION_CONSTRAINT_PATTERN: #{match}")
    256269                [:V_ISO8601_DURATION_CONSTRAINT_PATTERN, match]
    257270              end
     
    266279            @parser = lambda do |input|
    267280              Yaparc::Apply.new(Yaparc::Regex.new(/\A[A-Z][a-zA-Z0-9_]*[ \n]*\</)) do |match|
    268                 OpenEHR::LOG.debug("V_C_DOMAIN_TYPE: #{match}")
     281                OpenEHR::LOG.info("V_C_DOMAIN_TYPE: #{match}")
    269282                [:START_V_C_DOMAIN_TYPE_BLOCK, match]
    270283              end
     
    273286        end
    274287
     288        #
     289        # CADL::RootScanner
     290        #
    275291        class RootScanner
    276292          include Yaparc::Parsable
     
    292308                              OpenEHR::ADL::Scanner::Common::V_LOCAL_CODE.new,
    293309                              OpenEHR::ADL::Scanner::Common::V_REAL.new,
    294                               OpenEHR::ADL::Scanner::Common::V_ISO8601_DURATION.new
     310                              OpenEHR::ADL::Scanner::Common::V_ISO8601_DURATION.new#,
     311                              #OpenEHR::ADL::Scanner::Common::START_TERM_CODE_CONSTRAINT.new
    295312                              )
    296313            end
     
    310327              end
    311328              Yaparc::Alt.new(Yaparc::Apply.new(Yaparc::Alt.new(*reserved_parsers)) do |match|
    312                                 OpenEHR::LOG.debug("Reserved: #{match}")
     329                                OpenEHR::LOG.info("Reserved: #{match}")
    313330                                [OpenEHR::ADL::Scanner::CADL::RESERVED[match], OpenEHR::ADL::Scanner::CADL::RESERVED[match]]
    314331                              end,
    315332                              Yaparc::Apply.new(Yaparc::Regex.new(/\A[a-z][a-zA-Z0-9_]*/)) do |match|
    316                                 OpenEHR::LOG.debug("V_ATTRIBUTE_IDENTIFIER: #{match}")
     333                                OpenEHR::LOG.info("V_ATTRIBUTE_IDENTIFIER: #{match}")
    317334                                [:V_ATTRIBUTE_IDENTIFIER, match]
    318335                              end)
Note: See TracChangeset for help on using the changeset viewer.