module GenZPK

# File lib/genZPK.rb, line 126
def doConfigure
  # Check if the .genZPK folder exists in the user's home directory and create it if it doesn't.
  if not File.exists?(File.expand_path '~/.genZPK')
    FileUtils.mkpath(File.expand_path '~/.genZPK')
  end

  # Check if the .genZPK/checks.xml file exists and create it if it doesn't.
  if not File.exists?(File.expand_path '~/.genZPK/checks.xml')
    File.new(File.expand_path('~/.genZPK/checks.xml'), 'w')
  end

  # Open the checks file for reading
  checksFile = File.open(File.expand_path('~/.genZPK/checks.xml'), 'r')

  # Open a new temporary file. By default, it is writable.
  tmpChecksFile = Tempfile.new 'checks'

  # Read the contents of the existing check file and write them to the temporary file.
  while buff = checksFile.read(4096)
    tmpChecksFile.write(buff)
  end

  # Rewind the temporary file to the begining and close the existing file.
  tmpChecksFile.rewind
  checksFile.close

  # Get the system editor and allow the user to modify the temporary checksa file.
  editor = getEditor
  system("#{editor} #{tmpChecksFile.path}")

  # This block rescues the method in case the user enters bad XML
  begin
    # Read in the file and rewind it.
    content = tmpChecksFile.read
    tmpChecksFile.rewind

    # Parse the content with Nokogiri. A Nokogiri::XML::SyntaxError exception is raised in the event
    # of invalid XML syntax.
    doc = Nokogiri::XML(content) { |config| config.options = Nokogiri::XML::ParseOptions::STRICT }
  rescue Nokogiri::XML::SyntaxError => e
    # If the user wants to try to correct the file
    if yesno("Invalid XML entered. Would you like to reopen the file?")
      # Loop until they fix it
      loop do
        # Allow them to edit the file
        system("#{editor} #{tmpChecksFile.path}")

        begin
          # read in the content of the file and rewind
          content = tmpChecksFile.read
          tmpChecksFile.rewind

          # Check the xml syntax
          doc = Nokogiri::XML(content) { |config| config.options = Nokogiri::XML::ParseOptions::STRICT }

          # If it got here, the syntax was good and exit the oop
          break
        rescue
          # If the user doesn't want to try again, exit without saving the changes
          if not yesno("Invalid XML entered. Would you like to reopen the file?")
            exit -1
          end
        end
      end
    else
      # The user didn't want to fix the file. Exit.
      exit -1
    end
  end


  # Reopen the checks config file for writing
  checksFile = File.open(File.expand_path('~/.genZPK/checks.xml'), 'w+')

  # write the contents of the temporary file to the checks file
  while buff = tmpChecksFile.read(4096)
    checksFile.write(buff)
  end

  # Close all files and delete the temporary file.
  checksFile.close
  tmpChecksFile.close
  tmpChecksFile.unlink
end

# File lib/genZPK.rb, line 30
def executablePath (executable=String.new)
  # Assume the string is a path if it has a '/' in it
  if executable.include? '/'
    if File.exists? executable
      executable
    else
      nil
    end
  else
    # Assume the executable is in the PATH if a full path is not passed
    whichOut = `which #{executable}`.chomp!

    # Check to see if the output matches the error signifying that a path wasn't found.
    if whichOut =~ /\/usr\/bin\/which: no (.*) in \(.*\)/
      nil
    else
      # It found it! Woo hoo!
      if File.exists? whichOut
        whichOut
      else
        nil
      end
    end
  end
end

# File lib/genZPK.rb, line 59
def getEditor
  # Check if EDITOR is not defined
  if ENV['EDITOR'].nil?
    # It's not start nano and return the path to it.
    # If you can't find it, try vi.
    ['nano', 'vi'].each do |x|
      editor = executablePath x

      if not editor.nil?
        return editor
      end
    end

    # Couldn't find vi  or nano. Raise an exception for the user to deal with.
    raise "Valid text editor could not be found. Please specify one in the EDITOR environment variable and/or check your PATH."
  # It is, so lets use it.
  else
    # Get the path to the specified editor
    editor = executablePath ENV['EDITOR']

    # If the path was found, return it.
    if not editor.nil?
      editor
    else
      # It wasn't found so cycle through nano and vi like above
      ['nano', 'vi'].each do |x|
        editor = executablePath x

        if not editor.nil?
          return editor
        end
      end

      # Still couldn't find an editor. Raise an exception.
      raise "Valid text editor could not be found. Please specify one in the EDITOR environment variable and/or check your PATH."
    end
  end
end

# File lib/genZPK/templates.rb, line 6
  def getTemplate filename
    # Find the proper template for the specified file
    case filename
      when 'deployment.xml'
        template =<<-EOF

<package version="2.0" xmlns="http://www.zend.com/server/deployment-descriptor/1.0">
  <name><%= releaseName %></name>
  <summary> short description</summary>
  <description> long description</description>
  <version>
    <release><%= zpkVersion %></release>
  </version>
  <eula>data/LICENSE.txt</eula>
  <appdir></appdir>
  <docroot>public</docroot>
  <scriptsdir>scripts</scriptsdir>
  <dependencies>
    <required>
                <php>
                        <min>5.3.15</min>
                </php>
                <extension>
                        <name>pdo_mysql</name>
                </extension>
                <directive>
                        <name>memory_limit</name>
                        <min>16M</min>
                </directive>
    </required>
  </dependencies>
</package>
        EOF
      when 'pre_activate.php'
        template =<<-EOF
<?php
/* The script pre_activate.php should contain code that should make the changes in the server
 * environment so that the application is fully functional. For example, this may include
 * changing symbolic links to "data" directories from previous to current versions,
 * upgrading an existing DB schema, or setting up a "Down for Maintenance"
 * message on the live version of the application
 * The following environment variables are accessable to the script:
 *
 * - ZS_RUN_ONCE_NODE - a Boolean flag stating whether the current node is
 *   flagged to handle "Run Once" actions. In a cluster, this flag will only be set when
 *   the script is executed on once cluster member, which will allow users to write
 *   code that is only executed once per cluster for all different hook scripts. One example
 *   for such code is setting up the database schema or modifying it. In a
 *   single-server setup, this flag will always be set.
 * - ZS_WEBSERVER_TYPE - will contain a code representing the web server type
 *   ("IIS" or "APACHE")
 * - ZS_WEBSERVER_VERSION - will contain the web server version
 * - ZS_WEBSERVER_UID - will contain the web server user id
 * - ZS_WEBSERVER_GID - will contain the web server user group id
 * - ZS_PHP_VERSION - will contain the PHP version Zend Server uses
 * - ZS_APPLICATION_BASE_DIR - will contain the directory to which the deployed
 *   application is staged.
 * - ZS_CURRENT_APP_VERSION - will contain the version number of the application
 *   being installed, as it is specified in the package descriptor file
 * - ZS_PREVIOUS_APP_VERSION - will contain the previous version of the application
 *   being updated, if any. If this is a new installation, this variable will be
 *   empty. This is useful to detect update scenarios and handle upgrades / downgrades
 *   in hook scripts
 * - ZS_<PARAMNAME> - will contain value of parameter defined in deployment.xml, as specified by
 *   user during deployment.
 */


function fsmodify($obj) {
  $chunks = explode('/', $obj);
  if(is_dir($obj))
    chmod($obj, 0777);
}


function fsmodifyr($dir)
{
  if($objs = glob($dir."/*")) {
    foreach($objs as $obj) {
      fsmodify($obj);
      if(is_dir($obj)) fsmodifyr($obj);
    }
  }

  return fsmodify($dir);
}

fsmodifyr("$ZS_APPLICATION_BASE_DIR/public/images");
fsmodifyr("$ZS_APPLICATION_BASE_DIR/data/tmp");
fsmodifyr("$ZS_APPLICATION_BASE_DIR/data/saml");
fsmodifyr("$ZS_APPLICATION_BASE_DIR/data/direct-enrollment");
        EOF
      else
        # IF there isn't a template for that filename, give the user a nil string
        template = nil
    end

    # Return the template
    template
  end

# File lib/genZPK.rb, line 20
def getZdpack
  if File.exists? '/usr/local/zend/bin/zdpack'
    '/usr/local/zend/bin/zdpack'
  else
    nil
  end
end

# File lib/genZPK.rb, line 114
def requireCondition(condition, message)
  if not condition
    puts message
    exit -1
  end
end

# File lib/genZPK.rb, line 98
def yesno(prompt = 'Continue?', default = true)
  a = ''
  s = default ? '[Y/n]' : '[y/N]'
  d = default ? 'y' : 'n'
  until %w[y n].include? a
    a = ask("#{prompt} #{s} ") { |q| q.limit = 1; q.case = :downcase }
    a = d if a.length == 0
  end
  a == 'y'
end