Class: Polyrex

Inherits:
Object
  • Object
show all
Defined in:
lib/polyrex.rb

Instance Attribute Summary collapse

Instance Method Summary collapse

Constructor Details

#initialize(location = nil, schema: nil, id_counter: '1', debug: debug) ⇒ Polyrex

Returns a new instance of Polyrex.



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
 
# File 'lib/polyrex.rb', line 45

def initialize(location=nil, schema: nil, id_counter: '1', debug: debug)


  @id_counter, @debug = id_counter, debug
  @format_masks = []
  @delimiter = '' 

  self.method(:schema=).call(schema) if schema  
  
  if location then      

    s, type = RXFHelper.read(location)
    return import(s) if s =~ /^\<\?polyrex\b/
    
    @local_filepath = location if type == :file or type == :dfs

    openx(s)

    if schema then

      fields = @schema[/\/.*/].scan(/\[([^\]]+)/).map \
        {|x| x.first.split(',').map(&:strip)}
      refresh_records self.records, fields, 0

    end

    @summary = RecordX.new @doc.root.xpath("summary/*")
    @summary_fields = @summary.keys
    

  end
  
  @polyrex_xslt = RecordxXSLT.new
  #@parent_node = @doc.root if @doc
end

Instance Attribute Details

#delimiter ⇒ Object

Returns the value of attribute delimiter.



42
43
44
 
# File 'lib/polyrex.rb', line 42

def delimiter
  @delimiter
end

#format_masks ⇒ Object

– start of full text edit methods



165
166
167
 
# File 'lib/polyrex.rb', line 165

def format_masks
  @format_masks
end

#id_counter ⇒ Object

Returns the value of attribute id_counter.



42
43
44
 
# File 'lib/polyrex.rb', line 42

def id_counter
  @id_counter
end

#schema ⇒ Object

Returns the value of attribute schema.



42
43
44
 
# File 'lib/polyrex.rb', line 42

def schema
  @schema
end

#summary_fields ⇒ Object

Returns the value of attribute summary_fields.



42
43
44
 
# File 'lib/polyrex.rb', line 42

def summary_fields
  @summary_fields
end

#type ⇒ Object

Returns the value of attribute type.



42
43
44
 
# File 'lib/polyrex.rb', line 42

def type
  @type
end

#xslt ⇒ Object

Returns the value of attribute xslt.



42
43
44
 
# File 'lib/polyrex.rb', line 42

def xslt
  @xslt
end

#xslt_schema ⇒ Object

Returns the value of attribute xslt_schema.



42
43
44
 
# File 'lib/polyrex.rb', line 42

def xslt_schema
  @xslt_schema
end

Instance Method Details

#add(pxobj) ⇒ Object 



81
82
83
 
# File 'lib/polyrex.rb', line 81

def add(pxobj)
  self.record.add pxobj.node
end

#build(records, indent = 0) ⇒ Object 



299
300
301
302
303
304
305
306
307
308
309
310
311
312
313
314
 
# File 'lib/polyrex.rb', line 299

def build(records, indent=0)

  records.map do |item|

    summary = item.element 'summary'
    format_mask = summary.text('format_mask').to_s
    line = format_mask.gsub(/\[![^\]]+\]/){|x| summary.text(x[2..-2]).to_s}

    records = item.element('records').elements.to_a
    
    if records.length > 0 then
      line = line + "\n" + build(records, indent + 1).join("\n") 
    end
    ('  ' * indent) + line
  end
end

#content(options = {}) ⇒ Object 



85
86
87
 
# File 'lib/polyrex.rb', line 85

def content(options={})
  CGI.unescapeHTML(to_xml(options))
end

#create(id: @id_counter) ⇒ Object 



89
90
91
92
 
# File 'lib/polyrex.rb', line 89

def create(id: @id_counter)
  puts 'id: ' + id.inspect if @debug
  @create = PolyrexCreateObject.new(id: id, record: @doc.root)
end

#delete(x = nil) ⇒ Object 



94
95
96
97
98
99
100
101
 
# File 'lib/polyrex.rb', line 94

def delete(x=nil)

  if x.to_i.to_s  == x.to_s then
    @doc.root.delete("//[@id='#{x}'")
  else
    @doc.root.xpath(x).each(&:delete)
  end
end

#each_recursive(parent = self, level = 0, &blk) ⇒ Object 



112
113
114
115
116
117
118
119
120
121
122
 
# File 'lib/polyrex.rb', line 112

def each_recursive(parent=self, level=0, &blk)
  
  parent.records.each.with_index do |x, index|

    blk.call(x, parent, level, index) if block_given?

    each_recursive(x, level+1, &blk) if x.records.any?
    
  end
  
end

#element(s) ⇒ Object 



185
186
187
 
# File 'lib/polyrex.rb', line 185

def element(s)
  @doc.root.element(s)
end

#find_by_id(id) ⇒ Object

– start of crud methods –



148
149
150
151
 
# File 'lib/polyrex.rb', line 148

def find_by_id(id)
  @parent_node = @doc.root.element("//[@id='#{id}']")
  @objects[@parent_node.name].new(@parent_node, id: @id)
end

#id(id) ⇒ Object 



153
154
155
156
 
# File 'lib/polyrex.rb', line 153

def id(id)
  @parent_node = @doc.root.element("//[@id='#{id}']")
  self
end

#leaf_nodes_to_dx ⇒ Object 



189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
 
# File 'lib/polyrex.rb', line 189

def leaf_nodes_to_dx()
  
  schema, record_name = @summary.schema\
                              .match(/([^\/]+\/([^\/]+)\[[^\[]+$)/).captures
  
  xml = RexleBuilder.new

  xml.items do
    xml.summary do
      xml.schema schema.sub(/(\/\w+)\[([^\]]+)\]/,'\1(\2)')
    end
    xml.records 
  end
  
  doc = Rexle.new xml.to_a
  body = doc.root.element 'records'
  a = self.xpath('//' + record_name)

  a.each do |record|
    body.add record.deep_clone
  end

  make_dynarex doc.root
end

#order=(val) ⇒ Object 



158
159
160
 
# File 'lib/polyrex.rb', line 158

def order=(val)
  @order = val.to_s
end

#parse(x = nil, options = {}) ⇒ Object Also known as: import 



169
170
171
172
173
174
175
176
177
178
179
180
181
 
# File 'lib/polyrex.rb', line 169

def parse(x=nil, options={})

  buffer, type = RXFHelper.read(x)
  
  if type == :unknown and buffer.lines.length <= 1 then
    raise PolyrexException, 'File not found: ' + x.inspect
  end
  
  buffer = yield if block_given?          
  string_parse buffer.clone, options

  self
end

#record ⇒ Object 



124
125
126
 
# File 'lib/polyrex.rb', line 124

def record()
  @parent_node
end

#records ⇒ Object 



214
215
216
217
218
219
220
 
# File 'lib/polyrex.rb', line 214

def records

  @doc.root.xpath("records/*").map do |node|      
    Kernel.const_get(node.name.capitalize).new node, id: @id_counter
  end
  
end

#rxpath(s) ⇒ Object 



222
223
224
225
226
227
228
229
230
231
 
# File 'lib/polyrex.rb', line 222

def rxpath(s)
  
  a = @doc.root.xpath s.split('/').map \
                {|x| x.sub('[','[summary/').prepend('records/')}.join('/')
  
  a.map do |node| 
    Kernel.const_get(node.name.capitalize).new node, id: node.attributes[:id]
  end

end

#save(filepath = nil, opt = {}, options: opt, pretty: false) ⇒ Object 



133
134
135
136
137
138
139
140
141
142
143
144
 
# File 'lib/polyrex.rb', line 133

def save(filepath=nil, opt={}, options: opt, pretty: false)    
  
  refresh_summary
  filepath ||= @local_filepath
  @local_filepath = filepath
  
  options.merge!({pretty: pretty}) if options.empty?
  xml = @doc.to_s(options)
  
  buffer = block_given? ? yield(xml) : xml
  File.open(filepath,'w'){|f| f.write buffer}    
end

#summary ⇒ Object 



250
251
252
 
# File 'lib/polyrex.rb', line 250

def summary
  @summary
end

#to_a ⇒ Object 



254
255
256
 
# File 'lib/polyrex.rb', line 254

def to_a()
  recordx_map @doc.root
end

#to_dynarex ⇒ Object 



258
259
260
261
262
263
264
265
266
267
268
269
270
271
 
# File 'lib/polyrex.rb', line 258

def to_dynarex()

  root = @doc.root.deep_clone

  summary = root.element('summary')
  #summary.delete('format_mask')
  #summary.element('recordx_type').text = 'dynarex'

  summary.add root.element('records/*/summary/format_mask').clone    
  e = summary.element('schema')
  e.text = e.text[/[^\/]+\/[^\/]+/].sub(/(\/\w+)\[([^\]]+)\]/,'\1(\2)')

  make_dynarex(root)
end

#to_opml ⇒ Object 



273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
289
290
291
292
293
294
295
 
# File 'lib/polyrex.rb', line 273

def to_opml()
  
  puts '@schema: ' + @schema.inspect if @debug
  
  head, body = @schema.split(/(?<=\])/,2)
  schema_body = body.gsub(/(?<=\[)[^\]]+/) do |x|
    x.split(/\s*,\s*/).map {|field| '@' + field + ':' + field}.join(', ')
  end
  schema_head = head.gsub(/(?<=\[)[^\]]+/) do |x|
    x.split(/\s*,\s*/).map {|field| field + ':' + field}.join(', ')
  end

  puts 'schema_body: ' + schema_body.inspect if @debug
  puts 'schema_head: ' + schema_head.inspect if @debug
  xslt_schema = schema_head.sub(/^\w+/,'opml>head') + schema_body.gsub(/\w+(?=\[)/,'outline').sub(/\/(\w+)(?=\[)/,'/body>outline')
      
  puts 'xslt_schema: ' + xslt_schema.inspect if @debug
  
  recxslt = RecordxXSLT.new(schema: @schema, xslt_schema: xslt_schema)
  
  Rexslt.new(recxslt.to_xslt, self.to_xml).to_s    
  
end

#to_s(header: true) ⇒ Object 



297
298
299
300
301
302
303
304
305
306
307
308
309
310
311
312
313
314
315
316
317
318
319
320
321
322
323
324
325
326
327
328
329
330
331
332
333
334
335
336
337
338
339
340
341
342
343
344
345
346
347
 
# File 'lib/polyrex.rb', line 297

def to_s(header: true)

  def build(records, indent=0)

    records.map do |item|

      summary = item.element 'summary'
      format_mask = summary.text('format_mask').to_s
      line = format_mask.gsub(/\[![^\]]+\]/){|x| summary.text(x[2..-2]).to_s}

      records = item.element('records').elements.to_a
      
      if records.length > 0 then
        line = line + "\n" + build(records, indent + 1).join("\n") 
      end
      ('  ' * indent) + line
    end
  end

  sumry = ''


  summary_fields = self.summary.to_h.keys

  %w(recordx_type schema format_mask).each {|x| summary_fields.delete x}
  sumry = summary_fields.map {|x| x.to_s + ': ' + \
                     self.summary.method(x.to_sym).call}.join("\n") + "\n"


  if @raw_header then
    declaration = @raw_header
  else

    smry_fields = i(schema)              
    if self.delimiter.length > 0 then
      smry_fields << :delimiter 
    else
      smry_fields << :format_mask
    end

    s = smry_fields.map {|x|  "%s=\"%s\"" % \
      [x, self.summary.send(x).to_s.gsub('"', '\"') ]}.join ' '

    declaration = %Q(<?polyrex %s?>\n) % s
  end

  docheader = declaration + sumry
  out = build(self.records).join("\n")
  header ? docheader + "\n" + out : out
  
end

#to_xml(options = {}) ⇒ Object 



128
129
130
131
 
# File 'lib/polyrex.rb', line 128

def to_xml(options={})
  refresh_summary
  @doc.to_s(options)
end

#to_xslt ⇒ Object 



349
350
351
352
 
# File 'lib/polyrex.rb', line 349

def to_xslt()    
  @polyrex_xslt.schema = @schema
  @polyrex_xslt.to_xslt
end

#xpath(s, &blk) ⇒ Object 



354
355
356
357
358
359
360
361
 
# File 'lib/polyrex.rb', line 354

def xpath(s, &blk)

  if block_given? then
    @doc.root.xpath(s, &blk)
  else
    @doc.root.xpath s
  end
end