Class: BuildTool::Cfg::ModuleDeclarationNodeVisitor

Inherits:
ListVisitor show all
Defined in:
lib/build-tool/cfg/visitor.rb

Instance Attribute Summary

Attributes inherited from MJ::VisitorBase

#configuration

Instance Method Summary collapse

Methods inherited from ListVisitor

#visit, #visit_nodes

Methods inherited from MJ::VisitorBase

#visit_Object

Constructor Details

#initialize(configuration) ⇒ ModuleDeclarationNodeVisitor

Returns a new instance of ModuleDeclarationNodeVisitor.



534
535
536
537
 
# File 'lib/build-tool/cfg/visitor.rb', line 534

def initialize( configuration )
    super( configuration )
    @module = nil
end

Instance Method Details

#visit_ApplyPatchesNode(node) ⇒ Object 



539
540
541
 
# File 'lib/build-tool/cfg/visitor.rb', line 539

def visit_ApplyPatchesNode( node )
    @module.patches << node.value
end

#visit_ArchiveDeclarationNode(node) ⇒ Object 



543
544
545
546
547
548
549
550
551
 
# File 'lib/build-tool/cfg/visitor.rb', line 543

def visit_ArchiveDeclarationNode( node )
    vcs = BuildTool::VCS::ArchiveConfiguration.new
    # if @module.vcs_configuration and @module.vcs_configuration.name == "archive"
    #     vcs.copy_configuration( @module.vcs_configuration )
    # end
    @module.vcs_configuration = vcs
    visitor = ArchiveDeclarationNodeVisitor.new( configuration, vcs )
    node.accept( visitor )
end

#visit_BazarDeclarationNode(node) ⇒ Object 



608
609
610
611
612
613
614
615
616
617
618
619
620
621
622
623
624
 
# File 'lib/build-tool/cfg/visitor.rb', line 608

def visit_BazarDeclarationNode( node )
    vcs = BuildTool::VCS::BazarConfiguration.new
    if node.options[:inheritance]
        if not @module.vcs_configuration
            raise ConfigurationError,
                "#{@module.name} has no previous bazar configuration!"
        end
        if @module.vcs_configuration.name != "bazar"
            raise ConfigurationError,
                "#{@module.name} has a #{@module.vcs_configuration.name} configuration!"
        end
        vcs.parent = @module.vcs_configuration
    end
    @module.vcs_configuration = vcs
    visitor = BazarDeclarationNodeVisitor.new( configuration, vcs )
    node.accept( visitor )
end

#visit_BuildSystemDeclarationNode(node) ⇒ Object

Raises:



553
554
555
556
557
558
559
560
561
562
563
564
565
566
567
568
569
570
571
572
573
574
575
576
 
# File 'lib/build-tool/cfg/visitor.rb', line 553

def visit_BuildSystemDeclarationNode( node )
    raise ArgumentsError if node.values.length != 2
    name  = node.values[0]
    # We have to create a build-system. There are some possibilities:
    #   1. The module has a build-system. Inherit from that one (Overloading)
    #   2. The module has a parent but no build-system: Create the build-system parentless
    #      so it forwards to the parent module
    #   3. The module has no parent and no build-system. Inherit from the build-system
    #      standard module.
    if @module.our_build_system
        # logger.debug2( "Inherit from previous build-system for #{@module.name}" )
        build_system = configuration.build_system_adjust( name, @module.our_build_system )
    elsif @module.parent
        # logger.debug2( "Inherit without parent for #{@module.name}" )
        build_system = configuration.build_system_adjust( name, nil )
    else
        # logger.debug2( "Inherit from #{name} for #{@module.name}" )
        build_system = configuration.build_system_adjust( name, configuration.build_system_defaults( name ) )
    end
    visitor = BuildSystemDeclarationNodeVisitor.new( configuration, build_system )
    @module.build_system = node.accept( visitor )
    @module.build_system.module = @module
    @module.build_system.feature = configuration.active_feature
end

#visit_EnvironmentDeclarationNode(node) ⇒ Object 



585
586
587
588
 
# File 'lib/build-tool/cfg/visitor.rb', line 585

def visit_EnvironmentDeclarationNode( node )
    visitor = EnvironmentDeclarationNodeVisitor.new( configuration )
    @module.environment = node.accept( visitor )
end

#visit_GitDeclarationNode(node) ⇒ Object 



590
591
592
593
594
595
596
597
598
599
600
601
602
603
604
605
606
 
# File 'lib/build-tool/cfg/visitor.rb', line 590

def visit_GitDeclarationNode( node )
    vcs = BuildTool::VCS::GitConfiguration.new
    if node.options[:inheritance]
        if not @module.vcs_configuration
            raise ConfigurationError,
                "#{@module.name} has no previous git configuration!"
        end
        if @module.vcs_configuration.name != "git"
            raise ConfigurationError,
                "#{@module.name} has a #{@module.vcs_configuration.name} configuration!"
        end
        vcs.parent = @module.vcs_configuration
    end
    @module.vcs_configuration = vcs
    visitor = GitDeclarationNodeVisitor.new( configuration, vcs )
    node.accept( visitor )
end

#visit_GitSvnDeclarationNode(node) ⇒ Object 



626
627
628
629
630
631
632
633
634
635
636
637
638
639
640
641
642
 
# File 'lib/build-tool/cfg/visitor.rb', line 626

def visit_GitSvnDeclarationNode( node )
    vcs = BuildTool::VCS::GitSvnConfiguration.new
    if node.options[:inheritance]
        if not @module.vcs_configuration
            raise ConfigurationError,
                "#{@module.name} has no previous git-svn configuration!"
        end
        if @module.vcs_configuration.name != "git-svn"
            raise ConfigurationError,
                "#{@module.name} has a #{@module.vcs_configuration.name} configuration!"
        end
        vcs.parent = @module.vcs_configuration
    end
    @module.vcs_configuration = vcs
    visitor = GitSvnDeclarationNodeVisitor.new( configuration, vcs )
    node.accept( visitor )
end

#visit_LongDescriptionNode(node) ⇒ Object 



578
579
580
581
582
583
 
# File 'lib/build-tool/cfg/visitor.rb', line 578

def visit_LongDescriptionNode( node )
    if @module.long_description
        logger.warn "Overwriting long description for module #{@module.name}"
    end
    @module.long_description = node.values
end

#visit_MercurialDeclarationNode(node) ⇒ Object 



644
645
646
647
648
649
650
651
652
653
654
655
656
657
658
659
660
 
# File 'lib/build-tool/cfg/visitor.rb', line 644

def visit_MercurialDeclarationNode( node )
    vcs = BuildTool::VCS::MercurialConfiguration.new
    if node.options[:inheritance]
        if not @module.vcs_configuration
            raise ConfigurationError,
                "#{@module.name} has no previous mercurial configuration!"
        end
        if @module.vcs_configuration.name != "mercurial"
            raise ConfigurationError,
                "#{@module.name} has a #{@module.vcs_configuration.name} configuration!"
        end
        vcs.parent = @module.vcs_configuration
    end
    @module.vcs_configuration = vcs
    visitor = MercurialDeclarationNodeVisitor.new( configuration, vcs )
    node.accept( visitor )
end

#visit_ModuleBuildPrefixNode(node) ⇒ Object 



662
663
664
 
# File 'lib/build-tool/cfg/visitor.rb', line 662

def visit_ModuleBuildPrefixNode( node )
    @module.build_prefix = node.value
end

#visit_ModuleDeclarationNode(node) ⇒ Object 



666
667
668
669
670
671
672
673
674
675
676
677
678
679
680
681
682
683
684
685
686
687
688
689
690
691
692
693
694
695
696
697
698
699
700
701
702
703
704
705
706
707
708
709
710
711
712
713
714
715
716
 
# File 'lib/build-tool/cfg/visitor.rb', line 666

def visit_ModuleDeclarationNode( node )
    name = node.values[0]
    inheritance = node.values[1] == :INHERITANCE

    if inheritance
        stmts = node.values[3]
    else
        stmts = node.values[1]
    end

    # Check if the module is alread defined. If yes we reopen it.
    @module = configuration.module( name )
    if @module.nil?
        @module = BuildTool::Module.create( { :name => name } )
        configuration.add_module( @module )
    end

    if inheritance

        if @module.found_in_recipe
            raise ConfigurationError, "Attempt to change a module #{name} while specifying inheritance!"
        end

        parentName = node.values[2]
        parent = configuration.module( parentName )
        if parent.nil?
            raise ConfigurationError,
                "Module %s attempts to inherit from not existant module %s" % 
                    [ name, parentName ]
        end
        @module.parent = parent
    end

    # Only add a module to a feature if it is the first time declared.
    if !@module.found_in_recipe
        if !configuration.active_feature.nil?
            @module.feature = configuration.active_feature
            configuration.active_feature.modules << @module
        end
    end

    # Mark the module as found in the recipe
    @module.found_in_recipe = true

    # Work on the child nodes.
    begin
        self.visit_nodes( stmts )
    rescue ConfigurationError => e
        raise ConfigurationError, "Module #{@module.name}: #{e.to_s}"
    end
end

#visit_ModuleInstallPrefixNode(node) ⇒ Object 



718
719
720
 
# File 'lib/build-tool/cfg/visitor.rb', line 718

def visit_ModuleInstallPrefixNode( node )
    @module.install_prefix = node.value
end

#visit_ModuleLocalPathNode(node) ⇒ Object 



722
723
724
 
# File 'lib/build-tool/cfg/visitor.rb', line 722

def visit_ModuleLocalPathNode( node )
    @module.local_path = node.value
end

#visit_ModuleTemplateNode(node) ⇒ Object 



726
727
728
 
# File 'lib/build-tool/cfg/visitor.rb', line 726

def visit_ModuleTemplateNode( node )
    @module.is_template = true
end

#visit_ShortDescriptionNode(node) ⇒ Object 



730
731
732
733
734
735
 
# File 'lib/build-tool/cfg/visitor.rb', line 730

def visit_ShortDescriptionNode( node )
    if !@module.description.nil?
        logger.warn "Overwriting short description for module #{@module.name}"
    end
    @module.description = node.values
end

#visit_SvnDeclarationNode(node) ⇒ Object 



737
738
739
740
741
742
743
744
745
746
747
748
749
750
751
752
753
 
# File 'lib/build-tool/cfg/visitor.rb', line 737

def visit_SvnDeclarationNode( node )
    vcs = BuildTool::VCS::SvnConfiguration.new
    if node.options[:inheritance]
        if not @module.vcs_configuration
            raise ConfigurationError,
                "#{@module.name} has no previous svn configuration!"
        end
        if @module.vcs_configuration.name != "svn"
            raise ConfigurationError,
                "#{@module.name} has a #{@module.vcs_configuration.name} configuration!"
        end
        vcs.parent = @module.vcs_configuration
    end
    @module.vcs_configuration = vcs
    visitor = SvnDeclarationNodeVisitor.new( configuration, vcs )
    node.accept( visitor )
end

#visit_UseBuildSystemNode(node) ⇒ Object 



755
756
757
758
759
760
761
 
# File 'lib/build-tool/cfg/visitor.rb', line 755

def visit_UseBuildSystemNode( node )
    # logger.debug2( "Inherit from build-system #{node.value} for #{@module.name}" )
    @module.build_system = configuration.build_system_adjust(
        node.value,
        configuration.build_system_defaults( node.value ) )
    @module.build_system.module = @module
end

#visit_UseEnvironmentNode(node) ⇒ Object 



763
764
765
766
767
768
 
# File 'lib/build-tool/cfg/visitor.rb', line 763

def visit_UseEnvironmentNode( node )
    @module.environment = configuration.environment( node.value )
    if @module.environment.nil?
        raise ConfigurationError, "Unknown environment #{node.value} configured for module #{@module.name}!"
    end
end

#visit_UseVcsNode(node) ⇒ Object 



770
771
772
 
# File 'lib/build-tool/cfg/visitor.rb', line 770

def visit_UseVcsNode( node )
    @module.vcs_configuration = configuration.vcs(node.value)
end