/* Copyright (c) Oracle Corporation 1996.  All Rights Reserved */

/*****************************************************************************
  NAME
    guil60.vrf - Version analysis/product configuration script for
                 Language Supplement files

  DESCRIPTION
    This script checks dependencies and environment settings for the
    installation of GUI Common files.
  MODIFIED      MM/DD/YY        REASON
  anmanian      01/13/99        Making it a dependent installable product.
  pgupta        08/29/97        Created.
*****************************************************************************/

{
    {doit = execute("%installer_home%%dir_separator%%operating_system%.vrf");}
    [
        'UNBOUND_VARIABLE:
        {
            required_version = product_version(instver_product);
            temp = explode(required_version, ".");
            required_version = implode(list(first(temp),first(rest(temp)),
                                            first(rest(rest(temp))),
                                            first(rest(rest(rest(temp))))), ".");
            signal('FAILURE, instantiate(nls("instver_too_early1",
                                             "The version of the Installer currently running is %%installer_version%%. The installation you have chosen requires version %%required_version%% or later. Please run version %%required_version%% or later in order to perform this installation.")));
        }
    ]                                                                   /* This FAILURE will cause 3.0.x.x installer to exit gracefully. */

    SHARED_ORACLE_COMPLIANT = TRUE;
     /********************************************************************
     Initialize total size of files
     *********************************************************************/
     total_sum = 0;

    /*************************************************************************
     Set Product Name variables
    *************************************************************************/

    /***********************************************************************
    START MAIN LOGIC
    ***********************************************************************/

    doit = TRUE;

    nls_lang = translate("nls_lang",ora_config);
    if (nls_lang ==  "AMERICAN_AMERICA.WE8ISO8859P1")
    {
           doit = FALSE;
    }
    if (doit)
    {

        /*****************************
        Set the VRF-INS script ratchet
        ******************************/
        vrf_ratchet = "6.0.8.12.1";
         main_product_version = "6.0.8.9.6";

         /***************************
         Check Installed Version
         ***************************/
         if(registered(product_name(current_product)))
         {
              check_installed_version = registry_version(registration(product_name(current_product)));
              if(earlier_version(check_installed_version, main_product_version))
              {
                   information_dialog(instantiate(product_upgrade_required),
                                      instantiate(product_upgrade_contents),
                                      instantiate(product_upgrade_help));
                   refresh_map_file = FALSE;
                   doit = FALSE;
                   return(0);
              }
          }
          else
          {
                information_dialog(instantiate(main_product_required),
                                   instantiate(main_product_contents),
                                   instantiate(main_product_help));
                 refresh_map_file = FALSE;
                 doit = FALSE;
                 signal('FAILURE, instantiate(halt_installation));
          }

        /************************************************
        Create a label with the product name, and version
        *************************************************/
        EXECUTE_SCRIPT = "CREATE_LABEL";
        execute("%product_home%%dir_separator%d2kr2vrf.usr");
        /************************************************/

          set_mm60 = TRUE;

        {
             MM60     = translate("MM60", ora_config, product_filename(current_product));
             set_mm60 = FALSE;
        }
         [
              'OS_ERROR,'INVALID_FILE_NAME,
                  'PERMISSION_DENIED,'UNBOUND_ENVIRONMENT_VARIABLE, 'FILE_NOT_FOUND:
                 MM60 = "%ORACLE_HOME%%dir_separator%TOOLS%dir_separator%COMMON60";
         ]
           
           install_gui    = FALSE;
           if (member(selected_products, w32gui60) || (registered("w32gui60")) || (member(products_for_installation,w32gui60)))
           {
               install_gui    = TRUE;
               total_sum = total_sum + sum(gui);
           }

           if(member(selected_products, w32guil60) || (registered("w32guil60")) || (member(products_for_installation,w32guil60)))
           {
               install_gui    = TRUE;
               total_sum = total_sum + sum(gui);
           }


        /******************************************************************
        child_in_control = TRUE ==> component product called explicitly
        child_in_control = FALSE ==> component product called by the PARENT
        *******************************************************************/
        child_in_control = TRUE;
        if( member(products_for_installation, product_parent(current_product) ))
            child_in_control = FALSE;

        /*******************************************************************
        Determine installation path
        ********************************************************************/

        BROWSER60 = "%ORACLE_HOME%%dir_separator%BROWSE60";
        TOOLS_HOME = "%ORACLE_HOME%%dir_separator%TOOLS";
        DOC60 = "%TOOLS_HOME%%dir_separator%DOC60";

        /*********************************************************************
        Verify PARENT if explicitly called
        **********************************************************************/
        install_parent = FALSE;
        if(child_in_control)
        {
            EXECUTE_SCRIPT = "VERIFY_PARENT";
            install_parent = execute("%product_home%%dir_separator%d2kr2vrf.usr");
        }

        if(install_parent)
            total_sum = total_sum + verify(product_parent(current_product));


        total_sum = total_sum + sum(deinst);
        return(total_sum);
       /***********************************************************************/
    }
    else
    {
        refresh_map_file = FALSE;
        return(0);
    }
}