@@@ wip

[mLib] / struct / buf-putf.c

/* -*-c-*-
 *
 * Format a string to a buffer
 *
 * (c) 2023 Straylight/Edgeware
 */

/*----- Licensing notice --------------------------------------------------*
 *
 * This file is part of the mLib utilities library.
 *
 * mLib is free software: you can redistribute it and/or modify it under
 * the terms of the GNU Library General Public License as published by
 * the Free Software Foundation; either version 2 of the License, or (at
 * your option) any later version.
 *
 * mLib 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 Library General Public
 * License for more details.
 *
 * You should have received a copy of the GNU Library General Public
 * License along with mLib.  If not, write to the Free Software
 * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307,
 * USA.
 */

/*----- Header files ------------------------------------------------------*/

#include "config.h"

#include <stdarg.h>
#include <stddef.h>
#include <stdio.h>

#include "buf.h"
#include "gprintf.h"

/*----- Main code ---------------------------------------------------------*/

/* --- @buf_vputstrf@ --- *
 *
 * Arguments:	@buf *b@ = pointer to a buffer
 *		@const char *p@ = pointer to @printf@-style format string
 *		@va_list *ap@ = argument handle
 *
 * Returns:	The number of characters written to the string, or @-1@ on
 *		failure.
 *
 * Use:		As for @buf_putstrf@, but may be used as a back-end to user-
 *		supplied functions with @printf@-style interfaces.
 */

static int putch(void *out, int ch)
  { buf *b = out; return (buf_putbyte(b, ch)); }

static int putm(void *out, const char *p, size_t sz)
  { buf *b = out; return (buf_put(b, p, sz)); }

static int nputf(void *out, size_t maxsz, const char *p, ...)
{
  buf *b = out;
  va_list ap;
  int n;

  va_start(ap, p);
  if (BENSURE(b, maxsz + 1)) return (-1);
#ifdef HAVE_SNPRINTF
  n = vsnprintf((char *)BCUR(b), maxsz + 1, p, ap);
#else
  n = vsprintf((char *)BCUR(b), p, ap);
#endif
  assert(0 <= n && n <= maxsz);
  va_end(ap); b->p += n; return (n);
}

const struct gprintf_ops buf_printops =
  { putch, putm, nputf };

int buf_vputstrf(buf *b, const char *p, va_list *ap)
  { return (vgprintf(&buf_printops, b, p, ap)); }

/* --- @buf_putstrf@ --- *
 *
 * Arguments:	@buf *b@ = pointer to a buffer
 *		@const char *p@ = pointer to @printf@-style format string
 *		@...@ = argument handle
 *
 * Returns:	The number of characters written to the string, or @-1@ on
 *		failure.
 *
 * Use:		Format a string to a buffer.  The resulting output is not
 *		null-terminated.
 */

int buf_putstrf(buf *b, const char *p, ...)
{
  va_list ap;
  int n;

  va_start(ap, p); n = buf_vputstrf(b, p, &ap); va_end(ap);
  return (n);
}

/* --- @buf_{,v}putstrf{8,{16,24,32,64}{,b,l},z}@ --- *
 *
 * Arguments:	@buf *b@ = pointer to a buffer
 *		@const char *p@ = pointer to @printf@-style format string
 *		@va_list *ap@ = argument handle
 *
 * Returns:	The number of characters written to the string, or @-1@ on
 *		failure.
 *
 * Use:		As for @buf_putstr@, but using a format string.
 */

#define BUF_DEF_VPUTSTRF_(n, W, w)					\
  int buf_vputstrf##w(buf *b, const char *p, va_list *ap)		\
  {									\
    size_t mk;								\
    int nn;								\
									\
    BUF_ENCLOSE##W(b, mk) nn = buf_vputstrf(b, p, ap);			\
    return (BOK(b) ? nn : -1);						\
  }
DOUINTCONV(BUF_DEF_VPUTSTRF_)
BUF_DOKLUDGESUFFIXES(BUF_DEF_VPUTSTRF_)
#undef BUF_DEF_VPUTSTRF_

int buf_vputstrfz(buf *b, const char *p, va_list *ap)
{
  int nn;

  BUF_ENCLOSEZ(b) nn = buf_vputstrf(b, p, ap);
  return (BOK(b) ? nn : -1);
}

#define BUF_DEF_PUTSTRF_(n, W, w)					\
  int buf_putstrf##w(buf *b, const char *p, ...)			\
  {									\
    va_list ap;								\
    int nn;								\
									\
    va_start(ap, p); nn = buf_vputstrf##w(b, p, &ap); va_end(ap);	\
    return (nn);								\
  }
BUF_DOSUFFIXES(BUF_DEF_PUTSTRF_)
#undef BUF_DEF_PUTSTRF_

/*----- That's all, folks -------------------------------------------------*/