Module: Livetext::Standard

Included in:
Processor
Defined in:
lib/standard.rb

Constant Summary collapse

SimpleFormats =

Move this?

{ b: %w[<b> </b>],
i: %w[<i> </i>],
t: ["<font size=+1><tt>", "</tt></font>"],
s: %w[<strike> </strike>] }

Instance Attribute Summary collapse

Instance Method Summary collapse

Instance Attribute Details

#_data ⇒ Object (readonly)

Returns the value of attribute _data.



9
10
11
 
# File 'lib/standard.rb', line 9

def _data
  @_data
end

Instance Method Details

#_def ⇒ Object

def _next_output(tag = “sec”, num = nil)

  @_file_num = num ? num : @_file_num + 1
  @_file_num = @_file_num.to_i
  name = "#{'%03d' % @_file_num}-#{tag}.html"
  _output(name)
end



146
147
148
149
150
151
152
153
154
155
156
 
# File 'lib/standard.rb', line 146

def _def
  name = @_args[0]
  str = "def #{name}\n"
  raise "Illegal name '#{name}'" if _disallowed?(name)
  str += _body_text(true)
  str += "\nend\n"
  eval str
rescue => err
  _error!(err)
#   puts @body
end

#_include ⇒ Object 



218
219
220
221
222
223
224
225
226
 
# File 'lib/standard.rb', line 218

def _include
  file = @_args.first
STDERR.puts "In #{Dir.pwd}\n     - about to process #{file}\n"

  _check_existence(file, "No such include file '#{file}'")
  @parent.process_file(file)
STDERR.puts "    ...finished"
  _optional_blank_line
end

#_seek(file) ⇒ Object 



197
198
199
200
201
202
203
204
205
206
207
 
# File 'lib/standard.rb', line 197

def _seek(file)
 if File.exist?(file)
  return file
else
    value = nil
  value = _seek("../#{file}") unless Dir.pwd == "/"
end
 return value
rescue
 return nil
end

#backtrace ⇒ Object 



25
26
27
28
29
 
# File 'lib/standard.rb', line 25

def backtrace
  arg = @_args.first
  @backtrace = true
  @backtrace = false if arg == "off"
end
 


67
68
69
70
71
72
73
 
# File 'lib/standard.rb', line 67

def banner
  str = _format(@_data)
  n = str.length - 1
  puts "-"*n
  puts str
  puts "-"*n
end

#bits ⇒ Object

dumb name - bold, italic, teletype, striketrough



17
18
19
20
21
22
23
 
# File 'lib/standard.rb', line 17

def bits  # dumb name - bold, italic, teletype, striketrough
  b0, b1, i0, i1, t0, t1, s0, s1 = *@_args
  SimpleFormats[:b] = [b0, b1]
  SimpleFormats[:i] = [i0, i1]
  SimpleFormats[:t] = [t0, t1]
  SimpleFormats[:s] = [s0, s1]
end

#br ⇒ Object 



414
415
416
417
418
419
 
# File 'lib/standard.rb', line 414

def br
  n = _args.first || "1"
  out = ""
  n.to_i.times { out << "<br>" }
  _out out
end

#cleanup ⇒ Object

def outdir

  @_outdir = @_args.first
  _optional_blank_line
end

def outdir!  # FIXME ?
  @_outdir = @_args.first
  raise "No output directory specified" if @_outdir.nil?
  raise "No output directory specified" if @_outdir.empty?
  system("rm -f #@_outdir/*.html")
  _optional_blank_line
end

def _output(name)
  @_outdir ||= "."  # FIXME
  @output.puts @body
  @body = ""
  @output.close unless @output == STDOUT
  @output = File.open(@_outdir + "/" + name, "w")
  @output.puts "<meta charset='UTF-8'>\n\n"
end

def _append(name)
  @_outdir ||= "."  # FIXME
  @output.close unless @output == STDOUT
  @output = File.open(@_outdir + "/" + name, "a")
  @output.puts "<meta charset='UTF-8'>\n\n"
end

def output
  name = @_args.first
  _debug "Redirecting output to: #{name}"
  _output(name)
end

def append
  file = @_args[0]
  _append(file)
end

def next_output
  tag, num = @_args
  _next_output(tag, num)
  _optional_blank_line
end



129
130
131
132
133
134
135
136
137
 
# File 'lib/standard.rb', line 129

def cleanup
  @_args.each do |item| 
    if ::File.directory?(item)
      system("rm -f #{item}/*")
    else
      ::FileUtils.rm(item)
    end
  end
end

#comment ⇒ Object 



31
32
33
 
# File 'lib/standard.rb', line 31

def comment
  _body
end

#copy ⇒ Object 



281
282
283
284
285
286
 
# File 'lib/standard.rb', line 281

def copy
  file = @_args.first
  _check_existence(file, "No such file '#{file}' to copy")
  _out grab_file(file)
  _optional_blank_line
end

#data=(val) ⇒ Object 



11
12
13
14
15
 
# File 'lib/standard.rb', line 11

def data=(val)
  @_data = val
  @_args = val.split rescue []
  @_mixins = []
end

#debug ⇒ Object 



297
298
299
300
301
 
# File 'lib/standard.rb', line 297

def debug
  arg = @_args.first
  self._debug = true
  self._debug = false if arg == "off"
end

#dlist ⇒ Object 



354
355
356
357
358
359
360
361
362
363
364
 
# File 'lib/standard.rb', line 354

def dlist
  delim = _args.first
  _out "<dl>"
  _body do |line|
    line = _format(line)
    term, defn = line.split(delim)
    _out "<dt>#{term}</dt>"
    _out "<dd>#{defn}</dd>"
  end
  _out "</dl>"
end

#errout ⇒ Object 



57
58
59
 
# File 'lib/standard.rb', line 57

def errout
  TTY.puts @_data
end

#func ⇒ Object 



41
42
43
44
45
46
47
48
49
50
 
# File 'lib/standard.rb', line 41

def func
  funcname = @_args[0]
  _error! "Illegal name '#{funcname}'" if _disallowed?(funcname)
  func_def = <<-EOS
    def #{funcname}(param)
      #{_body_text(true)}
    end
EOS
  Livetext::Functions.class_eval func_def
end

#heading ⇒ Object 



333
334
335
336
337
 
# File 'lib/standard.rb', line 333

def heading
  _print "<center><font size=+1><b>"
  _print @_data
  _print "</b></font></center>"
end

#heredoc ⇒ Object 



174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
 
# File 'lib/standard.rb', line 174

def heredoc
  var = @_args[0]
  str = _body_text
  s2 = ""
  str.each_line do |s|
    s2 << s.chomp + "<br>"
  end
  indent = @parent.indentation.last
  indented = " " * indent
  #  s2 = ""
  #  str.each_line do |line|
  #    if line.start_with?(indented)
  #      line.replace(line[indent..-1])
  #    else
  #      STDERR.puts "Error? heredoc not indented?"
  #      return
  #    end
  #    s2 << line
  #  end
  @parent._setvar(var, s2.chomp)
  _optional_blank_line
end

#inherit ⇒ Object 



228
229
230
231
232
233
234
235
236
237
 
# File 'lib/standard.rb', line 228

def inherit
  file = @_args.first
  upper = "../#{file}"
  good = (File.exist?(upper) || File.exist?(file))
  _error!("File #{file} not found (local or parent)") unless good

  @parent.process_file(upper) if File.exist?(upper)
  @parent.process_file(file)  if File.exist?(file)
  _optional_blank_line
end

#invoke(str) ⇒ Object 



344
345
 
# File 'lib/standard.rb', line 344

def invoke(str)
end

#link ⇒ Object 



379
380
381
382
383
 
# File 'lib/standard.rb', line 379

def link
  url = _args.first
  text = _args[2..-1].join(" ")
  _out "<a href='#{url}'>#{text}</a>"
end

#mixin ⇒ Object

def include! # FIXME huh?

file = @_args.first
return unless File.exist?(file)

lines = @parent.process_file(file)

#? File.delete(file)

  _optional_blank_line
end



248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
 
# File 'lib/standard.rb', line 248

def mixin
  name = @_args.first   # Expect a module name
  file = "#{Plugins}/" + name.downcase + ".rb"
  return if @_mixins.include?(name)
  file = "./#{name}.rb" unless File.exist?(file)
  if File.exist?(file)
    # Just keep going...
  else
    if File.expand_path(".") != "/"
      Dir.chdir("..") { mixin }
      return
    else
      STDERR.puts "No such mixin '#{name}"
      puts @body
      exit!
    end
  end

  @_mixins << name
  meths = grab_file(file)
  modname = name.gsub("/","_").capitalize
  string = "module ::#{modname}; #{meths}\nend"
# puts "==========="
# string.each_line.with_index {|line, i| puts "#{'%3d' % (i+1)} : #{line}" }
# puts "==========="
  eval(string)
  newmod = Object.const_get("::" + modname)
  self.extend(newmod)
  init = "init_#{name}"
  self.send(init) if self.respond_to? init
  _optional_blank_line
end

#mono ⇒ Object 



347
348
349
350
351
352
 
# File 'lib/standard.rb', line 347

def mono
  _out "<pre>"
  _body(true) {|line| _out line }
  _out "</pre>"
  _optional_blank_line
end

#newpage ⇒ Object 



339
340
341
342
 
# File 'lib/standard.rb', line 339

def newpage
  _out '<p style="page-break-after:always;"></p>'
  _out "<p/>"
end

#nopara ⇒ Object 



329
330
331
 
# File 'lib/standard.rb', line 329

def nopara
  @_nopara = true
end

#nopass ⇒ Object 



314
315
316
 
# File 'lib/standard.rb', line 314

def nopass
  @_nopass = true
end

#old_dlist ⇒ Object 



366
367
368
369
370
371
372
373
374
375
376
377
 
# File 'lib/standard.rb', line 366

def old_dlist
  delim = _args.first
  _out "<table>"
  _body do |line|
    line = _format(line)
    term, defn = line.split(delim)
    _out "<tr>"
    _out "<td width=3%><td width=10%>#{term}</td><td>#{defn}</td>"
    _out "</tr>"
  end
  _out "</table>"
end

#para ⇒ Object 



318
319
320
321
322
323
324
325
326
327
 
# File 'lib/standard.rb', line 318

def para
  # FIXME - add check for args size (helpers); _onoff helper??
  onoff = _args.first
  case onoff
    when nil;   @_nopara = false
    when "on";  @_nopara = false
    when "off"; @_nopara = true
    else _error!("Unknown arg '#{onoff}'")
  end
end

#passthru ⇒ Object 



303
304
305
306
307
308
309
310
311
312
 
# File 'lib/standard.rb', line 303

def passthru
  # FIXME - add check for args size (helpers); _onoff helper??
  onoff = _args.first
  case onoff
    when nil;   @_nopass = false
    when "on";  @_nopass = false
    when "off"; @_nopass = true
    else _error!("Unknown arg '#{onoff}'")
  end
end

#quit ⇒ Object 



75
76
77
78
79
80
 
# File 'lib/standard.rb', line 75

def quit
  puts @body
  @body = ""
  @output.close
#   exit!
end

#r ⇒ Object 



288
289
290
 
# File 'lib/standard.rb', line 288

def r
  _out @_data  # No processing at all
end

#raw ⇒ Object 



292
293
294
295
 
# File 'lib/standard.rb', line 292

def raw
  # No processing at all (terminate with __EOF__)
  _raw_body {|x| _out x }  # no formatting
end

#say ⇒ Object 



61
62
63
64
65
 
# File 'lib/standard.rb', line 61

def say
  str = _format(@_data)
  TTY.puts str
  _optional_blank_line
end

#seek ⇒ Object 



209
210
211
212
213
214
215
216
 
# File 'lib/standard.rb', line 209

def seek
  # like include, but search upward as needed
  file = @_args.first
file = _seek(file)
  _error!(file, "No such include file '#{file}'") unless file
  @parent.process_file(file)
  _optional_blank_line
end

#set ⇒ Object 



158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
 
# File 'lib/standard.rb', line 158

def set
  assigns = @_data.chomp.split(/, */)
  # Do a better way?
  # FIXME *Must* allow for vars/functions
  assigns.each do |a| 
    var, val = a.split("=")
    var.strip!
    val.strip!
    val = val[1..-2] if val[0] == ?" && val[-1] == ?"
    val = val[1..-2] if val[0] == ?' && val[-1] == ?'
    val = FormatLine.var_func_parse(val)
    @parent._setvar(var, val)
  end
  _optional_blank_line
end

#shell ⇒ Object 



35
36
37
38
39
 
# File 'lib/standard.rb', line 35

def shell
  cmd = @_data
  _errout("Running: #{cmd}")
  system(cmd)
end

#shell! ⇒ Object 



52
53
54
55
 
# File 'lib/standard.rb', line 52

def shell!
  cmd = @_data
  system(cmd)
end

#xtable ⇒ Object

Borrowed from bookish - FIXME



385
386
387
388
389
390
391
392
393
394
395
396
397
398
399
400
401
402
403
404
405
406
407
408
409
410
411
412
 
# File 'lib/standard.rb', line 385

def xtable   # Borrowed from bookish - FIXME
  title = @_data
  delim = " :: "
  _out "<br><center><table width=90% cellpadding=5>"
  lines = _body(true)
  maxw = nil
  lines.each do |line|
    line = _format(line)
    line.gsub!(/\n+/, "<br>")
    cells = line.split(delim)
    wide = cells.map {|x| x.length }
    maxw = [0] * cells.size
    maxw = maxw.map.with_index {|x, i| [x, wide[i]].max }
  end

  sum = maxw.inject(0, :+)
  maxw.map! {|x| (x/sum*100).floor }

  lines.each do |line|
    cells = line.split(delim)
    _out "<tr>"
    cells.each.with_index do |cell, i| 
      _out "  <td valign=top>#{cell}</td>"
    end
    _out "</tr>"
  end
  _out "</table></center>"
end