xref: /freebsd/contrib/pkgconf/libpkgconf/parser.c (revision a3cefe7f2b4df0f70ff92d4570ce18e517af43ec)
1*a3cefe7fSPierre Pronchery /*
2*a3cefe7fSPierre Pronchery  * parser.c
3*a3cefe7fSPierre Pronchery  * rfc822 message parser
4*a3cefe7fSPierre Pronchery  *
5*a3cefe7fSPierre Pronchery  * Copyright (c) 2018 pkgconf authors (see AUTHORS).
6*a3cefe7fSPierre Pronchery  *
7*a3cefe7fSPierre Pronchery  * Permission to use, copy, modify, and/or distribute this software for any
8*a3cefe7fSPierre Pronchery  * purpose with or without fee is hereby granted, provided that the above
9*a3cefe7fSPierre Pronchery  * copyright notice and this permission notice appear in all copies.
10*a3cefe7fSPierre Pronchery  *
11*a3cefe7fSPierre Pronchery  * This software is provided 'as is' and without any warranty, express or
12*a3cefe7fSPierre Pronchery  * implied.  In no event shall the authors be liable for any damages arising
13*a3cefe7fSPierre Pronchery  * from the use of this software.
14*a3cefe7fSPierre Pronchery  */
15*a3cefe7fSPierre Pronchery 
16*a3cefe7fSPierre Pronchery #include <libpkgconf/config.h>
17*a3cefe7fSPierre Pronchery #include <libpkgconf/stdinc.h>
18*a3cefe7fSPierre Pronchery #include <libpkgconf/libpkgconf.h>
19*a3cefe7fSPierre Pronchery 
20*a3cefe7fSPierre Pronchery /*
21*a3cefe7fSPierre Pronchery  * !doc
22*a3cefe7fSPierre Pronchery  *
23*a3cefe7fSPierre Pronchery  * .. c:function:: pkgconf_pkg_t *pkgconf_pkg_new_from_file(const pkgconf_client_t *client, const char *filename, FILE *f)
24*a3cefe7fSPierre Pronchery  *
25*a3cefe7fSPierre Pronchery  *    Parse a .pc file into a pkgconf_pkg_t object structure.
26*a3cefe7fSPierre Pronchery  *
27*a3cefe7fSPierre Pronchery  *    :param pkgconf_client_t* client: The pkgconf client object to use for dependency resolution.
28*a3cefe7fSPierre Pronchery  *    :param char* filename: The filename of the package file (including full path).
29*a3cefe7fSPierre Pronchery  *    :param FILE* f: The file object to read from.
30*a3cefe7fSPierre Pronchery  *    :returns: A ``pkgconf_pkg_t`` object which contains the package data.
31*a3cefe7fSPierre Pronchery  *    :rtype: pkgconf_pkg_t *
32*a3cefe7fSPierre Pronchery  */
33*a3cefe7fSPierre Pronchery void
pkgconf_parser_parse(FILE * f,void * data,const pkgconf_parser_operand_func_t * ops,const pkgconf_parser_warn_func_t warnfunc,const char * filename)34*a3cefe7fSPierre Pronchery pkgconf_parser_parse(FILE *f, void *data, const pkgconf_parser_operand_func_t *ops, const pkgconf_parser_warn_func_t warnfunc, const char *filename)
35*a3cefe7fSPierre Pronchery {
36*a3cefe7fSPierre Pronchery 	pkgconf_buffer_t readbuf = PKGCONF_BUFFER_INITIALIZER;
37*a3cefe7fSPierre Pronchery 	size_t lineno = 0;
38*a3cefe7fSPierre Pronchery 	bool continue_reading = true;
39*a3cefe7fSPierre Pronchery 
40*a3cefe7fSPierre Pronchery 	while (continue_reading)
41*a3cefe7fSPierre Pronchery 	{
42*a3cefe7fSPierre Pronchery 		char op, *p, *key, *value;
43*a3cefe7fSPierre Pronchery 		bool warned_key_whitespace = false, warned_value_whitespace = false;
44*a3cefe7fSPierre Pronchery 
45*a3cefe7fSPierre Pronchery 		continue_reading = pkgconf_fgetline(&readbuf, f);
46*a3cefe7fSPierre Pronchery 		lineno++;
47*a3cefe7fSPierre Pronchery 
48*a3cefe7fSPierre Pronchery 		p = readbuf.base;
49*a3cefe7fSPierre Pronchery 		if (p == NULL)
50*a3cefe7fSPierre Pronchery 			continue;
51*a3cefe7fSPierre Pronchery 		while (*p && isspace((unsigned char)*p))
52*a3cefe7fSPierre Pronchery 			p++;
53*a3cefe7fSPierre Pronchery 		if (*p && p != readbuf.base)
54*a3cefe7fSPierre Pronchery 		{
55*a3cefe7fSPierre Pronchery 			warnfunc(data, "%s:" SIZE_FMT_SPECIFIER ": warning: whitespace encountered while parsing key section\n",
56*a3cefe7fSPierre Pronchery 				filename, lineno);
57*a3cefe7fSPierre Pronchery 			warned_key_whitespace = true;
58*a3cefe7fSPierre Pronchery 		}
59*a3cefe7fSPierre Pronchery 		key = p;
60*a3cefe7fSPierre Pronchery 		while (*p && (isalpha((unsigned char)*p) || isdigit((unsigned char)*p) || *p == '_' || *p == '.'))
61*a3cefe7fSPierre Pronchery 			p++;
62*a3cefe7fSPierre Pronchery 
63*a3cefe7fSPierre Pronchery 		if (!isalpha((unsigned char)*key) &&
64*a3cefe7fSPierre Pronchery 		    !isdigit((unsigned char)*p))
65*a3cefe7fSPierre Pronchery 		{
66*a3cefe7fSPierre Pronchery 			pkgconf_buffer_reset(&readbuf);
67*a3cefe7fSPierre Pronchery 			continue;
68*a3cefe7fSPierre Pronchery 		}
69*a3cefe7fSPierre Pronchery 
70*a3cefe7fSPierre Pronchery 		while (*p && isspace((unsigned char)*p))
71*a3cefe7fSPierre Pronchery 		{
72*a3cefe7fSPierre Pronchery 			if (!warned_key_whitespace)
73*a3cefe7fSPierre Pronchery 			{
74*a3cefe7fSPierre Pronchery 				warnfunc(data, "%s:" SIZE_FMT_SPECIFIER ": warning: whitespace encountered while parsing key section\n",
75*a3cefe7fSPierre Pronchery 					filename, lineno);
76*a3cefe7fSPierre Pronchery 				warned_key_whitespace = true;
77*a3cefe7fSPierre Pronchery 			}
78*a3cefe7fSPierre Pronchery 
79*a3cefe7fSPierre Pronchery 			/* set to null to avoid trailing spaces in key */
80*a3cefe7fSPierre Pronchery 			*p = '\0';
81*a3cefe7fSPierre Pronchery 			p++;
82*a3cefe7fSPierre Pronchery 		}
83*a3cefe7fSPierre Pronchery 
84*a3cefe7fSPierre Pronchery 		op = *p;
85*a3cefe7fSPierre Pronchery 		if (*p != '\0')
86*a3cefe7fSPierre Pronchery 		{
87*a3cefe7fSPierre Pronchery 			*p = '\0';
88*a3cefe7fSPierre Pronchery 			p++;
89*a3cefe7fSPierre Pronchery 		}
90*a3cefe7fSPierre Pronchery 
91*a3cefe7fSPierre Pronchery 		while (*p && isspace((unsigned char)*p))
92*a3cefe7fSPierre Pronchery 			p++;
93*a3cefe7fSPierre Pronchery 
94*a3cefe7fSPierre Pronchery 		value = p;
95*a3cefe7fSPierre Pronchery 		p = value + (strlen(value) - 1);
96*a3cefe7fSPierre Pronchery 		while (*p && isspace((unsigned char) *p) && p > value)
97*a3cefe7fSPierre Pronchery 		{
98*a3cefe7fSPierre Pronchery 			if (!warned_value_whitespace && op == '=')
99*a3cefe7fSPierre Pronchery 			{
100*a3cefe7fSPierre Pronchery 				warnfunc(data, "%s:" SIZE_FMT_SPECIFIER ": warning: trailing whitespace encountered while parsing value section\n",
101*a3cefe7fSPierre Pronchery 					filename, lineno);
102*a3cefe7fSPierre Pronchery 				warned_value_whitespace = true;
103*a3cefe7fSPierre Pronchery 			}
104*a3cefe7fSPierre Pronchery 
105*a3cefe7fSPierre Pronchery 			*p = '\0';
106*a3cefe7fSPierre Pronchery 			p--;
107*a3cefe7fSPierre Pronchery 		}
108*a3cefe7fSPierre Pronchery 		if (ops[(unsigned char) op])
109*a3cefe7fSPierre Pronchery 			ops[(unsigned char) op](data, lineno, key, value);
110*a3cefe7fSPierre Pronchery 
111*a3cefe7fSPierre Pronchery 		pkgconf_buffer_reset(&readbuf);
112*a3cefe7fSPierre Pronchery 	}
113*a3cefe7fSPierre Pronchery 
114*a3cefe7fSPierre Pronchery 	pkgconf_buffer_finalize(&readbuf);
115*a3cefe7fSPierre Pronchery }
116