Module: Numo::Gnuplot::OptArg

Defined in:
lib/numo/gnuplot.rb

Constant Summary collapse

NEED_QUOTE = 
%w[
  background
  cblabel
  clabel
  commentschars
  dashtype
  decimalsign
  file
  fontpath
  format
  locale
  logfile
  missing
  name
  newhistogram
  output
  prefix
  print
  rgb
  separator
  table
  timefmt
  title
  x2label
  xlabel
  y2label
  ylabel
  zlabel
  xy
]
NONEED_QUOTE = 
%w[
  for
  log
  smooth
]

Class Method Summary collapse

Class Method Details

.from_symbol(s) ⇒ Object 



425
426
427
428
429
430
431
 
# File 'lib/numo/gnuplot.rb', line 425

def from_symbol(s)
  s = s.to_s
  if /^(.*)_(noquote|nq)$/ =~ s
    s = $1
  end
  s.tr('_',' ')
end

.parse(*opts) ⇒ Object 



433
434
435
436
437
438
439
440
441
442
443
444
445
446
447
448
449
450
451
452
453
454
455
456
457
458
459
460
461
462
463
464
465
466
467
 
# File 'lib/numo/gnuplot.rb', line 433

def parse(*opts)
  sep = ","
  a = []
  while opt = opts.shift
    if !opt.kind_of?(Numeric)
      sep = " "
    end
    case opt
    when Symbol
      a << from_symbol(opt)
      case opt
      when :label
        if opts.first.kind_of?(Integer)
          a << opts.shift.to_s
        end
        if opts.first.kind_of?(String)
          a << OptArg.quote(opts.shift)
        end
      when NEED_QUOTE
        if opts.first.kind_of?(String)
          a << OptArg.quote(opts.shift)
        end
      end
    when Array
      a << parse(*opt)
    when Hash
      a << opt.map{|k,v| parse_kv(k,v)}.compact.join(" ")
    when Range
      a << "[#{opt.begin}:#{opt.end}]"
    else
      a << opt.to_s
    end
  end
  a.join(sep)
end

.parse_kv(s, v) ⇒ Object 



537
538
539
540
541
542
543
544
545
546
547
548
549
550
551
552
553
554
555
556
557
558
559
560
561
562
563
564
565
566
567
568
569
570
571
572
573
574
575
576
577
578
579
580
581
582
583
584
585
586
587
588
589
590
591
592
593
594
595
596
597
598
599
600
601
602
603
604
605
606
607
608
609
610
611
612
613
 
# File 'lib/numo/gnuplot.rb', line 537

def parse_kv(s,v)
  k = from_symbol(s)
  case s.to_sym
  when :at
    case v
    when String
      "#{k} #{v}" # not quote
    when Array
      "#{k} #{v.map{|x| x.to_s}.join(",")}"
    else
      "#{k} #{parse(v)}"
    end
  when :label
    case v
    when String
      "#{k} #{OptArg.quote(v)}"
    when Array
      if v[0].kind_of?(Integer) && v[1].kind_of?(String)
        "#{k} #{parse(v[0],OptArg.quote(v[1]),*v[2..-1])}"
      elsif v[0].kind_of?(String)
        "#{k} #{parse(OptArg.quote(v[0]),*v[1..-1])}"
      else
        "#{k} #{parse(*v)}"
      end
    when TrueClass
      k
    else
      "#{k} #{parse(v)}"
    end
  when NEED_QUOTE
    case v
    when String
      "#{k} #{OptArg.quote(v)}"
    when TrueClass
      k
    when NilClass
      nil
    when FalseClass
      nil
    when Array
      case v[0]
      when String
        if v.size == 1
          "#{k} #{OptArg.quote(v[0])}"
        else
          "#{k} #{OptArg.quote(v[0])} #{parse(*v[1..-1])}"
        end
      else
        "#{k} #{parse(*v)}"
      end
    else
      "#{k} #{parse(v)}"
    end
  else
    case v
    when String
      "#{k} #{v}"
    when TrueClass
      k
    when NilClass
      nil
    when FalseClass
      nil
    when Array
      re = /^#{k}/
      if re =~ "using" || re =~ "every"
        "#{k} #{v.join(':')}"
      elsif v.empty?
        k
      else
        "#{k} #{parse(*v)}"
      end
    else
      "#{k} #{parse(v)}"
    end
  end
end

.quote(s) ⇒ Object 



512
513
514
515
516
517
518
519
520
521
522
 
# File 'lib/numo/gnuplot.rb', line 512

def quote(s)
  case s
  when String
    if /^'(.*)'$/ =~ s || /^"(.*)"$/ =~ s
      s = $1
    end
    s.inspect
  else
    s
  end
end

.squote(s) ⇒ Object 



524
525
526
527
528
529
530
531
532
533
534
535
 
# File 'lib/numo/gnuplot.rb', line 524

def squote(s)
  case s
  when String
    if /^'.*'$/ =~ s || /^".*"$/ =~ s
      s
    else
      "'#{s}'"
    end
  else
    s
  end
end