[dragonfly.git] / usr.bin / mandoc / man_argv.c

/*	$Id: man_argv.c,v 1.1 2009/08/13 11:45:29 kristaps Exp $ */
/*
 * Copyright (c) 2008, 2009 Kristaps Dzonsons <kristaps@kth.se>
 *
 * Permission to use, copy, modify, and distribute this software for any
 * purpose with or without fee is hereby granted, provided that the above
 * copyright notice and this permission notice appear in all copies.
 *
 * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
 * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
 * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
 * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
 * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
 * ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
 * OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
 */
#include <sys/types.h>

#include <assert.h>
#include <stdlib.h>
#include <string.h>

#include "libman.h"


int
man_args(struct man *m, int line, int *pos, char *buf, char **v)
{

	assert(*pos);
	assert(' ' != buf[*pos]);

	if (0 == buf[*pos])
		return(ARGS_EOLN);

	*v = &buf[*pos];

	/*
	 * Process a quoted literal.  A quote begins with a double-quote
	 * and ends with a double-quote NOT preceded by a double-quote.
	 * Whitespace is NOT involved in literal termination.
	 */

	if ('\"' == buf[*pos]) {
		*v = &buf[++(*pos)];

		for ( ; buf[*pos]; (*pos)++) {
			if ('\"' != buf[*pos])
				continue;
			if ('\"' != buf[*pos + 1])
				break;
			(*pos)++;
		}

		if (0 == buf[*pos]) {
			if ( ! man_pwarn(m, line, *pos, WTQUOTE))
				return(ARGS_ERROR);
			return(ARGS_QWORD);
		}

		buf[(*pos)++] = 0;

		if (0 == buf[*pos])
			return(ARGS_QWORD);

		while (' ' == buf[*pos])
			(*pos)++;

		if (0 == buf[*pos])
			if ( ! man_pwarn(m, line, *pos, WTSPACE))
				return(ARGS_ERROR);

		return(ARGS_QWORD);
	}

	/*
	 * A non-quoted term progresses until either the end of line or
	 * a non-escaped whitespace.
	 */

	for ( ; buf[*pos]; (*pos)++)
		if (' ' == buf[*pos] && '\\' != buf[*pos - 1])
			break;

	if (0 == buf[*pos])
		return(ARGS_WORD);

	buf[(*pos)++] = 0;

	while (' ' == buf[*pos])
		(*pos)++;

	if (0 == buf[*pos])
		if ( ! man_pwarn(m, line, *pos, WTSPACE))
			return(ARGS_ERROR);

	return(ARGS_WORD);
}
Commit	Line	Data
32c903ac	1	/* $Id: man_argv.c,v 1.1 2009/08/13 11:45:29 kristaps Exp $ */
589e7c1d SW	2	/*
	3	* Copyright (c) 2008, 2009 Kristaps Dzonsons <kristaps@kth.se>
	4	*
	5	* Permission to use, copy, modify, and distribute this software for any
	6	* purpose with or without fee is hereby granted, provided that the above
	7	* copyright notice and this permission notice appear in all copies.
	8	*
	9	* THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
	10	* WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
	11	* MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
	12	* ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
	13	* WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
	14	* ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
	15	* OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
	16	*/
	17	#include <sys/types.h>
	18
	19	#include <assert.h>
	20	#include <stdlib.h>
	21	#include <string.h>
	22
	23	#include "libman.h"
	24
	25
	26	int
	27	man_args(struct man m, int line, int pos, char buf, char *v)
	28	{
	29
	30	assert(*pos);
	31	assert(' ' != buf[*pos]);
	32
	33	if (0 == buf[*pos])
	34	return(ARGS_EOLN);
	35
	36	v = &buf[pos];
	37
	38	/*
	39	* Process a quoted literal. A quote begins with a double-quote
	40	* and ends with a double-quote NOT preceded by a double-quote.
	41	* Whitespace is NOT involved in literal termination.
	42	*/
	43
	44	if ('\"' == buf[*pos]) {
	45	v = &buf[++(pos)];
	46
	47	for ( ; buf[pos]; (pos)++) {
	48	if ('\"' != buf[*pos])
	49	continue;
	50	if ('\"' != buf[*pos + 1])
	51	break;
	52	(*pos)++;
	53	}
	54
	55	if (0 == buf[*pos]) {
	56	if ( ! man_pwarn(m, line, *pos, WTQUOTE))
	57	return(ARGS_ERROR);
	58	return(ARGS_QWORD);
	59	}
	60
	61	buf[(*pos)++] = 0;
	62
	63	if (0 == buf[*pos])
	64	return(ARGS_QWORD);
	65
66	while (' ' == buf[*pos])
67	(*pos)++;
68
69	if (0 == buf[*pos])
70	if ( ! man_pwarn(m, line, *pos, WTSPACE))
71	return(ARGS_ERROR);
72
73	return(ARGS_QWORD);
74	}
75
76	/*
77	* A non-quoted term progresses until either the end of line or
78	* a non-escaped whitespace.
79	*/
80
81	for ( ; buf[pos]; (pos)++)
82	if (' ' == buf[pos] && '\\' != buf[pos - 1])
83	break;
84
85	if (0 == buf[*pos])
86	return(ARGS_WORD);
87
88	buf[(*pos)++] = 0;
89
90	while (' ' == buf[*pos])
91	(*pos)++;
92
93	if (0 == buf[*pos])
94	if ( ! man_pwarn(m, line, *pos, WTSPACE))
95	return(ARGS_ERROR);
96
97	return(ARGS_WORD);
98	}