OpenCores
URL https://opencores.org/ocsvn/socgen/socgen/trunk

Subversion Repositories socgen

Compare Revisions

  • This comparison shows the changes necessary to convert path 
    /socgen/trunk/tools/documentation
    from Rev 130 to Rev 131
    ↔ Reverse comparison
  •

Rev 130 → Rev 131

/create_busdefs_doc
65,8 → 65,8
#/*********************************************************************************************/
 
my $home = cwd();
my $projects = "/projects";
 
 
my $vendor_check = $ARGV[0];
 
 
90,7 → 90,10
my @libraries = yp::lib::find_libraries($vendor);
foreach my $library (@libraries)
{
my $repo = yp::lib::find_library_repo($vendor,$library);
 
 
 
my @components = yp::lib::find_components($vendor,$library);
foreach my $component (@components)
{
101,17 → 104,17
my $doc_library_path = $socgen_file->findnodes("//socgen:componentConfiguration/socgen:doc/socgen:library_path/text()")->to_literal;
my $lib_comp_sep = yp::lib::find_lib_comp_sep($vendor,$library,$component);
 
my $path = "${home}${projects}/${vendor}/${library}${doc_library_path}";
my $path = "${home}${repo}/${vendor}/${library}${doc_library_path}";
mkdir $path,0755 unless( -e $path );
 
 
$doc_library_path = "${doc_library_path}/Heda";
 
my $path = "${home}${projects}/${vendor}/${library}${doc_library_path}";
my $path = "${home}${repo}/${vendor}/${library}${doc_library_path}";
mkdir $path,0755 unless( -e $path );
 
 
my $path = "${home}${projects}/${vendor}/${library}${doc_library_path}/busDef";
my $path = "${home}${repo}/${vendor}/${library}${doc_library_path}/busDef";
mkdir $path,0755 unless( -e $path );
 
 
127,7 → 130,7
 
foreach my $version (@versions)
{
my $path = "${home}${projects}/${vendor}/${library}${doc_library_path}/busDef/${component}_${version}";
my $path = "${home}${repo}/${vendor}/${library}${doc_library_path}/busDef/${component}_${version}";
open(FILE,">${path}.txt") or die "No busDef directory";
 
 
200,17 → 203,17
my $doc_library_path = $socgen_file->findnodes("//socgen:componentConfiguration/socgen:doc/socgen:library_path/text()")->to_literal;
my $lib_comp_sep = yp::lib::find_lib_comp_sep($vendor,$library,$component);
 
my $path = "${home}${projects}/${vendor}/${library}${doc_library_path}";
my $path = "${home}${repo}/${vendor}/${library}${doc_library_path}";
mkdir $path,0755 unless( -e $path );
 
 
$doc_library_path = "${doc_library_path}/Heda";
 
my $path = "${home}${projects}/${vendor}/${library}${doc_library_path}";
my $path = "${home}${repo}/${vendor}/${library}${doc_library_path}";
mkdir $path,0755 unless( -e $path );
 
 
my $path = "${home}${projects}/${vendor}/${library}${doc_library_path}/absDef";
my $path = "${home}${repo}/${vendor}/${library}${doc_library_path}/absDef";
mkdir $path,0755 unless( -e $path );
 
 
219,7 → 222,7
foreach my $version (@versions)
{
 
my $path = "${home}${projects}/${vendor}/${library}${doc_library_path}/absDef/${component}_${version}";
my $path = "${home}${repo}/${vendor}/${library}${doc_library_path}/absDef/${component}_${version}";
open(FILE,">${path}.txt") or die "No sch directory";
 
 
/create_lib_doc
89,23 → 89,29
my $parser = XML::LibXML->new();
 
$home = cwd();
my $projects = "/projects";
 
 
#############################################################################
##
##
#############################################################################
 
my $vendor = $ARGV[0];
my $library = $ARGV[1];
my $work_dir = $ARGV[2];
my $vendor = $ARGV[0];
my $library = $ARGV[1];
my $work_dir = $ARGV[2];
my $repo = yp::lib::find_library_repo($vendor,$library);
 
 
my $doc_dir = yp::lib::get_doc_dir();
 
 
if(defined $work_dir)
{chomp($work_dir);}
else
{$work_dir ="/doc_dir";}
{$work_dir ="/${doc_dir}";}
 
 
 
my $path = "${home}${work_dir}";
mkdir $path,0755 unless( -e $path );
my $path = "${home}${work_dir}/${vendor}__${library}";
113,7 → 119,7
 
 
 
$root = "${home}${projects}/${vendor}/${library}";
$root = "${home}${repo}/${vendor}/${library}";
$dest = "${home}${work_dir}/${vendor}__${library}";
&sys::lib::link_dir( "$root", "$dest" );
 
120,31 → 126,43
my @components = yp::lib::find_components($vendor,$library);
 
foreach my $component (@components)
{
unless (yp::lib::find_componentConfiguration($vendor,$library,$component)) {print "Missing ComponentCfg $vendor, $library, $component \n"; }
 
my $socgen_filename = yp::lib::find_componentConfiguration($vendor,$library,$component);
 
if($socgen_filename)
 
{
unless (yp::lib::find_componentConfiguration($vendor,$library,$component)) {print "Missing ComponentCfg $vendor, $library, $component \n"; }
my $socgen_file = $parser->parse_file(yp::lib::find_componentConfiguration($vendor,$library,$component));
 
 
 
 
my $socgen_file = $parser->parse_file($socgen_filename);
 
 
 
my $doc_library_path = $socgen_file->findnodes("//socgen:componentConfiguration/socgen:doc/socgen:library_path/text()")->to_literal;
my $lib_comp_sep = yp::lib::find_lib_comp_sep($vendor,$library,$component);
 
my $path = "${home}${projects}/${vendor}/${library}${doc_library_path}";
my $path = "${home}${repo}/${vendor}/${library}${doc_library_path}";
mkdir $path,0755 unless( -e $path );
 
$doc_library_path = "${doc_library_path}/Geda";
 
my $path = "${home}${projects}/${vendor}/${library}${doc_library_path}";
my $path = "${home}${repo}/${vendor}/${library}${doc_library_path}";
mkdir $path,0755 unless( -e $path );
 
my $path = "${home}${projects}/${vendor}/${library}${doc_library_path}/sym";
my $path = "${home}${repo}/${vendor}/${library}${doc_library_path}/sym";
mkdir $path,0755 unless( -e $path );
 
my $path = "${home}${projects}/${vendor}/${library}${doc_library_path}/sch";
my $path = "${home}${repo}/${vendor}/${library}${doc_library_path}/sch";
mkdir $path,0755 unless( -e $path );
 
my $path = "${home}${projects}/${vendor}/${library}${doc_library_path}/png";
my $path = "${home}${repo}/${vendor}/${library}${doc_library_path}/png";
mkdir $path,0755 unless( -e $path );
 
my $path = "${home}${projects}/${vendor}/${library}${doc_library_path}/src";
my $path = "${home}${repo}/${vendor}/${library}${doc_library_path}/src";
mkdir $path,0755 unless( -e $path );
 
my @versions = yp::lib::find_component_versions($vendor,$library,$component);
172,12 → 190,12
$_ = $line;
if(/::(\S+)::(\S+)::(\S+)::(\S+)::/)
{
$new_project = $2;
$new_library = $2;
$new_component = $3;
$new_vendor = $1;
$new_version = $4;
print "Seeking $new_vendor $new_project $new_component $new_version \n";
my $spirit_component_file = $parser->parse_file(yp::lib::find_ipxact_component($new_vendor,$new_project,$new_component,$new_version));
print "Seeking $new_vendor $new_library $new_component $new_version \n";
my $spirit_component_file = $parser->parse_file(yp::lib::find_ipxact_component($new_vendor,$new_library,$new_component,$new_version));
 
foreach my $i_name ($spirit_component_file->findnodes("//spirit:componentGenerator/spirit:name"))
{
189,24 → 207,24
 
if($gen_envidentifier eq ":*Documentation:*" )
{
my $cmd = "./tools/sys/build_generate -prefix /doc_dir -vendor $vendor -project $library -component $component -version $version \n";
my $cmd = "./tools/sys/build_generate -prefix /doc_dir -vendor $vendor -library $library -component $component -version $version \n";
if (system($cmd)) {}
my $filename = find_filename("fs-sim", ${vendor}, ${library} , ${component} , ${version} );
my $cmd = "cp ${home}${work_dir}/${filename}.v ${home}${projects}/${vendor}/${library}${doc_library_path}/src/${module_name}.v \n";
my $cmd = "cp ${home}${work_dir}/${filename}.v ${home}${repo}/${vendor}/${library}${doc_library_path}/src/${module_name}.v \n";
if (system($cmd)) {}
my $filename = find_filename("fs-doc", ${vendor}, ${library} , ${component} , ${version} );
my $outfile ="${home}${projects}/${vendor}/${library}${doc_library_path}/sym/";
my $outfile ="${home}${repo}/${vendor}/${library}${doc_library_path}/sym/";
my $cmd = "./tools/documentation/ver2gedasym ${home}${work_dir}/${filename} $outfile \n";
if (system($cmd)) {}
my $outfile ="${home}${projects}/${vendor}/${library}${doc_library_path}/sch/";
my $outfile ="${home}${repo}/${vendor}/${library}${doc_library_path}/sch/";
my $cmd = "./tools/documentation/ver2gedasch ${home}${work_dir}/${filename} $outfile \n";
if (system($cmd)) {}
my $symfile ="${home}${projects}/${vendor}/${library}${doc_library_path}/sym/${module_name}.sym";
my $pngfile ="${home}${projects}/${vendor}/${library}${doc_library_path}/png/${module_name}_sym.png";
my $symfile ="${home}${repo}/${vendor}/${library}${doc_library_path}/sym/${module_name}.sym";
my $pngfile ="${home}${repo}/${vendor}/${library}${doc_library_path}/png/${module_name}_sym.png";
my $cmd ="gaf export -c -s auto -m 5px --dpi 600 --no-color -o $pngfile $symfile \n";
if (system($cmd)) {}
my $schfile ="${home}${projects}/${vendor}/${library}${doc_library_path}/sch/${module_name}.sch";
my $pngfile ="${home}${projects}/${vendor}/${library}${doc_library_path}/png/${module_name}_sch.png";
my $schfile ="${home}${repo}/${vendor}/${library}${doc_library_path}/sch/${module_name}.sch";
my $pngfile ="${home}${repo}/${vendor}/${library}${doc_library_path}/png/${module_name}_sch.png";
my $cmd ="gaf export -c -s auto -m 5px --dpi 600 --no-color -o $pngfile $schfile \n";
if (system($cmd)) {}
}
221,9 → 239,11
 
}
 
}
 
 
 
 
#/*********************************************************************************************/
#/ find filename */
#/ */
237,7 → 257,7
my @params = @_;
my $version = pop(@params);
my $component = pop(@params);
my $project = pop(@params);
my $library = pop(@params);
my $vendor = pop(@params);
my $filesetref_name = pop(@params);
 
246,9 → 266,9
if($version) {$variant = "${component}_${version}";}
else {$variant = "${component}";}
 
my @filelist = yp::lib::parse_component_brothers("$vendor","$project","$component","$version");
my $comp_xml_sep = yp::lib::find_comp_xml_sep($vendor,$project,$component,$version);
my $lib_comp_sep = yp::lib::find_lib_comp_sep($vendor,$project,$component);
my @filelist = yp::lib::parse_component_brothers("$vendor","$library","$component","$version");
my $comp_xml_sep = yp::lib::find_comp_xml_sep($vendor,$library,$component,$version);
my $lib_comp_sep = yp::lib::find_lib_comp_sep($vendor,$library,$component);
my $library_path = "${lib_comp_sep}${component}${comp_xml_sep}";
 
 
258,10 → 278,10
if(/::(\S+)::(\S+)::(\S+)::(\S+)::/)
{
$new_vendor = $1;
$new_project = $2;
$new_library = $2;
$new_component = $3;
$new_version = $4;
my $spirit_component_file = $parser->parse_file(yp::lib::find_ipxact_component($new_vendor,$new_project,$new_component,$new_version));
my $spirit_component_file = $parser->parse_file(yp::lib::find_ipxact_component($new_vendor,$new_library,$new_component,$new_version));
 
foreach my $i_name ($spirit_component_file->findnodes("//spirit:fileSets/spirit:fileSet/spirit:file/spirit:name"))
{
271,7 → 291,7
my($view_file) = $i_name ->findnodes('../../spirit:name/text()')->to_literal ;
if(($file_type eq "libraryDir") && ($logical_name eq "dest_dir") )
{
if( $view_file eq $filesetref_name ) { return ("${vendor}__${project}${library_path}/${file_name}${variant}"); };
if( $view_file eq $filesetref_name ) { return ("${vendor}__${library}${library_path}/${file_name}${variant}"); };
}
}
}

powered by: WebSVN 2.1.0

© copyright 1999-2024 OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.