Index: lib/ListLibraryContents.sh =================================================================== --- lib/ListLibraryContents.sh (revision 291) +++ lib/ListLibraryContents.sh (nonexistent) @@ -1,50 +0,0 @@ -#!/bin/sh -# -# COPYRIGHT -# -# PCB, interactive printed circuit board design -# Copyright (C) 1994,1995,1996 Thomas Nau -# -# 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: -# Thomas Nau, Schlehenweg 15, 88471 Baustetten, Germany -# Thomas.Nau@rz.uni-ulm.de -# -# RCS: $Id$ -# -# list the contents of a library -# -# usage: ListLibraryContents.sh [path] file - -Usage() -{ - echo "usage: $0 [path] file" >&2 - exit 1 -} - -SearchPath=. -case $# in - 1) File="$1";; - 2) SearchPath=`echo "$1" | tr ':' ' '`; File="$2";; - *) Usage;; -esac - -for dir in $SearchPath; do - name=$dir/$File.contents - if [ -r $name ]; then - cat $name - fi -done Property changes on: lib/ListLibraryContents.sh ___________________________________________________________________ Deleted: svn:executable ## -1 +0,0 ## -* \ No newline at end of property Index: lib/QueryLibrary.sh.in =================================================================== --- lib/QueryLibrary.sh.in (revision 291) +++ lib/QueryLibrary.sh.in (nonexistent) @@ -1,69 +0,0 @@ -#!/bin/sh -# -# COPYRIGHT -# -# PCB, interactive printed circuit board design -# Copyright (C) 1994,1995,1996 Thomas Nau -# -# 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: -# Thomas Nau, Schlehenweg 15, 88471 Baustetten, Germany -# Thomas.Nau@rz.uni-ulm.de -# -# RCS: $Id$ -# -# query a library -# -# usage: QueryLibrary.sh template value package - -M4=@GNUM4@ - -Usage() -{ - echo "usage: $0 [-fp] [path] library template value package" >&2 - echo " If given, the -fp flag returns the correct value for" >&2 - echo " the gschem footprint= attribute" >&2 - exit 1 -} - -Fn=CreateObject -if test $1 = "-fp" ; then - Fn=QueryObject - shift -fi - -SearchPath=. -case $# in - 4) ;; - 5) SearchPath=`echo "$1" | tr ':' ' '`; shift;; - *) Usage;; -esac -Library="$1" -Template="$2" -Value="$3" -Package="$4" - -PATH=$PATH:`dirname $0` - -for dir in $SearchPath; do - name=$dir/$Library - if [ -r $name ]; then - echo "${Fn}(\`$Template', \`$Value', \`$Package')" | - PATH=${SearchPath}:$PATH $M4 -R $name - | - awk '/^[ \t]*$/ {next} {print}' - exit - fi -done Property changes on: lib/QueryLibrary.sh.in ___________________________________________________________________ Deleted: svn:executable ## -1 +0,0 ## -* \ No newline at end of property