Module: SiSU_Response

Overview

  • Name: SiSU

** Description: documents, structuring, processing, publishing, search *** Request response

** Author: Ralph Amissah

[[email protected]]
[[email protected]]

** Copyright: © 1997, 1998, 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2006,

2007, 2008, 2009, 2010, 2011, 2012, 2013, 2014, 2015, 2016 Ralph Amissah,
All Rights Reserved.

** License: GPL 3 or later:

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 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 [http://www.gnu.org/licenses/].

If you have Internet connection, the latest version of the GPL should be
available at these locations:
[http://www.fsf.org/licensing/licenses/gpl.html]
[http://www.gnu.org/licenses/gpl.html]

** SiSU uses:

* Standard SiSU markup syntax,
* Standard SiSU meta-markup syntax, and the
* Standard SiSU object citation numbering and system

** Hompages:

[http://www.jus.uio.no/sisu]
[http://www.sisudoc.org]

** Git

[http://git.sisudoc.org/gitweb/?p=code/sisu.git;a=summary]
[http://git.sisudoc.org/gitweb/?p=code/sisu.git;a=blob;f=lib/sisu/utils_response.rb;hb=HEAD]

Instance Method Summary collapse

Instance Method Details

#answer?(ask, selections = :strict) ⇒ Boolean

Returns:

  • (Boolean)


101
102
103
104
105
106
107
108
# File 'lib/sisu/utils_response.rb', line 101

def answer?(ask,selections=:strict)
  resp='redo'
  print ask + %{PROCEED? [#{selections_available_(selections)}]: }
  resp=File.new('/dev/tty').gets.strip
  (selections==:strict) \
  ? selection_options.response_strict(resp)
  : selection_options.response_short(resp)
end

#available_selections_Object



56
57
58
# File 'lib/sisu/utils_response.rb', line 56

def available_selections_
  %{'yes', 'no', 'quit' or 'exit'; [ynqx]}
end

#queryObject



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
# File 'lib/sisu/utils_response.rb', line 71

def query
  def selections_available_(selections=:strict)
    short_options=(selections == :strict) ? '' : '; [ynqx]'
    %{'yes', 'no', 'quit' or 'exit'#{short_options}}
  end
  def selection_options
    def response_strict(resp)
      case resp
      when /^(?:yes)$/          then true
      when /^(?:no)$/           then false
      when /^(?:quit|exit)$/    then exit
      else
        puts %{response was: #{resp}}
        puts %{[please type to select: #{selections_available_(:strict)}]}
        answer?('',:strict)
      end
    end
    def response_short(resp)
      case resp
      when /^(?:y|yes)$/          then true
      when /^(?:n|no)$/           then false
      when /^(?:[qx]|quit|exit)$/ then exit
      else
        puts %{response was: #{resp}}
        puts %{[please type to select: #{selections_available_(:short)}]}
        answer?('',:short)
      end
    end
    self
  end
  def answer?(ask,selections=:strict)
    resp='redo'
    print ask + %{PROCEED? [#{selections_available_(selections)}]: }
    resp=File.new('/dev/tty').gets.strip
    (selections==:strict) \
    ? selection_options.response_strict(resp)
    : selection_options.response_short(resp)
  end
  self
end

#response?(ask) ⇒ Boolean

Returns:

  • (Boolean)


59
60
61
62
63
64
65
66
67
68
69
70
# File 'lib/sisu/utils_response.rb', line 59

def response?(ask)
  response='redo'
  print ask + %{ [#{available_selections_}]: }
  response=File.new('/dev/tty').gets.strip
  case response
  when /^(?:y|yes)$/          then true
  when /^(?:n|no)$/           then false
  when /^(?:[qx]|quit|exit)$/ then exit
  else puts %{[please type: #{available_selections_}]}
    response?(ask)
  end
end

#response_short(resp) ⇒ Object



88
89
90
91
92
93
94
95
96
97
98
# File 'lib/sisu/utils_response.rb', line 88

def response_short(resp)
  case resp
  when /^(?:y|yes)$/          then true
  when /^(?:n|no)$/           then false
  when /^(?:[qx]|quit|exit)$/ then exit
  else
    puts %{response was: #{resp}}
    puts %{[please type to select: #{selections_available_(:short)}]}
    answer?('',:short)
  end
end

#response_strict(resp) ⇒ Object



77
78
79
80
81
82
83
84
85
86
87
# File 'lib/sisu/utils_response.rb', line 77

def response_strict(resp)
  case resp
  when /^(?:yes)$/          then true
  when /^(?:no)$/           then false
  when /^(?:quit|exit)$/    then exit
  else
    puts %{response was: #{resp}}
    puts %{[please type to select: #{selections_available_(:strict)}]}
    answer?('',:strict)
  end
end

#selection_optionsObject



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
# File 'lib/sisu/utils_response.rb', line 76

def selection_options
  def response_strict(resp)
    case resp
    when /^(?:yes)$/          then true
    when /^(?:no)$/           then false
    when /^(?:quit|exit)$/    then exit
    else
      puts %{response was: #{resp}}
      puts %{[please type to select: #{selections_available_(:strict)}]}
      answer?('',:strict)
    end
  end
  def response_short(resp)
    case resp
    when /^(?:y|yes)$/          then true
    when /^(?:n|no)$/           then false
    when /^(?:[qx]|quit|exit)$/ then exit
    else
      puts %{response was: #{resp}}
      puts %{[please type to select: #{selections_available_(:short)}]}
      answer?('',:short)
    end
  end
  self
end

#selections_available_(selections = :strict) ⇒ Object



72
73
74
75
# File 'lib/sisu/utils_response.rb', line 72

def selections_available_(selections=:strict)
  short_options=(selections == :strict) ? '' : '; [ynqx]'
  %{'yes', 'no', 'quit' or 'exit'#{short_options}}
end