Index: Makefile.am =================================================================== --- Makefile.am (nonexistent) +++ Makefile.am (revision 2) @@ -0,0 +1,27 @@ +## $Id$ +## + +## XXX the tools should probably be cleaned up a bit and installed +## in ${exec_prefix}/bin (by bin_SCRIPTS and bin_PROGRAMS) + +toolsdir= $(pkgdatadir)/tools +dist_tools_DATA= ${TOOLS} + +scmdatadir = $(datadir)/gEDA/scheme +dist_scmdata_DATA = $(DIST_SCM) + +bin_SCRIPTS= \ + MergePCBPS \ + Merge_dimPCBPS + +TOOLS= \ + apctools.zip \ + gerbertotk.c \ + pcb2ncap.tgz \ + tgo2pcb.tcl \ + MergePCBPS \ + Merge_dimPCBPS \ + PCB2HPGL + +DIST_SCM= \ + gnet-pcbfwd.scm Index: Makefile.in =================================================================== --- Makefile.in (nonexistent) +++ Makefile.in (revision 2) @@ -0,0 +1,586 @@ +# Makefile.in generated by automake 1.11.1 from Makefile.am. +# @configure_input@ + +# Copyright (C) 1994, 1995, 1996, 1997, 1998, 1999, 2000, 2001, 2002, +# 2003, 2004, 2005, 2006, 2007, 2008, 2009 Free Software Foundation, +# Inc. +# This Makefile.in is free software; the Free Software Foundation +# gives unlimited permission to copy and/or distribute it, +# with or without modifications, as long as this notice is preserved. + +# This program is distributed in the hope that it will be useful, +# but WITHOUT ANY WARRANTY, to the extent permitted by law; without +# even the implied warranty of MERCHANTABILITY or FITNESS FOR A +# PARTICULAR PURPOSE. + +@SET_MAKE@ + + +VPATH = @srcdir@ +pkgdatadir = $(datadir)/@PACKAGE@ +pkgincludedir = $(includedir)/@PACKAGE@ +pkglibdir = $(libdir)/@PACKAGE@ +pkglibexecdir = $(libexecdir)/@PACKAGE@ +am__cd = CDPATH="$${ZSH_VERSION+.}$(PATH_SEPARATOR)" && cd +install_sh_DATA = $(install_sh) -c -m 644 +install_sh_PROGRAM = $(install_sh) -c +install_sh_SCRIPT = $(install_sh) -c +INSTALL_HEADER = $(INSTALL_DATA) +transform = $(program_transform_name) +NORMAL_INSTALL = : +PRE_INSTALL = : +POST_INSTALL = : +NORMAL_UNINSTALL = : +PRE_UNINSTALL = : +POST_UNINSTALL = : +build_triplet = @build@ +host_triplet = @host@ +subdir = tools +DIST_COMMON = $(dist_scmdata_DATA) $(dist_tools_DATA) \ + $(srcdir)/Makefile.am $(srcdir)/Makefile.in +ACLOCAL_M4 = $(top_srcdir)/aclocal.m4 +am__aclocal_m4_deps = $(top_srcdir)/m4/ax_check_gl.m4 \ + $(top_srcdir)/m4/ax_check_glu.m4 \ + $(top_srcdir)/m4/ax_lang_compiler_ms.m4 \ + $(top_srcdir)/m4/ax_pthread.m4 $(top_srcdir)/m4/codeset.m4 \ + $(top_srcdir)/m4/gettext.m4 $(top_srcdir)/m4/glibc21.m4 \ + $(top_srcdir)/m4/iconv.m4 $(top_srcdir)/m4/intdiv0.m4 \ + $(top_srcdir)/m4/intmax.m4 $(top_srcdir)/m4/inttypes-pri.m4 \ + $(top_srcdir)/m4/inttypes.m4 $(top_srcdir)/m4/inttypes_h.m4 \ + $(top_srcdir)/m4/isc-posix.m4 $(top_srcdir)/m4/lcmessage.m4 \ + $(top_srcdir)/m4/lib-ld.m4 $(top_srcdir)/m4/lib-link.m4 \ + $(top_srcdir)/m4/lib-prefix.m4 $(top_srcdir)/m4/longdouble.m4 \ + $(top_srcdir)/m4/longlong.m4 $(top_srcdir)/m4/nls.m4 \ + $(top_srcdir)/m4/po.m4 $(top_srcdir)/m4/printf-posix.m4 \ + $(top_srcdir)/m4/progtest.m4 $(top_srcdir)/m4/signed.m4 \ + $(top_srcdir)/m4/size_max.m4 $(top_srcdir)/m4/stdint_h.m4 \ + $(top_srcdir)/m4/uintmax_t.m4 $(top_srcdir)/m4/ulonglong.m4 \ + $(top_srcdir)/m4/wchar_t.m4 $(top_srcdir)/m4/wint_t.m4 \ + $(top_srcdir)/m4/xsize.m4 $(top_srcdir)/acinclude.m4 \ + $(top_srcdir)/m4/m4_ax_func_mkdir.m4 \ + $(top_srcdir)/configure.ac +am__configure_deps = $(am__aclocal_m4_deps) $(CONFIGURE_DEPENDENCIES) \ + $(ACLOCAL_M4) +mkinstalldirs = $(SHELL) $(top_srcdir)/mkinstalldirs +CONFIG_HEADER = $(top_builddir)/config.h +CONFIG_CLEAN_FILES = +CONFIG_CLEAN_VPATH_FILES = +am__vpath_adj_setup = srcdirstrip=`echo "$(srcdir)" | sed 's|.|.|g'`; +am__vpath_adj = case $$p in \ + $(srcdir)/*) f=`echo "$$p" | sed "s|^$$srcdirstrip/||"`;; \ + *) f=$$p;; \ + esac; +am__strip_dir = f=`echo $$p | sed -e 's|^.*/||'`; +am__install_max = 40 +am__nobase_strip_setup = \ + srcdirstrip=`echo "$(srcdir)" | sed 's/[].[^$$\\*|]/\\\\&/g'` +am__nobase_strip = \ + for p in $$list; do echo "$$p"; done | sed -e "s|$$srcdirstrip/||" +am__nobase_list = $(am__nobase_strip_setup); \ + for p in $$list; do echo "$$p $$p"; done | \ + sed "s| $$srcdirstrip/| |;"' / .*\//!s/ .*/ ./; s,\( .*\)/[^/]*$$,\1,' | \ + $(AWK) 'BEGIN { files["."] = "" } { files[$$2] = files[$$2] " " $$1; \ + if (++n[$$2] == $(am__install_max)) \ + { print $$2, files[$$2]; n[$$2] = 0; files[$$2] = "" } } \ + END { for (dir in files) print dir, files[dir] }' +am__base_list = \ + sed '$$!N;$$!N;$$!N;$$!N;$$!N;$$!N;$$!N;s/\n/ /g' | \ + sed '$$!N;$$!N;$$!N;$$!N;s/\n/ /g' +am__installdirs = "$(DESTDIR)$(bindir)" "$(DESTDIR)$(scmdatadir)" \ + "$(DESTDIR)$(toolsdir)" +SCRIPTS = $(bin_SCRIPTS) +SOURCES = +DIST_SOURCES = +DATA = $(dist_scmdata_DATA) $(dist_tools_DATA) +DISTFILES = $(DIST_COMMON) $(DIST_SOURCES) $(TEXINFOS) $(EXTRA_DIST) +ACLOCAL = @ACLOCAL@ +ALLOCA = @ALLOCA@ +ALL_LINGUAS = @ALL_LINGUAS@ +AMTAR = @AMTAR@ +AUTOCONF = @AUTOCONF@ +AUTOHEADER = @AUTOHEADER@ +AUTOMAKE = @AUTOMAKE@ +AWK = @AWK@ +BTNMOD = @BTNMOD@ +BUILD_INCLUDED_LIBINTL = @BUILD_INCLUDED_LIBINTL@ +CAIRO_CFLAGS = @CAIRO_CFLAGS@ +CAIRO_LIBS = @CAIRO_LIBS@ +CATOBJEXT = @CATOBJEXT@ +CC = @CC@ +CCDEPMODE = @CCDEPMODE@ +CC_OR_CXX = @CC_OR_CXX@ +CC_OR_CXX_FLAGS = @CC_OR_CXX_FLAGS@ +CFLAGS = @CFLAGS@ +CONVERT = @CONVERT@ +CPP = @CPP@ +CPPFLAGS = @CPPFLAGS@ +CXX = @CXX@ +CXXDEPMODE = @CXXDEPMODE@ +CXXFLAGS = @CXXFLAGS@ +CYGPATH_W = @CYGPATH_W@ +DATADIRNAME = @DATADIRNAME@ +DBUS_CFLAGS = @DBUS_CFLAGS@ +DBUS_LIBS = @DBUS_LIBS@ +DEFS = @DEFS@ +DEPDIR = @DEPDIR@ +DOC = @DOC@ +ECHO_C = @ECHO_C@ +ECHO_N = @ECHO_N@ +ECHO_T = @ECHO_T@ +EGREP = @EGREP@ +EXEEXT = @EXEEXT@ +FONTFILENAME = @FONTFILENAME@ +GDLIB_CONFIG = @GDLIB_CONFIG@ +GENCAT = @GENCAT@ +GERBV = @GERBV@ +GETTEXT_PACKAGE = @GETTEXT_PACKAGE@ +GLIBC21 = @GLIBC21@ +GLIB_CFLAGS = @GLIB_CFLAGS@ +GLIB_LIBS = @GLIB_LIBS@ +GLU_CFLAGS = @GLU_CFLAGS@ +GLU_LIBS = @GLU_LIBS@ +GL_CFLAGS = @GL_CFLAGS@ +GL_LIBS = @GL_LIBS@ +GMSGFMT = @GMSGFMT@ +GNUM4 = @GNUM4@ +GREP = @GREP@ +GSCHEM = @GSCHEM@ +GTKGLEXT_CFLAGS = @GTKGLEXT_CFLAGS@ +GTKGLEXT_LIBS = @GTKGLEXT_LIBS@ +GTK_CFLAGS = @GTK_CFLAGS@ +GTK_LIBS = @GTK_LIBS@ +GTK_UPDATE_ICON_CACHE_BIN = @GTK_UPDATE_ICON_CACHE_BIN@ +HAVE_ASPRINTF = @HAVE_ASPRINTF@ +HAVE_POSIX_PRINTF = @HAVE_POSIX_PRINTF@ +HAVE_SNPRINTF = @HAVE_SNPRINTF@ +HAVE_WPRINTF = @HAVE_WPRINTF@ +HIDLIBS = @HIDLIBS@ +HIDLIST = @HIDLIST@ +IM_ANIMATE = @IM_ANIMATE@ +IM_COMPARE = @IM_COMPARE@ +IM_COMPOSITE = @IM_COMPOSITE@ +IM_CONVERT = @IM_CONVERT@ +IM_DISPLAY = @IM_DISPLAY@ +IM_MONTAGE = @IM_MONTAGE@ +INSTALL = @INSTALL@ +INSTALL_DATA = @INSTALL_DATA@ +INSTALL_PROGRAM = @INSTALL_PROGRAM@ +INSTALL_SCRIPT = @INSTALL_SCRIPT@ +INSTALL_STRIP_PROGRAM = @INSTALL_STRIP_PROGRAM@ +INSTOBJEXT = @INSTOBJEXT@ +INTLBISON = @INTLBISON@ +INTLLIBS = @INTLLIBS@ +INTLOBJS = @INTLOBJS@ +INTLTOOL_EXTRACT = @INTLTOOL_EXTRACT@ +INTLTOOL_MERGE = @INTLTOOL_MERGE@ +INTLTOOL_PERL = @INTLTOOL_PERL@ +INTLTOOL_UPDATE = @INTLTOOL_UPDATE@ +INTL_LIBTOOL_SUFFIX_PREFIX = @INTL_LIBTOOL_SUFFIX_PREFIX@ +KDEDATADIR = @KDEDATADIR@ +KPSEWHICH = @KPSEWHICH@ +LDFLAGS = @LDFLAGS@ +LEX = @LEX@ +LEXLIB = @LEXLIB@ +LEX_OUTPUT_ROOT = @LEX_OUTPUT_ROOT@ +LEX_PATH = @LEX_PATH@ +LIBICONV = @LIBICONV@ +LIBINTL = @LIBINTL@ +LIBOBJS = @LIBOBJS@ +LIBRARYFILENAME = @LIBRARYFILENAME@ +LIBS = @LIBS@ +LTLIBICONV = @LTLIBICONV@ +LTLIBINTL = @LTLIBINTL@ +LTLIBOBJS = @LTLIBOBJS@ +M4 = @M4@ +MAINT = @MAINT@ +MAKEINFO = @MAKEINFO@ +MKDIR_P = @MKDIR_P@ +MKINFO = @MKINFO@ +MKINSTALLDIRS = @MKINSTALLDIRS@ +MSGFMT = @MSGFMT@ +MSGMERGE = @MSGMERGE@ +OBJEXT = @OBJEXT@ +PACKAGE = @PACKAGE@ +PACKAGE_BUGREPORT = @PACKAGE_BUGREPORT@ +PACKAGE_NAME = @PACKAGE_NAME@ +PACKAGE_STRING = @PACKAGE_STRING@ +PACKAGE_TARNAME = @PACKAGE_TARNAME@ +PACKAGE_URL = @PACKAGE_URL@ +PACKAGE_VERSION = @PACKAGE_VERSION@ +PATH_SEPARATOR = @PATH_SEPARATOR@ +PCB = @PCB@ +PCBLIBDIR = @PCBLIBDIR@ +PCBTREEDIR = @PCBTREEDIR@ +PCBTREEPATH = @PCBTREEPATH@ +PDFLATEX = @PDFLATEX@ +PERL = @PERL@ +PKG_CONFIG = @PKG_CONFIG@ +PKG_CONFIG_LIBDIR = @PKG_CONFIG_LIBDIR@ +PKG_CONFIG_PATH = @PKG_CONFIG_PATH@ +POSUB = @POSUB@ +PPMTOWINICON = @PPMTOWINICON@ +PS2PDF = @PS2PDF@ +PTHREAD_CC = @PTHREAD_CC@ +PTHREAD_CFLAGS = @PTHREAD_CFLAGS@ +PTHREAD_LIBS = @PTHREAD_LIBS@ +RANLIB = @RANLIB@ +SED = @SED@ +SETENV = @SETENV@ +SET_MAKE = @SET_MAKE@ +SHELL = @SHELL@ +STRIP = @STRIP@ +TEXI2DVI = @TEXI2DVI@ +TOPDIRS = @TOPDIRS@ +UPDATE_DESKTOP_DATABASE = @UPDATE_DESKTOP_DATABASE@ +UPDATE_MIME_DATABASE = @UPDATE_MIME_DATABASE@ +USE_INCLUDED_LIBINTL = @USE_INCLUDED_LIBINTL@ +USE_NLS = @USE_NLS@ +VERSION = @VERSION@ +WIN32 = @WIN32@ +WINDRES = @WINDRES@ +WISH = @WISH@ +XDGDATADIR = @XDGDATADIR@ +XGETTEXT = @XGETTEXT@ +XMKMF = @XMKMF@ +XPMTOPPM = @XPMTOPPM@ +X_CFLAGS = @X_CFLAGS@ +X_EXTRA_LIBS = @X_EXTRA_LIBS@ +X_LIBS = @X_LIBS@ +X_PRE_LIBS = @X_PRE_LIBS@ +YACC = @YACC@ +YACC_PATH = @YACC_PATH@ +YFLAGS = @YFLAGS@ +abs_builddir = @abs_builddir@ +abs_srcdir = @abs_srcdir@ +abs_top_builddir = @abs_top_builddir@ +abs_top_srcdir = @abs_top_srcdir@ +ac_ct_CC = @ac_ct_CC@ +ac_ct_CXX = @ac_ct_CXX@ +am__include = @am__include@ +am__leading_dot = @am__leading_dot@ +am__quote = @am__quote@ +am__tar = @am__tar@ +am__untar = @am__untar@ +ax_pthread_config = @ax_pthread_config@ +bindir = @bindir@ +build = @build@ +build_alias = @build_alias@ +build_cpu = @build_cpu@ +build_os = @build_os@ +build_vendor = @build_vendor@ +builddir = @builddir@ +datadir = @datadir@ +datarootdir = @datarootdir@ +docdir = @docdir@ +dvidir = @dvidir@ +exec_prefix = @exec_prefix@ +host = @host@ +host_alias = @host_alias@ +host_cpu = @host_cpu@ +host_os = @host_os@ +host_vendor = @host_vendor@ +htmldir = @htmldir@ +includedir = @includedir@ +infodir = @infodir@ +install_sh = @install_sh@ +libdir = @libdir@ +libexecdir = @libexecdir@ +localedir = @localedir@ +localstatedir = @localstatedir@ +mandir = @mandir@ +mkdir_p = @mkdir_p@ +oldincludedir = @oldincludedir@ +pdfdir = @pdfdir@ +prefix = @prefix@ +program_transform_name = @program_transform_name@ +psdir = @psdir@ +sbindir = @sbindir@ +sharedstatedir = @sharedstatedir@ +srcdir = @srcdir@ +sysconfdir = @sysconfdir@ +target_alias = @target_alias@ +top_build_prefix = @top_build_prefix@ +top_builddir = @top_builddir@ +top_srcdir = @top_srcdir@ +toolsdir = $(pkgdatadir)/tools +dist_tools_DATA = ${TOOLS} +scmdatadir = $(datadir)/gEDA/scheme +dist_scmdata_DATA = $(DIST_SCM) +bin_SCRIPTS = \ + MergePCBPS \ + Merge_dimPCBPS + +TOOLS = \ + apctools.zip \ + gerbertotk.c \ + pcb2ncap.tgz \ + tgo2pcb.tcl \ + MergePCBPS \ + Merge_dimPCBPS \ + PCB2HPGL + +DIST_SCM = \ + gnet-pcbfwd.scm + +all: all-am + +.SUFFIXES: +$(srcdir)/Makefile.in: @MAINTAINER_MODE_TRUE@ $(srcdir)/Makefile.am $(am__configure_deps) + @for dep in $?; do \ + case '$(am__configure_deps)' in \ + *$$dep*) \ + ( cd $(top_builddir) && $(MAKE) $(AM_MAKEFLAGS) am--refresh ) \ + && { if test -f $@; then exit 0; else break; fi; }; \ + exit 1;; \ + esac; \ + done; \ + echo ' cd $(top_srcdir) && $(AUTOMAKE) --foreign tools/Makefile'; \ + $(am__cd) $(top_srcdir) && \ + $(AUTOMAKE) --foreign tools/Makefile +.PRECIOUS: Makefile +Makefile: $(srcdir)/Makefile.in $(top_builddir)/config.status + @case '$?' in \ + *config.status*) \ + cd $(top_builddir) && $(MAKE) $(AM_MAKEFLAGS) am--refresh;; \ + *) \ + echo ' cd $(top_builddir) && $(SHELL) ./config.status $(subdir)/$@ $(am__depfiles_maybe)'; \ + cd $(top_builddir) && $(SHELL) ./config.status $(subdir)/$@ $(am__depfiles_maybe);; \ + esac; + +$(top_builddir)/config.status: $(top_srcdir)/configure $(CONFIG_STATUS_DEPENDENCIES) + cd $(top_builddir) && $(MAKE) $(AM_MAKEFLAGS) am--refresh + +$(top_srcdir)/configure: @MAINTAINER_MODE_TRUE@ $(am__configure_deps) + cd $(top_builddir) && $(MAKE) $(AM_MAKEFLAGS) am--refresh +$(ACLOCAL_M4): @MAINTAINER_MODE_TRUE@ $(am__aclocal_m4_deps) + cd $(top_builddir) && $(MAKE) $(AM_MAKEFLAGS) am--refresh +$(am__aclocal_m4_deps): +install-binSCRIPTS: $(bin_SCRIPTS) + @$(NORMAL_INSTALL) + test -z "$(bindir)" || $(MKDIR_P) "$(DESTDIR)$(bindir)" + @list='$(bin_SCRIPTS)'; test -n "$(bindir)" || list=; \ + for p in $$list; do \ + if test -f "$$p"; then d=; else d="$(srcdir)/"; fi; \ + if test -f "$$d$$p"; then echo "$$d$$p"; echo "$$p"; else :; fi; \ + done | \ + sed -e 'p;s,.*/,,;n' \ + -e 'h;s|.*|.|' \ + -e 'p;x;s,.*/,,;$(transform)' | sed 'N;N;N;s,\n, ,g' | \ + $(AWK) 'BEGIN { files["."] = ""; dirs["."] = 1; } \ + { d=$$3; if (dirs[d] != 1) { print "d", d; dirs[d] = 1 } \ + if ($$2 == $$4) { files[d] = files[d] " " $$1; \ + if (++n[d] == $(am__install_max)) { \ + print "f", d, files[d]; n[d] = 0; files[d] = "" } } \ + else { print "f", d "/" $$4, $$1 } } \ + END { for (d in files) print "f", d, files[d] }' | \ + while read type dir files; do \ + if test "$$dir" = .; then dir=; else dir=/$$dir; fi; \ + test -z "$$files" || { \ + echo " $(INSTALL_SCRIPT) $$files '$(DESTDIR)$(bindir)$$dir'"; \ + $(INSTALL_SCRIPT) $$files "$(DESTDIR)$(bindir)$$dir" || exit $$?; \ + } \ + ; done + +uninstall-binSCRIPTS: + @$(NORMAL_UNINSTALL) + @list='$(bin_SCRIPTS)'; test -n "$(bindir)" || exit 0; \ + files=`for p in $$list; do echo "$$p"; done | \ + sed -e 's,.*/,,;$(transform)'`; \ + test -n "$$list" || exit 0; \ + echo " ( cd '$(DESTDIR)$(bindir)' && rm -f" $$files ")"; \ + cd "$(DESTDIR)$(bindir)" && rm -f $$files +install-dist_scmdataDATA: $(dist_scmdata_DATA) + @$(NORMAL_INSTALL) + test -z "$(scmdatadir)" || $(MKDIR_P) "$(DESTDIR)$(scmdatadir)" + @list='$(dist_scmdata_DATA)'; test -n "$(scmdatadir)" || list=; \ + for p in $$list; do \ + if test -f "$$p"; then d=; else d="$(srcdir)/"; fi; \ + echo "$$d$$p"; \ + done | $(am__base_list) | \ + while read files; do \ + echo " $(INSTALL_DATA) $$files '$(DESTDIR)$(scmdatadir)'"; \ + $(INSTALL_DATA) $$files "$(DESTDIR)$(scmdatadir)" || exit $$?; \ + done + +uninstall-dist_scmdataDATA: + @$(NORMAL_UNINSTALL) + @list='$(dist_scmdata_DATA)'; test -n "$(scmdatadir)" || list=; \ + files=`for p in $$list; do echo $$p; done | sed -e 's|^.*/||'`; \ + test -n "$$files" || exit 0; \ + echo " ( cd '$(DESTDIR)$(scmdatadir)' && rm -f" $$files ")"; \ + cd "$(DESTDIR)$(scmdatadir)" && rm -f $$files +install-dist_toolsDATA: $(dist_tools_DATA) + @$(NORMAL_INSTALL) + test -z "$(toolsdir)" || $(MKDIR_P) "$(DESTDIR)$(toolsdir)" + @list='$(dist_tools_DATA)'; test -n "$(toolsdir)" || list=; \ + for p in $$list; do \ + if test -f "$$p"; then d=; else d="$(srcdir)/"; fi; \ + echo "$$d$$p"; \ + done | $(am__base_list) | \ + while read files; do \ + echo " $(INSTALL_DATA) $$files '$(DESTDIR)$(toolsdir)'"; \ + $(INSTALL_DATA) $$files "$(DESTDIR)$(toolsdir)" || exit $$?; \ + done + +uninstall-dist_toolsDATA: + @$(NORMAL_UNINSTALL) + @list='$(dist_tools_DATA)'; test -n "$(toolsdir)" || list=; \ + files=`for p in $$list; do echo $$p; done | sed -e 's|^.*/||'`; \ + test -n "$$files" || exit 0; \ + echo " ( cd '$(DESTDIR)$(toolsdir)' && rm -f" $$files ")"; \ + cd "$(DESTDIR)$(toolsdir)" && rm -f $$files +tags: TAGS +TAGS: + +ctags: CTAGS +CTAGS: + + +distdir: $(DISTFILES) + @srcdirstrip=`echo "$(srcdir)" | sed 's/[].[^$$\\*]/\\\\&/g'`; \ + topsrcdirstrip=`echo "$(top_srcdir)" | sed 's/[].[^$$\\*]/\\\\&/g'`; \ + list='$(DISTFILES)'; \ + dist_files=`for file in $$list; do echo $$file; done | \ + sed -e "s|^$$srcdirstrip/||;t" \ + -e "s|^$$topsrcdirstrip/|$(top_builddir)/|;t"`; \ + case $$dist_files in \ + */*) $(MKDIR_P) `echo "$$dist_files" | \ + sed '/\//!d;s|^|$(distdir)/|;s,/[^/]*$$,,' | \ + sort -u` ;; \ + esac; \ + for file in $$dist_files; do \ + if test -f $$file || test -d $$file; then d=.; else d=$(srcdir); fi; \ + if test -d $$d/$$file; then \ + dir=`echo "/$$file" | sed -e 's,/[^/]*$$,,'`; \ + if test -d "$(distdir)/$$file"; then \ + find "$(distdir)/$$file" -type d ! -perm -700 -exec chmod u+rwx {} \;; \ + fi; \ + if test -d $(srcdir)/$$file && test $$d != $(srcdir); then \ + cp -fpR $(srcdir)/$$file "$(distdir)$$dir" || exit 1; \ + find "$(distdir)/$$file" -type d ! -perm -700 -exec chmod u+rwx {} \;; \ + fi; \ + cp -fpR $$d/$$file "$(distdir)$$dir" || exit 1; \ + else \ + test -f "$(distdir)/$$file" \ + || cp -p $$d/$$file "$(distdir)/$$file" \ + || exit 1; \ + fi; \ + done +check-am: all-am +check: check-am +all-am: Makefile $(SCRIPTS) $(DATA) +installdirs: + for dir in "$(DESTDIR)$(bindir)" "$(DESTDIR)$(scmdatadir)" "$(DESTDIR)$(toolsdir)"; do \ + test -z "$$dir" || $(MKDIR_P) "$$dir"; \ + done +install: install-am +install-exec: install-exec-am +install-data: install-data-am +uninstall: uninstall-am + +install-am: all-am + @$(MAKE) $(AM_MAKEFLAGS) install-exec-am install-data-am + +installcheck: installcheck-am +install-strip: + $(MAKE) $(AM_MAKEFLAGS) INSTALL_PROGRAM="$(INSTALL_STRIP_PROGRAM)" \ + install_sh_PROGRAM="$(INSTALL_STRIP_PROGRAM)" INSTALL_STRIP_FLAG=-s \ + `test -z '$(STRIP)' || \ + echo "INSTALL_PROGRAM_ENV=STRIPPROG='$(STRIP)'"` install +mostlyclean-generic: + +clean-generic: + +distclean-generic: + -test -z "$(CONFIG_CLEAN_FILES)" || rm -f $(CONFIG_CLEAN_FILES) + -test . = "$(srcdir)" || test -z "$(CONFIG_CLEAN_VPATH_FILES)" || rm -f $(CONFIG_CLEAN_VPATH_FILES) + +maintainer-clean-generic: + @echo "This command is intended for maintainers to use" + @echo "it deletes files that may require special tools to rebuild." +clean: clean-am + +clean-am: clean-generic mostlyclean-am + +distclean: distclean-am + -rm -f Makefile +distclean-am: clean-am distclean-generic + +dvi: dvi-am + +dvi-am: + +html: html-am + +html-am: + +info: info-am + +info-am: + +install-data-am: install-dist_scmdataDATA install-dist_toolsDATA + +install-dvi: install-dvi-am + +install-dvi-am: + +install-exec-am: install-binSCRIPTS + +install-html: install-html-am + +install-html-am: + +install-info: install-info-am + +install-info-am: + +install-man: + +install-pdf: install-pdf-am + +install-pdf-am: + +install-ps: install-ps-am + +install-ps-am: + +installcheck-am: + +maintainer-clean: maintainer-clean-am + -rm -f Makefile +maintainer-clean-am: distclean-am maintainer-clean-generic + +mostlyclean: mostlyclean-am + +mostlyclean-am: mostlyclean-generic + +pdf: pdf-am + +pdf-am: + +ps: ps-am + +ps-am: + +uninstall-am: uninstall-binSCRIPTS uninstall-dist_scmdataDATA \ + uninstall-dist_toolsDATA + +.MAKE: install-am install-strip + +.PHONY: all all-am check check-am clean clean-generic distclean \ + distclean-generic distdir dvi dvi-am html html-am info info-am \ + install install-am install-binSCRIPTS install-data \ + install-data-am install-dist_scmdataDATA \ + install-dist_toolsDATA install-dvi install-dvi-am install-exec \ + install-exec-am install-html install-html-am install-info \ + install-info-am install-man install-pdf install-pdf-am \ + install-ps install-ps-am install-strip installcheck \ + installcheck-am installdirs maintainer-clean \ + maintainer-clean-generic mostlyclean mostlyclean-generic pdf \ + pdf-am ps ps-am uninstall uninstall-am uninstall-binSCRIPTS \ + uninstall-dist_scmdataDATA uninstall-dist_toolsDATA + + +# Tell versions [3.59,3.63) of GNU make to not export all variables. +# Otherwise a system limit (for SysV at least) may be exceeded. +.NOEXPORT: Index: MergePCBPS =================================================================== --- MergePCBPS (nonexistent) +++ MergePCBPS (revision 2) @@ -0,0 +1,49 @@ +#!/bin/sh +# +# $Id$ +# +# merges PostScript files created by pcb (version >= 1.4.2) into +# a single file for backward compatibility +# +# Usage: name files... +# +# by Thomas Nau 9/96 +# + +if [ $# -eq 0 ]; then + echo "Usage: `basename $0` files..." >&2 + exit 1 +fi + +# some system need nawk +# +case `uname` in + SunOS) AWK=nawk;; + *) AWK=awk;; +esac + +$AWK ' + BEGIN { filecount = 0; } + /^%!PS/ { filecount++; } + /^%!PS/,/^% PCBENDDATA/ { + if (filecount == 1) + { + if (index($0, "%%Title:") == 1) + sub(",.*$", ", merged layouts"); + print $0; + next; + } + } + /^% PCBSTARTDATA/,/^% PCBENDDATA/ { + if (filecount > 1) + { + print $0; + next; + } + } + { next; } + END { + print "showpage"; + print "%%EOF"; + } +' $@ Property changes on: MergePCBPS ___________________________________________________________________ Added: svn:executable ## -0,0 +1 ## +* \ No newline at end of property Index: Merge_dimPCBPS =================================================================== --- Merge_dimPCBPS (nonexistent) +++ Merge_dimPCBPS (revision 2) @@ -0,0 +1,51 @@ +#!/bin/sh +# +# $Id$ +# +# merges PostScript files created by pcb (version >= 1.4.2) into +# a single file for backward compatibility +# +# Usage: name files... +# +# by Thomas Nau 9/96 +# + +if [ $# -eq 0 ]; then + echo "Usage: `basename $0` files..." >&2 + exit 1 +fi + +# some system need nawk +# +case `uname` in + SunOS) AWK=nawk;; + *) AWK=awk;; +esac + +$AWK ' + BEGIN { filecount = 0; } + /^%!PS/ { filecount++; if (filecount > 1) { print "Black"; } } + /^%!PS/,/^% PCBENDDATA/ { + if (filecount == 1) + { + if (index($0, "%%Title:") == 1) + sub(",.*$", ", merged layouts"); + if (index($0, "Black") == 1) + sub ("Black", "0.9 mysetgray"); + print $0; + next; + } + } + /^% PCBSTARTDATA/,/^% PCBENDDATA/ { + if (filecount > 1) + { + print $0; + next; + } + } + { next; } + END { + print "showpage"; + print "%%EOF"; + } +' $@ Property changes on: Merge_dimPCBPS ___________________________________________________________________ Added: svn:executable ## -0,0 +1 ## +* \ No newline at end of property Index: PCB2HPGL =================================================================== --- PCB2HPGL (nonexistent) +++ PCB2HPGL (revision 2) @@ -0,0 +1,147 @@ +#!/usr/bin/perl +# +# +# Der der Autor ist kein geringerer wie der Smilie +# Also Fragen zu Hpgl oder Plotter, +# möglicherweise kann ich ja helfen +# +# Also ganz einfach die Layer.Dateien mit diesen Program erzeugen +# mit "Program pcb-Datei" +# das ganze in einem Verzeichnis wo ihr auch schreibrechte habt +# und dann ganz einfach den gewünchten Layer auf den Plotter kopieren +# zBsp. so "cat Layer.1.jenachdem.hpgl > /dev/lp0 +# den Stift müßt ihr dem Plotter in die Hand geben +# und den Stiftrevolver entnehmen daß es eine Kollision giebt. + +if( $ARGV[0] ) +{ +} +else{print "use ".$0." [pcb-file] to convert to hpgl\n"; +exit;}; + +sub abschnitt + +{ +close(DATEI); +if(/Layer.(\d)\s.(\w+)../) +{ +$da="Layer.$1.$2.hpgl"; +} +open(DATEI , ">$da"); +} + + + +sub via + +{ + +open(DATE,">>Layer.Via.hpgl"); +if(/Via.(\S+)\s(\S+)\s(\S+)\s(\S+)/) +{ +print(DATE "PA".($1).",".($2).";CI".($4).";"); +} +close(DATE); +} +sub pin + +{ +open(DATE,">>Layer.Pin.hpgl"); +if(/\tPin.(\S+)\s(\S+)\s(\S+)\s(\S+)/) +{ +print(DATE "PA".($1).",".($2).";CI".($4).";"); +} +close(DATE); + +} + + + +sub text + +{ +open(DATE,">>Layer.Text.hpgl"); +if(/\tText.(\S+)\s(\S+)\s(\S+)\s(\S+)\s"(\S+)"/) +{ +if($3==0){$di=";DI0,1;";}; +if($3==1){$di=";DI1,0;";}; +print(DATE "PA".$1.",".$2.$di."SI".($4/450).",".($4/675).";LB".$5."\e;"); +} +close(DATE); + +} + + + +sub linie + +{ +if(/\tLine.(\S+)\s(\S+)\s(\S+)\s(\S+)/) +{ +print (DATEI "PU".($1).",".($2).";PD".($3).",".($4).";PU;"); +} +} + + + +sub arc + +{ +if(/\tArc.(\S+)\s(\S+)\s(\S+)\s(\S+)\s(\S+)\s(\S+)\s(\S+)/) +{ +if($6==90){$sin=1;$cos=0;} +if($6==-90){$sin=-1;$cos=0;} +if($6==0){$sin=0;$cos=1;} +if($6==180){$sin=0;$cos=-1;} +if($6==-180){$sin=0;$cos=-1;} +if($6==270){$sin=-1;$cos=0;} +if($6==-270){$sin=1;$cos=0;} +print (DATEI "PA".($1-($3*$cos)).",".($2+($3*$sin)).";PD;AA".($1).",".($2).",".($7*(-1)).";PU;"); +} +} + + + +sub polygon + +{ +if(/\t\t.(\S+)\s(\S+).\s.(\S+)\s(\S+).\s.(\S+)\s(\S+).\s.(\S+)\s(\S)./) +{ +print (DATEI "PA".$1.",".$2.";RA".$5.",".$6.";"); +} +} + +# ist noch nicht eingebunden. +#sub polygon + +#{ +#s/\t\t./PU/; +#s/\s/,/; +#while(/\)\s\(/) +#{s/\)\s\(/\;PD/;} +#while(/\S\s\S/) +#{s/\s/,/;} +#s/\)/\;PU\;/; +#print (DATEI $_); +#} + + +open(DATE,">Layer.Via.hpgl"); +close(DATE); +open(DATE,">Layer.Text.hpgl"); +print(DATE "DT\e;"); +close(DATE); +open(DATE,">Layer.Pin.hpgl"); +close(DATE); +while(<>) +{ +if(/\tPin/){&pin} +if(/Layer/){&abschnitt;} +if(/Via/){&via;} +if(/\tArc/){&arc;} +if(/\tLine/){ &linie;} +if(/\t\t/){&polygon;} +if(/\tText\(/){&text;} +} +close(DATEI); + Index: apctools.zip =================================================================== Cannot display: file marked as a binary type. svn:mime-type = application/octet-stream Index: apctools.zip =================================================================== --- apctools.zip (nonexistent) +++ apctools.zip (revision 2) Property changes on: apctools.zip ___________________________________________________________________ Added: svn:mime-type ## -0,0 +1 ## +application/octet-stream \ No newline at end of property Index: gerbertotk.c =================================================================== --- gerbertotk.c (nonexistent) +++ gerbertotk.c (revision 2) @@ -0,0 +1,259 @@ +/* + * COPYRIGHT + * + * gerbertotk, simple Gerber file to tcl/tk program converter + * Copyright (C) 1996 Albert John FitzPatrick III + * + * This program is free software; you can redistribute it and/or modify + * it under the terms of the GNU General Public License as published by + * the Free Software Foundation; either version 2 of the License, or + * (at your option) any later version. + * + * This program is distributed in the hope that it will be useful, + * but WITHOUT ANY WARRANTY; without even the implied warranty of + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + * GNU General Public License for more details. + * + * You should have received a copy of the GNU General Public License + * along with this program; if not, write to the Free Software + * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. + * + * Contact addresses for paper mail and Email: + * Albert John FitzPatrick III/ 8803 Humming Bird Lane/ Quinton, VA 23141/ + * USA. + * ajf_nylorac@acm.org + * + */ + +/* WARNING: This is an alpha version. Use it with many grains of salt. */ + +static char Copyright[] = "Copyright (C) 1996 Albert John FitzPatrick III"; + +/* + * Example Usage: + * cat *.gbr | gerbertotk | wish + */ + +#include +#include + +typedef long GerberValue; + +typedef struct { + int gc_inComment; + GerberValue gc_d; + GerberValue gc_x1; + GerberValue gc_y1; + GerberValue gc_x2; + GerberValue gc_y2; + GerberValue gc_i; + GerberValue gc_j; + } GerberContext; + +GerberContext gc; + +#define gbMaxX 10000L +#define gbMaxY 10000L +#define tkScale 4L +#define tkX(x) (800L * (x) * tkScale / gbMaxX) +#define tkY(y) ((600L * (gbMaxY - (y)) * tkScale / gbMaxY)) + + +do_cmd(GerberContext *gc, int cmd, char *buffer) +{ + GerberValue value = atol(buffer); + + switch (cmd) { + case 'G': + switch (value) { + case 4L: + gc->gc_inComment = 1; + break; + } + break; + case 'X': + gc->gc_x2 = value; + break; + case 'Y': + gc->gc_y2 = value; + break; + case 'I': + gc->gc_i = value; + break; + case 'J': + gc->gc_j = value; + break; + case 'D': + switch (value) { + case 1L: + /* Move with light on. */ + printf(".f.c create line %ld %ld %ld %ld\n", + (long) tkX(gc->gc_x1), + (long) tkY(gc->gc_y1), + (long) tkX(gc->gc_x2), + (long) tkY(gc->gc_y2) + ); + gc->gc_x1 = gc->gc_x2; + gc->gc_y1 = gc->gc_y2; + break; + case 2L: + /* Move with light off. */ + gc->gc_x1 = gc->gc_x2; + gc->gc_y1 = gc->gc_y2; + break; + case 3L: + /* Move with light off. Flash light on. Turn light off. */ + printf(".f.c create line %ld %ld %ld %ld\n", + (long) tkX(gc->gc_x2), + (long) tkY(gc->gc_y2), + (long) tkX(gc->gc_x2), + (long) tkY(gc->gc_y2) + ); + break; + default: + gc->gc_d = value; + break; + } + break; + case 'M': + break; + case '*': + gc->gc_inComment = 0; + break; + case '\0': + /* FIXME: what if missing on first time? + fprintf(stderr, "Missing Gerber command character.\n"); + */ + break; + } +} + + +main(int argc, char *argv[]) +{ + int ch; + int cmd; + char buffer[1024]; + char *bp; + + if (argc != 1) { + fprintf(stderr, "%s: %s\n", + argv[0], + Copyright + ); + fprintf(stderr, "%s: Usage: %s\n", + argv[0], + argv[0] + ); + exit(1); + } + + bp = buffer; + cmd = '\0'; + gc.gc_inComment = 0; + gc.gc_d = 0L; + gc.gc_x1 = 0L; + gc.gc_y1 = 0L; + gc.gc_x2 = 0L; + gc.gc_y2 = 0L; + gc.gc_i = 0L; + gc.gc_j = 0L; + + printf("button .exit \\\n"); + printf("\t-command exit \\\n"); + printf("\t-text Exit\n"); + printf("frame .f\n"); + printf("canvas .f.c \\\n"); + printf("\t-width 800 \\\n"); + printf("\t-height 600 \\\n"); + printf("\t-scrollregion { 0 0 10000 10000 } \\\n"); + printf("\t-xscroll { .f.h set } \\\n"); + printf("\t-yscroll { .f.v set }\n"); + printf("scrollbar .f.v \\\n"); + printf("\t-orient vertical \\\n"); + printf("\t-command { .f.c yview }\n"); + printf("scrollbar .f.h \\\n"); + printf("\t-orient horizontal \\\n"); + printf("\t-command { .f.c xview }\n"); + + printf("\n"); + printf("pack .exit .f \\\n"); + printf("\t-side top \\\n"); + printf("\t-expand yes \\\n"); + printf("\t-fill both\n"); + printf("pack .f.v \\\n"); + printf("\t-side right \\\n"); + printf("\t-fill y\n"); + printf("pack .f.h \\\n"); + printf("\t-side bottom \\\n"); + printf("\t-fill x\n"); + printf("pack .f.c \\\n"); + printf("\t-side left\n"); + + printf("\n"); + + while ((ch = getchar()) != EOF) { + if (gc.gc_inComment && ch != '*') + continue; + + switch (ch) { + case 'D': + case 'G': + case 'X': + case 'Y': + case 'I': + case 'J': + case 'M': + do_cmd(&gc, cmd, buffer); + cmd = ch; + bp = buffer; + break; + case '*': + /* FIXME: Handle other EOB characters. */ + if (gc.gc_inComment) + do_cmd(&gc, ch, buffer); + else + do_cmd(&gc, cmd, buffer); + cmd = '\0'; + bp = buffer; + break; + case '\r': + /* FIXME: only after EOB. */ + cmd = '\0'; + bp = buffer; + break; + case '\012': + /* FIXME: only after EOB. */ + cmd = '\0'; + bp = buffer; + break; + case '+': + case '-': + case '0': + case '1': + case '2': + case '3': + case '4': + case '5': + case '6': + case '7': + case '8': + case '9': + *bp++ = (char) ch; + *bp = '\0'; + break; + default: + do_cmd(&gc, cmd, buffer); + cmd = '\0'; + bp = buffer; + if (! gc.gc_inComment) + fprintf(stderr, "Unknown Gerber command '%c' (%d).\n", + (char) ch, + ch + ); + break; + } + } + + exit(0); +} Property changes on: gerbertotk.c ___________________________________________________________________ Added: svn:executable ## -0,0 +1 ## +* \ No newline at end of property Index: gnet-pcbfwd.scm =================================================================== --- gnet-pcbfwd.scm (nonexistent) +++ gnet-pcbfwd.scm (revision 2) @@ -0,0 +1,125 @@ +;;; gEDA - GPL Electronic Design Automation +;;; gnetlist - gEDA Netlist +;;; Copyright (C) 1998-2008 Ales Hvezda +;;; Copyright (C) 1998-2008 gEDA Contributors (see ChangeLog for details) +;;; +;;; This program is free software; you can redistribute it and/or modify +;;; it under the terms of the GNU General Public License as published by +;;; the Free Software Foundation; either version 2 of the License, or +;;; (at your option) any later version. +;;; +;;; This program is distributed in the hope that it will be useful, +;;; but WITHOUT ANY WARRANTY; without even the implied warranty of +;;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the +;;; GNU General Public License for more details. +;;; +;;; You should have received a copy of the GNU General Public License +;;; along with this program; if not, write to the Free Software +;;; Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. + +;; PCB forward annotation script + +(use-modules (ice-9 regex)) +(use-modules (ice-9 format)) + +;; This is a list of attributes which are propogated to the pcb +;; elements. Note that refdes, value, and footprint need not be +;; listed here. +(define pcbfwd:element-attrs + '("device" + "manufacturer" + "manufacturer_part_number" + "vendor" + "vendor_part_number" + )) + +(define (pcbfwd:quote-string s) + (string-append "\"" + (regexp-substitute/global #f "\"" s 'pre "\\\"" 'post) + "\"") + ) + +(define (pcbfwd:pinfmt pin) + (format #f "~a-~a" (car pin) (car (cdr pin))) + ) + +(define (pcbfwd:each-pin net pins port) + (if (not (null? pins)) + (let ((pin (car pins))) + (format port "Netlist(Add,~a,~a)~%" net (pcbfwd:pinfmt pin)) + (pcbfwd:each-pin net (cdr pins) port)))) + +(define (pcbfwd:each-net netnames port) + (if (not (null? netnames)) + (let ((netname (car netnames))) + (pcbfwd:each-pin netname (gnetlist:get-all-connections netname) port) + (pcbfwd:each-net (cdr netnames) port)))) + +(define (pcbfwd:each-attr refdes attrs port) + (if (not (null? attrs)) + (let ((attr (car attrs))) + (format port "ElementSetAttr(~a,~a,~a)~%" + (pcbfwd:quote-string refdes) + (pcbfwd:quote-string attr) + (pcbfwd:quote-string (gnetlist:get-package-attribute refdes attr))) + (pcbfwd:each-attr refdes (cdr attrs) port)))) + +;; write out the pins for a particular component +(define pcbfwd:component_pins + (lambda (port package pins) + (if (and (not (null? package)) (not (null? pins))) + (begin + (let ( + (pin (car pins)) + (label #f) + (pinnum #f) + ) + (display "ChangePinName(" port) + (display (pcbfwd:quote-string package) port) + (display ", " port) + + (set! pinnum (gnetlist:get-attribute-by-pinnumber package pin "pinnumber")) + + (display pinnum port) + (display ", " port) + + (set! label (gnetlist:get-attribute-by-pinnumber package pin "pinlabel")) + (if (string=? label "unknown") + (set! label pinnum) + ) + (display (pcbfwd:quote-string label) port) + (display ")\n" port) + ) + (pcbfwd:component_pins port package (cdr pins)) + ) + ) + ) + ) + +(define (pcbfwd:each-element elements port) + (if (not (null? elements)) + (let* ((refdes (car elements)) + (value (gnetlist:get-package-attribute refdes "value")) + (footprint (gnetlist:get-package-attribute refdes "footprint")) + ) + + (format port "ElementList(Need,~a,~a,~a)~%" + (pcbfwd:quote-string refdes) + (pcbfwd:quote-string footprint) + (pcbfwd:quote-string value)) + (pcbfwd:each-attr refdes pcbfwd:element-attrs port) + (pcbfwd:component_pins port refdes (gnetlist:get-pins refdes)) + + (pcbfwd:each-element (cdr elements) port)))) + +(define (pcbfwd output-filename) + (let ((port (open-output-file output-filename))) + (format port "Netlist(Freeze)\n") + (format port "Netlist(Clear)\n") + (pcbfwd:each-net (gnetlist:get-all-unique-nets "dummy") port) + (format port "Netlist(Sort)\n") + (format port "Netlist(Thaw)\n") + (format port "ElementList(Start)\n") + (pcbfwd:each-element packages port) + (format port "ElementList(Done)\n") + (close-output-port port))) Index: pcb2ncap.tgz =================================================================== Cannot display: file marked as a binary type. svn:mime-type = application/octet-stream Index: pcb2ncap.tgz =================================================================== --- pcb2ncap.tgz (nonexistent) +++ pcb2ncap.tgz (revision 2) Property changes on: pcb2ncap.tgz ___________________________________________________________________ Added: svn:mime-type ## -0,0 +1 ## +application/octet-stream \ No newline at end of property Index: tgo2pcb.tcl =================================================================== --- tgo2pcb.tcl (nonexistent) +++ tgo2pcb.tcl (revision 2) @@ -0,0 +1,96 @@ +#! /usr/bin/tclsh +# +# tango to PCB netlist converter +# usage: tgo2pcb input > output +# +# Copyright 1998, Ingo Cyliax, Derivation Systems, Inc. +# Email: cyliax@derivation.com +# + +set nets() "" + +# +# read a tango netlist and extract the essentials we need, this +# has been tested with OrCad's tango netlister +# +proc rdtgo { file } { + set fd [open $file r] + set line "" + set args "" + set ln 0 + set lch "" + set net "" + set pin "" + set ref "" + global nets cnvt + while { 1 } { + set n [gets $fd line] + if { $n == -1 } { break } + incr ln 1 + + set ch [string index $line 0] + + if { $ch == "\["} { + set lch $ch + set ln 0 + } + if { $ch == "]"} { + set lch $ch + set ln 0 + } + if { $ch == "("} { + set lch $ch + set ln 0 + } + if { $ch == ")"} { + set lch $ch + set ln 0 + } + if { $ch != "(" && $lch == "(" && $ln == "1"} { + set net $line + } + if { $ch != "(" && $lch == "(" && $ln != "1"} { + set xx [split $line ,] + set pin [lindex $xx 1] + set ref [lindex $xx 0] + if { $cnvt($pin) != "" } { + set pin $cnvt($pin) + } + lappend nets($net) "$ref-$pin" + } + } + close $fd +} + +# +# write out a PCB netlist +# +proc wrpcb { } { + global nets + foreach i [array names nets] { + if { $nets($i) != "" } { + puts "$i $nets($i)" + } + } +} + +# +# pins 1-99 convert to 1-99, all input pins are converted in this array +# +set pin 1 +for { set i 1 } { $i <= 99 } { incr i } { + set cnvt($i) $pin + incr pin +} + +# +# read the input file and convert to internal netlist +# +rdtgo [lindex $argv 0] + +# +# convert and write to output +# +wrpcb + +exit Property changes on: tgo2pcb.tcl ___________________________________________________________________ Added: svn:executable ## -0,0 +1 ## +* \ No newline at end of property