Module: XMLhelper

Included in:
Rexle, Rexle::Element
Defined in:
lib/rexle.rb

Instance Method Summary collapse

Instance Method Details

#doc_pretty_print(children, declaration = true) ⇒ Object



183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
# File 'lib/rexle.rb', line 183

def doc_pretty_print(children, declaration=true)

  body = pretty_print(children,2).join

  a = self.root.attributes.to_a.map do |k,v| 
    "%s='%s'" % [k,(v.is_a?(Array) ? v.join(' ') : v)]
  end
  
  ind = "\n  "   
  xml = "<%s%s>%s%s%s</%s>" % [self.root.name, a.empty? ? '' : \
    ' ' + a.join(' '), ind, body, "\n", self.root.name]

  if self.instructions and declaration then
    processing_instructions("\n") + "\n" + xml
  else 
    xml
  end
end

#doc_print(children, declaration = true) ⇒ Object



164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
# File 'lib/rexle.rb', line 164

def doc_print(children, declaration=true)

  body = (children.nil? or children.empty? \
         or children.is_an_empty_string? ) ? '' : scan_print(children).join

  a = self.root.attributes.to_a.map do |k,v|
    "%s='%s'" % [k,(v.is_a?(Array) ? v.join(' ') : v.to_s)]
  end

  xml = "<%s%s>%s</%s>" % [self.root.name, a.empty? ? '' : \
    ' ' + a.join(' '), body, self.root.name]

  if self.instructions and declaration then
    processing_instructions() + xml
  else 
    xml
  end
end

#inspectObject



202
203
204
# File 'lib/rexle.rb', line 202

def inspect()    
  "#<Rexle:%s>" % [self.object_id]
end

#pretty_print(nodes, indent = '0') ⇒ Object



265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
289
290
291
292
293
294
295
296
297
298
299
300
301
302
303
304
305
306
307
308
# File 'lib/rexle.rb', line 265

def pretty_print(nodes, indent='0')

  indent = indent.to_i
  return '' unless nodes

  nodes.select(){|x| x.to_s.strip.length > 0}
      .map.with_index do |x, i|

    if x.is_a? Rexle::Element then

      a = x.attributes.to_a.map do |k,v| 
        "%s='%s'" % [k,(v.is_a?(Array) ? v.join(' ') : v)]
      end
      a ||= []

      tag = x.name + (a.empty? ? '' : ' ' + a.join(' '))
      start = i > 0 ? ("\n" + '  ' * (indent - 1)) : ''          

      if (x.value and x.value.length > 0) \
          or (x.children and x.children.length > 0 \
          and not x.children.is_an_empty_string?) or \
            x.name == 'script' or x.name == 'textarea' then

        ind1 = (x.children and x.children.grep(Rexle::Element).length > 0) ? 
          ("\n" + '  ' * indent) : ''
          
        out = ["%s<%s>%s" % [start, tag, ind1]]
        out << pretty_print(x.children, (indent + 1).to_s.clone) 
        ind2 = (ind1 and ind1.length > 0) ? ("\n" + '  ' * (indent - 1)) : ''
        out << "%s</%s>" % [ind2, x.name]            
      else

        out = ["%s<%s/>" % [start, tag]]
      end


    elsif x.is_a? String then  x.sub(/^[\n\s]+$/,'')
    elsif x.is_a? Rexle::CData then x.print        
    elsif x.is_a? Rexle::Comment then x.print           

    end
  end

end

#processing_instructions(s = '') ⇒ Object



206
207
208
209
210
# File 'lib/rexle.rb', line 206

def processing_instructions(s='')
  self.instructions.map do |instruction|
    "<?%s?>" % instruction.join(' ') 
  end.join s
end

#scan_print(nodes) ⇒ Object



212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
# File 'lib/rexle.rb', line 212

def scan_print(nodes)

  nodes.map do |x|

    if x.is_a? Rexle::Element then

      a = x.attributes.to_a.map do |k,v| 
        "%s='%s'" % [k,(v.is_a?(Array) ? v.join(' ') : v)]
      end

      tag = x.name + (a.empty? ? '' : ' ' + a.join(' '))

      if  (x.children and x.children.length > 0 \
          and not x.children.is_an_empty_string?) or \
            x.name == 'script' or x.name == 'textarea' then

        out = ["<%s>" % tag]
        out << scan_print(x.children)
        out << "</%s>" % x.name
      else
        out = ["<%s/>" % tag]
      end
    
    elsif x.is_a? String then  x
    elsif x.is_a? Rexle::CData then x.print        
    elsif x.is_a? Rexle::Comment then x.print        
      
    end
  end

end

#scan_to_a(nodes) ⇒ Object



244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
# File 'lib/rexle.rb', line 244

def scan_to_a(nodes)

  nodes.inject([]) do |r,x|

    if x.is_a? Rexle::Element then

      a = [String.new(x.name), Hash.new(x.attributes), x.value.to_s]

      (a.concat(scan_to_a(x.children))) if x.children.length > 1
      r << a
    elsif x.is_a? String then

      r << String.new(x)
    end

  end

end