Sophie

Sophie

distrib > Fedora > 15 > i386 > by-pkgid > 1f9eb832ba1e4b88d9a5c2b384813bb4 > files > 5500

kdelibs3-apidocs-3.5.10-31.fc15.noarch.rpm

<?xml version="1.0" encoding="UTF-8"?>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml" lang="en_US" xml:lang="en_US">

<head>
  <title>kio/kio: kmimemagic.cpp Source File (kio/kio)</title>
  <meta http-equiv="Content-Type" content="text/html; charset=utf-8" />

  <meta http-equiv="Content-Style-Type" content="text/css" />

  <meta http-equiv="pics-label" content='(pics-1.1 "http://www.icra.org/ratingsv02.html" comment "ICRAonline DE v2.0" l gen true for "http://www.kde.org"  r (nz 1 vz 1 lz 1 oz 1 cb 1) "http://www.rsac.org/ratingsv01.html" l gen true for "http://www.kde.org"  r (n 0 s 0 v 0 l 0))' />

  <meta name="trademark" content="KDE e.V." />
  <meta name="description" content="K Desktop Environment Homepage, KDE.org" />
  <meta name="MSSmartTagsPreventParsing" content="true" />
  <meta name="robots" content="all" />

  <link rel="shortcut icon" href="../../../favicon.ico" />

<link rel="stylesheet" media="screen" type="text/css" title="APIDOX" href="doxygen.css" />



</head>

<body>

<div id="nav_header_top" align="right">
  <a href="#content" class="doNotDisplay" accesskey="2">Skip to main content ::</a>

  <a href="../../.."><img id="nav_header_logo" alt="Home" align="left" src="../../../kde_gear_64.png" border="0" /></a>
  <span class="doNotDisplay">::</span>

  <div id="nav_header_title" align="left">KDE API Reference</div>


</div>

<div id="nav_header_bottom" align="right">
  <span class="doNotDisplay">:: <a href="#navigation" accesskey="5">Skip to Link Menu</a><br/></span>
  <div id="nav_header_bottom_right" style="text-align: left;">
/ <a href="../../..">API Reference</a>
 / <a href="../../html/index.html">kio</a> / <a href=".">kio</a>
  </div>
</div>


<table id="main" border="0" cellpadding="0" cellspacing="0" width="100%">
<tr>
      <td valign="top" class="menuheader" height="0"></td>

  <td id="contentcolumn" valign="top" rowspan="2" >
    <div id="content" style="padding-top: 0px;"><div style="width:100%; margin: 0px; padding: 0px;">
    <a name="content"></a>


<!-- Generated by Doxygen 1.7.4 -->
<div class="header">
  <div class="headertitle">
<div class="title">kmimemagic.cpp</div>  </div>
</div>
<div class="contents">
<div class="fragment"><pre class="fragment"><a name="l00001"></a>00001 <span class="comment">/* This file is part of the KDE libraries</span>
<a name="l00002"></a>00002 <span class="comment">   Copyright (C) 2000 Fritz Elfert &lt;fritz@kde.org&gt;</span>
<a name="l00003"></a>00003 <span class="comment">   Copyright (C) 2004 Allan Sandfeld Jensen &lt;kde@carewolf.com&gt;</span>
<a name="l00004"></a>00004 <span class="comment"></span>
<a name="l00005"></a>00005 <span class="comment">   This library is free software; you can redistribute it and/or</span>
<a name="l00006"></a>00006 <span class="comment">   modify it under the terms of the GNU Library General Public</span>
<a name="l00007"></a>00007 <span class="comment">   License version 2 as published by the Free Software Foundation.</span>
<a name="l00008"></a>00008 <span class="comment"></span>
<a name="l00009"></a>00009 <span class="comment">   This library is distributed in the hope that it will be useful,</span>
<a name="l00010"></a>00010 <span class="comment">   but WITHOUT ANY WARRANTY; without even the implied warranty of</span>
<a name="l00011"></a>00011 <span class="comment">   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU</span>
<a name="l00012"></a>00012 <span class="comment">   Library General Public License for more details.</span>
<a name="l00013"></a>00013 <span class="comment"></span>
<a name="l00014"></a>00014 <span class="comment">   You should have received a copy of the GNU Library General Public License</span>
<a name="l00015"></a>00015 <span class="comment">   along with this library; see the file COPYING.LIB.  If not, write to</span>
<a name="l00016"></a>00016 <span class="comment">   the Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor,</span>
<a name="l00017"></a>00017 <span class="comment">   Boston, MA 02110-1301, USA.</span>
<a name="l00018"></a>00018 <span class="comment">*/</span>
<a name="l00019"></a>00019 <span class="preprocessor">#include &quot;kmimemagic.h&quot;</span>
<a name="l00020"></a>00020 <span class="preprocessor">#include &lt;kdebug.h&gt;</span>
<a name="l00021"></a>00021 <span class="preprocessor">#include &lt;kapplication.h&gt;</span>
<a name="l00022"></a>00022 <span class="preprocessor">#include &lt;qfile.h&gt;</span>
<a name="l00023"></a>00023 <span class="preprocessor">#include &lt;ksimpleconfig.h&gt;</span>
<a name="l00024"></a>00024 <span class="preprocessor">#include &lt;kstandarddirs.h&gt;</span>
<a name="l00025"></a>00025 <span class="preprocessor">#include &lt;kstaticdeleter.h&gt;</span>
<a name="l00026"></a>00026 <span class="preprocessor">#include &lt;klargefile.h&gt;</span>
<a name="l00027"></a>00027 <span class="preprocessor">#include &lt;assert.h&gt;</span>
<a name="l00028"></a>00028 
<a name="l00029"></a>00029 <span class="keyword">static</span> <span class="keywordtype">int</span> fsmagic(<span class="keyword">struct</span> config_rec* conf, <span class="keyword">const</span> <span class="keywordtype">char</span> *fn, KDE_struct_stat *sb);
<a name="l00030"></a>00030 <span class="keyword">static</span> <span class="keywordtype">void</span> process(<span class="keyword">struct</span> config_rec* conf,  <span class="keyword">const</span> <a class="codeRef" href="qstring.html">QString</a> &amp;);
<a name="l00031"></a>00031 <span class="keyword">static</span> <span class="keywordtype">int</span> ascmagic(<span class="keyword">struct</span> config_rec* conf, <span class="keywordtype">unsigned</span> <span class="keywordtype">char</span> *buf, <span class="keywordtype">int</span> nbytes);
<a name="l00032"></a>00032 <span class="keyword">static</span> <span class="keywordtype">int</span> tagmagic(<span class="keywordtype">unsigned</span> <span class="keywordtype">char</span> *buf, <span class="keywordtype">int</span> nbytes);
<a name="l00033"></a>00033 <span class="keyword">static</span> <span class="keywordtype">int</span> textmagic(<span class="keyword">struct</span> config_rec* conf, <span class="keywordtype">unsigned</span> <span class="keywordtype">char</span> *, <span class="keywordtype">int</span>);
<a name="l00034"></a>00034 
<a name="l00035"></a>00035 <span class="keyword">static</span> <span class="keywordtype">void</span> tryit(<span class="keyword">struct</span> config_rec* conf, <span class="keywordtype">unsigned</span> <span class="keywordtype">char</span> *buf, <span class="keywordtype">int</span> nb);
<a name="l00036"></a>00036 <span class="keyword">static</span> <span class="keywordtype">int</span> match(<span class="keyword">struct</span> config_rec* conf, <span class="keywordtype">unsigned</span> <span class="keywordtype">char</span> *, <span class="keywordtype">int</span>);
<a name="l00037"></a>00037 
<a name="l00038"></a>00038 <a class="code" href="classKMimeMagic.html">KMimeMagic</a>* KMimeMagic::s_pSelf;
<a name="l00039"></a>00039 <span class="keyword">static</span> KStaticDeleter&lt;KMimeMagic&gt; kmimemagicsd;
<a name="l00040"></a>00040 
<a name="l00041"></a><a class="code" href="classKMimeMagic.html#a7f8f24ea5d0d8e3a52f7942919a19f65">00041</a> <a class="code" href="classKMimeMagic.html">KMimeMagic</a>* <a class="code" href="classKMimeMagic.html#a7f8f24ea5d0d8e3a52f7942919a19f65" title="Returns a pointer to the unique KMimeMagic instance in this process.">KMimeMagic::self</a>()
<a name="l00042"></a>00042 {
<a name="l00043"></a>00043   <span class="keywordflow">if</span>( !s_pSelf )
<a name="l00044"></a>00044     initStatic();
<a name="l00045"></a>00045   <span class="keywordflow">return</span> s_pSelf;
<a name="l00046"></a>00046 }
<a name="l00047"></a>00047 
<a name="l00048"></a>00048 <span class="keywordtype">void</span> KMimeMagic::initStatic()
<a name="l00049"></a>00049 {
<a name="l00050"></a>00050   s_pSelf = kmimemagicsd.setObject( s_pSelf, <span class="keyword">new</span> <a class="code" href="classKMimeMagic.html#a0fb103387907aa14ca8bcbcff7e1d991" title="Create a parser and initialize it with the KDE-global data: the &quot;magic&quot; config file as well as the sn...">KMimeMagic</a>() );
<a name="l00051"></a>00051   s_pSelf-&gt;<a class="code" href="classKMimeMagic.html#a179ac8a343be41243174aa1c62f1c2d0" title="Enable/Disable follow-links.">setFollowLinks</a>( <span class="keyword">true</span> );
<a name="l00052"></a>00052 }
<a name="l00053"></a>00053 
<a name="l00054"></a>00054 <span class="preprocessor">#include &lt;stdio.h&gt;</span>
<a name="l00055"></a>00055 <span class="preprocessor">#include &lt;unistd.h&gt;</span>
<a name="l00056"></a>00056 <span class="preprocessor">#include &lt;stdlib.h&gt;</span>
<a name="l00057"></a>00057 <span class="preprocessor">#include &lt;sys/wait.h&gt;</span>
<a name="l00058"></a>00058 <span class="preprocessor">#include &lt;sys/types.h&gt;</span>
<a name="l00059"></a>00059 <span class="preprocessor">#include &lt;sys/stat.h&gt;</span>
<a name="l00060"></a>00060 <span class="preprocessor">#include &lt;fcntl.h&gt;</span>
<a name="l00061"></a>00061 <span class="preprocessor">#include &lt;errno.h&gt;</span>
<a name="l00062"></a>00062 <span class="preprocessor">#include &lt;ctype.h&gt;</span>
<a name="l00063"></a>00063 <span class="preprocessor">#include &lt;time.h&gt;</span>
<a name="l00064"></a>00064 <span class="preprocessor">#include &lt;utime.h&gt;</span>
<a name="l00065"></a>00065 <span class="preprocessor">#include &lt;stdarg.h&gt;</span>
<a name="l00066"></a>00066 <span class="preprocessor">#include &lt;qregexp.h&gt;</span>
<a name="l00067"></a>00067 <span class="preprocessor">#include &lt;qstring.h&gt;</span>
<a name="l00068"></a>00068 
<a name="l00069"></a>00069 <span class="comment">//#define MIME_MAGIC_DEBUG_TABLE // untested</span>
<a name="l00070"></a>00070 
<a name="l00071"></a>00071 <span class="comment">// Uncomment to debug the config-file parsing phase</span>
<a name="l00072"></a>00072 <span class="comment">//#define DEBUG_APPRENTICE</span>
<a name="l00073"></a>00073 <span class="comment">// Uncomment to debug the matching phase</span>
<a name="l00074"></a>00074 <span class="comment">//#define DEBUG_MIMEMAGIC</span>
<a name="l00075"></a>00075 
<a name="l00076"></a>00076 <span class="preprocessor">#if (defined DEBUG_MIMEMAGIC || defined DEBUG_APPRENTICE)</span>
<a name="l00077"></a>00077 <span class="preprocessor"></span><span class="preprocessor">#define DEBUG_LINENUMBERS</span>
<a name="l00078"></a>00078 <span class="preprocessor"></span><span class="preprocessor">#endif</span>
<a name="l00079"></a>00079 <span class="preprocessor"></span>
<a name="l00080"></a>00080 <span class="comment">/*</span>
<a name="l00081"></a>00081 <span class="comment"> * Buitltin Mime types</span>
<a name="l00082"></a>00082 <span class="comment"> */</span>
<a name="l00083"></a>00083 <span class="preprocessor">#define MIME_BINARY_UNKNOWN    &quot;application/octet-stream&quot;</span>
<a name="l00084"></a>00084 <span class="preprocessor"></span><span class="preprocessor">#define MIME_BINARY_UNREADABLE &quot;application/x-unreadable&quot;</span>
<a name="l00085"></a>00085 <span class="preprocessor"></span><span class="preprocessor">#define MIME_BINARY_ZEROSIZE   &quot;application/x-zerosize&quot;</span>
<a name="l00086"></a>00086 <span class="preprocessor"></span><span class="preprocessor">#define MIME_TEXT_UNKNOWN      &quot;text/plain&quot;</span>
<a name="l00087"></a>00087 <span class="preprocessor"></span><span class="preprocessor">#define MIME_TEXT_PLAIN        &quot;text/plain&quot;</span>
<a name="l00088"></a>00088 <span class="preprocessor"></span><span class="preprocessor">#define MIME_INODE_DIR         &quot;inode/directory&quot;</span>
<a name="l00089"></a>00089 <span class="preprocessor"></span><span class="preprocessor">#define MIME_INODE_CDEV        &quot;inode/chardevice&quot;</span>
<a name="l00090"></a>00090 <span class="preprocessor"></span><span class="preprocessor">#define MIME_INODE_BDEV        &quot;inode/blockdevice&quot;</span>
<a name="l00091"></a>00091 <span class="preprocessor"></span><span class="preprocessor">#define MIME_INODE_FIFO        &quot;inode/fifo&quot;</span>
<a name="l00092"></a>00092 <span class="preprocessor"></span><span class="preprocessor">#define MIME_INODE_LINK        &quot;inode/link&quot;</span>
<a name="l00093"></a>00093 <span class="preprocessor"></span><span class="preprocessor">#define MIME_INODE_SOCK        &quot;inode/socket&quot;</span>
<a name="l00094"></a>00094 <span class="preprocessor"></span><span class="comment">// Following should go in magic-file - Fritz</span>
<a name="l00095"></a>00095 <span class="preprocessor">#define MIME_APPL_TROFF        &quot;application/x-troff&quot;</span>
<a name="l00096"></a>00096 <span class="preprocessor"></span><span class="preprocessor">#define MIME_APPL_TAR          &quot;application/x-tar&quot;</span>
<a name="l00097"></a>00097 <span class="preprocessor"></span><span class="preprocessor">#define MIME_TEXT_FORTRAN      &quot;text/x-fortran&quot;</span>
<a name="l00098"></a>00098 <span class="preprocessor"></span>
<a name="l00099"></a>00099 <span class="preprocessor">#define MAXMIMESTRING        256</span>
<a name="l00100"></a>00100 <span class="preprocessor"></span>
<a name="l00101"></a>00101 <span class="preprocessor">#define HOWMANY 4000            </span><span class="comment">/* big enough to recognize most WWW files, and skip GPL-headers */</span>
<a name="l00102"></a>00102 <span class="preprocessor">#define MAXDESC   50            </span><span class="comment">/* max leng of text description */</span>
<a name="l00103"></a>00103 <span class="preprocessor">#define MAXstring 64            </span><span class="comment">/* max leng of &quot;string&quot; types */</span>
<a name="l00104"></a>00104 
<a name="l00105"></a>00105 <span class="keyword">typedef</span> <span class="keyword">union </span>VALUETYPE {
<a name="l00106"></a>00106     <span class="keywordtype">unsigned</span> <span class="keywordtype">char</span> b;
<a name="l00107"></a>00107     <span class="keywordtype">unsigned</span> <span class="keywordtype">short</span> h;
<a name="l00108"></a>00108     <span class="keywordtype">unsigned</span> <span class="keywordtype">long</span> l;
<a name="l00109"></a>00109     <span class="keywordtype">char</span> s[MAXstring];
<a name="l00110"></a>00110     <span class="keywordtype">unsigned</span> <span class="keywordtype">char</span> hs[2];    <span class="comment">/* 2 bytes of a fixed-endian &quot;short&quot; */</span>
<a name="l00111"></a>00111     <span class="keywordtype">unsigned</span> <span class="keywordtype">char</span> hl[4];    <span class="comment">/* 2 bytes of a fixed-endian &quot;long&quot; */</span>
<a name="l00112"></a>00112 } VALUETYPE;
<a name="l00113"></a>00113 
<a name="l00114"></a>00114 <span class="keyword">struct </span>magic {
<a name="l00115"></a>00115     <span class="keyword">struct </span>magic *next;     <span class="comment">/* link to next entry */</span>
<a name="l00116"></a>00116 <span class="preprocessor">#ifdef DEBUG_LINENUMBERS</span>
<a name="l00117"></a>00117 <span class="preprocessor"></span>    <span class="keywordtype">int</span> lineno;             <span class="comment">/* line number from magic file - doesn&#39;t say from which one ;) */</span>
<a name="l00118"></a>00118 <span class="preprocessor">#endif</span>
<a name="l00119"></a>00119 <span class="preprocessor"></span>
<a name="l00120"></a>00120     <span class="keywordtype">short</span> flag;
<a name="l00121"></a>00121 <span class="preprocessor">#define INDIR    1              </span><span class="comment">/* if &#39;&gt;(...)&#39; appears,  */</span>
<a name="l00122"></a>00122 <span class="preprocessor">#define UNSIGNED 2              </span><span class="comment">/* comparison is unsigned */</span>
<a name="l00123"></a>00123     <span class="keywordtype">short</span> cont_level;       <span class="comment">/* level of &quot;&gt;&quot; */</span>
<a name="l00124"></a>00124     <span class="keyword">struct </span>{
<a name="l00125"></a>00125         <span class="keywordtype">char</span> type;      <span class="comment">/* byte short long */</span>
<a name="l00126"></a>00126         <span class="keywordtype">long</span> offset;    <span class="comment">/* offset from indirection */</span>
<a name="l00127"></a>00127     } in;
<a name="l00128"></a>00128     <span class="keywordtype">long</span> offset;            <span class="comment">/* offset to magic number */</span>
<a name="l00129"></a>00129     <span class="keywordtype">unsigned</span> <span class="keywordtype">char</span> reln;     <span class="comment">/* relation (0=eq, &#39;&gt;&#39;=gt, etc) */</span>
<a name="l00130"></a>00130     <span class="keywordtype">char</span> type;              <span class="comment">/* int, short, long or string. */</span>
<a name="l00131"></a>00131     <span class="keywordtype">char</span> vallen;            <span class="comment">/* length of string value, if any */</span>
<a name="l00132"></a>00132 <span class="preprocessor">#define BYTE       1</span>
<a name="l00133"></a>00133 <span class="preprocessor"></span><span class="preprocessor">#define SHORT      2</span>
<a name="l00134"></a>00134 <span class="preprocessor"></span><span class="preprocessor">#define LONG       4</span>
<a name="l00135"></a>00135 <span class="preprocessor"></span><span class="preprocessor">#define STRING     5</span>
<a name="l00136"></a>00136 <span class="preprocessor"></span><span class="preprocessor">#define DATE       6</span>
<a name="l00137"></a>00137 <span class="preprocessor"></span><span class="preprocessor">#define BESHORT    7</span>
<a name="l00138"></a>00138 <span class="preprocessor"></span><span class="preprocessor">#define BELONG     8</span>
<a name="l00139"></a>00139 <span class="preprocessor"></span><span class="preprocessor">#define BEDATE     9</span>
<a name="l00140"></a>00140 <span class="preprocessor"></span><span class="preprocessor">#define LESHORT   10</span>
<a name="l00141"></a>00141 <span class="preprocessor"></span><span class="preprocessor">#define LELONG    11</span>
<a name="l00142"></a>00142 <span class="preprocessor"></span><span class="preprocessor">#define LEDATE    12</span>
<a name="l00143"></a>00143 <span class="preprocessor"></span>    VALUETYPE value;        <span class="comment">/* either number or string */</span>
<a name="l00144"></a>00144     <span class="keywordtype">unsigned</span> <span class="keywordtype">long</span> mask;     <span class="comment">/* mask before comparison with value */</span>
<a name="l00145"></a>00145     <span class="keywordtype">char</span> nospflag;          <span class="comment">/* suppress space character */</span>
<a name="l00146"></a>00146 
<a name="l00147"></a>00147     <span class="comment">/* NOTE: this string is suspected of overrunning - find it! */</span>
<a name="l00148"></a>00148     <span class="keywordtype">char</span> desc[MAXDESC];     <span class="comment">/* description */</span>
<a name="l00149"></a>00149 };
<a name="l00150"></a>00150 
<a name="l00151"></a>00151 <span class="comment">/*</span>
<a name="l00152"></a>00152 <span class="comment"> * data structures for tar file recognition</span>
<a name="l00153"></a>00153 <span class="comment"> * --------------------------------------------------------------------------</span>
<a name="l00154"></a>00154 <span class="comment"> * Header file for public domain tar (tape archive) program.</span>
<a name="l00155"></a>00155 <span class="comment"> *</span>
<a name="l00156"></a>00156 <span class="comment"> * @(#)tar.h 1.20 86/10/29    Public Domain. Created 25 August 1985 by John</span>
<a name="l00157"></a>00157 <span class="comment"> * Gilmore, ihnp4!hoptoad!gnu.</span>
<a name="l00158"></a>00158 <span class="comment"> *</span>
<a name="l00159"></a>00159 <span class="comment"> * Header block on tape.</span>
<a name="l00160"></a>00160 <span class="comment"> *</span>
<a name="l00161"></a>00161 <span class="comment"> * I&#39;m going to use traditional DP naming conventions here. A &quot;block&quot; is a big</span>
<a name="l00162"></a>00162 <span class="comment"> * chunk of stuff that we do I/O on. A &quot;record&quot; is a piece of info that we</span>
<a name="l00163"></a>00163 <span class="comment"> * care about. Typically many &quot;record&quot;s fit into a &quot;block&quot;.</span>
<a name="l00164"></a>00164 <span class="comment"> */</span>
<a name="l00165"></a>00165 <span class="preprocessor">#define RECORDSIZE    512</span>
<a name="l00166"></a>00166 <span class="preprocessor"></span><span class="preprocessor">#define NAMSIZ    100</span>
<a name="l00167"></a>00167 <span class="preprocessor"></span><span class="preprocessor">#define TUNMLEN    32</span>
<a name="l00168"></a>00168 <span class="preprocessor"></span><span class="preprocessor">#define TGNMLEN    32</span>
<a name="l00169"></a>00169 <span class="preprocessor"></span>
<a name="l00170"></a>00170 <span class="keyword">union </span>record {
<a name="l00171"></a>00171     <span class="keywordtype">char</span> charptr[RECORDSIZE];
<a name="l00172"></a>00172     <span class="keyword">struct </span>header {
<a name="l00173"></a>00173         <span class="keywordtype">char</span> name[NAMSIZ];
<a name="l00174"></a>00174         <span class="keywordtype">char</span> mode[8];
<a name="l00175"></a>00175         <span class="keywordtype">char</span> uid[8];
<a name="l00176"></a>00176         <span class="keywordtype">char</span> gid[8];
<a name="l00177"></a>00177         <span class="keywordtype">char</span> size[12];
<a name="l00178"></a>00178         <span class="keywordtype">char</span> mtime[12];
<a name="l00179"></a>00179         <span class="keywordtype">char</span> chksum[8];
<a name="l00180"></a>00180         <span class="keywordtype">char</span> linkflag;
<a name="l00181"></a>00181         <span class="keywordtype">char</span> linkname[NAMSIZ];
<a name="l00182"></a>00182         <span class="keywordtype">char</span> magic[8];
<a name="l00183"></a>00183         <span class="keywordtype">char</span> uname[TUNMLEN];
<a name="l00184"></a>00184         <span class="keywordtype">char</span> gname[TGNMLEN];
<a name="l00185"></a>00185         <span class="keywordtype">char</span> devmajor[8];
<a name="l00186"></a>00186         <span class="keywordtype">char</span> devminor[8];
<a name="l00187"></a>00187     } header;
<a name="l00188"></a>00188 };
<a name="l00189"></a>00189 
<a name="l00190"></a>00190 <span class="comment">/* The magic field is filled with this if uname and gname are valid. */</span>
<a name="l00191"></a>00191 <span class="preprocessor">#define    TMAGIC        &quot;ustar  &quot;  </span><span class="comment">/* 7 chars and a null */</span>
<a name="l00192"></a>00192 
<a name="l00193"></a>00193 <span class="comment">/*</span>
<a name="l00194"></a>00194 <span class="comment"> * file-function prototypes</span>
<a name="l00195"></a>00195 <span class="comment"> */</span>
<a name="l00196"></a>00196 <span class="keyword">static</span> <span class="keywordtype">int</span> is_tar(<span class="keywordtype">unsigned</span> <span class="keywordtype">char</span> *, <span class="keywordtype">int</span>);
<a name="l00197"></a>00197 <span class="keyword">static</span> <span class="keywordtype">unsigned</span> <span class="keywordtype">long</span> signextend(<span class="keyword">struct</span> magic *, <span class="keywordtype">unsigned</span> <span class="keywordtype">long</span>);
<a name="l00198"></a>00198 <span class="keyword">static</span> <span class="keywordtype">int</span> getvalue(<span class="keyword">struct</span> magic *, <span class="keywordtype">char</span> **);
<a name="l00199"></a>00199 <span class="keyword">static</span> <span class="keywordtype">int</span> hextoint(<span class="keywordtype">int</span>);
<a name="l00200"></a>00200 <span class="keyword">static</span> <span class="keywordtype">char</span> *getstr(<span class="keywordtype">char</span> *, <span class="keywordtype">char</span> *, <span class="keywordtype">int</span>, <span class="keywordtype">int</span> *);
<a name="l00201"></a>00201 <span class="keyword">static</span> <span class="keywordtype">int</span> mget(<span class="keyword">union</span> VALUETYPE *, <span class="keywordtype">unsigned</span> <span class="keywordtype">char</span> *, <span class="keyword">struct</span> magic *, <span class="keywordtype">int</span>);
<a name="l00202"></a>00202 <span class="keyword">static</span> <span class="keywordtype">int</span> mcheck(<span class="keyword">union</span> VALUETYPE *, <span class="keyword">struct</span> magic *);
<a name="l00203"></a>00203 <span class="keyword">static</span> <span class="keywordtype">int</span> mconvert(<span class="keyword">union</span> VALUETYPE *, <span class="keyword">struct</span> magic *);
<a name="l00204"></a>00204 <span class="keyword">static</span> <span class="keywordtype">long</span> from_oct(<span class="keywordtype">int</span>, <span class="keywordtype">char</span> *);
<a name="l00205"></a>00205 
<a name="l00206"></a>00206 <span class="comment">/*</span>
<a name="l00207"></a>00207 <span class="comment"> * includes for ASCII substring recognition formerly &quot;names.h&quot; in file</span>
<a name="l00208"></a>00208 <span class="comment"> * command</span>
<a name="l00209"></a>00209 <span class="comment"> *</span>
<a name="l00210"></a>00210 <span class="comment"> * Original notes: names and types used by ascmagic in file(1).</span>
<a name="l00211"></a>00211 <span class="comment"> * These tokens are</span>
<a name="l00212"></a>00212 <span class="comment"> * here because they can appear anywhere in the first HOWMANY bytes, while</span>
<a name="l00213"></a>00213 <span class="comment"> * tokens in /etc/magic must appear at fixed offsets into the file. Don&#39;t</span>
<a name="l00214"></a>00214 <span class="comment"> * make HOWMANY too high unless you have a very fast CPU.</span>
<a name="l00215"></a>00215 <span class="comment"> */</span>
<a name="l00216"></a>00216 
<a name="l00217"></a>00217 <span class="comment">/* these types are used calculate index to &#39;types&#39;: keep em in sync! */</span>
<a name="l00218"></a>00218 <span class="comment">/* HTML inserted in first because this is a web server module now */</span>
<a name="l00219"></a>00219 <span class="comment">/* ENG removed because stupid */</span>
<a name="l00220"></a>00220 <span class="preprocessor">#define L_HTML   0x001          </span><span class="comment">/* HTML */</span>
<a name="l00221"></a>00221 <span class="preprocessor">#define L_C      0x002          </span><span class="comment">/* first and foremost on UNIX */</span>
<a name="l00222"></a>00222 <span class="preprocessor">#define L_MAKE   0x004          </span><span class="comment">/* Makefiles */</span>
<a name="l00223"></a>00223 <span class="preprocessor">#define L_PLI    0x008          </span><span class="comment">/* PL/1 */</span>
<a name="l00224"></a>00224 <span class="preprocessor">#define L_MACH   0x010          </span><span class="comment">/* some kinda assembler */</span>
<a name="l00225"></a>00225 <span class="preprocessor">#define L_PAS    0x020          </span><span class="comment">/* Pascal */</span>
<a name="l00226"></a>00226 <span class="preprocessor">#define L_JAVA   0x040          </span><span class="comment">/* Java source */</span>
<a name="l00227"></a>00227 <span class="preprocessor">#define L_CPP    0x080          </span><span class="comment">/* C++ */</span>
<a name="l00228"></a>00228 <span class="preprocessor">#define L_MAIL   0x100          </span><span class="comment">/* Electronic mail */</span>
<a name="l00229"></a>00229 <span class="preprocessor">#define L_NEWS   0x200          </span><span class="comment">/* Usenet Netnews */</span>
<a name="l00230"></a>00230 <span class="preprocessor">#define L_DIFF   0x400          </span><span class="comment">/* Output of diff */</span>
<a name="l00231"></a>00231 <span class="preprocessor">#define L_OBJC   0x800          </span><span class="comment">/* Objective C */</span>
<a name="l00232"></a>00232 
<a name="l00233"></a>00233 <span class="comment">// Note: this is not a type, it&#39;s just used to mark items that should count more</span>
<a name="l00234"></a>00234 <span class="preprocessor">#define FLAG_STRONG 0x1000</span>
<a name="l00235"></a>00235 <span class="preprocessor"></span>
<a name="l00236"></a>00236 <span class="preprocessor">#define P_HTML   0          </span><span class="comment">/* HTML */</span>
<a name="l00237"></a>00237 <span class="preprocessor">#define P_C      1          </span><span class="comment">/* first and foremost on UNIX */</span>
<a name="l00238"></a>00238 <span class="preprocessor">#define P_MAKE   2          </span><span class="comment">/* Makefiles */</span>
<a name="l00239"></a>00239 <span class="preprocessor">#define P_PLI    3          </span><span class="comment">/* PL/1 */</span>
<a name="l00240"></a>00240 <span class="preprocessor">#define P_MACH   4          </span><span class="comment">/* some kinda assembler */</span>
<a name="l00241"></a>00241 <span class="preprocessor">#define P_PAS    5          </span><span class="comment">/* Pascal */</span>
<a name="l00242"></a>00242 <span class="preprocessor">#define P_JAVA   6          </span><span class="comment">/* Java source */</span>
<a name="l00243"></a>00243 <span class="preprocessor">#define P_CPP    7          </span><span class="comment">/* C++ */</span>
<a name="l00244"></a>00244 <span class="preprocessor">#define P_MAIL   8          </span><span class="comment">/* Electronic mail */</span>
<a name="l00245"></a>00245 <span class="preprocessor">#define P_NEWS   9          </span><span class="comment">/* Usenet Netnews */</span>
<a name="l00246"></a>00246 <span class="preprocessor">#define P_DIFF  10          </span><span class="comment">/* Output of diff */</span>
<a name="l00247"></a>00247 <span class="preprocessor">#define P_OBJC  11          </span><span class="comment">/* Objective C */</span>
<a name="l00248"></a>00248 
<a name="l00249"></a>00249 <span class="keyword">typedef</span> <span class="keyword">struct </span>asc_type {
<a name="l00250"></a>00250     <span class="keyword">const</span> <span class="keywordtype">char</span> *type;
<a name="l00251"></a>00251     <span class="keywordtype">int</span>  kwords;
<a name="l00252"></a>00252     <span class="keywordtype">double</span>  weight;
<a name="l00253"></a>00253 } asc_type;
<a name="l00254"></a>00254 
<a name="l00255"></a>00255 <span class="keyword">static</span> <span class="keyword">const</span> asc_type types[] = {
<a name="l00256"></a>00256     { <span class="stringliteral">&quot;text/html&quot;</span>,         19, 2 }, <span class="comment">// 10 items but 10 different words only</span>
<a name="l00257"></a>00257     { <span class="stringliteral">&quot;text/x-c&quot;</span>,          13, 1 },
<a name="l00258"></a>00258     { <span class="stringliteral">&quot;text/x-makefile&quot;</span>,    4, 1.9 },
<a name="l00259"></a>00259     { <span class="stringliteral">&quot;text/x-pli&quot;</span>,         1, 3 },
<a name="l00260"></a>00260     { <span class="stringliteral">&quot;text/x-assembler&quot;</span>,   6, 2.1 },
<a name="l00261"></a>00261     { <span class="stringliteral">&quot;text/x-pascal&quot;</span>,      1, 1 },
<a name="l00262"></a>00262     { <span class="stringliteral">&quot;text/x-java&quot;</span>,       12, 1 },
<a name="l00263"></a>00263     { <span class="stringliteral">&quot;text/x-c++&quot;</span>,        19, 1 },
<a name="l00264"></a>00264     { <span class="stringliteral">&quot;message/rfc822&quot;</span>,     4, 1.9 },
<a name="l00265"></a>00265     { <span class="stringliteral">&quot;message/news&quot;</span>,       3, 2 },
<a name="l00266"></a>00266         { <span class="stringliteral">&quot;text/x-diff&quot;</span>,        4, 2 },
<a name="l00267"></a>00267         { <span class="stringliteral">&quot;text/x-objc&quot;</span>,    10, 1 }
<a name="l00268"></a>00268 };
<a name="l00269"></a>00269 
<a name="l00270"></a>00270 <span class="preprocessor">#define NTYPES (sizeof(types)/sizeof(asc_type))</span>
<a name="l00271"></a>00271 <span class="preprocessor"></span>
<a name="l00272"></a>00272 <span class="keyword">static</span> <span class="keyword">struct </span>names {
<a name="l00273"></a>00273     <span class="keyword">const</span> <span class="keywordtype">char</span> *name;
<a name="l00274"></a>00274     <span class="keywordtype">short</span> type;
<a name="l00275"></a>00275 } <span class="keyword">const</span> names[] = {
<a name="l00276"></a>00276     {
<a name="l00277"></a>00277         <span class="stringliteral">&quot;&lt;html&quot;</span>, L_HTML | FLAG_STRONG
<a name="l00278"></a>00278     },
<a name="l00279"></a>00279     {
<a name="l00280"></a>00280         <span class="stringliteral">&quot;&lt;HTML&quot;</span>, L_HTML | FLAG_STRONG
<a name="l00281"></a>00281     },
<a name="l00282"></a>00282     {
<a name="l00283"></a>00283         <span class="stringliteral">&quot;&lt;head&quot;</span>, L_HTML
<a name="l00284"></a>00284     },
<a name="l00285"></a>00285     {
<a name="l00286"></a>00286         <span class="stringliteral">&quot;&lt;HEAD&quot;</span>, L_HTML
<a name="l00287"></a>00287     },
<a name="l00288"></a>00288     {
<a name="l00289"></a>00289         <span class="stringliteral">&quot;&lt;body&quot;</span>, L_HTML
<a name="l00290"></a>00290     },
<a name="l00291"></a>00291     {
<a name="l00292"></a>00292         <span class="stringliteral">&quot;&lt;BODY&quot;</span>, L_HTML
<a name="l00293"></a>00293     },
<a name="l00294"></a>00294     {
<a name="l00295"></a>00295         <span class="stringliteral">&quot;&lt;title&quot;</span>, L_HTML
<a name="l00296"></a>00296     },
<a name="l00297"></a>00297     {
<a name="l00298"></a>00298         <span class="stringliteral">&quot;&lt;TITLE&quot;</span>, L_HTML
<a name="l00299"></a>00299     },
<a name="l00300"></a>00300     {
<a name="l00301"></a>00301         <span class="stringliteral">&quot;&lt;h1&quot;</span>, L_HTML
<a name="l00302"></a>00302     },
<a name="l00303"></a>00303     {
<a name="l00304"></a>00304         <span class="stringliteral">&quot;&lt;H1&quot;</span>, L_HTML
<a name="l00305"></a>00305     },
<a name="l00306"></a>00306     {
<a name="l00307"></a>00307         <span class="stringliteral">&quot;&lt;a&quot;</span>, L_HTML
<a name="l00308"></a>00308     },
<a name="l00309"></a>00309     {
<a name="l00310"></a>00310         <span class="stringliteral">&quot;&lt;A&quot;</span>, L_HTML
<a name="l00311"></a>00311     },
<a name="l00312"></a>00312     {
<a name="l00313"></a>00313         <span class="stringliteral">&quot;&lt;img&quot;</span>, L_HTML
<a name="l00314"></a>00314     },
<a name="l00315"></a>00315     {
<a name="l00316"></a>00316         <span class="stringliteral">&quot;&lt;IMG&quot;</span>, L_HTML
<a name="l00317"></a>00317     },
<a name="l00318"></a>00318     {
<a name="l00319"></a>00319         <span class="stringliteral">&quot;&lt;!--&quot;</span>, L_HTML
<a name="l00320"></a>00320     },
<a name="l00321"></a>00321     {
<a name="l00322"></a>00322         <span class="stringliteral">&quot;&lt;!doctype&quot;</span>, L_HTML
<a name="l00323"></a>00323     },
<a name="l00324"></a>00324     {
<a name="l00325"></a>00325         <span class="stringliteral">&quot;&lt;!DOCTYPE&quot;</span>, L_HTML
<a name="l00326"></a>00326     },
<a name="l00327"></a>00327     {
<a name="l00328"></a>00328         <span class="stringliteral">&quot;&lt;div&quot;</span>, L_HTML
<a name="l00329"></a>00329     },
<a name="l00330"></a>00330     {
<a name="l00331"></a>00331         <span class="stringliteral">&quot;&lt;DIV&quot;</span>, L_HTML
<a name="l00332"></a>00332     },
<a name="l00333"></a>00333     {
<a name="l00334"></a>00334         <span class="stringliteral">&quot;&lt;frame&quot;</span>, L_HTML
<a name="l00335"></a>00335     },
<a name="l00336"></a>00336     {
<a name="l00337"></a>00337         <span class="stringliteral">&quot;&lt;FRAME&quot;</span>, L_HTML
<a name="l00338"></a>00338     },
<a name="l00339"></a>00339     {
<a name="l00340"></a>00340         <span class="stringliteral">&quot;&lt;frameset&quot;</span>, L_HTML
<a name="l00341"></a>00341     },
<a name="l00342"></a>00342     {
<a name="l00343"></a>00343         <span class="stringliteral">&quot;&lt;FRAMESET&quot;</span>, L_HTML
<a name="l00344"></a>00344     },
<a name="l00345"></a>00345         {
<a name="l00346"></a>00346                 <span class="stringliteral">&quot;&lt;script&quot;</span>, L_HTML | FLAG_STRONG
<a name="l00347"></a>00347         },
<a name="l00348"></a>00348         {
<a name="l00349"></a>00349                 <span class="stringliteral">&quot;&lt;SCRIPT&quot;</span>, L_HTML | FLAG_STRONG
<a name="l00350"></a>00350         },
<a name="l00351"></a>00351     {
<a name="l00352"></a>00352         <span class="stringliteral">&quot;/*&quot;</span>, L_C|L_CPP|L_JAVA|L_OBJC
<a name="l00353"></a>00353     },
<a name="l00354"></a>00354     {
<a name="l00355"></a>00355         <span class="stringliteral">&quot;//&quot;</span>, L_C|L_CPP|L_JAVA|L_OBJC
<a name="l00356"></a>00356     },
<a name="l00357"></a>00357     {
<a name="l00358"></a>00358         <span class="stringliteral">&quot;#include&quot;</span>, L_C|L_CPP
<a name="l00359"></a>00359     },
<a name="l00360"></a>00360     {
<a name="l00361"></a>00361         <span class="stringliteral">&quot;#ifdef&quot;</span>, L_C|L_CPP
<a name="l00362"></a>00362     },
<a name="l00363"></a>00363     {
<a name="l00364"></a>00364         <span class="stringliteral">&quot;#ifndef&quot;</span>, L_C|L_CPP
<a name="l00365"></a>00365     },
<a name="l00366"></a>00366     {
<a name="l00367"></a>00367         <span class="stringliteral">&quot;bool&quot;</span>, L_C|L_CPP
<a name="l00368"></a>00368     },
<a name="l00369"></a>00369     {
<a name="l00370"></a>00370         <span class="stringliteral">&quot;char&quot;</span>, L_C|L_CPP|L_JAVA|L_OBJC
<a name="l00371"></a>00371     },
<a name="l00372"></a>00372     {
<a name="l00373"></a>00373         <span class="stringliteral">&quot;int&quot;</span>, L_C|L_CPP|L_JAVA|L_OBJC
<a name="l00374"></a>00374     },
<a name="l00375"></a>00375     {
<a name="l00376"></a>00376         <span class="stringliteral">&quot;float&quot;</span>, L_C|L_CPP|L_JAVA|L_OBJC
<a name="l00377"></a>00377     },
<a name="l00378"></a>00378     {
<a name="l00379"></a>00379         <span class="stringliteral">&quot;void&quot;</span>, L_C|L_CPP|L_JAVA|L_OBJC
<a name="l00380"></a>00380     },
<a name="l00381"></a>00381     {
<a name="l00382"></a>00382         <span class="stringliteral">&quot;extern&quot;</span>, L_C|L_CPP
<a name="l00383"></a>00383     },
<a name="l00384"></a>00384     {
<a name="l00385"></a>00385         <span class="stringliteral">&quot;struct&quot;</span>, L_C|L_CPP
<a name="l00386"></a>00386     },
<a name="l00387"></a>00387     {
<a name="l00388"></a>00388         <span class="stringliteral">&quot;union&quot;</span>, L_C|L_CPP
<a name="l00389"></a>00389     },
<a name="l00390"></a>00390     {
<a name="l00391"></a>00391         <span class="stringliteral">&quot;implements&quot;</span>, L_JAVA
<a name="l00392"></a>00392     },
<a name="l00393"></a>00393     {
<a name="l00394"></a>00394         <span class="stringliteral">&quot;super&quot;</span>, L_JAVA
<a name="l00395"></a>00395     },
<a name="l00396"></a>00396     {
<a name="l00397"></a>00397         <span class="stringliteral">&quot;import&quot;</span>, L_JAVA
<a name="l00398"></a>00398     },
<a name="l00399"></a>00399     {
<a name="l00400"></a>00400         <span class="stringliteral">&quot;class&quot;</span>, L_CPP|L_JAVA
<a name="l00401"></a>00401     },
<a name="l00402"></a>00402     {
<a name="l00403"></a>00403         <span class="stringliteral">&quot;public&quot;</span>, L_CPP|L_JAVA
<a name="l00404"></a>00404     },
<a name="l00405"></a>00405     {
<a name="l00406"></a>00406         <span class="stringliteral">&quot;private&quot;</span>, L_CPP|L_JAVA
<a name="l00407"></a>00407     },
<a name="l00408"></a>00408     {
<a name="l00409"></a>00409         <span class="stringliteral">&quot;explicit&quot;</span>, L_CPP
<a name="l00410"></a>00410     },
<a name="l00411"></a>00411     {
<a name="l00412"></a>00412         <span class="stringliteral">&quot;virtual&quot;</span>, L_CPP
<a name="l00413"></a>00413     },
<a name="l00414"></a>00414     {
<a name="l00415"></a>00415         <span class="stringliteral">&quot;namespace&quot;</span>, L_CPP
<a name="l00416"></a>00416     },
<a name="l00417"></a>00417     {
<a name="l00418"></a>00418         <span class="stringliteral">&quot;#import&quot;</span>, L_OBJC
<a name="l00419"></a>00419     },
<a name="l00420"></a>00420     {
<a name="l00421"></a>00421         <span class="stringliteral">&quot;@interface&quot;</span>, L_OBJC
<a name="l00422"></a>00422     },
<a name="l00423"></a>00423     {
<a name="l00424"></a>00424         <span class="stringliteral">&quot;@implementation&quot;</span>, L_OBJC
<a name="l00425"></a>00425     },
<a name="l00426"></a>00426     {
<a name="l00427"></a>00427         <span class="stringliteral">&quot;@protocol&quot;</span>, L_OBJC
<a name="l00428"></a>00428     },
<a name="l00429"></a>00429     {
<a name="l00430"></a>00430         <span class="stringliteral">&quot;CFLAGS&quot;</span>, L_MAKE
<a name="l00431"></a>00431     },
<a name="l00432"></a>00432     {
<a name="l00433"></a>00433         <span class="stringliteral">&quot;LDFLAGS&quot;</span>, L_MAKE
<a name="l00434"></a>00434     },
<a name="l00435"></a>00435     {
<a name="l00436"></a>00436         <span class="stringliteral">&quot;all:&quot;</span>, L_MAKE
<a name="l00437"></a>00437     },
<a name="l00438"></a>00438     {
<a name="l00439"></a>00439         <span class="stringliteral">&quot;.PHONY:&quot;</span>, L_MAKE
<a name="l00440"></a>00440     },
<a name="l00441"></a>00441     {
<a name="l00442"></a>00442         <span class="stringliteral">&quot;srcdir&quot;</span>, L_MAKE
<a name="l00443"></a>00443     },
<a name="l00444"></a>00444     {
<a name="l00445"></a>00445         <span class="stringliteral">&quot;exec_prefix&quot;</span>, L_MAKE
<a name="l00446"></a>00446     },
<a name="l00447"></a>00447     <span class="comment">/*</span>
<a name="l00448"></a>00448 <span class="comment">     * Too many files of text have these words in them.  Find another way</span>
<a name="l00449"></a>00449 <span class="comment">     * to recognize Fortrash.</span>
<a name="l00450"></a>00450 <span class="comment">     */</span>
<a name="l00451"></a>00451     {
<a name="l00452"></a>00452         <span class="stringliteral">&quot;.ascii&quot;</span>, L_MACH
<a name="l00453"></a>00453     },
<a name="l00454"></a>00454     {
<a name="l00455"></a>00455         <span class="stringliteral">&quot;.asciiz&quot;</span>, L_MACH
<a name="l00456"></a>00456     },
<a name="l00457"></a>00457     {
<a name="l00458"></a>00458         <span class="stringliteral">&quot;.byte&quot;</span>, L_MACH
<a name="l00459"></a>00459     },
<a name="l00460"></a>00460     {
<a name="l00461"></a>00461         <span class="stringliteral">&quot;.even&quot;</span>, L_MACH
<a name="l00462"></a>00462     },
<a name="l00463"></a>00463     {
<a name="l00464"></a>00464         <span class="stringliteral">&quot;.globl&quot;</span>, L_MACH
<a name="l00465"></a>00465     },
<a name="l00466"></a>00466     {
<a name="l00467"></a>00467         <span class="stringliteral">&quot;clr&quot;</span>, L_MACH
<a name="l00468"></a>00468     },
<a name="l00469"></a>00469     {
<a name="l00470"></a>00470         <span class="stringliteral">&quot;(input&quot;</span>, L_PAS
<a name="l00471"></a>00471     },
<a name="l00472"></a>00472     {
<a name="l00473"></a>00473         <span class="stringliteral">&quot;dcl&quot;</span>, L_PLI
<a name="l00474"></a>00474     },
<a name="l00475"></a>00475     {
<a name="l00476"></a>00476         <span class="stringliteral">&quot;Received:&quot;</span>, L_MAIL
<a name="l00477"></a>00477     },
<a name="l00478"></a>00478     <span class="comment">/* we now stop at &#39;&gt;&#39; for tokens, so this one won&#39;t work {</span>
<a name="l00479"></a>00479 <span class="comment">        &quot;&gt;From&quot;, L_MAIL</span>
<a name="l00480"></a>00480 <span class="comment">        },*/</span>
<a name="l00481"></a>00481     {
<a name="l00482"></a>00482         <span class="stringliteral">&quot;Return-Path:&quot;</span>, L_MAIL
<a name="l00483"></a>00483     },
<a name="l00484"></a>00484     {
<a name="l00485"></a>00485         <span class="stringliteral">&quot;Cc:&quot;</span>, L_MAIL
<a name="l00486"></a>00486     },
<a name="l00487"></a>00487     {
<a name="l00488"></a>00488         <span class="stringliteral">&quot;Newsgroups:&quot;</span>, L_NEWS
<a name="l00489"></a>00489     },
<a name="l00490"></a>00490     {
<a name="l00491"></a>00491         <span class="stringliteral">&quot;Path:&quot;</span>, L_NEWS
<a name="l00492"></a>00492     },
<a name="l00493"></a>00493     {
<a name="l00494"></a>00494         <span class="stringliteral">&quot;Organization:&quot;</span>, L_NEWS
<a name="l00495"></a>00495     },
<a name="l00496"></a>00496     {
<a name="l00497"></a>00497         <span class="stringliteral">&quot;---&quot;</span>, L_DIFF
<a name="l00498"></a>00498     },
<a name="l00499"></a>00499     {
<a name="l00500"></a>00500         <span class="stringliteral">&quot;+++&quot;</span>, L_DIFF
<a name="l00501"></a>00501     },
<a name="l00502"></a>00502     {
<a name="l00503"></a>00503         <span class="stringliteral">&quot;***&quot;</span>, L_DIFF
<a name="l00504"></a>00504     },
<a name="l00505"></a>00505     {
<a name="l00506"></a>00506         <span class="stringliteral">&quot;@@&quot;</span>, L_DIFF
<a name="l00507"></a>00507     },
<a name="l00508"></a>00508     {
<a name="l00509"></a>00509         NULL, 0
<a name="l00510"></a>00510     }
<a name="l00511"></a>00511 };
<a name="l00512"></a>00512 
<a name="l00523"></a>00523 <span class="keyword">class </span>KMimeMagicUtimeConf
<a name="l00524"></a>00524 {
<a name="l00525"></a>00525 <span class="keyword">public</span>:
<a name="l00526"></a>00526     KMimeMagicUtimeConf()
<a name="l00527"></a>00527     {
<a name="l00528"></a>00528         tmpDirs &lt;&lt; <a class="codeRef" href="qstring.html#fromLatin1">QString::fromLatin1</a>(<span class="stringliteral">&quot;/tmp&quot;</span>); <span class="comment">// default value</span>
<a name="l00529"></a>00529 
<a name="l00530"></a>00530         <span class="comment">// The trick is that we also don&#39;t want the user to override globally set</span>
<a name="l00531"></a>00531         <span class="comment">// directories. So we have to misuse KStandardDirs :}</span>
<a name="l00532"></a>00532         <a class="codeRef" href="qstringlist.html">QStringList</a> confDirs = KGlobal::dirs()-&gt;resourceDirs( <span class="stringliteral">&quot;config&quot;</span> );
<a name="l00533"></a>00533         <span class="keywordflow">if</span> ( !confDirs.isEmpty() )
<a name="l00534"></a>00534         {
<a name="l00535"></a>00535             <a class="codeRef" href="qstring.html">QString</a> globalConf = confDirs.last() + <span class="stringliteral">&quot;kmimemagicrc&quot;</span>;
<a name="l00536"></a>00536             <span class="keywordflow">if</span> ( <a class="codeRef" href="qfile.html#exists-2">QFile::exists</a>( globalConf ) )
<a name="l00537"></a>00537             {
<a name="l00538"></a>00538                 KSimpleConfig cfg( globalConf );
<a name="l00539"></a>00539                 cfg.setGroup( <span class="stringliteral">&quot;Settings&quot;</span> );
<a name="l00540"></a>00540                 tmpDirs = cfg.readListEntry( <span class="stringliteral">&quot;atimeDirs&quot;</span> );
<a name="l00541"></a>00541             }
<a name="l00542"></a>00542             <span class="keywordflow">if</span> ( confDirs.count() &gt; 1 )
<a name="l00543"></a>00543             {
<a name="l00544"></a>00544                 <a class="codeRef" href="qstring.html">QString</a> localConf = confDirs.first() + <span class="stringliteral">&quot;kmimemagicrc&quot;</span>;
<a name="l00545"></a>00545                 <span class="keywordflow">if</span> ( <a class="codeRef" href="qfile.html#exists-2">QFile::exists</a>( localConf ) )
<a name="l00546"></a>00546                 {
<a name="l00547"></a>00547                     KSimpleConfig cfg( localConf );
<a name="l00548"></a>00548                     cfg.setGroup( <span class="stringliteral">&quot;Settings&quot;</span> );
<a name="l00549"></a>00549                     tmpDirs += cfg.readListEntry( <span class="stringliteral">&quot;atimeDirs&quot;</span> );
<a name="l00550"></a>00550                 }
<a name="l00551"></a>00551             }
<a name="l00552"></a>00552             <span class="keywordflow">for</span> ( QStringList::Iterator it = tmpDirs.begin() ; it != tmpDirs.end() ; ++it )
<a name="l00553"></a>00553             {
<a name="l00554"></a>00554                 <a class="codeRef" href="qstring.html">QString</a> dir = *it;
<a name="l00555"></a>00555                 <span class="keywordflow">if</span> ( !dir.<a class="codeRef" href="qstring.html#isEmpty">isEmpty</a>() &amp;&amp; dir[ dir.<a class="codeRef" href="qstring.html#length">length</a>()-1 ] != <span class="charliteral">&#39;/&#39;</span> )
<a name="l00556"></a>00556                     (*it) += <span class="charliteral">&#39;/&#39;</span>;
<a name="l00557"></a>00557             }
<a name="l00558"></a>00558         }
<a name="l00559"></a>00559 <span class="preprocessor">#if 0</span>
<a name="l00560"></a>00560 <span class="preprocessor"></span>        <span class="comment">// debug code</span>
<a name="l00561"></a>00561         <span class="keywordflow">for</span> ( QStringList::Iterator it = tmpDirs.begin() ; it != tmpDirs.end() ; ++it )
<a name="l00562"></a>00562             kdDebug(7018) &lt;&lt; <span class="stringliteral">&quot; atimeDir: &quot;</span> &lt;&lt; *it &lt;&lt; endl;
<a name="l00563"></a>00563 <span class="preprocessor">#endif</span>
<a name="l00564"></a>00564 <span class="preprocessor"></span>    }
<a name="l00565"></a>00565 
<a name="l00566"></a>00566     <span class="keywordtype">bool</span> restoreAccessTime( <span class="keyword">const</span> <a class="codeRef" href="qstring.html">QString</a> &amp; file )<span class="keyword"> const</span>
<a name="l00567"></a>00567 <span class="keyword">    </span>{
<a name="l00568"></a>00568         <a class="codeRef" href="qstring.html">QString</a> dir = file.<a class="codeRef" href="qstring.html#left">left</a>( file.<a class="codeRef" href="qstring.html#findRev">findRev</a>( <span class="charliteral">&#39;/&#39;</span> ) );
<a name="l00569"></a>00569         <span class="keywordtype">bool</span> res = tmpDirs.contains( dir );
<a name="l00570"></a>00570         <span class="comment">//kdDebug(7018) &lt;&lt; &quot;restoreAccessTime &quot; &lt;&lt; file &lt;&lt; &quot; dir=&quot; &lt;&lt; dir &lt;&lt; &quot; result=&quot; &lt;&lt; res &lt;&lt; endl;</span>
<a name="l00571"></a>00571         <span class="keywordflow">return</span> res;
<a name="l00572"></a>00572     }
<a name="l00573"></a>00573     <a class="codeRef" href="qstringlist.html">QStringList</a> tmpDirs;
<a name="l00574"></a>00574 };
<a name="l00575"></a>00575 
<a name="l00576"></a>00576 <span class="comment">/* current config */</span>
<a name="l00577"></a>00577 <span class="keyword">struct </span>config_rec {
<a name="l00578"></a>00578     <span class="keywordtype">bool</span> followLinks;
<a name="l00579"></a>00579     <a class="codeRef" href="qstring.html">QString</a> resultBuf;
<a name="l00580"></a>00580     <span class="keywordtype">int</span> accuracy;
<a name="l00581"></a>00581 
<a name="l00582"></a>00582     <span class="keyword">struct </span>magic *magic,    <span class="comment">/* head of magic config list */</span>
<a name="l00583"></a>00583     *last;
<a name="l00584"></a>00584     KMimeMagicUtimeConf * utimeConf;
<a name="l00585"></a>00585 };
<a name="l00586"></a>00586 
<a name="l00587"></a>00587 <span class="preprocessor">#ifdef MIME_MAGIC_DEBUG_TABLE</span>
<a name="l00588"></a>00588 <span class="preprocessor"></span><span class="keyword">static</span> <span class="keywordtype">void</span>
<a name="l00589"></a>00589 test_table()
<a name="l00590"></a>00590 {
<a name="l00591"></a>00591     <span class="keyword">struct </span>magic *m;
<a name="l00592"></a>00592     <span class="keyword">struct </span>magic *prevm = NULL;
<a name="l00593"></a>00593 
<a name="l00594"></a>00594     kdDebug(7018) &lt;&lt; <span class="stringliteral">&quot;test_table : started&quot;</span> &lt;&lt; endl;
<a name="l00595"></a>00595     <span class="keywordflow">for</span> (m = conf-&gt;magic; m; m = m-&gt;next) {
<a name="l00596"></a>00596         <span class="keywordflow">if</span> (isprint((((<span class="keywordtype">unsigned</span> <span class="keywordtype">long</span>) m) &gt;&gt; 24) &amp; 255) &amp;&amp;
<a name="l00597"></a>00597             isprint((((<span class="keywordtype">unsigned</span> <span class="keywordtype">long</span>) m) &gt;&gt; 16) &amp; 255) &amp;&amp;
<a name="l00598"></a>00598             isprint((((<span class="keywordtype">unsigned</span> <span class="keywordtype">long</span>) m) &gt;&gt; 8) &amp; 255) &amp;&amp;
<a name="l00599"></a>00599             isprint(((<span class="keywordtype">unsigned</span> <span class="keywordtype">long</span>) m) &amp; 255)) {
<a name="l00600"></a>00600             <span class="comment">//debug(&quot;test_table: POINTER CLOBBERED! &quot;</span>
<a name="l00601"></a>00601             <span class="comment">//&quot;m=\&quot;%c%c%c%c\&quot; line=%d&quot;,</span>
<a name="l00602"></a>00602                   (((<span class="keywordtype">unsigned</span> long) m) &gt;&gt; 24) &amp; 255,
<a name="l00603"></a>00603                   (((<span class="keywordtype">unsigned</span> <span class="keywordtype">long</span>) m) &gt;&gt; 16) &amp; 255,
<a name="l00604"></a>00604                   (((<span class="keywordtype">unsigned</span> long) m) &gt;&gt; 8) &amp; 255,
<a name="l00605"></a>00605                   ((<span class="keywordtype">unsigned</span> <span class="keywordtype">long</span>) m) &amp; 255,
<a name="l00606"></a>00606                   prevm ? prevm-&gt;lineno : -1);
<a name="l00607"></a>00607             <span class="keywordflow">break</span>;
<a name="l00608"></a>00608         }
<a name="l00609"></a>00609         prevm = m;
<a name="l00610"></a>00610     }
<a name="l00611"></a>00611 }
<a name="l00612"></a>00612 <span class="preprocessor">#endif</span>
<a name="l00613"></a>00613 <span class="preprocessor"></span>
<a name="l00614"></a>00614 <span class="preprocessor">#define    EATAB {while (isascii((unsigned char) *l) &amp;&amp; \</span>
<a name="l00615"></a>00615 <span class="preprocessor">          isspace((unsigned char) *l))  ++l;}</span>
<a name="l00616"></a>00616 <span class="preprocessor"></span>
<a name="l00617"></a>00617 <span class="keywordtype">int</span> KMimeMagic::parse_line(<span class="keywordtype">char</span> *line, <span class="keywordtype">int</span> *rule, <span class="keywordtype">int</span> lineno)
<a name="l00618"></a>00618 {
<a name="l00619"></a>00619     <span class="keywordtype">int</span> ws_offset;
<a name="l00620"></a>00620 
<a name="l00621"></a>00621     <span class="comment">/* delete newline */</span>
<a name="l00622"></a>00622     <span class="keywordflow">if</span> (line[0]) {
<a name="l00623"></a>00623         line[strlen(line) - 1] = <span class="charliteral">&#39;\0&#39;</span>;
<a name="l00624"></a>00624     }
<a name="l00625"></a>00625     <span class="comment">/* skip leading whitespace */</span>
<a name="l00626"></a>00626     ws_offset = 0;
<a name="l00627"></a>00627     <span class="keywordflow">while</span> (line[ws_offset] &amp;&amp; isspace(line[ws_offset])) {
<a name="l00628"></a>00628         ws_offset++;
<a name="l00629"></a>00629     }
<a name="l00630"></a>00630 
<a name="l00631"></a>00631     <span class="comment">/* skip blank lines */</span>
<a name="l00632"></a>00632     <span class="keywordflow">if</span> (line[ws_offset] == 0) {
<a name="l00633"></a>00633         <span class="keywordflow">return</span> 0;
<a name="l00634"></a>00634     }
<a name="l00635"></a>00635     <span class="comment">/* comment, do not parse */</span>
<a name="l00636"></a>00636     <span class="keywordflow">if</span> (line[ws_offset] == <span class="charliteral">&#39;#&#39;</span>)
<a name="l00637"></a>00637         <span class="keywordflow">return</span> 0;
<a name="l00638"></a>00638 
<a name="l00639"></a>00639     <span class="comment">/* if we get here, we&#39;re going to use it so count it */</span>
<a name="l00640"></a>00640     (*rule)++;
<a name="l00641"></a>00641 
<a name="l00642"></a>00642     <span class="comment">/* parse it */</span>
<a name="l00643"></a>00643     <span class="keywordflow">return</span> (parse(line + ws_offset, lineno) != 0);
<a name="l00644"></a>00644 }
<a name="l00645"></a>00645 
<a name="l00646"></a>00646 <span class="comment">/*</span>
<a name="l00647"></a>00647 <span class="comment"> * apprentice - load configuration from the magic file.</span>
<a name="l00648"></a>00648 <span class="comment"> */</span>
<a name="l00649"></a>00649 <span class="keywordtype">int</span> KMimeMagic::apprentice( <span class="keyword">const</span> <a class="codeRef" href="qstring.html">QString</a>&amp; magicfile )
<a name="l00650"></a>00650 {
<a name="l00651"></a>00651     FILE *f;
<a name="l00652"></a>00652     <span class="keywordtype">char</span> line[BUFSIZ + 1];
<a name="l00653"></a>00653     <span class="keywordtype">int</span> errs = 0;
<a name="l00654"></a>00654     <span class="keywordtype">int</span> lineno;
<a name="l00655"></a>00655     <span class="keywordtype">int</span> rule = 0;
<a name="l00656"></a>00656     <a class="codeRef" href="qcstring.html">QCString</a> fname;
<a name="l00657"></a>00657 
<a name="l00658"></a>00658     <span class="keywordflow">if</span> (magicfile.<a class="codeRef" href="qstring.html#isEmpty">isEmpty</a>())
<a name="l00659"></a>00659         <span class="keywordflow">return</span> -1;
<a name="l00660"></a>00660     fname = <a class="codeRef" href="qfile.html#encodeName">QFile::encodeName</a>(magicfile);
<a name="l00661"></a>00661     f = fopen(fname, <span class="stringliteral">&quot;r&quot;</span>);
<a name="l00662"></a>00662     <span class="keywordflow">if</span> (f == NULL) {
<a name="l00663"></a>00663         kdError(7018) &lt;&lt; <span class="stringliteral">&quot;can&#39;t read magic file &quot;</span> &lt;&lt; fname.data() &lt;&lt; <span class="stringliteral">&quot;: &quot;</span> &lt;&lt; strerror(errno) &lt;&lt; endl;
<a name="l00664"></a>00664         <span class="keywordflow">return</span> -1;
<a name="l00665"></a>00665     }
<a name="l00666"></a>00666 
<a name="l00667"></a>00667     <span class="comment">/* parse it */</span>
<a name="l00668"></a>00668     <span class="keywordflow">for</span> (lineno = 1; fgets(line, BUFSIZ, f) != NULL; lineno++)
<a name="l00669"></a>00669         <span class="keywordflow">if</span> (parse_line(line, &amp;rule, lineno))
<a name="l00670"></a>00670             errs++;
<a name="l00671"></a>00671 
<a name="l00672"></a>00672     fclose(f);
<a name="l00673"></a>00673 
<a name="l00674"></a>00674 <span class="preprocessor">#ifdef DEBUG_APPRENTICE</span>
<a name="l00675"></a>00675 <span class="preprocessor"></span>    kdDebug(7018) &lt;&lt; <span class="stringliteral">&quot;apprentice: conf=&quot;</span> &lt;&lt; conf &lt;&lt; <span class="stringliteral">&quot; file=&quot;</span> &lt;&lt; magicfile &lt;&lt; <span class="stringliteral">&quot; m=&quot;</span> &lt;&lt; (conf-&gt;magic ? <span class="stringliteral">&quot;set&quot;</span> : <span class="stringliteral">&quot;NULL&quot;</span>) &lt;&lt; <span class="stringliteral">&quot; m-&gt;next=&quot;</span> &lt;&lt; ((conf-&gt;magic &amp;&amp; conf-&gt;magic-&gt;next) ? <span class="stringliteral">&quot;set&quot;</span> : <span class="stringliteral">&quot;NULL&quot;</span>) &lt;&lt; <span class="stringliteral">&quot; last=&quot;</span> &lt;&lt; (conf-&gt;last ? <span class="stringliteral">&quot;set&quot;</span> : <span class="stringliteral">&quot;NULL&quot;</span>) &lt;&lt; endl;
<a name="l00676"></a>00676     kdDebug(7018) &lt;&lt; <span class="stringliteral">&quot;apprentice: read &quot;</span> &lt;&lt; lineno &lt;&lt; <span class="stringliteral">&quot; lines, &quot;</span> &lt;&lt; rule &lt;&lt; <span class="stringliteral">&quot; rules, &quot;</span> &lt;&lt; errs &lt;&lt; <span class="stringliteral">&quot; errors&quot;</span> &lt;&lt; endl;
<a name="l00677"></a>00677 <span class="preprocessor">#endif</span>
<a name="l00678"></a>00678 <span class="preprocessor"></span>
<a name="l00679"></a>00679 <span class="preprocessor">#ifdef MIME_MAGIC_DEBUG_TABLE</span>
<a name="l00680"></a>00680 <span class="preprocessor"></span>    test_table();
<a name="l00681"></a>00681 <span class="preprocessor">#endif</span>
<a name="l00682"></a>00682 <span class="preprocessor"></span>
<a name="l00683"></a>00683     <span class="keywordflow">return</span> (errs ? -1 : 0);
<a name="l00684"></a>00684 }
<a name="l00685"></a>00685 
<a name="l00686"></a>00686 <span class="keywordtype">int</span> KMimeMagic::buff_apprentice(<span class="keywordtype">char</span> *buff)
<a name="l00687"></a>00687 {
<a name="l00688"></a>00688     <span class="keywordtype">char</span> line[BUFSIZ + 2];
<a name="l00689"></a>00689     <span class="keywordtype">int</span> errs = 0;
<a name="l00690"></a>00690     <span class="keywordtype">int</span> lineno = 1;
<a name="l00691"></a>00691     <span class="keywordtype">char</span> *start = buff;
<a name="l00692"></a>00692     <span class="keywordtype">char</span> *end;
<a name="l00693"></a>00693     <span class="keywordtype">int</span> count = 0;
<a name="l00694"></a>00694     <span class="keywordtype">int</span> rule = 0;
<a name="l00695"></a>00695     <span class="keywordtype">int</span> len = strlen(buff) + 1;
<a name="l00696"></a>00696 
<a name="l00697"></a>00697     <span class="comment">/* parse it */</span>
<a name="l00698"></a>00698     <span class="keywordflow">do</span> {
<a name="l00699"></a>00699         count = (len &gt; BUFSIZ-1)?BUFSIZ-1:len;
<a name="l00700"></a>00700         strncpy(line, start, count);
<a name="l00701"></a>00701         line[count] = <span class="charliteral">&#39;\0&#39;</span>;
<a name="l00702"></a>00702         <span class="keywordflow">if</span> ((end = strchr(line, <span class="charliteral">&#39;\n&#39;</span>))) {
<a name="l00703"></a>00703             *(++end) = <span class="charliteral">&#39;\0&#39;</span>;
<a name="l00704"></a>00704             count = strlen(line);
<a name="l00705"></a>00705         } <span class="keywordflow">else</span>
<a name="l00706"></a>00706           strcat(line, <span class="stringliteral">&quot;\n&quot;</span>);
<a name="l00707"></a>00707         start += count;
<a name="l00708"></a>00708         len -= count;
<a name="l00709"></a>00709         <span class="keywordflow">if</span> (parse_line(line, &amp;rule, lineno))
<a name="l00710"></a>00710             errs++;
<a name="l00711"></a>00711         lineno++;
<a name="l00712"></a>00712     } <span class="keywordflow">while</span> (len &gt; 0);
<a name="l00713"></a>00713 
<a name="l00714"></a>00714 <span class="preprocessor">#ifdef DEBUG_APPRENTICE</span>
<a name="l00715"></a>00715 <span class="preprocessor"></span>    kdDebug(7018) &lt;&lt; <span class="stringliteral">&quot;buff_apprentice: conf=&quot;</span> &lt;&lt; conf &lt;&lt; <span class="stringliteral">&quot; m=&quot;</span> &lt;&lt; (conf-&gt;magic ? <span class="stringliteral">&quot;set&quot;</span> : <span class="stringliteral">&quot;NULL&quot;</span>) &lt;&lt; <span class="stringliteral">&quot; m-&gt;next=&quot;</span> &lt;&lt; ((conf-&gt;magic &amp;&amp; conf-&gt;magic-&gt;next) ? <span class="stringliteral">&quot;set&quot;</span> : <span class="stringliteral">&quot;NULL&quot;</span>) &lt;&lt; <span class="stringliteral">&quot; last=&quot;</span> &lt;&lt; (conf-&gt;last ? <span class="stringliteral">&quot;set&quot;</span> : <span class="stringliteral">&quot;NULL&quot;</span>) &lt;&lt; endl;
<a name="l00716"></a>00716     kdDebug(7018) &lt;&lt; <span class="stringliteral">&quot;buff_apprentice: read &quot;</span> &lt;&lt; lineno &lt;&lt; <span class="stringliteral">&quot; lines, &quot;</span> &lt;&lt; rule &lt;&lt; <span class="stringliteral">&quot; rules, &quot;</span> &lt;&lt; errs &lt;&lt; <span class="stringliteral">&quot; errors&quot;</span> &lt;&lt; endl;
<a name="l00717"></a>00717 <span class="preprocessor">#endif</span>
<a name="l00718"></a>00718 <span class="preprocessor"></span>
<a name="l00719"></a>00719 <span class="preprocessor">#ifdef MIME_MAGIC_DEBUG_TABLE</span>
<a name="l00720"></a>00720 <span class="preprocessor"></span>    test_table();
<a name="l00721"></a>00721 <span class="preprocessor">#endif</span>
<a name="l00722"></a>00722 <span class="preprocessor"></span>
<a name="l00723"></a>00723     <span class="keywordflow">return</span> (errs ? -1 : 0);
<a name="l00724"></a>00724 }
<a name="l00725"></a>00725 
<a name="l00726"></a>00726 <span class="comment">/*</span>
<a name="l00727"></a>00727 <span class="comment"> * extend the sign bit if the comparison is to be signed</span>
<a name="l00728"></a>00728 <span class="comment"> */</span>
<a name="l00729"></a>00729 <span class="keyword">static</span> <span class="keywordtype">unsigned</span> <span class="keywordtype">long</span>
<a name="l00730"></a>00730 signextend(<span class="keyword">struct</span> magic *m, <span class="keywordtype">unsigned</span> <span class="keywordtype">long</span> v)
<a name="l00731"></a>00731 {
<a name="l00732"></a>00732     <span class="keywordflow">if</span> (!(m-&gt;flag &amp; UNSIGNED))
<a name="l00733"></a>00733         <span class="keywordflow">switch</span> (m-&gt;type) {
<a name="l00734"></a>00734                 <span class="comment">/*</span>
<a name="l00735"></a>00735 <span class="comment">                 * Do not remove the casts below.  They are vital.</span>
<a name="l00736"></a>00736 <span class="comment">                 * When later compared with the data, the sign</span>
<a name="l00737"></a>00737 <span class="comment">                 * extension must have happened.</span>
<a name="l00738"></a>00738 <span class="comment">                 */</span>
<a name="l00739"></a>00739             <span class="keywordflow">case</span> BYTE:
<a name="l00740"></a>00740                 v = (char) v;
<a name="l00741"></a>00741                 <span class="keywordflow">break</span>;
<a name="l00742"></a>00742             <span class="keywordflow">case</span> SHORT:
<a name="l00743"></a>00743             <span class="keywordflow">case</span> BESHORT:
<a name="l00744"></a>00744             <span class="keywordflow">case</span> LESHORT:
<a name="l00745"></a>00745                 v = (short) v;
<a name="l00746"></a>00746                 <span class="keywordflow">break</span>;
<a name="l00747"></a>00747             <span class="keywordflow">case</span> DATE:
<a name="l00748"></a>00748             <span class="keywordflow">case</span> BEDATE:
<a name="l00749"></a>00749             <span class="keywordflow">case</span> LEDATE:
<a name="l00750"></a>00750             <span class="keywordflow">case</span> LONG:
<a name="l00751"></a>00751             <span class="keywordflow">case</span> BELONG:
<a name="l00752"></a>00752             <span class="keywordflow">case</span> LELONG:
<a name="l00753"></a>00753                 v = (long) v;
<a name="l00754"></a>00754                 <span class="keywordflow">break</span>;
<a name="l00755"></a>00755             <span class="keywordflow">case</span> STRING:
<a name="l00756"></a>00756                 <span class="keywordflow">break</span>;
<a name="l00757"></a>00757             <span class="keywordflow">default</span>:
<a name="l00758"></a>00758                 kdError(7018) &lt;&lt; <span class="stringliteral">&quot;&quot;</span> &lt;&lt; <span class="stringliteral">&quot;signextend&quot;</span> &lt;&lt; <span class="stringliteral">&quot;: can&#39;t happen: m-&gt;type=&quot;</span> &lt;&lt; m-&gt;type &lt;&lt; endl;
<a name="l00759"></a>00759                 <span class="keywordflow">return</span> 998; <span class="comment">//good value</span>
<a name="l00760"></a>00760         }
<a name="l00761"></a>00761     <span class="keywordflow">return</span> v;
<a name="l00762"></a>00762 }
<a name="l00763"></a>00763 
<a name="l00764"></a>00764 <span class="comment">/*</span>
<a name="l00765"></a>00765 <span class="comment"> * parse one line from magic file, put into magic[index++] if valid</span>
<a name="l00766"></a>00766 <span class="comment"> */</span>
<a name="l00767"></a>00767 <span class="keywordtype">int</span> KMimeMagic::parse(<span class="keywordtype">char</span> *l, <span class="keywordtype">int</span>
<a name="l00768"></a>00768 #ifdef DEBUG_LINENUMBERS
<a name="l00769"></a>00769     lineno
<a name="l00770"></a>00770 #endif
<a name="l00771"></a>00771         )
<a name="l00772"></a>00772 {
<a name="l00773"></a>00773     <span class="keywordtype">int</span> i = 0;
<a name="l00774"></a>00774     <span class="keyword">struct </span>magic *m;
<a name="l00775"></a>00775     <span class="keywordtype">char</span> *t,
<a name="l00776"></a>00776     *s;
<a name="l00777"></a>00777     <span class="comment">/* allocate magic structure entry */</span>
<a name="l00778"></a>00778     <span class="keywordflow">if</span> ((m = (<span class="keyword">struct</span> magic *) calloc(1, <span class="keyword">sizeof</span>(<span class="keyword">struct</span> magic))) == NULL) {
<a name="l00779"></a>00779         kdError(7018) &lt;&lt; <span class="stringliteral">&quot;parse: Out of memory.&quot;</span> &lt;&lt; endl;
<a name="l00780"></a>00780         <span class="keywordflow">return</span> -1;
<a name="l00781"></a>00781     }
<a name="l00782"></a>00782     <span class="comment">/* append to linked list */</span>
<a name="l00783"></a>00783     m-&gt;next = NULL;
<a name="l00784"></a>00784     <span class="keywordflow">if</span> (!conf-&gt;magic || !conf-&gt;last) {
<a name="l00785"></a>00785         conf-&gt;magic = conf-&gt;last = m;
<a name="l00786"></a>00786     } <span class="keywordflow">else</span> {
<a name="l00787"></a>00787         conf-&gt;last-&gt;next = m;
<a name="l00788"></a>00788         conf-&gt;last = m;
<a name="l00789"></a>00789     }
<a name="l00790"></a>00790 
<a name="l00791"></a>00791     <span class="comment">/* set values in magic structure */</span>
<a name="l00792"></a>00792     m-&gt;flag = 0;
<a name="l00793"></a>00793     m-&gt;cont_level = 0;
<a name="l00794"></a>00794 <span class="preprocessor">#ifdef DEBUG_LINENUMBERS</span>
<a name="l00795"></a>00795 <span class="preprocessor"></span>    m-&gt;lineno = lineno;
<a name="l00796"></a>00796 <span class="preprocessor">#endif</span>
<a name="l00797"></a>00797 <span class="preprocessor"></span>
<a name="l00798"></a>00798     <span class="keywordflow">while</span> (*l == <span class="charliteral">&#39;&gt;&#39;</span>) {
<a name="l00799"></a>00799         ++l;            <span class="comment">/* step over */</span>
<a name="l00800"></a>00800         m-&gt;cont_level++;
<a name="l00801"></a>00801     }
<a name="l00802"></a>00802 
<a name="l00803"></a>00803     <span class="keywordflow">if</span> (m-&gt;cont_level != 0 &amp;&amp; *l == <span class="charliteral">&#39;(&#39;</span>) {
<a name="l00804"></a>00804         ++l;            <span class="comment">/* step over */</span>
<a name="l00805"></a>00805         m-&gt;flag |= INDIR;
<a name="l00806"></a>00806     }
<a name="l00807"></a>00807     <span class="comment">/* get offset, then skip over it */</span>
<a name="l00808"></a>00808     m-&gt;offset = (int) strtol(l, &amp;t, 0);
<a name="l00809"></a>00809     <span class="keywordflow">if</span> (l == t) {
<a name="l00810"></a>00810             kdError(7018) &lt;&lt; <span class="stringliteral">&quot;parse: offset &quot;</span> &lt;&lt; l &lt;&lt; <span class="stringliteral">&quot; invalid&quot;</span> &lt;&lt; endl;
<a name="l00811"></a>00811     }
<a name="l00812"></a>00812     l = t;
<a name="l00813"></a>00813 
<a name="l00814"></a>00814     <span class="keywordflow">if</span> (m-&gt;flag &amp; INDIR) {
<a name="l00815"></a>00815         m-&gt;in.type = LONG;
<a name="l00816"></a>00816         m-&gt;in.offset = 0;
<a name="l00817"></a>00817         <span class="comment">/*</span>
<a name="l00818"></a>00818 <span class="comment">         * read [.lbs][+-]nnnnn)</span>
<a name="l00819"></a>00819 <span class="comment">         */</span>
<a name="l00820"></a>00820         <span class="keywordflow">if</span> (*l == <span class="charliteral">&#39;.&#39;</span>) {
<a name="l00821"></a>00821             <span class="keywordflow">switch</span> (*++l) {
<a name="l00822"></a>00822                 <span class="keywordflow">case</span> <span class="charliteral">&#39;l&#39;</span>:
<a name="l00823"></a>00823                     m-&gt;in.type = LONG;
<a name="l00824"></a>00824                     <span class="keywordflow">break</span>;
<a name="l00825"></a>00825                 <span class="keywordflow">case</span> <span class="charliteral">&#39;s&#39;</span>:
<a name="l00826"></a>00826                     m-&gt;in.type = SHORT;
<a name="l00827"></a>00827                     <span class="keywordflow">break</span>;
<a name="l00828"></a>00828                 <span class="keywordflow">case</span> <span class="charliteral">&#39;b&#39;</span>:
<a name="l00829"></a>00829                     m-&gt;in.type = BYTE;
<a name="l00830"></a>00830                     <span class="keywordflow">break</span>;
<a name="l00831"></a>00831                 <span class="keywordflow">default</span>:
<a name="l00832"></a>00832                     kdError(7018) &lt;&lt; <span class="stringliteral">&quot;parse: indirect offset type &quot;</span> &lt;&lt; *l &lt;&lt; <span class="stringliteral">&quot; invalid&quot;</span> &lt;&lt; endl;
<a name="l00833"></a>00833                     <span class="keywordflow">break</span>;
<a name="l00834"></a>00834             }
<a name="l00835"></a>00835             l++;
<a name="l00836"></a>00836         }
<a name="l00837"></a>00837         s = l;
<a name="l00838"></a>00838         <span class="keywordflow">if</span> (*l == <span class="charliteral">&#39;+&#39;</span> || *l == <span class="charliteral">&#39;-&#39;</span>)
<a name="l00839"></a>00839             l++;
<a name="l00840"></a>00840         <span class="keywordflow">if</span> (isdigit((<span class="keywordtype">unsigned</span> <span class="keywordtype">char</span>) *l)) {
<a name="l00841"></a>00841             m-&gt;in.offset = strtol(l, &amp;t, 0);
<a name="l00842"></a>00842             <span class="keywordflow">if</span> (*s == <span class="charliteral">&#39;-&#39;</span>)
<a name="l00843"></a>00843                 m-&gt;in.offset = -m-&gt;in.offset;
<a name="l00844"></a>00844         } <span class="keywordflow">else</span>
<a name="l00845"></a>00845             t = l;
<a name="l00846"></a>00846         <span class="keywordflow">if</span> (*t++ != <span class="charliteral">&#39;)&#39;</span>) {
<a name="l00847"></a>00847             kdError(7018) &lt;&lt; <span class="stringliteral">&quot;parse: missing &#39;)&#39; in indirect offset&quot;</span> &lt;&lt; endl;
<a name="l00848"></a>00848         }
<a name="l00849"></a>00849         l = t;
<a name="l00850"></a>00850     }
<a name="l00851"></a>00851     <span class="keywordflow">while</span> (isascii((<span class="keywordtype">unsigned</span> <span class="keywordtype">char</span>) *l) &amp;&amp; isdigit((<span class="keywordtype">unsigned</span> <span class="keywordtype">char</span>) *l))
<a name="l00852"></a>00852         ++l;
<a name="l00853"></a>00853     EATAB;
<a name="l00854"></a>00854 
<a name="l00855"></a>00855 <span class="preprocessor">#define NBYTE       4</span>
<a name="l00856"></a>00856 <span class="preprocessor"></span><span class="preprocessor">#define NSHORT      5</span>
<a name="l00857"></a>00857 <span class="preprocessor"></span><span class="preprocessor">#define NLONG       4</span>
<a name="l00858"></a>00858 <span class="preprocessor"></span><span class="preprocessor">#define NSTRING     6</span>
<a name="l00859"></a>00859 <span class="preprocessor"></span><span class="preprocessor">#define NDATE       4</span>
<a name="l00860"></a>00860 <span class="preprocessor"></span><span class="preprocessor">#define NBESHORT    7</span>
<a name="l00861"></a>00861 <span class="preprocessor"></span><span class="preprocessor">#define NBELONG     6</span>
<a name="l00862"></a>00862 <span class="preprocessor"></span><span class="preprocessor">#define NBEDATE     6</span>
<a name="l00863"></a>00863 <span class="preprocessor"></span><span class="preprocessor">#define NLESHORT    7</span>
<a name="l00864"></a>00864 <span class="preprocessor"></span><span class="preprocessor">#define NLELONG     6</span>
<a name="l00865"></a>00865 <span class="preprocessor"></span><span class="preprocessor">#define NLEDATE     6</span>
<a name="l00866"></a>00866 <span class="preprocessor"></span>
<a name="l00867"></a>00867     <span class="keywordflow">if</span> (*l == <span class="charliteral">&#39;u&#39;</span>) {
<a name="l00868"></a>00868         ++l;
<a name="l00869"></a>00869         m-&gt;flag |= UNSIGNED;
<a name="l00870"></a>00870     }
<a name="l00871"></a>00871     <span class="comment">/* get type, skip it */</span>
<a name="l00872"></a>00872     <span class="keywordflow">if</span> (strncmp(l, <span class="stringliteral">&quot;byte&quot;</span>, NBYTE) == 0) {
<a name="l00873"></a>00873         m-&gt;type = BYTE;
<a name="l00874"></a>00874         l += NBYTE;
<a name="l00875"></a>00875     } <span class="keywordflow">else</span> <span class="keywordflow">if</span> (strncmp(l, <span class="stringliteral">&quot;short&quot;</span>, NSHORT) == 0) {
<a name="l00876"></a>00876         m-&gt;type = SHORT;
<a name="l00877"></a>00877         l += NSHORT;
<a name="l00878"></a>00878     } <span class="keywordflow">else</span> <span class="keywordflow">if</span> (strncmp(l, <span class="stringliteral">&quot;long&quot;</span>, NLONG) == 0) {
<a name="l00879"></a>00879         m-&gt;type = LONG;
<a name="l00880"></a>00880         l += NLONG;
<a name="l00881"></a>00881     } <span class="keywordflow">else</span> <span class="keywordflow">if</span> (strncmp(l, <span class="stringliteral">&quot;string&quot;</span>, NSTRING) == 0) {
<a name="l00882"></a>00882         m-&gt;type = STRING;
<a name="l00883"></a>00883         l += NSTRING;
<a name="l00884"></a>00884     } <span class="keywordflow">else</span> <span class="keywordflow">if</span> (strncmp(l, <span class="stringliteral">&quot;date&quot;</span>, NDATE) == 0) {
<a name="l00885"></a>00885         m-&gt;type = DATE;
<a name="l00886"></a>00886         l += NDATE;
<a name="l00887"></a>00887     } <span class="keywordflow">else</span> <span class="keywordflow">if</span> (strncmp(l, <span class="stringliteral">&quot;beshort&quot;</span>, NBESHORT) == 0) {
<a name="l00888"></a>00888         m-&gt;type = BESHORT;
<a name="l00889"></a>00889         l += NBESHORT;
<a name="l00890"></a>00890     } <span class="keywordflow">else</span> <span class="keywordflow">if</span> (strncmp(l, <span class="stringliteral">&quot;belong&quot;</span>, NBELONG) == 0) {
<a name="l00891"></a>00891         m-&gt;type = BELONG;
<a name="l00892"></a>00892         l += NBELONG;
<a name="l00893"></a>00893     } <span class="keywordflow">else</span> <span class="keywordflow">if</span> (strncmp(l, <span class="stringliteral">&quot;bedate&quot;</span>, NBEDATE) == 0) {
<a name="l00894"></a>00894         m-&gt;type = BEDATE;
<a name="l00895"></a>00895         l += NBEDATE;
<a name="l00896"></a>00896     } <span class="keywordflow">else</span> <span class="keywordflow">if</span> (strncmp(l, <span class="stringliteral">&quot;leshort&quot;</span>, NLESHORT) == 0) {
<a name="l00897"></a>00897         m-&gt;type = LESHORT;
<a name="l00898"></a>00898         l += NLESHORT;
<a name="l00899"></a>00899     } <span class="keywordflow">else</span> <span class="keywordflow">if</span> (strncmp(l, <span class="stringliteral">&quot;lelong&quot;</span>, NLELONG) == 0) {
<a name="l00900"></a>00900         m-&gt;type = LELONG;
<a name="l00901"></a>00901         l += NLELONG;
<a name="l00902"></a>00902     } <span class="keywordflow">else</span> <span class="keywordflow">if</span> (strncmp(l, <span class="stringliteral">&quot;ledate&quot;</span>, NLEDATE) == 0) {
<a name="l00903"></a>00903         m-&gt;type = LEDATE;
<a name="l00904"></a>00904         l += NLEDATE;
<a name="l00905"></a>00905     } <span class="keywordflow">else</span> {
<a name="l00906"></a>00906         kdError(7018) &lt;&lt; <span class="stringliteral">&quot;parse: type &quot;</span> &lt;&lt; l &lt;&lt; <span class="stringliteral">&quot; invalid&quot;</span> &lt;&lt; endl;
<a name="l00907"></a>00907         <span class="keywordflow">return</span> -1;
<a name="l00908"></a>00908     }
<a name="l00909"></a>00909     <span class="comment">/* New-style anding: &quot;0 byte&amp;0x80 =0x80 dynamically linked&quot; */</span>
<a name="l00910"></a>00910     <span class="keywordflow">if</span> (*l == <span class="charliteral">&#39;&amp;&#39;</span>) {
<a name="l00911"></a>00911         ++l;
<a name="l00912"></a>00912         m-&gt;mask = signextend(m, strtol(l, &amp;l, 0));
<a name="l00913"></a>00913     } <span class="keywordflow">else</span>
<a name="l00914"></a>00914         m-&gt;mask = (<span class="keywordtype">unsigned</span> long) ~0L;
<a name="l00915"></a>00915     EATAB;
<a name="l00916"></a>00916 
<a name="l00917"></a>00917     <span class="keywordflow">switch</span> (*l) {
<a name="l00918"></a>00918         <span class="keywordflow">case</span> <span class="charliteral">&#39;&gt;&#39;</span>:
<a name="l00919"></a>00919         <span class="keywordflow">case</span> <span class="charliteral">&#39;&lt;&#39;</span>:
<a name="l00920"></a>00920             <span class="comment">/* Old-style anding: &quot;0 byte &amp;0x80 dynamically linked&quot; */</span>
<a name="l00921"></a>00921         <span class="keywordflow">case</span> <span class="charliteral">&#39;&amp;&#39;</span>:
<a name="l00922"></a>00922         <span class="keywordflow">case</span> <span class="charliteral">&#39;^&#39;</span>:
<a name="l00923"></a>00923         <span class="keywordflow">case</span> <span class="charliteral">&#39;=&#39;</span>:
<a name="l00924"></a>00924             m-&gt;reln = *l;
<a name="l00925"></a>00925             ++l;
<a name="l00926"></a>00926             <span class="keywordflow">break</span>;
<a name="l00927"></a>00927         <span class="keywordflow">case</span> <span class="charliteral">&#39;!&#39;</span>:
<a name="l00928"></a>00928             <span class="keywordflow">if</span> (m-&gt;type != STRING) {
<a name="l00929"></a>00929                 m-&gt;reln = *l;
<a name="l00930"></a>00930                 ++l;
<a name="l00931"></a>00931                 <span class="keywordflow">break</span>;
<a name="l00932"></a>00932             }
<a name="l00933"></a>00933             <span class="comment">/* FALL THROUGH */</span>
<a name="l00934"></a>00934         <span class="keywordflow">default</span>:
<a name="l00935"></a>00935             <span class="keywordflow">if</span> (*l == <span class="charliteral">&#39;x&#39;</span> &amp;&amp; isascii((<span class="keywordtype">unsigned</span> <span class="keywordtype">char</span>) l[1]) &amp;&amp;
<a name="l00936"></a>00936                 isspace((<span class="keywordtype">unsigned</span> <span class="keywordtype">char</span>) l[1])) {
<a name="l00937"></a>00937                 m-&gt;reln = *l;
<a name="l00938"></a>00938                 ++l;
<a name="l00939"></a>00939                 <span class="keywordflow">goto</span> GetDesc;   <span class="comment">/* Bill The Cat */</span>
<a name="l00940"></a>00940             }
<a name="l00941"></a>00941             m-&gt;reln = <span class="charliteral">&#39;=&#39;</span>;
<a name="l00942"></a>00942             <span class="keywordflow">break</span>;
<a name="l00943"></a>00943     }
<a name="l00944"></a>00944     EATAB;
<a name="l00945"></a>00945 
<a name="l00946"></a>00946     <span class="keywordflow">if</span> (getvalue(m, &amp;l))
<a name="l00947"></a>00947         <span class="keywordflow">return</span> -1;
<a name="l00948"></a>00948     <span class="comment">/*</span>
<a name="l00949"></a>00949 <span class="comment">     * now get last part - the description</span>
<a name="l00950"></a>00950 <span class="comment">     */</span>
<a name="l00951"></a>00951       GetDesc:
<a name="l00952"></a>00952     EATAB;
<a name="l00953"></a>00953     <span class="keywordflow">if</span> (l[0] == <span class="charliteral">&#39;\b&#39;</span>) {
<a name="l00954"></a>00954         ++l;
<a name="l00955"></a>00955         m-&gt;nospflag = 1;
<a name="l00956"></a>00956     } <span class="keywordflow">else</span> <span class="keywordflow">if</span> ((l[0] == <span class="charliteral">&#39;\\&#39;</span>) &amp;&amp; (l[1] == <span class="charliteral">&#39;b&#39;</span>)) {
<a name="l00957"></a>00957         ++l;
<a name="l00958"></a>00958         ++l;
<a name="l00959"></a>00959         m-&gt;nospflag = 1;
<a name="l00960"></a>00960     } <span class="keywordflow">else</span>
<a name="l00961"></a>00961         m-&gt;nospflag = 0;
<a name="l00962"></a>00962         <span class="comment">// Copy description - until EOL or &#39;#&#39; (for comments)</span>
<a name="l00963"></a>00963         <span class="keywordflow">while</span> (*l != <span class="charliteral">&#39;\0&#39;</span> &amp;&amp; *l != <span class="charliteral">&#39;#&#39;</span> &amp;&amp; i &lt; MAXDESC-1)
<a name="l00964"></a>00964             m-&gt;desc[i++] = *l++;
<a name="l00965"></a>00965         m-&gt;desc[i] = <span class="charliteral">&#39;\0&#39;</span>;
<a name="l00966"></a>00966         <span class="comment">// Remove trailing spaces</span>
<a name="l00967"></a>00967         <span class="keywordflow">while</span> (--i&gt;0 &amp;&amp; isspace( m-&gt;desc[i] ))
<a name="l00968"></a>00968             m-&gt;desc[i] = <span class="charliteral">&#39;\0&#39;</span>;
<a name="l00969"></a>00969 
<a name="l00970"></a>00970         <span class="comment">// old code</span>
<a name="l00971"></a>00971     <span class="comment">//while ((m-&gt;desc[i++] = *l++) != &#39;\0&#39; &amp;&amp; i &lt; MAXDESC) /* NULLBODY */ ;</span>
<a name="l00972"></a>00972 
<a name="l00973"></a>00973 #ifdef DEBUG_APPRENTICE
<a name="l00974"></a>00974     kdDebug(7018) &lt;&lt; <span class="stringliteral">&quot;parse: line=&quot;</span> &lt;&lt; lineno &lt;&lt; <span class="stringliteral">&quot; m=&quot;</span> &lt;&lt; m &lt;&lt; <span class="stringliteral">&quot; next=&quot;</span> &lt;&lt; m-&gt;next &lt;&lt; <span class="stringliteral">&quot; cont=&quot;</span> &lt;&lt; m-&gt;cont_level &lt;&lt; <span class="stringliteral">&quot; desc=&quot;</span> &lt;&lt; (m-&gt;desc ? m-&gt;desc : <span class="stringliteral">&quot;NULL&quot;</span>) &lt;&lt; endl;
<a name="l00975"></a>00975 <span class="preprocessor">#endif</span>
<a name="l00976"></a>00976 <span class="preprocessor"></span>    <span class="keywordflow">return</span> 0;
<a name="l00977"></a>00977 }
<a name="l00978"></a>00978 
<a name="l00979"></a>00979 <span class="comment">/*</span>
<a name="l00980"></a>00980 <span class="comment"> * Read a numeric value from a pointer, into the value union of a magic</span>
<a name="l00981"></a>00981 <span class="comment"> * pointer, according to the magic type.  Update the string pointer to point</span>
<a name="l00982"></a>00982 <span class="comment"> * just after the number read.  Return 0 for success, non-zero for failure.</span>
<a name="l00983"></a>00983 <span class="comment"> */</span>
<a name="l00984"></a>00984 <span class="keyword">static</span> <span class="keywordtype">int</span>
<a name="l00985"></a>00985 getvalue(<span class="keyword">struct</span> magic *m, <span class="keywordtype">char</span> **p)
<a name="l00986"></a>00986 {
<a name="l00987"></a>00987     <span class="keywordtype">int</span> slen;
<a name="l00988"></a>00988 
<a name="l00989"></a>00989     <span class="keywordflow">if</span> (m-&gt;type == STRING) {
<a name="l00990"></a>00990         *p = getstr(*p, m-&gt;value.s, <span class="keyword">sizeof</span>(m-&gt;value.s), &amp;slen);
<a name="l00991"></a>00991         m-&gt;vallen = slen;
<a name="l00992"></a>00992     } <span class="keywordflow">else</span> <span class="keywordflow">if</span> (m-&gt;reln != <span class="charliteral">&#39;x&#39;</span>)
<a name="l00993"></a>00993         m-&gt;value.l = signextend(m, strtol(*p, p, 0));
<a name="l00994"></a>00994     <span class="keywordflow">return</span> 0;
<a name="l00995"></a>00995 }
<a name="l00996"></a>00996 
<a name="l00997"></a>00997 <span class="comment">/*</span>
<a name="l00998"></a>00998 <span class="comment"> * Convert a string containing C character escapes.  Stop at an unescaped</span>
<a name="l00999"></a>00999 <span class="comment"> * space or tab. Copy the converted version to &quot;p&quot;, returning its length in</span>
<a name="l01000"></a>01000 <span class="comment"> * *slen. Return updated scan pointer as function result.</span>
<a name="l01001"></a>01001 <span class="comment"> */</span>
<a name="l01002"></a>01002 <span class="keyword">static</span> <span class="keywordtype">char</span> *
<a name="l01003"></a>01003 getstr(<span class="keyword">register</span> <span class="keywordtype">char</span> *s, <span class="keyword">register</span> <span class="keywordtype">char</span> *p, <span class="keywordtype">int</span> plen, <span class="keywordtype">int</span> *slen)
<a name="l01004"></a>01004 {
<a name="l01005"></a>01005     <span class="keywordtype">char</span> *origs = s,
<a name="l01006"></a>01006     *origp = p;
<a name="l01007"></a>01007     <span class="keywordtype">char</span> *pmax = p + plen - 1;
<a name="l01008"></a>01008     <span class="keyword">register</span> <span class="keywordtype">int</span> c;
<a name="l01009"></a>01009     <span class="keyword">register</span> <span class="keywordtype">int</span> val;
<a name="l01010"></a>01010 
<a name="l01011"></a>01011     <span class="keywordflow">while</span> ((c = *s++) != <span class="charliteral">&#39;\0&#39;</span>) {
<a name="l01012"></a>01012         <span class="keywordflow">if</span> (isspace((<span class="keywordtype">unsigned</span> <span class="keywordtype">char</span>) c))
<a name="l01013"></a>01013             <span class="keywordflow">break</span>;
<a name="l01014"></a>01014         <span class="keywordflow">if</span> (p &gt;= pmax) {
<a name="l01015"></a>01015             kdError(7018) &lt;&lt; <span class="stringliteral">&quot;String too long: &quot;</span> &lt;&lt; origs &lt;&lt; endl;
<a name="l01016"></a>01016             <span class="keywordflow">break</span>;
<a name="l01017"></a>01017         }
<a name="l01018"></a>01018         <span class="keywordflow">if</span> (c == <span class="charliteral">&#39;\\&#39;</span>) {
<a name="l01019"></a>01019             <span class="keywordflow">switch</span> (c = *s++) {
<a name="l01020"></a>01020 
<a name="l01021"></a>01021                 <span class="keywordflow">case</span> <span class="charliteral">&#39;\0&#39;</span>:
<a name="l01022"></a>01022                     <span class="keywordflow">goto</span> out;
<a name="l01023"></a>01023 
<a name="l01024"></a>01024                 <span class="keywordflow">default</span>:
<a name="l01025"></a>01025                     *p++ = (char) c;
<a name="l01026"></a>01026                     <span class="keywordflow">break</span>;
<a name="l01027"></a>01027 
<a name="l01028"></a>01028                 <span class="keywordflow">case</span> <span class="charliteral">&#39;n&#39;</span>:
<a name="l01029"></a>01029                     *p++ = <span class="charliteral">&#39;\n&#39;</span>;
<a name="l01030"></a>01030                     <span class="keywordflow">break</span>;
<a name="l01031"></a>01031 
<a name="l01032"></a>01032                 <span class="keywordflow">case</span> <span class="charliteral">&#39;r&#39;</span>:
<a name="l01033"></a>01033                     *p++ = <span class="charliteral">&#39;\r&#39;</span>;
<a name="l01034"></a>01034                     <span class="keywordflow">break</span>;
<a name="l01035"></a>01035 
<a name="l01036"></a>01036                 <span class="keywordflow">case</span> <span class="charliteral">&#39;b&#39;</span>:
<a name="l01037"></a>01037                     *p++ = <span class="charliteral">&#39;\b&#39;</span>;
<a name="l01038"></a>01038                     <span class="keywordflow">break</span>;
<a name="l01039"></a>01039 
<a name="l01040"></a>01040                 <span class="keywordflow">case</span> <span class="charliteral">&#39;t&#39;</span>:
<a name="l01041"></a>01041                     *p++ = <span class="charliteral">&#39;\t&#39;</span>;
<a name="l01042"></a>01042                     <span class="keywordflow">break</span>;
<a name="l01043"></a>01043 
<a name="l01044"></a>01044                 <span class="keywordflow">case</span> <span class="charliteral">&#39;f&#39;</span>:
<a name="l01045"></a>01045                     *p++ = <span class="charliteral">&#39;\f&#39;</span>;
<a name="l01046"></a>01046                     <span class="keywordflow">break</span>;
<a name="l01047"></a>01047 
<a name="l01048"></a>01048                 <span class="keywordflow">case</span> <span class="charliteral">&#39;v&#39;</span>:
<a name="l01049"></a>01049                     *p++ = <span class="charliteral">&#39;\v&#39;</span>;
<a name="l01050"></a>01050                     <span class="keywordflow">break</span>;
<a name="l01051"></a>01051 
<a name="l01052"></a>01052                     <span class="comment">/* \ and up to 3 octal digits */</span>
<a name="l01053"></a>01053                 <span class="keywordflow">case</span> <span class="charliteral">&#39;0&#39;</span>:
<a name="l01054"></a>01054                 <span class="keywordflow">case</span> <span class="charliteral">&#39;1&#39;</span>:
<a name="l01055"></a>01055                 <span class="keywordflow">case</span> <span class="charliteral">&#39;2&#39;</span>:
<a name="l01056"></a>01056                 <span class="keywordflow">case</span> <span class="charliteral">&#39;3&#39;</span>:
<a name="l01057"></a>01057                 <span class="keywordflow">case</span> <span class="charliteral">&#39;4&#39;</span>:
<a name="l01058"></a>01058                 <span class="keywordflow">case</span> <span class="charliteral">&#39;5&#39;</span>:
<a name="l01059"></a>01059                 <span class="keywordflow">case</span> <span class="charliteral">&#39;6&#39;</span>:
<a name="l01060"></a>01060                 <span class="keywordflow">case</span> <span class="charliteral">&#39;7&#39;</span>:
<a name="l01061"></a>01061                     val = c - <span class="charliteral">&#39;0&#39;</span>;
<a name="l01062"></a>01062                     c = *s++;   <span class="comment">/* try for 2 */</span>
<a name="l01063"></a>01063                     <span class="keywordflow">if</span> (c &gt;= <span class="charliteral">&#39;0&#39;</span> &amp;&amp; c &lt;= <span class="charliteral">&#39;7&#39;</span>) {
<a name="l01064"></a>01064                         val = (val &lt;&lt; 3) | (c - <span class="charliteral">&#39;0&#39;</span>);
<a name="l01065"></a>01065                         c = *s++;   <span class="comment">/* try for 3 */</span>
<a name="l01066"></a>01066                         <span class="keywordflow">if</span> (c &gt;= <span class="charliteral">&#39;0&#39;</span> &amp;&amp; c &lt;= <span class="charliteral">&#39;7&#39;</span>)
<a name="l01067"></a>01067                             val = (val &lt;&lt; 3) | (c - <span class="charliteral">&#39;0&#39;</span>);
<a name="l01068"></a>01068                         <span class="keywordflow">else</span>
<a name="l01069"></a>01069                             --s;
<a name="l01070"></a>01070                     } <span class="keywordflow">else</span>
<a name="l01071"></a>01071                         --s;
<a name="l01072"></a>01072                     *p++ = (char) val;
<a name="l01073"></a>01073                     <span class="keywordflow">break</span>;
<a name="l01074"></a>01074 
<a name="l01075"></a>01075                     <span class="comment">/* \x and up to 3 hex digits */</span>
<a name="l01076"></a>01076                 <span class="keywordflow">case</span> <span class="charliteral">&#39;x&#39;</span>:
<a name="l01077"></a>01077                     val = <span class="charliteral">&#39;x&#39;</span>;  <span class="comment">/* Default if no digits */</span>
<a name="l01078"></a>01078                     c = hextoint(*s++); <span class="comment">/* Get next char */</span>
<a name="l01079"></a>01079                     <span class="keywordflow">if</span> (c &gt;= 0) {
<a name="l01080"></a>01080                         val = c;
<a name="l01081"></a>01081                         c = hextoint(*s++);
<a name="l01082"></a>01082                         <span class="keywordflow">if</span> (c &gt;= 0) {
<a name="l01083"></a>01083                             val = (val &lt;&lt; 4) + c;
<a name="l01084"></a>01084                             c = hextoint(*s++);
<a name="l01085"></a>01085                             <span class="keywordflow">if</span> (c &gt;= 0) {
<a name="l01086"></a>01086                                 val = (val &lt;&lt; 4) + c;
<a name="l01087"></a>01087                             } <span class="keywordflow">else</span>
<a name="l01088"></a>01088                                 --s;
<a name="l01089"></a>01089                         } <span class="keywordflow">else</span>
<a name="l01090"></a>01090                             --s;
<a name="l01091"></a>01091                     } <span class="keywordflow">else</span>
<a name="l01092"></a>01092                         --s;
<a name="l01093"></a>01093                     *p++ = (char) val;
<a name="l01094"></a>01094                     <span class="keywordflow">break</span>;
<a name="l01095"></a>01095             }
<a name="l01096"></a>01096         } <span class="keywordflow">else</span>
<a name="l01097"></a>01097             *p++ = (char) c;
<a name="l01098"></a>01098     }
<a name="l01099"></a>01099       out:
<a name="l01100"></a>01100     *p = <span class="charliteral">&#39;\0&#39;</span>;
<a name="l01101"></a>01101     *slen = p - origp;
<a name="l01102"></a>01102     <span class="comment">//for ( char* foo = origp; foo &lt; p ; ++foo )</span>
<a name="l01103"></a>01103     <span class="comment">//  kdDebug(7018) &lt;&lt; &quot;  &quot; &lt;&lt; *foo &lt;&lt; endl;</span>
<a name="l01104"></a>01104     <span class="keywordflow">return</span> s;
<a name="l01105"></a>01105 }
<a name="l01106"></a>01106 
<a name="l01107"></a>01107 
<a name="l01108"></a>01108 <span class="comment">/* Single hex char to int; -1 if not a hex char. */</span>
<a name="l01109"></a>01109 <span class="keyword">static</span> <span class="keywordtype">int</span>
<a name="l01110"></a>01110 hextoint(<span class="keywordtype">int</span> c)
<a name="l01111"></a>01111 {
<a name="l01112"></a>01112     <span class="keywordflow">if</span> (!isascii((<span class="keywordtype">unsigned</span> <span class="keywordtype">char</span>) c))
<a name="l01113"></a>01113         <span class="keywordflow">return</span> -1;
<a name="l01114"></a>01114     <span class="keywordflow">if</span> (isdigit((<span class="keywordtype">unsigned</span> <span class="keywordtype">char</span>) c))
<a name="l01115"></a>01115         <span class="keywordflow">return</span> c - <span class="charliteral">&#39;0&#39;</span>;
<a name="l01116"></a>01116     <span class="keywordflow">if</span> ((c &gt;= <span class="charliteral">&#39;a&#39;</span>) &amp;&amp; (c &lt;= <span class="charliteral">&#39;f&#39;</span>))
<a name="l01117"></a>01117         <span class="keywordflow">return</span> c + 10 - <span class="charliteral">&#39;a&#39;</span>;
<a name="l01118"></a>01118     <span class="keywordflow">if</span> ((c &gt;= <span class="charliteral">&#39;A&#39;</span>) &amp;&amp; (c &lt;= <span class="charliteral">&#39;F&#39;</span>))
<a name="l01119"></a>01119         <span class="keywordflow">return</span> c + 10 - <span class="charliteral">&#39;A&#39;</span>;
<a name="l01120"></a>01120     <span class="keywordflow">return</span> -1;
<a name="l01121"></a>01121 }
<a name="l01122"></a>01122 
<a name="l01123"></a>01123 <span class="comment">/*</span>
<a name="l01124"></a>01124 <span class="comment"> * Convert the byte order of the data we are looking at</span>
<a name="l01125"></a>01125 <span class="comment"> */</span>
<a name="l01126"></a>01126 <span class="keyword">static</span> <span class="keywordtype">int</span>
<a name="l01127"></a>01127 mconvert(<span class="keyword">union</span> VALUETYPE *p, <span class="keyword">struct</span> magic *m)
<a name="l01128"></a>01128 {
<a name="l01129"></a>01129     <span class="keywordflow">switch</span> (m-&gt;type) {
<a name="l01130"></a>01130         <span class="keywordflow">case</span> BYTE:
<a name="l01131"></a>01131             <span class="keywordflow">return</span> 1;
<a name="l01132"></a>01132         <span class="keywordflow">case</span> STRING:
<a name="l01133"></a>01133             <span class="comment">/* Null terminate */</span>
<a name="l01134"></a>01134             p-&gt;s[<span class="keyword">sizeof</span>(p-&gt;s) - 1] = <span class="charliteral">&#39;\0&#39;</span>;
<a name="l01135"></a>01135             <span class="keywordflow">return</span> 1;
<a name="l01136"></a>01136 <span class="preprocessor">#ifndef WORDS_BIGENDIAN</span>
<a name="l01137"></a>01137 <span class="preprocessor"></span>        <span class="keywordflow">case</span> SHORT:
<a name="l01138"></a>01138 <span class="preprocessor">#endif</span>
<a name="l01139"></a>01139 <span class="preprocessor"></span>        <span class="keywordflow">case</span> BESHORT:
<a name="l01140"></a>01140             p-&gt;h = (short) ((p-&gt;hs[0] &lt;&lt; 8) | (p-&gt;hs[1]));
<a name="l01141"></a>01141             <span class="keywordflow">return</span> 1;
<a name="l01142"></a>01142 <span class="preprocessor">#ifndef WORDS_BIGENDIAN</span>
<a name="l01143"></a>01143 <span class="preprocessor"></span>        <span class="keywordflow">case</span> LONG:
<a name="l01144"></a>01144         <span class="keywordflow">case</span> DATE:
<a name="l01145"></a>01145 <span class="preprocessor">#endif</span>
<a name="l01146"></a>01146 <span class="preprocessor"></span>        <span class="keywordflow">case</span> BELONG:
<a name="l01147"></a>01147         <span class="keywordflow">case</span> BEDATE:
<a name="l01148"></a>01148             p-&gt;l = (long)
<a name="l01149"></a>01149                 ((p-&gt;hl[0] &lt;&lt; 24) | (p-&gt;hl[1] &lt;&lt; 16) | (p-&gt;hl[2] &lt;&lt; 8) | (p-&gt;hl[3]));
<a name="l01150"></a>01150             <span class="keywordflow">return</span> 1;
<a name="l01151"></a>01151 <span class="preprocessor">#ifdef WORDS_BIGENDIAN</span>
<a name="l01152"></a>01152 <span class="preprocessor"></span>        <span class="keywordflow">case</span> SHORT:
<a name="l01153"></a>01153 <span class="preprocessor">#endif</span>
<a name="l01154"></a>01154 <span class="preprocessor"></span>        <span class="keywordflow">case</span> LESHORT:
<a name="l01155"></a>01155             p-&gt;h = (short) ((p-&gt;hs[1] &lt;&lt; 8) | (p-&gt;hs[0]));
<a name="l01156"></a>01156             <span class="keywordflow">return</span> 1;
<a name="l01157"></a>01157 <span class="preprocessor">#ifdef WORDS_BIGENDIAN</span>
<a name="l01158"></a>01158 <span class="preprocessor"></span>        <span class="keywordflow">case</span> LONG:
<a name="l01159"></a>01159         <span class="keywordflow">case</span> DATE:
<a name="l01160"></a>01160 <span class="preprocessor">#endif</span>
<a name="l01161"></a>01161 <span class="preprocessor"></span>        <span class="keywordflow">case</span> LELONG:
<a name="l01162"></a>01162         <span class="keywordflow">case</span> LEDATE:
<a name="l01163"></a>01163             p-&gt;l = (long)
<a name="l01164"></a>01164                 ((p-&gt;hl[3] &lt;&lt; 24) | (p-&gt;hl[2] &lt;&lt; 16) | (p-&gt;hl[1] &lt;&lt; 8) | (p-&gt;hl[0]));
<a name="l01165"></a>01165             <span class="keywordflow">return</span> 1;
<a name="l01166"></a>01166         <span class="keywordflow">default</span>:
<a name="l01167"></a>01167             kdError(7018) &lt;&lt; <span class="stringliteral">&quot;mconvert: invalid type &quot;</span> &lt;&lt; m-&gt;type &lt;&lt; endl;
<a name="l01168"></a>01168             <span class="keywordflow">return</span> 0;
<a name="l01169"></a>01169     }
<a name="l01170"></a>01170 }
<a name="l01171"></a>01171 
<a name="l01172"></a>01172 
<a name="l01173"></a>01173 <span class="keyword">static</span> <span class="keywordtype">int</span>
<a name="l01174"></a>01174 mget(<span class="keyword">union</span> VALUETYPE *p, <span class="keywordtype">unsigned</span> <span class="keywordtype">char</span> *s, <span class="keyword">struct</span> magic *m,
<a name="l01175"></a>01175      <span class="keywordtype">int</span> nbytes)
<a name="l01176"></a>01176 {
<a name="l01177"></a>01177     <span class="keywordtype">long</span> offset = m-&gt;offset;
<a name="l01178"></a>01178         <span class="keywordflow">switch</span> ( m-&gt;type )
<a name="l01179"></a>01179     {
<a name="l01180"></a>01180         <span class="keywordflow">case</span> BYTE:
<a name="l01181"></a>01181         <span class="keywordflow">if</span> ( offset + 1 &gt; nbytes-1 ) <span class="comment">// nbytes = (size of file) + 1</span>
<a name="l01182"></a>01182             <span class="keywordflow">return</span> 0;
<a name="l01183"></a>01183         <span class="keywordflow">break</span>;
<a name="l01184"></a>01184         <span class="keywordflow">case</span> SHORT:
<a name="l01185"></a>01185         <span class="keywordflow">case</span> BESHORT:
<a name="l01186"></a>01186         <span class="keywordflow">case</span> LESHORT:
<a name="l01187"></a>01187             <span class="keywordflow">if</span> ( offset + 2 &gt; nbytes-1 )
<a name="l01188"></a>01188             <span class="keywordflow">return</span> 0;
<a name="l01189"></a>01189         <span class="keywordflow">break</span>;
<a name="l01190"></a>01190         <span class="keywordflow">case</span> LONG:
<a name="l01191"></a>01191         <span class="keywordflow">case</span> BELONG:
<a name="l01192"></a>01192         <span class="keywordflow">case</span> LELONG:
<a name="l01193"></a>01193         <span class="keywordflow">case</span> DATE:
<a name="l01194"></a>01194         <span class="keywordflow">case</span> BEDATE:
<a name="l01195"></a>01195         <span class="keywordflow">case</span> LEDATE:
<a name="l01196"></a>01196             <span class="keywordflow">if</span> ( offset + 4 &gt; nbytes-1 )
<a name="l01197"></a>01197             <span class="keywordflow">return</span> 0;
<a name="l01198"></a>01198         <span class="keywordflow">break</span>;
<a name="l01199"></a>01199         <span class="keywordflow">case</span> STRING:
<a name="l01200"></a>01200         <span class="keywordflow">break</span>;
<a name="l01201"></a>01201     }
<a name="l01202"></a>01202 
<a name="l01203"></a>01203 <span class="comment">// The file length might be &lt; sizeof(union VALUETYPE) (David)</span>
<a name="l01204"></a>01204 <span class="comment">// -&gt; pad with zeros (the &#39;file&#39; command does it this way)</span>
<a name="l01205"></a>01205 <span class="comment">// Thanks to Stan Covington &lt;stan@calderasystems.com&gt; for detailed report</span>
<a name="l01206"></a>01206     <span class="keywordflow">if</span> (offset + (<span class="keywordtype">int</span>)<span class="keyword">sizeof</span>(<span class="keyword">union</span> VALUETYPE) &gt; nbytes)
<a name="l01207"></a>01207     {
<a name="l01208"></a>01208       <span class="keywordtype">int</span> have = nbytes - offset;
<a name="l01209"></a>01209       memset(p, 0, <span class="keyword">sizeof</span>(<span class="keyword">union</span> VALUETYPE));
<a name="l01210"></a>01210       <span class="keywordflow">if</span> (have &gt; 0)
<a name="l01211"></a>01211         memcpy(p, s + offset, have);
<a name="l01212"></a>01212     } <span class="keywordflow">else</span>
<a name="l01213"></a>01213       memcpy(p, s + offset, <span class="keyword">sizeof</span>(<span class="keyword">union</span> VALUETYPE));
<a name="l01214"></a>01214 
<a name="l01215"></a>01215     <span class="keywordflow">if</span> (!mconvert(p, m))
<a name="l01216"></a>01216         <span class="keywordflow">return</span> 0;
<a name="l01217"></a>01217 
<a name="l01218"></a>01218     <span class="keywordflow">if</span> (m-&gt;flag &amp; INDIR) {
<a name="l01219"></a>01219 
<a name="l01220"></a>01220         <span class="keywordflow">switch</span> (m-&gt;in.type) {
<a name="l01221"></a>01221             <span class="keywordflow">case</span> BYTE:
<a name="l01222"></a>01222                 offset = p-&gt;b + m-&gt;in.offset;
<a name="l01223"></a>01223                 <span class="keywordflow">break</span>;
<a name="l01224"></a>01224             <span class="keywordflow">case</span> SHORT:
<a name="l01225"></a>01225                 offset = p-&gt;h + m-&gt;in.offset;
<a name="l01226"></a>01226                 <span class="keywordflow">break</span>;
<a name="l01227"></a>01227             <span class="keywordflow">case</span> LONG:
<a name="l01228"></a>01228                 offset = p-&gt;l + m-&gt;in.offset;
<a name="l01229"></a>01229                 <span class="keywordflow">break</span>;
<a name="l01230"></a>01230         }
<a name="l01231"></a>01231 
<a name="l01232"></a>01232         <span class="keywordflow">if</span> (offset + (<span class="keywordtype">int</span>)<span class="keyword">sizeof</span>(<span class="keyword">union</span> VALUETYPE) &gt; nbytes)
<a name="l01233"></a>01233              <span class="keywordflow">return</span> 0;
<a name="l01234"></a>01234 
<a name="l01235"></a>01235         memcpy(p, s + offset, <span class="keyword">sizeof</span>(<span class="keyword">union</span> VALUETYPE));
<a name="l01236"></a>01236 
<a name="l01237"></a>01237         <span class="keywordflow">if</span> (!mconvert(p, m))
<a name="l01238"></a>01238             <span class="keywordflow">return</span> 0;
<a name="l01239"></a>01239     }
<a name="l01240"></a>01240     <span class="keywordflow">return</span> 1;
<a name="l01241"></a>01241 }
<a name="l01242"></a>01242 
<a name="l01243"></a>01243 <span class="keyword">static</span> <span class="keywordtype">int</span>
<a name="l01244"></a>01244 mcheck(<span class="keyword">union</span> VALUETYPE *p, <span class="keyword">struct</span> magic *m)
<a name="l01245"></a>01245 {
<a name="l01246"></a>01246     <span class="keyword">register</span> <span class="keywordtype">unsigned</span> <span class="keywordtype">long</span> l = m-&gt;value.l;
<a name="l01247"></a>01247     <span class="keyword">register</span> <span class="keywordtype">unsigned</span> <span class="keywordtype">long</span> v;
<a name="l01248"></a>01248     <span class="keywordtype">int</span> matched;
<a name="l01249"></a>01249 
<a name="l01250"></a>01250     <span class="keywordflow">if</span> ((m-&gt;value.s[0] == <span class="charliteral">&#39;x&#39;</span>) &amp;&amp; (m-&gt;value.s[1] == <span class="charliteral">&#39;\0&#39;</span>)) {
<a name="l01251"></a>01251         kdError(7018) &lt;&lt; <span class="stringliteral">&quot;BOINK&quot;</span> &lt;&lt; endl;
<a name="l01252"></a>01252         <span class="keywordflow">return</span> 1;
<a name="l01253"></a>01253     }
<a name="l01254"></a>01254     <span class="keywordflow">switch</span> (m-&gt;type) {
<a name="l01255"></a>01255         <span class="keywordflow">case</span> BYTE:
<a name="l01256"></a>01256             v = p-&gt;b;
<a name="l01257"></a>01257             <span class="keywordflow">break</span>;
<a name="l01258"></a>01258 
<a name="l01259"></a>01259         <span class="keywordflow">case</span> SHORT:
<a name="l01260"></a>01260         <span class="keywordflow">case</span> BESHORT:
<a name="l01261"></a>01261         <span class="keywordflow">case</span> LESHORT:
<a name="l01262"></a>01262             v = p-&gt;h;
<a name="l01263"></a>01263             <span class="keywordflow">break</span>;
<a name="l01264"></a>01264 
<a name="l01265"></a>01265         <span class="keywordflow">case</span> LONG:
<a name="l01266"></a>01266         <span class="keywordflow">case</span> BELONG:
<a name="l01267"></a>01267         <span class="keywordflow">case</span> LELONG:
<a name="l01268"></a>01268         <span class="keywordflow">case</span> DATE:
<a name="l01269"></a>01269         <span class="keywordflow">case</span> BEDATE:
<a name="l01270"></a>01270         <span class="keywordflow">case</span> LEDATE:
<a name="l01271"></a>01271             v = p-&gt;l;
<a name="l01272"></a>01272             <span class="keywordflow">break</span>;
<a name="l01273"></a>01273 
<a name="l01274"></a>01274         <span class="keywordflow">case</span> STRING:
<a name="l01275"></a>01275             l = 0;
<a name="l01276"></a>01276             <span class="comment">/*</span>
<a name="l01277"></a>01277 <span class="comment">             * What we want here is: v = strncmp(m-&gt;value.s, p-&gt;s,</span>
<a name="l01278"></a>01278 <span class="comment">             * m-&gt;vallen); but ignoring any nulls.  bcmp doesn&#39;t give</span>
<a name="l01279"></a>01279 <span class="comment">             * -/+/0 and isn&#39;t universally available anyway.</span>
<a name="l01280"></a>01280 <span class="comment">             */</span>
<a name="l01281"></a>01281             v = 0;
<a name="l01282"></a>01282             {
<a name="l01283"></a>01283                 <span class="keyword">register</span> <span class="keywordtype">unsigned</span> <span class="keywordtype">char</span> *a = (<span class="keywordtype">unsigned</span> <span class="keywordtype">char</span> *) m-&gt;value.s;
<a name="l01284"></a>01284                 <span class="keyword">register</span> <span class="keywordtype">unsigned</span> <span class="keywordtype">char</span> *b = (<span class="keywordtype">unsigned</span> <span class="keywordtype">char</span> *) p-&gt;s;
<a name="l01285"></a>01285                 <span class="keyword">register</span> <span class="keywordtype">int</span> len = m-&gt;vallen;
<a name="l01286"></a>01286                 Q_ASSERT(len);
<a name="l01287"></a>01287 
<a name="l01288"></a>01288                 <span class="keywordflow">while</span> (--len &gt;= 0)
<a name="l01289"></a>01289                     <span class="keywordflow">if</span> ((v = *b++ - *a++) != 0)
<a name="l01290"></a>01290                         <span class="keywordflow">break</span>;
<a name="l01291"></a>01291             }
<a name="l01292"></a>01292             <span class="keywordflow">break</span>;
<a name="l01293"></a>01293         <span class="keywordflow">default</span>:
<a name="l01294"></a>01294             kdError(7018) &lt;&lt; <span class="stringliteral">&quot;mcheck: invalid type &quot;</span> &lt;&lt; m-&gt;type &lt;&lt; endl;
<a name="l01295"></a>01295             <span class="keywordflow">return</span> 0;   <span class="comment">/* NOTREACHED */</span>
<a name="l01296"></a>01296     }
<a name="l01297"></a>01297 <span class="preprocessor">#if 0</span>
<a name="l01298"></a>01298 <span class="preprocessor"></span>    qDebug(<span class="stringliteral">&quot;Before signextend %08x&quot;</span>, v);
<a name="l01299"></a>01299 <span class="preprocessor">#endif</span>
<a name="l01300"></a>01300 <span class="preprocessor"></span>    v = signextend(m, v) &amp; m-&gt;mask;
<a name="l01301"></a>01301 <span class="preprocessor">#if 0</span>
<a name="l01302"></a>01302 <span class="preprocessor"></span>    qDebug(<span class="stringliteral">&quot;After signextend %08x&quot;</span>, v);
<a name="l01303"></a>01303 <span class="preprocessor">#endif</span>
<a name="l01304"></a>01304 <span class="preprocessor"></span>
<a name="l01305"></a>01305     <span class="keywordflow">switch</span> (m-&gt;reln) {
<a name="l01306"></a>01306         <span class="keywordflow">case</span> <span class="charliteral">&#39;x&#39;</span>:
<a name="l01307"></a>01307             matched = 1;
<a name="l01308"></a>01308             <span class="keywordflow">break</span>;
<a name="l01309"></a>01309 
<a name="l01310"></a>01310         <span class="keywordflow">case</span> <span class="charliteral">&#39;!&#39;</span>:
<a name="l01311"></a>01311             matched = v != l;
<a name="l01312"></a>01312             <span class="keywordflow">break</span>;
<a name="l01313"></a>01313 
<a name="l01314"></a>01314         <span class="keywordflow">case</span> <span class="charliteral">&#39;=&#39;</span>:
<a name="l01315"></a>01315             matched = v == l;
<a name="l01316"></a>01316             <span class="keywordflow">break</span>;
<a name="l01317"></a>01317 
<a name="l01318"></a>01318         <span class="keywordflow">case</span> <span class="charliteral">&#39;&gt;&#39;</span>:
<a name="l01319"></a>01319             <span class="keywordflow">if</span> (m-&gt;flag &amp; UNSIGNED)
<a name="l01320"></a>01320                 matched = v &gt; l;
<a name="l01321"></a>01321             <span class="keywordflow">else</span>
<a name="l01322"></a>01322                 matched = (long) v &gt; (<span class="keywordtype">long</span>) l;
<a name="l01323"></a>01323             <span class="keywordflow">break</span>;
<a name="l01324"></a>01324 
<a name="l01325"></a>01325         <span class="keywordflow">case</span> <span class="charliteral">&#39;&lt;&#39;</span>:
<a name="l01326"></a>01326             <span class="keywordflow">if</span> (m-&gt;flag &amp; UNSIGNED)
<a name="l01327"></a>01327                 matched = v &lt; l;
<a name="l01328"></a>01328             <span class="keywordflow">else</span>
<a name="l01329"></a>01329                 matched = (long) v &lt; (<span class="keywordtype">long</span>) l;
<a name="l01330"></a>01330             <span class="keywordflow">break</span>;
<a name="l01331"></a>01331 
<a name="l01332"></a>01332         <span class="keywordflow">case</span> <span class="charliteral">&#39;&amp;&#39;</span>:
<a name="l01333"></a>01333             matched = (v &amp; l) == l;
<a name="l01334"></a>01334             <span class="keywordflow">break</span>;
<a name="l01335"></a>01335 
<a name="l01336"></a>01336         <span class="keywordflow">case</span> <span class="charliteral">&#39;^&#39;</span>:
<a name="l01337"></a>01337             matched = (v &amp; l) != l;
<a name="l01338"></a>01338             <span class="keywordflow">break</span>;
<a name="l01339"></a>01339 
<a name="l01340"></a>01340         <span class="keywordflow">default</span>:
<a name="l01341"></a>01341             matched = 0;
<a name="l01342"></a>01342             kdError(7018) &lt;&lt; <span class="stringliteral">&quot;mcheck: can&#39;t happen: invalid relation &quot;</span> &lt;&lt; m-&gt;reln &lt;&lt; <span class="stringliteral">&quot;.&quot;</span> &lt;&lt; endl;
<a name="l01343"></a>01343             <span class="keywordflow">break</span>;  <span class="comment">/* NOTREACHED */</span>
<a name="l01344"></a>01344     }
<a name="l01345"></a>01345 
<a name="l01346"></a>01346     <span class="keywordflow">return</span> matched;
<a name="l01347"></a>01347 }
<a name="l01348"></a>01348 
<a name="l01349"></a>01349 <span class="comment">/*</span>
<a name="l01350"></a>01350 <span class="comment"> * magic_process - process input file fn. Opens the file and reads a</span>
<a name="l01351"></a>01351 <span class="comment"> * fixed-size buffer to begin processing the contents.</span>
<a name="l01352"></a>01352 <span class="comment"> */</span>
<a name="l01353"></a>01353 
<a name="l01354"></a>01354 <span class="keywordtype">void</span> process(<span class="keyword">struct</span> config_rec* conf, <span class="keyword">const</span> <a class="codeRef" href="qstring.html">QString</a> &amp; fn)
<a name="l01355"></a>01355 {
<a name="l01356"></a>01356     <span class="keywordtype">int</span> fd = 0;
<a name="l01357"></a>01357     <span class="keywordtype">unsigned</span> <span class="keywordtype">char</span> buf[HOWMANY + 1]; <span class="comment">/* one extra for terminating &#39;\0&#39; */</span>
<a name="l01358"></a>01358     KDE_struct_stat sb;
<a name="l01359"></a>01359     <span class="keywordtype">int</span> nbytes = 0;         <span class="comment">/* number of bytes read from a datafile */</span>
<a name="l01360"></a>01360         <span class="keywordtype">int</span> tagbytes = 0;       <span class="comment">/* size of prefixed tag */</span>
<a name="l01361"></a>01361         <a class="codeRef" href="qcstring.html">QCString</a> fileName = <a class="codeRef" href="qfile.html#encodeName">QFile::encodeName</a>( fn );
<a name="l01362"></a>01362 
<a name="l01363"></a>01363     <span class="comment">/*</span>
<a name="l01364"></a>01364 <span class="comment">     * first try judging the file based on its filesystem status</span>
<a name="l01365"></a>01365 <span class="comment">     */</span>
<a name="l01366"></a>01366     <span class="keywordflow">if</span> (fsmagic(conf, fileName, &amp;sb) != 0) {
<a name="l01367"></a>01367         <span class="comment">//resultBuf += &quot;\n&quot;;</span>
<a name="l01368"></a>01368         <span class="keywordflow">return</span>;
<a name="l01369"></a>01369     }
<a name="l01370"></a>01370     <span class="keywordflow">if</span> ((fd = KDE_open(fileName, O_RDONLY)) &lt; 0) {
<a name="l01371"></a>01371         <span class="comment">/* We can&#39;t open it, but we were able to stat it. */</span>
<a name="l01372"></a>01372         <span class="comment">/*</span>
<a name="l01373"></a>01373 <span class="comment">         * if (sb.st_mode &amp; 0002) addResult(&quot;writable, &quot;);</span>
<a name="l01374"></a>01374 <span class="comment">         * if (sb.st_mode &amp; 0111) addResult(&quot;executable, &quot;);</span>
<a name="l01375"></a>01375 <span class="comment">         */</span>
<a name="l01376"></a>01376         <span class="comment">//kdDebug(7018) &lt;&lt; &quot;can&#39;t read `&quot; &lt;&lt; fn &lt;&lt; &quot;&#39; (&quot; &lt;&lt; strerror(errno) &lt;&lt; &quot;).&quot; &lt;&lt; endl;</span>
<a name="l01377"></a>01377         conf-&gt;resultBuf = MIME_BINARY_UNREADABLE;
<a name="l01378"></a>01378         <span class="keywordflow">return</span>;
<a name="l01379"></a>01379     }
<a name="l01380"></a>01380     <span class="comment">/*</span>
<a name="l01381"></a>01381 <span class="comment">     * try looking at the first HOWMANY bytes</span>
<a name="l01382"></a>01382 <span class="comment">     */</span>
<a name="l01383"></a>01383     <span class="keywordflow">if</span> ((nbytes = read(fd, (<span class="keywordtype">char</span> *) buf, HOWMANY)) == -1) {
<a name="l01384"></a>01384         kdError(7018) &lt;&lt; <span class="stringliteral">&quot;&quot;</span> &lt;&lt; fn &lt;&lt; <span class="stringliteral">&quot; read failed (&quot;</span> &lt;&lt; strerror(errno) &lt;&lt; <span class="stringliteral">&quot;).&quot;</span> &lt;&lt; endl;
<a name="l01385"></a>01385         conf-&gt;resultBuf = MIME_BINARY_UNREADABLE;
<a name="l01386"></a>01386         (void)close(fd);
<a name="l01387"></a>01387         <span class="keywordflow">return</span>;
<a name="l01388"></a>01388     }
<a name="l01389"></a>01389         <span class="keywordflow">if</span> ((tagbytes = tagmagic(buf, nbytes))) {
<a name="l01390"></a>01390         <span class="comment">// Read buffer at new position</span>
<a name="l01391"></a>01391         lseek(fd, tagbytes, SEEK_SET);
<a name="l01392"></a>01392         nbytes = read(fd, (<span class="keywordtype">char</span>*)buf, HOWMANY);
<a name="l01393"></a>01393         <span class="keywordflow">if</span> (nbytes &lt; 0) {
<a name="l01394"></a>01394             conf-&gt;resultBuf = MIME_BINARY_UNREADABLE;
<a name="l01395"></a>01395             (void)close(fd);
<a name="l01396"></a>01396             <span class="keywordflow">return</span>;
<a name="l01397"></a>01397         }
<a name="l01398"></a>01398         }
<a name="l01399"></a>01399     <span class="keywordflow">if</span> (nbytes == 0) {
<a name="l01400"></a>01400         conf-&gt;resultBuf = MIME_BINARY_ZEROSIZE;
<a name="l01401"></a>01401     } <span class="keywordflow">else</span> {
<a name="l01402"></a>01402         buf[nbytes++] = <span class="charliteral">&#39;\0&#39;</span>;   <span class="comment">/* null-terminate it */</span>
<a name="l01403"></a>01403         tryit(conf, buf, nbytes);
<a name="l01404"></a>01404     }
<a name="l01405"></a>01405 
<a name="l01406"></a>01406         <span class="keywordflow">if</span> ( conf-&gt;utimeConf &amp;&amp; conf-&gt;utimeConf-&gt;restoreAccessTime( fn ) )
<a name="l01407"></a>01407         {
<a name="l01408"></a>01408             <span class="comment">/*</span>
<a name="l01409"></a>01409 <span class="comment">             * Try to restore access, modification times if read it.</span>
<a name="l01410"></a>01410 <span class="comment">             * This changes the &quot;change&quot; time (ctime), but we can&#39;t do anything</span>
<a name="l01411"></a>01411 <span class="comment">             * about that.</span>
<a name="l01412"></a>01412 <span class="comment">             */</span>
<a name="l01413"></a>01413             <span class="keyword">struct </span>utimbuf utbuf;
<a name="l01414"></a>01414             utbuf.actime = sb.st_atime;
<a name="l01415"></a>01415             utbuf.modtime = sb.st_mtime;
<a name="l01416"></a>01416             (void) utime(fileName, &amp;utbuf);
<a name="l01417"></a>01417         }
<a name="l01418"></a>01418     (void) close(fd);
<a name="l01419"></a>01419 }
<a name="l01420"></a>01420 
<a name="l01421"></a>01421 
<a name="l01422"></a>01422 <span class="keyword">static</span> <span class="keywordtype">void</span> tryit(<span class="keyword">struct</span> config_rec* conf, <span class="keywordtype">unsigned</span> <span class="keywordtype">char</span> *buf, <span class="keywordtype">int</span> nb)
<a name="l01423"></a>01423 {
<a name="l01424"></a>01424     <span class="comment">/* try tests in /etc/magic (or surrogate magic file) */</span>
<a name="l01425"></a>01425     <span class="keywordflow">if</span> (match(conf, buf, nb))
<a name="l01426"></a>01426         <span class="keywordflow">return</span>;
<a name="l01427"></a>01427 
<a name="l01428"></a>01428     <span class="comment">/* try known keywords, check for ascii-ness too. */</span>
<a name="l01429"></a>01429     <span class="keywordflow">if</span> (ascmagic(conf, buf, nb) == 1)
<a name="l01430"></a>01430         <span class="keywordflow">return</span>;
<a name="l01431"></a>01431 
<a name="l01432"></a>01432         <span class="comment">/* see if it&#39;s plain text */</span>
<a name="l01433"></a>01433         <span class="keywordflow">if</span> (textmagic(conf, buf, nb))
<a name="l01434"></a>01434                 <span class="keywordflow">return</span>;
<a name="l01435"></a>01435 
<a name="l01436"></a>01436     <span class="comment">/* abandon hope, all ye who remain here */</span>
<a name="l01437"></a>01437     conf-&gt;resultBuf = MIME_BINARY_UNKNOWN;
<a name="l01438"></a>01438     conf-&gt;accuracy = 0;
<a name="l01439"></a>01439 }
<a name="l01440"></a>01440 
<a name="l01441"></a>01441 <span class="keyword">static</span> <span class="keywordtype">int</span>
<a name="l01442"></a>01442 fsmagic(<span class="keyword">struct</span> config_rec* conf, <span class="keyword">const</span> <span class="keywordtype">char</span> *fn, KDE_struct_stat *sb)
<a name="l01443"></a>01443 {
<a name="l01444"></a>01444     <span class="keywordtype">int</span> ret = 0;
<a name="l01445"></a>01445 
<a name="l01446"></a>01446     <span class="comment">/*</span>
<a name="l01447"></a>01447 <span class="comment">     * Fstat is cheaper but fails for files you don&#39;t have read perms on.</span>
<a name="l01448"></a>01448 <span class="comment">     * On 4.2BSD and similar systems, use lstat() to identify symlinks.</span>
<a name="l01449"></a>01449 <span class="comment">     */</span>
<a name="l01450"></a>01450     ret = KDE_lstat(fn, sb);  <span class="comment">/* don&#39;t merge into if; see &quot;ret =&quot; above */</span>
<a name="l01451"></a>01451 
<a name="l01452"></a>01452     <span class="keywordflow">if</span> (ret) {
<a name="l01453"></a>01453         <span class="keywordflow">return</span> 1;
<a name="l01454"></a>01454 
<a name="l01455"></a>01455     }
<a name="l01456"></a>01456     <span class="comment">/*</span>
<a name="l01457"></a>01457 <span class="comment">     * if (sb-&gt;st_mode &amp; S_ISUID) resultBuf += &quot;setuid &quot;;</span>
<a name="l01458"></a>01458 <span class="comment">     * if (sb-&gt;st_mode &amp; S_ISGID) resultBuf += &quot;setgid &quot;;</span>
<a name="l01459"></a>01459 <span class="comment">     * if (sb-&gt;st_mode &amp; S_ISVTX) resultBuf += &quot;sticky &quot;;</span>
<a name="l01460"></a>01460 <span class="comment">     */</span>
<a name="l01461"></a>01461 
<a name="l01462"></a>01462     <span class="keywordflow">switch</span> (sb-&gt;st_mode &amp; S_IFMT) {
<a name="l01463"></a>01463     <span class="keywordflow">case</span> S_IFDIR:
<a name="l01464"></a>01464         conf-&gt;resultBuf = MIME_INODE_DIR;
<a name="l01465"></a>01465         <span class="keywordflow">return</span> 1;
<a name="l01466"></a>01466     <span class="keywordflow">case</span> S_IFCHR:
<a name="l01467"></a>01467         conf-&gt;resultBuf = MIME_INODE_CDEV;
<a name="l01468"></a>01468         <span class="keywordflow">return</span> 1;
<a name="l01469"></a>01469     <span class="keywordflow">case</span> S_IFBLK:
<a name="l01470"></a>01470         conf-&gt;resultBuf = MIME_INODE_BDEV;
<a name="l01471"></a>01471         <span class="keywordflow">return</span> 1;
<a name="l01472"></a>01472         <span class="comment">/* TODO add code to handle V7 MUX and Blit MUX files */</span>
<a name="l01473"></a>01473 <span class="preprocessor">#ifdef    S_IFIFO</span>
<a name="l01474"></a>01474 <span class="preprocessor"></span>    <span class="keywordflow">case</span> S_IFIFO:
<a name="l01475"></a>01475         conf-&gt;resultBuf = MIME_INODE_FIFO;
<a name="l01476"></a>01476         <span class="keywordflow">return</span> 1;
<a name="l01477"></a>01477 <span class="preprocessor">#endif</span>
<a name="l01478"></a>01478 <span class="preprocessor"></span><span class="preprocessor">#ifdef    S_IFLNK</span>
<a name="l01479"></a>01479 <span class="preprocessor"></span>    <span class="keywordflow">case</span> S_IFLNK:
<a name="l01480"></a>01480     {
<a name="l01481"></a>01481         <span class="keywordtype">char</span> buf[BUFSIZ + BUFSIZ + 4];
<a name="l01482"></a>01482         <span class="keyword">register</span> <span class="keywordtype">int</span> nch;
<a name="l01483"></a>01483         KDE_struct_stat tstatbuf;
<a name="l01484"></a>01484 
<a name="l01485"></a>01485         <span class="keywordflow">if</span> ((nch = readlink(fn, buf, BUFSIZ - 1)) &lt;= 0) {
<a name="l01486"></a>01486             conf-&gt;resultBuf = MIME_INODE_LINK;
<a name="l01487"></a>01487             <span class="comment">//conf-&gt;resultBuf += &quot;\nunreadable&quot;;</span>
<a name="l01488"></a>01488             <span class="keywordflow">return</span> 1;
<a name="l01489"></a>01489         }
<a name="l01490"></a>01490         buf[nch] = <span class="charliteral">&#39;\0&#39;</span>; <span class="comment">/* readlink(2) forgets this */</span>
<a name="l01491"></a>01491         <span class="comment">/* If broken symlink, say so and quit early. */</span>
<a name="l01492"></a>01492         <span class="keywordflow">if</span> (*buf == <span class="charliteral">&#39;/&#39;</span>) {
<a name="l01493"></a>01493             <span class="keywordflow">if</span> (KDE_stat(buf, &amp;tstatbuf) &lt; 0) {
<a name="l01494"></a>01494                 conf-&gt;resultBuf = MIME_INODE_LINK;
<a name="l01495"></a>01495                 <span class="comment">//conf-&gt;resultBuf += &quot;\nbroken&quot;;</span>
<a name="l01496"></a>01496                 <span class="keywordflow">return</span> 1;
<a name="l01497"></a>01497             }
<a name="l01498"></a>01498         } <span class="keywordflow">else</span> {
<a name="l01499"></a>01499             <span class="keywordtype">char</span> *tmp;
<a name="l01500"></a>01500             <span class="keywordtype">char</span> buf2[BUFSIZ + BUFSIZ + 4];
<a name="l01501"></a>01501 
<a name="l01502"></a>01502             strncpy(buf2, fn, BUFSIZ);
<a name="l01503"></a>01503             buf2[BUFSIZ] = 0;
<a name="l01504"></a>01504 
<a name="l01505"></a>01505             <span class="keywordflow">if</span> ((tmp = strrchr(buf2, <span class="charliteral">&#39;/&#39;</span>)) == NULL) {
<a name="l01506"></a>01506                 tmp = buf; <span class="comment">/* in current dir */</span>
<a name="l01507"></a>01507             } <span class="keywordflow">else</span> {
<a name="l01508"></a>01508                 <span class="comment">/* dir part plus (rel.) link */</span>
<a name="l01509"></a>01509                 *++tmp = <span class="charliteral">&#39;\0&#39;</span>;
<a name="l01510"></a>01510                 strcat(buf2, buf);
<a name="l01511"></a>01511                 tmp = buf2;
<a name="l01512"></a>01512             }
<a name="l01513"></a>01513             <span class="keywordflow">if</span> (KDE_stat(tmp, &amp;tstatbuf) &lt; 0) {
<a name="l01514"></a>01514                 conf-&gt;resultBuf = MIME_INODE_LINK;
<a name="l01515"></a>01515                 <span class="comment">//conf-&gt;resultBuf += &quot;\nbroken&quot;;</span>
<a name="l01516"></a>01516                 <span class="keywordflow">return</span> 1;
<a name="l01517"></a>01517             } <span class="keywordflow">else</span>
<a name="l01518"></a>01518                 strcpy(buf, tmp);
<a name="l01519"></a>01519         }
<a name="l01520"></a>01520         <span class="keywordflow">if</span> (conf-&gt;followLinks)
<a name="l01521"></a>01521             process( conf, <a class="codeRef" href="qfile.html#decodeName">QFile::decodeName</a>( buf ) );
<a name="l01522"></a>01522         <span class="keywordflow">else</span>
<a name="l01523"></a>01523             conf-&gt;resultBuf = MIME_INODE_LINK;
<a name="l01524"></a>01524         <span class="keywordflow">return</span> 1;
<a name="l01525"></a>01525     }
<a name="l01526"></a>01526     <span class="keywordflow">return</span> 1;
<a name="l01527"></a>01527 <span class="preprocessor">#endif</span>
<a name="l01528"></a>01528 <span class="preprocessor"></span><span class="preprocessor">#ifdef    S_IFSOCK</span>
<a name="l01529"></a>01529 <span class="preprocessor"></span><span class="preprocessor">#ifndef __COHERENT__</span>
<a name="l01530"></a>01530 <span class="preprocessor"></span>    <span class="keywordflow">case</span> S_IFSOCK:
<a name="l01531"></a>01531         conf-&gt;resultBuf = MIME_INODE_SOCK;
<a name="l01532"></a>01532         <span class="keywordflow">return</span> 1;
<a name="l01533"></a>01533 <span class="preprocessor">#endif</span>
<a name="l01534"></a>01534 <span class="preprocessor"></span><span class="preprocessor">#endif</span>
<a name="l01535"></a>01535 <span class="preprocessor"></span>    <span class="keywordflow">case</span> S_IFREG:
<a name="l01536"></a>01536         <span class="keywordflow">break</span>;
<a name="l01537"></a>01537     <span class="keywordflow">default</span>:
<a name="l01538"></a>01538         kdError(7018) &lt;&lt; <span class="stringliteral">&quot;KMimeMagic::fsmagic: invalid mode 0&quot;</span> &lt;&lt; sb-&gt;st_mode &lt;&lt; <span class="stringliteral">&quot;.&quot;</span> &lt;&lt; endl;
<a name="l01539"></a>01539         <span class="comment">/* NOTREACHED */</span>
<a name="l01540"></a>01540     }
<a name="l01541"></a>01541 
<a name="l01542"></a>01542     <span class="comment">/*</span>
<a name="l01543"></a>01543 <span class="comment">     * regular file, check next possibility</span>
<a name="l01544"></a>01544 <span class="comment">     */</span>
<a name="l01545"></a>01545     <span class="keywordflow">if</span> (sb-&gt;st_size == 0) {
<a name="l01546"></a>01546         conf-&gt;resultBuf = MIME_BINARY_ZEROSIZE;
<a name="l01547"></a>01547         <span class="keywordflow">return</span> 1;
<a name="l01548"></a>01548     }
<a name="l01549"></a>01549     <span class="keywordflow">return</span> 0;
<a name="l01550"></a>01550 }
<a name="l01551"></a>01551 
<a name="l01552"></a>01552 <span class="comment">/*</span>
<a name="l01553"></a>01553 <span class="comment"> * Go through the whole list, stopping if you find a match.  Process all the</span>
<a name="l01554"></a>01554 <span class="comment"> * continuations of that match before returning.</span>
<a name="l01555"></a>01555 <span class="comment"> *</span>
<a name="l01556"></a>01556 <span class="comment"> * We support multi-level continuations:</span>
<a name="l01557"></a>01557 <span class="comment"> *</span>
<a name="l01558"></a>01558 <span class="comment"> * At any time when processing a successful top-level match, there is a current</span>
<a name="l01559"></a>01559 <span class="comment"> * continuation level; it represents the level of the last successfully</span>
<a name="l01560"></a>01560 <span class="comment"> * matched continuation.</span>
<a name="l01561"></a>01561 <span class="comment"> *</span>
<a name="l01562"></a>01562 <span class="comment"> * Continuations above that level are skipped as, if we see one, it means that</span>
<a name="l01563"></a>01563 <span class="comment"> * the continuation that controls them - i.e, the lower-level continuation</span>
<a name="l01564"></a>01564 <span class="comment"> * preceding them - failed to match.</span>
<a name="l01565"></a>01565 <span class="comment"> *</span>
<a name="l01566"></a>01566 <span class="comment"> * Continuations below that level are processed as, if we see one, it means</span>
<a name="l01567"></a>01567 <span class="comment"> * we&#39;ve finished processing or skipping higher-level continuations under the</span>
<a name="l01568"></a>01568 <span class="comment"> * control of a successful or unsuccessful lower-level continuation, and are</span>
<a name="l01569"></a>01569 <span class="comment"> * now seeing the next lower-level continuation and should process it.  The</span>
<a name="l01570"></a>01570 <span class="comment"> * current continuation level reverts to the level of the one we&#39;re seeing.</span>
<a name="l01571"></a>01571 <span class="comment"> *</span>
<a name="l01572"></a>01572 <span class="comment"> * Continuations at the current level are processed as, if we see one, there&#39;s</span>
<a name="l01573"></a>01573 <span class="comment"> * no lower-level continuation that may have failed.</span>
<a name="l01574"></a>01574 <span class="comment"> *</span>
<a name="l01575"></a>01575 <span class="comment"> * If a continuation matches, we bump the current continuation level so that</span>
<a name="l01576"></a>01576 <span class="comment"> * higher-level continuations are processed.</span>
<a name="l01577"></a>01577 <span class="comment"> */</span>
<a name="l01578"></a>01578 <span class="keyword">static</span> <span class="keywordtype">int</span>
<a name="l01579"></a>01579 match(<span class="keyword">struct</span> config_rec* conf, <span class="keywordtype">unsigned</span> <span class="keywordtype">char</span> *s, <span class="keywordtype">int</span> nbytes)
<a name="l01580"></a>01580 {
<a name="l01581"></a>01581     <span class="keywordtype">int</span> cont_level = 0;
<a name="l01582"></a>01582     <span class="keyword">union </span>VALUETYPE p;
<a name="l01583"></a>01583     <span class="keyword">struct </span>magic *m;
<a name="l01584"></a>01584 
<a name="l01585"></a>01585 <span class="preprocessor">#ifdef DEBUG_MIMEMAGIC</span>
<a name="l01586"></a>01586 <span class="preprocessor"></span>    kdDebug(7018) &lt;&lt; <span class="stringliteral">&quot;match: conf=&quot;</span> &lt;&lt; conf &lt;&lt; <span class="stringliteral">&quot; m=&quot;</span> &lt;&lt; (conf-&gt;magic ? <span class="stringliteral">&quot;set&quot;</span> : <span class="stringliteral">&quot;NULL&quot;</span>) &lt;&lt; <span class="stringliteral">&quot; m-&gt;next=&quot;</span> &lt;&lt; ((conf-&gt;magic &amp;&amp; conf-&gt;magic-&gt;next) ? <span class="stringliteral">&quot;set&quot;</span> : <span class="stringliteral">&quot;NULL&quot;</span>) &lt;&lt; <span class="stringliteral">&quot; last=&quot;</span> &lt;&lt; (conf-&gt;last ? <span class="stringliteral">&quot;set&quot;</span> : <span class="stringliteral">&quot;NULL&quot;</span>) &lt;&lt; endl;
<a name="l01587"></a>01587     <span class="keywordflow">for</span> (m = conf-&gt;magic; m; m = m-&gt;next) {
<a name="l01588"></a>01588         <span class="keywordflow">if</span> (isprint((((<span class="keywordtype">unsigned</span> <span class="keywordtype">long</span>) m) &gt;&gt; 24) &amp; 255) &amp;&amp;
<a name="l01589"></a>01589             isprint((((<span class="keywordtype">unsigned</span> <span class="keywordtype">long</span>) m) &gt;&gt; 16) &amp; 255) &amp;&amp;
<a name="l01590"></a>01590             isprint((((<span class="keywordtype">unsigned</span> <span class="keywordtype">long</span>) m) &gt;&gt; 8) &amp; 255) &amp;&amp;
<a name="l01591"></a>01591             isprint(((<span class="keywordtype">unsigned</span> <span class="keywordtype">long</span>) m) &amp; 255)) {
<a name="l01592"></a>01592             kdDebug(7018) &lt;&lt; <span class="stringliteral">&quot;match: POINTER CLOBBERED! &quot;</span> &lt;&lt; endl;
<a name="l01593"></a>01593             <span class="keywordflow">break</span>;
<a name="l01594"></a>01594         }
<a name="l01595"></a>01595     }
<a name="l01596"></a>01596 <span class="preprocessor">#endif</span>
<a name="l01597"></a>01597 <span class="preprocessor"></span>
<a name="l01598"></a>01598     <span class="keywordflow">for</span> (m = conf-&gt;magic; m; m = m-&gt;next) {
<a name="l01599"></a>01599 <span class="preprocessor">#ifdef DEBUG_MIMEMAGIC</span>
<a name="l01600"></a>01600 <span class="preprocessor"></span>        kdDebug(7018) &lt;&lt; <span class="stringliteral">&quot;match: line=&quot;</span> &lt;&lt; m-&gt;lineno &lt;&lt; <span class="stringliteral">&quot; desc=&quot;</span> &lt;&lt; m-&gt;desc &lt;&lt; endl;
<a name="l01601"></a>01601 <span class="preprocessor">#endif</span>
<a name="l01602"></a>01602 <span class="preprocessor"></span>        memset(&amp;p, 0, <span class="keyword">sizeof</span>(<span class="keyword">union</span> VALUETYPE));
<a name="l01603"></a>01603 
<a name="l01604"></a>01604         <span class="comment">/* check if main entry matches */</span>
<a name="l01605"></a>01605         <span class="keywordflow">if</span> (!mget(&amp;p, s, m, nbytes) ||
<a name="l01606"></a>01606             !mcheck(&amp;p, m)) {
<a name="l01607"></a>01607             <span class="keyword">struct </span>magic *m_cont;
<a name="l01608"></a>01608 
<a name="l01609"></a>01609             <span class="comment">/*</span>
<a name="l01610"></a>01610 <span class="comment">             * main entry didn&#39;t match, flush its continuations</span>
<a name="l01611"></a>01611 <span class="comment">             */</span>
<a name="l01612"></a>01612             <span class="keywordflow">if</span> (!m-&gt;next || (m-&gt;next-&gt;cont_level == 0)) {
<a name="l01613"></a>01613                 <span class="keywordflow">continue</span>;
<a name="l01614"></a>01614             }
<a name="l01615"></a>01615             m_cont = m-&gt;next;
<a name="l01616"></a>01616             <span class="keywordflow">while</span> (m_cont &amp;&amp; (m_cont-&gt;cont_level != 0)) {
<a name="l01617"></a>01617 <span class="preprocessor">#ifdef DEBUG_MIMEMAGIC</span>
<a name="l01618"></a>01618 <span class="preprocessor"></span>                kdDebug(7018) &lt;&lt; <span class="stringliteral">&quot;match: line=&quot;</span> &lt;&lt; m-&gt;lineno &lt;&lt; <span class="stringliteral">&quot; cont=&quot;</span> &lt;&lt; m_cont-&gt;cont_level &lt;&lt; <span class="stringliteral">&quot; mc=&quot;</span> &lt;&lt; m_cont-&gt;lineno &lt;&lt; <span class="stringliteral">&quot; mc-&gt;next=&quot;</span> &lt;&lt; m_cont &lt;&lt; <span class="stringliteral">&quot; &quot;</span> &lt;&lt; endl;
<a name="l01619"></a>01619 <span class="preprocessor">#endif</span>
<a name="l01620"></a>01620 <span class="preprocessor"></span>                <span class="comment">/*</span>
<a name="l01621"></a>01621 <span class="comment">                 * this trick allows us to keep *m in sync</span>
<a name="l01622"></a>01622 <span class="comment">                 * when the continue advances the pointer</span>
<a name="l01623"></a>01623 <span class="comment">                 */</span>
<a name="l01624"></a>01624                 m = m_cont;
<a name="l01625"></a>01625                 m_cont = m_cont-&gt;next;
<a name="l01626"></a>01626             }
<a name="l01627"></a>01627             <span class="keywordflow">continue</span>;
<a name="l01628"></a>01628         }
<a name="l01629"></a>01629         <span class="comment">/* if we get here, the main entry rule was a match */</span>
<a name="l01630"></a>01630         <span class="comment">/* this will be the last run through the loop */</span>
<a name="l01631"></a>01631 <span class="preprocessor">#ifdef DEBUG_MIMEMAGIC</span>
<a name="l01632"></a>01632 <span class="preprocessor"></span>        kdDebug(7018) &lt;&lt; <span class="stringliteral">&quot;match: rule matched, line=&quot;</span> &lt;&lt; m-&gt;lineno &lt;&lt; <span class="stringliteral">&quot; type=&quot;</span> &lt;&lt; m-&gt;type &lt;&lt; <span class="stringliteral">&quot; &quot;</span> &lt;&lt; ((m-&gt;type == STRING) ? m-&gt;value.s : <span class="stringliteral">&quot;&quot;</span>) &lt;&lt; endl;
<a name="l01633"></a>01633 <span class="preprocessor">#endif</span>
<a name="l01634"></a>01634 <span class="preprocessor"></span>
<a name="l01635"></a>01635         <span class="comment">/* remember the match */</span>
<a name="l01636"></a>01636         conf-&gt;resultBuf = m-&gt;desc;
<a name="l01637"></a>01637 
<a name="l01638"></a>01638         cont_level++;
<a name="l01639"></a>01639         <span class="comment">/*</span>
<a name="l01640"></a>01640 <span class="comment">         * while (m &amp;&amp; m-&gt;next &amp;&amp; m-&gt;next-&gt;cont_level != 0 &amp;&amp; ( m =</span>
<a name="l01641"></a>01641 <span class="comment">         * m-&gt;next ))</span>
<a name="l01642"></a>01642 <span class="comment">         */</span>
<a name="l01643"></a>01643         m = m-&gt;next;
<a name="l01644"></a>01644         <span class="keywordflow">while</span> (m &amp;&amp; (m-&gt;cont_level != 0)) {
<a name="l01645"></a>01645 <span class="preprocessor">#ifdef DEBUG_MIMEMAGIC</span>
<a name="l01646"></a>01646 <span class="preprocessor"></span>                    kdDebug(7018) &lt;&lt; <span class="stringliteral">&quot;match: line=&quot;</span> &lt;&lt; m-&gt;lineno &lt;&lt; <span class="stringliteral">&quot; cont=&quot;</span> &lt;&lt; m-&gt;cont_level &lt;&lt; <span class="stringliteral">&quot; type=&quot;</span> &lt;&lt; m-&gt;type &lt;&lt; <span class="stringliteral">&quot; &quot;</span> &lt;&lt; ((m-&gt;type == STRING) ? m-&gt;value.s : <span class="stringliteral">&quot;&quot;</span>) &lt;&lt; endl;
<a name="l01647"></a>01647 <span class="preprocessor">#endif</span>
<a name="l01648"></a>01648 <span class="preprocessor"></span>                    <span class="keywordflow">if</span> (cont_level &gt;= m-&gt;cont_level) {
<a name="l01649"></a>01649                 <span class="keywordflow">if</span> (cont_level &gt; m-&gt;cont_level) {
<a name="l01650"></a>01650                     <span class="comment">/*</span>
<a name="l01651"></a>01651 <span class="comment">                     * We&#39;re at the end of the level</span>
<a name="l01652"></a>01652 <span class="comment">                     * &quot;cont_level&quot; continuations.</span>
<a name="l01653"></a>01653 <span class="comment">                     */</span>
<a name="l01654"></a>01654                     cont_level = m-&gt;cont_level;
<a name="l01655"></a>01655                 }
<a name="l01656"></a>01656                 <span class="keywordflow">if</span> (mget(&amp;p, s, m, nbytes) &amp;&amp;
<a name="l01657"></a>01657                     mcheck(&amp;p, m)) {
<a name="l01658"></a>01658                     <span class="comment">/*</span>
<a name="l01659"></a>01659 <span class="comment">                     * This continuation matched. Print</span>
<a name="l01660"></a>01660 <span class="comment">                     * its message, with a blank before</span>
<a name="l01661"></a>01661 <span class="comment">                     * it if the previous item printed</span>
<a name="l01662"></a>01662 <span class="comment">                     * and this item isn&#39;t empty.</span>
<a name="l01663"></a>01663 <span class="comment">                     */</span>
<a name="l01664"></a>01664 <span class="preprocessor">#ifdef DEBUG_MIMEMAGIC</span>
<a name="l01665"></a>01665 <span class="preprocessor"></span>                                    kdDebug(7018) &lt;&lt; <span class="stringliteral">&quot;continuation matched&quot;</span> &lt;&lt; endl;
<a name="l01666"></a>01666 <span class="preprocessor">#endif</span>
<a name="l01667"></a>01667 <span class="preprocessor"></span>                                    conf-&gt;resultBuf = m-&gt;desc;
<a name="l01668"></a>01668                     cont_level++;
<a name="l01669"></a>01669                 }
<a name="l01670"></a>01670             }
<a name="l01671"></a>01671             <span class="comment">/* move to next continuation record */</span>
<a name="l01672"></a>01672             m = m-&gt;next;
<a name="l01673"></a>01673         }
<a name="l01674"></a>01674                 <span class="comment">// KDE-specific: need an actual mimetype for a real match</span>
<a name="l01675"></a>01675                 <span class="comment">// If we only matched a rule with continuations but no mimetype, it&#39;s not a match</span>
<a name="l01676"></a>01676                 <span class="keywordflow">if</span> ( !conf-&gt;resultBuf.isEmpty() )
<a name="l01677"></a>01677                 {
<a name="l01678"></a>01678 <span class="preprocessor">#ifdef DEBUG_MIMEMAGIC</span>
<a name="l01679"></a>01679 <span class="preprocessor"></span>                    kdDebug(7018) &lt;&lt; <span class="stringliteral">&quot;match: matched&quot;</span> &lt;&lt; endl;
<a name="l01680"></a>01680 <span class="preprocessor">#endif</span>
<a name="l01681"></a>01681 <span class="preprocessor"></span>                    <span class="keywordflow">return</span> 1;       <span class="comment">/* all through */</span>
<a name="l01682"></a>01682                 }
<a name="l01683"></a>01683     }
<a name="l01684"></a>01684 <span class="preprocessor">#ifdef DEBUG_MIMEMAGIC</span>
<a name="l01685"></a>01685 <span class="preprocessor"></span>    kdDebug(7018) &lt;&lt; <span class="stringliteral">&quot;match: failed&quot;</span> &lt;&lt; endl;
<a name="l01686"></a>01686 <span class="preprocessor">#endif</span>
<a name="l01687"></a>01687 <span class="preprocessor"></span>    <span class="keywordflow">return</span> 0;               <span class="comment">/* no match at all */</span>
<a name="l01688"></a>01688 }
<a name="l01689"></a>01689 
<a name="l01690"></a>01690 <span class="comment">// Try to parse prefixed tags before matching on content</span>
<a name="l01691"></a>01691 <span class="comment">// Sofar only ID3v2 tags (&lt;=.4) are handled</span>
<a name="l01692"></a>01692 <span class="keyword">static</span> <span class="keywordtype">int</span> tagmagic(<span class="keywordtype">unsigned</span> <span class="keywordtype">char</span> *buf, <span class="keywordtype">int</span> nbytes)
<a name="l01693"></a>01693 {
<a name="l01694"></a>01694     <span class="keywordflow">if</span>(nbytes&lt;40) <span class="keywordflow">return</span> 0;
<a name="l01695"></a>01695     <span class="keywordflow">if</span>(buf[0] == <span class="charliteral">&#39;I&#39;</span> &amp;&amp; buf[1] == <span class="charliteral">&#39;D&#39;</span> &amp;&amp; buf[2] == <span class="charliteral">&#39;3&#39;</span>) {
<a name="l01696"></a>01696         <span class="keywordtype">int</span> size = 10;
<a name="l01697"></a>01697         <span class="comment">// Sanity (known version, no unknown flags)</span>
<a name="l01698"></a>01698         <span class="keywordflow">if</span>(buf[3] &gt; 4) <span class="keywordflow">return</span> 0;
<a name="l01699"></a>01699         <span class="keywordflow">if</span>(buf[5] &amp; 0x0F) <span class="keywordflow">return</span> 0;
<a name="l01700"></a>01700         <span class="comment">// Tag has v4 footer</span>
<a name="l01701"></a>01701         <span class="keywordflow">if</span>(buf[5] &amp; 0x10) size += 10;
<a name="l01702"></a>01702         <span class="comment">// Calculated syncsafe size</span>
<a name="l01703"></a>01703         size += buf[9];
<a name="l01704"></a>01704         size += buf[8] &lt;&lt; 7;
<a name="l01705"></a>01705         size += buf[7] &lt;&lt; 14;
<a name="l01706"></a>01706         size += buf[6] &lt;&lt; 21;
<a name="l01707"></a>01707         <span class="keywordflow">return</span> size;
<a name="l01708"></a>01708     }
<a name="l01709"></a>01709     <span class="keywordflow">return</span> 0;
<a name="l01710"></a>01710 }
<a name="l01711"></a>01711 
<a name="l01712"></a>01712 <span class="keyword">struct </span>Token {
<a name="l01713"></a>01713     <span class="keywordtype">char</span> *data;
<a name="l01714"></a>01714     <span class="keywordtype">int</span> length;
<a name="l01715"></a>01715 };
<a name="l01716"></a>01716 
<a name="l01717"></a>01717 <span class="keyword">struct </span>Tokenizer
<a name="l01718"></a>01718 {
<a name="l01719"></a>01719     Tokenizer(<span class="keywordtype">char</span>* buf, <span class="keywordtype">int</span> nbytes) {
<a name="l01720"></a>01720         data = buf;
<a name="l01721"></a>01721         length = nbytes;
<a name="l01722"></a>01722         pos = 0;
<a name="l01723"></a>01723     }
<a name="l01724"></a>01724     <span class="keywordtype">bool</span> isNewLine() {
<a name="l01725"></a>01725         <span class="keywordflow">return</span> newline;
<a name="l01726"></a>01726     }
<a name="l01727"></a>01727     Token* nextToken() {
<a name="l01728"></a>01728         <span class="keywordflow">if</span> (pos == 0)
<a name="l01729"></a>01729             newline = <span class="keyword">true</span>;
<a name="l01730"></a>01730         <span class="keywordflow">else</span>
<a name="l01731"></a>01731             newline = <span class="keyword">false</span>;
<a name="l01732"></a>01732         token.data = data+pos;
<a name="l01733"></a>01733         token.length = 0;
<a name="l01734"></a>01734         <span class="keywordflow">while</span>(pos&lt;length) {
<a name="l01735"></a>01735             <span class="keywordflow">switch</span> (data[pos]) {
<a name="l01736"></a>01736                 <span class="keywordflow">case</span> <span class="charliteral">&#39;\n&#39;</span>:
<a name="l01737"></a>01737                     newline = <span class="keyword">true</span>;
<a name="l01738"></a>01738                 <span class="keywordflow">case</span> <span class="charliteral">&#39;\0&#39;</span>:
<a name="l01739"></a>01739                 <span class="keywordflow">case</span> <span class="charliteral">&#39;\t&#39;</span>:
<a name="l01740"></a>01740                 <span class="keywordflow">case</span> <span class="charliteral">&#39; &#39;</span>:
<a name="l01741"></a>01741                 <span class="keywordflow">case</span> <span class="charliteral">&#39;\r&#39;</span>:
<a name="l01742"></a>01742                 <span class="keywordflow">case</span> <span class="charliteral">&#39;\f&#39;</span>:
<a name="l01743"></a>01743                 <span class="keywordflow">case</span> <span class="charliteral">&#39;,&#39;</span>:
<a name="l01744"></a>01744                 <span class="keywordflow">case</span> <span class="charliteral">&#39;;&#39;</span>:
<a name="l01745"></a>01745                 <span class="keywordflow">case</span> <span class="charliteral">&#39;&gt;&#39;</span>:
<a name="l01746"></a>01746                     <span class="keywordflow">if</span> (token.length == 0) token.data++;
<a name="l01747"></a>01747                     <span class="keywordflow">else</span>
<a name="l01748"></a>01748                         <span class="keywordflow">return</span> &amp;token;
<a name="l01749"></a>01749                     <span class="keywordflow">break</span>;
<a name="l01750"></a>01750                 <span class="keywordflow">default</span>:
<a name="l01751"></a>01751                     token.length++;
<a name="l01752"></a>01752             }
<a name="l01753"></a>01753             pos++;
<a name="l01754"></a>01754         }
<a name="l01755"></a>01755         <span class="keywordflow">return</span> &amp;token;
<a name="l01756"></a>01756     }
<a name="l01757"></a>01757 
<a name="l01758"></a>01758 <span class="keyword">private</span>:
<a name="l01759"></a>01759     Token token;
<a name="l01760"></a>01760     <span class="keywordtype">char</span>* data;
<a name="l01761"></a>01761     <span class="keywordtype">int</span> length;
<a name="l01762"></a>01762     <span class="keywordtype">int</span> pos;
<a name="l01763"></a>01763     <span class="keywordtype">bool</span> newline;
<a name="l01764"></a>01764 };
<a name="l01765"></a>01765 
<a name="l01766"></a>01766 
<a name="l01767"></a>01767 <span class="comment">/* an optimization over plain strcmp() */</span>
<a name="l01768"></a>01768 <span class="comment">//#define    STREQ(a, b)    (*(a) == *(b) &amp;&amp; strcmp((a), (b)) == 0)</span>
<a name="l01769"></a>01769 <span class="keyword">static</span> <span class="keyword">inline</span> <span class="keywordtype">bool</span> STREQ(<span class="keyword">const</span> Token *token, <span class="keyword">const</span> <span class="keywordtype">char</span> *b) {
<a name="l01770"></a>01770     <span class="keyword">const</span> <span class="keywordtype">char</span> *a = token-&gt;data;
<a name="l01771"></a>01771     <span class="keywordtype">int</span> len = token-&gt;length;
<a name="l01772"></a>01772     <span class="keywordflow">if</span> (a == b) <span class="keywordflow">return</span> <span class="keyword">true</span>;
<a name="l01773"></a>01773     <span class="keywordflow">while</span>(*a &amp;&amp; *b &amp;&amp; len &gt; 0) {
<a name="l01774"></a>01774         <span class="keywordflow">if</span> (*a != *b) <span class="keywordflow">return</span> <span class="keyword">false</span>;
<a name="l01775"></a>01775         a++; b++; len--;
<a name="l01776"></a>01776     }
<a name="l01777"></a>01777     <span class="keywordflow">return</span> (len == 0 &amp;&amp; *b == 0);
<a name="l01778"></a>01778 }
<a name="l01779"></a>01779 
<a name="l01780"></a>01780 <span class="keyword">static</span> <span class="keywordtype">int</span> ascmagic(<span class="keyword">struct</span> config_rec* conf, <span class="keywordtype">unsigned</span> <span class="keywordtype">char</span> *buf, <span class="keywordtype">int</span> nbytes)
<a name="l01781"></a>01781 {
<a name="l01782"></a>01782     <span class="keywordtype">int</span> i;
<a name="l01783"></a>01783     <span class="keywordtype">double</span> pct, maxpct, pctsum;
<a name="l01784"></a>01784     <span class="keywordtype">double</span> pcts[NTYPES];
<a name="l01785"></a>01785     <span class="keywordtype">int</span> mostaccurate, tokencount;
<a name="l01786"></a>01786     <span class="keywordtype">int</span> typeset, jonly, conly, jconly, objconly, cpponly;
<a name="l01787"></a>01787     <span class="keywordtype">int</span> has_escapes = 0;
<a name="l01788"></a>01788     <span class="comment">//unsigned char *s;</span>
<a name="l01789"></a>01789     <span class="comment">//char nbuf[HOWMANY + 1]; /* one extra for terminating &#39;\0&#39; */</span>
<a name="l01790"></a>01790 
<a name="l01791"></a>01791     <span class="comment">/* these are easy, do them first */</span>
<a name="l01792"></a>01792     conf-&gt;accuracy = 70;
<a name="l01793"></a>01793 
<a name="l01794"></a>01794     <span class="comment">/*</span>
<a name="l01795"></a>01795 <span class="comment">     * for troff, look for . + letter + letter or .\&quot;; this must be done</span>
<a name="l01796"></a>01796 <span class="comment">     * to disambiguate tar archives&#39; ./file and other trash from real</span>
<a name="l01797"></a>01797 <span class="comment">     * troff input.</span>
<a name="l01798"></a>01798 <span class="comment">     */</span>
<a name="l01799"></a>01799     <span class="keywordflow">if</span> (*buf == <span class="charliteral">&#39;.&#39;</span>) {
<a name="l01800"></a>01800         <span class="keywordtype">unsigned</span> <span class="keywordtype">char</span> *tp = buf + 1;
<a name="l01801"></a>01801 
<a name="l01802"></a>01802         <span class="keywordflow">while</span> (isascii(*tp) &amp;&amp; isspace(*tp))
<a name="l01803"></a>01803             ++tp;   <span class="comment">/* skip leading whitespace */</span>
<a name="l01804"></a>01804         <span class="keywordflow">if</span> ((isascii(*tp) &amp;&amp; (isalnum(*tp) || *tp == <span class="charliteral">&#39;\\&#39;</span>) &amp;&amp;
<a name="l01805"></a>01805              isascii(*(tp + 1)) &amp;&amp; (isalnum(*(tp + 1)) || *tp == <span class="charliteral">&#39;&quot;&#39;</span>))) {
<a name="l01806"></a>01806             conf-&gt;resultBuf = MIME_APPL_TROFF;
<a name="l01807"></a>01807             <span class="keywordflow">return</span> 1;
<a name="l01808"></a>01808         }
<a name="l01809"></a>01809     }
<a name="l01810"></a>01810     <span class="keywordflow">if</span> ((*buf == <span class="charliteral">&#39;c&#39;</span> || *buf == <span class="charliteral">&#39;C&#39;</span>) &amp;&amp;
<a name="l01811"></a>01811         isascii(*(buf + 1)) &amp;&amp; isspace(*(buf + 1))) {
<a name="l01812"></a>01812         <span class="comment">/* Fortran */</span>
<a name="l01813"></a>01813         conf-&gt;resultBuf = MIME_TEXT_FORTRAN;
<a name="l01814"></a>01814         <span class="keywordflow">return</span> 1;
<a name="l01815"></a>01815     }
<a name="l01816"></a>01816     assert(nbytes-1 &lt; HOWMANY + 1);
<a name="l01817"></a>01817     <span class="comment">/* look for tokens - this is expensive! */</span>
<a name="l01818"></a>01818     has_escapes = (memchr(buf, <span class="charliteral">&#39;\033&#39;</span>, nbytes) != NULL);
<a name="l01819"></a>01819         Tokenizer tokenizer((<span class="keywordtype">char</span>*)buf, nbytes);
<a name="l01820"></a>01820         <span class="keyword">const</span> Token* token;
<a name="l01821"></a>01821         <span class="keywordtype">bool</span> linecomment = <span class="keyword">false</span>, blockcomment = <span class="keyword">false</span>;
<a name="l01822"></a>01822     <span class="keyword">const</span> <span class="keyword">struct </span>names *p;
<a name="l01823"></a>01823     <span class="keywordtype">int</span> typecount[NTYPES];
<a name="l01824"></a>01824 <span class="comment">/*</span>
<a name="l01825"></a>01825 <span class="comment"> * Fritz:</span>
<a name="l01826"></a>01826 <span class="comment"> * Try a little harder on C/C++/Java.</span>
<a name="l01827"></a>01827 <span class="comment"> */</span>
<a name="l01828"></a>01828     memset(&amp;typecount, 0, <span class="keyword">sizeof</span>(typecount));
<a name="l01829"></a>01829     typeset = 0;
<a name="l01830"></a>01830     jonly = 0;
<a name="l01831"></a>01831     conly = 0;
<a name="l01832"></a>01832     jconly = 0;
<a name="l01833"></a>01833     objconly = 0;
<a name="l01834"></a>01834     cpponly = 0;
<a name="l01835"></a>01835     tokencount = 0;
<a name="l01836"></a>01836         <span class="keywordtype">bool</span> foundClass = <span class="keyword">false</span>; <span class="comment">// mandatory for java</span>
<a name="l01837"></a>01837     <span class="comment">// first collect all possible types and count matches</span>
<a name="l01838"></a>01838         <span class="comment">// we stop at &#39;&gt;&#39; too, because of &quot;&lt;title&gt;blah&lt;/title&gt;&quot; on HTML pages</span>
<a name="l01839"></a>01839     <span class="keywordflow">while</span> ((token = tokenizer.nextToken())-&gt;length &gt; 0) {
<a name="l01840"></a>01840 <span class="preprocessor">#ifdef DEBUG_MIMEMAGIC</span>
<a name="l01841"></a>01841 <span class="preprocessor"></span>            kdDebug(7018) &lt;&lt; <span class="stringliteral">&quot;KMimeMagic::ascmagic token=&quot;</span> &lt;&lt; token &lt;&lt; endl;
<a name="l01842"></a>01842 <span class="preprocessor">#endif</span>
<a name="l01843"></a>01843 <span class="preprocessor"></span>            <span class="keywordflow">if</span> (linecomment &amp;&amp; tokenizer.isNewLine())
<a name="l01844"></a>01844                 linecomment = <span class="keyword">false</span>;
<a name="l01845"></a>01845             <span class="keywordflow">if</span> (blockcomment &amp;&amp; STREQ(token, <span class="stringliteral">&quot;*/&quot;</span>)) {
<a name="l01846"></a>01846                 blockcomment = <span class="keyword">false</span>;
<a name="l01847"></a>01847                 <span class="keywordflow">continue</span>;
<a name="l01848"></a>01848             }
<a name="l01849"></a>01849             <span class="keywordflow">for</span> (p = names; p-&gt;name ; p++) {
<a name="l01850"></a>01850                 <span class="keywordflow">if</span> (STREQ(token, p-&gt;name)) {
<a name="l01851"></a>01851 <span class="preprocessor">#ifdef DEBUG_MIMEMAGIC</span>
<a name="l01852"></a>01852 <span class="preprocessor"></span>                    kdDebug(7018) &lt;&lt; <span class="stringliteral">&quot;KMimeMagic::ascmagic token matches ! name=&quot;</span> &lt;&lt; p-&gt;name &lt;&lt; <span class="stringliteral">&quot; type=&quot;</span> &lt;&lt; p-&gt;type &lt;&lt; endl;
<a name="l01853"></a>01853 <span class="preprocessor">#endif</span>
<a name="l01854"></a>01854 <span class="preprocessor"></span>                    tokencount++;
<a name="l01855"></a>01855                     typeset |= p-&gt;type;
<a name="l01856"></a>01856                     <span class="keywordflow">if</span>(p-&gt;type &amp; (L_C|L_CPP|L_JAVA|L_OBJC)) {
<a name="l01857"></a>01857                         <span class="keywordflow">if</span> (linecomment || blockcomment) {
<a name="l01858"></a>01858                             <span class="keywordflow">continue</span>;
<a name="l01859"></a>01859                         }
<a name="l01860"></a>01860                         <span class="keywordflow">else</span> {
<a name="l01861"></a>01861                             <span class="keywordflow">switch</span>(p-&gt;type &amp; (L_C|L_CPP|L_JAVA|L_OBJC))
<a name="l01862"></a>01862                             {
<a name="l01863"></a>01863                 <span class="keywordflow">case</span> L_JAVA:
<a name="l01864"></a>01864                     jonly++;
<a name="l01865"></a>01865                     <span class="keywordflow">break</span>;
<a name="l01866"></a>01866                 <span class="keywordflow">case</span> L_OBJC:
<a name="l01867"></a>01867                     objconly++;
<a name="l01868"></a>01868                     <span class="keywordflow">break</span>;
<a name="l01869"></a>01869                 <span class="keywordflow">case</span> L_CPP:
<a name="l01870"></a>01870                     cpponly++;
<a name="l01871"></a>01871                     <span class="keywordflow">break</span>;
<a name="l01872"></a>01872                 <span class="keywordflow">case</span> (L_CPP|L_JAVA):
<a name="l01873"></a>01873                     jconly++;
<a name="l01874"></a>01874                                         <span class="keywordflow">if</span> ( !foundClass &amp;&amp; STREQ(token, <span class="stringliteral">&quot;class&quot;</span>) )
<a name="l01875"></a>01875                                             foundClass = <span class="keyword">true</span>;
<a name="l01876"></a>01876                     <span class="keywordflow">break</span>;
<a name="l01877"></a>01877                 <span class="keywordflow">case</span> (L_C|L_CPP):
<a name="l01878"></a>01878                     conly++;
<a name="l01879"></a>01879                     <span class="keywordflow">break</span>;
<a name="l01880"></a>01880                 <span class="keywordflow">default</span>:
<a name="l01881"></a>01881                                     <span class="keywordflow">if</span> (STREQ(token, <span class="stringliteral">&quot;//&quot;</span>)) linecomment = <span class="keyword">true</span>;
<a name="l01882"></a>01882                                     <span class="keywordflow">if</span> (STREQ(token, <span class="stringliteral">&quot;/*&quot;</span>)) blockcomment = <span class="keyword">true</span>;
<a name="l01883"></a>01883                             }
<a name="l01884"></a>01884             }
<a name="l01885"></a>01885                     }
<a name="l01886"></a>01886                     <span class="keywordflow">for</span> (i = 0; i &lt; (int)NTYPES; i++) {
<a name="l01887"></a>01887                         <span class="keywordflow">if</span> ((1 &lt;&lt; i) &amp; p-&gt;type) typecount[i]+= p-&gt;type &amp; FLAG_STRONG ? 2 : 1;
<a name="l01888"></a>01888                     }
<a name="l01889"></a>01889         }
<a name="l01890"></a>01890             }
<a name="l01891"></a>01891     }
<a name="l01892"></a>01892 
<a name="l01893"></a>01893     <span class="keywordflow">if</span> (typeset &amp; (L_C|L_CPP|L_JAVA|L_OBJC)) {
<a name="l01894"></a>01894         conf-&gt;accuracy = 60;
<a name="l01895"></a>01895             <span class="keywordflow">if</span> (!(typeset &amp; ~(L_C|L_CPP|L_JAVA|L_OBJC))) {
<a name="l01896"></a>01896 <span class="preprocessor">#ifdef DEBUG_MIMEMAGIC</span>
<a name="l01897"></a>01897 <span class="preprocessor"></span>                        kdDebug(7018) &lt;&lt; <span class="stringliteral">&quot;C/C++/Java/ObjC: jonly=&quot;</span> &lt;&lt; jonly &lt;&lt; <span class="stringliteral">&quot; conly=&quot;</span> &lt;&lt; conly &lt;&lt; <span class="stringliteral">&quot; jconly=&quot;</span> &lt;&lt; jconly &lt;&lt; <span class="stringliteral">&quot; objconly=&quot;</span> &lt;&lt; objconly &lt;&lt; endl;
<a name="l01898"></a>01898 <span class="preprocessor">#endif</span>
<a name="l01899"></a>01899 <span class="preprocessor"></span>            <span class="keywordflow">if</span> (jonly &gt; 1 &amp;&amp; foundClass) {
<a name="l01900"></a>01900                 <span class="comment">// At least two java-only tokens have matched, including &quot;class&quot;</span>
<a name="l01901"></a>01901                 conf-&gt;resultBuf = <a class="codeRef" href="qstring.html">QString</a>(types[P_JAVA].type);
<a name="l01902"></a>01902                 <span class="keywordflow">return</span> 1;
<a name="l01903"></a>01903             }
<a name="l01904"></a>01904             <span class="keywordflow">if</span> (jconly &gt; 1) {
<a name="l01905"></a>01905                 <span class="comment">// At least two non-C (only C++ or Java) token have matched.</span>
<a name="l01906"></a>01906                 <span class="keywordflow">if</span> (typecount[P_JAVA] &lt; typecount[P_CPP])
<a name="l01907"></a>01907                   conf-&gt;resultBuf = <a class="codeRef" href="qstring.html">QString</a>(types[P_CPP].type);
<a name="l01908"></a>01908                 <span class="keywordflow">else</span>
<a name="l01909"></a>01909                   conf-&gt;resultBuf = <a class="codeRef" href="qstring.html">QString</a>(types[P_JAVA].type);
<a name="l01910"></a>01910                 <span class="keywordflow">return</span> 1;
<a name="l01911"></a>01911             }
<a name="l01912"></a>01912                         <span class="keywordflow">if</span> (conly + cpponly &gt; 1) {
<a name="l01913"></a>01913                  <span class="comment">// Either C or C++.</span>
<a name="l01914"></a>01914                       <span class="keywordflow">if</span> (cpponly &gt; 0)
<a name="l01915"></a>01915                                 conf-&gt;resultBuf = <a class="codeRef" href="qstring.html">QString</a>(types[P_CPP].type);
<a name="l01916"></a>01916                               <span class="keywordflow">else</span>
<a name="l01917"></a>01917                                 conf-&gt;resultBuf = <a class="codeRef" href="qstring.html">QString</a>(types[P_C].type);
<a name="l01918"></a>01918                               <span class="keywordflow">return</span> 1;
<a name="l01919"></a>01919                         }
<a name="l01920"></a>01920             <span class="keywordflow">if</span> (objconly &gt; 0) {
<a name="l01921"></a>01921                 conf-&gt;resultBuf =  <a class="codeRef" href="qstring.html">QString</a>(types[P_OBJC].type);
<a name="l01922"></a>01922                 <span class="keywordflow">return</span> 1;
<a name="l01923"></a>01923             }
<a name="l01924"></a>01924           }
<a name="l01925"></a>01925     }
<a name="l01926"></a>01926 
<a name="l01927"></a>01927     <span class="comment">/* Neither C, C++ or Java (or all of them without able to distinguish):</span>
<a name="l01928"></a>01928 <span class="comment">     * Simply take the token-class with the highest</span>
<a name="l01929"></a>01929 <span class="comment">     * matchcount &gt; 0</span>
<a name="l01930"></a>01930 <span class="comment">     */</span>
<a name="l01931"></a>01931     mostaccurate = -1;
<a name="l01932"></a>01932     maxpct = pctsum = 0.0;
<a name="l01933"></a>01933     <span class="keywordflow">for</span> (i = 0; i &lt; (int)NTYPES; i++) {
<a name="l01934"></a>01934       <span class="keywordflow">if</span> (typecount[i] &gt; 1) { <span class="comment">// one word is not enough, we need at least two</span>
<a name="l01935"></a>01935         pct = (double)typecount[i] / (<span class="keywordtype">double</span>)types[i].kwords *
<a name="l01936"></a>01936             (double)types[i].weight;
<a name="l01937"></a>01937         pcts[i] = pct;
<a name="l01938"></a>01938         pctsum += pct;
<a name="l01939"></a>01939         <span class="keywordflow">if</span> (pct &gt; maxpct) {
<a name="l01940"></a>01940             maxpct = pct;
<a name="l01941"></a>01941             mostaccurate = i;
<a name="l01942"></a>01942           }
<a name="l01943"></a>01943 <span class="preprocessor">#ifdef DEBUG_MIMEMAGIC</span>
<a name="l01944"></a>01944 <span class="preprocessor"></span>          kdDebug(7018) &lt;&lt; <span class="stringliteral">&quot;&quot;</span> &lt;&lt; types[i].type &lt;&lt; <span class="stringliteral">&quot; has &quot;</span> &lt;&lt; typecount[i] &lt;&lt; <span class="stringliteral">&quot; hits, &quot;</span> &lt;&lt; types[i].kwords &lt;&lt; <span class="stringliteral">&quot; kw, weight &quot;</span> &lt;&lt; types[i].weight &lt;&lt; <span class="stringliteral">&quot;, &quot;</span> &lt;&lt; pct &lt;&lt; <span class="stringliteral">&quot; -&gt; max = &quot;</span> &lt;&lt; maxpct &lt;&lt; <span class="stringliteral">&quot;\n&quot;</span> &lt;&lt; endl;
<a name="l01945"></a>01945 <span class="preprocessor">#endif</span>
<a name="l01946"></a>01946 <span class="preprocessor"></span>      }
<a name="l01947"></a>01947     }
<a name="l01948"></a>01948     <span class="keywordflow">if</span> (mostaccurate &gt;= 0) {
<a name="l01949"></a>01949             <span class="keywordflow">if</span> ( mostaccurate != P_JAVA || foundClass ) <span class="comment">// &#39;class&#39; mandatory for java</span>
<a name="l01950"></a>01950             {
<a name="l01951"></a>01951         conf-&gt;accuracy = (int)(pcts[mostaccurate] / pctsum * 60);
<a name="l01952"></a>01952 <span class="preprocessor">#ifdef DEBUG_MIMEMAGIC</span>
<a name="l01953"></a>01953 <span class="preprocessor"></span>                kdDebug(7018) &lt;&lt; <span class="stringliteral">&quot;mostaccurate=&quot;</span> &lt;&lt; mostaccurate &lt;&lt; <span class="stringliteral">&quot; pcts=&quot;</span> &lt;&lt; pcts[mostaccurate] &lt;&lt; <span class="stringliteral">&quot; pctsum=&quot;</span> &lt;&lt; pctsum &lt;&lt; <span class="stringliteral">&quot; accuracy=&quot;</span> &lt;&lt; conf-&gt;accuracy &lt;&lt; endl;
<a name="l01954"></a>01954 <span class="preprocessor">#endif</span>
<a name="l01955"></a>01955 <span class="preprocessor"></span>        conf-&gt;resultBuf = <a class="codeRef" href="qstring.html">QString</a>(types[mostaccurate].type);
<a name="l01956"></a>01956         <span class="keywordflow">return</span> 1;
<a name="l01957"></a>01957             }
<a name="l01958"></a>01958     }
<a name="l01959"></a>01959 
<a name="l01960"></a>01960     <span class="keywordflow">switch</span> (is_tar(buf, nbytes)) {
<a name="l01961"></a>01961         <span class="keywordflow">case</span> 1:
<a name="l01962"></a>01962             <span class="comment">/* V7 tar archive */</span>
<a name="l01963"></a>01963             conf-&gt;resultBuf = MIME_APPL_TAR;
<a name="l01964"></a>01964             conf-&gt;accuracy = 90;
<a name="l01965"></a>01965             <span class="keywordflow">return</span> 1;
<a name="l01966"></a>01966         <span class="keywordflow">case</span> 2:
<a name="l01967"></a>01967             <span class="comment">/* POSIX tar archive */</span>
<a name="l01968"></a>01968             conf-&gt;resultBuf = MIME_APPL_TAR;
<a name="l01969"></a>01969             conf-&gt;accuracy = 90;
<a name="l01970"></a>01970             <span class="keywordflow">return</span> 1;
<a name="l01971"></a>01971     }
<a name="l01972"></a>01972 
<a name="l01973"></a>01973     <span class="keywordflow">for</span> (i = 0; i &lt; nbytes; i++) {
<a name="l01974"></a>01974         <span class="keywordflow">if</span> (!isascii(*(buf + i)))
<a name="l01975"></a>01975             <span class="keywordflow">return</span> 0;   <span class="comment">/* not all ascii */</span>
<a name="l01976"></a>01976     }
<a name="l01977"></a>01977 
<a name="l01978"></a>01978     <span class="comment">/* all else fails, but it is ascii... */</span>
<a name="l01979"></a>01979     conf-&gt;accuracy = 90;
<a name="l01980"></a>01980     <span class="keywordflow">if</span> (has_escapes) {
<a name="l01981"></a>01981         <span class="comment">/* text with escape sequences */</span>
<a name="l01982"></a>01982         <span class="comment">/* we leave this open for further differentiation later */</span>
<a name="l01983"></a>01983         conf-&gt;resultBuf = MIME_TEXT_UNKNOWN;
<a name="l01984"></a>01984     } <span class="keywordflow">else</span> {
<a name="l01985"></a>01985         <span class="comment">/* plain text */</span>
<a name="l01986"></a>01986         conf-&gt;resultBuf = MIME_TEXT_PLAIN;
<a name="l01987"></a>01987     }
<a name="l01988"></a>01988     <span class="keywordflow">return</span> 1;
<a name="l01989"></a>01989 }
<a name="l01990"></a>01990 
<a name="l01991"></a>01991 <span class="comment">/* Maximal length of a line we consider &quot;reasonable&quot;. */</span>
<a name="l01992"></a>01992 <span class="preprocessor">#define TEXT_MAXLINELEN 300</span>
<a name="l01993"></a>01993 <span class="preprocessor"></span>
<a name="l01994"></a>01994 <span class="comment">// This code is taken from the &quot;file&quot; command, where it is licensed</span>
<a name="l01995"></a>01995 <span class="comment">// in the &quot;beer-ware license&quot; :-)</span>
<a name="l01996"></a>01996 <span class="comment">// Original author: &lt;joerg@FreeBSD.ORG&gt;</span>
<a name="l01997"></a>01997 <span class="comment">// Simplified by David Faure to avoid the static array char[256].</span>
<a name="l01998"></a>01998 <span class="keyword">static</span> <span class="keywordtype">int</span> textmagic(<span class="keyword">struct</span> config_rec* conf, <span class="keywordtype">unsigned</span> <span class="keywordtype">char</span> * buf, <span class="keywordtype">int</span> nbytes)
<a name="l01999"></a>01999 {
<a name="l02000"></a>02000     <span class="keywordtype">int</span> i;
<a name="l02001"></a>02001     <span class="keywordtype">unsigned</span> <span class="keywordtype">char</span> *cp;
<a name="l02002"></a>02002 
<a name="l02003"></a>02003     nbytes--;
<a name="l02004"></a>02004 
<a name="l02005"></a>02005     <span class="comment">/* First, look whether there are &quot;unreasonable&quot; characters. */</span>
<a name="l02006"></a>02006     <span class="keywordflow">for</span> (i = 0, cp = buf; i &lt; nbytes; i++, cp++)
<a name="l02007"></a>02007         <span class="keywordflow">if</span> ((*cp &lt; 8) || (*cp&gt;13 &amp;&amp; *cp&lt;32 &amp;&amp; *cp!=27 ) || (*cp==0x7F))
<a name="l02008"></a>02008             <span class="keywordflow">return</span> 0;
<a name="l02009"></a>02009 
<a name="l02010"></a>02010     <span class="comment">/* Now, look whether the file consists of lines of</span>
<a name="l02011"></a>02011 <span class="comment">     * &quot;reasonable&quot; length. */</span>
<a name="l02012"></a>02012 
<a name="l02013"></a>02013     <span class="keywordflow">for</span> (i = 0; i &lt; nbytes;) {
<a name="l02014"></a>02014         cp = (<span class="keywordtype">unsigned</span> <span class="keywordtype">char</span> *) memchr(buf, <span class="charliteral">&#39;\n&#39;</span>, nbytes - i);
<a name="l02015"></a>02015         <span class="keywordflow">if</span> (cp == NULL) {
<a name="l02016"></a>02016             <span class="comment">/* Don&#39;t fail if we hit the end of buffer. */</span>
<a name="l02017"></a>02017             <span class="keywordflow">if</span> (i + TEXT_MAXLINELEN &gt;= nbytes)
<a name="l02018"></a>02018                 <span class="keywordflow">break</span>;
<a name="l02019"></a>02019             <span class="keywordflow">else</span>
<a name="l02020"></a>02020                 <span class="keywordflow">return</span> 0;
<a name="l02021"></a>02021         }
<a name="l02022"></a>02022         <span class="keywordflow">if</span> (cp - buf &gt; TEXT_MAXLINELEN)
<a name="l02023"></a>02023             <span class="keywordflow">return</span> 0;
<a name="l02024"></a>02024         i += (cp - buf + 1);
<a name="l02025"></a>02025         buf = cp + 1;
<a name="l02026"></a>02026     }
<a name="l02027"></a>02027     conf-&gt;resultBuf = MIME_TEXT_PLAIN;
<a name="l02028"></a>02028     <span class="keywordflow">return</span> 1;
<a name="l02029"></a>02029 }
<a name="l02030"></a>02030 
<a name="l02031"></a>02031 
<a name="l02032"></a>02032 <span class="comment">/*</span>
<a name="l02033"></a>02033 <span class="comment"> * is_tar() -- figure out whether file is a tar archive.</span>
<a name="l02034"></a>02034 <span class="comment"> *</span>
<a name="l02035"></a>02035 <span class="comment"> * Stolen (by author of file utility) from the public domain tar program: Public</span>
<a name="l02036"></a>02036 <span class="comment"> * Domain version written 26 Aug 1985 John Gilmore (ihnp4!hoptoad!gnu).</span>
<a name="l02037"></a>02037 <span class="comment"> *</span>
<a name="l02038"></a>02038 <span class="comment"> * @(#)list.c 1.18 9/23/86 Public Domain - gnu $Id: mod_mime_magic.c,v 1.7</span>
<a name="l02039"></a>02039 <span class="comment"> * 1997/06/24 00:41:02 ikluft Exp ikluft $</span>
<a name="l02040"></a>02040 <span class="comment"> *</span>
<a name="l02041"></a>02041 <span class="comment"> * Comments changed and some code/comments reformatted for file command by Ian</span>
<a name="l02042"></a>02042 <span class="comment"> * Darwin.</span>
<a name="l02043"></a>02043 <span class="comment"> */</span>
<a name="l02044"></a>02044 
<a name="l02045"></a>02045 <span class="preprocessor">#define    isodigit(c)    ( ((c) &gt;= &#39;0&#39;) &amp;&amp; ((c) &lt;= &#39;7&#39;) )</span>
<a name="l02046"></a>02046 <span class="preprocessor"></span>
<a name="l02047"></a>02047 <span class="comment">/*</span>
<a name="l02048"></a>02048 <span class="comment"> * Return 0 if the checksum is bad (i.e., probably not a tar archive), 1 for</span>
<a name="l02049"></a>02049 <span class="comment"> * old UNIX tar file, 2 for Unix Std (POSIX) tar file.</span>
<a name="l02050"></a>02050 <span class="comment"> */</span>
<a name="l02051"></a>02051 
<a name="l02052"></a>02052 <span class="keyword">static</span> <span class="keywordtype">int</span>
<a name="l02053"></a>02053 is_tar(<span class="keywordtype">unsigned</span> <span class="keywordtype">char</span> *buf, <span class="keywordtype">int</span> nbytes)
<a name="l02054"></a>02054 {
<a name="l02055"></a>02055     <span class="keyword">register</span> <span class="keyword">union </span>record *header = (<span class="keyword">union </span>record *) buf;
<a name="l02056"></a>02056     <span class="keyword">register</span> <span class="keywordtype">int</span> i;
<a name="l02057"></a>02057     <span class="keyword">register</span> <span class="keywordtype">long</span> sum,
<a name="l02058"></a>02058      recsum;
<a name="l02059"></a>02059     <span class="keyword">register</span> <span class="keywordtype">char</span> *p;
<a name="l02060"></a>02060 
<a name="l02061"></a>02061     <span class="keywordflow">if</span> (nbytes &lt; (<span class="keywordtype">int</span>)<span class="keyword">sizeof</span>(<span class="keyword">union </span>record))
<a name="l02062"></a>02062          return 0;
<a name="l02063"></a>02063 
<a name="l02064"></a>02064     recsum = from_oct(8, header-&gt;header.chksum);
<a name="l02065"></a>02065 
<a name="l02066"></a>02066     sum = 0;
<a name="l02067"></a>02067     p = header-&gt;charptr;
<a name="l02068"></a>02068     <span class="keywordflow">for</span> (i = <span class="keyword">sizeof</span>(<span class="keyword">union</span> record); --i &gt;= 0;) {
<a name="l02069"></a>02069         <span class="comment">/*</span>
<a name="l02070"></a>02070 <span class="comment">         * We can&#39;t use unsigned char here because of old compilers,</span>
<a name="l02071"></a>02071 <span class="comment">         * e.g. V7.</span>
<a name="l02072"></a>02072 <span class="comment">         */</span>
<a name="l02073"></a>02073         sum += 0xFF &amp; *p++;
<a name="l02074"></a>02074     }
<a name="l02075"></a>02075 
<a name="l02076"></a>02076     <span class="comment">/* Adjust checksum to count the &quot;chksum&quot; field as blanks. */</span>
<a name="l02077"></a>02077     <span class="keywordflow">for</span> (i = <span class="keyword">sizeof</span>(header-&gt;header.chksum); --i &gt;= 0;)
<a name="l02078"></a>02078         sum -= 0xFF &amp; header-&gt;header.chksum[i];
<a name="l02079"></a>02079     sum += <span class="charliteral">&#39; &#39;</span> * <span class="keyword">sizeof</span> header-&gt;header.chksum;
<a name="l02080"></a>02080 
<a name="l02081"></a>02081     <span class="keywordflow">if</span> (sum != recsum)
<a name="l02082"></a>02082         <span class="keywordflow">return</span> 0;       <span class="comment">/* Not a tar archive */</span>
<a name="l02083"></a>02083 
<a name="l02084"></a>02084     <span class="keywordflow">if</span> (0 == strcmp(header-&gt;header.magic, TMAGIC))
<a name="l02085"></a>02085         <span class="keywordflow">return</span> 2;       <span class="comment">/* Unix Standard tar archive */</span>
<a name="l02086"></a>02086 
<a name="l02087"></a>02087     <span class="keywordflow">return</span> 1;               <span class="comment">/* Old fashioned tar archive */</span>
<a name="l02088"></a>02088 }
<a name="l02089"></a>02089 
<a name="l02090"></a>02090 
<a name="l02091"></a>02091 <span class="comment">/*</span>
<a name="l02092"></a>02092 <span class="comment"> * Quick and dirty octal conversion.</span>
<a name="l02093"></a>02093 <span class="comment"> *</span>
<a name="l02094"></a>02094 <span class="comment"> * Result is -1 if the field is invalid (all blank, or nonoctal).</span>
<a name="l02095"></a>02095 <span class="comment"> */</span>
<a name="l02096"></a>02096 <span class="keyword">static</span> <span class="keywordtype">long</span>
<a name="l02097"></a>02097 from_oct(<span class="keywordtype">int</span> digs, <span class="keywordtype">char</span> *where)
<a name="l02098"></a>02098 {
<a name="l02099"></a>02099     <span class="keyword">register</span> <span class="keywordtype">long</span> value;
<a name="l02100"></a>02100 
<a name="l02101"></a>02101     <span class="keywordflow">while</span> (isspace(*where)) {   <span class="comment">/* Skip spaces */</span>
<a name="l02102"></a>02102         where++;
<a name="l02103"></a>02103         <span class="keywordflow">if</span> (--digs &lt;= 0)
<a name="l02104"></a>02104             <span class="keywordflow">return</span> -1;  <span class="comment">/* All blank field */</span>
<a name="l02105"></a>02105     }
<a name="l02106"></a>02106     value = 0;
<a name="l02107"></a>02107     <span class="keywordflow">while</span> (digs &gt; 0 &amp;&amp; isodigit(*where)) {  <span class="comment">/* Scan til nonoctal */</span>
<a name="l02108"></a>02108         value = (value &lt;&lt; 3) | (*where++ - <span class="charliteral">&#39;0&#39;</span>);
<a name="l02109"></a>02109         --digs;
<a name="l02110"></a>02110     }
<a name="l02111"></a>02111 
<a name="l02112"></a>02112     <span class="keywordflow">if</span> (digs &gt; 0 &amp;&amp; *where &amp;&amp; !isspace(*where))
<a name="l02113"></a>02113         <span class="keywordflow">return</span> -1;      <span class="comment">/* Ended on non-space/nul */</span>
<a name="l02114"></a>02114 
<a name="l02115"></a>02115     <span class="keywordflow">return</span> value;
<a name="l02116"></a>02116 }
<a name="l02117"></a>02117 
<a name="l02118"></a><a class="code" href="classKMimeMagic.html#a0fb103387907aa14ca8bcbcff7e1d991">02118</a> <a class="code" href="classKMimeMagic.html#a0fb103387907aa14ca8bcbcff7e1d991" title="Create a parser and initialize it with the KDE-global data: the &quot;magic&quot; config file as well as the sn...">KMimeMagic::KMimeMagic</a>()
<a name="l02119"></a>02119 {
<a name="l02120"></a>02120     <span class="comment">// Magic file detection init</span>
<a name="l02121"></a>02121     <a class="codeRef" href="qstring.html">QString</a> mimefile = locate( <span class="stringliteral">&quot;mime&quot;</span>, <span class="stringliteral">&quot;magic&quot;</span> );
<a name="l02122"></a>02122     init( mimefile );
<a name="l02123"></a>02123     <span class="comment">// Add snippets from share/config/magic/*</span>
<a name="l02124"></a>02124     <a class="codeRef" href="qstringlist.html">QStringList</a> snippets = KGlobal::dirs()-&gt;findAllResources( <span class="stringliteral">&quot;config&quot;</span>, <span class="stringliteral">&quot;magic/*.magic&quot;</span>, <span class="keyword">true</span> );
<a name="l02125"></a>02125     <span class="keywordflow">for</span> ( QStringList::Iterator it = snippets.begin() ; it != snippets.end() ; ++it )
<a name="l02126"></a>02126         <span class="keywordflow">if</span> ( !<a class="code" href="classKMimeMagic.html#a978c3778983b0455adbf53b5aa41cd8f" title="Merge an existing parse table with the data from the given file.">mergeConfig</a>( *it ) )
<a name="l02127"></a>02127             kdWarning() &lt;&lt; k_funcinfo &lt;&lt; <span class="stringliteral">&quot;Failed to parse &quot;</span> &lt;&lt; *it &lt;&lt; endl;
<a name="l02128"></a>02128 }
<a name="l02129"></a>02129 
<a name="l02130"></a><a class="code" href="classKMimeMagic.html#a80d27eedbc21869c9efa6a3b1377a3ab">02130</a> <a class="code" href="classKMimeMagic.html#a0fb103387907aa14ca8bcbcff7e1d991" title="Create a parser and initialize it with the KDE-global data: the &quot;magic&quot; config file as well as the sn...">KMimeMagic::KMimeMagic</a>(<span class="keyword">const</span> <a class="codeRef" href="qstring.html">QString</a> &amp; _configfile)
<a name="l02131"></a>02131 {
<a name="l02132"></a>02132     init( _configfile );
<a name="l02133"></a>02133 }
<a name="l02134"></a>02134 
<a name="l02135"></a>02135 <span class="keywordtype">void</span> KMimeMagic::init( <span class="keyword">const</span> <a class="codeRef" href="qstring.html">QString</a>&amp; _configfile )
<a name="l02136"></a>02136 {
<a name="l02137"></a>02137     <span class="keywordtype">int</span> result;
<a name="l02138"></a>02138     conf = <span class="keyword">new</span> config_rec;
<a name="l02139"></a>02139 
<a name="l02140"></a>02140     <span class="comment">/* set up the magic list (empty) */</span>
<a name="l02141"></a>02141     conf-&gt;magic = conf-&gt;last = NULL;
<a name="l02142"></a>02142     <a class="code" href="classKMimeMagic.html#a52b9b8ef8760031522979054190b52df" title="The result type.">magicResult</a> = NULL;
<a name="l02143"></a>02143     conf-&gt;followLinks = <span class="keyword">false</span>;
<a name="l02144"></a>02144 
<a name="l02145"></a>02145         conf-&gt;utimeConf = 0L; <span class="comment">// created on demand</span>
<a name="l02146"></a>02146     <span class="comment">/* on the first time through we read the magic file */</span>
<a name="l02147"></a>02147     result = apprentice(_configfile);
<a name="l02148"></a>02148     <span class="keywordflow">if</span> (result == -1)
<a name="l02149"></a>02149         <span class="keywordflow">return</span>;
<a name="l02150"></a>02150 <span class="preprocessor">#ifdef MIME_MAGIC_DEBUG_TABLE</span>
<a name="l02151"></a>02151 <span class="preprocessor"></span>    test_table();
<a name="l02152"></a>02152 <span class="preprocessor">#endif</span>
<a name="l02153"></a>02153 <span class="preprocessor"></span>}
<a name="l02154"></a>02154 
<a name="l02155"></a>02155 <span class="comment">/*</span>
<a name="l02156"></a>02156 <span class="comment"> * The destructor.</span>
<a name="l02157"></a>02157 <span class="comment"> * Free the magic-table and other resources.</span>
<a name="l02158"></a>02158 <span class="comment"> */</span>
<a name="l02159"></a><a class="code" href="classKMimeMagic.html#a5746d61a8dac3c54f63713f81fb19ddf">02159</a> <a class="code" href="classKMimeMagic.html#a5746d61a8dac3c54f63713f81fb19ddf" title="Destroy the parser.">KMimeMagic::~KMimeMagic</a>()
<a name="l02160"></a>02160 {
<a name="l02161"></a>02161     <span class="keywordflow">if</span> (conf) {
<a name="l02162"></a>02162         <span class="keyword">struct </span>magic *p = conf-&gt;magic;
<a name="l02163"></a>02163         <span class="keyword">struct </span>magic *q;
<a name="l02164"></a>02164         <span class="keywordflow">while</span> (p) {
<a name="l02165"></a>02165             q = p;
<a name="l02166"></a>02166             p = p-&gt;next;
<a name="l02167"></a>02167             free(q);
<a name="l02168"></a>02168         }
<a name="l02169"></a>02169                 <span class="keyword">delete</span> conf-&gt;utimeConf;
<a name="l02170"></a>02170         <span class="keyword">delete</span> conf;
<a name="l02171"></a>02171     }
<a name="l02172"></a>02172         <span class="keyword">delete</span> <a class="code" href="classKMimeMagic.html#a52b9b8ef8760031522979054190b52df" title="The result type.">magicResult</a>;
<a name="l02173"></a>02173 }
<a name="l02174"></a>02174 
<a name="l02175"></a>02175 <span class="keywordtype">bool</span>
<a name="l02176"></a><a class="code" href="classKMimeMagic.html#a978c3778983b0455adbf53b5aa41cd8f">02176</a> <a class="code" href="classKMimeMagic.html#a978c3778983b0455adbf53b5aa41cd8f" title="Merge an existing parse table with the data from the given file.">KMimeMagic::mergeConfig</a>(<span class="keyword">const</span> <a class="codeRef" href="qstring.html">QString</a> &amp; _configfile)
<a name="l02177"></a>02177 {
<a name="l02178"></a>02178     kdDebug(7018) &lt;&lt; k_funcinfo &lt;&lt; _configfile &lt;&lt; endl;
<a name="l02179"></a>02179     <span class="keywordtype">int</span> result;
<a name="l02180"></a>02180 
<a name="l02181"></a>02181     <span class="keywordflow">if</span> (_configfile.<a class="codeRef" href="qstring.html#isEmpty">isEmpty</a>())
<a name="l02182"></a>02182         <span class="keywordflow">return</span> <span class="keyword">false</span>;
<a name="l02183"></a>02183     result = apprentice(_configfile);
<a name="l02184"></a>02184     <span class="keywordflow">if</span> (result == -1) {
<a name="l02185"></a>02185         <span class="keywordflow">return</span> <span class="keyword">false</span>;
<a name="l02186"></a>02186     }
<a name="l02187"></a>02187 <span class="preprocessor">#ifdef MIME_MAGIC_DEBUG_TABLE</span>
<a name="l02188"></a>02188 <span class="preprocessor"></span>    test_table();
<a name="l02189"></a>02189 <span class="preprocessor">#endif</span>
<a name="l02190"></a>02190 <span class="preprocessor"></span>    <span class="keywordflow">return</span> <span class="keyword">true</span>;
<a name="l02191"></a>02191 }
<a name="l02192"></a>02192 
<a name="l02193"></a>02193 <span class="keywordtype">bool</span>
<a name="l02194"></a><a class="code" href="classKMimeMagic.html#a6dfdc518ef622f6852ac07ca81c3da75">02194</a> <a class="code" href="classKMimeMagic.html#a6dfdc518ef622f6852ac07ca81c3da75" title="Merge an existing parse table with the data from the given buffer.">KMimeMagic::mergeBufConfig</a>(<span class="keywordtype">char</span> * _configbuf)
<a name="l02195"></a>02195 {
<a name="l02196"></a>02196     <span class="keywordtype">int</span> result;
<a name="l02197"></a>02197 
<a name="l02198"></a>02198     <span class="keywordflow">if</span> (conf) {
<a name="l02199"></a>02199         result = buff_apprentice(_configbuf);
<a name="l02200"></a>02200         <span class="keywordflow">if</span> (result == -1)
<a name="l02201"></a>02201             <span class="keywordflow">return</span> <span class="keyword">false</span>;
<a name="l02202"></a>02202 <span class="preprocessor">#ifdef MIME_MAGIC_DEBUG_TABLE</span>
<a name="l02203"></a>02203 <span class="preprocessor"></span>        test_table();
<a name="l02204"></a>02204 <span class="preprocessor">#endif</span>
<a name="l02205"></a>02205 <span class="preprocessor"></span>        <span class="keywordflow">return</span> <span class="keyword">true</span>;
<a name="l02206"></a>02206     }
<a name="l02207"></a>02207     <span class="keywordflow">return</span> <span class="keyword">false</span>;
<a name="l02208"></a>02208 }
<a name="l02209"></a>02209 
<a name="l02210"></a>02210 <span class="keywordtype">void</span>
<a name="l02211"></a><a class="code" href="classKMimeMagic.html#a179ac8a343be41243174aa1c62f1c2d0">02211</a> <a class="code" href="classKMimeMagic.html#a179ac8a343be41243174aa1c62f1c2d0" title="Enable/Disable follow-links.">KMimeMagic::setFollowLinks</a>( <span class="keywordtype">bool</span> _enable )
<a name="l02212"></a>02212 {
<a name="l02213"></a>02213     conf-&gt;followLinks = _enable;
<a name="l02214"></a>02214 }
<a name="l02215"></a>02215 
<a name="l02216"></a>02216 <a class="code" href="classKMimeMagicResult.html">KMimeMagicResult</a> *
<a name="l02217"></a><a class="code" href="classKMimeMagic.html#a0049cdb95ccc069a2d10ee235fc33cd4">02217</a> <a class="code" href="classKMimeMagic.html#a0049cdb95ccc069a2d10ee235fc33cd4" title="Same functionality as above, except data is not read from a file.">KMimeMagic::findBufferType</a>(<span class="keyword">const</span> <a class="codeRef" href="qbytearray.html">QByteArray</a> &amp;array)
<a name="l02218"></a>02218 {
<a name="l02219"></a>02219     <span class="keywordtype">unsigned</span> <span class="keywordtype">char</span> buf[HOWMANY + 1]; <span class="comment">/* one extra for terminating &#39;\0&#39; */</span>
<a name="l02220"></a>02220 
<a name="l02221"></a>02221     conf-&gt;resultBuf = QString::null;
<a name="l02222"></a>02222     <span class="keywordflow">if</span> ( !<a class="code" href="classKMimeMagic.html#a52b9b8ef8760031522979054190b52df" title="The result type.">magicResult</a> )
<a name="l02223"></a>02223       <a class="code" href="classKMimeMagic.html#a52b9b8ef8760031522979054190b52df" title="The result type.">magicResult</a> = <span class="keyword">new</span> <a class="code" href="classKMimeMagicResult.html">KMimeMagicResult</a>();
<a name="l02224"></a>02224     <a class="code" href="classKMimeMagic.html#a52b9b8ef8760031522979054190b52df" title="The result type.">magicResult</a>-&gt;setInvalid();
<a name="l02225"></a>02225     conf-&gt;accuracy = 100;
<a name="l02226"></a>02226 
<a name="l02227"></a>02227     <span class="keywordtype">int</span> nbytes = array.size();
<a name="l02228"></a>02228 
<a name="l02229"></a>02229         <span class="keywordflow">if</span> (nbytes &gt; HOWMANY)
<a name="l02230"></a>02230                 nbytes = HOWMANY;
<a name="l02231"></a>02231         memcpy(buf, array.data(), nbytes);
<a name="l02232"></a>02232         <span class="keywordflow">if</span> (nbytes == 0) {
<a name="l02233"></a>02233                 conf-&gt;resultBuf = MIME_BINARY_ZEROSIZE;
<a name="l02234"></a>02234         } <span class="keywordflow">else</span> {
<a name="l02235"></a>02235                 buf[nbytes++] = <span class="charliteral">&#39;\0&#39;</span>;   <span class="comment">/* null-terminate it */</span>
<a name="l02236"></a>02236                 tryit(conf, buf, nbytes);
<a name="l02237"></a>02237         }
<a name="l02238"></a>02238         <span class="comment">/* if we have any results, put them in the request structure */</span>
<a name="l02239"></a>02239     <a class="code" href="classKMimeMagic.html#a52b9b8ef8760031522979054190b52df" title="The result type.">magicResult</a>-&gt;setMimeType(conf-&gt;resultBuf.stripWhiteSpace());
<a name="l02240"></a>02240     <a class="code" href="classKMimeMagic.html#a52b9b8ef8760031522979054190b52df" title="The result type.">magicResult</a>-&gt;setAccuracy(conf-&gt;accuracy);
<a name="l02241"></a>02241         <span class="keywordflow">return</span> <a class="code" href="classKMimeMagic.html#a52b9b8ef8760031522979054190b52df" title="The result type.">magicResult</a>;
<a name="l02242"></a>02242 }
<a name="l02243"></a>02243 
<a name="l02244"></a>02244 <span class="keyword">static</span> <span class="keywordtype">void</span>
<a name="l02245"></a>02245 refineResult(<a class="code" href="classKMimeMagicResult.html">KMimeMagicResult</a> *r, <span class="keyword">const</span> <a class="codeRef" href="qstring.html">QString</a> &amp; _filename)
<a name="l02246"></a>02246 {
<a name="l02247"></a>02247     <a class="codeRef" href="qstring.html">QString</a> tmp = r-&gt;<a class="code" href="classKMimeMagicResult.html#a3dba1a5fc727b1594ee3568569030f94" title="Retrieve the mimetype (e.g.">mimeType</a>();
<a name="l02248"></a>02248     <span class="keywordflow">if</span> (tmp.<a class="codeRef" href="qstring.html#isEmpty">isEmpty</a>())
<a name="l02249"></a>02249         <span class="keywordflow">return</span>;
<a name="l02250"></a>02250     <span class="keywordflow">if</span> ( tmp == <span class="stringliteral">&quot;text/x-c&quot;</span> || tmp == <span class="stringliteral">&quot;text/x-objc&quot;</span> )
<a name="l02251"></a>02251     {
<a name="l02252"></a>02252         <span class="keywordflow">if</span> ( _filename.<a class="codeRef" href="qstring.html#right">right</a>(2) == <span class="stringliteral">&quot;.h&quot;</span> )
<a name="l02253"></a>02253             tmp += <span class="stringliteral">&quot;hdr&quot;</span>;
<a name="l02254"></a>02254         <span class="keywordflow">else</span>
<a name="l02255"></a>02255             tmp += <span class="stringliteral">&quot;src&quot;</span>;
<a name="l02256"></a>02256         r-&gt;setMimeType(tmp);
<a name="l02257"></a>02257     }
<a name="l02258"></a>02258     <span class="keywordflow">else</span>
<a name="l02259"></a>02259     <span class="keywordflow">if</span> ( tmp == <span class="stringliteral">&quot;text/x-c++&quot;</span> )
<a name="l02260"></a>02260     {
<a name="l02261"></a>02261         <span class="keywordflow">if</span> ( _filename.<a class="codeRef" href="qstring.html#endsWith">endsWith</a>(<span class="stringliteral">&quot;.h&quot;</span>)
<a name="l02262"></a>02262           || _filename.<a class="codeRef" href="qstring.html#endsWith">endsWith</a>(<span class="stringliteral">&quot;.hh&quot;</span>)
<a name="l02263"></a>02263           || _filename.<a class="codeRef" href="qstring.html#endsWith">endsWith</a>(<span class="stringliteral">&quot;.H&quot;</span>)
<a name="l02264"></a>02264           || !_filename.<a class="codeRef" href="qstring.html#right">right</a>(4).contains(<span class="charliteral">&#39;.&#39;</span>))
<a name="l02265"></a>02265             tmp += <span class="stringliteral">&quot;hdr&quot;</span>;
<a name="l02266"></a>02266         <span class="keywordflow">else</span>
<a name="l02267"></a>02267             tmp += <span class="stringliteral">&quot;src&quot;</span>;
<a name="l02268"></a>02268         r-&gt;setMimeType(tmp);
<a name="l02269"></a>02269     }
<a name="l02270"></a>02270     <span class="keywordflow">else</span>
<a name="l02271"></a>02271     <span class="keywordflow">if</span> ( tmp == <span class="stringliteral">&quot;application/x-sharedlib&quot;</span> )
<a name="l02272"></a>02272     {
<a name="l02273"></a>02273         <span class="keywordflow">if</span> ( _filename.<a class="codeRef" href="qstring.html#find">find</a>( <span class="stringliteral">&quot;.so&quot;</span> ) == -1 ) 
<a name="l02274"></a>02274         {
<a name="l02275"></a>02275             tmp = <span class="stringliteral">&quot;application/x-executable&quot;</span>;
<a name="l02276"></a>02276             r-&gt;setMimeType( tmp );
<a name="l02277"></a>02277         }
<a name="l02278"></a>02278     }
<a name="l02279"></a>02279 }
<a name="l02280"></a>02280 
<a name="l02281"></a>02281 <a class="code" href="classKMimeMagicResult.html">KMimeMagicResult</a> *
<a name="l02282"></a><a class="code" href="classKMimeMagic.html#a74f7910c69e38dfa57c0216282f4229b">02282</a> <a class="code" href="classKMimeMagic.html#a74f7910c69e38dfa57c0216282f4229b" title="Same functionality as findBufferType() but with additional capability of distinguishing between C-hea...">KMimeMagic::findBufferFileType</a>( <span class="keyword">const</span> <a class="codeRef" href="qbytearray.html">QByteArray</a> &amp;data,
<a name="l02283"></a>02283                 <span class="keyword">const</span> <a class="codeRef" href="qstring.html">QString</a> &amp;fn)
<a name="l02284"></a>02284 {
<a name="l02285"></a>02285         <a class="code" href="classKMimeMagicResult.html">KMimeMagicResult</a> * r = <a class="code" href="classKMimeMagic.html#a0049cdb95ccc069a2d10ee235fc33cd4" title="Same functionality as above, except data is not read from a file.">findBufferType</a>( data );
<a name="l02286"></a>02286     refineResult(r, fn);
<a name="l02287"></a>02287         <span class="keywordflow">return</span> r;
<a name="l02288"></a>02288 }
<a name="l02289"></a>02289 
<a name="l02290"></a>02290 <span class="comment">/*</span>
<a name="l02291"></a>02291 <span class="comment"> * Find the content-type of the given file.</span>
<a name="l02292"></a>02292 <span class="comment"> */</span>
<a name="l02293"></a><a class="code" href="classKMimeMagic.html#ab51ac96a3f7e7d7454350291925f4daa">02293</a> <a class="code" href="classKMimeMagicResult.html">KMimeMagicResult</a>* <a class="code" href="classKMimeMagic.html#ab51ac96a3f7e7d7454350291925f4daa" title="Try to find a MimeType for the given file.">KMimeMagic::findFileType</a>(<span class="keyword">const</span> <a class="codeRef" href="qstring.html">QString</a> &amp; fn)
<a name="l02294"></a>02294 {
<a name="l02295"></a>02295 <span class="preprocessor">#ifdef DEBUG_MIMEMAGIC</span>
<a name="l02296"></a>02296 <span class="preprocessor"></span>    kdDebug(7018) &lt;&lt; <span class="stringliteral">&quot;KMimeMagic::findFileType &quot;</span> &lt;&lt; fn &lt;&lt; endl;
<a name="l02297"></a>02297 <span class="preprocessor">#endif</span>
<a name="l02298"></a>02298 <span class="preprocessor"></span>    conf-&gt;resultBuf = QString::null;
<a name="l02299"></a>02299 
<a name="l02300"></a>02300         <span class="keywordflow">if</span> ( !<a class="code" href="classKMimeMagic.html#a52b9b8ef8760031522979054190b52df" title="The result type.">magicResult</a> )
<a name="l02301"></a>02301       <a class="code" href="classKMimeMagic.html#a52b9b8ef8760031522979054190b52df" title="The result type.">magicResult</a> = <span class="keyword">new</span> <a class="code" href="classKMimeMagicResult.html">KMimeMagicResult</a>();
<a name="l02302"></a>02302     <a class="code" href="classKMimeMagic.html#a52b9b8ef8760031522979054190b52df" title="The result type.">magicResult</a>-&gt;setInvalid();
<a name="l02303"></a>02303     conf-&gt;accuracy = 100;
<a name="l02304"></a>02304 
<a name="l02305"></a>02305         <span class="keywordflow">if</span> ( !conf-&gt;utimeConf )
<a name="l02306"></a>02306             conf-&gt;utimeConf = <span class="keyword">new</span> KMimeMagicUtimeConf();
<a name="l02307"></a>02307 
<a name="l02308"></a>02308         <span class="comment">/* process it based on the file contents */</span>
<a name="l02309"></a>02309         process(conf, fn );
<a name="l02310"></a>02310 
<a name="l02311"></a>02311         <span class="comment">/* if we have any results, put them in the request structure */</span>
<a name="l02312"></a>02312         <span class="comment">//finishResult();</span>
<a name="l02313"></a>02313     <a class="code" href="classKMimeMagic.html#a52b9b8ef8760031522979054190b52df" title="The result type.">magicResult</a>-&gt;setMimeType(conf-&gt;resultBuf.stripWhiteSpace());
<a name="l02314"></a>02314     <a class="code" href="classKMimeMagic.html#a52b9b8ef8760031522979054190b52df" title="The result type.">magicResult</a>-&gt;setAccuracy(conf-&gt;accuracy);
<a name="l02315"></a>02315     refineResult(<a class="code" href="classKMimeMagic.html#a52b9b8ef8760031522979054190b52df" title="The result type.">magicResult</a>, fn);
<a name="l02316"></a>02316         <span class="keywordflow">return</span> <a class="code" href="classKMimeMagic.html#a52b9b8ef8760031522979054190b52df" title="The result type.">magicResult</a>;
<a name="l02317"></a>02317 }
</pre></div></div>
</div>
    </div></div>


      </td>
  </tr>
  <tr>
    <td valign="top" id="leftmenu" width="25%">
      <a name="navigation"></a>
      <div class="menu_box"><h2>kio/kio</h2>
<div class="nav_list">
<ul><li><a href="index.html">Main Page</a></li><li><a href="modules.html">Modules</a></li><li><a href="namespaces.html">Namespace List</a></li><li><a href="hierarchy.html">Class Hierarchy</a></li><li><a href="classes.html">Alphabetical List</a></li><li><a href="annotated.html">Class List</a></li><li><a href="files.html">File List</a></li><li><a href="namespacemembers.html">Namespace Members</a></li><li><a href="functions.html">Class Members</a></li><li><a href="pages.html">Related Pages</a></li></ul>
<!--
<h2>Class Picker</h2>
<div style="text-align: center;">
<form name="guideform">
<select name="guidelinks" style="width:100%;" onChange="window.location=document.guideform.guidelinks.options[document.guideform.guidelinks.selectedIndex].value">
<option value="annotated.html">-- Choose --</option>
  <option value="classKACL.html">kacl</option>,  <option value="classKAr.html">kar</option>,  <option value="classKArchive.html">karchive</option>,  <option value="classKArchiveDirectory.html">karchivedirectory</option>,  <option value="classKArchiveEntry.html">karchiveentry</option>,  <option value="classKArchiveFile.html">karchivefile</option>,  <option value="classKAutoMount.html">kautomount</option>,  <option value="classKAutoUnmount.html">kautounmount</option>,  <option value="classKDataTool.html">kdatatool</option>,  <option value="classKDataToolAction.html">kdatatoolaction</option>,  <option value="classKDataToolInfo.html">kdatatoolinfo</option>,  <option value="classKDCOPServiceStarter.html">kdcopservicestarter</option>,  <option value="classKDEDesktopMimeType.html">kdedesktopmimetype</option>,  <option value="classKDirLister.html">kdirlister</option>,  <option value="classKDirNotify.html">kdirnotify</option>,  <option value="classKDirWatch.html">kdirwatch</option>,  <option value="classKEMailSettings.html">kemailsettings</option>,  <option value="classKExecMimeType.html">kexecmimetype</option>,  <option value="classKFileFilter.html">kfilefilter</option>,  <option value="classKFileItem.html">kfileitem</option>,  <option value="classKFileMetaInfo.html">kfilemetainfo</option>,  <option value="classKFileMetaInfoGroup.html">kfilemetainfogroup</option>,  <option value="classKFileMetaInfoItem.html">kfilemetainfoitem</option>,  <option value="classKFileMimeTypeInfo.html">kfilemimetypeinfo</option>,  <option value="classKFileMimeTypeInfo_1_1GroupInfo.html">kfilemimetypeinfo::groupinfo</option>,  <option value="classKFileMimeTypeInfo_1_1ItemInfo.html">kfilemimetypeinfo::iteminfo</option>,  <option value="classKFilePlugin.html">kfileplugin</option>,  <option value="classKFileShare.html">kfileshare</option>,  <option value="classKFilterBase.html">kfilterbase</option>,  <option value="classKFilterDev.html">kfilterdev</option>,  <option value="classKFolderType.html">kfoldertype</option>,  <option value="classKImageIO.html">kimageio</option>,  <option value="classKIO_1_1AuthInfo.html">kio::authinfo</option>,  <option value="classKIO_1_1ChmodJob.html">kio::chmodjob</option>,  <option value="classKIO_1_1Connection.html">kio::connection</option>,  <option value="classKIO_1_1CopyJob.html">kio::copyjob</option>,  <option value="classKIO_1_1DataProtocol.html">kio::dataprotocol</option>,  <option value="classKIO_1_1DataSlave.html">kio::dataslave</option>,  <option value="classKIO_1_1DavJob.html">kio::davjob</option>,  <option value="classKIO_1_1DeleteJob.html">kio::deletejob</option>,  <option value="classKIO_1_1FileCopyJob.html">kio::filecopyjob</option>,  <option value="classKIO_1_1ForwardingSlaveBase.html">kio::forwardingslavebase</option>,  <option value="classKIO_1_1Job.html">kio::job</option>,  <option value="classKIO_1_1ListJob.html">kio::listjob</option>,  <option value="classKIO_1_1MetaData.html">kio::metadata</option>,  <option value="classKIO_1_1MetaInfoJob.html">kio::metainfojob</option>,  <option value="classKIO_1_1MimetypeJob.html">kio::mimetypejob</option>,  <option value="classKIO_1_1MkdirJob.html">kio::mkdirjob</option>,  <option value="classKIO_1_1MultiGetJob.html">kio::multigetjob</option>,  <option value="classKIO_1_1NetAccess.html">kio::netaccess</option>,  <option value="classKIO_1_1NetRC.html">kio::netrc</option>,  <option value="classKIO_1_1PasswordDialog.html">kio::passworddialog</option>,  <option value="classKIO_1_1PreviewJob.html">kio::previewjob</option>,  <option value="classKIO_1_1ProgressBase.html">kio::progressbase</option>,  <option value="classKIO_1_1RenameDlg.html">kio::renamedlg</option>,  <option value="classKIO_1_1Scheduler.html">kio::scheduler</option>,  <option value="classKIO_1_1SimpleJob.html">kio::simplejob</option>,  <option value="classKIO_1_1Slave.html">kio::slave</option>,  <option value="classKIO_1_1SlaveBase.html">kio::slavebase</option>,  <option value="classKIO_1_1SlaveConfig.html">kio::slaveconfig</option>,  <option value="classKIO_1_1SlaveInterface.html">kio::slaveinterface</option>,  <option value="classKIO_1_1StatJob.html">kio::statjob</option>,  <option value="classKIO_1_1StatusbarProgress.html">kio::statusbarprogress</option>,  <option value="classKIO_1_1StoredTransferJob.html">kio::storedtransferjob</option>,  <option value="classKIO_1_1TCPSlaveBase.html">kio::tcpslavebase</option>,  <option value="classKIO_1_1TransferJob.html">kio::transferjob</option>,  <option value="classKLimitedIODevice.html">klimitediodevice</option>,  <option value="classKMimeMagic.html">kmimemagic</option>,  <option value="classKMimeMagicResult.html">kmimemagicresult</option>,  <option value="classKMimeType.html">kmimetype</option>,  <option value="classKMimeTypeChooser.html">kmimetypechooser</option>,  <option value="classKMimeTypeChooserDialog.html">kmimetypechooserdialog</option>,  <option value="classKMimeTypeResolver.html">kmimetyperesolver</option>,  <option value="classKNFSShare.html">knfsshare</option>,  <option value="classKOCRDialog.html">kocrdialog</option>,  <option value="classKOCRDialogFactory.html">kocrdialogfactory</option>,  <option value="classKOpenWithHandler.html">kopenwithhandler</option>,  <option value="classKProtocolInfo.html">kprotocolinfo</option>,  <option value="classKProtocolManager.html">kprotocolmanager</option>,  <option value="classKRemoteEncoding.html">kremoteencoding</option>,  <option value="classKRun.html">krun</option>,  <option value="classKSambaShare.html">ksambashare</option>,  <option value="classKScanDialog.html">kscandialog</option>,  <option value="classKScanDialogFactory.html">kscandialogfactory</option>,  <option value="classKService.html">kservice</option>,  <option value="classKServiceGroup.html">kservicegroup</option>,  <option value="classKServiceOffer.html">kserviceoffer</option>,  <option value="classKServiceType.html">kservicetype</option>,  <option value="classKServiceTypeProfile.html">kservicetypeprofile</option>,  <option value="classKShellCompletion.html">kshellcompletion</option>,  <option value="classKShred.html">kshred</option>,  <option value="classKSimpleFileFilter.html">ksimplefilefilter</option>,  <option value="classKTar.html">ktar</option>,  <option value="classKTrader.html">ktrader</option>,  <option value="classKURIFilter.html">kurifilter</option>,  <option value="classKURIFilterData.html">kurifilterdata</option>,  <option value="classKURIFilterPlugin.html">kurifilterplugin</option>,  <option value="classKURIFilterPluginList.html">kurifilterpluginlist</option>,  <option value="classKURLCompletion.html">kurlcompletion</option>,  <option value="classKURLPixmapProvider.html">kurlpixmapprovider</option>,  <option value="classKZip.html">kzip</option>,  <option value="classObserver.html">observer</option>,  <option value="classRenameDlgPlugin.html">renamedlgplugin</option>,  <option value="classThumbCreator.html">thumbcreator</option>,
</select>
</form>
</div>
-->
</div></div>
<div class="menu_box"><h2>API Dox</h2>
<div class="nav_list">
<ul>
<li><a href="../../../arts/html/index.html">arts</a></li><li><a href="../../../dcop/html/index.html">dcop</a></li><li><a href="../../../dnssd/html/index.html">dnssd</a></li><li><a href="../../../interfaces/html/index.html">interfaces</a></li><li>&nbsp;&nbsp;&nbsp;&nbsp;<a href="../../../interfaces/kimproxy/interface/html/index.html">interface</a></li><li>&nbsp;&nbsp;&nbsp;&nbsp;<a href="../../../interfaces/kimproxy/library/html/index.html">library</a></li><li>&nbsp;&nbsp;<a href="../../../interfaces/kspeech/html/index.html">kspeech</a></li><li>&nbsp;&nbsp;<a href="../../../interfaces/ktexteditor/html/index.html">ktexteditor</a></li><li><a href="../../../kabc/html/index.html">kabc</a></li><li><a href="../../../kate/html/index.html">kate</a></li><li><a href="../../../kcmshell/html/index.html">kcmshell</a></li><li><a href="../../../kdecore/html/index.html">kdecore</a></li><li><a href="../../../kded/html/index.html">kded</a></li><li><a href="../../../kdefx/html/index.html">kdefx</a></li><li><a href="../../../kdeprint/html/index.html">kdeprint</a></li><li><a href="../../../kdesu/html/index.html">kdesu</a></li><li><a href="../../../kdeui/html/index.html">kdeui</a></li><li><a href="../../../kdoctools/html/index.html">kdoctools</a></li><li><a href="../../../khtml/html/index.html">khtml</a></li><li><a href="../../../kimgio/html/index.html">kimgio</a></li><li><a href="../../../kinit/html/index.html">kinit</a></li><li><a href="../../../kio/html/index.html">kio</a></li><li>&nbsp;&nbsp;<a href="../../../kio/bookmarks/html/index.html">bookmarks</a></li><li>&nbsp;&nbsp;<a href="../../../kio/httpfilter/html/index.html">httpfilter</a></li><li>&nbsp;&nbsp;<a href="../../../kio/kfile/html/index.html">kfile</a></li><li>&nbsp;&nbsp;<a href="../../../kio/kio/html/index.html">kio</a></li><li>&nbsp;&nbsp;<a href="../../../kio/kioexec/html/index.html">kioexec</a></li><li>&nbsp;&nbsp;<a href="../../../kio/kpasswdserver/html/index.html">kpasswdserver</a></li><li>&nbsp;&nbsp;<a href="../../../kio/kssl/html/index.html">kssl</a></li><li><a href="../../../kioslave/html/index.html">kioslave</a></li><li>&nbsp;&nbsp;<a href="../../../kioslave/http/html/index.html">http</a></li><li><a href="../../../kjs/html/index.html">kjs</a></li><li><a href="../../../kmdi/html/index.html">kmdi</a></li><li>&nbsp;&nbsp;<a href="../../../kmdi/kmdi/html/index.html">kmdi</a></li><li><a href="../../../knewstuff/html/index.html">knewstuff</a></li><li><a href="../../../kparts/html/index.html">kparts</a></li><li><a href="../../../kresources/html/index.html">kresources</a></li><li><a href="../../../kspell2/html/index.html">kspell2</a></li><li><a href="../../../kunittest/html/index.html">kunittest</a></li><li><a href="../../../kutils/html/index.html">kutils</a></li><li><a href="../../../kwallet/html/index.html">kwallet</a></li><li><a href="../../../libkmid/html/index.html">libkmid</a></li><li><a href="../../../libkscreensaver/html/index.html">libkscreensaver</a></li>
</ul></div></div>


        </td>
</tr>
</table>

<span class="doNotDisplay">
  <a href="http://www.kde.org/" accesskey="8">KDE Home</a> |
  <a href="http://accessibility.kde.org/" accesskey="9">KDE Accessibility Home</a> |
  <a href="http://www.kde.org/media/accesskeys.php" accesskey="0">Description of Access Keys</a>
</span>


<div style="height: 8px"></div>

<div id="footer">
  <div id="footer_left">
    Maintained by <a href="&#109;&#97;&#105;&#108;&#116;&#111;&#58;groo&#116;&#64;kde&#46;or&#x67;">Adriaan de Groot</a>
and
<a href="&#109;a&#105;&#108;&#116;&#111;&#58;w&#105;nter&#64;kde&#46;or&#x67">Allen Winter</a>.
<br/>
    KDE and K Desktop Environment are trademarks of <a href="http://www.kde.org/areas/kde-ev/" title="Homepage of the KDE non-profit Organization">KDE e.V.</a> |
    <a href="http://www.kde.org/contact/impressum.php">Legal</a>
  </div>
  <div id="footer_right"><img src="/media/images/footer_right.png" style="margin: 0px" alt="" /></div>
</div>

<!--
WARNING: DO NOT SEND MAIL TO THE FOLLOWING EMAIL ADDRESS! YOU WILL
BE BLOCKED INSTANTLY AND PERMANENTLY!
<a href="mailto:aaaatrap-425acc3b5374943f@kde.org">Block me</a>
WARNING END
-->

</body>
</html>