<!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/label_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>/label_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{label.\+c}
<a id='L2' name='L2'></a>\label{label_8c_source}\index{src/label.c@{src/label.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\ "{}assemble.h"{}}}
<a id='L6' name='L6'></a>\DoxyCodeLine{00002\ }
<a id='L7' name='L7'></a>\DoxyCodeLine{00010\ HKEY\ *label\_hashkey(\textcolor{keyword}{const}\ \textcolor{keywordtype}{char}\ *value);}
<a id='L8' name='L8'></a>\DoxyCodeLine{00011\ }
<a id='L9' name='L9'></a>\DoxyCodeLine{00020\ \textcolor{keywordtype}{unsigned}\ labelhash(\textcolor{keyword}{const}\ \textcolor{keywordtype}{char}\ *prog,\ \textcolor{keyword}{const}\ \textcolor{keywordtype}{char}\ *label);}
<a id='L10' name='L10'></a>\DoxyCodeLine{00021\ }
<a id='L11' name='L11'></a>\DoxyCodeLine{00030\ \textcolor{keywordtype}{int}\ compare\_adr(\textcolor{keyword}{const}\ \textcolor{keywordtype}{void}\ *a,\ \textcolor{keyword}{const}\ \textcolor{keywordtype}{void}\ *b);}
<a id='L12' name='L12'></a>\DoxyCodeLine{00031\ }
<a id='L13' name='L13'></a>\DoxyCodeLine{00035\ \textcolor{keyword}{static}\ \textcolor{keywordtype}{int}\ labelcnt\ =\ 0;}
<a id='L14' name='L14'></a>\DoxyCodeLine{00036\ }
<a id='L15' name='L15'></a>\DoxyCodeLine{00040\ \textcolor{keyword}{static}\ LABELTAB\ *labels[LABELTABSIZE];}
<a id='L16' name='L16'></a>\DoxyCodeLine{00041\ }
<a id='L17' name='L17'></a>\DoxyCodeLine{00045\ \textcolor{keyword}{static}\ CERR\ cerr\_label[]\ =\ \{}
<a id='L18' name='L18'></a>\DoxyCodeLine{00046\ \ \ \ \ \{\ 101,\ \textcolor{stringliteral}{"{}label\ already\ defined"{}}\ \},}
<a id='L19' name='L19'></a>\DoxyCodeLine{00047\ \ \ \ \ \{\ 102,\ \textcolor{stringliteral}{"{}label\ table\ is\ full"{}}\ \},}
<a id='L20' name='L20'></a>\DoxyCodeLine{00048\ \ \ \ \ \{\ 103,\ \textcolor{stringliteral}{"{}label\ not\ found"{}}\ \},}
<a id='L21' name='L21'></a>\DoxyCodeLine{00049\ \};}
<a id='L22' name='L22'></a>\DoxyCodeLine{00050\ }
<a id='L23' name='L23'></a>\DoxyCodeLine{00051\ HKEY\ *label\_hashkey(\textcolor{keyword}{const}\ \textcolor{keywordtype}{char}\ *value)\ \{}
<a id='L24' name='L24'></a>\DoxyCodeLine{00052\ \ \ \ \ HKEY\ *key\ =\ NULL;}
<a id='L25' name='L25'></a>\DoxyCodeLine{00053\ }
<a id='L26' name='L26'></a>\DoxyCodeLine{00054\ \ \ \ \ key\ =\ malloc\_chk(\textcolor{keyword}{sizeof}(HKEY),\ \textcolor{stringliteral}{"{}label\_hashkey"{}});}
<a id='L27' name='L27'></a>\DoxyCodeLine{00055\ \ \ \ \ key-\/>type\ =\ CHARS;}
<a id='L28' name='L28'></a>\DoxyCodeLine{00056\ \ \ \ \ key-\/>val.s\ =\ strdup\_chk(value,\ \textcolor{stringliteral}{"{}label\_hashkey-\/>value"{}});}
<a id='L29' name='L29'></a>\DoxyCodeLine{00057\ \ \ \ \ \textcolor{keywordflow}{return}\ key;}
<a id='L30' name='L30'></a>\DoxyCodeLine{00058\ \}}
<a id='L31' name='L31'></a>\DoxyCodeLine{00059\ }
<a id='L32' name='L32'></a>\DoxyCodeLine{00060\ \textcolor{keywordtype}{unsigned}\ labelhash(\textcolor{keyword}{const}\ \textcolor{keywordtype}{char}\ *prog,\ \textcolor{keyword}{const}\ \textcolor{keywordtype}{char}\ *label)}
<a id='L33' name='L33'></a>\DoxyCodeLine{00061\ \{}
<a id='L34' name='L34'></a>\DoxyCodeLine{00062\ \ \ \ \ HKEY\ *keys[2]\ =\ \{NULL\};}
<a id='L35' name='L35'></a>\DoxyCodeLine{00063\ \ \ \ \ \textcolor{keywordtype}{int}\ i\ =\ 0;}
<a id='L36' name='L36'></a>\DoxyCodeLine{00064\ \ \ \ \ \textcolor{keywordtype}{unsigned}\ h\ =\ 0;}
<a id='L37' name='L37'></a>\DoxyCodeLine{00065\ }
<a id='L38' name='L38'></a>\DoxyCodeLine{00066\ \ \ \ \ \textcolor{keywordflow}{if}(prog[0])\ \{}
<a id='L39' name='L39'></a>\DoxyCodeLine{00067\ \ \ \ \ \ \ \ \ keys[i++]\ =\ label\_hashkey(prog);}
<a id='L40' name='L40'></a>\DoxyCodeLine{00068\ \ \ \ \ \}}
<a id='L41' name='L41'></a>\DoxyCodeLine{00069\ \ \ \ \ keys[i]\ =\ label\_hashkey(label);}
<a id='L42' name='L42'></a>\DoxyCodeLine{00070\ \ \ \ \ h\ =\ hash(i+1,\ keys,\ LABELTABSIZE);}
<a id='L43' name='L43'></a>\DoxyCodeLine{00071\ \ \ \ \ \textcolor{keywordflow}{for}(\textcolor{keywordtype}{int}\ j\ =\ 0;\ j\ <\ i\ +\ 1;\ j++)\ \{}
<a id='L44' name='L44'></a>\DoxyCodeLine{00072\ \ \ \ \ \ \ \ \ FREE(keys[j]-\/>val.s);}
<a id='L45' name='L45'></a>\DoxyCodeLine{00073\ \ \ \ \ \ \ \ \ FREE(keys[j]);}
<a id='L46' name='L46'></a>\DoxyCodeLine{00074\ \ \ \ \ \}}
<a id='L47' name='L47'></a>\DoxyCodeLine{00075\ \ \ \ \ \textcolor{keywordflow}{return}\ h;}
<a id='L48' name='L48'></a>\DoxyCodeLine{00076\ \}}
<a id='L49' name='L49'></a>\DoxyCodeLine{00077\ }
<a id='L50' name='L50'></a>\DoxyCodeLine{00078\ \textcolor{keywordtype}{int}\ compare\_adr(\textcolor{keyword}{const}\ \textcolor{keywordtype}{void}\ *a,\ \textcolor{keyword}{const}\ \textcolor{keywordtype}{void}\ *b)}
<a id='L51' name='L51'></a>\DoxyCodeLine{00079\ \{}
<a id='L52' name='L52'></a>\DoxyCodeLine{00080\ \ \ \ \ \textcolor{keywordflow}{return}\ (**(LABELARRAY\ **)a).adr\ -\/\ (**(LABELARRAY\ **)b).adr;}
<a id='L53' name='L53'></a>\DoxyCodeLine{00081\ \}}
<a id='L54' name='L54'></a>\DoxyCodeLine{00082\ }
<a id='L55' name='L55'></a>\DoxyCodeLine{00083\ \textcolor{comment}{/*\ assemble.hで定義された関数群\ */}}
<a id='L56' name='L56'></a>\DoxyCodeLine{00084\ \textcolor{keywordtype}{void}\ addcerrlist\_label()}
<a id='L57' name='L57'></a>\DoxyCodeLine{00085\ \{}
<a id='L58' name='L58'></a>\DoxyCodeLine{00086\ \ \ \ \ addcerrlist(ARRAYSIZE(cerr\_label),\ cerr\_label);}
<a id='L59' name='L59'></a>\DoxyCodeLine{00087\ \}}
<a id='L60' name='L60'></a>\DoxyCodeLine{00088\ }
<a id='L61' name='L61'></a>\DoxyCodeLine{00089\ WORD\ getlabel(\textcolor{keyword}{const}\ \textcolor{keywordtype}{char}\ *prog,\ \textcolor{keyword}{const}\ \textcolor{keywordtype}{char}\ *label)}
<a id='L62' name='L62'></a>\DoxyCodeLine{00090\ \{}
<a id='L63' name='L63'></a>\DoxyCodeLine{00091\ \ \ \ \ assert(prog\ !=\ NULL\ \&\&\ label\ !=\ NULL);}
<a id='L64' name='L64'></a>\DoxyCodeLine{00092\ \ \ \ \ LABELTAB\ *p\ =\ NULL;}
<a id='L65' name='L65'></a>\DoxyCodeLine{00093\ \ \ \ \ LABELARRAY\ *l\ =\ NULL;}
<a id='L66' name='L66'></a>\DoxyCodeLine{00094\ }
<a id='L67' name='L67'></a>\DoxyCodeLine{00095\ \ \ \ \ \textcolor{keywordflow}{for}(p\ =\ labels[labelhash(prog,\ label)];\ p\ !=\ NULL;\ p\ =\ p-\/>next)\ \{}
<a id='L68' name='L68'></a>\DoxyCodeLine{00096\ \ \ \ \ \ \ \ \ l\ =\ p-\/>label;}
<a id='L69' name='L69'></a>\DoxyCodeLine{00097\ \ \ \ \ \ \ \ \ \textcolor{keywordflow}{if}((!prog[0]\ ||\ (strcmp(prog,\ l-\/>prog)\ ==\ 0))\ \&\&}
<a id='L70' name='L70'></a>\DoxyCodeLine{00098\ \ \ \ \ \ \ \ \ \ \ \ strcmp(label,\ l-\/>label)\ ==\ 0)}
<a id='L71' name='L71'></a>\DoxyCodeLine{00099\ \ \ \ \ \ \ \ \ \{}
<a id='L72' name='L72'></a>\DoxyCodeLine{00100\ \ \ \ \ \ \ \ \ \ \ \ \ \textcolor{keywordflow}{return}\ l-\/>adr;}
<a id='L73' name='L73'></a>\DoxyCodeLine{00101\ \ \ \ \ \ \ \ \ \}}
<a id='L74' name='L74'></a>\DoxyCodeLine{00102\ \ \ \ \ \}}
<a id='L75' name='L75'></a>\DoxyCodeLine{00103\ \ \ \ \ \textcolor{keywordflow}{return}\ 0xFFFF;}
<a id='L76' name='L76'></a>\DoxyCodeLine{00104\ \}}
<a id='L77' name='L77'></a>\DoxyCodeLine{00105\ }
<a id='L78' name='L78'></a>\DoxyCodeLine{00106\ \textcolor{keywordtype}{bool}\ addlabel(\textcolor{keyword}{const}\ \textcolor{keywordtype}{char}\ *prog,\ \textcolor{keyword}{const}\ \textcolor{keywordtype}{char}\ *label,\ WORD\ adr)}
<a id='L79' name='L79'></a>\DoxyCodeLine{00107\ \{}
<a id='L80' name='L80'></a>\DoxyCodeLine{00108\ \ \ \ \ assert(label\ !=\ NULL);}
<a id='L81' name='L81'></a>\DoxyCodeLine{00109\ \ \ \ \ LABELTAB\ *p\ =\ NULL;}
<a id='L82' name='L82'></a>\DoxyCodeLine{00110\ \ \ \ \ LABELARRAY\ *l\ =\ NULL;}
<a id='L83' name='L83'></a>\DoxyCodeLine{00111\ \ \ \ \ \textcolor{keywordtype}{unsigned}\ h\ =\ 0;}
<a id='L84' name='L84'></a>\DoxyCodeLine{00112\ }
<a id='L85' name='L85'></a>\DoxyCodeLine{00113\ \ \ \ \ \textcolor{comment}{/*\ 登録されたラベルを検索。すでに登録されている場合はエラー発生\ */}}
<a id='L86' name='L86'></a>\DoxyCodeLine{00114\ \ \ \ \ \textcolor{keywordflow}{if}(getlabel(prog,\ label)\ !=\ 0xFFFF)\ \{}
<a id='L87' name='L87'></a>\DoxyCodeLine{00115\ \ \ \ \ \ \ \ \ setcerr(101,\ label);\ \ \ \ \textcolor{comment}{/*\ label\ already\ defined\ */}}
<a id='L88' name='L88'></a>\DoxyCodeLine{00116\ \ \ \ \ \ \ \ \ \textcolor{keywordflow}{return}\ \textcolor{keyword}{false};}
<a id='L89' name='L89'></a>\DoxyCodeLine{00117\ \ \ \ \ \}}
<a id='L90' name='L90'></a>\DoxyCodeLine{00118\ \ \ \ \ \textcolor{comment}{/*\ メモリを確保\ */}}
<a id='L91' name='L91'></a>\DoxyCodeLine{00119\ \ \ \ \ p\ =\ malloc\_chk(\textcolor{keyword}{sizeof}(LABELTAB),\ \textcolor{stringliteral}{"{}labels.next"{}});}
<a id='L92' name='L92'></a>\DoxyCodeLine{00120\ \ \ \ \ l\ =\ p-\/>label\ =\ malloc\_chk(\textcolor{keyword}{sizeof}(LABELARRAY),\ \textcolor{stringliteral}{"{}labels.label"{}});}
<a id='L93' name='L93'></a>\DoxyCodeLine{00121\ \ \ \ \ \textcolor{comment}{/*\ プログラム名を設定\ */}}
<a id='L94' name='L94'></a>\DoxyCodeLine{00122\ \ \ \ \ l-\/>prog\ =\ strdup\_chk(prog,\ \textcolor{stringliteral}{"{}label.prog"{}});}
<a id='L95' name='L95'></a>\DoxyCodeLine{00123\ \ \ \ \ \textcolor{comment}{/*\ ラベルを設定\ */}}
<a id='L96' name='L96'></a>\DoxyCodeLine{00124\ \ \ \ \ l-\/>label\ =\ strdup\_chk(label,\ \textcolor{stringliteral}{"{}label.label"{}});}
<a id='L97' name='L97'></a>\DoxyCodeLine{00125\ \ \ \ \ \textcolor{comment}{/*\ アドレスを設定\ */}}
<a id='L98' name='L98'></a>\DoxyCodeLine{00126\ \ \ \ \ l-\/>adr\ =\ adr;}
<a id='L99' name='L99'></a>\DoxyCodeLine{00127\ \ \ \ \ \textcolor{comment}{/*\ ラベル数を設定\ */}}
<a id='L100' name='L100'></a>\DoxyCodeLine{00128\ \ \ \ \ labelcnt++;}
<a id='L101' name='L101'></a>\DoxyCodeLine{00129\ \ \ \ \ \textcolor{comment}{/*\ ハッシュ表へ追加\ */}}
<a id='L102' name='L102'></a>\DoxyCodeLine{00130\ \ \ \ \ p-\/>next\ =\ labels[h\ =\ labelhash(prog,\ label)];}
<a id='L103' name='L103'></a>\DoxyCodeLine{00131\ \ \ \ \ labels[h]\ =\ p;}
<a id='L104' name='L104'></a>\DoxyCodeLine{00132\ \ \ \ \ \textcolor{keywordflow}{return}\ \textcolor{keyword}{true};}
<a id='L105' name='L105'></a>\DoxyCodeLine{00133\ \}}
<a id='L106' name='L106'></a>\DoxyCodeLine{00134\ }
<a id='L107' name='L107'></a>\DoxyCodeLine{00135\ \textcolor{keywordtype}{void}\ printlabel()}
<a id='L108' name='L108'></a>\DoxyCodeLine{00136\ \{}
<a id='L109' name='L109'></a>\DoxyCodeLine{00137\ \ \ \ \ \textcolor{keywordtype}{int}\ s\ =\ 0;}
<a id='L110' name='L110'></a>\DoxyCodeLine{00138\ \ \ \ \ LABELTAB\ *p\ =\ NULL;}
<a id='L111' name='L111'></a>\DoxyCodeLine{00139\ \ \ \ \ LABELARRAY\ **l\ =\ \{NULL\};}
<a id='L112' name='L112'></a>\DoxyCodeLine{00140\ }
<a id='L113' name='L113'></a>\DoxyCodeLine{00141\ \ \ \ \ l\ =\ calloc\_chk(labelcnt,\ \textcolor{keyword}{sizeof}(LABELARRAY\ **),\ \textcolor{stringliteral}{"{}labels"{}});}
<a id='L114' name='L114'></a>\DoxyCodeLine{00142\ \ \ \ \ \textcolor{keywordflow}{for}(\textcolor{keywordtype}{int}\ i\ =\ 0;\ i\ <\ LABELTABSIZE;\ i++)\ \{}
<a id='L115' name='L115'></a>\DoxyCodeLine{00143\ \ \ \ \ \ \ \ \ \textcolor{keywordflow}{for}(p\ =\ labels[i];\ p\ !=\ NULL;\ p\ =\ p-\/>next)\ \{}
<a id='L116' name='L116'></a>\DoxyCodeLine{00144\ \ \ \ \ \ \ \ \ \ \ \ \ assert(p-\/>label\ !=\ NULL);}
<a id='L117' name='L117'></a>\DoxyCodeLine{00145\ \ \ \ \ \ \ \ \ \ \ \ \ l[s++]\ =\ p-\/>label;}
<a id='L118' name='L118'></a>\DoxyCodeLine{00146\ \ \ \ \ \ \ \ \ \}}
<a id='L119' name='L119'></a>\DoxyCodeLine{00147\ \ \ \ \ \}}
<a id='L120' name='L120'></a>\DoxyCodeLine{00148\ \ \ \ \ qsort(l,\ s,\ \textcolor{keyword}{sizeof}(*l),\ compare\_adr);}
<a id='L121' name='L121'></a>\DoxyCodeLine{00149\ \ \ \ \ \textcolor{keywordflow}{for}(\textcolor{keywordtype}{int}\ i\ =\ 0;\ i\ <\ s;\ i++)\ \{}
<a id='L122' name='L122'></a>\DoxyCodeLine{00150\ \ \ \ \ \ \ \ \ \textcolor{keywordflow}{if}(l[i]-\/>prog[0])\ \{}
<a id='L123' name='L123'></a>\DoxyCodeLine{00151\ \ \ \ \ \ \ \ \ \ \ \ \ fprintf(stdout,\ \textcolor{stringliteral}{"{}\%s."{}},\ l[i]-\/>prog);}
<a id='L124' name='L124'></a>\DoxyCodeLine{00152\ \ \ \ \ \ \ \ \ \}}
<a id='L125' name='L125'></a>\DoxyCodeLine{00153\ \ \ \ \ \ \ \ \ fprintf(stdout,\ \textcolor{stringliteral}{"{}\%s\ -\/-\/-\/>\ \#\%04X\(\backslash\)n"{}},\ l[i]-\/>label,\ l[i]-\/>adr);}
<a id='L126' name='L126'></a>\DoxyCodeLine{00154\ \ \ \ \ \}}
<a id='L127' name='L127'></a>\DoxyCodeLine{00155\ \ \ \ \ FREE(l);}
<a id='L128' name='L128'></a>\DoxyCodeLine{00156\ \}}
<a id='L129' name='L129'></a>\DoxyCodeLine{00157\ }
<a id='L130' name='L130'></a>\DoxyCodeLine{00158\ \textcolor{keywordtype}{void}\ freelabel()}
<a id='L131' name='L131'></a>\DoxyCodeLine{00159\ \{}
<a id='L132' name='L132'></a>\DoxyCodeLine{00160\ \ \ \ \ \textcolor{keywordtype}{int}\ i;}
<a id='L133' name='L133'></a>\DoxyCodeLine{00161\ \ \ \ \ LABELTAB\ *p\ =\ NULL;}
<a id='L134' name='L134'></a>\DoxyCodeLine{00162\ \ \ \ \ LABELTAB\ *q\ =\ NULL;}
<a id='L135' name='L135'></a>\DoxyCodeLine{00163\ }
<a id='L136' name='L136'></a>\DoxyCodeLine{00164\ \ \ \ \ \textcolor{keywordflow}{for}(i\ =\ 0;\ i\ <\ LABELTABSIZE;\ i++)\ \{}
<a id='L137' name='L137'></a>\DoxyCodeLine{00165\ \ \ \ \ \ \ \ \ \textcolor{keywordflow}{for}(p\ =\ labels[i];\ p\ !=\ NULL;\ p\ =\ q)\ \{}
<a id='L138' name='L138'></a>\DoxyCodeLine{00166\ \ \ \ \ \ \ \ \ \ \ \ \ q\ =\ p-\/>next;}
<a id='L139' name='L139'></a>\DoxyCodeLine{00167\ \ \ \ \ \ \ \ \ \ \ \ \ FREE(p-\/>label-\/>prog);}
<a id='L140' name='L140'></a>\DoxyCodeLine{00168\ \ \ \ \ \ \ \ \ \ \ \ \ FREE(p-\/>label-\/>label);}
<a id='L141' name='L141'></a>\DoxyCodeLine{00169\ \ \ \ \ \ \ \ \ \ \ \ \ FREE(p-\/>label);}
<a id='L142' name='L142'></a>\DoxyCodeLine{00170\ \ \ \ \ \ \ \ \ \ \ \ \ FREE(p);}
<a id='L143' name='L143'></a>\DoxyCodeLine{00171\ \ \ \ \ \ \ \ \ \}}
<a id='L144' name='L144'></a>\DoxyCodeLine{00172\ \ \ \ \ \ \ \ \ labels[i]\ =\ NULL;}
<a id='L145' name='L145'></a>\DoxyCodeLine{00173\ \ \ \ \ \}}
<a id='L146' name='L146'></a>\DoxyCodeLine{00174\ \}}
<a id='L147' name='L147'></a>
<a id='L148' name='L148'></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>