commit 63105351db64e4a5a3be87828f6792476f04b4a8
parent fbde244561f8d14c118374547aca7e6485a694c1
Author: Jaromil <jaromil@dyne.org>
Date: Thu, 7 Jun 2012 07:13:37 +0200
removed lbdb, not used anymore
Diffstat:
58 files changed, 43 insertions(+), 3737 deletions(-)
diff --git a/build/build-gnu.sh b/build/build-gnu.sh
@@ -19,10 +19,8 @@ case $distro in
which fetchmail || sudo apt-get install fetchmail
which wipe || sudo apt-get install wipe
echo "All dependencies installed"
- echo -n "Compiling a few sources... "
- cd src/lbdb
- echo -n "dotlock "
- [ -x dotlock ] || gcc -Os -static -o dotlock dotlock.c
+ echo -n "Compiling the address parser... "
+ cd src
echo -n "fetchaddr "
[ -x fetchaddr ] || \
gcc -Os -c -static fetchaddr.c helpers.c rfc2047.c rfc822.c; \
diff --git a/build/build-osx.sh b/build/build-osx.sh
@@ -62,7 +62,9 @@ copydeps() {
# create a wrapper
cat <<EOF > build/osx/`basename $1`
#!/usr/bin/env sh
-PDIR=\$HOME/Mail/jaro
+test -r \$HOME/Mail/jaro/bin/jaro && PDIR=\$HOME/Mail/jaro
+test -r jaro/bin/jaro && PDIR="`pwd`/jaro"
+test \$JAROMAIL && PDIR=\$JAROMAIL
DYLD_LIBRARY_PATH=\$PDIR/bin/dylib:\$DYLD_LIBRARY_PATH
\$PDIR/bin/`basename $1`.bin \$@
EOF
@@ -76,28 +78,29 @@ if ! [ -r /opt/local/bin/port ]; then
error "MacPorts not found in /opt/local. Operation aborted."
return 1
fi
-act "lbdb address book module"
-cd src/lbdb-ABQuery
+act "Address book query"
+cd src/ABQuery
xcodebuild > /dev/null
cd -
-cp src/lbdb-ABQuery/build/Release/lbdb-ABQuery build/osx/ABQuery
-cd src/lbdb
-gcc -O2 -c -m32 fetchaddr.c helpers.c rfc2047.c rfc822.c; \
-gcc -O2 -m32 -o fetchaddr.32 fetchaddr.o helpers.o rfc2047.o rfc822.o;
-gcc -O2 -c -m64 fetchaddr.c helpers.c rfc2047.c rfc822.c; \
-gcc -O2 -m64 -o fetchaddr.64 fetchaddr.o helpers.o rfc2047.o rfc822.o;
+cp src/ABQuery/build/Release/lbdb-ABQuery build/osx/ABQuery
+cd src
+act "Address parser"
+cc -Os -c -m32 fetchaddr.c helpers.c rfc2047.c rfc822.c; \
+cc -Os -m32 -o fetchaddr.32 fetchaddr.o helpers.o rfc2047.o rfc822.o;
+cc -Os -c -m64 fetchaddr.c helpers.c rfc2047.c rfc822.c; \
+cc -Os -m64 -o fetchaddr.64 fetchaddr.o helpers.o rfc2047.o rfc822.o;
lipo -arch i386 fetchaddr.32 -arch x86_64 fetchaddr.64 -output fetchaddr -create
-gcc -O2 -m32 -o dotlock.32 dotlock.c
-gcc -O2 -m64 -o dotlock.64 dotlock.c
-lipo -arch i386 dotlock.32 -arch x86_64 dotlock.64 -output dotlock -create
rm -f *.32 *.64
cd -
-cp src/lbdb/dotlock build/osx/
-cp src/lbdb/fetchaddr build/osx/
+cp src/fetchaddr build/osx/
copydeps bin/mutt
+copydeps bin/mutt_dotlock
copydeps bin/msmtp
copydeps bin/gpg
copydeps bin/pinentry
copydeps bin/lynx
+mv build/osx/mutt_dotlock \
+ build/osx/dotlock
+
diff --git a/install.sh b/install.sh
@@ -45,8 +45,6 @@ ${=mkdir} $WORKDIR
notice "Installing Jaromail in $WORKDIR"
act "This script will create the ~/Mail folder if it doesn't exist,"
act "then populate it with default Maildirs and the Jaro Mail binaries."
-act "At last, a shell execution PATH to ~/Mail/jaro/bin will be added"
-act "to your ~/.profile so that you can call 'jaro' from a Terminal."
# install the main jaromail script
${=mkdir} ${WORKDIR}/bin
@@ -211,83 +209,39 @@ cp -a src/procmail/* $PROCMAILDIR
${=mkdir} $MUTTDIR
cp -a src/mutt/* $MUTTDIR
-act "Installing little brother database"
-# safe to override
-${=mkdir} $WORKDIR/.lbdb
-for aw in munge.awk.in munge-keeporder.awk.in tac.awk.in; do
- dst=`echo $aw | sed -e 's/.awk.in$//'`
- cat src/lbdb/$aw \
- | sed -e "s&@AWK@&`which awk`&g" \
- > $WORKDIR/.lbdb/$dst
-done
-for sh in lbdb-fetchaddr.sh.in lbdb-munge.sh.in lbdb_lib.sh.in lbdbq.sh.in; do
- dst=`echo $sh | sed -e 's/.sh.in$//'`
- cat src/lbdb/$sh \
- | sed -e "s&@SH@&/usr/bin/env zsh&g" \
- | sed -e "s&@DOTLOCK@&${WORKDIR}/.lbdb/dotlock&g" \
- | sed -e "s&@LBDB_FILE@&${WORKDIR}/.lbdb/m_inmail.list&g" \
- | sed -e "s&@LBDB_VERSION@&0.38-jaromail&g" \
- | sed -e "s&@prefix@&${WORKDIR}/.lbdb&g" \
- | sed -e "s&@exec_prefix@&${WORKDIR}/.lbdb&g" \
- | sed -e "s&@libdir@&${WORKDIR}/.lbdb&g" \
- | sed -e "s&@sysconfdir@&${WORKDIR}/.lbdb&g" \
- | sed -e "s&@MODULES@&${WORKDIR}/.lbdb&g" \
- | sed -e "s&@TAC@&${WORKDIR}/.lbdb/tac&g" \
- | sed -e "s&@TMPDIR@&${WORKDIR}/tmp&g" \
- > $WORKDIR/.lbdb/${dst}
-done
-lbdb_modules=(m_finger m_gpg m_inmail m_muttalias m_osx_addressbook m_vcf)
-for mod in ${lbdb_modules}; do
- cat src/lbdb/${mod}.sh.in \
- | sed -e "s&@SH@&/usr/bin/env zsh&g" \
- | sed -e "s&@LBDB_VERSION@&0.38-jaromail&g" \
- | sed -e "s&@prefix@&${WORKDIR}/.lbdb&g" \
- | sed -e "s&@exec_prefix@&${WORKDIR}/.lbdb&g" \
- | sed -e "s&@libdir@&${WORKDIR}/.lbdb&g" \
- > $WORKDIR/.lbdb/${mod}
-done
-cp src/lbdb/dotlock $WORKDIR/bin/
-cp src/lbdb/fetchaddr $WORKDIR/bin/
-
-# OS specific lbdb rules
-case $OS in
- GNU)
- echo "METHODS=(m_inmail)" > ${WORKDIR}/.lbdb/lbdb.rc
- ;;
- MAC)
- # use ABQuery on mac
- echo "METHODS=(m_inmail m_osx_addressbook)" > ${WORKDIR}/.lbdb/lbdb.rc
- ;;
-esac
-####
+cp src/fetchaddr $WORKDIR/bin/
# generate initial configuration
-MAILDIRS=$MAILDIRS WORKDIR=$WORKDIR src/jaro update
-
+MAILDIRS=$MAILDIRS WORKDIR=$WORKDIR src/jaro update -q
case $OS in
- GNU|MAC)
- if [ -r build/osx ]; then
- cp -a build/osx/* $WORKDIR/bin
- fi
- touch $HOME/.profile
- cat $HOME/.profile | grep '^# Jaro Mail' > /dev/null
- if [ $? != 0 ]; then
- cat <<EOF >> $HOME/.profile
+ MAC) cp -a build/osx/* $WORKDIR/bin ;;
+ GNU)
+cat <<EOF > $WORKDIR/bin/dotlock
+#!/usr/bin/env sh
+PATH=$HOME/bin:/usr/local/bin:/bin:/usr/bin
+mutt_dotlock ${@}
+EOF
+;;
+esac
+
+touch $HOME/.profile
+cat $HOME/.profile | grep '^# Jaro Mail' > /dev/null
+if [ $? != 0 ]; then
+ cat <<EOF >> $HOME/.profile
# Jaro Mail Installer addition on `date`
export PATH=$WORKDIR/bin:\$PATH
# Finished adapting your PATH for Jaro Mail environment
EOF
- fi
- ;;
- *) ;;
-esac
-
-notice "Installation completed" #, now edit your personal settings:"
-act "Configure your personal settings, accounts and filters in:"
+fi
+
+notice "Done! now configure your personal settings, accounts and filters in:"
act " $WORKDIR"
-act "Check the commandline help for a list of commands: jaro -h"
+act "To read the commandline help, with a list of commands: jaro -h"
+act "Make sure jaro is in your PATH! it was just added to your ~/.profile"
+act " $WORKDIR/bin"
+
# OS specific post install rules
case $OS in
@@ -296,9 +250,7 @@ case $OS in
cp src/gnome-keyring/jaro-gnome-keyring $WORKDIR/bin/
}
;;
- MAC)
- ;;
-# open /Applications/TextEdit.app $WORKDIR/Configuration.txt
+ MAC) open $WORKDIR ;;
*)
;;
esac
diff --git a/src/lbdb-ABQuery/ABQuery.m b/src/ABQuery/ABQuery.m
diff --git a/src/lbdb-ABQuery/ABQuery_Prefix.h b/src/ABQuery/ABQuery_Prefix.h
diff --git a/src/lbdb-ABQuery/lbdb-ABQuery.xcodeproj/project.pbxproj b/src/ABQuery/lbdb-ABQuery.xcodeproj/project.pbxproj
diff --git a/src/lbdb-ABQuery/lbdb-ABQuery.xcodeproj/project.xcworkspace/contents.xcworkspacedata b/src/ABQuery/lbdb-ABQuery.xcodeproj/project.xcworkspace/contents.xcworkspacedata
diff --git a/src/lbdb-ABQuery/lbdb-ABQuery.xcodeproj/project.xcworkspace/xcuserdata/jaromil.xcuserdatad/UserInterfaceState.xcuserstate b/src/ABQuery/lbdb-ABQuery.xcodeproj/project.xcworkspace/xcuserdata/jaromil.xcuserdatad/UserInterfaceState.xcuserstate
Binary files differ.
diff --git a/src/lbdb-ABQuery/lbdb-ABQuery.xcodeproj/xcuserdata/jaromil.xcuserdatad/xcschemes/lbdb-ABQuery.xcscheme b/src/ABQuery/lbdb-ABQuery.xcodeproj/xcuserdata/jaromil.xcuserdatad/xcschemes/lbdb-ABQuery.xcscheme
diff --git a/src/lbdb-ABQuery/lbdb-ABQuery.xcodeproj/xcuserdata/jaromil.xcuserdatad/xcschemes/xcschememanagement.plist b/src/ABQuery/lbdb-ABQuery.xcodeproj/xcuserdata/jaromil.xcuserdatad/xcschemes/xcschememanagement.plist
diff --git a/src/lbdb/dotlock.c b/src/dotlock.c
diff --git a/src/lbdb/dotlock.h b/src/dotlock.h
diff --git a/src/lbdb/fetchaddr.c b/src/fetchaddr.c
diff --git a/src/lbdb/helpers.c b/src/helpers.c
diff --git a/src/lbdb/helpers.h b/src/helpers.h
diff --git a/src/lbdb/COPYING b/src/lbdb/COPYING
@@ -1,340 +0,0 @@
- GNU GENERAL PUBLIC LICENSE
- Version 2, June 1991
-
- Copyright (C) 1989, 1991 Free Software Foundation, Inc.
- 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA
- Everyone is permitted to copy and distribute verbatim copies
- of this license document, but changing it is not allowed.
-
- Preamble
-
- The licenses for most software are designed to take away your
-freedom to share and change it. By contrast, the GNU General Public
-License is intended to guarantee your freedom to share and change free
-software--to make sure the software is free for all its users. This
-General Public License applies to most of the Free Software
-Foundation's software and to any other program whose authors commit to
-using it. (Some other Free Software Foundation software is covered by
-the GNU Library General Public License instead.) You can apply it to
-your programs, too.
-
- When we speak of free software, we are referring to freedom, not
-price. Our General Public Licenses are designed to make sure that you
-have the freedom to distribute copies of free software (and charge for
-this service if you wish), that you receive source code or can get it
-if you want it, that you can change the software or use pieces of it
-in new free programs; and that you know you can do these things.
-
- To protect your rights, we need to make restrictions that forbid
-anyone to deny you these rights or to ask you to surrender the rights.
-These restrictions translate to certain responsibilities for you if you
-distribute copies of the software, or if you modify it.
-
- For example, if you distribute copies of such a program, whether
-gratis or for a fee, you must give the recipients all the rights that
-you have. You must make sure that they, too, receive or can get the
-source code. And you must show them these terms so they know their
-rights.
-
- We protect your rights with two steps: (1) copyright the software, and
-(2) offer you this license which gives you legal permission to copy,
-distribute and/or modify the software.
-
- Also, for each author's protection and ours, we want to make certain
-that everyone understands that there is no warranty for this free
-software. If the software is modified by someone else and passed on, we
-want its recipients to know that what they have is not the original, so
-that any problems introduced by others will not reflect on the original
-authors' reputations.
-
- Finally, any free program is threatened constantly by software
-patents. We wish to avoid the danger that redistributors of a free
-program will individually obtain patent licenses, in effect making the
-program proprietary. To prevent this, we have made it clear that any
-patent must be licensed for everyone's free use or not licensed at all.
-
- The precise terms and conditions for copying, distribution and
-modification follow.
-
- GNU GENERAL PUBLIC LICENSE
- TERMS AND CONDITIONS FOR COPYING, DISTRIBUTION AND MODIFICATION
-
- 0. This License applies to any program or other work which contains
-a notice placed by the copyright holder saying it may be distributed
-under the terms of this General Public License. The "Program", below,
-refers to any such program or work, and a "work based on the Program"
-means either the Program or any derivative work under copyright law:
-that is to say, a work containing the Program or a portion of it,
-either verbatim or with modifications and/or translated into another
-language. (Hereinafter, translation is included without limitation in
-the term "modification".) Each licensee is addressed as "you".
-
-Activities other than copying, distribution and modification are not
-covered by this License; they are outside its scope. The act of
-running the Program is not restricted, and the output from the Program
-is covered only if its contents constitute a work based on the
-Program (independent of having been made by running the Program).
-Whether that is true depends on what the Program does.
-
- 1. You may copy and distribute verbatim copies of the Program's
-source code as you receive it, in any medium, provided that you
-conspicuously and appropriately publish on each copy an appropriate
-copyright notice and disclaimer of warranty; keep intact all the
-notices that refer to this License and to the absence of any warranty;
-and give any other recipients of the Program a copy of this License
-along with the Program.
-
-You may charge a fee for the physical act of transferring a copy, and
-you may at your option offer warranty protection in exchange for a fee.
-
- 2. You may modify your copy or copies of the Program or any portion
-of it, thus forming a work based on the Program, and copy and
-distribute such modifications or work under the terms of Section 1
-above, provided that you also meet all of these conditions:
-
- a) You must cause the modified files to carry prominent notices
- stating that you changed the files and the date of any change.
-
- b) You must cause any work that you distribute or publish, that in
- whole or in part contains or is derived from the Program or any
- part thereof, to be licensed as a whole at no charge to all third
- parties under the terms of this License.
-
- c) If the modified program normally reads commands interactively
- when run, you must cause it, when started running for such
- interactive use in the most ordinary way, to print or display an
- announcement including an appropriate copyright notice and a
- notice that there is no warranty (or else, saying that you provide
- a warranty) and that users may redistribute the program under
- these conditions, and telling the user how to view a copy of this
- License. (Exception: if the Program itself is interactive but
- does not normally print such an announcement, your work based on
- the Program is not required to print an announcement.)
-
-These requirements apply to the modified work as a whole. If
-identifiable sections of that work are not derived from the Program,
-and can be reasonably considered independent and separate works in
-themselves, then this License, and its terms, do not apply to those
-sections when you distribute them as separate works. But when you
-distribute the same sections as part of a whole which is a work based
-on the Program, the distribution of the whole must be on the terms of
-this License, whose permissions for other licensees extend to the
-entire whole, and thus to each and every part regardless of who wrote it.
-
-Thus, it is not the intent of this section to claim rights or contest
-your rights to work written entirely by you; rather, the intent is to
-exercise the right to control the distribution of derivative or
-collective works based on the Program.
-
-In addition, mere aggregation of another work not based on the Program
-with the Program (or with a work based on the Program) on a volume of
-a storage or distribution medium does not bring the other work under
-the scope of this License.
-
- 3. You may copy and distribute the Program (or a work based on it,
-under Section 2) in object code or executable form under the terms of
-Sections 1 and 2 above provided that you also do one of the following:
-
- a) Accompany it with the complete corresponding machine-readable
- source code, which must be distributed under the terms of Sections
- 1 and 2 above on a medium customarily used for software interchange; or,
-
- b) Accompany it with a written offer, valid for at least three
- years, to give any third party, for a charge no more than your
- cost of physically performing source distribution, a complete
- machine-readable copy of the corresponding source code, to be
- distributed under the terms of Sections 1 and 2 above on a medium
- customarily used for software interchange; or,
-
- c) Accompany it with the information you received as to the offer
- to distribute corresponding source code. (This alternative is
- allowed only for noncommercial distribution and only if you
- received the program in object code or executable form with such
- an offer, in accord with Subsection b above.)
-
-The source code for a work means the preferred form of the work for
-making modifications to it. For an executable work, complete source
-code means all the source code for all modules it contains, plus any
-associated interface definition files, plus the scripts used to
-control compilation and installation of the executable. However, as a
-special exception, the source code distributed need not include
-anything that is normally distributed (in either source or binary
-form) with the major components (compiler, kernel, and so on) of the
-operating system on which the executable runs, unless that component
-itself accompanies the executable.
-
-If distribution of executable or object code is made by offering
-access to copy from a designated place, then offering equivalent
-access to copy the source code from the same place counts as
-distribution of the source code, even though third parties are not
-compelled to copy the source along with the object code.
-
- 4. You may not copy, modify, sublicense, or distribute the Program
-except as expressly provided under this License. Any attempt
-otherwise to copy, modify, sublicense or distribute the Program is
-void, and will automatically terminate your rights under this License.
-However, parties who have received copies, or rights, from you under
-this License will not have their licenses terminated so long as such
-parties remain in full compliance.
-
- 5. You are not required to accept this License, since you have not
-signed it. However, nothing else grants you permission to modify or
-distribute the Program or its derivative works. These actions are
-prohibited by law if you do not accept this License. Therefore, by
-modifying or distributing the Program (or any work based on the
-Program), you indicate your acceptance of this License to do so, and
-all its terms and conditions for copying, distributing or modifying
-the Program or works based on it.
-
- 6. Each time you redistribute the Program (or any work based on the
-Program), the recipient automatically receives a license from the
-original licensor to copy, distribute or modify the Program subject to
-these terms and conditions. You may not impose any further
-restrictions on the recipients' exercise of the rights granted herein.
-You are not responsible for enforcing compliance by third parties to
-this License.
-
- 7. If, as a consequence of a court judgment or allegation of patent
-infringement or for any other reason (not limited to patent issues),
-conditions are imposed on you (whether by court order, agreement or
-otherwise) that contradict the conditions of this License, they do not
-excuse you from the conditions of this License. If you cannot
-distribute so as to satisfy simultaneously your obligations under this
-License and any other pertinent obligations, then as a consequence you
-may not distribute the Program at all. For example, if a patent
-license would not permit royalty-free redistribution of the Program by
-all those who receive copies directly or indirectly through you, then
-the only way you could satisfy both it and this License would be to
-refrain entirely from distribution of the Program.
-
-If any portion of this section is held invalid or unenforceable under
-any particular circumstance, the balance of the section is intended to
-apply and the section as a whole is intended to apply in other
-circumstances.
-
-It is not the purpose of this section to induce you to infringe any
-patents or other property right claims or to contest validity of any
-such claims; this section has the sole purpose of protecting the
-integrity of the free software distribution system, which is
-implemented by public license practices. Many people have made
-generous contributions to the wide range of software distributed
-through that system in reliance on consistent application of that
-system; it is up to the author/donor to decide if he or she is willing
-to distribute software through any other system and a licensee cannot
-impose that choice.
-
-This section is intended to make thoroughly clear what is believed to
-be a consequence of the rest of this License.
-
- 8. If the distribution and/or use of the Program is restricted in
-certain countries either by patents or by copyrighted interfaces, the
-original copyright holder who places the Program under this License
-may add an explicit geographical distribution limitation excluding
-those countries, so that distribution is permitted only in or among
-countries not thus excluded. In such case, this License incorporates
-the limitation as if written in the body of this License.
-
- 9. The Free Software Foundation may publish revised and/or new versions
-of the General Public License from time to time. Such new versions will
-be similar in spirit to the present version, but may differ in detail to
-address new problems or concerns.
-
-Each version is given a distinguishing version number. If the Program
-specifies a version number of this License which applies to it and "any
-later version", you have the option of following the terms and conditions
-either of that version or of any later version published by the Free
-Software Foundation. If the Program does not specify a version number of
-this License, you may choose any version ever published by the Free Software
-Foundation.
-
- 10. If you wish to incorporate parts of the Program into other free
-programs whose distribution conditions are different, write to the author
-to ask for permission. For software which is copyrighted by the Free
-Software Foundation, write to the Free Software Foundation; we sometimes
-make exceptions for this. Our decision will be guided by the two goals
-of preserving the free status of all derivatives of our free software and
-of promoting the sharing and reuse of software generally.
-
- NO WARRANTY
-
- 11. BECAUSE THE PROGRAM IS LICENSED FREE OF CHARGE, THERE IS NO WARRANTY
-FOR THE PROGRAM, TO THE EXTENT PERMITTED BY APPLICABLE LAW. EXCEPT WHEN
-OTHERWISE STATED IN WRITING THE COPYRIGHT HOLDERS AND/OR OTHER PARTIES
-PROVIDE THE PROGRAM "AS IS" WITHOUT WARRANTY OF ANY KIND, EITHER EXPRESSED
-OR IMPLIED, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF
-MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE. THE ENTIRE RISK AS
-TO THE QUALITY AND PERFORMANCE OF THE PROGRAM IS WITH YOU. SHOULD THE
-PROGRAM PROVE DEFECTIVE, YOU ASSUME THE COST OF ALL NECESSARY SERVICING,
-REPAIR OR CORRECTION.
-
- 12. IN NO EVENT UNLESS REQUIRED BY APPLICABLE LAW OR AGREED TO IN WRITING
-WILL ANY COPYRIGHT HOLDER, OR ANY OTHER PARTY WHO MAY MODIFY AND/OR
-REDISTRIBUTE THE PROGRAM AS PERMITTED ABOVE, BE LIABLE TO YOU FOR DAMAGES,
-INCLUDING ANY GENERAL, SPECIAL, INCIDENTAL OR CONSEQUENTIAL DAMAGES ARISING
-OUT OF THE USE OR INABILITY TO USE THE PROGRAM (INCLUDING BUT NOT LIMITED
-TO LOSS OF DATA OR DATA BEING RENDERED INACCURATE OR LOSSES SUSTAINED BY
-YOU OR THIRD PARTIES OR A FAILURE OF THE PROGRAM TO OPERATE WITH ANY OTHER
-PROGRAMS), EVEN IF SUCH HOLDER OR OTHER PARTY HAS BEEN ADVISED OF THE
-POSSIBILITY OF SUCH DAMAGES.
-
- END OF TERMS AND CONDITIONS
-
- How to Apply These Terms to Your New Programs
-
- If you develop a new program, and you want it to be of the greatest
-possible use to the public, the best way to achieve this is to make it
-free software which everyone can redistribute and change under these terms.
-
- To do so, attach the following notices to the program. It is safest
-to attach them to the start of each source file to most effectively
-convey the exclusion of warranty; and each file should have at least
-the "copyright" line and a pointer to where the full notice is found.
-
- <one line to give the program's name and a brief idea of what it does.>
- Copyright (C) <year> <name of author>
-
- 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., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA
-
-
-Also add information on how to contact you by electronic and paper mail.
-
-If the program is interactive, make it output a short notice like this
-when it starts in an interactive mode:
-
- Gnomovision version 69, Copyright (C) year name of author
- Gnomovision comes with ABSOLUTELY NO WARRANTY; for details type `show w'.
- This is free software, and you are welcome to redistribute it
- under certain conditions; type `show c' for details.
-
-The hypothetical commands `show w' and `show c' should show the appropriate
-parts of the General Public License. Of course, the commands you use may
-be called something other than `show w' and `show c'; they could even be
-mouse-clicks or menu items--whatever suits your program.
-
-You should also get your employer (if you work as a programmer) or your
-school, if any, to sign a "copyright disclaimer" for the program, if
-necessary. Here is a sample; alter the names:
-
- Yoyodyne, Inc., hereby disclaims all copyright interest in the program
- `Gnomovision' (which makes passes at compilers) written by James Hacker.
-
- <signature of Ty Coon>, 1 April 1989
- Ty Coon, President of Vice
-
-This General Public License does not permit incorporating your program into
-proprietary programs. If your program is a subroutine library, you may
-consider it more useful to permit linking proprietary applications with the
-library. If this is what you want to do, use the GNU Library General
-Public License instead of this License.
diff --git a/src/lbdb/README b/src/lbdb/README
@@ -1,212 +0,0 @@
-$Id: README,v 1.37 2007-05-27 08:42:22 roland Exp $
-
-
- The Little Brother's Database
-
- Roland Rosenfeld <roland@spinnaker.de> (current maintainer)
- Thomas Roessler <roessler@guug.de> (initial author)
-
-This package was inspired by the Big Brother Database package
-available for various Emacs mailers, and by Brandon Long's "external
-query" patch for the mutt mail user agent (Note that this patch has
-been incorporated into the main-line mutt versions as of mutt 0.93.)
-
-The package doesn't use any formal database libraries or languages,
-although it should be quite easy to extend it to use, e.g., an
-installed PostgreSQL server as it's backend.
-
-For querying the Little Brother, just type "lbdbq <something>". lbdbq
-will now attempt to invoke various modules to gather information about
-persons matching "<something>". E.g., it may look at a list of
-addresses from which you have received mail, it may look at YP maps,
-or it may try to finger <something>@<various hosts>.
-
-The behavior is configurable: Upon startup, lbdbq will source the
-shell scripts
-
- /usr/local/etc/lbdb.rc (or where your @sysconfdir@ points to)
- $HOME/.lbdbrc
- $HOME/.lbdb/lbdbrc
- $HOME/.lbdb/rc
-
-if they exist.
-
-They can be used to set the following global variables:
-
-- MODULES_PATH: Where lbdbq should look for modules
-
-- METHODS: What modules to use.
-
-- SORT_OUTPUT: Set this to "false" or "no" and lbdbq won't sort the
- addresses but returns them in reverse order (which means that the
- most recent address in m_inmail database is first). If you set this
- to "name", lbdbq sorts the output by real name. If you set this to
- "comment", it sort the output by the comment (for example the date
- in m_inmail). If you set this to "address", lbdbq sorts the output
- by addresses (that's the default).
-
-
-Note that there _are_ defaults, so you should most probably modify
-these variables using constructs like this:
-
- MODULES_PATH="MODULES_PATH $HOME/lbdb_modules"
-
-Additionally, modules may have configuration variables of their own.
-
-Currently the following modules are supplied with lbdb:
-
-m_finger
- This module will use finger to find out something more about a
- person. The list of hosts do be asked is configurable; use the
- M_FINGER_HOSTS variable. Note that "localhost" will mean an
- invocation of your local finger(1) binary, and should thus work
- even if you don't provide the finger service to the network.
- m_finger tries to find out the machines mail domain name in
- /etc/mailname, by parsing a sendmail.cf file (if it finds one)
- and by reading /etc/hostname and /etc/HOSTNAME.
-
-m_inmail
- This module will look up user name fragments in a list of mail
- addresses created by lbdb-fetchaddr(1).
-
-m_passwd
- This module searches for matching entries in your local
- /etc/passwd file. It evaluates the local machine mail domain in
- the same way m_finger does. If you set PASSWD_IGNORESYS=true,
- this module ignores all system accounts and only finds UIDs
- between 1000 and 29999 (all other UIDs are reserved on a Debian
- system).
-
-m_yppasswd
- This module searches for matching entries in your NIS password
- file using the command "ypcat passwd".
-
-m_nispasswd
- This module searches for matching entries in the NIS+ password
- database using the command ``niscat passwd.org_dir''.
-
-m_getent
- This module searches for matching entries in whatever password
- database is configured using the command ``getent passwd''.
-
-m_pgp2, m_pgp5, m_gpg
- These modules scan your PGP 2.*, PGP 5.* or GnuPG public key
- ring for data. They use the programs pgp(1), pgpk(1), or gpg(1)
- to get the data.
-
-m_fido
- This module searches your Fido nodelist, stored in
- $HOME/.lbdb/nodelist created by nodelist2lbdb(1).
-
-m_abook
- This module uses the program abook
- (http://www.linuxstart.com/~jheinonen/abook/), a text based
- address book application to search for addresses. You can
- define multiple abook address books by setting the variable
- ABOOK_FILES to a space separated list.
-
-m_addr_email
- This module uses addr-email from the addressbook
- (http://red.roses.de/~clemens/addressbook/) Tk program to
- search for addresses.
-
-m_muttalias
- This module searches the variable MUTTALIAS_FILES (a space
- separated list) of files in MUTT_DIRECTORY that contain mutt
- aliases. File names without leading slash will have
- MUTT_DIRECTORY (defaults to $HOME/.mutt or $HOME, if
- $HOME/.mutt does not exist) prepended before the file name.
- Absolute file names (beginning with /) will be taken direct.
-
-m_pine
- This module searches pine(1) addressbook files for
- aliases. To realize this it first inspects the variable PINERC.
- If it isn't set, the default `/etc/pine.conf
- /etc/pine.conf.fixed .pinerc' is used. To suppress inspecting
- the PINERC variable, set it to "no". It than takes all
- address-book and global-address-book entries from these pinerc
- files and adds the contents of the variable PINE_ADDRESSBOOKS
- to the list, which defaults to `/etc/addressbook .addressbook'.
- Then these addressbooks are searched for aliases. All filenames
- without leading slash are searched in $HOME.
-
-m_palm
- This module searches the Palm address database using the
- Palm::PDB and Palm::Address Perl modules from CPAN. It
- searches in the variable PALM_ADDRESS_DATABASE or if this isn't
- set in $HOME/.jpilot/AddressDB.pdb.
-
-m_gnomecard
- This module searches for addresses in your GnomeCard database
- files. The variable GNOMECARD_FILES is a whitespace separated
- list of GnomeCard data files. If this variable isn't defined,
- the module searches in $HOME/.gnome/GnomeCard for the GnomeCard
- database or at least falls back to $HOME/.gnome/GnomeCard.gcrd.
- If a filename does not start with a slash, it is prefixed with
- $HOME/.
-
-m_bbdb
- This module searches for addresses in your (X)Emacs BBDB (big
- brother database). It doesn't access ~/.bbdb directly (yet)
- but calls (x)emacs with a special mode to get the information
- (so don't expect too much performance in this module). You can
- configure the EMACS variable to tell this module which emacsen
- to use. Otherwise it will fall back to emacs or xemacs.
-
-m_ldap
- This module queries an LDAP server using the Net::LDAP Perl
- modules from CPAN. It can be configured using an external
- resource file (for more details please refer to the
- mutt_ldap_query(1) manual page).
-
-m_wanderlust
- This module searches for addresses stored in your
- $WANDERLUST_ADDRESSES (or by default in $HOME/.addresses) file,
- an addressbook of WanderLust.
-
-m_osx_addressbook
- This module queries the OS X AddressBook. It is only available
- on OS X systems.
-
-m_evolution
- This module queries the Ximian Evolution address book using the
- evolution-addressbook-export application.
-
-m_vcf
- This module uses libvformat to search for addresses from the
- space-separated set of vCard files defined in $VCF_FILES.
-
-
-Feel free to create your own modules to query other kinds of
-databases. m_finger should be a good example of how to do it.
-
-If you create your own modules or have other changes and feel that
-they could be helpful for others, don't hesitate to submit them to me
-for inclusion in later releases.
-
-Finally, to use lbdbq from mutt, add the following line to your
-~/.muttrc:
-
- set query_command="lbdbq %s"
-
-
-CREDITS
--------
-
-Most of the really interesting code of this program (namely, the RFC
-822 address parser used by lbdb-fetchaddr) was stolen from Michael
-Elkins' mutt mail user agent. Additional credits go to Brandon Long
-for putting the query functionality into mutt.
-
-Many thanks to the authors of the several modules and extensions:
-- Ross Campbell <rcampbel@us.oracle.com> (m_abook, m_yppasswd)
-- Marc de Courville <marc@courville.org> (m_ldap, mutt_ldap_query)
-- Brendan Cully <brendan@kublai.com> (m_osx_addressbook, m_vcf)
-- Gabor Fleischer <flocsy@mtesz.hu> (m_pine)
-- Rick Frankel <rick@rickster.com> (m_gnomecard)
-- Guido Guenther <agx@sigxcpu.org> (m_evolution)
-- Utz-Uwe Haus <haus@uuhaus.de> (m_bbdb, m_nispasswd)
-- Torsten Jerzembeck <toje@nightingale.ms.sub.org> (m_addr_email)
-- Gergely Nagy <algernon@debian.org> (m_wanderlust)
-- Dave Pearson <davep@davep.org> (m_palm, lbdb.el)
-- Brian Salter-Duke <b_duke@bigpond.net.au> (m_muttalias)
diff --git a/src/lbdb/lbdb-fetchaddr.man.in b/src/lbdb/lbdb-fetchaddr.man.in
@@ -1,122 +0,0 @@
-.\" -*- nroff -*-
-.\" Copyright (c) 1998-2005 Roland Rosenfeld <roland@spinnaker.de>
-.\"
-.\" 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., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301,, USA.
-.\"
-.TH LBDB-FETCHADDR 1 "October 2005" "Unix" "User Manuals"
-.SH NAME
-lbdb-fetchaddr \- grab addresses from mails add append them to lbdb database
-.SH SYNOPSIS
-.B lbdb-fetchaddr
-.RB [ -d
-.IR dateformat ]
-.RB [ -x
-.IR headerfieldlist ]
-.RB [ -c
-.IR charset ]
-.RB [ -a ]
-.br
-.B lbdb-fetchaddr
-.RB [ -v | -h ]
-.SH DESCRIPTION
-.B lbdb-fetchaddr
-is a shell script which reads a mail on stdin. It extracts the
-contents of some header fields (default:
-.RB ` From: ',
-.RB ` To: ',
-.RB ` Cc: ',
-.RB ` Resent-From: ',
-and
-.RB ` Resent-To: ')
-from the mail header (only addresses with a real name) and appends
-them to
-.IR $HOME/.lbdb/m_inmail.list .
-For performance issues
-.B lbdb-fetchaddr
-appends new addresses to this file without removing duplicates. To get
-rid of duplicates, the program
-.B lbdb-munge
-exists, which is run by
-.B m_inmail
-if needed and removes duplicates.
-.PP
-To use this program, put the following lines into your
-.I $HOME/.procmailrc:
-.nf
- :0hc
- | lbdb-fetchaddr
-.fi
-.PP
-.B lbdb-fetchaddr
-writes the actual date to the third column of the database by using
-.BR strftime (3).
-It uses "%Y-%m-%d %H:%M" as the default date format (e.g. "1999-04-29
-14:33"). You can change this by using the
-.B -d
-option to select a different date format string as parameter of
-lbdb-fetchaddr command like
-.nf
- :0hc
- | lbdb-fetchaddr \-d "%y-%m-%d"
-.fi
-which results in e.g. "99-04-29".
-.SH OPTIONS
-.TP
-.B -v
-Print version number of lbdb-fetchaddr.
-.TP
-.B -h
-Print short help of lbdb-fetchaddr.
-.TP
-.BI -d " dateformat"
-Use the given date format using
-.BR strftime (3)
-syntax.
-.TP
-.BI -x " headerfields"
-A colon separated list of header fields, which should be searched for
-mail addresses. If this option isn't given, we fall back to
-.RB ` from:to:cc:resent-from:resent-to '.
-.TP
-.BI -c " charset"
-The charset which will be used to write the database. This should be
-the charset which the application expects (normally the one from your
-current locale). If this option isn't given, we fall back to
-.RB ` iso-8859-15 '.
-.TP
-.B -a
-Also grab addresses without a real name. Use the local part of the
-mail address as real name.
-.SH FILES
-.I $HOME/.lbdb/m_inmail.list
-.br
-.I @libdir@/fetchaddr
-.br
-.I @libdir@/m_inmail
-.SH "SEE ALSO"
-.BR lbdbq (1),
-.BR @dotlock@ (1),
-.BR procmail (1),
-.BR procmailrc (5),
-.BR strftime (3).
-.SH CREDITS
-Most of the really interesting code of this program (namely, the RFC
-822 address parser used by lbdb-fetchaddr) was stolen from Michael
-Elkins' mutt mail user agent. Additional credits go to Brandon Long
-for putting the query functionality into mutt.
-.SH AUTHOR
-The lbdb package was written by Thomas Roessler <roessler@guug.de> and
-is now maintained and extended by Roland Rosenfeld
-<roland@spinnaker.de>.
diff --git a/src/lbdb/lbdb-fetchaddr.sh.in b/src/lbdb/lbdb-fetchaddr.sh.in
@@ -1,128 +0,0 @@
-#! @SH@
-#
-# -*-sh-*-
-# Copyright (C) 1998-2000 Thomas Roessler <roessler@guug.de>
-# 1999-2005 Roland Rosenfeld <roland@spinnaker.de>
-#
-# 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., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301,, USA.
-#
-# $Id: lbdb-fetchaddr.sh.in,v 1.20 2007-10-28 16:33:36 roland Exp $
-
-LBDB_VERSION=@LBDB_VERSION@
-
-umask 077
-
-prefix=@prefix@
-exec_prefix=@exec_prefix@
-dotlock=@DOTLOCK@
-fetchaddr=@libdir@/fetchaddr
-db=${jarodir}/${jarolist}
-dirty=${jarodir}/.${jarolist}
-
-datefmt='%Y-%m-%d %H:%M'
-additional_param=()
-
-usage() {
- echo "Usage: $0 [OPTIONS]"
- echo " dig addresses from stdin with formatted timestamp"
- echo "Options:"
- echo " -v print version of lbdbq"
- echo " -h this short help"
- echo " -d 'dateformat' select date format using strftime(3)"
- echo " -x 'from:to:cc' colon separated list of header fields"
- echo " -c 'charset' charset for the database storage"
- echo " -a also grep addresses without realname"
-}
-
-while [ $# -gt 0 ]
-do
- case "$1" in
- -v)
- echo "lbdb-fetchaddr version $LBDB_VERSION"
- exit 0
- ;;
- -h)
- usage
- exit 0
- ;;
- -d)
- if [ $# -gt 1 ]
- then
- shift
- datefmt="$1"
- fi
- ;;
- -x)
- if [ $# -gt 1 ]
- then
- shift
- hdrlist="-x $1"
- fi
- ;;
- -c)
- if [ $# -gt 1 ]
- then
- shift
- charset="-c $1"
- fi
- ;;
- -a)
- additional_param+=($1)
- ;;
- *)
- if [ $# -eq 1 ]
- then
- # backward compatibility:
- # only one parameter means, that this is the selected datefmt
- datefmt="$1"
- else
- echo "Wrong number of parameters!"
- usage
- exit 1
- fi
- ;;
- esac
- shift
-done
-
-if [ ! -f $db ]; then
- dbdir=`dirname $db`
- if [ ! -d $dbdir ]; then
- mkdir -p $dbdir
- if [ ! -d $dbdir ]; then
- echo "Can't create $dbdir" >&2
- exit 1
- fi
- fi
- touch $db
- if [ ! -f $db ]; then
- echo "Can't create $db" >&2
- exit 1
- fi
-fi
-
-if $dotlock -r 10 -f $db
-then
- : # okay, do nothing
-else
- echo "Can't lock $db [dotlock returned $rv]." >&2
- exit 1
-fi
-
-if $fetchaddr ${=additional_param} -d "$datefmt" ${=hdrlist} ${=charset} >> $db ; then
- touch $dirty
-fi
-
-$dotlock -u $db
diff --git a/src/lbdb/lbdb-munge.sh.in b/src/lbdb/lbdb-munge.sh.in
@@ -1,64 +0,0 @@
-#! @SH@
-#
-# -*-sh-*-
-#
-# Copyright (C) 1999-2005 Roland Rosenfeld <roland@spinnaker.de>
-#
-# 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., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301,, USA.
-#
-# $Id: lbdb-munge.sh.in,v 1.8 2005-10-29 14:48:09 roland Exp $
-
-LBDB_VERSION=@LBDB_VERSION@
-
-umask 077
-
-prefix=@prefix@
-exec_prefix=@exec_prefix@
-dotlock=@DOTLOCK@
-fetchaddr=@libdir@/fetchaddr
-db=${jarodir}/${jarolist}
-dirty=${jarodir}/.${jarolist}
-
-if [ "$SORT_OUTPUT" = "false" -o "$SORT_OUTPUT" = "no" ]
-then
- munge=@libdir@/munge-keeporder
-else
- munge=@libdir@/munge
-fi
-
-if [ ! -f $dirty ]; then
- # Nothing to do
- exit 0
-fi
-
-if $dotlock -r 10 -f $db
-then
- : # okay, do nothing
-else
- echo "Can't lock $db [dotlock returned $rv]." >&2
- exit 1
-fi
-
-if $munge < $db > $db.$$.tmp 2>/dev/null
-then
- # only move, if munge successful:
- mv -f $db.$$.tmp $db
- rm -f $dirty
-else
- rm -f $db.$$.tmp
- # maybe write a debug log here...
-fi
-
-$dotlock -u $db
diff --git a/src/lbdb/lbdb.rc.in b/src/lbdb/lbdb.rc.in
@@ -1,190 +0,0 @@
-#
-# This is the main configuration file of the little brothers database lbdb
-#
-# Everything you configure here can be overridden by the users config
-# file which can be found at
-# ~/.lbdbrc
-# ~/.lbdb/lbdbrc
-# ~/.lbdb/rc
-# (evaluated with ascending priority!)
-#
-# (c) 1999-2006 Roland Rosenfeld <roland@spinnaker.de>
-#
-# $Id: lbdb.rc.in,v 1.18 2006-10-14 12:10:42 roland Exp $
-#
-
-#
-# Select which methods you want to use in which order (ascending priority):
-# (a space separated list)
-#
-# - m_inmail search the database created by lbdb-fetchaddr(1)
-# - m_finger finger some hosts defined in variable M_FINGER_HOSTS
-# - m_passwd search the local /etc/passwd file.
-# - m_yppasswd search the NIS password database.
-# - m_nispasswd search the NIS+ password database.
-# - m_getent search the password database (whatever is configured).
-# - m_pgp2 search your PGP 2.* keyring
-# - m_pgp5 search your PGP 5.* keyring
-# - m_gpg search your GnuPG keyring
-# - m_fido search the Fido nodelist converted by nodelist2lbdb(1)
-# - m_abook query abook(1), the text based address book application.
-# - m_addr_email query addr-email(1) from addressbook Tk-program.
-# - m_muttalias search $MUTTALIAS_FILES for aliases.
-# - m_pine search pine(1) addressbook files for aliases.
-# - m_palm search your Palm addressbook file.
-# - m_gnomecard search your GnomeCard address database files.
-# - m_bbdb search your BBDB (big brother database).
-# - m_ldap query an LDAP server
-# - m_wanderlust search your wanderlust ~/.addresses file.
-# - m_osx_addressbook search the OS X addressbook (only available on OS X).
-# - m_evolution search in the Ximan Evolution addressbook.
-# - m_vcf search a vcard (according to RFC2426) file.
-
-METHODS=(m_inmail m_finger m_gpg m_osx_addressbook m_vcf)
-
-
-#
-# If you want m_finger to ask other host then localhost, create a list here:
-# (a space separated list):
-#
-#M_FINGER_HOSTS="master.debian.org va.debian.org localhost"
-
-#
-# If it isn't possible to find out the correct mail domain name of
-# your system in /etc/mailname, by reading sendmail.cf, /etc/hostname
-# or /etc/HOSTNAME, you can specify it in the variable
-# MAIL_DOMAIN_NAME. This overrides all other mechanisms.
-#
-#MAIL_DOMAIN_NAME=does-not-exist.org
-
-# - m_muttalias query set of mutt alias files:
-#
-# Set MUTTALIAS_FILES below to list of files in MUTT_DIRECTORY that
-# contain mutt aliases. File names without leading slash will have
-# $MUTT_DIRECTORY (defaults to $HOME/.mutt or $HOME, if ~/.mutt does
-# not exist) prepended before the file name. Absolute file names
-# (beginning with /) will be taken direct.
-#
-#MUTT_DIRECTORY="$HOME/.mutt"
-#MUTTALIAS_FILES=".muttrc .mail_aliases muttrc aliases"
-
-
-# - m_pine search pine addressbook files for aliases:
-#
-# This module first inspects the variable PINERC. If it isn't set, the
-# default `/etc/pine.conf /etc/pine.conf.fixed .pinerc' is used. To
-# suppress inspecting the PINERC variable, set it to "no". It than
-# takes all address-book and global-address-book entries from these
-# pinerc files and adds the contents of the variable PINE_ADDRESSBOOKS
-# to the list, which defaults to `/etc/addressbook .addressbook'. Then
-# these addressbooks are searched for aliases. All filenames without
-# leading slash are searched in $HOME.
-#
-#PINERC="/etc/pine.conf /etc/pine.conf.fixed .pinerc"
-#PINE_ADDRESSBOOKS="/etc/addressbook .addressbook"
-
-
-# - m_wanderlust search your WanderLust addresses files:
-#
-# Set WANDERLUST_ADDRESSES below to point to your WanderLust address
-# book. If you don't set this variable, the default
-# ($HOME/.addresses) is used.
-#
-#WANDERLUST_ADDRESSES="$HOME/.addresses"
-
-
-# - m_palm search your Palm addressbook file:
-#
-# This module searches the Palm address database using the Palm::PDB
-# and Palm::Address Perl modules from CPAN. It searches in the
-# variable PALM_ADDRESS_DATABASE or if this isn't set in
-# $HOME/.jpilot/AddressDB.pdb.
-#
-#PALM_ADDRESS_DATABASE="$HOME/.jpilot/AddressDB.pdb"
-
-
-# - m_gnomecard search your GnomeCard address database files.
-#
-# This module searches for addresses in your GnomeCard database files.
-# The variable GNOMECARD_FILES is a whitespace separated list of
-# GnomeCard data files. If this variable isn't defined, the module
-# searches in $HOME/.gnome/GnomeCard for the GnomeCard database or at
-# least falls back to $HOME/.gnome/GnomeCard.gcrd. If a filename does
-# not start with a slash, it is prefixed with $HOME/.
-#
-#GNOMECARD_FILES="$HOME/.gnome/GnomeCard.gcrd"
-
-
-# - m_bbdb search your BBDB (big brother database).
-#
-# This module searches for addresses in your (X)Emacs BBDB (big
-# brother database). It doesn't access ~/.bbdb directly (yet) but
-# calls emacs(1) or xemacs(1) with a special mode to get the
-# information (so don't expect too much performance in this module).
-# You can configure the EMACS variable to tell this module which
-# emacsen to use. Otherwise it will fall back to emacs or xemacs.
-#
-#EMACS="emacs"
-
-
-# - m_ldap query an LDAP server.
-#
-# This module queries an LDAP server using the Net::LDAP Perl modules
-# from CPAN. It can be configured using an external resource file. You
-# can explicity define a LDAP query in this file or you can use one or
-# more of the predefined queries from the %ldap_server_db in this
-# file. For this you have to define the selected enties as a space
-# separated list in the the variable LDAP_NICKS.
-#
-#LDAP_NICKS="debian bigfoot"
-
-
-# - m_abook query the abook(1) programm
-#
-# if you have more than one abook addressbook, use the ABOOK_FILES
-# variable. It contains a space separated list of all your files.
-# Default is $HOME/.abook/addressbook $HOME/.abook.addressbook
-# ABOOK_FILES="$HOME/.abook/friends $HOME/.abook/work"
-
-
-# - m_passwd search in /etc/passwd
-#
-# On a Debian system only the UIDs 1000-29999 are used for normal
-# users. Setting PASSWD_IGNORESYS to "true" implies that lbdbq
-# ignores and UID, which isn't in that range:
-#PASSWD_IGNORESYS=true
-
-
-# - m_vcf search in vcard files
-#
-# You have to define the vcard files space separated in $VCF_FILES to
-# make this module work:
-#VCF_FILES=$HOME/my.vcf
-
-
-#
-# If you want to use private modules set the MODULES_PATH to find them:
-# (a space separated list):
-#
-#MODULES_PATH="/usr/lib/lbdb $HOME/.lbdb/modules"
-
-
-#
-# Do you want the output to be sorted?
-# If you set this to "false" or "no", lbdbq won't sort the addresses
-# but returns them in reverse order (which means that the most recent
-# address in m_inmail database is first).
-# If you set this to "name", lbdbq sorts the output by real name.
-# If you set this to "comment", lbdbq sorts the output by comment (column 3).
-# If you set this to "reverse_comment", lbdbq sorts the output by comment
-# but with reverse order (column 3).
-# If you set this to "address", lbdbq sorts the output by addresses
-# (that's the default).
-#
-#SORT_OUTPUT=address
-
-#
-# Do you want to see duplicate mail addresses (with multiple real
-# names or different comment fields)? Default is "no".
-#
-#KEEP_DUPES=no
diff --git a/src/lbdb/lbdb.spec.in b/src/lbdb/lbdb.spec.in
@@ -1,79 +0,0 @@
-%define ver @LBDB_VERSION@
-%define rel 2
-%define prefix /usr
-
-Summary: The Little Brother's Database
-Name: lbdb
-Version: %ver
-Release: %rel
-Copyright: GNU General Public Licence
-URL: http://www.spinnaker.de/lbdb/
-Packager: Horms <horms@vergenet.net>
-Vendor: Horms
-Group: Applications/Databases
-Source: http://www.spinnaker.de/debian/lbdb_%{ver}.tar.gz
-NoSource: 0
-BuildRoot: /var/tmp/lbdb-%{PACKAGE_VERSION}-root
-Docdir: %{prefix}/doc
-
-%description
-This package was inspired by the Big Brother Database package available for
-various Emacs mailers, and by Brandon Long's "external query" patch for the
-Mutt mail user agent. (Note that this patch has been incorporated into the
-main-line mutt versions as of mutt 0.93.)
-
-The package doesn't use any formal database libraries or languages,
-although it should be quite easy to extend it to use, e.g., an installed
-PostgreSQL server as it's back end.
-
-%prep
-%setup -q
-
-%build
-%configure 2>&1 | tee -a Configurings-`date +%Y.%m.%d`
-
-#Funky NPROC code to speed things up courtesy of Red Hat's kernel rpm
-if [ -x /usr/bin/getconf ] ; then
- NRPROC=$(/usr/bin/getconf _NPROCESSORS_ONLN)
- if [ $NRPROC -eq 0 ] ; then
- NRPROC=1
- fi
-else
- NRPROC=1
-fi
-NRPROC=`expr $NRPROC + $NRPROC`
-
-make -j $NRPROC 2>&1 | tee -a Makings-`date +%Y.%m.%d`
-
-%install
-rm -rf $RPM_BUILD_ROOT
-mkdir -p ${RPM_BUILD_ROOT}/%{prefix}/etc
-
-make install_prefix=${RPM_BUILD_ROOT} install 2>&1 \
- | tee -a Makings-Install-`date +%Y.%m.%d`
-
-%clean
-rm -rf ${RPM_BUILD_DIR}/lbdb-%{ver}
-rm -rf ${RPM_BUILD_ROOT}
-
-%files
-%defattr(-,root,root)
-%doc README COPYING
-# Keep copies of the configure, build, install reports in the
-# documentation of the package.
-%doc Makings-Install-`date +%Y.%m.%d`
-%doc Makings-`date +%Y.%m.%d`
-%doc Configurings-`date +%Y.%m.%d`
-%{prefix}
-
-%changelog
-* Sat Dec 30 2000 Rob Payne <rnspayne@adelphia.net>
-- Changed to fit version 0.22
-- Change installation process to include RPM_BUILD_ROOT
-- Removed auto-generated files list that did not take into account RPM
- 4's automatic compression of the man pages *after* the
- auto-generation was running.
-- Removed the empty post, postun, preun scripts.
-
-* Mon Apr 10 2000 Horms <horms@vergenet.net>
-- created for version 0.18.5
diff --git a/src/lbdb/lbdb_lib.sh.in b/src/lbdb/lbdb_lib.sh.in
@@ -1,80 +0,0 @@
-#! @SH@
-#
-# -*-sh-mode-*-
-#
-# Copyright (C) 1998 Thomas Roessler <roessler@guug.de>
-# Copyright (C) 1999-2006 Roland Rosenfeld <roland@spinnaker.de>
-#
-# 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., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301,, USA.
-#
-# $Id: lbdb_lib.sh.in,v 1.7 2006-08-13 08:53:21 roland Exp $
-
-
-#
-# library routines
-#
-
-lbdb_hn_sendmail()
-{
- sendmail_cf="NONE"
- for p in /etc /etc/mail /etc/sendmail ; do
- if test -r $p/sendmail.cf ; then
- sendmail_cf=$p/sendmail.cf
- break;
- fi
- done
-
- if test "x$sendmail_cf" != "xNONE" ; then
- hn="`sed -n -e 's/^DM\(.*\)$/\1/p' $sendmail_cf`"
- if test "x$hn" = x ; then
- hn="`sed -n -e 's/^Dj\(.*\)$/\1/p' $sendmail_cf`"
- fi
- fi
- if test "x$hn" = x ; then
- echo "NONE"
- else
- echo "$hn"
- fi
-}
-
-
-lbdb_hostname()
-{
- if test "x$MAIL_DOMAIN_NAME" != "x" ; then
- hn=$MAIL_DOMAIN_NAME
- elif test -f /etc/mailname; then
- hn=`cat /etc/mailname`
- else
- hn=""
- if test -r /etc/resolv.conf ; then
- hn="`sed -n -e 's/^[ ]*domain[ ]\{1,\}\([^ ]*\)/\1/p' /etc/resolv.conf`"
- if test "x$hn" = "x" ; then
- hn="`sed -n -e 's/^[ ]*search[ ]\{1,\}\([^ ]*\)/\1/p' /etc/resolv.conf`"
- fi
- fi
- if test "x$hn" = "x" ; then
- hn=`lbdb_hn_sendmail`
- if test "x$hn" = "xNONE" ; then
- for i in /etc/HOSTNAME /etc/hostname ; do
- if test -f $i ; then
- hn="`cat $i`"
- break;
- fi
- done
- fi
- fi
- fi
- echo "$hn"
-}
diff --git a/src/lbdb/lbdbq.man.in b/src/lbdb/lbdbq.man.in
@@ -1,378 +0,0 @@
-.\" -*- nroff -*-
-.\" Copyright (c) 1998-2007 Roland Rosenfeld <roland@spinnaker.de>
-.\"
-.\" 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., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301,, USA.
-.\"
-.\" $Id: lbdbq.man.in,v 1.49 2010-05-18 17:51:02 roland Exp $
-.\"
-.TH LBDBQ 1 "September 2007" "Unix" "User Manuals"
-.SH NAME
-lbdbq \- query program for the little brother's database
-.SH SYNOPSIS
-.B lbdbq
-.I something
-.br
-.B lbdbq
-.RB [ -v | --version | -h | --help ]
-.SH DESCRIPTION
-.B lbdbq
-is the client program for the little brother's database. It will
-attempt to invoke various modules to gather information about persons
-matching
-.IR something .
-E.g., it may look at a list of addresses from which you have received
-mail, it may look at YP maps, or it may try to finger
-.IR something @ "<various hosts>" .
-.PP
-The behavior is configurable: Upon startup,
-.B lbdbq
-will source the shell scripts:
-.RS
-.I @sysconfdir@/lbdb.rc
-.br
-.I $HOME/.lbdbrc
-.br
-.I $HOME/.lbdb/lbdbrc
-.br
-.I $HOME/.lbdb/rc
-.RE
-if they exist.
-.PP
-They can be used to set the following global variables:
-.TP
-.B MODULES_PATH
-a space separated list of directories, where
-.B lbdbq
-should look for modules.
-.TP
-.B METHODS
-a space separated list of the modules to use.
-.TP
-.B SORT_OUTPUT
-If you set this to
-.I false
-or
-.IR no ,
-lbdbq won't sort the addresses but returns them in reverse order
-(which means that the most recent address in m_inmail database is
-first). If you set this to
-.IR name ,
-lbdbq sorts the output by real name. If you set this to
-.IR comment ,
-it sort the output by the comment (for example the date in
-.BR m_inmail ).
-.I reverse_comment
-realizes the same as
-.IR comment ,
-but in reverse order, so the most recent timestamp of m_inmail may be
-on top. If you set SORT_OUTPUT to
-.IR address ,
-lbdbq sorts the output by addresses (that's the default).
-.TP
-.B KEEP_DUPES
-If you set this to
-.I true
-or
-.IR yes ,
-lbdbq won't remove duplicate addresses with different real name
-comment fields.
-.PP
-Note that there
-.I are
-defaults, so you should most
-probably modify these variables using constructs like this:
-.nf
- MODULES_PATH="$MODULES_PATH $HOME/lbdb_modules"
-.fi
-.PP
-Additionally, modules may have configuration variables of
-their own.
-.SH MODULES
-Currently, the following modules are supplied with lbdb:
-.TP
-.B m_finger
-This module will use finger to find out something more about a person.
-The list of hosts do be asked is configurable; use the
-.B M_FINGER_HOSTS
-variable. Note that "localhost" will mean an invocation of your local
-.BR finger (1)
-binary, and should thus work even if you don't provide the finger
-service to the network.
-.B m_finger
-tries to find out the machines mail domain name in
-.IR /etc/mailname ,
-by parsing a
-.I sendmail.cf
-file (if it finds one) and by reading
-.I /etc/hostname
-and
-.IR /etc/HOSTNAME .
-If you know that this fails on your machine, or you want to force lbdbq
-to consider some other name to be the local mail domain name (misconfigured
-SUNs come to mind here), you can specify a name using the
-.B MAIL_DOMAIN_NAME
-variable. If this variable is set by you, no probing will be done by
-.BR lbdbq .
-.TP
-.B m_inmail
-This module will look up user name fragments in a list of mail
-addresses created by
-.BR lbdb-fetchaddr (1).
-.TP
-.B m_passwd
-This module searches for matching entries in your local /etc/passwd
-file. It evaluates the local machine mail domain in the same way
-.B m_finger
-does. If you set
-.BR PASSWD_IGNORESYS=true ,
-this module ignores all system accounts and only finds UIDs between
-1000 and 29999 (all other UIDs are reserved on a Debian system).
-.TP
-.B m_yppasswd
-This module searches for matching entries in the NIS password database
-using the command ``ypcat passwd''.
-.TP
-.B m_nispasswd
-This module searches for matching entries in the NIS+ password database
-using the command ``niscat passwd.org_dir''.
-.TP
-.B m_getent
-This module searches for matching entries in whatever password
-database is configured using the command ``getent passwd''.
-.TP
-.BR m_pgp2 ", " m_pgp5 ", " m_gpg
-These modules scan your PGP 2.*, PGP 5.* or GnuPG public key ring for
-data. They use the programs
-.BR pgp (1),
-.BR pgpk (1),
-or
-.BR gpg (1)
-to get the data.
-.TP
-.BR m_fido
-This module searches your Fido nodelist, stored in
-.I $HOME/.lbdb/nodelist
-created by
-.BR nodelist2lbdb (1).
-.TP
-.BR m_abook
-This module uses the program
-.BR abook (1),
-a text based address book application to search for addresses. You
-can define multiple abook address books by setting the variable
-.B ABOOK_FILES
-to a space separated list.
-.TP
-.BR m_addr_email
-This module uses the program
-.BR addr-email (1),
-a text based frontend to the Tk
-.BR addressbook (1)
-application.
-.TP
-.BR m_muttalias
-This module searches the variable
-.B MUTTALIAS_FILES
-(a space separated list) of files in
-.B MUTT_DIRECTORY
-that contain mutt aliases. File names without leading slash will have
-.B MUTT_DIRECTORY
-(defaults to
-.BI $HOME /.mutt
-or
-.BR $HOME ,
-if
-.BI $HOME /.mutt
-does not exist) prepended before the file name. Absolute file names
-(beginning with
-.IR / )
-will be taken direct.
-.TP
-.BR m_pine
-This module searches
-.BR pine (1)
-addressbook files for aliases. To realize this it first inspects the
-variable
-.BR PINERC .
-If it isn't set, the default
-.RI ` "/etc/pine.conf /etc/pine.conf.fixed .pinerc" '
-is used. To suppress inspecting the
-.B PINERC
-variable, set it to
-.IR no .
-It than takes all
-.B address-book
-and
-.B global-address-book
-entries from these pinerc files and adds the contents of the variable
-.B PINE_ADDRESSBOOKS
-to the list, which defaults to
-.RI ` "/etc/addressbook .addressbook" '.
-Then these addressbooks are searched for aliases. All filenames
-without leading slash are searched in
-.BR $HOME .
-.TP
-.BR m_palm
-This module searches the Palm address database using the
-.BR Palm::PDB (3pm)
-and
-.BR Palm::Address (3pm)
-Perl modules from CPAN.
-It searches in the variable
-.B PALM_ADDRESS_DATABASE
-or if this isn't set in
-.IR $HOME/.jpilot/AddressDB.pdb .
-.TP
-.BR m_gnomecard
-This module searches for addresses in your GnomeCard database files.
-The variable
-.B GNOMECARD_FILES
-is a whitespace separated list of GnomeCard data files. If this
-variable isn't defined, the module searches in
-.BI $HOME /.gnome/GnomeCard
-for the GnomeCard database or at least falls back to
-.BI $HOME /.gnome/GnomeCard.gcrd\fR.
-If a filename does not start with a slash, it is prefixed with
-.BR $HOME/ .
-.TP
-.BR m_bbdb
-This module searches for addresses in your (X)Emacs BBDB (big brother
-database). It doesn't access ~/.bbdb directly (yet) but calls
-.BR emacs (1)
-or
-.BR xemacs (1)
-with a special mode to get the information (so don't expect too much
-performance in this module). You can configure the
-.B EMACS
-variable to tell this module which emacsen to use. Otherwise it will
-fall back to
-.B emacs
-or
-.BR xemacs.
-.TP
-.BR m_ldap
-This module queries an LDAP server using the
-.BR Net::LDAP (3pm)
-Perl modules from CPAN. It can be configured using an external
-resource file
-.I @sysconfdir@/lbdb_ldap.rc
-You can explicity define a LDAP query in this file or you can use one
-or more of the predefined queries from the
-.B %ldap_server_db
-in this file. For this you have to define a space separated list of
-nicknames from entries in the variable
-.BR LDAP_NICKS .
-.TP
-.BR m_wanderlust
-This module searches for addresses stored in your
-.I $WANDERLUST_ADDRESSES
-(or by default in
-.IR $HOME/.addresses )
-file, an addressbook of
-.BR WanderLust .
-.TP
-.BR m_osx_addressbook
-This module queries the OS X AddressBook. It is only available on OS
-X systems.
-.TP
-.BR m_evolution
-This module queries the Ximian Evolution address book. It depends on
-the program
-.BR evolution-addressbook-export ,
-which is shipped with evolution.
-.TP
-.BR m_vcf
-This module uses libvformat to search for addresses from the
-space\-separated set of vCard files defined in
-.IR $VCF_FILES .
-.PP
-Feel free to create your own modules to query other database resources,
-YP maps, and the like.
-.B m_finger
-should be a good example of how to do it.
-.PP
-If you create your own modules or have other changes and feel that
-they could be helpful for others, don't hesitate to submit them to the
-author for inclusion in later releases.
-.PP
-Finally, to use
-.B lbdbq
-from mutt, add the following line to your
-.I $HOME/.muttrc:
-.nf
- set query_command="lbdbq %s"
-.fi
-.SH OPTIONS
-.IP "-v | --version"
-Print version number of lbdbq.
-.IP "-h | --help"
-Print short help of lbdbq.
-.SH FILES
-.I @sysconfdir@/lbdb.rc
-.br
-.I $HOME/.lbdbrc
-.br
-.I $HOME/.lbdb/lbdbrc
-.br
-.I $HOME/.lbdb/rc
-.br
-.I @libdir@/*
-.br
-.I $HOME/.lbdb/m_inmail.list
-.br
-.I $HOME/.lbdb/nodelist
-.SH "SEE ALSO"
-.BR finger (1),
-.BR ypcat (1),
-.BR niscat (1),
-.BR getent (1),
-.BR pgp (1),
-.BR pgpk (1),
-.BR gpg (1),
-.BR lbdb-fetchaddr (1),
-.BR nodelist2lbdb (1),
-.BR mutt_ldap_query (1),
-.BR abook (1),
-.BR addr-email (1),
-.BR addressbook (1),
-.BR mutt (1),
-.BR pine (1),
-.BR emacs (1),
-.BR xemacs (1),
-.BR Palm::PDB (3pm),
-.BR Palm::Address (3pm),
-.BR Net::LDAP (3pm).
-.SH CREDITS
-Most of the really interesting code of this program (namely, the RFC
-822 address parser used by lbdb-fetchaddr) was stolen from Michael
-Elkins' mutt mail user agent. Additional credits go to Brandon Long
-for putting the query functionality into mutt.
-.PP
-Many thanks to the authors of the several modules and extensions:
-Ross Campbell <rcampbel@us.oracle.com> (m_abook, m_yppasswd),
-Marc de Courville <marc@courville.org> (m_ldap, mutt_ldap_query),
-Brendan Cully <brendan@kublai.com> (m_osx_addressbook, m_vcf),
-Gabor Fleischer <flocsy@mtesz.hu> (m_pine),
-Rick Frankel <rick@rickster.com> (m_gnomecard),
-Utz-Uwe Haus <haus@uuhaus.de> (m_bbdb, m_nispasswd),
-Torsten Jerzembeck <toje@nightingale.ms.sub.org> (m_addr_email),
-Adrian Likins <alikins@redhat.com> (m_getent),
-Gergely Nagy <algernon@debian.org> (m_wanderlust),
-Dave Pearson <davep@davep.org> (m_palm, lbdb.el), and
-Brian Salter-Duke <b_duke@bigpond.net.au> (m_muttalias).
-.SH AUTHOR
-The lbdb package was initially written by Thomas Roessler
-<roessler@guug.de> and is now maintained and heavily extended by
-Roland Rosenfeld <roland@spinnaker.de>.
diff --git a/src/lbdb/lbdbq.sh.in b/src/lbdb/lbdbq.sh.in
@@ -1,116 +0,0 @@
-#! @SH@
-#
-# Copyright (C) 1998-2000 Thomas Roessler <roessler@guug.de>
-# 1998-2007 Roland Rosenfeld <roland@spinnaker.de>
-#
-# 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., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301,, USA.
-#
-# $Id: lbdbq.sh.in,v 1.27 2007-05-20 13:00:44 roland Exp $
-
-LBDB_VERSION=@LBDB_VERSION@
-
-prefix=@prefix@
-exec_prefix=@exec_prefix@
-libdir=@libdir@
-sysconfdir=@sysconfdir@
-
-METHODS="@MODULES@"
-MODULES_PATH=@libdir@
-TAC=@TAC@
-TMPDIR=@TMPDIR@
-case "$1" in
- -v|--version)
- echo "lbdbq version $LBDB_VERSION"
- exit 0
- break;;
- -h|--help)
- PROG=`basename $0`
- echo "Usage: $PROG 'something' search addresses matching 'something'"
- echo " $PROG -v|--version print version of lbdbq"
- echo " $PROG -h|--help this short help"
- exit 0
- break;;
-esac
-
-. $libdir/lbdb_lib
-
-tmpdir=${TMPDIR-/tmp}/query.`hostname`.$$
-mkdir $tmpdir || exit 1
-trap "rm -rf $tmpdir ; trap '' 0; exit 1" 0 1 2 3 15
-trap "rm -rf $tmpdir ; trap '' 0" 0
-collection=$tmpdir/coll
-
-for conffile in $sysconfdir/lbdb.rc $HOME/.lbdbrc \
- $HOME/.lbdb/lbdbrc $HOME/.lbdb/rc ; do
-
- if test -f $conffile ; then
- . $conffile
- fi
-
-done
-
-for method in $METHODS ; do
- for CURRENT_MODULE_DIR in $MODULES_PATH ; do
- if test -f $CURRENT_MODULE_DIR/$method ; then
- . $CURRENT_MODULE_DIR/$method
- break
- fi
- done
-done
-
-for method in $METHODS ; do
- eval ${method}_query \""$@"\" >> $collection || true
-done
-
-case "${KEEP_DUPES:-}" in
- true|yes)
- MUNGE=cat
- MUNGE_KEEPORDER=cat
- ;;
- *)
- MUNGE=$libdir/munge
- MUNGE_KEEPORDER=$libdir/munge-keeporder
- ;;
-esac
-
-case "${SORT_OUTPUT:-}" in
- false|no)
- $MUNGE_KEEPORDER $collection | $TAC > $collection.uniq
- ;;
- *name)
- $MUNGE $collection | sort -f -k2 > $collection.uniq
- ;;
- reverse_comment)
- $MUNGE $collection | sort -f -k3 -t' ' -r > $collection.uniq
- ;;
- comment)
- $MUNGE $collection | sort -f -k3 -t' ' > $collection.uniq
- ;;
- *)
- $MUNGE $collection | sort -f > $collection.uniq
- ;;
-esac
-
-lines=`wc -l $collection.uniq | awk '{print $1}'`
-
-if [ $lines = "0" ]
-then
- echo "lbdbq: no matches"
- exit 1
-else
- echo "lbdbq: $lines matches"
-fi
-
-cat $collection.uniq
diff --git a/src/lbdb/m_abook.sh.in b/src/lbdb/m_abook.sh.in
@@ -1,39 +0,0 @@
-#! @SH@
-#
-# -*-sh-mode-*-
-#
-# Copyright (C) 2000 Ross Campbell <rcampbel@us.oracle.com>
-# Copyright (C) 2000-2005 Roland Rosenfeld <roland@spinnaker.de>
-#
-# 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., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301,, USA.
-#
-# $Id: m_abook.sh.in,v 1.6 2005-10-29 14:48:09 roland Exp $
-
-m_abook_query()
-{
- ABOOK=@ABOOK@
-
- if [ -x "$ABOOK" ] # check whether abook in installed
- then
- for book in ${ABOOK_FILES:-$HOME/.abook/addressbook $HOME/.abook.addressbook}
- do
- if [ -f "$book" ]
- then
- $ABOOK --datafile $book --mutt-query "$@" \
- | sed -e '1d;s/$/ abook/'
- fi
- done
- fi
-}
diff --git a/src/lbdb/m_addr_email.sh.in b/src/lbdb/m_addr_email.sh.in
@@ -1,39 +0,0 @@
-#! @SH@
-#
-# -*-sh-mode-*-
-#
-# Copyright (C) 2000 Torsten Jerzembeck <toje@nightingale.ms.sub.org>
-# Copyright (C) 2000 Ross Campbell <rcampbel@us.oracle.com>
-# Copyright (C) 2000-2005 Roland Rosenfeld <roland@spinnaker.de>
-#
-# 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., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301,, USA.
-#
-# This is a frontend to addr-email(1) from the addressbook(1) package,
-# which can be found at http://red.roses.de/~clemens/addressbook/.
-#
-# $Id: m_addr_email.sh.in,v 1.6 2009-06-11 10:56:22 roland Exp $
-
-m_addr_email_query()
-{
- ADDR_EMAIL=@ADDR_EMAIL@
-
- if [ -x "$ADDR_EMAIL" ] # check whether addr-email in installed
- then
- $ADDR_EMAIL "$@" \
- | sed -e 's/^\([^,]*\), \([^:]*\): \(.*\)$/\3 \1 \2/' \
- | grep -a '@' || :
-# | sed -e 's/\(.*\):[ ]\([^ ].*$\)/\2 \1 addr-email/'
- fi
-}
diff --git a/src/lbdb/m_bbdb.sh.in b/src/lbdb/m_bbdb.sh.in
@@ -1,68 +0,0 @@
-#! @SH@
-#
-# -*-sh-mode-*-
-#
-# Copyright (c) 2001 Utz-Uwe Haus <haus@uuhaus.de> 2001
-# Copyright (c) 2003 Aaron Kaplan <kaplan@cs.rochester.edu>
-# Copyright (c) 2005 Roland Rosenfeld <roland@spinnaker.de>
-#
-# 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., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301,, USA.
-#
-# $Id: m_bbdb.sh.in,v 1.9 2009-06-11 10:56:22 roland Exp $
-
-prefix=@prefix@
-exec_prefix=@exec_prefix@
-libdir=@libdir@
-
-m_bbdb_query()
-{
- if [ -f ${LBDB_BBDB_SCRIPT:=$libdir/lbdb_bbdb_query.el} ]
- then
- form="(progn (require (quote lbdb-bbdb-query)
- \"$LBDB_BBDB_SCRIPT\")
- (lbdb-bbdb-query \"$@\"))"
- if [ -z "$GNUCLIENT" ]
- then
- if type gnuclient >/dev/null 2>&1; then
- GNUCLIENT=gnuclient
- fi
- fi
- if [ "$GNUCLIENT" = "no" ]; then
- GNUCLIENT=
- fi
-
-
- success=0
- if [ -n "$GNUCLIENT" ] ; then
- if $GNUCLIENT -batch -eval "$form" 2> /dev/null; then
- success=1
- fi
- fi
- if [ $success = 0 ]; then
- if [ -z "$EMACS" ]
- then
- if type emacs >/dev/null 2>&1; then
- EMACS=emacs
- elif type xemacs >/dev/null 2>&1; then
- EMACS=xemacs
- fi
- fi
- if [ -n "$EMACS" ] ; then
- $EMACS -nw --no-site-file --no-init-file -batch \
- --eval "$form" 2>/dev/null
- fi
- fi
- fi | grep -va '^$' || :
-}
diff --git a/src/lbdb/m_evolution.sh.in b/src/lbdb/m_evolution.sh.in
@@ -1,83 +0,0 @@
-#! @SH@
-#
-# -*-sh-*-
-#
-# m_evolution - Evolution Address book module for lbdb
-# Copyright (C) 2004 Guido Guenther <agx@sigxcpu.org>
-# Copyright (C) 2004-2011 Roland Rosenfeld <roland@spinnaker.de>
-# Copyright (C) 2008 brian m. carlson <sandals@crustytoothpaste.ath.cx>
-# Copyright (C) 2009 Jan Larres <jan@majutsushi.net>
-#
-# loosely based on m_gnomecard
-#
-# 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., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA.
-#
-
-m_evolution_query ()
-{
- AWK=@AWK@
- EVOLUTION_ADDRESSBOOK_EXPORT=@EVOLUTION_ADDRESSBOOK_EXPORT@
-
- if [ "$EVOLUTION_ADDRESSBOOK_EXPORT" = "auto" ]; then
- for e in /usr/lib/evolution/*/evolution-addressbook-export
- do
- if [ -x $e ]; then
- EVOLUTION_ADDRESSBOOK_EXPORT=$e
- fi
- done
- fi
-
- if [ -x $EVOLUTION_ADDRESSBOOK_EXPORT ]; then
- $EVOLUTION_ADDRESSBOOK_EXPORT 2>/dev/null \
- | $AWK 'BEGIN {
- FS = ":"
- RS = "\r\n"
- name = ""
- emails = ""
- last_email = 0
- }
- /^END:VCARD/ {
- if ((name != "" || fileas != "") && emails != "") {
- sub("^#", "", emails)
- split(emails, emails_arr, "#")
- for (email in emails_arr)
- printf("%s\t%s\tEV:%s\n",emails_arr[email],name,fileas)
- }
- name = ""; fileas = ""; emails = ""
- }
- /^FN:/ {
- name = $2
- }
- /^X-EVOLUTION-FILE-AS:/ {
- fileas = $2
- gsub("\\\\", "", fileas)
- }
- # DEST-EMAIL is needed to skip addresses in list contacts
- /^EMAIL[;:]/ && ! /X-EVOLUTION-DEST-EMAIL/ {
- emails = emails "#" $2
- last_email = 1
- }
- # only join email lines for performance reasons
- /^ [^ ]/ && last_email == 1 {
- cont = $1
- sub("^ ", "", cont)
- emails = emails cont
- }
- ! /^EMAIL[;:]/ && ! /^ [^ ]/ {
- last_email = 0
- }' \
- | grep -ia "$@" || :
- fi
-}
diff --git a/src/lbdb/m_fido.sh.in b/src/lbdb/m_fido.sh.in
@@ -1,30 +0,0 @@
-#! @SH@
-#
-# -*-sh-*-
-#
-# $Id: m_fido.sh.in,v 1.8 2009-06-11 10:56:22 roland Exp $
-#
-# Copyright (C) 1998-2005 Roland Rosenfeld <roland@spinnaker.de>
-#
-# 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., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301,, USA.
-#
-
-m_fido_db=$HOME/.lbdb/nodelist
-
-m_fido_query()
-{
- test -f $m_fido_db || return
- grep -ia "$@." $m_fido_db || :
-}
diff --git a/src/lbdb/m_finger.sh.in b/src/lbdb/m_finger.sh.in
@@ -1,51 +0,0 @@
-#! @SH@
-
-# -*-sh-mode-*-
-
-# Copyright (C) 1998 Thomas Roessler <roessler@guug.de>
-# Copyright (C) 2005 Roland Rosenfeld <roland@spinnaker.de>
-#
-# 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., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301,, USA.
-
-# $Id: m_finger.sh.in,v 1.10 2009-06-11 10:56:22 roland Exp $
-
-m_finger_query()
-{
- FINGER=@FINGER@
-
- if [ -x "$FINGER" ] # check whether finger in installed
- then
-
- f_user="`echo \"$@\" | sed 's/@.*//'`"
-
- if test "x$M_FINGER_HOSTS" = x ; then
- M_FINGER_HOSTS="localhost"
- fi
-
- for host in $M_FINGER_HOSTS ; do
- if test "$host" = "localhost" ; then
- athost=""
- mailhost="`lbdb_hostname`"
- else
- athost="@$host"
- mailhost="$host"
- fi
- $FINGER $f_user$athost 2> /dev/null \
- | sed -n -e "s/^Login: *\([^ ]*\)[ ]*Name: \(.*\)$/\1@$mailhost \2 (finger)/p" \
- -e "s/^Login name: *\([^ ]*\)[ ]*In real life: \(.*\)$/\1@$mailhost \2 (finger)/p" \
- | grep -av 'In real life: ???' || :
- done
- fi
-}
diff --git a/src/lbdb/m_getent.sh.in b/src/lbdb/m_getent.sh.in
@@ -1,37 +0,0 @@
-#! @SH@
-#
-# -*-sh-*-
-#
-# Copyright (C) 2000-2001 Ross Campbell <rcampbel@us.oracle.com>
-# Copyright (C) 2000-2005 Roland Rosenfeld <roland@spinnaker.de>
-#
-# 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., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301,, USA.
-#
-# $Id: m_getent.sh.in,v 1.5 2005-10-29 14:48:09 roland Exp $
-
-m_getent_query()
-{
- GETENT=@GETENT@
-
- if [ -x "$GETENT" ] #check for getent
- then
- f_user="`echo \"$@\" | sed -e 's/@.*//'`"
- HOST="`lbdb_hostname`"
-
- $GETENT passwd \
- | grep -ia "$f_user" \
- | sed -e "s/^\([^:]*\):[^:]*:\([^:]*\):[^:]*:\([^:,]*\)[,:].*\$/\1@$HOST \3 UID \2/"
- fi
-}
diff --git a/src/lbdb/m_gnomecard.sh.in b/src/lbdb/m_gnomecard.sh.in
@@ -1,71 +0,0 @@
-#! @SH@
-#
-# -*-sh-*-
-#
-# m_gnomecard - GnomeCard Address book module for lbdb
-# Copyright (C) 2000 Rick Frankel <rick@rickster.com>
-# 2000-2005 Roland Rosenfeld <roland@spinnaker.de>
-#
-# 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., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301,, USA.
-#
-# $Id: m_gnomecard.sh.in,v 1.9 2009-06-11 10:56:22 roland Exp $
-#
-
-prefix=@prefix@
-exec_prefix=@exec_prefix@
-libdir=@libdir@
-AWK=@AWK@
-
-rcfile=$HOME/.gnome/GnomeCard
-
-m_gnomecard_query ()
-{
- if [ -z "$GNOMECARD_FILES" ]
- then
- if [ -r "$rcfile" ]
- then
- GNOMECARD_FILES=`\
- $AWK 'BEGIN {FS="="; infile=0} \
- /^\[.*\]/ {infile=0} \
- /^\[file\]/ {infile=1} \
- infile && /^open=/ {print $2}' \
- < $rcfile`
- fi
- if [ -z "$GNOMECARD_FILES" ]
- then
- GNOMECARD_FILES="$HOME/.gnome/GnomeCard.gcrd"
- fi
- fi
-
- for file in $GNOMECARD_FILES
- do
- if [ $file = ${file#/} ]
- then
- file=$HOME/$file
- fi
-
- if [ -f $file ]
- then
- $AWK 'BEGIN {FS=":"; RS="\r\n"; name=""} \
- /^END:VCARD/ {name=""} \
- /^FN[:;]/ {name=$2} \
- name!="" && /^EMAIL;/ {email=$2; \
- type=substr($1,7); \
- printf ("%s\t%s\tGC:%s\n", \
- email, name, type) }' \
- < $file | grep -ia "$@" || :
- fi
- done
-}
diff --git a/src/lbdb/m_gpg.sh.in b/src/lbdb/m_gpg.sh.in
@@ -1,42 +0,0 @@
-#! @SH@
-#
-# -*-sh-*-
-#
-# Copyright (C) 1998-2005 Roland Rosenfeld <roland@spinnaker.de>
-#
-# 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., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301,, USA.
-#
-# $Id: m_gpg.sh.in,v 1.26 2009-06-11 10:56:22 roland Exp $
-#
-
-m_gpg_query()
-{
- GPG=@GPG@
-
- if [ -x "$GPG" ]
- then
- $GPG --list-keys --with-colons "$@" 2>/dev/null \
- | grep -a '^\(pub\|uid\):[^re]:\([^:]*:\)\{7,7\}[^<>:]* <[^<>@: ]*@[^<>@: ]*>[^<>@:]*:' \
- | sed -e 's/^\([^:]*:\)\{9,9\}\([^<:]*\) <\([^>:]*\)>.*:.*$/\3 \2 (GnuPG)/' \
- | sed -e 's/ \([^ ]\{27,27\}\)[^ ]* / \1... /' \
- | grep -ia "$@" || :
-
-# $GPG --list-keys --no-greeting "$@" 2>/dev/null \
-# | grep -a '^\(pub\|uid\) .\{25,25\} [^<>]* <[^<>@ ]*@[^<>@ ]*>' \
-# | sed -e 's/^.\{24,31\}\([^<]*\) <\([^>]*\)>.*$/\2 \1 (GnuPG)/' \
-# | sed -e 's/ \([^ ]\{27,27\}\)[^ ]* / \1... /' \
-# | grep -ia "$@"
- fi
-}
diff --git a/src/lbdb/m_inmail.sh.in b/src/lbdb/m_inmail.sh.in
@@ -1,34 +0,0 @@
-#! @SH@
-#
-# Copyright (C) 1998-2000 Thomas Roessler <roessler@guug.de>
-# 1999-2005 Roland Rosenfeld <roland@spinnaker.de>
-#
-# 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., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301,, USA.
-#
-# $Id: m_inmail.sh.in,v 1.14 2009-06-11 10:56:22 roland Exp $
-
-prefix=@prefix@
-exec_prefix=@exec_prefix@
-libdir=@libdir@
-
-m_inmail_db=$jarodir/$jarolist
-
-m_inmail_query()
-{
- export SORT_OUTPUT
- $libdir/lbdb-munge
- test -f $m_inmail_db || return
- grep -ia "$@." $m_inmail_db || :
-}
diff --git a/src/lbdb/m_ldap.sh.in b/src/lbdb/m_ldap.sh.in
@@ -1,39 +0,0 @@
-#! @SH@
-#
-# -*-sh-*-
-#
-# m_ldap - ldap module for lbdb
-# Copyright (C) 2001 Marc de Courville <marc@courville.org>
-#
-# $Id: m_ldap.sh.in,v 1.6 2009-06-11 10:56:22 roland Exp $
-#
-# 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., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301,, USA.
-
-prefix=@prefix@
-exec_prefix=@exec_prefix@
-libdir=@libdir@
-
-m_ldap_query ()
-{
- if [ "$LDAP_NICKS" != "" ]
- then
- for NICK in $LDAP_NICKS
- do
- $libdir/mutt_ldap_query --lbdb_output --nickname=$NICK "$@" || :
- done
- else
- $libdir/mutt_ldap_query --lbdb_output "$@" || :
- fi
-}
diff --git a/src/lbdb/m_muttalias.sh.in b/src/lbdb/m_muttalias.sh.in
@@ -1,46 +0,0 @@
-#! @SH@
-#
-# -*-sh-*-
-#
-# Copyright (C) 2000 Brian Salter-Duke <b_duke@bigpond.net.au>
-# 2000-2007 Roland Rosenfeld <roland@spinnaker.de>
-#
-# 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., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301,, USA.
-#
-# $Id: m_muttalias.sh.in,v 1.11 2009-06-11 10:56:22 roland Exp $
-
-m_muttalias_query()
-{
- [ -d ${MUTT_DIRECTORY:=$HOME/.mutt} ] || MUTT_DIRECTORY=$HOME
-
- for file in ${MUTTALIAS_FILES:-.muttrc .mail_aliases muttrc aliases} ; do
- if [ $file = ${file#/} ]
- then
- file=$MUTT_DIRECTORY/$file
- fi
-
- if [ -f "$file" ]
- then
- grep -ia "$@" $file \
- | grep -a '^alias[ ][ ]*[^,][^,]*[ ][ ]*\([^,]\|\\\".*\\\"\)*$' \
- | sed -e 's/^alias[ ][ ]*\([^ ][^ ]*\)[ ][ ]*<\([^ >][^ >]*\)>[ ][ ]*(\([^<>()]*\))[^()<>]*$/\2 \3 alias \1/' \
- -e 's/^alias[ ][ ]*\([^ ][^ ]*\)[ ][ ]*\(\\\".*\\\"[^<>()]*\|[^<>()]*\)<\([^<>()]*\)>[^<>]*$/\3 \2 alias \1/' \
- -e 's/^alias[ ][ ]*\([^ ][^ ]*\)[ ][ ]*\([^<>()]*\)(\(\\\".*\\\"[^<>()]*\|[^<>()]*\))[^()<>]*$/\2 \3 alias \1/' \
- -e 's/\\\"//g' \
- | grep -va '^alias[ ][ ]*[^,][^,]*[ ][ ]*[^,]*$' || :
- fi
- done
-}
-
diff --git a/src/lbdb/m_nispasswd.sh.in b/src/lbdb/m_nispasswd.sh.in
@@ -1,38 +0,0 @@
-#! @SH@
-#
-# -*-sh-mode-*-
-#
-# Copyright (C) 2000 Ross Campbell <rcampbel@us.oracle.com>
-# Copyright (C) 2000-2005 Roland Rosenfeld <roland@spinnaker.de>
-# Copyright (C) 2001 Utz-Uwe Haus <haus@uuhaus.de>
-#
-# 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., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301,, USA.
-#
-# $Id: m_nispasswd.sh.in,v 1.4 2005-10-29 14:48:10 roland Exp $
-
-m_nispasswd_query()
-{
- NISCAT=@NISCAT@
-
- if [ -x "$NISCAT" ] #check for niscat
- then
- f_user="`echo \"$@\" | sed -e 's/@.*//'`"
- HOST="`lbdb_hostname`"
-
- $NISCAT passwd.org_dir \
- | grep -ia "$f_user" \
- | sed -e "s/^\([^:]*\):[^:]*:\([^:]*\):[^:]*:\([^:,]*\)[,:].*\$/\1@$HOST \3 UID \2/"
- fi
-}
diff --git a/src/lbdb/m_osx_addressbook.sh.in b/src/lbdb/m_osx_addressbook.sh.in
@@ -1,28 +0,0 @@
-#! @SH@
-#
-# -*-sh-*-
-#
-# Copyright (C) 2003 Brendan Cully <brendan@kublai.com>
-# Copyright (C) 2005 Roland Rosenfeld <roland@spinnaker.de>
-#
-# 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., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301,, USA.
-#
-
-libdir=@libdir@
-
-m_osx_addressbook_query()
-{
- $libdir/../bin/ABQuery "$@" | grep -ia "$@" || :
-}
diff --git a/src/lbdb/m_palm.sh.in b/src/lbdb/m_palm.sh.in
@@ -1,34 +0,0 @@
-#! @SH@
-#
-# -*-sh-*-
-#
-# m_palm - Palm address database module for lbdb
-# Copyright (C) 2000 Dave Pearson <davep@davep.org>
-# Copyright (C) 2005 Roland Rosenfeld <roland@spinnaker.de>
-#
-# 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., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301,, USA.
-#
-# $Id: m_palm.sh.in,v 1.8 2009-06-11 10:56:22 roland Exp $
-
-prefix=@prefix@
-exec_prefix=@exec_prefix@
-libdir=@libdir@
-
-m_palm_query ()
-{
- palmdatabase=${PALM_ADDRESS_DATABASE:-$HOME/.jpilot/AddressDB.pdb}
- test -f $palmdatabase || return
- $libdir/palm_lsaddr $palmdatabase | grep -ia "$@" || :
-}
diff --git a/src/lbdb/m_passwd.sh.in b/src/lbdb/m_passwd.sh.in
@@ -1,38 +0,0 @@
-#! @SH@
-#
-# -*-sh-*-
-#
-# Copyright (C) 1999-2005 Roland Rosenfeld <roland@spinnaker.de>
-#
-# 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., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301,, USA.
-#
-# $Id: m_passwd.sh.in,v 1.13 2009-06-11 10:56:22 roland Exp $
-#
-
-m_passwd_query()
-{
- HOST="`lbdb_hostname`"
- case "$PASSWD_IGNORESYS" in
- true|yes|1)
- IGNORESYS='UID \([12]....\|....\)$'
- ;;
- *)
- IGNORESYS='.'
- ;;
- esac
-
- sed -e "s/^\([^:]*\):[^:]*:\([^:]*\):[^:]*:\([^:,]*\)[,:].*\$/\1@$HOST \3 UID \2/" /etc/passwd \
- | grep -ia "$@" | grep -a "$IGNORESYS" || :
-}
diff --git a/src/lbdb/m_pgp2.sh.in b/src/lbdb/m_pgp2.sh.in
@@ -1,35 +0,0 @@
-#! @SH@
-#
-# -*-sh-*-
-#
-# Copyright (C) 1998-2005 Roland Rosenfeld <roland@spinnaker.de>
-#
-# 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., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301,, USA.
-#
-# $Id: m_pgp2.sh.in,v 1.11 2005-10-29 14:48:10 roland Exp $
-#
-
-m_pgp2_query()
-{
- PGP=@PGP@
-
- if [ -x "$PGP" ]
- then
- $PGP +language=en -kv "$@" 2>/dev/null \
- | grep -a '^[^<>]\{32,\} <[^<>@:/ ]*@[^<>@ ]*>[^<>@]*$' \
- | sed -e 's/^.\{30,30\}\(.*\) <\([^:]*\)>.*$/\2 \1 (PGP2)/' \
- | sed -e 's/ \([^ ]\{27,27\}\)[^ ]* / \1... /'
- fi
-}
diff --git a/src/lbdb/m_pgp5.sh.in b/src/lbdb/m_pgp5.sh.in
@@ -1,36 +0,0 @@
-#! @SH@
-#
-# -*-sh-*-
-#
-# Copyright (C) 1999-2005 Roland Rosenfeld <roland@spinnaker.de>
-#
-# 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., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301,, USA.
-#
-# $Id: m_pgp5.sh.in,v 1.13 2009-06-11 10:56:22 roland Exp $
-#
-
-m_pgp5_query()
-{
- PGPK=@PGPK@
-
- if [ -x "$PGPK" ]
- then
- $PGPK +language=en -l "$@" 2>/dev/null \
- | grep -a '^uid ...* <[^<>@:/ ]*@[^<>@ ]*>[^<>@]*$' \
- | sed -e 's/^uid \(.*\) <\(.*\)>.*$/\2 \1 (PGP5)/' \
- | sed -e 's/ \([^ ]\{27,27\}\)[^ ]* / \1... /' \
- | grep -ia "$@" || :
- fi
-}
diff --git a/src/lbdb/m_pine.sh.in b/src/lbdb/m_pine.sh.in
@@ -1,132 +0,0 @@
-#! @SH@
-#
-# -*-sh-*-
-#
-# Copyright (C) 2000 Gabor Fleischer <flocsy@mtesz.hu>
-#
-# 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., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301,, USA.
-#
-# $Id: m_pine.sh.in,v 1.10 2005-10-29 14:48:10 roland Exp $
-
-# m_pine for lbdb v0.9 by Gabor Fleischer <flocsy@mtesz.hu>
-#
-# Two variabled can be set in lbdbrc: PINERC, PINE_ADDRESSBOOKS
-# Here comes the explanation what are they for:
-# 1. First I look for $PINERC. If not set, then I use my defaults:
-# PINERC="/etc/pine.conf /etc/pine.conf.fixed .pinerc"
-# If you don't want me to look in the default PINERCs, then set PINERC=no
-# 2. I make a list of all the addressbooks in the PINERCs.
-# 3. Then the $PINE_ADDRESSBOOKS are added to this list.
-# 4. And if this list is still empty then add the default addressbooks:
-# PINE_ADDRESSBOOKS="/etc/addressbook .addressbook"
-# 5. Make the query in the listed addressbooks
-#
-# Changelog:
-# 0.9: Convert Quoted-Printable in the real names into plain 8bit.
-# 0.8: When the 'real name' is missing, put " " there, so mutt works fine.
-# 0.7: Fixed bugs:
-# * Search was case sensitive. Now it's insensitive.
-# * Lines with missing fields (i.e."nick<tab><tab>addr") were broken.
-# * Default didn't work if address-books in pinercs were "".
-# 0.6: The .addressbook format's multi-line addresses are supported.
-# 0.5: Initial release.
-#
-
-AWK=@AWK@
-prefix=@prefix@
-exec_prefix=@exec_prefix@
-qpto8bit=@libdir@/qpto8bit
-
-m_pine_query()
-{
- addressbooks=
- if [ x$PINERC != xno ] ; then
- for pinerc in ${PINERC:-/etc/pine.conf /etc/pine.conf.fixed .pinerc}
- do
- if [ $pinerc = ${pinerc#/} ] ; then
- pinerc=$HOME/$pinerc
- fi
- if [ -f $pinerc ] ; then
- addressbook=`\
- $AWK 'BEGIN {SPACE="";} \
- /^(global-)?address-book[ ]*=/ { \
- sub("^(global-)?address-book[ ]*=",""); \
- while (/[ ]*[^ ]+[ ]+([^ , ]+)[ ]*,/) { \
- sub("[ ]*[^ ]+[ ]+",""); \
- sub("[ , ].*",""); \
- printf("%s%s",SPACE,$0); \
- SPACE=" "; \
- getline; \
- } \
- sub("[ ]*[^ ]+[ ]+",""); \
- sub("[ ].*",""); \
- printf("%s%s",SPACE,$0); \
- SPACE=" "; \
- }' < $pinerc`
- fi
- addressbooks="${addressbook# } ${addressbooks# }"
- done
- fi
- addressbooks="${PINE_ADDRESSBOOKS} ${addressbooks# }"
- addressbooks=${addressbooks# }
- for file in ${addressbooks:=/etc/addressbook .addressbook} ; do
- if [ $file = ${file#/} ] ; then
- file=$HOME/$file
- fi
- if [ -f $file ]
- then
- cat $file | $qpto8bit | $AWK -v find="$@" '\
- function out() { \
- if (match(tolower(line),low_find)) {
- #order: nick full addr fcc comm \
- R[1] = "^[^ ]*"; \
- R[2] = "^[^ ]* [^ ]*"; \
- R[3] = "^[^ ]* [^ ]* \\(?[^ ]*\\)?"; \
- R[4] = "^[^ ]* [^ ]* [^ ]* [^ ]*"; \
- R[5] = "^[^ ]* [^ ]* [^ ]* [^ ]* [^ ]*"; \
- beg = 1; \
- for (i=1;i<=5;i++) { \
- match(line,R[i]); \
- A[i] = substr(line,beg,RLENGTH-beg+1); \
- beg = RLENGTH+2; \
- } \
- if (A[2] == "") {A[2] = " "} \
- if (match(A[3],/\(.*\)/)) {A[3] = substr(A[3],2,length(A[3])-2)} \
- if (A[5] != "") {A[5] = " [" A[5] "]"} \
- printf "%s %s %s%s (pine)\n",A[3],A[2],A[1],A[5]; \
- } \
- } \
- BEGIN { \
- FS=" "; \
- low_find = tolower(find); \
- getline; \
- while (/^#DELETED/) {getline} ; \
- line = $0 \
- } \
- $0 !~ /^#DELETED/ { \
- if (/^ /) { \
- gsub(" ",""); \
- line = line $0; \
- } else { \
- out(); \
- line = $0; \
- } \
- } \
- END { \
- out() \
- }'
- fi
- done
-}
diff --git a/src/lbdb/m_vcf.sh.in b/src/lbdb/m_vcf.sh.in
@@ -1,44 +0,0 @@
-#! @SH@
-#
-# Copyright (C) 2005 Brendan Cully <brendan@kublai.com>
-# Copyright (C) 2011 Jamey Sharp <jamey@minilop.net>
-#
-# 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., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301,, USA.
-#
-# $Id: m_vcf.sh.in,v 1.5 2011-06-25 14:22:09 roland Exp $
-
-m_vcf_query()
-{
- VCQ=@libdir@/vcquery
-
- QUERY="$1"
-
- for file in $VCF_FILES
- do
- if test -r $file.cache -a $file.cache -nt $file
- then
- cmd="cat $file.cache"
- else
- if $VCQ $file > $file.cache
- then
- cmd="cat $file.cache"
- else
- cmd="$VCQ $file"
- fi
- fi
-
- $cmd | grep -ie "$QUERY" | sed 's/(null)$/ /; s/ $/ (VCF)/'
- done
-}
diff --git a/src/lbdb/m_wanderlust.sh.in b/src/lbdb/m_wanderlust.sh.in
@@ -1,33 +0,0 @@
-#! @SH@
-## -*- sh -*-
-##
-## Copyright (C) 2002 Gergely Nagy <algernon@debian.org>
-## Copyright (C) 2002-2005 Roland Rosenfeld <roland@spinnaker.de>
-##
-## 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., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301,, USA.
-#
-# $Id: m_wanderlust.sh.in,v 1.7 2009-06-11 10:56:22 roland Exp $
-
-m_wanderlust_query()
-{
- addresses=${WANDERLUST_ADDRESSES:-${HOME}/.addresses}
-
- if [ -f $addesses ]
- then
- grep -ia "$@" $addresses \
- | sed -e 's,^\([^ ]\+\)[ ]\+"\([^"]*\)"[ ]\+"\([^"]\+\)",\1 \3 wl \2,g' \
- | grep -a '^[^ ][^ ]* [^ ][^ ]* wl ' || :
- fi
-}
diff --git a/src/lbdb/m_yppasswd.sh.in b/src/lbdb/m_yppasswd.sh.in
@@ -1,37 +0,0 @@
-#! @SH@
-#
-# -*-sh-mode-*-
-#
-# Copyright (C) 2000 Ross Campbell <rcampbel@us.oracle.com>
-# Copyright (C) 2000-2005 Roland Rosenfeld <roland@spinnaker.de>
-#
-# 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., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301,, USA.
-#
-# $Id: m_yppasswd.sh.in,v 1.5 2005-10-29 14:48:11 roland Exp $
-
-m_yppasswd_query()
-{
- YPCAT=@YPCAT@
-
- if [ -x "$YPCAT" ] #check for ypcat
- then
- f_user="`echo \"$@\" | sed -e 's/@.*//'`"
- HOST="`lbdb_hostname`"
-
- $YPCAT passwd \
- | grep -ia "$f_user" \
- | sed -e "s/^\([^:]*\):[^:]*:\([^:]*\):[^:]*:\([^:,]*\)[,:].*\$/\1@$HOST \3 UID \2/"
- fi
-}
diff --git a/src/lbdb/munge-keeporder.awk.in b/src/lbdb/munge-keeporder.awk.in
@@ -1,41 +0,0 @@
-#! @AWK@ -f
-#
-# -*-awk-*-
-#
-# Copyright (C) 1998-2000 Thomas Roessler <roessler@guug.de>
-# 2000 Roland Rosenfeld <roland@spinnaker.de>
-#
-# 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., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301,, USA.
-#
-# $Id: munge-keeporder.awk.in,v 1.3 2005-10-29 14:48:11 roland Exp $
-
-BEGIN {
- FS = "\t";
- i = 0;
-}
-
-{
- line[$1] = $0;
- pos[$1] = i;
- idx[i++] = $1;
-}
-
-END {
- for (j = 0; j < i; j++) {
- if (pos[idx[j]] == j) {
- print line[idx[j]];
- }
- }
-}
diff --git a/src/lbdb/munge.awk.in b/src/lbdb/munge.awk.in
@@ -1,36 +0,0 @@
-#! @AWK@ -f
-#
-# -*-awk-*-
-#
-# Copyright (C) 1998-2000 Thomas Roessler <roessler@guug.de>
-# 2000-2005 Roland Rosenfeld <roland@spinnaker.de>
-#
-# 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., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301,, USA.
-#
-# $Id: munge.awk.in,v 1.7 2005-10-29 14:48:11 roland Exp $
-
-BEGIN {
- FS = "\t";
-}
-
-{
- line[$1] = $0;
-}
-
-END {
- for (a in line) {
- print line[a];
- }
-}
diff --git a/src/lbdb/mutt_ldap_query.pl.in b/src/lbdb/mutt_ldap_query.pl.in
@@ -1,559 +0,0 @@
-#! @PERL@ -w
-#
-# Copyright (C) 2000-2006 Marc de Courville <marc@courville.org>
-# Copyright (C) 2005-2007 Roland Rosenfeld <roland@spinnaker.de>
-#
-# $Id: mutt_ldap_query.pl.in,v 1.28 2010-05-18 18:10:30 roland Exp $
-#
-# 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., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301,, USA.
-
-use strict;
-use Getopt::Long;
-use Net::LDAP;
-use Pod::Usage;
-
-#------8<------8<------8<------8<---cut here--->8------>8------>8------>8------
-# The defaults
-my $man = 0;
-my $help = 0;
-my $DEBUG = 0;
-my $lbdb_output = 0;
-my $version = 0;
-my $ldap_server_nickname = '';
-my $config_file = '';
-
-# hostname of your ldap server
-our $ldap_server = 'ldap.four11.com';
-# ldap base search
-our $search_base = 'c=US';
-# list of the fields that will be used for the query
-our $ldap_search_fields = 'givenname sn cn';
-# list of the fields that will be used for composing the answer
-our $ldap_expected_answers = 'givenname sn mail o';
-# format of the email result based on the expected answers of the ldap query
-our $ldap_result_email = '${mail}';
-# format of the realname result based on the expected answers of the ldap query
-our $ldap_result_realname = '${givenname} ${sn}';
-# format of the comment result based on the expected answers of the ldap query
-our $ldap_result_comment = '(${o})';
-# use ignorant (wildcard searching):
-our $ignorant = 0;
-# LDAP bind DN:
-our $ldap_bind_dn = '';
-# LDAP bind password:
-our $ldap_bind_password = '';
-
-our %ldap_server_db = (
- 'four11' => ['ldap.four11.com', 'c=US', 'givenname sn cn mail', 'givenname cn sn mail o', '${mail}', '${givenname} ${sn}', '${o}' ],
- 'infospace' => ['ldap.infospace.com', 'c=US', 'givenname sn cn mail', 'givenname cn sn mail o', '${mail}', '${givenname} ${sn}', '${o}' ],
- 'whowhere' => ['ldap.whowhere.com', 'c=US', 'givenname sn cn mail', 'givenname cn sn mail o', '${mail}', '${givenname} ${sn}', '${o}' ],
- 'bigfoot' => ['ldap.bigfoot.com', 'c=US', 'givenname sn cn mail', 'givenname cn sn mail o', '${mail}', '${givenname} ${sn}', '${o}' ],
- 'switchboard' => ['ldap.switchboard.com', 'c=US', 'givenname sn cn mail', 'givenname cn sn mail o', '${mail}', '${givenname} ${sn}', '${o}' ],
- 'infospacebiz' => ['ldapbiz.infospace.com', 'c=US', 'givenname sn cn mail', 'givenname cn sn mail o', '${mail}', '${givenname} ${sn}', '${o}' ]
-);
-#------8<------8<------8<------8<---cut here--->8------>8------>8------>8------
-
-# Return version string from CVS tag
-sub versionstring {
- my $ver = ' $Name: debian_version_0_38 $ ';
- $ver =~ s/Name//g;
- $ver =~ s/[:\$]//g;
- $ver =~ s/\s+//g;
- $ver =~ s/^v//g;
- $ver =~ s/_/\./g;
- if ($ver eq '') {
- $ver = "devel";
- }
- return($ver . " <marc\@courville.org>");
-}
-
-# Source a perl file
-sub process_file {
- foreach my $file (@_) {
- if (-r $file) {
- unless (my $return = do $file) {
- warn "couldn't parse $file: $@" if $@;
- warn "couldn't do $file: $!" unless defined $return;
- warn "couldn't run $file" unless $return;
- }
- }
-# else {
-# warn "either $file doesn't exist or is not readable by me!\n";
-# }
- }
-}
-
-# first we need to apply defaults
-process_file("@sysconfdir@/lbdb_ldap.rc",
- "@sysconfdir@/mutt_ldap_query.rc",
- "$ENV{HOME}/.lbdb/ldap.rc",
- "$ENV{HOME}/.mutt_ldap_query.rc");
-
-
-# Parse command line options. They override system defaults.
-GetOptions (
- 'config_file|c=s' => \$config_file,
- 'server|ls=s' => \$ldap_server,
- 'search_base|sb:s' => \$search_base,
- 'search_fields|sf:s' => \$ldap_search_fields,
- 'expected_answers|ea:s' => \$ldap_expected_answers,
- 'format_email|fe:s' => \$ldap_result_email,
- 'format_realname|fr:s' => \$ldap_result_realname,
- 'format_comment|fc:s' => \$ldap_result_comment,
- 'nickname|n=s' => \$ldap_server_nickname,
- 'bind_dn|bd:s' => \$ldap_bind_dn,
- 'bind_password|bp:s' => \$ldap_bind_password,
- 'debug' => sub { $DEBUG = 1 },
- 'help|?|h' => \$help,
- 'man|m' => \$man,
- 'ignorant|i' => \$ignorant,
- 'lbdb_output|l' => \$lbdb_output,
- 'version|v' => \$version
-);
-
-#
-# print usage and help info before we process config files
-#
-pod2usage(1) if $help;
-pod2usage(-verbose => 2) if $man;
-
-if ($version) {
- print "mutt_ldap_query version " . &versionstring() . "\n";
- print '$Id: mutt_ldap_query.pl.in,v 1.28 2010-05-18 18:10:30 roland Exp $ ' . "\n";
- exit(0);
-}
-
-# command-line config file take precedence over command-line options
-if ($config_file) {
- process_file($config_file);
-}
-
-
-# after we've done with GetOptions $ARGV[0] should present the rest
-# (i.e. mandatory search pattern)
-die pod2usage(1) if (! $ARGV[0] );
-
-if ($ldap_server_nickname) {
- my $option_array = $ldap_server_db{$ldap_server_nickname};
- die print "$0 unknown server nickname:\n\t no server associated to the nickname $ldap_server_nickname, please modify the internal database according your needs by editing the ressource file or specifying the relevant one to use\n" if ! $option_array;
- $ldap_server = $option_array->[0];
- $search_base = $option_array->[1];
- $ldap_search_fields = $option_array->[2];
- $ldap_expected_answers = $option_array->[3];
- $ldap_result_email = $option_array->[4];
- $ldap_result_realname = $option_array->[5];
- $ldap_result_comment = $option_array->[6];
- if (defined($option_array->[7])) {
- $ignorant = $option_array->[7];
- }
- if (defined($option_array->[8])) {
- $ldap_bind_dn = $option_array->[8];
- }
- if (defined($option_array->[9])) {
- $ldap_bind_password = $option_array->[9];
- }
-}
-
-print "DEBUG: ldap_server='$ldap_server' search_base='$search_base' search_fields='$ldap_search_fields'\
- expected_answer='$ldap_expected_answers' format_email='$ldap_result_email' format_realname='$ldap_result_realname'\
- bind_dn='$ldap_bind_dn' bind_password='$ldap_bind_password'\n" if ($DEBUG);
-
-my @fields = split / /, $ldap_search_fields;
-my @results;
-
-foreach my $askfor ( @ARGV ) {
- my $query="";
- if ($ignorant) {
-# enable this if you want to include wildcard in your search with some huge
-# ldap databases you might want to avoid it
- $query = join '', map { "($_=*$askfor*)" } @fields;
- }
- else {
- $query = join '', map { "($_=$askfor)" } @fields;
- }
- $query = "(|" . $query . ")";
-
- print "DEBUG: perl ldap module processing filter:\nDEBUG: $query\n" if ($DEBUG);
- my $ldap = Net::LDAP->new($ldap_server, Debug => 3) or die $@;
- if (defined($ldap_bind_dn) && $ldap_bind_dn ne ''
- && defined($ldap_bind_password) && $ldap_bind_password ne '') {
- $ldap->bind($ldap_bind_dn, password=> $ldap_bind_password);
- } else {
- $ldap->bind;
- }
- my $mesg = $ldap->search( base => $search_base, filter => $query ) or die $@;
- if ($mesg->code && ($mesg->code ne '4')) {
- die "Search failed. LDAP server returned an error : ", $mesg->code, ", description: ", $mesg->error;
- }
- my @entries = $mesg->entries;
- map { $_->dump } $mesg->all_entries if ($DEBUG);
- my $entry;
- foreach $entry (@entries) {
- print "DEBUG: processing $entry->dn\n" if ($DEBUG);
-# prepare the results
- my @emails = ();
- my $realname = $ldap_result_realname;
- my $comment = $ldap_result_comment;
- foreach my $answer (split / /, $ldap_expected_answers) {
- my $result = '';
-# if this is email we take all the values
- if( $ldap_result_email =~ /\${$answer}/ ) {
- foreach my $result ($entry->get_value($answer)) {
- my $email = $ldap_result_email;
- $email =~ s/\${$answer}/$result/g;
- push @emails, $email;
- }
- }
- else {
- my $result = '';
-# if there is no answer must return the null otherwise we get an uninitialized variable error
- ($result = $entry->get_value($answer)) || ($result = '');
-# replace the containers with the results of the query
- $realname =~ s/\${$answer}/$result/g;
- $comment =~ s/\${$answer}/$result/g;
- }
- }
- foreach my $ema (@emails) {
- push @results, "$ema\t$realname\t$comment\n";
- }
- }
- $ldap->unbind;
-}
-
-if ($lbdb_output) {
-# display results convenient for lbdb processing
- print @results;
-}
-else {
- print "LDAP query: found ", scalar(@results), "\n", @results;
-}
-
-exit 1 if ! @results;
-
-__END__
-
-=head1 NAME
-
-mutt_ldap_query - Query LDAP server for Mutt mail-reader
-
-=head1 SYNOPSIS
-
-mutt_ldap_query.pl [options] <name_to_query> [[<other_name_to_query>] ...]
-
-=head1 OPTIONS
-
-=over 8
-
-=item B<--config=config_file> or B<-c config_file>
-
-specify an alternate resource file other than the system ones
-(F<@sysconfdir@/lbdb_ldap.rc> or F<@sysconfdir@/mutt_ldap_query.rc>)
-or default personal ones (F<$HOME/.lbdb/ldap.rc> or
-F<$HOME/.mutt_ldap_query.rc>).
-
-=item B<--server=ldap_server> or B<-ls ldap_server>
-
-hostname of your ldap server. You can also use an ldap://foo[:port]
-or ldaps://foo[:port] URL here to talk to different ports or SSL
-encrypted servers. Or use ldapi://%2fvar%2flib%2fldap_sock to access an
-ldap server via a socket (use %2f as as replacement for a slash in the file
-name).
-
-=item B<--search_base=ldap_search_base> or B<-sb ldap_search_base>
-
-use <search_base> as the starting point for the search instead of the default.
-
-=item B<--search_fields=ldap_search_fields> or B<-sf ldap_search_fields>
-
-list of the fields on which the query will be performed.
-
-=item B<--expected_answers=ldap_expected_answers> or B<-ea ldap_expected_answers>
-
-list of the fields expected as the answer of the ldap server that will
-be used for composing the output of the script.
-
-=item B<--format_email=result_format_email> or B<-fe result_format_email>
-
-format to be used for composing the email output result. It has to be
-based on the expected ldap server answers and can use variable
-containers of the form ${variable} where variable belongs to the
-<ldap_expected_answers> set.
-
-=item B<--format_realname=result_format_realname> or B<-fr result_format_realname>
-
-format to be used for composing the realname output result. It has to
-be based on the expected ldap server answers and can use variable
-containers of the form ${variable} where variable belongs to the
-<ldap_expected_answers> set.
-
-=item B<--format_comment=result_format_comment> or B<-fc result_format_comment>
-
-format to be used for composing the comment output result. It has to
-be based on the expected ldap server answers and can use variable
-containers of the form ${variable} where variable belongs to the
-<ldap_expected_answers> set.
-
-=item B<--bind_dn=bind_distinguished_name> or B<-bd bind_distinguished_name>
-
-the destinguished name of the user who binds to the LDAP server.
-Leave it empty for an anonmyous bind.
-
-=item B<--bind_password=secret> or B<-bp secret>
-
-the bind password for binding to the LDAP server.
-Leave it empty for an anonmyous bind.
-
-=item B<--nickname=ldap_server_nickname> or B<-n ldap_server_nickname>
-
-shortcut for avoiding to use all the previous options by using the
-script builtin or alternate config file table of common servers and
-associated options. All the required parameters are then derived by
-performing a <lbdb_server_nickname> lookup.
-
-=item B<--debug> or B<-d>
-
-turn on debugging messages.
-
-=item B<--help> or B<-?> or B<-h> or B<--man> or B<-m>
-
-generates this help message.
-
-=item B<--ignorant> or B<-i>
-
-ignorant mode: search using wildcard for *name_to_query* (requires a
-longer processing from LDAP server but is quite convenient :).
-
-=item B<--lbdb_output> or B<-l>
-
-suppress number of matches output (suited for interfacing with little
-brother database http://www.spinnaker.de/lbdb/).
-
-=item B<--version> or B<-v>
-
-show the version.
-
-=back
-
-=head1 DESCRIPTION
-
-B<mutt_ldap_query> performs ldap queries using either ldapsearch command
-or the perl-ldap module and it outputs the required formatted data for
-feeding mutt when using its "External Address Query" feature.
-
-The output of the script consists in 3 fields separated with tabs: the
-email address, the name of the person and a comment.
-
-=head1 INTERFACING WITH MUTT
-
-This perl script can be interfaced with mutt by defining in your .muttrc:
-
- set query_command = "mutt_ldap_query.pl %s"
-
-Multiple requests are supported: the "Q" command of mutt accepts as argument
-a list of queries (e.g. "Gosse de\ Courville").
-
-Alternatively mutt_ldap_query can be interfaced with the more generic
-little brother database query program (http://www.spinnaker.de/lbdb/)
-using:
-
- set query_command = "lbdbq %s"
-
-and by specifying in your ~/.lbdb/lbdbrc file another method of query
-just adding to the METHODS variable the m_ldap module e.g.:
-
- METHODS='m_inmail m_passwd m_ldap m_muttalias m_finger'
-
-and the right path to access m_ldap in MODULES_PATH, e.g. if you moved
-F<m_ldap> in F<~/.lbdb/modules>:
-
- MODULES_PATH="/usr/local/lib $HOME/.lbdb/modules"
-
-Just make sure to use the correct path for calling mutt_ldap_query
-in the m_ldap script.
-
-=head1 RESOURCE FILE FORMAT
-
-mutt_ldap_query is now fully customizable using an external resource
-file. By default mutt_ldap_query parses the system definition file
-located generally at F</etc/mutt_ldap_query.rc> or
-F</usr/local/etc/mutt_ldap_query.rc> and also the user one:
-F<$HOME/.mutt_ldap_query.rc>.
-
-Instead of using command line options, the user can redefine all the
-variables using the resource file by two manners in order to match his
-site configuration. A file example is provided below:
-
- # The format of each entry of the ldap server database is the following:
- # LDAP_NICKNAME => ['LDAP_SERVER',
- # 'LDAP_SEARCH_BASE',
- # 'LDAP_SEARCH_FIELDS',
- # 'LDAP_EXPECTED_ANSWERS',
- # 'LDAP_RESULT_EMAIL',
- # 'LDAP_RESULT_REALNAME',
- # 'LDAP_RESULT_COMMENT'],
-
- # a practical illustrating example being:
- # debian => ['db.debian.org',
- # 'ou=users,dc=debian,dc=org',
- # 'uid cn sn ircnick',
- # 'uid cn sn ircnick',
- # '${uid}@debian.org',
- # '${cn} ${sn}',
- # '${ircnick}'],
- # the output of the query will be then:
- # ${uid}@debian.org\t${cn} ${sn}\t${ircnick} (i.e.: email name comment)
-
- # warning this database will erase default script builtin
- %ldap_server_db = (
- 'four11' => ['ldap.four11.com',
- 'c=US',
- 'givenname sn cn mail',
- 'givenname cn sn mail o',
- '${mail}',
- '${givenname} ${sn}',
- '${o}' ],
- 'infospace' => ['ldap.infospace.com',
- 'c=US',
- 'givenname sn cn mail',
- 'givenname cn sn mail o',
- '${mail}',
- '${givenname} ${sn}',
- '${o}' ],
- 'whowhere' => ['ldap.whowhere.com',
- 'c=US',
- 'givenname sn cn mail',
- 'givenname cn sn mail o',
- '${mail}',
- '${givenname} ${sn}',
- '${o}' ],
- 'bigfoot' => ['ldap.bigfoot.com',
- 'c=US',
- 'givenname sn cn mail'
- , 'givenname cn sn mail o'
- , '${mail}'
- , '${givenname} ${sn}',
- '${o}' ],
- 'switchboard' => ['ldap.switchboard.com',
- 'c=US',
- 'givenname sn cn mail'
- , 'givenname cn sn mail o',
- '${mail}',
- '${givenname} ${sn}',
- '${o}' ],
- 'infospacebiz' => ['ldapbiz.infospace.com',
- 'c=US',
- 'givenname sn cn mail',
- 'givenname cn sn mail o',
- '${mail}',
- '${givenname} ${sn}',
- '${o}' ],
- );
-
- # hostname of your ldap server
- $ldap_server = 'ldap.four11.com';
- # ldap base search
- $search_base = 'c=US';
- # list of the fields that will be used for the query
- $ldap_search_fields = 'givenname sn cn mail';
- # list of the fields that will be used for composing the answer
- $ldap_expected_answers = 'givenname sn cn mail o';
- # format of the email result based on the expected answers of the ldap query
- $ldap_result_email = '${mail}';
- # format of the realname result based on the expected answers of the ldap query
- $ldap_result_realname = '${givenname} ${sn}';
- # format of the comment result based on the expected answers of the ldap query
- $ldap_result_comment = '(${o})';
-
-=head1 EXAMPLES OF QUERIES
-
- mutt_ldap_query.pl --ldap_server='ldap.mot.com' \
- --search_base='ou=employees, o=Motorola,c=US' \
- --ldap_search_fields='commonName gn sn cn uid' \
- --ldap_expected_answers='gn sn preferredRfc822Recipient ou c telephonenumber' \
- --ldap_result_email='${preferredRfc822Recipient}' \
- --ldap_result_realname='${gn} ${sn}' \
- --ldap_result_comment='(${telephonenumber}) ${ou} ${c}' \
- Gosse de\ Courville
-
-performs a query using the ldap server ldap.mot.com using
-the following searching base 'ou=employees, o=Motorola,c=US' and
-performing a search on the fields 'commonName gn sn cn uid' for 'Gosse'
-and then "de Courville" looking for the following answers 'gn sn
-preferredRfc822Recipient ou c telephonenumber'. Based on this answers,
-mutt_ldap_query will return a list of entries identified of the form:
-
- <${preferredRfc822Recipient}>\t${gn} ${sn}\t(${telephonenumber}) ${ou} ${c}
-
-where ${} variables should be considered as containers that are
-replaced by the results of the query. The previous query can be
-greatly simplified by using the ldap server mini database feature of
-the resource file introducing for example a nickname.
-
- mutt_ldap_query.pl --ldap_server_nickname='motorola' Gosse de\ Courville
-
-When not sure of the full name (i.e. it should contain Courville)
-the ignorant mode is useful since the query will be performed using
-wildcards, i.e. *Courville* in the following case:
-
- mutt_ldap_query.pl --ignorant Courville
-
-=head1 WHERE TO GET IT
-
-The latest version can be retrieved at
- ftp://ftp.mutt.org/pub/mutt/contrib
-or
- http://www.courville.org/
-
-Note that now the script is integrated in the latest version of the little brother database available at http://www.spinnaker.de/lbdb/. It is thus easier to use through this standard package than to hand customize it to fit your system/distribution needs.
-
-=head1 REFERENCES
-
-=over 2
-
-=item -
-
-perl-ldap module
- http://perl-ldap.sourceforge.net/
-
-=item -
-
-mutt is the ultimate email client
- http://www.mutt.org/
-
-=item -
-
-historical Brandon Blong's "External Address Query" feature patch for mutt
- http://www.fiction.net/blong/programs/mutt/#query
-
-=item -
-
-little brother database is an interface query program for mutt that allow
-multiple searches for email addresses based on external query scripts
-just like this one 8-)
- http://www.spinnaker.de/lbdb/
-
-=back
-
-=head1 AUTHORS
-
-Marc de Courville <marc@courville.org> and the various other contributors... that kindly sent their patches.
-
-Please report any bugs, or post any suggestions, to <marc@courville.org>.
-
-=head1 COPYRIGHT
-
-Copyright (c) 1998-2003 Marc de Courville <marc@courville.org>. All rights reserved. This program is free software; you can redistribute it and/or modify it under the GNU General Public License (GPL). See http://www.opensource.org/gpl-license.html and http://www.opensource.org/.
-
-=cut
diff --git a/src/lbdb/nodelist2lbdb.man.in b/src/lbdb/nodelist2lbdb.man.in
@@ -1,44 +0,0 @@
-.\" -*-nroff-*-
-.\" Copyright (c) 1999-2005 Roland Rosenfeld <roland@debian.org>
-.\"
-.\" This manual page 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., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301,, USA.
-.\"
-.TH NODELIST2LBDB 1 "October 2005" Unix "User Manuals"
-.SH NAME
-nodelist2lbdb \- convert Fido nodelist and pointlist to lbdb format
-.SH SYNOPSIS
-.B nodelist2lbdb
-.BI nodelist. XXX
-.BI [point24. XXX ]
-.SH DESCRIPTION
-This little script reads in a Fido named
-.BI nodelist. XXX
-and optionally a Fido point list named
-.BI points24. YYY
-and generates a list with the lbdb format:
-.nf
- <mailaddress> TAB <realname> TAB <comment>
-.fi
-This file is written to
-.I $HOME/.lbdb/nodelist
-.SH FILES
-.I $HOME/.lbdb/nodelist
-.br
-.I @libdir@/m_fido
-.SH "SEE ALSO"
-.BR lbdbq (1)
-.SH AUTHORS
-.B nodelist2lbdb
-is written by Roland Rosenfeld <roland@spinnaker.de>.
diff --git a/src/lbdb/nodelist2lbdb.pl.in b/src/lbdb/nodelist2lbdb.pl.in
@@ -1,124 +0,0 @@
-#! @PERL@
-#
-# -*-perl-*-
-#
-# $Id: nodelist2lbdb.pl.in,v 1.3 2005-10-29 14:48:11 roland Exp $
-#
-# This little script reads Fido nodelist.XXX (and points24.YYY) in and
-# generates a list with the following format from it:
-# <mailaddress> TAB <realname> TAB <comment>
-# To reduce the size of the generated list, only Region 24 of the
-# nodelist is used.
-#
-# The generated list can be used in combination of Thomas Roessler's
-# lbdb for the Mutt mailreader.
-#
-##########################################################################
-#
-# Copyright (C) 1998-2005 Roland Rosenfeld <roland@spinnaker.de>
-#
-# 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., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301,, USA.
-#
-##########################################################################
-
-$database="$ENV{HOME}/.lbdb/nodelist";
-
-if (@ARGV == 0 || @ARGV >2
- || !($ARGV[0] =~ /nodelist\.\d\d\d$/i)
- || ((@ARGV == 2) && !($ARGV[1] =~ /points24\.\d\d\d$/i ))) {
- die "Usage: $0 nodelist.XXX [points24.YYY]\n";
-}
-
-open (DB, ">$database") || die "Cannot open $database for writing";
-
-#
-# Process Nodelist:
-#
-
-$zone=2;
-$net=0;
-$node=0;
-
-open (NODELIST, "<$ARGV[0]") || die "Cannot open $ARGV[0]";
-while (<NODELIST>) {
- next if /^;/;
- ($special,$number,$bbs,$city,$name) = split(/,/);
-
- if ($special =~ /Zone/) {
- $zone=$number;
- $net=$number;
- $node=0;
- } elsif ($special =~ /Region/) {
- $net=$number;
- $node=0;
- } elsif ($special =~ /Host/) {
- $net=$number;
- $node=0;
- } elsif ($special =~ /Down|Hold/) {
- next;
- } else {
- $node = $number;
- }
-
- $address = "$name\@f$node.n$net.z$zone.fidonet.org";
- $name =~ s/_/ /g;
- $bbs =~ s/_/ /g;
-
- #
- # Restrict to Region 24:
- #
-# if ($zone =~ /^2$/ && $net =~ /^24/ ) {
- print DB "$address\t$name\t$bbs\n";
-# }
-}
-close NODELIST;
-
-
-#
-# Process Pointlist:
-#
-
-$zone=2;
-$net=0;
-$node=0;
-$point=0;
-
-open (POINTLIST, "<$ARGV[1]") || die "Cannot open $ARGV[1]";
-while (<POINTLIST>) {
- next if /^;/;
- ($special,$number,$bbs,$city,$name) = split(/,/);
-
- if ($special =~ /Region/) {
- next;
- } elsif ($special =~ /Host/) {
- ($net,$node) = split(/\//, $bbs);
- next;
- } elsif ($special =~ /Down|Hold/) {
- next;
- } else {
- $point = $number;
- }
-
- $address = "$name\@p$point.f$node.n$net.z$zone.fidonet.org";
- $name =~ s/_/ /g;
- $city =~ s/_/ /g;
-
- print DB "$address\t$name\t$city\n";
-
-}
-close NODELIST;
-
-
-close DB;
diff --git a/src/lbdb/palm_lsaddr.pl.in b/src/lbdb/palm_lsaddr.pl.in
@@ -1,63 +0,0 @@
-#! @PERL@
-#
-# palm_lsaddr - Palm address database helper utility for lbdb
-# Copyright (C) 2000 Dave Pearson <davep@davep.org>
-# (C) 2003 Nikolaus Rath <Nikolaus@rath.org>
-#
-# 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., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301,, USA.
-
-use Palm::PDB;
-use Palm::Address;
-
-if ( $#ARGV > -1 )
-{
- my $pdb = new Palm::PDB;
-
- if ( $pdb )
- {
- $pdb->Load( $ARGV[ 0 ] );
-
- my $record;
-
- for ( $i = 0, $record = $pdb->{records}[ $i ]; $record; $i++, $record = $pdb->{records}[ $i ] )
- {
- my $name = $record->{fields}{firstName} . " " . $record->{fields}{name};
-
- # Remove leading and trailing whitespace.
- $name =~ s/\s+$//;
- $name =~ s/^\s+//;
-
- # If the name is empty, use the company name instead.
- $name = $record->{fields}{company} unless ( length( $name ) > 0 );
-
- if ( length( $name ) > 0 )
- {
- my $entry;
-
- # Find fields containing e-mail addresses
- for($entry=1; $entry <= 5; $entry++)
- {
- # 0 = Work, 1 = Home, 2 = Fax, 3 = Other, 4 = email,
- # 5 = Main, 6 = Pager, 7 = Mobile
- if($record->{phoneLabel}{"phone${entry}"} == 4) {
- # A field can also contain multiple lines.
- print map "$_\t$name\t(Palm)\n",
- split(/\n/, $record->{fields}{"phone${entry}"});
- }
- }
- }
- }
- }
-}
diff --git a/src/lbdb/tac.awk.in b/src/lbdb/tac.awk.in
@@ -1,37 +0,0 @@
-#! @AWK@ -f
-#
-# -*-awk-*-
-#
-# Copyright (C) 2000-2005 Roland Rosenfeld <roland@spinnaker.de>
-#
-# 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., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301,, USA.
-#
-# $Id: tac.awk.in,v 1.3 2005-10-29 14:48:11 roland Exp $
-#
-# Output file in reverse order
-
-BEGIN {
- i = 0;
-}
-
-{
- line[i++] = $0;
-}
-
-END {
- for (i-- ; i>=0; i--) {
- print line[i];
- }
-}
diff --git a/src/lbdb/rfc2047.c b/src/rfc2047.c
diff --git a/src/lbdb/rfc2047.h b/src/rfc2047.h
diff --git a/src/lbdb/rfc822.c b/src/rfc822.c
diff --git a/src/lbdb/rfc822.h b/src/rfc822.h
