123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134 |
- /*
- * $Id: pgusage.c,v 4.14 2007/07/04 21:36:38 bkorb Exp $
- * Time-stamp: "2007-07-04 11:34:23 bkorb"
- *
- * Automated Options Paged Usage module.
- *
- * This routine will run run-on options through a pager so the
- * user may examine, print or edit them at their leisure.
- *
- * This file is part of AutoOpts, a companion to AutoGen.
- * AutoOpts is free software.
- * AutoOpts is copyright (c) 1992-2007 by Bruce Korb - all rights reserved
- *
- * AutoOpts is available under any one of two licenses. The license
- * in use must be one of these two and the choice is under the control
- * of the user of the license.
- *
- * The GNU Lesser General Public License, version 3 or later
- * See the files "COPYING.lgplv3" and "COPYING.gplv3"
- *
- * The Modified Berkeley Software Distribution License
- * See the file "COPYING.mbsd"
- *
- * These files have the following md5sums:
- *
- * 239588c55c22c60ffe159946a760a33e pkg/libopts/COPYING.gplv3
- * fa82ca978890795162346e661b47161a pkg/libopts/COPYING.lgplv3
- * 66a5cedaf62c4b2637025f049f9b826f pkg/libopts/COPYING.mbsd
- */
- tePagerState pagerState = PAGER_STATE_INITIAL;
- /*=export_func optionPagedUsage
- * private:
- *
- * what: Decipher a boolean value
- * arg: + tOptions* + pOpts + program options descriptor +
- * arg: + tOptDesc* + pOptDesc + the descriptor for this arg +
- *
- * doc:
- * Run the usage output through a pager.
- * This is very handy if it is very long.
- =*/
- void
- optionPagedUsage( tOptions* pOptions, tOptDesc* pOD )
- {
- #if defined(__windows__) && !defined(__CYGWIN__)
- (*pOptions->pUsageProc)( pOptions, EXIT_SUCCESS );
- #else
- static pid_t my_pid;
- char zPageUsage[ 1024 ];
- /*
- * IF we are being called after the usage proc is done
- * (and thus has called "exit(2)")
- * THEN invoke the pager to page through the usage file we created.
- */
- switch (pagerState) {
- case PAGER_STATE_INITIAL:
- {
- my_pid = getpid();
- #ifdef HAVE_SNPRINTF
- snprintf(zPageUsage, sizeof(zPageUsage), "/tmp/use.%lu", (tAoUL)my_pid);
- #else
- sprintf( zPageUsage, "/tmp/use.%lu", (tAoUL)my_pid );
- #endif
- unlink( zPageUsage );
- /*
- * Set usage output to this temporary file
- */
- option_usage_fp = fopen( zPageUsage, "w" FOPEN_BINARY_FLAG );
- if (option_usage_fp == NULL)
- _exit( EXIT_FAILURE );
- pagerState = PAGER_STATE_READY;
- /*
- * Set up so this routine gets called during the exit logic
- */
- atexit( (void(*)(void))optionPagedUsage );
- /*
- * The usage procedure will now put the usage information into
- * the temporary file we created above.
- */
- (*pOptions->pUsageProc)( pOptions, EXIT_SUCCESS );
- /*NOTREACHED*/
- _exit( EXIT_FAILURE );
- }
- case PAGER_STATE_READY:
- {
- tSCC zPage[] = "%1$s /tmp/use.%2$lu ; rm -f /tmp/use.%2$lu";
- tCC* pzPager = (tCC*)getenv( "PAGER" );
- /*
- * Use the "more(1)" program if "PAGER" has not been defined
- */
- if (pzPager == NULL)
- pzPager = "more";
- /*
- * Page the file and remove it when done.
- */
- #ifdef HAVE_SNPRINTF
- snprintf(zPageUsage, sizeof(zPageUsage), zPage, pzPager, (tAoUL)my_pid);
- #else
- sprintf( zPageUsage, zPage, pzPager, (tAoUL)my_pid );
- #endif
- fclose( stderr );
- dup2( STDOUT_FILENO, STDERR_FILENO );
- (void)system( zPageUsage );
- }
- case PAGER_STATE_CHILD:
- /*
- * This is a child process used in creating shell script usage.
- */
- break;
- }
- #endif
- }
- /*
- * Local Variables:
- * mode: C
- * c-file-style: "stroustrup"
- * indent-tabs-mode: nil
- * End:
- * end of autoopts/pgusage.c */
|