cosmetix
[xreader.git] / xreaderfmt.d
blob97f023957a10cd9bbf04a4fd3e932f714ab7da97
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/>.
17 module xreaderfmt;
19 import core.time;
21 import std.concurrency;
23 import iv.strex;
25 import arsd.simpledisplay;
26 import arsd.image;
28 import iv.cmdcon;
29 import iv.nanovg;
30 import iv.nanovg.oui.blendish;
31 import iv.vfs;
32 import iv.vfs.io;
34 import booktext;
36 import xreadercfg;
37 import xlayouter;
40 // ////////////////////////////////////////////////////////////////////////// //
41 BookText loadBook (string fname) {
42 __gshared bool eliteShipsLoaded = false;
44 import std.path;
45 //import core.memory : GC;
46 fname = fname.expandTilde.absolutePath;
47 //conwriteln("loading '", fname, "'...");
48 //GC.disable();
49 auto stt = MonoTime.currTime;
50 auto book = new BookText(fname);
51 //GC.enable();
52 //GC.collect();
53 { conwriteln("loaded: '", fname, "' in ", (MonoTime.currTime-stt).total!"msecs", " milliseconds"); }
55 string[] lines;
56 string[] comments;
57 try {
58 foreach (string line; VFile(buildPath(RcDir, ".lastfile")).byLineCopy) {
59 if (line != fname) {
60 lines ~= line;
61 } else {
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);
73 fo.writeln(fname);
75 stateFileName = buildPath(RcDir, fname.baseName~".rc");
77 if (!eliteShipsLoaded) {
78 loadEliteShips();
79 eliteShipsLoaded = true;
82 return book;
86 // ////////////////////////////////////////////////////////////////////////// //
87 private struct ImageInfo {
88 enum MaxIdleFrames = 5;
89 int iid;
90 TrueColorImage img;
91 int framesNotUsed;
94 private __gshared ImageInfo[] nvgImageIds;
97 void releaseImages (NVGContext vg) {
98 if (nvgImageIds.length) {
99 foreach (ref ImageInfo nfo; nvgImageIds) {
100 if (nfo.iid >= 0) {
101 if (++nfo.framesNotUsed > ImageInfo.MaxIdleFrames) {
102 //conwriteln("freeing image with id ", nfo.iid);
103 vg.deleteImage(nfo.iid);
104 nfo.iid = -1;
105 nfo.img = null;
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;
120 return nfo.iid;
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);
127 return iid;
131 class BookImage : LayObject {
132 BookText book;
133 uint imageidx;
134 TrueColorImage img;
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) {
144 y -= img.height;
145 vg.save();
146 scope(exit) vg.restore();
147 vg.beginPath();
148 int iid = vg.registerImage(img);
149 if (iid < 0) return;
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);
153 vg.fill();
158 // ////////////////////////////////////////////////////////////////////////// //
159 class BookMetadata {
160 static struct Anc {
161 dstring name;
162 uint wordidx; // first word
164 Anc[] sections;
165 Anc[uint] hrefs; // `name` is dest
166 Anc[] ids;
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");
178 } else {
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;
191 fixFont(lay);
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;
203 fixFont(lay);
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;
215 fixFont(lay);
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;
227 fixFont(lay);
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;
239 fixFont(lay);
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;
251 fixFont(lay);
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);
264 ct = ct.parent;
268 void badTag (Tag tag, string msg=null) {
269 import std.string : format, indexOf;
270 assert(tag !is null);
271 dumpTree(tag);
272 if (msg.length == 0) msg = "invalid tag: '%s'";
273 if (msg.indexOf("%s") >= 0) {
274 throw new Exception(msg.format(tag.name));
275 } else {
276 throw new Exception(msg);
280 void saveTagId (Tag tag) {
281 if (tag.id.length) {
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) {
292 if (iid == img.id) {
293 //conwriteln("image '", img.id, "' found");
294 lay.putObject(new BookImage(book, cast(uint)idx));
295 return;
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;
304 saveTagId(ct);
305 switch (ct.name) {
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;
310 case "a":
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);
315 ++underc;
316 lay.fontStyle.href = true;
317 lay.fontStyle.underline = true;
318 lay.fontStyle.color = colorTextHref.asUint;
320 break;
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;
324 default: badTag(ct);
326 fixFont(lay);
327 foreach (Tag tag; ct.children) putParaContentInternal(tag, boldc, italicc, underc);
328 switch (ct.name) {
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;
332 default:
334 fixFont(lay);
337 bool onlyImagePara (Tag ct) {
338 if (ct is null) return false;
339 int count;
340 foreach (Tag tag; ct.children) {
341 if (tag.name.length == 0) {
342 // text
343 if (tag.text.xstrip.length != 0) return false;
344 continue;
346 if (count != 0 || tag.name != "image") return false;
347 ++count;
349 return (count == 1);
352 void putTagContents(bool xdump=false) (Tag ct, int boldc=0, int italicc=0, int underc=0) {
353 if (ct is null) return;
354 saveTagId(ct);
355 if (onlyImagePara(ct)) {
356 lay.pushStyles();
357 scope(exit) lay.popStyles;
358 lay.lineStyle.setCenter;
359 foreach (Tag tag; ct.children) putParaContentInternal(tag, boldc, italicc, underc);
360 } else {
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);
367 lay.endPara();
370 void delegate (Tag ct) putPoemx;
371 void putParas (Tag ct) {
372 saveTagId(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
382 lay.pushStyles();
383 scope(exit) lay.popStyles;
384 setSubtitleStyle(lay);
385 if (tag.text.length) { putParaContentInternal(tag); lay.endPara(); } else putTagContents(tag);
387 else badTag(tag);
391 void putAuthor (Tag ct) {
392 saveTagId(ct);
393 foreach (Tag tag; ct.children) {
394 if (tag.name.length == 0) continue;
395 if (tag.name == "text-author") {
396 putTagContents(tag);
397 lay.endPara();
402 void putCite (Tag ct) {
403 lay.pushStyles();
404 scope(exit) lay.popStyles;
405 setCiteStyle(lay);
406 putParas(ct);
407 putAuthor(ct);
410 void putEpigraph (Tag ct) {
411 lay.pushStyles();
412 scope(exit) lay.popStyles;
413 setEpigraphStyle(lay);
414 putParas(ct);
415 putAuthor(ct);
418 void putStanza (Tag ct) {
419 saveTagId(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; }
428 badTag(tag);
432 void putPoem (Tag ct) {
433 saveTagId(ct);
434 lay.pushStyles();
435 scope(exit) lay.popStyles;
436 setPoemStyle(lay);
437 // put epigraph (not yet)
438 // put title and subtitle
439 foreach (Tag tag; ct.children) {
440 if (tag.name == "title") {
441 lay.pushStyles();
442 scope(exit) lay.popStyles;
443 putParas(tag);
444 lay.endPara(); // space
445 } else if (tag.name == "subtitle") {
446 lay.pushStyles();
447 scope(exit) lay.popStyles;
448 putParas(tag);
449 //lay.endPara(); // space
452 lay.endPara;
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; }
461 badTag(tag);
463 putAuthor(ct);
465 putPoemx = &putPoem;
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;
476 string name;
477 while (text.length) {
478 char ch = text.ptr[0];
479 text = text[1..$];
480 if (ch <= ' ' || ch == 127) {
481 if (name.length == 0) continue;
482 if (ch != '\n') ch = ' ';
483 if (ch == '\n') {
484 if (name[$-1] > ' ') name ~= "\n...";
485 text = text.xstrip;
486 } else {
487 if (name[$-1] > ' ') name ~= ' ';
489 } else {
490 name ~= ch;
493 name = xstrip(name);
494 if (name.length == 0) name = "* * *";
495 meta.sections ~= BookMetadata.Anc(name.to!dstring, lay.nextWordIndex);
498 saveTagId(sc);
499 foreach (Tag tag; sc.children) {
500 if (tag.name.length == 0) continue;
501 if (tag.name == "title") {
502 lay.pushStyles();
503 scope(exit) lay.popStyles;
504 setTitleStyle(lay);
505 registerSection(tag);
506 putParas(tag);
507 } else if (tag.name == "subtitle") {
508 lay.pushStyles();
509 scope(exit) lay.popStyles;
510 setSubtitleStyle(lay);
511 registerSection(tag);
512 putParas(tag);
513 } else if (tag.name == "epigraph") {
514 lay.pushStyles();
515 scope(exit) lay.popStyles;
516 setEpigraphStyle(lay);
517 putEpigraph(tag);
518 } else if (tag.name == "section") {
519 lay.pushStyles();
520 scope(exit) lay.popStyles;
521 setNormalStyle(lay);
522 putSection(tag);
523 } else if (tag.name == "p") {
524 putTagContents(tag);
525 } else if (tag.name == "image") {
526 lay.pushStyles();
527 scope(exit) lay.popStyles;
528 lay.lineStyle.leftpad = 0;
529 lay.lineStyle.rightpad = 0;
530 lay.lineStyle.paraIndent = 0;
531 lay.lineStyle.setCenter;
532 putImage(tag);
533 lay.endPara();
534 } else if (tag.name == "empty-line") {
535 lay.endPara();
536 } else if (tag.name == "cite") {
537 putCite(tag);
538 } else if (tag.name == "table") {
539 lay.pushStyles();
540 scope(exit) lay.popStyles;
541 lay.fontStyle.fontsize += 8;
542 lay.lineStyle.setCenter;
543 lay.put("TABLE SKIPPED");
544 lay.endPara();
545 } else if (tag.name == "poem") {
546 putPoem(tag);
547 } else if (tag.name == "image") {
548 } else if (tag.name == "style") {
549 } else {
550 badTag(tag);
553 lay.endPara;
556 foreach (Tag tag; book.content.children) {
557 if (tag.name == "title") {
558 lay.pushStyles();
559 scope(exit) lay.popStyles;
560 setTitleStyle(lay);
561 lay.endPara();
562 putParas(tag);
563 lay.endPara();
564 } else if (tag.name == "subtitle") {
565 lay.pushStyles();
566 scope(exit) lay.popStyles;
567 setTitleStyle(lay);
568 putParas(tag);
569 lay.endPara();
570 } else if (tag.name == "epigraph") {
571 putEpigraph(tag);
572 } else if (tag.name == "section") {
573 lay.pushStyles();
574 scope(exit) lay.popStyles;
575 setNormalStyle(lay);
576 putSection(tag);
577 } else if (tag.name == "image") {
578 putImage(tag);
582 lay.finalize();
584 return meta;
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 // ////////////////////////////////////////////////////////////////////////// //
609 // messages
610 struct ReformatWork {
611 shared(BookText) booktext;
612 string bookFileName;
613 int w, h;
616 struct ReformatWorkComplete {
617 int w, h;
618 shared(BookText) booktext;
619 shared(LayText) laytext;
620 shared(BookMetadata) meta;
623 struct QuitWork {
627 // ////////////////////////////////////////////////////////////////////////// //
628 void reformatThreadFn (Tid ownerTid) {
629 bool doQuit = false;
630 loadFmtFonts();
631 BookText book;
632 string newFileName;
633 int newW = -1, newH = -1;
634 while (!doQuit) {
635 book = null;
636 newFileName = null;
637 newW = newH = -1;
638 receive(
639 (ReformatWork w) {
640 //{ conwriteln("reformat request received..."); }
641 book = cast(BookText)w.booktext;
642 newFileName = w.bookFileName;
643 newW = w.w;
644 newH = w.h;
645 if (newW < 1) newW = 1;
646 if (newH < 1) newH = 1;
648 (QuitWork w) {
649 doQuit = true;
652 if (!doQuit && newW > 0 && newH > 0) {
653 try {
654 if (book is null) {
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;
662 // layout text
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);
673 send(ownerTid, res);
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());