/* $NetBSD: test.c,v 1.1.1.7 2022/09/24 20:07:55 christos Exp $ */ /* * Copyright (c) Christos Zoulas 2003. * All Rights Reserved. * * 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 immediately at the beginning of the file, without modification, * 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 THE 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 THE 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. */ #include #include #include #include #include "magic.h" static const char *prog; static void * xrealloc(void *p, size_t n) { p = realloc(p, n); if (p == NULL) { (void)fprintf(stderr, "%s ERROR slurping file: %s\n", prog, strerror(errno)); exit(10); } return p; } static char * slurp(FILE *fp, size_t *final_len) { size_t len = 256; int c; char *l = (char *)xrealloc(NULL, len), *s = l; for (c = getc(fp); c != EOF; c = getc(fp)) { if (s == l + len) { l = xrealloc(l, len * 2); len *= 2; } *s++ = c; } if (s != l && s[-1] == '\n') s--; if (s == l + len) l = (char *)xrealloc(l, len + 1); *s++ = '\0'; *final_len = s - l; l = (char *)xrealloc(l, s - l); return l; } int main(int argc, char **argv) { struct magic_set *ms; const char *result; size_t result_len, desired_len; char *desired = NULL; int e = EXIT_FAILURE; FILE *fp; prog = strrchr(argv[0], '/'); if (prog) prog++; else prog = argv[0]; ms = magic_open(MAGIC_ERROR); if (ms == NULL) { (void)fprintf(stderr, "%s: ERROR opening MAGIC_NONE: %s\n", prog, strerror(errno)); return e; } if (magic_load(ms, NULL) == -1) { (void)fprintf(stderr, "%s: ERROR loading with NULL file: %s\n", prog, magic_error(ms)); goto bad; } if (argc == 1) { e = 0; goto bad; } if (argc != 3) { (void)fprintf(stderr, "Usage: %s TEST-FILE RESULT\n", prog); goto bad; } if ((result = magic_file(ms, argv[1])) == NULL) { (void)fprintf(stderr, "%s: ERROR loading file %s: %s\n", prog, argv[1], magic_error(ms)); goto bad; } fp = fopen(argv[2], "r"); if (fp == NULL) { (void)fprintf(stderr, "%s: ERROR opening `%s': %s", prog, argv[2], strerror(errno)); goto bad; } desired = slurp(fp, &desired_len); fclose(fp); (void)printf("%s: %s\n", argv[1], result); if (strcmp(result, desired) != 0) { result_len = strlen(result); (void)fprintf(stderr, "%s: ERROR: result was (len %zu)\n%s\n" "expected (len %zu)\n%s\n", prog, result_len, result, desired_len, desired); goto bad; } e = 0; bad: free(desired); magic_close(ms); return e; }