/*- * Copyright (c)1997-2005 by Hartmut Brandt * All rights reserved. * * Author: Harti Brandt <harti@freebsd.org> * * Redistribution and use in source and binary forms, with or without * modification, are permitted provided that the following conditions * are met: * 1. Redistributions of source code must retain the above copyright * notice, this list of conditions and the following disclaimer. * 2. Redistributions in binary form must reproduce the above copyright * notice, this list of conditions and the following disclaimer in the * documentation and/or other materials provided with the distribution. * * THIS SOFTWARE IS PROVIDED BY AUTHOR AND CONTRIBUTORS ``AS IS'' AND * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE * ARE DISCLAIMED. IN NO EVENT SHALL AUTHOR OR CONTRIBUTORS BE LIABLE * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF * SUCH DAMAGE. * * $Begemot: libbegemot/cstrd.c,v 1.6 2005/06/01 07:57:55 brandt_h Exp $ */ # include <stdio.h> # include <string.h> # include <ctype.h> # include "begemot.h" # define GROW 100 char * cstrd(char *ptr, char delim, size_t ilen) { size_t alloc, len; char *str; unsigned char c; alloc = GROW; len = 0; str = xalloc(alloc); while(ilen--) { if(len + 5 > alloc) { alloc += GROW; str = xrealloc(str, alloc); } c = *(unsigned char *)ptr; ptr++; if(!isascii(c)) { sprintf(&str[len], "\\x%02x", (unsigned)c); len += 4; } else if(isprint(c)) { if(c == '\\' || c == (unsigned char)delim) str[len++] = '\\'; str[len++] = c; } else { str[len++] = '\\'; switch(c) { case '\a': str[len++] = 'a'; break; case '\b': str[len++] = 'b'; break; case '\f': str[len++] = 'f'; break; case '\n': str[len++] = 'n'; break; case '\r': str[len++] = 'r'; break; case '\t': str[len++] = 't'; break; case '\v': str[len++] = 'v'; break; default: sprintf(&str[len], "x%02x", (unsigned)c); len += 3; break; } } } if(alloc == len) { alloc++; str = xrealloc(str, alloc); } str[len] = '\0'; return str; } # ifdef TEST # include <unistd.h> int main(int argc, char *argv[]) { int ret; char buf[512], *str; if((ret = read(0, buf, 512)) > 0) { str = cstrd(buf, ret); printf("\"%s\"\n", str); } return 0; } # endif