/* Copyright (c) Oracle Corporation 1996.  All Rights Reserved */
/*****************************************************************************
  NAME
   mm60.vrf - V3 version analysis/product configuration script for
                GUI Common Files 6.0.

  DESCRIPTION
    This script checks dependencies and environment settings for the GUI
     Common Files.

  MODIFIED   MM/DD/YY   Reason
******************************************************************************/
{
     /***********************************************************************
     Set Installer variables according to the <os.prd> being used.
     ***********************************************************************/

      dir_separator = "\";
      prefix = operating_system;
      {
         {instver_product =       evaluate("%prefix%instver"); } ['UNBOUND_VARIABLE: continue(); ]
         {orainst_product =       evaluate("%prefix%install"); } ['UNBOUND_VARIABLE: continue(); ]
      }
      /************************************/

     /*************************************************************
     Check if GUI is already installed and up to date.
     Check that the correct version of the Installer is being used
     *************************************************************/

    { 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.")));
        }
    ] 

     if((not(doit)) && (member(selected_products, current_product)))
         ui_action(instantiate(halt_installation));
   {
      NLS_PREV_LANG = translate("NLS_PREV_LANG", ora_config);
   }
   [
     'OS_ERROR,'INVALID_FILE_NAME,
     'PERMISSION_DENIED,'UNBOUND_ENVIRONMENT_VARIABLE, 'FILE_NOT_FOUND:
     {
      NLS_PREV_LANG = translate("NLS_LANG", ora_config);
     }

   ]

    nls_lang = translate("nls_lang",ora_config);

    if (doit == FALSE)
    {
       if (NLS_LANG == NLS_PREV_LANG)
       {
              doit = true;
       }
    }
    if (doit)
    {

          /*****************************
          Set up the nls message strings
          ******************************/

          install_gui             = nls("install_gui", "Installing %%product_label%%...");
          display_product_label  = "%%product_label%% %%display_version%%";
          install_dependencies   = nls("install_dependencies", "Installing %%product_label%% Dependencies...");
          install_register       = nls("install_register", "Registering %%product_label%%...");
          halt_installation      = nls("halt_installation", "Cancelled installation at user's request...");
          reference_dependencies = nls("reference_dependencies","Referencing %%product_label%% Dependencies...");
          modify_variables       = nls("modify_variables", "Modifying %%product_label%% Environment Variables...");
          /*****************************/

         /*******************************
          Set the VRF-INS script "ratchet"
         ********************************/
         vrf_ratchet = "6.0.5.30.0";

         /*******************************************
         Create a label with the product, and version
         ********************************************/
          COMPONENT_PRODUCT = w32mm60;
          current_version = product_version(current_product);
          version_list    = explode(current_version,".");
          msb_version_list= list(first(version_list),
                                   first(rest(version_list)));

          display_version = implode(msb_version_list,".");
         /*******************************************/

        /***********************
         Bind path variables...
        ***********************/
          set_mm60 = TRUE;

          {
               default_loc = make_directory("%ORACLE_HOME%%dir_separator%TOOLS");
          }
         [
              'OS_ERROR,'INVALID_FILE_NAME,
                  'PERMISSION_DENIED,'WRITE_ERROR, 'FILE_NOT_FOUND:
                 continue();
         ]
        {
             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";
         ]

        /**************/

        total_sum = 0;

        /***************************************
        Check if component needs to be installed
        ****************************************/
 
        EXECUTE_SCRIPT = "CHECK_COMPONENT_PRODUCT";
        install_component = execute("%product_home%%dir_separator%d2kr2vrf.usr");
        if(install_component)
           total_sum = total_sum + verify(COMPONENT_PRODUCT);

          /******************/

          total_sum = total_sum + sum(deinst, exe, dll, res, msg);
          return(total_sum);
        /********************************************************/
    }
    else
    {
        refresh_map_file = FALSE;
        return(0);
    }
}