libmisc/quote.c

   1 /*
   2   File: quote.c
   3
   4   Copyright (C) 2003 Andreas Gruenbacher <a.gruenbacher@bestbits.at>
   5
   6   This program is free software; you can redistribute it and/or modify it under
   7   the terms of the GNU Lesser General Public License as published by the
   8   Free Software Foundation; either version 2.1 of the License, or (at
   9   your option) any later version.
  10
  11   This program is distributed in the hope that it will be useful, but WITHOUT
  12   ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
  13   FITNESS FOR A PARTICULAR PURPOSE.  See the GNU Lesser General Public
  14   License for more details.
  15
  16   You should have received a copy of the GNU Lesser General Public
  17   License along with this program.  If not, see <http://www.gnu.org/licenses/>.
  18 */
  19
  20 #include <stdio.h>
  21 #include <stdlib.h>
  22 #include <string.h>
  23 #include <ctype.h>
  24 #include <string.h>
  25 #include "misc.h"
  26
  27 const char *quote(const char *str, const char *quote_chars)
  28 {
  29         static char *quoted_str;
  30         static size_t quoted_str_len;
  31         const unsigned char *s;
  32         char *q;
  33         size_t nonpr;
  34
  35         if (!str)
  36                 return str;
  37
  38         for (nonpr = 0, s = (unsigned char *)str; *s != '\0'; s++)
  39                 if (*s == '\\' || strchr(quote_chars, *s))
  40                         nonpr++;
  41         if (nonpr == 0)
  42                 return str;
  43
  44         if (high_water_alloc((void **)&quoted_str, &quoted_str_len,
  45                              (s - (unsigned char *)str) + nonpr * 3 + 1))
  46                 return NULL;
  47         for (s = (unsigned char *)str, q = quoted_str; *s != '\0'; s++) {
  48                 if (*s == '\\' || strchr(quote_chars, *s)) {
  49                         *q++ = '\\';
  50                         *q++ = '0' + ((*s >> 6)    );
  51                         *q++ = '0' + ((*s >> 3) & 7);
  52                         *q++ = '0' + ((*s     ) & 7);
  53                 } else
  54                         *q++ = *s;
  55         }
  56         *q++ = '\0';
  57
  58         return quoted_str;
  59 }