[Author Prev][Author Next][Thread Prev][Thread Next][Author Index][Thread Index]
gEDA-cvs: gaf.git: branch: master updated (1.7.1-20110619-295-gb1f4b2e)
The branch, master has been updated
via b1f4b2eef1be897133c1ffd62fd3f57ece4f3e72 (commit)
via 6eb6fa5e2a5aeaa12f33d7238c35f71242005561 (commit)
via 7cd21a46a827e37537e256760a10c2a1ae824679 (commit)
via 276c8f36273de940eef281d650eee142e541cf26 (commit)
via b4d29aabc23e1c387657833424ad4aed5c584849 (commit)
via 7e4cc25ae7e93980ea2d586fc294c627542f83b3 (commit)
via 79b5727fd131179a7abd133e556cfb2f0e99af40 (commit)
from 33fee83f110c86bf014bd4fb460bb38bae626a10 (commit)
Those revisions listed above that are new to this repository have
not appeared on any other notification email; so we list those
revisions in full, below.
=========
Summary
=========
NEWS | 2 +
utils/docs/.gitignore | 2 +
utils/docs/Makefile.am | 4 +-
utils/docs/garchive.1 | 4 +-
utils/docs/gnet_hier_verilog.1 | 45 ++++++++++++++++++++++
utils/docs/gschlas.1 | 57 ++++++++++++++++++++++++++++
utils/docs/gsymfix.1 | 67 +++++++++++++++++++++++++++++++++
utils/scripts/Makefile.am | 10 +++--
utils/scripts/{gsymfix.pl => gsymfix} | 0
9 files changed, 184 insertions(+), 7 deletions(-)
create mode 100644 utils/docs/gnet_hier_verilog.1
create mode 100644 utils/docs/gschlas.1
create mode 100644 utils/docs/gsymfix.1
rename utils/scripts/{gsymfix.pl => gsymfix} (100%)
=================
Commit Messages
=================
commit 6eb6fa5e2a5aeaa12f33d7238c35f71242005561
Author: Gareth Edwards <gareth@xxxxxxxxxxxxxxxxxxxx>
Commit: Gareth Edwards <gareth@xxxxxxxxxxxxxxxxxxxx>
Add manpage for gsymfix.
Add manpage for gsymfix(1), add to build targets and gitignore
Affects-bug: lp-698849
:100644 100644 abe431a... b18dc58... M utils/docs/.gitignore
:100644 100644 b0dc2f3... 76bb83f... M utils/docs/Makefile.am
:000000 100644 0000000... 022f426... A utils/docs/gsymfix.1
commit 7cd21a46a827e37537e256760a10c2a1ae824679
Author: Gareth Edwards <gareth@xxxxxxxxxxxxxxxxxxxx>
Commit: Gareth Edwards <gareth@xxxxxxxxxxxxxxxxxxxx>
Rename "gsymfix.pl" to "gsymfix".
Since this script is installed into $prefix/bin, rename it to the
more command-like "gsymfix". Updated build system for new file, and
updated NEWS file appropriately.
:100644 100644 1efffb5... 0ba4259... M NEWS
:100644 100644 17f51f0... 74a79a4... M utils/scripts/Makefile.am
:000000 100755 0000000... c09a59a... A utils/scripts/gsymfix
:100755 000000 c09a59a... 0000000... D utils/scripts/gsymfix.pl
commit 276c8f36273de940eef281d650eee142e541cf26
Author: Gareth Edwards <gareth@xxxxxxxxxxxxxxxxxxxx>
Commit: Gareth Edwards <gareth@xxxxxxxxxxxxxxxxxxxx>
Add manpage for gschlas
Add manpage for gschlas(1), add to make targets and gitignore.
Affects-bug: lp-698849
:100644 100644 605d328... abe431a... M utils/docs/.gitignore
:100644 100644 8b0993f... b0dc2f3... M utils/docs/Makefile.am
:000000 100644 0000000... 6b96a00... A utils/docs/gschlas.1
commit b4d29aabc23e1c387657833424ad4aed5c584849
Author: Gareth Edwards <gareth@xxxxxxxxxxxxxxxxxxxx>
Commit: Gareth Edwards <gareth@xxxxxxxxxxxxxxxxxxxx>
Move gsymupdate and gschupdate to "not installed".
These two scripts have comments that say "Right now this program
should only be run against schematics which are either version
20020527 or earlier." I believe they were useful 10 years ago but not so
much now, so there's no need to install them into $prefix/bin.
Affects-bug: lp-698849
:100644 100644 0e5c4ac... 17f51f0... M utils/scripts/Makefile.am
commit 7e4cc25ae7e93980ea2d586fc294c627542f83b3
Author: Gareth Edwards <gareth@xxxxxxxxxxxxxxxxxxxx>
Commit: Gareth Edwards <gareth@xxxxxxxxxxxxxxxxxxxx>
Add manpage for gnet_hier_verilog.sh
Add a manpage for gnet_hier_verilog.sh and also move it to noinst_MANS
so it doesn't get installed into $prefix/bin.
Affects-bug: lp-698849
:100644 100644 d7e0ef7... 8b0993f... M utils/docs/Makefile.am
:000000 100644 0000000... bd1582a... A utils/docs/gnet_hier_verilog.1
:100644 100644 d7b0633... 0e5c4ac... M utils/scripts/Makefile.am
commit 79b5727fd131179a7abd133e556cfb2f0e99af40
Author: Gareth Edwards <gareth@xxxxxxxxxxxxxxxxxxxx>
Commit: Gareth Edwards <gareth@xxxxxxxxxxxxxxxxxxxx>
Utils: Fix trailing whitespace in garchive man page.
Commit a464d46fd had inadvertently left trailing spaces on a couple of
lines, this commit removes them.
:100644 100644 a559eb1... 95c32f4... M utils/docs/garchive.1
=========
Changes
=========
commit 6eb6fa5e2a5aeaa12f33d7238c35f71242005561
Author: Gareth Edwards <gareth@xxxxxxxxxxxxxxxxxxxx>
Commit: Gareth Edwards <gareth@xxxxxxxxxxxxxxxxxxxx>
Add manpage for gsymfix.
Add manpage for gsymfix(1), add to build targets and gitignore
Affects-bug: lp-698849
diff --git a/utils/docs/.gitignore b/utils/docs/.gitignore
index abe431a..b18dc58 100644
--- a/utils/docs/.gitignore
+++ b/utils/docs/.gitignore
@@ -18,3 +18,4 @@ convert_sym.html
garchive.html
gmk_sym.html
gschlas.html
+gsymfix.html
\ No newline at end of file
diff --git a/utils/docs/Makefile.am b/utils/docs/Makefile.am
index b0dc2f3..76bb83f 100644
--- a/utils/docs/Makefile.am
+++ b/utils/docs/Makefile.am
@@ -17,7 +17,8 @@ endif
dist_man_MANS = gsch2pcb.1 grenum.1 gxyrs.1 olib.1 pads_backannotate.1 \
pcb_backannotate.1 refdes_renum.1 schdiff.1 sw2asc.1 tragesym.1 \
- smash_megafile.1 convert_sym.1 garchive.1 gmk_sym.1 gschlas.1
+ smash_megafile.1 convert_sym.1 garchive.1 gmk_sym.1 gschlas.1 \
+ gsymfix.1
noinst_MANS = gnet_hier_verilog.1
diff --git a/utils/docs/gsymfix.1 b/utils/docs/gsymfix.1
new file mode 100644
index 0000000..022f426
--- /dev/null
+++ b/utils/docs/gsymfix.1
@@ -0,0 +1,67 @@
+.TH gsymfix 1 "June 19th, 2011" "gEDA project" 1.7.1.20110619
+
+.SH NAME
+gsymfix \- automatically fix common issues with gEDA symbols
+
+.SH SYNOPSIS
+.B gsymfix [
+.I options
+.B ]
+.I symbol_file
+.SH DESCRIPTION
+.B gsymfix
+reads a gEDA symbol file and does the following:
+.IP \(bu
+prints a warning if there is no pinnumber attribute on a pin;
+.IP \(bu
+Renumbers pinseq attributes on all pins, starting with 1;
+.IP \(bu
+Adds a pinseq attribute to a pin if none exists;
+.IP \(bu
+Adds a pinlabel=n_a attribute to a pin if none exists;
+.IP \(bu
+Adds a pintype=io attribute to a pin if none exists;
+.IP \(bu
+Adds a numslots=0 attribute to the symbol if none exists;
+.IP \(bu
+Adds a device=XXX attribute to the symbol if none exists;
+.IP \(bu
+Adds a footprint=XXX attribute to the symbol if none exists.
+.PP
+The idea here is to fix common cut-and-paste issues and fix up
+the symbol so that it will pass
+.BR gsymcheck (1)
+with no errors or
+warnings.
+
+.SH OPTIONS
+.B gsymfix
+accepts the following options:
+.TP
+\-\-help
+Displays this help message.
+.TP
+\-\-verbose
+Enables verbose output.
+.TP
+\-\-vverbose
+Enables *very* verbose output.
+.TP
+\-\-version
+Shows the version of this program.
+
+.SH AUTHOR
+Mike Skerritt <mike@xxxxxxxxxxxxxxx>.
+
+.SH SEE ALSO
+.BR gschem (1),
+.BR gsymcheck (1)
+
+.SH COPYRIGHT
+.nf
+Copyright \(co 1999-2011 gEDA Contributors. License GPLv2+: GNU GPL
+version 2 or later. Please see the `COPYING' file included with this
+program for full details.
+.PP
+This is free software: you are free to change and redistribute it.
+There is NO WARRANTY, to the extent permitted by law.
commit 7cd21a46a827e37537e256760a10c2a1ae824679
Author: Gareth Edwards <gareth@xxxxxxxxxxxxxxxxxxxx>
Commit: Gareth Edwards <gareth@xxxxxxxxxxxxxxxxxxxx>
Rename "gsymfix.pl" to "gsymfix".
Since this script is installed into $prefix/bin, rename it to the
more command-like "gsymfix". Updated build system for new file, and
updated NEWS file appropriately.
diff --git a/NEWS b/NEWS
index 1efffb5..0ba4259 100644
--- a/NEWS
+++ b/NEWS
@@ -55,6 +55,8 @@ Notable changes in gEDA/gaf 1.7.2
* The `--m4-pcbdir' and `--m4-file' arguments to `gsch2pcb' now work
again.
+* `gsymfix.pl' has been renamed to `gsymfix'.
+
Notable changes in gEDA/gaf 1.7.1
=================================
diff --git a/utils/scripts/Makefile.am b/utils/scripts/Makefile.am
index 17f51f0..74a79a4 100644
--- a/utils/scripts/Makefile.am
+++ b/utils/scripts/Makefile.am
@@ -3,13 +3,13 @@
## Process this file with automake to produce Makefile.in
bin_SCRIPTS = sarlacc_sym refdes_renum \
- tragesym pads_backannotate pcb_backannotate garchive gsymfix.pl \
+ tragesym pads_backannotate pcb_backannotate garchive gsymfix \
schdiff sw2asc
noinst_SCRIPTS = gnet_hier_verilog.sh gschupdate gsymupdate
EXTRA_DIST = convert_sym.awk gpstoimage mk_char_tab.pl \
- sarlacc_sym gschupdate gsymupdate refdes_renum gsymfix.pl \
+ sarlacc_sym gschupdate gsymupdate refdes_renum gsymfix \
tragesym pads_backannotate pcb_backannotate garchive.py \
gnet_hier_verilog.sh schdiff sw2asc.in
diff --git a/utils/scripts/gsymfix b/utils/scripts/gsymfix
new file mode 100755
index 0000000..c09a59a
--- /dev/null
+++ b/utils/scripts/gsymfix
@@ -0,0 +1,231 @@
+#!/usr/bin/perl -w
+
+my $version = "0.8";
+
+# This script reads a geda symbol and does the following:
+# (...see the usage routine below...)
+
+# for parsing input options
+use Getopt::Long;
+
+# don't allow -he to be interpreted as --help
+$Getopt::Long::autoabbrev=0;
+
+&GetOptions(("help" => \&usage,
+ "verbose" => \$verbose,
+ "vverbose" => \$vverbose,
+ "version" => \&version
+ ));
+
+usage() if $Getopt::Long::error;
+usage() unless @ARGV;
+
+my $found_pinnumber_attr = 0;
+my $found_pinseq_attr = 0;
+my $found_pintype_attr = 0;
+my $found_pinlabel_attr = 0;
+my $found_numslots_attr = 0;
+my $found_device_attr = 0;
+my $found_footprint_attr = 0;
+my $seqcnt = 0;
+my $skip_line_out = 0;
+my $file_line = 0;
+
+my $st_scan = 0;
+my $st_pin_start = 1;
+my $st_pin_body = 2;
+
+my $state = $st_scan; # intial state machine state
+
+if($vverbose) { $verbose = 1; }
+
+# make sure the input schematic exists and we can read it
+my $fname=shift(@ARGV);
+print "\nProcessing symbol file $fname\n";
+open(NETLIST,"$fname") or die "Can't open $fname: $!\n";
+
+# open output netlist
+$outfname="$fname.fix";
+open(OUTNET,">$outfname") or die "Can't open $outfname: $!\n";
+
+# parse netlist
+while($line = <NETLIST>) {
+ $file_line++;
+ #==========================
+ if( $state == $st_scan ) {
+ if( $line =~ /^P/) {
+ $state = $st_pin_start;
+ if($vverbose){print "Pin start...\n";}
+ }
+ elsif( $line =~ /^numslots=/) {
+ $found_numslots_attr = 1;
+ }
+ elsif( $line =~ /^device=/) {
+ $found_device_attr = 1;
+ }
+ elsif( $line =~ /^footprint=/) {
+ $found_footprint_attr = 1;
+ }
+ print OUTNET $line;
+ }
+ #==========================
+ elsif( $state == $st_pin_start ) {
+ if( $line =~ /^{/) {
+ $state = $st_pin_body;
+ $found_pinnumber_attr = 0;
+ $found_pinseq_attr = 0;
+ $found_pintype_attr = 0;
+ $found_pinlabel_attr = 0;
+ print OUTNET $line;
+ }
+ else {
+ print STDERR "*** ERROR: No pin left bracket found at line $file_line\n";
+ exit(-1);
+ }
+ }
+ #==========================
+ elsif( $state == $st_pin_body ) {
+ #----------------------
+ if( $line =~ /^pinnumber/) {
+ $found_pinnumber_attr = 1;
+ $pin_num = $line;
+ $pin_num =~ s/\n//;
+ $pin_num =~ s/^pinnumber=//;
+ $pinnumber_attr_line = $prev_line;
+ if($vverbose){print " pinnumber attribute found ($pin_num)\n";}
+ }
+ #----------------------
+ elsif( $line =~ /^pinseq/) {
+ $found_pinseq_attr = 1;
+ if($vverbose){print " Pinseq attribute found\n";}
+ $seqcnt++;
+ if($vverbose){print " Renumbering attr pinseq=$seqcnt\n";}
+ print OUTNET "pinseq=$seqcnt\n";
+ $skip_line_out++;
+ }
+ #----------------------
+ elsif( $line =~ /^pintype/) {
+ $found_pintype_attr = 1;
+ if($vverbose){print " pintype attribute found\n";}
+ }
+ #----------------------
+ elsif( $line =~ /^pinlabel/) {
+ $found_pinlabel_attr = 1;
+ if($vverbose){print " pinlabel attribute found\n";}
+ }
+ #----------------------
+ elsif( $line =~ /^}/) {
+ $state = $st_scan;
+ if( $found_pinnumber_attr == 0 ) {
+ print "*** WARNING: no pinum attribute found at line $file_line\n";
+ }
+ if( $found_pinseq_attr == 0 ) {
+ $seqcnt++;
+ if($verbose){print " Pin $pin_num: Adding attr pinseq=$seqcnt\n";}
+ print OUTNET $pinnumber_attr_line;
+ print OUTNET "pinseq=$seqcnt\n";
+ }
+ if( $found_pintype_attr == 0 ) {
+ if($verbose){print " Pin $pin_num: Adding attr pintype=io\n";}
+ print OUTNET $pinnumber_attr_line;
+ print OUTNET "pintype=io\n";
+ }
+ if( $found_pinlabel_attr == 0 ) {
+ if($verbose){print " Pin $pin_num: Adding attr pinlabel=n_a\n";}
+ print OUTNET $pinnumber_attr_line;
+ print OUTNET "pinlabel=n_a\n";
+ }
+ if($vverbose){print "Pin end...\n";}
+ }
+ if( $skip_line_out ) {
+ $skip_line_out = 0;
+ } else {
+ print OUTNET $line;
+ }
+ $prev_line = $line; # Save line for next pass
+ }
+}
+
+if( $found_numslots_attr == 0 ) {
+ if($verbose){print " Adding attr numslots=0\n";}
+ print OUTNET "T 600 100 9 10 0 0 0 0 1\n";
+ print OUTNET "numslots=0\n";
+}
+if( $found_device_attr == 0 ) {
+ if($verbose){print " Adding attr device=none\n";}
+ print OUTNET "T 600 100 9 10 0 0 0 0 1\n";
+ print OUTNET "device=none\n";
+}
+if( $found_footprint_attr == 0 ) {
+ if($verbose){print " Adding attr footprint=unknown\n";}
+ print OUTNET "T 600 100 9 10 0 0 0 0 1\n";
+ print OUTNET "footprint=unknown\n";
+}
+
+close(NETLIST);
+close(OUTNET);
+
+print STDERR "Output written to file $outfname\n\n";
+exit;
+
+
+#######################################################################
+#
+# Subroutines
+#
+#######################################################################
+
+#---------------------------------
+# usage()
+#
+# prints program usage
+#---------------------------------
+
+sub usage {
+ my $pname = $0;
+ $pname =~ s/.*\///g;
+
+ print "\nUsage:\n\n";
+ print " $pname [option] symbol_file\n";
+ print "\n";
+ print " $pname reads a geda symbol file and does the following:\n";
+ print "\t- Prints a warning if there is no pinnumber attribute on a pin\n";
+ print "\t- Renumbers pinseq attributes on all pins, starting with 1\n";
+ print "\t- Adds a pinseq attribute to a pin if none exists\n";
+ print "\t- Adds a pinlabel=n_a attribute to a pin if none exists\n";
+ print "\t- Adds a pintype=io attribute to a pin if none exists\n";
+ print "\t- Adds a numslots=0 attribute to the symbol if none exists\n";
+ print "\t- Adds a device=XXX attribute to the symbol if none exists\n";
+ print "\t- Adds a footprint=XXX attribute to the symbol if none exists\n";
+ print " The idea here is to fix common cut and paste issues and fix up\n";
+ print " the symbol so that it will pass gsymcheck with no errors or\n";
+ print " warnings.\n";
+ print "\n";
+ print " $pname accepts the following options:\n";
+ print "\n";
+ print " --help Displays this help message.\n";
+ print "\n";
+ print " --verbose Enables verbose output.\n";
+ print "\n";
+ print " --vverbose Enables *very* verbose output.\n";
+ print "\n";
+ print " --version Shows the version of this program.\n";
+ print "\n";
+ print " $pname was written by Mike Skerritt <mike\@acornpacket.com>\n";
+ print "\n\n";
+ exit;
+}
+
+#---------------------------------
+# version()
+#
+# prints program version
+#---------------------------------
+
+sub version {
+ my $pname = $0;
+ $pname =~ s/.*\///g;
+ print "$pname ($0): Version $version\n";
+}
+
+
diff --git a/utils/scripts/gsymfix.pl b/utils/scripts/gsymfix.pl
deleted file mode 100755
index c09a59a..0000000
--- a/utils/scripts/gsymfix.pl
+++ /dev/null
@@ -1,231 +0,0 @@
-#!/usr/bin/perl -w
-
-my $version = "0.8";
-
-# This script reads a geda symbol and does the following:
-# (...see the usage routine below...)
-
-# for parsing input options
-use Getopt::Long;
-
-# don't allow -he to be interpreted as --help
-$Getopt::Long::autoabbrev=0;
-
-&GetOptions(("help" => \&usage,
- "verbose" => \$verbose,
- "vverbose" => \$vverbose,
- "version" => \&version
- ));
-
-usage() if $Getopt::Long::error;
-usage() unless @ARGV;
-
-my $found_pinnumber_attr = 0;
-my $found_pinseq_attr = 0;
-my $found_pintype_attr = 0;
-my $found_pinlabel_attr = 0;
-my $found_numslots_attr = 0;
-my $found_device_attr = 0;
-my $found_footprint_attr = 0;
-my $seqcnt = 0;
-my $skip_line_out = 0;
-my $file_line = 0;
-
-my $st_scan = 0;
-my $st_pin_start = 1;
-my $st_pin_body = 2;
-
-my $state = $st_scan; # intial state machine state
-
-if($vverbose) { $verbose = 1; }
-
-# make sure the input schematic exists and we can read it
-my $fname=shift(@ARGV);
-print "\nProcessing symbol file $fname\n";
-open(NETLIST,"$fname") or die "Can't open $fname: $!\n";
-
-# open output netlist
-$outfname="$fname.fix";
-open(OUTNET,">$outfname") or die "Can't open $outfname: $!\n";
-
-# parse netlist
-while($line = <NETLIST>) {
- $file_line++;
- #==========================
- if( $state == $st_scan ) {
- if( $line =~ /^P/) {
- $state = $st_pin_start;
- if($vverbose){print "Pin start...\n";}
- }
- elsif( $line =~ /^numslots=/) {
- $found_numslots_attr = 1;
- }
- elsif( $line =~ /^device=/) {
- $found_device_attr = 1;
- }
- elsif( $line =~ /^footprint=/) {
- $found_footprint_attr = 1;
- }
- print OUTNET $line;
- }
- #==========================
- elsif( $state == $st_pin_start ) {
- if( $line =~ /^{/) {
- $state = $st_pin_body;
- $found_pinnumber_attr = 0;
- $found_pinseq_attr = 0;
- $found_pintype_attr = 0;
- $found_pinlabel_attr = 0;
- print OUTNET $line;
- }
- else {
- print STDERR "*** ERROR: No pin left bracket found at line $file_line\n";
- exit(-1);
- }
- }
- #==========================
- elsif( $state == $st_pin_body ) {
- #----------------------
- if( $line =~ /^pinnumber/) {
- $found_pinnumber_attr = 1;
- $pin_num = $line;
- $pin_num =~ s/\n//;
- $pin_num =~ s/^pinnumber=//;
- $pinnumber_attr_line = $prev_line;
- if($vverbose){print " pinnumber attribute found ($pin_num)\n";}
- }
- #----------------------
- elsif( $line =~ /^pinseq/) {
- $found_pinseq_attr = 1;
- if($vverbose){print " Pinseq attribute found\n";}
- $seqcnt++;
- if($vverbose){print " Renumbering attr pinseq=$seqcnt\n";}
- print OUTNET "pinseq=$seqcnt\n";
- $skip_line_out++;
- }
- #----------------------
- elsif( $line =~ /^pintype/) {
- $found_pintype_attr = 1;
- if($vverbose){print " pintype attribute found\n";}
- }
- #----------------------
- elsif( $line =~ /^pinlabel/) {
- $found_pinlabel_attr = 1;
- if($vverbose){print " pinlabel attribute found\n";}
- }
- #----------------------
- elsif( $line =~ /^}/) {
- $state = $st_scan;
- if( $found_pinnumber_attr == 0 ) {
- print "*** WARNING: no pinum attribute found at line $file_line\n";
- }
- if( $found_pinseq_attr == 0 ) {
- $seqcnt++;
- if($verbose){print " Pin $pin_num: Adding attr pinseq=$seqcnt\n";}
- print OUTNET $pinnumber_attr_line;
- print OUTNET "pinseq=$seqcnt\n";
- }
- if( $found_pintype_attr == 0 ) {
- if($verbose){print " Pin $pin_num: Adding attr pintype=io\n";}
- print OUTNET $pinnumber_attr_line;
- print OUTNET "pintype=io\n";
- }
- if( $found_pinlabel_attr == 0 ) {
- if($verbose){print " Pin $pin_num: Adding attr pinlabel=n_a\n";}
- print OUTNET $pinnumber_attr_line;
- print OUTNET "pinlabel=n_a\n";
- }
- if($vverbose){print "Pin end...\n";}
- }
- if( $skip_line_out ) {
- $skip_line_out = 0;
- } else {
- print OUTNET $line;
- }
- $prev_line = $line; # Save line for next pass
- }
-}
-
-if( $found_numslots_attr == 0 ) {
- if($verbose){print " Adding attr numslots=0\n";}
- print OUTNET "T 600 100 9 10 0 0 0 0 1\n";
- print OUTNET "numslots=0\n";
-}
-if( $found_device_attr == 0 ) {
- if($verbose){print " Adding attr device=none\n";}
- print OUTNET "T 600 100 9 10 0 0 0 0 1\n";
- print OUTNET "device=none\n";
-}
-if( $found_footprint_attr == 0 ) {
- if($verbose){print " Adding attr footprint=unknown\n";}
- print OUTNET "T 600 100 9 10 0 0 0 0 1\n";
- print OUTNET "footprint=unknown\n";
-}
-
-close(NETLIST);
-close(OUTNET);
-
-print STDERR "Output written to file $outfname\n\n";
-exit;
-
-
-#######################################################################
-#
-# Subroutines
-#
-#######################################################################
-
-#---------------------------------
-# usage()
-#
-# prints program usage
-#---------------------------------
-
-sub usage {
- my $pname = $0;
- $pname =~ s/.*\///g;
-
- print "\nUsage:\n\n";
- print " $pname [option] symbol_file\n";
- print "\n";
- print " $pname reads a geda symbol file and does the following:\n";
- print "\t- Prints a warning if there is no pinnumber attribute on a pin\n";
- print "\t- Renumbers pinseq attributes on all pins, starting with 1\n";
- print "\t- Adds a pinseq attribute to a pin if none exists\n";
- print "\t- Adds a pinlabel=n_a attribute to a pin if none exists\n";
- print "\t- Adds a pintype=io attribute to a pin if none exists\n";
- print "\t- Adds a numslots=0 attribute to the symbol if none exists\n";
- print "\t- Adds a device=XXX attribute to the symbol if none exists\n";
- print "\t- Adds a footprint=XXX attribute to the symbol if none exists\n";
- print " The idea here is to fix common cut and paste issues and fix up\n";
- print " the symbol so that it will pass gsymcheck with no errors or\n";
- print " warnings.\n";
- print "\n";
- print " $pname accepts the following options:\n";
- print "\n";
- print " --help Displays this help message.\n";
- print "\n";
- print " --verbose Enables verbose output.\n";
- print "\n";
- print " --vverbose Enables *very* verbose output.\n";
- print "\n";
- print " --version Shows the version of this program.\n";
- print "\n";
- print " $pname was written by Mike Skerritt <mike\@acornpacket.com>\n";
- print "\n\n";
- exit;
-}
-
-#---------------------------------
-# version()
-#
-# prints program version
-#---------------------------------
-
-sub version {
- my $pname = $0;
- $pname =~ s/.*\///g;
- print "$pname ($0): Version $version\n";
-}
-
-
commit 276c8f36273de940eef281d650eee142e541cf26
Author: Gareth Edwards <gareth@xxxxxxxxxxxxxxxxxxxx>
Commit: Gareth Edwards <gareth@xxxxxxxxxxxxxxxxxxxx>
Add manpage for gschlas
Add manpage for gschlas(1), add to make targets and gitignore.
Affects-bug: lp-698849
diff --git a/utils/docs/.gitignore b/utils/docs/.gitignore
index 605d328..abe431a 100644
--- a/utils/docs/.gitignore
+++ b/utils/docs/.gitignore
@@ -17,3 +17,4 @@ smash_megafile.html
convert_sym.html
garchive.html
gmk_sym.html
+gschlas.html
diff --git a/utils/docs/Makefile.am b/utils/docs/Makefile.am
index 8b0993f..b0dc2f3 100644
--- a/utils/docs/Makefile.am
+++ b/utils/docs/Makefile.am
@@ -17,7 +17,7 @@ endif
dist_man_MANS = gsch2pcb.1 grenum.1 gxyrs.1 olib.1 pads_backannotate.1 \
pcb_backannotate.1 refdes_renum.1 schdiff.1 sw2asc.1 tragesym.1 \
- smash_megafile.1 convert_sym.1 garchive.1 gmk_sym.1
+ smash_megafile.1 convert_sym.1 garchive.1 gmk_sym.1 gschlas.1
noinst_MANS = gnet_hier_verilog.1
diff --git a/utils/docs/gschlas.1 b/utils/docs/gschlas.1
new file mode 100644
index 0000000..6b96a00
--- /dev/null
+++ b/utils/docs/gschlas.1
@@ -0,0 +1,57 @@
+.TH gschlas 1 "June 19th, 2011" "gEDA project" 1.7.1.20110619
+
+.SH NAME
+gschlas \- gEDA schematic load and save
+
+.SH SYNOPSIS
+.B gschlas [ \-e | \-u ] [ \-q | \-v ]
+.I file
+.B [
+.I file ...
+.B ]
+.PP
+.B gschlas -h
+
+.SH DESCRIPTION
+.B gschlas
+can embed the in-use schematic symbols and pictures into a schematic
+or set of schematics. It allow, for instance, putting a schematic on a
+website or in an email without the recipient needing to download lots
+of custom symbols for the design.
+.PP
+.B gschlas
+can also unembed symbol references from a schematic, but note that the
+symbols revert to library references; if the symbol doesn't exist in
+the current gEDA project's library path, a broken schematic results.
+
+.SH OPTIONS
+.TP
+\-e
+Embed all components/pictures.
+.TP
+\-u
+Unembed all components/pictures.
+.TP
+\-q
+Quiet mode.
+.TP
+\-v
+Verbose mode.
+.TP
+\-h
+Print usage information.
+
+.SH AUTHOR
+Ales Hvezda
+
+.SH SEE ALSO
+.BR gschem(1)
+
+.SH COPYRIGHT
+.nf
+Copyright \(co 1999-2011 gEDA Contributors. License GPLv2+: GNU GPL
+version 2 or later. Please see the `COPYING' file included with this
+program for full details.
+.PP
+This is free software: you are free to change and redistribute it.
+There is NO WARRANTY, to the extent permitted by law.
commit b4d29aabc23e1c387657833424ad4aed5c584849
Author: Gareth Edwards <gareth@xxxxxxxxxxxxxxxxxxxx>
Commit: Gareth Edwards <gareth@xxxxxxxxxxxxxxxxxxxx>
Move gsymupdate and gschupdate to "not installed".
These two scripts have comments that say "Right now this program
should only be run against schematics which are either version
20020527 or earlier." I believe they were useful 10 years ago but not so
much now, so there's no need to install them into $prefix/bin.
Affects-bug: lp-698849
diff --git a/utils/scripts/Makefile.am b/utils/scripts/Makefile.am
index 0e5c4ac..17f51f0 100644
--- a/utils/scripts/Makefile.am
+++ b/utils/scripts/Makefile.am
@@ -2,11 +2,11 @@
##
## Process this file with automake to produce Makefile.in
-bin_SCRIPTS = sarlacc_sym gschupdate gsymupdate refdes_renum \
+bin_SCRIPTS = sarlacc_sym refdes_renum \
tragesym pads_backannotate pcb_backannotate garchive gsymfix.pl \
schdiff sw2asc
-noinst_SCRIPTS = gnet_hier_verilog.sh
+noinst_SCRIPTS = gnet_hier_verilog.sh gschupdate gsymupdate
EXTRA_DIST = convert_sym.awk gpstoimage mk_char_tab.pl \
sarlacc_sym gschupdate gsymupdate refdes_renum gsymfix.pl \
commit 7e4cc25ae7e93980ea2d586fc294c627542f83b3
Author: Gareth Edwards <gareth@xxxxxxxxxxxxxxxxxxxx>
Commit: Gareth Edwards <gareth@xxxxxxxxxxxxxxxxxxxx>
Add manpage for gnet_hier_verilog.sh
Add a manpage for gnet_hier_verilog.sh and also move it to noinst_MANS
so it doesn't get installed into $prefix/bin.
Affects-bug: lp-698849
diff --git a/utils/docs/Makefile.am b/utils/docs/Makefile.am
index d7e0ef7..8b0993f 100644
--- a/utils/docs/Makefile.am
+++ b/utils/docs/Makefile.am
@@ -19,6 +19,7 @@ dist_man_MANS = gsch2pcb.1 grenum.1 gxyrs.1 olib.1 pads_backannotate.1 \
pcb_backannotate.1 refdes_renum.1 schdiff.1 sw2asc.1 tragesym.1 \
smash_megafile.1 convert_sym.1 garchive.1 gmk_sym.1
+noinst_MANS = gnet_hier_verilog.1
# Rules for converting man->html
html_man_files = $(dist_man_MANS:%.1=%.html)
diff --git a/utils/docs/gnet_hier_verilog.1 b/utils/docs/gnet_hier_verilog.1
new file mode 100644
index 0000000..bd1582a
--- /dev/null
+++ b/utils/docs/gnet_hier_verilog.1
@@ -0,0 +1,45 @@
+.TH gnet_hier_verilog.sh 1 "June 19th, 2011" "gEDA project" 1.7.1.20110619
+
+.SH NAME
+gnet_hier_verilog.sh \- generate a non-flattened hierarchical Verilog netlist.
+
+.SH SYNOPSIS
+.B gnet_hier_verilog.sh
+.I filename.sch
+
+.SH DESCRIPTION
+.B gnet_hier_verilog.sh
+is a simple script to produce a
+hierarchical verilog netlist in a single file.
+It gathers hierarchical information from a list of
+unique symbols/schematics originating from the top level
+schematic all the way down to the lowest level of the
+design hierarchy. It then successively invokes the
+existing gEDA verilog netlister to produce each single
+level netlists, and concatinates all the unique
+module netlists into one single hierarchical netlist
+file.
+.PP
+Currently,
+.B gnet_hier_verilog
+assumes that one or more hierarchical symbol
+can be represented by a single schematic file. If needed,
+feature for mutiple schematic files mapped to a single symbol
+can be easily added. In that case, multiple source attrib
+are used in that symbol.
+
+.SH AUTHOR
+Paul Tan
+
+.SH SEE ALSO
+.BR gschem (1),
+.BR gnetlist (1)
+
+.SH COPYRIGHT
+.nf
+Copyright \(co 1999-2011 gEDA Contributors. License GPLv2+: GNU GPL
+version 2 or later. Please see the `COPYING' file included with this
+program for full details.
+.PP
+This is free software: you are free to change and redistribute it.
+There is NO WARRANTY, to the extent permitted by law.
diff --git a/utils/scripts/Makefile.am b/utils/scripts/Makefile.am
index d7b0633..0e5c4ac 100644
--- a/utils/scripts/Makefile.am
+++ b/utils/scripts/Makefile.am
@@ -4,7 +4,9 @@
bin_SCRIPTS = sarlacc_sym gschupdate gsymupdate refdes_renum \
tragesym pads_backannotate pcb_backannotate garchive gsymfix.pl \
- gnet_hier_verilog.sh schdiff sw2asc
+ schdiff sw2asc
+
+noinst_SCRIPTS = gnet_hier_verilog.sh
EXTRA_DIST = convert_sym.awk gpstoimage mk_char_tab.pl \
sarlacc_sym gschupdate gsymupdate refdes_renum gsymfix.pl \
commit 79b5727fd131179a7abd133e556cfb2f0e99af40
Author: Gareth Edwards <gareth@xxxxxxxxxxxxxxxxxxxx>
Commit: Gareth Edwards <gareth@xxxxxxxxxxxxxxxxxxxx>
Utils: Fix trailing whitespace in garchive man page.
Commit a464d46fd had inadvertently left trailing spaces on a couple of
lines, this commit removes them.
diff --git a/utils/docs/garchive.1 b/utils/docs/garchive.1
index a559eb1..95c32f4 100644
--- a/utils/docs/garchive.1
+++ b/utils/docs/garchive.1
@@ -24,8 +24,8 @@ Archive mode is the default.
.SH OPTIONS
.TP
--f filename
-Optional. Used in archive mode. Read files to archive from <filename>
+-f filename
+Optional. Used in archive mode. Read files to archive from <filename>
instead of garchiverc.
.TP
-v
_______________________________________________
geda-cvs mailing list
geda-cvs@xxxxxxxxxxxxxx
http://www.seul.org/cgi-bin/mailman/listinfo/geda-cvs