pax_global_header00006660000000000000000000000064140651127660014522gustar00rootroot0000000000000052 comment=f80f624d373997afa3e3bfc074948b26d171d210 ytnef-2.0/000077500000000000000000000000001406511276600125105ustar00rootroot00000000000000ytnef-2.0/.gitignore000066400000000000000000000007601406511276600145030ustar00rootroot00000000000000# Compiled Object files *.slo *.lo *.o *.obj # Compiled Dynamic libraries *.so *.dylib *.dll # Compiled Static libraries *.lai *.la *.a *.lib # Executables *.exe *.out *.app # Autotools generated files ltmain.sh .deps/ .libs/ COPYING INSTALL Makefile Makefile.in aclocal.m4 autom4te.cache/ compile config.guess config.h config.h.in* config.log config.status config.sub configure depcomp install-sh libtool ytnef.spec m4 missing stamp-h1 ytnef ytnefprint # Test generated data test-data/data ytnef-2.0/.travis.yml000066400000000000000000000001301406511276600146130ustar00rootroot00000000000000language: c os: - linux - osx compiler: - gcc - clang script: ./travis-build.sh ytnef-2.0/COPYING000066400000000000000000000431051406511276600135460ustar00rootroot00000000000000 GNU GENERAL PUBLIC LICENSE Version 2, June 1991 Copyright (C) 1989, 1991 Free Software Foundation, Inc. 59 Temple Place, Suite 330, Boston, MA 02111-1307 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. Copyright (C) 19yy 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., 59 Temple Place, Suite 330, Boston, MA 02111-1307 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) 19yy 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. , 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. ytnef-2.0/ChangeLog000066400000000000000000000152141406511276600142650ustar00rootroot00000000000000v2.0.0 - April 27, 2020 - COVID Edition Special thanks to several people exposing the Attachment size limits. This version includes a new configuration parameter of the data structure, and commandline argument of the `ytnef` binary, allowing you to override the default attachment limit of 50MB. In addition, special thanks to amit777 for providing a PR that adds HTML Message body export, in the new `-H` option of ytnef. v1.9.3 - July 20, 2018 Special thanks to @evintila, @bestshow, @bingosxs, and @asarubbo for submitting high quality bug reports via valgrind, afl, and other tools. And a special thanks to @ohwgiles for submitting a bunchof patches to fix them! This version resolves the following CVEs: * CVE-2017-9470 * CVE-2017-9471 * CVE-2017-9474 * CVE-2017-9058 * CVE-2017-12142 * CVE-2017-12141 * CVE-2017-12144 * v1.9.2 - February 23, 2017 Thanks to @hannob for finding some Out-of-bound exceptions in memory handline. * [SECURITY] An invalid memory access (heap overrun) in handling LONG datatypes * [SECURITY] Missing a check for fields of size 0 * [SECURITY] Potential buffer overrun on incoming Compressed RTF Streams This version & the previous 1.9.1 resolves the following CVEs: * CVE-2017-6306 * CVE-2017-6305 * CVE-2017-6304 * CVE-2017-6303 * CVE-2017-6302 * CVE-2017-6301 * CVE-2017-6300 * CVE-2017-6299 * CVE-2017-6298 v1.9.1 - Feb 14, 2017 * BugFix for path handling- label both / and \ as invalid characters inattachments * Remove lots of exit(-1)'s from the code that would crash calling programs * [SECURITY] Thanks to EricSesterhennX41 for a patch to fix lots of invalid memory allocation around corrupted files. v1.9 - January 2, 2017 * Unify libytnef and ytnef tools into a single build & package (Thanks @jmallach) * Fix applied for CVE-2010-5109 * Various fixes for errors found via Static Analysis (cppcheck) * Various memory leaks plugged (Thanks @slonik-v-domene) * Bugfix for a broken "uniqueness" checker * Lots of formatting & documentation cleanups Now that the two packages are unified into a single install & build, I've had to choose a unifier of Version Numbers. I chose 1.9 . -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=- v2.7 Mark Paulus -- Better processing of filenames, to eliminate problem-causing characters. Hilmar - Update to the autoconf scripts to check for a valid ytneflib install during the configuration. -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=- v2.6 Minor Documentation changes. -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=- v2.5 Implemented Recurrence support, using patches & information from Viraj Alankar -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=- v2.4 Rearranged the ATTENDEE field adding the RSVP & PARTSTAT entries. Removed the opening & trailing curly braces from the description. Made the UID uppercase. Added both CN & MAILTO to ORGANIZER field. -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=- v2.3 Thanks to Jason for pointing me toward jtnef, with which I was finally able to finish compressed RTF support. -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=- v2.2 Need to start updating this file more often. Sorry guys. This release adds support for Contact cards with no name field. So now if you have contact cards with no name, but just a Company, those will work. -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=- v1.15 Made a change to fill spaces in filenames with underscores. Split the vcard/vcal/vtask code into separate files for better readability. Converted to automake (Autoconf, etc) Removed the run-time "endian" detection, in favor of WORD_BIGENDIAN Placed version information to be automatically generated into config.h Added an abstraction layer on IO -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=- v1.14 Made a change to save vCard entries with a .vcard extension instead of a .vcf extension. This way I can detect it in ytnefprocess.pl and mark it as a type text/x-vcard instead of text/vcalendar. -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=- v1.13 Fixed a problem in the checking of existence. Should have been (variableLength*)-1 instead of NULL.. Made MAPI_UNDEFINED to keep this from happening again. This fixed an issue with segfaulting on certain task requests when a start/due date wasn't specified. -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=- v1.12 Fixed a problem with recurring calendar entries, occasionally have incorrect start dates. -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=- v1.11 Fixed a problem with vCalendar entries using C-Style strings instead of quoted-printable strings. Fixed a mis-spelled field name in vCalendar entries (DCREATED vs CREATED) Added support for Start/Due date on Task entries. Added support for a UID to task entries (untested). Added support for Private/Public on Task Entries (untested). -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=- v1.10 Added attendee & organizer fields to Task Entries. Added support for meeting cancellations. -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=- v1.09 Made the Notes field of vCard's & the summary field of vCalendar entries quoted-printable. Added a : to the end of meeting attendees. Fixed a problem with meeting requests that didn't separate required & optional participants. Added code to use C-style \n's instead of quoted-printable encoding in task requests. -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=- v1.08 Code refactoring in the vCard section to improve readability. Made the addresses in vCards quoted printable to better support user input. -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=- v1.07 Added the -L option for tnefclean. -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=- v1.06 Fix for the CN & ROLE being reversed in required participants of meetings. Added the -l option for tnefclean. -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=- v1.05 Added the -F option to enable/disable the RTF attachments. Integrated patch #666566: Unicode to UTF8 conversion. -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=- v1.04 1-11-2003 Added code to use the PR_SENDER_SEARCH_KEY as the organizer of vcalendar objects. Fixed glitch with the From handler & the Message Class handler both storing in the same namespace. -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=- v1.03 1-5-2003 More endian fixes, now finally works on PowerPC. Modified the main.c to place the printing in a separate file. Added support for embedded TNEF streams. Moved the vCalendar to a separate procedure (for readability) Added the vCard 2.1 code, with the special X-EVOLUTION extensions for the extra properties. -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=- v1.02 12-27-2002 More fixes for the Endian problem, additions to the file-reading routines. Fixed warnings. -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=- v1.01 12-27-2002 Makefile cleanup - Removed references to openGL, Glut, & X libraries. Additions to help (-h). Fixes to make it run on Alpha architecture. First attempt at fixing the Big Endian/Little Endian issue. -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=- v1.0 12-26-2002 Initial Release ytnef-2.0/Makefile.am000066400000000000000000000002121406511276600145370ustar00rootroot00000000000000NULL = SUBDIRS = lib ytnef ytnefprint test-data ACLOCAL_AMFLAGS = -I m4 EXTRA_DIST = \ README.md \ libytnef.spec.in \ ytnef.spec.in ytnef-2.0/README.md000066400000000000000000000043621406511276600137740ustar00rootroot00000000000000Yerase's TNEF Stream Reader =========================== [![Build Status](https://api.travis-ci.com/Yeraze/ytnef.svg?branch=master)](https://travis-ci.com/github/Yeraze/ytnef) Installation ------------ Simply run make, and make install. On some systems you may need to edit the Makefile to change the CC= & LINK= lines to use cc instead of gcc. Usage ----- `ytnef filename.dat` - parse the file & print some basic information. `ytnef -v filename.dat` - parse the file & print EVERYTHING. good for debugging. `ytnef -f . filename.dat` - parse the file and save all of the attachments to the local directory. `ytnef -h` - See these and more options and examples. Automatic stripping of TNEF streams using procmail: --------------------------------------------------- If you want to use ytnefprocess, then make sure to do the following: 1. Build and install ytnef as described in the Installation section. 2. Make a directory `~/.ytnef` 3. Make a directory `~/.ytnef/output` 4. Install the MIME::Parser perl module. You can do this with: ``` perl -MCPAN -e shell (let it load) install MIME::Parser ``` 5. Create a .procmailrc something like this: ``` PATH=/bin:/usr/bin HOME=/home/randall :0fw * > 0 | /usr/bin/ytnefprocess ``` and VoilĂ ! you should be ready to go. Help ---- If you want additional information exported (to the vCalendar or vCard information), then use the -v option to try & find out where the information is. Then send the winmail.dat file, along with the -v listing to me (randall.hand@gmail.com) along with some information & justifications. It works best if you send several data files, showing the option in various states to back up your claim. For example, if you want me to parse recurrence patterns encoded in the TNEF stream, then send yourself several meeting requests with almost identical information, and several different recurrence patterns, and (hopefully) the only fields that change will the the UID & the recurrence information. Support ------- Don't hesitate to send support requests to me at randall.hand@gmail.com. I'll do what I can to help. Also don't hesitate to post bug reports or support/feature requests to https://github.com/Yeraze/ytnef/issues/new ytnef-2.0/autogen.sh000077500000000000000000000001541406511276600145110ustar00rootroot00000000000000#!/bin/bash mkdir -p m4 autoreconf -vfi case `uname` in Darwin*) glibtoolize --copy --force ;; *) ;; esac ytnef-2.0/configure.ac000066400000000000000000000035671406511276600150110ustar00rootroot00000000000000# Increment the: # MAJOR version when you make incompatible API changes, # MINOR version when you add functionality in a backwards-compatible manner # PATCH version when you make backwards-compatible bug fixes. m4_define([version_major],2) m4_define([version_minor],0) m4_define([version_micro],0) m4_define([version_triplet],version_major.version_minor.version_micro) AC_PREREQ([2.63]) AC_INIT([ytnef], [version_triplet], [randall.hand@gmail.com], [ytnef]) AC_CONFIG_MACRO_DIR([m4]) AC_CONFIG_SRCDIR([ytnef/main.c]) AC_CONFIG_HEADERS([config.h]) AM_INIT_AUTOMAKE([1.9 foreign dist-bzip2]) m4_ifdef([AM_SILENT_RULES],[AM_SILENT_RULES([yes])]) if test -z "$enable_maintainer_mode"; then enable_maintainer_mode=yes fi AM_MAINTAINER_MODE([enable]) # Libtool versioning m4_define([lt_revision], m4_if(m4_eval(version_minor%2),1,0,version_micro)) m4_define([lt_age], m4_eval(version_minor*100+version_micro-lt_revision)) m4_define([lt_current], m4_eval(version_major+lt_age)) m4_define([lt_triplet],lt_current:lt_revision:lt_age) LT_VERSION_INFO="lt_triplet()" AC_SUBST([LT_VERSION_INFO]) # Checks for programs. AC_PROG_CC AC_PROG_LIBTOOL #AC_USE_SYSTEM_EXTENSIONS # Checks for libraries. # Checks for header files. AC_HEADER_STDC AC_CHECK_HEADERS([stdlib.h string.h]) # Checks for typedefs, structures, and compiler characteristics. AC_C_BIGENDIAN # Checks for library functions. AC_CHECK_FUNCS([memset strstr]) AC_SYS_LARGEFILE # Initialize libtool LT_PREREQ([2.2]) LT_INIT LT_LANG([C]) AC_SUBST([YTNEF_MAJOR_VERSION],[version_major]) AC_SUBST([YTNEF_MINOR_VERSION],[version_minor]) AC_SUBST([YTNEF_MICRO_VERSION],[version_micro]) AC_SUBST([AM_CPPFLAGS]) AC_SUBST([AM_CFLAGS]) AC_SUBST([AM_CXXFLAGS]) AC_SUBST([AM_LDFLAGS]) AC_CONFIG_FILES([ Makefile ytnef/Makefile ytnefprint/Makefile lib/Makefile lib/libytnef.pc test-data/Makefile ]) AC_OUTPUT AC_OUTPUT([ytnef.spec]) ytnef-2.0/lib/000077500000000000000000000000001406511276600132565ustar00rootroot00000000000000ytnef-2.0/lib/ChangeLog000066400000000000000000000014051406511276600150300ustar00rootroot000000000000001.6 - * Mark Paulus - process a "Subject" from the MAPI fields, if it's not defined in the usual location. 1.5 - Sep 14, 2004 * Implemented a change suggested by "Larry Jones" to allow the Compressed RTF stuff to compile on older compilers. Basically just pre-declaring variables. 1.3 - Dec 29th, 2003 * Fixed a bug in MAPISysTimeToDTR (ytnef.c) where the dates were wrong in the upcoming leap year. (SR Bug: 867041) This should fix the "off-by-one day" bug and the "infinite hang" bug for events on New Years Day. 1.1 - Nov 20th, 2003 * Fixed a bug in the way the Multi-valued Mapi properties were handled Previously only the first 2 values were read, leaving the others uninitialized, leading to segfaults. ytnef-2.0/lib/Makefile.am000066400000000000000000000004001406511276600153040ustar00rootroot00000000000000lib_LTLIBRARIES = libytnef.la libytnef_la_SOURCES = \ ytnef.c nobase_include_HEADERS = \ ytnef.h \ mapi.h mapidefs.h mapitags.h \ tnef-types.h tnef-errors.h pkgconfigdir = $(libdir)/pkgconfig pkgconfig_DATA = libytnef.pc EXTRA_DIST = libytnef.spec ytnef-2.0/lib/configure.ac000066400000000000000000000010751406511276600155470ustar00rootroot00000000000000# Process this file with autoconf to produce a configure script. AC_INIT(libytnef, 1.7, randall.hand@gmail.com) AM_INIT_AUTOMAKE AC_CONFIG_SRCDIR([ytnef.c]) AM_CONFIG_HEADER([config.h]) # Checks for programs. AC_PROG_CC AC_PROG_LIBTOOL # Checks for libraries. # Checks for header files. AC_HEADER_STDC AC_CHECK_HEADERS([stdlib.h string.h]) # Checks for typedefs, structures, and compiler characteristics. AC_C_BIGENDIAN # Checks for library functions. AC_FUNC_MALLOC AC_CHECK_FUNCS([memset]) AC_CONFIG_FILES([Makefile libytnef.pc]) AC_OUTPUT AC_OUTPUT(libytnef.spec) ytnef-2.0/lib/doc/000077500000000000000000000000001406511276600140235ustar00rootroot00000000000000ytnef-2.0/lib/doc/recurrence.txt000066400000000000000000000336541406511276600167340ustar00rootroot00000000000000Pseudocode ---------- All position offsets are from the beginning of the 0x8216 MAPI ID. The existence of this MAPI ID with nonzero length should signify a recurrence. Constants: week_table { 0x02 = Monday 0x04 = Tuesday 0x08 = Wednesday 0x10 = Thursday 0x20 = Friday 0x40 = Saturday 0x01 = Sunday } Bitwise OR of above makes multiple selection of days month_table { 0x0000 = January 0x60AE = February 0xE04B = March 0x40FA = April 0x00A3 = May 0x6051 = June 0x20FA = July 0x80A8 = August 0xE056 = September 0xA0FF = October 0x00AE = November 0xC056 = December } switch on value of position 0x04 case 0x0A daily_recurrence() case 0x0B weekly_recurrence() case 0x0C monthly_recurrence() case 0x0D yearly_recurrence() sub daily_occurrence { # There are 2 types of daily recurrences # 1 - Every X days # 2 - Every weekday (Mon-Fri) # Each can have either an indefinite period, or end after Y # recurrences if position 0x16 == (0x23 or 0x22 or 0x21) # This is type 1 above X = value for MAPI Code: [UD:x0011] if position 0x16 == 0x23 no ending period (indefinite) elsif position 0x16 == (0x22 or 0x21) Y = positions 0x1B 0x1A # (i.e. if 0x1B = 0x03, and 0x1A = 0xE7, num = 0x03E7 = 999 occurrences) elsif position 0x16 == 0x3E # This is type 2 above if position 0x1A == 0x23 no ending period (indefinite) elsif position 0x1A == (0x22 or 0x21) Y = positions 0x1F 0x1E # (i.e. if 0x1F = 0x03, and 0x1E = 0xE7, num = 0x03E7 = 999 occurrences) } sub weekly_recurrence { # Every X week(s) on Y day # (Y is day of week, e.g. Monday) # There can be an indefinite period, or end after Z recurrences X = position 0x0E Y = position 0x16 (according to week_table above) if position 0x1A == 0x23 no ending period (indefinite) elsif position 0x1A == (0x22 or 0x21) Z = positions 0x1F 0x1E # (i.e. if 0x1F = 0x03, and 0x1E = 0xE7, num = 0x03E7 = 999 occurrences) } sub monthly_recurrence { # There are 2 types of monthly recurrences # 1 - Day X of every Y month(s) # 2 - The Xth Y of every Z month(s) # (where X is First,Second,Third,Fourth,Last and # Y is Dayname,Weekday,Weekend Day,Day (any)) # # Each can have either an indefinite period, or end after N # recurrences if position 0x06 == 0x02 # This is type 1 above X = position 0x16 Y = position 0x0E if position 0x1A == 0x23 no ending period (indefinite) elsif position 0x1A == (0x22 or 0x21) N = positions 0x1F 0x1E # (i.e. if 0x1F = 0x03, and 0x1E = 0xE7, num = 0x03E7 = 999 occurrences) elsif position 0x06 == 0x03 # This is type 2 above X = position 0x1A (0x01 = First ... 0x05 = Last) Y = position 0x16 (according to week_table above) # Y can also take the following special values not in week_table: # 0x7F = any day (i.e. 2nd day of month) # 0x3E = weekday (Mon-Fri) # 0x41 = weekend day (Sat, Sun) Z = position 0x0E if position 0x1E == 0x23 no ending period (indefinite) elsif position 0x1E == (0x22 or 0x21) N = positions 0x23 0x22 # (i.e. if 0x23 = 0x03, and 0x22 = 0xE7, num = 0x03E7 = 999 occurrences) } sub yearly_recurrence { # There are 2 types of yearly recurrences # 1 - Every X Y # (where X is month name, Y is day number) # 2 - The Xth Y of Z # (where X is First,Second,Third,Fourth,Last and Y # Y is Dayname,Weekday,Weekend Day,Day (any) and Z is month name) # # Each can have either an indefinite period, or end after N # recurrences if position 0x06 == 0x02 # This is type 1 above X = positions 0x0A 0x0B (according to month_table above) Y = position 0x16 if position 0x1A == 0x23 no ending period (indefinite) elsif position 0x1A == (0x22 or 0x21) N = positions 0x1F 0x1E # (i.e. if 0x1F = 0x03, and 0x1E = 0xE7, num = 0x03E7 = 999 occurrences) elsif position 0x06 == 0x03 # This is type 2 above X = position 0x1A (0x01 = First ... 0x05 = Last) Y = position 0x16 (according to week_table above) # Y can also take the following special values not in week_table: # 0x7F = any day (i.e. 2nd day of month) # 0x3E = weekday (Mon-Fri) # 0x41 = weekend day (Sat, Sun) Z = positions 0x0A 0x0B (according to month_table above) if position 0x1E == 0x23 no ending period (indefinite) elsif position 0x1E = (0x22 or 0x21) N = positions 0x23 0x22 # (i.e. if 0x23 = 0x03, and 0x22 = 0xE7, num = 0x03E7 = 999 occurrences) } Details ------- Daily Occurrences ----------------- Position 0x04 = 0x0A always Position 0x0A 0x0B 0x0C 0x0D 0x0E 0x0F 0x10 -------------------------------------------------------------------- Every 1 day 0x00 0x00 0x00 0x00 0xA0 0x05 0x00 Every 2 days 0x00 0x00 0x00 0x00 0x40 0x0B 0x00 Every 3 days 0xA0 0x05 0x00 0x00 0xE0 0x10 0x00 Every 4 days 0x00 0x00 0x00 0x00 0x80 0x16 0x00 Every 16 days 0x80 0x16 0x00 0x00 0x00 0x5A 0x00 Every 999 days 0x60 0x1E 0x09 0x00 0x60 0xF3 0x15 0x16 = (0x23 or 0x22) every X days 0x3E every weekday X = value for MAPI Code: [UD:x0011] Ending time logic: If position 0x16 == 0x23 No end (indefinite) elsif position 0x16 == 0x22 num of occurrences = 0x1B 0x1A (i.e. if 0x1B = 0x03, and 0x1A = 0xE7, num = 0x03E7 = 999 occurrences) elsif position 0x16 == 0x3E if position 0x1A == 0x23 No end (indefinite) elsif position 0x1A == 0x22 num of occurrences = 0x1F 0x1E (i.e. if 0x1F = 0x03, and 0x1E = 0xE7, num = 0x03E7 = 999 occurrences) Weekly Occurrences ------------------ Position 0x04 = 0x0B always These byte positions seem to designate how often recurrence occurs 99 = max week interval Position 0x0A 0x0B 0x0C 0x0E -------------------------------------------- Every 1 week 0xC0 0x21 0x00 0x01 Every 2 weeks 0x20 0x49 0x00 0x02 Every 3 weeks 0x20 0x49 0x00 0x03 Every 9 weeks 0x40 0xBF 0x00 0x09 Every 10 weeks 0x60 0x35 0x01 0x0A Every 99 weeks 0x20 0xAB 0x07 0x63 Every 1 week, these byte positions seem to indicate weekday Position 0x16 0x2E 0x2F ------------------------------------ Monday 0x02 0x40 0xD3 Tuesday 0x04 0xE0 0xD8 Wednesday 0x08 0x80 0xDE Thursday 0x10 0x20 0xE4 Friday 0x20 0xC0 0xE9 Saturday 0x40 0x60 0xEF Sunday 0x01 0x00 0xF5 Logic: Weekly Occurrence = Position 0x04 = 0x0B Every X weeks on weekday Y X = Position 0x0E Y = Position 0x16 0x02 = Monday 0x04 = Tuesday 0x08 = Wednesday 0x10 = Thursday 0x20 = Friday 0x40 = Saturday 0x01 = Sunday Ending time Position 0x1A 0x1E 0x1F 0x32 0x33 0x34 0x35 -------------------------------------------------------------------- no end 0x23 0x0A 0x00 0xDF 0x80 0xE9 0x5A 1 occurrence 0x22 0x01 0x00 0xE0 0xD8 0xA3 0x0C 2 occurrences 0x22 0x02 0x00 0x40 0x00 0xA4 0x0C 9 occurrences 0x22 0x09 0x00 0xE0 0x13 0xA5 0x0C 10 occurrences 0x22 0x0A 0x00 0x40 0x3B 0xA5 0x0C 11 occurrences 0x22 0x0B 0x00 0xA0 0x62 0xA5 0x0C 231 occurrences 0x22 0xE7 0x00 0x20 0x39 0xC7 0x0C 232 occurrences 0x22 0xE8 0x00 0x80 0x60 0xC7 0x0C 998 occurrences 0x22 0xE6 0x03 0xC0 0x31 0x3D 0x0D 999 occurrences 0x22 0xE7 0x03 0x20 0x59 0x3D 0x0D Ending time logic: If position 0x1A == 0x23 No end (indefinite) elsif position 0x1A == 0x22 num of occurrences = 0x1F 0x1E (i.e. if 0x1F = 0x03, and 0x1E = 0xE7, num = 0x03E7 = 999 occurrences) Ending date goes by same logic as above. Number of occurrences is calculated by Outlook, and there is no end date value stored. Monthly Recurrences ------------------- Position 0x04 = 0x0C always Position 0x04 0x0E 0x16 0x2E 0x2F ------------------------------------------------------------ 6th, every 1 month 0x0C 0x01 0x06 0x00 0x4F 16th, every 1 month 0x0C 0x01 0x10 0xE0 0xD8 16th, every 2 month 0x0C 0x02 0x10 0xE0 0xD8 17th, every 1 month 0x0C 0x01 0x11 0x80 0xDE 28th, every 1 month 0x0C 0x01 0x1C 0x60 0x1C 31st, every 1 month 0x0C 0x01 0x1F 0x40 0x2D 0x06 = 0x02 0x16 = day of month 0x0E = every X month Ending time logic: If position 0x1A == 0x23 No end (indefinite) elsif position 0x1A == 0x22 num of occurrences = 0x1F 0x1E (i.e. if 0x1F = 0x03, and 0x1E = 0xE7, num = 0x03E7 = 999 occurrences) Position 0x04 0x06 0x0E 0x16 0x1A -------------------------------------------------------------------- Every 1 month, 3rd Tuesday 0x0C 0x03 0x01 0x04 0x03 Every 1 month, 4th Tuesday 0x0C 0x03 0x01 0x04 0x04 Every 1 month, last Tuesday 0x0C 0x03 0x01 0x04 0x05 Every 99 months, last Tuesday 0x0C 0x03 0x63 0x04 0x05 Every 2 months, 2nd Wednesday 0x0C 0x03 0x02 0x08 0x02 Every 2 months, 2nd day 0x0C 0x03 0x02 0x7F 0x02 Every 2 months, 2nd weekday 0x0C 0x03 0x02 0x3E 0x02 Every 2 months, 2nd weekendday 0x0C 0x03 0x02 0x41 0x02 0x06 = 0x03 when using Every X month, Yth Z day of week 0x16 = Z day of week (as above) or 0x7F = any day (i.e. 2nd day of month) 0x3E = weekday (Mon-Fri) 0x41 = weekend day (Sat, Sun) 0x1A = Yth day (0x01 = First ... 0x05 = Last) 0x0E = every X month Ending time logic: If position 0x1E == 0x23 No end (indefinite) elsif position 0x1E == 0x22 num of occurrences = 0x23 0x22 (i.e. if 0x23 = 0x03, and 0x22 = 0xE7, num = 0x03E7 = 999 occurrences) Yearly Occurrences ------------------ Position 0x04 = 0x0D always Position 0x04 0x0C 0x16 0x30 ---------------------------------------------------- Every 1 year, 03-16 0x0D 0x01 0x10 0xA3 Every 1 year, 04-16 0x0D 0x01 0x10 0xA4 Every 1 year, 05-16 0x0D 0x01 0x10 0xA5 0x06 = 0x02 0x0A 0x0B = month 0x16 = day number Ending time logic: If position 0x1A == 0x23 No end (indefinite) elsif position 0x1A == 0x22 num of occurrences = 0x1F 0x1E (i.e. if 0x1F = 0x03, and 0x1E = 0xE7, num = 0x03E7 = 999 occurrences) Position 0x04 0x1A 0x16 0x0A 0x0B 0x32 0x33 0x34 ------------------------------------------------------------------------------------ 1st Tuesday of January 0x0D 0x01 0x04 0x00 0x00 0x20 0x4F 0xA2 1st Tuesday of February 0x0D 0x01 0x04 0x60 0xAE 0x20 0xEC 0xAA 2nd Tuesday of March 0x0D 0x02 0x04 0xE0 0x4B 0x80 0xB1 0xA3 3rd Tuesday of March 0x0D 0x03 0x04 0xE0 0x4B 0x60 0xD8 0xAB 3rd Tuesday of April 0x0D 0x03 0x04 0x40 0xFA 0xC0 0x9D 0xA4 3rd Tuesday of May 0x0D 0x03 0x04 0x00 0xA3 0x40 0x3B 0xA5 2nd Tuesday of May 0x0D 0x02 0x04 0x00 0xA3 0x60 0x13 0xAD 1st Tuesday of June 0x0D 0x01 0x04 0x60 0x51 0x00 0x8A 0xA5 1st Tuesday of July 0x0D 0x01 0x04 0x20 0xFA 0xE0 0x4E 0xA6 1st Tuesday of August 0x0D 0x01 0x04 0x80 0xA8 0x60 0xEC 0xA6 1st Tuesday of Septemb 0x0D 0x01 0x04 0xE0 0x56 0x40 0xB1 0xA7 1st Tuesday of October 0x0D 0x01 0x04 0xA0 0xFF 0xC0 0x4E 0xA8 1st Tuesday of Novemb 0x0D 0x01 0x04 0x00 0xAE 0x40 0xEC 0xA8 1st Tuesday of Decemb 0x0D 0x01 0x04 0xC0 0x56 0x20 0xB1 0xA9 0x06 = 0x03 when using Every Xth Y day of Z month 0x1A = X 0x16 = Y day of week (as above) or 0x7F = any day (i.e. 2nd day of month) 0x3E = weekday (Mon-Fri) 0x41 = weekend day (Sat, Sun) 0x0A 0x0B = Z month 0x0000 = January 0x60AE = February 0xE04B = March 0x40FA = April 0x00A3 = May 0x6051 = June 0x20FA = July 0x80A8 = August 0xE056 = September 0xA0FF = October 0x00AE = November 0xC056 = December Ending time logic: If position 0x1E == 0x23 No end (indefinite) elsif position 0x1E == 0x22 num of occurrences = 0x23 0x22 (i.e. if 0x23 = 0x03, and 0x22 = 0xE7, num = 0x03E7 = 999 occurrences) Notes ----- Outlook only sends cancellation when deleting recurrence, not specific entry ytnef-2.0/lib/libytnef.pc.in000066400000000000000000000003751406511276600160300ustar00rootroot00000000000000prefix=@prefix@ exec_prefix=@exec_prefix@ libdir=@libdir@ includedir=@includedir@ Name: libytnef Description: Yerase's TNEF Stream Reader library URL: https://github.com/Yeraze/ytnef Version: @VERSION@ Libs: -L${libdir} -lytnef Cflags: -I${includedir} ytnef-2.0/lib/ltmain.sh000066400000000000000000011707711406511276600151140ustar00rootroot00000000000000#! /bin/sh ## DO NOT EDIT - This file generated from ./build-aux/ltmain.in ## by inline-source v2014-01-03.01 # libtool (GNU libtool) 2.4.6 # Provide generalized library-building support services. # Written by Gordon Matzigkeit , 1996 # Copyright (C) 1996-2015 Free Software Foundation, Inc. # This is free software; see the source for copying conditions. There is NO # warranty; not even for MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. # GNU Libtool 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. # # As a special exception to the GNU General Public License, # if you distribute this file as part of a program or library that # is built using GNU Libtool, you may include this file under the # same distribution terms that you use for the rest of that program. # # GNU Libtool 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, see . PROGRAM=libtool PACKAGE=libtool VERSION=2.4.6 package_revision=2.4.6 ## ------ ## ## Usage. ## ## ------ ## # Run './libtool --help' for help with using this script from the # command line. ## ------------------------------- ## ## User overridable command paths. ## ## ------------------------------- ## # After configure completes, it has a better idea of some of the # shell tools we need than the defaults used by the functions shared # with bootstrap, so set those here where they can still be over- # ridden by the user, but otherwise take precedence. : ${AUTOCONF="autoconf"} : ${AUTOMAKE="automake"} ## -------------------------- ## ## Source external libraries. ## ## -------------------------- ## # Much of our low-level functionality needs to be sourced from external # libraries, which are installed to $pkgauxdir. # Set a version string for this script. scriptversion=2015-01-20.17; # UTC # General shell script boiler plate, and helper functions. # Written by Gary V. Vaughan, 2004 # Copyright (C) 2004-2015 Free Software Foundation, Inc. # This is free software; see the source for copying conditions. There is NO # warranty; not even for MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. # 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 3 of the License, or # (at your option) any later version. # As a special exception to the GNU General Public License, if you distribute # this file as part of a program or library that is built using GNU Libtool, # you may include this file under the same distribution terms that you use # for the rest of that program. # This program is distributed in the hope that it will be useful, # but WITHOUT ANY WARRANTY; without even the implied warranty of # MERCHANTABILITY or FITNES 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, see . # Please report bugs or propose patches to gary@gnu.org. ## ------ ## ## Usage. ## ## ------ ## # Evaluate this file near the top of your script to gain access to # the functions and variables defined here: # # . `echo "$0" | ${SED-sed} 's|[^/]*$||'`/build-aux/funclib.sh # # If you need to override any of the default environment variable # settings, do that before evaluating this file. ## -------------------- ## ## Shell normalisation. ## ## -------------------- ## # Some shells need a little help to be as Bourne compatible as possible. # Before doing anything else, make sure all that help has been provided! DUALCASE=1; export DUALCASE # for MKS sh if test -n "${ZSH_VERSION+set}" && (emulate sh) >/dev/null 2>&1; then : emulate sh NULLCMD=: # Pre-4.2 versions of Zsh do word splitting on ${1+"$@"}, which # is contrary to our usage. Disable this feature. alias -g '${1+"$@"}'='"$@"' setopt NO_GLOB_SUBST else case `(set -o) 2>/dev/null` in *posix*) set -o posix ;; esac fi # NLS nuisances: We save the old values in case they are required later. _G_user_locale= _G_safe_locale= for _G_var in LANG LANGUAGE LC_ALL LC_CTYPE LC_COLLATE LC_MESSAGES do eval "if test set = \"\${$_G_var+set}\"; then save_$_G_var=\$$_G_var $_G_var=C export $_G_var _G_user_locale=\"$_G_var=\\\$save_\$_G_var; \$_G_user_locale\" _G_safe_locale=\"$_G_var=C; \$_G_safe_locale\" fi" done # CDPATH. (unset CDPATH) >/dev/null 2>&1 && unset CDPATH # Make sure IFS has a sensible default sp=' ' nl=' ' IFS="$sp $nl" # There are apparently some retarded systems that use ';' as a PATH separator! if test "${PATH_SEPARATOR+set}" != set; then PATH_SEPARATOR=: (PATH='/bin;/bin'; FPATH=$PATH; sh -c :) >/dev/null 2>&1 && { (PATH='/bin:/bin'; FPATH=$PATH; sh -c :) >/dev/null 2>&1 || PATH_SEPARATOR=';' } fi ## ------------------------- ## ## Locate command utilities. ## ## ------------------------- ## # func_executable_p FILE # ---------------------- # Check that FILE is an executable regular file. func_executable_p () { test -f "$1" && test -x "$1" } # func_path_progs PROGS_LIST CHECK_FUNC [PATH] # -------------------------------------------- # Search for either a program that responds to --version with output # containing "GNU", or else returned by CHECK_FUNC otherwise, by # trying all the directories in PATH with each of the elements of # PROGS_LIST. # # CHECK_FUNC should accept the path to a candidate program, and # set $func_check_prog_result if it truncates its output less than # $_G_path_prog_max characters. func_path_progs () { _G_progs_list=$1 _G_check_func=$2 _G_PATH=${3-"$PATH"} _G_path_prog_max=0 _G_path_prog_found=false _G_save_IFS=$IFS; IFS=${PATH_SEPARATOR-:} for _G_dir in $_G_PATH; do IFS=$_G_save_IFS test -z "$_G_dir" && _G_dir=. for _G_prog_name in $_G_progs_list; do for _exeext in '' .EXE; do _G_path_prog=$_G_dir/$_G_prog_name$_exeext func_executable_p "$_G_path_prog" || continue case `"$_G_path_prog" --version 2>&1` in *GNU*) func_path_progs_result=$_G_path_prog _G_path_prog_found=: ;; *) $_G_check_func $_G_path_prog func_path_progs_result=$func_check_prog_result ;; esac $_G_path_prog_found && break 3 done done done IFS=$_G_save_IFS test -z "$func_path_progs_result" && { echo "no acceptable sed could be found in \$PATH" >&2 exit 1 } } # We want to be able to use the functions in this file before configure # has figured out where the best binaries are kept, which means we have # to search for them ourselves - except when the results are already set # where we skip the searches. # Unless the user overrides by setting SED, search the path for either GNU # sed, or the sed that truncates its output the least. test -z "$SED" && { _G_sed_script=s/aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa/bbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbb/ for _G_i in 1 2 3 4 5 6 7; do _G_sed_script=$_G_sed_script$nl$_G_sed_script done echo "$_G_sed_script" 2>/dev/null | sed 99q >conftest.sed _G_sed_script= func_check_prog_sed () { _G_path_prog=$1 _G_count=0 printf 0123456789 >conftest.in while : do cat conftest.in conftest.in >conftest.tmp mv conftest.tmp conftest.in cp conftest.in conftest.nl echo '' >> conftest.nl "$_G_path_prog" -f conftest.sed conftest.out 2>/dev/null || break diff conftest.out conftest.nl >/dev/null 2>&1 || break _G_count=`expr $_G_count + 1` if test "$_G_count" -gt "$_G_path_prog_max"; then # Best one so far, save it but keep looking for a better one func_check_prog_result=$_G_path_prog _G_path_prog_max=$_G_count fi # 10*(2^10) chars as input seems more than enough test 10 -lt "$_G_count" && break done rm -f conftest.in conftest.tmp conftest.nl conftest.out } func_path_progs "sed gsed" func_check_prog_sed $PATH:/usr/xpg4/bin rm -f conftest.sed SED=$func_path_progs_result } # Unless the user overrides by setting GREP, search the path for either GNU # grep, or the grep that truncates its output the least. test -z "$GREP" && { func_check_prog_grep () { _G_path_prog=$1 _G_count=0 _G_path_prog_max=0 printf 0123456789 >conftest.in while : do cat conftest.in conftest.in >conftest.tmp mv conftest.tmp conftest.in cp conftest.in conftest.nl echo 'GREP' >> conftest.nl "$_G_path_prog" -e 'GREP$' -e '-(cannot match)-' conftest.out 2>/dev/null || break diff conftest.out conftest.nl >/dev/null 2>&1 || break _G_count=`expr $_G_count + 1` if test "$_G_count" -gt "$_G_path_prog_max"; then # Best one so far, save it but keep looking for a better one func_check_prog_result=$_G_path_prog _G_path_prog_max=$_G_count fi # 10*(2^10) chars as input seems more than enough test 10 -lt "$_G_count" && break done rm -f conftest.in conftest.tmp conftest.nl conftest.out } func_path_progs "grep ggrep" func_check_prog_grep $PATH:/usr/xpg4/bin GREP=$func_path_progs_result } ## ------------------------------- ## ## User overridable command paths. ## ## ------------------------------- ## # All uppercase variable names are used for environment variables. These # variables can be overridden by the user before calling a script that # uses them if a suitable command of that name is not already available # in the command search PATH. : ${CP="cp -f"} : ${ECHO="printf %s\n"} : ${EGREP="$GREP -E"} : ${FGREP="$GREP -F"} : ${LN_S="ln -s"} : ${MAKE="make"} : ${MKDIR="mkdir"} : ${MV="mv -f"} : ${RM="rm -f"} : ${SHELL="${CONFIG_SHELL-/bin/sh}"} ## -------------------- ## ## Useful sed snippets. ## ## -------------------- ## sed_dirname='s|/[^/]*$||' sed_basename='s|^.*/||' # Sed substitution that helps us do robust quoting. It backslashifies # metacharacters that are still active within double-quoted strings. sed_quote_subst='s|\([`"$\\]\)|\\\1|g' # Same as above, but do not quote variable references. sed_double_quote_subst='s/\(["`\\]\)/\\\1/g' # Sed substitution that turns a string into a regex matching for the # string literally. sed_make_literal_regex='s|[].[^$\\*\/]|\\&|g' # Sed substitution that converts a w32 file name or path # that contains forward slashes, into one that contains # (escaped) backslashes. A very naive implementation. sed_naive_backslashify='s|\\\\*|\\|g;s|/|\\|g;s|\\|\\\\|g' # Re-'\' parameter expansions in output of sed_double_quote_subst that # were '\'-ed in input to the same. If an odd number of '\' preceded a # '$' in input to sed_double_quote_subst, that '$' was protected from # expansion. Since each input '\' is now two '\'s, look for any number # of runs of four '\'s followed by two '\'s and then a '$'. '\' that '$'. _G_bs='\\' _G_bs2='\\\\' _G_bs4='\\\\\\\\' _G_dollar='\$' sed_double_backslash="\ s/$_G_bs4/&\\ /g s/^$_G_bs2$_G_dollar/$_G_bs&/ s/\\([^$_G_bs]\\)$_G_bs2$_G_dollar/\\1$_G_bs2$_G_bs$_G_dollar/g s/\n//g" ## ----------------- ## ## Global variables. ## ## ----------------- ## # Except for the global variables explicitly listed below, the following # functions in the '^func_' namespace, and the '^require_' namespace # variables initialised in the 'Resource management' section, sourcing # this file will not pollute your global namespace with anything # else. There's no portable way to scope variables in Bourne shell # though, so actually running these functions will sometimes place # results into a variable named after the function, and often use # temporary variables in the '^_G_' namespace. If you are careful to # avoid using those namespaces casually in your sourcing script, things # should continue to work as you expect. And, of course, you can freely # overwrite any of the functions or variables defined here before # calling anything to customize them. EXIT_SUCCESS=0 EXIT_FAILURE=1 EXIT_MISMATCH=63 # $? = 63 is used to indicate version mismatch to missing. EXIT_SKIP=77 # $? = 77 is used to indicate a skipped test to automake. # Allow overriding, eg assuming that you follow the convention of # putting '$debug_cmd' at the start of all your functions, you can get # bash to show function call trace with: # # debug_cmd='eval echo "${FUNCNAME[0]} $*" >&2' bash your-script-name debug_cmd=${debug_cmd-":"} exit_cmd=: # By convention, finish your script with: # # exit $exit_status # # so that you can set exit_status to non-zero if you want to indicate # something went wrong during execution without actually bailing out at # the point of failure. exit_status=$EXIT_SUCCESS # Work around backward compatibility issue on IRIX 6.5. On IRIX 6.4+, sh # is ksh but when the shell is invoked as "sh" and the current value of # the _XPG environment variable is not equal to 1 (one), the special # positional parameter $0, within a function call, is the name of the # function. progpath=$0 # The name of this program. progname=`$ECHO "$progpath" |$SED "$sed_basename"` # Make sure we have an absolute progpath for reexecution: case $progpath in [\\/]*|[A-Za-z]:\\*) ;; *[\\/]*) progdir=`$ECHO "$progpath" |$SED "$sed_dirname"` progdir=`cd "$progdir" && pwd` progpath=$progdir/$progname ;; *) _G_IFS=$IFS IFS=${PATH_SEPARATOR-:} for progdir in $PATH; do IFS=$_G_IFS test -x "$progdir/$progname" && break done IFS=$_G_IFS test -n "$progdir" || progdir=`pwd` progpath=$progdir/$progname ;; esac ## ----------------- ## ## Standard options. ## ## ----------------- ## # The following options affect the operation of the functions defined # below, and should be set appropriately depending on run-time para- # meters passed on the command line. opt_dry_run=false opt_quiet=false opt_verbose=false # Categories 'all' and 'none' are always available. Append any others # you will pass as the first argument to func_warning from your own # code. warning_categories= # By default, display warnings according to 'opt_warning_types'. Set # 'warning_func' to ':' to elide all warnings, or func_fatal_error to # treat the next displayed warning as a fatal error. warning_func=func_warn_and_continue # Set to 'all' to display all warnings, 'none' to suppress all # warnings, or a space delimited list of some subset of # 'warning_categories' to display only the listed warnings. opt_warning_types=all ## -------------------- ## ## Resource management. ## ## -------------------- ## # This section contains definitions for functions that each ensure a # particular resource (a file, or a non-empty configuration variable for # example) is available, and if appropriate to extract default values # from pertinent package files. Call them using their associated # 'require_*' variable to ensure that they are executed, at most, once. # # It's entirely deliberate that calling these functions can set # variables that don't obey the namespace limitations obeyed by the rest # of this file, in order that that they be as useful as possible to # callers. # require_term_colors # ------------------- # Allow display of bold text on terminals that support it. require_term_colors=func_require_term_colors func_require_term_colors () { $debug_cmd test -t 1 && { # COLORTERM and USE_ANSI_COLORS environment variables take # precedence, because most terminfo databases neglect to describe # whether color sequences are supported. test -n "${COLORTERM+set}" && : ${USE_ANSI_COLORS="1"} if test 1 = "$USE_ANSI_COLORS"; then # Standard ANSI escape sequences tc_reset='' tc_bold=''; tc_standout='' tc_red=''; tc_green='' tc_blue=''; tc_cyan='' else # Otherwise trust the terminfo database after all. test -n "`tput sgr0 2>/dev/null`" && { tc_reset=`tput sgr0` test -n "`tput bold 2>/dev/null`" && tc_bold=`tput bold` tc_standout=$tc_bold test -n "`tput smso 2>/dev/null`" && tc_standout=`tput smso` test -n "`tput setaf 1 2>/dev/null`" && tc_red=`tput setaf 1` test -n "`tput setaf 2 2>/dev/null`" && tc_green=`tput setaf 2` test -n "`tput setaf 4 2>/dev/null`" && tc_blue=`tput setaf 4` test -n "`tput setaf 5 2>/dev/null`" && tc_cyan=`tput setaf 5` } fi } require_term_colors=: } ## ----------------- ## ## Function library. ## ## ----------------- ## # This section contains a variety of useful functions to call in your # scripts. Take note of the portable wrappers for features provided by # some modern shells, which will fall back to slower equivalents on # less featureful shells. # func_append VAR VALUE # --------------------- # Append VALUE onto the existing contents of VAR. # We should try to minimise forks, especially on Windows where they are # unreasonably slow, so skip the feature probes when bash or zsh are # being used: if test set = "${BASH_VERSION+set}${ZSH_VERSION+set}"; then : ${_G_HAVE_ARITH_OP="yes"} : ${_G_HAVE_XSI_OPS="yes"} # The += operator was introduced in bash 3.1 case $BASH_VERSION in [12].* | 3.0 | 3.0*) ;; *) : ${_G_HAVE_PLUSEQ_OP="yes"} ;; esac fi # _G_HAVE_PLUSEQ_OP # Can be empty, in which case the shell is probed, "yes" if += is # useable or anything else if it does not work. test -z "$_G_HAVE_PLUSEQ_OP" \ && (eval 'x=a; x+=" b"; test "a b" = "$x"') 2>/dev/null \ && _G_HAVE_PLUSEQ_OP=yes if test yes = "$_G_HAVE_PLUSEQ_OP" then # This is an XSI compatible shell, allowing a faster implementation... eval 'func_append () { $debug_cmd eval "$1+=\$2" }' else # ...otherwise fall back to using expr, which is often a shell builtin. func_append () { $debug_cmd eval "$1=\$$1\$2" } fi # func_append_quoted VAR VALUE # ---------------------------- # Quote VALUE and append to the end of shell variable VAR, separated # by a space. if test yes = "$_G_HAVE_PLUSEQ_OP"; then eval 'func_append_quoted () { $debug_cmd func_quote_for_eval "$2" eval "$1+=\\ \$func_quote_for_eval_result" }' else func_append_quoted () { $debug_cmd func_quote_for_eval "$2" eval "$1=\$$1\\ \$func_quote_for_eval_result" } fi # func_append_uniq VAR VALUE # -------------------------- # Append unique VALUE onto the existing contents of VAR, assuming # entries are delimited by the first character of VALUE. For example: # # func_append_uniq options " --another-option option-argument" # # will only append to $options if " --another-option option-argument " # is not already present somewhere in $options already (note spaces at # each end implied by leading space in second argument). func_append_uniq () { $debug_cmd eval _G_current_value='`$ECHO $'$1'`' _G_delim=`expr "$2" : '\(.\)'` case $_G_delim$_G_current_value$_G_delim in *"$2$_G_delim"*) ;; *) func_append "$@" ;; esac } # func_arith TERM... # ------------------ # Set func_arith_result to the result of evaluating TERMs. test -z "$_G_HAVE_ARITH_OP" \ && (eval 'test 2 = $(( 1 + 1 ))') 2>/dev/null \ && _G_HAVE_ARITH_OP=yes if test yes = "$_G_HAVE_ARITH_OP"; then eval 'func_arith () { $debug_cmd func_arith_result=$(( $* )) }' else func_arith () { $debug_cmd func_arith_result=`expr "$@"` } fi # func_basename FILE # ------------------ # Set func_basename_result to FILE with everything up to and including # the last / stripped. if test yes = "$_G_HAVE_XSI_OPS"; then # If this shell supports suffix pattern removal, then use it to avoid # forking. Hide the definitions single quotes in case the shell chokes # on unsupported syntax... _b='func_basename_result=${1##*/}' _d='case $1 in */*) func_dirname_result=${1%/*}$2 ;; * ) func_dirname_result=$3 ;; esac' else # ...otherwise fall back to using sed. _b='func_basename_result=`$ECHO "$1" |$SED "$sed_basename"`' _d='func_dirname_result=`$ECHO "$1" |$SED "$sed_dirname"` if test "X$func_dirname_result" = "X$1"; then func_dirname_result=$3 else func_append func_dirname_result "$2" fi' fi eval 'func_basename () { $debug_cmd '"$_b"' }' # func_dirname FILE APPEND NONDIR_REPLACEMENT # ------------------------------------------- # Compute the dirname of FILE. If nonempty, add APPEND to the result, # otherwise set result to NONDIR_REPLACEMENT. eval 'func_dirname () { $debug_cmd '"$_d"' }' # func_dirname_and_basename FILE APPEND NONDIR_REPLACEMENT # -------------------------------------------------------- # Perform func_basename and func_dirname in a single function # call: # dirname: Compute the dirname of FILE. If nonempty, # add APPEND to the result, otherwise set result # to NONDIR_REPLACEMENT. # value returned in "$func_dirname_result" # basename: Compute filename of FILE. # value retuned in "$func_basename_result" # For efficiency, we do not delegate to the functions above but instead # duplicate the functionality here. eval 'func_dirname_and_basename () { $debug_cmd '"$_b"' '"$_d"' }' # func_echo ARG... # ---------------- # Echo program name prefixed message. func_echo () { $debug_cmd _G_message=$* func_echo_IFS=$IFS IFS=$nl for _G_line in $_G_message; do IFS=$func_echo_IFS $ECHO "$progname: $_G_line" done IFS=$func_echo_IFS } # func_echo_all ARG... # -------------------- # Invoke $ECHO with all args, space-separated. func_echo_all () { $ECHO "$*" } # func_echo_infix_1 INFIX ARG... # ------------------------------ # Echo program name, followed by INFIX on the first line, with any # additional lines not showing INFIX. func_echo_infix_1 () { $debug_cmd $require_term_colors _G_infix=$1; shift _G_indent=$_G_infix _G_prefix="$progname: $_G_infix: " _G_message=$* # Strip color escape sequences before counting printable length for _G_tc in "$tc_reset" "$tc_bold" "$tc_standout" "$tc_red" "$tc_green" "$tc_blue" "$tc_cyan" do test -n "$_G_tc" && { _G_esc_tc=`$ECHO "$_G_tc" | $SED "$sed_make_literal_regex"` _G_indent=`$ECHO "$_G_indent" | $SED "s|$_G_esc_tc||g"` } done _G_indent="$progname: "`echo "$_G_indent" | $SED 's|.| |g'`" " ## exclude from sc_prohibit_nested_quotes func_echo_infix_1_IFS=$IFS IFS=$nl for _G_line in $_G_message; do IFS=$func_echo_infix_1_IFS $ECHO "$_G_prefix$tc_bold$_G_line$tc_reset" >&2 _G_prefix=$_G_indent done IFS=$func_echo_infix_1_IFS } # func_error ARG... # ----------------- # Echo program name prefixed message to standard error. func_error () { $debug_cmd $require_term_colors func_echo_infix_1 " $tc_standout${tc_red}error$tc_reset" "$*" >&2 } # func_fatal_error ARG... # ----------------------- # Echo program name prefixed message to standard error, and exit. func_fatal_error () { $debug_cmd func_error "$*" exit $EXIT_FAILURE } # func_grep EXPRESSION FILENAME # ----------------------------- # Check whether EXPRESSION matches any line of FILENAME, without output. func_grep () { $debug_cmd $GREP "$1" "$2" >/dev/null 2>&1 } # func_len STRING # --------------- # Set func_len_result to the length of STRING. STRING may not # start with a hyphen. test -z "$_G_HAVE_XSI_OPS" \ && (eval 'x=a/b/c; test 5aa/bb/cc = "${#x}${x%%/*}${x%/*}${x#*/}${x##*/}"') 2>/dev/null \ && _G_HAVE_XSI_OPS=yes if test yes = "$_G_HAVE_XSI_OPS"; then eval 'func_len () { $debug_cmd func_len_result=${#1} }' else func_len () { $debug_cmd func_len_result=`expr "$1" : ".*" 2>/dev/null || echo $max_cmd_len` } fi # func_mkdir_p DIRECTORY-PATH # --------------------------- # Make sure the entire path to DIRECTORY-PATH is available. func_mkdir_p () { $debug_cmd _G_directory_path=$1 _G_dir_list= if test -n "$_G_directory_path" && test : != "$opt_dry_run"; then # Protect directory names starting with '-' case $_G_directory_path in -*) _G_directory_path=./$_G_directory_path ;; esac # While some portion of DIR does not yet exist... while test ! -d "$_G_directory_path"; do # ...make a list in topmost first order. Use a colon delimited # list incase some portion of path contains whitespace. _G_dir_list=$_G_directory_path:$_G_dir_list # If the last portion added has no slash in it, the list is done case $_G_directory_path in */*) ;; *) break ;; esac # ...otherwise throw away the child directory and loop _G_directory_path=`$ECHO "$_G_directory_path" | $SED -e "$sed_dirname"` done _G_dir_list=`$ECHO "$_G_dir_list" | $SED 's|:*$||'` func_mkdir_p_IFS=$IFS; IFS=: for _G_dir in $_G_dir_list; do IFS=$func_mkdir_p_IFS # mkdir can fail with a 'File exist' error if two processes # try to create one of the directories concurrently. Don't # stop in that case! $MKDIR "$_G_dir" 2>/dev/null || : done IFS=$func_mkdir_p_IFS # Bail out if we (or some other process) failed to create a directory. test -d "$_G_directory_path" || \ func_fatal_error "Failed to create '$1'" fi } # func_mktempdir [BASENAME] # ------------------------- # Make a temporary directory that won't clash with other running # libtool processes, and avoids race conditions if possible. If # given, BASENAME is the basename for that directory. func_mktempdir () { $debug_cmd _G_template=${TMPDIR-/tmp}/${1-$progname} if test : = "$opt_dry_run"; then # Return a directory name, but don't create it in dry-run mode _G_tmpdir=$_G_template-$$ else # If mktemp works, use that first and foremost _G_tmpdir=`mktemp -d "$_G_template-XXXXXXXX" 2>/dev/null` if test ! -d "$_G_tmpdir"; then # Failing that, at least try and use $RANDOM to avoid a race _G_tmpdir=$_G_template-${RANDOM-0}$$ func_mktempdir_umask=`umask` umask 0077 $MKDIR "$_G_tmpdir" umask $func_mktempdir_umask fi # If we're not in dry-run mode, bomb out on failure test -d "$_G_tmpdir" || \ func_fatal_error "cannot create temporary directory '$_G_tmpdir'" fi $ECHO "$_G_tmpdir" } # func_normal_abspath PATH # ------------------------ # Remove doubled-up and trailing slashes, "." path components, # and cancel out any ".." path components in PATH after making # it an absolute path. func_normal_abspath () { $debug_cmd # These SED scripts presuppose an absolute path with a trailing slash. _G_pathcar='s|^/\([^/]*\).*$|\1|' _G_pathcdr='s|^/[^/]*||' _G_removedotparts=':dotsl s|/\./|/|g t dotsl s|/\.$|/|' _G_collapseslashes='s|/\{1,\}|/|g' _G_finalslash='s|/*$|/|' # Start from root dir and reassemble the path. func_normal_abspath_result= func_normal_abspath_tpath=$1 func_normal_abspath_altnamespace= case $func_normal_abspath_tpath in "") # Empty path, that just means $cwd. func_stripname '' '/' "`pwd`" func_normal_abspath_result=$func_stripname_result return ;; # The next three entries are used to spot a run of precisely # two leading slashes without using negated character classes; # we take advantage of case's first-match behaviour. ///*) # Unusual form of absolute path, do nothing. ;; //*) # Not necessarily an ordinary path; POSIX reserves leading '//' # and for example Cygwin uses it to access remote file shares # over CIFS/SMB, so we conserve a leading double slash if found. func_normal_abspath_altnamespace=/ ;; /*) # Absolute path, do nothing. ;; *) # Relative path, prepend $cwd. func_normal_abspath_tpath=`pwd`/$func_normal_abspath_tpath ;; esac # Cancel out all the simple stuff to save iterations. We also want # the path to end with a slash for ease of parsing, so make sure # there is one (and only one) here. func_normal_abspath_tpath=`$ECHO "$func_normal_abspath_tpath" | $SED \ -e "$_G_removedotparts" -e "$_G_collapseslashes" -e "$_G_finalslash"` while :; do # Processed it all yet? if test / = "$func_normal_abspath_tpath"; then # If we ascended to the root using ".." the result may be empty now. if test -z "$func_normal_abspath_result"; then func_normal_abspath_result=/ fi break fi func_normal_abspath_tcomponent=`$ECHO "$func_normal_abspath_tpath" | $SED \ -e "$_G_pathcar"` func_normal_abspath_tpath=`$ECHO "$func_normal_abspath_tpath" | $SED \ -e "$_G_pathcdr"` # Figure out what to do with it case $func_normal_abspath_tcomponent in "") # Trailing empty path component, ignore it. ;; ..) # Parent dir; strip last assembled component from result. func_dirname "$func_normal_abspath_result" func_normal_abspath_result=$func_dirname_result ;; *) # Actual path component, append it. func_append func_normal_abspath_result "/$func_normal_abspath_tcomponent" ;; esac done # Restore leading double-slash if one was found on entry. func_normal_abspath_result=$func_normal_abspath_altnamespace$func_normal_abspath_result } # func_notquiet ARG... # -------------------- # Echo program name prefixed message only when not in quiet mode. func_notquiet () { $debug_cmd $opt_quiet || func_echo ${1+"$@"} # A bug in bash halts the script if the last line of a function # fails when set -e is in force, so we need another command to # work around that: : } # func_relative_path SRCDIR DSTDIR # -------------------------------- # Set func_relative_path_result to the relative path from SRCDIR to DSTDIR. func_relative_path () { $debug_cmd func_relative_path_result= func_normal_abspath "$1" func_relative_path_tlibdir=$func_normal_abspath_result func_normal_abspath "$2" func_relative_path_tbindir=$func_normal_abspath_result # Ascend the tree starting from libdir while :; do # check if we have found a prefix of bindir case $func_relative_path_tbindir in $func_relative_path_tlibdir) # found an exact match func_relative_path_tcancelled= break ;; $func_relative_path_tlibdir*) # found a matching prefix func_stripname "$func_relative_path_tlibdir" '' "$func_relative_path_tbindir" func_relative_path_tcancelled=$func_stripname_result if test -z "$func_relative_path_result"; then func_relative_path_result=. fi break ;; *) func_dirname $func_relative_path_tlibdir func_relative_path_tlibdir=$func_dirname_result if test -z "$func_relative_path_tlibdir"; then # Have to descend all the way to the root! func_relative_path_result=../$func_relative_path_result func_relative_path_tcancelled=$func_relative_path_tbindir break fi func_relative_path_result=../$func_relative_path_result ;; esac done # Now calculate path; take care to avoid doubling-up slashes. func_stripname '' '/' "$func_relative_path_result" func_relative_path_result=$func_stripname_result func_stripname '/' '/' "$func_relative_path_tcancelled" if test -n "$func_stripname_result"; then func_append func_relative_path_result "/$func_stripname_result" fi # Normalisation. If bindir is libdir, return '.' else relative path. if test -n "$func_relative_path_result"; then func_stripname './' '' "$func_relative_path_result" func_relative_path_result=$func_stripname_result fi test -n "$func_relative_path_result" || func_relative_path_result=. : } # func_quote_for_eval ARG... # -------------------------- # Aesthetically quote ARGs to be evaled later. # This function returns two values: # i) func_quote_for_eval_result # double-quoted, suitable for a subsequent eval # ii) func_quote_for_eval_unquoted_result # has all characters that are still active within double # quotes backslashified. func_quote_for_eval () { $debug_cmd func_quote_for_eval_unquoted_result= func_quote_for_eval_result= while test 0 -lt $#; do case $1 in *[\\\`\"\$]*) _G_unquoted_arg=`printf '%s\n' "$1" |$SED "$sed_quote_subst"` ;; *) _G_unquoted_arg=$1 ;; esac if test -n "$func_quote_for_eval_unquoted_result"; then func_append func_quote_for_eval_unquoted_result " $_G_unquoted_arg" else func_append func_quote_for_eval_unquoted_result "$_G_unquoted_arg" fi case $_G_unquoted_arg in # Double-quote args containing shell metacharacters to delay # word splitting, command substitution and variable expansion # for a subsequent eval. # Many Bourne shells cannot handle close brackets correctly # in scan sets, so we specify it separately. *[\[\~\#\^\&\*\(\)\{\}\|\;\<\>\?\'\ \ ]*|*]*|"") _G_quoted_arg=\"$_G_unquoted_arg\" ;; *) _G_quoted_arg=$_G_unquoted_arg ;; esac if test -n "$func_quote_for_eval_result"; then func_append func_quote_for_eval_result " $_G_quoted_arg" else func_append func_quote_for_eval_result "$_G_quoted_arg" fi shift done } # func_quote_for_expand ARG # ------------------------- # Aesthetically quote ARG to be evaled later; same as above, # but do not quote variable references. func_quote_for_expand () { $debug_cmd case $1 in *[\\\`\"]*) _G_arg=`$ECHO "$1" | $SED \ -e "$sed_double_quote_subst" -e "$sed_double_backslash"` ;; *) _G_arg=$1 ;; esac case $_G_arg in # Double-quote args containing shell metacharacters to delay # word splitting and command substitution for a subsequent eval. # Many Bourne shells cannot handle close brackets correctly # in scan sets, so we specify it separately. *[\[\~\#\^\&\*\(\)\{\}\|\;\<\>\?\'\ \ ]*|*]*|"") _G_arg=\"$_G_arg\" ;; esac func_quote_for_expand_result=$_G_arg } # func_stripname PREFIX SUFFIX NAME # --------------------------------- # strip PREFIX and SUFFIX from NAME, and store in func_stripname_result. # PREFIX and SUFFIX must not contain globbing or regex special # characters, hashes, percent signs, but SUFFIX may contain a leading # dot (in which case that matches only a dot). if test yes = "$_G_HAVE_XSI_OPS"; then eval 'func_stripname () { $debug_cmd # pdksh 5.2.14 does not do ${X%$Y} correctly if both X and Y are # positional parameters, so assign one to ordinary variable first. func_stripname_result=$3 func_stripname_result=${func_stripname_result#"$1"} func_stripname_result=${func_stripname_result%"$2"} }' else func_stripname () { $debug_cmd case $2 in .*) func_stripname_result=`$ECHO "$3" | $SED -e "s%^$1%%" -e "s%\\\\$2\$%%"`;; *) func_stripname_result=`$ECHO "$3" | $SED -e "s%^$1%%" -e "s%$2\$%%"`;; esac } fi # func_show_eval CMD [FAIL_EXP] # ----------------------------- # Unless opt_quiet is true, then output CMD. Then, if opt_dryrun is # not true, evaluate CMD. If the evaluation of CMD fails, and FAIL_EXP # is given, then evaluate it. func_show_eval () { $debug_cmd _G_cmd=$1 _G_fail_exp=${2-':'} func_quote_for_expand "$_G_cmd" eval "func_notquiet $func_quote_for_expand_result" $opt_dry_run || { eval "$_G_cmd" _G_status=$? if test 0 -ne "$_G_status"; then eval "(exit $_G_status); $_G_fail_exp" fi } } # func_show_eval_locale CMD [FAIL_EXP] # ------------------------------------ # Unless opt_quiet is true, then output CMD. Then, if opt_dryrun is # not true, evaluate CMD. If the evaluation of CMD fails, and FAIL_EXP # is given, then evaluate it. Use the saved locale for evaluation. func_show_eval_locale () { $debug_cmd _G_cmd=$1 _G_fail_exp=${2-':'} $opt_quiet || { func_quote_for_expand "$_G_cmd" eval "func_echo $func_quote_for_expand_result" } $opt_dry_run || { eval "$_G_user_locale $_G_cmd" _G_status=$? eval "$_G_safe_locale" if test 0 -ne "$_G_status"; then eval "(exit $_G_status); $_G_fail_exp" fi } } # func_tr_sh # ---------- # Turn $1 into a string suitable for a shell variable name. # Result is stored in $func_tr_sh_result. All characters # not in the set a-zA-Z0-9_ are replaced with '_'. Further, # if $1 begins with a digit, a '_' is prepended as well. func_tr_sh () { $debug_cmd case $1 in [0-9]* | *[!a-zA-Z0-9_]*) func_tr_sh_result=`$ECHO "$1" | $SED -e 's/^\([0-9]\)/_\1/' -e 's/[^a-zA-Z0-9_]/_/g'` ;; * ) func_tr_sh_result=$1 ;; esac } # func_verbose ARG... # ------------------- # Echo program name prefixed message in verbose mode only. func_verbose () { $debug_cmd $opt_verbose && func_echo "$*" : } # func_warn_and_continue ARG... # ----------------------------- # Echo program name prefixed warning message to standard error. func_warn_and_continue () { $debug_cmd $require_term_colors func_echo_infix_1 "${tc_red}warning$tc_reset" "$*" >&2 } # func_warning CATEGORY ARG... # ---------------------------- # Echo program name prefixed warning message to standard error. Warning # messages can be filtered according to CATEGORY, where this function # elides messages where CATEGORY is not listed in the global variable # 'opt_warning_types'. func_warning () { $debug_cmd # CATEGORY must be in the warning_categories list! case " $warning_categories " in *" $1 "*) ;; *) func_internal_error "invalid warning category '$1'" ;; esac _G_category=$1 shift case " $opt_warning_types " in *" $_G_category "*) $warning_func ${1+"$@"} ;; esac } # func_sort_ver VER1 VER2 # ----------------------- # 'sort -V' is not generally available. # Note this deviates from the version comparison in automake # in that it treats 1.5 < 1.5.0, and treats 1.4.4a < 1.4-p3a # but this should suffice as we won't be specifying old # version formats or redundant trailing .0 in bootstrap.conf. # If we did want full compatibility then we should probably # use m4_version_compare from autoconf. func_sort_ver () { $debug_cmd printf '%s\n%s\n' "$1" "$2" \ | sort -t. -k 1,1n -k 2,2n -k 3,3n -k 4,4n -k 5,5n -k 6,6n -k 7,7n -k 8,8n -k 9,9n } # func_lt_ver PREV CURR # --------------------- # Return true if PREV and CURR are in the correct order according to # func_sort_ver, otherwise false. Use it like this: # # func_lt_ver "$prev_ver" "$proposed_ver" || func_fatal_error "..." func_lt_ver () { $debug_cmd test "x$1" = x`func_sort_ver "$1" "$2" | $SED 1q` } # Local variables: # mode: shell-script # sh-indentation: 2 # eval: (add-hook 'before-save-hook 'time-stamp) # time-stamp-pattern: "10/scriptversion=%:y-%02m-%02d.%02H; # UTC" # time-stamp-time-zone: "UTC" # End: #! /bin/sh # Set a version string for this script. scriptversion=2014-01-07.03; # UTC # A portable, pluggable option parser for Bourne shell. # Written by Gary V. Vaughan, 2010 # Copyright (C) 2010-2015 Free Software Foundation, Inc. # This is free software; see the source for copying conditions. There is NO # warranty; not even for MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. # 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 3 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, see . # Please report bugs or propose patches to gary@gnu.org. ## ------ ## ## Usage. ## ## ------ ## # This file is a library for parsing options in your shell scripts along # with assorted other useful supporting features that you can make use # of too. # # For the simplest scripts you might need only: # # #!/bin/sh # . relative/path/to/funclib.sh # . relative/path/to/options-parser # scriptversion=1.0 # func_options ${1+"$@"} # eval set dummy "$func_options_result"; shift # ...rest of your script... # # In order for the '--version' option to work, you will need to have a # suitably formatted comment like the one at the top of this file # starting with '# Written by ' and ending with '# warranty; '. # # For '-h' and '--help' to work, you will also need a one line # description of your script's purpose in a comment directly above the # '# Written by ' line, like the one at the top of this file. # # The default options also support '--debug', which will turn on shell # execution tracing (see the comment above debug_cmd below for another # use), and '--verbose' and the func_verbose function to allow your script # to display verbose messages only when your user has specified # '--verbose'. # # After sourcing this file, you can plug processing for additional # options by amending the variables from the 'Configuration' section # below, and following the instructions in the 'Option parsing' # section further down. ## -------------- ## ## Configuration. ## ## -------------- ## # You should override these variables in your script after sourcing this # file so that they reflect the customisations you have added to the # option parser. # The usage line for option parsing errors and the start of '-h' and # '--help' output messages. You can embed shell variables for delayed # expansion at the time the message is displayed, but you will need to # quote other shell meta-characters carefully to prevent them being # expanded when the contents are evaled. usage='$progpath [OPTION]...' # Short help message in response to '-h' and '--help'. Add to this or # override it after sourcing this library to reflect the full set of # options your script accepts. usage_message="\ --debug enable verbose shell tracing -W, --warnings=CATEGORY report the warnings falling in CATEGORY [all] -v, --verbose verbosely report processing --version print version information and exit -h, --help print short or long help message and exit " # Additional text appended to 'usage_message' in response to '--help'. long_help_message=" Warning categories include: 'all' show all warnings 'none' turn off all the warnings 'error' warnings are treated as fatal errors" # Help message printed before fatal option parsing errors. fatal_help="Try '\$progname --help' for more information." ## ------------------------- ## ## Hook function management. ## ## ------------------------- ## # This section contains functions for adding, removing, and running hooks # to the main code. A hook is just a named list of of function, that can # be run in order later on. # func_hookable FUNC_NAME # ----------------------- # Declare that FUNC_NAME will run hooks added with # 'func_add_hook FUNC_NAME ...'. func_hookable () { $debug_cmd func_append hookable_fns " $1" } # func_add_hook FUNC_NAME HOOK_FUNC # --------------------------------- # Request that FUNC_NAME call HOOK_FUNC before it returns. FUNC_NAME must # first have been declared "hookable" by a call to 'func_hookable'. func_add_hook () { $debug_cmd case " $hookable_fns " in *" $1 "*) ;; *) func_fatal_error "'$1' does not accept hook functions." ;; esac eval func_append ${1}_hooks '" $2"' } # func_remove_hook FUNC_NAME HOOK_FUNC # ------------------------------------ # Remove HOOK_FUNC from the list of functions called by FUNC_NAME. func_remove_hook () { $debug_cmd eval ${1}_hooks='`$ECHO "\$'$1'_hooks" |$SED "s| '$2'||"`' } # func_run_hooks FUNC_NAME [ARG]... # --------------------------------- # Run all hook functions registered to FUNC_NAME. # It is assumed that the list of hook functions contains nothing more # than a whitespace-delimited list of legal shell function names, and # no effort is wasted trying to catch shell meta-characters or preserve # whitespace. func_run_hooks () { $debug_cmd case " $hookable_fns " in *" $1 "*) ;; *) func_fatal_error "'$1' does not support hook funcions.n" ;; esac eval _G_hook_fns=\$$1_hooks; shift for _G_hook in $_G_hook_fns; do eval $_G_hook '"$@"' # store returned options list back into positional # parameters for next 'cmd' execution. eval _G_hook_result=\$${_G_hook}_result eval set dummy "$_G_hook_result"; shift done func_quote_for_eval ${1+"$@"} func_run_hooks_result=$func_quote_for_eval_result } ## --------------- ## ## Option parsing. ## ## --------------- ## # In order to add your own option parsing hooks, you must accept the # full positional parameter list in your hook function, remove any # options that you action, and then pass back the remaining unprocessed # options in '_result', escaped suitably for # 'eval'. Like this: # # my_options_prep () # { # $debug_cmd # # # Extend the existing usage message. # usage_message=$usage_message' # -s, --silent don'\''t print informational messages # ' # # func_quote_for_eval ${1+"$@"} # my_options_prep_result=$func_quote_for_eval_result # } # func_add_hook func_options_prep my_options_prep # # # my_silent_option () # { # $debug_cmd # # # Note that for efficiency, we parse as many options as we can # # recognise in a loop before passing the remainder back to the # # caller on the first unrecognised argument we encounter. # while test $# -gt 0; do # opt=$1; shift # case $opt in # --silent|-s) opt_silent=: ;; # # Separate non-argument short options: # -s*) func_split_short_opt "$_G_opt" # set dummy "$func_split_short_opt_name" \ # "-$func_split_short_opt_arg" ${1+"$@"} # shift # ;; # *) set dummy "$_G_opt" "$*"; shift; break ;; # esac # done # # func_quote_for_eval ${1+"$@"} # my_silent_option_result=$func_quote_for_eval_result # } # func_add_hook func_parse_options my_silent_option # # # my_option_validation () # { # $debug_cmd # # $opt_silent && $opt_verbose && func_fatal_help "\ # '--silent' and '--verbose' options are mutually exclusive." # # func_quote_for_eval ${1+"$@"} # my_option_validation_result=$func_quote_for_eval_result # } # func_add_hook func_validate_options my_option_validation # # You'll alse need to manually amend $usage_message to reflect the extra # options you parse. It's preferable to append if you can, so that # multiple option parsing hooks can be added safely. # func_options [ARG]... # --------------------- # All the functions called inside func_options are hookable. See the # individual implementations for details. func_hookable func_options func_options () { $debug_cmd func_options_prep ${1+"$@"} eval func_parse_options \ ${func_options_prep_result+"$func_options_prep_result"} eval func_validate_options \ ${func_parse_options_result+"$func_parse_options_result"} eval func_run_hooks func_options \ ${func_validate_options_result+"$func_validate_options_result"} # save modified positional parameters for caller func_options_result=$func_run_hooks_result } # func_options_prep [ARG]... # -------------------------- # All initialisations required before starting the option parse loop. # Note that when calling hook functions, we pass through the list of # positional parameters. If a hook function modifies that list, and # needs to propogate that back to rest of this script, then the complete # modified list must be put in 'func_run_hooks_result' before # returning. func_hookable func_options_prep func_options_prep () { $debug_cmd # Option defaults: opt_verbose=false opt_warning_types= func_run_hooks func_options_prep ${1+"$@"} # save modified positional parameters for caller func_options_prep_result=$func_run_hooks_result } # func_parse_options [ARG]... # --------------------------- # The main option parsing loop. func_hookable func_parse_options func_parse_options () { $debug_cmd func_parse_options_result= # this just eases exit handling while test $# -gt 0; do # Defer to hook functions for initial option parsing, so they # get priority in the event of reusing an option name. func_run_hooks func_parse_options ${1+"$@"} # Adjust func_parse_options positional parameters to match eval set dummy "$func_run_hooks_result"; shift # Break out of the loop if we already parsed every option. test $# -gt 0 || break _G_opt=$1 shift case $_G_opt in --debug|-x) debug_cmd='set -x' func_echo "enabling shell trace mode" $debug_cmd ;; --no-warnings|--no-warning|--no-warn) set dummy --warnings none ${1+"$@"} shift ;; --warnings|--warning|-W) test $# = 0 && func_missing_arg $_G_opt && break case " $warning_categories $1" in *" $1 "*) # trailing space prevents matching last $1 above func_append_uniq opt_warning_types " $1" ;; *all) opt_warning_types=$warning_categories ;; *none) opt_warning_types=none warning_func=: ;; *error) opt_warning_types=$warning_categories warning_func=func_fatal_error ;; *) func_fatal_error \ "unsupported warning category: '$1'" ;; esac shift ;; --verbose|-v) opt_verbose=: ;; --version) func_version ;; -\?|-h) func_usage ;; --help) func_help ;; # Separate optargs to long options (plugins may need this): --*=*) func_split_equals "$_G_opt" set dummy "$func_split_equals_lhs" \ "$func_split_equals_rhs" ${1+"$@"} shift ;; # Separate optargs to short options: -W*) func_split_short_opt "$_G_opt" set dummy "$func_split_short_opt_name" \ "$func_split_short_opt_arg" ${1+"$@"} shift ;; # Separate non-argument short options: -\?*|-h*|-v*|-x*) func_split_short_opt "$_G_opt" set dummy "$func_split_short_opt_name" \ "-$func_split_short_opt_arg" ${1+"$@"} shift ;; --) break ;; -*) func_fatal_help "unrecognised option: '$_G_opt'" ;; *) set dummy "$_G_opt" ${1+"$@"}; shift; break ;; esac done # save modified positional parameters for caller func_quote_for_eval ${1+"$@"} func_parse_options_result=$func_quote_for_eval_result } # func_validate_options [ARG]... # ------------------------------ # Perform any sanity checks on option settings and/or unconsumed # arguments. func_hookable func_validate_options func_validate_options () { $debug_cmd # Display all warnings if -W was not given. test -n "$opt_warning_types" || opt_warning_types=" $warning_categories" func_run_hooks func_validate_options ${1+"$@"} # Bail if the options were screwed! $exit_cmd $EXIT_FAILURE # save modified positional parameters for caller func_validate_options_result=$func_run_hooks_result } ## ----------------- ## ## Helper functions. ## ## ----------------- ## # This section contains the helper functions used by the rest of the # hookable option parser framework in ascii-betical order. # func_fatal_help ARG... # ---------------------- # Echo program name prefixed message to standard error, followed by # a help hint, and exit. func_fatal_help () { $debug_cmd eval \$ECHO \""Usage: $usage"\" eval \$ECHO \""$fatal_help"\" func_error ${1+"$@"} exit $EXIT_FAILURE } # func_help # --------- # Echo long help message to standard output and exit. func_help () { $debug_cmd func_usage_message $ECHO "$long_help_message" exit 0 } # func_missing_arg ARGNAME # ------------------------ # Echo program name prefixed message to standard error and set global # exit_cmd. func_missing_arg () { $debug_cmd func_error "Missing argument for '$1'." exit_cmd=exit } # func_split_equals STRING # ------------------------ # Set func_split_equals_lhs and func_split_equals_rhs shell variables after # splitting STRING at the '=' sign. test -z "$_G_HAVE_XSI_OPS" \ && (eval 'x=a/b/c; test 5aa/bb/cc = "${#x}${x%%/*}${x%/*}${x#*/}${x##*/}"') 2>/dev/null \ && _G_HAVE_XSI_OPS=yes if test yes = "$_G_HAVE_XSI_OPS" then # This is an XSI compatible shell, allowing a faster implementation... eval 'func_split_equals () { $debug_cmd func_split_equals_lhs=${1%%=*} func_split_equals_rhs=${1#*=} test "x$func_split_equals_lhs" = "x$1" \ && func_split_equals_rhs= }' else # ...otherwise fall back to using expr, which is often a shell builtin. func_split_equals () { $debug_cmd func_split_equals_lhs=`expr "x$1" : 'x\([^=]*\)'` func_split_equals_rhs= test "x$func_split_equals_lhs" = "x$1" \ || func_split_equals_rhs=`expr "x$1" : 'x[^=]*=\(.*\)$'` } fi #func_split_equals # func_split_short_opt SHORTOPT # ----------------------------- # Set func_split_short_opt_name and func_split_short_opt_arg shell # variables after splitting SHORTOPT after the 2nd character. if test yes = "$_G_HAVE_XSI_OPS" then # This is an XSI compatible shell, allowing a faster implementation... eval 'func_split_short_opt () { $debug_cmd func_split_short_opt_arg=${1#??} func_split_short_opt_name=${1%"$func_split_short_opt_arg"} }' else # ...otherwise fall back to using expr, which is often a shell builtin. func_split_short_opt () { $debug_cmd func_split_short_opt_name=`expr "x$1" : 'x-\(.\)'` func_split_short_opt_arg=`expr "x$1" : 'x-.\(.*\)$'` } fi #func_split_short_opt # func_usage # ---------- # Echo short help message to standard output and exit. func_usage () { $debug_cmd func_usage_message $ECHO "Run '$progname --help |${PAGER-more}' for full usage" exit 0 } # func_usage_message # ------------------ # Echo short help message to standard output. func_usage_message () { $debug_cmd eval \$ECHO \""Usage: $usage"\" echo $SED -n 's|^# || /^Written by/{ x;p;x } h /^Written by/q' < "$progpath" echo eval \$ECHO \""$usage_message"\" } # func_version # ------------ # Echo version message to standard output and exit. func_version () { $debug_cmd printf '%s\n' "$progname $scriptversion" $SED -n ' /(C)/!b go :more /\./!{ N s|\n# | | b more } :go /^# Written by /,/# warranty; / { s|^# || s|^# *$|| s|\((C)\)[ 0-9,-]*[ ,-]\([1-9][0-9]* \)|\1 \2| p } /^# Written by / { s|^# || p } /^warranty; /q' < "$progpath" exit $? } # Local variables: # mode: shell-script # sh-indentation: 2 # eval: (add-hook 'before-save-hook 'time-stamp) # time-stamp-pattern: "10/scriptversion=%:y-%02m-%02d.%02H; # UTC" # time-stamp-time-zone: "UTC" # End: # Set a version string. scriptversion='(GNU libtool) 2.4.6' # func_echo ARG... # ---------------- # Libtool also displays the current mode in messages, so override # funclib.sh func_echo with this custom definition. func_echo () { $debug_cmd _G_message=$* func_echo_IFS=$IFS IFS=$nl for _G_line in $_G_message; do IFS=$func_echo_IFS $ECHO "$progname${opt_mode+: $opt_mode}: $_G_line" done IFS=$func_echo_IFS } # func_warning ARG... # ------------------- # Libtool warnings are not categorized, so override funclib.sh # func_warning with this simpler definition. func_warning () { $debug_cmd $warning_func ${1+"$@"} } ## ---------------- ## ## Options parsing. ## ## ---------------- ## # Hook in the functions to make sure our own options are parsed during # the option parsing loop. usage='$progpath [OPTION]... [MODE-ARG]...' # Short help message in response to '-h'. usage_message="Options: --config show all configuration variables --debug enable verbose shell tracing -n, --dry-run display commands without modifying any files --features display basic configuration information and exit --mode=MODE use operation mode MODE --no-warnings equivalent to '-Wnone' --preserve-dup-deps don't remove duplicate dependency libraries --quiet, --silent don't print informational messages --tag=TAG use configuration variables from tag TAG -v, --verbose print more informational messages than default --version print version information -W, --warnings=CATEGORY report the warnings falling in CATEGORY [all] -h, --help, --help-all print short, long, or detailed help message " # Additional text appended to 'usage_message' in response to '--help'. func_help () { $debug_cmd func_usage_message $ECHO "$long_help_message MODE must be one of the following: clean remove files from the build directory compile compile a source file into a libtool object execute automatically set library path, then run a program finish complete the installation of libtool libraries install install libraries or executables link create a library or an executable uninstall remove libraries from an installed directory MODE-ARGS vary depending on the MODE. When passed as first option, '--mode=MODE' may be abbreviated as 'MODE' or a unique abbreviation of that. Try '$progname --help --mode=MODE' for a more detailed description of MODE. When reporting a bug, please describe a test case to reproduce it and include the following information: host-triplet: $host shell: $SHELL compiler: $LTCC compiler flags: $LTCFLAGS linker: $LD (gnu? $with_gnu_ld) version: $progname (GNU libtool) 2.4.6 automake: `($AUTOMAKE --version) 2>/dev/null |$SED 1q` autoconf: `($AUTOCONF --version) 2>/dev/null |$SED 1q` Report bugs to . GNU libtool home page: . General help using GNU software: ." exit 0 } # func_lo2o OBJECT-NAME # --------------------- # Transform OBJECT-NAME from a '.lo' suffix to the platform specific # object suffix. lo2o=s/\\.lo\$/.$objext/ o2lo=s/\\.$objext\$/.lo/ if test yes = "$_G_HAVE_XSI_OPS"; then eval 'func_lo2o () { case $1 in *.lo) func_lo2o_result=${1%.lo}.$objext ;; * ) func_lo2o_result=$1 ;; esac }' # func_xform LIBOBJ-OR-SOURCE # --------------------------- # Transform LIBOBJ-OR-SOURCE from a '.o' or '.c' (or otherwise) # suffix to a '.lo' libtool-object suffix. eval 'func_xform () { func_xform_result=${1%.*}.lo }' else # ...otherwise fall back to using sed. func_lo2o () { func_lo2o_result=`$ECHO "$1" | $SED "$lo2o"` } func_xform () { func_xform_result=`$ECHO "$1" | $SED 's|\.[^.]*$|.lo|'` } fi # func_fatal_configuration ARG... # ------------------------------- # Echo program name prefixed message to standard error, followed by # a configuration failure hint, and exit. func_fatal_configuration () { func__fatal_error ${1+"$@"} \ "See the $PACKAGE documentation for more information." \ "Fatal configuration error." } # func_config # ----------- # Display the configuration for all the tags in this script. func_config () { re_begincf='^# ### BEGIN LIBTOOL' re_endcf='^# ### END LIBTOOL' # Default configuration. $SED "1,/$re_begincf CONFIG/d;/$re_endcf CONFIG/,\$d" < "$progpath" # Now print the configurations for the tags. for tagname in $taglist; do $SED -n "/$re_begincf TAG CONFIG: $tagname\$/,/$re_endcf TAG CONFIG: $tagname\$/p" < "$progpath" done exit $? } # func_features # ------------- # Display the features supported by this script. func_features () { echo "host: $host" if test yes = "$build_libtool_libs"; then echo "enable shared libraries" else echo "disable shared libraries" fi if test yes = "$build_old_libs"; then echo "enable static libraries" else echo "disable static libraries" fi exit $? } # func_enable_tag TAGNAME # ----------------------- # Verify that TAGNAME is valid, and either flag an error and exit, or # enable the TAGNAME tag. We also add TAGNAME to the global $taglist # variable here. func_enable_tag () { # Global variable: tagname=$1 re_begincf="^# ### BEGIN LIBTOOL TAG CONFIG: $tagname\$" re_endcf="^# ### END LIBTOOL TAG CONFIG: $tagname\$" sed_extractcf=/$re_begincf/,/$re_endcf/p # Validate tagname. case $tagname in *[!-_A-Za-z0-9,/]*) func_fatal_error "invalid tag name: $tagname" ;; esac # Don't test for the "default" C tag, as we know it's # there but not specially marked. case $tagname in CC) ;; *) if $GREP "$re_begincf" "$progpath" >/dev/null 2>&1; then taglist="$taglist $tagname" # Evaluate the configuration. Be careful to quote the path # and the sed script, to avoid splitting on whitespace, but # also don't use non-portable quotes within backquotes within # quotes we have to do it in 2 steps: extractedcf=`$SED -n -e "$sed_extractcf" < "$progpath"` eval "$extractedcf" else func_error "ignoring unknown tag $tagname" fi ;; esac } # func_check_version_match # ------------------------ # Ensure that we are using m4 macros, and libtool script from the same # release of libtool. func_check_version_match () { if test "$package_revision" != "$macro_revision"; then if test "$VERSION" != "$macro_version"; then if test -z "$macro_version"; then cat >&2 <<_LT_EOF $progname: Version mismatch error. This is $PACKAGE $VERSION, but the $progname: definition of this LT_INIT comes from an older release. $progname: You should recreate aclocal.m4 with macros from $PACKAGE $VERSION $progname: and run autoconf again. _LT_EOF else cat >&2 <<_LT_EOF $progname: Version mismatch error. This is $PACKAGE $VERSION, but the $progname: definition of this LT_INIT comes from $PACKAGE $macro_version. $progname: You should recreate aclocal.m4 with macros from $PACKAGE $VERSION $progname: and run autoconf again. _LT_EOF fi else cat >&2 <<_LT_EOF $progname: Version mismatch error. This is $PACKAGE $VERSION, revision $package_revision, $progname: but the definition of this LT_INIT comes from revision $macro_revision. $progname: You should recreate aclocal.m4 with macros from revision $package_revision $progname: of $PACKAGE $VERSION and run autoconf again. _LT_EOF fi exit $EXIT_MISMATCH fi } # libtool_options_prep [ARG]... # ----------------------------- # Preparation for options parsed by libtool. libtool_options_prep () { $debug_mode # Option defaults: opt_config=false opt_dlopen= opt_dry_run=false opt_help=false opt_mode= opt_preserve_dup_deps=false opt_quiet=false nonopt= preserve_args= # Shorthand for --mode=foo, only valid as the first argument case $1 in clean|clea|cle|cl) shift; set dummy --mode clean ${1+"$@"}; shift ;; compile|compil|compi|comp|com|co|c) shift; set dummy --mode compile ${1+"$@"}; shift ;; execute|execut|execu|exec|exe|ex|e) shift; set dummy --mode execute ${1+"$@"}; shift ;; finish|finis|fini|fin|fi|f) shift; set dummy --mode finish ${1+"$@"}; shift ;; install|instal|insta|inst|ins|in|i) shift; set dummy --mode install ${1+"$@"}; shift ;; link|lin|li|l) shift; set dummy --mode link ${1+"$@"}; shift ;; uninstall|uninstal|uninsta|uninst|unins|unin|uni|un|u) shift; set dummy --mode uninstall ${1+"$@"}; shift ;; esac # Pass back the list of options. func_quote_for_eval ${1+"$@"} libtool_options_prep_result=$func_quote_for_eval_result } func_add_hook func_options_prep libtool_options_prep # libtool_parse_options [ARG]... # --------------------------------- # Provide handling for libtool specific options. libtool_parse_options () { $debug_cmd # Perform our own loop to consume as many options as possible in # each iteration. while test $# -gt 0; do _G_opt=$1 shift case $_G_opt in --dry-run|--dryrun|-n) opt_dry_run=: ;; --config) func_config ;; --dlopen|-dlopen) opt_dlopen="${opt_dlopen+$opt_dlopen }$1" shift ;; --preserve-dup-deps) opt_preserve_dup_deps=: ;; --features) func_features ;; --finish) set dummy --mode finish ${1+"$@"}; shift ;; --help) opt_help=: ;; --help-all) opt_help=': help-all' ;; --mode) test $# = 0 && func_missing_arg $_G_opt && break opt_mode=$1 case $1 in # Valid mode arguments: clean|compile|execute|finish|install|link|relink|uninstall) ;; # Catch anything else as an error *) func_error "invalid argument for $_G_opt" exit_cmd=exit break ;; esac shift ;; --no-silent|--no-quiet) opt_quiet=false func_append preserve_args " $_G_opt" ;; --no-warnings|--no-warning|--no-warn) opt_warning=false func_append preserve_args " $_G_opt" ;; --no-verbose) opt_verbose=false func_append preserve_args " $_G_opt" ;; --silent|--quiet) opt_quiet=: opt_verbose=false func_append preserve_args " $_G_opt" ;; --tag) test $# = 0 && func_missing_arg $_G_opt && break opt_tag=$1 func_append preserve_args " $_G_opt $1" func_enable_tag "$1" shift ;; --verbose|-v) opt_quiet=false opt_verbose=: func_append preserve_args " $_G_opt" ;; # An option not handled by this hook function: *) set dummy "$_G_opt" ${1+"$@"}; shift; break ;; esac done # save modified positional parameters for caller func_quote_for_eval ${1+"$@"} libtool_parse_options_result=$func_quote_for_eval_result } func_add_hook func_parse_options libtool_parse_options # libtool_validate_options [ARG]... # --------------------------------- # Perform any sanity checks on option settings and/or unconsumed # arguments. libtool_validate_options () { # save first non-option argument if test 0 -lt $#; then nonopt=$1 shift fi # preserve --debug test : = "$debug_cmd" || func_append preserve_args " --debug" case $host in # Solaris2 added to fix http://debbugs.gnu.org/cgi/bugreport.cgi?bug=16452 # see also: http://gcc.gnu.org/bugzilla/show_bug.cgi?id=59788 *cygwin* | *mingw* | *pw32* | *cegcc* | *solaris2* | *os2*) # don't eliminate duplications in $postdeps and $predeps opt_duplicate_compiler_generated_deps=: ;; *) opt_duplicate_compiler_generated_deps=$opt_preserve_dup_deps ;; esac $opt_help || { # Sanity checks first: func_check_version_match test yes != "$build_libtool_libs" \ && test yes != "$build_old_libs" \ && func_fatal_configuration "not configured to build any kind of library" # Darwin sucks eval std_shrext=\"$shrext_cmds\" # Only execute mode is allowed to have -dlopen flags. if test -n "$opt_dlopen" && test execute != "$opt_mode"; then func_error "unrecognized option '-dlopen'" $ECHO "$help" 1>&2 exit $EXIT_FAILURE fi # Change the help message to a mode-specific one. generic_help=$help help="Try '$progname --help --mode=$opt_mode' for more information." } # Pass back the unparsed argument list func_quote_for_eval ${1+"$@"} libtool_validate_options_result=$func_quote_for_eval_result } func_add_hook func_validate_options libtool_validate_options # Process options as early as possible so that --help and --version # can return quickly. func_options ${1+"$@"} eval set dummy "$func_options_result"; shift ## ----------- ## ## Main. ## ## ----------- ## magic='%%%MAGIC variable%%%' magic_exe='%%%MAGIC EXE variable%%%' # Global variables. extracted_archives= extracted_serial=0 # If this variable is set in any of the actions, the command in it # will be execed at the end. This prevents here-documents from being # left over by shells. exec_cmd= # A function that is used when there is no print builtin or printf. func_fallback_echo () { eval 'cat <<_LTECHO_EOF $1 _LTECHO_EOF' } # func_generated_by_libtool # True iff stdin has been generated by Libtool. This function is only # a basic sanity check; it will hardly flush out determined imposters. func_generated_by_libtool_p () { $GREP "^# Generated by .*$PACKAGE" > /dev/null 2>&1 } # func_lalib_p file # True iff FILE is a libtool '.la' library or '.lo' object file. # This function is only a basic sanity check; it will hardly flush out # determined imposters. func_lalib_p () { test -f "$1" && $SED -e 4q "$1" 2>/dev/null | func_generated_by_libtool_p } # func_lalib_unsafe_p file # True iff FILE is a libtool '.la' library or '.lo' object file. # This function implements the same check as func_lalib_p without # resorting to external programs. To this end, it redirects stdin and # closes it afterwards, without saving the original file descriptor. # As a safety measure, use it only where a negative result would be # fatal anyway. Works if 'file' does not exist. func_lalib_unsafe_p () { lalib_p=no if test -f "$1" && test -r "$1" && exec 5<&0 <"$1"; then for lalib_p_l in 1 2 3 4 do read lalib_p_line case $lalib_p_line in \#\ Generated\ by\ *$PACKAGE* ) lalib_p=yes; break;; esac done exec 0<&5 5<&- fi test yes = "$lalib_p" } # func_ltwrapper_script_p file # True iff FILE is a libtool wrapper script # This function is only a basic sanity check; it will hardly flush out # determined imposters. func_ltwrapper_script_p () { test -f "$1" && $lt_truncate_bin < "$1" 2>/dev/null | func_generated_by_libtool_p } # func_ltwrapper_executable_p file # True iff FILE is a libtool wrapper executable # This function is only a basic sanity check; it will hardly flush out # determined imposters. func_ltwrapper_executable_p () { func_ltwrapper_exec_suffix= case $1 in *.exe) ;; *) func_ltwrapper_exec_suffix=.exe ;; esac $GREP "$magic_exe" "$1$func_ltwrapper_exec_suffix" >/dev/null 2>&1 } # func_ltwrapper_scriptname file # Assumes file is an ltwrapper_executable # uses $file to determine the appropriate filename for a # temporary ltwrapper_script. func_ltwrapper_scriptname () { func_dirname_and_basename "$1" "" "." func_stripname '' '.exe' "$func_basename_result" func_ltwrapper_scriptname_result=$func_dirname_result/$objdir/${func_stripname_result}_ltshwrapper } # func_ltwrapper_p file # True iff FILE is a libtool wrapper script or wrapper executable # This function is only a basic sanity check; it will hardly flush out # determined imposters. func_ltwrapper_p () { func_ltwrapper_script_p "$1" || func_ltwrapper_executable_p "$1" } # func_execute_cmds commands fail_cmd # Execute tilde-delimited COMMANDS. # If FAIL_CMD is given, eval that upon failure. # FAIL_CMD may read-access the current command in variable CMD! func_execute_cmds () { $debug_cmd save_ifs=$IFS; IFS='~' for cmd in $1; do IFS=$sp$nl eval cmd=\"$cmd\" IFS=$save_ifs func_show_eval "$cmd" "${2-:}" done IFS=$save_ifs } # func_source file # Source FILE, adding directory component if necessary. # Note that it is not necessary on cygwin/mingw to append a dot to # FILE even if both FILE and FILE.exe exist: automatic-append-.exe # behavior happens only for exec(3), not for open(2)! Also, sourcing # 'FILE.' does not work on cygwin managed mounts. func_source () { $debug_cmd case $1 in */* | *\\*) . "$1" ;; *) . "./$1" ;; esac } # func_resolve_sysroot PATH # Replace a leading = in PATH with a sysroot. Store the result into # func_resolve_sysroot_result func_resolve_sysroot () { func_resolve_sysroot_result=$1 case $func_resolve_sysroot_result in =*) func_stripname '=' '' "$func_resolve_sysroot_result" func_resolve_sysroot_result=$lt_sysroot$func_stripname_result ;; esac } # func_replace_sysroot PATH # If PATH begins with the sysroot, replace it with = and # store the result into func_replace_sysroot_result. func_replace_sysroot () { case $lt_sysroot:$1 in ?*:"$lt_sysroot"*) func_stripname "$lt_sysroot" '' "$1" func_replace_sysroot_result='='$func_stripname_result ;; *) # Including no sysroot. func_replace_sysroot_result=$1 ;; esac } # func_infer_tag arg # Infer tagged configuration to use if any are available and # if one wasn't chosen via the "--tag" command line option. # Only attempt this if the compiler in the base compile # command doesn't match the default compiler. # arg is usually of the form 'gcc ...' func_infer_tag () { $debug_cmd if test -n "$available_tags" && test -z "$tagname"; then CC_quoted= for arg in $CC; do func_append_quoted CC_quoted "$arg" done CC_expanded=`func_echo_all $CC` CC_quoted_expanded=`func_echo_all $CC_quoted` case $@ in # Blanks in the command may have been stripped by the calling shell, # but not from the CC environment variable when configure was run. " $CC "* | "$CC "* | " $CC_expanded "* | "$CC_expanded "* | \ " $CC_quoted"* | "$CC_quoted "* | " $CC_quoted_expanded "* | "$CC_quoted_expanded "*) ;; # Blanks at the start of $base_compile will cause this to fail # if we don't check for them as well. *) for z in $available_tags; do if $GREP "^# ### BEGIN LIBTOOL TAG CONFIG: $z$" < "$progpath" > /dev/null; then # Evaluate the configuration. eval "`$SED -n -e '/^# ### BEGIN LIBTOOL TAG CONFIG: '$z'$/,/^# ### END LIBTOOL TAG CONFIG: '$z'$/p' < $progpath`" CC_quoted= for arg in $CC; do # Double-quote args containing other shell metacharacters. func_append_quoted CC_quoted "$arg" done CC_expanded=`func_echo_all $CC` CC_quoted_expanded=`func_echo_all $CC_quoted` case "$@ " in " $CC "* | "$CC "* | " $CC_expanded "* | "$CC_expanded "* | \ " $CC_quoted"* | "$CC_quoted "* | " $CC_quoted_expanded "* | "$CC_quoted_expanded "*) # The compiler in the base compile command matches # the one in the tagged configuration. # Assume this is the tagged configuration we want. tagname=$z break ;; esac fi done # If $tagname still isn't set, then no tagged configuration # was found and let the user know that the "--tag" command # line option must be used. if test -z "$tagname"; then func_echo "unable to infer tagged configuration" func_fatal_error "specify a tag with '--tag'" # else # func_verbose "using $tagname tagged configuration" fi ;; esac fi } # func_write_libtool_object output_name pic_name nonpic_name # Create a libtool object file (analogous to a ".la" file), # but don't create it if we're doing a dry run. func_write_libtool_object () { write_libobj=$1 if test yes = "$build_libtool_libs"; then write_lobj=\'$2\' else write_lobj=none fi if test yes = "$build_old_libs"; then write_oldobj=\'$3\' else write_oldobj=none fi $opt_dry_run || { cat >${write_libobj}T </dev/null` if test "$?" -eq 0 && test -n "$func_convert_core_file_wine_to_w32_tmp"; then func_convert_core_file_wine_to_w32_result=`$ECHO "$func_convert_core_file_wine_to_w32_tmp" | $SED -e "$sed_naive_backslashify"` else func_convert_core_file_wine_to_w32_result= fi fi } # end: func_convert_core_file_wine_to_w32 # func_convert_core_path_wine_to_w32 ARG # Helper function used by path conversion functions when $build is *nix, and # $host is mingw, cygwin, or some other w32 environment. Relies on a correctly # configured wine environment available, with the winepath program in $build's # $PATH. Assumes ARG has no leading or trailing path separator characters. # # ARG is path to be converted from $build format to win32. # Result is available in $func_convert_core_path_wine_to_w32_result. # Unconvertible file (directory) names in ARG are skipped; if no directory names # are convertible, then the result may be empty. func_convert_core_path_wine_to_w32 () { $debug_cmd # unfortunately, winepath doesn't convert paths, only file names func_convert_core_path_wine_to_w32_result= if test -n "$1"; then oldIFS=$IFS IFS=: for func_convert_core_path_wine_to_w32_f in $1; do IFS=$oldIFS func_convert_core_file_wine_to_w32 "$func_convert_core_path_wine_to_w32_f" if test -n "$func_convert_core_file_wine_to_w32_result"; then if test -z "$func_convert_core_path_wine_to_w32_result"; then func_convert_core_path_wine_to_w32_result=$func_convert_core_file_wine_to_w32_result else func_append func_convert_core_path_wine_to_w32_result ";$func_convert_core_file_wine_to_w32_result" fi fi done IFS=$oldIFS fi } # end: func_convert_core_path_wine_to_w32 # func_cygpath ARGS... # Wrapper around calling the cygpath program via LT_CYGPATH. This is used when # when (1) $build is *nix and Cygwin is hosted via a wine environment; or (2) # $build is MSYS and $host is Cygwin, or (3) $build is Cygwin. In case (1) or # (2), returns the Cygwin file name or path in func_cygpath_result (input # file name or path is assumed to be in w32 format, as previously converted # from $build's *nix or MSYS format). In case (3), returns the w32 file name # or path in func_cygpath_result (input file name or path is assumed to be in # Cygwin format). Returns an empty string on error. # # ARGS are passed to cygpath, with the last one being the file name or path to # be converted. # # Specify the absolute *nix (or w32) name to cygpath in the LT_CYGPATH # environment variable; do not put it in $PATH. func_cygpath () { $debug_cmd if test -n "$LT_CYGPATH" && test -f "$LT_CYGPATH"; then func_cygpath_result=`$LT_CYGPATH "$@" 2>/dev/null` if test "$?" -ne 0; then # on failure, ensure result is empty func_cygpath_result= fi else func_cygpath_result= func_error "LT_CYGPATH is empty or specifies non-existent file: '$LT_CYGPATH'" fi } #end: func_cygpath # func_convert_core_msys_to_w32 ARG # Convert file name or path ARG from MSYS format to w32 format. Return # result in func_convert_core_msys_to_w32_result. func_convert_core_msys_to_w32 () { $debug_cmd # awkward: cmd appends spaces to result func_convert_core_msys_to_w32_result=`( cmd //c echo "$1" ) 2>/dev/null | $SED -e 's/[ ]*$//' -e "$sed_naive_backslashify"` } #end: func_convert_core_msys_to_w32 # func_convert_file_check ARG1 ARG2 # Verify that ARG1 (a file name in $build format) was converted to $host # format in ARG2. Otherwise, emit an error message, but continue (resetting # func_to_host_file_result to ARG1). func_convert_file_check () { $debug_cmd if test -z "$2" && test -n "$1"; then func_error "Could not determine host file name corresponding to" func_error " '$1'" func_error "Continuing, but uninstalled executables may not work." # Fallback: func_to_host_file_result=$1 fi } # end func_convert_file_check # func_convert_path_check FROM_PATHSEP TO_PATHSEP FROM_PATH TO_PATH # Verify that FROM_PATH (a path in $build format) was converted to $host # format in TO_PATH. Otherwise, emit an error message, but continue, resetting # func_to_host_file_result to a simplistic fallback value (see below). func_convert_path_check () { $debug_cmd if test -z "$4" && test -n "$3"; then func_error "Could not determine the host path corresponding to" func_error " '$3'" func_error "Continuing, but uninstalled executables may not work." # Fallback. This is a deliberately simplistic "conversion" and # should not be "improved". See libtool.info. if test "x$1" != "x$2"; then lt_replace_pathsep_chars="s|$1|$2|g" func_to_host_path_result=`echo "$3" | $SED -e "$lt_replace_pathsep_chars"` else func_to_host_path_result=$3 fi fi } # end func_convert_path_check # func_convert_path_front_back_pathsep FRONTPAT BACKPAT REPL ORIG # Modifies func_to_host_path_result by prepending REPL if ORIG matches FRONTPAT # and appending REPL if ORIG matches BACKPAT. func_convert_path_front_back_pathsep () { $debug_cmd case $4 in $1 ) func_to_host_path_result=$3$func_to_host_path_result ;; esac case $4 in $2 ) func_append func_to_host_path_result "$3" ;; esac } # end func_convert_path_front_back_pathsep ################################################## # $build to $host FILE NAME CONVERSION FUNCTIONS # ################################################## # invoked via '$to_host_file_cmd ARG' # # In each case, ARG is the path to be converted from $build to $host format. # Result will be available in $func_to_host_file_result. # func_to_host_file ARG # Converts the file name ARG from $build format to $host format. Return result # in func_to_host_file_result. func_to_host_file () { $debug_cmd $to_host_file_cmd "$1" } # end func_to_host_file # func_to_tool_file ARG LAZY # converts the file name ARG from $build format to toolchain format. Return # result in func_to_tool_file_result. If the conversion in use is listed # in (the comma separated) LAZY, no conversion takes place. func_to_tool_file () { $debug_cmd case ,$2, in *,"$to_tool_file_cmd",*) func_to_tool_file_result=$1 ;; *) $to_tool_file_cmd "$1" func_to_tool_file_result=$func_to_host_file_result ;; esac } # end func_to_tool_file # func_convert_file_noop ARG # Copy ARG to func_to_host_file_result. func_convert_file_noop () { func_to_host_file_result=$1 } # end func_convert_file_noop # func_convert_file_msys_to_w32 ARG # Convert file name ARG from (mingw) MSYS to (mingw) w32 format; automatic # conversion to w32 is not available inside the cwrapper. Returns result in # func_to_host_file_result. func_convert_file_msys_to_w32 () { $debug_cmd func_to_host_file_result=$1 if test -n "$1"; then func_convert_core_msys_to_w32 "$1" func_to_host_file_result=$func_convert_core_msys_to_w32_result fi func_convert_file_check "$1" "$func_to_host_file_result" } # end func_convert_file_msys_to_w32 # func_convert_file_cygwin_to_w32 ARG # Convert file name ARG from Cygwin to w32 format. Returns result in # func_to_host_file_result. func_convert_file_cygwin_to_w32 () { $debug_cmd func_to_host_file_result=$1 if test -n "$1"; then # because $build is cygwin, we call "the" cygpath in $PATH; no need to use # LT_CYGPATH in this case. func_to_host_file_result=`cygpath -m "$1"` fi func_convert_file_check "$1" "$func_to_host_file_result" } # end func_convert_file_cygwin_to_w32 # func_convert_file_nix_to_w32 ARG # Convert file name ARG from *nix to w32 format. Requires a wine environment # and a working winepath. Returns result in func_to_host_file_result. func_convert_file_nix_to_w32 () { $debug_cmd func_to_host_file_result=$1 if test -n "$1"; then func_convert_core_file_wine_to_w32 "$1" func_to_host_file_result=$func_convert_core_file_wine_to_w32_result fi func_convert_file_check "$1" "$func_to_host_file_result" } # end func_convert_file_nix_to_w32 # func_convert_file_msys_to_cygwin ARG # Convert file name ARG from MSYS to Cygwin format. Requires LT_CYGPATH set. # Returns result in func_to_host_file_result. func_convert_file_msys_to_cygwin () { $debug_cmd func_to_host_file_result=$1 if test -n "$1"; then func_convert_core_msys_to_w32 "$1" func_cygpath -u "$func_convert_core_msys_to_w32_result" func_to_host_file_result=$func_cygpath_result fi func_convert_file_check "$1" "$func_to_host_file_result" } # end func_convert_file_msys_to_cygwin # func_convert_file_nix_to_cygwin ARG # Convert file name ARG from *nix to Cygwin format. Requires Cygwin installed # in a wine environment, working winepath, and LT_CYGPATH set. Returns result # in func_to_host_file_result. func_convert_file_nix_to_cygwin () { $debug_cmd func_to_host_file_result=$1 if test -n "$1"; then # convert from *nix to w32, then use cygpath to convert from w32 to cygwin. func_convert_core_file_wine_to_w32 "$1" func_cygpath -u "$func_convert_core_file_wine_to_w32_result" func_to_host_file_result=$func_cygpath_result fi func_convert_file_check "$1" "$func_to_host_file_result" } # end func_convert_file_nix_to_cygwin ############################################# # $build to $host PATH CONVERSION FUNCTIONS # ############################################# # invoked via '$to_host_path_cmd ARG' # # In each case, ARG is the path to be converted from $build to $host format. # The result will be available in $func_to_host_path_result. # # Path separators are also converted from $build format to $host format. If # ARG begins or ends with a path separator character, it is preserved (but # converted to $host format) on output. # # All path conversion functions are named using the following convention: # file name conversion function : func_convert_file_X_to_Y () # path conversion function : func_convert_path_X_to_Y () # where, for any given $build/$host combination the 'X_to_Y' value is the # same. If conversion functions are added for new $build/$host combinations, # the two new functions must follow this pattern, or func_init_to_host_path_cmd # will break. # func_init_to_host_path_cmd # Ensures that function "pointer" variable $to_host_path_cmd is set to the # appropriate value, based on the value of $to_host_file_cmd. to_host_path_cmd= func_init_to_host_path_cmd () { $debug_cmd if test -z "$to_host_path_cmd"; then func_stripname 'func_convert_file_' '' "$to_host_file_cmd" to_host_path_cmd=func_convert_path_$func_stripname_result fi } # func_to_host_path ARG # Converts the path ARG from $build format to $host format. Return result # in func_to_host_path_result. func_to_host_path () { $debug_cmd func_init_to_host_path_cmd $to_host_path_cmd "$1" } # end func_to_host_path # func_convert_path_noop ARG # Copy ARG to func_to_host_path_result. func_convert_path_noop () { func_to_host_path_result=$1 } # end func_convert_path_noop # func_convert_path_msys_to_w32 ARG # Convert path ARG from (mingw) MSYS to (mingw) w32 format; automatic # conversion to w32 is not available inside the cwrapper. Returns result in # func_to_host_path_result. func_convert_path_msys_to_w32 () { $debug_cmd func_to_host_path_result=$1 if test -n "$1"; then # Remove leading and trailing path separator characters from ARG. MSYS # behavior is inconsistent here; cygpath turns them into '.;' and ';.'; # and winepath ignores them completely. func_stripname : : "$1" func_to_host_path_tmp1=$func_stripname_result func_convert_core_msys_to_w32 "$func_to_host_path_tmp1" func_to_host_path_result=$func_convert_core_msys_to_w32_result func_convert_path_check : ";" \ "$func_to_host_path_tmp1" "$func_to_host_path_result" func_convert_path_front_back_pathsep ":*" "*:" ";" "$1" fi } # end func_convert_path_msys_to_w32 # func_convert_path_cygwin_to_w32 ARG # Convert path ARG from Cygwin to w32 format. Returns result in # func_to_host_file_result. func_convert_path_cygwin_to_w32 () { $debug_cmd func_to_host_path_result=$1 if test -n "$1"; then # See func_convert_path_msys_to_w32: func_stripname : : "$1" func_to_host_path_tmp1=$func_stripname_result func_to_host_path_result=`cygpath -m -p "$func_to_host_path_tmp1"` func_convert_path_check : ";" \ "$func_to_host_path_tmp1" "$func_to_host_path_result" func_convert_path_front_back_pathsep ":*" "*:" ";" "$1" fi } # end func_convert_path_cygwin_to_w32 # func_convert_path_nix_to_w32 ARG # Convert path ARG from *nix to w32 format. Requires a wine environment and # a working winepath. Returns result in func_to_host_file_result. func_convert_path_nix_to_w32 () { $debug_cmd func_to_host_path_result=$1 if test -n "$1"; then # See func_convert_path_msys_to_w32: func_stripname : : "$1" func_to_host_path_tmp1=$func_stripname_result func_convert_core_path_wine_to_w32 "$func_to_host_path_tmp1" func_to_host_path_result=$func_convert_core_path_wine_to_w32_result func_convert_path_check : ";" \ "$func_to_host_path_tmp1" "$func_to_host_path_result" func_convert_path_front_back_pathsep ":*" "*:" ";" "$1" fi } # end func_convert_path_nix_to_w32 # func_convert_path_msys_to_cygwin ARG # Convert path ARG from MSYS to Cygwin format. Requires LT_CYGPATH set. # Returns result in func_to_host_file_result. func_convert_path_msys_to_cygwin () { $debug_cmd func_to_host_path_result=$1 if test -n "$1"; then # See func_convert_path_msys_to_w32: func_stripname : : "$1" func_to_host_path_tmp1=$func_stripname_result func_convert_core_msys_to_w32 "$func_to_host_path_tmp1" func_cygpath -u -p "$func_convert_core_msys_to_w32_result" func_to_host_path_result=$func_cygpath_result func_convert_path_check : : \ "$func_to_host_path_tmp1" "$func_to_host_path_result" func_convert_path_front_back_pathsep ":*" "*:" : "$1" fi } # end func_convert_path_msys_to_cygwin # func_convert_path_nix_to_cygwin ARG # Convert path ARG from *nix to Cygwin format. Requires Cygwin installed in a # a wine environment, working winepath, and LT_CYGPATH set. Returns result in # func_to_host_file_result. func_convert_path_nix_to_cygwin () { $debug_cmd func_to_host_path_result=$1 if test -n "$1"; then # Remove leading and trailing path separator characters from # ARG. msys behavior is inconsistent here, cygpath turns them # into '.;' and ';.', and winepath ignores them completely. func_stripname : : "$1" func_to_host_path_tmp1=$func_stripname_result func_convert_core_path_wine_to_w32 "$func_to_host_path_tmp1" func_cygpath -u -p "$func_convert_core_path_wine_to_w32_result" func_to_host_path_result=$func_cygpath_result func_convert_path_check : : \ "$func_to_host_path_tmp1" "$func_to_host_path_result" func_convert_path_front_back_pathsep ":*" "*:" : "$1" fi } # end func_convert_path_nix_to_cygwin # func_dll_def_p FILE # True iff FILE is a Windows DLL '.def' file. # Keep in sync with _LT_DLL_DEF_P in libtool.m4 func_dll_def_p () { $debug_cmd func_dll_def_p_tmp=`$SED -n \ -e 's/^[ ]*//' \ -e '/^\(;.*\)*$/d' \ -e 's/^\(EXPORTS\|LIBRARY\)\([ ].*\)*$/DEF/p' \ -e q \ "$1"` test DEF = "$func_dll_def_p_tmp" } # func_mode_compile arg... func_mode_compile () { $debug_cmd # Get the compilation command and the source file. base_compile= srcfile=$nonopt # always keep a non-empty value in "srcfile" suppress_opt=yes suppress_output= arg_mode=normal libobj= later= pie_flag= for arg do case $arg_mode in arg ) # do not "continue". Instead, add this to base_compile lastarg=$arg arg_mode=normal ;; target ) libobj=$arg arg_mode=normal continue ;; normal ) # Accept any command-line options. case $arg in -o) test -n "$libobj" && \ func_fatal_error "you cannot specify '-o' more than once" arg_mode=target continue ;; -pie | -fpie | -fPIE) func_append pie_flag " $arg" continue ;; -shared | -static | -prefer-pic | -prefer-non-pic) func_append later " $arg" continue ;; -no-suppress) suppress_opt=no continue ;; -Xcompiler) arg_mode=arg # the next one goes into the "base_compile" arg list continue # The current "srcfile" will either be retained or ;; # replaced later. I would guess that would be a bug. -Wc,*) func_stripname '-Wc,' '' "$arg" args=$func_stripname_result lastarg= save_ifs=$IFS; IFS=, for arg in $args; do IFS=$save_ifs func_append_quoted lastarg "$arg" done IFS=$save_ifs func_stripname ' ' '' "$lastarg" lastarg=$func_stripname_result # Add the arguments to base_compile. func_append base_compile " $lastarg" continue ;; *) # Accept the current argument as the source file. # The previous "srcfile" becomes the current argument. # lastarg=$srcfile srcfile=$arg ;; esac # case $arg ;; esac # case $arg_mode # Aesthetically quote the previous argument. func_append_quoted base_compile "$lastarg" done # for arg case $arg_mode in arg) func_fatal_error "you must specify an argument for -Xcompile" ;; target) func_fatal_error "you must specify a target with '-o'" ;; *) # Get the name of the library object. test -z "$libobj" && { func_basename "$srcfile" libobj=$func_basename_result } ;; esac # Recognize several different file suffixes. # If the user specifies -o file.o, it is replaced with file.lo case $libobj in *.[cCFSifmso] | \ *.ada | *.adb | *.ads | *.asm | \ *.c++ | *.cc | *.ii | *.class | *.cpp | *.cxx | \ *.[fF][09]? | *.for | *.java | *.go | *.obj | *.sx | *.cu | *.cup) func_xform "$libobj" libobj=$func_xform_result ;; esac case $libobj in *.lo) func_lo2o "$libobj"; obj=$func_lo2o_result ;; *) func_fatal_error "cannot determine name of library object from '$libobj'" ;; esac func_infer_tag $base_compile for arg in $later; do case $arg in -shared) test yes = "$build_libtool_libs" \ || func_fatal_configuration "cannot build a shared library" build_old_libs=no continue ;; -static) build_libtool_libs=no build_old_libs=yes continue ;; -prefer-pic) pic_mode=yes continue ;; -prefer-non-pic) pic_mode=no continue ;; esac done func_quote_for_eval "$libobj" test "X$libobj" != "X$func_quote_for_eval_result" \ && $ECHO "X$libobj" | $GREP '[]~#^*{};<>?"'"'"' &()|`$[]' \ && func_warning "libobj name '$libobj' may not contain shell special characters." func_dirname_and_basename "$obj" "/" "" objname=$func_basename_result xdir=$func_dirname_result lobj=$xdir$objdir/$objname test -z "$base_compile" && \ func_fatal_help "you must specify a compilation command" # Delete any leftover library objects. if test yes = "$build_old_libs"; then removelist="$obj $lobj $libobj ${libobj}T" else removelist="$lobj $libobj ${libobj}T" fi # On Cygwin there's no "real" PIC flag so we must build both object types case $host_os in cygwin* | mingw* | pw32* | os2* | cegcc*) pic_mode=default ;; esac if test no = "$pic_mode" && test pass_all != "$deplibs_check_method"; then # non-PIC code in shared libraries is not supported pic_mode=default fi # Calculate the filename of the output object if compiler does # not support -o with -c if test no = "$compiler_c_o"; then output_obj=`$ECHO "$srcfile" | $SED 's%^.*/%%; s%\.[^.]*$%%'`.$objext lockfile=$output_obj.lock else output_obj= need_locks=no lockfile= fi # Lock this critical section if it is needed # We use this script file to make the link, it avoids creating a new file if test yes = "$need_locks"; then until $opt_dry_run || ln "$progpath" "$lockfile" 2>/dev/null; do func_echo "Waiting for $lockfile to be removed" sleep 2 done elif test warn = "$need_locks"; then if test -f "$lockfile"; then $ECHO "\ *** ERROR, $lockfile exists and contains: `cat $lockfile 2>/dev/null` This indicates that another process is trying to use the same temporary object file, and libtool could not work around it because your compiler does not support '-c' and '-o' together. If you repeat this compilation, it may succeed, by chance, but you had better avoid parallel builds (make -j) in this platform, or get a better compiler." $opt_dry_run || $RM $removelist exit $EXIT_FAILURE fi func_append removelist " $output_obj" $ECHO "$srcfile" > "$lockfile" fi $opt_dry_run || $RM $removelist func_append removelist " $lockfile" trap '$opt_dry_run || $RM $removelist; exit $EXIT_FAILURE' 1 2 15 func_to_tool_file "$srcfile" func_convert_file_msys_to_w32 srcfile=$func_to_tool_file_result func_quote_for_eval "$srcfile" qsrcfile=$func_quote_for_eval_result # Only build a PIC object if we are building libtool libraries. if test yes = "$build_libtool_libs"; then # Without this assignment, base_compile gets emptied. fbsd_hideous_sh_bug=$base_compile if test no != "$pic_mode"; then command="$base_compile $qsrcfile $pic_flag" else # Don't build PIC code command="$base_compile $qsrcfile" fi func_mkdir_p "$xdir$objdir" if test -z "$output_obj"; then # Place PIC objects in $objdir func_append command " -o $lobj" fi func_show_eval_locale "$command" \ 'test -n "$output_obj" && $RM $removelist; exit $EXIT_FAILURE' if test warn = "$need_locks" && test "X`cat $lockfile 2>/dev/null`" != "X$srcfile"; then $ECHO "\ *** ERROR, $lockfile contains: `cat $lockfile 2>/dev/null` but it should contain: $srcfile This indicates that another process is trying to use the same temporary object file, and libtool could not work around it because your compiler does not support '-c' and '-o' together. If you repeat this compilation, it may succeed, by chance, but you had better avoid parallel builds (make -j) in this platform, or get a better compiler." $opt_dry_run || $RM $removelist exit $EXIT_FAILURE fi # Just move the object if needed, then go on to compile the next one if test -n "$output_obj" && test "X$output_obj" != "X$lobj"; then func_show_eval '$MV "$output_obj" "$lobj"' \ 'error=$?; $opt_dry_run || $RM $removelist; exit $error' fi # Allow error messages only from the first compilation. if test yes = "$suppress_opt"; then suppress_output=' >/dev/null 2>&1' fi fi # Only build a position-dependent object if we build old libraries. if test yes = "$build_old_libs"; then if test yes != "$pic_mode"; then # Don't build PIC code command="$base_compile $qsrcfile$pie_flag" else command="$base_compile $qsrcfile $pic_flag" fi if test yes = "$compiler_c_o"; then func_append command " -o $obj" fi # Suppress compiler output if we already did a PIC compilation. func_append command "$suppress_output" func_show_eval_locale "$command" \ '$opt_dry_run || $RM $removelist; exit $EXIT_FAILURE' if test warn = "$need_locks" && test "X`cat $lockfile 2>/dev/null`" != "X$srcfile"; then $ECHO "\ *** ERROR, $lockfile contains: `cat $lockfile 2>/dev/null` but it should contain: $srcfile This indicates that another process is trying to use the same temporary object file, and libtool could not work around it because your compiler does not support '-c' and '-o' together. If you repeat this compilation, it may succeed, by chance, but you had better avoid parallel builds (make -j) in this platform, or get a better compiler." $opt_dry_run || $RM $removelist exit $EXIT_FAILURE fi # Just move the object if needed if test -n "$output_obj" && test "X$output_obj" != "X$obj"; then func_show_eval '$MV "$output_obj" "$obj"' \ 'error=$?; $opt_dry_run || $RM $removelist; exit $error' fi fi $opt_dry_run || { func_write_libtool_object "$libobj" "$objdir/$objname" "$objname" # Unlock the critical section if it was locked if test no != "$need_locks"; then removelist=$lockfile $RM "$lockfile" fi } exit $EXIT_SUCCESS } $opt_help || { test compile = "$opt_mode" && func_mode_compile ${1+"$@"} } func_mode_help () { # We need to display help for each of the modes. case $opt_mode in "") # Generic help is extracted from the usage comments # at the start of this file. func_help ;; clean) $ECHO \ "Usage: $progname [OPTION]... --mode=clean RM [RM-OPTION]... FILE... Remove files from the build directory. RM is the name of the program to use to delete files associated with each FILE (typically '/bin/rm'). RM-OPTIONS are options (such as '-f') to be passed to RM. If FILE is a libtool library, object or program, all the files associated with it are deleted. Otherwise, only FILE itself is deleted using RM." ;; compile) $ECHO \ "Usage: $progname [OPTION]... --mode=compile COMPILE-COMMAND... SOURCEFILE Compile a source file into a libtool library object. This mode accepts the following additional options: -o OUTPUT-FILE set the output file name to OUTPUT-FILE -no-suppress do not suppress compiler output for multiple passes -prefer-pic try to build PIC objects only -prefer-non-pic try to build non-PIC objects only -shared do not build a '.o' file suitable for static linking -static only build a '.o' file suitable for static linking -Wc,FLAG pass FLAG directly to the compiler COMPILE-COMMAND is a command to be used in creating a 'standard' object file from the given SOURCEFILE. The output file name is determined by removing the directory component from SOURCEFILE, then substituting the C source code suffix '.c' with the library object suffix, '.lo'." ;; execute) $ECHO \ "Usage: $progname [OPTION]... --mode=execute COMMAND [ARGS]... Automatically set library path, then run a program. This mode accepts the following additional options: -dlopen FILE add the directory containing FILE to the library path This mode sets the library path environment variable according to '-dlopen' flags. If any of the ARGS are libtool executable wrappers, then they are translated into their corresponding uninstalled binary, and any of their required library directories are added to the library path. Then, COMMAND is executed, with ARGS as arguments." ;; finish) $ECHO \ "Usage: $progname [OPTION]... --mode=finish [LIBDIR]... Complete the installation of libtool libraries. Each LIBDIR is a directory that contains libtool libraries. The commands that this mode executes may require superuser privileges. Use the '--dry-run' option if you just want to see what would be executed." ;; install) $ECHO \ "Usage: $progname [OPTION]... --mode=install INSTALL-COMMAND... Install executables or libraries. INSTALL-COMMAND is the installation command. The first component should be either the 'install' or 'cp' program. The following components of INSTALL-COMMAND are treated specially: -inst-prefix-dir PREFIX-DIR Use PREFIX-DIR as a staging area for installation The rest of the components are interpreted as arguments to that command (only BSD-compatible install options are recognized)." ;; link) $ECHO \ "Usage: $progname [OPTION]... --mode=link LINK-COMMAND... Link object files or libraries together to form another library, or to create an executable program. LINK-COMMAND is a command using the C compiler that you would use to create a program from several object files. The following components of LINK-COMMAND are treated specially: -all-static do not do any dynamic linking at all -avoid-version do not add a version suffix if possible -bindir BINDIR specify path to binaries directory (for systems where libraries must be found in the PATH setting at runtime) -dlopen FILE '-dlpreopen' FILE if it cannot be dlopened at runtime -dlpreopen FILE link in FILE and add its symbols to lt_preloaded_symbols -export-dynamic allow symbols from OUTPUT-FILE to be resolved with dlsym(3) -export-symbols SYMFILE try to export only the symbols listed in SYMFILE -export-symbols-regex REGEX try to export only the symbols matching REGEX -LLIBDIR search LIBDIR for required installed libraries -lNAME OUTPUT-FILE requires the installed library libNAME -module build a library that can dlopened -no-fast-install disable the fast-install mode -no-install link a not-installable executable -no-undefined declare that a library does not refer to external symbols -o OUTPUT-FILE create OUTPUT-FILE from the specified objects -objectlist FILE use a list of object files found in FILE to specify objects -os2dllname NAME force a short DLL name on OS/2 (no effect on other OSes) -precious-files-regex REGEX don't remove output files matching REGEX -release RELEASE specify package release information -rpath LIBDIR the created library will eventually be installed in LIBDIR -R[ ]LIBDIR add LIBDIR to the runtime path of programs and libraries -shared only do dynamic linking of libtool libraries -shrext SUFFIX override the standard shared library file extension -static do not do any dynamic linking of uninstalled libtool libraries -static-libtool-libs do not do any dynamic linking of libtool libraries -version-info CURRENT[:REVISION[:AGE]] specify library version info [each variable defaults to 0] -weak LIBNAME declare that the target provides the LIBNAME interface -Wc,FLAG -Xcompiler FLAG pass linker-specific FLAG directly to the compiler -Wl,FLAG -Xlinker FLAG pass linker-specific FLAG directly to the linker -XCClinker FLAG pass link-specific FLAG to the compiler driver (CC) All other options (arguments beginning with '-') are ignored. Every other argument is treated as a filename. Files ending in '.la' are treated as uninstalled libtool libraries, other files are standard or library object files. If the OUTPUT-FILE ends in '.la', then a libtool library is created, only library objects ('.lo' files) may be specified, and '-rpath' is required, except when creating a convenience library. If OUTPUT-FILE ends in '.a' or '.lib', then a standard library is created using 'ar' and 'ranlib', or on Windows using 'lib'. If OUTPUT-FILE ends in '.lo' or '.$objext', then a reloadable object file is created, otherwise an executable program is created." ;; uninstall) $ECHO \ "Usage: $progname [OPTION]... --mode=uninstall RM [RM-OPTION]... FILE... Remove libraries from an installation directory. RM is the name of the program to use to delete files associated with each FILE (typically '/bin/rm'). RM-OPTIONS are options (such as '-f') to be passed to RM. If FILE is a libtool library, all the files associated with it are deleted. Otherwise, only FILE itself is deleted using RM." ;; *) func_fatal_help "invalid operation mode '$opt_mode'" ;; esac echo $ECHO "Try '$progname --help' for more information about other modes." } # Now that we've collected a possible --mode arg, show help if necessary if $opt_help; then if test : = "$opt_help"; then func_mode_help else { func_help noexit for opt_mode in compile link execute install finish uninstall clean; do func_mode_help done } | $SED -n '1p; 2,$s/^Usage:/ or: /p' { func_help noexit for opt_mode in compile link execute install finish uninstall clean; do echo func_mode_help done } | $SED '1d /^When reporting/,/^Report/{ H d } $x /information about other modes/d /more detailed .*MODE/d s/^Usage:.*--mode=\([^ ]*\) .*/Description of \1 mode:/' fi exit $? fi # func_mode_execute arg... func_mode_execute () { $debug_cmd # The first argument is the command name. cmd=$nonopt test -z "$cmd" && \ func_fatal_help "you must specify a COMMAND" # Handle -dlopen flags immediately. for file in $opt_dlopen; do test -f "$file" \ || func_fatal_help "'$file' is not a file" dir= case $file in *.la) func_resolve_sysroot "$file" file=$func_resolve_sysroot_result # Check to see that this really is a libtool archive. func_lalib_unsafe_p "$file" \ || func_fatal_help "'$lib' is not a valid libtool archive" # Read the libtool library. dlname= library_names= func_source "$file" # Skip this library if it cannot be dlopened. if test -z "$dlname"; then # Warn if it was a shared library. test -n "$library_names" && \ func_warning "'$file' was not linked with '-export-dynamic'" continue fi func_dirname "$file" "" "." dir=$func_dirname_result if test -f "$dir/$objdir/$dlname"; then func_append dir "/$objdir" else if test ! -f "$dir/$dlname"; then func_fatal_error "cannot find '$dlname' in '$dir' or '$dir/$objdir'" fi fi ;; *.lo) # Just add the directory containing the .lo file. func_dirname "$file" "" "." dir=$func_dirname_result ;; *) func_warning "'-dlopen' is ignored for non-libtool libraries and objects" continue ;; esac # Get the absolute pathname. absdir=`cd "$dir" && pwd` test -n "$absdir" && dir=$absdir # Now add the directory to shlibpath_var. if eval "test -z \"\$$shlibpath_var\""; then eval "$shlibpath_var=\"\$dir\"" else eval "$shlibpath_var=\"\$dir:\$$shlibpath_var\"" fi done # This variable tells wrapper scripts just to set shlibpath_var # rather than running their programs. libtool_execute_magic=$magic # Check if any of the arguments is a wrapper script. args= for file do case $file in -* | *.la | *.lo ) ;; *) # Do a test to see if this is really a libtool program. if func_ltwrapper_script_p "$file"; then func_source "$file" # Transform arg to wrapped name. file=$progdir/$program elif func_ltwrapper_executable_p "$file"; then func_ltwrapper_scriptname "$file" func_source "$func_ltwrapper_scriptname_result" # Transform arg to wrapped name. file=$progdir/$program fi ;; esac # Quote arguments (to preserve shell metacharacters). func_append_quoted args "$file" done if $opt_dry_run; then # Display what would be done. if test -n "$shlibpath_var"; then eval "\$ECHO \"\$shlibpath_var=\$$shlibpath_var\"" echo "export $shlibpath_var" fi $ECHO "$cmd$args" exit $EXIT_SUCCESS else if test -n "$shlibpath_var"; then # Export the shlibpath_var. eval "export $shlibpath_var" fi # Restore saved environment variables for lt_var in LANG LANGUAGE LC_ALL LC_CTYPE LC_COLLATE LC_MESSAGES do eval "if test \"\${save_$lt_var+set}\" = set; then $lt_var=\$save_$lt_var; export $lt_var else $lt_unset $lt_var fi" done # Now prepare to actually exec the command. exec_cmd=\$cmd$args fi } test execute = "$opt_mode" && func_mode_execute ${1+"$@"} # func_mode_finish arg... func_mode_finish () { $debug_cmd libs= libdirs= admincmds= for opt in "$nonopt" ${1+"$@"} do if test -d "$opt"; then func_append libdirs " $opt" elif test -f "$opt"; then if func_lalib_unsafe_p "$opt"; then func_append libs " $opt" else func_warning "'$opt' is not a valid libtool archive" fi else func_fatal_error "invalid argument '$opt'" fi done if test -n "$libs"; then if test -n "$lt_sysroot"; then sysroot_regex=`$ECHO "$lt_sysroot" | $SED "$sed_make_literal_regex"` sysroot_cmd="s/\([ ']\)$sysroot_regex/\1/g;" else sysroot_cmd= fi # Remove sysroot references if $opt_dry_run; then for lib in $libs; do echo "removing references to $lt_sysroot and '=' prefixes from $lib" done else tmpdir=`func_mktempdir` for lib in $libs; do $SED -e "$sysroot_cmd s/\([ ']-[LR]\)=/\1/g; s/\([ ']\)=/\1/g" $lib \ > $tmpdir/tmp-la mv -f $tmpdir/tmp-la $lib done ${RM}r "$tmpdir" fi fi if test -n "$finish_cmds$finish_eval" && test -n "$libdirs"; then for libdir in $libdirs; do if test -n "$finish_cmds"; then # Do each command in the finish commands. func_execute_cmds "$finish_cmds" 'admincmds="$admincmds '"$cmd"'"' fi if test -n "$finish_eval"; then # Do the single finish_eval. eval cmds=\"$finish_eval\" $opt_dry_run || eval "$cmds" || func_append admincmds " $cmds" fi done fi # Exit here if they wanted silent mode. $opt_quiet && exit $EXIT_SUCCESS if test -n "$finish_cmds$finish_eval" && test -n "$libdirs"; then echo "----------------------------------------------------------------------" echo "Libraries have been installed in:" for libdir in $libdirs; do $ECHO " $libdir" done echo echo "If you ever happen to want to link against installed libraries" echo "in a given directory, LIBDIR, you must either use libtool, and" echo "specify the full pathname of the library, or use the '-LLIBDIR'" echo "flag during linking and do at least one of the following:" if test -n "$shlibpath_var"; then echo " - add LIBDIR to the '$shlibpath_var' environment variable" echo " during execution" fi if test -n "$runpath_var"; then echo " - add LIBDIR to the '$runpath_var' environment variable" echo " during linking" fi if test -n "$hardcode_libdir_flag_spec"; then libdir=LIBDIR eval flag=\"$hardcode_libdir_flag_spec\" $ECHO " - use the '$flag' linker flag" fi if test -n "$admincmds"; then $ECHO " - have your system administrator run these commands:$admincmds" fi if test -f /etc/ld.so.conf; then echo " - have your system administrator add LIBDIR to '/etc/ld.so.conf'" fi echo echo "See any operating system documentation about shared libraries for" case $host in solaris2.[6789]|solaris2.1[0-9]) echo "more information, such as the ld(1), crle(1) and ld.so(8) manual" echo "pages." ;; *) echo "more information, such as the ld(1) and ld.so(8) manual pages." ;; esac echo "----------------------------------------------------------------------" fi exit $EXIT_SUCCESS } test finish = "$opt_mode" && func_mode_finish ${1+"$@"} # func_mode_install arg... func_mode_install () { $debug_cmd # There may be an optional sh(1) argument at the beginning of # install_prog (especially on Windows NT). if test "$SHELL" = "$nonopt" || test /bin/sh = "$nonopt" || # Allow the use of GNU shtool's install command. case $nonopt in *shtool*) :;; *) false;; esac then # Aesthetically quote it. func_quote_for_eval "$nonopt" install_prog="$func_quote_for_eval_result " arg=$1 shift else install_prog= arg=$nonopt fi # The real first argument should be the name of the installation program. # Aesthetically quote it. func_quote_for_eval "$arg" func_append install_prog "$func_quote_for_eval_result" install_shared_prog=$install_prog case " $install_prog " in *[\\\ /]cp\ *) install_cp=: ;; *) install_cp=false ;; esac # We need to accept at least all the BSD install flags. dest= files= opts= prev= install_type= isdir=false stripme= no_mode=: for arg do arg2= if test -n "$dest"; then func_append files " $dest" dest=$arg continue fi case $arg in -d) isdir=: ;; -f) if $install_cp; then :; else prev=$arg fi ;; -g | -m | -o) prev=$arg ;; -s) stripme=" -s" continue ;; -*) ;; *) # If the previous option needed an argument, then skip it. if test -n "$prev"; then if test X-m = "X$prev" && test -n "$install_override_mode"; then arg2=$install_override_mode no_mode=false fi prev= else dest=$arg continue fi ;; esac # Aesthetically quote the argument. func_quote_for_eval "$arg" func_append install_prog " $func_quote_for_eval_result" if test -n "$arg2"; then func_quote_for_eval "$arg2" fi func_append install_shared_prog " $func_quote_for_eval_result" done test -z "$install_prog" && \ func_fatal_help "you must specify an install program" test -n "$prev" && \ func_fatal_help "the '$prev' option requires an argument" if test -n "$install_override_mode" && $no_mode; then if $install_cp; then :; else func_quote_for_eval "$install_override_mode" func_append install_shared_prog " -m $func_quote_for_eval_result" fi fi if test -z "$files"; then if test -z "$dest"; then func_fatal_help "no file or destination specified" else func_fatal_help "you must specify a destination" fi fi # Strip any trailing slash from the destination. func_stripname '' '/' "$dest" dest=$func_stripname_result # Check to see that the destination is a directory. test -d "$dest" && isdir=: if $isdir; then destdir=$dest destname= else func_dirname_and_basename "$dest" "" "." destdir=$func_dirname_result destname=$func_basename_result # Not a directory, so check to see that there is only one file specified. set dummy $files; shift test "$#" -gt 1 && \ func_fatal_help "'$dest' is not a directory" fi case $destdir in [\\/]* | [A-Za-z]:[\\/]*) ;; *) for file in $files; do case $file in *.lo) ;; *) func_fatal_help "'$destdir' must be an absolute directory name" ;; esac done ;; esac # This variable tells wrapper scripts just to set variables rather # than running their programs. libtool_install_magic=$magic staticlibs= future_libdirs= current_libdirs= for file in $files; do # Do each installation. case $file in *.$libext) # Do the static libraries later. func_append staticlibs " $file" ;; *.la) func_resolve_sysroot "$file" file=$func_resolve_sysroot_result # Check to see that this really is a libtool archive. func_lalib_unsafe_p "$file" \ || func_fatal_help "'$file' is not a valid libtool archive" library_names= old_library= relink_command= func_source "$file" # Add the libdir to current_libdirs if it is the destination. if test "X$destdir" = "X$libdir"; then case "$current_libdirs " in *" $libdir "*) ;; *) func_append current_libdirs " $libdir" ;; esac else # Note the libdir as a future libdir. case "$future_libdirs " in *" $libdir "*) ;; *) func_append future_libdirs " $libdir" ;; esac fi func_dirname "$file" "/" "" dir=$func_dirname_result func_append dir "$objdir" if test -n "$relink_command"; then # Determine the prefix the user has applied to our future dir. inst_prefix_dir=`$ECHO "$destdir" | $SED -e "s%$libdir\$%%"` # Don't allow the user to place us outside of our expected # location b/c this prevents finding dependent libraries that # are installed to the same prefix. # At present, this check doesn't affect windows .dll's that # are installed into $libdir/../bin (currently, that works fine) # but it's something to keep an eye on. test "$inst_prefix_dir" = "$destdir" && \ func_fatal_error "error: cannot install '$file' to a directory not ending in $libdir" if test -n "$inst_prefix_dir"; then # Stick the inst_prefix_dir data into the link command. relink_command=`$ECHO "$relink_command" | $SED "s%@inst_prefix_dir@%-inst-prefix-dir $inst_prefix_dir%"` else relink_command=`$ECHO "$relink_command" | $SED "s%@inst_prefix_dir@%%"` fi func_warning "relinking '$file'" func_show_eval "$relink_command" \ 'func_fatal_error "error: relink '\''$file'\'' with the above command before installing it"' fi # See the names of the shared library. set dummy $library_names; shift if test -n "$1"; then realname=$1 shift srcname=$realname test -n "$relink_command" && srcname=${realname}T # Install the shared library and build the symlinks. func_show_eval "$install_shared_prog $dir/$srcname $destdir/$realname" \ 'exit $?' tstripme=$stripme case $host_os in cygwin* | mingw* | pw32* | cegcc*) case $realname in *.dll.a) tstripme= ;; esac ;; os2*) case $realname in *_dll.a) tstripme= ;; esac ;; esac if test -n "$tstripme" && test -n "$striplib"; then func_show_eval "$striplib $destdir/$realname" 'exit $?' fi if test "$#" -gt 0; then # Delete the old symlinks, and create new ones. # Try 'ln -sf' first, because the 'ln' binary might depend on # the symlink we replace! Solaris /bin/ln does not understand -f, # so we also need to try rm && ln -s. for linkname do test "$linkname" != "$realname" \ && func_show_eval "(cd $destdir && { $LN_S -f $realname $linkname || { $RM $linkname && $LN_S $realname $linkname; }; })" done fi # Do each command in the postinstall commands. lib=$destdir/$realname func_execute_cmds "$postinstall_cmds" 'exit $?' fi # Install the pseudo-library for information purposes. func_basename "$file" name=$func_basename_result instname=$dir/${name}i func_show_eval "$install_prog $instname $destdir/$name" 'exit $?' # Maybe install the static library, too. test -n "$old_library" && func_append staticlibs " $dir/$old_library" ;; *.lo) # Install (i.e. copy) a libtool object. # Figure out destination file name, if it wasn't already specified. if test -n "$destname"; then destfile=$destdir/$destname else func_basename "$file" destfile=$func_basename_result destfile=$destdir/$destfile fi # Deduce the name of the destination old-style object file. case $destfile in *.lo) func_lo2o "$destfile" staticdest=$func_lo2o_result ;; *.$objext) staticdest=$destfile destfile= ;; *) func_fatal_help "cannot copy a libtool object to '$destfile'" ;; esac # Install the libtool object if requested. test -n "$destfile" && \ func_show_eval "$install_prog $file $destfile" 'exit $?' # Install the old object if enabled. if test yes = "$build_old_libs"; then # Deduce the name of the old-style object file. func_lo2o "$file" staticobj=$func_lo2o_result func_show_eval "$install_prog \$staticobj \$staticdest" 'exit $?' fi exit $EXIT_SUCCESS ;; *) # Figure out destination file name, if it wasn't already specified. if test -n "$destname"; then destfile=$destdir/$destname else func_basename "$file" destfile=$func_basename_result destfile=$destdir/$destfile fi # If the file is missing, and there is a .exe on the end, strip it # because it is most likely a libtool script we actually want to # install stripped_ext= case $file in *.exe) if test ! -f "$file"; then func_stripname '' '.exe' "$file" file=$func_stripname_result stripped_ext=.exe fi ;; esac # Do a test to see if this is really a libtool program. case $host in *cygwin* | *mingw*) if func_ltwrapper_executable_p "$file"; then func_ltwrapper_scriptname "$file" wrapper=$func_ltwrapper_scriptname_result else func_stripname '' '.exe' "$file" wrapper=$func_stripname_result fi ;; *) wrapper=$file ;; esac if func_ltwrapper_script_p "$wrapper"; then notinst_deplibs= relink_command= func_source "$wrapper" # Check the variables that should have been set. test -z "$generated_by_libtool_version" && \ func_fatal_error "invalid libtool wrapper script '$wrapper'" finalize=: for lib in $notinst_deplibs; do # Check to see that each library is installed. libdir= if test -f "$lib"; then func_source "$lib" fi libfile=$libdir/`$ECHO "$lib" | $SED 's%^.*/%%g'` if test -n "$libdir" && test ! -f "$libfile"; then func_warning "'$lib' has not been installed in '$libdir'" finalize=false fi done relink_command= func_source "$wrapper" outputname= if test no = "$fast_install" && test -n "$relink_command"; then $opt_dry_run || { if $finalize; then tmpdir=`func_mktempdir` func_basename "$file$stripped_ext" file=$func_basename_result outputname=$tmpdir/$file # Replace the output file specification. relink_command=`$ECHO "$relink_command" | $SED 's%@OUTPUT@%'"$outputname"'%g'` $opt_quiet || { func_quote_for_expand "$relink_command" eval "func_echo $func_quote_for_expand_result" } if eval "$relink_command"; then : else func_error "error: relink '$file' with the above command before installing it" $opt_dry_run || ${RM}r "$tmpdir" continue fi file=$outputname else func_warning "cannot relink '$file'" fi } else # Install the binary that we compiled earlier. file=`$ECHO "$file$stripped_ext" | $SED "s%\([^/]*\)$%$objdir/\1%"` fi fi # remove .exe since cygwin /usr/bin/install will append another # one anyway case $install_prog,$host in */usr/bin/install*,*cygwin*) case $file:$destfile in *.exe:*.exe) # this is ok ;; *.exe:*) destfile=$destfile.exe ;; *:*.exe) func_stripname '' '.exe' "$destfile" destfile=$func_stripname_result ;; esac ;; esac func_show_eval "$install_prog\$stripme \$file \$destfile" 'exit $?' $opt_dry_run || if test -n "$outputname"; then ${RM}r "$tmpdir" fi ;; esac done for file in $staticlibs; do func_basename "$file" name=$func_basename_result # Set up the ranlib parameters. oldlib=$destdir/$name func_to_tool_file "$oldlib" func_convert_file_msys_to_w32 tool_oldlib=$func_to_tool_file_result func_show_eval "$install_prog \$file \$oldlib" 'exit $?' if test -n "$stripme" && test -n "$old_striplib"; then func_show_eval "$old_striplib $tool_oldlib" 'exit $?' fi # Do each command in the postinstall commands. func_execute_cmds "$old_postinstall_cmds" 'exit $?' done test -n "$future_libdirs" && \ func_warning "remember to run '$progname --finish$future_libdirs'" if test -n "$current_libdirs"; then # Maybe just do a dry run. $opt_dry_run && current_libdirs=" -n$current_libdirs" exec_cmd='$SHELL "$progpath" $preserve_args --finish$current_libdirs' else exit $EXIT_SUCCESS fi } test install = "$opt_mode" && func_mode_install ${1+"$@"} # func_generate_dlsyms outputname originator pic_p # Extract symbols from dlprefiles and create ${outputname}S.o with # a dlpreopen symbol table. func_generate_dlsyms () { $debug_cmd my_outputname=$1 my_originator=$2 my_pic_p=${3-false} my_prefix=`$ECHO "$my_originator" | $SED 's%[^a-zA-Z0-9]%_%g'` my_dlsyms= if test -n "$dlfiles$dlprefiles" || test no != "$dlself"; then if test -n "$NM" && test -n "$global_symbol_pipe"; then my_dlsyms=${my_outputname}S.c else func_error "not configured to extract global symbols from dlpreopened files" fi fi if test -n "$my_dlsyms"; then case $my_dlsyms in "") ;; *.c) # Discover the nlist of each of the dlfiles. nlist=$output_objdir/$my_outputname.nm func_show_eval "$RM $nlist ${nlist}S ${nlist}T" # Parse the name list into a source file. func_verbose "creating $output_objdir/$my_dlsyms" $opt_dry_run || $ECHO > "$output_objdir/$my_dlsyms" "\ /* $my_dlsyms - symbol resolution table for '$my_outputname' dlsym emulation. */ /* Generated by $PROGRAM (GNU $PACKAGE) $VERSION */ #ifdef __cplusplus extern \"C\" { #endif #if defined __GNUC__ && (((__GNUC__ == 4) && (__GNUC_MINOR__ >= 4)) || (__GNUC__ > 4)) #pragma GCC diagnostic ignored \"-Wstrict-prototypes\" #endif /* Keep this code in sync between libtool.m4, ltmain, lt_system.h, and tests. */ #if defined _WIN32 || defined __CYGWIN__ || defined _WIN32_WCE /* DATA imports from DLLs on WIN32 can't be const, because runtime relocations are performed -- see ld's documentation on pseudo-relocs. */ # define LT_DLSYM_CONST #elif defined __osf__ /* This system does not cope well with relocations in const data. */ # define LT_DLSYM_CONST #else # define LT_DLSYM_CONST const #endif #define STREQ(s1, s2) (strcmp ((s1), (s2)) == 0) /* External symbol declarations for the compiler. */\ " if test yes = "$dlself"; then func_verbose "generating symbol list for '$output'" $opt_dry_run || echo ': @PROGRAM@ ' > "$nlist" # Add our own program objects to the symbol list. progfiles=`$ECHO "$objs$old_deplibs" | $SP2NL | $SED "$lo2o" | $NL2SP` for progfile in $progfiles; do func_to_tool_file "$progfile" func_convert_file_msys_to_w32 func_verbose "extracting global C symbols from '$func_to_tool_file_result'" $opt_dry_run || eval "$NM $func_to_tool_file_result | $global_symbol_pipe >> '$nlist'" done if test -n "$exclude_expsyms"; then $opt_dry_run || { eval '$EGREP -v " ($exclude_expsyms)$" "$nlist" > "$nlist"T' eval '$MV "$nlist"T "$nlist"' } fi if test -n "$export_symbols_regex"; then $opt_dry_run || { eval '$EGREP -e "$export_symbols_regex" "$nlist" > "$nlist"T' eval '$MV "$nlist"T "$nlist"' } fi # Prepare the list of exported symbols if test -z "$export_symbols"; then export_symbols=$output_objdir/$outputname.exp $opt_dry_run || { $RM $export_symbols eval "$SED -n -e '/^: @PROGRAM@ $/d' -e 's/^.* \(.*\)$/\1/p' "'< "$nlist" > "$export_symbols"' case $host in *cygwin* | *mingw* | *cegcc* ) eval "echo EXPORTS "'> "$output_objdir/$outputname.def"' eval 'cat "$export_symbols" >> "$output_objdir/$outputname.def"' ;; esac } else $opt_dry_run || { eval "$SED -e 's/\([].[*^$]\)/\\\\\1/g' -e 's/^/ /' -e 's/$/$/'"' < "$export_symbols" > "$output_objdir/$outputname.exp"' eval '$GREP -f "$output_objdir/$outputname.exp" < "$nlist" > "$nlist"T' eval '$MV "$nlist"T "$nlist"' case $host in *cygwin* | *mingw* | *cegcc* ) eval "echo EXPORTS "'> "$output_objdir/$outputname.def"' eval 'cat "$nlist" >> "$output_objdir/$outputname.def"' ;; esac } fi fi for dlprefile in $dlprefiles; do func_verbose "extracting global C symbols from '$dlprefile'" func_basename "$dlprefile" name=$func_basename_result case $host in *cygwin* | *mingw* | *cegcc* ) # if an import library, we need to obtain dlname if func_win32_import_lib_p "$dlprefile"; then func_tr_sh "$dlprefile" eval "curr_lafile=\$libfile_$func_tr_sh_result" dlprefile_dlbasename= if test -n "$curr_lafile" && func_lalib_p "$curr_lafile"; then # Use subshell, to avoid clobbering current variable values dlprefile_dlname=`source "$curr_lafile" && echo "$dlname"` if test -n "$dlprefile_dlname"; then func_basename "$dlprefile_dlname" dlprefile_dlbasename=$func_basename_result else # no lafile. user explicitly requested -dlpreopen . $sharedlib_from_linklib_cmd "$dlprefile" dlprefile_dlbasename=$sharedlib_from_linklib_result fi fi $opt_dry_run || { if test -n "$dlprefile_dlbasename"; then eval '$ECHO ": $dlprefile_dlbasename" >> "$nlist"' else func_warning "Could not compute DLL name from $name" eval '$ECHO ": $name " >> "$nlist"' fi func_to_tool_file "$dlprefile" func_convert_file_msys_to_w32 eval "$NM \"$func_to_tool_file_result\" 2>/dev/null | $global_symbol_pipe | $SED -e '/I __imp/d' -e 's/I __nm_/D /;s/_nm__//' >> '$nlist'" } else # not an import lib $opt_dry_run || { eval '$ECHO ": $name " >> "$nlist"' func_to_tool_file "$dlprefile" func_convert_file_msys_to_w32 eval "$NM \"$func_to_tool_file_result\" 2>/dev/null | $global_symbol_pipe >> '$nlist'" } fi ;; *) $opt_dry_run || { eval '$ECHO ": $name " >> "$nlist"' func_to_tool_file "$dlprefile" func_convert_file_msys_to_w32 eval "$NM \"$func_to_tool_file_result\" 2>/dev/null | $global_symbol_pipe >> '$nlist'" } ;; esac done $opt_dry_run || { # Make sure we have at least an empty file. test -f "$nlist" || : > "$nlist" if test -n "$exclude_expsyms"; then $EGREP -v " ($exclude_expsyms)$" "$nlist" > "$nlist"T $MV "$nlist"T "$nlist" fi # Try sorting and uniquifying the output. if $GREP -v "^: " < "$nlist" | if sort -k 3 /dev/null 2>&1; then sort -k 3 else sort +2 fi | uniq > "$nlist"S; then : else $GREP -v "^: " < "$nlist" > "$nlist"S fi if test -f "$nlist"S; then eval "$global_symbol_to_cdecl"' < "$nlist"S >> "$output_objdir/$my_dlsyms"' else echo '/* NONE */' >> "$output_objdir/$my_dlsyms" fi func_show_eval '$RM "${nlist}I"' if test -n "$global_symbol_to_import"; then eval "$global_symbol_to_import"' < "$nlist"S > "$nlist"I' fi echo >> "$output_objdir/$my_dlsyms" "\ /* The mapping between symbol names and symbols. */ typedef struct { const char *name; void *address; } lt_dlsymlist; extern LT_DLSYM_CONST lt_dlsymlist lt_${my_prefix}_LTX_preloaded_symbols[];\ " if test -s "$nlist"I; then echo >> "$output_objdir/$my_dlsyms" "\ static void lt_syminit(void) { LT_DLSYM_CONST lt_dlsymlist *symbol = lt_${my_prefix}_LTX_preloaded_symbols; for (; symbol->name; ++symbol) {" $SED 's/.*/ if (STREQ (symbol->name, \"&\")) symbol->address = (void *) \&&;/' < "$nlist"I >> "$output_objdir/$my_dlsyms" echo >> "$output_objdir/$my_dlsyms" "\ } }" fi echo >> "$output_objdir/$my_dlsyms" "\ LT_DLSYM_CONST lt_dlsymlist lt_${my_prefix}_LTX_preloaded_symbols[] = { {\"$my_originator\", (void *) 0}," if test -s "$nlist"I; then echo >> "$output_objdir/$my_dlsyms" "\ {\"@INIT@\", (void *) <_syminit}," fi case $need_lib_prefix in no) eval "$global_symbol_to_c_name_address" < "$nlist" >> "$output_objdir/$my_dlsyms" ;; *) eval "$global_symbol_to_c_name_address_lib_prefix" < "$nlist" >> "$output_objdir/$my_dlsyms" ;; esac echo >> "$output_objdir/$my_dlsyms" "\ {0, (void *) 0} }; /* This works around a problem in FreeBSD linker */ #ifdef FREEBSD_WORKAROUND static const void *lt_preloaded_setup() { return lt_${my_prefix}_LTX_preloaded_symbols; } #endif #ifdef __cplusplus } #endif\ " } # !$opt_dry_run pic_flag_for_symtable= case "$compile_command " in *" -static "*) ;; *) case $host in # compiling the symbol table file with pic_flag works around # a FreeBSD bug that causes programs to crash when -lm is # linked before any other PIC object. But we must not use # pic_flag when linking with -static. The problem exists in # FreeBSD 2.2.6 and is fixed in FreeBSD 3.1. *-*-freebsd2.*|*-*-freebsd3.0*|*-*-freebsdelf3.0*) pic_flag_for_symtable=" $pic_flag -DFREEBSD_WORKAROUND" ;; *-*-hpux*) pic_flag_for_symtable=" $pic_flag" ;; *) $my_pic_p && pic_flag_for_symtable=" $pic_flag" ;; esac ;; esac symtab_cflags= for arg in $LTCFLAGS; do case $arg in -pie | -fpie | -fPIE) ;; *) func_append symtab_cflags " $arg" ;; esac done # Now compile the dynamic symbol file. func_show_eval '(cd $output_objdir && $LTCC$symtab_cflags -c$no_builtin_flag$pic_flag_for_symtable "$my_dlsyms")' 'exit $?' # Clean up the generated files. func_show_eval '$RM "$output_objdir/$my_dlsyms" "$nlist" "${nlist}S" "${nlist}T" "${nlist}I"' # Transform the symbol file into the correct name. symfileobj=$output_objdir/${my_outputname}S.$objext case $host in *cygwin* | *mingw* | *cegcc* ) if test -f "$output_objdir/$my_outputname.def"; then compile_command=`$ECHO "$compile_command" | $SED "s%@SYMFILE@%$output_objdir/$my_outputname.def $symfileobj%"` finalize_command=`$ECHO "$finalize_command" | $SED "s%@SYMFILE@%$output_objdir/$my_outputname.def $symfileobj%"` else compile_command=`$ECHO "$compile_command" | $SED "s%@SYMFILE@%$symfileobj%"` finalize_command=`$ECHO "$finalize_command" | $SED "s%@SYMFILE@%$symfileobj%"` fi ;; *) compile_command=`$ECHO "$compile_command" | $SED "s%@SYMFILE@%$symfileobj%"` finalize_command=`$ECHO "$finalize_command" | $SED "s%@SYMFILE@%$symfileobj%"` ;; esac ;; *) func_fatal_error "unknown suffix for '$my_dlsyms'" ;; esac else # We keep going just in case the user didn't refer to # lt_preloaded_symbols. The linker will fail if global_symbol_pipe # really was required. # Nullify the symbol file. compile_command=`$ECHO "$compile_command" | $SED "s% @SYMFILE@%%"` finalize_command=`$ECHO "$finalize_command" | $SED "s% @SYMFILE@%%"` fi } # func_cygming_gnu_implib_p ARG # This predicate returns with zero status (TRUE) if # ARG is a GNU/binutils-style import library. Returns # with nonzero status (FALSE) otherwise. func_cygming_gnu_implib_p () { $debug_cmd func_to_tool_file "$1" func_convert_file_msys_to_w32 func_cygming_gnu_implib_tmp=`$NM "$func_to_tool_file_result" | eval "$global_symbol_pipe" | $EGREP ' (_head_[A-Za-z0-9_]+_[ad]l*|[A-Za-z0-9_]+_[ad]l*_iname)$'` test -n "$func_cygming_gnu_implib_tmp" } # func_cygming_ms_implib_p ARG # This predicate returns with zero status (TRUE) if # ARG is an MS-style import library. Returns # with nonzero status (FALSE) otherwise. func_cygming_ms_implib_p () { $debug_cmd func_to_tool_file "$1" func_convert_file_msys_to_w32 func_cygming_ms_implib_tmp=`$NM "$func_to_tool_file_result" | eval "$global_symbol_pipe" | $GREP '_NULL_IMPORT_DESCRIPTOR'` test -n "$func_cygming_ms_implib_tmp" } # func_win32_libid arg # return the library type of file 'arg' # # Need a lot of goo to handle *both* DLLs and import libs # Has to be a shell function in order to 'eat' the argument # that is supplied when $file_magic_command is called. # Despite the name, also deal with 64 bit binaries. func_win32_libid () { $debug_cmd win32_libid_type=unknown win32_fileres=`file -L $1 2>/dev/null` case $win32_fileres in *ar\ archive\ import\ library*) # definitely import win32_libid_type="x86 archive import" ;; *ar\ archive*) # could be an import, or static # Keep the egrep pattern in sync with the one in _LT_CHECK_MAGIC_METHOD. if eval $OBJDUMP -f $1 | $SED -e '10q' 2>/dev/null | $EGREP 'file format (pei*-i386(.*architecture: i386)?|pe-arm-wince|pe-x86-64)' >/dev/null; then case $nm_interface in "MS dumpbin") if func_cygming_ms_implib_p "$1" || func_cygming_gnu_implib_p "$1" then win32_nmres=import else win32_nmres= fi ;; *) func_to_tool_file "$1" func_convert_file_msys_to_w32 win32_nmres=`eval $NM -f posix -A \"$func_to_tool_file_result\" | $SED -n -e ' 1,100{ / I /{ s|.*|import| p q } }'` ;; esac case $win32_nmres in import*) win32_libid_type="x86 archive import";; *) win32_libid_type="x86 archive static";; esac fi ;; *DLL*) win32_libid_type="x86 DLL" ;; *executable*) # but shell scripts are "executable" too... case $win32_fileres in *MS\ Windows\ PE\ Intel*) win32_libid_type="x86 DLL" ;; esac ;; esac $ECHO "$win32_libid_type" } # func_cygming_dll_for_implib ARG # # Platform-specific function to extract the # name of the DLL associated with the specified # import library ARG. # Invoked by eval'ing the libtool variable # $sharedlib_from_linklib_cmd # Result is available in the variable # $sharedlib_from_linklib_result func_cygming_dll_for_implib () { $debug_cmd sharedlib_from_linklib_result=`$DLLTOOL --identify-strict --identify "$1"` } # func_cygming_dll_for_implib_fallback_core SECTION_NAME LIBNAMEs # # The is the core of a fallback implementation of a # platform-specific function to extract the name of the # DLL associated with the specified import library LIBNAME. # # SECTION_NAME is either .idata$6 or .idata$7, depending # on the platform and compiler that created the implib. # # Echos the name of the DLL associated with the # specified import library. func_cygming_dll_for_implib_fallback_core () { $debug_cmd match_literal=`$ECHO "$1" | $SED "$sed_make_literal_regex"` $OBJDUMP -s --section "$1" "$2" 2>/dev/null | $SED '/^Contents of section '"$match_literal"':/{ # Place marker at beginning of archive member dllname section s/.*/====MARK====/ p d } # These lines can sometimes be longer than 43 characters, but # are always uninteresting /:[ ]*file format pe[i]\{,1\}-/d /^In archive [^:]*:/d # Ensure marker is printed /^====MARK====/p # Remove all lines with less than 43 characters /^.\{43\}/!d # From remaining lines, remove first 43 characters s/^.\{43\}//' | $SED -n ' # Join marker and all lines until next marker into a single line /^====MARK====/ b para H $ b para b :para x s/\n//g # Remove the marker s/^====MARK====// # Remove trailing dots and whitespace s/[\. \t]*$// # Print /./p' | # we now have a list, one entry per line, of the stringified # contents of the appropriate section of all members of the # archive that possess that section. Heuristic: eliminate # all those that have a first or second character that is # a '.' (that is, objdump's representation of an unprintable # character.) This should work for all archives with less than # 0x302f exports -- but will fail for DLLs whose name actually # begins with a literal '.' or a single character followed by # a '.'. # # Of those that remain, print the first one. $SED -e '/^\./d;/^.\./d;q' } # func_cygming_dll_for_implib_fallback ARG # Platform-specific function to extract the # name of the DLL associated with the specified # import library ARG. # # This fallback implementation is for use when $DLLTOOL # does not support the --identify-strict option. # Invoked by eval'ing the libtool variable # $sharedlib_from_linklib_cmd # Result is available in the variable # $sharedlib_from_linklib_result func_cygming_dll_for_implib_fallback () { $debug_cmd if func_cygming_gnu_implib_p "$1"; then # binutils import library sharedlib_from_linklib_result=`func_cygming_dll_for_implib_fallback_core '.idata$7' "$1"` elif func_cygming_ms_implib_p "$1"; then # ms-generated import library sharedlib_from_linklib_result=`func_cygming_dll_for_implib_fallback_core '.idata$6' "$1"` else # unknown sharedlib_from_linklib_result= fi } # func_extract_an_archive dir oldlib func_extract_an_archive () { $debug_cmd f_ex_an_ar_dir=$1; shift f_ex_an_ar_oldlib=$1 if test yes = "$lock_old_archive_extraction"; then lockfile=$f_ex_an_ar_oldlib.lock until $opt_dry_run || ln "$progpath" "$lockfile" 2>/dev/null; do func_echo "Waiting for $lockfile to be removed" sleep 2 done fi func_show_eval "(cd \$f_ex_an_ar_dir && $AR x \"\$f_ex_an_ar_oldlib\")" \ 'stat=$?; rm -f "$lockfile"; exit $stat' if test yes = "$lock_old_archive_extraction"; then $opt_dry_run || rm -f "$lockfile" fi if ($AR t "$f_ex_an_ar_oldlib" | sort | sort -uc >/dev/null 2>&1); then : else func_fatal_error "object name conflicts in archive: $f_ex_an_ar_dir/$f_ex_an_ar_oldlib" fi } # func_extract_archives gentop oldlib ... func_extract_archives () { $debug_cmd my_gentop=$1; shift my_oldlibs=${1+"$@"} my_oldobjs= my_xlib= my_xabs= my_xdir= for my_xlib in $my_oldlibs; do # Extract the objects. case $my_xlib in [\\/]* | [A-Za-z]:[\\/]*) my_xabs=$my_xlib ;; *) my_xabs=`pwd`"/$my_xlib" ;; esac func_basename "$my_xlib" my_xlib=$func_basename_result my_xlib_u=$my_xlib while :; do case " $extracted_archives " in *" $my_xlib_u "*) func_arith $extracted_serial + 1 extracted_serial=$func_arith_result my_xlib_u=lt$extracted_serial-$my_xlib ;; *) break ;; esac done extracted_archives="$extracted_archives $my_xlib_u" my_xdir=$my_gentop/$my_xlib_u func_mkdir_p "$my_xdir" case $host in *-darwin*) func_verbose "Extracting $my_xabs" # Do not bother doing anything if just a dry run $opt_dry_run || { darwin_orig_dir=`pwd` cd $my_xdir || exit $? darwin_archive=$my_xabs darwin_curdir=`pwd` func_basename "$darwin_archive" darwin_base_archive=$func_basename_result darwin_arches=`$LIPO -info "$darwin_archive" 2>/dev/null | $GREP Architectures 2>/dev/null || true` if test -n "$darwin_arches"; then darwin_arches=`$ECHO "$darwin_arches" | $SED -e 's/.*are://'` darwin_arch= func_verbose "$darwin_base_archive has multiple architectures $darwin_arches" for darwin_arch in $darwin_arches; do func_mkdir_p "unfat-$$/$darwin_base_archive-$darwin_arch" $LIPO -thin $darwin_arch -output "unfat-$$/$darwin_base_archive-$darwin_arch/$darwin_base_archive" "$darwin_archive" cd "unfat-$$/$darwin_base_archive-$darwin_arch" func_extract_an_archive "`pwd`" "$darwin_base_archive" cd "$darwin_curdir" $RM "unfat-$$/$darwin_base_archive-$darwin_arch/$darwin_base_archive" done # $darwin_arches ## Okay now we've a bunch of thin objects, gotta fatten them up :) darwin_filelist=`find unfat-$$ -type f -name \*.o -print -o -name \*.lo -print | $SED -e "$sed_basename" | sort -u` darwin_file= darwin_files= for darwin_file in $darwin_filelist; do darwin_files=`find unfat-$$ -name $darwin_file -print | sort | $NL2SP` $LIPO -create -output "$darwin_file" $darwin_files done # $darwin_filelist $RM -rf unfat-$$ cd "$darwin_orig_dir" else cd $darwin_orig_dir func_extract_an_archive "$my_xdir" "$my_xabs" fi # $darwin_arches } # !$opt_dry_run ;; *) func_extract_an_archive "$my_xdir" "$my_xabs" ;; esac my_oldobjs="$my_oldobjs "`find $my_xdir -name \*.$objext -print -o -name \*.lo -print | sort | $NL2SP` done func_extract_archives_result=$my_oldobjs } # func_emit_wrapper [arg=no] # # Emit a libtool wrapper script on stdout. # Don't directly open a file because we may want to # incorporate the script contents within a cygwin/mingw # wrapper executable. Must ONLY be called from within # func_mode_link because it depends on a number of variables # set therein. # # ARG is the value that the WRAPPER_SCRIPT_BELONGS_IN_OBJDIR # variable will take. If 'yes', then the emitted script # will assume that the directory where it is stored is # the $objdir directory. This is a cygwin/mingw-specific # behavior. func_emit_wrapper () { func_emit_wrapper_arg1=${1-no} $ECHO "\ #! $SHELL # $output - temporary wrapper script for $objdir/$outputname # Generated by $PROGRAM (GNU $PACKAGE) $VERSION # # The $output program cannot be directly executed until all the libtool # libraries that it depends on are installed. # # This wrapper script should never be moved out of the build directory. # If it is, it will not operate correctly. # Sed substitution that helps us do robust quoting. It backslashifies # metacharacters that are still active within double-quoted strings. sed_quote_subst='$sed_quote_subst' # Be Bourne compatible if test -n \"\${ZSH_VERSION+set}\" && (emulate sh) >/dev/null 2>&1; then emulate sh NULLCMD=: # Zsh 3.x and 4.x performs word splitting on \${1+\"\$@\"}, which # is contrary to our usage. Disable this feature. alias -g '\${1+\"\$@\"}'='\"\$@\"' setopt NO_GLOB_SUBST else case \`(set -o) 2>/dev/null\` in *posix*) set -o posix;; esac fi BIN_SH=xpg4; export BIN_SH # for Tru64 DUALCASE=1; export DUALCASE # for MKS sh # The HP-UX ksh and POSIX shell print the target directory to stdout # if CDPATH is set. (unset CDPATH) >/dev/null 2>&1 && unset CDPATH relink_command=\"$relink_command\" # This environment variable determines our operation mode. if test \"\$libtool_install_magic\" = \"$magic\"; then # install mode needs the following variables: generated_by_libtool_version='$macro_version' notinst_deplibs='$notinst_deplibs' else # When we are sourced in execute mode, \$file and \$ECHO are already set. if test \"\$libtool_execute_magic\" != \"$magic\"; then file=\"\$0\"" qECHO=`$ECHO "$ECHO" | $SED "$sed_quote_subst"` $ECHO "\ # A function that is used when there is no print builtin or printf. func_fallback_echo () { eval 'cat <<_LTECHO_EOF \$1 _LTECHO_EOF' } ECHO=\"$qECHO\" fi # Very basic option parsing. These options are (a) specific to # the libtool wrapper, (b) are identical between the wrapper # /script/ and the wrapper /executable/ that is used only on # windows platforms, and (c) all begin with the string "--lt-" # (application programs are unlikely to have options that match # this pattern). # # There are only two supported options: --lt-debug and # --lt-dump-script. There is, deliberately, no --lt-help. # # The first argument to this parsing function should be the # script's $0 value, followed by "$@". lt_option_debug= func_parse_lt_options () { lt_script_arg0=\$0 shift for lt_opt do case \"\$lt_opt\" in --lt-debug) lt_option_debug=1 ;; --lt-dump-script) lt_dump_D=\`\$ECHO \"X\$lt_script_arg0\" | $SED -e 's/^X//' -e 's%/[^/]*$%%'\` test \"X\$lt_dump_D\" = \"X\$lt_script_arg0\" && lt_dump_D=. lt_dump_F=\`\$ECHO \"X\$lt_script_arg0\" | $SED -e 's/^X//' -e 's%^.*/%%'\` cat \"\$lt_dump_D/\$lt_dump_F\" exit 0 ;; --lt-*) \$ECHO \"Unrecognized --lt- option: '\$lt_opt'\" 1>&2 exit 1 ;; esac done # Print the debug banner immediately: if test -n \"\$lt_option_debug\"; then echo \"$outputname:$output:\$LINENO: libtool wrapper (GNU $PACKAGE) $VERSION\" 1>&2 fi } # Used when --lt-debug. Prints its arguments to stdout # (redirection is the responsibility of the caller) func_lt_dump_args () { lt_dump_args_N=1; for lt_arg do \$ECHO \"$outputname:$output:\$LINENO: newargv[\$lt_dump_args_N]: \$lt_arg\" lt_dump_args_N=\`expr \$lt_dump_args_N + 1\` done } # Core function for launching the target application func_exec_program_core () { " case $host in # Backslashes separate directories on plain windows *-*-mingw | *-*-os2* | *-cegcc*) $ECHO "\ if test -n \"\$lt_option_debug\"; then \$ECHO \"$outputname:$output:\$LINENO: newargv[0]: \$progdir\\\\\$program\" 1>&2 func_lt_dump_args \${1+\"\$@\"} 1>&2 fi exec \"\$progdir\\\\\$program\" \${1+\"\$@\"} " ;; *) $ECHO "\ if test -n \"\$lt_option_debug\"; then \$ECHO \"$outputname:$output:\$LINENO: newargv[0]: \$progdir/\$program\" 1>&2 func_lt_dump_args \${1+\"\$@\"} 1>&2 fi exec \"\$progdir/\$program\" \${1+\"\$@\"} " ;; esac $ECHO "\ \$ECHO \"\$0: cannot exec \$program \$*\" 1>&2 exit 1 } # A function to encapsulate launching the target application # Strips options in the --lt-* namespace from \$@ and # launches target application with the remaining arguments. func_exec_program () { case \" \$* \" in *\\ --lt-*) for lt_wr_arg do case \$lt_wr_arg in --lt-*) ;; *) set x \"\$@\" \"\$lt_wr_arg\"; shift;; esac shift done ;; esac func_exec_program_core \${1+\"\$@\"} } # Parse options func_parse_lt_options \"\$0\" \${1+\"\$@\"} # Find the directory that this script lives in. thisdir=\`\$ECHO \"\$file\" | $SED 's%/[^/]*$%%'\` test \"x\$thisdir\" = \"x\$file\" && thisdir=. # Follow symbolic links until we get to the real thisdir. file=\`ls -ld \"\$file\" | $SED -n 's/.*-> //p'\` while test -n \"\$file\"; do destdir=\`\$ECHO \"\$file\" | $SED 's%/[^/]*\$%%'\` # If there was a directory component, then change thisdir. if test \"x\$destdir\" != \"x\$file\"; then case \"\$destdir\" in [\\\\/]* | [A-Za-z]:[\\\\/]*) thisdir=\"\$destdir\" ;; *) thisdir=\"\$thisdir/\$destdir\" ;; esac fi file=\`\$ECHO \"\$file\" | $SED 's%^.*/%%'\` file=\`ls -ld \"\$thisdir/\$file\" | $SED -n 's/.*-> //p'\` done # Usually 'no', except on cygwin/mingw when embedded into # the cwrapper. WRAPPER_SCRIPT_BELONGS_IN_OBJDIR=$func_emit_wrapper_arg1 if test \"\$WRAPPER_SCRIPT_BELONGS_IN_OBJDIR\" = \"yes\"; then # special case for '.' if test \"\$thisdir\" = \".\"; then thisdir=\`pwd\` fi # remove .libs from thisdir case \"\$thisdir\" in *[\\\\/]$objdir ) thisdir=\`\$ECHO \"\$thisdir\" | $SED 's%[\\\\/][^\\\\/]*$%%'\` ;; $objdir ) thisdir=. ;; esac fi # Try to get the absolute directory name. absdir=\`cd \"\$thisdir\" && pwd\` test -n \"\$absdir\" && thisdir=\"\$absdir\" " if test yes = "$fast_install"; then $ECHO "\ program=lt-'$outputname'$exeext progdir=\"\$thisdir/$objdir\" if test ! -f \"\$progdir/\$program\" || { file=\`ls -1dt \"\$progdir/\$program\" \"\$progdir/../\$program\" 2>/dev/null | $SED 1q\`; \\ test \"X\$file\" != \"X\$progdir/\$program\"; }; then file=\"\$\$-\$program\" if test ! -d \"\$progdir\"; then $MKDIR \"\$progdir\" else $RM \"\$progdir/\$file\" fi" $ECHO "\ # relink executable if necessary if test -n \"\$relink_command\"; then if relink_command_output=\`eval \$relink_command 2>&1\`; then : else \$ECHO \"\$relink_command_output\" >&2 $RM \"\$progdir/\$file\" exit 1 fi fi $MV \"\$progdir/\$file\" \"\$progdir/\$program\" 2>/dev/null || { $RM \"\$progdir/\$program\"; $MV \"\$progdir/\$file\" \"\$progdir/\$program\"; } $RM \"\$progdir/\$file\" fi" else $ECHO "\ program='$outputname' progdir=\"\$thisdir/$objdir\" " fi $ECHO "\ if test -f \"\$progdir/\$program\"; then" # fixup the dll searchpath if we need to. # # Fix the DLL searchpath if we need to. Do this before prepending # to shlibpath, because on Windows, both are PATH and uninstalled # libraries must come first. if test -n "$dllsearchpath"; then $ECHO "\ # Add the dll search path components to the executable PATH PATH=$dllsearchpath:\$PATH " fi # Export our shlibpath_var if we have one. if test yes = "$shlibpath_overrides_runpath" && test -n "$shlibpath_var" && test -n "$temp_rpath"; then $ECHO "\ # Add our own library path to $shlibpath_var $shlibpath_var=\"$temp_rpath\$$shlibpath_var\" # Some systems cannot cope with colon-terminated $shlibpath_var # The second colon is a workaround for a bug in BeOS R4 sed $shlibpath_var=\`\$ECHO \"\$$shlibpath_var\" | $SED 's/::*\$//'\` export $shlibpath_var " fi $ECHO "\ if test \"\$libtool_execute_magic\" != \"$magic\"; then # Run the actual program with our arguments. func_exec_program \${1+\"\$@\"} fi else # The program doesn't exist. \$ECHO \"\$0: error: '\$progdir/\$program' does not exist\" 1>&2 \$ECHO \"This script is just a wrapper for \$program.\" 1>&2 \$ECHO \"See the $PACKAGE documentation for more information.\" 1>&2 exit 1 fi fi\ " } # func_emit_cwrapperexe_src # emit the source code for a wrapper executable on stdout # Must ONLY be called from within func_mode_link because # it depends on a number of variable set therein. func_emit_cwrapperexe_src () { cat < #include #ifdef _MSC_VER # include # include # include #else # include # include # ifdef __CYGWIN__ # include # endif #endif #include #include #include #include #include #include #include #include #define STREQ(s1, s2) (strcmp ((s1), (s2)) == 0) /* declarations of non-ANSI functions */ #if defined __MINGW32__ # ifdef __STRICT_ANSI__ int _putenv (const char *); # endif #elif defined __CYGWIN__ # ifdef __STRICT_ANSI__ char *realpath (const char *, char *); int putenv (char *); int setenv (const char *, const char *, int); # endif /* #elif defined other_platform || defined ... */ #endif /* portability defines, excluding path handling macros */ #if defined _MSC_VER # define setmode _setmode # define stat _stat # define chmod _chmod # define getcwd _getcwd # define putenv _putenv # define S_IXUSR _S_IEXEC #elif defined __MINGW32__ # define setmode _setmode # define stat _stat # define chmod _chmod # define getcwd _getcwd # define putenv _putenv #elif defined __CYGWIN__ # define HAVE_SETENV # define FOPEN_WB "wb" /* #elif defined other platforms ... */ #endif #if defined PATH_MAX # define LT_PATHMAX PATH_MAX #elif defined MAXPATHLEN # define LT_PATHMAX MAXPATHLEN #else # define LT_PATHMAX 1024 #endif #ifndef S_IXOTH # define S_IXOTH 0 #endif #ifndef S_IXGRP # define S_IXGRP 0 #endif /* path handling portability macros */ #ifndef DIR_SEPARATOR # define DIR_SEPARATOR '/' # define PATH_SEPARATOR ':' #endif #if defined _WIN32 || defined __MSDOS__ || defined __DJGPP__ || \ defined __OS2__ # define HAVE_DOS_BASED_FILE_SYSTEM # define FOPEN_WB "wb" # ifndef DIR_SEPARATOR_2 # define DIR_SEPARATOR_2 '\\' # endif # ifndef PATH_SEPARATOR_2 # define PATH_SEPARATOR_2 ';' # endif #endif #ifndef DIR_SEPARATOR_2 # define IS_DIR_SEPARATOR(ch) ((ch) == DIR_SEPARATOR) #else /* DIR_SEPARATOR_2 */ # define IS_DIR_SEPARATOR(ch) \ (((ch) == DIR_SEPARATOR) || ((ch) == DIR_SEPARATOR_2)) #endif /* DIR_SEPARATOR_2 */ #ifndef PATH_SEPARATOR_2 # define IS_PATH_SEPARATOR(ch) ((ch) == PATH_SEPARATOR) #else /* PATH_SEPARATOR_2 */ # define IS_PATH_SEPARATOR(ch) ((ch) == PATH_SEPARATOR_2) #endif /* PATH_SEPARATOR_2 */ #ifndef FOPEN_WB # define FOPEN_WB "w" #endif #ifndef _O_BINARY # define _O_BINARY 0 #endif #define XMALLOC(type, num) ((type *) xmalloc ((num) * sizeof(type))) #define XFREE(stale) do { \ if (stale) { free (stale); stale = 0; } \ } while (0) #if defined LT_DEBUGWRAPPER static int lt_debug = 1; #else static int lt_debug = 0; #endif const char *program_name = "libtool-wrapper"; /* in case xstrdup fails */ void *xmalloc (size_t num); char *xstrdup (const char *string); const char *base_name (const char *name); char *find_executable (const char *wrapper); char *chase_symlinks (const char *pathspec); int make_executable (const char *path); int check_executable (const char *path); char *strendzap (char *str, const char *pat); void lt_debugprintf (const char *file, int line, const char *fmt, ...); void lt_fatal (const char *file, int line, const char *message, ...); static const char *nonnull (const char *s); static const char *nonempty (const char *s); void lt_setenv (const char *name, const char *value); char *lt_extend_str (const char *orig_value, const char *add, int to_end); void lt_update_exe_path (const char *name, const char *value); void lt_update_lib_path (const char *name, const char *value); char **prepare_spawn (char **argv); void lt_dump_script (FILE *f); EOF cat <= 0) && (st.st_mode & (S_IXUSR | S_IXGRP | S_IXOTH))) return 1; else return 0; } int make_executable (const char *path) { int rval = 0; struct stat st; lt_debugprintf (__FILE__, __LINE__, "(make_executable): %s\n", nonempty (path)); if ((!path) || (!*path)) return 0; if (stat (path, &st) >= 0) { rval = chmod (path, st.st_mode | S_IXOTH | S_IXGRP | S_IXUSR); } return rval; } /* Searches for the full path of the wrapper. Returns newly allocated full path name if found, NULL otherwise Does not chase symlinks, even on platforms that support them. */ char * find_executable (const char *wrapper) { int has_slash = 0; const char *p; const char *p_next; /* static buffer for getcwd */ char tmp[LT_PATHMAX + 1]; size_t tmp_len; char *concat_name; lt_debugprintf (__FILE__, __LINE__, "(find_executable): %s\n", nonempty (wrapper)); if ((wrapper == NULL) || (*wrapper == '\0')) return NULL; /* Absolute path? */ #if defined HAVE_DOS_BASED_FILE_SYSTEM if (isalpha ((unsigned char) wrapper[0]) && wrapper[1] == ':') { concat_name = xstrdup (wrapper); if (check_executable (concat_name)) return concat_name; XFREE (concat_name); } else { #endif if (IS_DIR_SEPARATOR (wrapper[0])) { concat_name = xstrdup (wrapper); if (check_executable (concat_name)) return concat_name; XFREE (concat_name); } #if defined HAVE_DOS_BASED_FILE_SYSTEM } #endif for (p = wrapper; *p; p++) if (*p == '/') { has_slash = 1; break; } if (!has_slash) { /* no slashes; search PATH */ const char *path = getenv ("PATH"); if (path != NULL) { for (p = path; *p; p = p_next) { const char *q; size_t p_len; for (q = p; *q; q++) if (IS_PATH_SEPARATOR (*q)) break; p_len = (size_t) (q - p); p_next = (*q == '\0' ? q : q + 1); if (p_len == 0) { /* empty path: current directory */ if (getcwd (tmp, LT_PATHMAX) == NULL) lt_fatal (__FILE__, __LINE__, "getcwd failed: %s", nonnull (strerror (errno))); tmp_len = strlen (tmp); concat_name = XMALLOC (char, tmp_len + 1 + strlen (wrapper) + 1); memcpy (concat_name, tmp, tmp_len); concat_name[tmp_len] = '/'; strcpy (concat_name + tmp_len + 1, wrapper); } else { concat_name = XMALLOC (char, p_len + 1 + strlen (wrapper) + 1); memcpy (concat_name, p, p_len); concat_name[p_len] = '/'; strcpy (concat_name + p_len + 1, wrapper); } if (check_executable (concat_name)) return concat_name; XFREE (concat_name); } } /* not found in PATH; assume curdir */ } /* Relative path | not found in path: prepend cwd */ if (getcwd (tmp, LT_PATHMAX) == NULL) lt_fatal (__FILE__, __LINE__, "getcwd failed: %s", nonnull (strerror (errno))); tmp_len = strlen (tmp); concat_name = XMALLOC (char, tmp_len + 1 + strlen (wrapper) + 1); memcpy (concat_name, tmp, tmp_len); concat_name[tmp_len] = '/'; strcpy (concat_name + tmp_len + 1, wrapper); if (check_executable (concat_name)) return concat_name; XFREE (concat_name); return NULL; } char * chase_symlinks (const char *pathspec) { #ifndef S_ISLNK return xstrdup (pathspec); #else char buf[LT_PATHMAX]; struct stat s; char *tmp_pathspec = xstrdup (pathspec); char *p; int has_symlinks = 0; while (strlen (tmp_pathspec) && !has_symlinks) { lt_debugprintf (__FILE__, __LINE__, "checking path component for symlinks: %s\n", tmp_pathspec); if (lstat (tmp_pathspec, &s) == 0) { if (S_ISLNK (s.st_mode) != 0) { has_symlinks = 1; break; } /* search backwards for last DIR_SEPARATOR */ p = tmp_pathspec + strlen (tmp_pathspec) - 1; while ((p > tmp_pathspec) && (!IS_DIR_SEPARATOR (*p))) p--; if ((p == tmp_pathspec) && (!IS_DIR_SEPARATOR (*p))) { /* no more DIR_SEPARATORS left */ break; } *p = '\0'; } else { lt_fatal (__FILE__, __LINE__, "error accessing file \"%s\": %s", tmp_pathspec, nonnull (strerror (errno))); } } XFREE (tmp_pathspec); if (!has_symlinks) { return xstrdup (pathspec); } tmp_pathspec = realpath (pathspec, buf); if (tmp_pathspec == 0) { lt_fatal (__FILE__, __LINE__, "could not follow symlinks for %s", pathspec); } return xstrdup (tmp_pathspec); #endif } char * strendzap (char *str, const char *pat) { size_t len, patlen; assert (str != NULL); assert (pat != NULL); len = strlen (str); patlen = strlen (pat); if (patlen <= len) { str += len - patlen; if (STREQ (str, pat)) *str = '\0'; } return str; } void lt_debugprintf (const char *file, int line, const char *fmt, ...) { va_list args; if (lt_debug) { (void) fprintf (stderr, "%s:%s:%d: ", program_name, file, line); va_start (args, fmt); (void) vfprintf (stderr, fmt, args); va_end (args); } } static void lt_error_core (int exit_status, const char *file, int line, const char *mode, const char *message, va_list ap) { fprintf (stderr, "%s:%s:%d: %s: ", program_name, file, line, mode); vfprintf (stderr, message, ap); fprintf (stderr, ".\n"); if (exit_status >= 0) exit (exit_status); } void lt_fatal (const char *file, int line, const char *message, ...) { va_list ap; va_start (ap, message); lt_error_core (EXIT_FAILURE, file, line, "FATAL", message, ap); va_end (ap); } static const char * nonnull (const char *s) { return s ? s : "(null)"; } static const char * nonempty (const char *s) { return (s && !*s) ? "(empty)" : nonnull (s); } void lt_setenv (const char *name, const char *value) { lt_debugprintf (__FILE__, __LINE__, "(lt_setenv) setting '%s' to '%s'\n", nonnull (name), nonnull (value)); { #ifdef HAVE_SETENV /* always make a copy, for consistency with !HAVE_SETENV */ char *str = xstrdup (value); setenv (name, str, 1); #else size_t len = strlen (name) + 1 + strlen (value) + 1; char *str = XMALLOC (char, len); sprintf (str, "%s=%s", name, value); if (putenv (str) != EXIT_SUCCESS) { XFREE (str); } #endif } } char * lt_extend_str (const char *orig_value, const char *add, int to_end) { char *new_value; if (orig_value && *orig_value) { size_t orig_value_len = strlen (orig_value); size_t add_len = strlen (add); new_value = XMALLOC (char, add_len + orig_value_len + 1); if (to_end) { strcpy (new_value, orig_value); strcpy (new_value + orig_value_len, add); } else { strcpy (new_value, add); strcpy (new_value + add_len, orig_value); } } else { new_value = xstrdup (add); } return new_value; } void lt_update_exe_path (const char *name, const char *value) { lt_debugprintf (__FILE__, __LINE__, "(lt_update_exe_path) modifying '%s' by prepending '%s'\n", nonnull (name), nonnull (value)); if (name && *name && value && *value) { char *new_value = lt_extend_str (getenv (name), value, 0); /* some systems can't cope with a ':'-terminated path #' */ size_t len = strlen (new_value); while ((len > 0) && IS_PATH_SEPARATOR (new_value[len-1])) { new_value[--len] = '\0'; } lt_setenv (name, new_value); XFREE (new_value); } } void lt_update_lib_path (const char *name, const char *value) { lt_debugprintf (__FILE__, __LINE__, "(lt_update_lib_path) modifying '%s' by prepending '%s'\n", nonnull (name), nonnull (value)); if (name && *name && value && *value) { char *new_value = lt_extend_str (getenv (name), value, 0); lt_setenv (name, new_value); XFREE (new_value); } } EOF case $host_os in mingw*) cat <<"EOF" /* Prepares an argument vector before calling spawn(). Note that spawn() does not by itself call the command interpreter (getenv ("COMSPEC") != NULL ? getenv ("COMSPEC") : ({ OSVERSIONINFO v; v.dwOSVersionInfoSize = sizeof(OSVERSIONINFO); GetVersionEx(&v); v.dwPlatformId == VER_PLATFORM_WIN32_NT; }) ? "cmd.exe" : "command.com"). Instead it simply concatenates the arguments, separated by ' ', and calls CreateProcess(). We must quote the arguments since Win32 CreateProcess() interprets characters like ' ', '\t', '\\', '"' (but not '<' and '>') in a special way: - Space and tab are interpreted as delimiters. They are not treated as delimiters if they are surrounded by double quotes: "...". - Unescaped double quotes are removed from the input. Their only effect is that within double quotes, space and tab are treated like normal characters. - Backslashes not followed by double quotes are not special. - But 2*n+1 backslashes followed by a double quote become n backslashes followed by a double quote (n >= 0): \" -> " \\\" -> \" \\\\\" -> \\" */ #define SHELL_SPECIAL_CHARS "\"\\ \001\002\003\004\005\006\007\010\011\012\013\014\015\016\017\020\021\022\023\024\025\026\027\030\031\032\033\034\035\036\037" #define SHELL_SPACE_CHARS " \001\002\003\004\005\006\007\010\011\012\013\014\015\016\017\020\021\022\023\024\025\026\027\030\031\032\033\034\035\036\037" char ** prepare_spawn (char **argv) { size_t argc; char **new_argv; size_t i; /* Count number of arguments. */ for (argc = 0; argv[argc] != NULL; argc++) ; /* Allocate new argument vector. */ new_argv = XMALLOC (char *, argc + 1); /* Put quoted arguments into the new argument vector. */ for (i = 0; i < argc; i++) { const char *string = argv[i]; if (string[0] == '\0') new_argv[i] = xstrdup ("\"\""); else if (strpbrk (string, SHELL_SPECIAL_CHARS) != NULL) { int quote_around = (strpbrk (string, SHELL_SPACE_CHARS) != NULL); size_t length; unsigned int backslashes; const char *s; char *quoted_string; char *p; length = 0; backslashes = 0; if (quote_around) length++; for (s = string; *s != '\0'; s++) { char c = *s; if (c == '"') length += backslashes + 1; length++; if (c == '\\') backslashes++; else backslashes = 0; } if (quote_around) length += backslashes + 1; quoted_string = XMALLOC (char, length + 1); p = quoted_string; backslashes = 0; if (quote_around) *p++ = '"'; for (s = string; *s != '\0'; s++) { char c = *s; if (c == '"') { unsigned int j; for (j = backslashes + 1; j > 0; j--) *p++ = '\\'; } *p++ = c; if (c == '\\') backslashes++; else backslashes = 0; } if (quote_around) { unsigned int j; for (j = backslashes; j > 0; j--) *p++ = '\\'; *p++ = '"'; } *p = '\0'; new_argv[i] = quoted_string; } else new_argv[i] = (char *) string; } new_argv[argc] = NULL; return new_argv; } EOF ;; esac cat <<"EOF" void lt_dump_script (FILE* f) { EOF func_emit_wrapper yes | $SED -n -e ' s/^\(.\{79\}\)\(..*\)/\1\ \2/ h s/\([\\"]\)/\\\1/g s/$/\\n/ s/\([^\n]*\).*/ fputs ("\1", f);/p g D' cat <<"EOF" } EOF } # end: func_emit_cwrapperexe_src # func_win32_import_lib_p ARG # True if ARG is an import lib, as indicated by $file_magic_cmd func_win32_import_lib_p () { $debug_cmd case `eval $file_magic_cmd \"\$1\" 2>/dev/null | $SED -e 10q` in *import*) : ;; *) false ;; esac } # func_suncc_cstd_abi # !!ONLY CALL THIS FOR SUN CC AFTER $compile_command IS FULLY EXPANDED!! # Several compiler flags select an ABI that is incompatible with the # Cstd library. Avoid specifying it if any are in CXXFLAGS. func_suncc_cstd_abi () { $debug_cmd case " $compile_command " in *" -compat=g "*|*\ -std=c++[0-9][0-9]\ *|*" -library=stdcxx4 "*|*" -library=stlport4 "*) suncc_use_cstd_abi=no ;; *) suncc_use_cstd_abi=yes ;; esac } # func_mode_link arg... func_mode_link () { $debug_cmd case $host in *-*-cygwin* | *-*-mingw* | *-*-pw32* | *-*-os2* | *-cegcc*) # It is impossible to link a dll without this setting, and # we shouldn't force the makefile maintainer to figure out # what system we are compiling for in order to pass an extra # flag for every libtool invocation. # allow_undefined=no # FIXME: Unfortunately, there are problems with the above when trying # to make a dll that has undefined symbols, in which case not # even a static library is built. For now, we need to specify # -no-undefined on the libtool link line when we can be certain # that all symbols are satisfied, otherwise we get a static library. allow_undefined=yes ;; *) allow_undefined=yes ;; esac libtool_args=$nonopt base_compile="$nonopt $@" compile_command=$nonopt finalize_command=$nonopt compile_rpath= finalize_rpath= compile_shlibpath= finalize_shlibpath= convenience= old_convenience= deplibs= old_deplibs= compiler_flags= linker_flags= dllsearchpath= lib_search_path=`pwd` inst_prefix_dir= new_inherited_linker_flags= avoid_version=no bindir= dlfiles= dlprefiles= dlself=no export_dynamic=no export_symbols= export_symbols_regex= generated= libobjs= ltlibs= module=no no_install=no objs= os2dllname= non_pic_objects= precious_files_regex= prefer_static_libs=no preload=false prev= prevarg= release= rpath= xrpath= perm_rpath= temp_rpath= thread_safe=no vinfo= vinfo_number=no weak_libs= single_module=$wl-single_module func_infer_tag $base_compile # We need to know -static, to get the right output filenames. for arg do case $arg in -shared) test yes != "$build_libtool_libs" \ && func_fatal_configuration "cannot build a shared library" build_old_libs=no break ;; -all-static | -static | -static-libtool-libs) case $arg in -all-static) if test yes = "$build_libtool_libs" && test -z "$link_static_flag"; then func_warning "complete static linking is impossible in this configuration" fi if test -n "$link_static_flag"; then dlopen_self=$dlopen_self_static fi prefer_static_libs=yes ;; -static) if test -z "$pic_flag" && test -n "$link_static_flag"; then dlopen_self=$dlopen_self_static fi prefer_static_libs=built ;; -static-libtool-libs) if test -z "$pic_flag" && test -n "$link_static_flag"; then dlopen_self=$dlopen_self_static fi prefer_static_libs=yes ;; esac build_libtool_libs=no build_old_libs=yes break ;; esac done # See if our shared archives depend on static archives. test -n "$old_archive_from_new_cmds" && build_old_libs=yes # Go through the arguments, transforming them on the way. while test "$#" -gt 0; do arg=$1 shift func_quote_for_eval "$arg" qarg=$func_quote_for_eval_unquoted_result func_append libtool_args " $func_quote_for_eval_result" # If the previous option needs an argument, assign it. if test -n "$prev"; then case $prev in output) func_append compile_command " @OUTPUT@" func_append finalize_command " @OUTPUT@" ;; esac case $prev in bindir) bindir=$arg prev= continue ;; dlfiles|dlprefiles) $preload || { # Add the symbol object into the linking commands. func_append compile_command " @SYMFILE@" func_append finalize_command " @SYMFILE@" preload=: } case $arg in *.la | *.lo) ;; # We handle these cases below. force) if test no = "$dlself"; then dlself=needless export_dynamic=yes fi prev= continue ;; self) if test dlprefiles = "$prev"; then dlself=yes elif test dlfiles = "$prev" && test yes != "$dlopen_self"; then dlself=yes else dlself=needless export_dynamic=yes fi prev= continue ;; *) if test dlfiles = "$prev"; then func_append dlfiles " $arg" else func_append dlprefiles " $arg" fi prev= continue ;; esac ;; expsyms) export_symbols=$arg test -f "$arg" \ || func_fatal_error "symbol file '$arg' does not exist" prev= continue ;; expsyms_regex) export_symbols_regex=$arg prev= continue ;; framework) case $host in *-*-darwin*) case "$deplibs " in *" $qarg.ltframework "*) ;; *) func_append deplibs " $qarg.ltframework" # this is fixed later ;; esac ;; esac prev= continue ;; inst_prefix) inst_prefix_dir=$arg prev= continue ;; mllvm) # Clang does not use LLVM to link, so we can simply discard any # '-mllvm $arg' options when doing the link step. prev= continue ;; objectlist) if test -f "$arg"; then save_arg=$arg moreargs= for fil in `cat "$save_arg"` do # func_append moreargs " $fil" arg=$fil # A libtool-controlled object. # Check to see that this really is a libtool object. if func_lalib_unsafe_p "$arg"; then pic_object= non_pic_object= # Read the .lo file func_source "$arg" if test -z "$pic_object" || test -z "$non_pic_object" || test none = "$pic_object" && test none = "$non_pic_object"; then func_fatal_error "cannot find name of object for '$arg'" fi # Extract subdirectory from the argument. func_dirname "$arg" "/" "" xdir=$func_dirname_result if test none != "$pic_object"; then # Prepend the subdirectory the object is found in. pic_object=$xdir$pic_object if test dlfiles = "$prev"; then if test yes = "$build_libtool_libs" && test yes = "$dlopen_support"; then func_append dlfiles " $pic_object" prev= continue else # If libtool objects are unsupported, then we need to preload. prev=dlprefiles fi fi # CHECK ME: I think I busted this. -Ossama if test dlprefiles = "$prev"; then # Preload the old-style object. func_append dlprefiles " $pic_object" prev= fi # A PIC object. func_append libobjs " $pic_object" arg=$pic_object fi # Non-PIC object. if test none != "$non_pic_object"; then # Prepend the subdirectory the object is found in. non_pic_object=$xdir$non_pic_object # A standard non-PIC object func_append non_pic_objects " $non_pic_object" if test -z "$pic_object" || test none = "$pic_object"; then arg=$non_pic_object fi else # If the PIC object exists, use it instead. # $xdir was prepended to $pic_object above. non_pic_object=$pic_object func_append non_pic_objects " $non_pic_object" fi else # Only an error if not doing a dry-run. if $opt_dry_run; then # Extract subdirectory from the argument. func_dirname "$arg" "/" "" xdir=$func_dirname_result func_lo2o "$arg" pic_object=$xdir$objdir/$func_lo2o_result non_pic_object=$xdir$func_lo2o_result func_append libobjs " $pic_object" func_append non_pic_objects " $non_pic_object" else func_fatal_error "'$arg' is not a valid libtool object" fi fi done else func_fatal_error "link input file '$arg' does not exist" fi arg=$save_arg prev= continue ;; os2dllname) os2dllname=$arg prev= continue ;; precious_regex) precious_files_regex=$arg prev= continue ;; release) release=-$arg prev= continue ;; rpath | xrpath) # We need an absolute path. case $arg in [\\/]* | [A-Za-z]:[\\/]*) ;; *) func_fatal_error "only absolute run-paths are allowed" ;; esac if test rpath = "$prev"; then case "$rpath " in *" $arg "*) ;; *) func_append rpath " $arg" ;; esac else case "$xrpath " in *" $arg "*) ;; *) func_append xrpath " $arg" ;; esac fi prev= continue ;; shrext) shrext_cmds=$arg prev= continue ;; weak) func_append weak_libs " $arg" prev= continue ;; xcclinker) func_append linker_flags " $qarg" func_append compiler_flags " $qarg" prev= func_append compile_command " $qarg" func_append finalize_command " $qarg" continue ;; xcompiler) func_append compiler_flags " $qarg" prev= func_append compile_command " $qarg" func_append finalize_command " $qarg" continue ;; xlinker) func_append linker_flags " $qarg" func_append compiler_flags " $wl$qarg" prev= func_append compile_command " $wl$qarg" func_append finalize_command " $wl$qarg" continue ;; *) eval "$prev=\"\$arg\"" prev= continue ;; esac fi # test -n "$prev" prevarg=$arg case $arg in -all-static) if test -n "$link_static_flag"; then # See comment for -static flag below, for more details. func_append compile_command " $link_static_flag" func_append finalize_command " $link_static_flag" fi continue ;; -allow-undefined) # FIXME: remove this flag sometime in the future. func_fatal_error "'-allow-undefined' must not be used because it is the default" ;; -avoid-version) avoid_version=yes continue ;; -bindir) prev=bindir continue ;; -dlopen) prev=dlfiles continue ;; -dlpreopen) prev=dlprefiles continue ;; -export-dynamic) export_dynamic=yes continue ;; -export-symbols | -export-symbols-regex) if test -n "$export_symbols" || test -n "$export_symbols_regex"; then func_fatal_error "more than one -exported-symbols argument is not allowed" fi if test X-export-symbols = "X$arg"; then prev=expsyms else prev=expsyms_regex fi continue ;; -framework) prev=framework continue ;; -inst-prefix-dir) prev=inst_prefix continue ;; # The native IRIX linker understands -LANG:*, -LIST:* and -LNO:* # so, if we see these flags be careful not to treat them like -L -L[A-Z][A-Z]*:*) case $with_gcc/$host in no/*-*-irix* | /*-*-irix*) func_append compile_command " $arg" func_append finalize_command " $arg" ;; esac continue ;; -L*) func_stripname "-L" '' "$arg" if test -z "$func_stripname_result"; then if test "$#" -gt 0; then func_fatal_error "require no space between '-L' and '$1'" else func_fatal_error "need path for '-L' option" fi fi func_resolve_sysroot "$func_stripname_result" dir=$func_resolve_sysroot_result # We need an absolute path. case $dir in [\\/]* | [A-Za-z]:[\\/]*) ;; *) absdir=`cd "$dir" && pwd` test -z "$absdir" && \ func_fatal_error "cannot determine absolute directory name of '$dir'" dir=$absdir ;; esac case "$deplibs " in *" -L$dir "* | *" $arg "*) # Will only happen for absolute or sysroot arguments ;; *) # Preserve sysroot, but never include relative directories case $dir in [\\/]* | [A-Za-z]:[\\/]* | =*) func_append deplibs " $arg" ;; *) func_append deplibs " -L$dir" ;; esac func_append lib_search_path " $dir" ;; esac case $host in *-*-cygwin* | *-*-mingw* | *-*-pw32* | *-*-os2* | *-cegcc*) testbindir=`$ECHO "$dir" | $SED 's*/lib$*/bin*'` case :$dllsearchpath: in *":$dir:"*) ;; ::) dllsearchpath=$dir;; *) func_append dllsearchpath ":$dir";; esac case :$dllsearchpath: in *":$testbindir:"*) ;; ::) dllsearchpath=$testbindir;; *) func_append dllsearchpath ":$testbindir";; esac ;; esac continue ;; -l*) if test X-lc = "X$arg" || test X-lm = "X$arg"; then case $host in *-*-cygwin* | *-*-mingw* | *-*-pw32* | *-*-beos* | *-cegcc* | *-*-haiku*) # These systems don't actually have a C or math library (as such) continue ;; *-*-os2*) # These systems don't actually have a C library (as such) test X-lc = "X$arg" && continue ;; *-*-openbsd* | *-*-freebsd* | *-*-dragonfly* | *-*-bitrig*) # Do not include libc due to us having libc/libc_r. test X-lc = "X$arg" && continue ;; *-*-rhapsody* | *-*-darwin1.[012]) # Rhapsody C and math libraries are in the System framework func_append deplibs " System.ltframework" continue ;; *-*-sco3.2v5* | *-*-sco5v6*) # Causes problems with __ctype test X-lc = "X$arg" && continue ;; *-*-sysv4.2uw2* | *-*-sysv5* | *-*-unixware* | *-*-OpenUNIX*) # Compiler inserts libc in the correct place for threads to work test X-lc = "X$arg" && continue ;; esac elif test X-lc_r = "X$arg"; then case $host in *-*-openbsd* | *-*-freebsd* | *-*-dragonfly* | *-*-bitrig*) # Do not include libc_r directly, use -pthread flag. continue ;; esac fi func_append deplibs " $arg" continue ;; -mllvm) prev=mllvm continue ;; -module) module=yes continue ;; # Tru64 UNIX uses -model [arg] to determine the layout of C++ # classes, name mangling, and exception handling. # Darwin uses the -arch flag to determine output architecture. -model|-arch|-isysroot|--sysroot) func_append compiler_flags " $arg" func_append compile_command " $arg" func_append finalize_command " $arg" prev=xcompiler continue ;; -mt|-mthreads|-kthread|-Kthread|-pthread|-pthreads|--thread-safe \ |-threads|-fopenmp|-openmp|-mp|-xopenmp|-omp|-qsmp=*) func_append compiler_flags " $arg" func_append compile_command " $arg" func_append finalize_command " $arg" case "$new_inherited_linker_flags " in *" $arg "*) ;; * ) func_append new_inherited_linker_flags " $arg" ;; esac continue ;; -multi_module) single_module=$wl-multi_module continue ;; -no-fast-install) fast_install=no continue ;; -no-install) case $host in *-*-cygwin* | *-*-mingw* | *-*-pw32* | *-*-os2* | *-*-darwin* | *-cegcc*) # The PATH hackery in wrapper scripts is required on Windows # and Darwin in order for the loader to find any dlls it needs. func_warning "'-no-install' is ignored for $host" func_warning "assuming '-no-fast-install' instead" fast_install=no ;; *) no_install=yes ;; esac continue ;; -no-undefined) allow_undefined=no continue ;; -objectlist) prev=objectlist continue ;; -os2dllname) prev=os2dllname continue ;; -o) prev=output ;; -precious-files-regex) prev=precious_regex continue ;; -release) prev=release continue ;; -rpath) prev=rpath continue ;; -R) prev=xrpath continue ;; -R*) func_stripname '-R' '' "$arg" dir=$func_stripname_result # We need an absolute path. case $dir in [\\/]* | [A-Za-z]:[\\/]*) ;; =*) func_stripname '=' '' "$dir" dir=$lt_sysroot$func_stripname_result ;; *) func_fatal_error "only absolute run-paths are allowed" ;; esac case "$xrpath " in *" $dir "*) ;; *) func_append xrpath " $dir" ;; esac continue ;; -shared) # The effects of -shared are defined in a previous loop. continue ;; -shrext) prev=shrext continue ;; -static | -static-libtool-libs) # The effects of -static are defined in a previous loop. # We used to do the same as -all-static on platforms that # didn't have a PIC flag, but the assumption that the effects # would be equivalent was wrong. It would break on at least # Digital Unix and AIX. continue ;; -thread-safe) thread_safe=yes continue ;; -version-info) prev=vinfo continue ;; -version-number) prev=vinfo vinfo_number=yes continue ;; -weak) prev=weak continue ;; -Wc,*) func_stripname '-Wc,' '' "$arg" args=$func_stripname_result arg= save_ifs=$IFS; IFS=, for flag in $args; do IFS=$save_ifs func_quote_for_eval "$flag" func_append arg " $func_quote_for_eval_result" func_append compiler_flags " $func_quote_for_eval_result" done IFS=$save_ifs func_stripname ' ' '' "$arg" arg=$func_stripname_result ;; -Wl,*) func_stripname '-Wl,' '' "$arg" args=$func_stripname_result arg= save_ifs=$IFS; IFS=, for flag in $args; do IFS=$save_ifs func_quote_for_eval "$flag" func_append arg " $wl$func_quote_for_eval_result" func_append compiler_flags " $wl$func_quote_for_eval_result" func_append linker_flags " $func_quote_for_eval_result" done IFS=$save_ifs func_stripname ' ' '' "$arg" arg=$func_stripname_result ;; -Xcompiler) prev=xcompiler continue ;; -Xlinker) prev=xlinker continue ;; -XCClinker) prev=xcclinker continue ;; # -msg_* for osf cc -msg_*) func_quote_for_eval "$arg" arg=$func_quote_for_eval_result ;; # Flags to be passed through unchanged, with rationale: # -64, -mips[0-9] enable 64-bit mode for the SGI compiler # -r[0-9][0-9]* specify processor for the SGI compiler # -xarch=*, -xtarget=* enable 64-bit mode for the Sun compiler # +DA*, +DD* enable 64-bit mode for the HP compiler # -q* compiler args for the IBM compiler # -m*, -t[45]*, -txscale* architecture-specific flags for GCC # -F/path path to uninstalled frameworks, gcc on darwin # -p, -pg, --coverage, -fprofile-* profiling flags for GCC # -fstack-protector* stack protector flags for GCC # @file GCC response files # -tp=* Portland pgcc target processor selection # --sysroot=* for sysroot support # -O*, -g*, -flto*, -fwhopr*, -fuse-linker-plugin GCC link-time optimization # -stdlib=* select c++ std lib with clang -64|-mips[0-9]|-r[0-9][0-9]*|-xarch=*|-xtarget=*|+DA*|+DD*|-q*|-m*| \ -t[45]*|-txscale*|-p|-pg|--coverage|-fprofile-*|-F*|@*|-tp=*|--sysroot=*| \ -O*|-g*|-flto*|-fwhopr*|-fuse-linker-plugin|-fstack-protector*|-stdlib=*) func_quote_for_eval "$arg" arg=$func_quote_for_eval_result func_append compile_command " $arg" func_append finalize_command " $arg" func_append compiler_flags " $arg" continue ;; -Z*) if test os2 = "`expr $host : '.*\(os2\)'`"; then # OS/2 uses -Zxxx to specify OS/2-specific options compiler_flags="$compiler_flags $arg" func_append compile_command " $arg" func_append finalize_command " $arg" case $arg in -Zlinker | -Zstack) prev=xcompiler ;; esac continue else # Otherwise treat like 'Some other compiler flag' below func_quote_for_eval "$arg" arg=$func_quote_for_eval_result fi ;; # Some other compiler flag. -* | +*) func_quote_for_eval "$arg" arg=$func_quote_for_eval_result ;; *.$objext) # A standard object. func_append objs " $arg" ;; *.lo) # A libtool-controlled object. # Check to see that this really is a libtool object. if func_lalib_unsafe_p "$arg"; then pic_object= non_pic_object= # Read the .lo file func_source "$arg" if test -z "$pic_object" || test -z "$non_pic_object" || test none = "$pic_object" && test none = "$non_pic_object"; then func_fatal_error "cannot find name of object for '$arg'" fi # Extract subdirectory from the argument. func_dirname "$arg" "/" "" xdir=$func_dirname_result test none = "$pic_object" || { # Prepend the subdirectory the object is found in. pic_object=$xdir$pic_object if test dlfiles = "$prev"; then if test yes = "$build_libtool_libs" && test yes = "$dlopen_support"; then func_append dlfiles " $pic_object" prev= continue else # If libtool objects are unsupported, then we need to preload. prev=dlprefiles fi fi # CHECK ME: I think I busted this. -Ossama if test dlprefiles = "$prev"; then # Preload the old-style object. func_append dlprefiles " $pic_object" prev= fi # A PIC object. func_append libobjs " $pic_object" arg=$pic_object } # Non-PIC object. if test none != "$non_pic_object"; then # Prepend the subdirectory the object is found in. non_pic_object=$xdir$non_pic_object # A standard non-PIC object func_append non_pic_objects " $non_pic_object" if test -z "$pic_object" || test none = "$pic_object"; then arg=$non_pic_object fi else # If the PIC object exists, use it instead. # $xdir was prepended to $pic_object above. non_pic_object=$pic_object func_append non_pic_objects " $non_pic_object" fi else # Only an error if not doing a dry-run. if $opt_dry_run; then # Extract subdirectory from the argument. func_dirname "$arg" "/" "" xdir=$func_dirname_result func_lo2o "$arg" pic_object=$xdir$objdir/$func_lo2o_result non_pic_object=$xdir$func_lo2o_result func_append libobjs " $pic_object" func_append non_pic_objects " $non_pic_object" else func_fatal_error "'$arg' is not a valid libtool object" fi fi ;; *.$libext) # An archive. func_append deplibs " $arg" func_append old_deplibs " $arg" continue ;; *.la) # A libtool-controlled library. func_resolve_sysroot "$arg" if test dlfiles = "$prev"; then # This library was specified with -dlopen. func_append dlfiles " $func_resolve_sysroot_result" prev= elif test dlprefiles = "$prev"; then # The library was specified with -dlpreopen. func_append dlprefiles " $func_resolve_sysroot_result" prev= else func_append deplibs " $func_resolve_sysroot_result" fi continue ;; # Some other compiler argument. *) # Unknown arguments in both finalize_command and compile_command need # to be aesthetically quoted because they are evaled later. func_quote_for_eval "$arg" arg=$func_quote_for_eval_result ;; esac # arg # Now actually substitute the argument into the commands. if test -n "$arg"; then func_append compile_command " $arg" func_append finalize_command " $arg" fi done # argument parsing loop test -n "$prev" && \ func_fatal_help "the '$prevarg' option requires an argument" if test yes = "$export_dynamic" && test -n "$export_dynamic_flag_spec"; then eval arg=\"$export_dynamic_flag_spec\" func_append compile_command " $arg" func_append finalize_command " $arg" fi oldlibs= # calculate the name of the file, without its directory func_basename "$output" outputname=$func_basename_result libobjs_save=$libobjs if test -n "$shlibpath_var"; then # get the directories listed in $shlibpath_var eval shlib_search_path=\`\$ECHO \"\$$shlibpath_var\" \| \$SED \'s/:/ /g\'\` else shlib_search_path= fi eval sys_lib_search_path=\"$sys_lib_search_path_spec\" eval sys_lib_dlsearch_path=\"$sys_lib_dlsearch_path_spec\" # Definition is injected by LT_CONFIG during libtool generation. func_munge_path_list sys_lib_dlsearch_path "$LT_SYS_LIBRARY_PATH" func_dirname "$output" "/" "" output_objdir=$func_dirname_result$objdir func_to_tool_file "$output_objdir/" tool_output_objdir=$func_to_tool_file_result # Create the object directory. func_mkdir_p "$output_objdir" # Determine the type of output case $output in "") func_fatal_help "you must specify an output file" ;; *.$libext) linkmode=oldlib ;; *.lo | *.$objext) linkmode=obj ;; *.la) linkmode=lib ;; *) linkmode=prog ;; # Anything else should be a program. esac specialdeplibs= libs= # Find all interdependent deplibs by searching for libraries # that are linked more than once (e.g. -la -lb -la) for deplib in $deplibs; do if $opt_preserve_dup_deps; then case "$libs " in *" $deplib "*) func_append specialdeplibs " $deplib" ;; esac fi func_append libs " $deplib" done if test lib = "$linkmode"; then libs="$predeps $libs $compiler_lib_search_path $postdeps" # Compute libraries that are listed more than once in $predeps # $postdeps and mark them as special (i.e., whose duplicates are # not to be eliminated). pre_post_deps= if $opt_duplicate_compiler_generated_deps; then for pre_post_dep in $predeps $postdeps; do case "$pre_post_deps " in *" $pre_post_dep "*) func_append specialdeplibs " $pre_post_deps" ;; esac func_append pre_post_deps " $pre_post_dep" done fi pre_post_deps= fi deplibs= newdependency_libs= newlib_search_path= need_relink=no # whether we're linking any uninstalled libtool libraries notinst_deplibs= # not-installed libtool libraries notinst_path= # paths that contain not-installed libtool libraries case $linkmode in lib) passes="conv dlpreopen link" for file in $dlfiles $dlprefiles; do case $file in *.la) ;; *) func_fatal_help "libraries can '-dlopen' only libtool libraries: $file" ;; esac done ;; prog) compile_deplibs= finalize_deplibs= alldeplibs=false newdlfiles= newdlprefiles= passes="conv scan dlopen dlpreopen link" ;; *) passes="conv" ;; esac for pass in $passes; do # The preopen pass in lib mode reverses $deplibs; put it back here # so that -L comes before libs that need it for instance... if test lib,link = "$linkmode,$pass"; then ## FIXME: Find the place where the list is rebuilt in the wrong ## order, and fix it there properly tmp_deplibs= for deplib in $deplibs; do tmp_deplibs="$deplib $tmp_deplibs" done deplibs=$tmp_deplibs fi if test lib,link = "$linkmode,$pass" || test prog,scan = "$linkmode,$pass"; then libs=$deplibs deplibs= fi if test prog = "$linkmode"; then case $pass in dlopen) libs=$dlfiles ;; dlpreopen) libs=$dlprefiles ;; link) libs="$deplibs %DEPLIBS% $dependency_libs" ;; esac fi if test lib,dlpreopen = "$linkmode,$pass"; then # Collect and forward deplibs of preopened libtool libs for lib in $dlprefiles; do # Ignore non-libtool-libs dependency_libs= func_resolve_sysroot "$lib" case $lib in *.la) func_source "$func_resolve_sysroot_result" ;; esac # Collect preopened libtool deplibs, except any this library # has declared as weak libs for deplib in $dependency_libs; do func_basename "$deplib" deplib_base=$func_basename_result case " $weak_libs " in *" $deplib_base "*) ;; *) func_append deplibs " $deplib" ;; esac done done libs=$dlprefiles fi if test dlopen = "$pass"; then # Collect dlpreopened libraries save_deplibs=$deplibs deplibs= fi for deplib in $libs; do lib= found=false case $deplib in -mt|-mthreads|-kthread|-Kthread|-pthread|-pthreads|--thread-safe \ |-threads|-fopenmp|-openmp|-mp|-xopenmp|-omp|-qsmp=*) if test prog,link = "$linkmode,$pass"; then compile_deplibs="$deplib $compile_deplibs" finalize_deplibs="$deplib $finalize_deplibs" else func_append compiler_flags " $deplib" if test lib = "$linkmode"; then case "$new_inherited_linker_flags " in *" $deplib "*) ;; * ) func_append new_inherited_linker_flags " $deplib" ;; esac fi fi continue ;; -l*) if test lib != "$linkmode" && test prog != "$linkmode"; then func_warning "'-l' is ignored for archives/objects" continue fi func_stripname '-l' '' "$deplib" name=$func_stripname_result if test lib = "$linkmode"; then searchdirs="$newlib_search_path $lib_search_path $compiler_lib_search_dirs $sys_lib_search_path $shlib_search_path" else searchdirs="$newlib_search_path $lib_search_path $sys_lib_search_path $shlib_search_path" fi for searchdir in $searchdirs; do for search_ext in .la $std_shrext .so .a; do # Search the libtool library lib=$searchdir/lib$name$search_ext if test -f "$lib"; then if test .la = "$search_ext"; then found=: else found=false fi break 2 fi done done if $found; then # deplib is a libtool library # If $allow_libtool_libs_with_static_runtimes && $deplib is a stdlib, # We need to do some special things here, and not later. if test yes = "$allow_libtool_libs_with_static_runtimes"; then case " $predeps $postdeps " in *" $deplib "*) if func_lalib_p "$lib"; then library_names= old_library= func_source "$lib" for l in $old_library $library_names; do ll=$l done if test "X$ll" = "X$old_library"; then # only static version available found=false func_dirname "$lib" "" "." ladir=$func_dirname_result lib=$ladir/$old_library if test prog,link = "$linkmode,$pass"; then compile_deplibs="$deplib $compile_deplibs" finalize_deplibs="$deplib $finalize_deplibs" else deplibs="$deplib $deplibs" test lib = "$linkmode" && newdependency_libs="$deplib $newdependency_libs" fi continue fi fi ;; *) ;; esac fi else # deplib doesn't seem to be a libtool library if test prog,link = "$linkmode,$pass"; then compile_deplibs="$deplib $compile_deplibs" finalize_deplibs="$deplib $finalize_deplibs" else deplibs="$deplib $deplibs" test lib = "$linkmode" && newdependency_libs="$deplib $newdependency_libs" fi continue fi ;; # -l *.ltframework) if test prog,link = "$linkmode,$pass"; then compile_deplibs="$deplib $compile_deplibs" finalize_deplibs="$deplib $finalize_deplibs" else deplibs="$deplib $deplibs" if test lib = "$linkmode"; then case "$new_inherited_linker_flags " in *" $deplib "*) ;; * ) func_append new_inherited_linker_flags " $deplib" ;; esac fi fi continue ;; -L*) case $linkmode in lib) deplibs="$deplib $deplibs" test conv = "$pass" && continue newdependency_libs="$deplib $newdependency_libs" func_stripname '-L' '' "$deplib" func_resolve_sysroot "$func_stripname_result" func_append newlib_search_path " $func_resolve_sysroot_result" ;; prog) if test conv = "$pass"; then deplibs="$deplib $deplibs" continue fi if test scan = "$pass"; then deplibs="$deplib $deplibs" else compile_deplibs="$deplib $compile_deplibs" finalize_deplibs="$deplib $finalize_deplibs" fi func_stripname '-L' '' "$deplib" func_resolve_sysroot "$func_stripname_result" func_append newlib_search_path " $func_resolve_sysroot_result" ;; *) func_warning "'-L' is ignored for archives/objects" ;; esac # linkmode continue ;; # -L -R*) if test link = "$pass"; then func_stripname '-R' '' "$deplib" func_resolve_sysroot "$func_stripname_result" dir=$func_resolve_sysroot_result # Make sure the xrpath contains only unique directories. case "$xrpath " in *" $dir "*) ;; *) func_append xrpath " $dir" ;; esac fi deplibs="$deplib $deplibs" continue ;; *.la) func_resolve_sysroot "$deplib" lib=$func_resolve_sysroot_result ;; *.$libext) if test conv = "$pass"; then deplibs="$deplib $deplibs" continue fi case $linkmode in lib) # Linking convenience modules into shared libraries is allowed, # but linking other static libraries is non-portable. case " $dlpreconveniencelibs " in *" $deplib "*) ;; *) valid_a_lib=false case $deplibs_check_method in match_pattern*) set dummy $deplibs_check_method; shift match_pattern_regex=`expr "$deplibs_check_method" : "$1 \(.*\)"` if eval "\$ECHO \"$deplib\"" 2>/dev/null | $SED 10q \ | $EGREP "$match_pattern_regex" > /dev/null; then valid_a_lib=: fi ;; pass_all) valid_a_lib=: ;; esac if $valid_a_lib; then echo $ECHO "*** Warning: Linking the shared library $output against the" $ECHO "*** static library $deplib is not portable!" deplibs="$deplib $deplibs" else echo $ECHO "*** Warning: Trying to link with static lib archive $deplib." echo "*** I have the capability to make that library automatically link in when" echo "*** you link to this library. But I can only do this if you have a" echo "*** shared version of the library, which you do not appear to have" echo "*** because the file extensions .$libext of this argument makes me believe" echo "*** that it is just a static archive that I should not use here." fi ;; esac continue ;; prog) if test link != "$pass"; then deplibs="$deplib $deplibs" else compile_deplibs="$deplib $compile_deplibs" finalize_deplibs="$deplib $finalize_deplibs" fi continue ;; esac # linkmode ;; # *.$libext *.lo | *.$objext) if test conv = "$pass"; then deplibs="$deplib $deplibs" elif test prog = "$linkmode"; then if test dlpreopen = "$pass" || test yes != "$dlopen_support" || test no = "$build_libtool_libs"; then # If there is no dlopen support or we're linking statically, # we need to preload. func_append newdlprefiles " $deplib" compile_deplibs="$deplib $compile_deplibs" finalize_deplibs="$deplib $finalize_deplibs" else func_append newdlfiles " $deplib" fi fi continue ;; %DEPLIBS%) alldeplibs=: continue ;; esac # case $deplib $found || test -f "$lib" \ || func_fatal_error "cannot find the library '$lib' or unhandled argument '$deplib'" # Check to see that this really is a libtool archive. func_lalib_unsafe_p "$lib" \ || func_fatal_error "'$lib' is not a valid libtool archive" func_dirname "$lib" "" "." ladir=$func_dirname_result dlname= dlopen= dlpreopen= libdir= library_names= old_library= inherited_linker_flags= # If the library was installed with an old release of libtool, # it will not redefine variables installed, or shouldnotlink installed=yes shouldnotlink=no avoidtemprpath= # Read the .la file func_source "$lib" # Convert "-framework foo" to "foo.ltframework" if test -n "$inherited_linker_flags"; then tmp_inherited_linker_flags=`$ECHO "$inherited_linker_flags" | $SED 's/-framework \([^ $]*\)/\1.ltframework/g'` for tmp_inherited_linker_flag in $tmp_inherited_linker_flags; do case " $new_inherited_linker_flags " in *" $tmp_inherited_linker_flag "*) ;; *) func_append new_inherited_linker_flags " $tmp_inherited_linker_flag";; esac done fi dependency_libs=`$ECHO " $dependency_libs" | $SED 's% \([^ $]*\).ltframework% -framework \1%g'` if test lib,link = "$linkmode,$pass" || test prog,scan = "$linkmode,$pass" || { test prog != "$linkmode" && test lib != "$linkmode"; }; then test -n "$dlopen" && func_append dlfiles " $dlopen" test -n "$dlpreopen" && func_append dlprefiles " $dlpreopen" fi if test conv = "$pass"; then # Only check for convenience libraries deplibs="$lib $deplibs" if test -z "$libdir"; then if test -z "$old_library"; then func_fatal_error "cannot find name of link library for '$lib'" fi # It is a libtool convenience library, so add in its objects. func_append convenience " $ladir/$objdir/$old_library" func_append old_convenience " $ladir/$objdir/$old_library" elif test prog != "$linkmode" && test lib != "$linkmode"; then func_fatal_error "'$lib' is not a convenience library" fi tmp_libs= for deplib in $dependency_libs; do deplibs="$deplib $deplibs" if $opt_preserve_dup_deps; then case "$tmp_libs " in *" $deplib "*) func_append specialdeplibs " $deplib" ;; esac fi func_append tmp_libs " $deplib" done continue fi # $pass = conv # Get the name of the library we link against. linklib= if test -n "$old_library" && { test yes = "$prefer_static_libs" || test built,no = "$prefer_static_libs,$installed"; }; then linklib=$old_library else for l in $old_library $library_names; do linklib=$l done fi if test -z "$linklib"; then func_fatal_error "cannot find name of link library for '$lib'" fi # This library was specified with -dlopen. if test dlopen = "$pass"; then test -z "$libdir" \ && func_fatal_error "cannot -dlopen a convenience library: '$lib'" if test -z "$dlname" || test yes != "$dlopen_support" || test no = "$build_libtool_libs" then # If there is no dlname, no dlopen support or we're linking # statically, we need to preload. We also need to preload any # dependent libraries so libltdl's deplib preloader doesn't # bomb out in the load deplibs phase. func_append dlprefiles " $lib $dependency_libs" else func_append newdlfiles " $lib" fi continue fi # $pass = dlopen # We need an absolute path. case $ladir in [\\/]* | [A-Za-z]:[\\/]*) abs_ladir=$ladir ;; *) abs_ladir=`cd "$ladir" && pwd` if test -z "$abs_ladir"; then func_warning "cannot determine absolute directory name of '$ladir'" func_warning "passing it literally to the linker, although it might fail" abs_ladir=$ladir fi ;; esac func_basename "$lib" laname=$func_basename_result # Find the relevant object directory and library name. if test yes = "$installed"; then if test ! -f "$lt_sysroot$libdir/$linklib" && test -f "$abs_ladir/$linklib"; then func_warning "library '$lib' was moved." dir=$ladir absdir=$abs_ladir libdir=$abs_ladir else dir=$lt_sysroot$libdir absdir=$lt_sysroot$libdir fi test yes = "$hardcode_automatic" && avoidtemprpath=yes else if test ! -f "$ladir/$objdir/$linklib" && test -f "$abs_ladir/$linklib"; then dir=$ladir absdir=$abs_ladir # Remove this search path later func_append notinst_path " $abs_ladir" else dir=$ladir/$objdir absdir=$abs_ladir/$objdir # Remove this search path later func_append notinst_path " $abs_ladir" fi fi # $installed = yes func_stripname 'lib' '.la' "$laname" name=$func_stripname_result # This library was specified with -dlpreopen. if test dlpreopen = "$pass"; then if test -z "$libdir" && test prog = "$linkmode"; then func_fatal_error "only libraries may -dlpreopen a convenience library: '$lib'" fi case $host in # special handling for platforms with PE-DLLs. *cygwin* | *mingw* | *cegcc* ) # Linker will automatically link against shared library if both # static and shared are present. Therefore, ensure we extract # symbols from the import library if a shared library is present # (otherwise, the dlopen module name will be incorrect). We do # this by putting the import library name into $newdlprefiles. # We recover the dlopen module name by 'saving' the la file # name in a special purpose variable, and (later) extracting the # dlname from the la file. if test -n "$dlname"; then func_tr_sh "$dir/$linklib" eval "libfile_$func_tr_sh_result=\$abs_ladir/\$laname" func_append newdlprefiles " $dir/$linklib" else func_append newdlprefiles " $dir/$old_library" # Keep a list of preopened convenience libraries to check # that they are being used correctly in the link pass. test -z "$libdir" && \ func_append dlpreconveniencelibs " $dir/$old_library" fi ;; * ) # Prefer using a static library (so that no silly _DYNAMIC symbols # are required to link). if test -n "$old_library"; then func_append newdlprefiles " $dir/$old_library" # Keep a list of preopened convenience libraries to check # that they are being used correctly in the link pass. test -z "$libdir" && \ func_append dlpreconveniencelibs " $dir/$old_library" # Otherwise, use the dlname, so that lt_dlopen finds it. elif test -n "$dlname"; then func_append newdlprefiles " $dir/$dlname" else func_append newdlprefiles " $dir/$linklib" fi ;; esac fi # $pass = dlpreopen if test -z "$libdir"; then # Link the convenience library if test lib = "$linkmode"; then deplibs="$dir/$old_library $deplibs" elif test prog,link = "$linkmode,$pass"; then compile_deplibs="$dir/$old_library $compile_deplibs" finalize_deplibs="$dir/$old_library $finalize_deplibs" else deplibs="$lib $deplibs" # used for prog,scan pass fi continue fi if test prog = "$linkmode" && test link != "$pass"; then func_append newlib_search_path " $ladir" deplibs="$lib $deplibs" linkalldeplibs=false if test no != "$link_all_deplibs" || test -z "$library_names" || test no = "$build_libtool_libs"; then linkalldeplibs=: fi tmp_libs= for deplib in $dependency_libs; do case $deplib in -L*) func_stripname '-L' '' "$deplib" func_resolve_sysroot "$func_stripname_result" func_append newlib_search_path " $func_resolve_sysroot_result" ;; esac # Need to link against all dependency_libs? if $linkalldeplibs; then deplibs="$deplib $deplibs" else # Need to hardcode shared library paths # or/and link against static libraries newdependency_libs="$deplib $newdependency_libs" fi if $opt_preserve_dup_deps; then case "$tmp_libs " in *" $deplib "*) func_append specialdeplibs " $deplib" ;; esac fi func_append tmp_libs " $deplib" done # for deplib continue fi # $linkmode = prog... if test prog,link = "$linkmode,$pass"; then if test -n "$library_names" && { { test no = "$prefer_static_libs" || test built,yes = "$prefer_static_libs,$installed"; } || test -z "$old_library"; }; then # We need to hardcode the library path if test -n "$shlibpath_var" && test -z "$avoidtemprpath"; then # Make sure the rpath contains only unique directories. case $temp_rpath: in *"$absdir:"*) ;; *) func_append temp_rpath "$absdir:" ;; esac fi # Hardcode the library path. # Skip directories that are in the system default run-time # search path. case " $sys_lib_dlsearch_path " in *" $absdir "*) ;; *) case "$compile_rpath " in *" $absdir "*) ;; *) func_append compile_rpath " $absdir" ;; esac ;; esac case " $sys_lib_dlsearch_path " in *" $libdir "*) ;; *) case "$finalize_rpath " in *" $libdir "*) ;; *) func_append finalize_rpath " $libdir" ;; esac ;; esac fi # $linkmode,$pass = prog,link... if $alldeplibs && { test pass_all = "$deplibs_check_method" || { test yes = "$build_libtool_libs" && test -n "$library_names"; }; }; then # We only need to search for static libraries continue fi fi link_static=no # Whether the deplib will be linked statically use_static_libs=$prefer_static_libs if test built = "$use_static_libs" && test yes = "$installed"; then use_static_libs=no fi if test -n "$library_names" && { test no = "$use_static_libs" || test -z "$old_library"; }; then case $host in *cygwin* | *mingw* | *cegcc* | *os2*) # No point in relinking DLLs because paths are not encoded func_append notinst_deplibs " $lib" need_relink=no ;; *) if test no = "$installed"; then func_append notinst_deplibs " $lib" need_relink=yes fi ;; esac # This is a shared library # Warn about portability, can't link against -module's on some # systems (darwin). Don't bleat about dlopened modules though! dlopenmodule= for dlpremoduletest in $dlprefiles; do if test "X$dlpremoduletest" = "X$lib"; then dlopenmodule=$dlpremoduletest break fi done if test -z "$dlopenmodule" && test yes = "$shouldnotlink" && test link = "$pass"; then echo if test prog = "$linkmode"; then $ECHO "*** Warning: Linking the executable $output against the loadable module" else $ECHO "*** Warning: Linking the shared library $output against the loadable module" fi $ECHO "*** $linklib is not portable!" fi if test lib = "$linkmode" && test yes = "$hardcode_into_libs"; then # Hardcode the library path. # Skip directories that are in the system default run-time # search path. case " $sys_lib_dlsearch_path " in *" $absdir "*) ;; *) case "$compile_rpath " in *" $absdir "*) ;; *) func_append compile_rpath " $absdir" ;; esac ;; esac case " $sys_lib_dlsearch_path " in *" $libdir "*) ;; *) case "$finalize_rpath " in *" $libdir "*) ;; *) func_append finalize_rpath " $libdir" ;; esac ;; esac fi if test -n "$old_archive_from_expsyms_cmds"; then # figure out the soname set dummy $library_names shift realname=$1 shift libname=`eval "\\$ECHO \"$libname_spec\""` # use dlname if we got it. it's perfectly good, no? if test -n "$dlname"; then soname=$dlname elif test -n "$soname_spec"; then # bleh windows case $host in *cygwin* | mingw* | *cegcc* | *os2*) func_arith $current - $age major=$func_arith_result versuffix=-$major ;; esac eval soname=\"$soname_spec\" else soname=$realname fi # Make a new name for the extract_expsyms_cmds to use soroot=$soname func_basename "$soroot" soname=$func_basename_result func_stripname 'lib' '.dll' "$soname" newlib=libimp-$func_stripname_result.a # If the library has no export list, then create one now if test -f "$output_objdir/$soname-def"; then : else func_verbose "extracting exported symbol list from '$soname'" func_execute_cmds "$extract_expsyms_cmds" 'exit $?' fi # Create $newlib if test -f "$output_objdir/$newlib"; then :; else func_verbose "generating import library for '$soname'" func_execute_cmds "$old_archive_from_expsyms_cmds" 'exit $?' fi # make sure the library variables are pointing to the new library dir=$output_objdir linklib=$newlib fi # test -n "$old_archive_from_expsyms_cmds" if test prog = "$linkmode" || test relink != "$opt_mode"; then add_shlibpath= add_dir= add= lib_linked=yes case $hardcode_action in immediate | unsupported) if test no = "$hardcode_direct"; then add=$dir/$linklib case $host in *-*-sco3.2v5.0.[024]*) add_dir=-L$dir ;; *-*-sysv4*uw2*) add_dir=-L$dir ;; *-*-sysv5OpenUNIX* | *-*-sysv5UnixWare7.[01].[10]* | \ *-*-unixware7*) add_dir=-L$dir ;; *-*-darwin* ) # if the lib is a (non-dlopened) module then we cannot # link against it, someone is ignoring the earlier warnings if /usr/bin/file -L $add 2> /dev/null | $GREP ": [^:]* bundle" >/dev/null; then if test "X$dlopenmodule" != "X$lib"; then $ECHO "*** Warning: lib $linklib is a module, not a shared library" if test -z "$old_library"; then echo echo "*** And there doesn't seem to be a static archive available" echo "*** The link will probably fail, sorry" else add=$dir/$old_library fi elif test -n "$old_library"; then add=$dir/$old_library fi fi esac elif test no = "$hardcode_minus_L"; then case $host in *-*-sunos*) add_shlibpath=$dir ;; esac add_dir=-L$dir add=-l$name elif test no = "$hardcode_shlibpath_var"; then add_shlibpath=$dir add=-l$name else lib_linked=no fi ;; relink) if test yes = "$hardcode_direct" && test no = "$hardcode_direct_absolute"; then add=$dir/$linklib elif test yes = "$hardcode_minus_L"; then add_dir=-L$absdir # Try looking first in the location we're being installed to. if test -n "$inst_prefix_dir"; then case $libdir in [\\/]*) func_append add_dir " -L$inst_prefix_dir$libdir" ;; esac fi add=-l$name elif test yes = "$hardcode_shlibpath_var"; then add_shlibpath=$dir add=-l$name else lib_linked=no fi ;; *) lib_linked=no ;; esac if test yes != "$lib_linked"; then func_fatal_configuration "unsupported hardcode properties" fi if test -n "$add_shlibpath"; then case :$compile_shlibpath: in *":$add_shlibpath:"*) ;; *) func_append compile_shlibpath "$add_shlibpath:" ;; esac fi if test prog = "$linkmode"; then test -n "$add_dir" && compile_deplibs="$add_dir $compile_deplibs" test -n "$add" && compile_deplibs="$add $compile_deplibs" else test -n "$add_dir" && deplibs="$add_dir $deplibs" test -n "$add" && deplibs="$add $deplibs" if test yes != "$hardcode_direct" && test yes != "$hardcode_minus_L" && test yes = "$hardcode_shlibpath_var"; then case :$finalize_shlibpath: in *":$libdir:"*) ;; *) func_append finalize_shlibpath "$libdir:" ;; esac fi fi fi if test prog = "$linkmode" || test relink = "$opt_mode"; then add_shlibpath= add_dir= add= # Finalize command for both is simple: just hardcode it. if test yes = "$hardcode_direct" && test no = "$hardcode_direct_absolute"; then add=$libdir/$linklib elif test yes = "$hardcode_minus_L"; then add_dir=-L$libdir add=-l$name elif test yes = "$hardcode_shlibpath_var"; then case :$finalize_shlibpath: in *":$libdir:"*) ;; *) func_append finalize_shlibpath "$libdir:" ;; esac add=-l$name elif test yes = "$hardcode_automatic"; then if test -n "$inst_prefix_dir" && test -f "$inst_prefix_dir$libdir/$linklib"; then add=$inst_prefix_dir$libdir/$linklib else add=$libdir/$linklib fi else # We cannot seem to hardcode it, guess we'll fake it. add_dir=-L$libdir # Try looking first in the location we're being installed to. if test -n "$inst_prefix_dir"; then case $libdir in [\\/]*) func_append add_dir " -L$inst_prefix_dir$libdir" ;; esac fi add=-l$name fi if test prog = "$linkmode"; then test -n "$add_dir" && finalize_deplibs="$add_dir $finalize_deplibs" test -n "$add" && finalize_deplibs="$add $finalize_deplibs" else test -n "$add_dir" && deplibs="$add_dir $deplibs" test -n "$add" && deplibs="$add $deplibs" fi fi elif test prog = "$linkmode"; then # Here we assume that one of hardcode_direct or hardcode_minus_L # is not unsupported. This is valid on all known static and # shared platforms. if test unsupported != "$hardcode_direct"; then test -n "$old_library" && linklib=$old_library compile_deplibs="$dir/$linklib $compile_deplibs" finalize_deplibs="$dir/$linklib $finalize_deplibs" else compile_deplibs="-l$name -L$dir $compile_deplibs" finalize_deplibs="-l$name -L$dir $finalize_deplibs" fi elif test yes = "$build_libtool_libs"; then # Not a shared library if test pass_all != "$deplibs_check_method"; then # We're trying link a shared library against a static one # but the system doesn't support it. # Just print a warning and add the library to dependency_libs so # that the program can be linked against the static library. echo $ECHO "*** Warning: This system cannot link to static lib archive $lib." echo "*** I have the capability to make that library automatically link in when" echo "*** you link to this library. But I can only do this if you have a" echo "*** shared version of the library, which you do not appear to have." if test yes = "$module"; then echo "*** But as you try to build a module library, libtool will still create " echo "*** a static module, that should work as long as the dlopening application" echo "*** is linked with the -dlopen flag to resolve symbols at runtime." if test -z "$global_symbol_pipe"; then echo echo "*** However, this would only work if libtool was able to extract symbol" echo "*** lists from a program, using 'nm' or equivalent, but libtool could" echo "*** not find such a program. So, this module is probably useless." echo "*** 'nm' from GNU binutils and a full rebuild may help." fi if test no = "$build_old_libs"; then build_libtool_libs=module build_old_libs=yes else build_libtool_libs=no fi fi else deplibs="$dir/$old_library $deplibs" link_static=yes fi fi # link shared/static library? if test lib = "$linkmode"; then if test -n "$dependency_libs" && { test yes != "$hardcode_into_libs" || test yes = "$build_old_libs" || test yes = "$link_static"; }; then # Extract -R from dependency_libs temp_deplibs= for libdir in $dependency_libs; do case $libdir in -R*) func_stripname '-R' '' "$libdir" temp_xrpath=$func_stripname_result case " $xrpath " in *" $temp_xrpath "*) ;; *) func_append xrpath " $temp_xrpath";; esac;; *) func_append temp_deplibs " $libdir";; esac done dependency_libs=$temp_deplibs fi func_append newlib_search_path " $absdir" # Link against this library test no = "$link_static" && newdependency_libs="$abs_ladir/$laname $newdependency_libs" # ... and its dependency_libs tmp_libs= for deplib in $dependency_libs; do newdependency_libs="$deplib $newdependency_libs" case $deplib in -L*) func_stripname '-L' '' "$deplib" func_resolve_sysroot "$func_stripname_result";; *) func_resolve_sysroot "$deplib" ;; esac if $opt_preserve_dup_deps; then case "$tmp_libs " in *" $func_resolve_sysroot_result "*) func_append specialdeplibs " $func_resolve_sysroot_result" ;; esac fi func_append tmp_libs " $func_resolve_sysroot_result" done if test no != "$link_all_deplibs"; then # Add the search paths of all dependency libraries for deplib in $dependency_libs; do path= case $deplib in -L*) path=$deplib ;; *.la) func_resolve_sysroot "$deplib" deplib=$func_resolve_sysroot_result func_dirname "$deplib" "" "." dir=$func_dirname_result # We need an absolute path. case $dir in [\\/]* | [A-Za-z]:[\\/]*) absdir=$dir ;; *) absdir=`cd "$dir" && pwd` if test -z "$absdir"; then func_warning "cannot determine absolute directory name of '$dir'" absdir=$dir fi ;; esac if $GREP "^installed=no" $deplib > /dev/null; then case $host in *-*-darwin*) depdepl= eval deplibrary_names=`$SED -n -e 's/^library_names=\(.*\)$/\1/p' $deplib` if test -n "$deplibrary_names"; then for tmp in $deplibrary_names; do depdepl=$tmp done if test -f "$absdir/$objdir/$depdepl"; then depdepl=$absdir/$objdir/$depdepl darwin_install_name=`$OTOOL -L $depdepl | awk '{if (NR == 2) {print $1;exit}}'` if test -z "$darwin_install_name"; then darwin_install_name=`$OTOOL64 -L $depdepl | awk '{if (NR == 2) {print $1;exit}}'` fi func_append compiler_flags " $wl-dylib_file $wl$darwin_install_name:$depdepl" func_append linker_flags " -dylib_file $darwin_install_name:$depdepl" path= fi fi ;; *) path=-L$absdir/$objdir ;; esac else eval libdir=`$SED -n -e 's/^libdir=\(.*\)$/\1/p' $deplib` test -z "$libdir" && \ func_fatal_error "'$deplib' is not a valid libtool archive" test "$absdir" != "$libdir" && \ func_warning "'$deplib' seems to be moved" path=-L$absdir fi ;; esac case " $deplibs " in *" $path "*) ;; *) deplibs="$path $deplibs" ;; esac done fi # link_all_deplibs != no fi # linkmode = lib done # for deplib in $libs if test link = "$pass"; then if test prog = "$linkmode"; then compile_deplibs="$new_inherited_linker_flags $compile_deplibs" finalize_deplibs="$new_inherited_linker_flags $finalize_deplibs" else compiler_flags="$compiler_flags "`$ECHO " $new_inherited_linker_flags" | $SED 's% \([^ $]*\).ltframework% -framework \1%g'` fi fi dependency_libs=$newdependency_libs if test dlpreopen = "$pass"; then # Link the dlpreopened libraries before other libraries for deplib in $save_deplibs; do deplibs="$deplib $deplibs" done fi if test dlopen != "$pass"; then test conv = "$pass" || { # Make sure lib_search_path contains only unique directories. lib_search_path= for dir in $newlib_search_path; do case "$lib_search_path " in *" $dir "*) ;; *) func_append lib_search_path " $dir" ;; esac done newlib_search_path= } if test prog,link = "$linkmode,$pass"; then vars="compile_deplibs finalize_deplibs" else vars=deplibs fi for var in $vars dependency_libs; do # Add libraries to $var in reverse order eval tmp_libs=\"\$$var\" new_libs= for deplib in $tmp_libs; do # FIXME: Pedantically, this is the right thing to do, so # that some nasty dependency loop isn't accidentally # broken: #new_libs="$deplib $new_libs" # Pragmatically, this seems to cause very few problems in # practice: case $deplib in -L*) new_libs="$deplib $new_libs" ;; -R*) ;; *) # And here is the reason: when a library appears more # than once as an explicit dependence of a library, or # is implicitly linked in more than once by the # compiler, it is considered special, and multiple # occurrences thereof are not removed. Compare this # with having the same library being listed as a # dependency of multiple other libraries: in this case, # we know (pedantically, we assume) the library does not # need to be listed more than once, so we keep only the # last copy. This is not always right, but it is rare # enough that we require users that really mean to play # such unportable linking tricks to link the library # using -Wl,-lname, so that libtool does not consider it # for duplicate removal. case " $specialdeplibs " in *" $deplib "*) new_libs="$deplib $new_libs" ;; *) case " $new_libs " in *" $deplib "*) ;; *) new_libs="$deplib $new_libs" ;; esac ;; esac ;; esac done tmp_libs= for deplib in $new_libs; do case $deplib in -L*) case " $tmp_libs " in *" $deplib "*) ;; *) func_append tmp_libs " $deplib" ;; esac ;; *) func_append tmp_libs " $deplib" ;; esac done eval $var=\"$tmp_libs\" done # for var fi # Add Sun CC postdeps if required: test CXX = "$tagname" && { case $host_os in linux*) case `$CC -V 2>&1 | sed 5q` in *Sun\ C*) # Sun C++ 5.9 func_suncc_cstd_abi if test no != "$suncc_use_cstd_abi"; then func_append postdeps ' -library=Cstd -library=Crun' fi ;; esac ;; solaris*) func_cc_basename "$CC" case $func_cc_basename_result in CC* | sunCC*) func_suncc_cstd_abi if test no != "$suncc_use_cstd_abi"; then func_append postdeps ' -library=Cstd -library=Crun' fi ;; esac ;; esac } # Last step: remove runtime libs from dependency_libs # (they stay in deplibs) tmp_libs= for i in $dependency_libs; do case " $predeps $postdeps $compiler_lib_search_path " in *" $i "*) i= ;; esac if test -n "$i"; then func_append tmp_libs " $i" fi done dependency_libs=$tmp_libs done # for pass if test prog = "$linkmode"; then dlfiles=$newdlfiles fi if test prog = "$linkmode" || test lib = "$linkmode"; then dlprefiles=$newdlprefiles fi case $linkmode in oldlib) if test -n "$dlfiles$dlprefiles" || test no != "$dlself"; then func_warning "'-dlopen' is ignored for archives" fi case " $deplibs" in *\ -l* | *\ -L*) func_warning "'-l' and '-L' are ignored for archives" ;; esac test -n "$rpath" && \ func_warning "'-rpath' is ignored for archives" test -n "$xrpath" && \ func_warning "'-R' is ignored for archives" test -n "$vinfo" && \ func_warning "'-version-info/-version-number' is ignored for archives" test -n "$release" && \ func_warning "'-release' is ignored for archives" test -n "$export_symbols$export_symbols_regex" && \ func_warning "'-export-symbols' is ignored for archives" # Now set the variables for building old libraries. build_libtool_libs=no oldlibs=$output func_append objs "$old_deplibs" ;; lib) # Make sure we only generate libraries of the form 'libNAME.la'. case $outputname in lib*) func_stripname 'lib' '.la' "$outputname" name=$func_stripname_result eval shared_ext=\"$shrext_cmds\" eval libname=\"$libname_spec\" ;; *) test no = "$module" \ && func_fatal_help "libtool library '$output' must begin with 'lib'" if test no != "$need_lib_prefix"; then # Add the "lib" prefix for modules if required func_stripname '' '.la' "$outputname" name=$func_stripname_result eval shared_ext=\"$shrext_cmds\" eval libname=\"$libname_spec\" else func_stripname '' '.la' "$outputname" libname=$func_stripname_result fi ;; esac if test -n "$objs"; then if test pass_all != "$deplibs_check_method"; then func_fatal_error "cannot build libtool library '$output' from non-libtool objects on this host:$objs" else echo $ECHO "*** Warning: Linking the shared library $output against the non-libtool" $ECHO "*** objects $objs is not portable!" func_append libobjs " $objs" fi fi test no = "$dlself" \ || func_warning "'-dlopen self' is ignored for libtool libraries" set dummy $rpath shift test 1 -lt "$#" \ && func_warning "ignoring multiple '-rpath's for a libtool library" install_libdir=$1 oldlibs= if test -z "$rpath"; then if test yes = "$build_libtool_libs"; then # Building a libtool convenience library. # Some compilers have problems with a '.al' extension so # convenience libraries should have the same extension an # archive normally would. oldlibs="$output_objdir/$libname.$libext $oldlibs" build_libtool_libs=convenience build_old_libs=yes fi test -n "$vinfo" && \ func_warning "'-version-info/-version-number' is ignored for convenience libraries" test -n "$release" && \ func_warning "'-release' is ignored for convenience libraries" else # Parse the version information argument. save_ifs=$IFS; IFS=: set dummy $vinfo 0 0 0 shift IFS=$save_ifs test -n "$7" && \ func_fatal_help "too many parameters to '-version-info'" # convert absolute version numbers to libtool ages # this retains compatibility with .la files and attempts # to make the code below a bit more comprehensible case $vinfo_number in yes) number_major=$1 number_minor=$2 number_revision=$3 # # There are really only two kinds -- those that # use the current revision as the major version # and those that subtract age and use age as # a minor version. But, then there is irix # that has an extra 1 added just for fun # case $version_type in # correct linux to gnu/linux during the next big refactor darwin|freebsd-elf|linux|osf|windows|none) func_arith $number_major + $number_minor current=$func_arith_result age=$number_minor revision=$number_revision ;; freebsd-aout|qnx|sunos) current=$number_major revision=$number_minor age=0 ;; irix|nonstopux) func_arith $number_major + $number_minor current=$func_arith_result age=$number_minor revision=$number_minor lt_irix_increment=no ;; esac ;; no) current=$1 revision=$2 age=$3 ;; esac # Check that each of the things are valid numbers. case $current in 0|[1-9]|[1-9][0-9]|[1-9][0-9][0-9]|[1-9][0-9][0-9][0-9]|[1-9][0-9][0-9][0-9][0-9]) ;; *) func_error "CURRENT '$current' must be a nonnegative integer" func_fatal_error "'$vinfo' is not valid version information" ;; esac case $revision in 0|[1-9]|[1-9][0-9]|[1-9][0-9][0-9]|[1-9][0-9][0-9][0-9]|[1-9][0-9][0-9][0-9][0-9]) ;; *) func_error "REVISION '$revision' must be a nonnegative integer" func_fatal_error "'$vinfo' is not valid version information" ;; esac case $age in 0|[1-9]|[1-9][0-9]|[1-9][0-9][0-9]|[1-9][0-9][0-9][0-9]|[1-9][0-9][0-9][0-9][0-9]) ;; *) func_error "AGE '$age' must be a nonnegative integer" func_fatal_error "'$vinfo' is not valid version information" ;; esac if test "$age" -gt "$current"; then func_error "AGE '$age' is greater than the current interface number '$current'" func_fatal_error "'$vinfo' is not valid version information" fi # Calculate the version variables. major= versuffix= verstring= case $version_type in none) ;; darwin) # Like Linux, but with the current version available in # verstring for coding it into the library header func_arith $current - $age major=.$func_arith_result versuffix=$major.$age.$revision # Darwin ld doesn't like 0 for these options... func_arith $current + 1 minor_current=$func_arith_result xlcverstring="$wl-compatibility_version $wl$minor_current $wl-current_version $wl$minor_current.$revision" verstring="-compatibility_version $minor_current -current_version $minor_current.$revision" # On Darwin other compilers case $CC in nagfor*) verstring="$wl-compatibility_version $wl$minor_current $wl-current_version $wl$minor_current.$revision" ;; *) verstring="-compatibility_version $minor_current -current_version $minor_current.$revision" ;; esac ;; freebsd-aout) major=.$current versuffix=.$current.$revision ;; freebsd-elf) func_arith $current - $age major=.$func_arith_result versuffix=$major.$age.$revision ;; irix | nonstopux) if test no = "$lt_irix_increment"; then func_arith $current - $age else func_arith $current - $age + 1 fi major=$func_arith_result case $version_type in nonstopux) verstring_prefix=nonstopux ;; *) verstring_prefix=sgi ;; esac verstring=$verstring_prefix$major.$revision # Add in all the interfaces that we are compatible with. loop=$revision while test 0 -ne "$loop"; do func_arith $revision - $loop iface=$func_arith_result func_arith $loop - 1 loop=$func_arith_result verstring=$verstring_prefix$major.$iface:$verstring done # Before this point, $major must not contain '.'. major=.$major versuffix=$major.$revision ;; linux) # correct to gnu/linux during the next big refactor func_arith $current - $age major=.$func_arith_result versuffix=$major.$age.$revision ;; osf) func_arith $current - $age major=.$func_arith_result versuffix=.$current.$age.$revision verstring=$current.$age.$revision # Add in all the interfaces that we are compatible with. loop=$age while test 0 -ne "$loop"; do func_arith $current - $loop iface=$func_arith_result func_arith $loop - 1 loop=$func_arith_result verstring=$verstring:$iface.0 done # Make executables depend on our current version. func_append verstring ":$current.0" ;; qnx) major=.$current versuffix=.$current ;; sco) major=.$current versuffix=.$current ;; sunos) major=.$current versuffix=.$current.$revision ;; windows) # Use '-' rather than '.', since we only want one # extension on DOS 8.3 file systems. func_arith $current - $age major=$func_arith_result versuffix=-$major ;; *) func_fatal_configuration "unknown library version type '$version_type'" ;; esac # Clear the version info if we defaulted, and they specified a release. if test -z "$vinfo" && test -n "$release"; then major= case $version_type in darwin) # we can't check for "0.0" in archive_cmds due to quoting # problems, so we reset it completely verstring= ;; *) verstring=0.0 ;; esac if test no = "$need_version"; then versuffix= else versuffix=.0.0 fi fi # Remove version info from name if versioning should be avoided if test yes,no = "$avoid_version,$need_version"; then major= versuffix= verstring= fi # Check to see if the archive will have undefined symbols. if test yes = "$allow_undefined"; then if test unsupported = "$allow_undefined_flag"; then if test yes = "$build_old_libs"; then func_warning "undefined symbols not allowed in $host shared libraries; building static only" build_libtool_libs=no else func_fatal_error "can't build $host shared library unless -no-undefined is specified" fi fi else # Don't allow undefined symbols. allow_undefined_flag=$no_undefined_flag fi fi func_generate_dlsyms "$libname" "$libname" : func_append libobjs " $symfileobj" test " " = "$libobjs" && libobjs= if test relink != "$opt_mode"; then # Remove our outputs, but don't remove object files since they # may have been created when compiling PIC objects. removelist= tempremovelist=`$ECHO "$output_objdir/*"` for p in $tempremovelist; do case $p in *.$objext | *.gcno) ;; $output_objdir/$outputname | $output_objdir/$libname.* | $output_objdir/$libname$release.*) if test -n "$precious_files_regex"; then if $ECHO "$p" | $EGREP -e "$precious_files_regex" >/dev/null 2>&1 then continue fi fi func_append removelist " $p" ;; *) ;; esac done test -n "$removelist" && \ func_show_eval "${RM}r \$removelist" fi # Now set the variables for building old libraries. if test yes = "$build_old_libs" && test convenience != "$build_libtool_libs"; then func_append oldlibs " $output_objdir/$libname.$libext" # Transform .lo files to .o files. oldobjs="$objs "`$ECHO "$libobjs" | $SP2NL | $SED "/\.$libext$/d; $lo2o" | $NL2SP` fi # Eliminate all temporary directories. #for path in $notinst_path; do # lib_search_path=`$ECHO "$lib_search_path " | $SED "s% $path % %g"` # deplibs=`$ECHO "$deplibs " | $SED "s% -L$path % %g"` # dependency_libs=`$ECHO "$dependency_libs " | $SED "s% -L$path % %g"` #done if test -n "$xrpath"; then # If the user specified any rpath flags, then add them. temp_xrpath= for libdir in $xrpath; do func_replace_sysroot "$libdir" func_append temp_xrpath " -R$func_replace_sysroot_result" case "$finalize_rpath " in *" $libdir "*) ;; *) func_append finalize_rpath " $libdir" ;; esac done if test yes != "$hardcode_into_libs" || test yes = "$build_old_libs"; then dependency_libs="$temp_xrpath $dependency_libs" fi fi # Make sure dlfiles contains only unique files that won't be dlpreopened old_dlfiles=$dlfiles dlfiles= for lib in $old_dlfiles; do case " $dlprefiles $dlfiles " in *" $lib "*) ;; *) func_append dlfiles " $lib" ;; esac done # Make sure dlprefiles contains only unique files old_dlprefiles=$dlprefiles dlprefiles= for lib in $old_dlprefiles; do case "$dlprefiles " in *" $lib "*) ;; *) func_append dlprefiles " $lib" ;; esac done if test yes = "$build_libtool_libs"; then if test -n "$rpath"; then case $host in *-*-cygwin* | *-*-mingw* | *-*-pw32* | *-*-os2* | *-*-beos* | *-cegcc* | *-*-haiku*) # these systems don't actually have a c library (as such)! ;; *-*-rhapsody* | *-*-darwin1.[012]) # Rhapsody C library is in the System framework func_append deplibs " System.ltframework" ;; *-*-netbsd*) # Don't link with libc until the a.out ld.so is fixed. ;; *-*-openbsd* | *-*-freebsd* | *-*-dragonfly*) # Do not include libc due to us having libc/libc_r. ;; *-*-sco3.2v5* | *-*-sco5v6*) # Causes problems with __ctype ;; *-*-sysv4.2uw2* | *-*-sysv5* | *-*-unixware* | *-*-OpenUNIX*) # Compiler inserts libc in the correct place for threads to work ;; *) # Add libc to deplibs on all other systems if necessary. if test yes = "$build_libtool_need_lc"; then func_append deplibs " -lc" fi ;; esac fi # Transform deplibs into only deplibs that can be linked in shared. name_save=$name libname_save=$libname release_save=$release versuffix_save=$versuffix major_save=$major # I'm not sure if I'm treating the release correctly. I think # release should show up in the -l (ie -lgmp5) so we don't want to # add it in twice. Is that correct? release= versuffix= major= newdeplibs= droppeddeps=no case $deplibs_check_method in pass_all) # Don't check for shared/static. Everything works. # This might be a little naive. We might want to check # whether the library exists or not. But this is on # osf3 & osf4 and I'm not really sure... Just # implementing what was already the behavior. newdeplibs=$deplibs ;; test_compile) # This code stresses the "libraries are programs" paradigm to its # limits. Maybe even breaks it. We compile a program, linking it # against the deplibs as a proxy for the library. Then we can check # whether they linked in statically or dynamically with ldd. $opt_dry_run || $RM conftest.c cat > conftest.c </dev/null` $nocaseglob else potential_libs=`ls $i/$libnameglob[.-]* 2>/dev/null` fi for potent_lib in $potential_libs; do # Follow soft links. if ls -lLd "$potent_lib" 2>/dev/null | $GREP " -> " >/dev/null; then continue fi # The statement above tries to avoid entering an # endless loop below, in case of cyclic links. # We might still enter an endless loop, since a link # loop can be closed while we follow links, # but so what? potlib=$potent_lib while test -h "$potlib" 2>/dev/null; do potliblink=`ls -ld $potlib | $SED 's/.* -> //'` case $potliblink in [\\/]* | [A-Za-z]:[\\/]*) potlib=$potliblink;; *) potlib=`$ECHO "$potlib" | $SED 's|[^/]*$||'`"$potliblink";; esac done if eval $file_magic_cmd \"\$potlib\" 2>/dev/null | $SED -e 10q | $EGREP "$file_magic_regex" > /dev/null; then func_append newdeplibs " $a_deplib" a_deplib= break 2 fi done done fi if test -n "$a_deplib"; then droppeddeps=yes echo $ECHO "*** Warning: linker path does not have real file for library $a_deplib." echo "*** I have the capability to make that library automatically link in when" echo "*** you link to this library. But I can only do this if you have a" echo "*** shared version of the library, which you do not appear to have" echo "*** because I did check the linker path looking for a file starting" if test -z "$potlib"; then $ECHO "*** with $libname but no candidates were found. (...for file magic test)" else $ECHO "*** with $libname and none of the candidates passed a file format test" $ECHO "*** using a file magic. Last file checked: $potlib" fi fi ;; *) # Add a -L argument. func_append newdeplibs " $a_deplib" ;; esac done # Gone through all deplibs. ;; match_pattern*) set dummy $deplibs_check_method; shift match_pattern_regex=`expr "$deplibs_check_method" : "$1 \(.*\)"` for a_deplib in $deplibs; do case $a_deplib in -l*) func_stripname -l '' "$a_deplib" name=$func_stripname_result if test yes = "$allow_libtool_libs_with_static_runtimes"; then case " $predeps $postdeps " in *" $a_deplib "*) func_append newdeplibs " $a_deplib" a_deplib= ;; esac fi if test -n "$a_deplib"; then libname=`eval "\\$ECHO \"$libname_spec\""` for i in $lib_search_path $sys_lib_search_path $shlib_search_path; do potential_libs=`ls $i/$libname[.-]* 2>/dev/null` for potent_lib in $potential_libs; do potlib=$potent_lib # see symlink-check above in file_magic test if eval "\$ECHO \"$potent_lib\"" 2>/dev/null | $SED 10q | \ $EGREP "$match_pattern_regex" > /dev/null; then func_append newdeplibs " $a_deplib" a_deplib= break 2 fi done done fi if test -n "$a_deplib"; then droppeddeps=yes echo $ECHO "*** Warning: linker path does not have real file for library $a_deplib." echo "*** I have the capability to make that library automatically link in when" echo "*** you link to this library. But I can only do this if you have a" echo "*** shared version of the library, which you do not appear to have" echo "*** because I did check the linker path looking for a file starting" if test -z "$potlib"; then $ECHO "*** with $libname but no candidates were found. (...for regex pattern test)" else $ECHO "*** with $libname and none of the candidates passed a file format test" $ECHO "*** using a regex pattern. Last file checked: $potlib" fi fi ;; *) # Add a -L argument. func_append newdeplibs " $a_deplib" ;; esac done # Gone through all deplibs. ;; none | unknown | *) newdeplibs= tmp_deplibs=`$ECHO " $deplibs" | $SED 's/ -lc$//; s/ -[LR][^ ]*//g'` if test yes = "$allow_libtool_libs_with_static_runtimes"; then for i in $predeps $postdeps; do # can't use Xsed below, because $i might contain '/' tmp_deplibs=`$ECHO " $tmp_deplibs" | $SED "s|$i||"` done fi case $tmp_deplibs in *[!\ \ ]*) echo if test none = "$deplibs_check_method"; then echo "*** Warning: inter-library dependencies are not supported in this platform." else echo "*** Warning: inter-library dependencies are not known to be supported." fi echo "*** All declared inter-library dependencies are being dropped." droppeddeps=yes ;; esac ;; esac versuffix=$versuffix_save major=$major_save release=$release_save libname=$libname_save name=$name_save case $host in *-*-rhapsody* | *-*-darwin1.[012]) # On Rhapsody replace the C library with the System framework newdeplibs=`$ECHO " $newdeplibs" | $SED 's/ -lc / System.ltframework /'` ;; esac if test yes = "$droppeddeps"; then if test yes = "$module"; then echo echo "*** Warning: libtool could not satisfy all declared inter-library" $ECHO "*** dependencies of module $libname. Therefore, libtool will create" echo "*** a static module, that should work as long as the dlopening" echo "*** application is linked with the -dlopen flag." if test -z "$global_symbol_pipe"; then echo echo "*** However, this would only work if libtool was able to extract symbol" echo "*** lists from a program, using 'nm' or equivalent, but libtool could" echo "*** not find such a program. So, this module is probably useless." echo "*** 'nm' from GNU binutils and a full rebuild may help." fi if test no = "$build_old_libs"; then oldlibs=$output_objdir/$libname.$libext build_libtool_libs=module build_old_libs=yes else build_libtool_libs=no fi else echo "*** The inter-library dependencies that have been dropped here will be" echo "*** automatically added whenever a program is linked with this library" echo "*** or is declared to -dlopen it." if test no = "$allow_undefined"; then echo echo "*** Since this library must not contain undefined symbols," echo "*** because either the platform does not support them or" echo "*** it was explicitly requested with -no-undefined," echo "*** libtool will only create a static version of it." if test no = "$build_old_libs"; then oldlibs=$output_objdir/$libname.$libext build_libtool_libs=module build_old_libs=yes else build_libtool_libs=no fi fi fi fi # Done checking deplibs! deplibs=$newdeplibs fi # Time to change all our "foo.ltframework" stuff back to "-framework foo" case $host in *-*-darwin*) newdeplibs=`$ECHO " $newdeplibs" | $SED 's% \([^ $]*\).ltframework% -framework \1%g'` new_inherited_linker_flags=`$ECHO " $new_inherited_linker_flags" | $SED 's% \([^ $]*\).ltframework% -framework \1%g'` deplibs=`$ECHO " $deplibs" | $SED 's% \([^ $]*\).ltframework% -framework \1%g'` ;; esac # move library search paths that coincide with paths to not yet # installed libraries to the beginning of the library search list new_libs= for path in $notinst_path; do case " $new_libs " in *" -L$path/$objdir "*) ;; *) case " $deplibs " in *" -L$path/$objdir "*) func_append new_libs " -L$path/$objdir" ;; esac ;; esac done for deplib in $deplibs; do case $deplib in -L*) case " $new_libs " in *" $deplib "*) ;; *) func_append new_libs " $deplib" ;; esac ;; *) func_append new_libs " $deplib" ;; esac done deplibs=$new_libs # All the library-specific variables (install_libdir is set above). library_names= old_library= dlname= # Test again, we may have decided not to build it any more if test yes = "$build_libtool_libs"; then # Remove $wl instances when linking with ld. # FIXME: should test the right _cmds variable. case $archive_cmds in *\$LD\ *) wl= ;; esac if test yes = "$hardcode_into_libs"; then # Hardcode the library paths hardcode_libdirs= dep_rpath= rpath=$finalize_rpath test relink = "$opt_mode" || rpath=$compile_rpath$rpath for libdir in $rpath; do if test -n "$hardcode_libdir_flag_spec"; then if test -n "$hardcode_libdir_separator"; then func_replace_sysroot "$libdir" libdir=$func_replace_sysroot_result if test -z "$hardcode_libdirs"; then hardcode_libdirs=$libdir else # Just accumulate the unique libdirs. case $hardcode_libdir_separator$hardcode_libdirs$hardcode_libdir_separator in *"$hardcode_libdir_separator$libdir$hardcode_libdir_separator"*) ;; *) func_append hardcode_libdirs "$hardcode_libdir_separator$libdir" ;; esac fi else eval flag=\"$hardcode_libdir_flag_spec\" func_append dep_rpath " $flag" fi elif test -n "$runpath_var"; then case "$perm_rpath " in *" $libdir "*) ;; *) func_append perm_rpath " $libdir" ;; esac fi done # Substitute the hardcoded libdirs into the rpath. if test -n "$hardcode_libdir_separator" && test -n "$hardcode_libdirs"; then libdir=$hardcode_libdirs eval "dep_rpath=\"$hardcode_libdir_flag_spec\"" fi if test -n "$runpath_var" && test -n "$perm_rpath"; then # We should set the runpath_var. rpath= for dir in $perm_rpath; do func_append rpath "$dir:" done eval "$runpath_var='$rpath\$$runpath_var'; export $runpath_var" fi test -n "$dep_rpath" && deplibs="$dep_rpath $deplibs" fi shlibpath=$finalize_shlibpath test relink = "$opt_mode" || shlibpath=$compile_shlibpath$shlibpath if test -n "$shlibpath"; then eval "$shlibpath_var='$shlibpath\$$shlibpath_var'; export $shlibpath_var" fi # Get the real and link names of the library. eval shared_ext=\"$shrext_cmds\" eval library_names=\"$library_names_spec\" set dummy $library_names shift realname=$1 shift if test -n "$soname_spec"; then eval soname=\"$soname_spec\" else soname=$realname fi if test -z "$dlname"; then dlname=$soname fi lib=$output_objdir/$realname linknames= for link do func_append linknames " $link" done # Use standard objects if they are pic test -z "$pic_flag" && libobjs=`$ECHO "$libobjs" | $SP2NL | $SED "$lo2o" | $NL2SP` test "X$libobjs" = "X " && libobjs= delfiles= if test -n "$export_symbols" && test -n "$include_expsyms"; then $opt_dry_run || cp "$export_symbols" "$output_objdir/$libname.uexp" export_symbols=$output_objdir/$libname.uexp func_append delfiles " $export_symbols" fi orig_export_symbols= case $host_os in cygwin* | mingw* | cegcc*) if test -n "$export_symbols" && test -z "$export_symbols_regex"; then # exporting using user supplied symfile func_dll_def_p "$export_symbols" || { # and it's NOT already a .def file. Must figure out # which of the given symbols are data symbols and tag # them as such. So, trigger use of export_symbols_cmds. # export_symbols gets reassigned inside the "prepare # the list of exported symbols" if statement, so the # include_expsyms logic still works. orig_export_symbols=$export_symbols export_symbols= always_export_symbols=yes } fi ;; esac # Prepare the list of exported symbols if test -z "$export_symbols"; then if test yes = "$always_export_symbols" || test -n "$export_symbols_regex"; then func_verbose "generating symbol list for '$libname.la'" export_symbols=$output_objdir/$libname.exp $opt_dry_run || $RM $export_symbols cmds=$export_symbols_cmds save_ifs=$IFS; IFS='~' for cmd1 in $cmds; do IFS=$save_ifs # Take the normal branch if the nm_file_list_spec branch # doesn't work or if tool conversion is not needed. case $nm_file_list_spec~$to_tool_file_cmd in *~func_convert_file_noop | *~func_convert_file_msys_to_w32 | ~*) try_normal_branch=yes eval cmd=\"$cmd1\" func_len " $cmd" len=$func_len_result ;; *) try_normal_branch=no ;; esac if test yes = "$try_normal_branch" \ && { test "$len" -lt "$max_cmd_len" \ || test "$max_cmd_len" -le -1; } then func_show_eval "$cmd" 'exit $?' skipped_export=false elif test -n "$nm_file_list_spec"; then func_basename "$output" output_la=$func_basename_result save_libobjs=$libobjs save_output=$output output=$output_objdir/$output_la.nm func_to_tool_file "$output" libobjs=$nm_file_list_spec$func_to_tool_file_result func_append delfiles " $output" func_verbose "creating $NM input file list: $output" for obj in $save_libobjs; do func_to_tool_file "$obj" $ECHO "$func_to_tool_file_result" done > "$output" eval cmd=\"$cmd1\" func_show_eval "$cmd" 'exit $?' output=$save_output libobjs=$save_libobjs skipped_export=false else # The command line is too long to execute in one step. func_verbose "using reloadable object file for export list..." skipped_export=: # Break out early, otherwise skipped_export may be # set to false by a later but shorter cmd. break fi done IFS=$save_ifs if test -n "$export_symbols_regex" && test : != "$skipped_export"; then func_show_eval '$EGREP -e "$export_symbols_regex" "$export_symbols" > "${export_symbols}T"' func_show_eval '$MV "${export_symbols}T" "$export_symbols"' fi fi fi if test -n "$export_symbols" && test -n "$include_expsyms"; then tmp_export_symbols=$export_symbols test -n "$orig_export_symbols" && tmp_export_symbols=$orig_export_symbols $opt_dry_run || eval '$ECHO "$include_expsyms" | $SP2NL >> "$tmp_export_symbols"' fi if test : != "$skipped_export" && test -n "$orig_export_symbols"; then # The given exports_symbols file has to be filtered, so filter it. func_verbose "filter symbol list for '$libname.la' to tag DATA exports" # FIXME: $output_objdir/$libname.filter potentially contains lots of # 's' commands, which not all seds can handle. GNU sed should be fine # though. Also, the filter scales superlinearly with the number of # global variables. join(1) would be nice here, but unfortunately # isn't a blessed tool. $opt_dry_run || $SED -e '/[ ,]DATA/!d;s,\(.*\)\([ \,].*\),s|^\1$|\1\2|,' < $export_symbols > $output_objdir/$libname.filter func_append delfiles " $export_symbols $output_objdir/$libname.filter" export_symbols=$output_objdir/$libname.def $opt_dry_run || $SED -f $output_objdir/$libname.filter < $orig_export_symbols > $export_symbols fi tmp_deplibs= for test_deplib in $deplibs; do case " $convenience " in *" $test_deplib "*) ;; *) func_append tmp_deplibs " $test_deplib" ;; esac done deplibs=$tmp_deplibs if test -n "$convenience"; then if test -n "$whole_archive_flag_spec" && test yes = "$compiler_needs_object" && test -z "$libobjs"; then # extract the archives, so we have objects to list. # TODO: could optimize this to just extract one archive. whole_archive_flag_spec= fi if test -n "$whole_archive_flag_spec"; then save_libobjs=$libobjs eval libobjs=\"\$libobjs $whole_archive_flag_spec\" test "X$libobjs" = "X " && libobjs= else gentop=$output_objdir/${outputname}x func_append generated " $gentop" func_extract_archives $gentop $convenience func_append libobjs " $func_extract_archives_result" test "X$libobjs" = "X " && libobjs= fi fi if test yes = "$thread_safe" && test -n "$thread_safe_flag_spec"; then eval flag=\"$thread_safe_flag_spec\" func_append linker_flags " $flag" fi # Make a backup of the uninstalled library when relinking if test relink = "$opt_mode"; then $opt_dry_run || eval '(cd $output_objdir && $RM ${realname}U && $MV $realname ${realname}U)' || exit $? fi # Do each of the archive commands. if test yes = "$module" && test -n "$module_cmds"; then if test -n "$export_symbols" && test -n "$module_expsym_cmds"; then eval test_cmds=\"$module_expsym_cmds\" cmds=$module_expsym_cmds else eval test_cmds=\"$module_cmds\" cmds=$module_cmds fi else if test -n "$export_symbols" && test -n "$archive_expsym_cmds"; then eval test_cmds=\"$archive_expsym_cmds\" cmds=$archive_expsym_cmds else eval test_cmds=\"$archive_cmds\" cmds=$archive_cmds fi fi if test : != "$skipped_export" && func_len " $test_cmds" && len=$func_len_result && test "$len" -lt "$max_cmd_len" || test "$max_cmd_len" -le -1; then : else # The command line is too long to link in one step, link piecewise # or, if using GNU ld and skipped_export is not :, use a linker # script. # Save the value of $output and $libobjs because we want to # use them later. If we have whole_archive_flag_spec, we # want to use save_libobjs as it was before # whole_archive_flag_spec was expanded, because we can't # assume the linker understands whole_archive_flag_spec. # This may have to be revisited, in case too many # convenience libraries get linked in and end up exceeding # the spec. if test -z "$convenience" || test -z "$whole_archive_flag_spec"; then save_libobjs=$libobjs fi save_output=$output func_basename "$output" output_la=$func_basename_result # Clear the reloadable object creation command queue and # initialize k to one. test_cmds= concat_cmds= objlist= last_robj= k=1 if test -n "$save_libobjs" && test : != "$skipped_export" && test yes = "$with_gnu_ld"; then output=$output_objdir/$output_la.lnkscript func_verbose "creating GNU ld script: $output" echo 'INPUT (' > $output for obj in $save_libobjs do func_to_tool_file "$obj" $ECHO "$func_to_tool_file_result" >> $output done echo ')' >> $output func_append delfiles " $output" func_to_tool_file "$output" output=$func_to_tool_file_result elif test -n "$save_libobjs" && test : != "$skipped_export" && test -n "$file_list_spec"; then output=$output_objdir/$output_la.lnk func_verbose "creating linker input file list: $output" : > $output set x $save_libobjs shift firstobj= if test yes = "$compiler_needs_object"; then firstobj="$1 " shift fi for obj do func_to_tool_file "$obj" $ECHO "$func_to_tool_file_result" >> $output done func_append delfiles " $output" func_to_tool_file "$output" output=$firstobj\"$file_list_spec$func_to_tool_file_result\" else if test -n "$save_libobjs"; then func_verbose "creating reloadable object files..." output=$output_objdir/$output_la-$k.$objext eval test_cmds=\"$reload_cmds\" func_len " $test_cmds" len0=$func_len_result len=$len0 # Loop over the list of objects to be linked. for obj in $save_libobjs do func_len " $obj" func_arith $len + $func_len_result len=$func_arith_result if test -z "$objlist" || test "$len" -lt "$max_cmd_len"; then func_append objlist " $obj" else # The command $test_cmds is almost too long, add a # command to the queue. if test 1 -eq "$k"; then # The first file doesn't have a previous command to add. reload_objs=$objlist eval concat_cmds=\"$reload_cmds\" else # All subsequent reloadable object files will link in # the last one created. reload_objs="$objlist $last_robj" eval concat_cmds=\"\$concat_cmds~$reload_cmds~\$RM $last_robj\" fi last_robj=$output_objdir/$output_la-$k.$objext func_arith $k + 1 k=$func_arith_result output=$output_objdir/$output_la-$k.$objext objlist=" $obj" func_len " $last_robj" func_arith $len0 + $func_len_result len=$func_arith_result fi done # Handle the remaining objects by creating one last # reloadable object file. All subsequent reloadable object # files will link in the last one created. test -z "$concat_cmds" || concat_cmds=$concat_cmds~ reload_objs="$objlist $last_robj" eval concat_cmds=\"\$concat_cmds$reload_cmds\" if test -n "$last_robj"; then eval concat_cmds=\"\$concat_cmds~\$RM $last_robj\" fi func_append delfiles " $output" else output= fi ${skipped_export-false} && { func_verbose "generating symbol list for '$libname.la'" export_symbols=$output_objdir/$libname.exp $opt_dry_run || $RM $export_symbols libobjs=$output # Append the command to create the export file. test -z "$concat_cmds" || concat_cmds=$concat_cmds~ eval concat_cmds=\"\$concat_cmds$export_symbols_cmds\" if test -n "$last_robj"; then eval concat_cmds=\"\$concat_cmds~\$RM $last_robj\" fi } test -n "$save_libobjs" && func_verbose "creating a temporary reloadable object file: $output" # Loop through the commands generated above and execute them. save_ifs=$IFS; IFS='~' for cmd in $concat_cmds; do IFS=$save_ifs $opt_quiet || { func_quote_for_expand "$cmd" eval "func_echo $func_quote_for_expand_result" } $opt_dry_run || eval "$cmd" || { lt_exit=$? # Restore the uninstalled library and exit if test relink = "$opt_mode"; then ( cd "$output_objdir" && \ $RM "${realname}T" && \ $MV "${realname}U" "$realname" ) fi exit $lt_exit } done IFS=$save_ifs if test -n "$export_symbols_regex" && ${skipped_export-false}; then func_show_eval '$EGREP -e "$export_symbols_regex" "$export_symbols" > "${export_symbols}T"' func_show_eval '$MV "${export_symbols}T" "$export_symbols"' fi fi ${skipped_export-false} && { if test -n "$export_symbols" && test -n "$include_expsyms"; then tmp_export_symbols=$export_symbols test -n "$orig_export_symbols" && tmp_export_symbols=$orig_export_symbols $opt_dry_run || eval '$ECHO "$include_expsyms" | $SP2NL >> "$tmp_export_symbols"' fi if test -n "$orig_export_symbols"; then # The given exports_symbols file has to be filtered, so filter it. func_verbose "filter symbol list for '$libname.la' to tag DATA exports" # FIXME: $output_objdir/$libname.filter potentially contains lots of # 's' commands, which not all seds can handle. GNU sed should be fine # though. Also, the filter scales superlinearly with the number of # global variables. join(1) would be nice here, but unfortunately # isn't a blessed tool. $opt_dry_run || $SED -e '/[ ,]DATA/!d;s,\(.*\)\([ \,].*\),s|^\1$|\1\2|,' < $export_symbols > $output_objdir/$libname.filter func_append delfiles " $export_symbols $output_objdir/$libname.filter" export_symbols=$output_objdir/$libname.def $opt_dry_run || $SED -f $output_objdir/$libname.filter < $orig_export_symbols > $export_symbols fi } libobjs=$output # Restore the value of output. output=$save_output if test -n "$convenience" && test -n "$whole_archive_flag_spec"; then eval libobjs=\"\$libobjs $whole_archive_flag_spec\" test "X$libobjs" = "X " && libobjs= fi # Expand the library linking commands again to reset the # value of $libobjs for piecewise linking. # Do each of the archive commands. if test yes = "$module" && test -n "$module_cmds"; then if test -n "$export_symbols" && test -n "$module_expsym_cmds"; then cmds=$module_expsym_cmds else cmds=$module_cmds fi else if test -n "$export_symbols" && test -n "$archive_expsym_cmds"; then cmds=$archive_expsym_cmds else cmds=$archive_cmds fi fi fi if test -n "$delfiles"; then # Append the command to remove temporary files to $cmds. eval cmds=\"\$cmds~\$RM $delfiles\" fi # Add any objects from preloaded convenience libraries if test -n "$dlprefiles"; then gentop=$output_objdir/${outputname}x func_append generated " $gentop" func_extract_archives $gentop $dlprefiles func_append libobjs " $func_extract_archives_result" test "X$libobjs" = "X " && libobjs= fi save_ifs=$IFS; IFS='~' for cmd in $cmds; do IFS=$sp$nl eval cmd=\"$cmd\" IFS=$save_ifs $opt_quiet || { func_quote_for_expand "$cmd" eval "func_echo $func_quote_for_expand_result" } $opt_dry_run || eval "$cmd" || { lt_exit=$? # Restore the uninstalled library and exit if test relink = "$opt_mode"; then ( cd "$output_objdir" && \ $RM "${realname}T" && \ $MV "${realname}U" "$realname" ) fi exit $lt_exit } done IFS=$save_ifs # Restore the uninstalled library and exit if test relink = "$opt_mode"; then $opt_dry_run || eval '(cd $output_objdir && $RM ${realname}T && $MV $realname ${realname}T && $MV ${realname}U $realname)' || exit $? if test -n "$convenience"; then if test -z "$whole_archive_flag_spec"; then func_show_eval '${RM}r "$gentop"' fi fi exit $EXIT_SUCCESS fi # Create links to the real library. for linkname in $linknames; do if test "$realname" != "$linkname"; then func_show_eval '(cd "$output_objdir" && $RM "$linkname" && $LN_S "$realname" "$linkname")' 'exit $?' fi done # If -module or -export-dynamic was specified, set the dlname. if test yes = "$module" || test yes = "$export_dynamic"; then # On all known operating systems, these are identical. dlname=$soname fi fi ;; obj) if test -n "$dlfiles$dlprefiles" || test no != "$dlself"; then func_warning "'-dlopen' is ignored for objects" fi case " $deplibs" in *\ -l* | *\ -L*) func_warning "'-l' and '-L' are ignored for objects" ;; esac test -n "$rpath" && \ func_warning "'-rpath' is ignored for objects" test -n "$xrpath" && \ func_warning "'-R' is ignored for objects" test -n "$vinfo" && \ func_warning "'-version-info' is ignored for objects" test -n "$release" && \ func_warning "'-release' is ignored for objects" case $output in *.lo) test -n "$objs$old_deplibs" && \ func_fatal_error "cannot build library object '$output' from non-libtool objects" libobj=$output func_lo2o "$libobj" obj=$func_lo2o_result ;; *) libobj= obj=$output ;; esac # Delete the old objects. $opt_dry_run || $RM $obj $libobj # Objects from convenience libraries. This assumes # single-version convenience libraries. Whenever we create # different ones for PIC/non-PIC, this we'll have to duplicate # the extraction. reload_conv_objs= gentop= # if reload_cmds runs $LD directly, get rid of -Wl from # whole_archive_flag_spec and hope we can get by with turning comma # into space. case $reload_cmds in *\$LD[\ \$]*) wl= ;; esac if test -n "$convenience"; then if test -n "$whole_archive_flag_spec"; then eval tmp_whole_archive_flags=\"$whole_archive_flag_spec\" test -n "$wl" || tmp_whole_archive_flags=`$ECHO "$tmp_whole_archive_flags" | $SED 's|,| |g'` reload_conv_objs=$reload_objs\ $tmp_whole_archive_flags else gentop=$output_objdir/${obj}x func_append generated " $gentop" func_extract_archives $gentop $convenience reload_conv_objs="$reload_objs $func_extract_archives_result" fi fi # If we're not building shared, we need to use non_pic_objs test yes = "$build_libtool_libs" || libobjs=$non_pic_objects # Create the old-style object. reload_objs=$objs$old_deplibs' '`$ECHO "$libobjs" | $SP2NL | $SED "/\.$libext$/d; /\.lib$/d; $lo2o" | $NL2SP`' '$reload_conv_objs output=$obj func_execute_cmds "$reload_cmds" 'exit $?' # Exit if we aren't doing a library object file. if test -z "$libobj"; then if test -n "$gentop"; then func_show_eval '${RM}r "$gentop"' fi exit $EXIT_SUCCESS fi test yes = "$build_libtool_libs" || { if test -n "$gentop"; then func_show_eval '${RM}r "$gentop"' fi # Create an invalid libtool object if no PIC, so that we don't # accidentally link it into a program. # $show "echo timestamp > $libobj" # $opt_dry_run || eval "echo timestamp > $libobj" || exit $? exit $EXIT_SUCCESS } if test -n "$pic_flag" || test default != "$pic_mode"; then # Only do commands if we really have different PIC objects. reload_objs="$libobjs $reload_conv_objs" output=$libobj func_execute_cmds "$reload_cmds" 'exit $?' fi if test -n "$gentop"; then func_show_eval '${RM}r "$gentop"' fi exit $EXIT_SUCCESS ;; prog) case $host in *cygwin*) func_stripname '' '.exe' "$output" output=$func_stripname_result.exe;; esac test -n "$vinfo" && \ func_warning "'-version-info' is ignored for programs" test -n "$release" && \ func_warning "'-release' is ignored for programs" $preload \ && test unknown,unknown,unknown = "$dlopen_support,$dlopen_self,$dlopen_self_static" \ && func_warning "'LT_INIT([dlopen])' not used. Assuming no dlopen support." case $host in *-*-rhapsody* | *-*-darwin1.[012]) # On Rhapsody replace the C library is the System framework compile_deplibs=`$ECHO " $compile_deplibs" | $SED 's/ -lc / System.ltframework /'` finalize_deplibs=`$ECHO " $finalize_deplibs" | $SED 's/ -lc / System.ltframework /'` ;; esac case $host in *-*-darwin*) # Don't allow lazy linking, it breaks C++ global constructors # But is supposedly fixed on 10.4 or later (yay!). if test CXX = "$tagname"; then case ${MACOSX_DEPLOYMENT_TARGET-10.0} in 10.[0123]) func_append compile_command " $wl-bind_at_load" func_append finalize_command " $wl-bind_at_load" ;; esac fi # Time to change all our "foo.ltframework" stuff back to "-framework foo" compile_deplibs=`$ECHO " $compile_deplibs" | $SED 's% \([^ $]*\).ltframework% -framework \1%g'` finalize_deplibs=`$ECHO " $finalize_deplibs" | $SED 's% \([^ $]*\).ltframework% -framework \1%g'` ;; esac # move library search paths that coincide with paths to not yet # installed libraries to the beginning of the library search list new_libs= for path in $notinst_path; do case " $new_libs " in *" -L$path/$objdir "*) ;; *) case " $compile_deplibs " in *" -L$path/$objdir "*) func_append new_libs " -L$path/$objdir" ;; esac ;; esac done for deplib in $compile_deplibs; do case $deplib in -L*) case " $new_libs " in *" $deplib "*) ;; *) func_append new_libs " $deplib" ;; esac ;; *) func_append new_libs " $deplib" ;; esac done compile_deplibs=$new_libs func_append compile_command " $compile_deplibs" func_append finalize_command " $finalize_deplibs" if test -n "$rpath$xrpath"; then # If the user specified any rpath flags, then add them. for libdir in $rpath $xrpath; do # This is the magic to use -rpath. case "$finalize_rpath " in *" $libdir "*) ;; *) func_append finalize_rpath " $libdir" ;; esac done fi # Now hardcode the library paths rpath= hardcode_libdirs= for libdir in $compile_rpath $finalize_rpath; do if test -n "$hardcode_libdir_flag_spec"; then if test -n "$hardcode_libdir_separator"; then if test -z "$hardcode_libdirs"; then hardcode_libdirs=$libdir else # Just accumulate the unique libdirs. case $hardcode_libdir_separator$hardcode_libdirs$hardcode_libdir_separator in *"$hardcode_libdir_separator$libdir$hardcode_libdir_separator"*) ;; *) func_append hardcode_libdirs "$hardcode_libdir_separator$libdir" ;; esac fi else eval flag=\"$hardcode_libdir_flag_spec\" func_append rpath " $flag" fi elif test -n "$runpath_var"; then case "$perm_rpath " in *" $libdir "*) ;; *) func_append perm_rpath " $libdir" ;; esac fi case $host in *-*-cygwin* | *-*-mingw* | *-*-pw32* | *-*-os2* | *-cegcc*) testbindir=`$ECHO "$libdir" | $SED -e 's*/lib$*/bin*'` case :$dllsearchpath: in *":$libdir:"*) ;; ::) dllsearchpath=$libdir;; *) func_append dllsearchpath ":$libdir";; esac case :$dllsearchpath: in *":$testbindir:"*) ;; ::) dllsearchpath=$testbindir;; *) func_append dllsearchpath ":$testbindir";; esac ;; esac done # Substitute the hardcoded libdirs into the rpath. if test -n "$hardcode_libdir_separator" && test -n "$hardcode_libdirs"; then libdir=$hardcode_libdirs eval rpath=\" $hardcode_libdir_flag_spec\" fi compile_rpath=$rpath rpath= hardcode_libdirs= for libdir in $finalize_rpath; do if test -n "$hardcode_libdir_flag_spec"; then if test -n "$hardcode_libdir_separator"; then if test -z "$hardcode_libdirs"; then hardcode_libdirs=$libdir else # Just accumulate the unique libdirs. case $hardcode_libdir_separator$hardcode_libdirs$hardcode_libdir_separator in *"$hardcode_libdir_separator$libdir$hardcode_libdir_separator"*) ;; *) func_append hardcode_libdirs "$hardcode_libdir_separator$libdir" ;; esac fi else eval flag=\"$hardcode_libdir_flag_spec\" func_append rpath " $flag" fi elif test -n "$runpath_var"; then case "$finalize_perm_rpath " in *" $libdir "*) ;; *) func_append finalize_perm_rpath " $libdir" ;; esac fi done # Substitute the hardcoded libdirs into the rpath. if test -n "$hardcode_libdir_separator" && test -n "$hardcode_libdirs"; then libdir=$hardcode_libdirs eval rpath=\" $hardcode_libdir_flag_spec\" fi finalize_rpath=$rpath if test -n "$libobjs" && test yes = "$build_old_libs"; then # Transform all the library objects into standard objects. compile_command=`$ECHO "$compile_command" | $SP2NL | $SED "$lo2o" | $NL2SP` finalize_command=`$ECHO "$finalize_command" | $SP2NL | $SED "$lo2o" | $NL2SP` fi func_generate_dlsyms "$outputname" "@PROGRAM@" false # template prelinking step if test -n "$prelink_cmds"; then func_execute_cmds "$prelink_cmds" 'exit $?' fi wrappers_required=: case $host in *cegcc* | *mingw32ce*) # Disable wrappers for cegcc and mingw32ce hosts, we are cross compiling anyway. wrappers_required=false ;; *cygwin* | *mingw* ) test yes = "$build_libtool_libs" || wrappers_required=false ;; *) if test no = "$need_relink" || test yes != "$build_libtool_libs"; then wrappers_required=false fi ;; esac $wrappers_required || { # Replace the output file specification. compile_command=`$ECHO "$compile_command" | $SED 's%@OUTPUT@%'"$output"'%g'` link_command=$compile_command$compile_rpath # We have no uninstalled library dependencies, so finalize right now. exit_status=0 func_show_eval "$link_command" 'exit_status=$?' if test -n "$postlink_cmds"; then func_to_tool_file "$output" postlink_cmds=`func_echo_all "$postlink_cmds" | $SED -e 's%@OUTPUT@%'"$output"'%g' -e 's%@TOOL_OUTPUT@%'"$func_to_tool_file_result"'%g'` func_execute_cmds "$postlink_cmds" 'exit $?' fi # Delete the generated files. if test -f "$output_objdir/${outputname}S.$objext"; then func_show_eval '$RM "$output_objdir/${outputname}S.$objext"' fi exit $exit_status } if test -n "$compile_shlibpath$finalize_shlibpath"; then compile_command="$shlibpath_var=\"$compile_shlibpath$finalize_shlibpath\$$shlibpath_var\" $compile_command" fi if test -n "$finalize_shlibpath"; then finalize_command="$shlibpath_var=\"$finalize_shlibpath\$$shlibpath_var\" $finalize_command" fi compile_var= finalize_var= if test -n "$runpath_var"; then if test -n "$perm_rpath"; then # We should set the runpath_var. rpath= for dir in $perm_rpath; do func_append rpath "$dir:" done compile_var="$runpath_var=\"$rpath\$$runpath_var\" " fi if test -n "$finalize_perm_rpath"; then # We should set the runpath_var. rpath= for dir in $finalize_perm_rpath; do func_append rpath "$dir:" done finalize_var="$runpath_var=\"$rpath\$$runpath_var\" " fi fi if test yes = "$no_install"; then # We don't need to create a wrapper script. link_command=$compile_var$compile_command$compile_rpath # Replace the output file specification. link_command=`$ECHO "$link_command" | $SED 's%@OUTPUT@%'"$output"'%g'` # Delete the old output file. $opt_dry_run || $RM $output # Link the executable and exit func_show_eval "$link_command" 'exit $?' if test -n "$postlink_cmds"; then func_to_tool_file "$output" postlink_cmds=`func_echo_all "$postlink_cmds" | $SED -e 's%@OUTPUT@%'"$output"'%g' -e 's%@TOOL_OUTPUT@%'"$func_to_tool_file_result"'%g'` func_execute_cmds "$postlink_cmds" 'exit $?' fi exit $EXIT_SUCCESS fi case $hardcode_action,$fast_install in relink,*) # Fast installation is not supported link_command=$compile_var$compile_command$compile_rpath relink_command=$finalize_var$finalize_command$finalize_rpath func_warning "this platform does not like uninstalled shared libraries" func_warning "'$output' will be relinked during installation" ;; *,yes) link_command=$finalize_var$compile_command$finalize_rpath relink_command=`$ECHO "$compile_var$compile_command$compile_rpath" | $SED 's%@OUTPUT@%\$progdir/\$file%g'` ;; *,no) link_command=$compile_var$compile_command$compile_rpath relink_command=$finalize_var$finalize_command$finalize_rpath ;; *,needless) link_command=$finalize_var$compile_command$finalize_rpath relink_command= ;; esac # Replace the output file specification. link_command=`$ECHO "$link_command" | $SED 's%@OUTPUT@%'"$output_objdir/$outputname"'%g'` # Delete the old output files. $opt_dry_run || $RM $output $output_objdir/$outputname $output_objdir/lt-$outputname func_show_eval "$link_command" 'exit $?' if test -n "$postlink_cmds"; then func_to_tool_file "$output_objdir/$outputname" postlink_cmds=`func_echo_all "$postlink_cmds" | $SED -e 's%@OUTPUT@%'"$output_objdir/$outputname"'%g' -e 's%@TOOL_OUTPUT@%'"$func_to_tool_file_result"'%g'` func_execute_cmds "$postlink_cmds" 'exit $?' fi # Now create the wrapper script. func_verbose "creating $output" # Quote the relink command for shipping. if test -n "$relink_command"; then # Preserve any variables that may affect compiler behavior for var in $variables_saved_for_relink; do if eval test -z \"\${$var+set}\"; then relink_command="{ test -z \"\${$var+set}\" || $lt_unset $var || { $var=; export $var; }; }; $relink_command" elif eval var_value=\$$var; test -z "$var_value"; then relink_command="$var=; export $var; $relink_command" else func_quote_for_eval "$var_value" relink_command="$var=$func_quote_for_eval_result; export $var; $relink_command" fi done relink_command="(cd `pwd`; $relink_command)" relink_command=`$ECHO "$relink_command" | $SED "$sed_quote_subst"` fi # Only actually do things if not in dry run mode. $opt_dry_run || { # win32 will think the script is a binary if it has # a .exe suffix, so we strip it off here. case $output in *.exe) func_stripname '' '.exe' "$output" output=$func_stripname_result ;; esac # test for cygwin because mv fails w/o .exe extensions case $host in *cygwin*) exeext=.exe func_stripname '' '.exe' "$outputname" outputname=$func_stripname_result ;; *) exeext= ;; esac case $host in *cygwin* | *mingw* ) func_dirname_and_basename "$output" "" "." output_name=$func_basename_result output_path=$func_dirname_result cwrappersource=$output_path/$objdir/lt-$output_name.c cwrapper=$output_path/$output_name.exe $RM $cwrappersource $cwrapper trap "$RM $cwrappersource $cwrapper; exit $EXIT_FAILURE" 1 2 15 func_emit_cwrapperexe_src > $cwrappersource # The wrapper executable is built using the $host compiler, # because it contains $host paths and files. If cross- # compiling, it, like the target executable, must be # executed on the $host or under an emulation environment. $opt_dry_run || { $LTCC $LTCFLAGS -o $cwrapper $cwrappersource $STRIP $cwrapper } # Now, create the wrapper script for func_source use: func_ltwrapper_scriptname $cwrapper $RM $func_ltwrapper_scriptname_result trap "$RM $func_ltwrapper_scriptname_result; exit $EXIT_FAILURE" 1 2 15 $opt_dry_run || { # note: this script will not be executed, so do not chmod. if test "x$build" = "x$host"; then $cwrapper --lt-dump-script > $func_ltwrapper_scriptname_result else func_emit_wrapper no > $func_ltwrapper_scriptname_result fi } ;; * ) $RM $output trap "$RM $output; exit $EXIT_FAILURE" 1 2 15 func_emit_wrapper no > $output chmod +x $output ;; esac } exit $EXIT_SUCCESS ;; esac # See if we need to build an old-fashioned archive. for oldlib in $oldlibs; do case $build_libtool_libs in convenience) oldobjs="$libobjs_save $symfileobj" addlibs=$convenience build_libtool_libs=no ;; module) oldobjs=$libobjs_save addlibs=$old_convenience build_libtool_libs=no ;; *) oldobjs="$old_deplibs $non_pic_objects" $preload && test -f "$symfileobj" \ && func_append oldobjs " $symfileobj" addlibs=$old_convenience ;; esac if test -n "$addlibs"; then gentop=$output_objdir/${outputname}x func_append generated " $gentop" func_extract_archives $gentop $addlibs func_append oldobjs " $func_extract_archives_result" fi # Do each command in the archive commands. if test -n "$old_archive_from_new_cmds" && test yes = "$build_libtool_libs"; then cmds=$old_archive_from_new_cmds else # Add any objects from preloaded convenience libraries if test -n "$dlprefiles"; then gentop=$output_objdir/${outputname}x func_append generated " $gentop" func_extract_archives $gentop $dlprefiles func_append oldobjs " $func_extract_archives_result" fi # POSIX demands no paths to be encoded in archives. We have # to avoid creating archives with duplicate basenames if we # might have to extract them afterwards, e.g., when creating a # static archive out of a convenience library, or when linking # the entirety of a libtool archive into another (currently # not supported by libtool). if (for obj in $oldobjs do func_basename "$obj" $ECHO "$func_basename_result" done | sort | sort -uc >/dev/null 2>&1); then : else echo "copying selected object files to avoid basename conflicts..." gentop=$output_objdir/${outputname}x func_append generated " $gentop" func_mkdir_p "$gentop" save_oldobjs=$oldobjs oldobjs= counter=1 for obj in $save_oldobjs do func_basename "$obj" objbase=$func_basename_result case " $oldobjs " in " ") oldobjs=$obj ;; *[\ /]"$objbase "*) while :; do # Make sure we don't pick an alternate name that also # overlaps. newobj=lt$counter-$objbase func_arith $counter + 1 counter=$func_arith_result case " $oldobjs " in *[\ /]"$newobj "*) ;; *) if test ! -f "$gentop/$newobj"; then break; fi ;; esac done func_show_eval "ln $obj $gentop/$newobj || cp $obj $gentop/$newobj" func_append oldobjs " $gentop/$newobj" ;; *) func_append oldobjs " $obj" ;; esac done fi func_to_tool_file "$oldlib" func_convert_file_msys_to_w32 tool_oldlib=$func_to_tool_file_result eval cmds=\"$old_archive_cmds\" func_len " $cmds" len=$func_len_result if test "$len" -lt "$max_cmd_len" || test "$max_cmd_len" -le -1; then cmds=$old_archive_cmds elif test -n "$archiver_list_spec"; then func_verbose "using command file archive linking..." for obj in $oldobjs do func_to_tool_file "$obj" $ECHO "$func_to_tool_file_result" done > $output_objdir/$libname.libcmd func_to_tool_file "$output_objdir/$libname.libcmd" oldobjs=" $archiver_list_spec$func_to_tool_file_result" cmds=$old_archive_cmds else # the command line is too long to link in one step, link in parts func_verbose "using piecewise archive linking..." save_RANLIB=$RANLIB RANLIB=: objlist= concat_cmds= save_oldobjs=$oldobjs oldobjs= # Is there a better way of finding the last object in the list? for obj in $save_oldobjs do last_oldobj=$obj done eval test_cmds=\"$old_archive_cmds\" func_len " $test_cmds" len0=$func_len_result len=$len0 for obj in $save_oldobjs do func_len " $obj" func_arith $len + $func_len_result len=$func_arith_result func_append objlist " $obj" if test "$len" -lt "$max_cmd_len"; then : else # the above command should be used before it gets too long oldobjs=$objlist if test "$obj" = "$last_oldobj"; then RANLIB=$save_RANLIB fi test -z "$concat_cmds" || concat_cmds=$concat_cmds~ eval concat_cmds=\"\$concat_cmds$old_archive_cmds\" objlist= len=$len0 fi done RANLIB=$save_RANLIB oldobjs=$objlist if test -z "$oldobjs"; then eval cmds=\"\$concat_cmds\" else eval cmds=\"\$concat_cmds~\$old_archive_cmds\" fi fi fi func_execute_cmds "$cmds" 'exit $?' done test -n "$generated" && \ func_show_eval "${RM}r$generated" # Now create the libtool archive. case $output in *.la) old_library= test yes = "$build_old_libs" && old_library=$libname.$libext func_verbose "creating $output" # Preserve any variables that may affect compiler behavior for var in $variables_saved_for_relink; do if eval test -z \"\${$var+set}\"; then relink_command="{ test -z \"\${$var+set}\" || $lt_unset $var || { $var=; export $var; }; }; $relink_command" elif eval var_value=\$$var; test -z "$var_value"; then relink_command="$var=; export $var; $relink_command" else func_quote_for_eval "$var_value" relink_command="$var=$func_quote_for_eval_result; export $var; $relink_command" fi done # Quote the link command for shipping. relink_command="(cd `pwd`; $SHELL \"$progpath\" $preserve_args --mode=relink $libtool_args @inst_prefix_dir@)" relink_command=`$ECHO "$relink_command" | $SED "$sed_quote_subst"` if test yes = "$hardcode_automatic"; then relink_command= fi # Only create the output if not a dry run. $opt_dry_run || { for installed in no yes; do if test yes = "$installed"; then if test -z "$install_libdir"; then break fi output=$output_objdir/${outputname}i # Replace all uninstalled libtool libraries with the installed ones newdependency_libs= for deplib in $dependency_libs; do case $deplib in *.la) func_basename "$deplib" name=$func_basename_result func_resolve_sysroot "$deplib" eval libdir=`$SED -n -e 's/^libdir=\(.*\)$/\1/p' $func_resolve_sysroot_result` test -z "$libdir" && \ func_fatal_error "'$deplib' is not a valid libtool archive" func_append newdependency_libs " ${lt_sysroot:+=}$libdir/$name" ;; -L*) func_stripname -L '' "$deplib" func_replace_sysroot "$func_stripname_result" func_append newdependency_libs " -L$func_replace_sysroot_result" ;; -R*) func_stripname -R '' "$deplib" func_replace_sysroot "$func_stripname_result" func_append newdependency_libs " -R$func_replace_sysroot_result" ;; *) func_append newdependency_libs " $deplib" ;; esac done dependency_libs=$newdependency_libs newdlfiles= for lib in $dlfiles; do case $lib in *.la) func_basename "$lib" name=$func_basename_result eval libdir=`$SED -n -e 's/^libdir=\(.*\)$/\1/p' $lib` test -z "$libdir" && \ func_fatal_error "'$lib' is not a valid libtool archive" func_append newdlfiles " ${lt_sysroot:+=}$libdir/$name" ;; *) func_append newdlfiles " $lib" ;; esac done dlfiles=$newdlfiles newdlprefiles= for lib in $dlprefiles; do case $lib in *.la) # Only pass preopened files to the pseudo-archive (for # eventual linking with the app. that links it) if we # didn't already link the preopened objects directly into # the library: func_basename "$lib" name=$func_basename_result eval libdir=`$SED -n -e 's/^libdir=\(.*\)$/\1/p' $lib` test -z "$libdir" && \ func_fatal_error "'$lib' is not a valid libtool archive" func_append newdlprefiles " ${lt_sysroot:+=}$libdir/$name" ;; esac done dlprefiles=$newdlprefiles else newdlfiles= for lib in $dlfiles; do case $lib in [\\/]* | [A-Za-z]:[\\/]*) abs=$lib ;; *) abs=`pwd`"/$lib" ;; esac func_append newdlfiles " $abs" done dlfiles=$newdlfiles newdlprefiles= for lib in $dlprefiles; do case $lib in [\\/]* | [A-Za-z]:[\\/]*) abs=$lib ;; *) abs=`pwd`"/$lib" ;; esac func_append newdlprefiles " $abs" done dlprefiles=$newdlprefiles fi $RM $output # place dlname in correct position for cygwin # In fact, it would be nice if we could use this code for all target # systems that can't hard-code library paths into their executables # and that have no shared library path variable independent of PATH, # but it turns out we can't easily determine that from inspecting # libtool variables, so we have to hard-code the OSs to which it # applies here; at the moment, that means platforms that use the PE # object format with DLL files. See the long comment at the top of # tests/bindir.at for full details. tdlname=$dlname case $host,$output,$installed,$module,$dlname in *cygwin*,*lai,yes,no,*.dll | *mingw*,*lai,yes,no,*.dll | *cegcc*,*lai,yes,no,*.dll) # If a -bindir argument was supplied, place the dll there. if test -n "$bindir"; then func_relative_path "$install_libdir" "$bindir" tdlname=$func_relative_path_result/$dlname else # Otherwise fall back on heuristic. tdlname=../bin/$dlname fi ;; esac $ECHO > $output "\ # $outputname - a libtool library file # Generated by $PROGRAM (GNU $PACKAGE) $VERSION # # Please DO NOT delete this file! # It is necessary for linking the library. # The name that we can dlopen(3). dlname='$tdlname' # Names of this library. library_names='$library_names' # The name of the static archive. old_library='$old_library' # Linker flags that cannot go in dependency_libs. inherited_linker_flags='$new_inherited_linker_flags' # Libraries that this one depends upon. dependency_libs='$dependency_libs' # Names of additional weak libraries provided by this library weak_library_names='$weak_libs' # Version information for $libname. current=$current age=$age revision=$revision # Is this an already installed library? installed=$installed # Should we warn about portability when linking against -modules? shouldnotlink=$module # Files to dlopen/dlpreopen dlopen='$dlfiles' dlpreopen='$dlprefiles' # Directory that this library needs to be installed in: libdir='$install_libdir'" if test no,yes = "$installed,$need_relink"; then $ECHO >> $output "\ relink_command=\"$relink_command\"" fi done } # Do a symbolic link so that the libtool archive can be found in # LD_LIBRARY_PATH before the program is installed. func_show_eval '( cd "$output_objdir" && $RM "$outputname" && $LN_S "../$outputname" "$outputname" )' 'exit $?' ;; esac exit $EXIT_SUCCESS } if test link = "$opt_mode" || test relink = "$opt_mode"; then func_mode_link ${1+"$@"} fi # func_mode_uninstall arg... func_mode_uninstall () { $debug_cmd RM=$nonopt files= rmforce=false exit_status=0 # This variable tells wrapper scripts just to set variables rather # than running their programs. libtool_install_magic=$magic for arg do case $arg in -f) func_append RM " $arg"; rmforce=: ;; -*) func_append RM " $arg" ;; *) func_append files " $arg" ;; esac done test -z "$RM" && \ func_fatal_help "you must specify an RM program" rmdirs= for file in $files; do func_dirname "$file" "" "." dir=$func_dirname_result if test . = "$dir"; then odir=$objdir else odir=$dir/$objdir fi func_basename "$file" name=$func_basename_result test uninstall = "$opt_mode" && odir=$dir # Remember odir for removal later, being careful to avoid duplicates if test clean = "$opt_mode"; then case " $rmdirs " in *" $odir "*) ;; *) func_append rmdirs " $odir" ;; esac fi # Don't error if the file doesn't exist and rm -f was used. if { test -L "$file"; } >/dev/null 2>&1 || { test -h "$file"; } >/dev/null 2>&1 || test -f "$file"; then : elif test -d "$file"; then exit_status=1 continue elif $rmforce; then continue fi rmfiles=$file case $name in *.la) # Possibly a libtool archive, so verify it. if func_lalib_p "$file"; then func_source $dir/$name # Delete the libtool libraries and symlinks. for n in $library_names; do func_append rmfiles " $odir/$n" done test -n "$old_library" && func_append rmfiles " $odir/$old_library" case $opt_mode in clean) case " $library_names " in *" $dlname "*) ;; *) test -n "$dlname" && func_append rmfiles " $odir/$dlname" ;; esac test -n "$libdir" && func_append rmfiles " $odir/$name $odir/${name}i" ;; uninstall) if test -n "$library_names"; then # Do each command in the postuninstall commands. func_execute_cmds "$postuninstall_cmds" '$rmforce || exit_status=1' fi if test -n "$old_library"; then # Do each command in the old_postuninstall commands. func_execute_cmds "$old_postuninstall_cmds" '$rmforce || exit_status=1' fi # FIXME: should reinstall the best remaining shared library. ;; esac fi ;; *.lo) # Possibly a libtool object, so verify it. if func_lalib_p "$file"; then # Read the .lo file func_source $dir/$name # Add PIC object to the list of files to remove. if test -n "$pic_object" && test none != "$pic_object"; then func_append rmfiles " $dir/$pic_object" fi # Add non-PIC object to the list of files to remove. if test -n "$non_pic_object" && test none != "$non_pic_object"; then func_append rmfiles " $dir/$non_pic_object" fi fi ;; *) if test clean = "$opt_mode"; then noexename=$name case $file in *.exe) func_stripname '' '.exe' "$file" file=$func_stripname_result func_stripname '' '.exe' "$name" noexename=$func_stripname_result # $file with .exe has already been added to rmfiles, # add $file without .exe func_append rmfiles " $file" ;; esac # Do a test to see if this is a libtool program. if func_ltwrapper_p "$file"; then if func_ltwrapper_executable_p "$file"; then func_ltwrapper_scriptname "$file" relink_command= func_source $func_ltwrapper_scriptname_result func_append rmfiles " $func_ltwrapper_scriptname_result" else relink_command= func_source $dir/$noexename fi # note $name still contains .exe if it was in $file originally # as does the version of $file that was added into $rmfiles func_append rmfiles " $odir/$name $odir/${name}S.$objext" if test yes = "$fast_install" && test -n "$relink_command"; then func_append rmfiles " $odir/lt-$name" fi if test "X$noexename" != "X$name"; then func_append rmfiles " $odir/lt-$noexename.c" fi fi fi ;; esac func_show_eval "$RM $rmfiles" 'exit_status=1' done # Try to remove the $objdir's in the directories where we deleted files for dir in $rmdirs; do if test -d "$dir"; then func_show_eval "rmdir $dir >/dev/null 2>&1" fi done exit $exit_status } if test uninstall = "$opt_mode" || test clean = "$opt_mode"; then func_mode_uninstall ${1+"$@"} fi test -z "$opt_mode" && { help=$generic_help func_fatal_help "you must specify a MODE" } test -z "$exec_cmd" && \ func_fatal_help "invalid operation mode '$opt_mode'" if test -n "$exec_cmd"; then eval exec "$exec_cmd" exit $EXIT_FAILURE fi exit $exit_status # The TAGs below are defined such that we never get into a situation # where we disable both kinds of libraries. Given conflicting # choices, we go for a static library, that is the most portable, # since we can't tell whether shared libraries were disabled because # the user asked for that or because the platform doesn't support # them. This is particularly important on AIX, because we don't # support having both static and shared libraries enabled at the same # time on that platform, so we default to a shared-only configuration. # If a disable-shared tag is given, we'll fallback to a static-only # configuration. But we'll never go from static-only to shared-only. # ### BEGIN LIBTOOL TAG CONFIG: disable-shared build_libtool_libs=no build_old_libs=yes # ### END LIBTOOL TAG CONFIG: disable-shared # ### BEGIN LIBTOOL TAG CONFIG: disable-static build_old_libs=`case $build_libtool_libs in yes) echo no;; *) echo yes;; esac` # ### END LIBTOOL TAG CONFIG: disable-static # Local Variables: # mode:shell-script # sh-indentation:2 # End: ytnef-2.0/lib/mapi.h000066400000000000000000000053051406511276600143600ustar00rootroot00000000000000/* * Yerase's TNEF Stream Reader Library * Copyright (C) 2003 Randall E. Hand * * 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., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA * * You can contact me at randall.hand@gmail.com for questions or assistance */ #define MV_FLAG 0x1000 /* Multi-value flag */ #define PT_UNSPECIFIED ((ULONG) 0) /* (Reserved for interface use) type doesn't matter to caller */ #define PT_NULL ((ULONG) 1) /* NULL property value */ #define PT_I2 ((ULONG) 2) /* Signed 16-bit value */ #define PT_LONG ((ULONG) 3) /* Signed 32-bit value */ #define PT_R4 ((ULONG) 4) /* 4-byte floating point */ #define PT_DOUBLE ((ULONG) 5) /* Floating point double */ #define PT_CURRENCY ((ULONG) 6) /* Signed 64-bit int (decimal w/ 4 digits right of decimal pt) */ #define PT_APPTIME ((ULONG) 7) /* Application time */ #define PT_ERROR ((ULONG) 10) /* 32-bit error value */ #define PT_BOOLEAN ((ULONG) 11) /* 16-bit boolean (non-zero true) */ #define PT_OBJECT ((ULONG) 13) /* Embedded object in a property */ #define PT_I8 ((ULONG) 20) /* 8-byte signed integer */ #define PT_STRING8 ((ULONG) 30) /* Null terminated 8-bit character string */ #define PT_UNICODE ((ULONG) 31) /* Null terminated Unicode string */ #define PT_SYSTIME ((ULONG) 64) /* FILETIME 64-bit int w/ number of 100ns periods since Jan 1,1601 */ #define PT_CLSID ((ULONG) 72) /* OLE GUID */ #define PT_BINARY ((ULONG) 258) /* Uninterpreted (counted byte array) */ #define PROP_TYPE_MASK ((ULONG)0x0000FFFF) /* Mask for Property type */ #define PROP_TYPE(ulPropTag) (((ULONG)(ulPropTag))&PROP_TYPE_MASK) #define PROP_ID(ulPropTag) (((ULONG)(ulPropTag))>>16) #define PROP_TAG(ulPropType,ulPropID) ((((ULONG)(ulPropID))<<16)|((ULONG)(ulPropType))) #define PROP_ID_NULL 0 #define PROP_ID_INVALID 0xFFFF #define PR_NULL PROP_TAG( PT_NULL, PROP_ID_NULL) #define MAPI_UNDEFINED ((variableLength*)-1) ytnef-2.0/lib/mapidefs.h000066400000000000000000000643431406511276600152310ustar00rootroot00000000000000/* * Yerase's TNEF Stream Reader Library * Copyright (C) 2003 Randall E. Hand * * 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., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA * * You can contact me at randall.hand@gmail.com for questions or assistance */ #ifndef MAPIDEFS_H #define MAPIDEFS_H #define PR_ACKNOWLEDGEMENT_MODE 0x0001 #define PR_ALTERNATE_RECIPIENT_ALLOWED 0x0002 #define PR_AUTHORIZING_USERS 0x0003 #define PR_AUTO_FORWARD_COMMENT 0x0004 #define PR_AUTO_FORWARDED 0x0005 #define PR_CONTENT_CONFIDENTIALITY_ALGORITHM_ID 0x0006 #define PR_CONTENT_CORRELATOR 0x0007 #define PR_CONTENT_IDENTIFIER 0x0008 #define PR_CONTENT_LENGTH 0x0009 #define PR_CONTENT_RETURN_REQUESTED 0x000A #define PR_CONVERSATION_KEY 0x000B #define PR_CONVERSION_EITS 0x000C #define PR_CONVERSION_WITH_LOSS_PROHIBITED 0x000D #define PR_CONVERTED_EITS 0x000E #define PR_DEFERRED_DELIVERY_TIME 0x000F #define PR_DELIVER_TIME 0x0010 #define PR_DISCARD_REASON 0x0011 #define PR_DISCLOSURE_OF_RECIPIENTS 0x0012 #define PR_DL_EXPANSION_HISTORY 0x0013 #define PR_DL_EXPANSION_PROHIBITED 0x0014 #define PR_EXPIRY_TIME 0x0015 #define PR_IMPLICIT_CONVERSION_PROHIBITED 0x0016 #define PR_IMPORTANCE 0x0017 #define PR_IPM_ID 0x0018 #define PR_LATEST_DELIVERY_TIME 0x0019 #define PR_MESSAGE_CLASS 0x001A #define PR_MESSAGE_DELIVERY_ID 0x001B #define PR_MESSAGE_SECURITY_LABEL 0x001E #define PR_OBSOLETED_IPMS 0x001F #define PR_ORIGINALLY_INTENDED_RECIPIENT_NAME 0x0020 #define PR_ORIGINAL_EITS 0x0021 #define PR_ORIGINATOR_CERTIFICATE 0x0022 #define PR_ORIGINATOR_DELIVERY_REPORT_REQUESTED 0x0023 #define PR_ORIGINATOR_RETURN_ADDRESS 0x0024 #define PR_PARENT_KEY 0x0025 #define PR_PRIORITY 0x0026 #define PR_ORIGIN_CHECK 0x0027 #define PR_PROOF_OF_SUBMISSION_REQUESTED 0x0028 #define PR_READ_RECEIPT_REQUESTED 0x0029 #define PR_RECEIPT_TIME 0x002A #define PR_RECIPIENT_REASSIGNMENT_PROHIBITED 0x002B #define PR_REDIRECTION_HISTORY 0x002C #define PR_RELATED_IPMS 0x002D #define PR_ORIGINAL_SENSITIVITY 0x002E #define PR_LANGUAGES 0x002F #define PR_REPLY_TIME 0x0030 #define PR_REPORT_TAG 0x0031 #define PR_REPORT_TIME 0x0032 #define PR_RETURNED_IPM 0x0033 #define PR_SECURITY 0x0034 #define PR_INCOMPLETE_COPY 0x0035 #define PR_SENSITIVITY 0x0036 #define PR_SUBJECT 0x0037 #define PR_SUBJECT_IPM 0x0038 #define PR_CLIENT_SUBMIT_TIME 0x0039 #define PR_REPORT_NAME 0x003A #define PR_SENT_REPRESENTING_SEARCH_KEY 0x003B #define PR_X400_CONTENT_TYPE 0x003C #define PR_SUBJECT_PREFIX 0x003D #define PR_NON_RECEIPT_REASON 0x003E #define PR_RECEIVED_BY_ENTRYID 0x003F #define PR_RECEIVED_BY_NAME 0x0040 #define PR_SENT_REPRESENTING_ENTRYID 0x0041 #define PR_SENT_REPRESENTING_NAME 0x0042 #define PR_RCVD_REPRESENTING_ENTRYID 0x0043 #define PR_RCVD_REPRESENTING_NAME 0x0044 #define PR_REPORT_ENTRYID 0x0045 #define PR_READ_RECEIPT_ENTRYID 0x0046 #define PR_MESSAGE_SUBMISSION_ID 0x0047 #define PR_PROVIDER_SUBMIT_TIME 0x0048 #define PR_ORIGINAL_SUBJECT 0x0049 #define PR_DISC_VAL 0x004A #define PR_ORIG_MESSAGE_CLASS 0x004B #define PR_ORIGINAL_AUTHOR_ENTRYID 0x004C #define PR_ORIGINAL_AUTHOR_NAME 0x004D #define PR_ORIGINAL_SUBMIT_TIME 0x004E #define PR_REPLY_RECIPIENT_ENTRIES 0x004F #define PR_REPLY_RECIPIENT_NAMES 0x0050 #define PR_RECEIVED_BY_SEARCH_KEY 0x0051 #define PR_RCVD_REPRESENTING_SEARCH_KEY 0x0052 #define PR_READ_RECEIPT_SEARCH_KEY 0x0053 #define PR_REPORT_SEARCH_KEY 0x0054 #define PR_ORIGINAL_DELIVERY_TIME 0x0055 #define PR_ORIGINAL_AUTHOR_SEARCH_KEY 0x0056 #define PR_MESSAGE_TO_ME 0x0057 #define PR_MESSAGE_CC_ME 0x0058 #define PR_MESSAGE_RECIP_ME 0x0059 #define PR_ORIGINAL_SENDER_NAME 0x005A #define PR_ORIGINAL_SENDER_ENTRYID 0x005B #define PR_ORIGINAL_SENDER_SEARCH_KEY 0x005C #define PR_ORIGINAL_SENT_REPRESENTING_NAME 0x005D #define PR_ORIGINAL_SENT_REPRESENTING_ENTRYID 0x005E #define PR_ORIGINAL_SENT_REPRESENTING_SEARCH_KEY 0x005F #define PR_START_DATE 0x0060 #define PR_END_DATE 0x0061 #define PR_OWNER_APPT_ID 0x0062 #define PR_RESPONSE_REQUESTED 0x0063 #define PR_SENT_REPRESENTING_ADDRTYPE 0x0064 #define PR_SENT_REPRESENTING_EMAIL_ADDRESS 0x0065 #define PR_ORIGINAL_SENDER_ADDRTYPE 0x0066 #define PR_ORIGINAL_SENDER_EMAIL_ADDRESS 0x0067 #define PR_ORIGINAL_SENT_REPRESENTING_ADDRTYPE 0x0068 #define PR_ORIGINAL_SENT_REPRESENTING_EMAIL_ADDRESS 0x0069 #define PR_CONVERSATION_TOPIC 0x0070 #define PR_CONVERSATION_INDEX 0x0071 #define PR_ORIGINAL_DISPLAY_BCC 0x0072 #define PR_ORIGINAL_DISPLAY_CC 0x0073 #define PR_ORIGINAL_DISPLAY_TO 0x0074 #define PR_RECEIVED_BY_ADDRTYPE 0x0075 #define PR_RECEIVED_BY_EMAIL_ADDRESS 0x0076 #define PR_RCVD_REPRESENTING_ADDRTYPE 0x0077 #define PR_RCVD_REPRESENTING_EMAIL_ADDRESS 0x0078 #define PR_ORIGINAL_AUTHOR_ADDRTYPE 0x0079 #define PR_ORIGINAL_AUTHOR_EMAIL_ADDRESS 0x007A #define PR_ORIGINALLY_INTENDED_RECIP_ADDRTYPE 0x007B #define PR_ORIGINALLY_INTENDED_RECIP_EMAIL_ADDRESS 0x007C #define PR_TRANSPORT_MESSAGE_HEADERS 0x007D #define PR_DELEGATION 0x007E #define PR_TNEF_CORRELATION_KEY 0x007F #define PR_CONTENT_INTEGRITY_CHECK 0x0C00 #define PR_EXPLICIT_CONVERSION 0x0C01 #define PR_IPM_RETURN_REQUESTED 0x0C02 #define PR_MESSAGE_TOKEN 0x0C03 #define PR_NDR_REASON_CODE 0x0C04 #define PR_NDR_DIAG_CODE 0x0C05 #define PR_NON_RECEIPT_NOTIFICATION_REQUESTED 0x0C06 #define PR_DELIVERY_POINT 0x0C07 #define PR_ORIGINATOR_NON_DELIVERY_REPORT_REQUESTED 0x0C08 #define PR_ORIGINATOR_REQUESTED_ALTERNATE_RECIPIENT 0x0C09 #define PR_PHYSICAL_DELIVERY_BUREAU_FAX_DELIVERY 0x0C0A #define PR_PHYSICAL_DELIVERY_MODE 0x0C0B #define PR_PHYSICAL_DELIVERY_REPORT_REQUEST 0x0C0C #define PR_PHYSICAL_FORWARDING_ADDRESS 0x0C0D #define PR_PHYSICAL_FORWARDING_ADDRESS_REQUESTED 0x0C0E #define PR_PHYSICAL_FORWARDING_PROHIBITED 0x0C0F #define PR_PHYSICAL_RENDITION_ATTRIBUTES 0x0C10 #define PR_PROOF_OF_DELIVERY 0x0C11 #define PR_PROOF_OF_DELIVERY_REQUESTED 0x0C12 #define PR_RECIPIENT_CERTIFICATE 0x0C13 #define PR_RECIPIENT_NUMBER_FOR_ADVICE 0x0C14 #define PR_RECIPIENT_TYPE 0x0C15 #define PR_REGISTERED_MAIL_TYPE 0x0C16 #define PR_REPLY_REQUESTED 0x0C17 #define PR_REQUESTED_DELIVERY_METHOD 0x0C18 #define PR_SENDER_ENTRYID 0x0C19 #define PR_SENDER_NAME 0x0C1A #define PR_SUPPLEMENTARY_INFO 0x0C1B #define PR_TYPE_OF_MTS_USER 0x0C1C #define PR_SENDER_SEARCH_KEY 0x0C1D #define PR_SENDER_ADDRTYPE 0x0C1E #define PR_SENDER_EMAIL_ADDRESS 0x0C1F #define PR_CURRENT_VERSION 0x0E00 #define PR_DELETE_AFTER_SUBMIT 0x0E01 #define PR_DISPLAY_BCC 0x0E02 #define PR_DISPLAY_CC 0x0E03 #define PR_DISPLAY_TO 0x0E04 #define PR_PARENT_DISPLAY 0x0E05 #define PR_MESSAGE_DELIVERY_TIME 0x0E06 #define PR_MESSAGE_FLAGS 0x0E07 #define PR_MESSAGE_SIZE 0x0E08 #define PR_PARENT_ENTRYID 0x0E09 #define PR_SENTMAIL_ENTRYID 0x0E0A #define PR_CORRELATE 0x0E0C #define PR_CORRELATE_MTSID 0x0E0D #define PR_DISCRETE_VALUES 0x0E0E #define PR_RESPONSIBILITY 0x0E0F #define PR_SPOOLER_STATUS 0x0E10 #define PR_TRANSPORT_STATUS 0x0E11 #define PR_MESSAGE_RECIPIENTS 0x0E12 #define PR_MESSAGE_ATTACHMENTS 0x0E13 #define PR_SUBMIT_FLAGS 0x0E14 #define PR_RECIPIENT_STATUS 0x0E15 #define PR_TRANSPORT_KEY 0x0E16 #define PR_MSG_STATUS 0x0E17 #define PR_MESSAGE_DOWNLOAD_TIME 0x0E18 #define PR_CREATION_VERSION 0x0E19 #define PR_MODIFY_VERSION 0x0E1A #define PR_HASATTACH 0x0E1B #define PR_BODY_CRC 0x0E1C #define PR_NORMALIZED_SUBJECT 0x0E1D #define PR_RTF_IN_SYNC 0x0E1F #define PR_ATTACH_SIZE 0x0E20 #define PR_ATTACH_NUM 0x0E21 #define PR_PREPROCESS 0x0E22 #define PR_ORIGINATING_MTA_CERTIFICATE 0x0E25 #define PR_PROOF_OF_SUBMISSION 0x0E26 #define PR_ENTRYID 0x0FFF #define PR_OBJECT_TYPE 0x0FFE #define PR_ICON 0x0FFD #define PR_MINI_ICON 0x0FFC #define PR_STORE_ENTRYID 0x0FFB #define PR_STORE_RECORD_KEY 0x0FFA #define PR_RECORD_KEY 0x0FF9 #define PR_MAPPING_SIGNATURE 0x0FF8 #define PR_ACCESS_LEVEL 0x0FF7 #define PR_INSTANCE_KEY 0x0FF6 #define PR_ROW_TYPE 0x0FF5 #define PR_ACCESS 0x0FF4 #define PR_BODY 0x1000 #define PR_REPORT_TEXT 0x1001 #define PR_ORIGINATOR_AND_DL_EXPANSION_HISTORY 0x1002 #define PR_REPORTING_DL_NAME 0x1003 #define PR_REPORTING_MTA_CERTIFICATE 0x1004 #define PR_RTF_SYNC_BODY_CRC 0x1006 #define PR_RTF_SYNC_BODY_COUNT 0x1007 #define PR_RTF_SYNC_BODY_TAG 0x1008 #define PR_RTF_COMPRESSED 0x1009 #define PR_RTF_SYNC_PREFIX_COUNT 0x1010 #define PR_RTF_SYNC_TRAILING_COUNT 0x1011 #define PR_ORIGINALLY_INTENDED_RECIP_ENTRYID 0x1012 #define PR_BODY_HTML 0x1013 #define PR_INTERNET_MESSAGE_ID 0x1035 #define PR_ICON_INDEX 0x1080 #define PR_ROWID 0x3000 #define PR_DISPLAY_NAME 0x3001 #define PR_ADDRTYPE 0x3002 #define PR_EMAIL_ADDRESS 0x3003 #define PR_COMMENT 0x3004 #define PR_DEPTH 0x3005 #define PR_PROVIDER_DISPLAY 0x3006 #define PR_CREATION_TIME 0x3007 #define PR_LAST_MODIFICATION_TIME 0x3008 #define PR_RESOURCE_FLAGS 0x3009 #define PR_PROVIDER_DLL_NAME 0x300A #define PR_SEARCH_KEY 0x300B #define PR_PROVIDER_UID 0x300C #define PR_PROVIDER_ORDINAL 0x300D #define PR_FORM_VERSION 0x3301 #define PR_FORM_CLSID 0x3302 #define PR_FORM_CONTACT_NAME 0x3303 #define PR_FORM_CATEGORY 0x3304 #define PR_FORM_CATEGORY_SUB 0x3305 #define PR_FORM_HOST_MAP 0x3306 #define PR_FORM_HIDDEN 0x3307 #define PR_FORM_DESIGNER_NAME 0x3308 #define PR_FORM_DESIGNER_GUID 0x3309 #define PR_FORM_MESSAGE_BEHAVIOR 0x330A #define PR_DEFAULT_STORE 0x3400 #define PR_STORE_SUPPORT_MASK 0x340D #define PR_STORE_STATE 0x340E #define PR_IPM_SUBTREE_SEARCH_KEY 0x3410 #define PR_IPM_OUTBOX_SEARCH_KEY 0x3411 #define PR_IPM_WASTEBASKET_SEARCH_KEY 0x3412 #define PR_IPM_SENTMAIL_SEARCH_KEY 0x3413 #define PR_MDB_PROVIDER 0x3414 #define PR_RECEIVE_FOLDER_SETTINGS 0x3415 #define PR_VALID_FOLDER_MASK 0x35DF #define PR_IPM_SUBTREE_ENTRYID 0x35E0 #define PR_IPM_OUTBOX_ENTRYID 0x35E2 #define PR_IPM_WASTEBASKET_ENTRYID 0x35E3 #define PR_IPM_SENTMAIL_ENTRYID 0x35E4 #define PR_VIEWS_ENTRYID 0x35E5 #define PR_COMMON_VIEWS_ENTRYID 0x35E6 #define PR_FINDER_ENTRYID 0x35E7 #define PR_CONTAINER_FLAGS 0x3600 #define PR_FOLDER_TYPE 0x3601 #define PR_CONTENT_COUNT 0x3602 #define PR_CONTENT_UNREAD 0x3603 #define PR_CREATE_TEMPLATES 0x3604 #define PR_DETAILS_TABLE 0x3605 #define PR_SEARCH 0x3607 #define PR_SELECTABLE 0x3609 #define PR_SUBFOLDERS 0x360A #define PR_STATUS 0x360B #define PR_ANR 0x360C #define PR_CONTENTS_SORT_ORDER 0x360D #define PR_CONTAINER_HIERARCHY 0x360E #define PR_CONTAINER_CONTENTS 0x360F #define PR_FOLDER_ASSOCIATED_CONTENTS 0x3610 #define PR_DEF_CREATE_DL 0x3611 #define PR_DEF_CREATE_MAILUSER 0x3612 #define PR_CONTAINER_CLASS 0x3613 #define PR_CONTAINER_MODIFY_VERSION 0x3614 #define PR_AB_PROVIDER_ID 0x3615 #define PR_DEFAULT_VIEW_ENTRYID 0x3616 #define PR_ASSOC_CONTENT_COUNT 0x3617 #define PR_ATTACHMENT_X400_PARAMETERS 0x3700 #define PR_ATTACH_DATA_OBJ 0x3701 #define PR_ATTACH_ENCODING 0x3702 #define PR_ATTACH_EXTENSION 0x3703 #define PR_ATTACH_FILENAME 0x3704 #define PR_ATTACH_METHOD 0x3705 #define PR_ATTACH_LONG_FILENAME 0x3707 #define PR_ATTACH_PATHNAME 0x3708 #define PR_ATTACH_RENDERING 0x3709 #define PR_ATTACH_TAG 0x370A #define PR_RENDERING_POSITION 0x370B #define PR_ATTACH_TRANSPORT_NAME 0x370C #define PR_ATTACH_LONG_PATHNAME 0x370D #define PR_ATTACH_MIME_TAG 0x370E #define PR_ATTACH_ADDITIONAL_INFO 0x370F #define PR_ATTACH_MIME_SEQUENCE 0x3710 #define PR_ATTACH_CONTENT_ID 0x3712 #define PR_ATTACH_CONTENT_LOCATION 0x3713 #define PR_ATTACH_FLAGS 0x3714 #define PR_DISPLAY_TYPE 0x3900 #define PR_TEMPLATEID 0x3902 #define PR_PRIMARY_CAPABILITY 0x3904 #define PR_7BIT_DISPLAY_NAME 0x39FF #define PR_ACCOUNT 0x3A00 #define PR_ALTERNATE_RECIPIENT 0x3A01 #define PR_CALLBACK_TELEPHONE_NUMBER 0x3A02 #define PR_CONVERSION_PROHIBITED 0x3A03 #define PR_DISCLOSE_RECIPIENTS 0x3A04 #define PR_GENERATION 0x3A05 #define PR_GIVEN_NAME 0x3A06 #define PR_GOVERNMENT_ID_NUMBER 0x3A07 #define PR_BUSINESS_TELEPHONE_NUMBER 0x3A08 #define PR_HOME_TELEPHONE_NUMBER 0x3A09 #define PR_INITIALS 0x3A0A #define PR_KEYWORD 0x3A0B #define PR_LANGUAGE 0x3A0C #define PR_LOCATION 0x3A0D #define PR_MAIL_PERMISSION 0x3A0E #define PR_MHS_COMMON_NAME 0x3A0F #define PR_ORGANIZATIONAL_ID_NUMBER 0x3A10 #define PR_SURNAME 0x3A11 #define PR_ORIGINAL_ENTRYID 0x3A12 #define PR_ORIGINAL_DISPLAY_NAME 0x3A13 #define PR_ORIGINAL_SEARCH_KEY 0x3A14 #define PR_POSTAL_ADDRESS 0x3A15 #define PR_COMPANY_NAME 0x3A16 #define PR_TITLE 0x3A17 #define PR_DEPARTMENT_NAME 0x3A18 #define PR_OFFICE_LOCATION 0x3A19 #define PR_PRIMARY_TELEPHONE_NUMBER 0x3A1A #define PR_BUSINESS2_TELEPHONE_NUMBER 0x3A1B #define PR_MOBILE_TELEPHONE_NUMBER 0x3A1C #define PR_RADIO_TELEPHONE_NUMBER 0x3A1D #define PR_CAR_TELEPHONE_NUMBER 0x3A1E #define PR_OTHER_TELEPHONE_NUMBER 0x3A1F #define PR_TRANSMITABLE_DISPLAY_NAME 0x3A20 #define PR_PAGER_TELEPHONE_NUMBER 0x3A21 #define PR_USER_CERTIFICATE 0x3A22 #define PR_PRIMARY_FAX_NUMBER 0x3A23 #define PR_BUSINESS_FAX_NUMBER 0x3A24 #define PR_HOME_FAX_NUMBER 0x3A25 #define PR_COUNTRY 0x3A26 #define PR_LOCALITY 0x3A27 #define PR_STATE_OR_PROVINCE 0x3A28 #define PR_STREET_ADDRESS 0x3A29 #define PR_POSTAL_CODE 0x3A2A #define PR_POST_OFFICE_BOX 0x3A2B #define PR_TELEX_NUMBER 0x3A2C #define PR_ISDN_NUMBER 0x3A2D #define PR_ASSISTANT_TELEPHONE_NUMBER 0x3A2E #define PR_HOME2_TELEPHONE_NUMBER 0x3A2F #define PR_ASSISTANT 0x3A30 #define PR_SEND_RICH_INFO 0x3A40 #define PR_WEDDING_ANNIVERSARY 0x3A41 #define PR_BIRTHDAY 0x3A42 #define PR_HOBBIES 0x3A43 #define PR_MIDDLE_NAME 0x3A44 #define PR_DISPLAY_NAME_PREFIX 0x3A45 #define PR_PROFESSION 0x3A46 #define PR_PREFERRED_BY_NAME 0x3A47 #define PR_SPOUSE_NAME 0x3A48 #define PR_COMPUTER_NETWORK_NAME 0x3A49 #define PR_CUSTOMER_ID 0x3A4A #define PR_TTYTDD_PHONE_NUMBER 0x3A4B #define PR_FTP_SITE 0x3A4C #define PR_GENDER 0x3A4D #define PR_MANAGER_NAME 0x3A4E #define PR_NICKNAME 0x3A4F #define PR_PERSONAL_HOME_PAGE 0x3A50 #define PR_BUSINESS_HOME_PAGE 0x3A51 #define PR_CONTACT_VERSION 0x3A52 #define PR_CONTACT_ENTRYIDS 0x3A53 #define PR_CONTACT_ADDRTYPES 0x3A54 #define PR_CONTACT_DEFAULT_ADDRESS_INDEX 0x3A55 #define PR_CONTACT_EMAIL_ADDRESSES 0x3A56 #define PR_COMPANY_MAIN_PHONE_NUMBER 0x3A57 #define PR_CHILDRENS_NAMES 0x3A58 #define PR_HOME_ADDRESS_CITY 0x3A59 #define PR_HOME_ADDRESS_COUNTRY 0x3A5A #define PR_HOME_ADDRESS_POSTAL_CODE 0x3A5B #define PR_HOME_ADDRESS_STATE_OR_PROVINCE 0x3A5C #define PR_HOME_ADDRESS_STREET 0x3A5D #define PR_HOME_ADDRESS_POST_OFFICE_BOX 0x3A5E #define PR_OTHER_ADDRESS_CITY 0x3A5F #define PR_OTHER_ADDRESS_COUNTRY 0x3A60 #define PR_OTHER_ADDRESS_POSTAL_CODE 0x3A61 #define PR_OTHER_ADDRESS_STATE_OR_PROVINCE 0x3A62 #define PR_OTHER_ADDRESS_STREET 0x3A63 #define PR_OTHER_ADDRESS_POST_OFFICE_BOX 0x3A64 #define PR_STORE_PROVIDERS 0x3D00 #define PR_AB_PROVIDERS 0x3D01 #define PR_TRANSPORT_PROVIDERS 0x3D02 #define PR_DEFAULT_PROFILE 0x3D04 #define PR_AB_SEARCH_PATH 0x3D05 #define PR_AB_DEFAULT_DIR 0x3D06 #define PR_AB_DEFAULT_PAB 0x3D07 #define PR_FILTERING_HOOKS 0x3D08 #define PR_SERVICE_NAME 0x3D09 #define PR_SERVICE_DLL_NAME 0x3D0A #define PR_SERVICE_ENTRY_NAME 0x3D0B #define PR_SERVICE_UID 0x3D0C #define PR_SERVICE_EXTRA_UIDS 0x3D0D #define PR_SERVICES 0x3D0E #define PR_SERVICE_SUPPORT_FILES 0x3D0F #define PR_SERVICE_DELETE_FILES 0x3D10 #define PR_AB_SEARCH_PATH_UPDATE 0x3D11 #define PR_PROFILE_NAME 0x3D12 #define PR_IDENTITY_DISPLAY 0x3E00 #define PR_IDENTITY_ENTRYID 0x3E01 #define PR_RESOURCE_METHODS 0x3E02 #define PR_RESOURCE_TYPE 0x3E03 #define PR_STATUS_CODE 0x3E04 #define PR_IDENTITY_SEARCH_KEY 0x3E05 #define PR_OWN_STORE_ENTRYID 0x3E06 #define PR_RESOURCE_PATH 0x3E07 #define PR_STATUS_STRING 0x3E08 #define PR_X400_DEFERRED_DELIVERY_CANCEL 0x3E09 #define PR_HEADER_FOLDER_ENTRYID 0x3E0A #define PR_REMOTE_PROGRESS 0x3E0B #define PR_REMOTE_PROGRESS_TEXT 0x3E0C #define PR_REMOTE_VALIDATE_OK 0x3E0D #define PR_CONTROL_FLAGS 0x3F00 #define PR_CONTROL_STRUCTURE 0x3F01 #define PR_CONTROL_TYPE 0x3F02 #define PR_DELTAX 0x3F03 #define PR_DELTAY 0x3F04 #define PR_XPOS 0x3F05 #define PR_YPOS 0x3F06 #define PR_CONTROL_ID 0x3F07 #define PR_INITIAL_DETAILS_PANE 0x3F08 #define PR_INTERNET_CPID 0x3FDE #define PR_MESSAGE_LOCALE_ID 0x3FF1 #define PR_CREATOR_NAME 0x3FF8 #define PR_CREATOR_ENTRYID 0x3FF9 #define PR_LAST_MODIFIER_NAME 0x3FFA #define PR_MESSAGE_CODEPAGE 0x3FFD #define PR_INETMAIL_OVERRIDE_FORMAT 0x5902 #define PR_MSG_EDITOR_FORMAT 0x5909 #define PR_SENDER_SMTP_ADDRESS 0x5D01 #define PR_SENT_REPRESENTING_SMTP_ADDRESS 0x5D02 /* * Secure property id range */ #define PROP_ID_SECURE_MIN 0x67F0 #define PROP_ID_SECURE_MAX 0x67FF #endif /* MAPIDEFS_H */ ytnef-2.0/lib/mapitags.h000066400000000000000000000402251406511276600152370ustar00rootroot00000000000000/* * Yerase's TNEF Stream Reader Library * Copyright (C) 2003 Randall E. Hand * * 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., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA * * You can contact me at randall.hand@gmail.com for questions or assistance */ #ifndef MAPITAGS_H #define MAPITAGS_H #define MAPIMACRO(x) {x, #x} typedef struct { unsigned int id; char name[128]; } MAPIPropertyTagList; MAPIPropertyTagList MPList[] = { MAPIMACRO(PR_ACKNOWLEDGEMENT_MODE), MAPIMACRO(PR_ALTERNATE_RECIPIENT_ALLOWED), MAPIMACRO(PR_AUTHORIZING_USERS), MAPIMACRO(PR_AUTO_FORWARD_COMMENT), MAPIMACRO(PR_AUTO_FORWARDED), MAPIMACRO(PR_CONTENT_CONFIDENTIALITY_ALGORITHM_ID), MAPIMACRO(PR_CONTENT_CORRELATOR), MAPIMACRO(PR_CONTENT_IDENTIFIER), MAPIMACRO(PR_CONTENT_LENGTH), MAPIMACRO(PR_CONTENT_RETURN_REQUESTED), MAPIMACRO(PR_CONVERSATION_KEY), MAPIMACRO(PR_CONVERSION_EITS), MAPIMACRO(PR_CONVERSION_WITH_LOSS_PROHIBITED), MAPIMACRO(PR_CONVERTED_EITS), MAPIMACRO(PR_DEFERRED_DELIVERY_TIME), MAPIMACRO(PR_DELIVER_TIME), MAPIMACRO(PR_DISCARD_REASON), MAPIMACRO(PR_DISCLOSURE_OF_RECIPIENTS), MAPIMACRO(PR_DL_EXPANSION_HISTORY), MAPIMACRO(PR_DL_EXPANSION_PROHIBITED), MAPIMACRO(PR_EXPIRY_TIME), MAPIMACRO(PR_IMPLICIT_CONVERSION_PROHIBITED), MAPIMACRO(PR_IMPORTANCE), MAPIMACRO(PR_IPM_ID), MAPIMACRO(PR_LATEST_DELIVERY_TIME), MAPIMACRO(PR_MESSAGE_CLASS), MAPIMACRO(PR_MESSAGE_DELIVERY_ID), MAPIMACRO(PR_MESSAGE_SECURITY_LABEL), MAPIMACRO(PR_OBSOLETED_IPMS), MAPIMACRO(PR_ORIGINALLY_INTENDED_RECIPIENT_NAME), MAPIMACRO(PR_ORIGINAL_EITS), MAPIMACRO(PR_ORIGINATOR_CERTIFICATE), MAPIMACRO(PR_ORIGINATOR_DELIVERY_REPORT_REQUESTED), MAPIMACRO(PR_ORIGINATOR_RETURN_ADDRESS), MAPIMACRO(PR_PARENT_KEY), MAPIMACRO(PR_PRIORITY), MAPIMACRO(PR_ORIGIN_CHECK), MAPIMACRO(PR_PROOF_OF_SUBMISSION_REQUESTED), MAPIMACRO(PR_READ_RECEIPT_REQUESTED), MAPIMACRO(PR_RECEIPT_TIME), MAPIMACRO(PR_RECIPIENT_REASSIGNMENT_PROHIBITED), MAPIMACRO(PR_REDIRECTION_HISTORY), MAPIMACRO(PR_RELATED_IPMS), MAPIMACRO(PR_ORIGINAL_SENSITIVITY), MAPIMACRO(PR_LANGUAGES), MAPIMACRO(PR_REPLY_TIME), MAPIMACRO(PR_REPORT_TAG), MAPIMACRO(PR_REPORT_TIME), MAPIMACRO(PR_RETURNED_IPM), MAPIMACRO(PR_SECURITY), MAPIMACRO(PR_INCOMPLETE_COPY), MAPIMACRO(PR_SENSITIVITY), MAPIMACRO(PR_SUBJECT), MAPIMACRO(PR_SUBJECT_IPM), MAPIMACRO(PR_CLIENT_SUBMIT_TIME), MAPIMACRO(PR_REPORT_NAME), MAPIMACRO(PR_SENT_REPRESENTING_SEARCH_KEY), MAPIMACRO(PR_X400_CONTENT_TYPE), MAPIMACRO(PR_SUBJECT_PREFIX), MAPIMACRO(PR_NON_RECEIPT_REASON), MAPIMACRO(PR_RECEIVED_BY_ENTRYID), MAPIMACRO(PR_RECEIVED_BY_NAME), MAPIMACRO(PR_SENT_REPRESENTING_ENTRYID), MAPIMACRO(PR_SENT_REPRESENTING_NAME), MAPIMACRO(PR_RCVD_REPRESENTING_ENTRYID), MAPIMACRO(PR_RCVD_REPRESENTING_NAME), MAPIMACRO(PR_REPORT_ENTRYID), MAPIMACRO(PR_READ_RECEIPT_ENTRYID), MAPIMACRO(PR_MESSAGE_SUBMISSION_ID), MAPIMACRO(PR_PROVIDER_SUBMIT_TIME), MAPIMACRO(PR_ORIGINAL_SUBJECT), MAPIMACRO(PR_DISC_VAL), MAPIMACRO(PR_ORIG_MESSAGE_CLASS), MAPIMACRO(PR_ORIGINAL_AUTHOR_ENTRYID), MAPIMACRO(PR_ORIGINAL_AUTHOR_NAME), MAPIMACRO(PR_ORIGINAL_SUBMIT_TIME), MAPIMACRO(PR_REPLY_RECIPIENT_ENTRIES), MAPIMACRO(PR_REPLY_RECIPIENT_NAMES), MAPIMACRO(PR_RECEIVED_BY_SEARCH_KEY), MAPIMACRO(PR_RCVD_REPRESENTING_SEARCH_KEY), MAPIMACRO(PR_READ_RECEIPT_SEARCH_KEY), MAPIMACRO(PR_REPORT_SEARCH_KEY), MAPIMACRO(PR_ORIGINAL_DELIVERY_TIME), MAPIMACRO(PR_ORIGINAL_AUTHOR_SEARCH_KEY), MAPIMACRO(PR_MESSAGE_TO_ME), MAPIMACRO(PR_MESSAGE_CC_ME), MAPIMACRO(PR_MESSAGE_RECIP_ME), MAPIMACRO(PR_ORIGINAL_SENDER_NAME), MAPIMACRO(PR_ORIGINAL_SENDER_ENTRYID), MAPIMACRO(PR_ORIGINAL_SENDER_SEARCH_KEY), MAPIMACRO(PR_ORIGINAL_SENT_REPRESENTING_NAME), MAPIMACRO(PR_ORIGINAL_SENT_REPRESENTING_ENTRYID), MAPIMACRO(PR_ORIGINAL_SENT_REPRESENTING_SEARCH_KEY), MAPIMACRO(PR_START_DATE), MAPIMACRO(PR_END_DATE), MAPIMACRO(PR_OWNER_APPT_ID), MAPIMACRO(PR_RESPONSE_REQUESTED), MAPIMACRO(PR_SENT_REPRESENTING_ADDRTYPE), MAPIMACRO(PR_SENT_REPRESENTING_EMAIL_ADDRESS), MAPIMACRO(PR_ORIGINAL_SENDER_ADDRTYPE), MAPIMACRO(PR_ORIGINAL_SENDER_EMAIL_ADDRESS), MAPIMACRO(PR_ORIGINAL_SENT_REPRESENTING_ADDRTYPE), MAPIMACRO(PR_ORIGINAL_SENT_REPRESENTING_EMAIL_ADDRESS), MAPIMACRO(PR_CONVERSATION_TOPIC), MAPIMACRO(PR_CONVERSATION_INDEX), MAPIMACRO(PR_ORIGINAL_DISPLAY_BCC), MAPIMACRO(PR_ORIGINAL_DISPLAY_CC), MAPIMACRO(PR_ORIGINAL_DISPLAY_TO), MAPIMACRO(PR_RECEIVED_BY_ADDRTYPE), MAPIMACRO(PR_RECEIVED_BY_EMAIL_ADDRESS), MAPIMACRO(PR_RCVD_REPRESENTING_ADDRTYPE), MAPIMACRO(PR_RCVD_REPRESENTING_EMAIL_ADDRESS), MAPIMACRO(PR_ORIGINAL_AUTHOR_ADDRTYPE), MAPIMACRO(PR_ORIGINAL_AUTHOR_EMAIL_ADDRESS), MAPIMACRO(PR_ORIGINALLY_INTENDED_RECIP_ADDRTYPE), MAPIMACRO(PR_ORIGINALLY_INTENDED_RECIP_EMAIL_ADDRESS), MAPIMACRO(PR_TRANSPORT_MESSAGE_HEADERS), MAPIMACRO(PR_DELEGATION), MAPIMACRO(PR_TNEF_CORRELATION_KEY), MAPIMACRO(PR_CONTENT_INTEGRITY_CHECK), MAPIMACRO(PR_EXPLICIT_CONVERSION), MAPIMACRO(PR_IPM_RETURN_REQUESTED), MAPIMACRO(PR_MESSAGE_TOKEN), MAPIMACRO(PR_NDR_REASON_CODE), MAPIMACRO(PR_NDR_DIAG_CODE), MAPIMACRO(PR_NON_RECEIPT_NOTIFICATION_REQUESTED), MAPIMACRO(PR_DELIVERY_POINT), MAPIMACRO(PR_ORIGINATOR_NON_DELIVERY_REPORT_REQUESTED), MAPIMACRO(PR_ORIGINATOR_REQUESTED_ALTERNATE_RECIPIENT), MAPIMACRO(PR_PHYSICAL_DELIVERY_BUREAU_FAX_DELIVERY), MAPIMACRO(PR_PHYSICAL_DELIVERY_MODE), MAPIMACRO(PR_PHYSICAL_DELIVERY_REPORT_REQUEST), MAPIMACRO(PR_PHYSICAL_FORWARDING_ADDRESS), MAPIMACRO(PR_PHYSICAL_FORWARDING_ADDRESS_REQUESTED), MAPIMACRO(PR_PHYSICAL_FORWARDING_PROHIBITED), MAPIMACRO(PR_PHYSICAL_RENDITION_ATTRIBUTES), MAPIMACRO(PR_PROOF_OF_DELIVERY), MAPIMACRO(PR_PROOF_OF_DELIVERY_REQUESTED), MAPIMACRO(PR_RECIPIENT_CERTIFICATE), MAPIMACRO(PR_RECIPIENT_NUMBER_FOR_ADVICE), MAPIMACRO(PR_RECIPIENT_TYPE), MAPIMACRO(PR_REGISTERED_MAIL_TYPE), MAPIMACRO(PR_REPLY_REQUESTED), MAPIMACRO(PR_REQUESTED_DELIVERY_METHOD), MAPIMACRO(PR_SENDER_ENTRYID), MAPIMACRO(PR_SENDER_NAME), MAPIMACRO(PR_SUPPLEMENTARY_INFO), MAPIMACRO(PR_TYPE_OF_MTS_USER), MAPIMACRO(PR_SENDER_SEARCH_KEY), MAPIMACRO(PR_SENDER_ADDRTYPE), MAPIMACRO(PR_SENDER_EMAIL_ADDRESS), MAPIMACRO(PR_CURRENT_VERSION), MAPIMACRO(PR_DELETE_AFTER_SUBMIT), MAPIMACRO(PR_DISPLAY_BCC), MAPIMACRO(PR_DISPLAY_CC), MAPIMACRO(PR_DISPLAY_TO), MAPIMACRO(PR_PARENT_DISPLAY), MAPIMACRO(PR_MESSAGE_DELIVERY_TIME), MAPIMACRO(PR_MESSAGE_FLAGS), MAPIMACRO(PR_MESSAGE_SIZE), MAPIMACRO(PR_PARENT_ENTRYID), MAPIMACRO(PR_SENTMAIL_ENTRYID), MAPIMACRO(PR_CORRELATE), MAPIMACRO(PR_CORRELATE_MTSID), MAPIMACRO(PR_DISCRETE_VALUES), MAPIMACRO(PR_RESPONSIBILITY), MAPIMACRO(PR_SPOOLER_STATUS), MAPIMACRO(PR_TRANSPORT_STATUS), MAPIMACRO(PR_MESSAGE_RECIPIENTS), MAPIMACRO(PR_MESSAGE_ATTACHMENTS), MAPIMACRO(PR_SUBMIT_FLAGS), MAPIMACRO(PR_RECIPIENT_STATUS), MAPIMACRO(PR_TRANSPORT_KEY), MAPIMACRO(PR_MSG_STATUS), MAPIMACRO(PR_MESSAGE_DOWNLOAD_TIME), MAPIMACRO(PR_CREATION_VERSION), MAPIMACRO(PR_MODIFY_VERSION), MAPIMACRO(PR_HASATTACH), MAPIMACRO(PR_BODY_CRC), MAPIMACRO(PR_NORMALIZED_SUBJECT), MAPIMACRO(PR_RTF_IN_SYNC), MAPIMACRO(PR_ATTACH_SIZE), MAPIMACRO(PR_ATTACH_NUM), MAPIMACRO(PR_PREPROCESS), MAPIMACRO(PR_ORIGINATING_MTA_CERTIFICATE), MAPIMACRO(PR_PROOF_OF_SUBMISSION), MAPIMACRO(PR_ENTRYID), MAPIMACRO(PR_OBJECT_TYPE), MAPIMACRO(PR_ICON), MAPIMACRO(PR_MINI_ICON), MAPIMACRO(PR_STORE_ENTRYID), MAPIMACRO(PR_STORE_RECORD_KEY), MAPIMACRO(PR_RECORD_KEY), MAPIMACRO(PR_MAPPING_SIGNATURE), MAPIMACRO(PR_ACCESS_LEVEL), MAPIMACRO(PR_INSTANCE_KEY), MAPIMACRO(PR_ROW_TYPE), MAPIMACRO(PR_ACCESS), MAPIMACRO(PR_BODY), MAPIMACRO(PR_REPORT_TEXT), MAPIMACRO(PR_ORIGINATOR_AND_DL_EXPANSION_HISTORY), MAPIMACRO(PR_REPORTING_DL_NAME), MAPIMACRO(PR_REPORTING_MTA_CERTIFICATE), MAPIMACRO(PR_RTF_SYNC_BODY_CRC), MAPIMACRO(PR_RTF_SYNC_BODY_COUNT), MAPIMACRO(PR_RTF_SYNC_BODY_TAG), MAPIMACRO(PR_RTF_COMPRESSED), MAPIMACRO(PR_RTF_SYNC_PREFIX_COUNT), MAPIMACRO(PR_RTF_SYNC_TRAILING_COUNT), MAPIMACRO(PR_ORIGINALLY_INTENDED_RECIP_ENTRYID), MAPIMACRO(PR_BODY_HTML), MAPIMACRO(PR_INTERNET_MESSAGE_ID), MAPIMACRO(PR_ICON_INDEX), MAPIMACRO(PR_ROWID), MAPIMACRO(PR_DISPLAY_NAME), MAPIMACRO(PR_ADDRTYPE), MAPIMACRO(PR_EMAIL_ADDRESS), MAPIMACRO(PR_COMMENT), MAPIMACRO(PR_DEPTH), MAPIMACRO(PR_PROVIDER_DISPLAY), MAPIMACRO(PR_CREATION_TIME), MAPIMACRO(PR_LAST_MODIFICATION_TIME), MAPIMACRO(PR_RESOURCE_FLAGS), MAPIMACRO(PR_PROVIDER_DLL_NAME), MAPIMACRO(PR_SEARCH_KEY), MAPIMACRO(PR_PROVIDER_UID), MAPIMACRO(PR_PROVIDER_ORDINAL), MAPIMACRO(PR_FORM_VERSION), MAPIMACRO(PR_FORM_CLSID), MAPIMACRO(PR_FORM_CONTACT_NAME), MAPIMACRO(PR_FORM_CATEGORY), MAPIMACRO(PR_FORM_CATEGORY_SUB), MAPIMACRO(PR_FORM_HOST_MAP), MAPIMACRO(PR_FORM_HIDDEN), MAPIMACRO(PR_FORM_DESIGNER_NAME), MAPIMACRO(PR_FORM_DESIGNER_GUID), MAPIMACRO(PR_FORM_MESSAGE_BEHAVIOR), MAPIMACRO(PR_DEFAULT_STORE), MAPIMACRO(PR_STORE_SUPPORT_MASK), MAPIMACRO(PR_STORE_STATE), MAPIMACRO(PR_IPM_SUBTREE_SEARCH_KEY), MAPIMACRO(PR_IPM_OUTBOX_SEARCH_KEY), MAPIMACRO(PR_IPM_WASTEBASKET_SEARCH_KEY), MAPIMACRO(PR_IPM_SENTMAIL_SEARCH_KEY), MAPIMACRO(PR_MDB_PROVIDER), MAPIMACRO(PR_RECEIVE_FOLDER_SETTINGS), MAPIMACRO(PR_VALID_FOLDER_MASK), MAPIMACRO(PR_IPM_SUBTREE_ENTRYID), MAPIMACRO(PR_IPM_OUTBOX_ENTRYID), MAPIMACRO(PR_IPM_WASTEBASKET_ENTRYID), MAPIMACRO(PR_IPM_SENTMAIL_ENTRYID), MAPIMACRO(PR_VIEWS_ENTRYID), MAPIMACRO(PR_COMMON_VIEWS_ENTRYID), MAPIMACRO(PR_FINDER_ENTRYID), MAPIMACRO(PR_CONTAINER_FLAGS), MAPIMACRO(PR_FOLDER_TYPE), MAPIMACRO(PR_CONTENT_COUNT), MAPIMACRO(PR_CONTENT_UNREAD), MAPIMACRO(PR_CREATE_TEMPLATES), MAPIMACRO(PR_DETAILS_TABLE), MAPIMACRO(PR_SEARCH), MAPIMACRO(PR_SELECTABLE), MAPIMACRO(PR_SUBFOLDERS), MAPIMACRO(PR_STATUS), MAPIMACRO(PR_ANR), MAPIMACRO(PR_CONTENTS_SORT_ORDER), MAPIMACRO(PR_CONTAINER_HIERARCHY), MAPIMACRO(PR_CONTAINER_CONTENTS), MAPIMACRO(PR_FOLDER_ASSOCIATED_CONTENTS), MAPIMACRO(PR_DEF_CREATE_DL), MAPIMACRO(PR_DEF_CREATE_MAILUSER), MAPIMACRO(PR_CONTAINER_CLASS), MAPIMACRO(PR_CONTAINER_MODIFY_VERSION), MAPIMACRO(PR_AB_PROVIDER_ID), MAPIMACRO(PR_DEFAULT_VIEW_ENTRYID), MAPIMACRO(PR_ASSOC_CONTENT_COUNT), MAPIMACRO(PR_ATTACHMENT_X400_PARAMETERS), MAPIMACRO(PR_ATTACH_DATA_OBJ), MAPIMACRO(PR_ATTACH_ENCODING), MAPIMACRO(PR_ATTACH_EXTENSION), MAPIMACRO(PR_ATTACH_FILENAME), MAPIMACRO(PR_ATTACH_METHOD), MAPIMACRO(PR_ATTACH_LONG_FILENAME), MAPIMACRO(PR_ATTACH_PATHNAME), MAPIMACRO(PR_ATTACH_RENDERING), MAPIMACRO(PR_ATTACH_TAG), MAPIMACRO(PR_RENDERING_POSITION), MAPIMACRO(PR_ATTACH_TRANSPORT_NAME), MAPIMACRO(PR_ATTACH_LONG_PATHNAME), MAPIMACRO(PR_ATTACH_MIME_TAG), MAPIMACRO(PR_ATTACH_ADDITIONAL_INFO), MAPIMACRO(PR_ATTACH_MIME_SEQUENCE), MAPIMACRO(PR_ATTACH_CONTENT_ID), MAPIMACRO(PR_ATTACH_CONTENT_LOCATION), MAPIMACRO(PR_ATTACH_FLAGS), MAPIMACRO(PR_DISPLAY_TYPE), MAPIMACRO(PR_TEMPLATEID), MAPIMACRO(PR_PRIMARY_CAPABILITY), MAPIMACRO(PR_7BIT_DISPLAY_NAME), MAPIMACRO(PR_ACCOUNT), MAPIMACRO(PR_ALTERNATE_RECIPIENT), MAPIMACRO(PR_CALLBACK_TELEPHONE_NUMBER), MAPIMACRO(PR_CONVERSION_PROHIBITED), MAPIMACRO(PR_DISCLOSE_RECIPIENTS), MAPIMACRO(PR_GENERATION), MAPIMACRO(PR_GIVEN_NAME), MAPIMACRO(PR_GOVERNMENT_ID_NUMBER), MAPIMACRO(PR_BUSINESS_TELEPHONE_NUMBER), MAPIMACRO(PR_HOME_TELEPHONE_NUMBER), MAPIMACRO(PR_INITIALS), MAPIMACRO(PR_KEYWORD), MAPIMACRO(PR_LANGUAGE), MAPIMACRO(PR_LOCATION), MAPIMACRO(PR_MAIL_PERMISSION), MAPIMACRO(PR_MHS_COMMON_NAME), MAPIMACRO(PR_ORGANIZATIONAL_ID_NUMBER), MAPIMACRO(PR_SURNAME), MAPIMACRO(PR_ORIGINAL_ENTRYID), MAPIMACRO(PR_ORIGINAL_DISPLAY_NAME), MAPIMACRO(PR_ORIGINAL_SEARCH_KEY), MAPIMACRO(PR_POSTAL_ADDRESS), MAPIMACRO(PR_COMPANY_NAME), MAPIMACRO(PR_TITLE), MAPIMACRO(PR_DEPARTMENT_NAME), MAPIMACRO(PR_OFFICE_LOCATION), MAPIMACRO(PR_PRIMARY_TELEPHONE_NUMBER), MAPIMACRO(PR_BUSINESS2_TELEPHONE_NUMBER), MAPIMACRO(PR_MOBILE_TELEPHONE_NUMBER), MAPIMACRO(PR_RADIO_TELEPHONE_NUMBER), MAPIMACRO(PR_CAR_TELEPHONE_NUMBER), MAPIMACRO(PR_OTHER_TELEPHONE_NUMBER), MAPIMACRO(PR_TRANSMITABLE_DISPLAY_NAME), MAPIMACRO(PR_PAGER_TELEPHONE_NUMBER), MAPIMACRO(PR_USER_CERTIFICATE), MAPIMACRO(PR_PRIMARY_FAX_NUMBER), MAPIMACRO(PR_BUSINESS_FAX_NUMBER), MAPIMACRO(PR_HOME_FAX_NUMBER), MAPIMACRO(PR_COUNTRY), MAPIMACRO(PR_LOCALITY), MAPIMACRO(PR_STATE_OR_PROVINCE), MAPIMACRO(PR_STREET_ADDRESS), MAPIMACRO(PR_POSTAL_CODE), MAPIMACRO(PR_POST_OFFICE_BOX), MAPIMACRO(PR_TELEX_NUMBER), MAPIMACRO(PR_ISDN_NUMBER), MAPIMACRO(PR_ASSISTANT_TELEPHONE_NUMBER), MAPIMACRO(PR_HOME2_TELEPHONE_NUMBER), MAPIMACRO(PR_ASSISTANT), MAPIMACRO(PR_SEND_RICH_INFO), MAPIMACRO(PR_WEDDING_ANNIVERSARY), MAPIMACRO(PR_BIRTHDAY), MAPIMACRO(PR_HOBBIES), MAPIMACRO(PR_MIDDLE_NAME), MAPIMACRO(PR_DISPLAY_NAME_PREFIX), MAPIMACRO(PR_PROFESSION), MAPIMACRO(PR_PREFERRED_BY_NAME), MAPIMACRO(PR_SPOUSE_NAME), MAPIMACRO(PR_COMPUTER_NETWORK_NAME), MAPIMACRO(PR_CUSTOMER_ID), MAPIMACRO(PR_TTYTDD_PHONE_NUMBER), MAPIMACRO(PR_FTP_SITE), MAPIMACRO(PR_GENDER), MAPIMACRO(PR_MANAGER_NAME), MAPIMACRO(PR_NICKNAME), MAPIMACRO(PR_PERSONAL_HOME_PAGE), MAPIMACRO(PR_BUSINESS_HOME_PAGE), MAPIMACRO(PR_CONTACT_VERSION), MAPIMACRO(PR_CONTACT_ENTRYIDS), MAPIMACRO(PR_CONTACT_ADDRTYPES), MAPIMACRO(PR_CONTACT_DEFAULT_ADDRESS_INDEX), MAPIMACRO(PR_CONTACT_EMAIL_ADDRESSES), MAPIMACRO(PR_COMPANY_MAIN_PHONE_NUMBER), MAPIMACRO(PR_CHILDRENS_NAMES), MAPIMACRO(PR_HOME_ADDRESS_CITY), MAPIMACRO(PR_HOME_ADDRESS_COUNTRY), MAPIMACRO(PR_HOME_ADDRESS_POSTAL_CODE), MAPIMACRO(PR_HOME_ADDRESS_STATE_OR_PROVINCE), MAPIMACRO(PR_HOME_ADDRESS_STREET), MAPIMACRO(PR_HOME_ADDRESS_POST_OFFICE_BOX), MAPIMACRO(PR_OTHER_ADDRESS_CITY), MAPIMACRO(PR_OTHER_ADDRESS_COUNTRY), MAPIMACRO(PR_OTHER_ADDRESS_POSTAL_CODE), MAPIMACRO(PR_OTHER_ADDRESS_STATE_OR_PROVINCE), MAPIMACRO(PR_OTHER_ADDRESS_STREET), MAPIMACRO(PR_OTHER_ADDRESS_POST_OFFICE_BOX), MAPIMACRO(PR_STORE_PROVIDERS), MAPIMACRO(PR_AB_PROVIDERS), MAPIMACRO(PR_TRANSPORT_PROVIDERS), MAPIMACRO(PR_DEFAULT_PROFILE), MAPIMACRO(PR_AB_SEARCH_PATH), MAPIMACRO(PR_AB_DEFAULT_DIR), MAPIMACRO(PR_AB_DEFAULT_PAB), MAPIMACRO(PR_FILTERING_HOOKS), MAPIMACRO(PR_SERVICE_NAME), MAPIMACRO(PR_SERVICE_DLL_NAME), MAPIMACRO(PR_SERVICE_ENTRY_NAME), MAPIMACRO(PR_SERVICE_UID), MAPIMACRO(PR_SERVICE_EXTRA_UIDS), MAPIMACRO(PR_SERVICES), MAPIMACRO(PR_SERVICE_SUPPORT_FILES), MAPIMACRO(PR_SERVICE_DELETE_FILES), MAPIMACRO(PR_AB_SEARCH_PATH_UPDATE), MAPIMACRO(PR_PROFILE_NAME), MAPIMACRO(PR_IDENTITY_DISPLAY), MAPIMACRO(PR_IDENTITY_ENTRYID), MAPIMACRO(PR_RESOURCE_METHODS), MAPIMACRO(PR_RESOURCE_TYPE), MAPIMACRO(PR_STATUS_CODE), MAPIMACRO(PR_IDENTITY_SEARCH_KEY), MAPIMACRO(PR_OWN_STORE_ENTRYID), MAPIMACRO(PR_RESOURCE_PATH), MAPIMACRO(PR_STATUS_STRING), MAPIMACRO(PR_X400_DEFERRED_DELIVERY_CANCEL), MAPIMACRO(PR_HEADER_FOLDER_ENTRYID), MAPIMACRO(PR_REMOTE_PROGRESS), MAPIMACRO(PR_REMOTE_PROGRESS_TEXT), MAPIMACRO(PR_REMOTE_VALIDATE_OK), MAPIMACRO(PR_CONTROL_FLAGS), MAPIMACRO(PR_CONTROL_STRUCTURE), MAPIMACRO(PR_CONTROL_TYPE), MAPIMACRO(PR_DELTAX), MAPIMACRO(PR_DELTAY), MAPIMACRO(PR_XPOS), MAPIMACRO(PR_YPOS), MAPIMACRO(PR_CONTROL_ID), MAPIMACRO(PR_INITIAL_DETAILS_PANE), MAPIMACRO(PR_INTERNET_CPID), MAPIMACRO(PR_MESSAGE_LOCALE_ID), MAPIMACRO(PR_CREATOR_NAME), MAPIMACRO(PR_CREATOR_ENTRYID), MAPIMACRO(PR_LAST_MODIFIER_NAME), MAPIMACRO(PR_MESSAGE_CODEPAGE), MAPIMACRO(PR_INETMAIL_OVERRIDE_FORMAT), MAPIMACRO(PR_MSG_EDITOR_FORMAT), MAPIMACRO(PR_SENDER_SMTP_ADDRESS), MAPIMACRO(PR_SENT_REPRESENTING_SMTP_ADDRESS), }; #endif /* MAPITAGS_H */ ytnef-2.0/lib/tnef-errors.h000066400000000000000000000023021406511276600156720ustar00rootroot00000000000000/* * Yerase's TNEF Stream Reader Library * Copyright (C) 2003 Randall E. Hand * * 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., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA * * You can contact me at randall.hand@gmail.com for questions or assistance */ #ifndef _TNEF_ERRORS_ #define _TNEF_ERRORS_ #define YTNEF_CANNOT_INIT_DATA -1 #define YTNEF_NOT_TNEF_STREAM -2 #define YTNEF_ERROR_READING_DATA -3 #define YTNEF_NO_KEY -4 #define YTNEF_BAD_CHECKSUM -5 #define YTNEF_ERROR_IN_HANDLER -6 #define YTNEF_UNKNOWN_PROPERTY -7 #define YTNEF_INCORRECT_SETUP -8 #endif ytnef-2.0/lib/tnef-types.h000066400000000000000000000061531406511276600155320ustar00rootroot00000000000000/* * Yerase's TNEF Stream Reader Library * Copyright (C) 2003 Randall E. Hand * * 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., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA * * You can contact me at randall.hand@gmail.com for questions or assistance */ #ifndef _TNEF_TYPES_H_ #define _TNEF_TYPES_H_ #define BYTE unsigned char #define WORD unsigned short int #define DWORD unsigned int #define ULONG unsigned int #define DDWORD unsigned long long typedef struct { WORD atyp; ULONG ulPosition; WORD dxWidth; WORD dyHeight; DWORD dwFlags; } renddata; /* ----------------------------------- */ /* TNEF Down-level Date/Time Structure */ /* ----------------------------------- */ typedef struct { WORD wYear; WORD wMonth; WORD wDay; WORD wHour; WORD wMinute; WORD wSecond; WORD wDayOfWeek; } dtr; typedef struct { BYTE *data; int size; } variableLength; typedef struct { DWORD custom; BYTE guid[16]; DWORD id; ULONG count; int namedproperty; variableLength *propnames; variableLength *data; } MAPIProperty; typedef struct MAPIProps { DWORD count; MAPIProperty *properties; } MAPIProps; typedef struct Attachment { dtr Date; variableLength Title; variableLength MetaFile; dtr CreateDate; dtr ModifyDate; variableLength TransportFilename; renddata RenderData; MAPIProps MAPI; struct Attachment *next; variableLength FileData; variableLength IconData; } Attachment; typedef struct _TNEFIOStruct { int (*InitProc)(struct _TNEFIOStruct *IO); int (*ReadProc)(struct _TNEFIOStruct *IO, int size, int count, void *dest); int (*CloseProc)(struct _TNEFIOStruct *IO); void *data; } TNEFIOStruct; typedef struct { char *filename; FILE *fptr; int Debug; } TNEFFileInfo; typedef struct { BYTE *dataStart; BYTE *ptr; long size; int Debug; } TNEFMemInfo; typedef struct { char version[16]; variableLength from; variableLength subject; dtr dateSent; dtr dateReceived; char messageStatus[10]; char messageClass[50]; char messageID[50]; char parentID[50]; char conversationID[50]; variableLength body; char priority[10]; Attachment starting_attach; dtr dateModified; MAPIProps MapiProperties; variableLength CodePage; variableLength OriginalMessageClass; variableLength Owner; variableLength SentFor; variableLength Delegate; dtr DateStart; dtr DateEnd; variableLength AidOwner; int RequestRes; int Debug; TNEFIOStruct IO; int attachmentSize; } TNEFStruct; #endif ytnef-2.0/lib/ytnef.c000066400000000000000000001356731406511276600145660ustar00rootroot00000000000000/* * Yerase's TNEF Stream Reader Library * Copyright (C) 2003 Randall E. Hand * * 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., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA * * You can contact me at randall.hand@gmail.com for questions or assistance */ #include #include #include #include #include #include "ytnef.h" #include "tnef-errors.h" #include "mapi.h" #include "mapidefs.h" #include "mapitags.h" #include "config.h" #define RTF_PREBUF "{\\rtf1\\ansi\\mac\\deff0\\deftab720{\\fonttbl;}{\\f0\\fnil \\froman \\fswiss \\fmodern \\fscript \\fdecor MS Sans SerifSymbolArialTimes New RomanCourier{\\colortbl\\red0\\green0\\blue0\n\r\\par \\pard\\plain\\f0\\fs20\\b\\i\\u\\tab\\tx" #define DEBUG(lvl, curlvl, msg) \ if ((lvl) >= (curlvl)) \ printf("DEBUG(%i/%i): %s\n", curlvl, lvl, msg); #define DEBUG1(lvl, curlvl, msg, var1) \ if ((lvl) >= (curlvl)) { \ printf("DEBUG(%i/%i):", curlvl, lvl); \ printf(msg, var1); \ printf("\n"); \ } #define DEBUG2(lvl, curlvl, msg, var1, var2) \ if ((lvl) >= (curlvl)) { \ printf("DEBUG(%i/%i):", curlvl, lvl); \ printf(msg, var1, var2); \ printf("\n"); \ } #define DEBUG3(lvl, curlvl, msg, var1, var2, var3) \ if ((lvl) >= (curlvl)) { \ printf("DEBUG(%i/%i):", curlvl, lvl); \ printf(msg, var1, var2,var3); \ printf("\n"); \ } #define MIN(x,y) (((x)<(y))?(x):(y)) #define PREALLOCCHECK(sz,max) { if(sz==0||(unsigned)sz>max) { printf("ERROR: invalid alloc size %u at %s : %i, suspected corruption (exceeded %i bytes)\n", (unsigned)sz, __FILE__, __LINE__, max); return(-1); } } #define ALLOCCHECK(x) { if(!x) { printf("Out of Memory at %s : %i\n", __FILE__, __LINE__); return(-1); } } #define ALLOCCHECK_CHAR(x) { if(!x) { printf("Out of Memory at %s : %i\n", __FILE__, __LINE__); return(NULL); } } #define SIZECHECK(x) { if ((((char *)d - (char *)data) + x) > size) { printf("Corrupted file detected at %s : %i\n", __FILE__, __LINE__); return(-1); } } int TNEFFillMapi(TNEFStruct *TNEF, BYTE *data, DWORD size, MAPIProps *p); void SetFlip(void); int TNEFDefaultHandler STD_ARGLIST; int TNEFAttachmentFilename STD_ARGLIST; int TNEFAttachmentSave STD_ARGLIST; int TNEFDetailedPrint STD_ARGLIST; int TNEFHexBreakdown STD_ARGLIST; int TNEFBody STD_ARGLIST; int TNEFRendData STD_ARGLIST; int TNEFDateHandler STD_ARGLIST; int TNEFPriority STD_ARGLIST; int TNEFVersion STD_ARGLIST; int TNEFMapiProperties STD_ARGLIST; int TNEFIcon STD_ARGLIST; int TNEFSubjectHandler STD_ARGLIST; int TNEFFromHandler STD_ARGLIST; int TNEFRecipTable STD_ARGLIST; int TNEFAttachmentMAPI STD_ARGLIST; int TNEFSentFor STD_ARGLIST; int TNEFMessageClass STD_ARGLIST; int TNEFMessageID STD_ARGLIST; int TNEFParentID STD_ARGLIST; int TNEFOriginalMsgClass STD_ARGLIST; int TNEFCodePage STD_ARGLIST; BYTE *TNEFFileContents = NULL; DWORD TNEFFileContentsSize; BYTE *TNEFFileIcon = NULL; DWORD TNEFFileIconSize; int IsCompressedRTF(variableLength *p); TNEFHandler TNEFList[] = { {attNull, "Null", TNEFDefaultHandler}, {attFrom, "From", TNEFFromHandler}, {attSubject, "Subject", TNEFSubjectHandler}, {attDateSent, "Date Sent", TNEFDateHandler}, {attDateRecd, "Date Received", TNEFDateHandler}, {attMessageStatus, "Message Status", TNEFDefaultHandler}, {attMessageClass, "Message Class", TNEFMessageClass}, {attMessageID, "Message ID", TNEFMessageID}, {attParentID, "Parent ID", TNEFParentID}, {attConversationID, "Conversation ID", TNEFDefaultHandler}, {attBody, "Body", TNEFBody}, {attPriority, "Priority", TNEFPriority}, {attAttachData, "Attach Data", TNEFAttachmentSave}, {attAttachTitle, "Attach Title", TNEFAttachmentFilename}, {attAttachMetaFile, "Attach Meta-File", TNEFIcon}, {attAttachCreateDate, "Attachment Create Date", TNEFDateHandler}, {attAttachModifyDate, "Attachment Modify Date", TNEFDateHandler}, {attDateModified, "Date Modified", TNEFDateHandler}, {attAttachTransportFilename, "Attachment Transport name", TNEFDefaultHandler}, {attAttachRenddata, "Attachment Display info", TNEFRendData}, {attMAPIProps, "MAPI Properties", TNEFMapiProperties}, {attRecipTable, "Recip Table", TNEFRecipTable}, {attAttachment, "Attachment", TNEFAttachmentMAPI}, {attTnefVersion, "TNEF Version", TNEFVersion}, {attOemCodepage, "OEM CodePage", TNEFCodePage}, {attOriginalMessageClass, "Original Message Class", TNEFOriginalMsgClass}, {attOwner, "Owner", TNEFDefaultHandler}, {attSentFor, "Sent For", TNEFSentFor}, {attDelegate, "Delegate", TNEFDefaultHandler}, {attDateStart, "Date Start", TNEFDateHandler}, {attDateEnd, "Date End", TNEFDateHandler}, {attAidOwner, "Aid Owner", TNEFDefaultHandler}, {attRequestRes, "Request Response", TNEFDefaultHandler} }; WORD SwapWord(BYTE *p, int size) { union BYTES2WORD { WORD word; BYTE bytes[sizeof(WORD)]; }; union BYTES2WORD converter; converter.word = 0; int i = 0; int correct = size > sizeof(WORD) ? sizeof(WORD) : size; #ifdef WORDS_BIGENDIAN for (i = 0; i < correct; ++i) { converter.bytes[i] = p[correct - i]; } #else for (i = 0; i < correct; ++i) { converter.bytes[i] = p[i]; } #endif return converter.word; } DWORD SwapDWord(BYTE *p, int size) { union BYTES2DWORD { DWORD dword; BYTE bytes[sizeof(DWORD)]; }; union BYTES2DWORD converter; converter.dword = 0; int i = 0; int correct = size > sizeof(DWORD) ? sizeof(DWORD) : size; #ifdef WORDS_BIGENDIAN for (i = 0; i < correct; ++i) { converter.bytes[i] = p[correct - i]; } #else for (i = 0; i < correct; ++i) { converter.bytes[i] = p[i]; } #endif return converter.dword; } DDWORD SwapDDWord(BYTE *p, int size) { union BYTES2DDWORD { DDWORD ddword; BYTE bytes[sizeof(DDWORD)]; }; union BYTES2DDWORD converter; converter.ddword = 0; int i = 0; int correct = size > sizeof(DDWORD) ? sizeof(DDWORD) : size; #ifdef WORDS_BIGENDIAN for (i = 0; i < correct; ++i) { converter.bytes[i] = p[correct - i]; } #else for (i = 0; i < correct; ++i) { converter.bytes[i] = p[i]; } #endif return converter.ddword; } /* convert 16-bit unicode to UTF8 unicode */ char *to_utf8(size_t len, char *buf) { int i, j = 0; // an arbitrary length limit should be imposed by the caller of this function char *utf8 = malloc(3 * len / 2 + 1); for (i = 0; i < len - 1; i += 2) { unsigned int c = SwapWord((BYTE *)buf + i, 2); if (c <= 0x007f) { utf8[j++] = 0x00 | ((c & 0x007f) >> 0); } else if (c < 0x07ff) { utf8[j++] = 0xc0 | ((c & 0x07c0) >> 6); utf8[j++] = 0x80 | ((c & 0x003f) >> 0); } else { utf8[j++] = 0xe0 | ((c & 0xf000) >> 12); utf8[j++] = 0x80 | ((c & 0x0fc0) >> 6); utf8[j++] = 0x80 | ((c & 0x003f) >> 0); } } /* just in case the original was not null terminated */ utf8[j++] = '\0'; return utf8; } // ----------------------------------------------------------------------------- int TNEFDefaultHandler STD_ARGLIST { if (TNEF->Debug >= 1) printf("%s: [%i] %.*s\n", TNEFList[id].name, size, size, data); return 0; } // ----------------------------------------------------------------------------- int TNEFCodePage STD_ARGLIST { TNEF->CodePage.size = size; TNEF->CodePage.data = calloc(size, sizeof(BYTE)); ALLOCCHECK(TNEF->CodePage.data); memcpy(TNEF->CodePage.data, data, size); return 0; } // ----------------------------------------------------------------------------- int TNEFParentID STD_ARGLIST { memcpy(TNEF->parentID, data, MIN(size, sizeof(TNEF->parentID))); return 0; } // ----------------------------------------------------------------------------- int TNEFMessageID STD_ARGLIST { memcpy(TNEF->messageID, data, MIN(size, sizeof(TNEF->messageID))); return 0; } // ----------------------------------------------------------------------------- int TNEFBody STD_ARGLIST { TNEF->body.size = size; PREALLOCCHECK(size, 100000); TNEF->body.data = calloc(size+1, sizeof(BYTE)); ALLOCCHECK(TNEF->body.data); memcpy(TNEF->body.data, data, size); return 0; } // ----------------------------------------------------------------------------- int TNEFOriginalMsgClass STD_ARGLIST { TNEF->OriginalMessageClass.size = size; PREALLOCCHECK(size, 100); TNEF->OriginalMessageClass.data = calloc(size+1, sizeof(BYTE)); ALLOCCHECK(TNEF->OriginalMessageClass.data); memcpy(TNEF->OriginalMessageClass.data, data, size); return 0; } // ----------------------------------------------------------------------------- int TNEFMessageClass STD_ARGLIST { memcpy(TNEF->messageClass, data, MIN(size, sizeof(TNEF->messageClass)-1)); return 0; } // ----------------------------------------------------------------------------- int TNEFFromHandler STD_ARGLIST { PREALLOCCHECK(size, 100); TNEF->from.data = calloc(size+1, sizeof(BYTE)); ALLOCCHECK(TNEF->from.data); TNEF->from.size = size; memcpy(TNEF->from.data, data, size); return 0; } // ----------------------------------------------------------------------------- int TNEFSubjectHandler STD_ARGLIST { if (TNEF->subject.data) { free(TNEF->subject.data); TNEF->subject.data = NULL; } PREALLOCCHECK(size, 100); TNEF->subject.data = calloc(size+1, sizeof(BYTE)); ALLOCCHECK(TNEF->subject.data); TNEF->subject.size = size; memcpy(TNEF->subject.data, data, size); return 0; } // ----------------------------------------------------------------------------- int TNEFRendData STD_ARGLIST { Attachment *p; // Find the last attachment. p = &(TNEF->starting_attach); while (p->next != NULL) p = p->next; // Add a new one p->next = calloc(1, sizeof(Attachment)); ALLOCCHECK(p->next); p = p->next; TNEFInitAttachment(p); int correct = (size >= sizeof(renddata)) ? sizeof(renddata) : size; memcpy(&(p->RenderData), data, correct); return 0; } // ----------------------------------------------------------------------------- int TNEFVersion STD_ARGLIST { WORD major; WORD minor; if (size != 2 * sizeof(WORD)) { printf("Incorrect size of version field, suspected corruption\n"); return -1; } minor = SwapWord((BYTE*)data, size); major = SwapWord((BYTE*)data + 2, size - 2); snprintf(TNEF->version, sizeof(TNEF->version), "TNEF%i.%i", major, minor); return 0; } // ----------------------------------------------------------------------------- int TNEFIcon STD_ARGLIST { Attachment *p; // Find the last attachment. p = &(TNEF->starting_attach); while (p->next != NULL) p = p->next; p->IconData.size = size; PREALLOCCHECK(size, 10000); p->IconData.data = calloc(size, sizeof(BYTE)); ALLOCCHECK(p->IconData.data); memcpy(p->IconData.data, data, size); return 0; } // ----------------------------------------------------------------------------- int TNEFRecipTable STD_ARGLIST { DWORD count; BYTE *d; int current_row; int propcount; int current_prop; d = (BYTE*)data; SIZECHECK(sizeof(DWORD)); count = SwapDWord((BYTE*)d, sizeof(DWORD)); d += sizeof(DWORD); // printf("Recipient Table containing %u rows\n", count); return 0; for (current_row = 0; current_row < count; current_row++) { propcount = SwapDWord((BYTE*)d, sizeof(DWORD)); if (TNEF->Debug >= 1) printf("> Row %i contains %i properties\n", current_row, propcount); d += sizeof(DWORD); for (current_prop = 0; current_prop < propcount; current_prop++) { } } return 0; } // ----------------------------------------------------------------------------- int TNEFAttachmentMAPI STD_ARGLIST { Attachment *p; // Find the last attachment. // p = &(TNEF->starting_attach); while (p->next != NULL) p = p->next; return TNEFFillMapi(TNEF, (BYTE*)data, size, &(p->MAPI)); } // ----------------------------------------------------------------------------- int TNEFMapiProperties STD_ARGLIST { if (TNEFFillMapi(TNEF, (BYTE*)data, size, &(TNEF->MapiProperties)) < 0) { printf("ERROR Parsing MAPI block\n"); return -1; }; if (TNEF->Debug >= 3) { MAPIPrint(&(TNEF->MapiProperties)); } return 0; } int TNEFFillMapi(TNEFStruct *TNEF, BYTE *data, DWORD size, MAPIProps *p) { int i, j; DWORD num; BYTE *d; MAPIProperty *mp; DWORD type; DWORD length; variableLength *vl; WORD temp_word; DWORD temp_dword; DDWORD temp_ddword; int mp_count = 0, p_count = 0; int count = -1; int offset; d = data; SIZECHECK(sizeof(DWORD)); p_count = SwapDWord((BYTE*)data, sizeof(DWORD)); d += sizeof(DWORD); // Arbitrary limit on the amount of properties PREALLOCCHECK(p_count, 1000); p->properties = calloc(p_count, sizeof(MAPIProperty)); ALLOCCHECK(p->properties); p->count = p_count; mp = p->properties; for (i = 0; i < p->count; i++) { if (count == -1) { SIZECHECK(sizeof(DWORD)); mp->id = SwapDWord((BYTE*)d, sizeof(DWORD)); d += sizeof(DWORD); mp->custom = 0; mp_count = 1; mp->namedproperty = 0; length = -1; if (PROP_ID(mp->id) >= 0x8000) { // Read the GUID SIZECHECK(16); memcpy(&(mp->guid[0]), d, 16); d += 16; SIZECHECK(sizeof(DWORD)); length = SwapDWord((BYTE*)d, sizeof(DWORD)); d += sizeof(DWORD); if (length > 0) { PREALLOCCHECK(length, 1000); mp->propnames = calloc(length, sizeof(variableLength)); ALLOCCHECK(mp->propnames); mp->namedproperty = length; while (length > 0) { SIZECHECK(sizeof(DWORD)); type = SwapDWord((BYTE*)d, sizeof(DWORD)); d += sizeof(DWORD); PREALLOCCHECK(type, 100); mp->propnames[length - 1].data = calloc(type+1, sizeof(BYTE)); ALLOCCHECK(mp->propnames[length - 1].data); mp->propnames[length - 1].size = type; SIZECHECK(type); for (j = 0; j < (type >> 1); j++) { mp->propnames[length - 1].data[j] = d[j * 2]; } d += type + ((type % 4) ? (4 - type % 4) : 0); length--; } } else { // READ the type SIZECHECK(sizeof(DWORD)); type = SwapDWord((BYTE*)d, sizeof(DWORD)); d += sizeof(DWORD); mp->id = PROP_TAG(PROP_TYPE(mp->id), type); } mp->custom = 1; } DEBUG2(TNEF->Debug, 3, "Type id = %04x, Prop id = %04x", PROP_TYPE(mp->id), PROP_ID(mp->id)); if (PROP_TYPE(mp->id) & MV_FLAG) { mp->id = PROP_TAG(PROP_TYPE(mp->id) - MV_FLAG, PROP_ID(mp->id)); SIZECHECK(sizeof(DWORD)); mp_count = SwapDWord((BYTE*)d, sizeof(DWORD)); d += sizeof(DWORD); count = 0; } PREALLOCCHECK(mp_count, 1000); mp->data = calloc(mp_count, sizeof(variableLength)); ALLOCCHECK(mp->data); mp->count = mp_count; vl = mp->data; } else { i--; count++; vl = &(mp->data[count]); } switch (PROP_TYPE(mp->id)) { case PT_BINARY: case PT_OBJECT: case PT_STRING8: case PT_UNICODE: // First number of objects (assume 1 for now) if (count == -1) { SIZECHECK(sizeof(DWORD)); vl->size = SwapDWord((BYTE*)d, sizeof(DWORD)); d += sizeof(DWORD); } // now size of object SIZECHECK(sizeof(DWORD)); vl->size = SwapDWord((BYTE*)d, sizeof(DWORD)); d += sizeof(DWORD); // now actual object if (vl->size != 0) { SIZECHECK(vl->size); PREALLOCCHECK(vl->size, 524288); if (PROP_TYPE(mp->id) == PT_UNICODE) { vl->data =(BYTE*) to_utf8(vl->size, (char*)d); if(vl->data == NULL) return -1; } else { vl->data = calloc(vl->size, sizeof(BYTE)); ALLOCCHECK(vl->data); memcpy(vl->data, d, vl->size); } } else { vl->data = NULL; } // Make sure to read in a multiple of 4 num = vl->size; offset = ((num % 4) ? (4 - num % 4) : 0); d += num + ((num % 4) ? (4 - num % 4) : 0); break; case PT_I2: // Read in 2 bytes, but proceed by 4 bytes vl->size = 2; PREALLOCCHECK(vl->size, 10000); vl->data = calloc(vl->size, sizeof(WORD)); ALLOCCHECK(vl->data); SIZECHECK(sizeof(WORD)) temp_word = SwapWord((BYTE*)d, sizeof(WORD)); memcpy(vl->data, &temp_word, vl->size); d += 4; break; case PT_BOOLEAN: case PT_LONG: case PT_R4: case PT_CURRENCY: case PT_APPTIME: case PT_ERROR: vl->size = 4; PREALLOCCHECK(vl->size, 10000); vl->data = calloc(vl->size, sizeof(BYTE)); ALLOCCHECK(vl->data); SIZECHECK(4); temp_dword = SwapDWord((BYTE*)d, 4); memcpy(vl->data, &temp_dword, vl->size); d += 4; break; case PT_DOUBLE: case PT_I8: case PT_SYSTIME: vl->size = 8; PREALLOCCHECK(vl->size, 10000); vl->data = calloc(vl->size, sizeof(BYTE)); ALLOCCHECK(vl->data); SIZECHECK(8); temp_ddword = SwapDDWord(d, 8); memcpy(vl->data, &temp_ddword, vl->size); d += 8; break; case PT_CLSID: vl->size = 16; PREALLOCCHECK(vl->size, 10000); vl->data = calloc(vl->size, sizeof(BYTE)); ALLOCCHECK(vl->data); SIZECHECK(vl->size); memcpy(vl->data, d, vl->size); d+=16; break; default: printf("Bad file\n"); return -1; } switch (PROP_ID(mp->id)) { case PR_SUBJECT: case PR_SUBJECT_IPM: case PR_ORIGINAL_SUBJECT: case PR_NORMALIZED_SUBJECT: case PR_CONVERSATION_TOPIC: DEBUG(TNEF->Debug, 3, "Got a Subject"); if (TNEF->subject.size == 0) { int i; DEBUG(TNEF->Debug, 3, "Assigning a Subject"); PREALLOCCHECK(vl->size, 100); TNEF->subject.data = calloc(vl->size+1, sizeof(BYTE)); ALLOCCHECK(TNEF->subject.data); TNEF->subject.size = vl->size; memcpy(TNEF->subject.data, vl->data, vl->size); // Unfortunately, we have to normalize out some invalid // characters, or else the file won't write for (i = 0; i != TNEF->subject.size; i++) { switch (TNEF->subject.data[i]) { case '\\': case '/': case '\0': TNEF->subject.data[i] = '_'; break; } } } break; } if (count == (mp->count - 1)) { count = -1; } if (count == -1) { mp++; } } if ((d - data) < size) { if (TNEF->Debug >= 1) { printf("ERROR DURING MAPI READ\n"); printf("Read %td bytes, Expected %u bytes\n", (d - data), size); printf("%td bytes missing\n", size - (d - data)); } return -1; } else if ((d - data) > size) { if (TNEF->Debug >= 1) { printf("ERROR DURING MAPI READ\n"); printf("Read %td bytes, Expected %u bytes\n", (d - data), size); printf("%li bytes extra\n", (d - data) - size); } return -1; } return 0; } // ----------------------------------------------------------------------------- int TNEFSentFor STD_ARGLIST { WORD name_length, addr_length; BYTE *d; d = (BYTE*)data; while ((d - (BYTE*)data) < size) { SIZECHECK(sizeof(WORD)); name_length = SwapWord((BYTE*)d, sizeof(WORD)); d += sizeof(WORD); SIZECHECK(name_length); if (TNEF->Debug >= 1) printf("Sent For : %.*s", name_length, d); d += name_length; SIZECHECK(sizeof(WORD)); addr_length = SwapWord((BYTE*)d, sizeof(WORD)); d += sizeof(WORD); SIZECHECK(addr_length); if (TNEF->Debug >= 1) printf("<%.*s>\n", addr_length, d); d += addr_length; } return 0; } // ----------------------------------------------------------------------------- int TNEFDateHandler STD_ARGLIST { dtr *Date; Attachment *p; WORD * tmp_src, *tmp_dst; int i; if (size < sizeof(dtr)) return -1; p = &(TNEF->starting_attach); switch (TNEFList[id].id) { case attDateSent: Date = &(TNEF->dateSent); break; case attDateRecd: Date = &(TNEF->dateReceived); break; case attDateModified: Date = &(TNEF->dateModified); break; case attDateStart: Date = &(TNEF->DateStart); break; case attDateEnd: Date = &(TNEF->DateEnd); break; case attAttachCreateDate: while (p->next != NULL) p = p->next; Date = &(p->CreateDate); break; case attAttachModifyDate: while (p->next != NULL) p = p->next; Date = &(p->ModifyDate); break; default: if (TNEF->Debug >= 1) printf("MISSING CASE\n"); return YTNEF_UNKNOWN_PROPERTY; } tmp_src = (WORD *)data; tmp_dst = (WORD *)Date; for (i = 0; i < sizeof(dtr) / sizeof(WORD); i++) { *tmp_dst++ = SwapWord((BYTE *)tmp_src++, sizeof(WORD)); } return 0; } void TNEFPrintDate(dtr Date) { char days[7][15] = {"Sunday", "Monday", "Tuesday", "Wednesday", "Thursday", "Friday", "Saturday" }; char months[12][15] = {"January", "February", "March", "April", "May", "June", "July", "August", "September", "October", "November", "December" }; if (Date.wDayOfWeek < 7) printf("%s ", days[Date.wDayOfWeek]); if ((Date.wMonth < 13) && (Date.wMonth > 0)) printf("%s ", months[Date.wMonth - 1]); printf("%hu, %hu ", Date.wDay, Date.wYear); if (Date.wHour > 12) printf("%i:%02hu:%02hu pm", (Date.wHour - 12), Date.wMinute, Date.wSecond); else if (Date.wHour == 12) printf("%hu:%02hu:%02hu pm", (Date.wHour), Date.wMinute, Date.wSecond); else printf("%hu:%02hu:%02hu am", Date.wHour, Date.wMinute, Date.wSecond); } // ----------------------------------------------------------------------------- int TNEFHexBreakdown STD_ARGLIST { int i; if (TNEF->Debug == 0) return 0; printf("%s: [%i bytes] \n", TNEFList[id].name, size); for (i = 0; i < size; i++) { printf("%02x ", data[i]); if ((i + 1) % 16 == 0) printf("\n"); } printf("\n"); return 0; } // ----------------------------------------------------------------------------- int TNEFDetailedPrint STD_ARGLIST { int i; if (TNEF->Debug == 0) return 0; printf("%s: [%i bytes] \n", TNEFList[id].name, size); for (i = 0; i < size; i++) { printf("%c", data[i]); } printf("\n"); return 0; } // ----------------------------------------------------------------------------- int TNEFAttachmentFilename STD_ARGLIST { Attachment *p; p = &(TNEF->starting_attach); while (p->next != NULL) p = p->next; p->Title.size = size; PREALLOCCHECK(size, 100); p->Title.data = calloc(size+1, sizeof(BYTE)); ALLOCCHECK(p->Title.data); memcpy(p->Title.data, data, size); return 0; } // ----------------------------------------------------------------------------- int TNEFAttachmentSave STD_ARGLIST { Attachment *p; p = &(TNEF->starting_attach); while (p->next != NULL) p = p->next; p->FileData.data = calloc(sizeof(char), size); ALLOCCHECK(p->FileData.data); p->FileData.size = size; memcpy(p->FileData.data, data, size); return 0; } // ----------------------------------------------------------------------------- int TNEFPriority STD_ARGLIST { DWORD value; value = SwapDWord((BYTE*)data, size); switch (value) { case 3: sprintf((TNEF->priority), "high"); break; case 2: sprintf((TNEF->priority), "normal"); break; case 1: sprintf((TNEF->priority), "low"); break; default: sprintf((TNEF->priority), "N/A"); break; } return 0; } // ----------------------------------------------------------------------------- int TNEFCheckForSignature(DWORD sig) { DWORD signature = 0x223E9F78; sig = SwapDWord((BYTE *)&sig, sizeof(DWORD)); if (signature == sig) { return 0; } else { return YTNEF_NOT_TNEF_STREAM; } } // ----------------------------------------------------------------------------- int TNEFGetKey(TNEFStruct *TNEF, WORD *key) { if (TNEF->IO.ReadProc(&(TNEF->IO), sizeof(WORD), 1, key) < 1) { if (TNEF->Debug >= 1) printf("Error reading Key\n"); return YTNEF_ERROR_READING_DATA; } *key = SwapWord((BYTE *)key, sizeof(WORD)); DEBUG1(TNEF->Debug, 2, "Key = 0x%X", *key); DEBUG1(TNEF->Debug, 2, "Key = %i", *key); return 0; } // ----------------------------------------------------------------------------- int TNEFGetHeader(TNEFStruct *TNEF, DWORD *type, DWORD *size) { BYTE component; DEBUG(TNEF->Debug, 2, "About to read Component"); if (TNEF->IO.ReadProc(&(TNEF->IO), sizeof(BYTE), 1, &component) < 1) { return YTNEF_ERROR_READING_DATA; } DEBUG(TNEF->Debug, 2, "About to read type"); if (TNEF->IO.ReadProc(&(TNEF->IO), sizeof(DWORD), 1, type) < 1) { if (TNEF->Debug >= 1) printf("ERROR: Error reading type\n"); return YTNEF_ERROR_READING_DATA; } DEBUG1(TNEF->Debug, 2, "Type = 0x%X", *type); DEBUG1(TNEF->Debug, 2, "Type = %u", *type); DEBUG(TNEF->Debug, 2, "About to read size"); if (TNEF->IO.ReadProc(&(TNEF->IO), sizeof(DWORD), 1, size) < 1) { if (TNEF->Debug >= 1) printf("ERROR: Error reading size\n"); return YTNEF_ERROR_READING_DATA; } DEBUG1(TNEF->Debug, 2, "Size = %u", *size); *type = SwapDWord((BYTE *)type, sizeof(DWORD)); *size = SwapDWord((BYTE *)size, sizeof(DWORD)); return 0; } // ----------------------------------------------------------------------------- int TNEFRawRead(TNEFStruct *TNEF, BYTE *data, DWORD size, WORD *checksum) { WORD temp; int i; if (TNEF->IO.ReadProc(&TNEF->IO, sizeof(BYTE), size, data) < size) { if (TNEF->Debug >= 1) printf("ERROR: Error reading data\n"); return YTNEF_ERROR_READING_DATA; } if (checksum != NULL) { *checksum = 0; for (i = 0; i < size; i++) { temp = data[i]; *checksum = (*checksum + temp); } } return 0; } #define INITVARLENGTH(x) (x).data = NULL; (x).size = 0; #define INITDTR(x) (x).wYear=0; (x).wMonth=0; (x).wDay=0; \ (x).wHour=0; (x).wMinute=0; (x).wSecond=0; \ (x).wDayOfWeek=0; #define INITSTR(x) memset((x), 0, sizeof(x)); void TNEFInitMapi(MAPIProps *p) { p->count = 0; p->properties = NULL; } void TNEFInitAttachment(Attachment *p) { INITDTR(p->Date); INITVARLENGTH(p->Title); INITVARLENGTH(p->MetaFile); INITDTR(p->CreateDate); INITDTR(p->ModifyDate); INITVARLENGTH(p->TransportFilename); INITVARLENGTH(p->FileData); INITVARLENGTH(p->IconData); memset(&(p->RenderData), 0, sizeof(renddata)); TNEFInitMapi(&(p->MAPI)); p->next = NULL; } void TNEFInitialize(TNEFStruct *TNEF) { INITSTR(TNEF->version); INITVARLENGTH(TNEF->from); INITVARLENGTH(TNEF->subject); INITDTR(TNEF->dateSent); INITDTR(TNEF->dateReceived); INITSTR(TNEF->messageStatus); INITSTR(TNEF->messageClass); INITSTR(TNEF->messageID); INITSTR(TNEF->parentID); INITSTR(TNEF->conversationID); INITVARLENGTH(TNEF->body); INITSTR(TNEF->priority); TNEFInitAttachment(&(TNEF->starting_attach)); INITDTR(TNEF->dateModified); TNEFInitMapi(&(TNEF->MapiProperties)); INITVARLENGTH(TNEF->CodePage); INITVARLENGTH(TNEF->OriginalMessageClass); INITVARLENGTH(TNEF->Owner); INITVARLENGTH(TNEF->SentFor); INITVARLENGTH(TNEF->Delegate); INITDTR(TNEF->DateStart); INITDTR(TNEF->DateEnd); INITVARLENGTH(TNEF->AidOwner); TNEF->RequestRes = 0; TNEF->IO.data = NULL; TNEF->IO.InitProc = NULL; TNEF->IO.ReadProc = NULL; TNEF->IO.CloseProc = NULL; TNEF->attachmentSize = 50; } #undef INITVARLENGTH #undef INITDTR #undef INITSTR #define FREEVARLENGTH(x) if ((x).size > 0) { \ free((x).data); (x).size =0; } void TNEFFree(TNEFStruct *TNEF) { Attachment *p, *store; FREEVARLENGTH(TNEF->from); FREEVARLENGTH(TNEF->subject); FREEVARLENGTH(TNEF->body); FREEVARLENGTH(TNEF->CodePage); FREEVARLENGTH(TNEF->OriginalMessageClass); FREEVARLENGTH(TNEF->Owner); FREEVARLENGTH(TNEF->SentFor); FREEVARLENGTH(TNEF->Delegate); FREEVARLENGTH(TNEF->AidOwner); TNEFFreeMapiProps(&(TNEF->MapiProperties)); p = TNEF->starting_attach.next; while (p != NULL) { TNEFFreeAttachment(p); store = p->next; free(p); p = store; } } void TNEFFreeAttachment(Attachment *p) { FREEVARLENGTH(p->Title); FREEVARLENGTH(p->MetaFile); FREEVARLENGTH(p->TransportFilename); FREEVARLENGTH(p->FileData); FREEVARLENGTH(p->IconData); TNEFFreeMapiProps(&(p->MAPI)); } void TNEFFreeMapiProps(MAPIProps *p) { int i, j; for (i = 0; i < p->count; i++) { for (j = 0; j < p->properties[i].count; j++) { FREEVARLENGTH(p->properties[i].data[j]); } free(p->properties[i].data); for (j = 0; j < p->properties[i].namedproperty; j++) { FREEVARLENGTH(p->properties[i].propnames[j]); } free(p->properties[i].propnames); } free(p->properties); p->count = 0; } #undef FREEVARLENGTH // Procedures to handle File IO int TNEFFile_Open(TNEFIOStruct *IO) { TNEFFileInfo *finfo; finfo = (TNEFFileInfo *)IO->data; DEBUG1(finfo->Debug, 3, "Opening %s", finfo->filename); if ((finfo->fptr = fopen(finfo->filename, "rb")) == NULL) { return -1; } else { return 0; } } int TNEFFile_Read(TNEFIOStruct *IO, int size, int count, void *dest) { TNEFFileInfo *finfo; finfo = (TNEFFileInfo *)IO->data; DEBUG2(finfo->Debug, 3, "Reading %i blocks of %i size", count, size); if (finfo->fptr != NULL) { return fread((BYTE *)dest, size, count, finfo->fptr); } else { return -1; } } int TNEFFile_Close(TNEFIOStruct *IO) { TNEFFileInfo *finfo; finfo = (TNEFFileInfo *)IO->data; DEBUG1(finfo->Debug, 3, "Closing file %s", finfo->filename); if (finfo->fptr != NULL) { fclose(finfo->fptr); finfo->fptr = NULL; } return 0; } int TNEFParseFile(char *filename, TNEFStruct *TNEF) { TNEFFileInfo finfo; if (TNEF->Debug >= 1) printf("Attempting to parse %s...\n", filename); finfo.filename = filename; finfo.fptr = NULL; finfo.Debug = TNEF->Debug; TNEF->IO.data = (void *)&finfo; TNEF->IO.InitProc = TNEFFile_Open; TNEF->IO.ReadProc = TNEFFile_Read; TNEF->IO.CloseProc = TNEFFile_Close; return TNEFParse(TNEF); } //------------------------------------------------------------- // Procedures to handle Memory IO int TNEFMemory_Open(TNEFIOStruct *IO) { TNEFMemInfo *minfo; minfo = (TNEFMemInfo *)IO->data; minfo->ptr = minfo->dataStart; return 0; } int TNEFMemory_Read(TNEFIOStruct *IO, int size, int count, void *dest) { TNEFMemInfo *minfo; int length; long max; minfo = (TNEFMemInfo *)IO->data; length = count * size; max = (minfo->dataStart + minfo->size) - (minfo->ptr); if (length > max) { return -1; } DEBUG1(minfo->Debug, 3, "Copying %i bytes", length); memcpy(dest, minfo->ptr, length); minfo->ptr += length; return count; } int TNEFMemory_Close(TNEFIOStruct *IO) { // Do nothing, really... return 0; } int TNEFParseMemory(BYTE *memory, long size, TNEFStruct *TNEF) { TNEFMemInfo minfo; DEBUG(TNEF->Debug, 1, "Attempting to parse memory block...\n"); minfo.dataStart = memory; minfo.ptr = memory; minfo.size = size; minfo.Debug = TNEF->Debug; TNEF->IO.data = (void *)&minfo; TNEF->IO.InitProc = TNEFMemory_Open; TNEF->IO.ReadProc = TNEFMemory_Read; TNEF->IO.CloseProc = TNEFMemory_Close; return TNEFParse(TNEF); } int TNEFParse(TNEFStruct *TNEF) { WORD key; DWORD type; DWORD size; DWORD signature; BYTE *data; WORD checksum, header_checksum; int i; if (TNEF->IO.ReadProc == NULL) { printf("ERROR: Setup incorrectly: No ReadProc\n"); return YTNEF_INCORRECT_SETUP; } if (TNEF->IO.InitProc != NULL) { DEBUG(TNEF->Debug, 2, "About to initialize"); if (TNEF->IO.InitProc(&TNEF->IO) != 0) { return YTNEF_CANNOT_INIT_DATA; } DEBUG(TNEF->Debug, 2, "Initialization finished"); } DEBUG(TNEF->Debug, 2, "Reading Signature"); if (TNEF->IO.ReadProc(&TNEF->IO, sizeof(DWORD), 1, &signature) < 1) { printf("ERROR: Error reading signature\n"); if (TNEF->IO.CloseProc != NULL) { TNEF->IO.CloseProc(&TNEF->IO); } return YTNEF_ERROR_READING_DATA; } DEBUG(TNEF->Debug, 2, "Checking Signature"); if (TNEFCheckForSignature(signature) < 0) { printf("ERROR: Signature does not match. Not TNEF.\n"); if (TNEF->IO.CloseProc != NULL) { TNEF->IO.CloseProc(&TNEF->IO); } return YTNEF_NOT_TNEF_STREAM; } DEBUG(TNEF->Debug, 2, "Reading Key."); if (TNEFGetKey(TNEF, &key) < 0) { printf("ERROR: Unable to retrieve key.\n"); if (TNEF->IO.CloseProc != NULL) { TNEF->IO.CloseProc(&TNEF->IO); } return YTNEF_NO_KEY; } DEBUG(TNEF->Debug, 2, "Starting Full Processing."); while (TNEFGetHeader(TNEF, &type, &size) == 0) { DEBUG2(TNEF->Debug, 2, "Header says type=0x%X, size=%u", type, size); DEBUG2(TNEF->Debug, 2, "Header says type=%u, size=%u", type, size); if(size == 0) { printf("ERROR: Field with size of 0\n"); return YTNEF_ERROR_READING_DATA; } PREALLOCCHECK(size, TNEF->attachmentSize*1024*1024); data = calloc(size, sizeof(BYTE)); ALLOCCHECK(data); if (TNEFRawRead(TNEF, data, size, &header_checksum) < 0) { printf("ERROR: Unable to read data.\n"); if (TNEF->IO.CloseProc != NULL) { TNEF->IO.CloseProc(&TNEF->IO); } free(data); return YTNEF_ERROR_READING_DATA; } if (TNEFRawRead(TNEF, (BYTE *)&checksum, 2, NULL) < 0) { printf("ERROR: Unable to read checksum.\n"); if (TNEF->IO.CloseProc != NULL) { TNEF->IO.CloseProc(&TNEF->IO); } free(data); return YTNEF_ERROR_READING_DATA; } checksum = SwapWord((BYTE *)&checksum, sizeof(WORD)); if (checksum != header_checksum) { printf("ERROR: Checksum mismatch. Data corruption?:\n"); if (TNEF->IO.CloseProc != NULL) { TNEF->IO.CloseProc(&TNEF->IO); } free(data); return YTNEF_BAD_CHECKSUM; } for (i = 0; i < (sizeof(TNEFList) / sizeof(TNEFHandler)); i++) { if (TNEFList[i].id == type) { if (TNEFList[i].handler != NULL) { if (TNEFList[i].handler(TNEF, i, (char*)data, size) < 0) { free(data); if (TNEF->IO.CloseProc != NULL) { TNEF->IO.CloseProc(&TNEF->IO); } return YTNEF_ERROR_IN_HANDLER; } else { // Found our handler and processed it. now time to get out break; } } else { DEBUG2(TNEF->Debug, 1, "No handler for %s: %u bytes", TNEFList[i].name, size); } } } free(data); } if (TNEF->IO.CloseProc != NULL) { TNEF->IO.CloseProc(&TNEF->IO); } return 0; } // ---------------------------------------------------------------------------- variableLength *MAPIFindUserProp(MAPIProps *p, unsigned int ID) { int i; if (p != NULL) { for (i = 0; i < p->count; i++) { if ((p->properties[i].id == ID) && (p->properties[i].custom == 1)) { return (p->properties[i].data); } } } return MAPI_UNDEFINED; } variableLength *MAPIFindProperty(MAPIProps *p, unsigned int ID) { int i; if (p != NULL) { for (i = 0; i < p->count; i++) { if ((p->properties[i].id == ID) && (p->properties[i].custom == 0)) { return (p->properties[i].data); } } } return MAPI_UNDEFINED; } int MAPISysTimetoDTR(BYTE *data, dtr *thedate) { DDWORD ddword_tmp; int startingdate = 0; int tmp_date; int days_in_year = 365; unsigned int months[] = {31, 28, 31, 30, 31, 30, 31, 31, 30, 31, 30, 31}; ddword_tmp = *((DDWORD *)data); ddword_tmp = ddword_tmp / 10; // micro-s ddword_tmp /= 1000; // ms ddword_tmp /= 1000; // s thedate->wSecond = (ddword_tmp % 60); ddword_tmp /= 60; // seconds to minutes thedate->wMinute = (ddword_tmp % 60); ddword_tmp /= 60; //minutes to hours thedate->wHour = (ddword_tmp % 24); ddword_tmp /= 24; // Hours to days // Now calculate the year based on # of days thedate->wYear = 1601; startingdate = 1; while (ddword_tmp >= days_in_year) { ddword_tmp -= days_in_year; thedate->wYear++; days_in_year = 365; startingdate++; if ((thedate->wYear % 4) == 0) { if ((thedate->wYear % 100) == 0) { // if the year is 1700,1800,1900, etc, then it is only // a leap year if exactly divisible by 400, not 4. if ((thedate->wYear % 400) == 0) { startingdate++; days_in_year = 366; } } else { startingdate++; days_in_year = 366; } } startingdate %= 7; } // the remaining number is the day # in this year // So now calculate the Month, & Day of month if ((thedate->wYear % 4) == 0) { // 29 days in february in a leap year months[1] = 29; } tmp_date = (int)ddword_tmp; thedate->wDayOfWeek = (tmp_date + startingdate) % 7; thedate->wMonth = 0; while (tmp_date > months[thedate->wMonth]) { tmp_date -= months[thedate->wMonth]; thedate->wMonth++; } thedate->wMonth++; thedate->wDay = tmp_date + 1; return 0; } void MAPIPrint(MAPIProps *p) { int j, i, index, h, x; DDWORD *ddword_ptr; DDWORD ddword_tmp; dtr thedate; MAPIProperty *mapi; variableLength *mapidata; variableLength vlTemp; int found; for (j = 0; j < p->count; j++) { mapi = &(p->properties[j]); printf(" #%i: Type: [", j); switch (PROP_TYPE(mapi->id)) { case PT_UNSPECIFIED: printf(" NONE "); break; case PT_NULL: printf(" NULL "); break; case PT_I2: printf(" I2 "); break; case PT_LONG: printf(" LONG "); break; case PT_R4: printf(" R4 "); break; case PT_DOUBLE: printf(" DOUBLE "); break; case PT_CURRENCY: printf("CURRENCY "); break; case PT_APPTIME: printf("APP TIME "); break; case PT_ERROR: printf(" ERROR "); break; case PT_BOOLEAN: printf(" BOOLEAN "); break; case PT_OBJECT: printf(" OBJECT "); break; case PT_I8: printf(" I8 "); break; case PT_STRING8: printf(" STRING8 "); break; case PT_UNICODE: printf(" UNICODE "); break; case PT_SYSTIME: printf("SYS TIME "); break; case PT_CLSID: printf("OLE GUID "); break; case PT_BINARY: printf(" BINARY "); break; default: printf("<%x>", PROP_TYPE(mapi->id)); break; } printf("] Code: ["); if (mapi->custom == 1) { printf("UD:x%04x", PROP_ID(mapi->id)); } else { found = 0; for (index = 0; index < sizeof(MPList) / sizeof(MAPIPropertyTagList); index++) { if ((MPList[index].id == PROP_ID(mapi->id)) && (found == 0)) { printf("%s", MPList[index].name); found = 1; } } if (found == 0) { printf("0x%04x", PROP_ID(mapi->id)); } } printf("]\n"); if (mapi->namedproperty > 0) { for (i = 0; i < mapi->namedproperty; i++) { printf(" Name: %s\n", mapi->propnames[i].data); } } for (i = 0; i < mapi->count; i++) { mapidata = &(mapi->data[i]); if (mapi->count > 1) { printf(" [%i/%u] ", i, mapi->count); } else { printf(" "); } printf("Size: %i", mapidata->size); switch (PROP_TYPE(mapi->id)) { case PT_SYSTIME: MAPISysTimetoDTR(mapidata->data, &thedate); printf(" Value: "); ddword_tmp = *((DDWORD *)mapidata->data); TNEFPrintDate(thedate); printf(" [HEX: "); for (x = 0; x < sizeof(ddword_tmp); x++) { printf(" %02x", (BYTE)mapidata->data[x]); } printf("] (%llu)\n", ddword_tmp); break; case PT_LONG: printf(" Value: %i\n", *((int*)mapidata->data)); break; case PT_I2: printf(" Value: %hi\n", *((short int*)mapidata->data)); break; case PT_BOOLEAN: if (mapi->data->data[0] != 0) { printf(" Value: True\n"); } else { printf(" Value: False\n"); } break; case PT_OBJECT: printf("\n"); break; case PT_BINARY: if (IsCompressedRTF(mapidata) == 1) { printf(" Detected Compressed RTF. "); printf("Decompressed text follows\n"); printf("-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-\n"); if ((vlTemp.data = (BYTE*)DecompressRTF(mapidata, &(vlTemp.size))) != NULL) { printf("%s\n", vlTemp.data); free(vlTemp.data); } printf("-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-\n"); } else { printf(" Value: ["); for (h = 0; h < mapidata->size; h++) { if (isprint(mapidata->data[h])) { printf("%c", mapidata->data[h]); } else { printf("."); } } printf("]\n"); } break; case PT_STRING8: printf(" Value: [%.*s]\n", mapidata->size, mapidata->data); if (strlen((char*)mapidata->data) != mapidata->size - 1) { printf("Detected Hidden data: ["); for (h = 0; h < mapidata->size; h++) { if (isprint(mapidata->data[h])) { printf("%c", mapidata->data[h]); } else { printf("."); } } printf("]\n"); } break; case PT_CLSID: printf(" Value: "); printf("[HEX: "); for(x=0; x< 16; x++) { printf(" %02x", (BYTE)mapidata->data[x]); } printf("]\n"); break; default: printf(" Value: [%.*s]\n", mapidata->size, mapidata->data); } } } } int IsCompressedRTF(variableLength *p) { BYTE *src; ULONG magic; if (p->size < 3*sizeof(DWORD)) return 0; src = p->data; magic = SwapDWord((BYTE*)src + 2*sizeof(DWORD), sizeof(DWORD)); if (magic == 0x414c454d || magic == 0x75465a4c) { return 1; } else { return 0; } } BYTE *DecompressRTF(variableLength *p, int *size) { BYTE *dst; // destination for uncompressed bytes BYTE *src; unsigned int in; unsigned int out; variableLength comp_Prebuf; ULONG compressedSize, uncompressedSize, magic; comp_Prebuf.size = strlen(RTF_PREBUF); comp_Prebuf.data = calloc(comp_Prebuf.size+1, 1); ALLOCCHECK_CHAR(comp_Prebuf.data); memcpy(comp_Prebuf.data, RTF_PREBUF, comp_Prebuf.size); src = p->data; in = 0; if (p->size < 20) { printf("File too small\n"); return(NULL); } compressedSize = (ULONG)SwapDWord((BYTE*)src + in, sizeof(DWORD)); in += sizeof(DWORD); uncompressedSize = (ULONG)SwapDWord((BYTE*)src + in, sizeof(DWORD)); in += sizeof(DWORD); magic = SwapDWord((BYTE*)src + in, sizeof(DWORD)); in += 2*sizeof(DWORD); // check size excluding the size field itself if (compressedSize != p->size - 4) { printf(" Size Mismatch: %u != %i\n", compressedSize, p->size - 4); free(comp_Prebuf.data); return NULL; } // process the data if (magic == 0x414c454d) { // magic number that identifies the stream as a uncompressed stream dst = calloc(uncompressedSize, 1); ALLOCCHECK_CHAR(dst); memcpy(dst, src + 4, uncompressedSize); } else if (magic == 0x75465a4c) { // magic number that identifies the stream as a compressed stream int flagCount = 0; int flags = 0; // Prevent overflow on 32 Bit Systems if (comp_Prebuf.size >= INT_MAX - uncompressedSize) { printf("Corrupted file\n"); return NULL; } dst = calloc(comp_Prebuf.size + uncompressedSize, 1); ALLOCCHECK_CHAR(dst); memcpy(dst, comp_Prebuf.data, comp_Prebuf.size); out = comp_Prebuf.size; while ((out < (comp_Prebuf.size + uncompressedSize)) && (in < p->size)) { // each flag byte flags 8 literals/references, 1 per bit flags = (flagCount++ % 8 == 0) ? src[in++] : flags >> 1; if ((flags & 1) == 1) { // each flag bit is 1 for reference, 0 for literal unsigned int offset = src[in++]; unsigned int length = src[in++]; unsigned int end; offset = (offset << 4) | (length >> 4); // the offset relative to block start length = (length & 0xF) + 2; // the number of bytes to copy // the decompression buffer is supposed to wrap around back // to the beginning when the end is reached. we save the // need for such a buffer by pointing straight into the data // buffer, and simulating this behaviour by modifying the // pointers appropriately. offset = (out / 4096) * 4096 + offset; if (offset >= out) // take from previous block offset -= 4096; // note: can't use System.arraycopy, because the referenced // bytes can cross through the current out position. end = offset + length; while ((offset < end) && (out < (comp_Prebuf.size + uncompressedSize)) && (offset < (comp_Prebuf.size + uncompressedSize))) dst[out++] = dst[offset++]; } else { // literal if ((out >= (comp_Prebuf.size + uncompressedSize)) || (in >= p->size)) { printf("Corrupted stream\n"); return NULL; } dst[out++] = src[in++]; } } // copy it back without the prebuffered data src = dst; dst = calloc(uncompressedSize, 1); ALLOCCHECK_CHAR(dst); memcpy(dst, src + comp_Prebuf.size, uncompressedSize); free(src); *size = uncompressedSize; free(comp_Prebuf.data); return dst; } else { // unknown magic number printf("Unknown compression type (magic number %x)\n", magic); } free(comp_Prebuf.data); return NULL; } ytnef-2.0/lib/ytnef.h000066400000000000000000000136161406511276600145630ustar00rootroot00000000000000/* * Yerase's TNEF Stream Reader Library * Copyright (C) 2003 Randall E. Hand * * 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., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA * * You can contact me at randall.hand@gmail.com for questions or assistance */ #ifndef _TNEF_PROCS_H_ #define _TNEF_PROCS_H_ #include "tnef-types.h" #include "mapi.h" #include "mapidefs.h" #define STD_ARGLIST (TNEFStruct *TNEF, int id, char *data, int size) DWORD SwapDWord(BYTE *p, int size); WORD SwapWord(BYTE *p, int size); void TNEFInitMapi(MAPIProps *p); void TNEFInitAttachment(Attachment *p); void TNEFInitialize(TNEFStruct *TNEF); void TNEFFree(TNEFStruct *TNEF); void TNEFFreeAttachment(Attachment *p); void TNEFFreeMapiProps(MAPIProps *p); int TNEFCheckForSignature(DWORD sig); int TNEFParseMemory(BYTE *memory, long size, TNEFStruct *TNEF); int TNEFParseFile(char *filename, TNEFStruct *TNEF); int TNEFParse(TNEFStruct *TNEF); variableLength *MAPIFindUserProp(MAPIProps *p, unsigned int ID); variableLength *MAPIFindProperty(MAPIProps *p, unsigned int ID); int MAPISysTimetoDTR(BYTE *data, dtr *thedate); void MAPIPrint(MAPIProps *p); void TNEFPrintDate(dtr Date); char *to_utf8(size_t len, char *buf); WORD SwapWord(BYTE *p, int size); DWORD SwapDWord(BYTE *p, int size); DDWORD SwapDDWord(BYTE *p, int size); variableLength *MAPIFindUserProp(MAPIProps *p, unsigned int ID); variableLength *MAPIFindProperty(MAPIProps *p, unsigned int ID); BYTE *DecompressRTF(variableLength *p, int *size); /* ------------------------------------- */ /* TNEF Down-level Attributes/Properties */ /* ------------------------------------- */ #define atpTriples ((WORD) 0x0000) #define atpString ((WORD) 0x0001) #define atpText ((WORD) 0x0002) #define atpDate ((WORD) 0x0003) #define atpShort ((WORD) 0x0004) #define atpLong ((WORD) 0x0005) #define atpByte ((WORD) 0x0006) #define atpWord ((WORD) 0x0007) #define atpDword ((WORD) 0x0008) #define atpMax ((WORD) 0x0009) #define LVL_MESSAGE ((BYTE) 0x01) #define LVL_ATTACHMENT ((BYTE) 0x02) #define ATT_ID(_att) ((WORD) ((_att) & 0x0000FFFF)) #define ATT_TYPE(_att) ((WORD) (((_att) >> 16) & 0x0000FFFF)) #define ATT(_atp, _id) ((((DWORD) (_atp)) << 16) | ((WORD) (_id))) #define attNull ATT( 0, 0x0000) #define attFrom ATT( atpTriples, 0x8000) /* PR_ORIGINATOR_RETURN_ADDRESS */ #define attSubject ATT( atpString, 0x8004) /* PR_SUBJECT */ #define attDateSent ATT( atpDate, 0x8005) /* PR_CLIENT_SUBMIT_TIME */ #define attDateRecd ATT( atpDate, 0x8006) /* PR_MESSAGE_DELIVERY_TIME */ #define attMessageStatus ATT( atpByte, 0x8007) /* PR_MESSAGE_FLAGS */ #define attMessageClass ATT( atpWord, 0x8008) /* PR_MESSAGE_CLASS */ #define attMessageID ATT( atpString, 0x8009) /* PR_MESSAGE_ID */ #define attParentID ATT( atpString, 0x800A) /* PR_PARENT_ID */ #define attConversationID ATT( atpString, 0x800B) /* PR_CONVERSATION_ID */ #define attBody ATT( atpText, 0x800C) /* PR_BODY */ #define attPriority ATT( atpShort, 0x800D) /* PR_IMPORTANCE */ #define attAttachData ATT( atpByte, 0x800F) /* PR_ATTACH_DATA_xxx */ #define attAttachTitle ATT( atpString, 0x8010) /* PR_ATTACH_FILENAME */ #define attAttachMetaFile ATT( atpByte, 0x8011) /* PR_ATTACH_RENDERING */ #define attAttachCreateDate ATT( atpDate, 0x8012) /* PR_CREATION_TIME */ #define attAttachModifyDate ATT( atpDate, 0x8013) /* PR_LAST_MODIFICATION_TIME */ #define attDateModified ATT( atpDate, 0x8020) /* PR_LAST_MODIFICATION_TIME */ #define attAttachTransportFilename ATT( atpByte, 0x9001) /* PR_ATTACH_TRANSPORT_NAME */ #define attAttachRenddata ATT( atpByte, 0x9002) #define attMAPIProps ATT( atpByte, 0x9003) #define attRecipTable ATT( atpByte, 0x9004) /* PR_MESSAGE_RECIPIENTS */ #define attAttachment ATT( atpByte, 0x9005) #define attTnefVersion ATT( atpDword, 0x9006) #define attOemCodepage ATT( atpByte, 0x9007) #define attOriginalMessageClass ATT( atpWord, 0x0006) /* PR_ORIG_MESSAGE_CLASS */ #define attOwner ATT( atpByte, 0x0000) /* PR_RCVD_REPRESENTING_xxx or PR_SENT_REPRESENTING_xxx */ #define attSentFor ATT( atpByte, 0x0001) /* PR_SENT_REPRESENTING_xxx */ #define attDelegate ATT( atpByte, 0x0002) /* PR_RCVD_REPRESENTING_xxx */ #define attDateStart ATT( atpDate, 0x0006) /* PR_DATE_START */ #define attDateEnd ATT( atpDate, 0x0007) /* PR_DATE_END */ #define attAidOwner ATT( atpLong, 0x0008) /* PR_OWNER_APPT_ID */ #define attRequestRes ATT( atpShort, 0x0009) /* PR_RESPONSE_REQUESTED */ typedef struct { DWORD id; char name[40]; int (*handler) STD_ARGLIST; } TNEFHandler; #endif ytnef-2.0/test-data/000077500000000000000000000000001406511276600143765ustar00rootroot00000000000000ytnef-2.0/test-data/Makefile.am000066400000000000000000000006041406511276600164320ustar00rootroot00000000000000EXTRA_DIST = \ long-filename.tnef \ missing-filenames.tnef \ multi-value-attribute.tnef \ one-file.tnef \ rtf.tnef \ test.sh \ winmail.dat \ results/208225_(5_seconds)_Voice_Mail.mp3 \ results/allproductsmar2000.dat \ results/bookmark.htm \ results/generpts.src \ results/TechlibDEC99-JAN00.doc \ results/TechlibNOV99.doc \ results/TechlibDEC99.doc \ results/zappa_av1.jpg ytnef-2.0/test-data/long-filename.tnef000066400000000000000000000162371406511276600200020ustar00rootroot00000000000000xź>""äč€IPM.Microsoft Mail.Note1€Ď ,LIPM.Microsoft Mail.Note1 €Ď *H €!44FBB0DD1E9DD311BAC80008C75D853FU€RE: license file” €„ O€ ŔFR…đ€ ŔFT…8.5 € ŔF…€ ŔF… € ŔF… € ŔF…€ ŔF…€ ŔF… € ŔF…€ ŔF…€ ŔF6… € ŔF7… € ŔF8… € ŔF € ŔF žš*LZFu«zu& rcpg125â2CtexA÷˙ €¤ä€óPV?U˛%Qchá Ŕset2Ă%ö3F·0,3ď ÷¶;05" `cPł d36P §c0€ I've a@-Đh €p °mp¸. l ŕ đ !ŔQARu 4.‚7p Do y`l n ŕđsp h™ €g ` p“ đt?đIf Áđ, giQ€ 2Ŕ¨hos@ińnđé#Ăna#Ao"!#!g± €#S wp@tů pu#ń@ $3 €îd ŕ€`wĐ%QŔŻ&!@l`u?Ŕ!Âx± ncĎp &q)ďe. ˘ „y €He€(-J-D-˝/’O"đ$Đ M°sage/“-DFa¶:Đ Ŕkpp Đť [Ŕ& :m2c@nu€ga.y m]-D`01ĐWC € €sday"ĐNNoPĐ17"Đ196Đ 2:57 TPM-DT3 ._ÚP! l2p@4A&ĐŹ&P 424…ubj·5—e.-•W#Ŕó Ŕ#Ŕul'‘ @2 ˙&ˇ `@0Ŕ@!2îv@$šq Ŕ„"R˙ s-D&ˇ €#ŕ@ 'Ă$B'đnnot-;/ż ă €1űEĎFßGĚS% ňt9‚ E!@%Ń.VPł9U!rp°€iEŻ/LLä3O9ć}Op license fileqż163ÝšwŇť(Ó¦Ç[…é.0. + B.<14387.2186.517000.429171@gargle.gargle.HOWL>Ţ?Żo@9€KZX:1żń? 1@ HEATHER.P@0@ HEATHER.P@&6ý?äţWNAISCANNEDPOSTOFFICE€˙˙˙˙ ňó?ô??Qܧ@ČŔB´ą+/á‚/O=COMPUWARE/OU=NUMEGA LAB/CN=RECIPIENTS/CN=MSIMPSONuSMTPvmark.simpson@numega.com@Simpson, Mark4@ MSIMPSONQ8EX:/O=COMPUWARE/OU=NUMEGA LAB/CN=RECIPIENTS/CN=MSIMPSON@CQܧ@ČŔB´ą+/á‚/O=COMPUWARE/OU=NUMEGA LAB/CN=RECIPIENTS/CN=MSIMPSONwSMTPxmark.simpson@numega.comDSimpson, Mark5@ MSIMPSONR8EX:/O=COMPUWARE/OU=NUMEGA LAB/CN=RECIPIENTS/CN=MSIMPSON@ W X YG2c=US;a= ;p=Compuware;l=FHPRI01-991117202844Z-3476ů?Jܧ@ČŔB´ą+/á‚/O=COMPUWARE/OU=NA/CN=RECIPIENTS/CN=HEATHER.Př?Phillips, Heather8@ HEATHER.Pű?Qܧ@ČŔB´ą+/á‚/O=COMPUWARE/OU=NUMEGA LAB/CN=RECIPIENTS/CN=MSIMPSONú?Simpson, Mark9@ MSIMPSON@0®˙ü2:1ż@0b$…:1ż=RE:  license fileÔ?5A96h@i@ ) #$Ną$÷eIVEATTACHEDATEMPLICENSEFORQARUN47DOYOUNEEDSOMETHINGMOREPERMANENT?IFSO,GIVEMEYOURHOSTIDANDHOSTNAMEOFTA‚O˙˙˙˙ =€Ď 4 5€Ď !"G€¸  Ü! ˙˙˙ĄA Ć ( @˙˙˙đđđđđđđđđđđđđđđđđđđđđđđđđđđđđđ?đđ˙!A Ff (  „†„ĆÇĆĆÇĆĆÇĆĆÇĆĆÇĆĆÇĆĆÇĆĆÇĆĆÇĆĆÇĆĆÇĆĆÇĆĆÇĆĆÇĆĆÇĆĆÇĆĆÇĆĆÇĆĆÇĆĆÇĆĆÇĆĆÇĆĆÇĆĆÇĆ„†„˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙ĆÇĆ„†„˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙ĆÇĆ„†„˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙ĆÇĆ„†„˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙ĆÇĆ„†„˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙ĆÇĆ„†„˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙ĆÇĆ„†„˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙ĆÇĆ„†„˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙ĆÇĆĆÇĆĆÇĆĆÇĆĆÇĆĆÇĆĆÇĆĆÇĆĆÇĆ„†„˙˙˙˙˙˙˙˙˙˙˙˙ĆÇĆ„†„˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙ĆÇĆĆÇĆĆÇĆĆÇĆĆÇĆĆÇĆĆÇĆĆÇĆĆÇĆĆÇĆ˙˙˙˙˙˙˙˙˙˙˙˙ĆÇĆ„†„˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙ĆÇĆĆÇĆĆÇĆĆÇĆĆÇĆĆÇĆĆÇĆ˙˙˙˙˙˙ĆÇĆ˙˙˙˙˙˙˙˙˙˙˙˙ĆÇĆ„†„˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙ĆÇĆĆÇĆĆÇĆĆÇĆĆÇĆĆÇĆĆÇĆĆÇĆĆÇĆĆÇĆ˙˙˙˙˙˙˙˙˙˙˙˙ĆÇĆ„†„˙˙˙˙˙˙˙˙˙ĆÇĆĆÇĆĆÇĆĆÇĆĆÇĆ˙˙˙˙˙˙˙˙˙˙˙˙ĆÇĆ„†„˙˙˙˙˙˙˙˙˙„†˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙„†ĆÇĆĆÇĆ˙˙˙ĆÇĆ˙˙˙˙˙˙˙˙˙˙˙˙ĆÇĆ„†„˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙ĆÇĆĆÇĆĆÇĆĆÇĆ˙˙˙˙˙˙˙˙˙˙˙˙ĆÇĆ„†„˙˙˙˙˙˙˙˙˙˙˙˙„†˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙„†ĆÇĆĆÇĆĆÇĆ˙˙˙˙˙˙˙˙˙˙˙˙ĆÇĆ„†„˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙ĆÇĆĆÇĆĆÇĆ˙˙˙˙˙˙˙˙˙˙˙˙ĆÇĆ„†„˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙„†˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙„†ĆÇĆĆÇĆ˙˙˙˙˙˙˙˙˙˙˙˙ĆÇĆ„†„˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙„†„†„†„†„†˙˙˙˙ĆÇĆĆÇĆ˙˙˙˙˙˙˙˙˙˙˙˙ĆÇĆ„†„˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙„†˙˙„†„†„†„†„†„†˙˙„†ĆÇĆ˙˙˙˙˙˙˙˙˙˙˙˙ĆÇĆ„†„˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙ĆÇĆ˙˙˙˙˙˙˙˙˙˙˙˙ĆÇĆ„†„˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙„†„„†„†„†„„†„†„†„„†˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙ĆÇĆ„†„˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙ĆÇĆ„†„˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙ĆÇĆ„†„˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙„†„„†„˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙„†„˙˙˙˙˙˙ĆÇĆ„†„„†„˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙„†„˙˙˙ĆÇĆ„†„„†„˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙„†„ĆÇĆ„†„„†„˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙„†„„†„„†„˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙„†„„†„„†„„†„„†„„†„„†„„†„„†„„†„„†„„†„„†„„†„„†„„†„„†„„†„„†„„†„„†„É*€ ALLPRO~1.DAT€€ FEATURE QARun_Developer compuware 4.70 \ 02-mar-2000 0 8CB7C0E22EA5D23F83E0 \ VENDOR_STRING=10000;0;TRIAL HOSTID=DEMO \ ck=237 FEATURE QARun_Regular_Runtime compuware 4.70 \ 02-mar-2000 0 1C9750622766DB0B975F \ VENDOR_STRING=10000;0;TRIAL HOSTID=DEMO \ ck=30 čGČ ! 7˙˙˙˙ ÷@0|uQţľ@0Łž;1ż770allproductsmar2000.dat7allproductsmar2000.dat7.datůVÎĽťÓ§¦ÇĘŤ¶'ytnef-2.0/test-data/missing-filenames.tnef000066400000000000000000005144711406511276600207020ustar00rootroot00000000000000xź>"äč€IPM.Microsoft Mail.Note1€Đ  5< €Đ  ;B €!DADB91D261E0D31183840020AF293BC6€Y2K problem with Add-DT± €č2  +.@9°¤¶+WtżpOpen Text mailing listsqľÁűě‰;ôM-ëÓ¬wÇ!Ż,•sp1@FHBOSL@0@FHBOSL@ «§WLZFuŤ%ű˛ rcpg125Â2Ctextô÷˙ €¤ä€ăPV?U˛Qchá Ŕset2ö3F§0ń4ĹßąĹ#ď ÷;ß0v5 `cP d36Ń Ĺc0 HiÓ°ph đ, ˘ „ő €S P Đ đ u0 € a D2a° p``emŘ wh pr!(ng a'łBook Lt'.ö ‘y`!đ"@   qelp us$ˇ Ap ± đtly îi@ v#"!PĎ 0"p'h ( pŔADD_DT"rŔě I"p`l!p'q!â-u€!pw ˇfiľx+(‚%Ŕ °tŔő.šA@ĐP!pc'A(ÂPRC+a"±:ü g đ0& ń,˙ó.&‘ sp1‘ áô d*ŕp )tŕˇ?!p(Â`ŔsaQ/` (3ŇW3b.Čdoc.ăs)š)Đća"` € Vp ń*p˙ŔŔ(Â/€Đ(°)đç"p ŕ$!bu'!'#ŕ˙@&â2p@9/QŹ8±"+Q!cti @'&đ*±đ*p!pAřSAP$˘*% 0‹ € ad1ogu#"ď(s Rp!pR@@(°·8đ qoŕ;!c‘?+q;$ˇš,ˇs,÷$A €90e” „ 7bĂĐ ă EOM ă ŁNOTICE -ü T;˘4F>b q €˙8Ŕ<"7!°@@!a O&á8& pof(ła|dd*±A@@"/»±"i'"@/`dMBçK%1rno;r pIç˙31 :ńKGéP¦(üeb&đQ!Cń(±!Ŕ}%m&@Q">đLAmo €!ÁCŔ p&đ8a˙D0@!MÁ<7"ŕŢ?Żo€ ŔFR…〠ŔFT…8.5€ ŔF… € ŔF… € ŔF…€ ŔF…€ ŔF…€ ŔF… € ŔF6… € ŔF7… € ŔF8… € ŔF… € ŔF… € ŔF € ŔFń? &6ý?ä€˙˙˙˙ ňG>c=AU;a=TELEMEMO;p=BHPMEL04;l=ITBNE-MSG01-000211061353Z-4604238@FHBOSL9@FHBOSL@00ä"Wtż@0&’/Wtż=Y2K problem with Add-DT5L<41D7BC0B968CD111B6A100805FA774F503F2AAEB@itbne-msg01.incorrect.bhp.com.au> ) #ýŕBôęeHISTEPHEN,SUEHASENCOUNTEREDADATEPROBLEMWHILERUNNINGOURNEWBOOKSLISTCANYOUPLEASEHELPUSAPPARENTLYITISHAL<41D7BC0B968CD111B6A100805FA774F503F2AAEB@itbne-msg01.incorrect.bhp.com.au>˙˙˙˙ =€Đ 3"M€Đ 3"M€ generpts.srcŢ€”  Ę!˙˙˙ eA Ć ( ˙˙˙đđđđđđđđđđđđđđđđđđđđđđđđđđđđđđ?đđ˙ ˙˙˙ !A Ff ( xż¸żż¸żż¸żż¸żż¸żż¸żż¸żż¸żż¸żż¸żż¸żż¸żż¸żż¸żż¸żż¸żż¸żż¸żż¸żż¸żż¸żż¸żż¸żż¸żx˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙ż¸żx˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙ż¸żx˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙ż¸żx˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙ż¸żx˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙ż¸żx˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙ż¸żx˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙ż¸żx˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙ż¸żx˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙ż¸żx˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙˙˙˙˙˙ř˙˙ř˙˙ř˙˙ř˙ż¸żx˙ř˙˙ř˙˙ř˙˙ř˙˙˙ř˙˙˙ř˙˙˙˙˙˙ř˙ř˙ř˙˙ř˙˙ř˙˙ř˙ż¸żx˙ř˙˙ř˙˙ř˙˙ř˙˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙˙ř˙ř˙ř˙˙ř˙˙ř˙˙ř˙ż¸żx˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙˙˙˙˙ř˙ř˙˙ř˙˙ř˙˙ř˙ż¸żx˙ř˙˙ř˙˙ř˙˙ř˙˙˙ř˙˙˙ř˙˙˙˙ř˙˙ř˙˙ř˙ż¸żx˙ř˙˙ř˙˙ř˙˙ř˙˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙˙x˙ř˙˙ř˙˙ř˙ż¸żx˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙˙˙xxx˙ř˙˙ř˙˙ř˙ż¸żx˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙˙xxx˙ř˙˙ř˙˙ř˙ż¸żx˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙xx˙ř˙˙ř˙˙ř˙ż¸żx˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙ż¸żx˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙ż¸żx˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙ż¸żx˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙ż¸żx˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙ż¸żx˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙xx˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙x˙ř˙˙ř˙ż¸żxx˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙x˙ř˙ż¸żxx˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙xż¸żxx˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙xxx˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙˙ř˙xxxxxxxxxxxxxxxxxxxxx đÇ€ď*PROC CIRREQ01 *----------------------------------------------------------------------------- * * Title: Patron Request Report * File: PATRQT01.PRC * Author: Information Dimensions, Inc. (TD) * * Description: A list of patron requests * * Input Parameters: * OUTPUT - may be 'REVIEW','PRINT'. Review displays report * on screen, print outputs to file for printing. * * START_DATE/END_DATE - find where CIRC_REQUEST.ADD_DT * is in range * * CIRC_SORT_KEY - option to sort by title, patron name, * or patron id * * HOLD_SORT_KEY - option to sort by title, patron id, * patron name, or call number. * * Other Selection Criteria: * LIBR_KEY - Restrict to certain libraries. * * ALL - Boolean value; set true by Slang if no params entered * * Output File: patrqt01.rpt * * Record Types Referenced: * TEMPLATE, COPY, CAT, CIRC_REQUEST * Buffers: @A @B @C @D * * Report Name: Cairculation Requests * * Report No.: PATRQT01 * * Menu Access: CATALOG REPORTS * * Parameter * Input Screen: CATRPT12 * * Templates: REPORT_HDR, BIB_PATRON, COPY_NOCIRC, COPY_NOCIRC_S, * PATRON_REQUEST. * *------------------------------------------------------------------------------ * * Revision History: * * Date Revised By Description * -------- ---------- ----------- * 11/20/89 DeFrench Initial Version * 03/28/91 Sandstrom Add LIBR_KEY to find commands. * 04/25/91 Sandstrom Add MATERIAL_TYPE to FIND commands. * 07/03/91 MChung Substitute tabs with 8 spaces and * spelling checks * *------------------------------------------------------------------------------ * START: ACQUIRE/PV MESSAGE 46707, C2=MSG TELL MSG,$B ON/BREAK BREAKERR ON/EXCEPTION EXCEPTION ON/SYNTAX SYNTAXERR SET/DEFAULT RESULT = N SET/PV PV_TODAY = $YYYYMMDD SET/PV PRINTTOP = 1 SET/PV RPTNM = 'PATRQT01' SET/PV RPTTTL = 'Circulation/Holds report' SET/PV PGNO = 0 * Set up for desired output method SELECT (OUTPUT) CASE 'REVIEW' SET/PV MAXLINES = 20 SET/PV PV_FILEID = '' CASE 'PRINT' SET/PV MAXLINES = 60 OPEN/F patrqt01.rpt, FID=A, INTENT=WRITE, + CARRIAGE=YES, ERR=OPENERR SET/PV PV_FILEID = ',FID=A' END_SELECT * GET/VIEW [TEMPLATE_KEY = 'REPORT_HDR']TEMPLATE@A, ERR = VIEWERR ASSIGN/PV HEADER = TEXT@A GET/VIEW [TEMPLATE_KEY='REQ_HDR']TEMPLATE@A, ERR=VIEWERR ASSIGN/PV REQ_HDR = TEXT@A GET/VIEW [TEMPLATE_KEY = 'PATRON_REQUEST']TEMPLATE@A, ERR = VIEWERR ASSIGN/PV RQTINFO = TEXT@A GET/VIEW [TEMPLATE_KEY = 'BIB_PATRON']TEMPLATE@A, ERR = VIEWERR ASSIGN/PV CATINFO = TEXT@A GET/VIEW [TEMPLATE_KEY = 'COPY_NOCIRC']TEMPLATE@A, ERR = VIEWERR ASSIGN/PV COPYINFO = TEXT@A GET/VIEW [TEMPLATE_KEY = 'COPY_NOCIRC_S']TEMPLATE@A, ERR = VIEWERR ASSIGN/PV SCOPYINFO = TEXT@A SET/PV CALLOC = 'CATR' * * Begin construction of FIND command. * SET/PV PV_FINDCMD = 'FIND CIRC_REQUEST,CATR,COPY,material_type ' //+ 'WHERE CIRC_REQUEST.CATNO:=CATR.CATNO ' //+ 'AND CIRC_REQUEST.ITEMID:=COPY.ITEMID ' //+ 'AND MATERIAL_TYPE.TYPE:=CATR.MTYPE '//+ 'AND CIRC_REQUEST.REQUEST_TYPE=''C'' ' * * Add Library to find. * DELETE/GV OUTLC DELETE/GV OUTSTR DELETE/GV INSTR SET/GV INSTR = LIBR_KEY @/PL='$TLP_PROC/generpts' QTBLKS01, VFLDNM='COPY.LIBR_KEY' SET/PV SAVE_OUTSTR = '(' //OUTSTR SET/PV PV_FINDCMD = PV_FINDCMD // 'AND (' // OUTSTR //' ' * DELETE/GV OUTLC DELETE/GV OUTSTR DELETE/GV INSTR SET/GV INSTR = LIBR_KEY @/PL='$TLP_PROC/generpts' QTBLKS01, + VFLDNM='CIRC_REQUEST.PLACED_LIBR_KEY' SET/PV SAVE_OUTSTR = SAVE_OUTSTR// ' OR ' //OUTSTR //') ' SET/PV PV_FINDCMD = PV_FINDCMD // 'OR ' // OUTSTR //') ' * * Add the date fields if they were passed. * IF (START_DATE <> '') SET/PV PV_FINDCMD = PV_FINDCMD //+ ' AND CIRC_REQUEST.ADD_DT = '//START_DATE//':'//END_DATE//' ' END_IF * * Append FIND for sort options. * SET/PV PV_FINDCMD = PV_FINDCMD //+ ' ORDER BY !CIRC_SORT_KEY!, CATR.TI,CATR.PUBL, COPY.YEAR, ' //+ 'COPY.LIBR_KEY, COPY.ITEMID, COPY.COPY' * * If output option is equal to 'PRINT', then delete the records * as they are printed. * IF OUTPUT = 'PRINT' START/TRANS SW=CIRC_REQUEST END_IF * * Execute Find and set up for report generation * !PV_FINDCMD! END REF=NO ACQUIRE/PV MEMBERS, N1 = PV_NUMMEM ACQUIRE/PV LASTSET, N1 = PV_FOUNDSET JUMPIF (PV_NUMMEM = 0), DO_HOLDS * * Write initial header. * IF OUTPUT = 'REVIEW' CLEAR/SCREEN SET/PV LINE_CNT =2 ELSE TYPE $P, MEMBERS=1, SET=!PV_FOUNDSET! !PV_FILEID! END_IF * SET/PV PGNO = PGNO + 1 TYPE !HEADER!, $S2, LABELS = N, SKIP = 0, + SET = !PV_FOUNDSET!, MEMBERS = 1 !PV_FILEID! TYPE !REQ_HDR!, $S2, LABELS = N, SKIP = 0, + SET = !PV_FOUNDSET!, MEMBERS = 1 !PV_FILEID! SET/PV LINE_CNT = 8 * * Step through members of set, generating correct output for each. * FOR PV_Q = 1, PV_NUMMEM * GET/VIEW [!PV_FOUNDSET!,!PV_Q!]CIRC_REQUEST@D, ERR = VIEWERR GET/VIEW [!PV_FOUNDSET!,!PV_Q!]CATR@B, ERR = VIEWERR GET/VIEW [!PV_FOUNDSET!,!PV_Q!]COPY@C, ERR = VIEWERR * ASSIGN/PV CATDOC = CATR.DOC@B IF CATDOC = 'SER' TYPE !CATINFO!,!SCOPYINFO!,!RQTINFO!,LABELS=NO, SKIP=1, + SET = !PV_FOUNDSET!, MEMBERS = !PV_Q! !PV_FILEID! SET/PV LINE_CNT = LINE_CNT + 12 ELSE TYPE !CATINFO!,!COPYINFO!,!RQTINFO!,LABELS=NO, SKIP=1, + SET = !PV_FOUNDSET!, MEMBERS = !PV_Q! !PV_FILEID! SET/PV LINE_CNT = LINE_CNT + 12 END_IF IF OUTPUT = 'PRINT' DELETE [!PV_FOUNDSET!,!PV_Q!]CIRC_REQUEST END_IF * * Check for a page break. * IF LINE_CNT > MAXLINES IF OUTPUT = 'REVIEW' ACQUIRE/PV MESSAGE 46710, C2=MSG INQUIRE/PV PV_QUIT, '!MSG!' JUMPIF PV_QUIT[1] = 'N' OR PV_QUIT[1] = 'n',QUIT CLEAR/SCREEN SET/PV LINE_CNT =2 ELSE TYPE $P, MEMBERS=1, SET=!PV_FOUNDSET! !PV_FILEID! END_IF * SET/PV PGNO = PGNO + 1 TYPE !HEADER!, $S2, LABELS = N, SKIP = 0, + SET = !PV_FOUNDSET!, MEMBERS = 1 !PV_FILEID! SET/PV LINE_CNT = 7 END_IF * END_FOR ***************************************************** ***************************************************** DO_HOLDS: * * Begin construction of the HOLDS FIND command. * SET/PV PV_FINDCMD = 'FIND CIRC_REQUEST,CATR,COPY,MATERIAL_TYPE ' //+ 'WHERE CIRC_REQUEST.CATNO:=CATR.CATNO ' //+ 'AND CIRC_REQUEST.ITEMID:=COPY.ITEMID ' //+ 'AND MATERIAL_TYPE.TYPE:=CATR.MTYPE '//+ 'AND CIRC_REQUEST.REQUEST_TYPE=''H'' '//+ 'AND ' // SAVE_OUTSTR // ' ' * * Add the date fields if they were passed. * IF (START_DATE <> '') SET/PV PV_FINDCMD = PV_FINDCMD //+ ' AND CIRC_REQUEST.ADD_DT = '//START_DATE//':'//END_DATE//' ' END_IF * * Append FIND for sort options. * SET/PV PV_FINDCMD = PV_FINDCMD //+ ' ORDER BY !HOLD_SORT_KEY!, CATR.TI,CATR.PUBL, COPY.YEAR, ' //+ 'COPY.LIBR_KEY, COPY.ITEMID, COPY.COPY' * * Execute Find and set up for report generation * !PV_FINDCMD! END REF=NO ACQUIRE/PV MEMBERS, N1 = PV_NUMMEM ACQUIRE/PV LASTSET, N1 = PV_FOUNDSET JUMPIF (PV_NUMMEM = 0), CLEANUP * * Write initial header. * IF OUTPUT = 'REVIEW' ACQUIRE/PV MESSAGE 46710, C2=MSG INQUIRE/PV PV_QUIT, '!MSG!' JUMPIF PV_QUIT[1] = 'N' OR PV_QUIT[1] = 'n',QUIT CLEAR/SCREEN SET/PV LINE_CNT =2 ELSE TYPE $P, MEMBERS=1, SET=!PV_FOUNDSET! !PV_FILEID! END_IF * SET/PV PGNO = PGNO + 1 TYPE !HEADER!, $S2, LABELS = N, SKIP = 0, + SET = !PV_FOUNDSET!, MEMBERS = 1 !PV_FILEID! SET/PV LINE_CNT = 7 * * Step through members of set, generating correct output for each. * FOR PV_Q = 1, PV_NUMMEM * GET/VIEW [!PV_FOUNDSET!,!PV_Q!]CIRC_REQUEST@D, ERR = VIEWERR GET/VIEW [!PV_FOUNDSET!,!PV_Q!]CATR@B, ERR = VIEWERR GET/VIEW [!PV_FOUNDSET!,!PV_Q!]COPY@C, ERR = VIEWERR * ASSIGN/PV HOLDTYPE = CIRC_REQUEST.HOLD_TYPE@D SET/PV RHOLDTYPE = $RAISE(HOLDTYPE) IF RHOLDTYPE = 'COPY' TYPE $S2, 'COPY level hold for:' + SET = !PV_FOUNDSET!, MEMBERS = 1 !PV_FILEID! ELSE TYPE $S2, 'CAT level hold for:' + SET = !PV_FOUNDSET!, MEMBERS = 1 !PV_FILEID! END_IF * * Choose the serials copy info if item is a serial. * ASSIGN/PV CATDOC = CATR.DOC@B IF CATDOC = 'SER' TYPE !CATINFO!,!SCOPYINFO!,!RQTINFO!,LABELS=NO, SKIP=1, + SET = !PV_FOUNDSET!, MEMBERS = !PV_Q! !PV_FILEID! SET/PV LINE_CNT = LINE_CNT + 12 ELSE TYPE !CATINFO!,!COPYINFO!,!RQTINFO!,LABELS=NO, SKIP=1, + SET = !PV_FOUNDSET!, MEMBERS = !PV_Q! !PV_FILEID! SET/PV LINE_CNT = LINE_CNT + 12 END_IF * * Delete the occurrence if print is selected * IF OUTPUT = 'PRINT' DELETE [!PV_FOUNDSET!,!PV_Q!]CIRC_REQUEST END_IF * * Check for a page break. * IF LINE_CNT > MAXLINES IF OUTPUT = 'REVIEW' ACQUIRE/PV MESSAGE 46710, C2=MSG INQUIRE/PV PV_QUIT, '!MSG!' JUMPIF PV_QUIT[1] = 'N' OR PV_QUIT[1] = 'n',QUIT CLEAR/SCREEN SET/PV LINE_CNT =2 ELSE TYPE $P, MEMBERS=1, SET=!PV_FOUNDSET! !PV_FILEID! END_IF * SET/PV PGNO = PGNO + 1 TYPE !HEADER!, $S2, LABELS = N, SKIP = 0, + SET = !PV_FOUNDSET!, MEMBERS = 1 !PV_FILEID! SET/PV LINE_CNT = 7 END_IF * END_FOR * * Cleanup - close files and discard result sets. * CLEANUP: ACQUIRE/PV MESSAGE 46708, C2=MSG TELL MSG ACQUIRE/PV MESSAGE 46709, C2=MSG INQUIRE/PV DUMMY, '!MSG!' QUIT: ACQUIRE/PV LASTSET, N1 = PV_LASTSET DISCARD !PV_FOUNDSET!:!PV_LASTSET! SET/DEF RESULT = Y IF (OUTPUT <> 'REVIEW') CLOSE/F FID = A,ERR=$CONTINUE FINISH/TRANS END_IF * * DONE - successful report generation; return to caller * DONE: RETURN_TO_SCREEN * * Error - inform user and close file, if necessary. * SYNTAXERR: EXCEPTION: OPENERR: VIEWERR: SHOW/MESSAGE !DMSTAT! JUMP ERROR BREAKERR: SHOW/MESSAGE 46700 ERROR: SHOW/MESSAGE 46703 IF (OUTPUT <> 'REVIEW') CLOSE/FILE FID = A,ERR=$CONTINUE ABORT/TRANSACTION, ERR=$CONTINUE END_IF SET/DEF RESULT = Y ACQUIRE/PV MESSAGE 46709, C2=MSG INQUIRE/PV DUMMY, '!MSG!' RETURN_TO_SCREEN *PROC FILOPN01 *----------------------------------------------------------------------------- * * Title: Generic File Open * File: FILOPN01.PRC * Author: Information Dimensions, Inc. (BPM) * * Description: This proc is designed as a subroutine that is called from * other TLP procs to correctly open files in cases where the * file may already exist. * * Input Parameters: * FIL The file descriptor to be opened. * ID The file ID to be assigned to this file. * Called by: Any report that has an OPEN/FILE. * Call: @/PL='$TLP_PROC/generpts' FILOPN01 FIL=!A!, ID=!B! *------------------------------------------------------------------------------ * Revision History * * Date Rev. Revised By Description * --------- ---------- -------------------------------- * 04/07/93 BMOORE Initial version *----------------------------------------------------------------------------- * START: * * Open the file. * OPEN/FILE FD=!FIL! FID=!ID! INTENT=WRITE CARRIAGE=NO ERR=OPENERR SET/GV FILE_STATUS = 'OK' RETURN * * If error occurs, attempt to delete existing file and then open the file. * OPENERR: * DELETE/FILE !FIL! OPEN/FILE FD=!FIL! FID=!ID! INTENT=WRITE CARRIAGE=NO ERR=OPENER2 SET/GV FILE_STATUS = 'OK' RETURN * * If still unable to open the file, display message and return. * OPENER2: * SET/GV FILE_STATUS = 'OPEN_ERROR' TELL 'File cannot be opened. Contact your DBA' RETURN *PROC GENPRT01 *----------------------------------------------------------------------------- * * Title: Generic Print Routine * File: GENPRT01.PRC * Author: Information Dimensions, Inc. (BPM) * * Description: This proc is designed as a subroutine that is called from * other TLP procs to allow custom printing of reports. * The proc uses the ROUTE/FILE command to route a file to the * printer of chice. Consult the BASISplus Command Procedures * manual for additional parameters. Optionally, you can use * a SPAWN command to call local procedures for printing. * * Input Parameters: * FIL The file descriptor to be sent to the printer. * ERROR_FLG is 'Y' if called from within error branch of * the calling proc. * * Called by: Any report that generates a printable file. * * Call: @/PL=TLP$PROC:GENERPTS.LIB GENPRT01 FIL=!A! ERROR_FLG='N' *------------------------------------------------------------------------------ * Revision History * * Date Rev. Revised By Description * --------- ---------- -------------------------------- * 04/08/93 BMOORE Initial version *----------------------------------------------------------------------------- * ON/EXCEPTION $RETURN START: * **** ROUTE/FILE FD=!FIL! RETURN *PROC MAROUT01 *----------------------------------------------------------------------------- * * Title: Marc Output * File: MAROUT01.PRC * Author: Information Dimensions, Inc. (HB) * * Description: Create Marc Input file records that can be run using the Marc * program * * Input Parameters: * OUTPUT - may be 'REVIEW','PRINT'. Review displays report * on screen, print outputs to file. * * FORMAT - may be set to OCLC, LC, or PC * * BLOCKSIZE - the length of each line in output file * * FIND_CAT - where part of find command for cat record * * FIND_COPY - where part of find command for copy record * * CATNO - a string of CATNO's to search on * * Valid Combinations: * OUTPUT, FORMAT, and BLOCKSIZE are required. * User may enter one of: FIND_CAT OR FIND_COPY OR CATNO * * Output File: marout01.rpt * marout01.log * * Record Types Referenced: * MARC * Buffers: @A * * Report Name: MARC OUTPUT * * Report No.: MAROUT01 * * Menu Access: CATRPT01 * * Parameter * Input Screen: MARRPT10 * * Templates: none * *------------------------------------------------------------------------------ * * Revision History: * * Date Revised By Description * -------- ---------- ----------- * 04/25/90 Berger Initial version * 04/26/90 Sandstrom Added PC format code * 05/10/90 Sandstrom Added LC format code * 05/11/90 Berger Revisions to FIND_CAT and FIND_COPY * 07/03/91 MChung Substitute tabs with 8 spaces and * spelling checks * 12/02/91 Sandstrom Changed log file open to handle * error if log file already exists. * *------------------------------------------------------------------------------ * START: ACQUIRE/PV MESSAGE 46707, C2=MSG TELL MSG,$B ON/BREAK BREAKERR ON/EXCEPTION EXCEPTION ON/SYNTAX SYNTAXERR SET/DEFAULT RESULT = N SET/PV LINE_CNT = 1 * Check for bad blocksize IF BLOCKSIZE < 80 SET/PV BLOCKSIZE = 80 ELSE_IF BLOCKSIZE > 2048 SET/PV BLOCKSIZE = 2048 END_IF * Set up for desired output method SELECT (OUTPUT) CASE 'REVIEW' SET/PV BLOCKSIZE = 80 CASE 'PRINT' OPEN/FILE marout01.rpt, FID=A, + INTENT=WRITE,ERR=OPENERR, RECORDLC=!BLOCKSIZE! SET/PV PV_FILEID = ',FID=A' END_SELECT * * Construct find command for search on CAT record * IF FIND_CAT <> NULL SET/PV PV_FINDCMD = 'FIND CAT,MARC ' //+ 'WHERE CAT.CATNO:=MARC.CATNO AND ' SET/PV FIND_CAT = $RAISE(FIND_CAT) * * Add CAT. to ambiguous fields in find command where it is not specified * SET/PV PV_ADD = $MATCH('ADD_DT',FIND_CAT) SET/PV PV_EXISTS = $MATCH('.ADD_DT',FIND_CAT) IF (PV_ADD > 0) AND (PV_EXISTS = 0) SET/PV FIND_CAT = FIND_CAT[1:(PV_ADD-1)] // 'CAT.' //+ FIND_CAT[PV_ADD:*] END_IF * SET/PV PV_ADD = $MATCH('CATNO',FIND_CAT) SET/PV PV_EXISTS = $MATCH('.CATNO',FIND_CAT) IF (PV_ADD > 0) AND (PV_EXISTS = 0) SET/PV FIND_CAT = FIND_CAT[1:(PV_ADD-1)] // 'CAT.' //+ FIND_CAT[PV_ADD:*] END_IF * SET/PV PV_ADD = $MATCH('REV_DT',FIND_CAT) SET/PV PV_EXISTS = $MATCH('.REV_DT',FIND_CAT) IF (PV_ADD > 0) AND (PV_EXISTS = 0) SET/PV FIND_CAT = FIND_CAT[1:(PV_ADD-1)] // 'CAT.' //+ FIND_CAT[PV_ADD:*] END_IF * SET/PV PV_ADD = $MATCH('REV_UID',FIND_CAT) SET/PV PV_EXISTS = $MATCH('.REV_UID',FIND_CAT) IF (PV_ADD > 0) AND (PV_EXISTS = 0) SET/PV FIND_CAT = FIND_CAT[1:(PV_ADD-1)] // 'CAT.' //+ FIND_CAT[PV_ADD:*] END_IF * Append restrictive condition to find command SET/PV PV_FINDCMD = PV_FINDCMD // FIND_CAT * * Construct find command for search on COPY record * ELSE_IF FIND_COPY <> NULL SET/PV PV_FINDCMD = 'FIND COPY,MARC ' //+ 'WHERE COPY.CATNO:=MARC.CATNO AND ' SET/PV FIND_COPY = $RAISE(FIND_COPY) * * Add COPY. to ambiguous fields in find command where it is not specified * SET/PV PV_ADD = $MATCH('ADD_DT',FIND_COPY) SET/PV PV_EXISTS = $MATCH('.ADD_DT',FIND_COPY) IF (PV_ADD > 0) AND (PV_EXISTS = 0) SET/PV FIND_COPY = FIND_COPY[1:(PV_ADD-1)] // 'COPY.' //+ FIND_COPY[PV_ADD:*] END_IF * SET/PV PV_ADD = $MATCH('CATNO',FIND_COPY) SET/PV PV_EXISTS = $MATCH('.CATNO',FIND_COPY) IF (PV_ADD > 0) AND (PV_EXISTS = 0) SET/PV FIND_COPY = FIND_COPY[1:(PV_ADD-1)] // 'COPY.' //+ FIND_COPY[PV_ADD:*] END_IF * SET/PV PV_ADD = $MATCH('REV_DT',FIND_COPY) SET/PV PV_EXISTS = $MATCH('.REV_DT',FIND_COPY) IF (PV_ADD > 0) AND (PV_EXISTS = 0) SET/PV FIND_COPY = FIND_COPY[1:(PV_ADD-1)] // 'COPY.' //+ FIND_COPY[PV_ADD:*] END_IF * SET/PV PV_ADD = $MATCH('REV_UID',FIND_COPY) SET/PV PV_EXISTS = $MATCH('.REV_UID',FIND_COPY) IF (PV_ADD > 0) AND (PV_EXISTS = 0) SET/PV FIND_COPY = FIND_COPY[1:(PV_ADD-1)] // 'COPY.' //+ FIND_COPY[PV_ADD:*] END_IF * Append restrictive condition to find command SET/PV PV_FINDCMD = PV_FINDCMD // FIND_COPY * * Construct find command for search on selected CATNO's * ELSE_IF CATNO <> NULL SET/PV PV_FINDCMD = 'FIND MARC WHERE MARC.CATNO =' //!CATNO! * * Construct default find command for no selected search criteria * ELSE SET/PV PV_FINDCMD = 'FIND MARC' END_IF * * Add sort to the find command * SET/PV PV_FINDCMD = PV_FINDCMD // ' ORDER BY MARC.CATNO END REF=NO' * * Write find command to log file * * OPEN/FILE marout01.log,FID=B,INTENT=WRITE,CREATE=YES, + * CARRIAGE=YES, ERR=OPENERR * smls19911202 changed error branch on log file open to $continue * and added test for dmstat. OPEN/FILE marout01.log,FID=B,INTENT=WRITE,CREATE=YES, + ERR=$CONTINUE IF DMSTAT <> 0 OPEN/FILE marout01.log,FID=B,INTENT=UPDATE,ERR=OPENERR END_IF PUT/FILE ' Log File for MAROUT01',FID=B PUT/FILE ' ---------------------',FID=B PUT/FILE $S2,'FIND COMMAND',$B,'------------',FID=B SET/PV PV_FINDLEN = $LC(PV_FINDCMD) SET/PV PV_POINT = 1 WHILE (PV_POINT <= PV_FINDLEN) PUT/FILE PV_FINDCMD[PV_POINT:(PV_POINT+79)],FID=B SET/PV PV_POINT = PV_POINT + 80 END_WHILE * * Execute find, store members and set in variables * !PV_FINDCMD!,ERR=FNDERR ACQUIRE/PV MEMBERS, N1 = PV_NUMMEM ACQUIRE/PV LASTSET, N1 = PV_SET * * Write members to log file and close file * PUT/FILE $S2,'NUMBER OF MEMBERS = ',PV_NUMMEM,FID=B CLOSE/FILE FID=B * * Check for no hits * IF (PV_NUMMEM <= 0) SHOW/MESSAGE 46705 JUMP CLEANUP END_IF * * Type output for specified formats * SELECT (FORMAT) CASE 'OCLC' * * Step through members of set, generating correct output for each. * FOR PV_MEM = 1, PV_NUMMEM GET/VIEW[!PV_SET!,!PV_MEM!]MARC@A ASSIGN/PV PV_OUTDATA = MARC_DATA@A SET/PV PV_LENGTH = $LC(PV_OUTDATA) SET/PV PV_POINT = 1 ****** Loop through printing one record at a time ****** WHILE (PV_POINT <= PV_LENGTH) IF OUTPUT = 'REVIEW' SET/PV LINE_CNT = LINE_CNT + 1 ******* Check for page break ******** IF LINE_CNT >= 20 ACQUIRE/PV MESSAGE 46710, C2=MSG INQUIRE/PV PV_QUIT, '!MSG!' JUMPIF PV_QUIT[1] = 'N' OR PV_QUIT[1] = 'n',QUIT CLEAR/SCREEN SET/PV LINE_CNT = 1 END_IF TELL PV_OUTDATA[PV_POINT:(PV_POINT+BLOCKSIZE-1)] ELSE PUT/F PV_OUTDATA[PV_POINT:(PV_POINT+BLOCKSIZE-1)] + ,FID=A END_IF SET/PV PV_POINT = PV_POINT + BLOCKSIZE END_WHILE END_FOR * CASE 'PC' * * SET/PV PV_MEM = 1 SET/PV PV_POINT_OUT = 1 GETPC: WHILE PV_MEM LE PV_NUMMEM * * Get record * GET/VIEW[!PV_SET!,!PV_MEM!]MARC@A ASSIGN/PV PV_MARCDATA = MARC_DATA@A SET/PV PV_MARCDATA = $TRIM (PV_MARCDATA) SET/PV PV_MEM = PV_MEM + 1 SET/PV PV_LENGTH = PV_MARCDATA[1:5] SET/PV PV_SEGLEN = PV_LENGTH SET/PV PV_POINT_IN = 1 * * Loop to build and write buffer * BLDPC: * * Record will begin and end in this block.... IF (PV_SEGLEN EQ PV_LENGTH) AND + PV_SEGLEN LE (BLOCKSIZE - PV_POINT_OUT + 1) THEN SET/PV PV_BUFFER[PV_POINT_OUT:PV_POINT_OUT+PV_SEGLEN-1]=+ PV_MARCDATA[1:PV_LENGTH] SET/PV PV_POINT_OUT = PV_POINT_OUT + PV_SEGLEN SET/PV PV_SEGLEN = 0 IF PV_POINT_OUT GT BLOCKSIZE THEN SET/PV PV_POINT_OUT = 1 JUMP OUTPC END_IF JUMP GETPC END_IF * Record will begin but not end in this block.... IF (PV_SEGLEN EQ PV_LENGTH) AND + PV_SEGLEN GT (BLOCKSIZE - PV_POINT_OUT + 1) THEN SET/PV PV_BUFFER[PV_POINT_OUT:BLOCKSIZE] = + PV_MARCDATA[1:BLOCKSIZE-PV_POINT_OUT+1] SET/PV PV_SEGLEN = PV_SEGLEN - (BLOCKSIZE-PV_POINT_OUT+1) SET/PV PV_POINT_IN = PV_POINT_IN+BLOCKSIZE-PV_POINT_OUT+1 SET/PV PV_POINT_OUT = 1 JUMP OUTPC END_IF * Record will end but not begin in this block.... IF (PV_SEGLEN NE PV_LENGTH) AND + PV_SEGLEN LE (BLOCKSIZE - PV_POINT_OUT + 1) THEN SET/PV PV_BUFFER[PV_POINT_OUT:*] = + PV_MARCDATA[PV_POINT_IN:PV_POINT_IN+PV_SEGLEN-1] SET/PV PV_POINT_OUT = PV_SEGLEN + 1 IF PV_POINT_OUT GT BLOCKSIZE THEN SET/PV PV_POINT_OUT = 1 SET/PV PV_SEGLEN = 0 JUMP OUTPC END_IF JUMP GETPC END_IF * Record will not begin or end in this block.... IF (PV_SEGLEN NE PV_LENGTH) AND + PV_SEGLEN GT (BLOCKSIZE - PV_POINT_OUT + 1) THEN SET/PV PV_BUFFER[PV_POINT_OUT:BLOCKSIZE] = + PV_MARCDATA[PV_POINT_IN:PV_POINT_IN+BLOCKSIZE-1] SET/PV PV_SEGLEN = PV_SEGLEN - BLOCKSIZE SET/PV PV_POINT_IN = PV_POINT_IN + BLOCKSIZE JUMP OUTPC END_IF OUTPC: IF OUTPUT = 'REVIEW' SET/PV LINE_CNT = LINE_CNT + 1 ******* Check for page break ******** IF LINE_CNT >= 20 ACQUIRE/PV MESSAGE 46710, C2=MSG INQUIRE/PV PV_QUIT, '!MSG!' JUMPIF PV_QUIT[1] = 'N' OR PV_QUIT[1] = 'n',QUIT CLEAR/SCREEN SET/PV LINE_CNT = 1 END_IF TELL PV_BUFFER[1:BLOCKSIZE] ELSE PUT/F PV_BUFFER[1:BLOCKSIZE] ,FID=A END_IF * IF PV_SEGLEN EQ 0 THEN JUMP GETPC ELSE JUMP BLDPC END_IF END_WHILE * "Put" last line IF OUTPUT = 'REVIEW' TELL PV_BUFFER[1:BLOCKSIZE] ELSE PUT/F PV_BUFFER[1:BLOCKSIZE] ,FID=A END_IF * * CASE 'LC' * SET/PV PV_MEM = 1 SET/PV PV_POINT_OUT = 1 GETLC: WHILE PV_MEM LE PV_NUMMEM * * Get record * GET/VIEW[!PV_SET!,!PV_MEM!]MARC@A ASSIGN/PV PV_MARCDATA = MARC_DATA@A SET/PV PV_MARCDATA = $TRIM (PV_MARCDATA) SET/PV PV_MEM = PV_MEM + 1 SET/PV PV_LENGTH = PV_MARCDATA[1:5] SET/PV PV_SEGLEN = PV_LENGTH SET/PV PV_POINT_IN = 1 * * Loop to build and write buffer * BLDLC: * * Record will begin and end in this block....0 IF (PV_SEGLEN EQ PV_LENGTH) AND + PV_SEGLEN LE (BLOCKSIZE - PV_POINT_OUT + 1 - 5) THEN * Set segment control word SET/PV PV_BUFFER[PV_POINT_OUT:PV_POINT_OUT] = '0' SET/PV PV_SCW_I = PV_SEGLEN + 5 SET/PV PV_SCW_S[1:4] = $PADZ(PV_SCW_I,4) SET/PV PV_BUFFER[PV_POINT_OUT+1:PV_POINT_OUT+4] = + PV_SCW_S[1:4] * Add record segment SET/PV PV_POINT_OUT = PV_POINT_OUT + 5 SET/PV PV_BUFFER[PV_POINT_OUT:PV_POINT_OUT+PV_SEGLEN-1]=+ PV_MARCDATA[1:PV_LENGTH] SET/PV PV_POINT_OUT = PV_POINT_OUT + PV_SEGLEN SET/PV PV_SEGLEN = 0 IF PV_POINT_OUT GE (BLOCKSIZE-5) THEN SET/PV PV_POINT_OUT = 1 JUMP OUTLC END_IF JUMP GETLC END_IF * Record will begin but not end in this block....1 IF (PV_SEGLEN EQ PV_LENGTH) AND + PV_SEGLEN GT (BLOCKSIZE - PV_POINT_OUT + 1 - 5) THEN * Set segment control word SET/PV PV_BUFFER[PV_POINT_OUT:PV_POINT_OUT] = '1' SET/PV PV_SCW_I = BLOCKSIZE - PV_POINT_OUT + 1 SET/PV PV_SCW_S[1:4] = $PADZ(PV_SCW_I,4) SET/PV PV_BUFFER[PV_POINT_OUT+1:PV_POINT_OUT+4] = + PV_SCW_S[1:4] * Add record segment SET/PV PV_POINT_OUT = PV_POINT_OUT + 5 SET/PV PV_BUFFER[PV_POINT_OUT:BLOCKSIZE] = + PV_MARCDATA[1:BLOCKSIZE-PV_POINT_OUT+1] SET/PV PV_SEGLEN = PV_SEGLEN - (BLOCKSIZE-PV_POINT_OUT+1) SET/PV PV_POINT_IN = PV_POINT_IN+BLOCKSIZE-PV_POINT_OUT+1 SET/PV PV_POINT_OUT = 1 JUMP OUTLC END_IF * Record will end but not begin in this block....3 IF (PV_SEGLEN NE PV_LENGTH) AND + PV_SEGLEN LE (BLOCKSIZE - PV_POINT_OUT + 1 - 5) THEN * Set segment control word SET/PV PV_BUFFER[PV_POINT_OUT:PV_POINT_OUT] = '3' SET/PV PV_SCW_I = PV_SEGLEN + 5 SET/PV PV_SCW_S[1:4] = $PADZ(PV_SCW_I,4) SET/PV PV_BUFFER[PV_POINT_OUT+1:PV_POINT_OUT+4] = + PV_SCW_S[1:4] * Add record segment SET/PV PV_POINT_OUT = PV_POINT_OUT + 5 SET/PV PV_BUFFER[PV_POINT_OUT:*] = + PV_MARCDATA[PV_POINT_IN:PV_POINT_IN+PV_SEGLEN-1] SET/PV PV_POINT_OUT = PV_SEGLEN + 1 + 5 IF PV_POINT_OUT GE (BLOCKSIZE-5) THEN SET/PV PV_POINT_OUT = 1 SET/PV PV_SEGLEN = 0 JUMP OUTLC END_IF JUMP GETLC END_IF * Record will not begin or end in this block....2 IF (PV_SEGLEN NE PV_LENGTH) AND + PV_SEGLEN GT (BLOCKSIZE - PV_POINT_OUT + 1 - 5) THEN * Set segment control word SET/PV PV_BUFFER[PV_POINT_OUT:PV_POINT_OUT] = '2' SET/PV PV_SCW_I = BLOCKSIZE SET/PV PV_SCW_S[1:4] = $PADZ(PV_SCW_I,4) SET/PV PV_BUFFER[PV_POINT_OUT+1:PV_POINT_OUT+4] = + PV_SCW_S[1:4] * Add record segment SET/PV PV_POINT_OUT = PV_POINT_OUT + 5 SET/PV PV_BUFFER[PV_POINT_OUT:BLOCKSIZE] = + PV_MARCDATA[PV_POINT_IN:PV_POINT_IN+BLOCKSIZE-6] SET/PV PV_SEGLEN = PV_SEGLEN - (BLOCKSIZE - 5) SET/PV PV_POINT_IN = PV_POINT_IN + (BLOCKSIZE - 5) SET/PV PV_POINT_OUT = 1 JUMP OUTLC END_IF OUTLC: IF OUTPUT = 'REVIEW' SET/PV LINE_CNT = LINE_CNT + 1 ******* Check for page break ******** IF LINE_CNT >= 20 ACQUIRE/PV MESSAGE 46710, C2=MSG INQUIRE/PV PV_QUIT, '!MSG!' JUMPIF PV_QUIT[1] = 'N' OR PV_QUIT[1] = 'n',QUIT CLEAR/SCREEN SET/PV LINE_CNT = 1 END_IF TELL PV_BUFFER[1:BLOCKSIZE] ELSE PUT/F PV_BUFFER[1:BLOCKSIZE] ,FID=A END_IF * IF PV_SEGLEN EQ 0 THEN JUMP GETLC ELSE JUMP BLDLC END_IF END_WHILE * "Put" last line IF OUTPUT = 'REVIEW' TELL PV_BUFFER[1:BLOCKSIZE] ELSE PUT/F PV_BUFFER[1:BLOCKSIZE] ,FID=A END_IF * END_SELECT * * Cleanup - close files and discard result sets. * CLEANUP: ACQUIRE/PV MESSAGE 46708, C2=MSG TELL MSG ACQUIRE/PV MESSAGE 46709, C2=MSG INQUIRE/PV DUMMY, '!MSG!' QUIT: ACQUIRE/PV LASTSET, N1 = PV_LASTSET IF (OUTPUT <> 'REVIEW') CLOSE/F FID = A,ERR=$CONTINUE END_IF DISCARD !PV_SET!:!PV_LASTSET! SET/DEF RESULT = Y * * DONE - successful report generation; return to caller * DONE: RETURN_TO_SCREEN * * Error - inform user and close file, if necessary. * SYNTAXERR: EXCEPTION: OPENERR: VIEWERR: SHOW/MESSAGE !DMSTAT! JUMP ERROR FNDERR: SHOW/MESSAGE 46702 JUMP ERROR BREAKERR: SHOW/MESSAGE 46700 ERROR: SHOW/MESSAGE 46703 IF (OUTPUT <> 'REVIEW') CLOSE/F FID = A,ERR=$CONTINUE CLOSE/F FID = B,ERR=$CONTINUE END_IF SET/DEF RESULT = Y ACQUIRE/PV MESSAGE 46709, C2=MSG INQUIRE/PV DUMMY, '!MSG!' RETURN_TO_SCREEN *PROC MRT tell 'TLP ENU 920430 L1F P004 TLPV3.3' return *PROC NWBLST01 *----------------------------------------------------------------------------- * * Title: New Books List * File: NWBLST01.PRC * Author: Information Dimensions, Inc. (HB) * * Description: List of Titles newly received in the library * * Input Parameters: * OUTPUT - may be 'REVIEW','PRINT'. Review displays report * on screen, print outputs to file for printing. * * START_DT/END_DT - find where COPY.ADD_DT is in range * * SUBJECT - restrict to certain CAT.SUBJs * * SORT_KEY - option to sort by title or subject * * MONTH_YEAR - Inputted month and year for heading * * LOGIN_LIBR - User's login library * * Other Selection Criteria: * LIBR_KEY - Restrict to certain libraries. * * ALL - Boolean value; set true by Slang if no params entered * * Valid Combinations: * Presence or absence of SUBJECT. Subject must be present for * sort_key = 'SUBJECT'. All other parameters are required to * be inputted to the proc. * * Output File: nwblst01.rpt * * Record Types Referenced: * TEMPLATE, LIBR, COPY, CATR, SUB * Buffers: @A @B @C @D * * Report Name: New Books List * * Report No.: NWBLST01 * * Menu Access: ??? * * Parameter * Input Screen: CATRPT10 * * Templates: REPORT_HDR, UNION_CAT, COPY_NEWBOOK * *------------------------------------------------------------------------------ * * Revision History: * * Date Revised By Description * -------- ---------- ----------- * 11/16/89 Berger Initial version * 09/27/90 Berger Fix paging problem, problem with type * 01/07/91 Sandstrom 20 libs fix * 05/08/91 Sandstrom Moved file opens and template gets * to be after the find command. * 07/03/91 MChung Substitute tabs with 8 spaces and * spelling check * *------------------------------------------------------------------------------ * START: ACQUIRE/PV MESSAGE 46707, C2=MSG TELL MSG,$B ON/BREAK BREAKERR ON/EXCEPTION EXCEPTION ON/SYNTAX SYNTAXERR SET/DEFAULT RESULT = N SET/PV PV_TODAY = $YYYYMMDD SET/PV PRINTTOP = 1 SET/PV RPTNM = 'NWBLST01' SET/PV RPTTTL = 'New Books list for '// MONTH_YEAR SET/PV PGNO = 0 * *set/mode echoproc=yes * Begin construction of FIND command. * * 910107smls added 20 libs fix DELETE/GV OUTSTR DELETE/GV OUTLC DELETE/GV INSTR SET/GV INSTR = LIBR_KEY @/PL='$TLP_PROC/generpts' QTBLKS01, VFLDNM='COPY.LIBR_KEY' SET/PV PV_FINDCMD = 'FIND SUB,RCAT,COPY,LIBR ' //+ 'WHERE RCAT.CATNO:=>>SUB.CATNO ' //+ 'AND RCAT.CATNO:=>>COPY.CATNO ' //+ 'AND LIBR.LIBR_KEY:=COPY.LIBR_KEY ' //+ ' AND ((RCAT.ADD_DT = '//START_DT//':'//END_DT// + ' ) '// + 'OR (SUB.ADD_DT = '//START_DT//':'//END_DT// + ' AND DOC inc ''SER''* AND RNUM=0)) ' * * Append FIND command based on options. * * IF (SUBJECT <> '') * SET/PV PV_FINDCMD = PV_FINDCMD //+ * 'AND RCAT.SHELF INC ' // SUBJECT * END_IF * * Append FIND for sort options. * * Removed copy.libr_key from order by * SET/PV PV_FINDCMD = PV_FINDCMD //+ * ' ORDER BY !SORT_KEY! RCAT.TI, RCAT.PUBL, ' //+ * 'COPY.YEAR, COPY.ITEMID, COPY.COPY' SET/PV PV_FINDCMD = PV_FINDCMD //+ ' ORDER BY rcat.shelf' * * Execute Find and set up for report generation * !PV_FINDCMD! END REF=NO ACQUIRE/PV MEMBERS, N1 = PV_NUMMEM ACQUIRE/PV LASTSET, N1 = PV_FOUNDSET IF (PV_NUMMEM <= 0) SHOW/MESSAGE 46705 JUMP CLEANUP END_IF * smls 910508 moved this to be after the FIND command. * Set up for desired output method SELECT (OUTPUT) CASE 'REVIEW' SET/PV MAXLINES = 20 SET/PV PV_FILEID = '' CASE 'PRINT' SET/PV MAXLINES = 60 spawn rm -f nwblst01.rpt OPEN/F nwblst01.rpt, FID=A, INTENT=WRITE,ERR=OPENERR put/f fid=a $t20,rptttl SET/PV PV_FILEID = ',FID=A' END_SELECT * * GET/VIEW [TEMPLATE_KEY = 'REPORT_HDR']TEMPLATE@A, ERR = VIEWERR * ASSIGN/PV HEADER = TEXT@A GET/VIEW [TEMPLATE_KEY = 'UNION_CAT']TEMPLATE@A, ERR = VIEWERR ASSIGN/PV CATINFO = TEXT@A * GET/VIEW [TEMPLATE_KEY = 'COPY_NEWBOOK']TEMPLATE@A, ERR = VIEWERR * ASSIGN/PV COPYINFO = TEXT@A * * Step through members of set, generating correct output for each. FOR PV_Q = 1, PV_NUMMEM * GET/VIEW [!PV_FOUNDSET!,!PV_Q!]LIBR@B, ERR = VIEWERR ASSIGN/PV LIBR_NAME = LIBR_NAME@B ASSIGN/PV LOC_NAME = LOC_NAME@B ASSIGN/PV CALLOC = CALL_NUM_LOC@B IF CALLOC = 'CAT' OR CALLOC = NULL THEN SET/PV CALLOC = 'RCAT' END_IF * * Generate report header, then data for each item * * IF LIBR_NAME <> PV_OLD_LIBR_NAME OR PV_Q = 1 IF PV_Q = 1 IF OUTPUT = 'REVIEW' IF PV_Q <> 1 ACQUIRE/PV MESSAGE 46710, C2=MSG INQUIRE/PV PV_QUIT, '!MSG!' JUMPIF PV_QUIT[1] = 'N' OR PV_QUIT[1] = 'n',QUIT END_IF CLEAR/SCREEN SET/PV LINE_CNT = 2 * ELSE_IF PV_Q <> 1 * TYPE $P, MEMBERS=1, SET=!PV_FOUNDSET! !PV_FILEID! END_IF * SET/PV PGNO = 1 * TYPE !HEADER!, $S2, LABELS = N, SKIP = 0, + * SET = !PV_FOUNDSET!, MEMBERS = 1 !PV_FILEID! SET/PV LINE_CNT = 1 END_IF SET/PV PV_OLD_LIBR_NAME = LIBR_NAME * * Check for new Subject (if subject is entered) * IF SUBJECT <> '' GET/VIEW [PV_FOUNDSET,PV_Q]RCAT@D,ERR=VIEWERR ASSIGN/PV PV_CURSUBJ = SUBJ@D IF PV_CURSUBJ <> PV_OLDSUBJ SET/PV PV_OLDSUBJ = PV_CURSUBJ * Check for page break SET/PV LINE_CNT = LINE_CNT + 2 IF LINE_CNT > MAXLINES IF OUTPUT = 'REVIEW' ACQUIRE/PV MESSAGE 46710, C2=MSG INQUIRE/PV PV_QUIT, '!MSG!' JUMPIF PV_QUIT[1] = 'N' OR PV_QUIT[1] = 'n',QUIT CLEAR/SCREEN SET/PV LINE_CNT = 2 ELSE * TYPE $P, MEMBERS=1, SET=!PV_FOUNDSET! !PV_FILEID! SET/PV PGNO = PGNO + 1 * TYPE !HEADER!, $S2, LABELS = N, SKIP = 0, + * SET = !PV_FOUNDSET!, MEMBERS = 1 !PV_FILEID! SET/PV LINE_CNT =1 END_IF END_IF * TYPE $S2, RCAT.SUBJ, LABELS = N, SKIP = 0, + * SET = !PV_FOUNDSET!, MEMBERS = !PV_Q! !PV_FILEID! END_IF END_IF * GET/VIEW [PV_FOUNDSET,PV_Q]COPY@C, ERR = VIEWERR ASSIGN/PV PV_CURCATNO = CATNO@C IF PV_CURCATNO = NULL GET/VIEW [PV_FOUNDSET,PV_Q]RCAT@D, ERR = VIEWERR ASSIGN/PV PV_CURCATNO = CATNO@D END_IF ASSIGN/PV PV_CURITEMID = ITEMID@C * If new catno, print catalog info IF (PV_CURCATNO <> PV_LSTCATNO) SET/PV LINE_CNT = LINE_CNT + 7 * Check for page break IF LINE_CNT > MAXLINES IF OUTPUT = 'REVIEW' ACQUIRE/PV MESSAGE 46710, C2=MSG INQUIRE/PV PV_QUIT, '!MSG!' JUMPIF PV_QUIT[1] = 'N' OR PV_QUIT[1] = 'n',QUIT CLEAR/SCREEN SET/PV LINE_CNT = 2 ELSE * TYPE $P, MEMBERS=1, SET=!PV_FOUNDSET! !PV_FILEID! SET/PV PGNO = PGNO + 1 * TYPE !HEADER!, $S2, LABELS = N, SKIP = 0, + * SET = !PV_FOUNDSET!, MEMBERS = 1 !PV_FILEID! SET/PV LINE_CNT = 1 END_IF END_IF TYPE $S2, !CATINFO!, LABELS = N, SKIP = 0, + SET = !PV_FOUNDSET!, MEMBERS = !PV_Q! !PV_FILEID! SET/PV PV_LSTCATNO = PV_CURCATNO set/pv line_cnt=line_cnt+dm_lines END_IF * Aviod duplicates from FIND command IF (PV_CURITEMID <> PV_LSTITEMID) SET/PV LINE_CNT = LINE_CNT + 1 * Check for page break IF LINE_CNT > MAXLINES IF OUTPUT = 'REVIEW' ACQUIRE/PV MESSAGE 46710, C2=MSG INQUIRE/PV PV_QUIT, '!MSG!' JUMPIF PV_QUIT[1] = 'N' OR PV_QUIT[1] = 'n',QUIT CLEAR/SCREEN SET/PV LINE_CNT = 2 ELSE * TYPE $P, MEMBERS=1, SET=!PV_FOUNDSET! !PV_FILEID! SET/PV PGNO = PGNO + 1 * TYPE !HEADER!, $S2, LABELS = N, SKIP = 0, + * SET = !PV_FOUNDSET!, MEMBERS = 1 !PV_FILEID! SET/PV LINE_CNT = 1 END_IF END_IF TYPE !COPYINFO!, LABELS = N, SKIP = 0, + SET = !PV_FOUNDSET!, MEMBERS = !PV_Q! !PV_FILEID! SET/PV PV_LSTITEMID = PV_CURITEMID set/pv line_cnt=line_cnt+dm_lines END_IF * END_FOR * * Cleanup - close files and discard result sets. * CLEANUP: ACQUIRE/PV MESSAGE 46708, C2=MSG TELL MSG ACQUIRE/PV MESSAGE 46709, C2=MSG INQUIRE/PV DUMMY, '!MSG!' QUIT: ACQUIRE/PV LASTSET, N1 = PV_LASTSET IF (OUTPUT <> 'REVIEW') CLOSE/F FID = A,ERR=$CONTINUE END_IF DISCARD !PV_FOUNDSET!:!PV_LASTSET! SET/DEF RESULT = Y * * DONE - successful report generation; return to caller * DONE: RETURN_TO_SCREEN * * Error - inform user and close file, if necessary. * SYNTAXERR: EXCEPTION: OPENERR: VIEWERR: SHOW/MESSAGE !DMSTAT! JUMP ERROR BREAKERR: SHOW/MESSAGE 46700 ERROR: SHOW/MESSAGE 46703 IF (OUTPUT <> 'REVIEW') CLOSE/F FID = A,ERR=$CONTINUE END_IF SET/DEF RESULT = Y ACQUIRE/PV MESSAGE 46709, C2=MSG INQUIRE/PV DUMMY, '!MSG!' RETURN_TO_SCREEN *PROC QTBLKS01 *----------------------------------------------------------------------------- * * Title: Build Library Key String * File: QTBLKS01 * Author: Information Dimensions, Inc. (BB/SMLS) * * Description: This proc is called to build a string of library keys that * can be used within a find command. This routine handles the * >20 terms/field limit. * * Directions: * * Input: * Passed as a global variable: * INSTR[*] - Input character string that contains the list of * library keys with single quotes around each key. * Multiple keys are separated by commas. * Passed on call: * VFLDNM[*] - Contains the name of the view field with a source * of the library key to be used in the find command. * Output: * The following global variables are set: * OUTSTR[*] - The product of this routine, the field test. * OUTLC - The length of the field test value. * BSTAT - Return status....0=ok, -1=error. * *------------------------------------------------------------------------------ * * Revision History: * * Date Revised By Description * -------- ---------- ----------- * 12/20/90 Beaber Initial Version * 01/03/91 Sandstrom Revisions * 07/08/91 MChung Substitute tabs with 8 spaces & * spelling checks * *------------------------------------------------------------------------------ * * * Initialize variables. * SET/PV VFNSC = 1 SET/PV VFNEC = $LC(VFLDNM) SET/PV INEC = $LC(INSTR) SET/PV INSC = 1 SET/PV OUTSC = 1 SET/PV SC = 1 SET/PV SC20 = 1 SET/PV COUNT = 0 SET/GV BSTAT = 0 * * Begin building output string by adding on '(', field name, '='. * SET/GV OUTSTR[*] = '(' // VFLDNM[VFNSC:VFNEC] // '=' SET/PV OUTSC = OUTSC + VFNEC - VFNSC + 4 * * Loop through input string searching for commas. * SET/PV COMMA = $MATCH(',',INSTR[SC:INEC]) WHILE (COMMA NE 0) SET/PV COUNT = COUNT + 1 * * Continue building the string as every 20th comma is found. * IF ($MOD(COUNT,20) EQ 0) THEN * * Add on "OR Field_name=", if necessary. * IF (OUTSTR[OUTSC-2] <> '=') THEN SET/GV OUTSTR[OUTSC+1:OUTSC+VFNEC-VFNSC+7] = + ' OR ' // VFLDNM[VFNSC:VFNEC] // '=' SET/PV OUTSC = OUTSC + VFNEC - VFNSC + 7 END_IF * * Add on next 20 keys. * IF SC20 = INSC THEN SET/GV OUTSTR[OUTSC:OUTSC+SC+COMMA-SC20-2] = + INSTR[SC20:SC+COMMA-2] ELSE SET/GV OUTSTR[OUTSC:OUTSC+SC+COMMA-SC20-2] = + INSTR[SC20+1:SC+COMMA-2] END_IF * * Increment index (SC) and continue looking for commas. * SET/PV OUTSC = OUTSC + SC + COMMA - SC20 - 2 SET/PV SC20 = SC + COMMA END_IF * * Increment index (SC) and continue looking for commas. * SET/PV SC = SC + COMMA BREAK_IF (SC GT INEC) SET/PV COMMA = $MATCH(',',INSTR[SC:INEC]) END_WHILE * * Add on "OR Field_name=", if necessary. * IF (OUTSTR[OUTSC-2] <> '=') THEN SET/GV OUTSTR[OUTSC+1:OUTSC+VFNEC-VFNSC+7] = + ' OR ' // VFLDNM[VFNSC:VFNEC] // '=' SET/PV OUTSC = OUTSC + VFNEC - VFNSC + 7 END_IF * * Add on last set of characters. * SET/PV OUTEC = OUTSC + INEC - SC20 + 2 SET/GV OUTSTR[OUTSC:OUTEC] = INSTR[SC20:INEC] // ')' * SET/GV OUTLC = OUTEC RETURN *PROC SPILAB01 *----------------------------------------------------------------------------- * * Title: Spine Labels * File: SPILAB01.PRC * Author: Information Dimensions, Inc. (HB) * * Description: Spine labels for cataloged books * * Input Parameters: * OUTPUT - may be 'REVIEW','PRINT'. Review displays report * on screen, print outputs to file for printing. * * START_DT/END_DT - find where COPY.ADD_DT is in range * * CALL - restrict to certain CATR.CALLs * * ITEMID - restrict to certain COPY.ITEMIDs * * LOGIN_LIBR - User's login library * * Other Selection Criteria: * LIBR_KEY - Restrict to certain libraries. * * ALL - Boolean value; set true by Slang if no params entered * * Valid Combinations: * START AND END DT REQUIRED. CALL and ITEMID are optional. * * Output File: spilab01.rpt * * Record Types Referenced: * TEMPLATE, LIBR, SYS_PARM, COPY, CATR, SUB * Buffers: @A @C @B @E @D * * Report Name: Spine Labels * * Report No.: SPILAB01 * * Menu Access: ??? * * Parameter * Input Screen: CATRPT11 * * Templates: * *------------------------------------------------------------------------------ * * Revision History: * * Date Revised By Description * -------- ---------- ----------- * 10/16/89 Berger Initial version * 11/14/90 Berger Fixed bug in dewey form on the * line counter * 01/07/91 Sandstrom 20 libs fix * 05/08/91 Sandstrom Moved file opens and template gets to * after the find command. * 07/03/91 MChung Substitute tabs with 8 spaces and * spelling check * 04/14/92 Sandstrom Fix for TLP-1291-7. Output for * call number was not correct. * *------------------------------------------------------------------------------ * START: ACQUIRE/PV MESSAGE 46707, C2=MSG TELL MSG,$B ON/BREAK BREAKERR ON/EXCEPTION EXCEPTION ON/SYNTAX SYNTAXERR SET/DEFAULT RESULT = N SET/PV PV_TODAY = $YYYYMMDD * * Begin construction of FIND command. * * 910107smls added 20 libs fix DELETE/GV OUTSTR DELETE/GV OUTLC DELETE/GV INSTR SET/GV INSTR = LIBR_KEY @/PL='$TLP_PROC/generpts' QTBLKS01, VFLDNM='COPY.LIBR_KEY' SET/PV PV_FINDCMD = 'FIND CATR,COPY,LIBR ' //+ 'WHERE COPY.CATNO:=CATR.CATNO ' //+ 'AND LIBR.LIBR_KEY:=COPY.LIBR_KEY AND ' //+ OUTSTR[1:OUTLC]//' ' IF START_DT <> '' THEN SET/PV PV_FINDCMD = PV_FINDCMD//+ 'AND COPY.ADD_DT = '//START_DT//':'//END_DT//' ' END_IF * GET/VIEW [ID=1]SYS_PARM@B,ERR=VIEWERR ASSIGN/PV RPT_MULT_ENT = RPT_MULT_ENTITY@B ASSIGN/PV COPY_RPT_SORT = COPY_RPT_SORT@B GET/VIEW[LIBR_KEY=!LOGIN_LIBR!]LIBR@C,ERR=VIEWERR ASSIGN/PV CALLOC = CALL_NUM_LOC@C IF CALLOC = 'CAT' OR CALLOC = NULL SET/PV CALLOC = 'CATR' END_IF * * Append FIND command based on options. * IF (ITEMID <> '') SET/PV PV_FINDCMD = PV_FINDCMD //+ 'AND COPY.ITEMID = ' // ITEMID ELSE_IF (CALL <> '') SET/PV PV_FINDCMD = PV_FINDCMD //+ 'AND !CALLOC!.CALL = ' // CALL END_IF * * Build sortkey to reflect correct call no. field, depending on * SYS_PARM and LIBR flags * GET/VIEW [ID=1]SYS_PARM@B,ERR=VIEWERR ASSIGN/PV RPT_MULT_ENT = RPT_MULT_ENTITY@B ASSIGN/PV COPY_RPT_SORT = COPY_RPT_SORT@B IF (RPT_MULT_ENTITY = 'N') ASSIGN/PV CAT_LC = CAT_LC_FLG@B IF (CAT_LC = 'Y') SET/PV LCADD = '_LC_SORT' ELSE SET/PV CATRADD = '(1)' END_IF ELSE GET/VIEW[LIBR_KEY=!LOGIN_LIBR!]LIBR@C,ERR=VIEWERR ASSIGN/PV CAT_LC = CAT_LC_FLG@C ASSIGN/PV COPY_LC = COPY_LC_FLG@C IF (CALLOC = 'CATR') AND (CAT_LC = 'Y') SET/PV LCADD = '_LC_SORT' SET/PV CATRADD = '' ELSE_IF (CALLOC = 'CATR') SET/PV LCADD = '' SET/PV CATRADD = '(1)' ELSE_IF (CALLOC = 'COPY') AND (COPY_LC = 'Y') SET/PV LCADD = '_LC_SORT' SET/PV CATRADD = '' ELSE SET/PV LCADD = '' SET/PV CATRADD = '' END_IF END_IF SET/PV SORTKEY = '!CALLOC!.CALL!LCADD!' // '!CATRADD!' * SET/PV PV_FINDCMD = PV_FINDCMD //+ ' ORDER BY COPY.LIBR_KEY, !SORTKEY! ' IF (COPY_RPT_SORT <> '') SET/PV PV_FINDCMD = PV_FINDCMD // ', !COPY_RPT_SORT! ' END_IF * * Execute Find and set up for report generation * !PV_FINDCMD! END REF=NO ACQUIRE/PV MEMBERS, N1 = PV_NUMMEM ACQUIRE/PV LASTSET, N1 = PV_FOUNDSET IF (PV_NUMMEM <= 0) SHOW/MESSAGE 46705 JUMP CLEANUP END_IF * smls moved file opens and template get. * Set up for desired output method SELECT (OUTPUT) CASE 'REVIEW' SET/PV PV_FILEID = '' CASE 'PRINT' OPEN/F spilab01.rpt, FID=A, INTENT=WRITE, + CARRIAGE=YES, ERR=OPENERR SET/PV PV_FILEID = ',FID=A' END_SELECT * GET/VIEW [TEMPLATE_KEY = 'SPINE_LABEL']TEMPLATE@A, ERR = VIEWERR ASSIGN/PV PV_SPINE_LABEL = TEXT@A * Step through members of set, generating correct output for each. FOR PV_Q = 1, PV_NUMMEM * * get calloc * GET/VIEW [PV_FOUNDSET,PV_Q]LIBR@C, ERR=VIEWERR ASSIGN/PV CALLOC = CALL_NUM_LOC@C IF CALLOC = 'CAT' OR CALLOC = NULL THEN SET/PV CALLOC = 'CATR' END_IF * * Parse the Call Number to print it in the template * IF CALLOC = 'CATR' GET/VIEW [PV_FOUNDSET,PV_Q]CATR@D,ERR=VIEWERR ASSIGN/PV PV_CALL = CALL@D ELSE GET/VIEW [PV_FOUNDSET,PV_Q]COPY@E,ERR=VIEWERR * smls19920414 changed field name being assigned to PV_CALL * from ASSIGN/PV PV_CALL = COPY@E to ASSIGN/PV PV_CALL = CALL@E END_IF SET/PV LENGTH = $LC(PV_CALL) SET/PV LINENUM = 1 * Reset temp variables to give to template FOR I = 1,9 SET/PV LINE!I! = '' END_FOR * * Parse LC call numbers * * smls19920414 added reference to COPY_LC. * Old IF was: IF CAT_LC = 'Y' IF (CALLOC = 'CATR' AND CAT_LC = 'Y') + OR (CALLOC = 'COPY' AND COPY_LC = 'Y') THEN FOR PV_P = 1,LENGTH SET/PV PV_CHAR = PV_CALL[PV_P] IF PV_P <> LENGTH SET/PV PV_Z = PV_P + 1 SET/PV PV_NEXT = PV_CALL[PV_Z] ELSE SET/PV PV_NEXT = ' ' END_IF SELECT LINENUM CASE 1 * Check for letter IF $ABS(PV_CHAR) = 0 AND PV_CHAR <> '0' SET/PV LINE1 = LINE1 // PV_CHAR ELSE SET/PV LINE2 = PV_CHAR SET/PV LINENUM = 2 END_IF CASE 2 * Check for period followed by a letter IF PV_CHAR = '.' AND $ABS(PV_NEXT) = 0 AND + PV_NEXT <> '0' SET/PV LINENUM = 3 ELSE SET/PV LINE2 = LINE2 // PV_CHAR END_IF DEFAULT SET/PV LINE!LINENUM! = LINE!LINENUM! // PV_CHAR * Check for a space or next character to be a letter IF ($ABS(PV_NEXT) = 0 AND PV_NEXT <> '0') SET/PV LINENUM = LINENUM + 1 END_IF END_SELECT END_FOR * * Parse Dewey call numbers * ELSE FOR PV_P = 1,LENGTH SET/PV PV_CHAR = PV_CALL[PV_P] SELECT LINENUM CASE 1 * Break on period IF PV_CHAR = '.' SET/PV LINENUM = 2 END_IF SET/PV LINE!LINENUM! = LINE!LINENUM! // PV_CHAR DEFAULT SET/PV LINE!LINENUM! = LINE!LINENUM! // PV_CHAR * Break on spaces IF PV_CHAR = ' ' SET/PV LINENUM = LINENUM + 1 END_IF END_SELECT END_FOR END_IF * Type the Spine Label TYPE !PV_SPINE_LABEL!, SKIP=0, + SET=!PV_FOUNDSET!,MEMBERS=!PV_Q! !PV_FILEID! IF OUTPUT = 'REVIEW' ACQUIRE/PV MESSAGE 46710, C2=MSG INQUIRE/PV PV_QUIT, '!MSG!' JUMPIF PV_QUIT[1] = 'N' OR PV_QUIT[1] = 'n',QUIT CLEAR/SCREEN END_IF END_FOR * * Cleanup - close files and discard result sets. * CLEANUP: ACQUIRE/PV MESSAGE 46708, C2=MSG TELL MSG ACQUIRE/PV MESSAGE 46709, C2=MSG INQUIRE/PV DUMMY, '!MSG!' QUIT: ACQUIRE/PV LASTSET, N1 = PV_LASTSET IF (OUTPUT <> 'REVIEW') CLOSE/F FID = A,ERR=$CONTINUE END_IF DISCARD !PV_FOUNDSET!:!PV_LASTSET! SET/DEF RESULT = Y * * DONE - successful report generation; return to caller * DONE: RETURN_TO_SCREEN * * Error - inform user and close file, if necessary. * SYNTAXERR: EXCEPTION: OPENERR: VIEWERR: SHOW/MESSAGE !DMSTAT! JUMP ERROR BREAKERR: SHOW/MESSAGE 46700 ERROR: SHOW/MESSAGE 46703 IF (OUTPUT <> 'REVIEW') CLOSE/F FID = A,ERR=$CONTINUE END_IF SET/DEF RESULT = Y ACQUIRE/PV MESSAGE 46709, C2=MSG INQUIRE/PV DUMMY, '!MSG!' RETURN_TO_SCREEN Ľü¸ ! 7˙˙˙˙ îü÷@0Ź™«Ktż@0Ź™«Ktż70 generpts.src77.src7 generpts.srcůE÷óĺHŕÓ¬‚Ç!Ż%˙˙˙˙ =€Đ  ,3€Đ  ,3€€„ĐĎࡱá>ţ˙ =?ţ˙˙˙<˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙ěĄÁq żbjbjt+t+ ŁGAA˙˙˙˙˙˙]’’’’’’’¦¦¦¦¦ ˛ ¦tÚĘĘĘĘĘÍÍÍ9;;;;;;$NôBB_’ÍŤ@ÍÍÍ_ó’’ĘĘĂĘóóóÍ’Ę’Ę9¦¦’’’’Í9óFó9’’9Ęľ Đö8N˛kż¦¦ă9  úú jUýýţ &P °. °ČA!°)"°)# $ %°nđJv÷¤ŻĘ.Ţ»g đra˙‰PNG  IHDR÷¨M-]SgAMA±•ô¦đIDATxśíݱ«ÜĆľđqđ`¸Ü6pá‚›TiҸ¸MÚČđşK <üŠ¤Hš—&) îŇů¸p0éÜž&Ť«Ó0Nk ţŢ+d+ŠFšIł»Úź?ŚXŻVŁ‘V»šóŐŚ6%€îĄ”Ţľą;FŃŻ_˝Ľzţâű~:FáŔĺúő—źSJÇk$Ľ~őň‹Gß|2üŰéŐóŁő™ššššššš¦”ľţęËôAóň»©Ďr^żzůŹ~Ţ?ŰJźĺ4/¸\]rĽFÂŐóOž>{źĺŁ‰ÓÓĆú,çHMś®üOúuüăźź§m«VÓ®ä¶eššššššš~ýŐ—]ďśVeöľţęËî™q–ÓÍ05555555˝ ißžé›P)ď—ÓÍřâŃ7 ŕBtĆűë_WĎ_*żĽŇą˘ ugöIÍ#•´˙,§o@ »ČžÎ=ł´úĘVĹĚr–žĹ»s˙Ň_ˇŰo9,ÉçćĎĚŢpĄŰÁ3űÁk&˝Ód9µc¬ęOęy‡ u0wĄ)͆šĽŢTĹŞpąjnĄdđń¨9ł÷§Ëî˘ÇÜËZ]ü:Ă«îÜż¨śBsatĺhu}şúő‹¬[)łź1Vy9iK–ł˘ëÉ– Č{/-a äjÎě• †e9ë"ŤŐ-ľš>4+.WőĎçý‘×­Tc€ŹĘÁ3{ý9q_YÎ˘ŞŹV\ł]l“ŹÍ>ß?^Z“ąÂk^żzĄL}żśN“ĺĽ˙µÎü®F?áąN«âö áOl¦”F?üY™) ŻĄtĺtżÖ9¬U÷žűş_°[wżżcT ;ĆjËŠe9Ŕ ~“|énżI4pě,gĹnYĐŔ ˛ś´pL÷ú,§Ó-ĽbÚ—łşSSSSSSÓýL›źŮSJ]Łd{9i*˛ą—Rúăú?ŁŞ?yú¬{2m6ld—®á™˝UQÝHňü¶8÷RJ˙óß˙5ZĺŠßs8—î~9żţňs˙ĚźwěźęŁożűqé îîîţőŻ˙mPS€®ű,§ęo˙ôţđ%}ČÓ5tîîîĆ…ÝÜÜ4©)ŔRÝĺŞaCçĎVN>ĆŞ­ŰŰßRJţ»~V÷|§›;|fř|ľČđůňR…ŠíßEWľŕŕvťrĂŁîd€`FýrRßĘÍhŢĐ9ŘÄ©_¤&_°_äöö·ŰŰ߆Ë–š|ýÁm™«pů«ŇďXMz÷î]Ă ­nâ”?m› }iţ»ű—ć7„#é÷|°u°Z~[ś5YλwďNP™Vú†Ô\žÔµĄ&›)“ÉPľŕ0LęÔç ĂuM¶[–ŔGŕşűąŞ.˛I~züĎß±ÎH)ť¬•ł§©Ţ>wÂ>kұwµ·ř]Oţ&yí«3*WľçˇRÎ @Ţý¦6Ë©QČrŘŰŕ”˝Ő'Ľăípo%Ŕ\–s˘ß±bo§ź˝Ő'Ľăípo%@gGc¬Zü;V777çŞ+@˝Ĺ÷>ţěłĎęK×$Î%ż÷ń˛ß±Ř'ýr€¶ţ&9Ŕ>Ér€d9@L˛ &Y“,I–Ä$Ëb’ĺ1Ér€d9@L˛ &YSŮÜź›ÁQÝŢţ–Rzřđßőłşç;ÝÜá3ĂçóEćžĎ,TěRLnÂEo×ŇĘĎ˝ďG’™­Ę,”¶˙7ô”Çáţ÷Ć…úwěĆM>ń—O®‹l^żzŮE6Ož>»?9ŁICgôÝW>Iw/˝lhnÖÁ]ą®ŔëšüfŻ¬áÁ&ÎÜóů"…U÷‹ÜŢţÖíŰ+żľˇŃ'á§ÉŹYást¤ŐĄůC—Ř|–:ń—Oî¤ýrúCĽ{0úo}6†/ëçfܡë ,ŻkQĺëßňŐMśň";< Ťj>:6¶îë5ĽýżË§¬á÷ĆQ?Ë°TŢýćYN˝ł·ţÉ›A‹ÂŹr¸nW´ŤUOçtćÖ˛î/ÂąĄFÍÓąąéŻ-Âţ˝>\ę`=8*muĺóýą4@>x5sQiĺĄć*żôý*ϲeoLÖp˛ĚVÇaMý.•Ď:’†źĺ›|đ]^±{ë߯ú­«YÝɶ«°ÔęŹŢŮ[·űc5ů·Č(2Ů®y Ő4nşĆGĂ5¶-°•ą¨ě ąw¶çM®«ś?Č—Ş9–ŘUřľ«¬üP·˘úÝXŘ®uoJa©Â¬Â&§ůwů`ÂşeoĚŐ°/sXĄVÇáĆuÍQ§´î°)lňşwyÝî­|żęĎ&ĂĄ&['Ű®¶ß6“Űu.;cŐď©ąsíÁť5úkř -.]׺ĄĘŻĚOŤ[ěá0MeWŁťvÔ¶ZעoşV&+?˛±VŁ#déŽ*,USůEjj¸h-•5lňľWîŢÓc‹ăł<Úäuďň vďŠo€ÉDˇ†gŮ®Ąëjµş-ö5Ćjô6ßţ5đ,´ ×…cë \·®ĄKŐ|ň=g?we]łfÔ4߸K[µ\·—PŘ®u•\úçűn»†m›ňg˙“úxö°iͿґ?_ŰW´eÁS:髲šścňďČáó· űŽ¬(pÝşÖ-5ʵö’sösÝ®+·Ń˝űŮŁíÚľŁ(h¸ŁÎuDťćłĽ“#Şá7@^ŕń–ÚrlědĎ—í®_ΖŹDókS¸áń‘_ÝRÇ˝P:W`˝ÂŐôá3ą˘ŘŐ Ö«ß˝«ő[‘Ż«rŹ·j.MVľI­ćJX·Ł K-ŞüşuĄm‡Í1vďČöă°r-ĺµϱߔÉ5wÉf{5†ëjňY+ÔpăçkEć^°ôť{ňdMíĽűÍ˝”ŇŰ7wy–óíw?ŢÝÝ-*ýćććńăßGOŽ¶mŘ„5üËm‚ň‹ ‡ěşó:ŹÖ•/;ůäd łÉb ĎW–V¸·˘Ŕ¶ŮědŔV¨^e±ů˛5ű6ýőŔxŤŠJŮ‘SSÉú®I1ś5zqýάßićÍŞ_Ş<+Uoň\Mćž\th5ŮäÂÜć»7eÇ@ůÚçgyËq¸ń”WňŕA5ąÔśÉŻ‚É2+?Ë+›¶ß65e¶:Řą~űć.ĄÔE6)Ą«ç/ž<}öľ•3š‘RjŐĘ!wŞ·|ĄťW wq_\WáÝ»Î#›/}ăw¬Î ůµ¶†|đ¸Pűcő1Űm3b·3ě2˛ó/±u—ă©´Ł1VĐÄ5.¨Ş—hwc¬šŘŃ˝Ź:gżśă“kFzĎŤú«•Z®ŘR5#Ű/×–u‰ťšW_>żÄŤŕlýr*ďSłHá~Ăű% ű Ťîkt;őSő}Ö 7ŕ™Ľ“ jĎCáČí®_Îę&Ny‘śźúšř“˝ĆĂ]ţ<‘äÝoN‘ĺ”üuůGŰ‹Kăś‹î)YYÎÜ=%çž\}kË|Áá@ÍuőĎYw˙Đüf …˝1şęč~ŁwÔŠí*ď(HŽg_YNMăć¶Ĺď_ ŻUĄÍg—<–ČźéN˝“íüůšĘËĚŻÄĺçěuŐ(¬kř`Q03÷âa5ęK+T~rV˙80ą˝©ú°ś«FaG­;¨´»1VĺÓŰčś´ÚéĎ.s=©GŤ†E5)wšž,pu5N3Ô´u&+_Uż{·t.®\×ö€˛Ýű¸ćű=^¤ßü¬vą§Éţ*áđ™…4­Ôëöüĺľ_ű·»{Ź®8,ęq‰m ćuľÄťĐ…1űż5űĐşŞ^Đ\śőËé{-´¬4Ľ°ĂfPŢ9fc—Łšç.Eĺ}t–®}{©%LöĹ™ěMĽt»V\:¬|+ 5ś|ż„=«ĺÝoň+żzţâŰď~Ľ»»[TúÍÍÍăÇżOÎ*śuŽUɬ)­0śç`o•ĺÁM);VŮo¦Ľ˘|©ąGCŠ KJËk¸âÓÁ–ÖĆËŰ•Ź˘í“ÂŽZ·ççjRżÔ®Zçâúí›»”R٤”®žżxňôŮűVÎhFJéd­ś=ŘyőV·EGbG„pťG6_<úćDc¬ö<˘Äy8gżśE·E9ĄÝVlµQ÷ćŘQ‘śçŢÇśX°FŰńŘQ‘ěhŚp˙w=űŕÂíîŢÇMśóŢÇ‡Ď đîT?^1’®Ľ_NÍ"…Ű™ ď}r›ýTußNÝc7}Ͷäśc+ßU¨ͨ‘]ů3&5ÎUfĎŁNlwýrV7qĘ‹śŕ«żŐ-›Ď(Ţŕ˛ÓľőŁ}8ÚźůA2yŘÔ8śĄM0éy2|¦o~-úł»°Ôܬá sóx`rĘÎE«7ą˛ňýÜšÝ;śU¨aŰĆǨ>•ďB}ŚěnŚUů«Ľ˙xcCgŘ#gK9ŤÚ••ź\ŞľŔć§ĂE®ŰäĘuÍ5VjÖUh(´jC6sKByđ@“Î9ĆjdŃ_üŰ®\ěĐĹťĆNąWË}u'Żgfm±®)ł®ŔąÁôÎ6ĆjÎčŠCĺ7¸żh÷ć”ďEa]ŁlxDfmŻĚÜu˝m ą‡y¤#`ŇŽúĺôť$&ĎCë LNĺđď$1ş†RąşÉ.&ŁŃď‹ Ěµ˝Z—‡"Ă.ZעZ•×UXď{w­Óä.@Ty÷›{)ĄüÇĘŻžżřö»ďîî•~ssóřńď“ł §çąë‡Ň”K«,ę`s*GúÔ—YčmS•˛Ř`î5sëš,ˇĐ”yxčĆ05[Ýďóň(Ş•ŻYjË«üŘ(_2­b´řÁ·©˛ŔÉ*UmTá—î=:Ľ8ŔN]ż}s—Rę"›”ŇŐóOž>{ßĘÍH)ť¬•ł;Ż^H—˛Ď/˘žZ9ŔGď:Źlľxô͉ĆXí9iżÓçµŰk^»­ŔéĺÝoN”ĺŔPóáNÔ’ĺ1Mg9gcĹÇIË€ćvtżŕ 6@\ůýrÎ|ďc€&vtż€†v÷;VMČr€d9@L˛ &Y“,I–Ä$Ëb’ĺ1Ér€d9@L˛ &Y“,I–Ä$Ëb’ĺ1Ér€d9@L˛ &Y“,I–Ä$Ëb’ĺ1Ér€d9@L˛ &Y“,I–Ä$Ëb’ĺ1Ér€d9@L˛ &Y“,I–Ä$Ëb’ĺ1Ér€d9@L˛ &Y“,I–Ä$Ëb’ĺ1Ér€d9@L˛ &Y“,I–Ä$Ëb’ĺ1Ér€d9@L˛ &Y“,I–Ä$Ëb’ĺ1Ér€d9@L˛ &Y“,I–Ä$Ëb’ĺ1Ér€d9@L˛ &Y“,I–Ä$Ëb’ĺ1Ér€d9@L˛ &Y“,I–Ä$Ëb’ĺ1Ér€d9@L˛ &Y“,I–Ä$Ëb’ĺ1Ér€d9@L˛ &Y“,I–Ä$Ëb’ĺ1Ér€d9@L˛ &Y“,I–Ä$Ëb’ĺ1Ér€d9@L˛ &Y“,I–Ä$Ëb’ĺ1Ér€d9@L˛ &Y“,I–Ä$Ëb’ĺ1Ér€d9@L˛ &Y“,I–Ä$Ëb’ĺ1Ér€d9@L˛ &Y“,I–Ä$Ëb’ĺ1Ér€d9@L˛ &Y“,I–Ä$Ëb’ĺ1Ér€d9@L˛ &Y“,I–Ä$Ëb’ĺ1Ér€d9@L˛ &Y“,I–Ä$Ëb’ĺ1Ér€d9@L˛ &Y“,I–Ä$Ëb’ĺ1Ér€d9@L˛ &Y“,I–Ä$Ëb’ĺ1Ér€d9@L˛ &Y“,I–Ä$Ëb’ĺ1Ér€d9@L˛ &Y“,I–Ä$Ëb’ĺ1Ér€d9@L˛ &Y“,I–Ä$Ëb’ĺ1Ér€d9@L˛ &Y“,I–Ä$Ëb’ĺ1Ér€d9@L˛ &Y“,I–Ä$Ëb’ĺ1Ér€d9@L˛ &Y“,I–Ä$Ëb’ĺ1Ér€d9@L˛ &Y“,I–Ä$Ëb’ĺ1Ér€d9@L˛ &Y“,I–Ä$Ëb’ĺ1Ér€d9@L˛ &Y“,I–Ä$Ëb’ĺ1Ér€d9@L˛ &Y“,I–Ä$Ëb’ĺ1Ér€d9@L˛ &Y“,I–Ä$Ëb’ĺ1Ér€d9@LÓYÎëW/Żžżĺ—+Źlîw˙é§IC¸@˙řççżţňs÷¸kÉÜO)}˙ĂOý+ş\ç,•Xíő«—Ă&Í“§Ď>ÍÖ/¸D}żśŢýţ‘~9Ŕĺęúĺ #c¬€Ü/Éýr€ňČćţÜŚ”ҧź~ş|ż7Ş*ŔŁ~9Ož>»?9ŁkčÜÝÝ-*ýćć¦}•*č—Ĥ_ÓĘ,çÝĽÓÖ`ÚĘ,çÁ§­'Ŕ2úĺ1­ď—3çČx€ťĺ1mc5Jn9Ŕ~Čr€¶Ţ/§Ďo9Ŕ®Čr€ÜűřÁ‚`od9@L~Ç I–Ä”G6÷‡3^żzŮÍč:777çŞ+@˝<˛ą—Rzűć.ĄÔÍH)u3ž<}v¶j,ńöÍÝ(˛ůâŃ7÷>ŔF6Ož>›č—Ó?65555555˝ é¨_Î8ËIM]=ńý?5/¸tGm$Lg9mWĐ޶d †c4&î—Ó5JNG÷Ýi^ľ©©©©©©éEO;ÍKŹ±úő—źÓq|˙ĂO)Ąă•\¨Ł6ŚÂú˛ţ O°ĘO IEND®B`‚nđ'"ćSĘiÎ}x2ö´÷±É˙‰PNG  IHDR÷¨M-]SgAMA±•ô¦ IDATxśíÝ˝ŠIÂ.ŕčĄď`ŕăsĘYkťqÚřśu—]Ŕńšá cĚłÎYg×ČkO° ÄxrŰYGV;uĘ‚˝†>FÎäÄddFĺOTUfÔó ’REfdTuţD˝Y@ŤnB_>NQő§ŹŢľ{˙ý;EĺŔvýó!ś®“đéă‡oî^ü.ţŮéŰwď;ë35555555 !üő/ż(^ó ´YΧŹ~˙‡?µĎ–Ňf9Ĺk¶«‰BN×Ixűîý«×o~ÎrNŃĹiéâ±6Ë9Q§©˙wí:~˙‡?…_úVĄ¦MÍeë4555555­`ú׿üąťSŞÎÖ_˙ňçć™n–ÓšššššššnhÚögÚ.THÇĺ4ßÜ˝ŃÜ0Ţ^˙zűîý«×on›˙t˛śp˛ŰËĘúŻ˙ţ:ü2ü¦Ťl~}ŹËůkŃ›»JŐcjjjjjjzńió` -éLC_dóë·¶35!Os+,óöÝűďřŰňz€5(xf[čëfâ~KgřÍĎW¬>%!O(w{ůIoSÎlů™ýí/wEĹőŚüďÇuę }YÎผP˘oU¤ž3hŢÖć-‹­‚gö¶żŃé0Ť9˙ĆťˇNże¸ść™%/ H=Ŕ<ł/ě0µť|–Ó˙}9KVÜÚJ–Ó oţýř/A¤Ęf9ÍR‘Jč‹lN8.g(ŚĘ‹c¨¸·Ńű|ŰAz0¦’tíťúó+Ş *3ďĚŢ«x¤Öźĺ´xLćů¸´óĚÔJĆ7&ł ¨XťYÎÔłxsîźÚăË ű͇%iiúĚPĺW u;zf?zͤuž,gě=VăOę造y/`čJSľŞ÷zÓř+V™ËUC+uC×cĚ™˝=]6=†f+uńë÷X5çţIődş ť+GłŰÓÔĐţżČĽ•@eÖsŹUZOX’ĺĚz˛ä¤Ł‰§Ö°„„RcÎě#; +ĘrćEł{|cĆĐ̸\Ő>źŽGž·Rť!®ĘŃ3űřs⺲śIMď¬xĚ hb›ôŢěřůöńÔ– U>fţŮ+€ĘŚ—sÔy˛śź­3ý«ÎOxÎSꇸ€5(ř›!„ÎŽĚâk)M=ÍŻuĆ­j~Âs]ß—¬Öćľ/ÇďXŁT{ŹŐ’Ër gřMň©÷tűMr €Sg93îé–ĺś!Ë ďéžźĺ4š…gLŰzf×`jjjjjjşžiń3{ˇé”,Ż'ôE67!„?ţ«ÓôWŻß4O†ĹâN°uĎ쥪jî$Ożç&„đţ÷˙ę¬rĆď9\Jó}9˙üÇßŰg~ýVŔö©68úö»§®ŕp8üĎ˙üß-H=?•ě˙ßţś ˇµŰÝ_ş Đxlłśö©˙úďŻoăYÚ§éč‡n%YOOOEZ 0Usą*îčüÚËIď±؊θśĐör:::űýCűx·»Ź˙;$ť-Žy{k¨ zgâwŁy™C˙ŤÉWX˘˝Óyůař•¶2ďafΰý÷*„nî~}üünîÂóăĐëÚď:ďęw ^Şó|ó S:ôüŃ Ă±żu¦S×5´ät]C-ß„Ěa9- Ů}íhQfu“–ĘŻkhÁć8PĂîLzŹUîw¬zýç?˙9};W­ÝPšń;ŹăMŞw¶Ţ˘üĽ!cŢŤĚüéăt¶âmľˇ2r‹ęü·łT¨ěkş8ĎŹ?ŹŃůĄÇÓî/űýCóŻ]˘ł+uć<şT\ź?2{hĽlľÂŁ2ÍÝřvńôEe–z]›–9΄áQćť?÷®eŇRG›ŃjŰSÍ e¤iżc5DGNˇ9M=]Ďńë×.Ncx0rŻ˛ťĽŢsŰúĄ=¤°©öo]o?őÔ®ęď;í»ŹY˘‰ŻjóĘHߍ&A=őÇz?lläĘ٢zôut:›ÖHó–ęHş±|]'­°cäëâRŽ®ç¸1经cmŠ#Î ŮäyÉ! ľOWGŻ×ôb—Č\;ĎlQ»qĂ®Df[ĘŚK8şüđ˝dkďmƉmW:fş´Ď0T”ŻvŇRůqB“®V Ŕ¸Z˝WCۢŁ‹§[^~‡Ů®ˇ—SßeţÓ©l“(ŕćî7˙~1o[Ęw"Óó}üL‘sŇQ™Sżd]Ő›Ô!ČŚ¤Ě lŠGË9äö]Ű_sѸśN~#ÎÉë ńąH­—$ŇwăjÇĺÍś{·¨kŚsÚȡ{ÝŞłiuŠň}îŢQśC'žŮ;l¦…™EĆd˝Ťź1Ň«ĘŹ[ç”ď•ýQf{°WwL!Čr€ űí}UçÔ{Ö?˙µ€ĺťŹˇű­N±.†®0ŽCSd»şÂŽNŮüü é÷ĺ|űÝŹńw%7_}őUűřéééĺËźNű V \ŹŮŚ2łĄEŐVĆĽäôžÉŢÓÔ7}~»–oQ˝÷űT¸] őršoÍéÓ o:w¸drťˇĄ¦ÎŮٶ{kč}>]jd·#}]#w¨ĚşfĽ®MČzßňă`FÎS$4Ęź2ëjß.ť›ŠMíßôłloÖ2{Ť§¨pä·Ű×éD6Ż^żąX–÷‹;›`Áë—Šm˘č¨ćdśé%43 E>“ ĺC˝ëÓŚ1Ýsv2–Żk%›Ť˘1Eë<[gZµ†Ç}ť3ü˝ŠtCidsBřňůBh BMÁ·ßýx8&ŐţôôôňĺOSŰTGÖ'Ňv:˝Šˇđ#ťg|\Ń›yô.>¦(»’5c4ńP 3ó]—,§zóN˘ă;"霽ˍYÎmĚLí9ěvŚYWˇµ<~ů|čD6ßÜ˝0.¶ˇ·gÓ{nn•ćż?‹ĺLť®F‘ *Ó†ł­‹µ9ŃUyĂfÓ¤StYçěßśÂď±fHϦßűRęnŁŢşÍ“™˘L m—·mŚńëňÝ9‹o_ÓAé\XI—Šo‰šŃ0·ź4µţ‘}»¸¸Ń.Nč»Çęç+Vi–s¶+VŔŁCd†.Ĥ—ŤF^®ęč˝Q+­­·hčË~†ĆĎkaď;EG×uŇ/"bÓŇ;ş;ĎťaL=±ˇËU˝Ąi%˝¶Űk™â1~óęő›ËŹËX¦\Žß±j`\P'żIÔI–ÔI–ÔiuYÎE~¸¸â}YP§Őe9EČr€:Ér€:Ér€:Ér€:Ér€:Ér€:Ér€:Ér€:Ér€:­.ËŮíîw»űł­X‰â}YP§Őe9EČr€:Ą‘ÍíPÁyě÷!„ËÍYCÖăâďFÓ€mhś±ěĚ~]°!őmç[9°„U6ď¨âgś&˛ůôńCŮĽzý涷`s­âżtl‹ő+·ŰÝý5Ź.†·„‹›ýşÖŁs<Ýď2/*.˙§Ş°Ý‘;ĄCĎ­0;8dš1u]ńŠzĎIóÖ5ÔňËŞ`;ď5ôGěĚSp›ĎĹŤYůqďüŞ—Óţ՛۫=ŔVě÷Íżöż!ş!"ýČžîzťÝ°3çŃĄâ˘xu™˝;^6_áQ™fĚnü¤÷°·?Ô9×Ć ÎfŢ6?ô`d…CŰéđ›J˛śŚřP’V: GÚÇ˝Ď÷Öą¤“ÖŐ»T{$MŚ]ߍt‡ßťÔŚ‘U…äÝz-#k>ş®&óčťaäëYÔ™av”=ôGŚ¸“Žłé;°DĽa—­ů¤zßĂ%ío7ă‚™˙Ѩlč7uÇyĐ8zH™·;Lję<Ú2+Sm–ë|`Š·ňIźD‡>xőÖyt>ÚŚŁăŇuő.Ő>NŚ]ĄŢŤx©©ű|ď•iFľŞt©ôcqúŠf8Ú©ŻkdQďá~ĆŐYpHď #—-˛ÔŃölaFń ;Žľ®řOĽü#ţĐ(řŠß„‘myXÎR¬ݡě_jüp©MôÚÔŹUf›w䍗-ňi`ö¶[dŁůşć-5c?ĎĎ<ŻE–š§w]“^פĆu㦾Qó¶´ü®7T:őĎ·Ä’?zo3NÔřKMíÎÎ6f/XáPg%.=ş;L*šdŢ6?ŻÂx ŚŐÝcUÜĽmkČ© W4»yg[Ýî—X>~fĆŞ6ă‚Nz<Ęż˝Sߨ¸¶Lł‡.jĚŰőĆt€Ňµű%¦ÝOąčłđÄ“®ejă—¬ëD Őłf™nÍĐîpŠQ(}şÉWXęO\˝jﱊő~ś]RŐ©uš:ő*̤Ąó^×ňĄ&ť“Ę6c¨Ş}ßŰRőźAćíť4ćű:™ý+_”99ő.7fj2dĆÁ!ÓŚŁŤźÝĽń»IÁ“ß’CĘ9e^éČݡČ(®vę6?ŁÂŰĆuşŠq9KtŽďńůo_čv†|%§NY&˝®ĺďĆ’7mčŠŘÔf¤K…ľăŃĐcŇKH#ô…-Ě7~¨ň…[ď.ęqž«!CŤIW˝;ű­”Ëß1Űá¤uĹť"[ogÁKÍXpĆÇłˇ {̡lë¦n‡ŐĽđńŇá77!„/źi–óíw?‡Iµ?==˝|ůÓ¤EJ}zÎg™˙¦‹g2˙̧ś1/ˇ}±éÇŻř™Nif]˝KĹł ­qčuĄŻná»1ăŤĘĽł›Ž˝¨Ě˛›ho Źn‡C-<Úřt]™f,‘ŮĆR™×8o©©sÍ$ňoČČfdšÔ»Š‘ÇźĚ;cSżČĐŢ7~ëÚm3mË;ké-=Ń(mçPâ:3Ű|şěMôč¶1ÔČüóëQ´…Ź_>BMdBxűîý«×o~îĺt BŰęĺlÂU˝Ř:ř“±]+ßzWŢĽÖ&Úą‰Fö*ŢËéD6ßÜ˝¨í+(k‹hŘzKYíĄźŐ6ěRŇá7Îr®ÇěĚ 2Ž‡ś@–Sá=VëdOh8r"î±ęT˙w×iuYŽ‘SpťŠ÷d9@ťV—ĺ!Ëę$Ëę$Ëę$Ëę$Ëę$Ëę$Ëę$Ëę$Ëę´ş,g·»ßíî϶:`%Š÷d9@ťV—ĺ!Ëę´ş,gżŘďNZgóßâk–(~vN#›Ű¸ŕÓÇMÁ:/ZuŢ‹‘C–v»ű*»8ĎĎŹ˝ĎßÜܵE77wńśqQg‘ˇ ›˘ŢҶ¨SÚ¬ĺĚëJkŕÚ¬.Ë™¤íÖäGeŻóľ­â‘R{jżąąkţĄEéü˝K5ý†LQűdú8^<]älë€mg9GĹ}ŢŽN;C[?Ó)ÍDGCKĺëQ:·Â~XCÎÖ×Ŕúm;Ë9*źâě÷í ˝Ý‘¦´“Ą‹d–Z{šB•Íu: G. u˛“3č¤/Ő¬ €•»ę{¬ňńÉĽpeöR˝qŃ<™:ťťĄň} ńÝŁ¸GŐÖy©upµŇČćv¨`Nzőg^¤ąnŐd.'ovOeę‚ńŐ¨¸źÔ>ł‰ˇÇSobZrńčśë V۾Ǫím u;:_¦ÜŐ)j/<Ĺ 6ס2KeďŮĤ†Š:OĆ׶:ß:†ŻpĄ_~“*Í CßÓs†u@ŮÜ„ľ|>„š‚BSđíw?‡Iµ?==˝|ůÓ¤Ej˝­şÖץ=W>~ů|čD6ßÜ˝¸˘{¬€Š­n\ÎV©ŚN•ż,Eďl{\Î&TÖi€­X]–PÄU÷1P1YP'YP§5f9nD€ëT¶ Ëę´Ć,`ą}_Nú›Sá·żs١H‘"EŠ)ŞŻhü/Bµşß± ŃO`WĄ\ŔďXő2.¨Óď±rą ®SŮ>€,¨Ół€ĺd9@ťd9@ťd9@ťd9@ťV—ĺě÷~“®Pń>€,¨Ó검"d9@ťd9@ťd9@ťd9@ťd9@ťd9@ťd9@ťd9@ťd9@ťV—ĺěv÷»ÝýŮV¬Dń>€,¨Ó검"d9@ťV—ĺě÷űýĂŮV7Uńć­üő.ôüüřüüxşůYąş7o ¸âŤ4˛ąŤ >}üĐÔwŃ*~«ďÜvnnîŇ˙]*–_„Íé= TżGWbuYÎy4Göv,wő7{»&Gű+í 77wÍż0ĐőÉÔ W´rm‡¦ŮĘîn™.ëłś¶‹Óüw·»o"˛ćAűdŽőť˙ffYCľÂˇ¦®JĄáPÜJźĚ/22jâŁB€ŇČć&„đĺó!„Đ„š‚ożűńp8LŞýéééĺËź&-˛Ń¤zŁÍ€ő(z2}üňůĐ~óÍÝ‹«Čr€ę­î«-Ć!q2żÎö]śrI€ő(~uŹUëěŮÄôf¸B×xŹp ®ô+ z«Ër®ůbŕšďČr€:­.Ë(B–ÔI–ÔI–ÔI–ÔI–ÔI–ÔI–ÔI–ÔI–ÔiuYÎnwżŰÝźmuŔJďČr€:­.Ë(B–Ô)Ťln‡ Îcż!śahNńť­ĺg^×óócűřććndQ<äĄÚŇńBŁŮ/Â)wŤZw˝%{%T|k"›O?4‘Í«×on{ 6zŃŞ=ę…v»űýţa=C›ă¶5ÖÓ¶V|¬|~~|~~ls™˘đŰćČ ăŇńR‡twhLÚ)š}|Ćş®|×›˝WÂúŐ<.§í6‡°1‡żsj¬«má77wSŹ†ńˇ¶=ŕ.© éě'ívŘőĆ/’ß+aýŇá7Ue9­Î‡ĽöqqwŽwńŃ6žął`¦ÂI-lÓ¦1Íč]W'ľę¬ĺśy{/=¦Ęěwé 3ę·ëAĹV7.çtâăK{¸L:ťĂV|‘«]*˝ň•©pyk‡š‘?’v–‚­h¶ŰĚ~—vJ F2W»ë|C•Ňq9őÜcqšek^›Îńwčé¤ĆÇ—ęÇŤa1˝2űéŃM÷R;f»ž‹ÂT©ň,'ó±lČJ®ĐĎnFńöw†(Ž,ĘÓĹaČČħc×3ÄšÔ|ŹŐŚKHťE.u´]ŇŚućL1]ňŇKQgc×ĘÔ|ŹUc䝥élKş83.ĺŻ÷ŹYW::mĆě+w™ăă¤Cgfćř‡cf·mŰő2żě•l]:üć&„đĺó!ÍrľýîÇĂá0©ö§§§—/š´HÁpÍő©ĚŤ˝Ecn¤šTa¦y™ÚĆßW’y~¨…ăßŢĺ_#Ö™'“˝w̬nhĄlWćűrŇo˝Š˙Fě,G×e×󭀬DŃ÷ńËçCˇ‰lBoß˝őúÍĎ˝śNAas˝`CŠ÷r:‘Í7w/ęąÇ ¸f«»ÇJŠł™Kő+)ę}¶n%ű—]Źó+ިů+ĘËVRUZÉţeףőßc\§třŤq9@ V—ĺ”ý)`+Š÷d9@ťV—ĺ!Ëę$Ëę$Ëę$Ëę$Ëę$Ëę$Ëę$Ëę$Ëę´ş,g·»ßíî϶:`%Š÷d9@ťV—ĺ!Ëę”F6·Cç±ß?„Î64§wuCmhžo¬vđPćĄĎŹ\śĽççÇćÁÍÍÝů×ŰYiŰREgSüÔD6ź>~h"›WŻßÜölî˘UÜ#‰-yďše‡jž*íyŚď‹LµŰÝOmvÚĄ[a'/>77.r†ľąąK[rRC«‹ű=ĎĎŹĎĎŹí2Ż`Ó*—ÓžŚ‡ÎĘĽĄ+Ó¤3·¤w˘Ó·îč›y~íÉřćć®=I_´EgŇľ^2Ňá7•d9G %íóS“•ŮQÇ~˙Đ›µôV·*“e?ţu5«hšú‚ÄŁďa¦¨·ý˝kŻÉTŇ”˘-Ťgîĺ—jÓŽôA§ ˝WŻ†šĎ|©Ë^«6ËICšÎ3C)NśXŚOzÚss©«ZCĆšLéPă{—ę¬qa ăµg.uµ-9]2ÔvDŇgjQű8}ĐYcZgf]qżŞ™A  ÷XĐéLíč4©F&Ďč­p^ç`ęRíŞ;MZř’3-)Őďéd-qŁ·ččRc E;G+,Őą‰ÇÖ)Ř´ŐÝcµ]ĄF%_D&Či/-ĺo:óüůŤ—2/#)~ŮČu(€‹¨v\N)íĹšŚÎőšf‘%g÷´Â0«'4˛3ęů’gĽ KŢşřňP:8¦˝"Ó;§·(^j|b +śmhpôě"€-J‡ßÜ„ľ|>¤Yηßýx8&ŐţôôôňĺO“)űŤ@™űžŇSéŃ»‡Ć/’®îhŰF~?ÍŃĄzĚ/•yĎç˝äĚŤTů ĂÄ ŕč—Î C÷=-Jo†ęýŽśˇ[Ą†Ö5{€ÎŃîTZ•ŻÖŻhŕńËçCˇ‰lBoß˝őúÍĎ˝śNAa‹˝Žň†°Ĺ{9ťČć›»î±j°ş{¬„ g¶é7|h€Kć'6QÔű|c%Í8…â§$÷X±a™3ń¦‹2VŇ €MpŹP'ß} ÔiuYÎÂoš6Şx@–ÔiuY@˛ N˛ N˛ N˛ N˛ N˛ N˛ N˛ N˛ N«Ërv»űÝîţl«V˘x@–ÔiuY@˛ N˛ N˛ NkĚröű‡s®X‰˛}YP§5f9ËĄ‘Ím\đé㇦ŕ ť8¤j7ßÔ›_)R¤H‘"EŠę+ęô–H#››—χBSBh ľýîÇĂá0©ö§§§—/šÚ¦ýţÁ×Ŕ*×xüňůЉlľą{a\Păr€:­ń+—«ŕ:•íČr€:­1ËXN–ÔI–ÔI–ÔI–ÔI–ÔI–ÔI–ÔI–ÔI–ÔI–ÔI–ÔI–ÔI–ÔI–ÔI–ÔI–ÔI–ÔI–ÔI–ÔI–ÔI–ÔI–ÔI–ÔI–ÔI–ÔI–ÔI–ÔI–ÔI–ÔI–ÔI–ÔI–ÔI–ÔI–ÔI–ÔI–ÔI–ÔI–ÔI–ÔI–ÔI–ÔI–ÔI–ÔI–ÔI–ÔI–ÔI–ÔI–ÔI–ÔI–ÔI–ÔI–ÔI–ÔI–ÔI–ÔI–ÔI–ÔI–ÔI–ÔI–ÔI–ÔI–ÔI–ÔI–ÔI–ÔI–ÔI–ÔI–ÔI–ÔI–ÔI–ÔI–Ô©?ËůôńĂŰwďe9ăúĆ`ÁIDATŔvĄ‘Ímóźvtt€ úýţôĎü˝yÜôdnCß˙đ·vŽ&׹HăfűôńCÜĄyőúÍď:ĹĆĺ[ÔŽËiݶŹŚË¶«—G6î±jŕűr€:ůľ Nids;TBřú믧Żâ§BM 3.çŐë7·˝MGçp8LŞýéé©|“F0.¨“q9@ťff9˙vŢöô›™ĺ|őŐWçm'Ŕ4Ćĺuš?.§7Αń+!Ëę´č«Nr#ČÖC–Ôié÷ĺ´ůŤ XYP§ß}üŐW_ r€µ‘ĺuň;V@ťd9@ťŇČć6.řôńCSĐvtžžž.ŐV€ńŇČć&„đĺó!„Đ„š‚WŻß\¬™S|ů|čD6ßÜ˝¸é-h€ ‰#›WŻßôŚËi›šššššššnhÚ—ÓÍrBQoß˝˙ţ‡żŻŘş“vúłś˛+h+/[3P‡Stzľ/§é”śvľw§xý¦¦¦¦¦¦¦›ž6Š×Ü˝Çęź˙ř{8Ťďř[átőuŇN‚»Ĺ€jýj -ÚŕŰIEND®B`‚ [$@ń˙$NormalmH <A@ň˙ˇ<Default Paragraph Font ˙˙˙˙đđ/đXbđ$v÷¤ŻĘ.Ţ»g đra˙R" bđ$ćSĘiÎ}x2ö´÷±É˙/"t%@ń˙˙˙€€€÷đđđ¸đ( đ  đđ<˛ đ # đ A˙đđđ<˛ đ # đ A˙đđđB đS đżË˙ ?đ($34($34˙˙FHBUCSD:\Data\TechlibDEC99.doc˙@€\_ç€@U‡źTimes New Roman Times5€SymbolI& ‡źArial Helvetica"ńĐh üA& üA& üA&ŃĄŔ´´€r0˙˙FHBUCSFHBUCSţ˙ŕ…źňůOh«‘+'łŮ0| ¬¸ČÔŕô  , 8 D P\dltässFHBUCSHBUHBU Normal.dotFHBUCSd1BUMicrosoft Word 8.0@@ľV9˛kż@¦Iޱkż@ľV9˛kżţ˙ŐÍŐś.“—+,ů®DŐÍŐś.“—+,ů®H hp ¨° ¸ŔČĐ Ř ĺäBHP World Minerals Discovery-1  Title 6> _PID_GUIDäAN{CD0FE9A8-D792-11D3-BE8D-00A02437E267}  !"#ţ˙˙˙%&'()*+ţ˙˙˙-./0123ţ˙˙˙56789:;ţ˙˙˙ý˙˙˙>ţ˙˙˙ţ˙˙˙ţ˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙Root Entry˙˙˙˙˙˙˙˙ ŔFp˘&N˛kżPFKN˛kż@€1Table˙˙˙˙˙˙˙˙˙˙˙˙$WordDocument˙˙˙˙˙˙˙˙ŁGSummaryInformation(˙˙˙˙,DocumentSummaryInformation8˙˙˙˙˙˙˙˙˙˙˙˙4CompObj˙˙˙˙jObjectPool˙˙˙˙˙˙˙˙˙˙˙˙PFKN˛kżPFKN˛kż˙˙˙˙˙˙˙˙˙˙˙˙ţ˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙ţ˙ ˙˙˙˙ ŔFMicrosoft Word Document MSWordDocWord.Document.8ô9˛q1 Ľ ! 7˙˙˙˙ @„÷@0 6N&Wtż@0 6N&Wtż70TechlibDEC99.doc777TechlibDEC99.docůF÷óĺHŕÓ¬‚Ç!Ż"˙˙˙˙ =€Đ  .5€Đ  .5€€†ĐĎࡱá>ţ˙ >@ţ˙˙˙=˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙ěĄÁq żbjbjt+t+ IAA˙˙˙˙˙˙]’’’’’’’¦¦¦¦¦ ˛ ¦ŇÚĘĘĘĘĘÍÍÍ—™™™™™™$¬ô B˝’ÍŤ@ÍÍͽᒒĘĘĂĘáááÍ ’Ę’Ę—¦¦’’’’Í—á¶á—’’—Ęľ ŔŁ]˛kż¦¦× —  úú jUýýţ &P °. °ČA!°)"°)# $ %°nđÁ·ŃÍ©A÷ ł;?Tć˙‰PNG  IHDR÷¨M-]SgAMA±•ô¦gIDATxśíÝ=«GľŕҢo X65,,(Ůh' 6Ůt1čÜĚĚE7°;ąNě@ Ě™>Ŕ‚Δ*ŮÄŃI'†{–Ű˝ýR]Ý]3Só?ĎhŽ¦§««_fşć×ŐÝ)Dô ĄôáýÝ)Š~÷ËĎŻ^żůęëoOQ8p˝~řţ»”Ňé ď~ůůÓ'O˙0üÝá«×oFó34444444L)}öϤßT/żű#őYλ_~ţó_ţÖżZKźĺT/¸^]rşF«×ožżxů1Ë9E§§‰ őYΉš8]ůčçńçżü-ýÖ¶Ş5ěJ®[¦ˇˇˇˇˇˇa€ág˙üG×;§V™˝ĎţůŹî•q–ÓŤ04444444Ľ˘aßžé›PiÚ/§ń铧 ŕJtŚ÷çż^˝~óüšÝFYN:ŮĺĺuýńOź¤ßşßô‘Íｏ‡ýr>«zqW­r />ěţhˇ&Łaš‹l~ż+`˙¦.äéNcĄc^˝~óŐ×ß/hAĹ#ű«J·›¶[FÝo>ž±z7 yR˝ËËOz™:pfÇŹěŻ~»*jXNy·ŕżýרś4—ĺ,öËI5ÚVUĘ9nµv«lř7Đ«xdďŰŁSÉńwص[6ôËé^9˛UĘZPńČ~°ÁÔ7tňYÎüýrŽĚ¸w-YÎ(Ľů÷Ű r`Şn–ÓýQ+RIs‘Í űĺ,…QyĂjŘÚ}˝o ,ýQRČtîŁňó3]* ‚ŮwdźU=RIíg9}bŘE&óúpěč•­…”W&3 ,f–łő(Ţű·¶ř2Ý~óaÉtěô•ĄÂ+Îb[=˛Żž3éť'Ë)˝ĆŞü >í´o–Î4Ąĺ‹ˇfĎ7•ź±Ęś®Zš© ˛¸?JŽěýá˛;é±ô¶Z'ż.pŤUwěßTN¦ą0:s´»>] ýżňIöÍ‚iç«i9éH–łŁëÉ‘ö&ŢZÂ*9˛6ĘröE»[|%}hvś®ę_źöGŢ7SŤ!î•Ő#{ů1±­,gSŐG3.Y€.¶™^›=|˝˙{kM– /y˙î™@0ĺýrVť'Ëůř´Îé®FŹđܧָ€T|ÄfJiôŕĎÂLax.Ą+§{Zç°VÝ#<Űş_Ь«»_ŽçXEÂ^cudƲŕ Ď$ßzM·g’ś:ËŮqM·,¨ŕ YNÚxM÷ţ,§ÓMĽcŘ—ł»CCCCCCĂv†ŐŹě)Ą®QrĽś4ŮhŤ,isżś›››KŐ Ü4˛y¸4˘ó׿ţµĽô|“čööÇ”ŇăÇź—Źę^ďtc‡Ż _źN2|=?U¦bí»ęĘg¬.×9<ęJfŮ<ń˛ô«V›8ĺ“ôŻL'ě'ą˝ýńööÇá´™©fßżş,Kµ.˘ą~9»›8ůIFÁOÝ&H_ÚăÇźw˙Ňň‚p"ýš6/vŰżś#ňĄÔ-sëT[ăś’ąô%Ź^.ďŇiµŮקö˙ÝÚž+)ól•ĎLµi^»+źQ±ŔüT…c§3ZšđxÓ7¬ž/¸¬¶˛ś’ĆM×ř8CejéRKyR×–šm¦Ě&CÓ ‡aR˙GyŢ0ś×lËăl•_ Ăň˵´¤ű*ź7;Ż}ć§Ę¬¨ĚęÍlĘăζ~6íigÖÜýrň_—}¸ŇrCgŤ˛˘ŐĐbZÂŇTł7ÍH®¨ň[«Q˝ű ĚOµÔ¶ŽÝÔ3lw){ŞN[hĐćk¬N§¤áŇř×čŇŮŠ–Űd«öU~÷9G."Ó¬Ą§ĂöĐŇ(€F\ě«%Ł´|ë9—óŞřŐÜ˙^şžëť"źm -ž3ËlŻQĽ7Ü·3ŁZĐPżśQ·Śt¸q0ĚŢ«7h ç;í°2íW´t6gÚÍekMvôašţ4ĎW~jßTKuXzĂŽj¤V›››VNůr•÷4JËŰ+łŞW·ÂŐuˇâ™vżyRúđţnšĺ|ńĺ7www›Jżąąyöě§ŮQ…ßÎÓn"Ó× K[íAR8Ş¤Âł}x§•ďç2[É’ő0›™°dúĘ,Ĺ*ł]3k`TŤLĺ§uH‡WČRÇç|ĺ3fçµ»ŔĚßĘ«ź…4Ů”ĺVŁp?lłe Üo?ĽżK)u‘MJéŐë7Ď_ĽüŘĘŤH)ť­•Ó‚óTŻÍ•Đf­B:ő޶){ěí4˛ůôÉÓ3]cŐňĄRŽ Ŕ´űÍ™˛Z»8Ąµú„wşnS,e9ľĆęţhíđÓZ}Â;Ý ·): ]cPQs÷>¨B–Ä$Ëb’ĺ1Ér€d9@L˛ &Y“,I–Ä$Ëb’ĺ1Ér€d9@L˛ &Y“,iŮ<\ÁIÝŢţRzüřó“t/v¦Ąőc˧ÚQ±ş–ę\ĄĚşĹVTRĂ}›&łŰT_íŻç¨2ôöŇ‹±ěsÎjçżáŻnŐ]JŮĽűĺç.˛yţâĺĂŮU:ŁO×ôĂ6}ĂčmCKŁV·ýľWç5űÝQXĂ­źśĄE–s{űc·§cGŁňSMß ™Ť’ŮvËlÓF´_ĂUWz‹íDĺRfYŐ[ťµ_N˙Ńęţý·˙řŤľß‡oëÇfF­îű ĚĎkSĺŹďŁŁj—.EłGĐŃ.AŢŽÝ`÷T\—ö÷ ű!ç1í~sÂ,§Üu5W§Í MáGű?yĎç”Mk«źɤŚłóťM"gßV+m^Şa?‹á™©FŻo­Ţ깏´e÷}ä·Öaşz— \Ý"…e _G%oݱgcďň©Ę÷ŤÂQ›öçÂy•—Ľ´&ókxőăµi{íű(ůTćjöőŠßBעÝk¬f[úŁČä¸ę˛ĎtL_éľĘ S´Ýf }ge™ca_˙ă;Űěęęg1ú#3Ő¨†›Ş—_óŁ2Ëjë¦Ě¬ŢĄ§“¤…=j¶‰łµ†Ă©†«˘ĽŁy­®ůĄžŮ(KSVcÓç®d^[[łŰ+łoä?°Kűać“Rý`őS9»ŰěŰçckč«~˝÷˙FoXÝ$[C‘#î `NŰ ×ᩧ:żL«wř†#K±ŻŔ©N·ÝĎŻúš?nÇę]ťdö06µc‘—Z¨C™yÍŽ:‘ňE>E56µuňŐ˝~©ďŤşki_i‘ľ… µuŤŐč;ĺv®ěě„ű"¸} iO˝“Ť~¬śtŞF4RçFŞq˝ŞŻŔSl‘}ÍšŮüŻÖĽNý•r¶{÷ŠÚgőËżVçÔBZsÖk¬ňJrŽQn<}ývcß‘î›×î˛ę<ësôĽ´Ď°Ďh}V<óX«ŔÎńĐĺ_ŤěQç¬Ćľu|^Ă™¦Ăż/ĺDűüµk®_Α S=6_Mh‡{Ućřwş.É´Ű25ÜqBí˛çą¦kţ`}J6ĺ҇ŠŐ¸¬’Ę—ďóű*PĄśăNs…[yőmK§6fç5ý9ÝÎVľČU*p|A6Ą_«ËUrŞzéP}Łl-đzżŞ›vżyRúđţnšĺ|ńĺ7www›Jżąąyöě§Ń‹Łµ?ę•ůZÉż9󅻯ŔiťGóš Z k¸ő ±úµ¸TZfî«SUěź´¤d®nŁ’Ę,­ŔL5Ň.ětÁ3;vf^Çk8}[_·Ě.š/sÇ)•Ů®› Ö¶ä<;Ł4·ć/\n3űßŮ —¶ćÁMą´ĄVçU>Ş°ň§Ş˛Éö}Rf«±u‡O»Í섧űXšW~ďÝ˝ĎőöĂű»”R٤”^˝~óüĹËŹ­śŃ”R­VSuŰ Ő5^=8ť“îü>YŐYĄ ĽťF6ź>yę9Vp¶3Y;řÖŕJµuŤŐ}Öl3˘ŮŠÁéś!Ňvăđ);čŢś‚ał†®±hÄŽ”ĆY™,iî+€*ş÷1@Eč—3Ű›µü*ÄMsY-°ĽkmőÎ.3Ç}ý‚3ë_ę @$Ó~9—ÉrŞ_Ű/puvÚpÄ}żĆęŞ[ű*Ő‹ ĺÎ}ŤŐđâÉîŹĄç ŚFąPpkĺ÷ľÜtCĚM·Í[ş!ćôľ·›jxćłrpRÓČćä÷>^ę2{7úüßy™3•™˝Axćż%5ÜÝzČ/ěě˝çó ťňő׬É{/µ~ú×·Ţ&řČ‘{vÚÝ5Ô†€sşš~9m>ý`¨ýŔ˝r5÷>n?iż†pŻ\řŢÇ··?®F Ł@Ý$ç N çrÁžÂ´ňW˝8Ü[Óî7{OłśZ˝ŹÓň%Bý+ů7¤‚ŕdkiŇŤ7ÍőäÝQĂ}tňSeÚłu.é*´zŃ™° €ëńvz)Őó/O~ŤŐuq€€+Ôä5VUx&ůĽaßA\ŁidÓč5Vg¦e×N–Ä4ÍrôË"¸š{‡—é´úäŻTüX‰Ą'jąŚ|VŹ/=Q•V·ň}Ţ €ëuÖ{oşĺL÷†Ńۆ–Fmş•Ny«óšm(Öpµ‰łôút’̬‡÷ŃéÖí´¨Ń¨Ů÷źÂľMyj™ÝďR¬@łÎÚ/gô<ËŮÇ[>~üůěŔűQŁđtTáÍ”·ź×¦Ę—Ąv7qň“L+ŮB{bX™­+ŠSka'ŘŞŃk¬®ëë´´)üČź Ř·*ęž_8Oś“1˝uZH­ňg⦠V~ŞŮ¬n¶!»»†KJnöťŻg¦ţK•//0żĽ%o8vŻ±šýí8ŠLŽ«^`E%Ť›ŠOjůţ@Ăë([JŃŞŚĘ´N–ţ»©†ůEÎÇZýŚŇ¤™2;U¦†™t3-|:¦Ą-UC¸ †®±ęż(ožvązxŘz>RŕľÁÖ©ňď쓉* ť¦šz…§ä¦)Z˙âě¨Ő©ňł+Q^Ă2żň󪻕WKkg§®±Šf»ÁÎN¸ď÷âľ÷ÍkëT%Â?.xf*ťň˛¦ĚɬSŰ}΀#ÎzŤU^IÎ1üy:jĄą†ŃŞî›×ľ©FgR6µ®ô7ôŮŞ}Îős0óÓâاą~9GľĐ+žX-pÚ<švJ8RĂQ·ŚĄËeÎćéÜS±cĐ™5?Űáfi{--EfŃĘ»×Îk댖NE•ě‡«s¬¸M—V¬¦pÓî7RJÓ‡•żzýć‹/żą»»ŰTúÍÍÍłg?Ť^}»Ťş1NűK.}ćßśůrßWŕ´ÎŁy-őô,©áj ĄI¦Ż––9}łÚáŁpÔ&K{ĹěŘ´qU¬Nµ4jÚyviTy §•śµ:ŁĄŽ˝%;Ěl56M8zs~?źî$W7Wâí‡÷w)Ą.˛I)˝zýćů‹—[9Ł)ĄZ­¦˙ŇoĽz4Îţ\ÂŰidó铧žcuŐϵUäŔ•jë«ű¬ŮfDłŁqůÓ gĐĐ5V@$Z6ŔĹ5wŤpV˙÷vńŔ•kčŢÇ]˛_ÎŽë“K®ô^ş>¶üÚé¨ýmW—+ę‚×Őxw“Ć«pNë—Sx‡’I2·í'Ýtxtw¸ŰąGIl˝×đ”cL`ů;ĘôďÉÜT)Srá-ťf+ÓňőzgÖ\żśÝMśü$gřęŻu“â zÜŇ;ŻČpÓŹÖáěăAňř8űÄrŇ\÷›sd9ů3#™ß˛»ËÜjkś“·ď$Âôö˛™[*§˙<77=O7şń˙¨&[ Ě˙wÇ"V>?v:ŻĚ ÍŐsťuŐÚ—(×V–SҸiđ 8ÓdřJßüÚôł;3ŐҨá3c§ńŔě"ä \Š(v/raĺű±%«w8*SĂşŤŹQ}2 ·ByŚ4wŤUţ«Ľ˙A|°ˇ3ě‘s¤śUŁ6Aaĺg§*/°úápSűąp^KŤ•’ye µÚ™Ĺ<’P®ľA`VC÷>Ţô‹˙¸Ě™‹]Ýaěśk5ßWwö|VfÔűš2ű \şx€^s÷>ťq(ü÷‹¶5çÜ™yŤb°á•uĽ2Kçőv´– ć‘ö|€Y őËé;İö~;<äoŔsşÄčJáěf»Ś®~ßTŕTÝłuÓPdXĂMóÚT«üĽ2óm°w×>UNŕD5í~ó Ą4}Xů«×oľřň›»»»MĄßÜÜ<{öÓě¨Ěáyé<ÂęĄ4ůŇ ‹Z-pIá•>ĺefzŰä/‰J“Ř`é=Kóš-!Ó”yĽvc’Ąî×yţ*ŞŐĘ—Luä«éľ‘?e6šĹhňŐÍTXŕl•Š*ó$‡OÖ'hÔŰďďRJ]d“RzőúÍó/?¶rF#RJgkĺ´ ńę…t-ëü*ę©•Ü{o§‘ͧOžžé«–“ö«8ŚqYÍžój¶bç7í~s¦,†Ş_îD)YÓ|–sák¬¸ź´l¨®ˇűĺ °âšŢ/çÂ÷>¨˘ˇűĺTÔÜs¬Şĺ1Ér€d9@L˛ &Y“,I–Ä$Ëb’ĺ1Ér€d9@L˛ &Y“,I–Ä$Ëb’ĺ1Ér€d9@L˛ &Y“,I–Ä$Ëb’ĺ1Ér€d9@L˛ &Y“,I–Ä$Ëb’ĺ1Ér€d9@L˛ &Y“,I–Ä$Ëb’ĺ1Ér€d9@L˛ &Y“,I–Ä$Ëb’ĺ1Ér€d9@L˛ &Y“,I–Ä$Ëb’ĺ1Ér€d9@L˛ &Y“,I–Ä$Ëb’ĺ1Ér€d9@L˛ &Y“,I–Ä$Ëb’ĺ1Ér€d9@L˛ &Y“,I–Ä$Ëb’ĺ1Ér€d9@L˛ &Y“,I–Ä$Ëb’ĺ1Ér€d9@L˛ &Y“,I–Ä$Ëb’ĺ1Ér€d9@L˛ &Y“,I–Ä$Ëb’ĺ1Ér€d9@L˛ &Y“,I–Ä$Ëb’ĺ1Ér€d9@L˛ &Y“,I–Ä$Ëb’ĺ1Ér€d9@L˛ &Y“,I–Ä$Ëb’ĺ1Ér€d9@L˛ &Y“,I–Ä$Ëb’ĺ1Ér€d9@L˛ &Y“,I–Ä$Ëb’ĺ1Ér€d9@L˛ &Y“,I–Ä$Ëb’ĺ1Ér€d9@L˛ &Y“,I–Ä$Ëb’ĺ1Ér€d9@L˛ &Y“,I–Ä$Ëb’ĺ1Ér€d9@L˛ &Y“,I–Ä$Ëb’ĺ1Ér€d9@L˛ &Y“,I–Ä$Ëb’ĺ1Ér€d9@L˛ &Y“,I–Ä$Ëb’ĺ1Ér€d9@L˛ &Y“,I–Ä$Ëb’ĺ1Ér€d9@L˛ &Y“,I–Ä$Ëb’ĺ1Ér€d9@L˛ &Y“,I–Ä$Ëb’ĺ1Ér€d9@L˛ &Y“,I–Ä$Ëb’ĺ1Ér€d9@L˛ &Y“,I–Ä$Ëb’ĺ1Ér€d9@L˛ &Y“,I–Ä$Ëb’ĺ1Ér€ćłśwżüüęőYp˝¦‘ÍĂî?ý0ičWčĎůŰß×ýݵd¦”ľúúŰţ]®s‘Ęěöî—ź‡Mšç/^ţa4ZżŕőýrzűżôË®W×/gŮ¸Ć Ŕýr€Ü/iŮ<\‘Rúä“O¶Ďâ§JUŘ`Ô/çů‹—gGt ť»»»MĄßÜÜÔŻ2@ýr€ôËbÚ™ĺüşěĽő·3ËyôčŃyë °Ť~9@LűűĺĚĆ92 ˛ ¦C×XŤ’AĐYÓŃűĺôůŤ hŠ,©Â˝Ź=z$ČZ#Ëbň+ &YÓ4˛y8ńî—ź»}CçćććRu(7Ťl¤”>ĽżK)u#RJÝç/^^¬š[|x7Šl>}ňôÁě.đ¸"ĂČćů‹—3ýrúż Żh8ę—3ÎrRUŻ^żůęëo« \»“6ćłśş3č Ż[2Ă) 3÷Ëé%‡ŁűîT/ßĐĐĐĐĐĐ𪇝ę%ŹŻ±úáűďŇi|őő·)ĄÓ•\©“6\-„ő˙#Š …°»IEND®B`‚nđ"{š…Ô^®·ö ˇ«˛1©˙‰PNG  IHDR÷¨M-]SgAMA±•ô¦ IDATxśíÝ˝ŠIÂ.ŕčĄď`ŕăsĘYkťqÚřśu—]Ŕńšá cĚłÎYg×ČkO° ÄxrŰYGV;uĘ‚˝†>FÎäÄddFĺOTUfÔó ’REfdTuţD˝Y@ŤnB_>NQő§ŹŢľ{˙ý;EĺŔvýó!ś®“đéă‡oî^ü.ţŮéŰwď;ë35555555 !üő/ż(^ó ´YΧŹ~˙‡?µĎ–Ňf9Ĺk¶«‰BN×Ixűîý«×o~ÎrNŃĹiéâ±6Ë9Q§©˙wí:~˙‡?…_úVĄ¦MÍeë4555555­`ú׿üąťSŞÎÖ_˙ňçć™n–ÓšššššššnhÚögÚ.THÇĺ4ßÜ˝ŃÜ0Ţ^˙zűîý«×on›˙t˛śp˛ŰËĘúŻ˙ţ:ü2ü¦Ťl~}ŹËůkŃ›»JŐcjjjjjjzńió` -éLC_dóë·¶35!Os+,óöÝűďřŰňz€5(xf[čëfâ~KgřÍĎW¬>%!O(w{ůIoSÎlů™ýí/wEĹőŚüďÇuę }YÎผP˘oU¤ž3hŢÖć-‹­‚gö¶żŃé0Ť9˙ĆťˇNże¸ść™%/ H=Ŕ<ł/ě0µť|–Ó˙}9KVÜÚJ–Ó oţýř/A¤Ęf9ÍR‘Jč‹lN8.g(ŚĘ‹c¨¸·Ńű|ŰAz0¦’tíťúó+Ş *3ďĚŢ«x¤Öźĺ´xLćů¸´óĚÔJĆ7&ł ¨XťYÎÔłxsîźÚăË ű͇%iiúĚPĺW u;zf?zͤuž,gě=VăOę造y/`čJSľŞ÷zÓř+V™ËUC+uC×cĚ™˝=]6=†f+uńë÷X5çţIődş ť+GłŰÓÔĐţżČĽ•@eÖsŹUZOX’ĺĚz˛ä¤Ł‰§Ö°„„RcÎě#; +ĘrćEł{|cĆĐ̸\Ő>źŽGž·Rť!®ĘŃ3űřs⺲śIMď¬xĚ hb›ôŢěřůöńÔ– U>fţŮ+€ĘŚ—sÔy˛śź­3ý«ÎOxÎSꇸ€5(ř›!„ÎŽĚâk)M=ÍŻuĆ­j~Âs]ß—¬Öćľ/ÇďXŁT{ŹŐ’Ër gřMň©÷tűMr €Sg93îé–ĺś!Ë ďéžźĺ4š…gLŰzf×`jjjjjjşžiń3{ˇé”,Ż'ôE67!„?ţ«ÓôWŻß4O†ĹâN°uĎ쥪jî$Ożç&„đţ÷˙ę¬rĆď9\Jó}9˙üÇßŰg~ýVŔö©68úö»§®ŕp8üĎ˙üß-H=?•ě˙ßţś ˇµŰÝ_ş Đxlłśö©˙úďŻoăYÚ§éč‡n%YOOOEZ 0Usą*îčüÚËIď±؊θśĐör:::űýCűx·»Ź˙;$ť-Žy{k¨ zgâwŁy™C˙ŤÉWX˘˝Óyůař•¶2ďafΰý÷*„nî~}üünîÂóăĐëÚď:ďęw ^Şó|ó S:ôüŃ Ă±żu¦S×5´ät]C-ß„Ěa9- Ů}íhQfu“–ĘŻkhÁć8PĂîLzŹUîw¬zýç?˙9};W­ÝPšń;ŹăMŞw¶Ţ˘üĽ!cŢŤĚüéăt¶âmľˇ2r‹ęü·łT¨ěkş8ĎŹ?ŹŃůĄÇÓî/űýCóŻ]˘ł+uć<şT\ź?2{hĽlľÂŁ2ÍÝřvńôEe–z]›–9΄áQćť?÷®eŇRG›ŃjŰSÍ e¤iżc5DGNˇ9M=]Ďńë×.Ncx0rŻ˛ťĽŢsŰúĄ=¤°©öo]o?őÔ®ęď;í»ŹY˘‰ŻjóĘHߍ&A=őÇz?lläĘ٢zôut:›ÖHó–ęHş±|]'­°cäëâRŽ®ç¸1经cmŠ#Î ŮäyÉ! ľOWGŻ×ôb—Č\;ĎlQ»qĂ®Df[ĘŚK8şüđ˝dkďmƉmW:fş´Ď0T”ŻvŇRůqB“®V Ŕ¸Z˝WCۢŁ‹§[^~‡Ů®ˇ—SßeţÓ©l“(ŕćî7˙~1o[Ęw"Óó}üL‘sŇQ™Sżd]Ő›Ô!ČŚ¤Ě lŠGË9äö]Ű_sѸśN~#ÎÉë ńąH­—$ŇwăjÇĺÍś{·¨kŚsÚȡ{ÝŞłiuŠň}îŢQśC'žŮ;l¦…™EĆd˝Ťź1Ň«ĘŹ[ç”ď•ýQf{°WwL!Čr€ űí}UçÔ{Ö?˙µ€ĺťŹˇű­N±.†®0ŽCSd»şÂŽNŮüü é÷ĺ|űÝŹńw%7_}őUűřéééĺËźNű V \ŹŮŚ2łĄEŐVĆĽäôžÉŢÓÔ7}~»–oQ˝÷űT¸] őršoÍéÓ o:w¸drťˇĄ¦ÎŮٶ{kč}>]jd·#}]#w¨ĚşfĽ®MČzßňă`FÎS$4Ęź2ëjß.ť›ŠMíßôłloÖ2{Ť§¨pä·Ű×éD6Ż^żąX–÷‹;›`Áë—Šm˘č¨ćdśé%43 E>“ ĺC˝ëÓŚ1Ýsv2–Żk%›Ť˘1Eë<[gZµ†Ç}ť3ü˝ŠtCidsBřňůBh BMÁ·ßýx8&ŐţôôôňĺOSŰTGÖ'Ňv:˝Šˇđ#ťg|\Ń›yô.>¦(»’5c4ńP 3ó]—,§zóN˘ă;"霽ˍYÎmĚLí9ěvŚYWˇµ<~ů|čD6ßÜ˝0.¶ˇ·gÓ{nn•ćż?‹ĺLť®F‘ *Ó†ł­‹µ9ŃUyĂfÓ¤StYçěßśÂď±fHϦßűRęnŁŢşÍ“™˘L m—·mŚńëňÝ9‹o_ÓAé\XI—Šo‰šŃ0·ź4µţ‘}»¸¸Ń.Nč»Çęç+Vi–s¶+VŔŁCd†.Ĥ—ŤF^®ęč˝Q+­­·hčË~†ĆĎkaď;EG×uŇ/"bÓŇ;ş;ĎťaL=±ˇËU˝Ąi%˝¶Űk™â1~óęő›ËŹËX¦\Žß±j`\P'żIÔI–ÔI–ÔiuYÎE~¸¸â}YP§Őe9EČr€:Ér€:Ér€:Ér€:Ér€:Ér€:Ér€:Ér€:Ér€:­.ËŮíîw»űł­X‰â}YP§Őe9EČr€:Ą‘ÍíPÁyě÷!„ËÍYCÖăâďFÓ€mhś±ěĚ~]°!őmç[9°„U6ď¨âgś&˛ůôńCŮĽzý涷`s­âżtl‹ő+·ŰÝý5Ź.†·„‹›ýşÖŁs<Ýď2/*.˙§Ş°Ý‘;ĄCĎ­0;8dš1u]ńŠzĎIóÖ5ÔňËŞ`;ď5ôGěĚSp›ĎĹŤYůqďüŞ—Óţ՛۫=ŔVě÷Íżöż!ş!"ýČžîzťÝ°3çŃĄâ˘xu™˝;^6_áQ™fĚnü¤÷°·?Ô9×Ć ÎfŢ6?ô`d…CŰéđ›J˛śŚřP’V: GÚÇ˝Ď÷Öą¤“ÖŐ»T{$MŚ]ߍt‡ßťÔŚ‘U…äÝz-#k>ş®&óčťaäëYÔ™av”=ôGŚ¸“Žłé;°DĽa—­ů¤zßĂ%ío7ă‚™˙Ѩlč7uÇyĐ8zH™·;Lję<Ú2+Sm–ë|`Š·ňIźD‡>xőÖyt>ÚŚŁăŇuő.Ő>NŚ]ĄŢŤx©©ű|ď•iFľŞt©ôcqúŠf8Ú©ŻkdQďá~ĆŐYpHď #—-˛ÔŃölaFń ;Žľ®řOĽü#ţĐ(řŠß„‘myXÎR¬ݡě_jüp©MôÚÔŹUf›w䍗-ňi`ö¶[dŁůşć-5c?ĎĎ<ŻE–š§w]“^פĆu㦾Qó¶´ü®7T:őĎ·Ä’?zo3NÔřKMíÎÎ6f/XáPg%.=ş;L*šdŢ6?ŻÂx ŚŐÝcUÜĽmkČ© W4»yg[Ýî—X>~fĆŞ6ă‚Nz<Ęż˝Sߨ¸¶Lł‡.jĚŰőĆt€Ňµű%¦ÝOąčłđÄ“®ejă—¬ëD Őłf™nÍĐîpŠQ(}şÉWXęO\˝jﱊő~ś]RŐ©uš:ő*̤Ąó^×ňĄ&ť“Ę6c¨Ş}ßŰRőźAćíť4ćű:™ý+_”99ő.7fj2dĆÁ!ÓŚŁŤźÝĽń»IÁ“ß’CĘ9e^éČݡČ(®vę6?ŁÂŰĆuşŠq9KtŽďńůo_čv†|%§NY&˝®ĺďĆ’7mčŠŘÔf¤K…ľăŃĐcŇKH#ô…-Ě7~¨ň…[ď.ęqž«!CŤIW˝;ű­”Ëß1Űá¤uĹť"[ogÁKÍXpĆÇłˇ {̡lë¦n‡ŐĽđńŇá77!„/źi–óíw?‡Iµ?==˝|ůÓ¤EJ}zÎg™˙¦‹g2˙̧ś1/ˇ}±éÇŻř™Nif]˝KĹł ­qčuĄŻná»1ăŤĘĽł›Ž˝¨Ě˛›ho Źn‡C-<Úřt]™f,‘ŮĆR™×8o©©sÍ$ňoČČfdšÔ»Š‘ÇźĚ;cSżČĐŢ7~ëÚm3mË;ké-=Ń(mçPâ:3Ű|şěMôč¶1ÔČüóëQ´…Ź_>BMdBxűîý«×o~îĺt BŰęĺlÂU˝Ř:ř“±]+ßzWŢĽÖ&Úą‰Fö*ŢËéD6ßÜ˝¨í+(k‹hŘzKYíĄźŐ6ěRŇá7Îr®ÇěĚ 2Ž‡ś@–Sá=VëdOh8r"î±ęT˙w×iuYŽ‘SpťŠ÷d9@ťV—ĺ!Ëę$Ëę$Ëę$Ëę$Ëę$Ëę$Ëę$Ëę$Ëę´ş,g·»ßíî϶:`%Š÷d9@ťV—ĺ!Ëę´ş,gżŘďNZgóßâk–(~vN#›Ű¸ŕÓÇMÁ:/ZuŢ‹‘C–v»ű*»8ĎĎŹ˝ĎßÜܵE77wńśqQg‘ˇ ›˘ŢҶ¨SÚ¬ĺĚëJkŕÚ¬.Ë™¤íÖäGeŻóľ­â‘R{jżąąkţĄEéü˝K5ý†LQűdú8^<]älë€mg9GĹ}ŢŽN;C[?Ó)ÍDGCKĺëQ:·Â~XCÎÖ×Ŕúm;Ë9*źâě÷í ˝Ý‘¦´“Ą‹d–Z{šB•Íu: G. u˛“3č¤/Ő¬ €•»ę{¬ňńÉĽpeöR˝qŃ<™:ťťĄň} ńÝŁ¸GŐÖy©upµŇČćv¨`Nzőg^¤ąnŐd.'ovOeę‚ńŐ¨¸źÔ>ł‰ˇÇSobZrńčśë V۾Ǫím u;:_¦ÜŐ)j/<Ĺ 6ס2KeďŮĤ†Š:OĆ׶:ß:†ŻpĄ_~“*Í CßÓs†u@ŮÜ„ľ|>„š‚BSđíw?‡Iµ?==˝|ůÓ¤Ej˝­şÖץ=W>~ů|čD6ßÜ˝¸˘{¬€Š­n\ÎV©ŚN•ż,Eďl{\Î&TÖi€­X]–PÄU÷1P1YP'YP§5f9nD€ëT¶ Ëę´Ć,`ą}_Nú›Sá·żs١H‘"EŠ)ŞŻhü/Bµşß± ŃO`WĄ\ŔďXő2.¨Óď±rą ®SŮ>€,¨Ół€ĺd9@ťd9@ťd9@ťd9@ťV—ĺě÷~“®Pń>€,¨Ó검"d9@ťd9@ťd9@ťd9@ťd9@ťd9@ťd9@ťd9@ťd9@ťV—ĺěv÷»ÝýŮV¬Dń>€,¨Ó검"d9@ťV—ĺě÷űýĂŮV7Uńć­üő.ôüüřüüxşůYąş7o ¸âŤ4˛ąŤ >}üĐÔwŃ*~ŤwîŐŰḹą;K8ťŢŠ=¨Ă겜óhŽěíXn7{µš››»ć_čúdjĐ+Zą¶CÓěe÷·L—uŤYNŰĹiţ»ŰÝ7Yó }2DÇúÎ3łŤ¬!_áPSgk»&ťžĘ’.H\IZaÜJźĚ/R¤y”Ň›zvžLçÉdĄ™™ă9‡v €ń®4ËŇ9žý7ţÔ~{čď|žWaq˝Ý……}¸w‡=miZşHčëÓ¤µq)C©ggăO÷…ˇíą·ÂNçĆŐd ÷X•Tü\°ëÓv)š^ĹŚ>ÄĐ‚3ŞŇY­¸Ű‘¦žaŮŬâ䥑ÍíP[×^'šÚÉp éä/›¦ŇK˝#{äş5ŔŮt†ßĽzý¦ţq9W+ř2©ż˘ss ÚdĄé¸tž/ľ˘ôÉřZU©iŔ•»Ćq9˝#3c†¤·őý:ŁÂR|ŰgĆ­Rá»s."˝Vď)˝fĆ÷HŽVÜ–uĄăr⏭á·čŢO´é˝QC‹Ó˘%–ŇŰ]8Ú‡łźtćNig†ř™öqç.Şˇ›Ş– bŞôFżřżťí3Lą,ŐéÍċϨ`†4˛ą !|ů|!4!„¦ŕŰď~<“jzzzůň§I‹l4©Ţhł`=ŠžLż|>t†ß|s÷â*˛ z«»Çj‹qHśĚŻłýC§\`=ŠźCÝcUŔ:{61˝®Đ5Ţc\+˝Ç ¨Ţ겜‚ßlHń>€,¨Ó검"d9@ťd9@ťd9@ťd9@ťd9@ťd9@ťd9@ťd9@ťd9@ťV—ĺěv÷»ÝýŮV¬Dń>€,¨Ó검"d9@ťŇČćv¨ŕ<öű‡Â†ć_ŃŮZ~ću=??¶ŹonîFĹ3LZŞ-_!4šý"śr×8箲»ĂĽ˘0kŻZ Š+ľ‹5‘ͧŹšČćŐë7·˝˝hŐőB»Ýý~˙°žˇÍqŰëi[+>´=??>??¶‡ąLQříAsd…qéř ©Cş;4&íÍ>>c]+ÜőÂÝa^QfEaĘľ ›P󸜶KŘÂĆţΩ=°®¶…KÜÜÜMýŘjŰî’ ŮÎîpŇnÇ&v˝Ěî0Ż( ďDůťË®Ç¦ĄĂoŞĘrZťyíă4âîďâŁmľ´‡Ëô Ó9lĹąÚĄŇ+_™ —·v¨ů#ig)ŘŠf»Íěwi§¤`$sµ»^~4lT:.§ž{¬â#NóŻlÍkÓ9ţ}0ťÔřřRýř˘1 f¤Wf?=şé^jÇ<Ĺ®w~®LQĄĘłśĚDz!+ąB?»ĹŰßn<˛(O‡!#GźÎzv˝KéŚ>†M«ů«—:‹\ę°µ¤+˙Ľtq8&˝u6uďzp…jľÇŞ1ňÎŇt¶%]śČň×űǬ+ť6cö•»L×dRŻ%3s|Kž3Ě۶׹ëev‡yEłŻ;ĂúĄĂonB_>Ň,çŰď~<“jzzzůň§I‹ü×\źĘÜřĐ[4ćFŞIfš—©mü}%™ç‡Z8ţíťý•€™q<˝Ď§ fV7´R¶+ó}9é·^Ĺ˙ #v–ŁëZá®×(ű­€#/:Űő¸ ˘!îă—χBŮ„Ţľ{˙ęő›ź{9ť‚Âćz9Ŕ†ďĺt"›oî^ÔsŹpÍVwŹ•g=†.Ő7_ż†˘ŢçaëV˛Ůő8żâ}€šď±bˇü—ľŻˇŞ´’ýË®GężÇ ¸Néđăr€¬.Ë)űS ŔVďČr€:­.Ë(B–ÔI–ÔI–ÔI–ÔI–ÔI–ÔI–ÔI–ÔI–ÔiuYÎnwżŰÝźmuŔJďČr€:­.Ë(B–Ô)Ťln‡ Îcż!śmhNďę†ÚĐ<ßXíŕˇĚ+JźąřVď%gn¤ĘWfm™űfß•ďĺ¤ó µ!˝“«·1„Â}€Ç/ź!„&˛ !Ľ}÷ţŐë7?÷r:!„-ör8Ęäřîc€S(ŢËéD6ßÜ˝pŹPtřÍ…łohLć§ÖSÔű<…ôg9î±b32}…őpjî±ę仏€:­.ËYřM3ŔFďČr€:­.Ë(B–ÔI–ÔI–ÔI–ÔI–ÔI–ÔI–ÔI–ÔI–ÔiuYÎnwżŰÝźmuŔJďČr€:­.Ë(B–ÔI–ÔI–ÔiŤYÎ~˙pÎŐ+Q¶ Ëę´Ć,`ą4˛ąŤ >}üĐśˇŁ‡TíăćŰzó+EŠ)R¤HQ}Eť>ŔidsBřňůBh BMÁ·ßýx8&ŐţôôôňĺOSŰ´ß?řúc¸BĺúŹ_>:‘Í7w/ŚËj`\P§5Ţcĺr\§˛}YP§5f9ËÉr€:Ér€:Ér€:Ér€:Ér€:Ér€:Ér€:Ér€:Ér€:Ér€:Ér€:Ér€:Ér€:Ér€:Ér€:Ér€:Ér€:Ér€:Ér€:Ér€:Ér€:Ér€:Ér€:Ér€:Ér€:Ér€:Ér€:Ér€:Ér€:Ér€:Ér€:Ér€:Ér€:Ér€:Ér€:Ér€:Ér€:Ér€:Ér€:Ér€:Ér€:Ér€:Ér€:Ér€:Ér€:Ér€:Ér€:Ér€:Ér€:Ér€:Ér€:Ér€:Ér€:Ér€:Ér€:Ér€:Ér€:Ér€:Ér€:Ér€:Ér€:Ér€:Ér€:Ér€:Ér€:Ér€:Ér€:Ér€:Ér€:Ér€:Ér€:Ér€:őg9ź>~xűî˝,Ř®4˛ąmţÓNŽ°Aż˙ĂźţůŹż7ä2·©IDATŹ›žĚmáűţÖÎŃä:iŔlź>~»4Ż^żů]§Ř¸`‹Úq9­Űö‘q9Ŕv5ărâČĆ=V@ |_P'ß—Ô)Ťln‡ B_ýőôUüT¨©tĆĺĽzý涷 éč‡Iµ?==•o2ŔĆĺu2.¨ÓĚ,ç?ĂÎŰ~€~3łśŻľúęĽíƸ NóÇĺôĆ92`%d9@ťÝcŐIn9ŔzČr€:-ýľś6żä«"ËęT໏żúę+A°6˛ N~Ç ¨“,¨SŮÜĆź>~h ÚŽÎÓÓÓĄÚ 0^ŮÜ„ľ|>„š‚BSđęő›‹5`Š/źťČć›»7˝Mŕ°!qdóęő›žq9ícSSSSSSSÓ M;ărşYN(ęí»÷ß˙đ·âŐ[wŇNB–SvmĺekępŠNBĎ÷ĺ4ť’‚ÓÎ÷îŻßÔÔÔÔÔÔtÓÓFńš»÷Xýó§ńý !ś®~`ŁNÚIp·8P­˙lň€ĺ1Ô_IEND®B`‚ [$@ń˙$NormalmH <A@ň˙ˇ<Default Paragraph Font ˙˙˙˙đđ/đXbđ$·ŃÍ©A÷ ł;?Tć˙É" bđ${š…Ô^®·ö ˇ«˛1©˙"ë&@ń˙˙˙€€€÷đđđ¸đ( đ đđ<˛ đ # đ A˙đđđ<˛ đ # đ A˙đđđB đS đżË˙ ?đ($34($34˙˙FHBUCS*D:\Temp\AutoRecovery save of Document3.asdFHBUCSD:\Data\TechlibDEC99-JAN00.doc˙@€0Jěp@U‡źTimes New Roman Times5€SymbolI& ‡źArial Helvetica"đĐh°űA& üA&łűA&ŃĄŔ´´€r0˙˙FHBUCSFHBUCSţ˙ŕ…źňůOh«‘+'łŮ0| ¬¸ČÔŕô  , 8 D P\dltässFHBUCSHBUHBU Normal.dotFHBUCSd1BUMicrosoft Word 8.0@2~§@RĘĦkż@€€Y¦kż@ľV9˛kżţ˙ŐÍŐś.“—+,ů®DŐÍŐś.“—+,ů®H hp ¨° ¸ŔČĐ Ř ĺäBHP World Minerals Discovery-1  Title 6> _PID_GUIDäAN{CD0FE9A9-D792-11D3-BE8D-00A02437E267}  !"#$ţ˙˙˙&'()*+,ţ˙˙˙./01234ţ˙˙˙6789:;<ţ˙˙˙ý˙˙˙?ţ˙˙˙ţ˙˙˙ţ˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙Root Entry˙˙˙˙˙˙˙˙ ŔF`çű\˛kżđ #]˛kżA€1Table˙˙˙˙˙˙˙˙˙˙˙˙%WordDocument˙˙˙˙˙˙˙˙ISummaryInformation(˙˙˙˙-DocumentSummaryInformation8˙˙˙˙˙˙˙˙˙˙˙˙5CompObj˙˙˙˙jObjectPool˙˙˙˙˙˙˙˙˙˙˙˙đ #]˛kżđ #]˛kż˙˙˙˙˙˙˙˙˙˙˙˙ţ˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙ţ˙ ˙˙˙˙ ŔFMicrosoft Word Document MSWordDocWord.Document.8ô9˛q”äÄ ! 7˙˙˙˙ @†÷@00úß'Wtż@00úß'Wtż70TechlibDEC99-JAN00.doc777TechlibDEC99-JAN00.docůG÷óĺHŕÓ¬‚Ç!Ż0'˙˙˙˙ =€Đ  18€Đ  18€€„ĐĎࡱá>ţ˙ =?ţ˙˙˙<˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙ěĄÁq żbjbjt+t+ 7GAA˙˙˙˙˙˙]’’’’’’’¦¦¦¦¦ ˛ ¦ ¶ĘĘĘĘĘůůůegggggg$VôJB‹’ůą@ůůů‹’’ĘĘďĘů’Ę’Ęe¦¦’’’’ůeFe’’eĘľ  9äčPtż¦¦e  úú jUýýţţ &P °. °ČA!°)"°)# $ %°nđJv÷¤ŻĘ.Ţ»g đra˙‰PNG  IHDR÷¨M-]SgAMA±•ô¦đIDATxśíݱ«ÜĆľđqđ`¸Ü6pá‚›TiҸ¸MÚČđşK <üŠ¤Hš—&) îŇů¸p0éÜž&Ť«Ó0Nk ţŢ+d+ŠFšIł»Úź?ŚXŻVŁ‘V»šóŐŚ6%€îĄ”Ţľą;FŃŻ_˝Ľzţâű~:FáŔĺúő—źSJÇk$Ľ~őň‹Gß|2üŰéŐóŁő™ššššššš¦”ľţęËôAóň»©Ďr^żzůŹ~Ţ?ŰJźĺ4/¸\]rĽFÂŐóOž>{źĺŁ‰ÓÓĆú,çHMś®üOúuüăźź§m«VÓ®ä¶eššššššš~ýŐ—]ďśVeöľţęËî™q–ÓÍ05555555˝ ißžé›P)ď—ÓÍřâŃ7 ŕBtĆűë_WĎ_*żĽŇą˘ ugöIÍ#•´˙,§o@ »ČžÎ=ł´úĘVĹĚr–žĹ»s˙Ň_ˇŰo9,ÉçćĎĚŢpĄŰÁ3űÁk&˝Ód9µc¬ęOęy‡ u0wĄ)͆šĽŢTĹŞpąjnĄdđń¨9ł÷§Ëî˘ÇÜËZ]ü:Ă«îÜż¨śBsatĺhu}şúő‹¬[)łź1Vy9iK–ł˘ëÉ– Č{/-a äjÎě• †e9ë"ŤŐ-ľš>4+.WőĎçý‘×­Tc€ŹĘÁ3{ý9q_YÎ˘ŞŹV\ł]l“ŹÍ>ß?^Z“ąÂk^żzĄL}żśN“ĺĽ˙µÎü®F?áąN«âö áOl¦”F?üY™) ŻĄtĺtżÖ9¬U÷žűş_°[wżżcT ;ĆjËŠe9Ŕ ~“|énżI4pě,gĹnYĐŔ ˛ś´pL÷ú,§Ó-ĽbÚ—łşSSSSSSÓýL›źŮSJ]Łd{9i*˛ą—Rúăú?ŁŞ?yú¬{2m6ld—®á™˝UQÝHňü¶8÷RJ˙óß˙5ZĺŠßs8—î~9żţňs˙ĚźwěźęŁożűqé îîîţőŻ˙mPS€®ű,§ęo˙ôţđ%}ČÓ5tîîîĆ…ÝÜÜ4©)ŔRÝĺŞaCçĎVN>ĆŞ­ŰŰßRJţ»~V÷|§›;|fř|ľČđůňR…ŠíßEWľŕŕvťrĂŁîd€`FýrRßĘÍhŢĐ9ŘÄ©_¤&_°_äöö·ŰŰ߆Ë–š|ýÁm™«pů«ŇďXMz÷î]Ă ­nâ”?m› }iţ»ű—ć7„#é÷|°u°Z~[ś5YλwďNP™Vú†Ô\žÔµĄ&›)“ÉPľŕ0LęÔç ĂuM¶[–ŔGŕşűąŞ.˛I~züĎß±ÎH)ť¬•ł§©Ţ>wÂ>kұwµ·ř]Oţ&yí«3*WľçˇRÎ @Ţý¦6Ë©QČrŘŰŕ”˝Ő'Ľăípo%Ŕ\–s˘ß±bo§ź˝Ő'Ľăípo%@gGc¬Zü;V777çŞ+@˝Ĺ÷>ţěłĎęK×$Î%ż÷ń˛ß±Ř'ýr€¶ţ&9Ŕ>Ér€d9@L˛ &Y“,I–Ä$Ëb’ĺ1Ér€d9@L˛ &YSŮÜź›ÁQÝŢţ–Rzřđßőłşç;ÝÜá3ĂçóEćžĎ,TěRLnÂEo×ŇĘĎ˝ďG’™­Ę,”¶˙7ô”Çáţ÷Ć…úwěĆM>ń—O®‹l^żzŮE6Ož>»?9ŁICgôÝW>Iw/˝lhnÖÁ]ą®ŔëšüfŻ¬áÁ&ÎÜóů"…U÷‹ÜŢţÖíŰ+żľˇŃ'á§ÉŹYást¤ŐĄůC—Ř|–:ń—Oî¤ýrúCĽ{0úo}6†/ëçfܡë ,ŻkQĺëßňŐMśň";< Ťj>:6¶îë5ĽýżË§¬á÷ĆQ?Ë°TŢýćYN˝ł·ţÉ›A‹ÂŹr¸nW´ŤUOçtćÖ˛î/ÂąĄFÍÓąąéŻ-Âţ˝>\ę`=8*muĺóýą4@>x5sQiĺĄć*żôý*ϲeoLÖp˛ĚVÇaMý.•Ď:’†źĺ›|đ]^±{ë߯ú­«YÝɶ«°ÔęŹŢŮ[·űc5ů·Č(2Ů®y Ő4nşĆGĂ5¶-°•ą¨ě ąw¶çM®«ś?Č—Ş9–ŘUřľ«¬üP·˘úÝXŘ®uoJa©Â¬Â&§ůwů`ÂşeoĚŐ°/sXĄVÇáĆuÍQ§´î°)lňşwyÝî­|żęĎ&ĂĄ&['Ű®¶ß6“Űu.;cŐď©ąsíÁť5úkř -.]׺ĄĘŻĚOŤ[ěá0MeWŁťvÔ¶ZעoşV&+?˛±VŁ#déŽ*,USůEjj¸h-•5lňľWîŢÓc‹ăł<Úäuďň vďŠo€ÉDˇ†gŮ®Ąëjµş-ö5Ćjô6ßţ5đ,´ ×…cë \·®ĄKŐ|ň=g?we]łfÔ4߸K[µ\·—PŘ®u•\úçűn»†m›ňg˙“úxö°iͿґ?_ŰW´eÁS:髲šścňďČáó· űŽ¬(pÝşÖ-5ʵö’sösÝ®+·Ń˝űŮŁíÚľŁ(h¸ŁÎuDťćłĽ“#Şá7@^ŕń–ÚrlědĎ—í®_ΖŹDókS¸áń‘_ÝRÇ˝P:W`˝ÂŐôá3ą˘ŘŐ Ö«ß˝«ő[‘Ż«rŹ·j.MVľI­ćJX·Ł K-ŞüşuĄm‡Í1vďČöă°r-ĺµϱߔÉ5wÉf{5†ëjňY+ÔpăçkEć^°ôť{ňdMíĽűÍ˝”ŇŰ7wy–óíw?ŢÝÝ-*ýćććńăßGOŽ¶mŘ„5üËm‚ň‹ ‡ěşó:ŹÖ•/;ůäd łÉb ĎW–V¸·˘Ŕ¶ŮědŔV¨^e±ů˛5ű6ýőŔxŤŠJŮ‘SSÉú®I1ś5zqýάßićÍŞ_Ş<+Uoň\Mćž\th5ŮäÂÜć»7eÇ@ůÚçgyËq¸ń”WňŕA5ąÔśÉŻ‚É2+?Ë+›¶ß65e¶:Řą~űć.ĄÔE6)Ą«ç/ž<}öľ•3š‘RjŐĘ!wŞ·|ĄťW wq_\WáÝ»Î#›/}ăw¬Î ůµ¶†|đ¸Pűcő1Űm3b·3ě2˛ó/±u—ă©´Ł1VĐÄ5.¨Ş—hwc¬šŘŃ˝Ź:gżśă“kFzĎŤú«•Z®ŘR5#Ű/×–u‰ťšW_>żÄŤŕlýr*ďSłHá~Ăű% ű Ťîkt;őSő}Ö 7ŕ™Ľ“ jĎCáČí®_Îę&Ny‘śźúšř“˝ĆĂ]ţ<‘äÝoN‘ĺ”üuůGŰ‹Kăś‹î)YYÎÜ=%çž\}kË|Áá@ÍuőĎYw˙Đüf …˝1şęč~ŁwÔŠí*ď(HŽg_YNMăć¶Ĺď_ ŻUĄÍg—<–ČźéN˝“íüůšĘËĚŻÄĺçěuŐ(¬kř`Q03÷âa5ęK+T~rV˙80ą˝©ú°ś«FaG­;¨´»1VĺÓŰčś´ÚéĎ.s=©GŤ†E5)wšž,pu5N3Ô´u&+_Uż{·t.®\×ö€˛Ýű¸ćű=^¤ßü¬vą§Éţ*áđ™…4­Ôëöüĺľ_ű·»{Ź®8,ęq‰m ćuľÄťĐ…1űż5űĐşŞ^Đ\śőËé{-´¬4Ľ°ĂfPŢ9fc—Łšç.Eĺ}t–®}{©%LöĹ™ěMĽt»V\:¬|+ 5ś|ż„=«ĺÝoň+żzţâŰď~Ľ»»[TúÍÍÍăÇżOÎ*śuŽUɬ)­0śç`o•ĺÁM);VŮo¦Ľ˘|©ąGCŠ KJËk¸âÓÁ–ÖĆËŰ•Ź˘í“ÂŽZ·ççjRżÔ®Zçâúí›»”R٤”®žżxňôŮűVÎhFJéd­ś=ŘyőV·EGbG„pťG6_<úćDc¬ö<˘Äy8gżśE·E9ĄÝVlµQ÷ćŘQ‘śçŢÇśX°FŰńŘQ‘ěhŚp˙w=űŕÂíîŢÇMśóŢÇ‡Ď đîT?^1’®Ľ_NÍ"…Ű™ ď}r›ýTußNÝc7}Ͷäśc+ßU¨ͨ‘]ů3&5ÎUfĎŁNlwýrV7qĘ‹śŕ«żŐ-›Ď(Ţŕ˛ÓľőŁ}8ÚźůA2yŘÔ8śĄM0éy2|¦o~-úł»°Ôܬá sóx`rĘÎE«7ą˛ňýÜšÝ;śU¨aŰĆǨ>•ďB}ŚěnŚUů«Ľ˙xcCgŘ#gK9ŤÚ••ź\ŞľŔć§ĂE®ŰäĘuÍ5VjÖUh(´jC6sKByđ@“Î9ĆjdŃ_üŰ®\ěĐĹťĆNąWË}u'Żgfm±®)ł®ŔąÁôÎ6ĆjÎčŠCĺ7¸żh÷ć”ďEa]ŁlxDfmŻĚÜu˝m ą‡y¤#`ŇŽúĺôť$&ĎCë LNĺđď$1ş†RąşÉ.&ŁŃď‹ Ěµ˝Z—‡"Ă.ZעZ•×UXď{w­Óä.@Ty÷›{)ĄüÇĘŻžżřö»ďîî•~ssóřńď“ł §çąë‡Ň”K«,ę`s*GúÔ—YčmS•˛Ř`î5sëš,ˇĐ”yxčĆ05[Ýďóň(Ş•ŻYjË«üŘ(_2­b´řÁ·©˛ŔÉ*UmTá—î=:Ľ8ŔN]ż}s—Rę"›”ŇŐóOž>{ßĘÍH)ť¬•ł;Ż^H—˛Ď/˘žZ9ŔGď:Źlľxô͉ĆXí9iżÓçµŰk^»­ŔéĺÝoN”ĺŔPóáNÔ’ĺ1Mg9gcĹÇIË€ćvtżŕ 6@\ůýrÎ|ďc€&vtż€†v÷;VMČr€d9@L˛ &Y“,I–Ä$Ëb’ĺ1Ér€d9@L˛ &Y“,I–Ä$Ëb’ĺ1Ér€d9@L˛ &Y“,I–Ä$Ëb’ĺ1Ér€d9@L˛ &Y“,I–Ä$Ëb’ĺ1Ér€d9@L˛ &Y“,I–Ä$Ëb’ĺ1Ér€d9@L˛ &Y“,I–Ä$Ëb’ĺ1Ér€d9@L˛ &Y“,I–Ä$Ëb’ĺ1Ér€d9@L˛ &Y“,I–Ä$Ëb’ĺ1Ér€d9@L˛ &Y“,I–Ä$Ëb’ĺ1Ér€d9@L˛ &Y“,I–Ä$Ëb’ĺ1Ér€d9@L˛ &Y“,I–Ä$Ëb’ĺ1Ér€d9@L˛ &Y“,I–Ä$Ëb’ĺ1Ér€d9@L˛ &Y“,I–Ä$Ëb’ĺ1Ér€d9@L˛ &Y“,I–Ä$Ëb’ĺ1Ér€d9@L˛ &Y“,I–Ä$Ëb’ĺ1Ér€d9@L˛ &Y“,I–Ä$Ëb’ĺ1Ér€d9@L˛ &Y“,I–Ä$Ëb’ĺ1Ér€d9@L˛ &Y“,I–Ä$Ëb’ĺ1Ér€d9@L˛ &Y“,I–Ä$Ëb’ĺ1Ér€d9@L˛ &Y“,I–Ä$Ëb’ĺ1Ér€d9@L˛ &Y“,I–Ä$Ëb’ĺ1Ér€d9@L˛ &Y“,I–Ä$Ëb’ĺ1Ér€d9@L˛ &Y“,I–Ä$Ëb’ĺ1Ér€d9@L˛ &Y“,I–Ä$Ëb’ĺ1Ér€d9@L˛ &Y“,I–Ä$Ëb’ĺ1Ér€d9@L˛ &Y“,I–Ä$Ëb’ĺ1Ér€d9@L˛ &Y“,I–Ä$Ëb’ĺ1Ér€d9@L˛ &Y“,I–Ä$Ëb’ĺ1Ér€d9@L˛ &Y“,I–Ä$Ëb’ĺ1Ér€d9@L˛ &Y“,I–Ä$Ëb’ĺ1Ér€d9@L˛ &Y“,I–Ä$Ëb’ĺ1Ér€d9@L˛ &Y“,I–Ä$Ëb’ĺ1Ér€d9@L˛ &Y“,I–Ä$Ëb’ĺ1Ér€d9@L˛ &Y“,I–Ä$Ëb’ĺ1Ér€d9@LÓYÎëW/Żžżĺ—+Źlîw˙é§IC¸@˙řççżţňs÷¸kÉÜO)}˙ĂOý+ş\ç,•Xíő«—Ă&Í“§Ď>ÍÖ/¸D}żśŢýţ‘~9Ŕĺęúĺ #c¬€Ü/Éýr€ňČćţÜŚ”ҧź~ş|ż7Ş*ŔŁ~9Ož>»?9ŁkčÜÝÝ-*ýćć¦}•*č—Ĥ_ÓĘ,çÝĽÓÖ`ÚĘ,çÁ§­'Ŕ2úĺ1­ď—3çČx€ťĺ1mc5Jn9Ŕ~Čr€¶Ţ/§Ďo9Ŕ®Čr€ÜűřÁ‚`od9@L~Ç I–Ä”G6÷‡3^żzŮÍč:777çŞ+@˝<˛ą—Rzűć.ĄÔÍH)u3ž<}v¶j,ńöÍÝ(˛ůâŃ7÷>ŔF6Ož>›č—Ó?65555555˝ é¨_Î8ËIM]=ńý?5/¸tGm$Lg9mWĐ޶d †c4&î—Ó5JNG÷Ýi^ľ©©©©©©éEO;ÍKŹ±úő—źÓq|˙ĂO)Ąă•\¨Ł6ŚÂú˛ţ O°ĘO IEND®B`‚nđ»!Ô¬Ýk©pŚřĎPoGý3ű7˙‰PNG  IHDR÷¨M-]SgAMA±•ô¦ IDATxśíÝ?‹äŘÝ/đÓ¦ßÁÂĂ“. •8r˛IOâÔöܬYX.s;X'׉ LÖŮĽĂ°l¶i'N&ę¤.•~ }íjµ:Ň)IuŞZúŐçC#ŞëHG§ŞőçôWGU)Dt“RúüépŽŞ?~x˙îű˙ň׿ťŁr`»ţůŹż§”Î×IřřáýWw_˙¦ű{Ýé»ďě­ĎÔÔÔÔÔÔÔ4Ąôç?ý1ý¬zýÍÔf9?Ľ˙íďţĐ>[K›ĺTŻŘ®& 9_'áÝ÷?ľ~óö§,ç]ś–.ĐŐf9gęâ4ő˙¦]Ço÷‡ôsߪִ©ąnť¦¦¦¦¦¦¦¦ţÓ›Ń9µęlýůOlžég9M©©©©©©©é†¦m¦íBĄ|\NSđŐÝ× `#šĆŰë_ďľ˙ńő›··Í/˝,'ťíör€şţëżżL?żi#›_FwÇĺüąęÍ]µę1555555}ńió` -éMÓPdó˧¶35!Os+ťćÝ÷?ţĺŻ;˝` *žŮßUú¸™nżĄ7üć§+Vł'Ő»˝ü¬·©vú™ýÝĎwEuë™>,řߏ˙ęŐ“†˛śŃq9©FߪJ=ĐĽ­Í[Ö} ´*žŮŰţFŻĂ4ĺüŰí őú-3Ćĺ4ĎśňŞÔ¬AĹ3ű‰¦¶ŁSÎr†?/ç”·¶’ĺô›?ţKąşYNó V¤’†"›3ŽË ŁĘş1T··1ř|ŰA{0Ą’|í˝úË+« ‚YvfT=RIëĎrÚDwLáůni•LoLaXĚ,gîYĽ9÷Ďíń†ý–Ă’Ľ4f¬ňŠ+€ŘŽžŮŹ^3i]&Ë™zŹŐô“z> hŮ »Ň”Ćo†ĽŢ4ýŠUárŐŘJÝŔőrfoO—ÍEŹ±Ůj]üz{¬šs˙¬z Ý…Ţ•ŁĹíijh¦/˛lĄĚzî±ĘëI§d9 †žśňňŃÄsk8…„rSÎě; +Ęr–E‹{|SĆĐ,¸\Ő>źŹG^¶Rť!®ĘŃ3űôs⺲śYMď­xĘ hb›üŢěîóíăą-«|Ęü‹W ÁL—sÔe˛śźľ­3˙‚«ŢWx.S닸€5¨ř›)ĄŢNĚş×Ršzšoë춪ů Ďu}^°Z›űĽßcLö«SV,Ë€.đťäsďéöťä@çÎrÜÓ-Ë*¸@–“fŢÓ˝<Ëi4 /¶ő,®ÁÔÔÔÔÔÔt=Óęgö”RÓ)9˝ž4Ůܤ”ţýřŻ^Ó_żyŰ<™NÖíd[WńĚ^«ŞćNňücqnRJ˙ç˙ŻŢ*|źŔKi>/çź˙ř{űĚ/ź Ř>ŐGß|űÝ܇˙ůź˙[ˇĄąçDZ’ý˙Ű_˛!´v»ű—n4Ű,§}ężţűËŰî,mČÓtt‡Cż’˘§§§*-«ą\ŐíčüŇËÉď±؊޸śÔörz::űýCűx·»ďţ:&ź­óÖ {gşďFó2Ç~í.R®°F{_Lďĺ§ńWÚ*Ľ‡…9Óöß«”RşąűĺńócşąKĎŹcŻkż轫SŢîR˝ç›˝Ň±çŹVŽý­ Í»®±Í ÜřŁëků&Ëyi*îkG‹ «›µTy]c 6Ç»˙1ů=VĄď±ôź˙üçüí\µvCití=înRł •·ŕ ™ňnćĎçłUoó‹{!·¨ŢŻ˝ĄR°w¬éâîöf¨Ą|_Ř%[[çórÖEWj9őórÖI–lÖřÝU»dt0ĺ—óôôôr­jv–óűß˙~zíşDŔK1.Ég1ťô=V«%Ëb’ĺ1Ér€d9@L˛ &Y“,I–Ä$Ëb’ĺ1Ér€d9@L˛ &Y“,I–Ä$Ëb’ĺ1Ér€d9@L˛ &Y“,I–Ä$Ëb’ĺ1Ér€d9@L˛ &Y“,I–Ä$Ëb’ĺ1Ér€d9@L˛ &Y“,I–Ä$Ëb’ĺ1Ér€d9@L˛ŕBžź›źYďů懵Ůďöű‡±ç‹˘Ę#›ŰnÁÇď›Xöě{ss×ýµ}ćëę:e-77wu{˝ÚŞżk»»Ýý~˙°ŰÝwźl‹z3÷4Ë>?¶TˇhĘۢfŐmËĂ[c–sUÝLĄw"o=Ç ľ[yó“Fş>/Ą×ÂÂl:@Ś™o´…ôëSŐnw_č4´EÝyşO¶‹wë,*TXnI·ćr‡©»Č‹?u×(ËMz~~8“¶‹ĐëUŚ…ů<ÓăŠÁĚcpń)EéŘ•¬Ł‰ÇZXçčşd9á-;‰Nďäs.;6fą\t´1S0·çT±Ű1e]•ÖňřůÓˇŮ|u÷µq9° =›Áss¨4żľřY|,gęu5ŞQ…6\l]¬Í™®Â,6›Ç$˝˘—uÉţÍ9¬ń+`|đlţą/µî6¨Ű;'°îíKS:(˝ +ůRÝ[˘4&-í'Í­bß®Ű Üh' ÝcőÓ«<ËąŘ+`ĚŃ!2cbňËF/Wő ި•×6X4öa?cc„—µppŤ˝˘Łë:ë±iůÝ˝gŽÎ0Ąž®±ËUĄy%¶Űk™ă1~óúÍŰ——pšáq9ľÇ Ŕ¸ &ßIÄ$Ëb’ĺ1­.Ëy‘o@^\ő>€,iuY@˛ &Y“,I–Ä$Ëb’ĺ1Ér€d9@L˛ ¦Őe9»Ýýnw±Ő+Q˝ ËbZ]–P…,)ŹlnÇ .cżH)˝ěĐś5´a=^üÝh°  í‚ –˝€ĹŻ 6$Ţvľ•KZeóŽŞ~Ći"›ŹŢ7‘Íë7oo 6wŃŞű—îÚâ_ýĘív÷cÍŁ ¦ń-áĹ-~]ëŃ;žî÷…Ő-šţ§«°Ý‘{ĄcĎ­0;8š1w]Ý ž“–­k¬ĺ/+Ŕv>hěŹŘ›§â6_(ę6fĺÇ˝Ë ;.§ý«7¶W{€­Řďšźö×Ôą!"˙—=ßőz»aoÎŁKu‹ş«+ěÝÝeËUhĆâĆĎzűC˝sm÷ÄĹ,ŰćÇL¬plŰ '~$Ë)čJňĂJăHűxđůÁ:OiƬu .ŐIóÓ_WĹw#ß!§÷Ag5cbU){÷Ć^ËÄšŹ®«É<gřş&őfXeŹý»ÜYÇŮü8EwĂ®[óY ľ‡§´żÝŚ+fţGŁ˛±#ŢÜgâAăč!eŮî0«©ËlhË &l–ÓŐű‡©»•ĎúOtěŻÁ:ŹnĐG›qô߸|]KµŹóÓ_W­wŁ»ÔÜ}~đŤ*4Ł\UľTţoqţŠ8ÚÂąŻkbŃŕá~ÁŐ[pĚŕ —­˛ÔŃöTlaAő {Žľ®îźřôńÇDĺĂW÷M؆‰‡ĺň!%-ÚęţĄ¦o/µ‰^›ř÷Xö±eGŢî˛UţXĽíVŮč'ľ®eK-ŘĎË3/kF•Ą–\WϬ×5«ńcݸąoÔ˛-­ĽëŤ•Îýóťâ”?ú`3ÎÔřKÍíÎ.6eŻXáXgĄ[ztwU4˲m~Y…Ýt€ VwŹUu˶­1ç>dś¸˘ĹÍ»Řęv?ÇňÝg¬úÄfĽ łŹĘoďÜ7Ş[[ˇŮc5–ízS:@ů‹ÚýÓîç\ô9ńÄ“ŻenăOY×™«gÍ Ýš±Ýá˘TűtS®°Öź8Ľ°÷Xu ţ;{JUçÖkęÜ«0ł–j,{]§/5ëśT·cUí‡ŘÖŞ˙ oďâ ±Ü×)ě_ĺ˘ÂÉip©ncć†(c Í8ÚřĹÍ›ľ›T<ůťrHą¤Â+ť¸;T9u«ť»Í/¨pÁ¶qť®b\Î)zÇ÷îůo_év†r%çNYf˝®ÓߍSŢ´±+bs›‘/•†ŽGcŽY/!ŹĐOlaąńc•ź¸ő—ą2Ö|Ő»‹ßJyú;0e;śµ®î_§ĘÖŰ[pÁR \đďŮ؆=ĺP¶us·Ă0/|ş|řÍMJéó§Cžĺ|óíw‡ĂaVíOOOŻ^ý0k‘Z˙=—3ĚÂŻůâ…Ěżđ_Δ—ĐľŘü߯î3˝ŇÂş—ęÎ6¶Ć±×•żşߍoTá­XÜŚtěEţ![°‰¶đčv8ÖÂŁŤĎ×UhĆ) ŰX®đ—-5wÎŁ™Dů ™ŘŚB“W1ńřSŘalŠÓŰű¦o˝c»mˇm…ăao-Ąg:ĺík@·ÎÂ6ź/;e=şmŚ5˛üüzTmáăçO‡”R٤”Ţ}˙ăë7oęĺô RJŰęĺlÂU˝ŘüÉŘ®•o˝+o^kíÜD#Uďĺô"›ŻîľŽvŹÔµĹ4l˝µ¬öŇĎjöRňá7/śĺ\ŹĹ™3@0Ž‡śÁp–đ«u˛'49÷X1Ĺ˙ěcŕ:­.Ë1r ®Ső>€,iuY@˛ &Y“,I–Ä$Ëb’ĺ1Ér€d9@L˛ ¦Őe9»Ýýnw±Ő+Q˝ ËbZ]–P…,iuYÎ~˙°ß?śµÎć×ękNQýěśG6·Ý‚ŹŢ7ëĽhŐ{/&YÚíîCvqžźźżąąk‹nnîşsv‹z‹ŚUŘ –¶E˝Ňf-^W^×fuYÎ,m·¦<*{ť÷mUŹ”ÚSűÍÍ]ó“ĺó.Őô Eí“ůăîâů"[l;Ë9ŞŰ‡ěč´3´ĄÝgzĄ…čhl©rý©“έ°VĹX„łőu°~ŰÎrŽ*§8űýC;Ă`w¤)í%Fů"…ĄĆÖž§Pusť^‘:†zŮÉôŇ—0ë`ĺ®ú«r|˛,\YĽÔ`\´La€NďAo©rhz÷¨ŰŁjë|©upµňČćv¬`ÎzőgY¤ąnŐdŔ¶ÇĺlB°NlĹ검*®úłŹ€Ŕd9@L˛ ¦5f9nD€ëT· ËbZc–pş}^NţťSé×ßsŮŁH‘"EŠ)ŠW4ý!ŹZÝ÷XĄÎW`WĄ^Ŕ÷Xq—Ä´Ć{¬\®€ëT· ËbZc–p:Y“,I–Ä$ËbZ]–łß?řNr¸BŐű˛ ¦Őe9UČr€d9@L˛ &Y“,I–Ä$Ëb’ĺ1Ér€V—ĺěv÷»ÝýĹV¬Dő>€,iuY@˛ ¦Őe9űýĂ~˙p±ŐÍU˝y+˝'z~~|~~<ßü¬\ěͨ®úA#Źln»?Ľo â]´ęľŹáÇ;·]‡››»üףKu•as(á÷ŕJ¬.ËąŚćČŢŽĺ˙ďć`×ähĄťáćć®ůI#]źB zE+×vhšÝˇîá–Iŕe]c–Óvqš_w»ű&"k´O¦Î±ľ÷ka¶‰5”+kęŞtˇ<ęv†ň'Ë‹LŚš¸ŚÁÔł÷d>O!+-ĚÜťsl§îJłś1˝ăéŘŻÝ˙zÓŻý˝˙†—UxmÓô!Nď@t{'Ý°§-ÍW‘/’†ú4ymĽ”±Ôł·ńçűÂŘöÝnÄ‚ĹÇşG jÓY­n·#O=ÓiłŞWP–G6·cl]÷’Ь~†KH× |Ů4—_ęťŘ#×­.¦7üćő›·ńÇĺ\§nÓ\·šŢeŃąąm˛Ňt\zĎW_Qţd÷ZŐšG¤rŤărGţĆŚÉoë?úOę‚ Żö_źťó"ňkUÝ=epĐĚôÉŃ “۲€Ş®t\N÷ßÖôëôŕ´ů˝Qc‹ó˘S*¬e°»p´ѽ•ĎÜ+íÍĐ}¦}Ü»‹j즪ŠC¤9*żŃŻűkoűLs.Kőz3ÝĹT°@Ůܤ”>:¤”š‚”RSđͷ߇Yµ?==˝zőìE6šTo´Ů°UO¦Źź?zĂoľşűú*˛ ĽŐÝcµĹ8¤›ĚŻłýc§\`=ŞźCÝcUÁ:{6]z3\ˇkĽÇ ¸WzŹŢ겜kţ„¸fŐű˛ ¦Őe9UČr€d9@L˛ &Y“,I–Ä$Ëb’ĺ1Ér€V—ĺěv÷»ÝýĹV¬Dő>€,iuY@˛ ¦<˛ą+¸Śýţ!Ątˇ9ŐWt±–_x]ĎĎŹíă››»‰EÝfµuέšý"ťs׺ë•+,ď•PQő]¬‰l>~xßD6ŻßĽ˝,ŘčE«ö¨—RÚíî÷ű‡ő m±ž¶µşÄççÇççÇö0W(Jż>hÖY^ݬ ßłvŠf_°®+ßő¦T8¸WÂúE—Óv ›CŘ”Ăß%µÖŐ¶đ77wcGñ˘îˇ¶=ŕN©z»ĂY»v˝é‹”÷JXż|řM¨,§Őű'Ż}śGÜ˝ă]÷hŰťą·`ˇÂY-lÓ¦)Í\W/ľę­ĺ’y;TQŘďňÔo×ŔV7.ç|şÇ—öp™tz‡­îE®v©üĘWˇÂÓ[;ÖŚň‘´·lEłÝö»ĽSR1’ąÚ]ĎŕBĘÇĺĹǪ{Äi~ęÖĽ6˝ăďŘ?¦łß˝T?˝+ě§G7Ý—Ú1cěz. Rđ,§đoŮ•\ˇ_ÜŚęíďŤyśXËLA|>v=CŚ‰$ň=V .!őy©Łí)ÍXgÎÓĺ—˘.Ć®ÁDľÇŞ1ńÎŇ|¶Sş8 .•Ż÷OYW>:oĆâ+w >ůf®î>‡–mŰv˝ÂĹ/{%[—żąI)}ţtČłśoľýîp8ĚŞýéééŐ«f-Rń¸ćúTáƇÁ˘)7RÍŞ°ĐĽBmÓď+)ŔăçO‡”R٤”Ţ}˙ăë7oęĺô RJ[ěĺp”7€•¨ŢËéE6_Ý}í+ ‚ŐÝc%T¸°Mżác·,ő®^­łhđy€kVý”ä+6¬ĐWXçć+ &ź} Ä´ş,§ÖÇĄŰR˝ ËbZ]–P…,I–Ä$Ëb’ĺ1Ér€d9@L˛ &Y“,iuYÎnwżŰÝ_luŔJTďČr€V—ĺT!Ëb’ĺ1Ér€Öĺě÷—\°uű˛ ¦5f9§Ë#›ŰnÁÇ ttş!Uű¸ůt ÁüJ‘"EŠ)RŻ¨×8EŮܤ”>:¤”š‚”RSđͷ߇Yµ?==˝zőĂÜ6í÷>ţ®P˝>ŔăçO‡^dóŐÝ×Ćĺ—Ä´Ć{¬\®€ëT· ËbZc–p:Y“,I–Ä$Ëb’ĺ1Ér€d9@L˛ &Y“,I–Ä$Ëb’ĺ1Ér€d9@L˛ &Y“,I–Ä$Ëb’ĺ1Ér€d9@L˛ &Y“,I–Ä$Ëb’ĺ1Ér€d9@L˛ &Y“,I–Ä$Ëb’ĺ1Ér€d9@L˛ &Y“,I–Ä$Ëb’ĺ1Ér€d9@L˛ &Y“,I–Ä$Ëb’ĺ1Ér€d9@L˛ &Y“,I–Ä$Ëb’ĺ1Ér€d9@L˛ &Y“,I–Ä$Ëb’ĺ1Ér€d9@L˛ ¦á,çă‡÷ďľ˙Q–lWŮÜ6ż´Ó¤ŁlĐo÷‡ţăďÍă¦'s›RúË_˙ÖÎŃä:/Ň8€Ĺ>~xßíŇĽ~óö7˝băr€-jÇĺ´nŰGĆĺŰŐŚËéF6î±"đy9@L>/)ŹlnÇ RJ_~ů“#(ůUIDATĺüUüP©©3ôĆĺĽ~óöv° éč‡Yµ?==Őo2ŔĆĺ1—Ä´0Ëůϸ˶`ŘÂ,ç‹/ľ¸l;ć1.iů¸śÁ8GƬ„,é¤{¬zÉŤ XYÓ©ź—Óć7‚`Ud9@L>űř‹/ľäk#Ëbň=V@L˛ ¦<˛ąí|üđľ)h;:OOO/ŐV€éňČć&ĄôůÓ!ĄÔ¤”š‚×oŢľX3ćřüéĐ‹lľşűúf°  |6¤ŮĽ~óv`\NűŘÔÔÔÔÔÔÔtCÓ޸ś~–“Şz÷ýŹůëߪW lÝY; ĂYNÝ´•×­áť„ĎËi:%§˝ĎÝ©^ż©©©©©©é¦§Ťę5÷ď±úç?ţžÎă/ý[Jé|őuÖN‚»Ĺ€°ţ?e!]Í ÝŐjIEND®B`‚ [$@ń˙$NormalmH <A@ň˙ˇ<Default Paragraph Font ˙˙˙˙đÄđ?đ„bđ$v÷¤ŻĘ.Ţ»g đra˙R" bđ$µNצ;Ů"·ůKU 8˙."˙˙˙˙bđ$Ô¬Ýk©pŚřĎPoGý3ű7˙Ă!t%@ń˙˙˙€€€÷đđđ¸đ( đ  đđ<˛ đ # đ A˙đđđ<˛ đ # đ A˙đđđB đS đżË˙ ?đ($34($34˙˙FHBUCSD:\Data\TechlibNOV99.doc˙@€$Ś›0@G‡źTimes New Roman5€Symbol3& ‡źArial"đĐhüA&Ý[B¦ŃĄŔ´´€r0˙˙FHBUCSFHBUCSţ˙ŕ…źňůOh«‘+'łŮ0h¤°ŔĚŘě ü $ 0 <HPX`ässFHBUCSHBUHBU Normal.dotFHBUCSd2BUMicrosoft Word 8.0@FĂ#@]˛kż@öQćPtżţ˙ŐÍŐś.“—+,ů®DŐÍŐś.“—+,ů®H hp ¨° ¸ŔČĐ Ř ĺäBHP World Minerals Discovery-1  Title 6> _PID_GUIDäAN{CD0FE9AA-D792-11D3-BE8D-00A02437E267}  !"#ţ˙˙˙%&'()*+ţ˙˙˙-./0123ţ˙˙˙56789:;ţ˙˙˙ý˙˙˙>ţ˙˙˙ţ˙˙˙ţ˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙Root Entry˙˙˙˙˙˙˙˙ ŔFoüłkżŕ°˙čPtż@€1Table˙˙˙˙˙˙˙˙˙˙˙˙$WordDocument˙˙˙˙˙˙˙˙7GSummaryInformation(˙˙˙˙,DocumentSummaryInformation8˙˙˙˙˙˙˙˙˙˙˙˙4CompObj˙˙˙˙jObjectPool˙˙˙˙˙˙˙˙˙˙˙˙ŕ°˙čPtżŕ°˙čPtż˙˙˙˙˙˙˙˙˙˙˙˙ţ˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙ţ˙ ˙˙˙˙ ŔFMicrosoft Word Document MSWordDocWord.Document.8ô9˛qĚĽ ! 7˙˙˙˙ @„÷@0ĐNŠ)Wtż@0ĐNŠ)Wtż70TechlibNOV99.doc777TechlibNOV99.docůH÷óĺHŕÓ¬‚Ç!Żč#ytnef-2.0/test-data/multi-value-attribute.tnef000066400000000000000000000433141406511276600215260ustar00rootroot00000000000000xź>"äč€#IPM.Note.Microsoft.Voicemail.UM.CA× Ś C& )pVoice Mail (5 seconds)qĎŘ™WŽqHÂÉ÷ż«=ů÷óHWŠ  #@Đ/@Đ Í@ôě•)LťĎĆÝ.Ď‚L¦ źÎžGů…<0 §6o~ §„ 0 @:Ţ?źNß?˙˙˙˙ ę?ń? ú?Microsoft Outlookű?žÜ§@ČŔB´ą+/á‚/o=Infinera/ou=Exchange Administrative Group (FYDIBOHF23SPDLT)/cn=Recipients/cn=MicrosoftExchange329e71ec88ae4615bbc36ab6ce41109eý?ä"@EX#@‚/O=INFINERA/OU=EXCHANGE ADMINISTRATIVE GROUP (FYDIBOHF23SPDLT)/CN=RECIPIENTS/CN=MICROSOFTEXCHANGE329E71EC88AE4615BBC36AB6CE41109E$@EX%@‚/O=INFINERA/OU=EXCHANGE ADMINISTRATIVE GROUP (FYDIBOHF23SPDLT)/CN=RECIPIENTS/CN=MICROSOFTEXCHANGE329E71EC88AE4615BBC36AB6CE41109E0@2MicrosoftExchange329e71ec88ae4615bbc36ab6ce41109e4@ HMARTINS5@ HMARTINS8@2MicrosoftExchange329e71ec88ae4615bbc36ab6ce41109e9@2MicrosoftExchange329e71ec88ae4615bbc36ab6ce41109e]?MicrosoftExchange329e71ec88ae4615bbc36ab6ce41109e@infinera.comâeż÷=‘&6HśË5őźčŘ_#Ŕăeż÷=‘&6HśË5őźčŘ_#Ŕhh208225hCurie Conf Roomh"208225 (5 seconds) Voice Mail.mp3h-72156e00-3c015235-7959-c66640a@10.100.102.12 €†ŔFcontent-classvoice€V«ó)MUĐ©| Éő  €S«ó)MUĐ©| Éő C  *€ ŔF…J€¤ë3¨z.Bľ{yá©ŽTł8ConversationIndexTrackingExoBT=0;II=0101CF9D4C28C6DD052ECF14824CA6209FCE9E47F985;FIXUP=0.3523;Version=Version 15.0 (Build 847.0), Stage=H4 K€ŹňAôAĄ„îŰZk ˙IsSignedM€†ŔFLx-ms-exchange-organization-authsourcesv-ex13-prd2.infinera.comN€†ŔFRx-ms-exchange-organization-authmechanism0c O€ŹňAôAĄ„îŰZk ˙IsReadReceiptQ€ ŔF×…8Ž…BDă©€Ną1z! Á[8PstnCallbackTelephoneNumber2082259Ž…BDă©€Ną1z! Á[UcSubject@–##]h2GśUL•ËNŽ3.LatestMessageWordCount řŔ"§=¨YN­˙@˙–ČB úŔ"§=¨YN­˙@˙–ČB ţ LZFu/‚"• rcpg125‚2Chtml11řbid0÷ €˙¤ä€PVUź˛µQch Ŕpset2õ3{FG0ĽĂď ÷;ŰŻ05˛ `cP ™d36ŕ Ą4 ‚*\˛9 ĂÇ3`€eüadÝń ˛ěPđ€