home *** CD-ROM | disk | FTP | other *** search
/ Winzipper / Winzipper_ISO.iso / programming / oracle7 7.2 / INSTALL / WIN95.AVF < prev    next >
Encoding:
Text File  |  1995-09-27  |  3.7 KB  |  99 lines
  1. /* Copyright (c) Oracle Corporation 1993.  All Rights Reserved */
  2. /*****************************************************************************
  3.   NAME
  4.     win95.avf - V3 ante version analysis script for windows 95 products.
  5.  
  6.   DESCRIPTION
  7.     This script performs ante version analysis functionality.  In particular,
  8.     it initializes the 'products_for_installation' list so that the Installer
  9.     can report which products need to be implicitly installed as a consequence
  10.     of the user's current configuration and product selection.  Also, 'reboot'
  11.     is initialized to allow scriptwriters to specify reasons for a reboot mes-
  12.     sage to be displayed in win95.pin.
  13.  
  14.   OWNER
  15.     Kush Jain
  16.  
  17.   MODIFIED    DD-MMM-YY  Reason
  18.     sagarwal  25-SEP-95  Removed remind_list, remind_helps (mvoed to win95.stp)
  19.     sagarwal  25-SEP-95  Removed smart start stuff
  20.     zzerhoun  20-JUN-95  Check SELECTED_PRODUCTS & SELECTED_REGISTRIES
  21.     zzerhoun  28-DEC-94  Initialize remind_list and remind_helps
  22.     kjain     18-FEB-94  Created.
  23. *****************************************************************************/
  24.  
  25. {
  26.   if (bootstrap)
  27.   {
  28.     desired_installation = nls("desired_installation",
  29.                    "installation");
  30.     desired_deinstallation = nls("desired_deinstallation",
  31.                     "deinstallation");
  32.     {
  33.       if (user_action == 'install)
  34.       {
  35.         desired_action = desired_installation;
  36.         if (empty(selected_products))
  37.           signal('no_selection);
  38.         all_product_list = all_products();
  39.         desired_products = selected_products;
  40.         invalid_products = list();
  41.         while(not(empty(desired_products)))
  42.         {
  43.           current = first(desired_products);
  44.           if(not(member(all_product_list,current)))
  45.             add(invalid_products,current);
  46.           desired_products = rest(desired_products);
  47.         }
  48.         if(not(empty(invalid_products)))
  49.           signal('invalid_selection);
  50.       }
  51.       else if (user_action == 'deinstall)
  52.       {
  53.         desired_action = desired_deinstallation;
  54.         if (empty(selected_registries))
  55.           signal('no_selection);
  56.         desired_products = selected_registries;
  57.         invalid_products = list();
  58.         while(not(empty(desired_products)))
  59.         {
  60.           current = first(desired_products);
  61.           { reg = registration(current); }
  62.           [
  63.             'UNREGISTERED_PRODUCT:
  64.             add(invalid_products,current);
  65.           ]
  66.           desired_products = rest(desired_products);
  67.         }
  68.         if(not(empty(invalid_products)))
  69.           signal('invalid_selection);
  70.       }
  71.     }
  72.     ['no_selection:
  73.       {
  74.         no_selection_signal = nls("no_selection_signal","No products were selected for %%desired_action%%. User action is aborted.");
  75.         signal('FAILURE, instantiate(no_selection_signal));
  76.       }
  77.      'invalid_selection:
  78.       {
  79.         invalid_selection_string = implode(invalid_products,",");
  80.         invalid_selection_signal = nls("invalid_selection_signal","The following products are not available for %%desired_action%%. User action is aborted.%carriage_return%%carriage_return%%invalid_selection_string%");
  81.         signal('FAILURE, instantiate(invalid_selection_signal));
  82.       }
  83.     ]
  84.   }
  85.  
  86.   if (user_action == 'install)
  87.     {
  88.       products_for_installation = list();
  89.       remove_file("%installer_home%\user.pin");
  90.       failed_dos_client_install = nls("failed_dos_client_install",
  91.                       "DOS client installation failed");
  92.       failed_windows_client_install = nls("failed_windows_client_install",
  93.                       "Windows client installation failed");
  94.       installation_successful = nls("installation_successful","Installation Successful.");
  95.     }
  96.  
  97.   return(0);
  98. }
  99.