<!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'>
<head>
<title>doc_inner/doxygen/latex/word_8c_source.tex</title>
<meta name='robots' content='noindex,nofollow' />
<meta name='generator' content='GLOBAL-6.6.14' />
<meta http-equiv='Content-Style-Type' content='text/css' />
<link rel='stylesheet' type='text/css' href='../style.css' />
</head>
<body>
<a id='TOP' name='TOP'></a><h2 class='header'><a href='../mains.html'>root</a>/<a href='../files/2920.html'>doc_inner</a>/<a href='../files/2921.html'>doxygen</a>/<a href='../files/2922.html'>latex</a>/word_8c_source.tex</h2>
<em class='comment'>/* [<][>][^][v][top]<a href='#BOTTOM'>[bottom]</a><a href='../mains.html'>[index]</a><a href='../help.html'>[help]</a> */</em>
<hr />
<pre>
<a id='L1' name='L1'></a>\doxysection{word.\+c}
<a id='L2' name='L2'></a>\label{word_8c_source}\index{src/word.c@{src/word.c}}
<a id='L3' name='L3'></a>\textbf{ Go to the documentation of this file.}
<a id='L4' name='L4'></a>\begin{DoxyCode}{0}
<a id='L5' name='L5'></a>\DoxyCodeLine{00001\ \textcolor{preprocessor}{\#include\ <stdio.h>}}
<a id='L6' name='L6'></a>\DoxyCodeLine{00002\ \textcolor{preprocessor}{\#include\ <string.h>}}
<a id='L7' name='L7'></a>\DoxyCodeLine{00003\ \textcolor{preprocessor}{\#include\ <assert.h>}}
<a id='L8' name='L8'></a>\DoxyCodeLine{00004\ \textcolor{preprocessor}{\#include\ <stdlib.h>}}
<a id='L9' name='L9'></a>\DoxyCodeLine{00005\ \textcolor{preprocessor}{\#include\ <ctype.h>}}
<a id='L10' name='L10'></a>\DoxyCodeLine{00006\ }
<a id='L11' name='L11'></a>\DoxyCodeLine{00007\ \textcolor{preprocessor}{\#include\ "{}word.h"{}}}
<a id='L12' name='L12'></a>\DoxyCodeLine{00008\ \textcolor{preprocessor}{\#include\ "{}cerr.h"{}}}
<a id='L13' name='L13'></a>\DoxyCodeLine{00009\ }
<a id='L14' name='L14'></a>\DoxyCodeLine{00017\ WORD\ n2word(\textcolor{keyword}{const}\ \textcolor{keywordtype}{char}\ *str);}
<a id='L15' name='L15'></a>\DoxyCodeLine{00018\ }
<a id='L16' name='L16'></a>\DoxyCodeLine{00026\ WORD\ h2word(\textcolor{keyword}{const}\ \textcolor{keywordtype}{char}\ *str);}
<a id='L17' name='L17'></a>\DoxyCodeLine{00027\ }
<a id='L18' name='L18'></a>\DoxyCodeLine{00028\ WORD\ n2word(\textcolor{keyword}{const}\ \textcolor{keywordtype}{char}\ *str)}
<a id='L19' name='L19'></a>\DoxyCodeLine{00029\ \{}
<a id='L20' name='L20'></a>\DoxyCodeLine{00030\ \ \ \ \ assert(isdigit(str[0])\ ||\ str[0]\ ==\ \textcolor{charliteral}{'-\/'});}
<a id='L21' name='L21'></a>\DoxyCodeLine{00031\ }
<a id='L22' name='L22'></a>\DoxyCodeLine{00032\ \ \ \ \ \textcolor{keywordtype}{char}\ *check\ =\ NULL;}
<a id='L23' name='L23'></a>\DoxyCodeLine{00033\ \ \ \ \ \textcolor{keywordtype}{int}\ n;}
<a id='L24' name='L24'></a>\DoxyCodeLine{00034\ \ \ \ \ \textcolor{comment}{/*\ WORD値に変換\ */}}
<a id='L25' name='L25'></a>\DoxyCodeLine{00035\ \ \ \ \ n\ =\ strtol(str,\ \&check,\ 10);}
<a id='L26' name='L26'></a>\DoxyCodeLine{00036\ \ \ \ \ \textcolor{keywordflow}{if}(check[0])\ \{}
<a id='L27' name='L27'></a>\DoxyCodeLine{00037\ \ \ \ \ \ \ \ \ setcerr(114,\ str);\ \ \ \ \textcolor{comment}{/*\ not\ integer\ */}}
<a id='L28' name='L28'></a>\DoxyCodeLine{00038\ \ \ \ \ \ \ \ \ \textcolor{keywordflow}{return}\ 0x0;}
<a id='L29' name='L29'></a>\DoxyCodeLine{00039\ \ \ \ \ \}}
<a id='L30' name='L30'></a>\DoxyCodeLine{00040\ \ \ \ \ \textcolor{comment}{/*\ nが-\/32768から32767の範囲にないときは、その下位16ビットを格納\ */}}
<a id='L31' name='L31'></a>\DoxyCodeLine{00041\ \ \ \ \ \textcolor{keywordflow}{if}(n\ <\ -\/32768\ ||\ n\ >\ 32767)\ \{}
<a id='L32' name='L32'></a>\DoxyCodeLine{00042\ \ \ \ \ \ \ \ \ n\ \&=\ 0xFFFF;}
<a id='L33' name='L33'></a>\DoxyCodeLine{00043\ \ \ \ \ \}}
<a id='L34' name='L34'></a>\DoxyCodeLine{00044\ \ \ \ \ \textcolor{keywordflow}{return}\ (WORD)n;}
<a id='L35' name='L35'></a>\DoxyCodeLine{00045\ \}}
<a id='L36' name='L36'></a>\DoxyCodeLine{00046\ }
<a id='L37' name='L37'></a>\DoxyCodeLine{00047\ WORD\ h2word(\textcolor{keyword}{const}\ \textcolor{keywordtype}{char}\ *str)}
<a id='L38' name='L38'></a>\DoxyCodeLine{00048\ \{}
<a id='L39' name='L39'></a>\DoxyCodeLine{00049\ \ \ \ \ assert(str[0]\ ==\ \textcolor{charliteral}{'\#'});}
<a id='L40' name='L40'></a>\DoxyCodeLine{00050\ }
<a id='L41' name='L41'></a>\DoxyCodeLine{00051\ \ \ \ \ WORD\ w\ =\ 0;}
<a id='L42' name='L42'></a>\DoxyCodeLine{00052\ \ \ \ \ \textcolor{keywordtype}{char}\ *check\ =\ NULL;}
<a id='L43' name='L43'></a>\DoxyCodeLine{00053\ \ \ \ \ str++;}
<a id='L44' name='L44'></a>\DoxyCodeLine{00054\ \ \ \ \ \textcolor{keywordflow}{if}(*str\ ==\ \textcolor{charliteral}{'-\/'}\ ||\ strlen(str)\ >\ 4)\ \{}
<a id='L45' name='L45'></a>\DoxyCodeLine{00055\ \ \ \ \ \ \ \ \ setcerr(116,\ str-\/1);\ \ \ \ \textcolor{comment}{/*\ out\ of\ hex\ range\ */}}
<a id='L46' name='L46'></a>\DoxyCodeLine{00056\ \ \ \ \ \ \ \ \ \textcolor{keywordflow}{return}\ 0x0;}
<a id='L47' name='L47'></a>\DoxyCodeLine{00057\ \ \ \ \ \}}
<a id='L48' name='L48'></a>\DoxyCodeLine{00058\ \ \ \ \ \textcolor{comment}{/*\ WORD値に変換\ */}}
<a id='L49' name='L49'></a>\DoxyCodeLine{00059\ \ \ \ \ w\ =\ (WORD)strtol(str,\ \&check,\ 16);}
<a id='L50' name='L50'></a>\DoxyCodeLine{00060\ \ \ \ \ \textcolor{keywordflow}{if}(check[0])\ \{}
<a id='L51' name='L51'></a>\DoxyCodeLine{00061\ \ \ \ \ \ \ \ \ setcerr(115,\ str-\/1);\ \ \ \ \textcolor{comment}{/*\ not\ hex\ */}}
<a id='L52' name='L52'></a>\DoxyCodeLine{00062\ \ \ \ \ \ \ \ \ \textcolor{keywordflow}{return}\ 0x0;}
<a id='L53' name='L53'></a>\DoxyCodeLine{00063\ \ \ \ \ \}}
<a id='L54' name='L54'></a>\DoxyCodeLine{00064\ \ \ \ \ \textcolor{keywordflow}{return}\ w;}
<a id='L55' name='L55'></a>\DoxyCodeLine{00065\ \}}
<a id='L56' name='L56'></a>\DoxyCodeLine{00066\ }
<a id='L57' name='L57'></a>\DoxyCodeLine{00070\ \textcolor{keyword}{static}\ CERR\ cerr\_word[]\ =\ \{}
<a id='L58' name='L58'></a>\DoxyCodeLine{00071\ \ \ \ \ \{\ 114,\ \textcolor{stringliteral}{"{}not\ integer"{}}\ \},}
<a id='L59' name='L59'></a>\DoxyCodeLine{00072\ \ \ \ \ \{\ 115,\ \textcolor{stringliteral}{"{}not\ hex"{}}\ \},}
<a id='L60' name='L60'></a>\DoxyCodeLine{00073\ \ \ \ \ \{\ 116,\ \textcolor{stringliteral}{"{}out\ of\ hex\ range"{}}\ \},}
<a id='L61' name='L61'></a>\DoxyCodeLine{00074\ \};}
<a id='L62' name='L62'></a>\DoxyCodeLine{00075\ }
<a id='L63' name='L63'></a>\DoxyCodeLine{00076\ \textcolor{comment}{/*\ word.hで定義された関数群\ */}}
<a id='L64' name='L64'></a>\DoxyCodeLine{00077\ \textcolor{keywordtype}{void}\ addcerrlist\_word()}
<a id='L65' name='L65'></a>\DoxyCodeLine{00078\ \{}
<a id='L66' name='L66'></a>\DoxyCodeLine{00079\ \ \ \ \ addcerrlist(ARRAYSIZE(cerr\_word),\ cerr\_word);}
<a id='L67' name='L67'></a>\DoxyCodeLine{00080\ \}}
<a id='L68' name='L68'></a>\DoxyCodeLine{00081\ }
<a id='L69' name='L69'></a>\DoxyCodeLine{00082\ WORD\ nh2word(\textcolor{keyword}{const}\ \textcolor{keywordtype}{char}\ *str)}
<a id='L70' name='L70'></a>\DoxyCodeLine{00083\ \{}
<a id='L71' name='L71'></a>\DoxyCodeLine{00084\ \ \ \ \ WORD\ w;}
<a id='L72' name='L72'></a>\DoxyCodeLine{00085\ }
<a id='L73' name='L73'></a>\DoxyCodeLine{00086\ \ \ \ \ assert(\textcolor{keyword}{sizeof}(WORD)\ *\ 8\ ==\ 16);\ \textcolor{comment}{/*\ WORD型のサイズが16ビットであることを確認\ */}}
<a id='L74' name='L74'></a>\DoxyCodeLine{00087\ \ \ \ \ \textcolor{keywordflow}{if}(str\ ==\ NULL)\ \{}
<a id='L75' name='L75'></a>\DoxyCodeLine{00088\ \ \ \ \ \ \ \ \ \textcolor{keywordflow}{return}\ 0x0;}
<a id='L76' name='L76'></a>\DoxyCodeLine{00089\ \ \ \ \ \}}
<a id='L77' name='L77'></a>\DoxyCodeLine{00090\ \ \ \ \ \textcolor{keywordflow}{if}(!isdigit(*str)\ \&\&\ *str\ !=\ \textcolor{charliteral}{'-\/'}\ \&\&\ *str\ !=\ \textcolor{charliteral}{'\#'})\ \{}
<a id='L78' name='L78'></a>\DoxyCodeLine{00091\ \ \ \ \ \ \ \ \ setcerr(114,\ str);\ \ \ \ \textcolor{comment}{/*\ not\ integer\ */}}
<a id='L79' name='L79'></a>\DoxyCodeLine{00092\ \ \ \ \ \ \ \ \ \textcolor{keywordflow}{return}\ 0x0;}
<a id='L80' name='L80'></a>\DoxyCodeLine{00093\ \ \ \ \ \}}
<a id='L81' name='L81'></a>\DoxyCodeLine{00094\ \ \ \ \ \textcolor{keywordflow}{if}(*str\ ==\ \textcolor{charliteral}{'\#'})\ \{}
<a id='L82' name='L82'></a>\DoxyCodeLine{00095\ \ \ \ \ \ \ \ \ w\ =\ h2word(str);}
<a id='L83' name='L83'></a>\DoxyCodeLine{00096\ \ \ \ \ \}\ \textcolor{keywordflow}{else}\ \{}
<a id='L84' name='L84'></a>\DoxyCodeLine{00097\ \ \ \ \ \ \ \ \ w\ =\ n2word(str);}
<a id='L85' name='L85'></a>\DoxyCodeLine{00098\ \ \ \ \ \}}
<a id='L86' name='L86'></a>\DoxyCodeLine{00099\ \ \ \ \ \textcolor{keywordflow}{return}\ w;}
<a id='L87' name='L87'></a>\DoxyCodeLine{00100\ \}}
<a id='L88' name='L88'></a>\DoxyCodeLine{00101\ }
<a id='L89' name='L89'></a>\DoxyCodeLine{00102\ \textcolor{keywordtype}{char}\ *word2n(WORD\ word)}
<a id='L90' name='L90'></a>\DoxyCodeLine{00103\ \{}
<a id='L91' name='L91'></a>\DoxyCodeLine{00104\ \ \ \ \ \textcolor{keyword}{enum}\ \{}
<a id='L92' name='L92'></a>\DoxyCodeLine{00105\ \ \ \ \ \ \ \ \ MAXLEN\ =\ 5,\ \ \ \ \ \ \ \ \textcolor{comment}{/*\ WORD値を10進数で表したときの最大けた数\ */}}
<a id='L93' name='L93'></a>\DoxyCodeLine{00106\ \ \ \ \ \};}
<a id='L94' name='L94'></a>\DoxyCodeLine{00107\ \ \ \ \ \textcolor{keywordtype}{char}\ *s\ =\ malloc\_chk(MAXLEN\ +\ 1,\ \textcolor{stringliteral}{"{}word2n.n"{}});}
<a id='L95' name='L95'></a>\DoxyCodeLine{00108\ \ \ \ \ \textcolor{keywordtype}{char}\ *t\ =\ NULL;}
<a id='L96' name='L96'></a>\DoxyCodeLine{00109\ \ \ \ \ \textcolor{keywordtype}{int}\ d\ =\ 0;\ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \textcolor{comment}{/*\ けた数\ */}}
<a id='L97' name='L97'></a>\DoxyCodeLine{00110\ }
<a id='L98' name='L98'></a>\DoxyCodeLine{00111\ \ \ \ \ \textcolor{keywordflow}{do}\{}
<a id='L99' name='L99'></a>\DoxyCodeLine{00112\ \ \ \ \ \ \ \ \ s[d++]\ =\ word\ \%\ 10\ +\ \textcolor{charliteral}{'0'};}
<a id='L100' name='L100'></a>\DoxyCodeLine{00113\ \ \ \ \ \}\ \textcolor{keywordflow}{while}((word\ /=\ 10)\ >\ 0);}
<a id='L101' name='L101'></a>\DoxyCodeLine{00114\ \ \ \ \ s[d]\ =\ \textcolor{charliteral}{'\(\backslash\)0'};}
<a id='L102' name='L102'></a>\DoxyCodeLine{00115\ \ \ \ \ t\ =\ strrev(s);}
<a id='L103' name='L103'></a>\DoxyCodeLine{00116\ \ \ \ \ FREE(s);}
<a id='L104' name='L104'></a>\DoxyCodeLine{00117\ \ \ \ \ \textcolor{keywordflow}{return}\ t;}
<a id='L105' name='L105'></a>\DoxyCodeLine{00118\ \}}
<a id='L106' name='L106'></a>\DoxyCodeLine{00119\ }
<a id='L107' name='L107'></a>\DoxyCodeLine{00120\ \textcolor{keywordtype}{char}\ *word2bit(\textcolor{keyword}{const}\ WORD\ word)}
<a id='L108' name='L108'></a>\DoxyCodeLine{00121\ \{}
<a id='L109' name='L109'></a>\DoxyCodeLine{00122\ \ \ \ \ \textcolor{keyword}{enum}\ \{}
<a id='L110' name='L110'></a>\DoxyCodeLine{00123\ \ \ \ \ \ \ \ \ MAXLEN\ =\ 16,\ \ \ \ \ \ \ \ \textcolor{comment}{/*\ WORD値を2進数で表したときの最大桁数\ */}}
<a id='L111' name='L111'></a>\DoxyCodeLine{00124\ \ \ \ \ \};}
<a id='L112' name='L112'></a>\DoxyCodeLine{00125\ \ \ \ \ WORD\ mask\ =\ 0x8000;}
<a id='L113' name='L113'></a>\DoxyCodeLine{00126\ \ \ \ \ \textcolor{keywordtype}{char}\ *bit\ =\ NULL;}
<a id='L114' name='L114'></a>\DoxyCodeLine{00127\ \ \ \ \ \textcolor{keywordtype}{int}\ i\ =\ 0;}
<a id='L115' name='L115'></a>\DoxyCodeLine{00128\ }
<a id='L116' name='L116'></a>\DoxyCodeLine{00129\ \ \ \ \ bit\ =\ malloc\_chk(MAXLEN\ +\ 1,\ \textcolor{stringliteral}{"{}word2bit.bit"{}});}
<a id='L117' name='L117'></a>\DoxyCodeLine{00130\ \ \ \ \ \textcolor{keywordflow}{do}\ \{}
<a id='L118' name='L118'></a>\DoxyCodeLine{00131\ \ \ \ \ \ \ \ \ bit[i++]\ =\ (word\ \&\ mask)\ ?\ \textcolor{charliteral}{'1'}\ :\ \textcolor{charliteral}{'0'};}
<a id='L119' name='L119'></a>\DoxyCodeLine{00132\ \ \ \ \ \}\ \textcolor{keywordflow}{while}((mask\ >>=\ 1)\ >\ 0);}
<a id='L120' name='L120'></a>\DoxyCodeLine{00133\ \ \ \ \ bit[i]\ =\ \textcolor{charliteral}{'\(\backslash\)0'};}
<a id='L121' name='L121'></a>\DoxyCodeLine{00134\ \ \ \ \ \textcolor{keywordflow}{return}\ bit;}
<a id='L122' name='L122'></a>\DoxyCodeLine{00135\ \}}
<a id='L123' name='L123'></a>\DoxyCodeLine{00136\ }
<a id='L124' name='L124'></a>\DoxyCodeLine{00137\ \textcolor{keywordtype}{void}\ print\_dumpword(WORD\ word,\ \textcolor{keywordtype}{bool}\ logicalmode)}
<a id='L125' name='L125'></a>\DoxyCodeLine{00138\ \{}
<a id='L126' name='L126'></a>\DoxyCodeLine{00139\ \ \ \ \ \textcolor{keywordtype}{char}\ *bit\ =\ word2bit(word);}
<a id='L127' name='L127'></a>\DoxyCodeLine{00140\ }
<a id='L128' name='L128'></a>\DoxyCodeLine{00141\ \ \ \ \ \textcolor{keywordflow}{if}(logicalmode\ ==\ \textcolor{keyword}{true})\ \{}
<a id='L129' name='L129'></a>\DoxyCodeLine{00142\ \ \ \ \ \ \ \ \ fprintf(stdout,\ \textcolor{stringliteral}{"{}\%6u"{}},\ word);}
<a id='L130' name='L130'></a>\DoxyCodeLine{00143\ \ \ \ \ \}\ \textcolor{keywordflow}{else}\ \{}
<a id='L131' name='L131'></a>\DoxyCodeLine{00144\ \ \ \ \ \ \ \ \ fprintf(stdout,\ \textcolor{stringliteral}{"{}\%6d"{}},\ (\textcolor{keywordtype}{signed}\ \textcolor{keywordtype}{short})word);}
<a id='L132' name='L132'></a>\DoxyCodeLine{00145\ \ \ \ \ \}}
<a id='L133' name='L133'></a>\DoxyCodeLine{00146\ \ \ \ \ fprintf(stdout,\ \textcolor{stringliteral}{"{}\ =\ \#\%04X\ =\ \%s"{}},\ word,\ bit);}
<a id='L134' name='L134'></a>\DoxyCodeLine{00147\ \ \ \ \ \textcolor{comment}{/*\ 「文字の組」の符号表に記載された文字と、改行（CR）／タブを表示\ */}}
<a id='L135' name='L135'></a>\DoxyCodeLine{00148\ \ \ \ \ \textcolor{keywordflow}{if}(word\ >=\ 0x20\ \&\&\ word\ <=\ 0x7E)\ \{}
<a id='L136' name='L136'></a>\DoxyCodeLine{00149\ \ \ \ \ \ \ \ \ fprintf(stdout,\ \textcolor{stringliteral}{"{}\ =\ \(\backslash\)'\%c\(\backslash\)'"{}},\ word);}
<a id='L137' name='L137'></a>\DoxyCodeLine{00150\ \ \ \ \ \}\ \textcolor{keywordflow}{else}\ \textcolor{keywordflow}{if}(word\ ==\ 0xA)\ \{}
<a id='L138' name='L138'></a>\DoxyCodeLine{00151\ \ \ \ \ \ \ \ \ fprintf(stdout,\ \textcolor{stringliteral}{"{}\ =\ \(\backslash\)'\(\backslash\)\(\backslash\)n\(\backslash\)'"{}});}
<a id='L139' name='L139'></a>\DoxyCodeLine{00152\ \ \ \ \ \}\ \textcolor{keywordflow}{else}\ \textcolor{keywordflow}{if}(word\ ==\ \textcolor{charliteral}{'\(\backslash\)t'})\ \{}
<a id='L140' name='L140'></a>\DoxyCodeLine{00153\ \ \ \ \ \ \ \ \ fprintf(stdout,\ \textcolor{stringliteral}{"{}\ =\ \(\backslash\)'\(\backslash\)\(\backslash\)t\(\backslash\)'"{}});}
<a id='L141' name='L141'></a>\DoxyCodeLine{00154\ \ \ \ \ \}}
<a id='L142' name='L142'></a>\DoxyCodeLine{00155\ \ \ \ \ FREE(bit);}
<a id='L143' name='L143'></a>\DoxyCodeLine{00156\ \}}
<a id='L144' name='L144'></a>
<a id='L145' name='L145'></a>\end{DoxyCode}
</pre>
<hr />
<a id='BOTTOM' name='BOTTOM'></a>
<em class='comment'>/* [<][>][^][v]<a href='#TOP'>[top]</a>[bottom]<a href='../mains.html'>[index]</a><a href='../help.html'>[help]</a> */</em>
</body>
</html>