surpass 0.0.4 → 0.0.6
This diff represents the content of publicly available package versions that have been released to one of the supported registries. The information contained in this diff is provided for informational purposes only and reflects changes between package versions as they appear in their respective public registries.
- data/History.txt +4 -0
- data/README.txt +3 -20
- data/Rakefile +2 -13
- data/bin/surpass +8 -0
- data/examples/big-16mb.rb +25 -0
- data/examples/big-random-strings.rb +28 -0
- data/examples/blanks.rb +34 -0
- data/examples/blanks.xls +0 -0
- data/examples/col_width.rb +16 -0
- data/examples/col_width.xls +0 -0
- data/examples/dates.rb +31 -0
- data/examples/dates.xls +0 -0
- data/examples/format.rb +23 -0
- data/examples/format.xls +0 -0
- data/examples/hello-world.rb +9 -0
- data/examples/hello-world.xls +0 -0
- data/examples/image.rb +10 -0
- data/examples/image.xls +0 -0
- data/examples/merged.rb +36 -0
- data/examples/merged.xls +0 -0
- data/examples/merged0.rb +27 -0
- data/examples/merged0.xls +0 -0
- data/examples/merged1.rb +99 -0
- data/examples/merged1.xls +0 -0
- data/examples/num_formats.rb +55 -0
- data/examples/num_formats.xls +0 -0
- data/examples/numbers.rb +24 -0
- data/examples/numbers.xls +0 -0
- data/examples/outline.rb +110 -0
- data/examples/outline.xls +0 -0
- data/examples/panes.rb +48 -0
- data/examples/panes.xls +0 -0
- data/examples/protection.rb +132 -0
- data/examples/protection.xls +0 -0
- data/examples/python.bmp +0 -0
- data/examples/row_styles.rb +16 -0
- data/examples/row_styles.xls +0 -0
- data/examples/row_styles_empty.rb +15 -0
- data/examples/row_styles_empty.xls +0 -0
- data/examples/set_cell_and_range_style.rb +12 -0
- data/examples/set_cell_and_range_style.xls +0 -0
- data/examples/wrapped-text.rb +13 -0
- data/examples/wrapped-text.xls +0 -0
- data/examples/write_arrays.rb +22 -0
- data/examples/write_arrays.xls +0 -0
- data/examples/ws_props.rb +80 -0
- data/lib/surpass/ExcelFormula.g +366 -0
- data/lib/surpass/ExcelFormula.tokens +30 -0
- data/lib/surpass/ExcelFormulaLexer.rb +922 -0
- data/lib/surpass/ExcelFormulaParser.rb +602 -0
- data/lib/{biff_record.rb → surpass/biff_record.rb} +0 -0
- data/lib/{bitmap.rb → surpass/bitmap.rb} +0 -0
- data/lib/{cell.rb → surpass/cell.rb} +2 -34
- data/lib/{chart.rb → surpass/chart.rb} +0 -0
- data/lib/{column.rb → surpass/column.rb} +0 -0
- data/lib/{document.rb → surpass/document.rb} +0 -0
- data/lib/surpass/excel_formula.rb +23 -0
- data/lib/{excel_magic.rb → surpass/excel_magic.rb} +0 -0
- data/lib/{formatting.rb → surpass/formatting.rb} +93 -53
- data/lib/{row.rb → surpass/row.rb} +0 -0
- data/lib/{style.rb → surpass/style.rb} +2 -1
- data/lib/surpass/tokens.txt +2 -0
- data/lib/{utilities.rb → surpass/utilities.rb} +0 -0
- data/lib/{workbook.rb → surpass/workbook.rb} +0 -0
- data/lib/{worksheet.rb → surpass/worksheet.rb} +15 -6
- data/lib/surpass.rb +1 -1
- data/spec/biff_record_spec.rb +268 -0
- data/spec/cell_spec.rb +56 -0
- data/spec/data/random-strings.txt +10000 -0
- data/spec/document_spec.rb +168 -0
- data/spec/excel_formula_spec.rb +27 -0
- data/spec/formatting_spec.rb +53 -0
- data/spec/output/cells-rk.xls +0 -0
- data/spec/output/cells.xls +0 -0
- data/spec/output/mini.xls +0 -0
- data/spec/reference/P-0508-0000507647-3280-5298.xls +0 -0
- data/spec/reference/all-cell-styles.bin +0 -0
- data/spec/reference/all-number-formats.bin +0 -0
- data/spec/reference/all-styles.bin +0 -0
- data/spec/reference/mini.xls +0 -0
- data/spec/row_spec.rb +19 -0
- data/spec/spec_helper.rb +10 -0
- data/spec/style_spec.rb +89 -0
- data/spec/surpass_spec.rb +7 -0
- data/spec/utilities_spec.rb +57 -0
- data/spec/workbook_spec.rb +48 -0
- data/spec/worksheet_spec.rb +0 -0
- data/stats/cloc.txt +8 -0
- data/stats/rcov.txt +0 -0
- data/stats/specdoc.txt +158 -0
- data/surpass.gemspec +40 -0
- data/tasks/setup.rb +1 -1
- data/tasks/zentest.rake +36 -0
- data/webby/README.txt +6 -0
- data/webby/Sitefile +43 -0
- data/webby/content/css/pygments.txt +6 -0
- data/webby/content/css/style.css +279 -0
- data/webby/content/examples/autoformat.png +0 -0
- data/webby/content/examples/autoformat.rb +32 -0
- data/webby/content/examples/autoformat.xls +0 -0
- data/webby/content/examples/borders.png +0 -0
- data/webby/content/examples/borders.rb +15 -0
- data/webby/content/examples/borders.xls +0 -0
- data/webby/content/examples/colours.png +0 -0
- data/webby/content/examples/colours.rb +23 -0
- data/webby/content/examples/colours.xls +0 -0
- data/webby/content/examples/data.png +0 -0
- data/webby/content/examples/data.rb +11 -0
- data/webby/content/examples/data.xls +0 -0
- data/webby/content/examples/formatting.png +0 -0
- data/webby/content/examples/formatting.rb +78 -0
- data/webby/content/examples/formatting.xls +0 -0
- data/webby/content/examples/hello-world.png +0 -0
- data/webby/content/examples/hello-world.py +8 -0
- data/webby/content/examples/hello-world.rb +9 -0
- data/webby/content/examples/hello-world.xls +0 -0
- data/webby/content/examples/number-format-string.png +0 -0
- data/webby/content/examples/number-format-string.rb +14 -0
- data/webby/content/examples/number-format-string.xls +0 -0
- data/webby/content/examples/patterns.png +0 -0
- data/webby/content/examples/patterns.rb +26 -0
- data/webby/content/examples/patterns.xls +0 -0
- data/webby/content/examples/show-greens.sh +1 -0
- data/webby/content/examples/surpass-info.sh +1 -0
- data/webby/content/img/Thumbs.db +0 -0
- data/webby/content/img/bg_menu.gif +0 -0
- data/webby/content/img/bg_t.gif +0 -0
- data/webby/content/img/bullet.gif +0 -0
- data/webby/content/img/logo.png +0 -0
- data/webby/content/img/logo_.jpg +0 -0
- data/webby/content/img/top_bg.gif +0 -0
- data/webby/content/img/top_bg_.gif +0 -0
- data/webby/content/index.txt +16 -0
- data/webby/content/installation/index.txt +24 -0
- data/webby/content/source/ExcelFormulaLexer.txt +7 -0
- data/webby/content/source/ExcelFormulaParser.txt +7 -0
- data/webby/content/source/biff_record.txt +7 -0
- data/webby/content/source/bitmap.txt +7 -0
- data/webby/content/source/cell.txt +7 -0
- data/webby/content/source/chart.txt +7 -0
- data/webby/content/source/column.txt +7 -0
- data/webby/content/source/document.txt +7 -0
- data/webby/content/source/excel_formula.txt +7 -0
- data/webby/content/source/excel_magic.txt +7 -0
- data/webby/content/source/formatting.txt +7 -0
- data/webby/content/source/row.txt +7 -0
- data/webby/content/source/style.txt +7 -0
- data/webby/content/source/utilities.txt +7 -0
- data/webby/content/source/workbook.txt +7 -0
- data/webby/content/source/worksheet.txt +7 -0
- data/webby/content/surpass-manual.erb +198 -0
- data/webby/layouts/book.txt +29 -0
- data/webby/layouts/default.txt +27 -0
- data/webby/layouts/two_column.txt +25 -0
- data/webby/layouts/web.txt +66 -0
- data/webby/output/.cairn +0 -0
- data/webby/output/css/blueprint/ie.css +26 -0
- data/webby/output/css/blueprint/plugins/buttons/icons/cross.png +0 -0
- data/webby/output/css/blueprint/plugins/buttons/icons/key.png +0 -0
- data/webby/output/css/blueprint/plugins/buttons/icons/tick.png +0 -0
- data/webby/output/css/blueprint/plugins/buttons/readme.txt +32 -0
- data/webby/output/css/blueprint/plugins/buttons/screen.css +97 -0
- data/webby/output/css/blueprint/plugins/fancy-type/readme.txt +14 -0
- data/webby/output/css/blueprint/plugins/fancy-type/screen.css +71 -0
- data/webby/output/css/blueprint/plugins/link-icons/icons/doc.png +0 -0
- data/webby/output/css/blueprint/plugins/link-icons/icons/email.png +0 -0
- data/webby/output/css/blueprint/plugins/link-icons/icons/external.png +0 -0
- data/webby/output/css/blueprint/plugins/link-icons/icons/feed.png +0 -0
- data/webby/output/css/blueprint/plugins/link-icons/icons/im.png +0 -0
- data/webby/output/css/blueprint/plugins/link-icons/icons/pdf.png +0 -0
- data/webby/output/css/blueprint/plugins/link-icons/icons/visited.png +0 -0
- data/webby/output/css/blueprint/plugins/link-icons/icons/xls.png +0 -0
- data/webby/output/css/blueprint/plugins/link-icons/readme.txt +18 -0
- data/webby/output/css/blueprint/plugins/link-icons/screen.css +40 -0
- data/webby/output/css/blueprint/plugins/rtl/readme.txt +10 -0
- data/webby/output/css/blueprint/plugins/rtl/screen.css +109 -0
- data/webby/output/css/blueprint/print.css +30 -0
- data/webby/output/css/blueprint/screen.css +251 -0
- data/webby/output/css/blueprint/src/forms.css +49 -0
- data/webby/output/css/blueprint/src/grid.css +212 -0
- data/webby/output/css/blueprint/src/grid.png +0 -0
- data/webby/output/css/blueprint/src/ie.css +59 -0
- data/webby/output/css/blueprint/src/print.css +85 -0
- data/webby/output/css/blueprint/src/reset.css +38 -0
- data/webby/output/css/blueprint/src/typography.css +105 -0
- data/webby/output/css/pygments.css +59 -0
- data/webby/output/css/site.css +62 -0
- data/webby/output/css/style.css +279 -0
- data/webby/output/examples/autoformat.png +0 -0
- data/webby/output/examples/autoformat.rb +32 -0
- data/webby/output/examples/autoformat.xls +0 -0
- data/webby/output/examples/borders.png +0 -0
- data/webby/output/examples/borders.rb +15 -0
- data/webby/output/examples/borders.xls +0 -0
- data/webby/output/examples/colours.png +0 -0
- data/webby/output/examples/colours.rb +23 -0
- data/webby/output/examples/colours.xls +0 -0
- data/webby/output/examples/data.png +0 -0
- data/webby/output/examples/data.rb +11 -0
- data/webby/output/examples/data.xls +0 -0
- data/webby/output/examples/formatting.png +0 -0
- data/webby/output/examples/formatting.rb +78 -0
- data/webby/output/examples/formatting.xls +0 -0
- data/webby/output/examples/hello-world.png +0 -0
- data/webby/output/examples/hello-world.py +8 -0
- data/webby/output/examples/hello-world.rb +9 -0
- data/webby/output/examples/hello-world.xls +0 -0
- data/webby/output/examples/number-format-string.png +0 -0
- data/webby/output/examples/number-format-string.rb +14 -0
- data/webby/output/examples/number-format-string.xls +0 -0
- data/webby/output/examples/patterns.png +0 -0
- data/webby/output/examples/patterns.rb +26 -0
- data/webby/output/examples/patterns.xls +0 -0
- data/webby/output/examples/show-greens.sh +1 -0
- data/webby/output/examples/surpass-info.sh +1 -0
- data/webby/output/img/Thumbs.db +0 -0
- data/webby/output/img/bg_menu.gif +0 -0
- data/webby/output/img/bg_t.gif +0 -0
- data/webby/output/img/bullet.gif +0 -0
- data/webby/output/img/logo.png +0 -0
- data/webby/output/img/logo_.jpg +0 -0
- data/webby/output/img/top_bg.gif +0 -0
- data/webby/output/img/top_bg_.gif +0 -0
- data/webby/output/index.html +138 -0
- data/webby/output/installation/index.html +64 -0
- data/webby/output/installation/installation.html +1 -0
- data/webby/output/installation.html +1 -0
- data/webby/output/source/ExcelFormulaLexer.html +981 -0
- data/webby/output/source/ExcelFormulaParser.html +661 -0
- data/webby/output/source/biff_record.html +462 -0
- data/webby/output/source/bitmap.html +277 -0
- data/webby/output/source/cell.html +241 -0
- data/webby/output/source/chart.html +64 -0
- data/webby/output/source/column.html +99 -0
- data/webby/output/source/document.html +465 -0
- data/webby/output/source/excel_formula.html +82 -0
- data/webby/output/source/excel_magic.html +1072 -0
- data/webby/output/source/formatting.html +664 -0
- data/webby/output/source/row.html +169 -0
- data/webby/output/source/style.html +158 -0
- data/webby/output/source/surpass.html +110 -0
- data/webby/output/source/utilities.html +145 -0
- data/webby/output/source/workbook.html +265 -0
- data/webby/output/source/worksheet.html +331 -0
- data/webby/output/surpass-manual-0-0-5.pdf +0 -0
- data/webby/output/surpass-manual.aux +50 -0
- data/webby/output/surpass-manual.log +366 -0
- data/webby/output/surpass-manual.out +20 -0
- data/webby/output/surpass-manual.tex +582 -0
- data/webby/output/surpass-manual.toc +20 -0
- data/webby/rsync-exclude +7 -0
- data/webby/tasks/latex.rake +14 -0
- data/webby/tasks/screenshots.rb +58 -0
- data/webby/templates/article.erb +15 -0
- data/webby/templates/book.erb +16 -0
- data/webby/templates/page.erb +9 -0
- metadata +302 -24
- data/bin/surpass-info +0 -20
- data/lib/excel_formula.rb +0 -6
|
@@ -0,0 +1,465 @@
|
|
|
1
|
+
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Strict//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-strict.dtd">
|
|
2
|
+
|
|
3
|
+
<!-- ========================================================== -->
|
|
4
|
+
<!-- Created by Devit Schizoper -->
|
|
5
|
+
<!-- Created HomePages http://LoadFoo.starzonewebhost.com -->
|
|
6
|
+
<!-- Created Day 01.12.2006 -->
|
|
7
|
+
<!-- ========================================================== -->
|
|
8
|
+
|
|
9
|
+
<html xmlns="http://www.w3.org/1999/xhtml" xml:lang="en" lang="en">
|
|
10
|
+
<head>
|
|
11
|
+
<meta http-equiv="content-type" content="text/html;charset=utf-8" />
|
|
12
|
+
<meta name="author" content="LoadFoO" />
|
|
13
|
+
<meta name="description" content="Site description" />
|
|
14
|
+
<meta name="keywords" content="key, words" />
|
|
15
|
+
<title>Surpass :: document.rb</title>
|
|
16
|
+
<link rel="stylesheet" type="text/css" href="/css/style.css" media="screen" />
|
|
17
|
+
<link rel="stylesheet" href="/css/pygments.css" type="text/css" />
|
|
18
|
+
<link rel="shortcut icon" href="favicon.ico" />
|
|
19
|
+
</head>
|
|
20
|
+
|
|
21
|
+
<body>
|
|
22
|
+
<div id="wrap">
|
|
23
|
+
<div id="top">
|
|
24
|
+
<h2><a href="/" title="Back to main page">Surpass</a></h2>
|
|
25
|
+
<div id="menu">
|
|
26
|
+
<ul>
|
|
27
|
+
<li><a href="/installation">Installation</a></li>
|
|
28
|
+
<li><a href="/examples">Examples</a></li>
|
|
29
|
+
<li><a href="/source">Source</a></li>
|
|
30
|
+
</ul>
|
|
31
|
+
</div>
|
|
32
|
+
</div>
|
|
33
|
+
<div id="content">
|
|
34
|
+
<div id="left">
|
|
35
|
+
<h2>document.rb</h2>
|
|
36
|
+
<div class="highlight"><pre><span class="k">class</span> <span class="nc">Reader</span>
|
|
37
|
+
<span class="no">DIR_ENTRY_SIZE</span> <span class="o">=</span> <span class="mi">128</span>
|
|
38
|
+
|
|
39
|
+
<span class="kp">attr_accessor</span> <span class="ss">:header</span>
|
|
40
|
+
<span class="kp">attr_accessor</span> <span class="ss">:data</span>
|
|
41
|
+
|
|
42
|
+
<span class="kp">attr_accessor</span> <span class="ss">:doc_magic</span>
|
|
43
|
+
<span class="kp">attr_accessor</span> <span class="ss">:file_uid</span>
|
|
44
|
+
<span class="kp">attr_accessor</span> <span class="ss">:rev_num</span>
|
|
45
|
+
<span class="kp">attr_accessor</span> <span class="ss">:ver_num</span>
|
|
46
|
+
<span class="kp">attr_accessor</span> <span class="ss">:byte_order</span>
|
|
47
|
+
<span class="kp">attr_accessor</span> <span class="ss">:sect_size</span>
|
|
48
|
+
<span class="kp">attr_accessor</span> <span class="ss">:short_sect_size</span>
|
|
49
|
+
|
|
50
|
+
<span class="kp">attr_accessor</span> <span class="ss">:total_sat_sectors</span>
|
|
51
|
+
<span class="kp">attr_accessor</span> <span class="ss">:dir_start_sid</span>
|
|
52
|
+
<span class="kp">attr_accessor</span> <span class="ss">:min_stream_size</span>
|
|
53
|
+
<span class="kp">attr_accessor</span> <span class="ss">:ssat_start_sid</span>
|
|
54
|
+
<span class="kp">attr_accessor</span> <span class="ss">:total_ssat_sectors</span>
|
|
55
|
+
<span class="kp">attr_accessor</span> <span class="ss">:msat_start_sid</span>
|
|
56
|
+
<span class="kp">attr_accessor</span> <span class="ss">:total_msat_sectors</span>
|
|
57
|
+
|
|
58
|
+
<span class="kp">attr_accessor</span> <span class="ss">:msat</span>
|
|
59
|
+
<span class="kp">attr_accessor</span> <span class="ss">:sat</span>
|
|
60
|
+
<span class="kp">attr_accessor</span> <span class="ss">:ssat</span>
|
|
61
|
+
<span class="kp">attr_accessor</span> <span class="ss">:dir_entry_list</span>
|
|
62
|
+
|
|
63
|
+
<span class="k">def</span> <span class="nf">initialize</span><span class="p">(</span><span class="n">file</span><span class="p">)</span>
|
|
64
|
+
<span class="vi">@streams</span> <span class="o">=</span> <span class="p">{}</span>
|
|
65
|
+
|
|
66
|
+
<span class="n">file</span> <span class="o">=</span> <span class="no">File</span><span class="o">.</span><span class="n">open</span><span class="p">(</span><span class="n">file</span><span class="p">,</span> <span class="s1">'rb'</span><span class="p">)</span> <span class="k">unless</span> <span class="n">file</span><span class="o">.</span><span class="n">respond_to?</span><span class="p">(</span><span class="ss">:read</span><span class="p">)</span>
|
|
67
|
+
<span class="n">doc</span> <span class="o">=</span> <span class="n">file</span><span class="o">.</span><span class="n">read</span>
|
|
68
|
+
<span class="vi">@header</span><span class="p">,</span> <span class="vi">@data</span> <span class="o">=</span> <span class="n">doc</span><span class="o">[</span><span class="mi">0</span><span class="o">.</span><span class="n">.</span><span class="o">.</span><span class="mi">512</span><span class="o">]</span><span class="p">,</span> <span class="n">doc</span><span class="o">[</span><span class="mi">512</span><span class="o">.</span><span class="n">.</span><span class="o">-</span><span class="mi">1</span><span class="o">]</span>
|
|
69
|
+
|
|
70
|
+
<span class="n">build_header</span>
|
|
71
|
+
<span class="n">build_msat</span>
|
|
72
|
+
<span class="n">build_sat</span>
|
|
73
|
+
<span class="n">build_directory</span>
|
|
74
|
+
<span class="n">build_short_sectors_data</span>
|
|
75
|
+
|
|
76
|
+
<span class="k">if</span> <span class="vi">@short_sectors_data</span><span class="o">.</span><span class="n">length</span> <span class="o">></span> <span class="mi">0</span>
|
|
77
|
+
<span class="n">build_ssat</span>
|
|
78
|
+
<span class="k">else</span>
|
|
79
|
+
<span class="vi">@ssat_start_sid</span> <span class="o">=</span> <span class="o">-</span><span class="mi">2</span>
|
|
80
|
+
<span class="vi">@total_ssat_sectors</span> <span class="o">=</span> <span class="mi">0</span>
|
|
81
|
+
<span class="vi">@ssat</span> <span class="o">=</span> <span class="o">[-</span><span class="mi">2</span><span class="o">]</span>
|
|
82
|
+
<span class="k">end</span>
|
|
83
|
+
|
|
84
|
+
<span class="vi">@dir_entry_list</span><span class="o">[</span><span class="mi">1</span><span class="o">.</span><span class="n">.</span><span class="o">-</span><span class="mi">1</span><span class="o">].</span><span class="n">each</span> <span class="k">do</span> <span class="o">|</span><span class="n">d</span><span class="o">|</span>
|
|
85
|
+
<span class="n">did</span><span class="p">,</span> <span class="n">sz</span><span class="p">,</span> <span class="nb">name</span><span class="p">,</span> <span class="n">t</span><span class="p">,</span> <span class="n">c</span><span class="p">,</span> <span class="n">did_left</span><span class="p">,</span> <span class="n">did_right</span><span class="p">,</span> <span class="n">did_root</span><span class="p">,</span> <span class="n">dentry_start_sid</span><span class="p">,</span> <span class="n">stream_size</span> <span class="o">=</span> <span class="n">d</span>
|
|
86
|
+
<span class="n">stream_data</span> <span class="o">=</span> <span class="s1">''</span>
|
|
87
|
+
<span class="k">if</span> <span class="n">stream_size</span> <span class="o">></span> <span class="mi">0</span>
|
|
88
|
+
<span class="k">if</span> <span class="n">stream_size</span> <span class="o">></span> <span class="vi">@min_stream_size</span>
|
|
89
|
+
<span class="n">args</span> <span class="o">=</span> <span class="o">[</span><span class="vi">@data</span><span class="p">,</span> <span class="vi">@sat</span><span class="p">,</span> <span class="n">dentry_start_sid</span><span class="p">,</span> <span class="vi">@sect_size</span><span class="o">]</span>
|
|
90
|
+
<span class="k">else</span>
|
|
91
|
+
<span class="n">args</span> <span class="o">=</span> <span class="o">[</span><span class="vi">@short_sectors_data</span><span class="p">,</span> <span class="vi">@ssat</span><span class="p">,</span> <span class="n">dentry_start_sid</span><span class="p">,</span> <span class="vi">@short_sect_size</span><span class="o">]</span>
|
|
92
|
+
<span class="k">end</span>
|
|
93
|
+
<span class="n">stream_data</span> <span class="o">=</span> <span class="n">stream_data</span><span class="p">(</span><span class="o">*</span><span class="n">args</span><span class="p">)</span>
|
|
94
|
+
<span class="k">end</span>
|
|
95
|
+
<span class="c1"># BAD IDEA: names may be equal. NEED use full paths...</span>
|
|
96
|
+
<span class="vi">@streams</span><span class="o">[</span><span class="nb">name</span><span class="o">]</span> <span class="o">=</span> <span class="n">stream_data</span> <span class="k">if</span> <span class="o">!</span><span class="nb">name</span><span class="o">.</span><span class="n">length</span> <span class="o">==</span> <span class="mi">0</span>
|
|
97
|
+
<span class="k">end</span>
|
|
98
|
+
<span class="k">end</span>
|
|
99
|
+
|
|
100
|
+
<span class="k">def</span> <span class="nf">build_header</span>
|
|
101
|
+
<span class="vi">@doc_magic</span> <span class="o">=</span> <span class="vi">@header</span><span class="o">[</span><span class="mi">0</span><span class="o">.</span><span class="n">.</span><span class="o">.</span><span class="mi">8</span><span class="o">]</span>
|
|
102
|
+
<span class="k">raise</span> <span class="s1">'Not an OLE file.'</span> <span class="k">unless</span> <span class="vi">@doc_magic</span> <span class="o">===</span> <span class="s2">"</span><span class="se">\320\317\021\340\241\261\032\341</span><span class="s2">"</span>
|
|
103
|
+
|
|
104
|
+
<span class="vi">@file_uid</span> <span class="o">=</span> <span class="vi">@header</span><span class="o">[</span><span class="mi">8</span><span class="o">.</span><span class="n">.</span><span class="o">.</span><span class="mi">24</span><span class="o">]</span>
|
|
105
|
+
<span class="vi">@rev_num</span> <span class="o">=</span> <span class="vi">@header</span><span class="o">[</span><span class="mi">24</span><span class="o">.</span><span class="n">.</span><span class="o">.</span><span class="mi">26</span><span class="o">]</span>
|
|
106
|
+
<span class="vi">@ver_num</span> <span class="o">=</span> <span class="vi">@header</span><span class="o">[</span><span class="mi">26</span><span class="o">.</span><span class="n">.</span><span class="o">.</span><span class="mi">28</span><span class="o">]</span>
|
|
107
|
+
<span class="vi">@byte_order</span> <span class="o">=</span> <span class="vi">@header</span><span class="o">[</span><span class="mi">28</span><span class="o">.</span><span class="n">.</span><span class="o">.</span><span class="mi">30</span><span class="o">]</span>
|
|
108
|
+
<span class="vi">@log2_sect_size</span> <span class="o">=</span> <span class="vi">@header</span><span class="o">[</span><span class="mi">30</span><span class="o">.</span><span class="n">.</span><span class="o">.</span><span class="mi">32</span><span class="o">].</span><span class="n">unpack</span><span class="p">(</span><span class="s1">'v'</span><span class="p">)</span><span class="o">[</span><span class="mi">0</span><span class="o">]</span>
|
|
109
|
+
<span class="vi">@log2_short_sect_size</span> <span class="o">=</span> <span class="vi">@header</span><span class="o">[</span><span class="mi">32</span><span class="o">.</span><span class="n">.</span><span class="o">.</span><span class="mi">34</span><span class="o">].</span><span class="n">unpack</span><span class="p">(</span><span class="s1">'v'</span><span class="p">)</span><span class="o">[</span><span class="mi">0</span><span class="o">]</span>
|
|
110
|
+
<span class="vi">@total_sat_sectors</span> <span class="o">=</span> <span class="vi">@header</span><span class="o">[</span><span class="mi">44</span><span class="o">.</span><span class="n">.</span><span class="o">.</span><span class="mi">48</span><span class="o">].</span><span class="n">unpack</span><span class="p">(</span><span class="s1">'V'</span><span class="p">)</span><span class="o">[</span><span class="mi">0</span><span class="o">]</span>
|
|
111
|
+
<span class="vi">@dir_start_sid</span> <span class="o">=</span> <span class="vi">@header</span><span class="o">[</span><span class="mi">48</span><span class="o">.</span><span class="n">.</span><span class="o">.</span><span class="mi">52</span><span class="o">].</span><span class="n">unpack</span><span class="p">(</span><span class="s1">'V'</span><span class="p">)</span><span class="o">[</span><span class="mi">0</span><span class="o">]</span>
|
|
112
|
+
<span class="vi">@min_stream_size</span> <span class="o">=</span> <span class="vi">@header</span><span class="o">[</span><span class="mi">56</span><span class="o">.</span><span class="n">.</span><span class="o">.</span><span class="mi">60</span><span class="o">].</span><span class="n">unpack</span><span class="p">(</span><span class="s1">'V'</span><span class="p">)</span><span class="o">[</span><span class="mi">0</span><span class="o">]</span>
|
|
113
|
+
<span class="vi">@ssat_start_sid</span> <span class="o">=</span> <span class="vi">@header</span><span class="o">[</span><span class="mi">60</span><span class="o">.</span><span class="n">.</span><span class="o">.</span><span class="mi">64</span><span class="o">].</span><span class="n">unpack</span><span class="p">(</span><span class="s1">'V'</span><span class="p">)</span><span class="o">[</span><span class="mi">0</span><span class="o">]</span>
|
|
114
|
+
<span class="vi">@total_ssat_sectors</span> <span class="o">=</span> <span class="vi">@header</span><span class="o">[</span><span class="mi">64</span><span class="o">.</span><span class="n">.</span><span class="o">.</span><span class="mi">68</span><span class="o">].</span><span class="n">unpack</span><span class="p">(</span><span class="s1">'V'</span><span class="p">)</span><span class="o">[</span><span class="mi">0</span><span class="o">]</span>
|
|
115
|
+
<span class="vi">@msat_start_sid</span> <span class="o">=</span> <span class="vi">@header</span><span class="o">[</span><span class="mi">68</span><span class="o">.</span><span class="n">.</span><span class="o">.</span><span class="mi">72</span><span class="o">].</span><span class="n">unpack</span><span class="p">(</span><span class="s1">'V'</span><span class="p">)</span><span class="o">[</span><span class="mi">0</span><span class="o">]</span>
|
|
116
|
+
<span class="vi">@total_msat_sectors</span> <span class="o">=</span> <span class="vi">@header</span><span class="o">[</span><span class="mi">72</span><span class="o">.</span><span class="n">.</span><span class="o">.</span><span class="mi">76</span><span class="o">].</span><span class="n">unpack</span><span class="p">(</span><span class="s1">'V'</span><span class="p">)</span><span class="o">[</span><span class="mi">0</span><span class="o">]</span>
|
|
117
|
+
|
|
118
|
+
<span class="vi">@sect_size</span> <span class="o">=</span> <span class="mi">1</span> <span class="o"><<</span> <span class="vi">@log2_sect_size</span>
|
|
119
|
+
<span class="vi">@short_sect_size</span> <span class="o">=</span> <span class="mi">1</span> <span class="o"><<</span> <span class="vi">@log2_short_sect_size</span>
|
|
120
|
+
<span class="k">end</span>
|
|
121
|
+
|
|
122
|
+
<span class="k">def</span> <span class="nf">build_msat</span>
|
|
123
|
+
<span class="vi">@msat</span> <span class="o">=</span> <span class="vi">@header</span><span class="o">[</span><span class="mi">76</span><span class="o">.</span><span class="n">.</span><span class="o">-</span><span class="mi">1</span><span class="o">].</span><span class="n">unpack</span><span class="p">(</span><span class="s1">'V109'</span><span class="p">)</span>
|
|
124
|
+
<span class="n">next_sector</span> <span class="o">=</span> <span class="vi">@msat_start_sid</span>
|
|
125
|
+
<span class="k">while</span> <span class="n">next_sector</span> <span class="o">></span> <span class="mi">0</span> <span class="k">do</span>
|
|
126
|
+
<span class="k">raise</span> <span class="s2">"not implemented"</span>
|
|
127
|
+
<span class="n">start</span> <span class="o">=</span> <span class="n">next_sector</span> <span class="o">*</span> <span class="vi">@sect_size</span>
|
|
128
|
+
<span class="n">finish</span> <span class="o">=</span> <span class="p">(</span><span class="n">next_sector</span> <span class="o">+</span> <span class="mi">1</span><span class="p">)</span> <span class="o">*</span> <span class="vi">@sect_size</span>
|
|
129
|
+
<span class="n">msat_sector</span> <span class="o">=</span> <span class="vi">@data</span><span class="o">[</span><span class="n">start</span><span class="o">.</span><span class="n">.</span><span class="o">.</span><span class="n">finish</span><span class="o">]</span>
|
|
130
|
+
<span class="vi">@msat</span> <span class="o"><<</span> <span class="n">msat_sector</span>
|
|
131
|
+
<span class="n">next_sector</span> <span class="o">=</span> <span class="n">msat_sector</span><span class="o">[-</span><span class="mi">1</span><span class="o">]</span>
|
|
132
|
+
<span class="k">end</span>
|
|
133
|
+
<span class="k">end</span>
|
|
134
|
+
|
|
135
|
+
<span class="k">def</span> <span class="nf">build_sat</span>
|
|
136
|
+
<span class="n">sat_stream</span> <span class="o">=</span> <span class="vi">@msat</span><span class="o">.</span><span class="n">collect</span> <span class="p">{</span><span class="o">|</span><span class="n">i</span><span class="o">|</span> <span class="n">i</span> <span class="o">>=</span> <span class="mi">0</span> <span class="o">?</span> <span class="vi">@data</span><span class="o">[</span><span class="p">(</span><span class="n">i</span><span class="o">*</span><span class="vi">@sect_size</span><span class="p">)</span><span class="o">.</span><span class="n">.</span><span class="o">.</span><span class="p">((</span><span class="n">i</span><span class="o">+</span><span class="mi">1</span><span class="p">)</span><span class="o">*</span><span class="vi">@sect_size</span><span class="p">)</span><span class="o">]</span> <span class="p">:</span> <span class="s1">''</span> <span class="p">}</span><span class="o">.</span><span class="n">join</span>
|
|
137
|
+
<span class="vi">@sat</span> <span class="o">=</span> <span class="n">sat_stream</span><span class="o">.</span><span class="n">unpack</span><span class="p">(</span><span class="s1">'V*'</span><span class="p">)</span>
|
|
138
|
+
<span class="k">end</span>
|
|
139
|
+
|
|
140
|
+
<span class="k">def</span> <span class="nf">build_ssat</span>
|
|
141
|
+
<span class="n">ssat_stream</span> <span class="o">=</span> <span class="n">stream_data</span><span class="p">(</span><span class="vi">@data</span><span class="p">,</span> <span class="vi">@sat</span><span class="p">,</span> <span class="vi">@ssat_start_sid</span><span class="p">,</span> <span class="vi">@sect_size</span><span class="p">)</span>
|
|
142
|
+
<span class="vi">@ssat</span> <span class="o">=</span> <span class="n">ssat_stream</span><span class="o">.</span><span class="n">unpack</span><span class="p">(</span><span class="s1">'V*'</span><span class="p">)</span>
|
|
143
|
+
<span class="k">end</span>
|
|
144
|
+
|
|
145
|
+
<span class="k">def</span> <span class="nf">build_directory</span>
|
|
146
|
+
<span class="n">dir_stream</span> <span class="o">=</span> <span class="n">stream_data</span><span class="p">(</span><span class="vi">@data</span><span class="p">,</span> <span class="vi">@sat</span><span class="p">,</span> <span class="vi">@dir_start_sid</span><span class="p">,</span> <span class="vi">@sect_size</span><span class="p">)</span>
|
|
147
|
+
<span class="vi">@dir_entry_list</span> <span class="o">=</span> <span class="o">[]</span>
|
|
148
|
+
<span class="n">i</span> <span class="o">=</span> <span class="mi">0</span>
|
|
149
|
+
<span class="k">while</span> <span class="n">i</span> <span class="o"><</span> <span class="n">dir_stream</span><span class="o">.</span><span class="n">length</span> <span class="k">do</span>
|
|
150
|
+
<span class="n">dentry</span> <span class="o">=</span> <span class="n">dir_stream</span><span class="o">[</span><span class="n">i</span><span class="o">.</span><span class="n">.</span><span class="o">.</span><span class="p">(</span><span class="n">i</span><span class="o">+</span><span class="no">DIR_ENTRY_SIZE</span><span class="p">)</span><span class="o">]</span>
|
|
151
|
+
<span class="n">i</span> <span class="o">+=</span> <span class="no">DIR_ENTRY_SIZE</span>
|
|
152
|
+
|
|
153
|
+
<span class="n">did</span> <span class="o">=</span> <span class="vi">@dir_entry_list</span><span class="o">.</span><span class="n">length</span>
|
|
154
|
+
<span class="n">sz</span> <span class="o">=</span> <span class="n">dentry</span><span class="o">[</span><span class="mi">64</span><span class="o">.</span><span class="n">.</span><span class="o">.</span><span class="mi">66</span><span class="o">].</span><span class="n">unpack</span><span class="p">(</span><span class="s1">'C'</span><span class="p">)</span><span class="o">[</span><span class="mi">0</span><span class="o">]</span>
|
|
155
|
+
|
|
156
|
+
<span class="k">if</span> <span class="n">sz</span> <span class="o">></span> <span class="mi">0</span>
|
|
157
|
+
<span class="nb">name</span> <span class="o">=</span> <span class="n">dentry</span><span class="o">[</span><span class="mi">0</span><span class="o">.</span><span class="n">.</span><span class="o">.</span><span class="p">(</span><span class="n">sz</span><span class="o">-</span><span class="mi">2</span><span class="p">)</span><span class="o">]</span> <span class="c1"># TODO unicode</span>
|
|
158
|
+
<span class="k">else</span>
|
|
159
|
+
<span class="nb">name</span> <span class="o">=</span> <span class="s1">''</span>
|
|
160
|
+
<span class="k">end</span>
|
|
161
|
+
|
|
162
|
+
<span class="n">t</span> <span class="o">=</span> <span class="n">dentry</span><span class="o">[</span><span class="mi">66</span><span class="o">.</span><span class="n">.</span><span class="o">.</span><span class="mi">67</span><span class="o">].</span><span class="n">unpack</span><span class="p">(</span><span class="s1">'C'</span><span class="p">)</span><span class="o">[</span><span class="mi">0</span><span class="o">]</span>
|
|
163
|
+
<span class="n">c</span> <span class="o">=</span> <span class="n">dentry</span><span class="o">[</span><span class="mi">67</span><span class="o">.</span><span class="n">.</span><span class="o">.</span><span class="mi">68</span><span class="o">].</span><span class="n">unpack</span><span class="p">(</span><span class="s1">'C'</span><span class="p">)</span><span class="o">[</span><span class="mi">0</span><span class="o">]</span>
|
|
164
|
+
<span class="n">did_left</span> <span class="o">=</span> <span class="n">dentry</span><span class="o">[</span><span class="mi">68</span><span class="o">.</span><span class="n">.</span><span class="o">.</span><span class="mi">72</span><span class="o">].</span><span class="n">unpack</span><span class="p">(</span><span class="s1">'V'</span><span class="p">)</span><span class="o">[</span><span class="mi">0</span><span class="o">]</span>
|
|
165
|
+
<span class="n">did_right</span> <span class="o">=</span> <span class="n">dentry</span><span class="o">[</span><span class="mi">72</span><span class="o">.</span><span class="n">.</span><span class="o">.</span><span class="mi">76</span><span class="o">].</span><span class="n">unpack</span><span class="p">(</span><span class="s1">'V'</span><span class="p">)</span><span class="o">[</span><span class="mi">0</span><span class="o">]</span>
|
|
166
|
+
<span class="n">did_root</span> <span class="o">=</span> <span class="n">dentry</span><span class="o">[</span><span class="mi">76</span><span class="o">.</span><span class="n">.</span><span class="o">.</span><span class="mi">80</span><span class="o">].</span><span class="n">unpack</span><span class="p">(</span><span class="s1">'V'</span><span class="p">)</span><span class="o">[</span><span class="mi">0</span><span class="o">]</span>
|
|
167
|
+
<span class="n">dentry_start_sid</span> <span class="o">=</span> <span class="n">dentry</span><span class="o">[</span><span class="mi">116</span><span class="o">.</span><span class="n">.</span><span class="o">.</span><span class="mi">120</span><span class="o">].</span><span class="n">unpack</span><span class="p">(</span><span class="s1">'V'</span><span class="p">)</span><span class="o">[</span><span class="mi">0</span><span class="o">]</span>
|
|
168
|
+
<span class="n">stream_size</span> <span class="o">=</span> <span class="n">dentry</span><span class="o">[</span><span class="mi">120</span><span class="o">.</span><span class="n">.</span><span class="o">.</span><span class="mi">124</span><span class="o">].</span><span class="n">unpack</span><span class="p">(</span><span class="s1">'V'</span><span class="p">)</span><span class="o">[</span><span class="mi">0</span><span class="o">]</span>
|
|
169
|
+
|
|
170
|
+
<span class="vi">@dir_entry_list</span> <span class="o"><<</span> <span class="o">[</span><span class="n">did</span><span class="p">,</span> <span class="n">sz</span><span class="p">,</span> <span class="nb">name</span><span class="p">,</span> <span class="n">t</span><span class="p">,</span> <span class="n">c</span><span class="p">,</span> <span class="n">did_left</span><span class="p">,</span> <span class="n">did_right</span><span class="p">,</span> <span class="n">did_root</span><span class="p">,</span> <span class="n">dentry_start_sid</span><span class="p">,</span> <span class="n">stream_size</span><span class="o">]</span>
|
|
171
|
+
<span class="k">end</span>
|
|
172
|
+
<span class="k">end</span>
|
|
173
|
+
|
|
174
|
+
<span class="k">def</span> <span class="nf">build_short_sectors_data</span>
|
|
175
|
+
<span class="n">did</span><span class="p">,</span> <span class="n">sz</span><span class="p">,</span> <span class="nb">name</span><span class="p">,</span> <span class="n">t</span><span class="p">,</span> <span class="n">c</span><span class="p">,</span> <span class="n">did_left</span><span class="p">,</span> <span class="n">did_right</span><span class="p">,</span> <span class="n">did_root</span><span class="p">,</span> <span class="n">dentry_start_sid</span><span class="p">,</span> <span class="n">stream_size</span> <span class="o">=</span> <span class="vi">@dir_entry_list</span><span class="o">[</span><span class="mi">0</span><span class="o">]</span>
|
|
176
|
+
<span class="k">raise</span> <span class="k">unless</span> <span class="n">t</span> <span class="o">==</span> <span class="mh">0x05</span> <span class="c1"># Short-Stream Container Stream (SSCS) resides in Root Storage</span>
|
|
177
|
+
|
|
178
|
+
<span class="k">if</span> <span class="n">stream_size</span> <span class="o">==</span> <span class="mi">0</span>
|
|
179
|
+
<span class="vi">@short_sectors_data</span> <span class="o">=</span> <span class="s1">''</span>
|
|
180
|
+
<span class="k">else</span>
|
|
181
|
+
<span class="vi">@short_sectors_data</span> <span class="o">=</span> <span class="n">stream_data</span><span class="p">(</span><span class="vi">@data</span><span class="p">,</span> <span class="vi">@sat</span><span class="p">,</span> <span class="n">dentry_start_sid</span><span class="p">,</span> <span class="vi">@sect_size</span><span class="p">)</span>
|
|
182
|
+
<span class="k">end</span>
|
|
183
|
+
<span class="k">end</span>
|
|
184
|
+
|
|
185
|
+
<span class="k">def</span> <span class="nf">stream_data</span><span class="p">(</span><span class="n">data</span><span class="p">,</span> <span class="n">sat</span><span class="p">,</span> <span class="n">start_sid</span><span class="p">,</span> <span class="n">sect_size</span><span class="p">)</span>
|
|
186
|
+
<span class="n">sid</span> <span class="o">=</span> <span class="n">start_sid</span>
|
|
187
|
+
<span class="n">chunks</span> <span class="o">=</span> <span class="o">[[</span><span class="n">sid</span><span class="p">,</span> <span class="n">sid</span><span class="o">]]</span>
|
|
188
|
+
<span class="n">stream_data</span> <span class="o">=</span> <span class="s1">''</span>
|
|
189
|
+
<span class="k">while</span> <span class="n">sat</span><span class="o">[</span><span class="n">sid</span><span class="o">]</span> <span class="o">>=</span> <span class="mi">0</span> <span class="k">do</span>
|
|
190
|
+
<span class="n">next_in_chain</span> <span class="o">=</span> <span class="n">sat</span><span class="o">[</span><span class="n">sid</span><span class="o">]</span>
|
|
191
|
+
<span class="n">last_chunk_start</span><span class="p">,</span> <span class="n">last_chunk_finish</span> <span class="o">=</span> <span class="n">chunks</span><span class="o">[-</span><span class="mi">1</span><span class="o">]</span>
|
|
192
|
+
<span class="k">if</span> <span class="n">next_in_chain</span> <span class="o">==</span> <span class="n">last_chunk_finish</span> <span class="o">+</span> <span class="mi">1</span>
|
|
193
|
+
<span class="n">chunks</span><span class="o">[-</span><span class="mi">1</span><span class="o">]</span> <span class="o">=</span> <span class="n">last_chunk_start</span><span class="p">,</span> <span class="n">next_in_chain</span>
|
|
194
|
+
<span class="k">else</span>
|
|
195
|
+
<span class="n">chunks</span> <span class="o"><<</span> <span class="o">[</span><span class="n">next_in_chain</span><span class="p">,</span> <span class="n">next_in_chain</span><span class="o">]</span>
|
|
196
|
+
<span class="k">end</span>
|
|
197
|
+
<span class="n">sid</span> <span class="o">=</span> <span class="n">next_in_chain</span>
|
|
198
|
+
<span class="k">end</span>
|
|
199
|
+
|
|
200
|
+
<span class="n">chunks</span><span class="o">.</span><span class="n">each</span> <span class="k">do</span> <span class="o">|</span><span class="n">s</span><span class="p">,</span> <span class="n">f</span><span class="o">|</span>
|
|
201
|
+
<span class="n">stream_data</span> <span class="o">+=</span> <span class="n">data</span><span class="o">[</span><span class="n">s</span><span class="o">*</span><span class="n">sect_size</span><span class="o">.</span><span class="n">.</span><span class="o">.</span><span class="p">(</span><span class="n">f</span><span class="o">+</span><span class="mi">1</span><span class="p">)</span><span class="o">*</span><span class="n">sect_size</span><span class="o">]</span>
|
|
202
|
+
<span class="k">end</span>
|
|
203
|
+
<span class="n">stream_data</span>
|
|
204
|
+
<span class="k">end</span>
|
|
205
|
+
<span class="k">end</span>
|
|
206
|
+
|
|
207
|
+
|
|
208
|
+
<span class="c1"># This implementation writes only 'Root Entry', 'Workbook' streams</span>
|
|
209
|
+
<span class="c1"># and 2 empty streams for aligning directory stream on sector boundary</span>
|
|
210
|
+
<span class="c1"># </span>
|
|
211
|
+
<span class="c1"># LAYOUT:</span>
|
|
212
|
+
<span class="c1"># 0 header</span>
|
|
213
|
+
<span class="c1"># 76 MSAT (1st part: 109 SID)</span>
|
|
214
|
+
<span class="c1"># 512 workbook stream</span>
|
|
215
|
+
<span class="c1"># ... additional MSAT sectors if streams' size > about 7 Mb == (109*512 * 128)</span>
|
|
216
|
+
<span class="c1"># ... SAT</span>
|
|
217
|
+
<span class="c1"># ... directory stream</span>
|
|
218
|
+
<span class="c1">#</span>
|
|
219
|
+
<span class="c1"># NOTE: this layout is "ad hoc". It can be more general. RTFM</span>
|
|
220
|
+
<span class="k">class</span> <span class="nc">ExcelDocument</span>
|
|
221
|
+
<span class="no">SECTOR_SIZE</span> <span class="o">=</span> <span class="mh">0x0200</span>
|
|
222
|
+
<span class="no">MIN_LIMIT</span> <span class="o">=</span> <span class="mh">0x1000</span>
|
|
223
|
+
|
|
224
|
+
<span class="no">SID_FREE_SECTOR</span> <span class="o">=</span> <span class="o">-</span><span class="mi">1</span>
|
|
225
|
+
<span class="no">SID_END_OF_CHAIN</span> <span class="o">=</span> <span class="o">-</span><span class="mi">2</span>
|
|
226
|
+
<span class="no">SID_USED_BY_SAT</span> <span class="o">=</span> <span class="o">-</span><span class="mi">3</span>
|
|
227
|
+
<span class="no">SID_USED_BY_MSAT</span> <span class="o">=</span> <span class="o">-</span><span class="mi">4</span>
|
|
228
|
+
|
|
229
|
+
<span class="k">def</span> <span class="nf">initialize</span>
|
|
230
|
+
<span class="vi">@book_stream_sect</span> <span class="o">=</span> <span class="o">[]</span>
|
|
231
|
+
<span class="vi">@dir_stream_sect</span> <span class="o">=</span> <span class="o">[]</span>
|
|
232
|
+
|
|
233
|
+
<span class="vi">@packed_sat</span> <span class="o">=</span> <span class="s1">''</span>
|
|
234
|
+
<span class="vi">@sat_sect</span> <span class="o">=</span> <span class="o">[]</span>
|
|
235
|
+
|
|
236
|
+
<span class="vi">@packed_msat_1st</span> <span class="o">=</span> <span class="s1">''</span>
|
|
237
|
+
<span class="vi">@packed_msat_2nd</span> <span class="o">=</span> <span class="s1">''</span>
|
|
238
|
+
<span class="vi">@msat_sect_2nd</span> <span class="o">=</span> <span class="o">[]</span>
|
|
239
|
+
<span class="vi">@header</span> <span class="o">=</span> <span class="s1">''</span>
|
|
240
|
+
<span class="k">end</span>
|
|
241
|
+
|
|
242
|
+
<span class="k">def</span> <span class="nf">build_directory</span>
|
|
243
|
+
<span class="vi">@dir_stream</span> <span class="o">=</span> <span class="s1">''</span>
|
|
244
|
+
|
|
245
|
+
<span class="nb">name</span> <span class="o">=</span> <span class="s1">'Root Entry'</span>
|
|
246
|
+
<span class="nb">type</span> <span class="o">=</span> <span class="mh">0x05</span> <span class="c1"># root storage</span>
|
|
247
|
+
<span class="n">colour</span> <span class="o">=</span> <span class="mh">0x01</span> <span class="c1"># black</span>
|
|
248
|
+
<span class="n">did_left</span> <span class="o">=</span> <span class="o">-</span><span class="mi">1</span>
|
|
249
|
+
<span class="n">did_right</span> <span class="o">=</span> <span class="o">-</span><span class="mi">1</span>
|
|
250
|
+
<span class="n">did_root</span> <span class="o">=</span> <span class="mi">1</span>
|
|
251
|
+
<span class="n">start_sid</span> <span class="o">=</span> <span class="o">-</span><span class="mi">2</span>
|
|
252
|
+
<span class="n">stream_sz</span> <span class="o">=</span> <span class="mi">0</span>
|
|
253
|
+
<span class="vi">@dir_stream</span> <span class="o">+=</span> <span class="n">pack_directory</span><span class="p">(</span><span class="nb">name</span><span class="p">,</span> <span class="nb">type</span><span class="p">,</span> <span class="n">colour</span><span class="p">,</span> <span class="n">did_left</span><span class="p">,</span> <span class="n">did_right</span><span class="p">,</span> <span class="n">did_root</span><span class="p">,</span> <span class="n">start_sid</span><span class="p">,</span> <span class="n">stream_sz</span><span class="p">)</span>
|
|
254
|
+
|
|
255
|
+
<span class="nb">name</span> <span class="o">=</span> <span class="s1">'Workbook'</span>
|
|
256
|
+
<span class="nb">type</span> <span class="o">=</span> <span class="mh">0x02</span> <span class="c1"># user stream</span>
|
|
257
|
+
<span class="n">colour</span> <span class="o">=</span> <span class="mh">0x01</span> <span class="c1"># black</span>
|
|
258
|
+
<span class="n">did_left</span> <span class="o">=</span> <span class="o">-</span><span class="mi">1</span>
|
|
259
|
+
<span class="n">did_right</span> <span class="o">=</span> <span class="o">-</span><span class="mi">1</span>
|
|
260
|
+
<span class="n">did_root</span> <span class="o">=</span> <span class="o">-</span><span class="mi">1</span>
|
|
261
|
+
<span class="n">start_sid</span> <span class="o">=</span> <span class="mi">0</span>
|
|
262
|
+
<span class="n">stream_sz</span> <span class="o">=</span> <span class="vi">@book_stream_len</span>
|
|
263
|
+
<span class="vi">@dir_stream</span> <span class="o">+=</span> <span class="n">pack_directory</span><span class="p">(</span><span class="nb">name</span><span class="p">,</span> <span class="nb">type</span><span class="p">,</span> <span class="n">colour</span><span class="p">,</span> <span class="n">did_left</span><span class="p">,</span> <span class="n">did_right</span><span class="p">,</span> <span class="n">did_root</span><span class="p">,</span> <span class="n">start_sid</span><span class="p">,</span> <span class="n">stream_sz</span><span class="p">)</span>
|
|
264
|
+
<span class="c1"># padding</span>
|
|
265
|
+
<span class="nb">name</span> <span class="o">=</span> <span class="s1">''</span>
|
|
266
|
+
<span class="nb">type</span> <span class="o">=</span> <span class="mh">0x00</span> <span class="c1"># empty</span>
|
|
267
|
+
<span class="n">colour</span> <span class="o">=</span> <span class="mh">0x01</span> <span class="c1"># black</span>
|
|
268
|
+
<span class="n">did_left</span> <span class="o">=</span> <span class="o">-</span><span class="mi">1</span>
|
|
269
|
+
<span class="n">did_right</span> <span class="o">=</span> <span class="o">-</span><span class="mi">1</span>
|
|
270
|
+
<span class="n">did_root</span> <span class="o">=</span> <span class="o">-</span><span class="mi">1</span>
|
|
271
|
+
<span class="n">start_sid</span> <span class="o">=</span> <span class="o">-</span><span class="mi">2</span>
|
|
272
|
+
<span class="n">stream_sz</span> <span class="o">=</span> <span class="mi">0</span>
|
|
273
|
+
<span class="vi">@dir_stream</span> <span class="o">+=</span> <span class="n">pack_directory</span><span class="p">(</span><span class="nb">name</span><span class="p">,</span> <span class="nb">type</span><span class="p">,</span> <span class="n">colour</span><span class="p">,</span> <span class="n">did_left</span><span class="p">,</span> <span class="n">did_right</span><span class="p">,</span> <span class="n">did_root</span><span class="p">,</span> <span class="n">start_sid</span><span class="p">,</span> <span class="n">stream_sz</span><span class="p">)</span> <span class="o">*</span> <span class="mi">2</span>
|
|
274
|
+
<span class="k">end</span>
|
|
275
|
+
|
|
276
|
+
<span class="k">def</span> <span class="nf">pack_directory</span><span class="p">(</span><span class="nb">name</span><span class="p">,</span> <span class="nb">type</span><span class="p">,</span> <span class="n">colour</span><span class="p">,</span> <span class="n">did_left</span><span class="p">,</span> <span class="n">did_right</span><span class="p">,</span> <span class="n">did_root</span><span class="p">,</span> <span class="n">start_sid</span><span class="p">,</span> <span class="n">stream_sz</span><span class="p">)</span>
|
|
277
|
+
<span class="n">encoded_name</span> <span class="o">=</span> <span class="s1">''</span>
|
|
278
|
+
<span class="mi">0</span><span class="o">.</span><span class="n">upto</span><span class="p">(</span><span class="nb">name</span><span class="o">.</span><span class="n">length</span><span class="p">)</span> <span class="k">do</span> <span class="o">|</span><span class="n">i</span><span class="o">|</span>
|
|
279
|
+
<span class="n">encoded_name</span> <span class="o"><<</span> <span class="nb">name</span><span class="o">[</span><span class="n">i</span><span class="p">,</span> <span class="mi">1</span><span class="o">]</span> <span class="o">+</span> <span class="s2">"</span><span class="se">\000</span><span class="s2">"</span>
|
|
280
|
+
<span class="k">end</span>
|
|
281
|
+
<span class="n">encoded_name</span> <span class="o"><<</span> <span class="s2">"</span><span class="se">\000</span><span class="s2">"</span>
|
|
282
|
+
<span class="n">name_sz</span> <span class="o">=</span> <span class="n">encoded_name</span><span class="o">.</span><span class="n">length</span>
|
|
283
|
+
|
|
284
|
+
<span class="n">args</span> <span class="o">=</span> <span class="o">[</span><span class="n">encoded_name</span><span class="p">,</span> <span class="n">name_sz</span><span class="p">,</span> <span class="nb">type</span><span class="p">,</span> <span class="n">colour</span><span class="p">,</span> <span class="n">did_left</span><span class="p">,</span> <span class="n">did_right</span><span class="p">,</span> <span class="n">did_root</span><span class="p">,</span> <span class="mi">0</span><span class="p">,</span> <span class="mi">0</span><span class="p">,</span> <span class="mi">0</span><span class="p">,</span> <span class="mi">0</span><span class="p">,</span> <span class="mi">0</span><span class="p">,</span> <span class="mi">0</span><span class="p">,</span> <span class="mi">0</span><span class="p">,</span> <span class="mi">0</span><span class="p">,</span> <span class="mi">0</span><span class="p">,</span> <span class="n">start_sid</span><span class="p">,</span> <span class="n">stream_sz</span><span class="p">,</span> <span class="mi">0</span><span class="o">]</span>
|
|
285
|
+
<span class="n">args</span><span class="o">.</span><span class="n">pack</span><span class="p">(</span><span class="s1">'a64 v C2 V3 V9 V V2'</span><span class="p">)</span>
|
|
286
|
+
<span class="k">end</span>
|
|
287
|
+
|
|
288
|
+
<span class="k">def</span> <span class="nf">build_sat</span>
|
|
289
|
+
<span class="n">book_sect_count</span> <span class="o">=</span> <span class="vi">@book_stream_len</span> <span class="o">>></span> <span class="mi">9</span>
|
|
290
|
+
<span class="n">dir_sect_count</span> <span class="o">=</span> <span class="vi">@dir_stream</span><span class="o">.</span><span class="n">length</span> <span class="o">>></span> <span class="mi">9</span>
|
|
291
|
+
<span class="n">total_sect_count</span> <span class="o">=</span> <span class="n">book_sect_count</span> <span class="o">+</span> <span class="n">dir_sect_count</span>
|
|
292
|
+
<span class="n">sat_sect_count</span> <span class="o">=</span> <span class="mi">0</span>
|
|
293
|
+
<span class="n">msat_sect_count</span> <span class="o">=</span> <span class="mi">0</span>
|
|
294
|
+
<span class="n">sat_sect_count_limit</span> <span class="o">=</span> <span class="mi">109</span>
|
|
295
|
+
|
|
296
|
+
<span class="k">while</span> <span class="p">(</span><span class="n">total_sect_count</span> <span class="o">></span> <span class="mi">128</span><span class="o">*</span><span class="n">sat_sect_count</span><span class="p">)</span> <span class="o">||</span> <span class="p">(</span><span class="n">sat_sect_count</span> <span class="o">></span> <span class="n">sat_sect_count_limit</span><span class="p">)</span> <span class="k">do</span>
|
|
297
|
+
<span class="n">sat_sect_count</span> <span class="o">+=</span> <span class="mi">1</span>
|
|
298
|
+
<span class="n">total_sect_count</span> <span class="o">+=</span> <span class="mi">1</span>
|
|
299
|
+
<span class="k">if</span> <span class="n">sat_sect_count</span> <span class="o">></span> <span class="n">sat_sect_count_limit</span>
|
|
300
|
+
<span class="n">msat_sect_count</span> <span class="o">+=</span> <span class="mi">1</span>
|
|
301
|
+
<span class="n">total_sect_count</span> <span class="o">+=</span> <span class="mi">1</span>
|
|
302
|
+
<span class="n">sat_sect_count_limit</span> <span class="o">+=</span> <span class="mi">127</span>
|
|
303
|
+
<span class="k">end</span>
|
|
304
|
+
<span class="k">end</span>
|
|
305
|
+
|
|
306
|
+
<span class="c1"># initialize the sat array to be filled with the "empty" character specified by SID_FREE_SECTOR</span>
|
|
307
|
+
<span class="n">sat</span> <span class="o">=</span> <span class="o">[</span><span class="no">SID_FREE_SECTOR</span><span class="o">]*</span><span class="mi">128</span><span class="o">*</span><span class="n">sat_sect_count</span>
|
|
308
|
+
|
|
309
|
+
<span class="n">sect</span> <span class="o">=</span> <span class="mi">0</span>
|
|
310
|
+
<span class="k">while</span> <span class="n">sect</span> <span class="o"><</span> <span class="n">book_sect_count</span> <span class="o">-</span> <span class="mi">1</span> <span class="k">do</span>
|
|
311
|
+
<span class="vi">@book_stream_sect</span> <span class="o"><<</span> <span class="n">sect</span>
|
|
312
|
+
<span class="n">sat</span><span class="o">[</span><span class="n">sect</span><span class="o">]</span> <span class="o">=</span> <span class="n">sect</span> <span class="o">+</span> <span class="mi">1</span>
|
|
313
|
+
<span class="n">sect</span> <span class="o">+=</span> <span class="mi">1</span>
|
|
314
|
+
<span class="k">end</span>
|
|
315
|
+
<span class="vi">@book_stream_sect</span> <span class="o"><<</span> <span class="n">sect</span>
|
|
316
|
+
<span class="n">sat</span><span class="o">[</span><span class="n">sect</span><span class="o">]</span> <span class="o">=</span> <span class="no">SID_END_OF_CHAIN</span>
|
|
317
|
+
<span class="n">sect</span> <span class="o">+=</span> <span class="mi">1</span>
|
|
318
|
+
|
|
319
|
+
<span class="k">while</span> <span class="n">sect</span> <span class="o"><</span> <span class="n">book_sect_count</span> <span class="o">+</span> <span class="n">msat_sect_count</span> <span class="k">do</span>
|
|
320
|
+
<span class="vi">@msat_sect_2nd</span> <span class="o"><<</span> <span class="n">sect</span>
|
|
321
|
+
<span class="n">sat</span><span class="o">[</span><span class="n">sect</span><span class="o">]</span> <span class="o">=</span> <span class="no">SID_USED_BY_MSAT</span>
|
|
322
|
+
<span class="n">sect</span> <span class="o">+=</span> <span class="mi">1</span>
|
|
323
|
+
<span class="k">end</span>
|
|
324
|
+
|
|
325
|
+
<span class="k">while</span> <span class="n">sect</span> <span class="o"><</span> <span class="n">book_sect_count</span> <span class="o">+</span> <span class="n">msat_sect_count</span> <span class="o">+</span> <span class="n">sat_sect_count</span> <span class="k">do</span>
|
|
326
|
+
<span class="vi">@sat_sect</span> <span class="o"><<</span> <span class="n">sect</span>
|
|
327
|
+
<span class="n">sat</span><span class="o">[</span><span class="n">sect</span><span class="o">]</span> <span class="o">=</span> <span class="no">SID_USED_BY_SAT</span>
|
|
328
|
+
<span class="n">sect</span> <span class="o">+=</span> <span class="mi">1</span>
|
|
329
|
+
<span class="k">end</span>
|
|
330
|
+
|
|
331
|
+
<span class="k">while</span> <span class="n">sect</span> <span class="o"><</span> <span class="n">book_sect_count</span> <span class="o">+</span> <span class="n">msat_sect_count</span> <span class="o">+</span> <span class="n">sat_sect_count</span> <span class="o">+</span> <span class="n">dir_sect_count</span> <span class="o">-</span> <span class="mi">1</span> <span class="k">do</span>
|
|
332
|
+
<span class="vi">@dir_stream_sect</span> <span class="o"><<</span> <span class="n">sect</span>
|
|
333
|
+
<span class="n">sat</span><span class="o">[</span><span class="n">sect</span><span class="o">]</span> <span class="o">=</span> <span class="n">sect</span> <span class="o">+</span> <span class="mi">1</span>
|
|
334
|
+
<span class="n">sect</span> <span class="o">+=</span> <span class="mi">1</span>
|
|
335
|
+
<span class="k">end</span>
|
|
336
|
+
|
|
337
|
+
<span class="vi">@dir_stream_sect</span> <span class="o"><<</span> <span class="n">sect</span>
|
|
338
|
+
<span class="n">sat</span><span class="o">[</span><span class="n">sect</span><span class="o">]</span> <span class="o">=</span> <span class="no">SID_END_OF_CHAIN</span>
|
|
339
|
+
<span class="n">sect</span> <span class="o">+=</span> <span class="mi">1</span>
|
|
340
|
+
|
|
341
|
+
<span class="vi">@packed_sat</span> <span class="o">=</span> <span class="n">sat</span><span class="o">.</span><span class="n">pack</span><span class="p">(</span><span class="s1">'V*'</span><span class="p">)</span>
|
|
342
|
+
|
|
343
|
+
<span class="n">msat_1st</span> <span class="o">=</span> <span class="o">[]</span>
|
|
344
|
+
<span class="mi">109</span><span class="o">.</span><span class="n">times</span> <span class="k">do</span> <span class="o">|</span><span class="n">i</span><span class="o">|</span>
|
|
345
|
+
<span class="n">msat_1st</span><span class="o">[</span><span class="n">i</span><span class="o">]</span> <span class="o">=</span> <span class="vi">@sat_sect</span><span class="o">[</span><span class="n">i</span><span class="o">]</span> <span class="o">||</span> <span class="no">SID_FREE_SECTOR</span>
|
|
346
|
+
<span class="k">end</span>
|
|
347
|
+
<span class="vi">@packed_msat_1st</span> <span class="o">=</span> <span class="n">msat_1st</span><span class="o">.</span><span class="n">pack</span><span class="p">(</span><span class="s1">'V*'</span><span class="p">)</span>
|
|
348
|
+
|
|
349
|
+
<span class="n">msat_2nd</span> <span class="o">=</span> <span class="o">[</span><span class="no">SID_FREE_SECTOR</span><span class="o">]</span> <span class="o">*</span> <span class="mi">128</span> <span class="o">*</span> <span class="n">msat_sect_count</span>
|
|
350
|
+
<span class="n">msat_2nd</span><span class="o">[-</span><span class="mi">1</span><span class="o">]</span> <span class="o">=</span> <span class="no">SID_END_OF_CHAIN</span> <span class="k">if</span> <span class="n">msat_sect_count</span> <span class="o">></span> <span class="mi">0</span>
|
|
351
|
+
|
|
352
|
+
<span class="n">i</span> <span class="o">=</span> <span class="mi">109</span>
|
|
353
|
+
<span class="n">msat_sect</span> <span class="o">=</span> <span class="mi">0</span>
|
|
354
|
+
<span class="n">sid_num</span> <span class="o">=</span> <span class="mi">0</span>
|
|
355
|
+
|
|
356
|
+
<span class="k">while</span> <span class="n">i</span> <span class="o"><</span> <span class="n">sat_sect_count</span> <span class="k">do</span>
|
|
357
|
+
<span class="k">if</span> <span class="p">(</span><span class="n">sid_num</span> <span class="o">+</span> <span class="mi">1</span><span class="p">)</span> <span class="o">%</span> <span class="mi">128</span> <span class="o">==</span> <span class="mi">0</span>
|
|
358
|
+
<span class="n">msat_sect</span> <span class="o">+=</span> <span class="mi">1</span>
|
|
359
|
+
<span class="n">msat_2nd</span><span class="o">[</span><span class="n">sid_num</span><span class="o">]</span> <span class="o">=</span> <span class="vi">@msat_sect_2nd</span><span class="o">[</span><span class="n">msat_sect</span><span class="o">]</span> <span class="k">if</span> <span class="n">msat_sect</span> <span class="o"><</span> <span class="vi">@msat_sect_2nd</span><span class="o">.</span><span class="n">length</span>
|
|
360
|
+
<span class="k">else</span>
|
|
361
|
+
<span class="n">msat_2nd</span><span class="o">[</span><span class="n">sid_num</span><span class="o">]</span> <span class="o">=</span> <span class="vi">@sat_sect</span><span class="o">[</span><span class="n">i</span><span class="o">]</span>
|
|
362
|
+
<span class="n">i</span> <span class="o">+=</span> <span class="mi">1</span>
|
|
363
|
+
<span class="k">end</span>
|
|
364
|
+
<span class="n">sid_num</span> <span class="o">+=</span> <span class="mi">1</span>
|
|
365
|
+
<span class="k">end</span>
|
|
366
|
+
|
|
367
|
+
<span class="vi">@packed_msat_2nd</span> <span class="o">=</span> <span class="n">msat_2nd</span><span class="o">.</span><span class="n">pack</span><span class="p">(</span><span class="s1">'V*'</span><span class="p">)</span>
|
|
368
|
+
<span class="k">end</span>
|
|
369
|
+
|
|
370
|
+
<span class="k">def</span> <span class="nf">build_header</span>
|
|
371
|
+
<span class="n">doc_magic</span> <span class="o">=</span> <span class="s2">"</span><span class="se">\320\317\021\340\241\261\032\341</span><span class="s2">"</span>
|
|
372
|
+
<span class="n">file_uid</span> <span class="o">=</span> <span class="s2">"</span><span class="se">\000</span><span class="s2">"</span> <span class="o">*</span> <span class="mi">16</span>
|
|
373
|
+
<span class="n">rev_num</span> <span class="o">=</span> <span class="s2">"></span><span class="se">\000</span><span class="s2">"</span>
|
|
374
|
+
<span class="n">ver_num</span> <span class="o">=</span> <span class="s2">"</span><span class="se">\003\000</span><span class="s2">"</span>
|
|
375
|
+
<span class="n">byte_order</span> <span class="o">=</span> <span class="s2">"</span><span class="se">\376\377</span><span class="s2">"</span>
|
|
376
|
+
<span class="n">log_sect_size</span> <span class="o">=</span> <span class="o">[</span><span class="mi">9</span><span class="o">].</span><span class="n">pack</span><span class="p">(</span><span class="s1">'v'</span><span class="p">)</span>
|
|
377
|
+
<span class="n">log_short_sect_size</span> <span class="o">=</span> <span class="o">[</span><span class="mi">6</span><span class="o">].</span><span class="n">pack</span><span class="p">(</span><span class="s1">'v'</span><span class="p">)</span>
|
|
378
|
+
<span class="n">not_used0</span> <span class="o">=</span> <span class="s2">"</span><span class="se">\000</span><span class="s2">"</span><span class="o">*</span><span class="mi">10</span>
|
|
379
|
+
<span class="n">total_sat_sectors</span> <span class="o">=</span> <span class="o">[</span><span class="vi">@sat_sect</span><span class="o">.</span><span class="n">length</span><span class="o">].</span><span class="n">pack</span><span class="p">(</span><span class="s1">'V'</span><span class="p">)</span>
|
|
380
|
+
<span class="n">dir_start_sid</span> <span class="o">=</span> <span class="o">[</span><span class="vi">@dir_stream_sect</span><span class="o">[</span><span class="mi">0</span><span class="o">]].</span><span class="n">pack</span><span class="p">(</span><span class="s1">'V'</span><span class="p">)</span>
|
|
381
|
+
<span class="n">not_used1</span> <span class="o">=</span> <span class="s2">"</span><span class="se">\000</span><span class="s2">"</span><span class="o">*</span><span class="mi">4</span>
|
|
382
|
+
<span class="n">min_stream_size</span> <span class="o">=</span> <span class="o">[</span><span class="mh">0x1000</span><span class="o">].</span><span class="n">pack</span><span class="p">(</span><span class="s1">'V'</span><span class="p">)</span>
|
|
383
|
+
<span class="n">ssat_start_sid</span> <span class="o">=</span> <span class="o">[-</span><span class="mi">2</span><span class="o">].</span><span class="n">pack</span><span class="p">(</span><span class="s1">'V'</span><span class="p">)</span>
|
|
384
|
+
<span class="n">total_ssat_sectors</span> <span class="o">=</span> <span class="o">[</span><span class="mi">0</span><span class="o">].</span><span class="n">pack</span><span class="p">(</span><span class="s1">'V'</span><span class="p">)</span>
|
|
385
|
+
|
|
386
|
+
<span class="k">if</span> <span class="vi">@msat_sect_2nd</span><span class="o">.</span><span class="n">length</span> <span class="o">==</span> <span class="mi">0</span>
|
|
387
|
+
<span class="n">msat_start_sid</span> <span class="o">=</span> <span class="o">[-</span><span class="mi">2</span><span class="o">].</span><span class="n">pack</span><span class="p">(</span><span class="s1">'V'</span><span class="p">)</span>
|
|
388
|
+
<span class="k">else</span>
|
|
389
|
+
<span class="n">msat_start_sid</span> <span class="o">=</span> <span class="o">[</span><span class="vi">@msat_sect_2nd</span><span class="o">[</span><span class="mi">0</span><span class="o">]].</span><span class="n">pack</span><span class="p">(</span><span class="s1">'V'</span><span class="p">)</span>
|
|
390
|
+
<span class="k">end</span>
|
|
391
|
+
|
|
392
|
+
<span class="n">total_msat_sectors</span> <span class="o">=</span> <span class="o">[</span><span class="vi">@msat_sect_2nd</span><span class="o">.</span><span class="n">length</span><span class="o">].</span><span class="n">pack</span><span class="p">(</span><span class="s1">'V'</span><span class="p">)</span>
|
|
393
|
+
|
|
394
|
+
<span class="vi">@header</span> <span class="o">=</span> <span class="o">[</span>
|
|
395
|
+
<span class="n">doc_magic</span><span class="p">,</span>
|
|
396
|
+
<span class="n">file_uid</span><span class="p">,</span>
|
|
397
|
+
<span class="n">rev_num</span><span class="p">,</span>
|
|
398
|
+
<span class="n">ver_num</span><span class="p">,</span>
|
|
399
|
+
<span class="n">byte_order</span><span class="p">,</span>
|
|
400
|
+
<span class="n">log_sect_size</span><span class="p">,</span>
|
|
401
|
+
<span class="n">log_short_sect_size</span><span class="p">,</span>
|
|
402
|
+
<span class="n">not_used0</span><span class="p">,</span>
|
|
403
|
+
<span class="n">total_sat_sectors</span><span class="p">,</span>
|
|
404
|
+
<span class="n">dir_start_sid</span><span class="p">,</span>
|
|
405
|
+
<span class="n">not_used1</span><span class="p">,</span>
|
|
406
|
+
<span class="n">min_stream_size</span><span class="p">,</span>
|
|
407
|
+
<span class="n">ssat_start_sid</span><span class="p">,</span>
|
|
408
|
+
<span class="n">total_ssat_sectors</span><span class="p">,</span>
|
|
409
|
+
<span class="n">msat_start_sid</span><span class="p">,</span>
|
|
410
|
+
<span class="n">total_msat_sectors</span>
|
|
411
|
+
<span class="o">].</span><span class="n">join</span>
|
|
412
|
+
<span class="k">end</span>
|
|
413
|
+
|
|
414
|
+
<span class="k">def</span> <span class="nf">data</span><span class="p">(</span><span class="n">stream</span><span class="p">)</span>
|
|
415
|
+
<span class="n">distance_to_end_of_next_sector_boundary</span> <span class="o">=</span> <span class="mh">0x1000</span> <span class="o">-</span> <span class="p">(</span><span class="n">stream</span><span class="o">.</span><span class="n">length</span> <span class="o">%</span> <span class="mh">0x1000</span><span class="p">)</span>
|
|
416
|
+
<span class="vi">@book_stream_len</span> <span class="o">=</span> <span class="n">stream</span><span class="o">.</span><span class="n">length</span> <span class="o">+</span> <span class="n">distance_to_end_of_next_sector_boundary</span>
|
|
417
|
+
<span class="n">padding</span> <span class="o">=</span> <span class="s2">"</span><span class="se">\000</span><span class="s2">"</span> <span class="o">*</span> <span class="n">distance_to_end_of_next_sector_boundary</span>
|
|
418
|
+
|
|
419
|
+
<span class="n">build_directory</span>
|
|
420
|
+
<span class="n">build_sat</span>
|
|
421
|
+
<span class="n">build_header</span>
|
|
422
|
+
|
|
423
|
+
<span class="n">s</span> <span class="o">=</span> <span class="no">StringIO</span><span class="o">.</span><span class="n">new</span>
|
|
424
|
+
<span class="n">s</span><span class="o">.</span><span class="n">write</span><span class="p">(</span><span class="vi">@header</span><span class="p">)</span>
|
|
425
|
+
<span class="n">s</span><span class="o">.</span><span class="n">write</span><span class="p">(</span><span class="vi">@packed_msat_1st</span><span class="p">)</span>
|
|
426
|
+
<span class="n">s</span><span class="o">.</span><span class="n">write</span><span class="p">(</span><span class="n">stream</span><span class="p">)</span>
|
|
427
|
+
<span class="n">s</span><span class="o">.</span><span class="n">write</span><span class="p">(</span><span class="n">padding</span><span class="p">)</span>
|
|
428
|
+
<span class="n">s</span><span class="o">.</span><span class="n">write</span><span class="p">(</span><span class="vi">@packed_msat_2nd</span><span class="p">)</span>
|
|
429
|
+
<span class="n">s</span><span class="o">.</span><span class="n">write</span><span class="p">(</span><span class="vi">@packed_sat</span><span class="p">)</span>
|
|
430
|
+
<span class="n">s</span><span class="o">.</span><span class="n">write</span><span class="p">(</span><span class="vi">@dir_stream</span><span class="p">)</span>
|
|
431
|
+
<span class="n">s</span><span class="o">.</span><span class="n">rewind</span>
|
|
432
|
+
<span class="n">s</span>
|
|
433
|
+
<span class="k">end</span>
|
|
434
|
+
|
|
435
|
+
<span class="k">def</span> <span class="nf">save</span><span class="p">(</span><span class="n">file</span><span class="p">,</span> <span class="n">stream</span><span class="p">)</span>
|
|
436
|
+
<span class="n">we_own_it</span> <span class="o">=</span> <span class="o">!</span><span class="n">file</span><span class="o">.</span><span class="n">respond_to?</span><span class="p">(</span><span class="ss">:write</span><span class="p">)</span>
|
|
437
|
+
<span class="n">file</span> <span class="o">=</span> <span class="no">File</span><span class="o">.</span><span class="n">open</span><span class="p">(</span><span class="n">file</span><span class="p">,</span> <span class="s1">'wb'</span><span class="p">)</span> <span class="k">if</span> <span class="n">we_own_it</span>
|
|
438
|
+
<span class="n">file</span><span class="o">.</span><span class="n">write</span> <span class="n">data</span><span class="p">(</span><span class="n">stream</span><span class="p">)</span><span class="o">.</span><span class="n">read</span>
|
|
439
|
+
<span class="n">file</span><span class="o">.</span><span class="n">close</span> <span class="k">if</span> <span class="n">we_own_it</span>
|
|
440
|
+
<span class="k">end</span>
|
|
441
|
+
<span class="k">end</span>
|
|
442
|
+
</pre></div>
|
|
443
|
+
|
|
444
|
+
|
|
445
|
+
</div>
|
|
446
|
+
<div id="right">
|
|
447
|
+
<ul id="nav">
|
|
448
|
+
<li><a href="surpass-manual-0-0-5.pdf">Download PDF Manual</a></li>
|
|
449
|
+
<li><a href="http://rubyforge.org/projects/surpass">Rubyforge Project Page</a></li>
|
|
450
|
+
</ul>
|
|
451
|
+
<div class="box">
|
|
452
|
+
<h2 style="margin-top:17px">Latest News</h2>
|
|
453
|
+
<ul>
|
|
454
|
+
<li>...</li>
|
|
455
|
+
</ul>
|
|
456
|
+
</div>
|
|
457
|
+
</div>
|
|
458
|
+
<div id="clear"></div></div>
|
|
459
|
+
<div id="footer">
|
|
460
|
+
<p>Site template designed by <a href="http://loadfoo.org/" rel="external">LoadFoO</a>. Valid <a href="http://jigsaw.w3.org/css-validator/check/referer" rel="external">CSS</a> & <a href="http://validator.w3.org/check?uri=referer" rel="external">XHTML</a></p>
|
|
461
|
+
</div>
|
|
462
|
+
</div>
|
|
463
|
+
|
|
464
|
+
</body>
|
|
465
|
+
</html>
|