src/url.c

   1 #include "common.h"
   2
   3 // ----------------------------------------------------------------------------
   4 // URL encode / decode
   5 // code from: http://www.geekhideout.com/urlcode.shtml
   6
   7 /* Converts a hex character to its integer value */
   8 char from_hex(char ch) {
   9         return (char)(isdigit(ch) ? ch - '0' : tolower(ch) - 'a' + 10);
  10 }
  11
  12 /* Converts an integer value to its hex character*/
  13 char to_hex(char code) {
  14         static char hex[] = "0123456789abcdef";
  15         return hex[code & 15];
  16 }
  17
  18 /* Returns a url-encoded version of str */
  19 /* IMPORTANT: be sure to free() the returned string after use */
  20 char *url_encode(char *str) {
  21         char *buf, *pbuf;
  22
  23         pbuf = buf = mallocz(strlen(str) * 3 + 1);
  24
  25         while (*str) {
  26                 if (isalnum(*str) || *str == '-' || *str == '_' || *str == '.' || *str == '~')
  27                         *pbuf++ = *str;
  28
  29                 else if (*str == ' ')
  30                         *pbuf++ = '+';
  31
  32                 else
  33                         *pbuf++ = '%', *pbuf++ = to_hex(*str >> 4), *pbuf++ = to_hex(*str & 15);
  34
  35                 str++;
  36         }
  37         *pbuf = '\0';
  38
  39         pbuf = strdupz(buf);
  40         freez(buf);
  41         return pbuf;
  42 }
  43
  44 /* Returns a url-decoded version of str */
  45 /* IMPORTANT: be sure to free() the returned string after use */
  46 char *url_decode(char *str) {
  47         size_t size = strlen(str) + 1;
  48
  49         char *buf = mallocz(size);
  50         return url_decode_r(buf, str, size);
  51 }
  52
  53 char *url_decode_r(char *to, char *url, size_t size) {
  54         char *s = url,           // source
  55                  *d = to,            // destination
  56                  *e = &to[size - 1]; // destination end
  57
  58         while(*s && d < e) {
  59                 if(unlikely(*s == '%')) {
  60                         if(likely(s[1] && s[2])) {
  61                                 *d++ = from_hex(s[1]) << 4 | from_hex(s[2]);
  62                                 s += 2;
  63                         }
  64                 }
  65                 else if(unlikely(*s == '+'))
  66                         *d++ = ' ';
  67
  68                 else
  69                         *d++ = *s;
  70
  71                 s++;
  72         }
  73
  74         *d = '\0';
  75
  76         return to;
  77 }