ZealOS/docs/Demo/Disk/DataBase.CC.html
TomAwezome 1b75d91002 Fix Mount AHCI Port selection.
Add arg to SATARep to specify drive types to show.
Add checks in AHCIPortInit to verify port signatures, add helper method to get signatures from port.
2021-08-02 16:40:05 -04:00

100 lines
7.4 KiB
HTML
Executable file

<!DOCTYPE HTML>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html;charset=US-ASCII">
<meta name="generator" content="ZealOS V0.13">
<style type="text/css">
body {background-color:#fef1f0;}
.cF0{color:#000000;background-color:#fef1f0;}
.cF1{color:#0148a4;background-color:#fef1f0;}
.cF2{color:#3b7901;background-color:#fef1f0;}
.cF3{color:#057c7e;background-color:#fef1f0;}
.cF4{color:#bb2020;background-color:#fef1f0;}
.cF5{color:#9e42ae;background-color:#fef1f0;}
.cF6{color:#b57901;background-color:#fef1f0;}
.cF7{color:#b2b6af;background-color:#fef1f0;}
.cF8{color:#555753;background-color:#fef1f0;}
.cF9{color:#678fbb;background-color:#fef1f0;}
.cFA{color:#82bc49;background-color:#fef1f0;}
.cFB{color:#0097a2;background-color:#fef1f0;}
.cFC{color:#e26a6a;background-color:#fef1f0;}
.cFD{color:#c671bc;background-color:#fef1f0;}
.cFE{color:#c7ab00;background-color:#fef1f0;}
.cFF{color:#fef1f0;background-color:#fef1f0;}
</style>
</head>
<body>
<pre style="font-family:monospace;font-size:12pt">
<a name="l1"></a><span class=cF0>#</span><span class=cF1>define</span><span class=cF0> DB_FILENAME </span><span class=cF6>&quot;~/DataBaseDemo.BIN&quot;</span><span class=cF0>
<a name="l2"></a>#</span><span class=cF1>define</span><span class=cF0> DB_ACCT_MAX </span><span class=cFE>100</span><span class=cF0>
<a name="l3"></a>#</span><span class=cF1>define</span><span class=cF0> DB_ACCT_BLKS </span><span class=cFE>1</span><span class=cF0>
<a name="l4"></a>
<a name="l5"></a></span><span class=cF1>class</span><span class=cF0> Acct
<a name="l6"></a>{</span><span class=cF2>//Use &lt;CTRL-l&gt; to help generate formats.</span><span class=cF0>
<a name="l7"></a> </span><span class=cF1>U8</span><span class=cF0> name[</span><span class=cFE>32</span><span class=cF0>] format </span><span class=cF6>&quot;$DA-P,LEN=32,A=\&quot;Name:%s\&quot;$\n&quot;</span><span class=cF0>;
<a name="l8"></a> </span><span class=cF1>U8</span><span class=cF0> addr[</span><span class=cFE>64</span><span class=cF0>] format </span><span class=cF6>&quot;$DA-P,LEN=64,A=\&quot;Addr:%s\&quot;$\n&quot;</span><span class=cF0>;
<a name="l9"></a> </span><span class=cF1>U8</span><span class=cF0> pad[DB_ACCT_BLKS * </span><span class=cF3>BLK_SIZE</span><span class=cF0> - </span><span class=cFE>64</span><span class=cF0> - </span><span class=cFE>32</span><span class=cF0>];
<a name="l10"></a>};
<a name="l11"></a>
<a name="l12"></a></span><span class=cF1>U0</span><span class=cF0> InitDatabase()
<a name="l13"></a>{ </span><span class=cF2>//Write new contiguous file</span><span class=cF0>
<a name="l14"></a> </span><span class=cF9>CFile</span><span class=cF0> *f = </span><span class=cF5>FOpen</span><span class=cF0>(DB_FILENAME, </span><span class=cF6>&quot;w&quot;</span><span class=cF0>, DB_ACCT_MAX * DB_ACCT_BLKS);
<a name="l15"></a>
<a name="l16"></a> </span><span class=cF5>FClose</span><span class=cF0>(f);
<a name="l17"></a>}
<a name="l18"></a>
<a name="l19"></a></span><span class=cF1>U0</span><span class=cF0> WriteAcct()
<a name="l20"></a>{
<a name="l21"></a> </span><span class=cF9>CFile</span><span class=cF0> *f;
<a name="l22"></a> Acct a;
<a name="l23"></a> </span><span class=cF9>I64</span><span class=cF0> acctnum;
<a name="l24"></a>
<a name="l25"></a> acctnum = </span><span class=cF5>I64Get</span><span class=cF0>(</span><span class=cF6>&quot;Acct #&quot;</span><span class=cF0>, -</span><span class=cFE>1</span><span class=cF0>);
<a name="l26"></a> </span><span class=cF1>if</span><span class=cF0> (</span><span class=cFE>0</span><span class=cF0> &lt;= acctnum &lt; DB_ACCT_MAX)
<a name="l27"></a> </span><span class=cF7>{</span><span class=cF0>
<a name="l28"></a> </span><span class=cF5>MemSet</span><span class=cF0>(&amp;a, </span><span class=cFE>0</span><span class=cF0>, </span><span class=cF3>BLK_SIZE</span><span class=cF0>);
<a name="l29"></a> </span><span class=cF1>if</span><span class=cF0> (</span><span class=cF5>DocForm</span><span class=cF7>(</span><span class=cF0>&amp;a</span><span class=cF7>)</span><span class=cF0>)
<a name="l30"></a> {
<a name="l31"></a> f = </span><span class=cF5>FOpen</span><span class=cF0>(DB_FILENAME, </span><span class=cF6>&quot;w+&quot;</span><span class=cF0>);
<a name="l32"></a> </span><span class=cF5>FBlkWrite</span><span class=cF0>(f, &amp;a, acctnum * DB_ACCT_BLKS, DB_ACCT_BLKS);
<a name="l33"></a> </span><span class=cF5>FClose</span><span class=cF0>(f);
<a name="l34"></a> }
<a name="l35"></a> </span><span class=cF7>}</span><span class=cF0>
<a name="l36"></a>}
<a name="l37"></a>
<a name="l38"></a></span><span class=cF1>U0</span><span class=cF0> ReadAcct()
<a name="l39"></a>{
<a name="l40"></a> </span><span class=cF9>CFile</span><span class=cF0> *f;
<a name="l41"></a> Acct a;
<a name="l42"></a> </span><span class=cF9>I64</span><span class=cF0> acctnum;
<a name="l43"></a>
<a name="l44"></a> acctnum = </span><span class=cF5>I64Get</span><span class=cF0>(</span><span class=cF6>&quot;Acct #&quot;</span><span class=cF0>, -</span><span class=cFE>1</span><span class=cF0>);
<a name="l45"></a> </span><span class=cF1>if</span><span class=cF0> (</span><span class=cFE>0</span><span class=cF0> &lt;= acctnum &lt; DB_ACCT_MAX)
<a name="l46"></a> </span><span class=cF7>{</span><span class=cF0>
<a name="l47"></a> f = </span><span class=cF5>FOpen</span><span class=cF0>(DB_FILENAME, </span><span class=cF6>&quot;r&quot;</span><span class=cF0>);
<a name="l48"></a> </span><span class=cF5>FBlkRead</span><span class=cF0>(f, &amp;a, acctnum * DB_ACCT_BLKS, DB_ACCT_BLKS);
<a name="l49"></a> </span><span class=cF5>FClose</span><span class=cF0>(f);
<a name="l50"></a> </span><span class=cF5>ClassRep</span><span class=cF0>(&amp;a);
<a name="l51"></a> </span><span class=cF7>}</span><span class=cF0>
<a name="l52"></a>}
<a name="l53"></a>
<a name="l54"></a></span><span class=cF1>U0</span><span class=cF0> DatabaseDemo()
<a name="l55"></a>{
<a name="l56"></a> </span><span class=cF9>I64</span><span class=cF0> ch;
<a name="l57"></a>
<a name="l58"></a> </span><span class=cF1>if</span><span class=cF0> (!</span><span class=cF5>FileFind</span><span class=cF7>(</span><span class=cF0>DB_FILENAME</span><span class=cF7>)</span><span class=cF0>)
<a name="l59"></a> InitDatabase;
<a name="l60"></a> </span><span class=cF1>do</span><span class=cF0>
<a name="l61"></a> </span><span class=cF7>{</span><span class=cF0>
<a name="l62"></a> </span><span class=cF6>&quot;$GREEN$R$FG$ead acct, $GREEN$W$FG$rite acct or $GREEN$&lt;SHIFT-ESC&gt;$FG$:&quot;</span><span class=cF0>;
<a name="l63"></a> ch = </span><span class=cF5>ToUpper</span><span class=cF0>(</span><span class=cF5>CharGet</span><span class=cF0>);
<a name="l64"></a> </span><span class=cF6>'\n'</span><span class=cF0>;
<a name="l65"></a> </span><span class=cF1>if</span><span class=cF0> (ch == </span><span class=cF6>'R'</span><span class=cF0>) ReadAcct;
<a name="l66"></a> </span><span class=cF1>if</span><span class=cF0> (ch == </span><span class=cF6>'W'</span><span class=cF0>) WriteAcct;
<a name="l67"></a> </span><span class=cF7>}</span><span class=cF0>
<a name="l68"></a> </span><span class=cF1>while</span><span class=cF0> (ch != </span><span class=cF3>CH_SHIFT_ESC</span><span class=cF0> &amp;&amp; ch != </span><span class=cF3>CH_ESC</span><span class=cF0>);
<a name="l69"></a>}
<a name="l70"></a>
<a name="l71"></a>DatabaseDemo;
</span></pre></body>
</html>