Line 114... |
Line 114... |
#/*********************************************************************************************/
|
#/*********************************************************************************************/
|
|
|
|
|
|
|
|
|
my $sogen_file = $parser->parse_file(yp::lib::find_socgen("socgen:componentConfiguration",$vendor,$project,$component));
|
my $socgen_file = $parser->parse_file(yp::lib::find_componentConfiguration($vendor,$project,$component));
|
|
|
|
|
foreach my $i_name ($sogen_file->findnodes("//socgen:syn/socgen:ise[socgen:variant/text() = '$variant']"))
|
foreach my $i_name ($socgen_file->findnodes("//socgen:syn/socgen:ise[socgen:variant/text() = '$variant']"))
|
{
|
{
|
my($replace_vendor) = $i_name ->findnodes('socgen:target/socgen:vendor/text()')->to_literal ;
|
my($replace_vendor) = $i_name ->findnodes('socgen:target/socgen:vendor/text()')->to_literal ;
|
my($replace_library) = $i_name ->findnodes('socgen:target/socgen:library/text()')->to_literal ;
|
my($replace_library) = $i_name ->findnodes('socgen:target/socgen:library/text()')->to_literal ;
|
my @replace_components = yp::lib::find_components("spirit:component",$replace_vendor,$replace_library);
|
my @replace_components = yp::lib::find_components($replace_vendor,$replace_library);
|
|
|
foreach my $replace_component (@replace_components)
|
foreach my $replace_component (@replace_components)
|
{
|
{
|
&link_child($vendor, $project,$replace_component, $replace_library ,$replace_vendor);
|
&link_child($vendor, $project,$replace_component, $replace_library ,$replace_vendor);
|
}
|
}
|
Line 215... |
Line 215... |
|
|
|
|
my $path = ".${prefix}/${parent_vendor}__${parent_library}/children/${child_vendor}__${child_library}${lib_comp_sep}";
|
my $path = ".${prefix}/${parent_vendor}__${parent_library}/children/${child_vendor}__${child_library}${lib_comp_sep}";
|
mkdir $path,0755 unless( -e $path );
|
mkdir $path,0755 unless( -e $path );
|
|
|
my $path = ".${prefix}/${parent_vendor}__${parent_library}/children/${child_vendor}__${child_library}${lib_comp_sep}/${child_component}";
|
my $path = ".${prefix}/${parent_vendor}__${parent_library}/children/${child_vendor}__${child_library}${lib_comp_sep}${child_component}";
|
|
|
|
|
unless( -e $path )
|
unless( -e $path )
|
{
|
{
|
mkdir $path,0755;
|
mkdir $path,0755;
|
|
|
$root = "${home}/${projects_dir}/${child_vendor}/${child_library}${lib_comp_sep}/${child_component}";
|
$root = "${home}/${projects_dir}/${child_vendor}/${child_library}${lib_comp_sep}${child_component}";
|
$dest = ".${prefix}/${parent_vendor}__${parent_library}/children/${child_vendor}__${child_library}${lib_comp_sep}/${child_component}";
|
$dest = ".${prefix}/${parent_vendor}__${parent_library}/children/${child_vendor}__${child_library}${lib_comp_sep}${child_component}";
|
&sys::lib::link_dir( "$root", "$dest" );
|
&sys::lib::link_dir( "$root", "$dest" );
|
|
|
|
|
|
my $socgen_file = $parser->parse_file(yp::lib::find_componentConfiguration($child_vendor,$child_library,$child_component));
|
|
my $sim_library_path ;
|
|
my $lib_comp_sep = yp::lib::find_lib_comp_sep($child_vendor,$child_library,$child_component);
|
|
my $sim_comp_path = $socgen_file->findnodes("//socgen:componentConfiguration/socgen:sim/socgen:comp_path/text()")->to_literal;
|
|
|
|
if ($sim_comp_path)
|
|
{
|
|
$sim_library_path ="${lib_comp_sep}${sim_comp_path}";
|
|
}
|
|
else
|
|
{
|
|
$sim_library_path = $socgen_file->findnodes("//socgen:componentConfiguration/socgen:sim/socgen:library_path/text()")->to_literal;
|
|
}
|
|
|
my $sogen_file = $parser->parse_file(yp::lib::find_socgen("socgen:componentConfiguration",$child_vendor,$child_library,$child_component));
|
|
my $sim_library_path = $sogen_file->findnodes("//socgen:componentConfiguration/socgen:sim/socgen:library_path/text()")->to_literal;
|
|
my $sim_full_path = ".${prefix}/${parent_vendor}__${parent_library}/children/${child_vendor}__${child_library}${sim_library_path}";
|
my $sim_full_path = ".${prefix}/${parent_vendor}__${parent_library}/children/${child_vendor}__${child_library}${sim_library_path}";
|
|
|
|
|
if( $sim_library_path)
|
if( $sim_library_path)
|
{
|
{
|
if(-e $sim_full_path)
|
if(-e $sim_full_path)
|
{
|
{
|
|
|
my $cmd = "rm -r .${prefix}/${parent_vendor}__${parent_library}/children/${child_vendor}__${child_library}${sim_library_path} \n";
|
my $cmd = "rm -r .${prefix}/${parent_vendor}__${parent_library}/children/${child_vendor}__${child_library}${sim_library_path} \n";
|
if (system($cmd)) {}
|
if (system($cmd)) {}
|
}
|
}
|
}
|
}
|
|
|
|
|
my $syn_library_path = $sogen_file->findnodes("//socgen:componentConfiguration/socgen:syn/socgen:library_path/text()")->to_literal;
|
my $syn_library_path ;
|
|
|
|
my $syn_comp_path = $socgen_file->findnodes("//socgen:componentConfiguration/socgen:syn/socgen:comp_path/text()")->to_literal;
|
|
|
|
if ($syn_comp_path)
|
|
{
|
|
$syn_library_path ="${lib_comp_sep}${syn_comp_path}";
|
|
}
|
|
else
|
|
{
|
|
$syn_library_path = $socgen_file->findnodes("//socgen:componentConfiguration/socgen:syn/socgen:library_path/text()")->to_literal;
|
|
}
|
|
|
|
|
my $syn_full_path = ".${prefix}/${parent_vendor}__${parent_library}/children/${child_vendor}__${child_library}${syn_library_path}";
|
my $syn_full_path = ".${prefix}/${parent_vendor}__${parent_library}/children/${child_vendor}__${child_library}${syn_library_path}";
|
|
|
if( $syn_library_path)
|
if( $syn_library_path)
|
{
|
{
|
if(-e $syn_full_path)
|
if(-e $syn_full_path)
|