/* $NetBSD: test.c,v 1.1.1.4 2017/09/08 13:22:45 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 "magic.h" static void * xrealloc(void *p, size_t n) { p = realloc(p, n); if (p == NULL) { (void)fprintf(stderr, "ERROR slurping file: out of memory\n"); 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 = (char *)xrealloc(l, len * 2); len *= 2; } *s++ = c; } 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; char *desired; size_t desired_len; int i; FILE *fp; ms = magic_open(MAGIC_NONE); if (ms == NULL) { (void)fprintf(stderr, "ERROR opening MAGIC_NONE: out of memory\n"); return 10; } if (magic_load(ms, NULL) == -1) { (void)fprintf(stderr, "ERROR loading with NULL file: %s\n", magic_error(ms)); return 11; } if (argc > 1) { if (argc != 3) { (void)fprintf(stderr, "Usage: test TEST-FILE RESULT\n"); } else { if ((result = magic_file(ms, argv[1])) == NULL) { (void)fprintf(stderr, "ERROR loading file %s: %s\n", argv[1], magic_error(ms)); return 12; } else { fp = fopen(argv[2], "r"); if (fp == NULL) { (void)fprintf(stderr, "ERROR opening `%s': ", argv[2]); perror(NULL); return 13; } desired = slurp(fp, &desired_len); fclose(fp); (void)printf("%s: %s\n", argv[1], result); if (strcmp(result, desired) != 0) { (void)fprintf(stderr, "Error: result was\n%s\nexpected:\n%s\n", result, desired); return 1; } } } } magic_close(ms); return 0; }