2021-03-24 05:27:46 +00:00
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
< html >
< head >
< meta http-equiv = "content-type" content = "text/html; charset=UTF-8" >
< title > Mu - ex9.mu< / title >
< meta name = "Generator" content = "Vim/8.1" >
< meta name = "plugin-version" content = "vim8.1_v1" >
< meta name = "syntax" content = "none" >
< meta name = "settings" content = "number_lines,use_css,pre_wrap,no_foldcolumn,expand_tabs,line_ids,prevent_copy=" >
2021-06-25 04:44:18 +00:00
< meta name = "colorscheme" content = "minimal-light" >
2021-03-24 05:27:46 +00:00
< style type = "text/css" >
<!--
2021-06-26 16:20:32 +00:00
pre { white-space: pre-wrap; font-family: monospace; color: #000000; background-color: #ffffd7; }
body { font-size:12pt; font-family: monospace; color: #000000; background-color: #ffffd7; }
2021-03-24 05:27:46 +00:00
a { color:inherit; }
* { font-size:12pt; font-size: 1em; }
2021-06-16 04:50:13 +00:00
.muRegEdi { color: #87ffd7; }
2021-06-26 16:20:32 +00:00
.muComment { color: #005faf; }
2021-03-24 05:27:46 +00:00
.LineNr { }
2021-06-26 16:20:32 +00:00
.Special { color: #ff6060; }
2021-06-16 04:50:13 +00:00
.muRegEsi { color: #87d787; }
.muRegEax { color: #875f00; }
2021-03-24 05:27:46 +00:00
.Delimiter { color: #c000c0; }
.muFunction { color: #af5f00; text-decoration: underline; }
2021-06-26 16:20:32 +00:00
.Constant { color: #008787; }
.PreProc { color: #c000c0; }
2021-03-24 05:27:46 +00:00
-->
< / style >
< script type = 'text/javascript' >
<!--
/* function to open any folds containing a jumped-to line before jumping to it */
function JumpToLine()
{
var lineNum;
lineNum = window.location.hash;
lineNum = lineNum.substr(1); /* strip off '#' */
if (lineNum.indexOf('L') == -1) {
lineNum = 'L'+lineNum;
}
var lineElem = document.getElementById(lineNum);
/* Always jump to new location even if the line was hidden inside a fold, or
* we corrected the raw number to a line ID.
*/
if (lineElem) {
lineElem.scrollIntoView(true);
}
return true;
}
if ('onhashchange' in window) {
window.onhashchange = JumpToLine;
}
-->
< / script >
< / head >
< body onload = 'JumpToLine();' >
< a href = 'https://github.com/akkartik/mu/blob/main/ex9.mu' > https://github.com/akkartik/mu/blob/main/ex9.mu< / a >
< pre id = 'vimCodeElement' >
< span id = "L1" class = "LineNr" > 1 < / span > < span class = "muComment" > # Demo of reading and writing to disk.< / span >
< span id = "L2" class = "LineNr" > 2 < / span > < span class = "muComment" > #< / span >
< span id = "L3" class = "LineNr" > 3 < / span > < span class = "muComment" > # Steps for trying it out:< / span >
2021-04-21 15:28:00 +00:00
< span id = "L4" class = "LineNr" > 4 < / span > < span class = "muComment" > # 1. Translate this example into a disk image code.img.< / span >
2021-03-24 05:27:46 +00:00
< span id = "L5" class = "LineNr" > 5 < / span > < span class = "muComment" > # ./translate ex9.mu< / span >
< span id = "L6" class = "LineNr" > 6 < / span > < span class = "muComment" > # 2. Build a second disk image data.img containing some text.< / span >
< span id = "L7" class = "LineNr" > 7 < / span > < span class = "muComment" > # dd if=/dev/zero of=data.img count=20160< / span >
< span id = "L8" class = "LineNr" > 8 < / span > < span class = "muComment" > # echo 'abc def ghi' |dd of=data.img conv=notrunc< / span >
< span id = "L9" class = "LineNr" > 9 < / span > < span class = "muComment" > # 3. Familiarize yourself with how the data disk looks within xxd:< / span >
< span id = "L10" class = "LineNr" > 10 < / span > < span class = "muComment" > # xxd data.img |head< / span >
< span id = "L11" class = "LineNr" > 11 < / span > < span class = "muComment" > # 4. Run in an emulator, either Qemu or Bochs.< / span >
2021-04-21 15:28:00 +00:00
< span id = "L12" class = "LineNr" > 12 < / span > < span class = "muComment" > # qemu-system-i386 -hda code.img -hdb data.img< / span >
2021-03-24 05:27:46 +00:00
< span id = "L13" class = "LineNr" > 13 < / span > < span class = "muComment" > # bochs -f bochsrc.2disks< / span >
< span id = "L14" class = "LineNr" > 14 < / span > < span class = "muComment" > # 5. Exit the emulator.< / span >
< span id = "L15" class = "LineNr" > 15 < / span > < span class = "muComment" > # 6. Notice that the data disk now contains the word count of the original text.< / span >
< span id = "L16" class = "LineNr" > 16 < / span > < span class = "muComment" > # xxd data.img |head< / span >
< span id = "L17" class = "LineNr" > 17 < / span >
2021-04-21 15:28:00 +00:00
< span id = "L18" class = "LineNr" > 18 < / span > < span class = "PreProc" > fn< / span > < span class = "muFunction" > < a href = 'ex9.mu.html#L18' > main< / a > < / span > < a href = '500fake-screen.mu.html#L14' > screen< / a > : (addr < a href = '500fake-screen.mu.html#L14' > screen< / a > ), keyboard: (addr keyboard), data-disk: (addr disk) < span class = "Delimiter" > {< / span >
2021-03-24 05:27:46 +00:00
< span id = "L19" class = "LineNr" > 19 < / span > < span class = "PreProc" > var< / span > text-storage: (stream byte < span class = "Constant" > 0x200< / span > )
2021-06-16 04:50:13 +00:00
< span id = "L20" class = "LineNr" > 20 < / span > < span class = "PreProc" > var< / span > text/< span class = "muRegEsi" > esi< / span > : (addr stream byte) < span class = "Special" > < -< / span > address text-storage
< span id = "L21" class = "LineNr" > 21 < / span > < a href = 'boot.subx.html#L974' > load-sectors< / a > data-disk, < span class = "Constant" > 0< / span > /lba, < span class = "Constant" > 1< / span > /num-sectors, text
2021-03-24 05:27:46 +00:00
< span id = "L22" class = "LineNr" > 22 < / span >
2021-06-16 04:50:13 +00:00
< span id = "L23" class = "LineNr" > 23 < / span > < span class = "PreProc" > var< / span > < a href = 'ex9.mu.html#L31' > word-count< / a > /< span class = "muRegEax" > eax< / span > : int < span class = "Special" > < -< / span > < a href = 'ex9.mu.html#L31' > word-count< / a > text
2021-03-24 05:27:46 +00:00
< span id = "L24" class = "LineNr" > 24 < / span >
< span id = "L25" class = "LineNr" > 25 < / span > < span class = "PreProc" > var< / span > result-storage: (stream byte < span class = "Constant" > 0x10< / span > )
2021-06-16 04:50:13 +00:00
< span id = "L26" class = "LineNr" > 26 < / span > < span class = "PreProc" > var< / span > result/< span class = "muRegEdi" > edi< / span > : (addr stream byte) < span class = "Special" > < -< / span > address result-storage
2021-03-24 05:27:46 +00:00
< span id = "L27" class = "LineNr" > 27 < / span > < a href = '126write-int-decimal.subx.html#L8' > write-int32-decimal< / a > result, < a href = 'ex9.mu.html#L31' > word-count< / a >
2021-06-16 04:50:13 +00:00
< span id = "L28" class = "LineNr" > 28 < / span > < a href = 'boot.subx.html#L1037' > store-sectors< / a > data-disk, < span class = "Constant" > 0< / span > /lba, < span class = "Constant" > 1< / span > /num-sectors, result
2021-03-24 05:27:46 +00:00
< span id = "L29" class = "LineNr" > 29 < / span > < span class = "Delimiter" > }< / span >
< span id = "L30" class = "LineNr" > 30 < / span >
2021-06-16 04:50:13 +00:00
< span id = "L31" class = "LineNr" > 31 < / span > < span class = "PreProc" > fn< / span > < span class = "muFunction" > < a href = 'ex9.mu.html#L31' > word-count< / a > < / span > in: (addr stream byte)< span class = "PreProc" > -> < / span > _/< span class = "muRegEax" > eax< / span > : int < span class = "Delimiter" > {< / span >
< span id = "L32" class = "LineNr" > 32 < / span > < span class = "PreProc" > var< / span > result/< span class = "muRegEdi" > edi< / span > : int < span class = "Special" > < -< / span > copy < span class = "Constant" > 0< / span >
2021-03-24 05:27:46 +00:00
< span id = "L33" class = "LineNr" > 33 < / span > < span class = "Delimiter" > {< / span >
2021-06-16 04:50:13 +00:00
< span id = "L34" class = "LineNr" > 34 < / span > < span class = "PreProc" > var< / span > done?/< span class = "muRegEax" > eax< / span > : boolean < span class = "Special" > < -< / span > < a href = '309stream.subx.html#L6' > stream-empty?< / a > in
2021-03-24 05:27:46 +00:00
< span id = "L35" class = "LineNr" > 35 < / span > compare done?, < span class = "Constant" > 0< / span > /false
< span id = "L36" class = "LineNr" > 36 < / span > < span class = "PreProc" > break-if-!=< / span >
2021-06-16 04:50:13 +00:00
< span id = "L37" class = "LineNr" > 37 < / span > < span class = "PreProc" > var< / span > g/< span class = "muRegEax" > eax< / span > : grapheme < span class = "Special" > < -< / span > < a href = '403unicode.mu.html#L92' > read-grapheme< / a > in
2021-03-24 05:27:46 +00:00
< span id = "L38" class = "LineNr" > 38 < / span > < span class = "Delimiter" > {< / span >
< span id = "L39" class = "LineNr" > 39 < / span > compare g, < span class = "Constant" > 0x20< / span > /space
< span id = "L40" class = "LineNr" > 40 < / span > < span class = "PreProc" > break-if-!=< / span >
< span id = "L41" class = "LineNr" > 41 < / span > result < span class = "Special" > < -< / span > increment
< span id = "L42" class = "LineNr" > 42 < / span > < span class = "Delimiter" > }< / span >
< span id = "L43" class = "LineNr" > 43 < / span > < span class = "Delimiter" > {< / span >
< span id = "L44" class = "LineNr" > 44 < / span > compare g, < span class = "Constant" > 0xa< / span > /newline
< span id = "L45" class = "LineNr" > 45 < / span > < span class = "PreProc" > break-if-!=< / span >
< span id = "L46" class = "LineNr" > 46 < / span > result < span class = "Special" > < -< / span > increment
< span id = "L47" class = "LineNr" > 47 < / span > < span class = "Delimiter" > }< / span >
< span id = "L48" class = "LineNr" > 48 < / span > < span class = "PreProc" > loop< / span >
< span id = "L49" class = "LineNr" > 49 < / span > < span class = "Delimiter" > }< / span >
< span id = "L50" class = "LineNr" > 50 < / span > < span class = "PreProc" > return< / span > result
< span id = "L51" class = "LineNr" > 51 < / span > < span class = "Delimiter" > }< / span >
< / pre >
< / body >
< / html >
<!-- vim: set foldmethod=manual : -->