<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">
<html><head><meta http-equiv="Content-Type" content="text/html;charset=iso-8859-1">
<title>rpm: file/src/apprentice.c Source File</title>
<link href="doxygen.css" rel="stylesheet" type="text/css">
<link href="tabs.css" rel="stylesheet" type="text/css">
</head><body>
<!-- Generated by Doxygen 1.4.7 -->
<div class="tabs">
<ul>
<li><a href="index.html"><span>Main Page</span></a></li>
<li><a href="modules.html"><span>Modules</span></a></li>
<li><a href="annotated.html"><span>Data Structures</span></a></li>
<li id="current"><a href="files.html"><span>Files</span></a></li>
<li><a href="pages.html"><span>Related Pages</span></a></li>
</ul></div>
<div class="tabs">
<ul>
<li><a href="files.html"><span>File List</span></a></li>
<li><a href="globals.html"><span>Globals</span></a></li>
</ul></div>
<h1>file/src/apprentice.c</h1><a href="apprentice_8c.html">Go to the documentation of this file.</a><div class="fragment"><pre class="fragment"><a name="l00001"></a>00001 <span class="comment">/*</span>
<a name="l00002"></a>00002 <span class="comment"> * Copyright (c) Ian F. Darwin 1986-1995.</span>
<a name="l00003"></a>00003 <span class="comment"> * Software written by Ian F. Darwin and others;</span>
<a name="l00004"></a>00004 <span class="comment"> * maintained 1995-present by Christos Zoulas and others.</span>
<a name="l00005"></a>00005 <span class="comment"> * </span>
<a name="l00006"></a>00006 <span class="comment"> * Redistribution and use in source and binary forms, with or without</span>
<a name="l00007"></a>00007 <span class="comment"> * modification, are permitted provided that the following conditions</span>
<a name="l00008"></a>00008 <span class="comment"> * are met:</span>
<a name="l00009"></a>00009 <span class="comment"> * 1. Redistributions of source code must retain the above copyright</span>
<a name="l00010"></a>00010 <span class="comment"> * notice immediately at the beginning of the file, without modification,</span>
<a name="l00011"></a>00011 <span class="comment"> * this list of conditions, and the following disclaimer.</span>
<a name="l00012"></a>00012 <span class="comment"> * 2. Redistributions in binary form must reproduce the above copyright</span>
<a name="l00013"></a>00013 <span class="comment"> * notice, this list of conditions and the following disclaimer in the</span>
<a name="l00014"></a>00014 <span class="comment"> * documentation and/or other materials provided with the distribution.</span>
<a name="l00015"></a>00015 <span class="comment"> * </span>
<a name="l00016"></a>00016 <span class="comment"> * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND</span>
<a name="l00017"></a>00017 <span class="comment"> * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE</span>
<a name="l00018"></a>00018 <span class="comment"> * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE</span>
<a name="l00019"></a>00019 <span class="comment"> * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE FOR</span>
<a name="l00020"></a>00020 <span class="comment"> * ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL</span>
<a name="l00021"></a>00021 <span class="comment"> * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS</span>
<a name="l00022"></a>00022 <span class="comment"> * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)</span>
<a name="l00023"></a>00023 <span class="comment"> * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT</span>
<a name="l00024"></a>00024 <span class="comment"> * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY</span>
<a name="l00025"></a>00025 <span class="comment"> * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF</span>
<a name="l00026"></a>00026 <span class="comment"> * SUCH DAMAGE.</span>
<a name="l00027"></a>00027 <span class="comment"> */</span>
<a name="l00028"></a>00028 <span class="comment">/*</span>
<a name="l00029"></a>00029 <span class="comment"> * apprentice - make one pass through /etc/magic, learning its secrets.</span>
<a name="l00030"></a>00030 <span class="comment"> */</span>
<a name="l00031"></a>00031
<a name="l00032"></a>00032 <span class="preprocessor">#include "<a class="code" href="file_8h.html">file.h</a>"</span>
<a name="l00033"></a>00033 <span class="preprocessor">#include "magic.h"</span>
<a name="l00034"></a>00034 <span class="preprocessor">#include <stdlib.h></span>
<a name="l00035"></a>00035 <span class="preprocessor">#ifdef HAVE_UNISTD_H</span>
<a name="l00036"></a>00036 <span class="preprocessor"></span><span class="preprocessor">#include <unistd.h></span>
<a name="l00037"></a>00037 <span class="preprocessor">#endif</span>
<a name="l00038"></a>00038 <span class="preprocessor"></span><span class="preprocessor">#include <string.h></span>
<a name="l00039"></a>00039 <span class="preprocessor">#include <ctype.h></span>
<a name="l00040"></a>00040 <span class="preprocessor">#include <fcntl.h></span>
<a name="l00041"></a>00041 <span class="preprocessor">#include <sys/stat.h></span>
<a name="l00042"></a>00042 <span class="preprocessor">#include <sys/param.h></span>
<a name="l00043"></a>00043 <span class="preprocessor">#ifdef QUICK</span>
<a name="l00044"></a>00044 <span class="preprocessor"></span><span class="preprocessor">#include <sys/mman.h></span>
<a name="l00045"></a>00045 <span class="preprocessor">#endif</span>
<a name="l00046"></a>00046 <span class="preprocessor"></span>
<a name="l00047"></a>00047 <span class="preprocessor">#ifndef lint</span>
<a name="l00048"></a><a class="code" href="apprentice_8c.html#d3e2f9b6d2324a17d1d4a526b01dbf40">00048</a> <span class="preprocessor"></span><a class="code" href="system_8h.html#b757e9ff04be9e1b95de08c5536ac334">FILE_RCSID</a>(<span class="stringliteral">"@(#)$Id: apprentice.c,v 1.84 2005/03/25 18:03:18 christos Exp $"</span>)
<a name="l00049"></a>00049 <span class="preprocessor">#endif </span><span class="comment">/* lint */</span>
<a name="l00050"></a>00050
<a name="l00051"></a><a class="code" href="apprentice_8c.html#4a8b4779f1126316143e8f354f0c85d4">00051</a> <span class="preprocessor">#define EATAB {while (isascii((unsigned char) *l) && \</span>
<a name="l00052"></a>00052 <span class="preprocessor"> isspace((unsigned char) *l)) ++l;}</span>
<a name="l00053"></a><a class="code" href="apprentice_8c.html#9165ad17c9b51d80577a020832f1fa4a">00053</a> <span class="preprocessor"></span><span class="preprocessor">#define LOWCASE(l) (isupper((unsigned char) (l)) ? \</span>
<a name="l00054"></a>00054 <span class="preprocessor"> tolower((unsigned char) (l)) : (l))</span>
<a name="l00055"></a>00055 <span class="preprocessor"></span><span class="comment">/*</span>
<a name="l00056"></a>00056 <span class="comment"> * Work around a bug in headers on Digital Unix.</span>
<a name="l00057"></a>00057 <span class="comment"> * At least confirmed for: OSF1 V4.0 878</span>
<a name="l00058"></a>00058 <span class="comment"> */</span>
<a name="l00059"></a>00059 <span class="preprocessor">#if defined(__osf__) && defined(__DECC)</span>
<a name="l00060"></a>00060 <span class="preprocessor"></span><span class="preprocessor">#ifdef MAP_FAILED</span>
<a name="l00061"></a>00061 <span class="preprocessor"></span><span class="preprocessor">#undef MAP_FAILED</span>
<a name="l00062"></a>00062 <span class="preprocessor"></span><span class="preprocessor">#endif</span>
<a name="l00063"></a>00063 <span class="preprocessor"></span><span class="preprocessor">#endif</span>
<a name="l00064"></a>00064 <span class="preprocessor"></span>
<a name="l00065"></a>00065 <span class="preprocessor">#ifndef MAP_FAILED</span>
<a name="l00066"></a><a class="code" href="apprentice_8c.html#8523dcf952f6ff059a3bed717e4f1296">00066</a> <span class="preprocessor"></span><span class="preprocessor">#define MAP_FAILED (void *) -1</span>
<a name="l00067"></a>00067 <span class="preprocessor"></span><span class="preprocessor">#endif</span>
<a name="l00068"></a>00068 <span class="preprocessor"></span>
<a name="l00069"></a>00069 <span class="preprocessor">#ifndef MAP_FILE</span>
<a name="l00070"></a><a class="code" href="apprentice_8c.html#238feed3512d8b21b3854d082dcae6f4">00070</a> <span class="preprocessor"></span><span class="preprocessor">#define MAP_FILE 0</span>
<a name="l00071"></a>00071 <span class="preprocessor"></span><span class="preprocessor">#endif</span>
<a name="l00072"></a>00072 <span class="preprocessor"></span>
<a name="l00073"></a>00073 <span class="preprocessor">#ifndef MAXPATHLEN</span>
<a name="l00074"></a><a class="code" href="apprentice_8c.html#ddfa831c1473e710d2b71b72fd7fcfa5">00074</a> <span class="preprocessor"></span><span class="preprocessor">#define MAXPATHLEN 1024</span>
<a name="l00075"></a>00075 <span class="preprocessor"></span><span class="preprocessor">#endif</span>
<a name="l00076"></a>00076 <span class="preprocessor"></span>
<a name="l00077"></a><a class="code" href="apprentice_8c.html#5bcb062a246a73327003e50bf2daeb93">00077</a> <span class="preprocessor">#define IS_PLAINSTRING(t) ((t) == FILE_STRING || (t) == FILE_PSTRING || \</span>
<a name="l00078"></a>00078 <span class="preprocessor"> (t) == FILE_BESTRING16 || (t) == FILE_LESTRING16)</span>
<a name="l00079"></a>00079 <span class="preprocessor"></span>
<a name="l00080"></a><a class="code" href="apprentice_8c.html#f72c8807835aa3ecde5670574dacac0e">00080</a> <span class="preprocessor">#define IS_STRING(t) (IS_PLAINSTRING(t) || (t) == FILE_REGEX || \</span>
<a name="l00081"></a>00081 <span class="preprocessor"> (t) == FILE_SEARCH)</span>
<a name="l00082"></a>00082 <span class="preprocessor"></span>
<a name="l00083"></a>00083 <span class="comment">/*@unchecked@*/</span>
<a name="l00084"></a><a class="code" href="apprentice_8c.html#69408b218c67e99c480eda93545b4539">00084</a> <span class="keyword">private</span> size_t <a class="code" href="apprentice_8c.html#69408b218c67e99c480eda93545b4539">maxmagic</a> = 0;
<a name="l00085"></a>00085 <span class="comment">/*@unchecked@*/</span>
<a name="l00086"></a><a class="code" href="apprentice_8c.html#57fe3492b7e4c8d37c950f803e4ca47a">00086</a> <span class="keyword">private</span> size_t <a class="code" href="apprentice_8c.html#57fe3492b7e4c8d37c950f803e4ca47a">magicsize</a> = <span class="keyword">sizeof</span>(<span class="keyword">struct </span><a class="code" href="structmagic.html">magic</a>);
<a name="l00087"></a>00087
<a name="l00088"></a>00088 <span class="keyword">private</span> <span class="keywordtype">int</span> <a class="code" href="apprentice_8c.html#69f31de58cf8369e559a5f0819083373">getvalue</a>(<span class="keyword">struct</span> <a class="code" href="structmagic__set.html">magic_set</a> *ms, <span class="keyword">struct</span> <a class="code" href="structmagic.html">magic</a> *m, <span class="keywordtype">char</span> **p)
<a name="l00089"></a>00089 <span class="comment">/*@globals fileSystem @*/</span>
<a name="l00090"></a>00090 <span class="comment">/*@modifies ms, m, *p, fileSystem @*/</span>;
<a name="l00091"></a>00091 <span class="keyword">private</span> <span class="keywordtype">int</span> <a class="code" href="apprentice_8c.html#4e4a725944171049e901ed0ba5d99ffd">hextoint</a>(<span class="keywordtype">int</span>)
<a name="l00092"></a>00092 <span class="comment">/*@*/</span>;
<a name="l00093"></a>00093 <span class="comment">/*@null@*/</span>
<a name="l00094"></a>00094 <span class="keyword">private</span> <span class="keywordtype">char</span> *<a class="code" href="lobject_8h.html#cb05d3ab238923581a9c629b8e11a6ac">getstr</a>(<span class="keyword">struct</span> <a class="code" href="structmagic__set.html">magic_set</a> *ms, <span class="comment">/*@returned@*/</span> <span class="keywordtype">char</span> *s, <span class="keywordtype">char</span> *p, <span class="keywordtype">int</span> plen, <span class="keywordtype">int</span> *slen)
<a name="l00095"></a>00095 <span class="comment">/*@modifies ms, *p, *slen @*/</span>;
<a name="l00096"></a>00096 <span class="keyword">private</span> <span class="keywordtype">int</span> <a class="code" href="apprentice_8c.html#5fafd6ab7470644d1ebb2594a2058e81">parse</a>(<span class="keyword">struct</span> <a class="code" href="structmagic__set.html">magic_set</a> *ms, <span class="keyword">struct</span> <a class="code" href="structmagic.html">magic</a> **magicp, uint32_t *nmagicp, <span class="keywordtype">char</span> *l, <span class="keywordtype">int</span> action)
<a name="l00097"></a>00097 <span class="comment">/*@globals maxmagic, fileSystem @*/</span>
<a name="l00098"></a>00098 <span class="comment">/*@modifies ms, *magicp, *nmagicp, maxmagic, fileSystem @*/</span>;
<a name="l00099"></a>00099 <span class="keyword">private</span> <span class="keywordtype">void</span> <a class="code" href="apprentice_8c.html#e91b394bec7057a2260c779e32d47ae2">eatsize</a>(<span class="keywordtype">char</span> **p)
<a name="l00100"></a>00100 <span class="comment">/*@modifies *p @*/</span>;
<a name="l00101"></a>00101 <span class="keyword">private</span> <span class="keywordtype">int</span> <a class="code" href="apprentice_8c.html#b3b68e53a202e68fb9d7953209b29b5c">apprentice_1</a>(<span class="keyword">struct</span> <a class="code" href="structmagic__set.html">magic_set</a> *ms, <span class="keyword">const</span> <span class="keywordtype">char</span> *fn, <span class="keywordtype">int</span> action, <span class="keyword">struct</span> <a class="code" href="structmlist.html">mlist</a> *<a class="code" href="structmlist.html">mlist</a>)
<a name="l00102"></a>00102 <span class="comment">/*@globals fileSystem, internalState @*/</span>
<a name="l00103"></a>00103 <span class="comment">/*@modifies ms, mlist, fileSystem, internalState @*/</span>;
<a name="l00104"></a>00104 <span class="keyword">private</span> <span class="keywordtype">int</span> <a class="code" href="apprentice_8c.html#3e97d9adddea1ab2e2af69cb57fe349d">apprentice_file</a>(<span class="keyword">struct</span> <a class="code" href="structmagic__set.html">magic_set</a> *ms, <span class="keyword">struct</span> <a class="code" href="structmagic.html">magic</a> **magicp, uint32_t *nmagicp,
<a name="l00105"></a>00105 <span class="keyword">const</span> <span class="keywordtype">char</span> *fn, <span class="keywordtype">int</span> action)
<a name="l00106"></a>00106 <span class="comment">/*@globals maxmagic, fileSystem @*/</span>
<a name="l00107"></a>00107 <span class="comment">/*@modifies ms, *magicp, *nmagicp, maxmagic, fileSystem @*/</span>;
<a name="l00108"></a>00108 <span class="keyword">private</span> <span class="keywordtype">void</span> <a class="code" href="apprentice_8c.html#88d3a32480b07c9b7086ca17872752ff">byteswap</a>(<span class="keyword">struct</span> <a class="code" href="structmagic.html">magic</a> *<a class="code" href="structmagic.html">magic</a>, uint32_t nmagic)
<a name="l00109"></a>00109 <span class="comment">/*@modifies magic @*/</span>;
<a name="l00110"></a>00110 <span class="keyword">private</span> <span class="keywordtype">void</span> <a class="code" href="apprentice_8c.html#3075bee49929d6cd754945a58dc82298">bs1</a>(<span class="keyword">struct</span> <a class="code" href="structmagic.html">magic</a> *m)
<a name="l00111"></a>00111 <span class="comment">/*@modifies m @*/</span>;
<a name="l00112"></a>00112 <span class="keyword">private</span> uint16_t <a class="code" href="apprentice_8c.html#cf2437870e281b5a8f56ea5a481794b4">swap2</a>(uint16_t sv)
<a name="l00113"></a>00113 <span class="comment">/*@*/</span>;
<a name="l00114"></a>00114 <span class="keyword">private</span> uint32_t <a class="code" href="apprentice_8c.html#a8650b65e7f5f66487363fc6e75b0c46">swap4</a>(uint32_t sv)
<a name="l00115"></a>00115 <span class="comment">/*@*/</span>;
<a name="l00116"></a>00116 <span class="keyword">private</span> <span class="keywordtype">char</span> *<a class="code" href="apprentice_8c.html#2da87acbfe61481277dbc47331785e2d">mkdbname</a>(<span class="keyword">const</span> <span class="keywordtype">char</span> *fn, <span class="comment">/*@returned@*/</span> <span class="keywordtype">char</span> *buf, size_t, <span class="keywordtype">int</span>)
<a name="l00117"></a>00117 <span class="comment">/*@modifies buf @*/</span>;
<a name="l00118"></a>00118 <span class="keyword">private</span> <span class="keywordtype">int</span> <a class="code" href="apprentice_8c.html#6ce05b051be3244a560b11f9c2628317">apprentice_map</a>(<span class="keyword">struct</span> <a class="code" href="structmagic__set.html">magic_set</a> *ms, <span class="keyword">struct</span> <a class="code" href="structmagic.html">magic</a> **magicp, uint32_t *nmagicp,
<a name="l00119"></a>00119 <span class="keyword">const</span> <span class="keywordtype">char</span> *fn)
<a name="l00120"></a>00120 <span class="comment">/*@globals fileSystem, internalState @*/</span>
<a name="l00121"></a>00121 <span class="comment">/*@modifies ms, *magicp, *nmagicp, fileSystem, internalState @*/</span>;
<a name="l00122"></a>00122 <span class="keyword">private</span> <span class="keywordtype">int</span> <a class="code" href="apprentice_8c.html#c72b61f500e69db85423d5720e8c8d05">apprentice_compile</a>(<span class="keyword">struct</span> <a class="code" href="structmagic__set.html">magic_set</a> *ms, <span class="keyword">struct</span> <a class="code" href="structmagic.html">magic</a> **magicp, uint32_t * nmagicp,
<a name="l00123"></a>00123 <span class="keyword">const</span> <span class="keywordtype">char</span> *fn)
<a name="l00124"></a>00124 <span class="comment">/*@globals fileSystem, internalState @*/</span>
<a name="l00125"></a>00125 <span class="comment">/*@modifies ms, fileSystem, internalState @*/</span>;
<a name="l00126"></a>00126 <span class="keyword">private</span> <span class="keywordtype">int</span> <a class="code" href="apprentice_8c.html#99e5d877451dcdb0775091b501d7407b">check_format</a>(<span class="keyword">struct</span> <a class="code" href="structmagic__set.html">magic_set</a> *ms, <span class="keyword">struct</span> <a class="code" href="structmagic.html">magic</a> *m)
<a name="l00127"></a>00127 <span class="comment">/*@globals fileSystem @*/</span>
<a name="l00128"></a>00128 <span class="comment">/*@modifies fileSystem @*/</span>;
<a name="l00129"></a>00129
<a name="l00130"></a>00130 <span class="preprocessor">#ifdef COMPILE_ONLY</span>
<a name="l00131"></a>00131 <span class="preprocessor"></span>
<a name="l00132"></a>00132 <span class="keywordtype">int</span> <a class="code" href="rpmqv_8c.html#ef6c40289a6a07b460e1e2fc9568e404">main</a>(<span class="keywordtype">int</span>, <span class="keywordtype">char</span> *[]);
<a name="l00133"></a>00133
<a name="l00134"></a>00134 <span class="keywordtype">int</span>
<a name="l00135"></a>00135 <a class="code" href="rpmqv_8c.html#ef6c40289a6a07b460e1e2fc9568e404">main</a>(<span class="keywordtype">int</span> argc, <span class="keywordtype">char</span> *<a class="code" href="compress_8c.html#b233d58a2d9af13ae09ea8fd82556856">argv</a>[])
<a name="l00136"></a>00136 {
<a name="l00137"></a>00137 <span class="keywordtype">int</span> ret;
<a name="l00138"></a>00138 <span class="keyword">struct </span><a class="code" href="structmagic__set.html">magic_set</a> *ms;
<a name="l00139"></a>00139 <span class="keywordtype">char</span> *<a class="code" href="file_8c.html#b9e1449fd00c98428516f0b41eddcb10">progname</a>;
<a name="l00140"></a>00140
<a name="l00141"></a>00141 <span class="keywordflow">if</span> ((progname = strrchr(argv[0], <span class="charliteral">'/'</span>)) != NULL)
<a name="l00142"></a>00142 progname++;
<a name="l00143"></a>00143 <span class="keywordflow">else</span>
<a name="l00144"></a>00144 progname = argv[0];
<a name="l00145"></a>00145
<a name="l00146"></a>00146 <span class="keywordflow">if</span> (argc != 2) {
<a name="l00147"></a>00147 (void)fprintf(stderr, <span class="stringliteral">"Usage: %s file\n"</span>, progname);
<a name="l00148"></a>00148 <span class="keywordflow">return</span> 1;
<a name="l00149"></a>00149 }
<a name="l00150"></a>00150
<a name="l00151"></a>00151 <span class="keywordflow">if</span> ((ms = magic_open(MAGIC_CHECK)) == NULL) {
<a name="l00152"></a>00152 (void)fprintf(stderr, <span class="stringliteral">"%s: %s\n"</span>, progname, <a class="code" href="file_8h.html#b6b553574f85ce7727cf5b9a1b638293">strerror</a>(errno));
<a name="l00153"></a>00153 <span class="keywordflow">return</span> 1;
<a name="l00154"></a>00154 }
<a name="l00155"></a>00155 ret = magic_compile(ms, argv[1]) == -1 ? 1 : 0;
<a name="l00156"></a>00156 <span class="keywordflow">if</span> (ret == 1)
<a name="l00157"></a>00157 (void)fprintf(stderr, <span class="stringliteral">"%s: %s\n"</span>, progname, magic_error(ms));
<a name="l00158"></a>00158 magic_close(ms);
<a name="l00159"></a>00159 <span class="keywordflow">return</span> ret;
<a name="l00160"></a>00160 }
<a name="l00161"></a>00161 <span class="preprocessor">#endif </span><span class="comment">/* COMPILE_ONLY */</span>
<a name="l00162"></a>00162
<a name="l00163"></a>00163
<a name="l00164"></a>00164 <span class="comment">/*</span>
<a name="l00165"></a>00165 <span class="comment"> * Handle one file.</span>
<a name="l00166"></a>00166 <span class="comment"> */</span>
<a name="l00167"></a>00167 <span class="keyword">private</span> <span class="keywordtype">int</span>
<a name="l00168"></a><a class="code" href="apprentice_8c.html#b3b68e53a202e68fb9d7953209b29b5c">00168</a> <a class="code" href="apprentice_8c.html#b3b68e53a202e68fb9d7953209b29b5c">apprentice_1</a>(<span class="keyword">struct</span> <a class="code" href="structmagic__set.html">magic_set</a> *ms, <span class="keyword">const</span> <span class="keywordtype">char</span> *fn, <span class="keywordtype">int</span> action,
<a name="l00169"></a>00169 <span class="keyword">struct</span> <a class="code" href="structmlist.html">mlist</a> *<a class="code" href="structmlist.html">mlist</a>)
<a name="l00170"></a>00170 {
<a name="l00171"></a>00171 <span class="keyword">struct </span><a class="code" href="structmagic.html">magic</a> *<a class="code" href="structmagic.html">magic</a> = NULL;
<a name="l00172"></a>00172 uint32_t nmagic = 0;
<a name="l00173"></a>00173 <span class="keyword">struct </span>mlist *ml;
<a name="l00174"></a>00174 <span class="keywordtype">int</span> rv = -1;
<a name="l00175"></a>00175 <span class="keywordtype">int</span> <a class="code" href="structmlist.html#5e0ffea3bea794258ff586fbb795b4cb">mapped</a>;
<a name="l00176"></a>00176
<a name="l00177"></a>00177 <span class="keywordflow">if</span> (magicsize != <a class="code" href="file_8h.html#2c06a52defabb1c9c0488ca6b36505c1">FILE_MAGICSIZE</a>) {
<a name="l00178"></a>00178 <a class="code" href="file_8h.html#b97a2a8e3a9e23613bcb1a49c4411919">file_error</a>(ms, 0, <span class="stringliteral">"magic element size %lu != %lu"</span>,
<a name="l00179"></a>00179 (<span class="keywordtype">unsigned</span> <span class="keywordtype">long</span>)<span class="keyword">sizeof</span>(*<a class="code" href="compress_8c.html#52bfb08821468413d41bc3e3b38dc078">magic</a>),
<a name="l00180"></a>00180 (<span class="keywordtype">unsigned</span> <span class="keywordtype">long</span>)<a class="code" href="file_8h.html#2c06a52defabb1c9c0488ca6b36505c1">FILE_MAGICSIZE</a>);
<a name="l00181"></a>00181 <span class="keywordflow">return</span> -1;
<a name="l00182"></a>00182 }
<a name="l00183"></a>00183
<a name="l00184"></a>00184 <span class="keywordflow">if</span> (action == <a class="code" href="file_8h.html#a2c340f672a067172e2f79b4f1ddd3c4">FILE_COMPILE</a>) {
<a name="l00185"></a>00185 rv = <a class="code" href="apprentice_8c.html#3e97d9adddea1ab2e2af69cb57fe349d">apprentice_file</a>(ms, &<a class="code" href="compress_8c.html#52bfb08821468413d41bc3e3b38dc078">magic</a>, &nmagic, fn, action);
<a name="l00186"></a>00186 <span class="keywordflow">if</span> (rv != 0)
<a name="l00187"></a>00187 <span class="keywordflow">return</span> -1;
<a name="l00188"></a>00188 rv = <a class="code" href="apprentice_8c.html#c72b61f500e69db85423d5720e8c8d05">apprentice_compile</a>(ms, &<a class="code" href="compress_8c.html#52bfb08821468413d41bc3e3b38dc078">magic</a>, &nmagic, fn);
<a name="l00189"></a>00189 free(<a class="code" href="compress_8c.html#52bfb08821468413d41bc3e3b38dc078">magic</a>);
<a name="l00190"></a>00190 <span class="keywordflow">return</span> rv;
<a name="l00191"></a>00191 }
<a name="l00192"></a>00192 <span class="preprocessor">#ifndef COMPILE_ONLY</span>
<a name="l00193"></a>00193 <span class="preprocessor"></span> <span class="keywordflow">if</span> ((rv = <a class="code" href="apprentice_8c.html#6ce05b051be3244a560b11f9c2628317">apprentice_map</a>(ms, &<a class="code" href="compress_8c.html#52bfb08821468413d41bc3e3b38dc078">magic</a>, &nmagic, fn)) == -1) {
<a name="l00194"></a>00194 <span class="keywordflow">if</span> (ms-><a class="code" href="structmagic__set.html#7677d8f81949874cf4a626d1d4566fc6">flags</a> & MAGIC_CHECK)
<a name="l00195"></a>00195 <a class="code" href="file_8h.html#7c997a92425ab69449e740c7c5752a93">file_magwarn</a>(ms, <span class="stringliteral">"using regular magic file `%s'"</span>, fn);
<a name="l00196"></a>00196 rv = <a class="code" href="apprentice_8c.html#3e97d9adddea1ab2e2af69cb57fe349d">apprentice_file</a>(ms, &<a class="code" href="compress_8c.html#52bfb08821468413d41bc3e3b38dc078">magic</a>, &nmagic, fn, action);
<a name="l00197"></a>00197 <span class="keywordflow">if</span> (rv != 0)
<a name="l00198"></a>00198 <span class="keywordflow">return</span> -1;
<a name="l00199"></a>00199 mapped = 0;
<a name="l00200"></a>00200 }
<a name="l00201"></a>00201
<a name="l00202"></a>00202 <span class="keywordflow">if</span> (rv == -1)
<a name="l00203"></a>00203 <span class="keywordflow">return</span> rv;
<a name="l00204"></a>00204 mapped = rv;
<a name="l00205"></a>00205
<a name="l00206"></a>00206 <span class="keywordflow">if</span> (<a class="code" href="compress_8c.html#52bfb08821468413d41bc3e3b38dc078">magic</a> == NULL || nmagic == 0) {
<a name="l00207"></a>00207 <a class="code" href="apprentice_8c.html#728d8460355bf68b718d2485829f0c4d">file_delmagic</a>(<a class="code" href="compress_8c.html#52bfb08821468413d41bc3e3b38dc078">magic</a>, mapped, nmagic);
<a name="l00208"></a>00208 <span class="keywordflow">return</span> -1;
<a name="l00209"></a>00209 }
<a name="l00210"></a>00210
<a name="l00211"></a>00211 <span class="keywordflow">if</span> ((ml = malloc(<span class="keyword">sizeof</span>(*ml))) == NULL) {
<a name="l00212"></a>00212 <a class="code" href="apprentice_8c.html#728d8460355bf68b718d2485829f0c4d">file_delmagic</a>(<a class="code" href="compress_8c.html#52bfb08821468413d41bc3e3b38dc078">magic</a>, mapped, nmagic);
<a name="l00213"></a>00213 <a class="code" href="file_8h.html#2a6681ad1c2bb84271d99480438f9bcf">file_oomem</a>(ms);
<a name="l00214"></a>00214 <span class="keywordflow">return</span> -1;
<a name="l00215"></a>00215 }
<a name="l00216"></a>00216
<a name="l00217"></a>00217 ml->magic = <a class="code" href="compress_8c.html#52bfb08821468413d41bc3e3b38dc078">magic</a>;
<a name="l00218"></a>00218 ml->nmagic = nmagic;
<a name="l00219"></a>00219 ml->mapped = mapped;
<a name="l00220"></a>00220
<a name="l00221"></a>00221 mlist-><a class="code" href="structmlist.html#7bfc3bb7e579b328319b33db16c10c30">prev</a>-><a class="code" href="structmlist.html#ee40821902e1c8a56cc56b50707dfa17">next</a> = ml;
<a name="l00222"></a>00222 ml-><a class="code" href="structmlist.html#7bfc3bb7e579b328319b33db16c10c30">prev</a> = mlist-><a class="code" href="structmlist.html#7bfc3bb7e579b328319b33db16c10c30">prev</a>;
<a name="l00223"></a>00223 ml-><a class="code" href="structmlist.html#ee40821902e1c8a56cc56b50707dfa17">next</a> = mlist;
<a name="l00224"></a>00224 mlist-><a class="code" href="structmlist.html#7bfc3bb7e579b328319b33db16c10c30">prev</a> = ml;
<a name="l00225"></a>00225
<a name="l00226"></a>00226 <span class="keywordflow">return</span> 0;
<a name="l00227"></a>00227 <span class="preprocessor">#endif </span><span class="comment">/* COMPILE_ONLY */</span>
<a name="l00228"></a>00228 }
<a name="l00229"></a>00229
<a name="l00230"></a>00230 <span class="keyword">protected</span> <span class="keywordtype">void</span>
<a name="l00231"></a><a class="code" href="file_8h.html#728d8460355bf68b718d2485829f0c4d">00231</a> <a class="code" href="apprentice_8c.html#728d8460355bf68b718d2485829f0c4d">file_delmagic</a>(<span class="keyword">struct</span> <a class="code" href="structmagic.html">magic</a> *p, <span class="keywordtype">int</span> type, size_t entries)
<a name="l00232"></a>00232 {
<a name="l00233"></a>00233 <span class="keywordflow">if</span> (p == NULL)
<a name="l00234"></a>00234 <span class="keywordflow">return</span>;
<a name="l00235"></a>00235 <span class="keywordflow">switch</span> (type) {
<a name="l00236"></a>00236 <span class="keywordflow">case</span> 2:
<a name="l00237"></a>00237 p--;
<a name="l00238"></a>00238 (void)munmap((<span class="keywordtype">void</span> *)p, <span class="keyword">sizeof</span>(*p) * (entries + 1));
<a name="l00239"></a>00239 <span class="keywordflow">break</span>;
<a name="l00240"></a>00240 <span class="keywordflow">case</span> 1:
<a name="l00241"></a>00241 p--;
<a name="l00242"></a>00242 <span class="comment">/*@fallthrough@*/</span>
<a name="l00243"></a>00243 <span class="keywordflow">case</span> 0:
<a name="l00244"></a>00244 free(p);
<a name="l00245"></a>00245 <span class="keywordflow">break</span>;
<a name="l00246"></a>00246 <span class="keywordflow">default</span>:
<a name="l00247"></a>00247 abort();
<a name="l00248"></a>00248 }
<a name="l00249"></a>00249 }
<a name="l00250"></a>00250
<a name="l00251"></a>00251
<a name="l00252"></a>00252 <span class="comment">/* const char *fn: list of magic files */</span>
<a name="l00253"></a>00253 <span class="keyword">protected</span> <span class="keyword">struct </span><a class="code" href="structmlist.html">mlist</a> *
<a name="l00254"></a><a class="code" href="file_8h.html#30fd08c396c7a49d06cfa9d120e79886">00254</a> <a class="code" href="apprentice_8c.html#8028adb76e8e80362c304c1ea8914a8f">file_apprentice</a>(<span class="keyword">struct</span> <a class="code" href="structmagic__set.html">magic_set</a> *ms, <span class="keyword">const</span> <span class="keywordtype">char</span> *fn, <span class="keywordtype">int</span> action)
<a name="l00255"></a>00255 {
<a name="l00256"></a>00256 <span class="keywordtype">char</span> *p, *mfn, *afn = NULL;
<a name="l00257"></a>00257 <span class="keywordtype">int</span> file_err, errs = -1;
<a name="l00258"></a>00258 <span class="keyword">struct </span><a class="code" href="structmlist.html">mlist</a> *<a class="code" href="structmlist.html">mlist</a>;
<a name="l00259"></a>00259
<a name="l00260"></a>00260 <span class="keywordflow">if</span> (fn == NULL)
<a name="l00261"></a>00261 fn = <a class="code" href="system_8h.html#bc6595dbf6880c71628fecf0dbb23d66">getenv</a>(<span class="stringliteral">"MAGIC"</span>);
<a name="l00262"></a>00262 <span class="keywordflow">if</span> (fn == NULL)
<a name="l00263"></a>00263 fn = <a class="code" href="file_8h.html#94630370ae389fb1189282fa0742f310">MAGIC</a>;
<a name="l00264"></a>00264
<a name="l00265"></a>00265 <span class="keywordflow">if</span> ((fn = mfn = strdup(fn)) == NULL) {
<a name="l00266"></a>00266 <a class="code" href="file_8h.html#2a6681ad1c2bb84271d99480438f9bcf">file_oomem</a>(ms);
<a name="l00267"></a>00267 <span class="keywordflow">return</span> NULL;
<a name="l00268"></a>00268 }
<a name="l00269"></a>00269
<a name="l00270"></a>00270 <span class="keywordflow">if</span> ((mlist = malloc(<span class="keyword">sizeof</span>(*mlist))) == NULL) {
<a name="l00271"></a>00271 free(mfn);
<a name="l00272"></a>00272 <a class="code" href="file_8h.html#2a6681ad1c2bb84271d99480438f9bcf">file_oomem</a>(ms);
<a name="l00273"></a>00273 <span class="keywordflow">return</span> NULL;
<a name="l00274"></a>00274 }
<a name="l00275"></a>00275 mlist->next = mlist->prev = mlist;
<a name="l00276"></a>00276
<a name="l00277"></a>00277 <span class="keywordflow">while</span> (fn) {
<a name="l00278"></a>00278 p = strchr(fn, <a class="code" href="file_8h.html#dd147d27dd39c3119dfd2d2e7868a66b">PATHSEP</a>);
<a name="l00279"></a>00279 <span class="keywordflow">if</span> (p)
<a name="l00280"></a>00280 *p++ = <span class="charliteral">'\0'</span>;
<a name="l00281"></a>00281 <span class="keywordflow">if</span> (*fn == <span class="charliteral">'\0'</span>)
<a name="l00282"></a>00282 <span class="keywordflow">break</span>;
<a name="l00283"></a>00283 <span class="keywordflow">if</span> (ms-><a class="code" href="structmagic__set.html#7677d8f81949874cf4a626d1d4566fc6">flags</a> & MAGIC_MIME) {
<a name="l00284"></a>00284 <span class="keywordflow">if</span> ((afn = malloc(strlen(fn) + 5 + 1)) == NULL) {
<a name="l00285"></a>00285 free(mfn);
<a name="l00286"></a>00286 free(mlist);
<a name="l00287"></a>00287 <a class="code" href="file_8h.html#2a6681ad1c2bb84271d99480438f9bcf">file_oomem</a>(ms);
<a name="l00288"></a>00288 <span class="keywordflow">return</span> NULL;
<a name="l00289"></a>00289 }
<a name="l00290"></a>00290 (void)strcpy(afn, fn);
<a name="l00291"></a>00291 (void)strcat(afn, <span class="stringliteral">".mime"</span>);
<a name="l00292"></a>00292 fn = afn;
<a name="l00293"></a>00293 }
<a name="l00294"></a>00294 file_err = <a class="code" href="apprentice_8c.html#b3b68e53a202e68fb9d7953209b29b5c">apprentice_1</a>(ms, fn, action, mlist);
<a name="l00295"></a>00295 <span class="keywordflow">if</span> (file_err > errs)
<a name="l00296"></a>00296 errs = file_err;
<a name="l00297"></a>00297 <span class="keywordflow">if</span> (afn) {
<a name="l00298"></a>00298 free(afn);
<a name="l00299"></a>00299 afn = NULL;
<a name="l00300"></a>00300 }
<a name="l00301"></a>00301 fn = p;
<a name="l00302"></a>00302 }
<a name="l00303"></a>00303 <span class="keywordflow">if</span> (errs == -1) {
<a name="l00304"></a>00304 free(mfn);
<a name="l00305"></a>00305 free(mlist);
<a name="l00306"></a>00306 mlist = NULL;
<a name="l00307"></a>00307 <a class="code" href="file_8h.html#b97a2a8e3a9e23613bcb1a49c4411919">file_error</a>(ms, 0, <span class="stringliteral">"could not find any magic files!"</span>);
<a name="l00308"></a>00308 <span class="keywordflow">return</span> NULL;
<a name="l00309"></a>00309 }
<a name="l00310"></a>00310 free(mfn);
<a name="l00311"></a>00311 <span class="keywordflow">return</span> mlist;
<a name="l00312"></a>00312 }
<a name="l00313"></a>00313
<a name="l00314"></a>00314 <span class="comment">/*</span>
<a name="l00315"></a>00315 <span class="comment"> * parse from a file</span>
<a name="l00316"></a>00316 <span class="comment"> * const char *fn: name of magic file</span>
<a name="l00317"></a>00317 <span class="comment"> */</span>
<a name="l00318"></a>00318 <span class="keyword">private</span> <span class="keywordtype">int</span>
<a name="l00319"></a><a class="code" href="apprentice_8c.html#3e97d9adddea1ab2e2af69cb57fe349d">00319</a> <a class="code" href="apprentice_8c.html#3e97d9adddea1ab2e2af69cb57fe349d">apprentice_file</a>(<span class="keyword">struct</span> <a class="code" href="structmagic__set.html">magic_set</a> *ms, <span class="keyword">struct</span> <a class="code" href="structmagic.html">magic</a> **magicp, uint32_t *nmagicp,
<a name="l00320"></a>00320 <span class="keyword">const</span> <span class="keywordtype">char</span> *fn, <span class="keywordtype">int</span> action)
<a name="l00321"></a>00321 {
<a name="l00322"></a>00322 <span class="keyword">private</span> <span class="keyword">const</span> <span class="keywordtype">char</span> hdr[] =
<a name="l00323"></a>00323 <span class="stringliteral">"cont\toffset\ttype\topcode\tmask\tvalue\tdesc"</span>;
<a name="l00324"></a>00324 FILE *f;
<a name="l00325"></a>00325 <span class="keywordtype">char</span> line[BUFSIZ+1];
<a name="l00326"></a>00326 <span class="keywordtype">int</span> errs = 0;
<a name="l00327"></a>00327
<a name="l00328"></a>00328 f = fopen(ms-><a class="code" href="structmagic__set.html#19ffcacf3acff9f80bbaedcbe41a27e7">file</a> = fn, <span class="stringliteral">"r"</span>);
<a name="l00329"></a>00329 <span class="keywordflow">if</span> (f == NULL) {
<a name="l00330"></a>00330 <span class="keywordflow">if</span> (<a class="code" href="system_8h.html#d65a8842cc674e3ddf69355898c0ecbf">errno</a> != ENOENT)
<a name="l00331"></a>00331 <a class="code" href="file_8h.html#b97a2a8e3a9e23613bcb1a49c4411919">file_error</a>(ms, <a class="code" href="system_8h.html#d65a8842cc674e3ddf69355898c0ecbf">errno</a>, <span class="stringliteral">"cannot read magic file `%s'"</span>,
<a name="l00332"></a>00332 fn);
<a name="l00333"></a>00333 <span class="keywordflow">return</span> -1;
<a name="l00334"></a>00334 }
<a name="l00335"></a>00335
<a name="l00336"></a>00336 maxmagic = <a class="code" href="file_8h.html#e3c6ca00d52131a80e7154231bb12caf">MAXMAGIS</a>;
<a name="l00337"></a>00337 *magicp = (<span class="keyword">struct </span><a class="code" href="structmagic.html">magic</a> *) calloc(maxmagic, <span class="keyword">sizeof</span>(<span class="keyword">struct</span> <a class="code" href="structmagic.html">magic</a>));
<a name="l00338"></a>00338 <span class="keywordflow">if</span> (*magicp == NULL) {
<a name="l00339"></a>00339 (void)fclose(f);
<a name="l00340"></a>00340 <a class="code" href="file_8h.html#2a6681ad1c2bb84271d99480438f9bcf">file_oomem</a>(ms);
<a name="l00341"></a>00341 <span class="keywordflow">return</span> -1;
<a name="l00342"></a>00342 }
<a name="l00343"></a>00343
<a name="l00344"></a>00344 <span class="comment">/* print silly verbose header for USG compat. */</span>
<a name="l00345"></a>00345 <span class="keywordflow">if</span> (action == <a class="code" href="file_8h.html#4cfcd6b1de0e51b20358e6b310744410">FILE_CHECK</a>)
<a name="l00346"></a>00346 (void)fprintf(stderr, <span class="stringliteral">"%s\n"</span>, hdr);
<a name="l00347"></a>00347
<a name="l00348"></a>00348 <span class="comment">/* parse it */</span>
<a name="l00349"></a>00349 <span class="keywordflow">for</span> (ms-><a class="code" href="structmagic__set.html#f04a41e2481f30bb08c07daacdd229dd">line</a> = 1; fgets(line, BUFSIZ, f) != NULL; ms-><a class="code" href="structmagic__set.html#f04a41e2481f30bb08c07daacdd229dd">line</a>++) {
<a name="l00350"></a>00350 size_t len;
<a name="l00351"></a>00351 <span class="keywordflow">if</span> (line[0]==<span class="charliteral">'#'</span>) <span class="comment">/* comment, do not parse */</span>
<a name="l00352"></a>00352 <span class="keywordflow">continue</span>;
<a name="l00353"></a>00353 len = strlen(line);
<a name="l00354"></a>00354 <span class="keywordflow">if</span> (len < 2) <span class="comment">/* null line, garbage, etc */</span>
<a name="l00355"></a>00355 <span class="keywordflow">continue</span>;
<a name="l00356"></a>00356 line[len - 1] = <span class="charliteral">'\0'</span>; <span class="comment">/* delete newline */</span>
<a name="l00357"></a>00357 <span class="keywordflow">if</span> (<a class="code" href="apprentice_8c.html#5fafd6ab7470644d1ebb2594a2058e81">parse</a>(ms, magicp, nmagicp, line, action) != 0)
<a name="l00358"></a>00358 errs = 1;
<a name="l00359"></a>00359 }
<a name="l00360"></a>00360
<a name="l00361"></a>00361 (void)fclose(f);
<a name="l00362"></a>00362 <span class="keywordflow">if</span> (errs) {
<a name="l00363"></a>00363 free(*magicp);
<a name="l00364"></a>00364 *magicp = NULL;
<a name="l00365"></a>00365 *nmagicp = 0;
<a name="l00366"></a>00366 }
<a name="l00367"></a>00367 <span class="keywordflow">return</span> errs;
<a name="l00368"></a>00368 }
<a name="l00369"></a>00369
<a name="l00370"></a>00370 <span class="comment">/*</span>
<a name="l00371"></a>00371 <span class="comment"> * extend the sign bit if the comparison is to be signed</span>
<a name="l00372"></a>00372 <span class="comment"> */</span>
<a name="l00373"></a>00373 <span class="keyword">protected</span> uint32_t
<a name="l00374"></a><a class="code" href="file_8h.html#a535447c189d29b969315dda16fcb6e0">00374</a> <a class="code" href="apprentice_8c.html#e28db57fd7c1d40cd154e048ca99a075">file_signextend</a>(<span class="keyword">struct</span> <a class="code" href="structmagic__set.html">magic_set</a> *ms, <span class="keyword">struct</span> <a class="code" href="structmagic.html">magic</a> *m, uint32_t v)
<a name="l00375"></a>00375 {
<a name="l00376"></a>00376 <span class="keywordflow">if</span> (!(m-><a class="code" href="structmagic.html#0e7ac867f649499f20572b513e03a132">flag</a> & <a class="code" href="file_8h.html#08cbc66092284f7da94279f986a0aae9">UNSIGNED</a>))
<a name="l00377"></a>00377 <span class="keywordflow">switch</span>(m-><a class="code" href="structmagic.html#e75b734f7c71f47276a4632fcdbf47a1">type</a>) {
<a name="l00378"></a>00378 <span class="comment">/*</span>
<a name="l00379"></a>00379 <span class="comment"> * Do not remove the casts below. They are</span>
<a name="l00380"></a>00380 <span class="comment"> * vital. When later compared with the data,</span>
<a name="l00381"></a>00381 <span class="comment"> * the sign extension must have happened.</span>
<a name="l00382"></a>00382 <span class="comment"> */</span>
<a name="l00383"></a>00383 <span class="keywordflow">case</span> <a class="code" href="file_8h.html#435c581857151ad49c8448544c420698">FILE_BYTE</a>:
<a name="l00384"></a>00384 v = (char) v;
<a name="l00385"></a>00385 <span class="keywordflow">break</span>;
<a name="l00386"></a>00386 <span class="keywordflow">case</span> <a class="code" href="file_8h.html#1c6d01dcaf1b051e1ddbd2bc3b633f8c">FILE_SHORT</a>:
<a name="l00387"></a>00387 <span class="keywordflow">case</span> <a class="code" href="file_8h.html#23e842a34b0343f1cc98cd822eaac1c7">FILE_BESHORT</a>:
<a name="l00388"></a>00388 <span class="keywordflow">case</span> <a class="code" href="file_8h.html#3540b04b2b4846fb210496cb78142f58">FILE_LESHORT</a>:
<a name="l00389"></a>00389 v = (short) v;
<a name="l00390"></a>00390 <span class="keywordflow">break</span>;
<a name="l00391"></a>00391 <span class="keywordflow">case</span> <a class="code" href="file_8h.html#d6d883aa6378340af8ce4ce8f7a4f80b">FILE_DATE</a>:
<a name="l00392"></a>00392 <span class="keywordflow">case</span> <a class="code" href="file_8h.html#a365868ea8c750fded62bc4b5e760767">FILE_BEDATE</a>:
<a name="l00393"></a>00393 <span class="keywordflow">case</span> <a class="code" href="file_8h.html#0ba7100a1f1044ff87d8f723a2e23b5c">FILE_LEDATE</a>:
<a name="l00394"></a>00394 <span class="keywordflow">case</span> <a class="code" href="file_8h.html#4b2bd5c1277a412368842d361abaa271">FILE_LDATE</a>:
<a name="l00395"></a>00395 <span class="keywordflow">case</span> <a class="code" href="file_8h.html#71937f39d86126fb0e5ef25cb311ca0a">FILE_BELDATE</a>:
<a name="l00396"></a>00396 <span class="keywordflow">case</span> <a class="code" href="file_8h.html#a229d98fb7bc70ed761f9b3d11765bf2">FILE_LELDATE</a>:
<a name="l00397"></a>00397 <span class="keywordflow">case</span> <a class="code" href="file_8h.html#35322a158d9dd1411e342b53046aa032">FILE_LONG</a>:
<a name="l00398"></a>00398 <span class="keywordflow">case</span> <a class="code" href="file_8h.html#7a9c4223732b87143c7b284abd9fda63">FILE_BELONG</a>:
<a name="l00399"></a>00399 <span class="keywordflow">case</span> <a class="code" href="file_8h.html#d95a80e01fd45266b3999f437c1b3c60">FILE_LELONG</a>:
<a name="l00400"></a>00400 v = (int32_t) v;
<a name="l00401"></a>00401 <span class="keywordflow">break</span>;
<a name="l00402"></a>00402 <span class="keywordflow">case</span> <a class="code" href="file_8h.html#4ac938e6d36a7f8a52c4394b0077464f">FILE_STRING</a>:
<a name="l00403"></a>00403 <span class="keywordflow">case</span> <a class="code" href="file_8h.html#0ee3aa128e0786d27fa8a592d2c9d1c6">FILE_PSTRING</a>:
<a name="l00404"></a>00404 <span class="keywordflow">case</span> <a class="code" href="file_8h.html#258ea58d33f4649ba27ef01f5d2c00e2">FILE_BESTRING16</a>:
<a name="l00405"></a>00405 <span class="keywordflow">case</span> <a class="code" href="file_8h.html#8f59d2f5ba3a667d3731d4d2a9270670">FILE_LESTRING16</a>:
<a name="l00406"></a>00406 <span class="keywordflow">case</span> <a class="code" href="file_8h.html#bb376719282da717a652862fc97e4b60">FILE_REGEX</a>:
<a name="l00407"></a>00407 <span class="keywordflow">case</span> <a class="code" href="file_8h.html#17a43525a99411f40d7181967e383a8e">FILE_SEARCH</a>:
<a name="l00408"></a>00408 <span class="keywordflow">break</span>;
<a name="l00409"></a>00409 <span class="keywordflow">default</span>:
<a name="l00410"></a>00410 <span class="keywordflow">if</span> (ms-><a class="code" href="structmagic__set.html#7677d8f81949874cf4a626d1d4566fc6">flags</a> & MAGIC_CHECK)
<a name="l00411"></a>00411 <a class="code" href="file_8h.html#7c997a92425ab69449e740c7c5752a93">file_magwarn</a>(ms, <span class="stringliteral">"cannot happen: m->type=%d\n"</span>,
<a name="l00412"></a>00412 m-><a class="code" href="structmagic.html#e75b734f7c71f47276a4632fcdbf47a1">type</a>);
<a name="l00413"></a>00413 <span class="keywordflow">return</span> ~0U;
<a name="l00414"></a>00414 }
<a name="l00415"></a>00415 <span class="keywordflow">return</span> v;
<a name="l00416"></a>00416 }
<a name="l00417"></a>00417
<a name="l00418"></a>00418 <span class="comment">/*</span>
<a name="l00419"></a>00419 <span class="comment"> * parse one line from magic file, put into magic[index++] if valid</span>
<a name="l00420"></a>00420 <span class="comment"> */</span>
<a name="l00421"></a>00421 <span class="keyword">private</span> <span class="keywordtype">int</span>
<a name="l00422"></a><a class="code" href="apprentice_8c.html#5fafd6ab7470644d1ebb2594a2058e81">00422</a> <a class="code" href="apprentice_8c.html#5fafd6ab7470644d1ebb2594a2058e81">parse</a>(<span class="keyword">struct</span> <a class="code" href="structmagic__set.html">magic_set</a> *ms, <span class="keyword">struct</span> <a class="code" href="structmagic.html">magic</a> **magicp, uint32_t *nmagicp, <span class="keywordtype">char</span> *l,
<a name="l00423"></a>00423 <span class="keywordtype">int</span> action)
<a name="l00424"></a>00424 {
<a name="l00425"></a>00425 <span class="keywordtype">int</span> i = 0;
<a name="l00426"></a>00426 <span class="keyword">struct </span><a class="code" href="structmagic.html">magic</a> *m;
<a name="l00427"></a>00427 <span class="keywordtype">char</span> *t;
<a name="l00428"></a>00428 <span class="comment">/*@observer@*/</span>
<a name="l00429"></a>00429 <span class="keyword">private</span> <span class="keyword">const</span> <span class="keywordtype">char</span> *fops = <a class="code" href="file_8h.html#bd7d3642fe3a166d39cc1622636a0007">FILE_OPS</a>;
<a name="l00430"></a>00430 uint32_t val;
<a name="l00431"></a>00431
<a name="l00432"></a>00432 <span class="preprocessor">#define ALLOC_INCR 200</span>
<a name="l00433"></a>00433 <span class="preprocessor"></span> <span class="keywordflow">if</span> (*nmagicp + 1 >= maxmagic){
<a name="l00434"></a>00434 maxmagic += <a class="code" href="apprentice_8c.html#56642880a90f8df2767f09219b7affb0">ALLOC_INCR</a>;
<a name="l00435"></a>00435 <span class="comment">/*@-unqualifiedtrans@*/</span>
<a name="l00436"></a>00436 <span class="keywordflow">if</span> ((m = (<span class="keyword">struct</span> <a class="code" href="structmagic.html">magic</a> *) realloc(*magicp,
<a name="l00437"></a>00437 <span class="keyword">sizeof</span>(<span class="keyword">struct</span> magic) * maxmagic)) == NULL) {
<a name="l00438"></a>00438 <a class="code" href="file_8h.html#2a6681ad1c2bb84271d99480438f9bcf">file_oomem</a>(ms);
<a name="l00439"></a>00439 <span class="keywordflow">if</span> (*magicp)
<a name="l00440"></a>00440 free(*magicp);
<a name="l00441"></a>00441 <span class="keywordflow">return</span> -1;
<a name="l00442"></a>00442 }
<a name="l00443"></a>00443 <span class="comment">/*@=unqualifiedtrans@*/</span>
<a name="l00444"></a>00444 *magicp = m;
<a name="l00445"></a>00445 memset(&(*magicp)[*nmagicp], 0, <span class="keyword">sizeof</span>(<span class="keyword">struct</span> magic)
<a name="l00446"></a>00446 * <a class="code" href="apprentice_8c.html#56642880a90f8df2767f09219b7affb0">ALLOC_INCR</a>);
<a name="l00447"></a>00447 }
<a name="l00448"></a>00448 m = &(*magicp)[*nmagicp];
<a name="l00449"></a>00449 m-><a class="code" href="structmagic.html#0e7ac867f649499f20572b513e03a132">flag</a> = 0;
<a name="l00450"></a>00450 m-><a class="code" href="structmagic.html#23a46cd1d650d2df768ab0ad4a6f3f12">cont_level</a> = 0;
<a name="l00451"></a>00451
<a name="l00452"></a>00452 <span class="keywordflow">while</span> (*l == <span class="charliteral">'>'</span>) {
<a name="l00453"></a>00453 ++l; <span class="comment">/* step over */</span>
<a name="l00454"></a>00454 m-><a class="code" href="structmagic.html#23a46cd1d650d2df768ab0ad4a6f3f12">cont_level</a>++;
<a name="l00455"></a>00455 }
<a name="l00456"></a>00456
<a name="l00457"></a>00457 <span class="keywordflow">if</span> (m-><a class="code" href="structmagic.html#23a46cd1d650d2df768ab0ad4a6f3f12">cont_level</a> != 0 && *l == <span class="charliteral">'&'</span>) {
<a name="l00458"></a>00458 ++l; <span class="comment">/* step over */</span>
<a name="l00459"></a>00459 m-><a class="code" href="structmagic.html#0e7ac867f649499f20572b513e03a132">flag</a> |= <a class="code" href="file_8h.html#b3455a16f39c62aa951a062e90c0c555">OFFADD</a>;
<a name="l00460"></a>00460 }
<a name="l00461"></a>00461 <span class="keywordflow">if</span> (m-><a class="code" href="structmagic.html#23a46cd1d650d2df768ab0ad4a6f3f12">cont_level</a> != 0 && *l == <span class="charliteral">'('</span>) {
<a name="l00462"></a>00462 ++l; <span class="comment">/* step over */</span>
<a name="l00463"></a>00463 m-><a class="code" href="structmagic.html#0e7ac867f649499f20572b513e03a132">flag</a> |= <a class="code" href="file_8h.html#097a22443ff91fcbc27895fb27a86ba1">INDIR</a>;
<a name="l00464"></a>00464 <span class="keywordflow">if</span> (m-><a class="code" href="structmagic.html#0e7ac867f649499f20572b513e03a132">flag</a> & <a class="code" href="file_8h.html#b3455a16f39c62aa951a062e90c0c555">OFFADD</a>)
<a name="l00465"></a>00465 m-><a class="code" href="structmagic.html#0e7ac867f649499f20572b513e03a132">flag</a> = (m-><a class="code" href="structmagic.html#0e7ac867f649499f20572b513e03a132">flag</a> & ~<a class="code" href="file_8h.html#b3455a16f39c62aa951a062e90c0c555">OFFADD</a>) | <a class="code" href="file_8h.html#798c3669583914c06ee420f0324f4abc">INDIROFFADD</a>;
<a name="l00466"></a>00466 }
<a name="l00467"></a>00467 <span class="keywordflow">if</span> (m-><a class="code" href="structmagic.html#23a46cd1d650d2df768ab0ad4a6f3f12">cont_level</a> != 0 && *l == <span class="charliteral">'&'</span>) {
<a name="l00468"></a>00468 ++l; <span class="comment">/* step over */</span>
<a name="l00469"></a>00469 m-><a class="code" href="structmagic.html#0e7ac867f649499f20572b513e03a132">flag</a> |= <a class="code" href="file_8h.html#b3455a16f39c62aa951a062e90c0c555">OFFADD</a>;
<a name="l00470"></a>00470 }
<a name="l00471"></a>00471
<a name="l00472"></a>00472 <span class="comment">/* get offset, then skip over it */</span>
<a name="l00473"></a>00473 m-><a class="code" href="structmagic.html#b40d534d6197e80d1080abc637c53740">offset</a> = (uint32_t)<a class="code" href="file_8h.html#b39d013bf56ccc7f9b406a8e44baf054">strtoul</a>(l, &t, 0);
<a name="l00474"></a>00474 <span class="keywordflow">if</span> (l == t)
<a name="l00475"></a>00475 <span class="keywordflow">if</span> (ms-><a class="code" href="structmagic__set.html#7677d8f81949874cf4a626d1d4566fc6">flags</a> & MAGIC_CHECK)
<a name="l00476"></a>00476 <a class="code" href="file_8h.html#7c997a92425ab69449e740c7c5752a93">file_magwarn</a>(ms, <span class="stringliteral">"offset `%s' invalid"</span>, l);
<a name="l00477"></a>00477 l = t;
<a name="l00478"></a>00478
<a name="l00479"></a>00479 <span class="keywordflow">if</span> (m-><a class="code" href="structmagic.html#0e7ac867f649499f20572b513e03a132">flag</a> & <a class="code" href="file_8h.html#097a22443ff91fcbc27895fb27a86ba1">INDIR</a>) {
<a name="l00480"></a>00480 m-><a class="code" href="structmagic.html#d9115d240386e20609dc6f69a3403319">in_type</a> = <a class="code" href="file_8h.html#35322a158d9dd1411e342b53046aa032">FILE_LONG</a>;
<a name="l00481"></a>00481 m-><a class="code" href="structmagic.html#b0cfe17fa1f034128c80fb5dea7daf5e">in_offset</a> = 0;
<a name="l00482"></a>00482 <span class="comment">/*</span>
<a name="l00483"></a>00483 <span class="comment"> * read [.lbs][+-]nnnnn)</span>
<a name="l00484"></a>00484 <span class="comment"> */</span>
<a name="l00485"></a>00485 <span class="keywordflow">if</span> (*l == <span class="charliteral">'.'</span>) {
<a name="l00486"></a>00486 l++;
<a name="l00487"></a>00487 <span class="keywordflow">switch</span> (*l) {
<a name="l00488"></a>00488 <span class="keywordflow">case</span> <span class="charliteral">'l'</span>:
<a name="l00489"></a>00489 m-><a class="code" href="structmagic.html#d9115d240386e20609dc6f69a3403319">in_type</a> = <a class="code" href="file_8h.html#d95a80e01fd45266b3999f437c1b3c60">FILE_LELONG</a>;
<a name="l00490"></a>00490 <span class="keywordflow">break</span>;
<a name="l00491"></a>00491 <span class="keywordflow">case</span> <span class="charliteral">'L'</span>:
<a name="l00492"></a>00492 m-><a class="code" href="structmagic.html#d9115d240386e20609dc6f69a3403319">in_type</a> = <a class="code" href="file_8h.html#7a9c4223732b87143c7b284abd9fda63">FILE_BELONG</a>;
<a name="l00493"></a>00493 <span class="keywordflow">break</span>;
<a name="l00494"></a>00494 <span class="keywordflow">case</span> <span class="charliteral">'h'</span>:
<a name="l00495"></a>00495 <span class="keywordflow">case</span> <span class="charliteral">'s'</span>:
<a name="l00496"></a>00496 m-><a class="code" href="structmagic.html#d9115d240386e20609dc6f69a3403319">in_type</a> = <a class="code" href="file_8h.html#3540b04b2b4846fb210496cb78142f58">FILE_LESHORT</a>;
<a name="l00497"></a>00497 <span class="keywordflow">break</span>;
<a name="l00498"></a>00498 <span class="keywordflow">case</span> <span class="charliteral">'H'</span>:
<a name="l00499"></a>00499 <span class="keywordflow">case</span> <span class="charliteral">'S'</span>:
<a name="l00500"></a>00500 m-><a class="code" href="structmagic.html#d9115d240386e20609dc6f69a3403319">in_type</a> = <a class="code" href="file_8h.html#23e842a34b0343f1cc98cd822eaac1c7">FILE_BESHORT</a>;
<a name="l00501"></a>00501 <span class="keywordflow">break</span>;
<a name="l00502"></a>00502 <span class="keywordflow">case</span> <span class="charliteral">'c'</span>:
<a name="l00503"></a>00503 <span class="keywordflow">case</span> <span class="charliteral">'b'</span>:
<a name="l00504"></a>00504 <span class="keywordflow">case</span> <span class="charliteral">'C'</span>:
<a name="l00505"></a>00505 <span class="keywordflow">case</span> <span class="charliteral">'B'</span>:
<a name="l00506"></a>00506 m-><a class="code" href="structmagic.html#d9115d240386e20609dc6f69a3403319">in_type</a> = <a class="code" href="file_8h.html#435c581857151ad49c8448544c420698">FILE_BYTE</a>;
<a name="l00507"></a>00507 <span class="keywordflow">break</span>;
<a name="l00508"></a>00508 <span class="keywordflow">default</span>:
<a name="l00509"></a>00509 <span class="keywordflow">if</span> (ms->flags & MAGIC_CHECK)
<a name="l00510"></a>00510 <a class="code" href="file_8h.html#7c997a92425ab69449e740c7c5752a93">file_magwarn</a>(ms,
<a name="l00511"></a>00511 <span class="stringliteral">"indirect offset type `%c' invalid"</span>,
<a name="l00512"></a>00512 *l);
<a name="l00513"></a>00513 <span class="keywordflow">break</span>;
<a name="l00514"></a>00514 }
<a name="l00515"></a>00515 l++;
<a name="l00516"></a>00516 }
<a name="l00517"></a>00517 <span class="keywordflow">if</span> (*l == <span class="charliteral">'~'</span>) {
<a name="l00518"></a>00518 m-><a class="code" href="structmagic.html#a7f05dc2642e74b56f9f755d07a6802a">in_op</a> |= <a class="code" href="file_8h.html#f4b4aedbfa8c6afecd008b4243928d4f">FILE_OPINVERSE</a>;
<a name="l00519"></a>00519 l++;
<a name="l00520"></a>00520 }
<a name="l00521"></a>00521 <span class="keywordflow">switch</span> (*l) {
<a name="l00522"></a>00522 <span class="keywordflow">case</span> <span class="charliteral">'&'</span>:
<a name="l00523"></a>00523 m-><a class="code" href="structmagic.html#a7f05dc2642e74b56f9f755d07a6802a">in_op</a> |= <a class="code" href="file_8h.html#2458959ceb0aebeea32770431819b2b9">FILE_OPAND</a>;
<a name="l00524"></a>00524 l++;
<a name="l00525"></a>00525 <span class="keywordflow">break</span>;
<a name="l00526"></a>00526 <span class="keywordflow">case</span> <span class="charliteral">'|'</span>:
<a name="l00527"></a>00527 m-><a class="code" href="structmagic.html#a7f05dc2642e74b56f9f755d07a6802a">in_op</a> |= <a class="code" href="file_8h.html#1bf5a4964b43abe9b7dc6a9b197ff75c">FILE_OPOR</a>;
<a name="l00528"></a>00528 l++;
<a name="l00529"></a>00529 <span class="keywordflow">break</span>;
<a name="l00530"></a>00530 <span class="keywordflow">case</span> <span class="charliteral">'^'</span>:
<a name="l00531"></a>00531 m-><a class="code" href="structmagic.html#a7f05dc2642e74b56f9f755d07a6802a">in_op</a> |= <a class="code" href="file_8h.html#04a72e92ac5f7abf7de19b4787b00bb9">FILE_OPXOR</a>;
<a name="l00532"></a>00532 l++;
<a name="l00533"></a>00533 <span class="keywordflow">break</span>;
<a name="l00534"></a>00534 <span class="keywordflow">case</span> <span class="charliteral">'+'</span>:
<a name="l00535"></a>00535 m-><a class="code" href="structmagic.html#a7f05dc2642e74b56f9f755d07a6802a">in_op</a> |= <a class="code" href="file_8h.html#92729255771e93cef5ce0ff2753abaae">FILE_OPADD</a>;
<a name="l00536"></a>00536 l++;
<a name="l00537"></a>00537 <span class="keywordflow">break</span>;
<a name="l00538"></a>00538 <span class="keywordflow">case</span> <span class="charliteral">'-'</span>:
<a name="l00539"></a>00539 m-><a class="code" href="structmagic.html#a7f05dc2642e74b56f9f755d07a6802a">in_op</a> |= <a class="code" href="file_8h.html#dff6b072a0c3f988a28ff362eda8a8bd">FILE_OPMINUS</a>;
<a name="l00540"></a>00540 l++;
<a name="l00541"></a>00541 <span class="keywordflow">break</span>;
<a name="l00542"></a>00542 <span class="keywordflow">case</span> <span class="charliteral">'*'</span>:
<a name="l00543"></a>00543 m-><a class="code" href="structmagic.html#a7f05dc2642e74b56f9f755d07a6802a">in_op</a> |= <a class="code" href="file_8h.html#ef4474425da7fab4eb93f77e465b40f7">FILE_OPMULTIPLY</a>;
<a name="l00544"></a>00544 l++;
<a name="l00545"></a>00545 <span class="keywordflow">break</span>;
<a name="l00546"></a>00546 <span class="keywordflow">case</span> <span class="charliteral">'/'</span>:
<a name="l00547"></a>00547 m-><a class="code" href="structmagic.html#a7f05dc2642e74b56f9f755d07a6802a">in_op</a> |= <a class="code" href="file_8h.html#7055324280e0c3042cbf153538a22153">FILE_OPDIVIDE</a>;
<a name="l00548"></a>00548 l++;
<a name="l00549"></a>00549 <span class="keywordflow">break</span>;
<a name="l00550"></a>00550 <span class="keywordflow">case</span> <span class="charliteral">'%'</span>:
<a name="l00551"></a>00551 m-><a class="code" href="structmagic.html#a7f05dc2642e74b56f9f755d07a6802a">in_op</a> |= <a class="code" href="file_8h.html#5d2222c2f36a031bd242fc85abcdcdd5">FILE_OPMODULO</a>;
<a name="l00552"></a>00552 l++;
<a name="l00553"></a>00553 <span class="keywordflow">break</span>;
<a name="l00554"></a>00554 }
<a name="l00555"></a>00555 <span class="keywordflow">if</span> (*l == <span class="charliteral">'('</span>) {
<a name="l00556"></a>00556 m-><a class="code" href="structmagic.html#a7f05dc2642e74b56f9f755d07a6802a">in_op</a> |= <a class="code" href="file_8h.html#99d2334c6d27b2eee87c6bbe5b54ea23">FILE_OPINDIRECT</a>;
<a name="l00557"></a>00557 l++;
<a name="l00558"></a>00558 }
<a name="l00559"></a>00559 <span class="keywordflow">if</span> (isdigit((<span class="keywordtype">unsigned</span> <span class="keywordtype">char</span>)*l) || *l == <span class="charliteral">'-'</span>)
<a name="l00560"></a>00560 m-><a class="code" href="structmagic.html#b0cfe17fa1f034128c80fb5dea7daf5e">in_offset</a> = (int32_t)strtol(l, &t, 0);
<a name="l00561"></a>00561 <span class="keywordflow">else</span>
<a name="l00562"></a>00562 t = l;
<a name="l00563"></a>00563 <span class="keywordflow">if</span> (*t++ != <span class="charliteral">')'</span> ||
<a name="l00564"></a>00564 ((m-><a class="code" href="structmagic.html#a7f05dc2642e74b56f9f755d07a6802a">in_op</a> & <a class="code" href="file_8h.html#99d2334c6d27b2eee87c6bbe5b54ea23">FILE_OPINDIRECT</a>) && *t++ != <span class="charliteral">')'</span>))
<a name="l00565"></a>00565 <span class="keywordflow">if</span> (ms->flags & MAGIC_CHECK)
<a name="l00566"></a>00566 <a class="code" href="file_8h.html#7c997a92425ab69449e740c7c5752a93">file_magwarn</a>(ms,
<a name="l00567"></a>00567 <span class="stringliteral">"missing ')' in indirect offset"</span>);
<a name="l00568"></a>00568 l = t;
<a name="l00569"></a>00569 }
<a name="l00570"></a>00570
<a name="l00571"></a>00571
<a name="l00572"></a>00572 <span class="keywordflow">while</span> (isascii((<span class="keywordtype">unsigned</span> <span class="keywordtype">char</span>)*l) && isdigit((<span class="keywordtype">unsigned</span> <span class="keywordtype">char</span>)*l))
<a name="l00573"></a>00573 ++l;
<a name="l00574"></a>00574 <a class="code" href="apprentice_8c.html#4a8b4779f1126316143e8f354f0c85d4">EATAB</a>;
<a name="l00575"></a>00575
<a name="l00576"></a>00576 <span class="preprocessor">#define NBYTE 4</span>
<a name="l00577"></a>00577 <span class="preprocessor"></span><span class="preprocessor">#define NSHORT 5</span>
<a name="l00578"></a>00578 <span class="preprocessor"></span><span class="preprocessor">#define NLONG 4</span>
<a name="l00579"></a>00579 <span class="preprocessor"></span><span class="preprocessor">#define NSTRING 6</span>
<a name="l00580"></a>00580 <span class="preprocessor"></span><span class="preprocessor">#define NDATE 4</span>
<a name="l00581"></a>00581 <span class="preprocessor"></span><span class="preprocessor">#define NBESHORT 7</span>
<a name="l00582"></a>00582 <span class="preprocessor"></span><span class="preprocessor">#define NBELONG 6</span>
<a name="l00583"></a>00583 <span class="preprocessor"></span><span class="preprocessor">#define NBEDATE 6</span>
<a name="l00584"></a>00584 <span class="preprocessor"></span><span class="preprocessor">#define NLESHORT 7</span>
<a name="l00585"></a>00585 <span class="preprocessor"></span><span class="preprocessor">#define NLELONG 6</span>
<a name="l00586"></a>00586 <span class="preprocessor"></span><span class="preprocessor">#define NLEDATE 6</span>
<a name="l00587"></a>00587 <span class="preprocessor"></span><span class="preprocessor">#define NPSTRING 7</span>
<a name="l00588"></a>00588 <span class="preprocessor"></span><span class="preprocessor">#define NLDATE 5</span>
<a name="l00589"></a>00589 <span class="preprocessor"></span><span class="preprocessor">#define NBELDATE 7</span>
<a name="l00590"></a>00590 <span class="preprocessor"></span><span class="preprocessor">#define NLELDATE 7</span>
<a name="l00591"></a>00591 <span class="preprocessor"></span><span class="preprocessor">#define NREGEX 5</span>
<a name="l00592"></a>00592 <span class="preprocessor"></span><span class="preprocessor">#define NBESTRING16 10</span>
<a name="l00593"></a>00593 <span class="preprocessor"></span><span class="preprocessor">#define NLESTRING16 10</span>
<a name="l00594"></a>00594 <span class="preprocessor"></span><span class="preprocessor">#define NSEARCH 6</span>
<a name="l00595"></a>00595 <span class="preprocessor"></span>
<a name="l00596"></a>00596 <span class="keywordflow">if</span> (*l == <span class="charliteral">'u'</span>) {
<a name="l00597"></a>00597 ++l;
<a name="l00598"></a>00598 m-><a class="code" href="structmagic.html#0e7ac867f649499f20572b513e03a132">flag</a> |= <a class="code" href="file_8h.html#08cbc66092284f7da94279f986a0aae9">UNSIGNED</a>;
<a name="l00599"></a>00599 }
<a name="l00600"></a>00600
<a name="l00601"></a>00601 <span class="comment">/* get type, skip it */</span>
<a name="l00602"></a>00602 <span class="keywordflow">if</span> (strncmp(l, <span class="stringliteral">"char"</span>, <a class="code" href="apprentice_8c.html#88d02d8f807d622a0f67291fefe9c227">NBYTE</a>)==0) { <span class="comment">/* HP/UX compat */</span>
<a name="l00603"></a>00603 m-><a class="code" href="structmagic.html#e75b734f7c71f47276a4632fcdbf47a1">type</a> = <a class="code" href="file_8h.html#435c581857151ad49c8448544c420698">FILE_BYTE</a>;
<a name="l00604"></a>00604 l += <a class="code" href="apprentice_8c.html#88d02d8f807d622a0f67291fefe9c227">NBYTE</a>;
<a name="l00605"></a>00605 } <span class="keywordflow">else</span> <span class="keywordflow">if</span> (strncmp(l, <span class="stringliteral">"byte"</span>, <a class="code" href="apprentice_8c.html#88d02d8f807d622a0f67291fefe9c227">NBYTE</a>)==0) {
<a name="l00606"></a>00606 m-><a class="code" href="structmagic.html#e75b734f7c71f47276a4632fcdbf47a1">type</a> = <a class="code" href="file_8h.html#435c581857151ad49c8448544c420698">FILE_BYTE</a>;
<a name="l00607"></a>00607 l += <a class="code" href="apprentice_8c.html#88d02d8f807d622a0f67291fefe9c227">NBYTE</a>;
<a name="l00608"></a>00608 } <span class="keywordflow">else</span> <span class="keywordflow">if</span> (strncmp(l, <span class="stringliteral">"short"</span>, <a class="code" href="apprentice_8c.html#f7f3153d47820aa683904e16c4b9b674">NSHORT</a>)==0) {
<a name="l00609"></a>00609 m-><a class="code" href="structmagic.html#e75b734f7c71f47276a4632fcdbf47a1">type</a> = <a class="code" href="file_8h.html#1c6d01dcaf1b051e1ddbd2bc3b633f8c">FILE_SHORT</a>;
<a name="l00610"></a>00610 l += <a class="code" href="apprentice_8c.html#f7f3153d47820aa683904e16c4b9b674">NSHORT</a>;
<a name="l00611"></a>00611 } <span class="keywordflow">else</span> <span class="keywordflow">if</span> (strncmp(l, <span class="stringliteral">"long"</span>, <a class="code" href="apprentice_8c.html#efbd71729941ad031030b70b95036da2">NLONG</a>)==0) {
<a name="l00612"></a>00612 m-><a class="code" href="structmagic.html#e75b734f7c71f47276a4632fcdbf47a1">type</a> = <a class="code" href="file_8h.html#35322a158d9dd1411e342b53046aa032">FILE_LONG</a>;
<a name="l00613"></a>00613 l += <a class="code" href="apprentice_8c.html#efbd71729941ad031030b70b95036da2">NLONG</a>;
<a name="l00614"></a>00614 } <span class="keywordflow">else</span> <span class="keywordflow">if</span> (strncmp(l, <span class="stringliteral">"string"</span>, <a class="code" href="apprentice_8c.html#382b7609005c0a98c6b6f050c559aee7">NSTRING</a>)==0) {
<a name="l00615"></a>00615 m-><a class="code" href="structmagic.html#e75b734f7c71f47276a4632fcdbf47a1">type</a> = <a class="code" href="file_8h.html#4ac938e6d36a7f8a52c4394b0077464f">FILE_STRING</a>;
<a name="l00616"></a>00616 l += <a class="code" href="apprentice_8c.html#382b7609005c0a98c6b6f050c559aee7">NSTRING</a>;
<a name="l00617"></a>00617 } <span class="keywordflow">else</span> <span class="keywordflow">if</span> (strncmp(l, <span class="stringliteral">"date"</span>, <a class="code" href="apprentice_8c.html#e7a9e28616a28bc9e90ab6007a49fcf7">NDATE</a>)==0) {
<a name="l00618"></a>00618 m-><a class="code" href="structmagic.html#e75b734f7c71f47276a4632fcdbf47a1">type</a> = <a class="code" href="file_8h.html#d6d883aa6378340af8ce4ce8f7a4f80b">FILE_DATE</a>;
<a name="l00619"></a>00619 l += <a class="code" href="apprentice_8c.html#e7a9e28616a28bc9e90ab6007a49fcf7">NDATE</a>;
<a name="l00620"></a>00620 } <span class="keywordflow">else</span> <span class="keywordflow">if</span> (strncmp(l, <span class="stringliteral">"beshort"</span>, <a class="code" href="apprentice_8c.html#528dccdd2d79b9392746f8cccc8f082e">NBESHORT</a>)==0) {
<a name="l00621"></a>00621 m-><a class="code" href="structmagic.html#e75b734f7c71f47276a4632fcdbf47a1">type</a> = <a class="code" href="file_8h.html#23e842a34b0343f1cc98cd822eaac1c7">FILE_BESHORT</a>;
<a name="l00622"></a>00622 l += <a class="code" href="apprentice_8c.html#528dccdd2d79b9392746f8cccc8f082e">NBESHORT</a>;
<a name="l00623"></a>00623 } <span class="keywordflow">else</span> <span class="keywordflow">if</span> (strncmp(l, <span class="stringliteral">"belong"</span>, <a class="code" href="apprentice_8c.html#56ec043c57abfd56db63715243c6736a">NBELONG</a>)==0) {
<a name="l00624"></a>00624 m-><a class="code" href="structmagic.html#e75b734f7c71f47276a4632fcdbf47a1">type</a> = <a class="code" href="file_8h.html#7a9c4223732b87143c7b284abd9fda63">FILE_BELONG</a>;
<a name="l00625"></a>00625 l += <a class="code" href="apprentice_8c.html#56ec043c57abfd56db63715243c6736a">NBELONG</a>;
<a name="l00626"></a>00626 } <span class="keywordflow">else</span> <span class="keywordflow">if</span> (strncmp(l, <span class="stringliteral">"bedate"</span>, <a class="code" href="apprentice_8c.html#9a5f47e720cb9b80a33de2fec2fb8891">NBEDATE</a>)==0) {
<a name="l00627"></a>00627 m-><a class="code" href="structmagic.html#e75b734f7c71f47276a4632fcdbf47a1">type</a> = <a class="code" href="file_8h.html#a365868ea8c750fded62bc4b5e760767">FILE_BEDATE</a>;
<a name="l00628"></a>00628 l += <a class="code" href="apprentice_8c.html#9a5f47e720cb9b80a33de2fec2fb8891">NBEDATE</a>;
<a name="l00629"></a>00629 } <span class="keywordflow">else</span> <span class="keywordflow">if</span> (strncmp(l, <span class="stringliteral">"leshort"</span>, <a class="code" href="apprentice_8c.html#b52ab8464467491dbb5f4c39b093db18">NLESHORT</a>)==0) {
<a name="l00630"></a>00630 m-><a class="code" href="structmagic.html#e75b734f7c71f47276a4632fcdbf47a1">type</a> = <a class="code" href="file_8h.html#3540b04b2b4846fb210496cb78142f58">FILE_LESHORT</a>;
<a name="l00631"></a>00631 l += <a class="code" href="apprentice_8c.html#b52ab8464467491dbb5f4c39b093db18">NLESHORT</a>;
<a name="l00632"></a>00632 } <span class="keywordflow">else</span> <span class="keywordflow">if</span> (strncmp(l, <span class="stringliteral">"lelong"</span>, <a class="code" href="apprentice_8c.html#d14dcfd835d3a0a5f2b1bf41f92e6339">NLELONG</a>)==0) {
<a name="l00633"></a>00633 m-><a class="code" href="structmagic.html#e75b734f7c71f47276a4632fcdbf47a1">type</a> = <a class="code" href="file_8h.html#d95a80e01fd45266b3999f437c1b3c60">FILE_LELONG</a>;
<a name="l00634"></a>00634 l += <a class="code" href="apprentice_8c.html#d14dcfd835d3a0a5f2b1bf41f92e6339">NLELONG</a>;
<a name="l00635"></a>00635 } <span class="keywordflow">else</span> <span class="keywordflow">if</span> (strncmp(l, <span class="stringliteral">"ledate"</span>, <a class="code" href="apprentice_8c.html#bc9a1a3b5cd5c3879759ef8278c72f94">NLEDATE</a>)==0) {
<a name="l00636"></a>00636 m-><a class="code" href="structmagic.html#e75b734f7c71f47276a4632fcdbf47a1">type</a> = <a class="code" href="file_8h.html#0ba7100a1f1044ff87d8f723a2e23b5c">FILE_LEDATE</a>;
<a name="l00637"></a>00637 l += <a class="code" href="apprentice_8c.html#bc9a1a3b5cd5c3879759ef8278c72f94">NLEDATE</a>;
<a name="l00638"></a>00638 } <span class="keywordflow">else</span> <span class="keywordflow">if</span> (strncmp(l, <span class="stringliteral">"pstring"</span>, <a class="code" href="apprentice_8c.html#303e67b084ed5215e8ab67c92d9ccfe3">NPSTRING</a>)==0) {
<a name="l00639"></a>00639 m-><a class="code" href="structmagic.html#e75b734f7c71f47276a4632fcdbf47a1">type</a> = <a class="code" href="file_8h.html#0ee3aa128e0786d27fa8a592d2c9d1c6">FILE_PSTRING</a>;
<a name="l00640"></a>00640 l += <a class="code" href="apprentice_8c.html#303e67b084ed5215e8ab67c92d9ccfe3">NPSTRING</a>;
<a name="l00641"></a>00641 } <span class="keywordflow">else</span> <span class="keywordflow">if</span> (strncmp(l, <span class="stringliteral">"ldate"</span>, <a class="code" href="apprentice_8c.html#89157b5c490e4977366531031606be66">NLDATE</a>)==0) {
<a name="l00642"></a>00642 m-><a class="code" href="structmagic.html#e75b734f7c71f47276a4632fcdbf47a1">type</a> = <a class="code" href="file_8h.html#4b2bd5c1277a412368842d361abaa271">FILE_LDATE</a>;
<a name="l00643"></a>00643 l += <a class="code" href="apprentice_8c.html#89157b5c490e4977366531031606be66">NLDATE</a>;
<a name="l00644"></a>00644 } <span class="keywordflow">else</span> <span class="keywordflow">if</span> (strncmp(l, <span class="stringliteral">"beldate"</span>, <a class="code" href="apprentice_8c.html#e76e6b40674f726f62f6c87297a1441f">NBELDATE</a>)==0) {
<a name="l00645"></a>00645 m-><a class="code" href="structmagic.html#e75b734f7c71f47276a4632fcdbf47a1">type</a> = <a class="code" href="file_8h.html#71937f39d86126fb0e5ef25cb311ca0a">FILE_BELDATE</a>;
<a name="l00646"></a>00646 l += <a class="code" href="apprentice_8c.html#e76e6b40674f726f62f6c87297a1441f">NBELDATE</a>;
<a name="l00647"></a>00647 } <span class="keywordflow">else</span> <span class="keywordflow">if</span> (strncmp(l, <span class="stringliteral">"leldate"</span>, <a class="code" href="apprentice_8c.html#598502acc51acb8b75448c23a9dd3aec">NLELDATE</a>)==0) {
<a name="l00648"></a>00648 m-><a class="code" href="structmagic.html#e75b734f7c71f47276a4632fcdbf47a1">type</a> = <a class="code" href="file_8h.html#a229d98fb7bc70ed761f9b3d11765bf2">FILE_LELDATE</a>;
<a name="l00649"></a>00649 l += <a class="code" href="apprentice_8c.html#598502acc51acb8b75448c23a9dd3aec">NLELDATE</a>;
<a name="l00650"></a>00650 } <span class="keywordflow">else</span> <span class="keywordflow">if</span> (strncmp(l, <span class="stringliteral">"regex"</span>, <a class="code" href="apprentice_8c.html#ad96f042fa2ac9e2ff2224f50f3f45c3">NREGEX</a>)==0) {
<a name="l00651"></a>00651 m-><a class="code" href="structmagic.html#e75b734f7c71f47276a4632fcdbf47a1">type</a> = <a class="code" href="file_8h.html#bb376719282da717a652862fc97e4b60">FILE_REGEX</a>;
<a name="l00652"></a>00652 l += <a class="code" href="apprentice_8c.html#ad96f042fa2ac9e2ff2224f50f3f45c3">NREGEX</a>;
<a name="l00653"></a>00653 } <span class="keywordflow">else</span> <span class="keywordflow">if</span> (strncmp(l, <span class="stringliteral">"bestring16"</span>, <a class="code" href="apprentice_8c.html#d66056cb26787534cbc8b1076ca85df6">NBESTRING16</a>)==0) {
<a name="l00654"></a>00654 m-><a class="code" href="structmagic.html#e75b734f7c71f47276a4632fcdbf47a1">type</a> = <a class="code" href="file_8h.html#258ea58d33f4649ba27ef01f5d2c00e2">FILE_BESTRING16</a>;
<a name="l00655"></a>00655 l += <a class="code" href="apprentice_8c.html#d66056cb26787534cbc8b1076ca85df6">NBESTRING16</a>;
<a name="l00656"></a>00656 } <span class="keywordflow">else</span> <span class="keywordflow">if</span> (strncmp(l, <span class="stringliteral">"lestring16"</span>, <a class="code" href="apprentice_8c.html#83ba5cbfa6aab63df2f0acdbd30b461b">NLESTRING16</a>)==0) {
<a name="l00657"></a>00657 m-><a class="code" href="structmagic.html#e75b734f7c71f47276a4632fcdbf47a1">type</a> = <a class="code" href="file_8h.html#8f59d2f5ba3a667d3731d4d2a9270670">FILE_LESTRING16</a>;
<a name="l00658"></a>00658 l += <a class="code" href="apprentice_8c.html#83ba5cbfa6aab63df2f0acdbd30b461b">NLESTRING16</a>;
<a name="l00659"></a>00659 } <span class="keywordflow">else</span> <span class="keywordflow">if</span> (strncmp(l, <span class="stringliteral">"search"</span>, <a class="code" href="apprentice_8c.html#bd44c26a62874237d30a1059fee2dedd">NSEARCH</a>)==0) {
<a name="l00660"></a>00660 m-><a class="code" href="structmagic.html#e75b734f7c71f47276a4632fcdbf47a1">type</a> = <a class="code" href="file_8h.html#17a43525a99411f40d7181967e383a8e">FILE_SEARCH</a>;
<a name="l00661"></a>00661 l += <a class="code" href="apprentice_8c.html#bd44c26a62874237d30a1059fee2dedd">NSEARCH</a>;
<a name="l00662"></a>00662 } <span class="keywordflow">else</span> {
<a name="l00663"></a>00663 <span class="keywordflow">if</span> (ms->flags & MAGIC_CHECK)
<a name="l00664"></a>00664 <a class="code" href="file_8h.html#7c997a92425ab69449e740c7c5752a93">file_magwarn</a>(ms, <span class="stringliteral">"type `%s' invalid"</span>, l);
<a name="l00665"></a>00665 <span class="keywordflow">return</span> -1;
<a name="l00666"></a>00666 }
<a name="l00667"></a>00667 <span class="comment">/* New-style anding: "0 byte&0x80 =0x80 dynamically linked" */</span>
<a name="l00668"></a>00668 <span class="comment">/* New and improved: ~ & | ^ + - * / % -- exciting, isn't it? */</span>
<a name="l00669"></a>00669 <span class="keywordflow">if</span> (*l == <span class="charliteral">'~'</span>) {
<a name="l00670"></a>00670 <span class="keywordflow">if</span> (!<a class="code" href="apprentice_8c.html#f72c8807835aa3ecde5670574dacac0e">IS_STRING</a>(m-><a class="code" href="structmagic.html#e75b734f7c71f47276a4632fcdbf47a1">type</a>))
<a name="l00671"></a>00671 m-><a class="code" href="structmagic.html#b5f68aa41078eeb7e2c8cabf9d654738">mask_op</a> |= <a class="code" href="file_8h.html#f4b4aedbfa8c6afecd008b4243928d4f">FILE_OPINVERSE</a>;
<a name="l00672"></a>00672 ++l;
<a name="l00673"></a>00673 }
<a name="l00674"></a>00674 <span class="keywordflow">if</span> ((t = strchr(fops, *l)) != NULL) {
<a name="l00675"></a>00675 uint32_t op = (uint32_t)(t - fops);
<a name="l00676"></a>00676 <span class="keywordflow">if</span> (op != <a class="code" href="file_8h.html#7055324280e0c3042cbf153538a22153">FILE_OPDIVIDE</a> || !<a class="code" href="apprentice_8c.html#5bcb062a246a73327003e50bf2daeb93">IS_PLAINSTRING</a>(m-><a class="code" href="structmagic.html#e75b734f7c71f47276a4632fcdbf47a1">type</a>)) {
<a name="l00677"></a>00677 ++l;
<a name="l00678"></a>00678 m-><a class="code" href="structmagic.html#b5f68aa41078eeb7e2c8cabf9d654738">mask_op</a> |= op;
<a name="l00679"></a>00679 val = (uint32_t)<a class="code" href="file_8h.html#b39d013bf56ccc7f9b406a8e44baf054">strtoul</a>(l, &l, 0);
<a name="l00680"></a>00680 m-><a class="code" href="structmagic.html#74302c6a10faec1229e9ea802946f044">mask</a> = <a class="code" href="apprentice_8c.html#e28db57fd7c1d40cd154e048ca99a075">file_signextend</a>(ms, m, val);
<a name="l00681"></a>00681 <a class="code" href="apprentice_8c.html#e91b394bec7057a2260c779e32d47ae2">eatsize</a>(&l);
<a name="l00682"></a>00682 } <span class="keywordflow">else</span> {
<a name="l00683"></a>00683 m-><a class="code" href="structmagic.html#74302c6a10faec1229e9ea802946f044">mask</a> = 0L;
<a name="l00684"></a>00684 <span class="keywordflow">while</span> (!isspace((<span class="keywordtype">unsigned</span> <span class="keywordtype">char</span>)*++l)) {
<a name="l00685"></a>00685 <span class="keywordflow">switch</span> (*l) {
<a name="l00686"></a>00686 <span class="keywordflow">case</span> <a class="code" href="file_8h.html#5b18c52ce49cb9cf577412d86505dad7">CHAR_IGNORE_LOWERCASE</a>:
<a name="l00687"></a>00687 m-><a class="code" href="structmagic.html#74302c6a10faec1229e9ea802946f044">mask</a> |= <a class="code" href="file_8h.html#8ae3864781a7196368a9408b23ad16f0">STRING_IGNORE_LOWERCASE</a>;
<a name="l00688"></a>00688 <span class="comment">/*@switchbreak@*/</span> <span class="keywordflow">break</span>;
<a name="l00689"></a>00689 <span class="keywordflow">case</span> <a class="code" href="file_8h.html#e1bbe21c8f083ae991b387e7bfb650db">CHAR_COMPACT_BLANK</a>:
<a name="l00690"></a>00690 m-><a class="code" href="structmagic.html#74302c6a10faec1229e9ea802946f044">mask</a> |= <a class="code" href="file_8h.html#a2eb368002c86135f766be93a90a63fc">STRING_COMPACT_BLANK</a>;
<a name="l00691"></a>00691 <span class="comment">/*@switchbreak@*/</span> <span class="keywordflow">break</span>;
<a name="l00692"></a>00692 <span class="keywordflow">case</span> <a class="code" href="file_8h.html#6ba0ad822cdcf26ab58767476bd05d09">CHAR_COMPACT_OPTIONAL_BLANK</a>:
<a name="l00693"></a>00693 m-><a class="code" href="structmagic.html#74302c6a10faec1229e9ea802946f044">mask</a> |=
<a name="l00694"></a>00694 <a class="code" href="file_8h.html#f890d90f64b5feeb3bcfcac22506fd07">STRING_COMPACT_OPTIONAL_BLANK</a>;
<a name="l00695"></a>00695 <span class="comment">/*@switchbreak@*/</span> <span class="keywordflow">break</span>;
<a name="l00696"></a>00696 <span class="keywordflow">default</span>:
<a name="l00697"></a>00697 <span class="keywordflow">if</span> (ms->flags & MAGIC_CHECK)
<a name="l00698"></a>00698 <a class="code" href="file_8h.html#7c997a92425ab69449e740c7c5752a93">file_magwarn</a>(ms,
<a name="l00699"></a>00699 <span class="stringliteral">"string extension `%c' invalid"</span>,
<a name="l00700"></a>00700 *l);
<a name="l00701"></a>00701 <span class="keywordflow">return</span> -1;
<a name="l00702"></a>00702 }
<a name="l00703"></a>00703 }
<a name="l00704"></a>00704 ++l;
<a name="l00705"></a>00705 }
<a name="l00706"></a>00706 }
<a name="l00707"></a>00707 <span class="comment">/*</span>
<a name="l00708"></a>00708 <span class="comment"> * We used to set mask to all 1's here, instead let's just not do</span>
<a name="l00709"></a>00709 <span class="comment"> * anything if mask = 0 (unless you have a better idea)</span>
<a name="l00710"></a>00710 <span class="comment"> */</span>
<a name="l00711"></a>00711 <a class="code" href="apprentice_8c.html#4a8b4779f1126316143e8f354f0c85d4">EATAB</a>;
<a name="l00712"></a>00712
<a name="l00713"></a>00713 <span class="keywordflow">switch</span> (*l) {
<a name="l00714"></a>00714 <span class="keywordflow">case</span> <span class="charliteral">'>'</span>:
<a name="l00715"></a>00715 <span class="keywordflow">case</span> <span class="charliteral">'<'</span>:
<a name="l00716"></a>00716 <span class="comment">/* Old-style anding: "0 byte &0x80 dynamically linked" */</span>
<a name="l00717"></a>00717 <span class="keywordflow">case</span> <span class="charliteral">'&'</span>:
<a name="l00718"></a>00718 <span class="keywordflow">case</span> <span class="charliteral">'^'</span>:
<a name="l00719"></a>00719 <span class="keywordflow">case</span> <span class="charliteral">'='</span>:
<a name="l00720"></a>00720 m-><a class="code" href="structmagic.html#6bb0410eed598b4c6710ff2a40d5a0d7">reln</a> = *l;
<a name="l00721"></a>00721 ++l;
<a name="l00722"></a>00722 <span class="keywordflow">if</span> (*l == <span class="charliteral">'='</span>) {
<a name="l00723"></a>00723 <span class="comment">/* HP compat: ignore &= etc. */</span>
<a name="l00724"></a>00724 ++l;
<a name="l00725"></a>00725 }
<a name="l00726"></a>00726 <span class="keywordflow">break</span>;
<a name="l00727"></a>00727 <span class="keywordflow">case</span> <span class="charliteral">'!'</span>:
<a name="l00728"></a>00728 m-><a class="code" href="structmagic.html#6bb0410eed598b4c6710ff2a40d5a0d7">reln</a> = *l;
<a name="l00729"></a>00729 ++l;
<a name="l00730"></a>00730 <span class="keywordflow">break</span>;
<a name="l00731"></a>00731 <span class="keywordflow">default</span>:
<a name="l00732"></a>00732 <span class="keywordflow">if</span> (*l == <span class="charliteral">'x'</span> && ((isascii((<span class="keywordtype">unsigned</span> <span class="keywordtype">char</span>)l[1]) &&
<a name="l00733"></a>00733 isspace((<span class="keywordtype">unsigned</span> <span class="keywordtype">char</span>)l[1])) || !l[1])) {
<a name="l00734"></a>00734 m-><a class="code" href="structmagic.html#6bb0410eed598b4c6710ff2a40d5a0d7">reln</a> = *l;
<a name="l00735"></a>00735 ++l;
<a name="l00736"></a>00736 <span class="keywordflow">goto</span> GetDesc; <span class="comment">/* Bill The Cat */</span>
<a name="l00737"></a>00737 }
<a name="l00738"></a>00738 m-><a class="code" href="structmagic.html#6bb0410eed598b4c6710ff2a40d5a0d7">reln</a> = <span class="charliteral">'='</span>;
<a name="l00739"></a>00739 <span class="keywordflow">break</span>;
<a name="l00740"></a>00740 }
<a name="l00741"></a>00741 <a class="code" href="apprentice_8c.html#4a8b4779f1126316143e8f354f0c85d4">EATAB</a>;
<a name="l00742"></a>00742
<a name="l00743"></a>00743 <span class="keywordflow">if</span> (<a class="code" href="apprentice_8c.html#69f31de58cf8369e559a5f0819083373">getvalue</a>(ms, m, &l))
<a name="l00744"></a>00744 <span class="keywordflow">return</span> -1;
<a name="l00745"></a>00745 <span class="comment">/*</span>
<a name="l00746"></a>00746 <span class="comment"> * TODO finish this macro and start using it!</span>
<a name="l00747"></a>00747 <span class="comment"> * #define offsetcheck {if (offset > HOWMANY-1) </span>
<a name="l00748"></a>00748 <span class="comment"> * magwarn("offset too big"); }</span>
<a name="l00749"></a>00749 <span class="comment"> */</span>
<a name="l00750"></a>00750
<a name="l00751"></a>00751 <span class="comment">/*</span>
<a name="l00752"></a>00752 <span class="comment"> * now get last part - the description</span>
<a name="l00753"></a>00753 <span class="comment"> */</span>
<a name="l00754"></a>00754 GetDesc:
<a name="l00755"></a>00755 <a class="code" href="apprentice_8c.html#4a8b4779f1126316143e8f354f0c85d4">EATAB</a>;
<a name="l00756"></a>00756 <span class="keywordflow">if</span> (l[0] == <span class="charliteral">'\b'</span>) {
<a name="l00757"></a>00757 ++l;
<a name="l00758"></a>00758 m-><a class="code" href="structmagic.html#0ed01e58244ec8ecd760e45530d0dac2">nospflag</a> = 1;
<a name="l00759"></a>00759 } <span class="keywordflow">else</span> <span class="keywordflow">if</span> ((l[0] == <span class="charliteral">'\\'</span>) && (l[1] == <span class="charliteral">'b'</span>)) {
<a name="l00760"></a>00760 ++l;
<a name="l00761"></a>00761 ++l;
<a name="l00762"></a>00762 m-><a class="code" href="structmagic.html#0ed01e58244ec8ecd760e45530d0dac2">nospflag</a> = 1;
<a name="l00763"></a>00763 } <span class="keywordflow">else</span>
<a name="l00764"></a>00764 m-><a class="code" href="structmagic.html#0ed01e58244ec8ecd760e45530d0dac2">nospflag</a> = 0;
<a name="l00765"></a>00765 <span class="keywordflow">while</span> ((m-><a class="code" href="structmagic.html#7cdb474a5e1d59919e1dec5d928cc2d4">desc</a>[i++] = *l++) != <span class="charliteral">'\0'</span> && i < <a class="code" href="file_8h.html#282ab243d8a050b09c3fb21e4eebb54d">MAXDESC</a>)
<a name="l00766"></a>00766 <span class="comment">/* NULLBODY */</span>;
<a name="l00767"></a>00767
<a name="l00768"></a>00768 <span class="keywordflow">if</span> (ms->flags & MAGIC_CHECK) {
<a name="l00769"></a>00769 <span class="keywordflow">if</span> (!<a class="code" href="apprentice_8c.html#99e5d877451dcdb0775091b501d7407b">check_format</a>(ms, m))
<a name="l00770"></a>00770 <span class="keywordflow">return</span> -1;
<a name="l00771"></a>00771 }
<a name="l00772"></a>00772 <span class="preprocessor">#ifndef COMPILE_ONLY</span>
<a name="l00773"></a>00773 <span class="preprocessor"></span> <span class="keywordflow">if</span> (action == <a class="code" href="file_8h.html#4cfcd6b1de0e51b20358e6b310744410">FILE_CHECK</a>) {
<a name="l00774"></a>00774 <a class="code" href="file_8h.html#89dfc4d84ee5a405fe1700fb3abb1549">file_mdump</a>(m);
<a name="l00775"></a>00775 }
<a name="l00776"></a>00776 <span class="preprocessor">#endif</span>
<a name="l00777"></a>00777 <span class="preprocessor"></span> ++(*nmagicp); <span class="comment">/* make room for next */</span>
<a name="l00778"></a>00778 <span class="keywordflow">return</span> 0;
<a name="l00779"></a>00779 }
<a name="l00780"></a>00780
<a name="l00781"></a>00781 <span class="comment">/*</span>
<a name="l00782"></a>00782 <span class="comment"> * Check that the optional printf format in description matches</span>
<a name="l00783"></a>00783 <span class="comment"> * the type of the magic.</span>
<a name="l00784"></a>00784 <span class="comment"> */</span>
<a name="l00785"></a>00785 <span class="keyword">private</span> <span class="keywordtype">int</span>
<a name="l00786"></a><a class="code" href="apprentice_8c.html#99e5d877451dcdb0775091b501d7407b">00786</a> <a class="code" href="apprentice_8c.html#99e5d877451dcdb0775091b501d7407b">check_format</a>(<span class="keyword">struct</span> <a class="code" href="structmagic__set.html">magic_set</a> *ms, <span class="keyword">struct</span> <a class="code" href="structmagic.html">magic</a> *m)
<a name="l00787"></a>00787 {
<a name="l00788"></a>00788 <span class="comment">/*@-nullassign@*/</span>
<a name="l00789"></a>00789 <span class="comment">/*@observer@*/</span>
<a name="l00790"></a>00790 <span class="keyword">static</span> <span class="keyword">const</span> <span class="keywordtype">char</span> *formats[] = { <a class="code" href="file_8h.html#e5a5ba0502655a6bae1dddb6b1be3d9b">FILE_FORMAT_STRING</a> };
<a name="l00791"></a>00791 <span class="comment">/*@=nullassign@*/</span>
<a name="l00792"></a>00792 <span class="comment">/*@observer@*/</span>
<a name="l00793"></a>00793 <span class="keyword">static</span> <span class="keyword">const</span> <span class="keywordtype">char</span> *<a class="code" href="structnames.html">names</a>[] = { <a class="code" href="file_8h.html#513707c1083106b2a0af8448f7850661">FILE_FORMAT_NAME</a> };
<a name="l00794"></a>00794 <span class="keywordtype">char</span> *ptr;
<a name="l00795"></a>00795
<a name="l00796"></a>00796 <span class="keywordflow">for</span> (ptr = m-><a class="code" href="structmagic.html#7cdb474a5e1d59919e1dec5d928cc2d4">desc</a>; *ptr; ptr++)
<a name="l00797"></a>00797 <span class="keywordflow">if</span> (*ptr == <span class="charliteral">'%'</span>)
<a name="l00798"></a>00798 <span class="keywordflow">break</span>;
<a name="l00799"></a>00799 <span class="keywordflow">if</span> (*ptr == <span class="charliteral">'\0'</span>) {
<a name="l00800"></a>00800 <span class="comment">/* No format string; ok */</span>
<a name="l00801"></a>00801 <span class="keywordflow">return</span> 1;
<a name="l00802"></a>00802 }
<a name="l00803"></a>00803 <span class="keywordflow">if</span> (m-><a class="code" href="structmagic.html#e75b734f7c71f47276a4632fcdbf47a1">type</a> >= <span class="keyword">sizeof</span>(formats)/<span class="keyword">sizeof</span>(formats[0])) {
<a name="l00804"></a>00804 <a class="code" href="file_8h.html#7c997a92425ab69449e740c7c5752a93">file_magwarn</a>(ms, <span class="stringliteral">"Internal error inconsistency between m->type"</span>
<a name="l00805"></a>00805 <span class="stringliteral">" and format strings"</span>);
<a name="l00806"></a>00806 <span class="keywordflow">return</span> 0;
<a name="l00807"></a>00807 }
<a name="l00808"></a>00808 <span class="keywordflow">if</span> (formats[m-><a class="code" href="structmagic.html#e75b734f7c71f47276a4632fcdbf47a1">type</a>] == NULL) {
<a name="l00809"></a>00809 <a class="code" href="file_8h.html#7c997a92425ab69449e740c7c5752a93">file_magwarn</a>(ms, <span class="stringliteral">"No format string for `%s' with description "</span>
<a name="l00810"></a>00810 <span class="stringliteral">"`%s'"</span>, m-><a class="code" href="structmagic.html#7cdb474a5e1d59919e1dec5d928cc2d4">desc</a>, names[m-><a class="code" href="structmagic.html#e75b734f7c71f47276a4632fcdbf47a1">type</a>]);
<a name="l00811"></a>00811 <span class="keywordflow">return</span> 0;
<a name="l00812"></a>00812 }
<a name="l00813"></a>00813 <span class="keywordflow">for</span> (; *ptr; ptr++) {
<a name="l00814"></a>00814 <span class="keywordflow">if</span> (*ptr == <span class="charliteral">'l'</span> || *ptr == <span class="charliteral">'h'</span>) {
<a name="l00815"></a>00815 <span class="comment">/* XXX: we should really fix this one day */</span>
<a name="l00816"></a>00816 <span class="keywordflow">continue</span>;
<a name="l00817"></a>00817 }
<a name="l00818"></a>00818 <span class="keywordflow">if</span> (islower((<span class="keywordtype">unsigned</span> <span class="keywordtype">char</span>)*ptr) || *ptr == <span class="charliteral">'X'</span>)
<a name="l00819"></a>00819 <span class="keywordflow">break</span>;
<a name="l00820"></a>00820 }
<a name="l00821"></a>00821 <span class="keywordflow">if</span> (*ptr == <span class="charliteral">'\0'</span>) {
<a name="l00822"></a>00822 <span class="comment">/* Missing format string; bad */</span>
<a name="l00823"></a>00823 <a class="code" href="file_8h.html#7c997a92425ab69449e740c7c5752a93">file_magwarn</a>(ms, <span class="stringliteral">"Invalid format `%s' for type `%s'"</span>,
<a name="l00824"></a>00824 m-><a class="code" href="structmagic.html#7cdb474a5e1d59919e1dec5d928cc2d4">desc</a>, names[m-><a class="code" href="structmagic.html#e75b734f7c71f47276a4632fcdbf47a1">type</a>]);
<a name="l00825"></a>00825 <span class="keywordflow">return</span> 0;
<a name="l00826"></a>00826 }
<a name="l00827"></a>00827 <span class="keywordflow">if</span> (strchr(formats[m-><a class="code" href="structmagic.html#e75b734f7c71f47276a4632fcdbf47a1">type</a>], *ptr) == NULL) {
<a name="l00828"></a>00828 <a class="code" href="file_8h.html#7c997a92425ab69449e740c7c5752a93">file_magwarn</a>(ms, <span class="stringliteral">"Printf format `%c' is not valid for type `%s'"</span>
<a name="l00829"></a>00829 <span class="stringliteral">" in description `%s'"</span>,
<a name="l00830"></a>00830 *ptr, names[m-><a class="code" href="structmagic.html#e75b734f7c71f47276a4632fcdbf47a1">type</a>], m-><a class="code" href="structmagic.html#7cdb474a5e1d59919e1dec5d928cc2d4">desc</a>);
<a name="l00831"></a>00831 <span class="keywordflow">return</span> 0;
<a name="l00832"></a>00832 }
<a name="l00833"></a>00833 <span class="keywordflow">return</span> 1;
<a name="l00834"></a>00834 }
<a name="l00835"></a>00835
<a name="l00836"></a>00836 <span class="comment">/* </span>
<a name="l00837"></a>00837 <span class="comment"> * Read a numeric value from a pointer, into the value union of a magic </span>
<a name="l00838"></a>00838 <span class="comment"> * pointer, according to the magic type. Update the string pointer to point </span>
<a name="l00839"></a>00839 <span class="comment"> * just after the number read. Return 0 for success, non-zero for failure.</span>
<a name="l00840"></a>00840 <span class="comment"> */</span>
<a name="l00841"></a>00841 <span class="keyword">private</span> <span class="keywordtype">int</span>
<a name="l00842"></a><a class="code" href="apprentice_8c.html#69f31de58cf8369e559a5f0819083373">00842</a> <a class="code" href="apprentice_8c.html#69f31de58cf8369e559a5f0819083373">getvalue</a>(<span class="keyword">struct</span> <a class="code" href="structmagic__set.html">magic_set</a> *ms, <span class="keyword">struct</span> <a class="code" href="structmagic.html">magic</a> *m, <span class="keywordtype">char</span> **p)
<a name="l00843"></a>00843 {
<a name="l00844"></a>00844 <span class="keywordtype">int</span> slen;
<a name="l00845"></a>00845
<a name="l00846"></a>00846 <span class="keywordflow">switch</span> (m-><a class="code" href="structmagic.html#e75b734f7c71f47276a4632fcdbf47a1">type</a>) {
<a name="l00847"></a>00847 <span class="keywordflow">case</span> <a class="code" href="file_8h.html#258ea58d33f4649ba27ef01f5d2c00e2">FILE_BESTRING16</a>:
<a name="l00848"></a>00848 <span class="keywordflow">case</span> <a class="code" href="file_8h.html#8f59d2f5ba3a667d3731d4d2a9270670">FILE_LESTRING16</a>:
<a name="l00849"></a>00849 <span class="keywordflow">case</span> <a class="code" href="file_8h.html#4ac938e6d36a7f8a52c4394b0077464f">FILE_STRING</a>:
<a name="l00850"></a>00850 <span class="keywordflow">case</span> <a class="code" href="file_8h.html#0ee3aa128e0786d27fa8a592d2c9d1c6">FILE_PSTRING</a>:
<a name="l00851"></a>00851 <span class="keywordflow">case</span> <a class="code" href="file_8h.html#bb376719282da717a652862fc97e4b60">FILE_REGEX</a>:
<a name="l00852"></a>00852 <span class="keywordflow">case</span> <a class="code" href="file_8h.html#17a43525a99411f40d7181967e383a8e">FILE_SEARCH</a>:
<a name="l00853"></a>00853 *p = <a class="code" href="lobject_8h.html#cb05d3ab238923581a9c629b8e11a6ac">getstr</a>(ms, *p, m-><a class="code" href="structmagic.html#22209e0ed0303f04488686dee72c4ddf">value</a>.<a class="code" href="unionmagic_1_1VALUETYPE.html#3567447d4b180ba753c79227e6a9b33f">s</a>, <span class="keyword">sizeof</span>(m-><a class="code" href="structmagic.html#22209e0ed0303f04488686dee72c4ddf">value</a>.<a class="code" href="unionmagic_1_1VALUETYPE.html#3567447d4b180ba753c79227e6a9b33f">s</a>), &slen);
<a name="l00854"></a>00854 <span class="keywordflow">if</span> (*p == NULL) {
<a name="l00855"></a>00855 <span class="keywordflow">if</span> (ms-><a class="code" href="structmagic__set.html#7677d8f81949874cf4a626d1d4566fc6">flags</a> & MAGIC_CHECK)
<a name="l00856"></a>00856 <a class="code" href="file_8h.html#7c997a92425ab69449e740c7c5752a93">file_magwarn</a>(ms, <span class="stringliteral">"cannot get string from `%s'"</span>,
<a name="l00857"></a>00857 m-><a class="code" href="structmagic.html#22209e0ed0303f04488686dee72c4ddf">value</a>.<a class="code" href="unionmagic_1_1VALUETYPE.html#3567447d4b180ba753c79227e6a9b33f">s</a>);
<a name="l00858"></a>00858 <span class="keywordflow">return</span> -1;
<a name="l00859"></a>00859 }
<a name="l00860"></a>00860 m-><a class="code" href="structmagic.html#451e74a4d28302ad0c7e03dddcf9b4f7">vallen</a> = slen;
<a name="l00861"></a>00861 <span class="keywordflow">return</span> 0;
<a name="l00862"></a>00862 <span class="keywordflow">default</span>:
<a name="l00863"></a>00863 <span class="keywordflow">if</span> (m-><a class="code" href="structmagic.html#6bb0410eed598b4c6710ff2a40d5a0d7">reln</a> != <span class="charliteral">'x'</span>) {
<a name="l00864"></a>00864 m-><a class="code" href="structmagic.html#22209e0ed0303f04488686dee72c4ddf">value</a>.<a class="code" href="unionmagic_1_1VALUETYPE.html#3fb4b3969388761865f4b781ce7dc48e">l</a> = <a class="code" href="apprentice_8c.html#e28db57fd7c1d40cd154e048ca99a075">file_signextend</a>(ms, m,
<a name="l00865"></a>00865 (uint32_t)<a class="code" href="file_8h.html#b39d013bf56ccc7f9b406a8e44baf054">strtoul</a>(*p, p, 0));
<a name="l00866"></a>00866 <a class="code" href="apprentice_8c.html#e91b394bec7057a2260c779e32d47ae2">eatsize</a>(p);
<a name="l00867"></a>00867 }
<a name="l00868"></a>00868 <span class="keywordflow">return</span> 0;
<a name="l00869"></a>00869 }
<a name="l00870"></a>00870 }
<a name="l00871"></a>00871
<a name="l00872"></a>00872 <span class="comment">/*</span>
<a name="l00873"></a>00873 <span class="comment"> * Convert a string containing C character escapes. Stop at an unescaped</span>
<a name="l00874"></a>00874 <span class="comment"> * space or tab.</span>
<a name="l00875"></a>00875 <span class="comment"> * Copy the converted version to "p", returning its length in *slen.</span>
<a name="l00876"></a>00876 <span class="comment"> * Return updated scan pointer as function result.</span>
<a name="l00877"></a>00877 <span class="comment"> */</span>
<a name="l00878"></a>00878 <span class="keyword">private</span> <span class="keywordtype">char</span> *
<a name="l00879"></a><a class="code" href="apprentice_8c.html#370ceb128975b2f51f463b2c61aeb8ae">00879</a> <a class="code" href="lobject_8h.html#cb05d3ab238923581a9c629b8e11a6ac">getstr</a>(<span class="keyword">struct</span> <a class="code" href="structmagic__set.html">magic_set</a> *ms, <span class="keywordtype">char</span> *s, <span class="keywordtype">char</span> *p, <span class="keywordtype">int</span> plen, <span class="keywordtype">int</span> *slen)
<a name="l00880"></a>00880 {
<a name="l00881"></a>00881 <span class="keywordtype">char</span> *origs = s, *origp = p;
<a name="l00882"></a>00882 <span class="keywordtype">char</span> *pmax = p + plen - 1;
<a name="l00883"></a>00883 <span class="keywordtype">int</span> c;
<a name="l00884"></a>00884 <span class="keywordtype">int</span> val;
<a name="l00885"></a>00885
<a name="l00886"></a>00886 <span class="keywordflow">while</span> ((c = *s++) != <span class="charliteral">'\0'</span>) {
<a name="l00887"></a>00887 <span class="keywordflow">if</span> (isspace((<span class="keywordtype">unsigned</span> <span class="keywordtype">char</span>) c))
<a name="l00888"></a>00888 <span class="keywordflow">break</span>;
<a name="l00889"></a>00889 <span class="keywordflow">if</span> (p >= pmax) {
<a name="l00890"></a>00890 <a class="code" href="file_8h.html#b97a2a8e3a9e23613bcb1a49c4411919">file_error</a>(ms, 0, <span class="stringliteral">"string too long: `%s'"</span>, origs);
<a name="l00891"></a>00891 <span class="keywordflow">return</span> NULL;
<a name="l00892"></a>00892 }
<a name="l00893"></a>00893 <span class="keywordflow">if</span>(c == <span class="charliteral">'\\'</span>) {
<a name="l00894"></a>00894 <span class="keywordflow">switch</span>(c = *s++) {
<a name="l00895"></a>00895
<a name="l00896"></a>00896 <span class="keywordflow">case</span> <span class="charliteral">'\0'</span>:
<a name="l00897"></a>00897 <span class="keywordflow">goto</span> out;
<a name="l00898"></a>00898
<a name="l00899"></a>00899 <span class="keywordflow">default</span>:
<a name="l00900"></a>00900 *p++ = (char) c;
<a name="l00901"></a>00901 <span class="comment">/*@switchbreak@*/</span> <span class="keywordflow">break</span>;
<a name="l00902"></a>00902
<a name="l00903"></a>00903 <span class="keywordflow">case</span> <span class="charliteral">'n'</span>:
<a name="l00904"></a>00904 *p++ = <span class="charliteral">'\n'</span>;
<a name="l00905"></a>00905 <span class="comment">/*@switchbreak@*/</span> <span class="keywordflow">break</span>;
<a name="l00906"></a>00906
<a name="l00907"></a>00907 <span class="keywordflow">case</span> <span class="charliteral">'r'</span>:
<a name="l00908"></a>00908 *p++ = <span class="charliteral">'\r'</span>;
<a name="l00909"></a>00909 <span class="comment">/*@switchbreak@*/</span> <span class="keywordflow">break</span>;
<a name="l00910"></a>00910
<a name="l00911"></a>00911 <span class="keywordflow">case</span> <span class="charliteral">'b'</span>:
<a name="l00912"></a>00912 *p++ = <span class="charliteral">'\b'</span>;
<a name="l00913"></a>00913 <span class="comment">/*@switchbreak@*/</span> <span class="keywordflow">break</span>;
<a name="l00914"></a>00914
<a name="l00915"></a>00915 <span class="keywordflow">case</span> <span class="charliteral">'t'</span>:
<a name="l00916"></a>00916 *p++ = <span class="charliteral">'\t'</span>;
<a name="l00917"></a>00917 <span class="comment">/*@switchbreak@*/</span> <span class="keywordflow">break</span>;
<a name="l00918"></a>00918
<a name="l00919"></a>00919 <span class="keywordflow">case</span> <span class="charliteral">'f'</span>:
<a name="l00920"></a>00920 *p++ = <span class="charliteral">'\f'</span>;
<a name="l00921"></a>00921 <span class="comment">/*@switchbreak@*/</span> <span class="keywordflow">break</span>;
<a name="l00922"></a>00922
<a name="l00923"></a>00923 <span class="keywordflow">case</span> <span class="charliteral">'v'</span>:
<a name="l00924"></a>00924 *p++ = <span class="charliteral">'\v'</span>;
<a name="l00925"></a>00925 <span class="comment">/*@switchbreak@*/</span> <span class="keywordflow">break</span>;
<a name="l00926"></a>00926
<a name="l00927"></a>00927 <span class="comment">/* \ and up to 3 octal digits */</span>
<a name="l00928"></a>00928 <span class="keywordflow">case</span> <span class="charliteral">'0'</span>:
<a name="l00929"></a>00929 <span class="keywordflow">case</span> <span class="charliteral">'1'</span>:
<a name="l00930"></a>00930 <span class="keywordflow">case</span> <span class="charliteral">'2'</span>:
<a name="l00931"></a>00931 <span class="keywordflow">case</span> <span class="charliteral">'3'</span>:
<a name="l00932"></a>00932 <span class="keywordflow">case</span> <span class="charliteral">'4'</span>:
<a name="l00933"></a>00933 <span class="keywordflow">case</span> <span class="charliteral">'5'</span>:
<a name="l00934"></a>00934 <span class="keywordflow">case</span> <span class="charliteral">'6'</span>:
<a name="l00935"></a>00935 <span class="keywordflow">case</span> <span class="charliteral">'7'</span>:
<a name="l00936"></a>00936 val = c - <span class="charliteral">'0'</span>;
<a name="l00937"></a>00937 c = *s++; <span class="comment">/* try for 2 */</span>
<a name="l00938"></a>00938 <span class="keywordflow">if</span>(c >= <span class="charliteral">'0'</span> && c <= <span class="charliteral">'7'</span>) {
<a name="l00939"></a>00939 val = (val<<3) | (c - <span class="charliteral">'0'</span>);
<a name="l00940"></a>00940 c = *s++; <span class="comment">/* try for 3 */</span>
<a name="l00941"></a>00941 <span class="keywordflow">if</span>(c >= <span class="charliteral">'0'</span> && c <= <span class="charliteral">'7'</span>)
<a name="l00942"></a>00942 val = (val<<3) | (c-<span class="charliteral">'0'</span>);
<a name="l00943"></a>00943 <span class="keywordflow">else</span>
<a name="l00944"></a>00944 --s;
<a name="l00945"></a>00945 }
<a name="l00946"></a>00946 <span class="keywordflow">else</span>
<a name="l00947"></a>00947 --s;
<a name="l00948"></a>00948 *p++ = (char)val;
<a name="l00949"></a>00949 <span class="comment">/*@switchbreak@*/</span> <span class="keywordflow">break</span>;
<a name="l00950"></a>00950
<a name="l00951"></a>00951 <span class="comment">/* \x and up to 2 hex digits */</span>
<a name="l00952"></a>00952 <span class="keywordflow">case</span> <span class="charliteral">'x'</span>:
<a name="l00953"></a>00953 val = <span class="charliteral">'x'</span>; <span class="comment">/* Default if no digits */</span>
<a name="l00954"></a>00954 c = <a class="code" href="apprentice_8c.html#4e4a725944171049e901ed0ba5d99ffd">hextoint</a>(*s++); <span class="comment">/* Get next char */</span>
<a name="l00955"></a>00955 <span class="keywordflow">if</span> (c >= 0) {
<a name="l00956"></a>00956 val = c;
<a name="l00957"></a>00957 c = <a class="code" href="apprentice_8c.html#4e4a725944171049e901ed0ba5d99ffd">hextoint</a>(*s++);
<a name="l00958"></a>00958 <span class="keywordflow">if</span> (c >= 0)
<a name="l00959"></a>00959 val = (val << 4) + c;
<a name="l00960"></a>00960 <span class="keywordflow">else</span>
<a name="l00961"></a>00961 --s;
<a name="l00962"></a>00962 } <span class="keywordflow">else</span>
<a name="l00963"></a>00963 --s;
<a name="l00964"></a>00964 *p++ = (char)val;
<a name="l00965"></a>00965 <span class="comment">/*@switchbreak@*/</span> <span class="keywordflow">break</span>;
<a name="l00966"></a>00966 }
<a name="l00967"></a>00967 } <span class="keywordflow">else</span>
<a name="l00968"></a>00968 *p++ = (char)c;
<a name="l00969"></a>00969 }
<a name="l00970"></a>00970 out:
<a name="l00971"></a>00971 *p = <span class="charliteral">'\0'</span>;
<a name="l00972"></a>00972 *slen = p - origp;
<a name="l00973"></a>00973 <span class="keywordflow">return</span> s;
<a name="l00974"></a>00974 }
<a name="l00975"></a>00975
<a name="l00976"></a>00976
<a name="l00977"></a>00977 <span class="comment">/* Single hex char to int; -1 if not a hex char. */</span>
<a name="l00978"></a>00978 <span class="keyword">private</span> <span class="keywordtype">int</span>
<a name="l00979"></a><a class="code" href="apprentice_8c.html#4e4a725944171049e901ed0ba5d99ffd">00979</a> <a class="code" href="apprentice_8c.html#4e4a725944171049e901ed0ba5d99ffd">hextoint</a>(<span class="keywordtype">int</span> c)
<a name="l00980"></a>00980 {
<a name="l00981"></a>00981 <span class="keywordflow">if</span> (!isascii((<span class="keywordtype">unsigned</span> <span class="keywordtype">char</span>) c))
<a name="l00982"></a>00982 <span class="keywordflow">return</span> -1;
<a name="l00983"></a>00983 <span class="keywordflow">if</span> (isdigit((<span class="keywordtype">unsigned</span> <span class="keywordtype">char</span>) c))
<a name="l00984"></a>00984 <span class="keywordflow">return</span> c - <span class="charliteral">'0'</span>;
<a name="l00985"></a>00985 <span class="keywordflow">if</span> ((c >= <span class="charliteral">'a'</span>)&&(c <= <span class="charliteral">'f'</span>))
<a name="l00986"></a>00986 <span class="keywordflow">return</span> c + 10 - <span class="charliteral">'a'</span>;
<a name="l00987"></a>00987 <span class="keywordflow">if</span> (( c>= <span class="charliteral">'A'</span>)&&(c <= <span class="charliteral">'F'</span>))
<a name="l00988"></a>00988 <span class="keywordflow">return</span> c + 10 - <span class="charliteral">'A'</span>;
<a name="l00989"></a>00989 <span class="keywordflow">return</span> -1;
<a name="l00990"></a>00990 }
<a name="l00991"></a>00991
<a name="l00992"></a>00992
<a name="l00993"></a>00993 <span class="comment">/*</span>
<a name="l00994"></a>00994 <span class="comment"> * Print a string containing C character escapes.</span>
<a name="l00995"></a>00995 <span class="comment"> */</span>
<a name="l00996"></a>00996 <span class="keyword">protected</span> <span class="keywordtype">void</span>
<a name="l00997"></a><a class="code" href="file_8h.html#9c2457cee970a3034d64e7aa7a70dc0f">00997</a> <a class="code" href="apprentice_8c.html#0d5c3d2cbe9e1c4adf8ef2b26e8e2251">file_showstr</a>(FILE *fp, <span class="keyword">const</span> <span class="keywordtype">char</span> *s, size_t len)
<a name="l00998"></a>00998 {
<a name="l00999"></a>00999 <span class="keywordtype">char</span> c;
<a name="l01000"></a>01000
<a name="l01001"></a>01001 <span class="keywordflow">for</span> (;;) {
<a name="l01002"></a>01002 c = *s++;
<a name="l01003"></a>01003 <span class="keywordflow">if</span> (len == ~0U) {
<a name="l01004"></a>01004 <span class="keywordflow">if</span> (c == <span class="charliteral">'\0'</span>)
<a name="l01005"></a>01005 <span class="keywordflow">break</span>;
<a name="l01006"></a>01006 }
<a name="l01007"></a>01007 <span class="keywordflow">else</span> {
<a name="l01008"></a>01008 <span class="keywordflow">if</span> (len-- == 0)
<a name="l01009"></a>01009 <span class="keywordflow">break</span>;
<a name="l01010"></a>01010 }
<a name="l01011"></a>01011 <span class="keywordflow">if</span>(c >= 040 && c <= 0176) <span class="comment">/* TODO isprint && !iscntrl */</span>
<a name="l01012"></a>01012 (<span class="keywordtype">void</span>) fputc(c, fp);
<a name="l01013"></a>01013 <span class="keywordflow">else</span> {
<a name="l01014"></a>01014 (void) fputc(<span class="charliteral">'\\'</span>, fp);
<a name="l01015"></a>01015 <span class="keywordflow">switch</span> (c) {
<a name="l01016"></a>01016
<a name="l01017"></a>01017 <span class="keywordflow">case</span> <span class="charliteral">'\n'</span>:
<a name="l01018"></a>01018 (<span class="keywordtype">void</span>) fputc(<span class="charliteral">'n'</span>, fp);
<a name="l01019"></a>01019 <span class="comment">/*@switchbreak@*/</span> <span class="keywordflow">break</span>;
<a name="l01020"></a>01020
<a name="l01021"></a>01021 <span class="keywordflow">case</span> <span class="charliteral">'\r'</span>:
<a name="l01022"></a>01022 (void) fputc(<span class="charliteral">'r'</span>, fp);
<a name="l01023"></a>01023 <span class="comment">/*@switchbreak@*/</span> <span class="keywordflow">break</span>;
<a name="l01024"></a>01024
<a name="l01025"></a>01025 <span class="keywordflow">case</span> <span class="charliteral">'\b'</span>:
<a name="l01026"></a>01026 (void) fputc(<span class="charliteral">'b'</span>, fp);
<a name="l01027"></a>01027 <span class="comment">/*@switchbreak@*/</span> <span class="keywordflow">break</span>;
<a name="l01028"></a>01028
<a name="l01029"></a>01029 <span class="keywordflow">case</span> <span class="charliteral">'\t'</span>:
<a name="l01030"></a>01030 (void) fputc(<span class="charliteral">'t'</span>, fp);
<a name="l01031"></a>01031 <span class="comment">/*@switchbreak@*/</span> <span class="keywordflow">break</span>;
<a name="l01032"></a>01032
<a name="l01033"></a>01033 <span class="keywordflow">case</span> <span class="charliteral">'\f'</span>:
<a name="l01034"></a>01034 (void) fputc(<span class="charliteral">'f'</span>, fp);
<a name="l01035"></a>01035 <span class="comment">/*@switchbreak@*/</span> <span class="keywordflow">break</span>;
<a name="l01036"></a>01036
<a name="l01037"></a>01037 <span class="keywordflow">case</span> <span class="charliteral">'\v'</span>:
<a name="l01038"></a>01038 (void) fputc(<span class="charliteral">'v'</span>, fp);
<a name="l01039"></a>01039 <span class="comment">/*@switchbreak@*/</span> <span class="keywordflow">break</span>;
<a name="l01040"></a>01040
<a name="l01041"></a>01041 <span class="keywordflow">default</span>:
<a name="l01042"></a>01042 (void) fprintf(fp, <span class="stringliteral">"%.3o"</span>, c & 0377);
<a name="l01043"></a>01043 <span class="comment">/*@switchbreak@*/</span> <span class="keywordflow">break</span>;
<a name="l01044"></a>01044 }
<a name="l01045"></a>01045 }
<a name="l01046"></a>01046 }
<a name="l01047"></a>01047 }
<a name="l01048"></a>01048
<a name="l01049"></a>01049 <span class="comment">/*</span>
<a name="l01050"></a>01050 <span class="comment"> * eatsize(): Eat the size spec from a number [eg. 10UL]</span>
<a name="l01051"></a>01051 <span class="comment"> */</span>
<a name="l01052"></a>01052 <span class="keyword">private</span> <span class="keywordtype">void</span>
<a name="l01053"></a><a class="code" href="apprentice_8c.html#e91b394bec7057a2260c779e32d47ae2">01053</a> <a class="code" href="apprentice_8c.html#e91b394bec7057a2260c779e32d47ae2">eatsize</a>(<span class="keywordtype">char</span> **p)
<a name="l01054"></a>01054 {
<a name="l01055"></a>01055 <span class="keywordtype">char</span> *l = *p;
<a name="l01056"></a>01056
<a name="l01057"></a>01057 <span class="keywordflow">if</span> (<a class="code" href="apprentice_8c.html#9165ad17c9b51d80577a020832f1fa4a">LOWCASE</a>(*l) == <span class="charliteral">'u'</span>)
<a name="l01058"></a>01058 l++;
<a name="l01059"></a>01059
<a name="l01060"></a>01060 <span class="keywordflow">switch</span> (<a class="code" href="apprentice_8c.html#9165ad17c9b51d80577a020832f1fa4a">LOWCASE</a>(*l)) {
<a name="l01061"></a>01061 <span class="keywordflow">case</span> <span class="charliteral">'l'</span>: <span class="comment">/* long */</span>
<a name="l01062"></a>01062 <span class="keywordflow">case</span> <span class="charliteral">'s'</span>: <span class="comment">/* short */</span>
<a name="l01063"></a>01063 <span class="keywordflow">case</span> <span class="charliteral">'h'</span>: <span class="comment">/* short */</span>
<a name="l01064"></a>01064 <span class="keywordflow">case</span> <span class="charliteral">'b'</span>: <span class="comment">/* char/byte */</span>
<a name="l01065"></a>01065 <span class="keywordflow">case</span> <span class="charliteral">'c'</span>: <span class="comment">/* char/byte */</span>
<a name="l01066"></a>01066 l++;
<a name="l01067"></a>01067 <span class="comment">/*@fallthrough@*/</span>
<a name="l01068"></a>01068 <span class="keywordflow">default</span>:
<a name="l01069"></a>01069 <span class="keywordflow">break</span>;
<a name="l01070"></a>01070 }
<a name="l01071"></a>01071
<a name="l01072"></a>01072 *p = l;
<a name="l01073"></a>01073 }
<a name="l01074"></a>01074
<a name="l01075"></a>01075 <span class="comment">/*</span>
<a name="l01076"></a>01076 <span class="comment"> * handle a compiled file.</span>
<a name="l01077"></a>01077 <span class="comment"> */</span>
<a name="l01078"></a>01078 <span class="keyword">private</span> <span class="keywordtype">int</span>
<a name="l01079"></a><a class="code" href="apprentice_8c.html#6ce05b051be3244a560b11f9c2628317">01079</a> <a class="code" href="apprentice_8c.html#6ce05b051be3244a560b11f9c2628317">apprentice_map</a>(<span class="keyword">struct</span> <a class="code" href="structmagic__set.html">magic_set</a> *ms, <span class="keyword">struct</span> <a class="code" href="structmagic.html">magic</a> **magicp, uint32_t *nmagicp,
<a name="l01080"></a>01080 <span class="keyword">const</span> <span class="keywordtype">char</span> *fn)
<a name="l01081"></a>01081 {
<a name="l01082"></a>01082 <span class="keywordtype">int</span> fd;
<a name="l01083"></a>01083 <span class="keyword">struct </span>stat st;
<a name="l01084"></a>01084 uint32_t *ptr;
<a name="l01085"></a>01085 uint32_t version;
<a name="l01086"></a>01086 <span class="keywordtype">int</span> needsbyteswap;
<a name="l01087"></a>01087 <span class="keywordtype">char</span> buf[<a class="code" href="apprentice_8c.html#ddfa831c1473e710d2b71b72fd7fcfa5">MAXPATHLEN</a>];
<a name="l01088"></a>01088 <span class="keywordtype">char</span> *dbname = <a class="code" href="apprentice_8c.html#2da87acbfe61481277dbc47331785e2d">mkdbname</a>(fn, buf, <span class="keyword">sizeof</span>(buf), 0);
<a name="l01089"></a>01089 <span class="keywordtype">void</span> *mm = NULL;
<a name="l01090"></a>01090
<a name="l01091"></a>01091 <span class="keywordflow">if</span> (dbname == NULL)
<a name="l01092"></a>01092 <span class="keywordflow">return</span> -1;
<a name="l01093"></a>01093
<a name="l01094"></a>01094 <span class="keywordflow">if</span> ((fd = open(dbname, O_RDONLY)) == -1)
<a name="l01095"></a>01095 <span class="keywordflow">return</span> -1;
<a name="l01096"></a>01096
<a name="l01097"></a>01097 <span class="keywordflow">if</span> (fstat(fd, &st) == -1) {
<a name="l01098"></a>01098 <a class="code" href="file_8h.html#b97a2a8e3a9e23613bcb1a49c4411919">file_error</a>(ms, <a class="code" href="system_8h.html#d65a8842cc674e3ddf69355898c0ecbf">errno</a>, <span class="stringliteral">"cannot stat `%s'"</span>, dbname);
<a name="l01099"></a>01099 <span class="keywordflow">goto</span> error;
<a name="l01100"></a>01100 }
<a name="l01101"></a>01101 <span class="keywordflow">if</span> (st.st_size < 16) {
<a name="l01102"></a>01102 <a class="code" href="file_8h.html#b97a2a8e3a9e23613bcb1a49c4411919">file_error</a>(ms, 0, <span class="stringliteral">"file `%s' is too small"</span>, dbname);
<a name="l01103"></a>01103 <span class="keywordflow">goto</span> error;
<a name="l01104"></a>01104 }
<a name="l01105"></a>01105
<a name="l01106"></a>01106 <span class="preprocessor">#ifdef QUICK</span>
<a name="l01107"></a>01107 <span class="preprocessor"></span> <span class="keywordflow">if</span> ((mm = mmap(0, (size_t)st.st_size, PROT_READ|PROT_WRITE,
<a name="l01108"></a>01108 MAP_PRIVATE|<a class="code" href="apprentice_8c.html#238feed3512d8b21b3854d082dcae6f4">MAP_FILE</a>, fd, (off_t)0)) == <a class="code" href="apprentice_8c.html#8523dcf952f6ff059a3bed717e4f1296">MAP_FAILED</a>) {
<a name="l01109"></a>01109 <a class="code" href="file_8h.html#b97a2a8e3a9e23613bcb1a49c4411919">file_error</a>(ms, <a class="code" href="system_8h.html#d65a8842cc674e3ddf69355898c0ecbf">errno</a>, <span class="stringliteral">"cannot map `%s'"</span>, dbname);
<a name="l01110"></a>01110 <span class="keywordflow">goto</span> error;
<a name="l01111"></a>01111 }
<a name="l01112"></a>01112 <span class="preprocessor">#define RET 2</span>
<a name="l01113"></a>01113 <span class="preprocessor"></span><span class="preprocessor">#else</span>
<a name="l01114"></a>01114 <span class="preprocessor"></span> <span class="keywordflow">if</span> ((mm = malloc((size_t)st.st_size)) == NULL) {
<a name="l01115"></a>01115 <a class="code" href="file_8h.html#2a6681ad1c2bb84271d99480438f9bcf">file_oomem</a>(ms);
<a name="l01116"></a>01116 <span class="keywordflow">goto</span> error;
<a name="l01117"></a>01117 }
<a name="l01118"></a>01118 <span class="keywordflow">if</span> (read(fd, mm, (size_t)st.st_size) != (size_t)st.st_size) {
<a name="l01119"></a>01119 <a class="code" href="file_8h.html#e489029528e5a368fbf15657fd940230">file_badread</a>(ms);
<a name="l01120"></a>01120 <span class="keywordflow">goto</span> error;
<a name="l01121"></a>01121 }
<a name="l01122"></a>01122 <span class="preprocessor">#define RET 1</span>
<a name="l01123"></a>01123 <span class="preprocessor"></span><span class="preprocessor">#endif</span>
<a name="l01124"></a>01124 <span class="preprocessor"></span> *magicp = mm;
<a name="l01125"></a>01125 (void)close(fd);
<a name="l01126"></a>01126 fd = -1;
<a name="l01127"></a>01127 ptr = (uint32_t *)(<span class="keywordtype">void</span> *)*magicp;
<a name="l01128"></a>01128 <span class="keywordflow">if</span> (*ptr != <a class="code" href="file_8h.html#08e8ecf2939d12dcc84a8f389762ebd2">MAGICNO</a>) {
<a name="l01129"></a>01129 <span class="keywordflow">if</span> (<a class="code" href="apprentice_8c.html#a8650b65e7f5f66487363fc6e75b0c46">swap4</a>(*ptr) != <a class="code" href="file_8h.html#08e8ecf2939d12dcc84a8f389762ebd2">MAGICNO</a>) {
<a name="l01130"></a>01130 <a class="code" href="file_8h.html#b97a2a8e3a9e23613bcb1a49c4411919">file_error</a>(ms, 0, <span class="stringliteral">"bad magic in `%s'"</span>);
<a name="l01131"></a>01131 <span class="keywordflow">goto</span> error;
<a name="l01132"></a>01132 }
<a name="l01133"></a>01133 needsbyteswap = 1;
<a name="l01134"></a>01134 } <span class="keywordflow">else</span>
<a name="l01135"></a>01135 needsbyteswap = 0;
<a name="l01136"></a>01136 <span class="keywordflow">if</span> (needsbyteswap)
<a name="l01137"></a>01137 version = <a class="code" href="apprentice_8c.html#a8650b65e7f5f66487363fc6e75b0c46">swap4</a>(ptr[1]);
<a name="l01138"></a>01138 <span class="keywordflow">else</span>
<a name="l01139"></a>01139 version = ptr[1];
<a name="l01140"></a>01140 <span class="keywordflow">if</span> (version != <a class="code" href="file_8h.html#30cbe65e5d0fd5fc06e7253d10b75814">VERSIONNO</a>) {
<a name="l01141"></a>01141 <a class="code" href="file_8h.html#b97a2a8e3a9e23613bcb1a49c4411919">file_error</a>(ms, 0, <span class="stringliteral">"version mismatch (%d != %d) in `%s'"</span>,
<a name="l01142"></a>01142 version, <a class="code" href="file_8h.html#30cbe65e5d0fd5fc06e7253d10b75814">VERSIONNO</a>, dbname);
<a name="l01143"></a>01143 <span class="keywordflow">goto</span> error;
<a name="l01144"></a>01144 }
<a name="l01145"></a>01145 *nmagicp = (uint32_t)(st.st_size / <span class="keyword">sizeof</span>(<span class="keyword">struct</span> <a class="code" href="structmagic.html">magic</a>)) - 1;
<a name="l01146"></a>01146 (*magicp)++;
<a name="l01147"></a>01147 <span class="keywordflow">if</span> (needsbyteswap)
<a name="l01148"></a>01148 <a class="code" href="apprentice_8c.html#88d3a32480b07c9b7086ca17872752ff">byteswap</a>(*magicp, *nmagicp);
<a name="l01149"></a>01149 <span class="keywordflow">return</span> <a class="code" href="apprentice_8c.html#c2544c8b4fe3113b0d6bb62530692c21">RET</a>;
<a name="l01150"></a>01150
<a name="l01151"></a>01151 error:
<a name="l01152"></a>01152 <span class="keywordflow">if</span> (fd != -1)
<a name="l01153"></a>01153 (void)close(fd);
<a name="l01154"></a>01154 <span class="keywordflow">if</span> (mm) {
<a name="l01155"></a>01155 <span class="preprocessor">#ifdef QUICK</span>
<a name="l01156"></a>01156 <span class="preprocessor"></span> (void)munmap((<span class="keywordtype">void</span> *)mm, (size_t)st.st_size);
<a name="l01157"></a>01157 <span class="preprocessor">#else</span>
<a name="l01158"></a>01158 <span class="preprocessor"></span> free(mm);
<a name="l01159"></a>01159 <span class="preprocessor">#endif</span>
<a name="l01160"></a>01160 <span class="preprocessor"></span> } <span class="keywordflow">else</span> {
<a name="l01161"></a>01161 *magicp = NULL;
<a name="l01162"></a>01162 *nmagicp = 0;
<a name="l01163"></a>01163 }
<a name="l01164"></a>01164 <span class="keywordflow">return</span> -1;
<a name="l01165"></a>01165 }
<a name="l01166"></a>01166
<a name="l01167"></a>01167 <span class="comment">/*@unchecked@*/</span> <span class="comment">/*@observer@*/</span>
<a name="l01168"></a><a class="code" href="apprentice_8c.html#c8d4c174ba04ae1893f41661ba9eedb7">01168</a> <span class="keyword">private</span> <span class="keyword">const</span> uint32_t <a class="code" href="apprentice_8c.html#c8d4c174ba04ae1893f41661ba9eedb7">ar</a>[] = {
<a name="l01169"></a>01169 <a class="code" href="file_8h.html#08e8ecf2939d12dcc84a8f389762ebd2">MAGICNO</a>, <a class="code" href="file_8h.html#30cbe65e5d0fd5fc06e7253d10b75814">VERSIONNO</a>
<a name="l01170"></a>01170 };
<a name="l01171"></a>01171 <span class="comment">/*</span>
<a name="l01172"></a>01172 <span class="comment"> * handle an mmaped file.</span>
<a name="l01173"></a>01173 <span class="comment"> */</span>
<a name="l01174"></a>01174 <span class="keyword">private</span> <span class="keywordtype">int</span>
<a name="l01175"></a><a class="code" href="apprentice_8c.html#c72b61f500e69db85423d5720e8c8d05">01175</a> <a class="code" href="apprentice_8c.html#c72b61f500e69db85423d5720e8c8d05">apprentice_compile</a>(<span class="keyword">struct</span> <a class="code" href="structmagic__set.html">magic_set</a> *ms, <span class="keyword">struct</span> <a class="code" href="structmagic.html">magic</a> **magicp,
<a name="l01176"></a>01176 uint32_t *nmagicp, <span class="keyword">const</span> <span class="keywordtype">char</span> *fn)
<a name="l01177"></a>01177 {
<a name="l01178"></a>01178 <span class="keywordtype">int</span> fd;
<a name="l01179"></a>01179 <span class="keywordtype">char</span> buf[<a class="code" href="apprentice_8c.html#ddfa831c1473e710d2b71b72fd7fcfa5">MAXPATHLEN</a>];
<a name="l01180"></a>01180 <span class="keywordtype">char</span> *dbname = <a class="code" href="apprentice_8c.html#2da87acbfe61481277dbc47331785e2d">mkdbname</a>(fn, buf, <span class="keyword">sizeof</span>(buf), 1);
<a name="l01181"></a>01181
<a name="l01182"></a>01182 <span class="keywordflow">if</span> (dbname == NULL)
<a name="l01183"></a>01183 <span class="keywordflow">return</span> -1;
<a name="l01184"></a>01184
<a name="l01185"></a>01185 <span class="keywordflow">if</span> ((fd = open(dbname, O_WRONLY|O_CREAT|O_TRUNC, 0644)) == -1) {
<a name="l01186"></a>01186 <a class="code" href="file_8h.html#b97a2a8e3a9e23613bcb1a49c4411919">file_error</a>(ms, <a class="code" href="system_8h.html#d65a8842cc674e3ddf69355898c0ecbf">errno</a>, <span class="stringliteral">"cannot open `%s'"</span>, dbname);
<a name="l01187"></a>01187 <span class="keywordflow">return</span> -1;
<a name="l01188"></a>01188 }
<a name="l01189"></a>01189
<a name="l01190"></a>01190 <span class="keywordflow">if</span> (write(fd, ar, <span class="keyword">sizeof</span>(ar)) != (ssize_t)<span class="keyword">sizeof</span>(ar)) {
<a name="l01191"></a>01191 <a class="code" href="file_8h.html#b97a2a8e3a9e23613bcb1a49c4411919">file_error</a>(ms, <a class="code" href="system_8h.html#d65a8842cc674e3ddf69355898c0ecbf">errno</a>, <span class="stringliteral">"error writing `%s'"</span>, dbname);
<a name="l01192"></a>01192 <span class="keywordflow">return</span> -1;
<a name="l01193"></a>01193 }
<a name="l01194"></a>01194
<a name="l01195"></a>01195 <span class="keywordflow">if</span> (lseek(fd, (off_t)<span class="keyword">sizeof</span>(<span class="keyword">struct</span> <a class="code" href="structmagic.html">magic</a>), <a class="code" href="system_8h.html#0d112bae8fd35be772185b6ec6bcbe64">SEEK_SET</a>)
<a name="l01196"></a>01196 != <span class="keyword">sizeof</span>(<span class="keyword">struct</span> magic)) {
<a name="l01197"></a>01197 <a class="code" href="file_8h.html#b97a2a8e3a9e23613bcb1a49c4411919">file_error</a>(ms, <a class="code" href="system_8h.html#d65a8842cc674e3ddf69355898c0ecbf">errno</a>, <span class="stringliteral">"error seeking `%s'"</span>, dbname);
<a name="l01198"></a>01198 <span class="keywordflow">return</span> -1;
<a name="l01199"></a>01199 }
<a name="l01200"></a>01200
<a name="l01201"></a>01201 <span class="keywordflow">if</span> (write(fd, *magicp, (<span class="keyword">sizeof</span>(<span class="keyword">struct</span> magic) * *nmagicp))
<a name="l01202"></a>01202 != (ssize_t)(<span class="keyword">sizeof</span>(<span class="keyword">struct</span> magic) * *nmagicp)) {
<a name="l01203"></a>01203 <a class="code" href="file_8h.html#b97a2a8e3a9e23613bcb1a49c4411919">file_error</a>(ms, <a class="code" href="system_8h.html#d65a8842cc674e3ddf69355898c0ecbf">errno</a>, <span class="stringliteral">"error writing `%s'"</span>, dbname);
<a name="l01204"></a>01204 <span class="keywordflow">return</span> -1;
<a name="l01205"></a>01205 }
<a name="l01206"></a>01206
<a name="l01207"></a>01207 (void)close(fd);
<a name="l01208"></a>01208 <span class="keywordflow">return</span> 0;
<a name="l01209"></a>01209 }
<a name="l01210"></a>01210
<a name="l01211"></a>01211 <span class="comment">/*@unchecked@*/</span> <span class="comment">/*@observer@*/</span>
<a name="l01212"></a><a class="code" href="apprentice_8c.html#1ff9fc08fcad69d86fcb200d40da8aac">01212</a> <span class="keyword">private</span> <span class="keyword">const</span> <span class="keywordtype">char</span> <a class="code" href="apprentice_8c.html#1ff9fc08fcad69d86fcb200d40da8aac">ext</a>[] = <span class="stringliteral">".mgc"</span>;
<a name="l01213"></a>01213 <span class="comment">/*</span>
<a name="l01214"></a>01214 <span class="comment"> * make a dbname</span>
<a name="l01215"></a>01215 <span class="comment"> */</span>
<a name="l01216"></a>01216 <span class="keyword">private</span> <span class="keywordtype">char</span> *
<a name="l01217"></a><a class="code" href="apprentice_8c.html#2da87acbfe61481277dbc47331785e2d">01217</a> <a class="code" href="apprentice_8c.html#2da87acbfe61481277dbc47331785e2d">mkdbname</a>(<span class="keyword">const</span> <span class="keywordtype">char</span> *fn, <span class="keywordtype">char</span> *buf, size_t bufsiz, <span class="keywordtype">int</span> strip)
<a name="l01218"></a>01218 {
<a name="l01219"></a>01219 <span class="keywordflow">if</span> (strip) {
<a name="l01220"></a>01220 <span class="keyword">const</span> <span class="keywordtype">char</span> *p;
<a name="l01221"></a>01221 <span class="keywordflow">if</span> ((p = strrchr(fn, <span class="charliteral">'/'</span>)) != NULL)
<a name="l01222"></a>01222 fn = ++p;
<a name="l01223"></a>01223 }
<a name="l01224"></a>01224
<a name="l01225"></a>01225 (void)<a class="code" href="rpmps_8c.html#8eff177ddf89d8d85ac7c6b90a011480">snprintf</a>(buf, bufsiz, <span class="stringliteral">"%s%s"</span>, fn, ext);
<a name="l01226"></a>01226 <span class="keywordflow">return</span> buf;
<a name="l01227"></a>01227 }
<a name="l01228"></a>01228
<a name="l01229"></a>01229 <span class="comment">/*</span>
<a name="l01230"></a>01230 <span class="comment"> * Byteswap an mmap'ed file if needed</span>
<a name="l01231"></a>01231 <span class="comment"> */</span>
<a name="l01232"></a>01232 <span class="keyword">private</span> <span class="keywordtype">void</span>
<a name="l01233"></a><a class="code" href="apprentice_8c.html#88d3a32480b07c9b7086ca17872752ff">01233</a> <a class="code" href="apprentice_8c.html#88d3a32480b07c9b7086ca17872752ff">byteswap</a>(<span class="keyword">struct</span> <a class="code" href="structmagic.html">magic</a> *<a class="code" href="structmagic.html">magic</a>, uint32_t nmagic)
<a name="l01234"></a>01234 {
<a name="l01235"></a>01235 uint32_t i;
<a name="l01236"></a>01236 <span class="keywordflow">for</span> (i = 0; i < nmagic; i++)
<a name="l01237"></a>01237 <a class="code" href="apprentice_8c.html#3075bee49929d6cd754945a58dc82298">bs1</a>(&<a class="code" href="compress_8c.html#52bfb08821468413d41bc3e3b38dc078">magic</a>[i]);
<a name="l01238"></a>01238 }
<a name="l01239"></a>01239
<a name="l01240"></a>01240 <span class="comment">/*</span>
<a name="l01241"></a>01241 <span class="comment"> * swap a short</span>
<a name="l01242"></a>01242 <span class="comment"> */</span>
<a name="l01243"></a>01243 <span class="keyword">private</span> uint16_t
<a name="l01244"></a><a class="code" href="apprentice_8c.html#cf2437870e281b5a8f56ea5a481794b4">01244</a> <a class="code" href="apprentice_8c.html#cf2437870e281b5a8f56ea5a481794b4">swap2</a>(uint16_t sv)
<a name="l01245"></a>01245 {
<a name="l01246"></a>01246 uint16_t rv;
<a name="l01247"></a>01247 uint8_t *s = (uint8_t *)(<span class="keywordtype">void</span> *)&sv;
<a name="l01248"></a>01248 uint8_t *d = (uint8_t *)(<span class="keywordtype">void</span> *)&rv;
<a name="l01249"></a>01249 d[0] = s[1];
<a name="l01250"></a>01250 d[1] = s[0];
<a name="l01251"></a>01251 <span class="keywordflow">return</span> rv;
<a name="l01252"></a>01252 }
<a name="l01253"></a>01253
<a name="l01254"></a>01254 <span class="comment">/*</span>
<a name="l01255"></a>01255 <span class="comment"> * swap an int</span>
<a name="l01256"></a>01256 <span class="comment"> */</span>
<a name="l01257"></a>01257 <span class="keyword">private</span> uint32_t
<a name="l01258"></a><a class="code" href="apprentice_8c.html#a8650b65e7f5f66487363fc6e75b0c46">01258</a> <a class="code" href="apprentice_8c.html#a8650b65e7f5f66487363fc6e75b0c46">swap4</a>(uint32_t sv)
<a name="l01259"></a>01259 {
<a name="l01260"></a>01260 uint32_t rv;
<a name="l01261"></a>01261 uint8_t *s = (uint8_t *)(<span class="keywordtype">void</span> *)&sv;
<a name="l01262"></a>01262 uint8_t *d = (uint8_t *)(<span class="keywordtype">void</span> *)&rv;
<a name="l01263"></a>01263 d[0] = s[3];
<a name="l01264"></a>01264 d[1] = s[2];
<a name="l01265"></a>01265 d[2] = s[1];
<a name="l01266"></a>01266 d[3] = s[0];
<a name="l01267"></a>01267 <span class="keywordflow">return</span> rv;
<a name="l01268"></a>01268 }
<a name="l01269"></a>01269
<a name="l01270"></a>01270 <span class="comment">/*</span>
<a name="l01271"></a>01271 <span class="comment"> * byteswap a single magic entry</span>
<a name="l01272"></a>01272 <span class="comment"> */</span>
<a name="l01273"></a>01273 <span class="keyword">private</span> <span class="keywordtype">void</span>
<a name="l01274"></a><a class="code" href="apprentice_8c.html#3075bee49929d6cd754945a58dc82298">01274</a> <a class="code" href="apprentice_8c.html#3075bee49929d6cd754945a58dc82298">bs1</a>(<span class="keyword">struct</span> <a class="code" href="structmagic.html">magic</a> *m)
<a name="l01275"></a>01275 {
<a name="l01276"></a>01276 m-><a class="code" href="structmagic.html#23a46cd1d650d2df768ab0ad4a6f3f12">cont_level</a> = <a class="code" href="apprentice_8c.html#cf2437870e281b5a8f56ea5a481794b4">swap2</a>(m-><a class="code" href="structmagic.html#23a46cd1d650d2df768ab0ad4a6f3f12">cont_level</a>);
<a name="l01277"></a>01277 m-><a class="code" href="structmagic.html#b40d534d6197e80d1080abc637c53740">offset</a> = <a class="code" href="apprentice_8c.html#a8650b65e7f5f66487363fc6e75b0c46">swap4</a>((uint32_t)m-><a class="code" href="structmagic.html#b40d534d6197e80d1080abc637c53740">offset</a>);
<a name="l01278"></a>01278 m-><a class="code" href="structmagic.html#b0cfe17fa1f034128c80fb5dea7daf5e">in_offset</a> = <a class="code" href="apprentice_8c.html#a8650b65e7f5f66487363fc6e75b0c46">swap4</a>((uint32_t)m-><a class="code" href="structmagic.html#b0cfe17fa1f034128c80fb5dea7daf5e">in_offset</a>);
<a name="l01279"></a>01279 <span class="keywordflow">if</span> (!<a class="code" href="apprentice_8c.html#f72c8807835aa3ecde5670574dacac0e">IS_STRING</a>(m-><a class="code" href="structmagic.html#e75b734f7c71f47276a4632fcdbf47a1">type</a>))
<a name="l01280"></a>01280 m-><a class="code" href="structmagic.html#22209e0ed0303f04488686dee72c4ddf">value</a>.<a class="code" href="unionmagic_1_1VALUETYPE.html#3fb4b3969388761865f4b781ce7dc48e">l</a> = <a class="code" href="apprentice_8c.html#a8650b65e7f5f66487363fc6e75b0c46">swap4</a>(m-><a class="code" href="structmagic.html#22209e0ed0303f04488686dee72c4ddf">value</a>.<a class="code" href="unionmagic_1_1VALUETYPE.html#3fb4b3969388761865f4b781ce7dc48e">l</a>);
<a name="l01281"></a>01281 m-><a class="code" href="structmagic.html#74302c6a10faec1229e9ea802946f044">mask</a> = <a class="code" href="apprentice_8c.html#a8650b65e7f5f66487363fc6e75b0c46">swap4</a>(m-><a class="code" href="structmagic.html#74302c6a10faec1229e9ea802946f044">mask</a>);
<a name="l01282"></a>01282 }
</pre></div><hr size="1"><address style="align: right;"><small>Generated on 1 Oct 2013 for rpm by
<a href="http://www.doxygen.org/index.html">
<img src="doxygen.png" alt="doxygen" align="middle" border="0"></a> 1.4.7 </small></address>
</body>
</html>
