1 /* Written by Ketmar // Invisible Vector <ketmar@ketmar.no-ip.org>
2 * Understanding is not required. Only obedience.
4 * This program is free software: you can redistribute it and/or modify
5 * it under the terms of the GNU General Public License as published by
6 * the Free Software Foundation, either version 3 of the License, or
7 * (at your option) any later version.
9 * This program is distributed in the hope that it will be useful,
10 * but WITHOUT ANY WARRANTY; without even the implied warranty of
11 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
12 * GNU General Public License for more details.
14 * You should have received a copy of the GNU General Public License
15 * along with this program. If not, see <http://www.gnu.org/licenses/>.
21 import std
.concurrency
;
25 import arsd
.simpledisplay
;
30 import iv
.nanovg
.oui
.blendish
;
40 // ////////////////////////////////////////////////////////////////////////// //
41 BookText
loadBook (string fname
) {
42 __gshared
bool eliteShipsLoaded
= false;
45 //import core.memory : GC;
46 fname
= fname
.expandTilde
.absolutePath
;
47 //conwriteln("loading '", fname, "'...");
49 auto stt
= MonoTime
.currTime
;
50 auto book
= new BookText(fname
);
53 { conwriteln("loaded: '", fname
, "' in ", (MonoTime
.currTime
-stt
).total
!"msecs", " milliseconds"); }
58 foreach (string line
; VFile(buildPath(RcDir
, ".lastfile")).byLineCopy
) {
62 while (lines
.length
&& lines
[$-1].isComment
) {
63 comments
~= lines
[$-1];
64 lines
= lines
[0..$-1];
68 } catch (Exception
) {}
69 try { import std
.file
; mkdirRecurse(RcDir
); } catch (Exception
) {}
70 auto fo
= VFile(buildPath(RcDir
, ".lastfile"), "w");
71 foreach (string s
; lines
) fo
.writeln(s
);
72 foreach_reverse (string s
; comments
) fo
.writeln(s
);
75 stateFileName
= buildPath(RcDir
, fname
.baseName
~".rc");
77 if (!eliteShipsLoaded
) {
79 eliteShipsLoaded
= true;
86 // ////////////////////////////////////////////////////////////////////////// //
87 private struct ImageInfo
{
88 enum MaxIdleFrames
= 5;
94 private __gshared ImageInfo
[] nvgImageIds
;
97 void releaseImages (NVGContext vg
) {
98 if (nvgImageIds
.length
) {
99 foreach (ref ImageInfo nfo
; nvgImageIds
) {
101 if (++nfo
.framesNotUsed
> ImageInfo
.MaxIdleFrames
) {
102 //conwriteln("freeing image with id ", nfo.iid);
103 vg
.deleteImage(nfo
.iid
);
113 private int registerImage (NVGContext vg
, TrueColorImage img
) {
114 if (vg
is null || img
is null) return -1;
115 uint freeIdx
= uint.max
;
116 foreach (immutable idx
, ref ImageInfo nfo
; nvgImageIds
) {
117 if (nfo
.img
is img
) {
118 assert(nfo
.iid
>= 0);
119 nfo
.framesNotUsed
= 0;
122 if (freeIdx
!= uint.max
&& nfo
.iid
< 0) freeIdx
= cast(uint)idx
;
124 int iid
= vg
.createImageFromMemoryImage(img
); //vg.createImageRGBA(img.width, img.height, img.imageData.bytes[], NVGImageFlags.None);
125 if (iid
< 0) return -1;
126 nvgImageIds
~= ImageInfo(iid
, img
, 0);
131 class BookImage
: LayObject
{
135 this (BookText abook
, uint aidx
) { book
= abook
; imageidx
= aidx
; img
= book
.images
[aidx
].img
; }
136 override int width () { return img
.width
; }
137 override int spacewidth () { return 0; }
138 override int height () { return img
.height
; }
139 override int ascent () { return img
.height
; }
140 override int descent () { return 0; }
141 override bool canbreak () { return true; }
142 override bool spaced () { return false; }
143 override void draw (NVGContext vg
, float x
, float y
) {
146 scope(exit
) vg
.restore();
148 int iid
= vg
.registerImage(img
);
150 vg
.fillPaint(vg
.imagePattern(x
, y
, img
.width
, img
.height
, 0, iid
));
151 //vg.globalAlpha(0.5);
152 vg
.rect(x
, y
, img
.width
, img
.height
);
158 // ////////////////////////////////////////////////////////////////////////// //
162 uint wordidx
; // first word
165 Anc
[uint] hrefs
; // `name` is dest
170 // ////////////////////////////////////////////////////////////////////////// //
171 private void fixFont (LayText lay
) {
172 if (lay
.fontStyle
.italic
) {
173 if (lay
.fontStyle
.bold
) lay
.fontStyle
.fontface
= lay
.fontFaceId("textz");
174 else lay
.fontStyle
.fontface
= lay
.fontFaceId("texti");
175 } else if (lay
.fontStyle
.bold
) {
176 if (lay
.fontStyle
.italic
) lay
.fontStyle
.fontface
= lay
.fontFaceId("textz");
177 else lay
.fontStyle
.fontface
= lay
.fontFaceId("textb");
179 lay
.fontStyle
.fontface
= lay
.fontFaceId("text");
183 private void setNormalStyle (LayText lay
) {
184 lay
.fontStyle
.resetAttrs
;
185 lay
.fontStyle
.fontsize
= fsizeText
;
186 lay
.fontStyle
.color
= colorText
.asUint
;
187 lay
.lineStyle
.leftpad
= 0;
188 lay
.lineStyle
.rightpad
= 0;
189 lay
.lineStyle
.paraIndent
= 3;
190 if (optJustify
) lay
.lineStyle
.setJustify
; else lay
.lineStyle
.setLeft
;
194 private void setTitleStyle (LayText lay
) {
195 lay
.fontStyle
.resetAttrs
;
196 lay
.fontStyle
.bold
= true;
197 lay
.fontStyle
.fontsize
= fsizeText
+4;
198 lay
.fontStyle
.color
= colorText
.asUint
;
199 lay
.lineStyle
.leftpad
= 0;
200 lay
.lineStyle
.rightpad
= 0;
201 lay
.lineStyle
.paraIndent
= 0;
202 lay
.lineStyle
.setCenter
;
206 private void setSubtitleStyle (LayText lay
) {
207 lay
.fontStyle
.resetAttrs
;
208 lay
.fontStyle
.bold
= true;
209 lay
.fontStyle
.fontsize
= fsizeText
+2;
210 lay
.fontStyle
.color
= colorText
.asUint
;
211 lay
.lineStyle
.leftpad
= 0;
212 lay
.lineStyle
.rightpad
= 0;
213 lay
.lineStyle
.paraIndent
= 0;
214 lay
.lineStyle
.setCenter
;
218 private void setCiteStyle (LayText lay
) {
219 lay
.fontStyle
.resetAttrs
;
220 lay
.fontStyle
.italic
= true;
221 lay
.fontStyle
.fontsize
= fsizeText
;
222 lay
.fontStyle
.color
= colorText
.asUint
;
223 lay
.lineStyle
.leftpad
= fsizeText
*3;
224 lay
.lineStyle
.rightpad
= fsizeText
*3;
225 lay
.lineStyle
.paraIndent
= 3;
226 if (optJustify
) lay
.lineStyle
.setJustify
; else lay
.lineStyle
.setLeft
;
230 private void setEpigraphStyle (LayText lay
) {
231 lay
.fontStyle
.resetAttrs
;
232 lay
.fontStyle
.italic
= true;
233 lay
.fontStyle
.fontsize
= fsizeText
;
234 lay
.fontStyle
.color
= colorText
.asUint
;
235 lay
.lineStyle
.leftpad
= lay
.width
/3;
236 lay
.lineStyle
.rightpad
= 0;
237 lay
.lineStyle
.paraIndent
= 0;
238 lay
.lineStyle
.setRight
;
242 private void setPoemStyle (LayText lay
) {
243 lay
.fontStyle
.resetAttrs
;
244 lay
.fontStyle
.italic
= true;
245 lay
.fontStyle
.fontsize
= fsizeText
;
246 lay
.fontStyle
.color
= colorText
.asUint
;
247 lay
.lineStyle
.leftpad
= fsizeText
*3;
248 lay
.lineStyle
.rightpad
= 0;
249 lay
.lineStyle
.paraIndent
= 0;
250 lay
.lineStyle
.setLeft
;
255 // ////////////////////////////////////////////////////////////////////////// //
256 public BookMetadata
formatBook (BookText book
, LayText lay
) {
257 assert(book
!is null);
259 BookMetadata meta
= new BookMetadata();
261 void dumpTree (Tag ct
) {
262 while (ct
!is null) {
263 conwriteln("tag: ", ct
.name
);
268 void badTag (Tag tag
, string msg
=null) {
269 import std
.string
: format
, indexOf
;
270 assert(tag
!is null);
272 if (msg
.length
== 0) msg
= "invalid tag: '%s'";
273 if (msg
.indexOf("%s") >= 0) {
274 throw new Exception(msg
.format(tag
.name
));
276 throw new Exception(msg
);
280 void saveTagId (Tag tag
) {
282 import std
.conv
: to
;
283 meta
.ids
~= BookMetadata
.Anc(tag
.id
.to
!dstring
, lay
.nextWordIndex
);
287 void putImage (Tag tag
) {
288 if (tag
is null || tag
.href
.length
< 2 || tag
.href
[0] != '#') return;
289 string iid
= tag
.href
[1..$];
290 //conwriteln("searching for image with href '", iid, "' (", book.images.length, ")");
291 foreach (immutable idx
, ref BookText
.Image img
; book
.images
) {
293 //conwriteln("image '", img.id, "' found");
294 lay
.putObject(new BookImage(book
, cast(uint)idx
));
300 void putParaContentInternal (Tag ct
, int boldc
=0, int italicc
=0, int underc
=0) {
301 if (ct
is null) return;
302 auto c
= lay
.fontStyle
.color
;
303 scope(exit
) lay
.fontStyle
.color
= c
;
306 case "strong": ++boldc
; lay
.fontStyle
.bold
= true; break;
307 case "emphasis": ++italicc
; lay
.fontStyle
.italic
= true; break;
308 case "image": putImage(ct
); return;
309 case "style": return;
311 if (ct
.href
.length
) {
312 import std
.conv
: to
;
313 //conwriteln("href found: '", ct.href, "' (", lay.nextWordIndex, ")");
314 meta
.hrefs
[lay
.nextWordIndex
] = BookMetadata
.Anc(ct
.href
.to
!dstring
, lay
.nextWordIndex
);
316 lay
.fontStyle
.href
= true;
317 lay
.fontStyle
.underline
= true;
318 lay
.fontStyle
.color
= colorTextHref
.asUint
;
321 case "sub": break; // some idiotic files has this
322 case "sup": break; // some idiotic files has this
323 case "": lay
.put(ct
.text
); return;
327 foreach (Tag tag
; ct
.children
) putParaContentInternal(tag
, boldc
, italicc
, underc
);
329 case "strong": if (--boldc
== 0) lay
.fontStyle
.bold
= false; break;
330 case "emphasis": if (--italicc
== 0) lay
.fontStyle
.italic
= false; break;
331 case "a": if (--underc
== 0) lay
.fontStyle
.underline
= false; lay
.fontStyle
.href
= false; break;
337 bool onlyImagePara (Tag ct
) {
338 if (ct
is null) return false;
340 foreach (Tag tag
; ct
.children
) {
341 if (tag
.name
.length
== 0) {
343 if (tag
.text
.xstrip
.length
!= 0) return false;
346 if (count
!= 0 || tag
.name
!= "image") return false;
352 void putTagContents(bool xdump
=false) (Tag ct
, int boldc
=0, int italicc
=0, int underc
=0) {
353 if (ct
is null) return;
355 if (onlyImagePara(ct
)) {
357 scope(exit
) lay
.popStyles
;
358 lay
.lineStyle
.setCenter
;
359 foreach (Tag tag
; ct
.children
) putParaContentInternal(tag
, boldc
, italicc
, underc
);
361 //if (ct.name == "subtitle") conwriteln("text: [", ct.children[0].text, "]");
362 foreach (Tag tag
; ct
.children
) {
363 static if (xdump
) conwriteln("text: [", tag
.text
, "]");
364 putParaContentInternal(tag
, boldc
, italicc
, underc
);
370 void delegate (Tag ct
) putPoemx
;
371 void putParas (Tag ct
) {
373 foreach (Tag tag
; ct
.children
) {
374 if (tag
.name
.length
== 0) continue;
375 if (tag
.name
== "p") putTagContents(tag
);
376 else if (tag
.name
== "empty-line") lay
.endLine();
377 else if (tag
.name
== "text-author") {}
378 else if (tag
.name
== "strong") putTagContents(tag
, 1);
379 else if (tag
.name
== "poem") { putPoemx(tag
); lay
.put(LayText
.EndParaCh
); }
380 else if (tag
.name
== "subtitle") {
381 //FIXME:??? somehow this is invisible
383 scope(exit
) lay
.popStyles
;
384 setSubtitleStyle(lay
);
385 if (tag
.text
.length
) { putParaContentInternal(tag
); lay
.endPara(); } else putTagContents(tag
);
391 void putAuthor (Tag ct
) {
393 foreach (Tag tag
; ct
.children
) {
394 if (tag
.name
.length
== 0) continue;
395 if (tag
.name
== "text-author") {
402 void putCite (Tag ct
) {
404 scope(exit
) lay
.popStyles
;
410 void putEpigraph (Tag ct
) {
412 scope(exit
) lay
.popStyles
;
413 setEpigraphStyle(lay
);
418 void putStanza (Tag ct
) {
420 foreach (Tag tag
; ct
.children
) {
421 if (tag
.name
.length
== 0) continue;
422 if (tag
.name
== "text-author") continue;
423 if (tag
.name
== "title") badTag(tag
, "titles in stanzas are not supported yet");
424 if (tag
.name
== "subtitle") badTag(tag
, "subtitles in stanzas are not supported yet");
425 if (tag
.name
== "epigraph") badTag(tag
, "epigraphs in poems are not supported yet");
426 if (tag
.name
== "date") continue;
427 if (tag
.name
== "v") { putTagContents(tag
); continue; }
432 void putPoem (Tag ct
) {
435 scope(exit
) lay
.popStyles
;
437 // put epigraph (not yet)
438 // put title and subtitle
439 foreach (Tag tag
; ct
.children
) {
440 if (tag
.name
== "title") {
442 scope(exit
) lay
.popStyles
;
444 lay
.endPara(); // space
445 } else if (tag
.name
== "subtitle") {
447 scope(exit
) lay
.popStyles
;
449 //lay.endPara(); // space
453 foreach (Tag tag
; ct
.children
) {
454 if (tag
.name
.length
== 0) continue;
455 if (tag
.name
== "text-author") continue;
456 if (tag
.name
== "title") continue;
457 if (tag
.name
== "subtitle") continue;
458 if (tag
.name
== "epigraph") badTag(tag
, "epigraphs in poems are not supported yet");
459 if (tag
.name
== "date") continue;
460 if (tag
.name
== "stanza") { putStanza(tag
); lay
.put(LayText
.EndParaCh
); continue; }
467 void putSection (Tag sc
) {
468 bool sectionRegistered
= false;
470 void registerSection (Tag tag
) {
471 import std
.conv
: to
;
472 if (sectionRegistered
) return;
473 sectionRegistered
= true;
474 string text
= tag
.textContent
.xstrip
;
475 //lay.sections ~= lay.curWordIndex;
477 while (text
.length
) {
478 char ch
= text
.ptr
[0];
480 if (ch
<= ' ' || ch
== 127) {
481 if (name
.length
== 0) continue;
482 if (ch
!= '\n') ch
= ' ';
484 if (name
[$-1] > ' ') name
~= "\n...";
487 if (name
[$-1] > ' ') name
~= ' ';
494 if (name
.length
== 0) name
= "* * *";
495 meta
.sections
~= BookMetadata
.Anc(name
.to
!dstring
, lay
.nextWordIndex
);
499 foreach (Tag tag
; sc
.children
) {
500 if (tag
.name
.length
== 0) continue;
501 if (tag
.name
== "title") {
503 scope(exit
) lay
.popStyles
;
505 registerSection(tag
);
507 } else if (tag
.name
== "subtitle") {
509 scope(exit
) lay
.popStyles
;
510 setSubtitleStyle(lay
);
511 registerSection(tag
);
513 } else if (tag
.name
== "epigraph") {
515 scope(exit
) lay
.popStyles
;
516 setEpigraphStyle(lay
);
518 } else if (tag
.name
== "section") {
520 scope(exit
) lay
.popStyles
;
523 } else if (tag
.name
== "p") {
525 } else if (tag
.name
== "image") {
527 scope(exit
) lay
.popStyles
;
528 lay
.lineStyle
.leftpad
= 0;
529 lay
.lineStyle
.rightpad
= 0;
530 lay
.lineStyle
.paraIndent
= 0;
531 lay
.lineStyle
.setCenter
;
534 } else if (tag
.name
== "empty-line") {
536 } else if (tag
.name
== "cite") {
538 } else if (tag
.name
== "table") {
540 scope(exit
) lay
.popStyles
;
541 lay
.fontStyle
.fontsize
+= 8;
542 lay
.lineStyle
.setCenter
;
543 lay
.put("TABLE SKIPPED");
545 } else if (tag
.name
== "poem") {
547 } else if (tag
.name
== "image") {
548 } else if (tag
.name
== "style") {
556 foreach (Tag tag
; book
.content
.children
) {
557 if (tag
.name
== "title") {
559 scope(exit
) lay
.popStyles
;
564 } else if (tag
.name
== "subtitle") {
566 scope(exit
) lay
.popStyles
;
570 } else if (tag
.name
== "epigraph") {
572 } else if (tag
.name
== "section") {
574 scope(exit
) lay
.popStyles
;
577 } else if (tag
.name
== "image") {
588 // ////////////////////////////////////////////////////////////////////////// //
589 private __gshared LayFontStash laf
; // layouter font stash
592 // ////////////////////////////////////////////////////////////////////////// //
593 private void loadFmtFonts () {
594 laf
= new LayFontStash();
596 laf
.addFont("text", textFontName
);
597 laf
.addFont("texti", textiFontName
);
598 laf
.addFont("textb", textbFontName
);
599 laf
.addFont("textz", textzFontName
);
601 laf
.addFont("mono", monoFontName
);
602 laf
.addFont("monoi", monoiFontName
);
603 laf
.addFont("monob", monobFontName
);
604 laf
.addFont("monoz", monozFontName
);
608 // ////////////////////////////////////////////////////////////////////////// //
610 struct ReformatWork
{
611 shared(BookText
) booktext
;
616 struct ReformatWorkComplete
{
618 shared(BookText
) booktext
;
619 shared(LayText
) laytext
;
620 shared(BookMetadata
) meta
;
627 // ////////////////////////////////////////////////////////////////////////// //
628 void reformatThreadFn (Tid ownerTid
) {
633 int newW
= -1, newH
= -1;
640 //{ conwriteln("reformat request received..."); }
641 book
= cast(BookText
)w
.booktext
;
642 newFileName
= w
.bookFileName
;
645 if (newW
< 1) newW
= 1;
646 if (newH
< 1) newH
= 1;
652 if (!doQuit
&& newW
> 0 && newH
> 0) {
655 //conwriteln("loading new book: '", newFileName, "'");
656 book
= loadBook(newFileName
);
659 int maxWidth
= newW
-4-2-BND_SCROLLBAR_WIDTH
-2;
660 if (maxWidth
< 64) maxWidth
= 64;
663 //conwriteln("layouting...");
664 auto stt
= MonoTime
.currTime
;
665 auto lay
= new LayText(laf
, maxWidth
);
666 lay
.fontStyle
.color
= colorText
.asUint
;
668 auto meta
= book
.formatBook(lay
);
670 auto ett
= MonoTime
.currTime
-stt
;
671 conwriteln("layouted in ", ett
.total
!"msecs", " milliseconds");
672 auto res
= ReformatWorkComplete(newW
, newH
, cast(shared)book
, cast(shared)lay
, cast(shared)meta
);
674 } catch (Throwable e
) {
675 // here, we are dead and fucked (the exact order doesn't matter)
676 import core
.stdc
.stdlib
: abort
;
677 import core
.stdc
.stdio
: fprintf
, stderr
;
678 import core
.memory
: GC
;
679 import core
.thread
: thread_suspendAll
;
680 GC
.disable(); // yeah
681 thread_suspendAll(); // stop right here, you criminal scum!
682 auto s
= e
.toString();
683 fprintf(stderr
, "\n=== FATAL ===\n%.*s\n", cast(uint)s
.length
, s
.ptr
);
684 abort(); // die, you bitch!
688 send(ownerTid
, QuitWork());