diff options
Diffstat (limited to 'autoopts/version.c')
-rw-r--r-- | autoopts/version.c | 214 |
1 files changed, 214 insertions, 0 deletions
diff --git a/autoopts/version.c b/autoopts/version.c new file mode 100644 index 0000000..e91d4ec --- /dev/null +++ b/autoopts/version.c @@ -0,0 +1,214 @@ + +/* + * Time-stamp: "2012-08-11 08:41:53 bkorb" + * + * This module implements the default usage procedure for + * Automated Options. It may be overridden, of course. + */ + +/* + * This file is part of AutoOpts, a companion to AutoGen. + * AutoOpts is free software. + * AutoOpts is Copyright (c) 1992-2012 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: + * + * 43b91e8ca915626ed3818ffb1b71248b pkg/libopts/COPYING.gplv3 + * 06a1a2e4760c90ea5e1dad8dfaac4d39 pkg/libopts/COPYING.lgplv3 + * 66a5cedaf62c4b2637025f049f9b826f pkg/libopts/COPYING.mbsd + */ + +/*=export_func optionVersion + * + * what: return the compiled AutoOpts version number + * ret_type: char const* + * ret_desc: the version string in constant memory + * doc: + * Returns the full version string compiled into the library. + * The returned string cannot be modified. +=*/ +char const* +optionVersion(void) +{ + static char const zVersion[] = + STR(AO_CURRENT.AO_REVISION); + + return zVersion; +} + +/** + * Select among various ways to emit version information. + * + * @param opts the option descriptor + * @param fp the output stream + */ +static void +emit_simple_ver(tOptions * opts, FILE * fp) +{ + /* + * Use the supplied string + */ + if (opts->pzFullVersion != NULL) + fputs(opts->pzFullVersion, fp); + + /* + * Extract the interesting part of the copyright string + */ + else if (opts->pzCopyright != NULL) { + char const * pe = strchr(opts->pzCopyright, NL); + if (pe == NULL) + pe = opts->pzCopyright + strlen(opts->pzCopyright); + fwrite(opts->pzCopyright, 1, pe - opts->pzCopyright, fp); + } + + /* + * Extract the interesting part of the usage title string + */ + else { + char const * pe = strchr(opts->pzUsageTitle, NL); + if (pe == NULL) + pe = opts->pzUsageTitle + strlen(opts->pzUsageTitle); + fwrite(opts->pzUsageTitle, 1, pe - opts->pzUsageTitle, fp); + } + fputc(NL, fp); +} + +static void +emit_copy_ver(tOptions * opts, FILE * fp) +{ + if (opts->pzCopyright != NULL) + fputs(opts->pzCopyright, fp); + + else if (opts->pzFullVersion != NULL) + fputs(opts->pzFullVersion, fp); + + else { + char const * pe = strchr(opts->pzUsageTitle, NL); + if (pe == NULL) + pe = opts->pzUsageTitle + strlen(opts->pzUsageTitle); + fwrite(opts->pzUsageTitle, 1, pe - opts->pzCopyright, fp); + } + + fputc(NL, fp); + + if (HAS_pzPkgDataDir(opts) && (opts->pzPackager != NULL)) + fputs(opts->pzPackager, fp); + + else if (opts->pzBugAddr != NULL) + fprintf(fp, zPlsSendBugs, opts->pzBugAddr); +} + +static void +emit_copy_note(tOptions * opts, FILE * fp) +{ + if (opts->pzCopyright != NULL) { + fputs(opts->pzCopyright, fp); + fputc(NL, fp); + } + + if (opts->pzCopyNotice != NULL) { + fputs(opts->pzCopyNotice, fp); + fputc(NL, fp); + } + + fprintf(fp, zAO_Ver, optionVersion()); + + if (HAS_pzPkgDataDir(opts) && (opts->pzPackager != NULL)) + fputs(opts->pzPackager, fp); + + else if (opts->pzBugAddr != NULL) + fprintf(fp, zPlsSendBugs, opts->pzBugAddr); +} + +static void +print_ver(tOptions * opts, tOptDesc * od, FILE * fp) +{ + char ch; + + if (opts <= OPTPROC_EMIT_LIMIT) + return; + + /* + * IF we have an argument for this option, use it + * Otherwise, default to version only or copyright note, + * depending on whether the layout is GNU standard form or not. + */ + if ( (od->fOptState & OPTST_ARG_OPTIONAL) + && (od->optArg.argString != NULL) + && (od->optArg.argString[0] != NUL)) + + ch = od->optArg.argString[0]; + + else { + set_usage_flags(opts, NULL); + ch = (opts->fOptSet & OPTPROC_GNUUSAGE) ? 'c' : 'v'; + } + + switch (ch) { + case NUL: /* arg provided, but empty */ + case 'v': case 'V': emit_simple_ver(opts, fp); break; + case 'c': case 'C': emit_copy_ver( opts, fp); break; + case 'n': case 'N': emit_copy_note( opts, fp); break; + + default: + fprintf(stderr, zBadVerArg, ch); + exit(EXIT_FAILURE); + } + + fflush(fp); + if (ferror(fp) != 0) { + fputs(zOutputFail, stderr); + exit(EXIT_FAILURE); + } + exit(EXIT_SUCCESS); +} + +/*=export_func optionPrintVersion + * private: + * + * what: Print the program version + * arg: + tOptions* + opts + program options descriptor + + * arg: + tOptDesc* + od + the descriptor for this arg + + * + * doc: + * This routine will print the version to stdout. +=*/ +void +optionPrintVersion(tOptions * opts, tOptDesc * od) +{ + print_ver(opts, od, stdout); +} + +/*=export_func optionVersionStderr + * private: + * + * what: Print the program version to stderr + * arg: + tOptions* + opts + program options descriptor + + * arg: + tOptDesc* + od + the descriptor for this arg + + * + * doc: + * This routine will print the version to stderr. +=*/ +void +optionVersionStderr(tOptions * opts, tOptDesc * od) +{ + print_ver(opts, od, stderr); +} + +/* + * Local Variables: + * mode: C + * c-file-style: "stroustrup" + * indent-tabs-mode: nil + * End: + * end of autoopts/version.c */ |