aboutsummaryrefslogtreecommitdiffhomepage
path: root/sundry/misc/util/rb/tex/dr_tex.rb
blob: f310735373e9a77bf04b6208a03b3fbfd3bec505 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
#!/usr/bin/env ruby
# /+
# - Name: Spine, Doc Reform [a part of]
#   - Description: documents, structuring, processing, publishing, search
#     - static content generator
# 
#   - Author: Ralph Amissah
#     [ralph.amissah@gmail.com]
# 
#   - Copyright: (C) 2015 - 2021 Ralph Amissah, All Rights
#     Reserved.
# 
#   - License: AGPL 3 or later:
# 
#     Spine (SiSU), a framework for document structuring, publishing and
#     search
# 
#     Copyright (C) Ralph Amissah
# 
#     This program is free software: you can redistribute it and/or modify it
#     under the terms of the GNU AFERO General Public License as published by the
#     Free Software Foundation, either version 3 of the License, or (at your
#     option) any later version.
# 
#     This program is distributed in the hope that it will be useful, but WITHOUT
#     ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
#     FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for
#     more details.
# 
#     You should have received a copy of the GNU General Public License along with
#     this program. If not, see [https://www.gnu.org/licenses/].
# 
#     If you have Internet connection, the latest version of the AGPL should be
#     available at these locations:
#     [https://www.fsf.org/licensing/licenses/agpl.html]
#     [https://www.gnu.org/licenses/agpl.html]
# 
#   - Spine (by Doc Reform, related to SiSU) uses standard:
#     - docReform markup syntax
#       - standard SiSU markup syntax with modified headers and minor modifications
#     - docReform object numbering
#       - standard SiSU object citation numbering & system
# 
#   - Homepages:
#     [https://www.doc_reform.org]
#     [https://www.sisudoc.org]
# 
#   - Git
#     [https://git.sisudoc.org/projects/?p=software/spine.git;a=summary]
# 
# +/
require 'fileutils'
pwd = Dir.pwd
argv,texfiles_with_path,flags=[],[],[]
lngs = %{(am|bg|bn|br|ca|cs|cy|da|de|el|en|eo|es|et|eu|fi|fr|ga|gl|he|hi|hr|hy|ia|is|it|ja|ko|la|lo|lt|lv|ml|mr|nl|no|nn|oc|pl|pt|pt_BR|ro|ru|sa|se|sk|sl|sq|sr|sv|ta|te|th|tk|tr|uk|ur|vi|zh)}
Regexp.new(lngs, Regexp::IGNORECASE)
argv=$*
argv.sort.each{|y| (y =~/^--\S+$/i) ? (flags << y) : (texfiles_with_path << y) }
if flags.length==0 \
|| flags.inspect =~/"--help"/
  cmd=(/([^\/]+)$/).match($0)[1]
  puts <<WOK
#{cmd} --help
#{cmd} --out=[output path]
#{cmd} --paper-size=a5 --out=~/test
WOK
end
// paper_size_orientation = (flags.inspect.match(/"--paper-size=(a4|a5|b5|letter|legal)"/)) ? $1 : "a4"
out_path = Dir.pwd
if (flags.inspect.match(/"--out=\S+"/))
  out_path = flags.inspect.match(/"--out=(\S+)"/)[1]
  unless (FileTest.directory?(out_path))
    puts "Creating output directory: --out=#{out_path}"
    FileUtils::mkdir_p(out_path)
    unless (FileTest.directory?(out_path))
      puts "FAILS unable to create directory: #{out_path}"
      exit
    end
  end
end
if texfiles_with_path.length == 0
  texfiles_with_path=Dir.glob('*.tex')
end
if texfiles_with_path.length > 0
  texfiles_with_path.each do |texfile_with_path|
    if texfile_with_path =~/.+\.tex/
      #puts texfile_with_path
      if FileTest.file?(texfile_with_path)
        file_basename_with_path = texfile_with_path.sub(/\.tex$/,'')
        file_basename = file_basename_with_path.sub(/.*?([^\/]+)$/,'\1')
        _out_path = out_path
        if file_basename =~ /\.#{lngs}$/
          lng = file_basename.match(/\.#{lngs}$/)[1]
          puts file_basename
          puts lng
          puts _out_path
          unless _out_path.match(/\/#{lng}\/pdf$/)
            _out_path = "#{out_path}/#{lng}/pdf"
            FileUtils::mkdir_p(_out_path)
          end
        end
        texpdf_cmd = %{xetex -interaction=batchmode -fmt=xelatex #{texfile_with_path}\n}
        puts texpdf_cmd
        2.times { |i| system(texpdf_cmd) }
        if (FileTest.file?(%{#{pwd}/#{file_basename}.pdf})) && (FileTest.directory?(_out_path))
          FileUtils::Verbose::mv(%{#{pwd}/#{file_basename}.pdf}, %{#{_out_path}/#{file_basename}.pdf})
          puts (%{#{_out_path}/#{file_basename}.pdf})
        else
          puts "issue with pdf file or output directory"
          puts "pdf file:   #{pwd}/#{file_basename}.pdf}"
          puts "output dir: #{_out_path}/"
        end
        suffix = ['log', 'out', 'toc', 'aux']
        suffix.each { |s| FileUtils::rm_f(%{#{pwd}/#{file_basename}.#{s}})}
      end
    end
  end
end
Dir.chdir(pwd)
__END__