[u/mdw/catacomb] / group-dstr.c

/* -*-c-*-
 *
 * $Id: group-dstr.c,v 1.2 2004/04/08 01:36:15 mdw Exp $
 *
 * Dynamic string I/O for group elements
 *
 * (c) 2004 Straylight/Edgeware
 */

/*----- Licensing notice --------------------------------------------------*
 *
 * This file is part of Catacomb.
 *
 * Catacomb 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.
 *
 * Catacomb 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 Catacomb; if not, write to the Free
 * Software Foundation, Inc., 59 Temple Place - Suite 330, Boston,
 * MA 02111-1307, USA.
 */

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

#include "group.h"

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

/* --- @group_readdstr@ --- *
 *
 * Arguments:	@group *g@ = an abstract group
 *		@ge *d@ = destination group element
 *		@dstr *dd@ = string to read from
 *		@size_t *off@ = offset to start at (updated)
 *
 * Returns:	Zero on success, nonzero on failure.
 *
 * Use:		Parses a group element from a dynamic string.
 */

int group_readdstr(group *g, ge *d, dstr *dd, size_t *off)
{
  mptext_dstrctx md;

  md.d = dd;
  md.i = off ? *off : 0;
  if (G_READ(g, d, &mptext_dstrops, &md))
    return (-1);
  if (off) *off = md.i;
  return (0);
}

/* --- @group_writedstr@ --- *
 *
 * Arguments:	@group *g@ = an abstract group
 *		@ge *x@ = a group element
 *		@dstr *d@ = string to write to
 *		@size_t sz@ = how long the buffer is
 *
 * Returns:	Zero on success, nonzero on failure.
 *
 * Use:		Writes a group element to a dstr buffer.
 */

int group_writedstr(group *g, ge *x, dstr *d)
{
  mptext_dstrctx md;

  md.d = d;
  if (G_WRITE(g, x, &mptext_dstrops, &md))
    return (-1);
  DPUTZ(d);
  return (0);
}


/*----- That's all, folks -------------------------------------------------*/
Commit	Line	Data
34e4f738	1	/* --c--
34e4f738	2	*
b817bfc6	3	* $Id: group-dstr.c,v 1.2 2004/04/08 01:36:15 mdw Exp $
34e4f738	4	*
	5	* Dynamic string I/O for group elements
	6	*
	7	* (c) 2004 Straylight/Edgeware
	8	*/
	9
45c0fd36	10	/----- Licensing notice --------------------------------------------------
34e4f738	11	*
	12	* This file is part of Catacomb.
	13	*
	14	* Catacomb is free software; you can redistribute it and/or modify
	15	* it under the terms of the GNU Library General Public License as
	16	* published by the Free Software Foundation; either version 2 of the
	17	* License, or (at your option) any later version.
45c0fd36	18	*
34e4f738	19	* Catacomb is distributed in the hope that it will be useful,
	20	* but WITHOUT ANY WARRANTY; without even the implied warranty of
	21	* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
	22	* GNU Library General Public License for more details.
45c0fd36	23	*
34e4f738	24	* You should have received a copy of the GNU Library General Public
	25	* License along with Catacomb; if not, write to the Free
	26	* Software Foundation, Inc., 59 Temple Place - Suite 330, Boston,
	27	* MA 02111-1307, USA.
	28	*/
	29
34e4f738	30	/----- Header files ------------------------------------------------------/
	31
	32	#include "group.h"
	33
	34	/----- Main code ---------------------------------------------------------/
	35
	36	/* --- @group_readdstr@ --- *
	37	*
	38	* Arguments: @group *g@ = an abstract group
	39	* @ge *d@ = destination group element
	40	* @dstr *dd@ = string to read from
	41	* @size_t *off@ = offset to start at (updated)
	42	*
	43	* Returns: Zero on success, nonzero on failure.
	44	*
	45	* Use: Parses a group element from a dynamic string.
	46	*/
	47
	48	int group_readdstr(group g, ge d, dstr dd, size_t off)
	49	{
	50	mptext_dstrctx md;
	51
	52	md.d = dd;
	53	md.i = off ? *off : 0;
	54	if (G_READ(g, d, &mptext_dstrops, &md))
	55	return (-1);
	56	if (off) *off = md.i;
	57	return (0);
	58	}
	59
	60	/* --- @group_writedstr@ --- *
	61	*
	62	* Arguments: @group *g@ = an abstract group
	63	* @ge *x@ = a group element
	64	* @dstr *d@ = string to write to
	65	* @size_t sz@ = how long the buffer is
	66	*
	67	* Returns: Zero on success, nonzero on failure.
	68	*
	69	* Use: Writes a group element to a dstr buffer.
	70	*/
	71
	72	int group_writedstr(group g, ge x, dstr *d)
	73	{
	74	mptext_dstrctx md;
	75
	76	md.d = d;
	77	if (G_WRITE(g, x, &mptext_dstrops, &md))
	78	return (-1);
	79	DPUTZ(d);
	80	return (0);
	81	}
	82
	83
	84
	85	/----- That's all, folks -------------------------------------------------/