libbb/process_escape_sequence.c

   1 /* vi: set sw=4 ts=4: */
   2 /*
   3  * Utility routines.
   4  *
   5  * Copyright (C) tons of folks.  Tracking down who wrote what
   6  * isn't something I'm going to worry about...  If you wrote something
   7  * here, please feel free to acknowledge your work.
   8  *
   9  * This program is free software; you can redistribute it and/or modify
  10  * it under the terms of the GNU General Public License as published by
  11  * the Free Software Foundation; either version 2 of the License, or
  12  * (at your option) any later version.
  13  *
  14  * This program is distributed in the hope that it will be useful,
  15  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  16  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
  17  * General Public License for more details.
  18  *
  19  * You should have received a copy of the GNU General Public License
  20  * along with this program; if not, write to the Free Software
  21  * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
  22  *
  23  * Based in part on code from sash, Copyright (c) 1999 by David I. Bell
  24  * Permission has been granted to redistribute this code under the GPL.
  25  *
  26  */
  27
  28 #include <stdio.h>
  29 #include <limits.h>
  30 #include "libbb.h"
  31
  32
  33
  34 char process_escape_sequence(char **ptr)
  35 {
  36        static const char charmap[] = {
  37                    'a',  'b',  'f',  'n',  'r',  't',  'v',  '\\', 0,
  38                '\a', '\b', '\f', '\n', '\r', '\t', '\v', '\\', '\\' };
  39
  40        const char *p;
  41            char *q;
  42        int num_digits;
  43        unsigned int n;
  44
  45        n = 0;
  46            q = *ptr;
  47
  48        for ( num_digits = 0 ; num_digits < 3 ; ++num_digits) {
  49                if ((*q < '0') || (*q > '7')) { /* not a digit? */
  50                        break;
  51                }
  52                n = n * 8 + (*q++ - '0');
  53        }
  54
  55        if (num_digits == 0) {   /* mnemonic escape sequence? */
  56                    for (p=charmap ; *p ; p++) {
  57                            if (*p == *q) {
  58                                    q++;
  59                                    break;
  60                            }
  61                    }
  62                    n = *(p+(sizeof(charmap)/2));
  63            }
  64
  65            /* doesn't hurt to fall through to here from mnemonic case */
  66            if (n > UCHAR_MAX) { /* is octal code too big for a char? */
  67                    n /= 8;                      /* adjust value and */
  68                    --q;                         /* back up one char */
  69            }
  70
  71            *ptr = q;
  72            return (char) n;
  73 }
  74
  75
  76 /* END CODE */
  77 /*
  78 Local Variables:
  79 c-file-style: "linux"
  80 c-basic-offset: 4
  81 tab-width: 4
  82 End:
  83 */