From c578162753123ea7d2746d2032ceb439c7c31d32 Mon Sep 17 00:00:00 2001 From: midipix Date: Tue, 13 Feb 2024 03:10:11 +0000 Subject: driver: rename --config as --info in anticipation of a compatible --config. --- src/output/slbt_output_info.c | 114 ++++++++++++++++++++++++++++++++++++++++++ 1 file changed, 114 insertions(+) create mode 100644 src/output/slbt_output_info.c (limited to 'src/output/slbt_output_info.c') diff --git a/src/output/slbt_output_info.c b/src/output/slbt_output_info.c new file mode 100644 index 0000000..7498cb8 --- /dev/null +++ b/src/output/slbt_output_info.c @@ -0,0 +1,114 @@ +/*******************************************************************/ +/* slibtool: a skinny libtool implementation, written in C */ +/* Copyright (C) 2016--2024 SysDeer Technologies, LLC */ +/* Released under the Standard MIT License; see COPYING.SLIBTOOL. */ +/*******************************************************************/ + +#include +#include +#include + +#include +#include "slibtool_driver_impl.h" +#include "slibtool_dprintf_impl.h" +#include "slibtool_errinfo_impl.h" + +#ifndef SLBT_TAB_WIDTH +#define SLBT_TAB_WIDTH 8 +#endif + +#ifndef SLBT_KEY_WIDTH +#define SLBT_KEY_WIDTH 16 +#endif + +static bool slbt_output_info_line( + int fd, + const char * key, + const char * value, + const char * annotation, + int midwidth) +{ + return (slbt_dprintf(fd,"%-*s%-*s%s\n", + SLBT_KEY_WIDTH, key, + midwidth, value ? value : "", + annotation ? annotation : "") < 0) + ? true : false; +} + +int slbt_output_info(const struct slbt_driver_ctx * dctx) +{ + const struct slbt_common_ctx * cctx; + const char * compiler; + const char * target; + int len; + int midwidth; + int fdout; + + cctx = dctx->cctx; + compiler = cctx->cargv[0] ? cctx->cargv[0] : ""; + target = cctx->target ? cctx->target : ""; + midwidth = strlen(compiler); + fdout = slbt_driver_fdout(dctx); + + if ((len = strlen(target)) > midwidth) + midwidth = len; + + if ((len = strlen(cctx->host.host)) > midwidth) + midwidth = len; + + if ((len = strlen(cctx->host.flavor)) > midwidth) + midwidth = len; + + if ((len = strlen(cctx->host.ar)) > midwidth) + midwidth = len; + + if ((len = strlen(cctx->host.ranlib)) > midwidth) + midwidth = len; + + if ((len = strlen(cctx->host.windres)) > midwidth) + midwidth = len; + + if ((len = strlen(cctx->host.dlltool)) > midwidth) + midwidth = len; + + if ((len = strlen(cctx->host.mdso)) > midwidth) + midwidth = len; + + midwidth += SLBT_TAB_WIDTH; + midwidth &= (~(SLBT_TAB_WIDTH-1)); + + if (slbt_output_info_line(fdout,"key","value","annotation",midwidth)) + return SLBT_SYSTEM_ERROR(dctx,0); + + if (slbt_output_info_line(fdout,"---","-----","----------",midwidth)) + return SLBT_SYSTEM_ERROR(dctx,0); + + if (slbt_output_info_line(fdout,"compiler",cctx->cargv[0],"",midwidth)) + return SLBT_SYSTEM_ERROR(dctx,0); + + if (slbt_output_info_line(fdout,"target",cctx->target,"",midwidth)) + return SLBT_SYSTEM_ERROR(dctx,0); + + if (slbt_output_info_line(fdout,"host",cctx->host.host,cctx->cfgmeta.host,midwidth)) + return SLBT_SYSTEM_ERROR(dctx,0); + + if (slbt_output_info_line(fdout,"flavor",cctx->host.flavor,cctx->cfgmeta.flavor,midwidth)) + return SLBT_SYSTEM_ERROR(dctx,0); + + if (slbt_output_info_line(fdout,"ar",cctx->host.ar,cctx->cfgmeta.ar,midwidth)) + return SLBT_SYSTEM_ERROR(dctx,0); + + if (slbt_output_info_line(fdout,"ranlib",cctx->host.ranlib,cctx->cfgmeta.ranlib,midwidth)) + return SLBT_SYSTEM_ERROR(dctx,0); + + if (slbt_output_info_line(fdout,"windres",cctx->host.windres,cctx->cfgmeta.windres,midwidth)) + return SLBT_SYSTEM_ERROR(dctx,0); + + if (slbt_output_info_line(fdout,"dlltool",cctx->host.dlltool,cctx->cfgmeta.dlltool,midwidth)) + return SLBT_SYSTEM_ERROR(dctx,0); + + if (slbt_output_info_line(fdout,"mdso",cctx->host.mdso,cctx->cfgmeta.mdso,midwidth)) + return SLBT_SYSTEM_ERROR(dctx,0); + + return 0; +} -- cgit v1.2.3