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

/*****************************************************************************
  NAME
    d2kqt60.vrf - V3 analysis/product configuration script for Windows
                 Documentation Quick Tour

  DESCRIPTION
    This script checks dependencies and environment settings for the
    installation of Windows Documentation Quick Tour.

  OWNER
  majain      01/05/00   created as a seperate component
******************************************************************************/

{
    { 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. */

    /*****************************************************************************************************
    START MAIN LOGIC
    ******************************************************************************************************/
    if (doit)
    {
        /****************************************************************
        Display the generic "Welcome to Oracle Developer"
        billboard if not already displayed, and if Developer release
        *****************************************************************/
        if(exists("%installer_home%%dir_separator%d2bb_01.bmp"))
        {
            if(DEVELOPER2000_RELEASE)
            {
                if(not(DEV2K_BB01))
                {
                    DEV2K_BB01 = TRUE;
                    ui_graphics("%installer_home%%dir_separator%d2bb_01.bmp");
                }
            }
        }
        /****************************************************************/

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

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

        /***********************
        Create Dependencies List
        ************************/
        dependency_list = list(w32rql60);    
        verify_dependency_list = list(w32rql60);  
        install_dependency_list = list(w32rql60);

        /**********************************************************************
        parent_in_control = TRUE ==> the complete product needs to be installed
        parent_in_control = FALSE ==> PARENT called by one of the components
        ***********************************************************************/
        parent_in_control = TRUE;
        if(not(member(selected_products, current_product)))
        {
            child_products = all_child_products(current_product);
            while(not(empty(child_products)))
            {
                next_child = first(child_products);
                child_products = rest(child_products);
                if(member(products_for_installation, next_child))                /* PARENT called by one of the components, no need to add PARENT to the list of products to be installed */
                    parent_in_control = FALSE;
            }
        }
        /**********************************************************************/


        /******************************************************************
        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
        ***************************/
        install_variable = "OIN";
        default_home     = "%oracle_home%%dir_separator%OIN";
        OIN         = execute("%installer_home%%dir_separator%instloc.usr");
        TOOLS_HOME = "%ORACLE_HOME%%dir_separator%TOOLS";
        DOC60 = "%TOOLS_HOME%%dir_separator%DOC60";
        /**************************/
	         set_orainfonav_docpath = TRUE;
         {
           ORAINFONAV_DOCPATH  = translate("ORAINFONAV_DOCPATH", ora_config, product_filename(current_product));
           set_orainfonav_docpath = FALSE;
         }
         [
           'OS_ERROR,'INVALID_FILE_NAME,
           'PERMISSION_DENIED,'UNBOUND_ENVIRONMENT_VARIABLE, 'FILE_NOT_FOUND:
            ORAINFONAV_DOCPATH = "%ORACLE_HOME%%dir_separator%OIN";
         ]



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

        /*********************************
        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");
        }
        else
        {
            child_products = all_child_products(current_product);
            selected_components_list = list();
            size_component = 0;

            while(not(empty(child_products)))
            {
                next_child = first(child_products);
                if(member(selected_products, next_child))
                {
                    if(not(member(products_for_installation, next_child)))
                    {
                        size_component = verify(next_child);
                        if(size_component != 0)
                        {
                            add(selected_components_list, next_child);
                            total_sum = total_sum + size_component;
                        }
                    }
                }
                child_products = rest(child_products);
            }
        }
        if(install_parent)
            total_sum = total_sum + verify(product_parent(current_product));

        /***********************************************/
         /******************
        Verify Dependencies
        *******************/
        EXECUTE_SCRIPT = "VERIFY_DEPENDENCIES";
        total_sum = total_sum + execute("%installer_home%%dir_separator%d2kr2vrf.usr");
        /******************/
        total_sum = total_sum + sum(deinst,qtour);

        return(total_sum);
        /*************************************************/

 /****************************************************************/
        if(child_in_control)
        {
           if(not(member(products_for_installation, w32rql60)))
           {
                    total_sum = total_sum + verify(w32rql60);
                    add(products_for_installation, w32rql60);

            }
         }

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

        total_sum = total_sum + sum(deinst,qtour);

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