3 * $Id: url.c,v 1.3 2001/01/20 12:06:21 mdw Exp $
5 * Parsing and construction of url-encoded name/value pairs
7 * (c) 1999 Straylight/Edgeware
10 /*----- Licensing notice --------------------------------------------------*
12 * This file is part of the mLib utilities library.
14 * mLib 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.
19 * mLib 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.
24 * You should have received a copy of the GNU Library General Public
25 * License along with mLib; if not, write to the Free
26 * Software Foundation, Inc., 59 Temple Place - Suite 330, Boston,
30 /*----- Revision history --------------------------------------------------*
33 * Revision 1.3 2001/01/20 12:06:21 mdw
34 * Be more conservative in base-64 encoding.
36 * Revision 1.2 1999/09/03 08:02:05 mdw
37 * Make `#' a special character which needs escaping.
39 * Revision 1.1 1999/06/01 09:49:48 mdw
40 * New files for url-encoding and decoding.
44 /*----- Header files ------------------------------------------------------*/
53 /*----- Main code ---------------------------------------------------------*/
55 /* --- @url_initenc@ --- *
57 * Arguments: @url_ectx *ctx@ = pointer to context block
61 * Use: Initializes a URL encoding context.
64 void url_initenc(url_ectx
*ctx
)
71 * Arguments: @dstr *d@ = pointer to output string
72 * @const char *p@ = pointer to thing to encode
76 * Use: Encodes the input string into the output string.
79 static void encode(dstr
*d
, const char *p
)
87 if (isalnum((unsigned char)*p
))
90 dstr_putf(d
, "%%%02x", *p
);
97 /* --- @url_enc@ --- *
99 * Arguments: @url_ectx *ctx@ = pointer to encoding context
100 * @dstr *d@ = pointer to output string
101 * @const char *name@ = pointer to name
102 * @const char *value@ = pointer to value
106 * Use: Writes an assignment between @name@ and @value@ to the
107 * output string, encoding the values properly.
110 void url_enc(url_ectx
*ctx
, dstr
*d
, const char *name
, const char *value
)
112 if (ctx
->f
& URLF_SEP
)
121 /* --- @url_initdec@ --- *
123 * Arguments: @url_dctx *ctx@ = pointer to context block
124 * @const char *p@ = string to read data from
128 * Use: Initializes a URL decoding context.
131 void url_initdec(url_dctx
*ctx
, const char *p
)
136 /* --- @decode@ --- *
138 * Arguments: @dstr *d@ = pointer to output string
139 * @const char *p@ = pointer to input data
140 * @int eq@ = whether to stop at `=' characters
142 * Returns: Pointer to next available character.
144 * Use: Does a URL decode.
147 static const char *decode(dstr
*d
, const char *p
, int eq
)
167 int x
= sscanf(p
+ 1, "%2x%n", &ch
, &n
);
182 /* --- @url_dec@ --- *
184 * Arguments: @url_dctx *ctx@ = pointer to decode context
185 * @dstr *n@ = pointer to output string for name
186 * @dstr *v@ = pointer to output string for value
188 * Returns: Nonzero if it read something, zero if there's nothing left
190 * Use: Decodes the next name/value pair from a urlencoded string.
193 int url_dec(url_dctx
*ctx
, dstr
*n
, dstr
*v
)
195 const char *p
= ctx
->p
;
199 if ((p
= decode(n
, p
, 1)) == 0 || *p
== 0)
207 if ((p
= decode(v
, p
, 0)) == 0)
215 /*----- That's all, folks -------------------------------------------------*/