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 <ctype.h>
  23 #include <string.h>
  24 #include "misc.h"
  25
  26 const char *quote(const char *str, const char *quote_chars)
  27 {
  28         static char *quoted_str;
  29         static size_t quoted_str_len;
  30         const unsigned char *s;
  31         char *q;
  32         size_t nonpr;
  33
  34         if (!str)
  35                 return str;
  36
  37         for (nonpr = 0, s = (unsigned char *)str; *s != '\0'; s++)
  38                 if (*s == '\\' || strchr(quote_chars, *s))
  39                         nonpr++;
  40         if (nonpr == 0)
  41                 return str;
  42
  43         if (high_water_alloc((void **)&quoted_str, &quoted_str_len,
  44                              (s - (unsigned char *)str) + nonpr * 3 + 1))
  45                 return NULL;
  46         for (s = (unsigned char *)str, q = quoted_str; *s != '\0'; s++) {
  47                 if (*s == '\\' || strchr(quote_chars, *s)) {
  48                         *q++ = '\\';
  49                         *q++ = '0' + ((*s >> 6)    );
  50                         *q++ = '0' + ((*s >> 3) & 7);
  51                         *q++ = '0' + ((*s     ) & 7);
  52                 } else
  53                         *q++ = *s;
  54         }
  55         *q++ = '\0';
  56
  57         return quoted_str;
  58 }