mirror of
https://github.com/ToshioCP/Gtk4-tutorial.git
synced 2025-01-11 20:03:35 +01:00
903 lines
27 KiB
Ruby
903 lines
27 KiB
Ruby
# test_lib_src2md.rb
|
|
require 'minitest/autorun'
|
|
require 'fileutils'
|
|
require 'diff/lcs'
|
|
require_relative '../lib/lib_src2md.rb'
|
|
|
|
include Math
|
|
|
|
module Prepare_test
|
|
def files_src2md
|
|
# Many kinds of file types are supported.
|
|
# .c => C, .h => C, .rb => ruby, Rakefile, => ruby, .xml => xml, .ui => xml, .y => bison, .lex => lex, .build => meson, .md => markdown, Makefile => makefile
|
|
|
|
sample_c = <<~'EOS'
|
|
/* This comment is very long, longer than 100. It must be folded if this file is converted to latex. Because latex doesn't care about verbatim lines. The lines are printed as they are. */
|
|
#include <stdio.h>
|
|
|
|
void
|
|
printf_something (char *something) {
|
|
printf ("%s\n", something);
|
|
}
|
|
|
|
int
|
|
main (int argc, char **argv) {
|
|
printf_something ("Hello world.");
|
|
}
|
|
EOS
|
|
|
|
sample_h = <<~'EOS'
|
|
#include <gtk/gtk.h>
|
|
EOS
|
|
|
|
sample_rb = <<~'EOS'
|
|
print "Hello ruby.\n"
|
|
EOS
|
|
|
|
rakefile = <<~'EOS'
|
|
task default: "a.out"
|
|
file "a.out" => "sample.c" do
|
|
sh "gcc sample.c"
|
|
end
|
|
EOS
|
|
|
|
sample_xml = <<~'EOS'
|
|
<div class="h1" color="red">Fatal error!!</div>
|
|
EOS
|
|
|
|
sample_ui = <<~'EOS'
|
|
<object class="GtkWindow" id="win"></object>
|
|
EOS
|
|
|
|
sample_y = <<~'EOS'
|
|
program: statement | program statement ;
|
|
EOS
|
|
|
|
sample_lex = <<~'EOS'
|
|
[a-zA-Z0-9] return ALNUM;
|
|
EOS
|
|
|
|
sample_build = <<~'EOS'
|
|
project('sampe', 'c')
|
|
EOS
|
|
|
|
sample0_md = <<~'EOS'
|
|
# Sample text in maridown language
|
|
EOS
|
|
|
|
makefile = <<~'EOS'
|
|
a.out: sample.c
|
|
cc sample.c
|
|
EOS
|
|
|
|
sample_src_md = <<~'EOS'
|
|
# Sample.src.md
|
|
|
|
This .src.md file is made for the test for lib_src2md.rb.
|
|
|
|
No conversion happens.
|
|
@@@include
|
|
@@@
|
|
|
|
Sample.c with line number is:
|
|
|
|
@@@include
|
|
sample.c
|
|
@@@
|
|
|
|
The following is also Sample.c with line number.
|
|
|
|
@@@include -n
|
|
sample.c
|
|
@@@
|
|
|
|
The following is Sample.c without line number.
|
|
|
|
@@@include -N
|
|
sample.c
|
|
@@@
|
|
|
|
The following prints only `printf_something`.
|
|
|
|
@@@include
|
|
sample.c printf_something
|
|
@@@
|
|
|
|
The following prints `printf_something` and `main`.
|
|
|
|
@@@include
|
|
sample.c printf_something main
|
|
@@@
|
|
|
|
Check info string.
|
|
|
|
@@@include
|
|
sample.c
|
|
sample.h
|
|
sample.rb
|
|
Rakefile
|
|
sample.xml
|
|
sample.ui
|
|
sample.y
|
|
sample.lex
|
|
sample.build
|
|
sample0.md
|
|
@@@
|
|
|
|
Compile sample.c with rake like this:
|
|
|
|
@@@shell
|
|
rake
|
|
@@@
|
|
|
|
@@@shell
|
|
echo "This text is very long, longer than 100. It must be folded if this file is converted to latex. Because latex doesn't care about verbatim lines. The lines are printed as they are."
|
|
@@@
|
|
|
|
The target type is:
|
|
|
|
@@@if gfm
|
|
gfm
|
|
@@@elif html
|
|
html
|
|
@@@elif latex
|
|
latex
|
|
@@@end
|
|
|
|
[Relative link](sample.c) will be converted when the target type is gfm or html.
|
|
Otherwise (latex) the link will be removed.
|
|
|
|
Another [relative link](../Rakefile).
|
|
|
|
[Absolute link](https://github.com/ToshioCP) is kept as it is.
|
|
|
|
Image link.
|
|
If the target type is gfm or html, the size will be removed.
|
|
Otherwise (latex) it remains.
|
|
|
|
{width=6.3cm height=5.325cm}
|
|
EOS
|
|
|
|
sample_md_gfm = <<~EOS
|
|
# Sample.src.md
|
|
|
|
This .src.md file is made for the test for lib_src2md.rb.
|
|
|
|
No conversion happens.
|
|
@@@include
|
|
@@@
|
|
|
|
Sample.c with line number is:
|
|
|
|
~~~C
|
|
#{i=1;sample_c.lines.each {|line| line.replace(sprintf("%#2d %s", i, line)); i+=1}.join}~~~
|
|
|
|
The following is also Sample.c with line number.
|
|
|
|
~~~C
|
|
#{i=1;sample_c.lines.each {|line| line.replace(sprintf("%#2d %s", i, line)); i+=1}.join}~~~
|
|
|
|
The following is Sample.c without line number.
|
|
|
|
~~~C
|
|
#{sample_c}~~~
|
|
|
|
The following prints only `printf_something`.
|
|
|
|
~~~C
|
|
1 void
|
|
2 printf_something (char *something) {
|
|
3 printf ("%s\\n", something);
|
|
4 }
|
|
~~~
|
|
|
|
The following prints `printf_something` and `main`.
|
|
|
|
~~~C
|
|
1 void
|
|
2 printf_something (char *something) {
|
|
3 printf ("%s\\n", something);
|
|
4 }
|
|
5#{' '}
|
|
6 int
|
|
7 main (int argc, char **argv) {
|
|
8 printf_something ("Hello world.");
|
|
9 }
|
|
~~~
|
|
|
|
Check info string.
|
|
|
|
~~~C
|
|
#{i=1;sample_c.lines.each {|line| line.replace(sprintf("%#2d %s", i, line)); i+=1}.join}~~~
|
|
~~~C
|
|
#{i=1;sample_h.lines.each {|line| line.replace(sprintf("%#1d %s", i, line)); i+=1}.join}~~~
|
|
~~~ruby
|
|
#{i=1;sample_rb.lines.each {|line| line.replace(sprintf("%#1d %s", i, line)); i+=1}.join}~~~
|
|
~~~ruby
|
|
#{i=1;rakefile.lines.each {|line| line.replace(sprintf("%#1d %s", i, line)); i+=1}.join}~~~
|
|
~~~xml
|
|
#{i=1;sample_xml.lines.each {|line| line.replace(sprintf("%#1d %s", i, line)); i+=1}.join}~~~
|
|
~~~xml
|
|
#{i=1;sample_ui.lines.each {|line| line.replace(sprintf("%#1d %s", i, line)); i+=1}.join}~~~
|
|
~~~bison
|
|
#{i=1;sample_y.lines.each {|line| line.replace(sprintf("%#1d %s", i, line)); i+=1}.join}~~~
|
|
~~~lex
|
|
#{i=1;sample_lex.lines.each {|line| line.replace(sprintf("%#1d %s", i, line)); i+=1}.join}~~~
|
|
~~~meson
|
|
#{i=1;sample_build.lines.each {|line| line.replace(sprintf("%#1d %s", i, line)); i+=1}.join}~~~
|
|
~~~markdown
|
|
#{i=1;sample0_md.lines.each {|line| line.replace(sprintf("%#1d %s", i, line)); i+=1}.join}~~~
|
|
|
|
Compile sample.c with rake like this:
|
|
|
|
~~~
|
|
$ rake
|
|
~~~
|
|
|
|
~~~
|
|
$ echo "This text is very long, longer than 100. It must be folded if this file is converted to latex. Because latex doesn't care about verbatim lines. The lines are printed as they are."
|
|
This text is very long, longer than 100. It must be folded if this file is converted to latex. Because latex doesn't care about verbatim lines. The lines are printed as they are.
|
|
~~~
|
|
|
|
The target type is:
|
|
|
|
gfm
|
|
|
|
[Relative link](../src/sample.c) will be converted when the target type is gfm or html.
|
|
Otherwise (latex) the link will be removed.
|
|
|
|
Another [relative link](../Rakefile).
|
|
|
|
[Absolute link](https://github.com/ToshioCP) is kept as it is.
|
|
|
|
Image link.
|
|
If the target type is gfm or html, the size will be removed.
|
|
Otherwise (latex) it remains.
|
|
|
|
|
|
EOS
|
|
|
|
sample_md_html = <<~EOS
|
|
# Sample.src.md
|
|
|
|
This .src.md file is made for the test for lib_src2md.rb.
|
|
|
|
No conversion happens.
|
|
@@@include
|
|
@@@
|
|
|
|
Sample.c with line number is:
|
|
|
|
~~~{.C .numberLines}
|
|
#{sample_c}~~~
|
|
|
|
The following is also Sample.c with line number.
|
|
|
|
~~~{.C .numberLines}
|
|
#{sample_c}~~~
|
|
|
|
The following is Sample.c without line number.
|
|
|
|
~~~{.C}
|
|
#{sample_c}~~~
|
|
|
|
The following prints only `printf_something`.
|
|
|
|
~~~{.C .numberLines}
|
|
void
|
|
printf_something (char *something) {
|
|
printf ("%s\\n", something);
|
|
}
|
|
~~~
|
|
|
|
The following prints `printf_something` and `main`.
|
|
|
|
~~~{.C .numberLines}
|
|
void
|
|
printf_something (char *something) {
|
|
printf ("%s\\n", something);
|
|
}
|
|
|
|
int
|
|
main (int argc, char **argv) {
|
|
printf_something ("Hello world.");
|
|
}
|
|
~~~
|
|
|
|
Check info string.
|
|
|
|
~~~{.C .numberLines}
|
|
#{sample_c}~~~
|
|
~~~{.C .numberLines}
|
|
#{sample_h}~~~
|
|
~~~{.ruby .numberLines}
|
|
#{sample_rb}~~~
|
|
~~~{.ruby .numberLines}
|
|
#{rakefile}~~~
|
|
~~~{.xml .numberLines}
|
|
#{sample_xml}~~~
|
|
~~~{.xml .numberLines}
|
|
#{sample_ui}~~~
|
|
~~~{.bison .numberLines}
|
|
#{sample_y}~~~
|
|
~~~{.lex .numberLines}
|
|
#{sample_lex}~~~
|
|
~~~{.numberLines}
|
|
#{sample_build}~~~
|
|
~~~{.markdown .numberLines}
|
|
#{sample0_md}~~~
|
|
|
|
Compile sample.c with rake like this:
|
|
|
|
~~~
|
|
$ rake
|
|
~~~
|
|
|
|
~~~
|
|
$ echo "This text is very long, longer than 100. It must be folded if this file is converted to latex. Because latex doesn't care about verbatim lines. The lines are printed as they are."
|
|
This text is very long, longer than 100. It must be folded if this file is converted to latex. Because latex doesn't care about verbatim lines. The lines are printed as they are.
|
|
~~~
|
|
|
|
The target type is:
|
|
|
|
html
|
|
|
|
Relative link will be converted when the target type is gfm or html.
|
|
Otherwise (latex) the link will be removed.
|
|
|
|
Another relative link.
|
|
|
|
[Absolute link](https://github.com/ToshioCP) is kept as it is.
|
|
|
|
Image link.
|
|
If the target type is gfm or html, the size will be removed.
|
|
Otherwise (latex) it remains.
|
|
|
|
|
|
EOS
|
|
|
|
sample_md_latex = <<~EOS
|
|
# Sample.src.md
|
|
|
|
This .src.md file is made for the test for lib_src2md.rb.
|
|
|
|
No conversion happens.
|
|
@@@include
|
|
@@@
|
|
|
|
Sample.c with line number is:
|
|
|
|
~~~{.C .numberLines}
|
|
#{sample_c}~~~
|
|
|
|
The following is also Sample.c with line number.
|
|
|
|
~~~{.C .numberLines}
|
|
#{sample_c}~~~
|
|
|
|
The following is Sample.c without line number.
|
|
|
|
~~~{.C}
|
|
#{sample_c}~~~
|
|
|
|
The following prints only `printf_something`.
|
|
|
|
~~~{.C .numberLines}
|
|
void
|
|
printf_something (char *something) {
|
|
printf ("%s\\n", something);
|
|
}
|
|
~~~
|
|
|
|
The following prints `printf_something` and `main`.
|
|
|
|
~~~{.C .numberLines}
|
|
void
|
|
printf_something (char *something) {
|
|
printf ("%s\\n", something);
|
|
}
|
|
|
|
int
|
|
main (int argc, char **argv) {
|
|
printf_something ("Hello world.");
|
|
}
|
|
~~~
|
|
|
|
Check info string.
|
|
|
|
~~~{.C .numberLines}
|
|
#{sample_c}~~~
|
|
~~~{.C .numberLines}
|
|
#{sample_h}~~~
|
|
~~~{.ruby .numberLines}
|
|
#{sample_rb}~~~
|
|
~~~{.ruby .numberLines}
|
|
#{rakefile}~~~
|
|
~~~{.xml .numberLines}
|
|
#{sample_xml}~~~
|
|
~~~{.xml .numberLines}
|
|
#{sample_ui}~~~
|
|
~~~{.numberLines}
|
|
#{sample_y}~~~
|
|
~~~{.numberLines}
|
|
#{sample_lex}~~~
|
|
~~~{.numberLines}
|
|
#{sample_build}~~~
|
|
~~~{.numberLines}
|
|
#{sample0_md}~~~
|
|
|
|
Compile sample.c with rake like this:
|
|
|
|
~~~
|
|
$ rake
|
|
~~~
|
|
|
|
~~~
|
|
$ echo "This text is very long, longer than 100. It must be folded if this file is converted to latex. Because latex doesn't care about verbatim lines. The lines are printed as they are."
|
|
This text is very long, longer than 100. It must be folded if this file is converted to latex. Because latex doesn't care about verbatim lines. The lines are printed as they are.
|
|
~~~
|
|
|
|
The target type is:
|
|
|
|
latex
|
|
|
|
Relative link will be converted when the target type is gfm or html.
|
|
Otherwise (latex) the link will be removed.
|
|
|
|
Another relative link.
|
|
|
|
[Absolute link](https://github.com/ToshioCP) is kept as it is.
|
|
|
|
Image link.
|
|
If the target type is gfm or html, the size will be removed.
|
|
Otherwise (latex) it remains.
|
|
|
|
{width=6.3cm height=5.325cm}
|
|
EOS
|
|
|
|
# -------------------
|
|
# Return the follwoing array.
|
|
# -------------------
|
|
{files: [
|
|
[sample_c, "sample.c", "C"],
|
|
[sample_h, "sample.h", "C"],
|
|
[sample_rb, "sample.rb", "ruby"],
|
|
[rakefile, "Rakefile", "ruby"],
|
|
[sample_xml, "sample.xml", "xml"],
|
|
[sample_ui, "sample.ui", "xml"],
|
|
[sample_y, "sample.y", "bison"],
|
|
[sample_lex, "sample.lex", "lex"],
|
|
[sample_build, "sample.build", "meson"],
|
|
[sample0_md, "sample0.md", "markdown"],
|
|
[makefile, "Makefile", "makefile"],
|
|
[sample_src_md, "sample.src.md", nil]
|
|
],
|
|
sample_md_gfm: sample_md_gfm,
|
|
sample_md_html: sample_md_html,
|
|
sample_md_latex: sample_md_latex
|
|
}
|
|
end
|
|
end
|
|
|
|
class Test_lib_src_file < Minitest::Test
|
|
include FileUtils
|
|
include Prepare_test
|
|
|
|
def setup
|
|
table_1_src = <<~EOS
|
|
@@@table
|
|
|angle|sine|cosine|tangent|
|
|
|-:|:-|:-|:-|
|
|
|0|#{sin 0}|#{cos 0}|#{tan 0}|
|
|
|1|#{sin 1*PI/180}|#{cos 1*PI/180}|#{tan 1*PI/180}|
|
|
|2|#{sin 2*PI/180}|#{cos 2*PI/180}|#{tan 2*PI/180}|
|
|
|3|#{sin 3*PI/180}|#{cos 3*PI/180}|#{tan 3*PI/180}|
|
|
|4|#{sin 4*PI/180}|#{cos 4*PI/180}|#{tan 4*PI/180}|
|
|
|5|#{sin 5*PI/180}|#{cos 5*PI/180}|#{tan 5*PI/180}|
|
|
|6|#{sin 6*PI/180}|#{cos 6*PI/180}|#{tan 6*PI/180}|
|
|
|7|#{sin 7*PI/180}|#{cos 7*PI/180}|#{tan 7*PI/180}|
|
|
|8|#{sin 8*PI/180}|#{cos 8*PI/180}|#{tan 8*PI/180}|
|
|
|9|#{sin 9*PI/180}|#{cos 9*PI/180}|#{tan 9*PI/180}|
|
|
|10|#{sin 10*PI/180}|#{cos 10*PI/180}|#{tan 10*PI/180}|
|
|
@@@
|
|
EOS
|
|
table_1_dst = <<~EOS
|
|
|angle|sine |cosine |tangent |
|
|
|----:|:------------------|:-----------------|:-------------------|
|
|
| 0|0.0 |1.0 |0.0 |
|
|
| 1|0.01745240643728351|0.9998476951563913|0.017455064928217585|
|
|
| 2|0.03489949670250097|0.9993908270190958|0.03492076949174773 |
|
|
| 3|0.05233595624294383|0.9986295347545738|0.052407779283041196|
|
|
| 4|0.0697564737441253 |0.9975640502598242|0.06992681194351041 |
|
|
| 5|0.08715574274765817|0.9961946980917455|0.08748866352592401 |
|
|
| 6|0.10452846326765346|0.9945218953682733|0.10510423526567646 |
|
|
| 7|0.12186934340514748|0.992546151641322 |0.1227845609029046 |
|
|
| 8|0.13917310096006544|0.9902680687415704|0.14054083470239145 |
|
|
| 9|0.15643446504023087|0.9876883405951378|0.15838444032453627 |
|
|
| 10|0.17364817766693033|0.984807753012208 |0.17632698070846498 |
|
|
EOS
|
|
|
|
table_2_src = <<~'EOS'
|
|
@@@table
|
|
| |token kind | yylval.ID | yylval.NUM |
|
|
|:-:|:-|-:|:-:|
|
|
|1|ID|distance| |
|
|
|2|=|||
|
|
|3|NUM||100|
|
|
|4|FD|||
|
|
|5|ID|distance||
|
|
|6|*|||
|
|
|7|NUM||2|
|
|
@@@
|
|
EOS
|
|
table_2_dst = <<~'EOS'
|
|
| |token kind|yylval.ID|yylval.NUM|
|
|
|:-:|:---------|--------:|:--------:|
|
|
| 1 |ID | distance| |
|
|
| 2 |= | | |
|
|
| 3 |NUM | | 100 |
|
|
| 4 |FD | | |
|
|
| 5 |ID | distance| |
|
|
| 6 |* | | |
|
|
| 7 |NUM | | 2 |
|
|
EOS
|
|
@tables = [[table_1_src, table_1_dst], [table_2_src, table_2_dst]]
|
|
|
|
# No @@@table or @@@
|
|
no_table_1 = <<~EOS
|
|
|angle|sine|cosine|tangent|
|
|
|-:|:-|:-|:-|
|
|
|0|#{sin 0}|#{cos 0}|#{tan 0}|
|
|
|1|#{sin 1*PI/180}|#{cos 1*PI/180}|#{tan 1*PI/180}|
|
|
|2|#{sin 2*PI/180}|#{cos 2*PI/180}|#{tan 2*PI/180}|
|
|
|3|#{sin 3*PI/180}|#{cos 3*PI/180}|#{tan 3*PI/180}|
|
|
|4|#{sin 4*PI/180}|#{cos 4*PI/180}|#{tan 4*PI/180}|
|
|
|5|#{sin 5*PI/180}|#{cos 5*PI/180}|#{tan 5*PI/180}|
|
|
|6|#{sin 6*PI/180}|#{cos 6*PI/180}|#{tan 6*PI/180}|
|
|
|7|#{sin 7*PI/180}|#{cos 7*PI/180}|#{tan 7*PI/180}|
|
|
|8|#{sin 8*PI/180}|#{cos 8*PI/180}|#{tan 8*PI/180}|
|
|
|9|#{sin 9*PI/180}|#{cos 9*PI/180}|#{tan 9*PI/180}|
|
|
|10|#{sin 10*PI/180}|#{cos 10*PI/180}|#{tan 10*PI/180}|
|
|
EOS
|
|
# Numbers of the columns are not the same
|
|
no_table_2 = <<~EOS
|
|
@@@table
|
|
|angle|sine|cosine|tangent|
|
|
|-:|:-|:-|:-|
|
|
|0|#{sin 0}|#{cos 0}|#{tan 0}|
|
|
|1|#{sin 1*PI/180}|#{cos 1*PI/180}|#{tan 1*PI/180}|
|
|
|2|#{sin 2*PI/180}|#{cos 2*PI/180}|#{tan 2*PI/180}|
|
|
|3|#{sin 3*PI/180}|#{cos 3*PI/180}|#{tan 3*PI/180}|
|
|
|4|#{sin 4*PI/180}|#{cos 4*PI/180}|
|
|
|5|#{sin 5*PI/180}|#{cos 5*PI/180}|#{tan 5*PI/180}|
|
|
|6|#{sin 6*PI/180}|#{cos 6*PI/180}|#{tan 6*PI/180}|
|
|
|7|#{sin 7*PI/180}|#{cos 7*PI/180}|#{tan 7*PI/180}|
|
|
|8|#{sin 8*PI/180}|#{cos 8*PI/180}|#{tan 8*PI/180}|
|
|
|9|#{sin 9*PI/180}|#{cos 9*PI/180}|#{tan 9*PI/180}|
|
|
|10|#{sin 10*PI/180}|#{cos 10*PI/180}|#{tan 10*PI/180}|
|
|
@@@
|
|
EOS
|
|
# Horizontal separator syntax error
|
|
no_table_3 = <<~EOS
|
|
@@@table
|
|
|angle|sine|cosine|tangent|
|
|
|::|:-|:-|:-|
|
|
|0|#{sin 0}|#{cos 0}|#{tan 0}|
|
|
|1|#{sin 1*PI/180}|#{cos 1*PI/180}|#{tan 1*PI/180}|
|
|
|2|#{sin 2*PI/180}|#{cos 2*PI/180}|#{tan 2*PI/180}|
|
|
|3|#{sin 3*PI/180}|#{cos 3*PI/180}|#{tan 3*PI/180}|
|
|
|4|#{sin 4*PI/180}|#{cos 4*PI/180}|#{tan 4*PI/180}|
|
|
|5|#{sin 5*PI/180}|#{cos 5*PI/180}|#{tan 5*PI/180}|
|
|
|6|#{sin 6*PI/180}|#{cos 6*PI/180}|#{tan 6*PI/180}|
|
|
|7|#{sin 7*PI/180}|#{cos 7*PI/180}|#{tan 7*PI/180}|
|
|
|8|#{sin 8*PI/180}|#{cos 8*PI/180}|#{tan 8*PI/180}|
|
|
|9|#{sin 9*PI/180}|#{cos 9*PI/180}|#{tan 9*PI/180}|
|
|
|10|#{sin 10*PI/180}|#{cos 10*PI/180}|#{tan 10*PI/180}|
|
|
@@@
|
|
EOS
|
|
@no_tables = [no_table_1, no_table_2, no_table_3]
|
|
end
|
|
def test_string_partitions
|
|
sample = <<~'EOS'
|
|
For further information, See [Section 1](sec1.src.md).
|
|
{width=4cm, height=4cm}
|
|
The diagram above shows the relation among groups.
|
|
Refer to [Document](https://doc.sampeluniv.ac.jp).
|
|
EOS
|
|
expected = [
|
|
"For further information, See ",
|
|
"[Section 1](sec1.src.md)",
|
|
".\n",
|
|
"{width=4cm, height=4cm}",
|
|
"\nThe diagram above shows the relation among groups.\nRefer to ",
|
|
"[Document](https://doc.sampeluniv.ac.jp)",
|
|
".\n"
|
|
]
|
|
actual = sample.partitions(/!?\[.*?\]\(.*?\)(\{.*?\})?/)
|
|
assert_equal expected, actual
|
|
end
|
|
def test_get_alignments
|
|
assert_equal [:c, :l, :r, :l], get_alignments("|:-:|:---|---:|-|\n")
|
|
end
|
|
def test_mkcell
|
|
assert_equal "book ", mkcell("book", :l, 9)
|
|
assert_equal " author", mkcell("author", :r, 8)
|
|
assert_equal " 3600 ", mkcell("3600", :c, 6)
|
|
assert_equal " 3600 ", mkcell("3600", :c, 7)
|
|
end
|
|
def test_mksep
|
|
assert_equal "|:--|:------:|--------:|:----:|", mksep([:l, :c, :r, :c], [3, 8, 9, 6])
|
|
end
|
|
def test_at_table
|
|
@tables.each do |src, dst|
|
|
assert_equal dst, at_table(src)
|
|
end
|
|
end
|
|
def test_lang
|
|
files_src2md()[:files].each do |f|
|
|
assert_equal f[2], lang(f[1], "gfm") if f[2]
|
|
assert_equal f[2], lang(f[1], "html") if f[2] && f[2]=~/C|ruby|xml|markdown|bison|lex|makefile/
|
|
assert_equal f[2], lang(f[1], "latex") if f[2] && f[2]=~/C|ruby|xml|makefile/
|
|
assert_equal "", lang(f[1], "gfm") if f[2] == nil
|
|
assert_equal "", lang(f[1], "html") if f[2] == nil || !(f[2]=~/C|ruby|xml|markdown|bison|lex|makefile/)
|
|
assert_equal "", lang(f[1], "latex") if f[2] == nil || !(f[2]=~/C|ruby|xml|makefile/)
|
|
end
|
|
end
|
|
def test_width
|
|
assert_equal [1,1,2,2,3,3,4,4,5,5], [1,9,10,99,100,999,1000,9999,10000,99999].map{|n| width(n)}
|
|
end
|
|
def test_at_if_else
|
|
str = <<~'EOS'
|
|
head
|
|
@@@if gfm
|
|
gfm
|
|
@@@elif html
|
|
html
|
|
@@@elif latex
|
|
latex
|
|
@@@else
|
|
others
|
|
@@@end
|
|
tail
|
|
EOS
|
|
assert_equal "head\ngfm\ntail\n", at_if_else(str, "gfm")
|
|
assert_equal "head\nhtml\ntail\n", at_if_else(str, "html")
|
|
assert_equal "head\nlatex\ntail\n", at_if_else(str, "latex")
|
|
assert_equal "head\nothers\ntail\n", at_if_else(str, "others")
|
|
end
|
|
def test_at_include
|
|
temp = "temp_at_include"+Time.now.to_f.to_s.gsub(/\./,'')
|
|
Dir.mkdir(temp) unless Dir.exist?(temp)
|
|
File.write("#{temp}/temp.c", <<~'EOS')
|
|
#include <stdio.h>
|
|
int
|
|
fact(int n) {
|
|
int f;
|
|
|
|
if (n < 0)
|
|
return -1; /* error */
|
|
if (n == 0)
|
|
return 1;
|
|
for (f = 1; n >= 1; --n)
|
|
f *= n;
|
|
return f;
|
|
}
|
|
|
|
int
|
|
main (int argc, char **argv) {
|
|
printf ("%d\n", fact(5));
|
|
}
|
|
EOS
|
|
expected_c_gfm = <<~EOS
|
|
~~~C
|
|
1 #include <stdio.h>
|
|
2 int
|
|
3 fact(int n) {
|
|
4 int f;
|
|
5#{" "}
|
|
6 if (n < 0)
|
|
7 return -1; /* error */
|
|
8 if (n == 0)
|
|
9 return 1;
|
|
10 for (f = 1; n >= 1; --n)
|
|
11 f *= n;
|
|
12 return f;
|
|
13 }
|
|
14#{" "}
|
|
15 int
|
|
16 main (int argc, char **argv) {
|
|
17 printf ("%d\\n", fact(5));
|
|
18 }
|
|
~~~
|
|
EOS
|
|
expected_c_pandoc = <<~'EOS'
|
|
~~~{.C .numberLines}
|
|
#include <stdio.h>
|
|
int
|
|
fact(int n) {
|
|
int f;
|
|
|
|
if (n < 0)
|
|
return -1; /* error */
|
|
if (n == 0)
|
|
return 1;
|
|
for (f = 1; n >= 1; --n)
|
|
f *= n;
|
|
return f;
|
|
}
|
|
|
|
int
|
|
main (int argc, char **argv) {
|
|
printf ("%d\n", fact(5));
|
|
}
|
|
~~~
|
|
EOS
|
|
File.write("#{temp}/temp.rb", <<~'EOS')
|
|
src = File.read("temp.c")
|
|
words = src.split(/\W/).reject{|s| s==""}.uniq.sort
|
|
print "Words are:\n"
|
|
words.each {|word| print "#{word}\n"}
|
|
EOS
|
|
expected_ruby_gfm = <<~'EOS'
|
|
~~~ruby
|
|
src = File.read("temp.c")
|
|
words = src.split(/\W/).reject{|s| s==""}.uniq.sort
|
|
print "Words are:\n"
|
|
words.each {|word| print "#{word}\n"}
|
|
~~~
|
|
EOS
|
|
expected_ruby_n_gfm = <<~'EOS'
|
|
~~~ruby
|
|
1 src = File.read("temp.c")
|
|
2 words = src.split(/\W/).reject{|s| s==""}.uniq.sort
|
|
3 print "Words are:\n"
|
|
4 words.each {|word| print "#{word}\n"}
|
|
~~~
|
|
EOS
|
|
expected_ruby_pandoc = <<~'EOS'
|
|
~~~{.ruby}
|
|
src = File.read("temp.c")
|
|
words = src.split(/\W/).reject{|s| s==""}.uniq.sort
|
|
print "Words are:\n"
|
|
words.each {|word| print "#{word}\n"}
|
|
~~~
|
|
EOS
|
|
expected_c_main_gfm = <<~EOS
|
|
~~~C
|
|
1 int
|
|
2 main (int argc, char **argv) {
|
|
3 printf ("%d\\n", fact(5));
|
|
4 }
|
|
~~~
|
|
EOS
|
|
actual_c_gfm = at_include("@@@include -n\ntemp.c\n@@@\n", temp, "gfm")
|
|
actual_c_pandoc = at_include("@@@include\ntemp.c\n@@@\n", temp, "html")
|
|
actual_ruby_gfm = at_include("@@@include -N\ntemp.rb\n@@@\n", temp, "gfm")
|
|
actual_ruby_pandoc = at_include("@@@include -N\ntemp.rb\n@@@\n", temp, "latex")
|
|
actual_c_ruby_gfm = at_include("@@@include -n\ntemp.c\ntemp.rb\n@@@\n", temp, "gfm")
|
|
actual_c_main_gfm = at_include("@@@include -n\ntemp.c main\n@@@\n", temp, "gfm")
|
|
remove_entry_secure(temp)
|
|
# If you want to see the difference
|
|
# p Diff::LCS.diff(expected_c_gfm.each_line.to_a, actual_c_gfm.each_line.to_a)
|
|
# p Diff::LCS.diff(expected_c_pandoc.each_line.to_a, actual_c_pandoc.each_line.to_a)
|
|
assert_equal expected_c_gfm, actual_c_gfm
|
|
assert_equal expected_c_pandoc, actual_c_pandoc
|
|
assert_equal expected_ruby_gfm, actual_ruby_gfm
|
|
assert_equal expected_ruby_pandoc, actual_ruby_pandoc
|
|
assert_equal expected_c_gfm+expected_ruby_n_gfm, actual_c_ruby_gfm
|
|
assert_equal expected_c_main_gfm, actual_c_main_gfm
|
|
end
|
|
def test_at_shell
|
|
actual = at_shell("@@@shell\necho abc\n@@@\n", ".")
|
|
expected = "~~~\n$ echo abc\nabc\n~~~\n"
|
|
assert_equal expected, actual
|
|
end
|
|
# Change relative links in the secXX.src.md to the one in gfm/secXX.md, html/secXX.html or latex/secXX.tex
|
|
# Example:
|
|
# src=>gfm: [Section 1](sec1.src.md) => [Section 1](sec1.md)
|
|
# src=>html: [Section 1](sec1.src.md) => [Section 1](sec1.html)
|
|
# src=>latex: [Section 1](sec1.src.md) => Section 1
|
|
# src=>gfm: [document](../doc/document.md) => [document](document.md)
|
|
# src=>html: [document](../doc/document.md) => [document]document.html
|
|
# src=>latex: [document](../doc/document.md) => document
|
|
# src=>latex: [Github](https://github.com/ToshioCP) => [Github](https://github.com/ToshioCP)
|
|
# The examples above are simple. But some source files are located in the different directories.
|
|
# src/abstract.src.md => ./Readme.md: [Section 1](src/sec1.src.md) => [Section 1](gfm/sec1.md).
|
|
# src/abstract.src.md => html/index.md: [Section 1](src/sec1.src.md) => [Section 1](sec1.html).
|
|
# src/abstract.src.md => latex/abstract.md: [Section 1](src/sec1.src.md) => Section 1
|
|
# src/turtle/turtle_doc.src.md => src/turtle/turtle_doc.md: [Section 1](../sec1.src.md) => [Section 1](../../gfm/sec1.md)
|
|
# src/turtle/turtle_doc.src.md => gfm/turtle_doc.md: [Section 1](../sec1.src.md) => [Section 1](sec1.md)
|
|
def test_change_link
|
|
src_src = <<~'EOS'
|
|
[Section 1](sec1.src.md)
|
|
[document](../doc/document.src.md)
|
|
{width=9.0cm height=6.0cm}
|
|
[Github](https://github.com/ToshioCP)
|
|
EOS
|
|
src_top = "[Section 1](src/sec1.src.md)\n"
|
|
src_turtle = "[Section 1](../sec1.src.md)\n"
|
|
dst_src = <<~'EOS'
|
|
[Section 1](sec1.md)
|
|
[document](document.md)
|
|
|
|
[Github](https://github.com/ToshioCP)
|
|
EOS
|
|
assert_equal dst_src, change_link(src_src, "src", "gfm", "gfm")
|
|
dst_src = <<~'EOS'
|
|
[Section 1](sec1.html)
|
|
[document](document.html)
|
|
|
|
[Github](https://github.com/ToshioCP)
|
|
EOS
|
|
assert_equal dst_src, change_link(src_src, "src", "html", "html")
|
|
dst_src = <<~'EOS'
|
|
Section 1
|
|
document
|
|
{width=9.0cm height=6.0cm}
|
|
[Github](https://github.com/ToshioCP)
|
|
EOS
|
|
assert_equal dst_src, change_link(src_src, "src", "latex", "latex")
|
|
assert_equal "[Section 1](sec1.md)\n", change_link(src_top, ".", "gfm", ".")
|
|
assert_equal "[Section 1](sec1.html)\n", change_link(src_top, ".", "html", "html")
|
|
assert_equal "Section 1\n", change_link(src_top, ".", "latex", "latex")
|
|
assert_equal "[Section 1](sec1.md)\n", change_link(src_turtle, "turtle", "gfm", "turtle")
|
|
assert_equal "[Section 1](sec1.md)\n", change_link(src_turtle, "turtle", "gfm", "gfm")
|
|
|
|
assert_equal "[sample.c](../test/temp/sample.c)", change_link("[sample.c](temp/sample.c)", "test", "gfm")
|
|
assert_equal "[Section 3](sec3.md)", change_link("[Section 3](sec3.src.md)", "src", "gfm")
|
|
assert_equal "[Section 3](sec3.html)", change_link("[Section 3](sec3.src.md)", "src", "html")
|
|
assert_equal "Section 3", change_link("[Section 3](sec3.src.md)", "src", "latex")
|
|
src_src = <<~'EOS'
|
|
[Section 1](`sec1.src.md`)
|
|
[`document`](../doc/document.src.md)
|
|
`{width=9.0cm height=6.0cm}``
|
|
[Github`](`https://github.com/ToshioCP)
|
|
EOS
|
|
dst_src = <<~'EOS'
|
|
[Section 1](`sec1.src.md`)
|
|
[`document`](document.md)
|
|
`{width=9.0cm height=6.0cm}``
|
|
[Github`](`https://github.com/ToshioCP)
|
|
EOS
|
|
assert_equal dst_src, change_link(src_src, "src", "gfm", "gfm")
|
|
end
|
|
def test_src2md
|
|
cur_dir = pwd()
|
|
temp = "temp"+Time.now.to_f.to_s.gsub(/\./,'')
|
|
src_dir = "#{temp}/src"
|
|
mkdir_p(src_dir) unless Dir.exist?(src_dir)
|
|
files_src2md()[:files].each do |f|
|
|
File.write "#{src_dir}/#{f[1]}", f[0]
|
|
end
|
|
File.write("#{src_dir}/sample_image.src.md", "{width=8cm hight=6cm}\n")
|
|
dst_md = {}
|
|
["gfm", "html", "latex"].each do |type|
|
|
dst_dir = {"gfm"=>"gfm","html"=>"docs","latex"=>"latex"}[type]
|
|
chdir(temp)
|
|
mkdir(dst_dir) unless Dir.exist?(dst_dir)
|
|
src2md "src/sample.src.md", type
|
|
src2md "src/sample_image.src.md", type
|
|
dst_md[type] = File.read "#{dst_dir}/sample.md"
|
|
dst_md["#{type}_image"] = File.read "#{dst_dir}/sample_image.md"
|
|
chdir(cur_dir)
|
|
end
|
|
remove_entry_secure(temp)
|
|
# If you want to see the difference
|
|
# Diff::LCS.diff(files_src2md()[:sample_md_gfm].each_line.to_a, dst_md["gfm"].each_line.to_a).each do |array|
|
|
# array.each do |change|
|
|
# print "#{change.action} #{change.position.to_s.chomp}: #{change.element.to_s.chomp}\n"
|
|
# end
|
|
# end
|
|
# Diff::LCS.diff(files()[:sample_md_latex].each_line.to_a, dst_md["latex"].each_line.to_a).each do |array|
|
|
# array.each do |change|
|
|
# print "#{change.action} #{change.position.to_s.chomp}: #{change.element.to_s.chomp}\n"
|
|
# end
|
|
# end
|
|
assert_equal files_src2md()[:sample_md_gfm], dst_md["gfm"]
|
|
assert_equal files_src2md()[:sample_md_html], dst_md["html"]
|
|
assert_equal files_src2md()[:sample_md_latex], dst_md["latex"]
|
|
assert_equal "\n", dst_md["gfm_image"]
|
|
assert_equal "\n", dst_md["html_image"]
|
|
assert_equal "{width=8cm hight=6cm}\n", dst_md["latex_image"]
|
|
end
|
|
end
|