/* $NetBSD: hex.c,v 1.1.1.1 2009/04/12 15:33:46 christos Exp $ */ /* * Copyright (c) 2004 by Internet Systems Consortium, Inc. ("ISC") * Copyright (c) 2001 by Internet Software Consortium. * * Permission to use, copy, modify, and distribute this software for any * purpose with or without fee is hereby granted, provided that the above * copyright notice and this permission notice appear in all copies. * * THE SOFTWARE IS PROVIDED "AS IS" AND ISC DISCLAIMS ALL WARRANTIES * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL ISC BE LIABLE FOR * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN * ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT * OF OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE. */ #include #include #include #include #include #include static const char hex[17] = "0123456789abcdef"; int isc_gethexstring(unsigned char *buf, size_t len, int count, FILE *fp, int *multiline) { int c, n; unsigned char x; char *s; int result = count; x = 0; /*%< silence compiler */ n = 0; while (count > 0) { c = fgetc(fp); if ((c == EOF) || (c == '\n' && !*multiline) || (c == '(' && *multiline) || (c == ')' && !*multiline)) goto formerr; /* comment */ if (c == ';') { do { c = fgetc(fp); } while (c != EOF && c != '\n'); if (c == '\n' && *multiline) continue; goto formerr; } /* white space */ if (c == ' ' || c == '\t' || c == '\n' || c == '\r') continue; /* multiline */ if ('(' == c || c == ')') { *multiline = (c == '(' /*)*/); continue; } if ((s = strchr(hex, tolower(c))) == NULL) goto formerr; x = (x<<4) | (s - hex); if (++n == 2) { if (len > 0U) { *buf++ = x; len--; } else result = -1; count--; n = 0; } } return (result); formerr: if (c == '\n') ungetc(c, fp); return (-1); } void isc_puthexstring(FILE *fp, const unsigned char *buf, size_t buflen, size_t len1, size_t len2, const char *sep) { size_t i = 0; if (len1 < 4U) len1 = 4; if (len2 < 4U) len2 = 4; while (buflen > 0U) { fputc(hex[(buf[0]>>4)&0xf], fp); fputc(hex[buf[0]&0xf], fp); i += 2; buflen--; buf++; if (i >= len1 && sep != NULL) { fputs(sep, fp); i = 0; len1 = len2; } } } void isc_tohex(const unsigned char *buf, size_t buflen, char *t) { while (buflen > 0U) { *t++ = hex[(buf[0]>>4)&0xf]; *t++ = hex[buf[0]&0xf]; buf++; buflen--; } *t = '\0'; } /*! \file */