iprutils-2.4.18.1/ 0000775 0001750 0001751 00000000000 13474264453 010640 5 0000000 0000000 iprutils-2.4.18.1/iprconfig.h 0000664 0001750 0001751 00000170601 13270171702 012702 0000000 0000000 #ifndef iprconfig_h
#define iprconfig_h
/**
* IBM IPR adapter configuration utility
*
* (C) Copyright 2004
* International Business Machines Corporation and others.
* All Rights Reserved. This program and the accompanying
* materials are made available under the terms of the
* Common Public License v1.0 which accompanies this distribution.
*
**/
#define _(string) (string)
#define __(string) (string)
#define EXIT_FLAG 0x8000 /* stops at given screen on exit call */
#define CANCEL_FLAG 0x4000 /* stops at given screen on quit call */
#define REFRESH_FLAG 0x2000 /* refreshes screen on quit or exit */
#define TOGGLE_FLAG 0x1000
#define FWD_FLAG 0x0800
#define CONFIRM_FLAG 0x0400
#define CONFIRM_REC_FLAG 0x0200
#define MENU_FLAG 0x0100
#define ENTER_FLAG 0x0080
#define NUM_OPTS(x) (sizeof(x)/sizeof(struct screen_opts))
#define REFRESH_SCREEN -13
#define TOGGLE_SCREEN -14
#define INVALID_OPTION_STATUS 2
#define PGUP_STATUS 3
#define TOP_STATUS 4
#define PGDN_STATUS 5
#define BTM_STATUS 6
#define MAX_FIELD_SIZE 39
typedef struct info_container i_container;
struct info_container {
i_container *next_item; /* reference to next info_container */
char field_data[MAX_FIELD_SIZE + 1]; /* stores characters entered into a user-entry field */
void *data; /* stores a field pointer */
int y; /* cursor y position of user selection */
int x; /* cursor x position of user selection */
};
#define for_each_icon(icon) for (icon = i_con_head; icon; icon = icon->next_item)
struct screen_output {
int rc;
i_container *i_con;
};
typedef struct function_output fn_out;
struct function_output {
fn_out *next; /* reference to next fn_out if >1 */
int index; /* used to plop text into # spots on text.msg */
int cat_offset; /* varies text set used in text.msg -> esp dif platforms */
char *text; /* holds "special" data to be passed back to the screen */
};
int main_menu(i_container * i_con);
int config_menu(i_container *i_con);
int disk_status(i_container * i_con);
int device_details(i_container * i_con);
int path_details(i_container * i_con);
int raid_screen(i_container * i_con);
int raid_status(i_container * i_con);
int raid_stop(i_container * i_con);
int confirm_raid_stop(i_container * i_con);
int do_confirm_raid_stop(i_container * i_con);
int raid_start(i_container * i_con);
int raid_start_loop(i_container * i_con);
int configure_raid_start(i_container * i_con);
int configure_raid_parameters(i_container * i_con);
int confirm_raid_start(i_container * i_con);
int raid_start_complete();
int raid_include(i_container * i_con);
int configure_raid_include(i_container * i_con);
int confirm_raid_include(i_container * i_con);
int confirm_raid_include_device(i_container * i_con);
int disk_unit_recovery(i_container * i_con);
int concurrent_add_device(i_container *i_con);
int concurrent_remove_device(i_container *i_con);
int verify_conc_maint(i_container * i_con);
int path_status(i_container * i_con);
int init_device(i_container * i_con);
int confirm_init_device(i_container * i_con);
int send_dev_inits(i_container * i_con);
int reclaim_cache(i_container * i_con);
int confirm_reclaim(i_container * i_con);
int reclaim_warning(i_container * i_con);
int reclaim_result(i_container * i_con);
int af_include(i_container * i_con);
int af_remove(i_container * i_con);
int hot_spare_screen(i_container *i_con);
int add_hot_spare(i_container * i_con);
int remove_hot_spare(i_container * i_con);
int hot_spare(i_container * i_con, int action);
int select_hot_spare(i_container * i_con, int action);
int confirm_hot_spare(int action);
int hot_spare_complete(int action);
int raid_migrate(i_container * i_con);
int asym_access(i_container *i_con);
int asym_access_menu(i_container * i_con);
int raid_rebuild(i_container * i_con);
int confirm_raid_rebuild(i_container * i_con);
int raid_resync(i_container * i_con);
int confirm_raid_resync(i_container * i_con);
int battery_maint(i_container * i_con);
int enclosures_maint(i_container * i_con);
int battery_fork(i_container * i_con);
int enclosures_fork(i_container * i_con);
int force_battery_error(i_container *i_con);
int enable_battery(i_container *i_con);
int ipr_suspend_disk_enclosure(i_container *i_con);
int ipr_resume_disk_enclosure(i_container *i_con);
int bus_config(i_container * i_con);
int change_bus_attr(i_container * i_con);
int confirm_change_bus_attr(i_container *i_con);
int driver_config(i_container * i_con);
int change_driver_config(i_container *i_con);
int disk_config(i_container * i_con);
int ioa_config(i_container * i_con);
int change_disk_config(i_container *);
int change_ioa_config(i_container *);
int ucode_screen(i_container *i_con);
int download_ucode(i_container *);
int download_all_ucode(i_container *);
int choose_ucode(i_container *);
int log_menu(i_container *);
int ibm_storage_log_tail(i_container *);
int ibm_storage_log(i_container *);
int kernel_log(i_container *);
int iprconfig_log(i_container *);
int kernel_root(i_container *);
int confirm_kernel_root(i_container *);
int confirm_kernel_root_change(i_container *);
int confirm_kernel_root_change2(i_container *);
int set_default_editor(i_container *);
int confirm_set_default_editor(i_container *);
int confirm_set_default_editor_change(i_container *);
int confirm_set_default_editor_change2(i_container *);
int restore_log_defaults(i_container *);
int ibm_boot_log(i_container *);
int exit_confirmed(i_container *);
int statistics_menu(i_container *);
int device_stats(i_container *);
static int raid_create_check_num_devs(struct ipr_array_cap_entry *, int, int);
/* constant strings */
const char *no_dev_found = __("No devices found");
const char *wait_for_next_screen = __("Please wait for the next screen.");
/* others */
int menu_test(i_container * i_con);
ITEM **menu_test_menu(int field_index);
typedef struct screen_node s_node;
struct screen_opts {
int (*screen_function) (i_container *);
char *key;
char *list_str;
};
struct screen_node {
int rc_flags;
int f_flags;
int num_opts;
struct screen_opts *options;
char *title;
char *body;
char *header[10];
};
struct screen_opts null_opt[] = {
{NULL, "\n"}
};
struct screen_opts main_menu_opt[] = {
{disk_status, "1", __("Display hardware status")},
{raid_screen, "2", __("Work with disk arrays")},
{disk_unit_recovery, "3", __("Work with disk unit recovery")},
{config_menu, "4", __("Work with configuration options")},
{ucode_screen, "5", __("Work with microcode updates")},
{statistics_menu, "6", __("Devices Statistics")},
{log_menu, "7", __("Analyze log")}
};
s_node n_main_menu = {
.rc_flags = (EXIT_FLAG | CANCEL_FLAG),
.f_flags = (EXIT_FLAG),
.num_opts = NUM_OPTS(main_menu_opt),
.options = &main_menu_opt[0],
.title = __("IBM Power RAID Configuration Utility")
};
struct screen_opts exit_confirm_opt[] = {
{main_menu, "1", __("Return to main menu")},
{exit_confirmed, "2", __("Exit iprconfig")},
};
s_node n_exit_confirm = {
.num_opts = NUM_OPTS(exit_confirm_opt),
.options = &exit_confirm_opt[0],
.title = __("Confirm Exit"),
.header = {
__("One or more disks is currently known to be zeroed. Exiting now "
"will cause this state to be lost, resulting in longer array creation times\n\n"),
"" }
};
struct screen_opts config_menu_opt[] = {
{bus_config, "1", __("Work with SCSI bus configuration")},
{driver_config, "2", __("Work with driver configuration")},
{disk_config, "3", __("Work with disk configuration")},
{ioa_config, "4", __("Work with adapter configuration")},
};
s_node n_config_menu = {
.rc_flags = (EXIT_FLAG | CANCEL_FLAG | REFRESH_FLAG),
.f_flags = (EXIT_FLAG | CANCEL_FLAG),
.num_opts = NUM_OPTS(config_menu_opt),
.options = &config_menu_opt[0],
.title = __("IBM Power RAID Configuration Utility")
};
struct screen_opts disk_status_opt[] = {
{device_details, "\n"}
};
s_node n_disk_status = {
.rc_flags = (CANCEL_FLAG),
.f_flags = (EXIT_FLAG | CANCEL_FLAG | REFRESH_FLAG | TOGGLE_FLAG | FWD_FLAG),
.num_opts = NUM_OPTS(disk_status_opt),
.options = &disk_status_opt[0],
.title = __("Display Hardware Status"),
.header = {
__("Type option, press Enter.\n"),
__(" 1=Display hardware resource information details\n\n"),
"" }
};
struct screen_opts device_stats_opt[] = {
{device_stats, "\n"}
};
s_node n_device_stats = {
.rc_flags = (CANCEL_FLAG),
.f_flags = (EXIT_FLAG | CANCEL_FLAG | REFRESH_FLAG | TOGGLE_FLAG | FWD_FLAG),
.num_opts = NUM_OPTS(device_stats_opt),
.options = &device_stats_opt[0],
.title = __("Display Device Statistics"),
.header = {
__("Type option, press Enter.\n"),
__(" 1=Display device statistics\n\n"),
"" }
};
s_node n_adapter_details = {
.rc_flags = (CANCEL_FLAG),
.f_flags = (ENTER_FLAG | EXIT_FLAG | CANCEL_FLAG | FWD_FLAG),
.title = __("IOA Hardware Resource Information Details")
};
s_node n_device_details = {
.rc_flags = (CANCEL_FLAG),
.f_flags = (ENTER_FLAG | EXIT_FLAG | CANCEL_FLAG | FWD_FLAG),
.title = __("Disk Unit Hardware Resource Information Details")
};
s_node n_vset_details = {
.rc_flags = (CANCEL_FLAG),
.f_flags = (ENTER_FLAG | EXIT_FLAG | CANCEL_FLAG | FWD_FLAG),
.title = __("Disk Array Information Details")
};
s_node n_ses_details = {
.rc_flags = (CANCEL_FLAG),
.f_flags = (ENTER_FLAG | EXIT_FLAG | CANCEL_FLAG | FWD_FLAG),
.title = __("Disk Enclosure Information Details")
};
struct screen_opts raid_screen_opt[] = {
{raid_status, "1", __("Display disk array status")},
{raid_start, "2", __("Create a disk array")},
{raid_stop, "3", __("Delete a disk array")},
{raid_include, "4", __("Add a device to a disk array")},
{af_include, "5", __("Format device for RAID function")},
{af_remove, "6", __("Format device for JBOD function")},
{hot_spare_screen, "7", __("Work with hot spares")},
{asym_access, "8", __("Work with asymmetric access")},
{raid_resync, "9", __("Force RAID Consistency Check")},
{raid_migrate, "0", __("Migrate disk array protection")},
};
struct screen_opts hot_spare_opt[] = {
{add_hot_spare, "1", __("Create a hot spare")},
{remove_hot_spare, "2", __("Delete a hot spare")},
};
s_node n_asym_access = {
.rc_flags = (EXIT_FLAG | CANCEL_FLAG | REFRESH_FLAG),
.f_flags = (EXIT_FLAG | CANCEL_FLAG | REFRESH_FLAG | TOGGLE_FLAG | FWD_FLAG),
.num_opts = NUM_OPTS(null_opt),
.options = &null_opt[0],
.title = __("Array Asymmetric Access"),
.header = {
__("Select the disk array path.\n\n"),
__("Type choice, press Enter.\n"),
__(" 1=change asymmetric access for a disk array\n\n"),
"" }
};
s_node n_asym_access_fail = {
.f_flags = (ENTER_FLAG | EXIT_FLAG | CANCEL_FLAG),
.title = __("Setting Array Asymmetric Access Failed"),
.header = {
__("There are no arrays eligible for the selected operation "
"due to one or more of the following reasons:\n\n"),
__("o Active/Active mode is not enabled on the IOAs.\n"),
__("o An IOA needs updated microcode in order to support "
"active/active configurations.\n"),
__("o None of the disk arrays in the system are capable of "
"changing asymmetric access attributes.\n"),
__("o There are no disk arrays in the system.\n"),
__("o An IOA is in a condition that makes the disks attached to "
"it read/write protected. Examine the kernel messages log "
"for any errors that are logged for the IO subsystem "
"and follow the appropriate procedure for the reference "
"code to correct the problem, if necessary.\n"),
__("o Not all disks attached to an advanced function IOA have "
"reported to the system. Retry the operation.\n"),
"" }
};
struct screen_opts change_array_asym_access_opt[] = {
{asym_access_menu, "c"},
{NULL, "\n"}
};
s_node n_change_array_asym_access = {
.rc_flags = (EXIT_FLAG | CANCEL_FLAG | REFRESH_FLAG),
.f_flags = (ENTER_FLAG | EXIT_FLAG | CANCEL_FLAG | FWD_FLAG | MENU_FLAG),
.num_opts = NUM_OPTS(change_array_asym_access_opt),
.options = &change_array_asym_access_opt[0],
.title = __("Change Asymmetric Access Configuration of Array"),
.header = {
__("Current array asymmetric access configuration is shown. To "
"change setting hit 'c' for options menu. Highlight "
"desired option then hit Enter.\n"),
__(" c=Change Setting\n\n"),
"" }
};
s_node n_raid_migrate_complete = {
.title = __("Migrate Disk Array Status"),
.body = __("You selected to migrate a disk array")
};
s_node n_confirm_raid_migrate = {
.rc_flags = (CANCEL_FLAG),
.f_flags = (CANCEL_FLAG | TOGGLE_FLAG | FWD_FLAG),
.num_opts = NUM_OPTS(null_opt),
.options = &null_opt[0],
.title = __("Confirm Migrate a Disk Array"),
.header = {
__("ATTENTION: Disk array will be migrated.\n\n"),
__("Press Enter to continue.\n"),
__(" q=Cancel to return and change your choice.\n\n"),
"" }
};
s_node n_raid_migrate = {
.rc_flags = (EXIT_FLAG | CANCEL_FLAG | REFRESH_FLAG),
.f_flags = (EXIT_FLAG | CANCEL_FLAG | TOGGLE_FLAG | FWD_FLAG ),
.num_opts = NUM_OPTS(null_opt),
.options = &null_opt[0],
.title = __("Migrate Disk Array Protection"),
.header = {
__("Select only one disk array for migration.\n\n"),
__("Type choice, press Enter.\n"),
__(" 1=migrate protection for a disk array\n\n"),
"" }
};
s_node n_raid_migrate_fail = {
.f_flags = (ENTER_FLAG | EXIT_FLAG | CANCEL_FLAG),
.title = __("Disk Array Migration Failed"),
.header = {
__("There are no arrays eligible for the selected operation "
"due to one or more of the following reasons:\n\n"),
__("o There are no disk arrays in the system.\n"),
__("o An IOA is in a condition that makes the disks attached to "
"it read/write protected. Examine the kernel messages log "
"for any errors that are logged for the IO subsystem "
"and follow the appropriate procedure for the reference "
"code to correct the problem, if necessary.\n"),
__("o Not all disks attached to an advanced function IOA have "
"reported to the system. Retry the operation.\n"),
__("o There are not enough unused AF disks for the migration.\n"),
"" }
};
s_node n_raid_migrate_add_disks = {
.rc_flags = (CANCEL_FLAG | REFRESH_FLAG),
.f_flags = (EXIT_FLAG | CANCEL_FLAG | TOGGLE_FLAG | FWD_FLAG),
.num_opts = NUM_OPTS(null_opt),
.options = &null_opt[0],
.title = __("Select Disk Units for Migration"),
.header = {
__("Type option, press Enter.\n"),
__(" 1=Select\n\n"),
"" }
};
s_node n_hot_spare_screen = {
.rc_flags = (EXIT_FLAG | CANCEL_FLAG | REFRESH_FLAG),
.f_flags = (EXIT_FLAG | CANCEL_FLAG),
.num_opts = NUM_OPTS(hot_spare_opt),
.options = &hot_spare_opt[0],
.title = __("Work with Hot Spares")
};
s_node n_raid_screen = {
.rc_flags = (EXIT_FLAG | CANCEL_FLAG | REFRESH_FLAG),
.f_flags = (EXIT_FLAG | CANCEL_FLAG),
.num_opts = NUM_OPTS(raid_screen_opt),
.options = &raid_screen_opt[0],
.title = __("Work with Disk Arrays")
};
s_node n_raid_status = {
.rc_flags = (CANCEL_FLAG),
.f_flags = (EXIT_FLAG | CANCEL_FLAG | REFRESH_FLAG | TOGGLE_FLAG | FWD_FLAG),
.num_opts = NUM_OPTS(disk_status_opt),
.options = &disk_status_opt[0],
.title = __("Display Disk Array Status"),
.header = {
__("Type option, press Enter.\n"),
__(" 1=Display hardware resource information details\n\n"),
"" }
};
struct screen_opts raid_stop_opt[] = {
{confirm_raid_stop, "\n"}
};
s_node n_raid_stop = {
.rc_flags = (CANCEL_FLAG),
.f_flags = (EXIT_FLAG | CANCEL_FLAG | TOGGLE_FLAG | FWD_FLAG ),
.num_opts = NUM_OPTS(raid_stop_opt),
.options = &raid_stop_opt[0],
.title = __("Delete a Disk Array"),
.header = {
__("Select the disk array(s) to delete.\n\n"),
__("Type choice, press Enter.\n"),
__(" 1=delete a disk array\n\n"),
"" }
};
s_node n_raid_stop_fail = {
.title = __("Delete a Disk Array Failed"),
.f_flags = (ENTER_FLAG | EXIT_FLAG | CANCEL_FLAG),
.header = {
__("There are no disks eligible for the selected operation "
"due to one or more of the following reasons:\n\n"),
__("o There are no disk arrays in the system.\n"),
__("o An IOA is in a condition that makes the disks attached to "
"it read/write protected. Examine the kernel messages log "
"for any errors that are logged for the IO subsystem "
"and follow the appropriate procedure for the reference code to "
"correct the problem, if necessary.\n"),
__("o Not all disks attached to an advanced function IOA have "
"reported to the system. Retry the operation.\n"),
__("o The disks are missing.\n"),
"" }
};
struct screen_opts confirm_raid_stop_opt[] = {
{do_confirm_raid_stop, "\n"}
};
s_node n_confirm_raid_stop = {
.rc_flags = (CANCEL_FLAG),
.f_flags = (CANCEL_FLAG | TOGGLE_FLAG | FWD_FLAG),
.num_opts = NUM_OPTS(confirm_raid_stop_opt),
.options = &confirm_raid_stop_opt[0],
.title = __("Confirm Delete a Disk Array"),
.header = {
__("ATTENTION: Disk array will be deleted.\n\n"),
__("Press Enter to continue.\n"),
__(" q=Cancel to return and change your choice.\n\n"),
"" }
};
struct screen_opts raid_start_opt[] = {
{raid_start_loop, "\n"}
};
s_node n_raid_start = {
.rc_flags = (CANCEL_FLAG | REFRESH_FLAG),
.f_flags = (EXIT_FLAG | CANCEL_FLAG | TOGGLE_FLAG | FWD_FLAG),
.num_opts = NUM_OPTS(raid_start_opt),
.options = &raid_start_opt[0],
.title = __("Create a Disk Array"),
.header = {
__("Select the adapter.\n\n"),
__("Type choice, press Enter.\n"),
__(" 1=create a disk array\n\n"),
"" }
};
s_node n_raid_start_fail = {
.f_flags = (ENTER_FLAG | EXIT_FLAG | CANCEL_FLAG),
.title = __("Create a Disk Array Failed"),
.header = {
__("There are no disks eligible for the selected operation due "
"to one or more of the following reasons:\n\n"),
__("o There are not enough advanced function disks in the system.\n"),
__("o An IOA is in a condition that makes the disks attached to "
"it read/write protected. Examine the kernel messages log "
"for any errors that are logged for the IO subsystem "
"and follow the appropriate procedure for the reference code to "
"correct the problem, if necessary.\n"),
__("o Not all disks attached to an advanced function IOA have "
"reported to the system. Retry the operation.\n"),
__("o The disks are missing.\n"),
"" }
};
s_node n_configure_raid_start = {
.rc_flags = (CANCEL_FLAG | REFRESH_FLAG),
.f_flags = (EXIT_FLAG | CANCEL_FLAG | TOGGLE_FLAG | FWD_FLAG),
.num_opts = NUM_OPTS(null_opt),
.options = &null_opt[0],
.title = __("Select Disk Units for Disk Array"),
.header = {
__("Type option, press Enter.\n"),
__(" 1=Select\n\n"),
"" }
};
s_node n_confirm_raid_start = {
.f_flags = (CANCEL_FLAG | TOGGLE_FLAG | FWD_FLAG),
.num_opts = NUM_OPTS(null_opt),
.options = &null_opt[0],
.title = __("Confirm Create Disk Array"),
.header = {
__("Press Enter to continue.\n"),
__(" q=Cancel to return and change your choice.\n\n"),
"" }
};
s_node n_raid_start_complete = {
.title = __("Create Disk Array Status"),
.body = __("You selected to create a disk array")
};
struct screen_opts raid_include_opt[] = {
{configure_raid_include, "\n"}
};
s_node n_raid_include = {
.rc_flags = (CANCEL_FLAG | REFRESH_FLAG),
.f_flags = (EXIT_FLAG | CANCEL_FLAG | TOGGLE_FLAG | FWD_FLAG),
.num_opts = NUM_OPTS(raid_include_opt),
.options = &raid_include_opt[0],
.title = __("Add Devices to a Disk Array"),
.header = {
__("Select the disk array.\n\n"),
__("Type choice, press Enter.\n"),
__(" 1=Select disk array\n\n"),
"" }
};
s_node n_raid_include_fail = {
.f_flags = (ENTER_FLAG | EXIT_FLAG | CANCEL_FLAG),
.title = __("Add Devices to a Disk Array Failed"),
.header = {
__("There are no disks eligible for the selected operation "
"due to one or more of the following reasons:\n\n"),
__("o There are no disk arrays in the system.\n"),
__("o An IOA is in a condition that makes the disks attached to "
"it read/write protected. Examine the kernel messages log "
"for any errors that are logged for the IO subsystem "
"and follow the appropriate procedure for the reference "
"code to correct the problem, if necessary.\n"),
__("o Not all disks attached to an advanced function IOA have"
"reported to the system. Retry the operation.\n"),
__("o The disks are missing.\n"),
__("o IO adapter does not support add function.\n"),
"" }
};
s_node n_configure_raid_include = {
.rc_flags = (CANCEL_FLAG),
.f_flags = (EXIT_FLAG | CANCEL_FLAG | TOGGLE_FLAG | FWD_FLAG),
.num_opts = NUM_OPTS(null_opt),
.options = &null_opt[0],
.title = __("Add Devices to a Disk Array"),
.header = {
__("Select the devices to be included in the disk array\n\n"),
__("Type choice, press Enter.\n"),
__(" 1=Add a Device to a Disk Array\n\n"),
"" }
};
s_node n_configure_raid_include_fail = {
.f_flags = (ENTER_FLAG | EXIT_FLAG | CANCEL_FLAG),
.title = __("Add Devices to a Disk Array Failed"),
.header = {
__("There are no disks eligible for the selected operation "
"due to one or more of the following reasons:\n\n"),
__("o There are not enough disks available to be included.\n"),
__("o Not all disks attached to an IOA have reported to the "
"system. Retry the operation.\n"),
__("o The disk to be included must be the same or greater "
"capacity than the smallest device in the disk array and "
"be formatted correctly\n"),
__("o The disk is not supported for the requested operation\n"),
"" }
};
s_node n_confirm_raid_include = {
.f_flags = (EXIT_FLAG | CANCEL_FLAG | TOGGLE_FLAG | FWD_FLAG),
.num_opts = NUM_OPTS(null_opt),
.options = &null_opt[0],
.title = __("Confirm Devices to Add to a Disk Array"),
.header = {
__("All listed disks will be added to the disk array.\n"),
__("ATTENTION: Disks that have not been zeroed with be formatted first.\n"),
__("Press Enter to confirm your choice to have the system "
"include the selected disks in the disk array\n"),
__(" q=Cancel to return and change your choice.\n\n"),
"" }
};
s_node n_dev_include_complete = {
.title = __("Add Devices to a Disk Array Status"),
.header = {
__("The operation to add disks to the disk array "
"will be done in two phases. The disks will first be "
"formatted, then added to the disk array."),
__("You selected to add disks to a disk array"),
""
}
};
s_node n_af_include_fail = {
.f_flags = (ENTER_FLAG | EXIT_FLAG | CANCEL_FLAG),
.title = __("Format Device for RAID Function Failed"),
.header = {
__("There are no disks eligible for the selected operation "
"due to one or more of the following reasons:\n\n"),
__("o There are no eligible disks in the system.\n"),
__("o All disks are already formatted for RAID Function.\n"),
__("o An IOA is in a condition that makes the disks attached to "
"it read/write protected. Examine the kernel messages log "
"for any errors that are logged for the IO subsystem "
"and follow the appropriate procedure for the reference code to "
"correct the problem, if necessary.\n"),
__("o Not all disks attached to an advanced function IOA have "
"reported to the system. Retry the operation.\n"),
__("o The disks are missing.\n"),
"" }
};
s_node n_af_remove_fail = {
.f_flags = (ENTER_FLAG | EXIT_FLAG | CANCEL_FLAG),
.title = __("Format Device for JBOD Function (512) Failed"),
.header = {
__("There are no disks eligible for the selected operation "
"due to one or more of the following reasons:\n\n"),
__("o There are no eligible disks in the system.\n"),
__("o All disks are already formatted for JBOD function.\n"),
__("o An IOA is in a condition that makes the disks attached to "
"it read/write protected. Examine the kernel messages log "
"for any errors that are logged for the IO subsystem "
"and follow the appropriate procedure for the reference code to "
"correct the problem, if necessary.\n"),
__("o Not all disks attached to an advanced function IOA have "
"reported to the system. Retry the operation.\n"),
__("o The disks are missing.\n"),
"" }
};
s_node n_add_hot_spare_fail = {
.f_flags = (ENTER_FLAG | EXIT_FLAG | CANCEL_FLAG),
.title = __("Create Hot Spare Failed"),
.header = {
__("There are no disks eligible for the selected operation "
"due to one or more of the following reasons:\n\n"),
__("o There are no eligible disks in the system.\n"),
__("o An IOA is in a condition that makes the disks attached to "
"it read/write protected. Examine the kernel messages log "
"for any errors that are logged for the IO subsystem "
"and follow the appropriate procedure for the reference code to "
"correct the problem, if necessary.\n"),
__("o Not all disks attached to an advanced function IOA have "
"reported to the system. Retry the operation.\n"),
__("o The disks are missing.\n"),
"" }
};
s_node n_remove_hot_spare_fail = {
.f_flags = (ENTER_FLAG | EXIT_FLAG | CANCEL_FLAG),
.title = __("Delete Hot Spare Failed"),
.header = {
__("There are no disks eligible for the selected operation "
"due to one or more of the following reasons:\n\n"),
__("o There are no eligible disks in the system.\n"),
__("o An IOA is in a condition that makes the disks attached to "
"it read/write protected. Examine the kernel messages log "
"for any errors that are logged for the IO subsystem "
"and follow the appropriate procedure for the reference code to "
"correct the problem, if necessary.\n"),
__("o Not all disks attached to an advanced function IOA have "
"reported to the system. Retry the operation.\n"),
__("o The disks are missing.\n"),
"" }
};
s_node n_add_hot_spare = {
.rc_flags = (CANCEL_FLAG),
.f_flags = (EXIT_FLAG | CANCEL_FLAG | TOGGLE_FLAG | FWD_FLAG),
.num_opts = NUM_OPTS(null_opt),
.options = &null_opt[0],
.title = __("Create a Hot Spare Device"),
.header = {
__("Select the adapter on which disks will be "
"configured as hot spares\n\n"),
__("Type choice, press Enter.\n"),
__(" 1=Select adapter\n\n"),
"" },
};
s_node n_remove_hot_spare = {
.rc_flags = (CANCEL_FLAG),
.f_flags = (EXIT_FLAG | CANCEL_FLAG | TOGGLE_FLAG | FWD_FLAG),
.num_opts = NUM_OPTS(null_opt),
.options = &null_opt[0],
.title = __("Delete a Hot Spare Device"),
.header = {
__("Select the adapter on which hot spares will be deleted\n\n"),
__("Type choice, press Enter.\n"),
__(" 1=Select adapter\n\n"),
"" },
};/* xxx search for subsystem and disk unit and replace all */
s_node n_select_add_hot_spare = {
.f_flags = (EXIT_FLAG | CANCEL_FLAG | TOGGLE_FLAG | FWD_FLAG),
.num_opts = NUM_OPTS(null_opt),
.options = &null_opt[0],
.title = __("Select Disks to Create Hot Spares"),
.header = {
__("Type option, press Enter.\n"),
__(" 1=Select\n\n"),
"" }
};
s_node n_select_remove_hot_spare = {
.f_flags = (EXIT_FLAG | CANCEL_FLAG | TOGGLE_FLAG | FWD_FLAG),
.num_opts = NUM_OPTS(null_opt),
.options = &null_opt[0],
.title = __("Select Hot Spares to Delete"),
.header = {
__("Type option, press Enter.\n"),
__(" 1=Select\n\n"),
"" }
};
s_node n_confirm_add_hot_spare = {
.f_flags = (CANCEL_FLAG | TOGGLE_FLAG | FWD_FLAG),
.num_opts = NUM_OPTS(null_opt),
.options = &null_opt[0],
.title = __("Confirm Create Hot Spare"),
.header = {
__("ATTENTION: Existing data on these disks "
"will not be preserved.\n\n"),
__("Press Enter to continue.\n"),
__(" q=Cancel to return and change your choice.\n\n"),
"" },
};
s_node n_confirm_remove_hot_spare = {
.f_flags = (CANCEL_FLAG | TOGGLE_FLAG | FWD_FLAG),
.num_opts = NUM_OPTS(null_opt),
.options = &null_opt[0],
.title = __("Confirm Delete Hot Spare"),
.header = {
__("ATTENTION: Selected disks will no longer be available "
"as hot spare devices.\n\n"),
__("Press Enter to continue.\n"),
__(" q=Cancel to return and change your choice.\n\n"),
"" }
};
struct screen_opts disk_unit_recovery_opt[] = {
{concurrent_add_device, "1", __("Concurrent add device")},
{concurrent_remove_device, "2", __("Concurrent remove device")},
{init_device, "3", __("Initialize and format disk")},
{reclaim_cache, "4", __("Reclaim IOA cache storage")},
{raid_rebuild, "5", __("Rebuild disk unit data")},
{raid_resync, "6", __("Force RAID Consistency Check")},
{battery_maint, "7", __("Work with resources containing cache battery packs")},
{path_status, "8", __("Display SAS path status")},
{enclosures_maint, "9", __("Work with disk enclosures")}
};
s_node n_disk_unit_recovery = {
.rc_flags = (EXIT_FLAG | CANCEL_FLAG),
.f_flags = (EXIT_FLAG | CANCEL_FLAG),
.num_opts = NUM_OPTS(disk_unit_recovery_opt),
.options = &disk_unit_recovery_opt[0],
.title = __("Work with Disk Unit Recovery")
};
#define IPR_CONC_REMOVE 1
#define IPR_CONC_ADD 2
#define IPR_VERIFY_CONC_REMOVE 3
#define IPR_VERIFY_CONC_ADD 4
#define IPR_WAIT_CONC_REMOVE 5
#define IPR_WAIT_CONC_ADD 6
#define IPR_CONC_IDENTIFY 7
s_node n_concurrent_remove_device = {
.rc_flags = (CANCEL_FLAG),
.f_flags = (EXIT_FLAG | CANCEL_FLAG | TOGGLE_FLAG | FWD_FLAG),
.num_opts = NUM_OPTS(null_opt),
.options = &null_opt[0],
.title = __("Concurrent Device Remove"),
.header = {
__("Choose a single location for remove operations\n"),
__(" 1=Select\n\n"),
"" }
};
s_node n_concurrent_add_device = {
.rc_flags = (CANCEL_FLAG),
.f_flags = (EXIT_FLAG | CANCEL_FLAG | TOGGLE_FLAG | FWD_FLAG),
.num_opts = NUM_OPTS(null_opt),
.options = &null_opt[0],
.title = __("Concurrent Device Add"),
.header = {
__("Choose a single location for add operations\n"),
__(" 1=Select\n\n"),
"" }
};
s_node n_verify_conc_remove = {
.f_flags = (EXIT_FLAG | CANCEL_FLAG | TOGGLE_FLAG | FWD_FLAG),
.num_opts = NUM_OPTS(null_opt),
.options = &null_opt[0],
.title = __("Verify Device Concurrent Remove"),
.header = {
__("Verify the selected device for concurrent remove operations\n\n"),
__("Press Enter when verification complete and ready to continue\n"),
__(" q=Cancel to return and change your choice.\n\n"),
"" }
};
s_node n_verify_conc_add = {
.f_flags = (EXIT_FLAG | CANCEL_FLAG | TOGGLE_FLAG | FWD_FLAG),
.num_opts = NUM_OPTS(null_opt),
.options = &null_opt[0],
.title = __("Verify Device Concurrent Add"),
.header = {
__("Verify the selected device for concurrent add operations\n\n"),
__("Press Enter when verification complete and ready to continue\n"),
__(" q=Cancel to return and change your choice.\n\n"),
"" }
};
s_node n_wait_conc_remove = {
.f_flags = (EXIT_FLAG | CANCEL_FLAG | TOGGLE_FLAG | FWD_FLAG),
.num_opts = NUM_OPTS(null_opt),
.options = &null_opt[0],
.title = __("Complete Device Concurrent Remove"),
.header = {
__("Remove selected device\n\n"),
__("Press Enter when selected device has been removed\n"),
__(" q=Cancel to return and change your choice.\n\n"),
"" }
};
s_node n_wait_conc_add = {
.f_flags = (EXIT_FLAG | CANCEL_FLAG | TOGGLE_FLAG | FWD_FLAG),
.num_opts = NUM_OPTS(null_opt),
.options = &null_opt[0],
.title = __("Complete Device Concurrent Add"),
.header = {
__("Add selected device\n\n"),
__("Press Enter when selected device has been installed\n"),
__(" q=Cancel to return and change your choice.\n\n"),
"" }
};
struct screen_opts init_device_opt[] = {
{confirm_init_device, "\n"}
};
s_node n_af_init_device = {
.rc_flags = (CANCEL_FLAG),
.f_flags = (EXIT_FLAG | CANCEL_FLAG | TOGGLE_FLAG | FWD_FLAG),
.num_opts = NUM_OPTS(init_device_opt),
.options = &init_device_opt[0],
.title = __("Select Disks to format for RAID Function"),
.header = {
__("Type option, press Enter.\n"),
__(" 1=Select\n\n"),
"" }
};
s_node n_jbod_init_device = {
.rc_flags = (CANCEL_FLAG),
.f_flags = (EXIT_FLAG | CANCEL_FLAG | TOGGLE_FLAG | FWD_FLAG),
.num_opts = NUM_OPTS(init_device_opt),
.options = &init_device_opt[0],
.title = __("Select Disks to format for JBOD Function (512)"),
.header = {
__("Type option, press Enter.\n"),
__(" 1=Select\n\n"),
"" }
};
s_node n_init_device = {
.rc_flags = (CANCEL_FLAG),
.f_flags = (EXIT_FLAG | CANCEL_FLAG | TOGGLE_FLAG | FWD_FLAG),
.num_opts = NUM_OPTS(init_device_opt),
.options = &init_device_opt[0],
.title = __("Select Disks for Initialize and Format"),
.header = {
__("Type option, press Enter.\n"),
__(" 1=Select\n\n"),
"" }
};
struct screen_opts confirm_inits_opt[] = {
{send_dev_inits, "c"}
};
s_node n_confirm_init_device = {
.f_flags = (CONFIRM_FLAG | CANCEL_FLAG | TOGGLE_FLAG | FWD_FLAG),
.num_opts = NUM_OPTS(confirm_inits_opt),
.options = &confirm_inits_opt[0],
.title = __("Confirm Initialize and Format Disks"),
.header = {
__("Press 'c' to confirm your choice for 1=Initialize and format.\n"),
__(" q=Return to change your choice.\n\n"),
"" }
};
s_node n_dev_init_complete = {
.title = __("Initialize and Format Status"),
.body = __("You selected to initialize and format a disk")
};
struct screen_opts reclaim_cache_opts[] = {
{confirm_reclaim, "\n"}
};
s_node n_reclaim_cache = {
.rc_flags = (CANCEL_FLAG),
.f_flags = (EXIT_FLAG | CANCEL_FLAG | TOGGLE_FLAG),
.num_opts = NUM_OPTS(reclaim_cache_opts),
.options = &reclaim_cache_opts[0],
.title = __("Reclaim IOA Cache Storage"),
.header = {
__("Select the IOA to reclaim IOA cache storage.\n"),
__("ATTENTION: Proceed with this function only if directed "
"to from a service procedure. Data in the IOA cache "
"will be discarded.\n\n"),
__("Type choice, press Enter.\n"),
__(" 1=Reclaim IOA cache storage.\n\n"),
"" }
};
struct screen_opts confirm_reclaim_opt[] = {
{reclaim_warning, "c"}
};
s_node n_confirm_reclaim = {
.f_flags = (EXIT_FLAG | CANCEL_FLAG | TOGGLE_FLAG | FWD_FLAG),
.num_opts = NUM_OPTS(confirm_reclaim_opt),
.options = &confirm_reclaim_opt[0],
.title = __("Confirm Reclaim IOA Cache Storage"),
.header = {
__("The disks that may be affected by the function are displayed.\n"),
__("ATTENTION: Proceed with this function only if directed to from a "
"service procedure. Data in the IOA cache will be discarded. "
"Filesystem corruption may result on the system.\n\n"),
__("Press c=Confirm to reclaim cache storage.\n"),
__(" q=Cancel to return to change your choice.\n\n"),
"" }
};
struct screen_opts confirm_reclaim_warning_opt[] = {
{reclaim_result, "s"}
};
s_node n_confirm_reclaim_warning = {
.f_flags = (CONFIRM_REC_FLAG | CANCEL_FLAG | FWD_FLAG),
.num_opts = NUM_OPTS(confirm_reclaim_warning_opt),
.options = &confirm_reclaim_warning_opt[0],
.title = __("Confirm Reclaim IOA Cache Storage"),
.header = {
__("ATTENTION!!! ATTENTION!!! ATTENTION!!! ATTENTION!!!\n"),
__("ATTENTION: Proceed with this function only if directed to from a "
"service procedure. Data in the IOA cache will be discarded. "
"This data loss may or may not be detected by the host operating "
"system. Filesystem corruption may result on the system.\n\n"),
__("Press 's' to continue.\n\n"),
"" }
};
s_node n_reclaim_result = {
.f_flags = (ENTER_FLAG | EXIT_FLAG | CANCEL_FLAG),
.title = __("Reclaim IOA Cache Storage Results")
};
struct screen_opts raid_rebuild_opt[] = {
{confirm_raid_rebuild, "\n"}
};
s_node n_raid_rebuild = {
.rc_flags = (CANCEL_FLAG),
.f_flags = (EXIT_FLAG | CANCEL_FLAG | TOGGLE_FLAG | FWD_FLAG),
.num_opts = NUM_OPTS(raid_rebuild_opt),
.options = &raid_rebuild_opt[0],
.title = __("Rebuild Disk Unit Data"),
.header = {
__("Select the disks to be rebuilt\n\n"),
__("Type choice, press Enter.\n"),
__(" 1=Rebuild\n\n"),
"" }
};
s_node n_raid_rebuild_fail = {
.f_flags = (ENTER_FLAG | EXIT_FLAG | CANCEL_FLAG),
.title = __("Rebuild Disk Unit Data Failed"),
.header = {
__("There are no disks eligible for the selected operation "
"due to one or more of the following reasons:\n\n"),
__("o There are no disks that need to be rebuilt.\n"),
__("o The disk that needs to be rebuilt is not at the right "
"location. Examine the 'message log' for the exposed unit "
"and make sure that the replacement unit is at the correct "
"location.\n"),
__("o Not all disks attached to an IOA have reported to the "
"system. Retry the operation.\n"),
__("o The disk is not supported for the requested operation.\n"),
"" }
};
s_node n_confirm_raid_rebuild = {
.f_flags = (CANCEL_FLAG | TOGGLE_FLAG | FWD_FLAG),
.num_opts = NUM_OPTS(null_opt),
.options = &null_opt[0],
.title = __("Confirm Rebuild Disk Unit Data"),
.header = {
__("Rebuilding the disk unit data may take several "
"minutes for each disk selected.\n\n"),
__("Press Enter to confirm having the data rebuilt.\n"),
__(" q=Cancel to return and change your choice.\n\n"),
"" },
};
s_node n_raid_resync_complete = {
.title = __("Force RAID Consistency Check Status"),
.body = __("You selected to force a RAID consistency check")
};
struct screen_opts raid_resync_opt[] = {
{confirm_raid_resync, "\n"}
};
s_node n_raid_resync = {
.rc_flags = (CANCEL_FLAG),
.f_flags = (EXIT_FLAG | CANCEL_FLAG | TOGGLE_FLAG | FWD_FLAG),
.num_opts = NUM_OPTS(raid_resync_opt),
.options = &raid_resync_opt[0],
.title = __("Force RAID Consistency Check"),
.header = {
__("Select the arrays to be checked\n\n"),
__("Type choice, press Enter.\n"),
__(" 1=Check\n\n"),
"" }
};
s_node n_raid_resync_fail = {
.f_flags = (ENTER_FLAG | EXIT_FLAG | CANCEL_FLAG),
.title = __("Force RAID Consistency Check Failed"),
.header = {
__("There are no arrays eligible for the selected operation "
"due to one or more of the following reasons:\n\n"),
__("o There are no disk arrays in the system.\n"),
__("o An IOA is in a condition that makes the disks attached to "
"it read/write protected. Examine the kernel messages log "
"for any errors that are logged for the IO subsystem "
"and follow the appropriate procedure for the reference code to "
"correct the problem, if necessary.\n"),
__("o Not all disks attached to an advanced function IOA have "
"reported to the system. Retry the operation.\n"),
__("o The disks are missing.\n"),
"" }
};
s_node n_confirm_raid_resync = {
.f_flags = (CANCEL_FLAG | TOGGLE_FLAG | FWD_FLAG),
.num_opts = NUM_OPTS(null_opt),
.options = &null_opt[0],
.title = __("Confirm Force RAID Consistency Check"),
.header = {
__("Forcing a consistency check on a RAID array may take "
"a long time, depending on current system activity.\n\n"),
__("Press Enter to confirm.\n"),
__(" q=Cancel to return and change your choice.\n\n"),
"" },
};
struct screen_opts configure_af_device_opt[] = {
{confirm_init_device, "\n"}
};
struct screen_opts battery_maint_opt[] = {
{battery_fork, "\n"}
};
s_node n_battery_maint = {
.rc_flags = (CANCEL_FLAG),
.f_flags = (EXIT_FLAG | CANCEL_FLAG | TOGGLE_FLAG),
.num_opts = NUM_OPTS(battery_maint_opt),
.options = &battery_maint_opt[0],
.title = __("Work with Resources Containing Cache Battery Packs"),
.header = {
__("Type options, press Enter\n"),
__(" 1=Display battery information\n"),
__(" 2=Force battery pack into error state\n"),
__(" 3=Start IOA cache\n\n"),
"" }
};
struct screen_opts confirm_force_battery_error_opt[] = {
{force_battery_error, "c"}
};
s_node n_confirm_force_battery_error = {
.f_flags = (EXIT_FLAG | CANCEL_FLAG | TOGGLE_FLAG | FWD_FLAG),
.num_opts = NUM_OPTS(confirm_force_battery_error_opt),
.options = &confirm_force_battery_error_opt[0],
.title = __("Force Battery Packs Into Error State"),
.header = {
__("ATTENTION: This service function should be run only "
"under the direction of the IBM Hardware Service Support\n\n"),
__("You have selected to force a cache batter error on an IOA\n\n"),
__("You will have to replace the Cache Battery Pack in each selected "
"IOA to resume normal operations.\n\n"),
__("System performance could be significantly degraded until the cache "
"battery packs are replaced on the selected IOAs.\n\n"),
__(" c=Continue to force the following battery packs into an error state\n\n"),
"" },
};
struct screen_opts confirm_start_cache_opt[] = {
{enable_battery, "c"}
};
s_node n_confirm_start_cache = {
.f_flags = (EXIT_FLAG | CANCEL_FLAG | TOGGLE_FLAG | FWD_FLAG),
.num_opts = NUM_OPTS(confirm_start_cache_opt),
.options = &confirm_start_cache_opt[0],
.title = __("Start IOA cache after concurrently replacing battery pack"),
.header = {
__("ATTENTION: This service function should be run only "
"under the direction of the IBM Hardware Service Support\n\n"),
__("You have selected to start the IOA cache after concurrently replacing the battery pack\n\n"),
__(" c=Continue to start IOA cache\n\n"),
"" },
};
s_node n_show_battery_info = {
.f_flags = (ENTER_FLAG | EXIT_FLAG | CANCEL_FLAG),
.title = __("Battery Information")
};
struct screen_opts enclosures_maint_opt[] = {
{enclosures_fork, "\n"}
};
s_node n_enclosures_maint = {
.rc_flags = (CANCEL_FLAG),
.f_flags = (EXIT_FLAG | CANCEL_FLAG | TOGGLE_FLAG | FWD_FLAG),
.num_opts = NUM_OPTS(enclosures_maint_opt),
.options = &enclosures_maint_opt[0],
.title = __("Work with disk enclosures"),
.header = {
__("Type options, press Enter\n"),
__(" 1=Display disk enclosure details\n"),
__(" 2=Suspend disk enclosure path\n"),
__(" 3=Resume disk enclosure path\n\n"),
"" }
};
struct screen_opts confirm_suspend_disk_enclosure_opt[] = {
{ipr_suspend_disk_enclosure, "c"}
};
s_node n_confirm_suspend_disk_enclosure = {
.f_flags = (EXIT_FLAG | CANCEL_FLAG | TOGGLE_FLAG | FWD_FLAG),
.num_opts = NUM_OPTS(confirm_suspend_disk_enclosure_opt),
.options = &confirm_suspend_disk_enclosure_opt[0],
.title = __("Suspend Disk Enclosure"),
.header = {
__("ATTENTION: This service function should be run only "
"under the direction of the IBM Hardware Service Support\n\n"),
__(" c=Continue to issue suspend enclosure command\n\n"),
"" },
};
struct screen_opts confirm_resume_disk_enclosure_opt[] = {
{ipr_resume_disk_enclosure, "c"}
};
s_node n_confirm_resume_disk_enclosure = {
.f_flags = (EXIT_FLAG | CANCEL_FLAG | TOGGLE_FLAG | FWD_FLAG),
.num_opts = NUM_OPTS(confirm_resume_disk_enclosure_opt),
.options = &confirm_resume_disk_enclosure_opt[0],
.title = __("Resume Disk Enclosure"),
.header = {
__("ATTENTION: This service function should be run only "
"under the direction of the IBM Hardware Service Support\n\n"),
__(" c=Continue to issue resume enclosure command\n\n"),
"" },
};
s_node n_show_enclosure_info = {
.f_flags = (ENTER_FLAG | EXIT_FLAG | CANCEL_FLAG),
.title = __("Hardware detail Information")
};
struct screen_opts path_status_opt[] = {
{path_details, "\n"}
};
s_node n_path_status = {
.rc_flags = (CANCEL_FLAG),
.f_flags = (EXIT_FLAG | CANCEL_FLAG | REFRESH_FLAG | TOGGLE_FLAG | FWD_FLAG),
.num_opts = NUM_OPTS(path_status_opt),
.options = &path_status_opt[0],
.title = __("Display SAS Path Status"),
.header = {
__("Type option, press Enter.\n"),
__(" 1=Display SAS Path routing details\n\n"),
"" }
};
s_node n_path_details = {
.rc_flags = (CANCEL_FLAG),
.f_flags = (EXIT_FLAG | CANCEL_FLAG | FWD_FLAG),
.title = __("Display SAS Path Details"),
.header = {__("\n\n"), ""}
};
struct screen_opts bus_config_opt[] = {
{change_bus_attr, "\n"}
};
s_node n_bus_config = {
.rc_flags = (CANCEL_FLAG | REFRESH_FLAG),
.f_flags = (EXIT_FLAG | CANCEL_FLAG | TOGGLE_FLAG | FWD_FLAG),
.num_opts = NUM_OPTS(bus_config_opt),
.options = &bus_config_opt[0],
.title = __("Work with SCSI Bus Configuration"),
.header = {
__("Select the adapter to change scsi bus attribute.\n\n"),
__("Type choice, press Enter.\n"),
__(" 1=change scsi bus attribute\n\n"),
"" }
};
s_node n_bus_config_fail = {
.f_flags = (ENTER_FLAG | EXIT_FLAG | CANCEL_FLAG),
.title = __("Work with SCSI Bus Configuration Failed"),
.header = {
__("There are no SCSI Buses eligible for the selected operation. "
"None of the installed adapters support the requested "
"operation.\n"),
"" }
};
struct screen_opts change_bus_attr_opt[] = {
{NULL, "c"},
{confirm_change_bus_attr, "\n"}
};
s_node n_change_bus_attr = {
.f_flags = (ENTER_FLAG | EXIT_FLAG | CANCEL_FLAG | FWD_FLAG | MENU_FLAG),
.num_opts = NUM_OPTS(change_bus_attr_opt),
.options = &change_bus_attr_opt[0],
.title = __("Change SCSI Bus Configuration"),
.header = {
__("Current bus configurations are shown. To change "
"setting hit 'c' for options menu. Highlight "
"desired option then hit Enter.\n"),
__(" c=Change Setting\n\n"),
"" }
};
struct screen_opts confirm_change_bus_attr_opt[] = {
{NULL, "c"}
};
s_node n_confirm_change_bus_attr = {
.f_flags = (CONFIRM_FLAG | EXIT_FLAG | CANCEL_FLAG | FWD_FLAG),
.num_opts = NUM_OPTS(confirm_change_bus_attr_opt),
.options = &confirm_change_bus_attr_opt[0],
.title = __("Confirm Change SCSI Bus Configuration"),
.header = {
__("Confirming this action will result in the following"
"configuration to become active.\n"),
__(" c=Confirm Change SCSI Bus Configration\n\n"),
"" }
};
struct screen_opts driver_config_opt[] = {
{change_driver_config, "\n"}
};
s_node n_driver_config = {
.rc_flags = (CANCEL_FLAG | REFRESH_FLAG),
.f_flags = (EXIT_FLAG | CANCEL_FLAG | TOGGLE_FLAG | FWD_FLAG),
.num_opts = NUM_OPTS(driver_config_opt),
.options = &driver_config_opt[0],
.title = __("Adapter Driver Configuration"),
.header = {
__("Select adapter to change driver configuration\n\n"),
__("Type choice, press Enter\n"),
__(" 1=change driver configuration\n\n"),
"" }
};
s_node n_change_driver_config = {
.f_flags = (ENTER_FLAG),
.num_opts = NUM_OPTS(null_opt),
.options = &null_opt[0],
.title = __("Change Driver Configuration"),
.header = {
__("Current Driver configurations "
"are shown. To change setting, type in new "
"value then hit Enter\n\n"),
"" }
};
struct screen_opts disk_config_opt[] = {
{change_disk_config, "\n"}
};
s_node n_disk_config = {
.rc_flags = (CANCEL_FLAG),
.f_flags = (EXIT_FLAG | CANCEL_FLAG | REFRESH_FLAG | TOGGLE_FLAG | FWD_FLAG),
.num_opts = NUM_OPTS(disk_config_opt),
.options = &disk_config_opt[0],
.title = __("Change Disk Configuration"),
.header = {
__("Type option, press Enter.\n"),
__(" 1=Change Disk Configuration\n\n"),
"" }
};
struct screen_opts change_disk_attr_opt[] = {
{NULL, "c"},
{NULL, "\n"}
};
s_node n_change_disk_config = {
.f_flags = (ENTER_FLAG | EXIT_FLAG | CANCEL_FLAG | FWD_FLAG | MENU_FLAG),
.num_opts = NUM_OPTS(change_disk_attr_opt),
.options = &change_disk_attr_opt[0],
.title = __("Change Configuration of Disk"),
.header = {
__("Current Disk configurations are shown. To change "
"setting hit 'c' for options menu. Highlight "
"desired option then hit Enter.\n"),
__(" c=Change Setting\n\n"),
"" }
};
struct screen_opts ioa_config_opt[] = {
{change_ioa_config, "\n"}
};
s_node n_ioa_config = {
.rc_flags = (CANCEL_FLAG),
.f_flags = (EXIT_FLAG | CANCEL_FLAG | REFRESH_FLAG | TOGGLE_FLAG | FWD_FLAG),
.num_opts = NUM_OPTS(ioa_config_opt),
.options = &ioa_config_opt[0],
.title = __("Change Adapter Configuration"),
.header = {
__("Type option, press Enter.\n"),
__(" 1=Change Adapter Configuration\n\n"),
"" }
};
struct screen_opts change_ioa_attr_opt[] = {
{NULL, "c"},
{NULL, "\n"}
};
s_node n_change_ioa_config = {
.f_flags = (ENTER_FLAG | EXIT_FLAG | CANCEL_FLAG | FWD_FLAG | MENU_FLAG),
.num_opts = NUM_OPTS(change_ioa_attr_opt),
.options = &change_ioa_attr_opt[0],
.title = __("Change Configuration of Adapter"),
.header = {
__("Current Adapter configurations are shown. To change "
"setting hit 'c' for options menu. Highlight "
"desired option then hit Enter.\n"),
__(" c=Change Setting\n\n"),
"" }
};
struct screen_opts download_ucode_opt[] = {
{choose_ucode, "\n"}
};
s_node n_download_ucode = {
.rc_flags = (CANCEL_FLAG),
.f_flags = (EXIT_FLAG | CANCEL_FLAG | REFRESH_FLAG | FWD_FLAG | TOGGLE_FLAG),
.num_opts = NUM_OPTS(download_ucode_opt),
.options = &download_ucode_opt[0],
.title = __("Download Microcode"),
.header = {
__("Select the device(s) to download microcode\n\n"),
__("Type choice, press Enter.\n"),
__(" 1=device to download microcode\n\n"),
"" }
};
s_node n_choose_ucode = {
.rc_flags = (CANCEL_FLAG),
.f_flags = (CANCEL_FLAG | FWD_FLAG),
.num_opts = NUM_OPTS(null_opt),
.options = &null_opt[0],
.title = __("Choose Microcode Image"),
.header = {
__("Select the microcode image to download\n\n"),
__("Type choice, press Enter.\n"),
__(" 1=download microcode\n\n"),
"OPT Version Date Image File\n",
"--- --------------- -------- --------------------------\n",
"" }
};
s_node n_confirm_download_ucode = {
.rc_flags = (CANCEL_FLAG),
.f_flags = (CANCEL_FLAG | FWD_FLAG),
.num_opts = NUM_OPTS(null_opt),
.options = &null_opt[0],
.title = __("Confirm Microcode Download"),
.header = {
__("ATTENTION: System performance may be affected during "
"the microcode download process\n\n"),
__("Press Enter to continue.\n"),
__(" q=Cancel to return and change your choice.\n\n"),
"OPT Version Date Image File\n",
"--- --------------- -------- --------------------------\n",
"" }
};
s_node n_confirm_download_all_ucode = {
.rc_flags = (CANCEL_FLAG),
.f_flags = (CANCEL_FLAG | FWD_FLAG),
.num_opts = NUM_OPTS(null_opt),
.options = &null_opt[0],
.title = __("Confirm Microcode Download"),
.header = {
__("The following devices are going to be updated.\n\n"
"ATTENTION: System performance may be affected during "
"the microcode download process. "
"Download may take some time.\n\n"),
__("Press Enter to continue.\n"),
__(" q=Cancel to return and change your choice.\n\n"),
"Name Version Date Image File\n",
"------ --------- --------- -----------------------------\n",
"" }
};
s_node n_download_ucode_in_progress = {
.rc_flags = (CANCEL_FLAG),
.f_flags = (CANCEL_FLAG | FWD_FLAG),
.num_opts = NUM_OPTS(null_opt),
.options = &null_opt[0],
.title = __("Microcode Download In Progress"),
.header = {
__("Please wait for the microcode update to complete\n"),
__("This process may take several minutes\n"),
"" }
};
struct screen_opts log_menu_opt[] = {
{ibm_storage_log_tail, "1", __("View most recent ipr error messages")},
{ibm_storage_log, "2", __("View ipr error messages")},
{kernel_log, "3", __("View all kernel error messages")},
{iprconfig_log, "4", __("View iprconfig error messages")},
{kernel_root, "5", __("Set root kernel message log directory")},
{set_default_editor, "6", __("Set default editor")},
{restore_log_defaults, "7", __("Restore defaults")},
{ibm_boot_log, "8", __("View ipr boot time messages")}
};
s_node n_log_menu = {
.rc_flags = (EXIT_FLAG | CANCEL_FLAG | REFRESH_FLAG),
.f_flags = (EXIT_FLAG | CANCEL_FLAG),
.num_opts = NUM_OPTS(log_menu_opt),
.options = &log_menu_opt[0],
.title = __("Kernel Messages Log"),
.header = {
__("ATTENTION: Devices listed below are currently known to be zeroed. "
"By exiting now, this information will be lost, resulting in potentially "
"longer array creation times.\n\n"),
__(" q=Cancel to return to iprconfig.\n"),
__(" e=Exit iprconfig\n")
}
};
s_node n_exit_menu = {
.rc_flags = (EXIT_FLAG | CANCEL_FLAG),
.f_flags = (EXIT_FLAG | CANCEL_FLAG),
.num_opts = NUM_OPTS(log_menu_opt),
.options = &null_opt[0],
.title = __("Confirm Exit")
};
struct screen_opts kernel_root_opt[] = {
{confirm_kernel_root, "\n"}
};
s_node n_kernel_root = {
.f_flags = (ENTER_FLAG),
.num_opts = NUM_OPTS(kernel_root_opt),
.options = &kernel_root_opt[0],
.title = __("Kernel Messages Log Root Directory"),
.header = {
__("Enter new directory and press Enter\n\n"),
"" }
};
struct screen_opts confirm_kernel_root_opt[] = {
{NULL, "c"},
};
s_node n_confirm_kernel_root = {
.f_flags = (CONFIRM_FLAG | CANCEL_FLAG),
.num_opts = NUM_OPTS(confirm_kernel_root_opt),
.options = &confirm_kernel_root_opt[0],
.title = __("Confirm Root Directory Change"),
.header = {
__("Press 'c' to confirm your new "
"kernel root directory choice.\n\n"),
__("To return to the log menu without "
"changing the root directory, choose 'q'.\n\n"),
"" }
};
struct screen_opts set_default_editor_opt[] = {
{confirm_set_default_editor, "\n"}
};
s_node n_set_default_editor = {
.f_flags = (ENTER_FLAG),
.num_opts = NUM_OPTS(set_default_editor_opt),
.options = &set_default_editor_opt[0],
.title = __("Kernel Messages Editor"),
.header = {
__("Enter new editor command and press Enter\n\n"),
"" }
};
struct screen_opts confirm_set_default_editor_opt[] = {
{NULL, "c"}
};
s_node n_confirm_set_default_editor = {
.f_flags = (CONFIRM_FLAG | CANCEL_FLAG),
.num_opts = NUM_OPTS(confirm_set_default_editor_opt),
.options = &confirm_set_default_editor_opt[0],
.title = __("Confirm Editor Change"),
.header = {
__("Press 'c' to confirm your editor choice\n\n"),
__("To return to the log menu without "
"changing the editor, choose 'q'.\n\n"),
"" }
};
struct screen_opts ucode_screen_opt[] = {
{download_ucode, "1", __("Download microcode")},
{download_all_ucode, "2", __("Download latest microcode to all devices")},
};
s_node n_ucode_screen = {
.rc_flags = (EXIT_FLAG | CANCEL_FLAG | REFRESH_FLAG),
.f_flags = (EXIT_FLAG | CANCEL_FLAG),
.num_opts = NUM_OPTS(ucode_screen_opt),
.options = &ucode_screen_opt[0],
.title = __("Work with microcode updates")
};
const char *screen_status[] = {
/* 0 */ "",
/* 1 */ "",
/* 2 */ __("Invalid option specified"),
/* 3 */ __("Screen paged up"),
/* 4 */ __("Already at top"),
/* 5 */ __("Screen paged down"),
/* 6 */ __("Already at bottom"),
/* 7 */ "",
/* 8 */ "",
/* 9 */ "",
/* 10 */ __("No devices to show details for"),
/* 11 */ "",
/* 12 */ "",
/* 13 */ "",
/* 14 */ "",
/* 15 */ __("The selection is not valid."),
/* 16 */ __("Error. More than one device was selected."),
/* 17 */ __("Invalid option. No devices selected."),
/* 18 */ __("Disk array successfully created."),
/* 19 */ __("Create disk array failed."),
/* 20 */ __("Delete disk array failed."),
/* 21 */ __("Disk array successfully deleted."),
/* 22 */ __("Create disk array failed - can not mix SSDs and HDDs."),
/* 23 */ "",
/* 24 */ "",
/* 25 */ __("Error: number of devices selected must be a multiple of %d"),
/* 26 */ __("Add device failed"),
/* 27 */ __("Add device completed successfully"),
/* 28 */ __("Rebuild started, view Disk Array Status Window for rebuild progress"),
/* 29 */ __("Rebuild failed"),
/* 30 */ __("Device concurrent maintenance failed"),
/* 31 */ __("Device concurrent maintenance failed, device in use"),
/* 32 */ __("Device concurrent maintenance completed successfully"),
/* 33 */ __("No units available for initialize and format"),
/* 34 */ __("Initialize and format completed successfully"),
/* 35 */ __("Initialize and format failed"),
/* 36 */ __("Reclaim IOA Cache Storage completed successfully"),
/* 37 */ __("Reclaim IOA Cache Storage failed"),
/* 38 */ __("No Reclaim IOA Cache Storage is necessary"),
/* 39 */ __("No Reclaim IOA Cache Storage performed"),
/* 40 */ __("Rebuild started, view Disk Array Status Window for rebuild progress"),
/* 41 */ __("Rebuild failed"),
/* 42 */ __("The selected battery packs have successfully been placed into an error state."),
/* 43 */ __("Failed to force the selected battery packs into an error state."),
/* 44 */ __("No configured resources contain a cache battery pack."),
/* 45 */ __("Change SCSI Bus configurations completed successfully"),
/* 46 */ __("Change SCSI Bus configurations failed"),
/* 47 */ __("Change device driver configurations completed successfully"),
/* 48 */ __("Change device driver configurations failed"),
/* 49 */ __("No units available for initialize and format"),
/* 50 */ __("Initialize and format completed successfully"),
/* 51 */ __("Initialize and format failed"),
/* 52 */ __("No devices available for the selected hot spare operation"),
/* 53 */ __("Hot spare successfully created"),
/* 54 */ __("Hot spare successfully deleted"),
/* 55 */ __("Failed to create hot spare"),
/* 56 */ __("Failed to delete hot spare"),
/* 57 */ __("Successfully changed device driver configuration"),
/* 58 */ __("Failed to change device driver configuration"),
/* 59 */ __("Invalid directory"),
/* 60 */ __("Root directory changed to %s"),
/* 61 */ __("Root directory unchanged"),
/* 62 */ __("Editor changed to %s"),
/* 63 */ __("Editor unchanged"),
/* 64 */ __("Default log values restored"),
/* 65 */ __("Editor returned %d. Try setting the default editor."),
/* 66 */ __("Failed to change disk configuration."),
/* 67 */ __("Microcode Download failed."),
/* 68 */ __("Failed to enable IOA cache."),
/* 69 */ __("Invalid number of devices selected."),
/* 70 */ __("Failed to start IOA cache."),
/* 71 */ __("IOA cache started successfully."),
/* 72 */ __("Selected battery packs successfully forced into an error state."),
/* 73 */ __("Force RAID Consistency check failed"),
/* 74 */ __("RAID Consistency check successful"),
/* 75 */ __("Failed to read error log. Try setting root kernel message log directory."),
/* 76 */ __("No SAS disks available"),
/* 77 */ __("Too many disks were selected. The maximum is %d."),
/* 78 */ __("Too few disks were selected. The minimum is %d."),
/* 79 */ __("Migrate Array Protection completed successfully."),
/* 80 */ __("Migrate Array Protection failed."),
/* 81 */ __("Selected disk enclosure was suspended successfully."),
/* 82 */ __("Failed to suspend disk enclosure"),
/* 83 */ __("Disk enclosure is already in suspend state"),
/* 84 */ __("Disk enclosure is already in active state"),
/* 85 */ __("Selected disk enclosure was resumed successfully."),
/* 86 */ __("Failed to resume disk enclosure"),
/* 87 */ __("Can not suspend an expander from the RAID controller with the same serial number"),
/* 88 */ __("Incorrect device type specified. Please specify a valid disk enclosure to suspend"),
/* 89 */ __("Incorrect device type specified. Please specify a valid disk enclosure to resume"),
/* 90 */ __("Selected disk enclosure is in Unknown state. Please check your hardware support"),
/* 91 */ __("Create disk array failed - can not mix 5XX and 4K disks."),
/* 92 */ __("Create disk array failed - can not build with read intensive disks only."),
/* 93 */ __("All devices up to date"),
/* 94 */ __("Temporary log file creation failed: %s"),
/* 95 */ __("Create disk array failed - can not mix SSDs and RI SSDs."),
/* NOTE: 127 maximum limit */
};
/* TODO - replace constants in iprconfig.c with the following enums/defines */
enum {
RC_0_Success = 0,
RC_1_Blank,
RC_2_Invalid_Option,
RC_3_Screen_Up,
RC_4_At_Top,
RC_5_Screen_Down,
RC_6_At_Bottom,
RC_7_Blank,
RC_8_Blank,
RC_9_Blank,
RC_10_No_Devices,
RC_11_Blank,
RC_12_Blank,
RC_13_Blank,
RC_14_Blank,
RC_15_Invalid_Selection,
RC_16_More_Than_One_Dev,
RC_17_Invalid_Option,
RC_18_Array_Created,
RC_19_Create_Fail,
RC_20_Delete_Fail,
RC_21_Delete_Success,
RC_22_Mixed_Block_Dev_Classes,
RC_23_Blank,
RC_24_Blank,
RC_25_Devices_Multiple,
RC_26_Include_Fail,
RC_27_Include_Success,
RC_28_Rebuild_Started,
RC_29_Rebuild_Fail,
RC_30_Maint_Fail,
RC_31_Maint_Fail_In_Use,
RC_32_Maint_Success,
RC_33_No_Units,
RC_34_Init_Format_Success,
RC_35_Init_Format_Fail,
RC_36_Reclaim_Cache_Success,
RC_37_Reclaim_Cache_Fail,
RC_38_No_Reclaim_Needed,
RC_39_No_Reclaim_Performed,
RC_40_Rebuild_Started,
RC_41_Rebuild_Failed,
RC_42_Battery_Err_State_Success,
RC_43_Battery_Err_State_Fail,
RC_44_No_Battery_Pack,
RC_45_Change_Bus_Conf_Success,
RC_46_Change_Bus_Conf_Fail,
RC_47_Change_Driver_Conf_Success,
RC_48_Change_Driver_Conf_Fail,
RC_49_No_Units_Available,
RC_50_Init_Format_Success,
RC_51_Init_Format_Fail,
RC_52_No_Devices_Available,
RC_53_Hot_Spare_Created,
RC_54_Hot_Spare_Deleted,
RC_55_Failed_Create,
RC_56_Failed_Delete,
RC_57_Change_Driver_Conf_Success,
RC_58_Change_Driver_Conf_Fail,
RC_59_Invalid_Dir,
RC_60_Root_Changed,
RC_61_Root_Unchanged,
RC_62_Editor_Changed,
RC_63_Editor_Unchanged,
RC_64_Log_Restored,
RC_65_Set_Default_Editor,
RC_66_Disk_Conf_Fail,
RC_67_uCode_Download_Fail,
RC_68_Cache_Enable_Fail,
RC_69_Invalid_Number_Devs,
RC_70_Cache_Start_Fail,
RC_71_Cache_Start_Success,
RC_72_Battery_Err_State,
RC_73_Force_Check_Fail,
RC_74_Check_Success,
RC_75_Failed_Read_Err_Log,
RC_76_No_SAS_Disks,
RC_77_Too_Many_Disks,
RC_78_Too_Few_Disks,
RC_79_Migrate_Prot_Success,
RC_80_Migrate_Prot_Fail,
RC_81_Suspended_Success,
RC_82_Suspended_Fail,
RC_83_Enclosure_Is_Suspend,
RC_84_Enclosure_Is_Active,
RC_85_Enclosure_Resume_Success,
RC_86_Enclosure_Resume_Fail,
RC_87_No_Suspend_Same_Seri_Num,
RC_88_Invalid_Dev_For_Suspend,
RC_89_Invalid_Dev_For_Resume,
RC_90_Enclosure_Is_Unknown,
RC_91_Mixed_Logical_Blk_Size,
RC_92_UNSUPT_REQ_BLK_DEV_CLASS,
RC_93_All_Up_To_Date,
RC_94_Tmp_Log_Fail,
RC_95_Mixed_RISSD_SSDs,
/* NOTE: 127 maximum limit */
};
#endif /* iprconfig_h */
iprutils-2.4.18.1/udev/ 0000775 0001750 0001751 00000000000 13474264454 011604 5 0000000 0000000 iprutils-2.4.18.1/udev/90-iprutils.rules 0000664 0001750 0001751 00000000106 13305527433 014666 0000000 0000000 DRIVERS=="ipr", TAG+="systemd", ENV{SYSTEMD_WANTS}+="iprutils.target"
iprutils-2.4.18.1/udev/Makefile.in 0000664 0001750 0001751 00000034620 13474264421 013570 0000000 0000000 # Makefile.in generated by automake 1.13.4 from Makefile.am.
# @configure_input@
# Copyright (C) 1994-2013 Free Software Foundation, Inc.
# This Makefile.in is free software; the Free Software Foundation
# gives unlimited permission to copy and/or distribute it,
# with or without modifications, as long as this notice is preserved.
# This program is distributed in the hope that it will be useful,
# but WITHOUT ANY WARRANTY, to the extent permitted by law; without
# even the implied warranty of MERCHANTABILITY or FITNESS FOR A
# PARTICULAR PURPOSE.
@SET_MAKE@
# IBM IPR adapter configuration utility
#
# (C) Copyright 2015
# International Business Machines Corporation and others.
# All Rights Reserved. This program and the accompanying
# materials are made available under the terms of the
# Common Public License v1.0 which accompanies this distribution.
#
#
VPATH = @srcdir@
am__is_gnu_make = test -n '$(MAKEFILE_LIST)' && test -n '$(MAKELEVEL)'
am__make_running_with_option = \
case $${target_option-} in \
?) ;; \
*) echo "am__make_running_with_option: internal error: invalid" \
"target option '$${target_option-}' specified" >&2; \
exit 1;; \
esac; \
has_opt=no; \
sane_makeflags=$$MAKEFLAGS; \
if $(am__is_gnu_make); then \
sane_makeflags=$$MFLAGS; \
else \
case $$MAKEFLAGS in \
*\\[\ \ ]*) \
bs=\\; \
sane_makeflags=`printf '%s\n' "$$MAKEFLAGS" \
| sed "s/$$bs$$bs[$$bs $$bs ]*//g"`;; \
esac; \
fi; \
skip_next=no; \
strip_trailopt () \
{ \
flg=`printf '%s\n' "$$flg" | sed "s/$$1.*$$//"`; \
}; \
for flg in $$sane_makeflags; do \
test $$skip_next = yes && { skip_next=no; continue; }; \
case $$flg in \
*=*|--*) continue;; \
-*I) strip_trailopt 'I'; skip_next=yes;; \
-*I?*) strip_trailopt 'I';; \
-*O) strip_trailopt 'O'; skip_next=yes;; \
-*O?*) strip_trailopt 'O';; \
-*l) strip_trailopt 'l'; skip_next=yes;; \
-*l?*) strip_trailopt 'l';; \
-[dEDm]) skip_next=yes;; \
-[JT]) skip_next=yes;; \
esac; \
case $$flg in \
*$$target_option*) has_opt=yes; break;; \
esac; \
done; \
test $$has_opt = yes
am__make_dryrun = (target_option=n; $(am__make_running_with_option))
am__make_keepgoing = (target_option=k; $(am__make_running_with_option))
pkgdatadir = $(datadir)/@PACKAGE@
pkgincludedir = $(includedir)/@PACKAGE@
pkglibdir = $(libdir)/@PACKAGE@
pkglibexecdir = $(libexecdir)/@PACKAGE@
am__cd = CDPATH="$${ZSH_VERSION+.}$(PATH_SEPARATOR)" && cd
install_sh_DATA = $(install_sh) -c -m 644
install_sh_PROGRAM = $(install_sh) -c
install_sh_SCRIPT = $(install_sh) -c
INSTALL_HEADER = $(INSTALL_DATA)
transform = $(program_transform_name)
NORMAL_INSTALL = :
PRE_INSTALL = :
POST_INSTALL = :
NORMAL_UNINSTALL = :
PRE_UNINSTALL = :
POST_UNINSTALL = :
build_triplet = @build@
host_triplet = @host@
subdir = udev
DIST_COMMON = $(srcdir)/Makefile.in $(srcdir)/Makefile.am \
$(dist_udevrules_DATA)
ACLOCAL_M4 = $(top_srcdir)/aclocal.m4
am__aclocal_m4_deps = $(top_srcdir)/build-aux/libtool.m4 \
$(top_srcdir)/build-aux/ltoptions.m4 \
$(top_srcdir)/build-aux/ltsugar.m4 \
$(top_srcdir)/build-aux/ltversion.m4 \
$(top_srcdir)/build-aux/lt~obsolete.m4 \
$(top_srcdir)/configure.ac
am__configure_deps = $(am__aclocal_m4_deps) $(CONFIGURE_DEPENDENCIES) \
$(ACLOCAL_M4)
mkinstalldirs = $(install_sh) -d
CONFIG_CLEAN_FILES =
CONFIG_CLEAN_VPATH_FILES =
AM_V_P = $(am__v_P_@AM_V@)
am__v_P_ = $(am__v_P_@AM_DEFAULT_V@)
am__v_P_0 = false
am__v_P_1 = :
AM_V_GEN = $(am__v_GEN_@AM_V@)
am__v_GEN_ = $(am__v_GEN_@AM_DEFAULT_V@)
am__v_GEN_0 = @echo " GEN " $@;
am__v_GEN_1 =
AM_V_at = $(am__v_at_@AM_V@)
am__v_at_ = $(am__v_at_@AM_DEFAULT_V@)
am__v_at_0 = @
am__v_at_1 =
SOURCES =
DIST_SOURCES =
am__can_run_installinfo = \
case $$AM_UPDATE_INFO_DIR in \
n|no|NO) false;; \
*) (install-info --version) >/dev/null 2>&1;; \
esac
am__vpath_adj_setup = srcdirstrip=`echo "$(srcdir)" | sed 's|.|.|g'`;
am__vpath_adj = case $$p in \
$(srcdir)/*) f=`echo "$$p" | sed "s|^$$srcdirstrip/||"`;; \
*) f=$$p;; \
esac;
am__strip_dir = f=`echo $$p | sed -e 's|^.*/||'`;
am__install_max = 40
am__nobase_strip_setup = \
srcdirstrip=`echo "$(srcdir)" | sed 's/[].[^$$\\*|]/\\\\&/g'`
am__nobase_strip = \
for p in $$list; do echo "$$p"; done | sed -e "s|$$srcdirstrip/||"
am__nobase_list = $(am__nobase_strip_setup); \
for p in $$list; do echo "$$p $$p"; done | \
sed "s| $$srcdirstrip/| |;"' / .*\//!s/ .*/ ./; s,\( .*\)/[^/]*$$,\1,' | \
$(AWK) 'BEGIN { files["."] = "" } { files[$$2] = files[$$2] " " $$1; \
if (++n[$$2] == $(am__install_max)) \
{ print $$2, files[$$2]; n[$$2] = 0; files[$$2] = "" } } \
END { for (dir in files) print dir, files[dir] }'
am__base_list = \
sed '$$!N;$$!N;$$!N;$$!N;$$!N;$$!N;$$!N;s/\n/ /g' | \
sed '$$!N;$$!N;$$!N;$$!N;s/\n/ /g'
am__uninstall_files_from_dir = { \
test -z "$$files" \
|| { test ! -d "$$dir" && test ! -f "$$dir" && test ! -r "$$dir"; } \
|| { echo " ( cd '$$dir' && rm -f" $$files ")"; \
$(am__cd) "$$dir" && rm -f $$files; }; \
}
am__installdirs = "$(DESTDIR)$(udevrulesdir)"
DATA = $(dist_udevrules_DATA)
am__tagged_files = $(HEADERS) $(SOURCES) $(TAGS_FILES) $(LISP)
DISTFILES = $(DIST_COMMON) $(DIST_SOURCES) $(TEXINFOS) $(EXTRA_DIST)
ACLOCAL = @ACLOCAL@
AMTAR = @AMTAR@
AM_DEFAULT_VERBOSITY = @AM_DEFAULT_VERBOSITY@
AR = @AR@
AUTOCONF = @AUTOCONF@
AUTOHEADER = @AUTOHEADER@
AUTOMAKE = @AUTOMAKE@
AWK = @AWK@
CC = @CC@
CCDEPMODE = @CCDEPMODE@
CFLAGS = @CFLAGS@
CPP = @CPP@
CPPFLAGS = @CPPFLAGS@
CYGPATH_W = @CYGPATH_W@
DEFS = @DEFS@
DEPDIR = @DEPDIR@
DLLTOOL = @DLLTOOL@
DSYMUTIL = @DSYMUTIL@
DUMPBIN = @DUMPBIN@
ECHO_C = @ECHO_C@
ECHO_N = @ECHO_N@
ECHO_T = @ECHO_T@
EGREP = @EGREP@
EXEEXT = @EXEEXT@
FGREP = @FGREP@
GREP = @GREP@
INSTALL = @INSTALL@
INSTALL_DATA = @INSTALL_DATA@
INSTALL_PROGRAM = @INSTALL_PROGRAM@
INSTALL_SCRIPT = @INSTALL_SCRIPT@
INSTALL_STRIP_PROGRAM = @INSTALL_STRIP_PROGRAM@
IPRCONFIG_LIBS = @IPRCONFIG_LIBS@
LD = @LD@
LDFLAGS = @LDFLAGS@
LIBOBJS = @LIBOBJS@
LIBS = @LIBS@
LIBTOOL = @LIBTOOL@
LIPO = @LIPO@
LN_S = @LN_S@
LTLIBOBJS = @LTLIBOBJS@
MAKEINFO = @MAKEINFO@
MANIFEST_TOOL = @MANIFEST_TOOL@
MKDIR_P = @MKDIR_P@
NM = @NM@
NMEDIT = @NMEDIT@
OBJDUMP = @OBJDUMP@
OBJEXT = @OBJEXT@
OTOOL = @OTOOL@
OTOOL64 = @OTOOL64@
PACKAGE = @PACKAGE@
PACKAGE_BUGREPORT = @PACKAGE_BUGREPORT@
PACKAGE_NAME = @PACKAGE_NAME@
PACKAGE_STRING = @PACKAGE_STRING@
PACKAGE_TARNAME = @PACKAGE_TARNAME@
PACKAGE_URL = @PACKAGE_URL@
PACKAGE_VERSION = @PACKAGE_VERSION@
PATH_SEPARATOR = @PATH_SEPARATOR@
PYTHON = @PYTHON@
PYTHON_EXEC_PREFIX = @PYTHON_EXEC_PREFIX@
PYTHON_PLATFORM = @PYTHON_PLATFORM@
PYTHON_PREFIX = @PYTHON_PREFIX@
PYTHON_VERSION = @PYTHON_VERSION@
RANLIB = @RANLIB@
SED = @SED@
SET_MAKE = @SET_MAKE@
SHELL = @SHELL@
STRIP = @STRIP@
VERSION = @VERSION@
abs_builddir = @abs_builddir@
abs_srcdir = @abs_srcdir@
abs_top_builddir = @abs_top_builddir@
abs_top_srcdir = @abs_top_srcdir@
ac_ct_AR = @ac_ct_AR@
ac_ct_CC = @ac_ct_CC@
ac_ct_DUMPBIN = @ac_ct_DUMPBIN@
am__include = @am__include@
am__leading_dot = @am__leading_dot@
am__quote = @am__quote@
am__tar = @am__tar@
am__untar = @am__untar@
bindir = @bindir@
build = @build@
build_alias = @build_alias@
build_cpu = @build_cpu@
build_os = @build_os@
build_vendor = @build_vendor@
builddir = @builddir@
datadir = @datadir@
datarootdir = @datarootdir@
docdir = @docdir@
dvidir = @dvidir@
exec_prefix = @exec_prefix@
host = @host@
host_alias = @host_alias@
host_cpu = @host_cpu@
host_os = @host_os@
host_vendor = @host_vendor@
htmldir = @htmldir@
includedir = @includedir@
infodir = @infodir@
initddir = @initddir@
install_sh = @install_sh@
libdir = @libdir@
libexecdir = @libexecdir@
localedir = @localedir@
localstatedir = @localstatedir@
mandir = @mandir@
mkdir_p = @mkdir_p@
oldincludedir = @oldincludedir@
pdfdir = @pdfdir@
pkgpyexecdir = @pkgpyexecdir@
pkgpythondir = @pkgpythondir@
prefix = @prefix@
program_transform_name = @program_transform_name@
psdir = @psdir@
pyexecdir = @pyexecdir@
pythondir = @pythondir@
sbindir = @sbindir@
sharedstatedir = @sharedstatedir@
srcdir = @srcdir@
sysconfdir = @sysconfdir@
systemdunitdir = @systemdunitdir@
target_alias = @target_alias@
top_build_prefix = @top_build_prefix@
top_builddir = @top_builddir@
top_srcdir = @top_srcdir@
udevrulesdir = @udevrulesdir@
dist_udevrules_DATA = 90-iprutils.rules
all: all-am
.SUFFIXES:
$(srcdir)/Makefile.in: $(srcdir)/Makefile.am $(am__configure_deps)
@for dep in $?; do \
case '$(am__configure_deps)' in \
*$$dep*) \
( cd $(top_builddir) && $(MAKE) $(AM_MAKEFLAGS) am--refresh ) \
&& { if test -f $@; then exit 0; else break; fi; }; \
exit 1;; \
esac; \
done; \
echo ' cd $(top_srcdir) && $(AUTOMAKE) --foreign udev/Makefile'; \
$(am__cd) $(top_srcdir) && \
$(AUTOMAKE) --foreign udev/Makefile
.PRECIOUS: Makefile
Makefile: $(srcdir)/Makefile.in $(top_builddir)/config.status
@case '$?' in \
*config.status*) \
cd $(top_builddir) && $(MAKE) $(AM_MAKEFLAGS) am--refresh;; \
*) \
echo ' cd $(top_builddir) && $(SHELL) ./config.status $(subdir)/$@ $(am__depfiles_maybe)'; \
cd $(top_builddir) && $(SHELL) ./config.status $(subdir)/$@ $(am__depfiles_maybe);; \
esac;
$(top_builddir)/config.status: $(top_srcdir)/configure $(CONFIG_STATUS_DEPENDENCIES)
cd $(top_builddir) && $(MAKE) $(AM_MAKEFLAGS) am--refresh
$(top_srcdir)/configure: $(am__configure_deps)
cd $(top_builddir) && $(MAKE) $(AM_MAKEFLAGS) am--refresh
$(ACLOCAL_M4): $(am__aclocal_m4_deps)
cd $(top_builddir) && $(MAKE) $(AM_MAKEFLAGS) am--refresh
$(am__aclocal_m4_deps):
mostlyclean-libtool:
-rm -f *.lo
clean-libtool:
-rm -rf .libs _libs
install-dist_udevrulesDATA: $(dist_udevrules_DATA)
@$(NORMAL_INSTALL)
@list='$(dist_udevrules_DATA)'; test -n "$(udevrulesdir)" || list=; \
if test -n "$$list"; then \
echo " $(MKDIR_P) '$(DESTDIR)$(udevrulesdir)'"; \
$(MKDIR_P) "$(DESTDIR)$(udevrulesdir)" || exit 1; \
fi; \
for p in $$list; do \
if test -f "$$p"; then d=; else d="$(srcdir)/"; fi; \
echo "$$d$$p"; \
done | $(am__base_list) | \
while read files; do \
echo " $(INSTALL_DATA) $$files '$(DESTDIR)$(udevrulesdir)'"; \
$(INSTALL_DATA) $$files "$(DESTDIR)$(udevrulesdir)" || exit $$?; \
done
uninstall-dist_udevrulesDATA:
@$(NORMAL_UNINSTALL)
@list='$(dist_udevrules_DATA)'; test -n "$(udevrulesdir)" || list=; \
files=`for p in $$list; do echo $$p; done | sed -e 's|^.*/||'`; \
dir='$(DESTDIR)$(udevrulesdir)'; $(am__uninstall_files_from_dir)
tags TAGS:
ctags CTAGS:
cscope cscopelist:
distdir: $(DISTFILES)
@srcdirstrip=`echo "$(srcdir)" | sed 's/[].[^$$\\*]/\\\\&/g'`; \
topsrcdirstrip=`echo "$(top_srcdir)" | sed 's/[].[^$$\\*]/\\\\&/g'`; \
list='$(DISTFILES)'; \
dist_files=`for file in $$list; do echo $$file; done | \
sed -e "s|^$$srcdirstrip/||;t" \
-e "s|^$$topsrcdirstrip/|$(top_builddir)/|;t"`; \
case $$dist_files in \
*/*) $(MKDIR_P) `echo "$$dist_files" | \
sed '/\//!d;s|^|$(distdir)/|;s,/[^/]*$$,,' | \
sort -u` ;; \
esac; \
for file in $$dist_files; do \
if test -f $$file || test -d $$file; then d=.; else d=$(srcdir); fi; \
if test -d $$d/$$file; then \
dir=`echo "/$$file" | sed -e 's,/[^/]*$$,,'`; \
if test -d "$(distdir)/$$file"; then \
find "$(distdir)/$$file" -type d ! -perm -700 -exec chmod u+rwx {} \;; \
fi; \
if test -d $(srcdir)/$$file && test $$d != $(srcdir); then \
cp -fpR $(srcdir)/$$file "$(distdir)$$dir" || exit 1; \
find "$(distdir)/$$file" -type d ! -perm -700 -exec chmod u+rwx {} \;; \
fi; \
cp -fpR $$d/$$file "$(distdir)$$dir" || exit 1; \
else \
test -f "$(distdir)/$$file" \
|| cp -p $$d/$$file "$(distdir)/$$file" \
|| exit 1; \
fi; \
done
check-am: all-am
check: check-am
all-am: Makefile $(DATA)
installdirs:
for dir in "$(DESTDIR)$(udevrulesdir)"; do \
test -z "$$dir" || $(MKDIR_P) "$$dir"; \
done
install: install-am
install-exec: install-exec-am
install-data: install-data-am
uninstall: uninstall-am
install-am: all-am
@$(MAKE) $(AM_MAKEFLAGS) install-exec-am install-data-am
installcheck: installcheck-am
install-strip:
if test -z '$(STRIP)'; then \
$(MAKE) $(AM_MAKEFLAGS) INSTALL_PROGRAM="$(INSTALL_STRIP_PROGRAM)" \
install_sh_PROGRAM="$(INSTALL_STRIP_PROGRAM)" INSTALL_STRIP_FLAG=-s \
install; \
else \
$(MAKE) $(AM_MAKEFLAGS) INSTALL_PROGRAM="$(INSTALL_STRIP_PROGRAM)" \
install_sh_PROGRAM="$(INSTALL_STRIP_PROGRAM)" INSTALL_STRIP_FLAG=-s \
"INSTALL_PROGRAM_ENV=STRIPPROG='$(STRIP)'" install; \
fi
mostlyclean-generic:
clean-generic:
distclean-generic:
-test -z "$(CONFIG_CLEAN_FILES)" || rm -f $(CONFIG_CLEAN_FILES)
-test . = "$(srcdir)" || test -z "$(CONFIG_CLEAN_VPATH_FILES)" || rm -f $(CONFIG_CLEAN_VPATH_FILES)
maintainer-clean-generic:
@echo "This command is intended for maintainers to use"
@echo "it deletes files that may require special tools to rebuild."
clean: clean-am
clean-am: clean-generic clean-libtool mostlyclean-am
distclean: distclean-am
-rm -f Makefile
distclean-am: clean-am distclean-generic
dvi: dvi-am
dvi-am:
html: html-am
html-am:
info: info-am
info-am:
install-data-am: install-dist_udevrulesDATA
install-dvi: install-dvi-am
install-dvi-am:
install-exec-am:
install-html: install-html-am
install-html-am:
install-info: install-info-am
install-info-am:
install-man:
install-pdf: install-pdf-am
install-pdf-am:
install-ps: install-ps-am
install-ps-am:
installcheck-am:
maintainer-clean: maintainer-clean-am
-rm -f Makefile
maintainer-clean-am: distclean-am maintainer-clean-generic
mostlyclean: mostlyclean-am
mostlyclean-am: mostlyclean-generic mostlyclean-libtool
pdf: pdf-am
pdf-am:
ps: ps-am
ps-am:
uninstall-am: uninstall-dist_udevrulesDATA
.MAKE: install-am install-strip
.PHONY: all all-am check check-am clean clean-generic clean-libtool \
cscopelist-am ctags-am distclean distclean-generic \
distclean-libtool distdir dvi dvi-am html html-am info info-am \
install install-am install-data install-data-am \
install-dist_udevrulesDATA install-dvi install-dvi-am \
install-exec install-exec-am install-html install-html-am \
install-info install-info-am install-man install-pdf \
install-pdf-am install-ps install-ps-am install-strip \
installcheck installcheck-am installdirs maintainer-clean \
maintainer-clean-generic mostlyclean mostlyclean-generic \
mostlyclean-libtool pdf pdf-am ps ps-am tags-am uninstall \
uninstall-am uninstall-dist_udevrulesDATA
# Tell versions [3.59,3.63) of GNU make to not export all variables.
# Otherwise a system limit (for SysV at least) may be exceeded.
.NOEXPORT:
iprutils-2.4.18.1/udev/Makefile.am 0000664 0001750 0001751 00000000565 13305527433 013556 0000000 0000000 # IBM IPR adapter configuration utility
#
# (C) Copyright 2015
# International Business Machines Corporation and others.
# All Rights Reserved. This program and the accompanying
# materials are made available under the terms of the
# Common Public License v1.0 which accompanies this distribution.
#
#
udevrulesdir = @udevrulesdir@
dist_udevrules_DATA = 90-iprutils.rules
iprutils-2.4.18.1/py-compile 0000755 0001750 0001751 00000011076 12257332274 012562 0000000 0000000 #!/bin/sh
# py-compile - Compile a Python program
scriptversion=2011-06-08.12; # UTC
# Copyright (C) 2000-2013 Free Software Foundation, Inc.
# This program is free software; you can redistribute it and/or modify
# it under the terms of the GNU General Public License as published by
# the Free Software Foundation; either version 2, or (at your option)
# any later version.
# This program is distributed in the hope that it will be useful,
# but WITHOUT ANY WARRANTY; without even the implied warranty of
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
# GNU General Public License for more details.
# You should have received a copy of the GNU General Public License
# along with this program. If not, see .
# As a special exception to the GNU General Public License, if you
# distribute this file as part of a program that contains a
# configuration script generated by Autoconf, you may include it under
# the same distribution terms that you use for the rest of that program.
# This file is maintained in Automake, please report
# bugs to or send patches to
# .
if [ -z "$PYTHON" ]; then
PYTHON=python
fi
me=py-compile
usage_error ()
{
echo "$me: $*" >&2
echo "Try '$me --help' for more information." >&2
exit 1
}
basedir=
destdir=
while test $# -ne 0; do
case "$1" in
--basedir)
if test $# -lt 2; then
usage_error "option '--basedir' requires an argument"
else
basedir=$2
fi
shift
;;
--destdir)
if test $# -lt 2; then
usage_error "option '--destdir' requires an argument"
else
destdir=$2
fi
shift
;;
-h|--help)
cat <<\EOF
Usage: py-compile [--help] [--version] [--basedir DIR] [--destdir DIR] FILES..."
Byte compile some python scripts FILES. Use --destdir to specify any
leading directory path to the FILES that you don't want to include in the
byte compiled file. Specify --basedir for any additional path information you
do want to be shown in the byte compiled file.
Example:
py-compile --destdir /tmp/pkg-root --basedir /usr/share/test test.py test2.py
Report bugs to .
EOF
exit $?
;;
-v|--version)
echo "$me $scriptversion"
exit $?
;;
--)
shift
break
;;
-*)
usage_error "unrecognized option '$1'"
;;
*)
break
;;
esac
shift
done
files=$*
if test -z "$files"; then
usage_error "no files given"
fi
# if basedir was given, then it should be prepended to filenames before
# byte compilation.
if [ -z "$basedir" ]; then
pathtrans="path = file"
else
pathtrans="path = os.path.join('$basedir', file)"
fi
# if destdir was given, then it needs to be prepended to the filename to
# byte compile but not go into the compiled file.
if [ -z "$destdir" ]; then
filetrans="filepath = path"
else
filetrans="filepath = os.path.normpath('$destdir' + os.sep + path)"
fi
$PYTHON -c "
import sys, os, py_compile, imp
files = '''$files'''
sys.stdout.write('Byte-compiling python modules...\n')
for file in files.split():
$pathtrans
$filetrans
if not os.path.exists(filepath) or not (len(filepath) >= 3
and filepath[-3:] == '.py'):
continue
sys.stdout.write(file)
sys.stdout.flush()
if hasattr(imp, 'get_tag'):
py_compile.compile(filepath, imp.cache_from_source(filepath), path)
else:
py_compile.compile(filepath, filepath + 'c', path)
sys.stdout.write('\n')" || exit $?
# this will fail for python < 1.5, but that doesn't matter ...
$PYTHON -O -c "
import sys, os, py_compile, imp
# pypy does not use .pyo optimization
if hasattr(sys, 'pypy_translation_info'):
sys.exit(0)
files = '''$files'''
sys.stdout.write('Byte-compiling python modules (optimized versions) ...\n')
for file in files.split():
$pathtrans
$filetrans
if not os.path.exists(filepath) or not (len(filepath) >= 3
and filepath[-3:] == '.py'):
continue
sys.stdout.write(file)
sys.stdout.flush()
if hasattr(imp, 'get_tag'):
py_compile.compile(filepath, imp.cache_from_source(filepath, False), path)
else:
py_compile.compile(filepath, filepath + 'o', path)
sys.stdout.write('\n')" 2>/dev/null || :
# Local Variables:
# mode: shell-script
# sh-indentation: 2
# eval: (add-hook 'write-file-hooks 'time-stamp)
# time-stamp-start: "scriptversion="
# time-stamp-format: "%:y-%02m-%02d.%02H"
# time-stamp-time-zone: "UTC"
# time-stamp-end: "; # UTC"
# End:
iprutils-2.4.18.1/iprinit.8 0000664 0001750 0001751 00000003112 13270167731 012317 0000000 0000000 .\" (C) Copyright 2000, 2005
.\" International Business Machines Corporation and others.
.\" All Rights Reserved. This program and the accompanying
.\" materials are made available under the terms of the
.\" Common Public License v1.0 which accompanies this distribution.
.TH IPRINIT 8 "February 2005"
.SH NAME
iprinit - IBM Power RAID adapter/device initialization utility
.SH SYNOPSIS
.B iprinit
.sp
.BI "iprinit --debug --daemon --use-polling --use-uevents"
.SH DESCRIPTION
.B iprinit
is used to setup IBM Power RAID adapters and devices for optimal
performance. It will enable U320 scsi speeds if it is determined the
disk enclosure supports it. It will also enable tagged command queuing.
Any scsi bus attributes, such as bus width, or disk attributes, such
as queue depth, that have been setup by iprconfig will be loaded as well.
It is desired that this be called in the boot process, using the init.d
script provided.
.SH OPTIONS
.TP
.B \-\-version
Print the version number of
.B iprinit
.TP
.B \-\-debug
Enable additional error logging. Enabling this will result in additional
errors logging to /var/log/messages.
.TP
.B \-\-daemon
Run as a daemon to handle adapters and devices being hotplugged.
.TP
.B \-\-use-polling
Do not use netlink/uevent notification, but rather poll for adapter and
device configuration changes.
.TP
.B \-\-use-uevents
Use netlink/uevent notification rather than polling for adapter and
device configuration changes. If not specified, polling will be used
until the first uevent notification appears, then netlink will be used.
.SH AUTHOR
Brian King (brking@us.ibm.com)
iprutils-2.4.18.1/iprsos 0000775 0001750 0001751 00000004274 13270167731 012027 0000000 0000000 #!/bin/bash
# This script displays information about iprutils, IPR adapters and systemd services
# related to IPR. It will also create an sos report with iprutils information at $file
# when iprsos is invoked with "-o /path/to/file".
function _ipr_dump() {
echo "=== Running 'iprconfig -c dump' ==="
iprconfig -c dump
}
function _lspci() {
echo
echo "=== Running 'lspci' ==="
lspci
}
function _lsscsi() {
echo
echo "=== Running 'lsscsi' ==="
lsscsi
}
function _lsscsi_H() {
echo
echo "=== Running 'lsscsi -H' ==="
lsscsi -H
}
function _check_daemons() {
if which systemctl >/dev/null 2>&1; then
echo
echo === IPR daemons: Running 'systemctl status ipr{init,dump,update}.service' ===
systemctl status iprdump.service
systemctl status iprinit.service
systemctl status iprupdate.service
else
echo
echo === IPR daemons: Running 'service ipr* status' ===
service iprinit status
service iprdump status
service iprupdate status
fi
}
function _etc_ipr() {
echo
echo "=== Contents of '/etc/ipr/ ' ==="
if [ -d /etc/ipr ]; then
ls /etc/ipr/
else
echo "No files at /etc/ipr/"
fi
}
function _var_log_iprdump () {
echo
echo "=== Contents of '/var/log/iprdump*' ==="
if [ -f /var/log/iprdump.? ]; then
ls -lh /var/log/iprdump*
else
echo "No iprdump files found at /var/log."
fi
}
function _var_log_messages() {
echo
echo "=== Contents of '/var/log/messages' ==="
cat /var/log/messages
if [ -f /var/log/dmesg ]; then
echo "=== Contents of '/var/log/dmesg' ==="
cat /var/log/dmesg
fi
if [ -f /var/log/boot.msg ]; then
echo "=== Contents of '/var/log/boot.msg' ==="
cat /var/log/boot.msg
fi
if [ -f /var/log/kern.log ]; then
echo "=== Contents of '/var/log/kern.log' ==="
cat /var/log/kern.log
fi
if [ -f /var/log/syslog ]; then
echo "=== Contents of '/var/log/syslog' ==="
cat /var/log/syslog
fi
}
function _run_sos() {
_ipr_dump
_lspci
_lsscsi
_lsscsi_H
_check_daemons
_etc_ipr
_var_log_iprdump
_var_log_messages
}
args=($@)
if [ -z ${args[0]} ]; then
file=
elif [ ${args[0]} = "-o" ]; then
file=${args[1]}
if [ -z $file ]; then
echo "Usage: ./iprsos -o path/to/file"
exit 1
fi
fi
if [ -z $file ]; then
_run_sos
else
_run_sos > $file
fi
iprutils-2.4.18.1/LICENSE 0000664 0001750 0001751 00000026616 13270167731 011573 0000000 0000000 Common Public License Version 1.0
THE ACCOMPANYING PROGRAM IS PROVIDED UNDER THE TERMS OF THIS COMMON PUBLIC
LICENSE ("AGREEMENT"). ANY USE, REPRODUCTION OR DISTRIBUTION OF THE PROGRAM
CONSTITUTES RECIPIENT'S ACCEPTANCE OF THIS AGREEMENT.
1. DEFINITIONS
"Contribution" means:
a) in the case of the initial Contributor, the initial code and documentation
distributed under this Agreement, and
b) in the case of each subsequent Contributor:
i) changes to the Program, and
ii) additions to the Program;
where such changes and/or additions to the Program originate from and are
distributed by that particular Contributor. A Contribution 'originates' from
a Contributor if it was added to the Program by such Contributor itself or
anyone acting on such Contributor's behalf. Contributions do not include
additions to the Program which: (i) are separate modules of software
distributed in conjunction with the Program under their own license agreement,
and (ii) are not derivative works of the Program.
"Contributor" means any person or entity that distributes the Program.
"Licensed Patents " mean patent claims licensable by a Contributor which are
necessarily infringed by the use or sale of its Contribution alone or when
combined with the Program.
"Program" means the Contributions distributed in accordance with this Agreement.
"Recipient" means anyone who receives the Program under this Agreement,
including all Contributors.
2. GRANT OF RIGHTS
a) Subject to the terms of this Agreement, each Contributor hereby grants
Recipient a non-exclusive, worldwide, royalty-free copyright license to
reproduce, prepare derivative works of, publicly display, publicly perform,
distribute and sublicense the Contribution of such Contributor, if any,
and such derivative works, in source code and object code form.
b) Subject to the terms of this Agreement, each Contributor hereby grants
Recipient a non-exclusive, worldwide, royalty-free patent license under
Licensed Patents to make, use, sell, offer to sell, import and otherwise
transfer the Contribution of such Contributor, if any, in source code and
object code form. This patent license shall apply to the combination of the
Contribution and the Program if, at the time the Contribution is added by
the Contributor, such addition of the Contribution causes such combination
to be covered by the Licensed Patents. The patent license shall not apply
to any other combinations which include the Contribution. No hardware per
se is licensed hereunder.
c) Recipient understands that although each Contributor grants the licenses to
its Contributions set forth herein, no assurances are provided by any
Contributor that the Program does not infringe the patent or other
intellectual property rights of any other entity. Each Contributor disclaims
any liability to Recipient for claims brought by any other entity based on
infringement of intellectual property rights or otherwise. As a condition to
exercising the rights and licenses granted hereunder, each Recipient hereby
assumes sole responsibility to secure any other intellectual property rights
needed, if any. For example, if a third party patent license is required to
allow Recipient to distribute the Program, it is Recipient's responsibility to
acquire that license before distributing the Program.
d) Each Contributor represents that to its knowledge it has sufficient copyright
rights in its Contribution, if any, to grant the copyright license set forth
in this Agreement.
3. REQUIREMENTS
A Contributor may choose to distribute the Program in object code form under
its own license agreement, provided that:
a) it complies with the terms and conditions of this Agreement; and
b) its license agreement:
i) effectively disclaims on behalf of all Contributors all warranties and
conditions, express and implied, including warranties or conditions of
title and non-infringement, and implied warranties or conditions of
merchantability and fitness for a particular purpose;
ii) effectively excludes on behalf of all Contributors all liability for
damages, including direct, indirect, special, incidental and consequential
damages such as lost profits;
iii) states that any provisions which differ from this Agreement are offered
by that Contributor alone and not by any other party; and
iv) states that source code for the Program is available from such Contributor,
and informs licensees how to obtain it in a reasonable manner on or
through a medium customarily used for software exchange.
When the Program is made available in source code form:
a) it must be made available under this Agreement; and
b) a copy of this Agreement must be included with each copy of the Program.
Contributors may not remove or alter any copyright notices contained within
the Program.
Each Contributor must identify itself as the originator of its Contribution,
if any, in a manner that reasonably allows subsequent Recipients to identify
the originator of the Contribution.
4. COMMERCIAL DISTRIBUTION
Commercial distributors of software may accept certain responsibilities with
respect to end users, business partners and the like. While this license is
intended to facilitate the commercial use of the Program, the Contributor who
includes the Program in a commercial product offering should do so in a manner
which does not create potential liability for other Contributors. Therefore,
if a Contributor includes the Program in a commercial product offering, such
Contributor ("Commercial Contributor") hereby agrees to defend and indemnify
every other Contributor ("Indemnified Contributor") against any losses,
damages and costs (collectively "Losses") arising from claims, lawsuits and
other legal actions brought by a third party against the Indemnified
Contributor to the extent caused by the acts or omissions of such Commercial
Contributor in connection with its distribution of the Program in a commercial
product offering. The obligations in this section do not apply to any claims
or Losses relating to any actual or alleged intellectual property
infringement. In order to qualify, an Indemnified Contributor must:
a) promptly notify the Commercial Contributor in writing of such claim, and
b) allow the Commercial Contributor to control, and cooperate with the
Commercial Contributor in, the defense and any related settlement
negotiations. The Indemnified Contributor may participate in any such claim
at its own expense.
For example, a Contributor might include the Program in a commercial product
offering, Product X. That Contributor is then a Commercial Contributor.
If that Commercial Contributor then makes performance claims, or offers
warranties related to Product X, those performance claims and warranties
are such Commercial Contributor's responsibility alone. Under this section,
the Commercial Contributor would have to defend claims against the other
Contributors related to those performance claims and warranties, and if a
court requires any other Contributor to pay any damages as a result, the
Commercial Contributor must pay those damages.
5. NO WARRANTY
EXCEPT AS EXPRESSLY SET FORTH IN THIS AGREEMENT, THE PROGRAM IS PROVIDED ON
AN "AS IS" BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, EITHER EXPRESS
OR IMPLIED INCLUDING, WITHOUT LIMITATION, ANY WARRANTIES OR CONDITIONS OF
TITLE, NON-INFRINGEMENT, MERCHANTABILITY OR FITNESS FOR A PARTICULAR PURPOSE.
Each Recipient is solely responsible for determining the appropriateness of
using and distributing the Program and assumes all risks associated with its
exercise of rights under this Agreement, including but not limited to the
risks and costs of program errors, compliance with applicable laws, damage to
or loss of data, programs or equipment, and unavailability or interruption of
operations.
6. DISCLAIMER OF LIABILITY
EXCEPT AS EXPRESSLY SET FORTH IN THIS AGREEMENT, NEITHER RECIPIENT NOR ANY
CONTRIBUTORS SHALL HAVE ANY LIABILITY FOR ANY DIRECT, INDIRECT, INCIDENTAL,
SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING WITHOUT LIMITATION
LOST PROFITS), HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
ARISING IN ANY WAY OUT OF THE USE OR DISTRIBUTION OF THE PROGRAM OR THE
EXERCISE OF ANY RIGHTS GRANTED HEREUNDER, EVEN IF ADVISED OF THE POSSIBILITY
OF SUCH DAMAGES.
7. GENERAL
If any provision of this Agreement is invalid or unenforceable under
applicable law, it shall not affect the validity or enforceability of the
remainder of the terms of this Agreement, and without further action by the
parties hereto, such provision shall be reformed to the minimum extent
necessary to make such provision valid and enforceable.
If Recipient institutes patent litigation against a Contributor with respect
to a patent applicable to software (including a cross-claim or counterclaim
in a lawsuit), then any patent licenses granted by that Contributor to such
Recipient under this Agreement shall terminate as of the date such litigation
is filed. In addition, if Recipient institutes patent litigation against any
entity (including a cross-claim or counterclaim in a lawsuit) alleging that
the Program itself (excluding combinations of the Program with other software
or hardware) infringes such Recipient's patent(s), then such Recipient's
rights granted under Section 2(b) shall terminate as of the date such
litigation is filed.
All Recipient's rights under this Agreement shall terminate if it fails to
comply with any of the material terms or conditions of this Agreement and
does not cure such failure in a reasonable period of time after becoming aware
of such noncompliance. If all Recipient's rights under this Agreement
terminate, Recipient agrees to cease use and distribution of the Program as
soon as reasonably practicable. However, Recipient's obligations under this
Agreement and any licenses granted by Recipient relating to the Program shall
continue and survive.
Everyone is permitted to copy and distribute copies of this Agreement, but in
order to avoid inconsistency the Agreement is copyrighted and may only be
modified in the following manner. The Agreement Steward reserves the right to
publish new versions (including revisions) of this Agreement from time to
time. No one other than the Agreement Steward has the right to modify this
Agreement. IBM is the initial Agreement Steward. IBM may assign the
responsibility to serve as the Agreement Steward to a suitable separate
entity. Each new version of the Agreement will be given a distinguishing
version number. The Program (including Contributions) may always be
distributed subject to the version of the Agreement under which it was
received. In addition, after a new version of the Agreement is published,
Contributor may elect to distribute the Program (including its Contributions)
under the new version. Except as expressly stated in Sections 2(a) and 2(b)
above, Recipient receives no rights or licenses to the intellectual property
of any Contributor under this Agreement, whether expressly, by implication,
estoppel or otherwise. All rights in the Program not expressly granted under
this Agreement are reserved.
This Agreement is governed by the laws of the State of New York and the
intellectual property laws of the United States of America. No party to
this Agreement will bring a legal action under this Agreement more than
one year after the cause of action arose. Each party waives its rights
to a jury trial in any resulting litigation.
iprutils-2.4.18.1/init.d/ 0000775 0001750 0001751 00000000000 13474264453 012025 5 0000000 0000000 iprutils-2.4.18.1/init.d/iprdump.in 0000664 0001750 0001751 00000003530 13270167731 013751 0000000 0000000 #!/bin/sh
# Copyright (C) 2004 International Business Machines Corporation and others.
# All Rights Reserved. This program and the accompanying
# materials are made available under the terms of the
# Common Public License v1.0 which accompanies this distribution.
#
# Author: Brian King
#
# iprdump
#
# System startup script for the ipr dump facility
#
### BEGIN INIT INFO
# Provides: iprdump
# Required-Start: $local_fs iprinit
# Should-Start: $remote_fs $syslog
# Required-Stop: $local_fs $syslog iprinit
# Default-Start: 2 3 4 5
# Default-Stop: 0 1 6
# Short-Description: Start the ipr dump daemon
# Description: Start the ipr dump daemon
### END INIT INFO
IPRDUMP=@sbindir@/iprdump
test -x $IPRDUMP || exit 5
. /lib/lsb/init-functions
start() {
echo -n "Starting ipr dump daemon"
if [ ! -d /sys/class/scsi_generic ] ; then
modprobe sg
fi
start_daemon $IPRDUMP --daemon
RETVAL=$?
if [ $RETVAL -eq 0 ]; then
log_success_msg " "
else
log_failure_msg " "
fi
return $RETVAL
}
stop() {
echo -n "Shutting down ipr dump daemon"
killproc $IPRDUMP
RETVAL=$?
if [ $RETVAL -eq 0 ]; then
log_success_msg " "
else
log_failure_msg " "
fi
return $RETVAL
}
restart() {
$0 stop
$0 start
return $RETVAL
}
reload() {
echo -n "Reload ipr dump daemon"
$0 stop && $0 start
return $RETVAL
}
status() {
echo -n "Checking for iprdump daemon: "
pidofproc $IPRDUMP > /dev/null 2>&1
RETVAL=$?
if [ $RETVAL -eq 0 ]; then
log_success_msg "running"
else
log_failure_msg "unused"
fi
return $RETVAL
}
case "$1" in
start)
start
;;
stop)
stop
;;
restart)
restart
;;
reload|force-reload)
reload
;;
status)
status
;;
*)
echo "Usage: $0 {start|stop|status|restart|reload}"
exit 1
;;
esac
iprutils-2.4.18.1/init.d/iprupdate.in 0000664 0001750 0001751 00000003621 13270167731 014267 0000000 0000000 #!/bin/sh
# Copyright (C) 2004 International Business Machines Corporation and others.
# All Rights Reserved. This program and the accompanying
# materials are made available under the terms of the
# Common Public License v1.0 which accompanies this distribution.
#
# Author: Brian King
#
# iprupdate
#
# System startup script for the ipr microcode update facility
#
### BEGIN INIT INFO
# Provides: iprupdate
# Required-Start: $local_fs
# Should-Start: $remote_fs $syslog
# Required-Stop: $local_fs $syslog
# Default-Start: 2 3 4 5
# Default-Stop: 0 1 6
# Short-Description: Start the iprupdate utility
# Description: Start the iprupdate utility
### END INIT INFO
IPRUPDATE=@sbindir@/iprupdate
test -x $IPRUPDATE || exit 5
. /lib/lsb/init-functions
start() {
echo "Checking ipr microcode levels"
if [ ! -d /sys/class/scsi_generic ] ; then
modprobe sg
fi
start_daemon $IPRUPDATE --daemon
RETVAL=$?
if [ $RETVAL -eq 0 ]; then
echo -n "Completed ipr microcode updates"
log_success_msg " "
else
echo -n "Completed ipr microcode updates"
log_failure_msg " "
fi
return $RETVAL
}
stop() {
echo -n "Shutting down ipr update daemon"
killproc $IPRUPDATE
RETVAL=$?
if [ $RETVAL -eq 0 ]; then
log_success_msg " "
else
log_failure_msg " "
fi
return $RETVAL
}
restart() {
$0 stop
$0 start
return $RETVAL
}
reload() {
$0 stop
$0 start
return $RETVAL
}
status() {
echo -n "Checking for ipr update daemon: "
pidofproc $IPRUPDATE > /dev/null 2>&1
RETVAL=$?
if [ $RETVAL -eq 0 ]; then
log_success_msg "running"
else
log_failure_msg "unused"
fi
return $RETVAL
}
case "$1" in
start)
start
;;
stop)
stop
;;
restart)
restart
;;
reload|force-reload)
reload
;;
status)
status
;;
*)
echo "Usage: $0 {start|stop|status|restart|reload}"
exit 1
;;
esac
iprutils-2.4.18.1/init.d/Makefile.in 0000664 0001750 0001751 00000040415 13474264421 014011 0000000 0000000 # Makefile.in generated by automake 1.13.4 from Makefile.am.
# @configure_input@
# Copyright (C) 1994-2013 Free Software Foundation, Inc.
# This Makefile.in is free software; the Free Software Foundation
# gives unlimited permission to copy and/or distribute it,
# with or without modifications, as long as this notice is preserved.
# This program is distributed in the hope that it will be useful,
# but WITHOUT ANY WARRANTY, to the extent permitted by law; without
# even the implied warranty of MERCHANTABILITY or FITNESS FOR A
# PARTICULAR PURPOSE.
@SET_MAKE@
# IBM IPR adapter configuration utility
#
# (C) Copyright 2015
# International Business Machines Corporation and others.
# All Rights Reserved. This program and the accompanying
# materials are made available under the terms of the
# Common Public License v1.0 which accompanies this distribution.
#
VPATH = @srcdir@
am__is_gnu_make = test -n '$(MAKEFILE_LIST)' && test -n '$(MAKELEVEL)'
am__make_running_with_option = \
case $${target_option-} in \
?) ;; \
*) echo "am__make_running_with_option: internal error: invalid" \
"target option '$${target_option-}' specified" >&2; \
exit 1;; \
esac; \
has_opt=no; \
sane_makeflags=$$MAKEFLAGS; \
if $(am__is_gnu_make); then \
sane_makeflags=$$MFLAGS; \
else \
case $$MAKEFLAGS in \
*\\[\ \ ]*) \
bs=\\; \
sane_makeflags=`printf '%s\n' "$$MAKEFLAGS" \
| sed "s/$$bs$$bs[$$bs $$bs ]*//g"`;; \
esac; \
fi; \
skip_next=no; \
strip_trailopt () \
{ \
flg=`printf '%s\n' "$$flg" | sed "s/$$1.*$$//"`; \
}; \
for flg in $$sane_makeflags; do \
test $$skip_next = yes && { skip_next=no; continue; }; \
case $$flg in \
*=*|--*) continue;; \
-*I) strip_trailopt 'I'; skip_next=yes;; \
-*I?*) strip_trailopt 'I';; \
-*O) strip_trailopt 'O'; skip_next=yes;; \
-*O?*) strip_trailopt 'O';; \
-*l) strip_trailopt 'l'; skip_next=yes;; \
-*l?*) strip_trailopt 'l';; \
-[dEDm]) skip_next=yes;; \
-[JT]) skip_next=yes;; \
esac; \
case $$flg in \
*$$target_option*) has_opt=yes; break;; \
esac; \
done; \
test $$has_opt = yes
am__make_dryrun = (target_option=n; $(am__make_running_with_option))
am__make_keepgoing = (target_option=k; $(am__make_running_with_option))
pkgdatadir = $(datadir)/@PACKAGE@
pkgincludedir = $(includedir)/@PACKAGE@
pkglibdir = $(libdir)/@PACKAGE@
pkglibexecdir = $(libexecdir)/@PACKAGE@
am__cd = CDPATH="$${ZSH_VERSION+.}$(PATH_SEPARATOR)" && cd
install_sh_DATA = $(install_sh) -c -m 644
install_sh_PROGRAM = $(install_sh) -c
install_sh_SCRIPT = $(install_sh) -c
INSTALL_HEADER = $(INSTALL_DATA)
transform = $(program_transform_name)
NORMAL_INSTALL = :
PRE_INSTALL = :
POST_INSTALL = :
NORMAL_UNINSTALL = :
PRE_UNINSTALL = :
POST_UNINSTALL = :
build_triplet = @build@
host_triplet = @host@
subdir = init.d
DIST_COMMON = $(srcdir)/Makefile.in $(srcdir)/Makefile.am
ACLOCAL_M4 = $(top_srcdir)/aclocal.m4
am__aclocal_m4_deps = $(top_srcdir)/build-aux/libtool.m4 \
$(top_srcdir)/build-aux/ltoptions.m4 \
$(top_srcdir)/build-aux/ltsugar.m4 \
$(top_srcdir)/build-aux/ltversion.m4 \
$(top_srcdir)/build-aux/lt~obsolete.m4 \
$(top_srcdir)/configure.ac
am__configure_deps = $(am__aclocal_m4_deps) $(CONFIGURE_DEPENDENCIES) \
$(ACLOCAL_M4)
mkinstalldirs = $(install_sh) -d
CONFIG_CLEAN_FILES =
CONFIG_CLEAN_VPATH_FILES =
am__vpath_adj_setup = srcdirstrip=`echo "$(srcdir)" | sed 's|.|.|g'`;
am__vpath_adj = case $$p in \
$(srcdir)/*) f=`echo "$$p" | sed "s|^$$srcdirstrip/||"`;; \
*) f=$$p;; \
esac;
am__strip_dir = f=`echo $$p | sed -e 's|^.*/||'`;
am__install_max = 40
am__nobase_strip_setup = \
srcdirstrip=`echo "$(srcdir)" | sed 's/[].[^$$\\*|]/\\\\&/g'`
am__nobase_strip = \
for p in $$list; do echo "$$p"; done | sed -e "s|$$srcdirstrip/||"
am__nobase_list = $(am__nobase_strip_setup); \
for p in $$list; do echo "$$p $$p"; done | \
sed "s| $$srcdirstrip/| |;"' / .*\//!s/ .*/ ./; s,\( .*\)/[^/]*$$,\1,' | \
$(AWK) 'BEGIN { files["."] = "" } { files[$$2] = files[$$2] " " $$1; \
if (++n[$$2] == $(am__install_max)) \
{ print $$2, files[$$2]; n[$$2] = 0; files[$$2] = "" } } \
END { for (dir in files) print dir, files[dir] }'
am__base_list = \
sed '$$!N;$$!N;$$!N;$$!N;$$!N;$$!N;$$!N;s/\n/ /g' | \
sed '$$!N;$$!N;$$!N;$$!N;s/\n/ /g'
am__uninstall_files_from_dir = { \
test -z "$$files" \
|| { test ! -d "$$dir" && test ! -f "$$dir" && test ! -r "$$dir"; } \
|| { echo " ( cd '$$dir' && rm -f" $$files ")"; \
$(am__cd) "$$dir" && rm -f $$files; }; \
}
am__installdirs = "$(DESTDIR)$(initddir)" "$(DESTDIR)$(sysconfdir)"
SCRIPTS = $(nodist_initd_SCRIPTS)
AM_V_P = $(am__v_P_@AM_V@)
am__v_P_ = $(am__v_P_@AM_DEFAULT_V@)
am__v_P_0 = false
am__v_P_1 = :
AM_V_GEN = $(am__v_GEN_@AM_V@)
am__v_GEN_ = $(am__v_GEN_@AM_DEFAULT_V@)
am__v_GEN_0 = @echo " GEN " $@;
am__v_GEN_1 =
AM_V_at = $(am__v_at_@AM_V@)
am__v_at_ = $(am__v_at_@AM_DEFAULT_V@)
am__v_at_0 = @
am__v_at_1 =
SOURCES =
DIST_SOURCES =
am__can_run_installinfo = \
case $$AM_UPDATE_INFO_DIR in \
n|no|NO) false;; \
*) (install-info --version) >/dev/null 2>&1;; \
esac
DATA = $(nodist_sysconf_DATA)
am__tagged_files = $(HEADERS) $(SOURCES) $(TAGS_FILES) $(LISP)
DISTFILES = $(DIST_COMMON) $(DIST_SOURCES) $(TEXINFOS) $(EXTRA_DIST)
ACLOCAL = @ACLOCAL@
AMTAR = @AMTAR@
AM_DEFAULT_VERBOSITY = @AM_DEFAULT_VERBOSITY@
AR = @AR@
AUTOCONF = @AUTOCONF@
AUTOHEADER = @AUTOHEADER@
AUTOMAKE = @AUTOMAKE@
AWK = @AWK@
CC = @CC@
CCDEPMODE = @CCDEPMODE@
CFLAGS = @CFLAGS@
CPP = @CPP@
CPPFLAGS = @CPPFLAGS@
CYGPATH_W = @CYGPATH_W@
DEFS = @DEFS@
DEPDIR = @DEPDIR@
DLLTOOL = @DLLTOOL@
DSYMUTIL = @DSYMUTIL@
DUMPBIN = @DUMPBIN@
ECHO_C = @ECHO_C@
ECHO_N = @ECHO_N@
ECHO_T = @ECHO_T@
EGREP = @EGREP@
EXEEXT = @EXEEXT@
FGREP = @FGREP@
GREP = @GREP@
INSTALL = @INSTALL@
INSTALL_DATA = @INSTALL_DATA@
INSTALL_PROGRAM = @INSTALL_PROGRAM@
INSTALL_SCRIPT = @INSTALL_SCRIPT@
INSTALL_STRIP_PROGRAM = @INSTALL_STRIP_PROGRAM@
IPRCONFIG_LIBS = @IPRCONFIG_LIBS@
LD = @LD@
LDFLAGS = @LDFLAGS@
LIBOBJS = @LIBOBJS@
LIBS = @LIBS@
LIBTOOL = @LIBTOOL@
LIPO = @LIPO@
LN_S = @LN_S@
LTLIBOBJS = @LTLIBOBJS@
MAKEINFO = @MAKEINFO@
MANIFEST_TOOL = @MANIFEST_TOOL@
MKDIR_P = @MKDIR_P@
NM = @NM@
NMEDIT = @NMEDIT@
OBJDUMP = @OBJDUMP@
OBJEXT = @OBJEXT@
OTOOL = @OTOOL@
OTOOL64 = @OTOOL64@
PACKAGE = @PACKAGE@
PACKAGE_BUGREPORT = @PACKAGE_BUGREPORT@
PACKAGE_NAME = @PACKAGE_NAME@
PACKAGE_STRING = @PACKAGE_STRING@
PACKAGE_TARNAME = @PACKAGE_TARNAME@
PACKAGE_URL = @PACKAGE_URL@
PACKAGE_VERSION = @PACKAGE_VERSION@
PATH_SEPARATOR = @PATH_SEPARATOR@
PYTHON = @PYTHON@
PYTHON_EXEC_PREFIX = @PYTHON_EXEC_PREFIX@
PYTHON_PLATFORM = @PYTHON_PLATFORM@
PYTHON_PREFIX = @PYTHON_PREFIX@
PYTHON_VERSION = @PYTHON_VERSION@
RANLIB = @RANLIB@
SED = @SED@
SET_MAKE = @SET_MAKE@
SHELL = @SHELL@
STRIP = @STRIP@
VERSION = @VERSION@
abs_builddir = @abs_builddir@
abs_srcdir = @abs_srcdir@
abs_top_builddir = @abs_top_builddir@
abs_top_srcdir = @abs_top_srcdir@
ac_ct_AR = @ac_ct_AR@
ac_ct_CC = @ac_ct_CC@
ac_ct_DUMPBIN = @ac_ct_DUMPBIN@
am__include = @am__include@
am__leading_dot = @am__leading_dot@
am__quote = @am__quote@
am__tar = @am__tar@
am__untar = @am__untar@
bindir = @bindir@
build = @build@
build_alias = @build_alias@
build_cpu = @build_cpu@
build_os = @build_os@
build_vendor = @build_vendor@
builddir = @builddir@
datadir = @datadir@
datarootdir = @datarootdir@
docdir = @docdir@
dvidir = @dvidir@
exec_prefix = @exec_prefix@
host = @host@
host_alias = @host_alias@
host_cpu = @host_cpu@
host_os = @host_os@
host_vendor = @host_vendor@
htmldir = @htmldir@
includedir = @includedir@
infodir = @infodir@
initddir = @initddir@
install_sh = @install_sh@
libdir = @libdir@
libexecdir = @libexecdir@
localedir = @localedir@
localstatedir = @localstatedir@
mandir = @mandir@
mkdir_p = @mkdir_p@
oldincludedir = @oldincludedir@
pdfdir = @pdfdir@
pkgpyexecdir = @pkgpyexecdir@
pkgpythondir = @pkgpythondir@
prefix = @prefix@
program_transform_name = @program_transform_name@
psdir = @psdir@
pyexecdir = @pyexecdir@
pythondir = @pythondir@
sbindir = @sbindir@
sharedstatedir = @sharedstatedir@
srcdir = @srcdir@
sysconfdir = @sysconfdir@/ha.d/resource.d
systemdunitdir = @systemdunitdir@
target_alias = @target_alias@
top_build_prefix = @top_build_prefix@
top_builddir = @top_builddir@
top_srcdir = @top_srcdir@
udevrulesdir = @udevrulesdir@
@INITD_TRUE@nodist_initd_SCRIPTS = iprdump iprinit iprupdate
nodist_sysconf_DATA = iprha
EXTRA_DIST = iprdump.in iprinit.in iprupdate.in iprha.in
all: all-am
.SUFFIXES:
$(srcdir)/Makefile.in: $(srcdir)/Makefile.am $(am__configure_deps)
@for dep in $?; do \
case '$(am__configure_deps)' in \
*$$dep*) \
( cd $(top_builddir) && $(MAKE) $(AM_MAKEFLAGS) am--refresh ) \
&& { if test -f $@; then exit 0; else break; fi; }; \
exit 1;; \
esac; \
done; \
echo ' cd $(top_srcdir) && $(AUTOMAKE) --foreign init.d/Makefile'; \
$(am__cd) $(top_srcdir) && \
$(AUTOMAKE) --foreign init.d/Makefile
.PRECIOUS: Makefile
Makefile: $(srcdir)/Makefile.in $(top_builddir)/config.status
@case '$?' in \
*config.status*) \
cd $(top_builddir) && $(MAKE) $(AM_MAKEFLAGS) am--refresh;; \
*) \
echo ' cd $(top_builddir) && $(SHELL) ./config.status $(subdir)/$@ $(am__depfiles_maybe)'; \
cd $(top_builddir) && $(SHELL) ./config.status $(subdir)/$@ $(am__depfiles_maybe);; \
esac;
$(top_builddir)/config.status: $(top_srcdir)/configure $(CONFIG_STATUS_DEPENDENCIES)
cd $(top_builddir) && $(MAKE) $(AM_MAKEFLAGS) am--refresh
$(top_srcdir)/configure: $(am__configure_deps)
cd $(top_builddir) && $(MAKE) $(AM_MAKEFLAGS) am--refresh
$(ACLOCAL_M4): $(am__aclocal_m4_deps)
cd $(top_builddir) && $(MAKE) $(AM_MAKEFLAGS) am--refresh
$(am__aclocal_m4_deps):
install-nodist_initdSCRIPTS: $(nodist_initd_SCRIPTS)
@$(NORMAL_INSTALL)
@list='$(nodist_initd_SCRIPTS)'; test -n "$(initddir)" || list=; \
if test -n "$$list"; then \
echo " $(MKDIR_P) '$(DESTDIR)$(initddir)'"; \
$(MKDIR_P) "$(DESTDIR)$(initddir)" || exit 1; \
fi; \
for p in $$list; do \
if test -f "$$p"; then d=; else d="$(srcdir)/"; fi; \
if test -f "$$d$$p"; then echo "$$d$$p"; echo "$$p"; else :; fi; \
done | \
sed -e 'p;s,.*/,,;n' \
-e 'h;s|.*|.|' \
-e 'p;x;s,.*/,,;$(transform)' | sed 'N;N;N;s,\n, ,g' | \
$(AWK) 'BEGIN { files["."] = ""; dirs["."] = 1; } \
{ d=$$3; if (dirs[d] != 1) { print "d", d; dirs[d] = 1 } \
if ($$2 == $$4) { files[d] = files[d] " " $$1; \
if (++n[d] == $(am__install_max)) { \
print "f", d, files[d]; n[d] = 0; files[d] = "" } } \
else { print "f", d "/" $$4, $$1 } } \
END { for (d in files) print "f", d, files[d] }' | \
while read type dir files; do \
if test "$$dir" = .; then dir=; else dir=/$$dir; fi; \
test -z "$$files" || { \
echo " $(INSTALL_SCRIPT) $$files '$(DESTDIR)$(initddir)$$dir'"; \
$(INSTALL_SCRIPT) $$files "$(DESTDIR)$(initddir)$$dir" || exit $$?; \
} \
; done
uninstall-nodist_initdSCRIPTS:
@$(NORMAL_UNINSTALL)
@list='$(nodist_initd_SCRIPTS)'; test -n "$(initddir)" || exit 0; \
files=`for p in $$list; do echo "$$p"; done | \
sed -e 's,.*/,,;$(transform)'`; \
dir='$(DESTDIR)$(initddir)'; $(am__uninstall_files_from_dir)
mostlyclean-libtool:
-rm -f *.lo
clean-libtool:
-rm -rf .libs _libs
install-nodist_sysconfDATA: $(nodist_sysconf_DATA)
@$(NORMAL_INSTALL)
@list='$(nodist_sysconf_DATA)'; test -n "$(sysconfdir)" || list=; \
if test -n "$$list"; then \
echo " $(MKDIR_P) '$(DESTDIR)$(sysconfdir)'"; \
$(MKDIR_P) "$(DESTDIR)$(sysconfdir)" || exit 1; \
fi; \
for p in $$list; do \
if test -f "$$p"; then d=; else d="$(srcdir)/"; fi; \
echo "$$d$$p"; \
done | $(am__base_list) | \
while read files; do \
echo " $(INSTALL_DATA) $$files '$(DESTDIR)$(sysconfdir)'"; \
$(INSTALL_DATA) $$files "$(DESTDIR)$(sysconfdir)" || exit $$?; \
done
uninstall-nodist_sysconfDATA:
@$(NORMAL_UNINSTALL)
@list='$(nodist_sysconf_DATA)'; test -n "$(sysconfdir)" || list=; \
files=`for p in $$list; do echo $$p; done | sed -e 's|^.*/||'`; \
dir='$(DESTDIR)$(sysconfdir)'; $(am__uninstall_files_from_dir)
tags TAGS:
ctags CTAGS:
cscope cscopelist:
distdir: $(DISTFILES)
@srcdirstrip=`echo "$(srcdir)" | sed 's/[].[^$$\\*]/\\\\&/g'`; \
topsrcdirstrip=`echo "$(top_srcdir)" | sed 's/[].[^$$\\*]/\\\\&/g'`; \
list='$(DISTFILES)'; \
dist_files=`for file in $$list; do echo $$file; done | \
sed -e "s|^$$srcdirstrip/||;t" \
-e "s|^$$topsrcdirstrip/|$(top_builddir)/|;t"`; \
case $$dist_files in \
*/*) $(MKDIR_P) `echo "$$dist_files" | \
sed '/\//!d;s|^|$(distdir)/|;s,/[^/]*$$,,' | \
sort -u` ;; \
esac; \
for file in $$dist_files; do \
if test -f $$file || test -d $$file; then d=.; else d=$(srcdir); fi; \
if test -d $$d/$$file; then \
dir=`echo "/$$file" | sed -e 's,/[^/]*$$,,'`; \
if test -d "$(distdir)/$$file"; then \
find "$(distdir)/$$file" -type d ! -perm -700 -exec chmod u+rwx {} \;; \
fi; \
if test -d $(srcdir)/$$file && test $$d != $(srcdir); then \
cp -fpR $(srcdir)/$$file "$(distdir)$$dir" || exit 1; \
find "$(distdir)/$$file" -type d ! -perm -700 -exec chmod u+rwx {} \;; \
fi; \
cp -fpR $$d/$$file "$(distdir)$$dir" || exit 1; \
else \
test -f "$(distdir)/$$file" \
|| cp -p $$d/$$file "$(distdir)/$$file" \
|| exit 1; \
fi; \
done
check-am: all-am
check: check-am
all-am: Makefile $(SCRIPTS) $(DATA)
installdirs:
for dir in "$(DESTDIR)$(initddir)" "$(DESTDIR)$(sysconfdir)"; do \
test -z "$$dir" || $(MKDIR_P) "$$dir"; \
done
install: install-am
install-exec: install-exec-am
install-data: install-data-am
uninstall: uninstall-am
install-am: all-am
@$(MAKE) $(AM_MAKEFLAGS) install-exec-am install-data-am
installcheck: installcheck-am
install-strip:
if test -z '$(STRIP)'; then \
$(MAKE) $(AM_MAKEFLAGS) INSTALL_PROGRAM="$(INSTALL_STRIP_PROGRAM)" \
install_sh_PROGRAM="$(INSTALL_STRIP_PROGRAM)" INSTALL_STRIP_FLAG=-s \
install; \
else \
$(MAKE) $(AM_MAKEFLAGS) INSTALL_PROGRAM="$(INSTALL_STRIP_PROGRAM)" \
install_sh_PROGRAM="$(INSTALL_STRIP_PROGRAM)" INSTALL_STRIP_FLAG=-s \
"INSTALL_PROGRAM_ENV=STRIPPROG='$(STRIP)'" install; \
fi
mostlyclean-generic:
clean-generic:
distclean-generic:
-test -z "$(CONFIG_CLEAN_FILES)" || rm -f $(CONFIG_CLEAN_FILES)
-test . = "$(srcdir)" || test -z "$(CONFIG_CLEAN_VPATH_FILES)" || rm -f $(CONFIG_CLEAN_VPATH_FILES)
maintainer-clean-generic:
@echo "This command is intended for maintainers to use"
@echo "it deletes files that may require special tools to rebuild."
clean: clean-am
clean-am: clean-generic clean-libtool clean-local mostlyclean-am
distclean: distclean-am
-rm -f Makefile
distclean-am: clean-am distclean-generic
dvi: dvi-am
dvi-am:
html: html-am
html-am:
info: info-am
info-am:
install-data-am: install-nodist_initdSCRIPTS
install-dvi: install-dvi-am
install-dvi-am:
install-exec-am: install-nodist_sysconfDATA
install-html: install-html-am
install-html-am:
install-info: install-info-am
install-info-am:
install-man:
install-pdf: install-pdf-am
install-pdf-am:
install-ps: install-ps-am
install-ps-am:
installcheck-am:
maintainer-clean: maintainer-clean-am
-rm -f Makefile
maintainer-clean-am: distclean-am maintainer-clean-generic
mostlyclean: mostlyclean-am
mostlyclean-am: mostlyclean-generic mostlyclean-libtool
pdf: pdf-am
pdf-am:
ps: ps-am
ps-am:
uninstall-am: uninstall-nodist_initdSCRIPTS \
uninstall-nodist_sysconfDATA
.MAKE: install-am install-strip
.PHONY: all all-am check check-am clean clean-generic clean-libtool \
clean-local cscopelist-am ctags-am distclean distclean-generic \
distclean-libtool distdir dvi dvi-am html html-am info info-am \
install install-am install-data install-data-am install-dvi \
install-dvi-am install-exec install-exec-am install-html \
install-html-am install-info install-info-am install-man \
install-nodist_initdSCRIPTS install-nodist_sysconfDATA \
install-pdf install-pdf-am install-ps install-ps-am \
install-strip installcheck installcheck-am installdirs \
maintainer-clean maintainer-clean-generic mostlyclean \
mostlyclean-generic mostlyclean-libtool pdf pdf-am ps ps-am \
tags-am uninstall uninstall-am uninstall-nodist_initdSCRIPTS \
uninstall-nodist_sysconfDATA
%: %.in
sed -e 's,[@]sbindir[@],$(sbindir),g' < $< > $@
clean-local:
-rm iprdump iprinit iprupdate iprha
# Tell versions [3.59,3.63) of GNU make to not export all variables.
# Otherwise a system limit (for SysV at least) may be exceeded.
.NOEXPORT:
iprutils-2.4.18.1/init.d/iprha.in 0000664 0001750 0001751 00000002761 13270167731 013401 0000000 0000000 #!/bin/sh
# Copyright (C) 2007 International Business Machines Corporation and others.
# All Rights Reserved. This program and the accompanying
# materials are made available under the terms of the
# Common Public License v1.0 which accompanies this distribution.
#
# Author: Brian King
#
# iprha
#
# System startup script for the ipr HA facility
#
### BEGIN INIT INFO
# Provides: iprha
# Required-Start: $local_fs
# Should-Start: $remote_fs $syslog
# Required-Stop: $local_fs $syslog
# Default-Start: 2 3 4 5
# Default-Stop: 0 1 6
# Short-Description: Set all ipr adapters to be preferred primary adapter
# Description: Set all ipr adapters to be preferred primary adapter.
# This script should be started on the "primary" system in a high
# availability configuration for improved ipr disk performance.
### END INIT INFO
IPRCONFIG=@sbindir@/iprconfig
test -x $IPRCONFIG || exit 5
. /lib/lsb/init-functions
start() {
echo -n "Enabling ipr primary adapter mode"
$IPRCONFIG -c set-all-primary
RETVAL=$?
if [ $RETVAL -eq 0 ]; then
log_success_msg " "
else
log_failure_msg " "
fi
return $RETVAL
}
stop() {
echo -n "Disabling ipr primary adapter mode"
$IPRCONFIG -c set-all-secondary
RETVAL=$?
if [ $RETVAL -eq 0 ]; then
log_success_msg " "
else
log_failure_msg " "
fi
return $RETVAL
}
case "$1" in
start)
start
;;
stop)
stop
;;
*)
echo "Usage: $0 {start|stop}"
exit 1
;;
esac
iprutils-2.4.18.1/init.d/Makefile.am 0000664 0001750 0001751 00000001131 13270167731 013770 0000000 0000000 # IBM IPR adapter configuration utility
#
# (C) Copyright 2015
# International Business Machines Corporation and others.
# All Rights Reserved. This program and the accompanying
# materials are made available under the terms of the
# Common Public License v1.0 which accompanies this distribution.
#
%: %.in
sed -e 's,[@]sbindir[@],$(sbindir),g' < $< > $@
if INITD
nodist_initd_SCRIPTS = iprdump iprinit iprupdate
endif
clean-local:
-rm iprdump iprinit iprupdate iprha
sysconfdir=@sysconfdir@/ha.d/resource.d
nodist_sysconf_DATA = iprha
EXTRA_DIST = iprdump.in iprinit.in iprupdate.in iprha.in
iprutils-2.4.18.1/init.d/iprinit.in 0000664 0001750 0001751 00000003577 13270167731 013762 0000000 0000000 #!/bin/sh
# Copyright (C) 2004 International Business Machines Corporation and others.
# All Rights Reserved. This program and the accompanying
# materials are made available under the terms of the
# Common Public License v1.0 which accompanies this distribution.
#
# Author: Brian King
#
# iprinit
#
# System startup script for the ipr init facility
#
### BEGIN INIT INFO
# Provides: iprinit
# Required-Start: $local_fs
# Should-Start: $remote_fs $syslog
# Required-Stop: $local_fs $syslog
# Default-Start: 2 3 4 5
# Default-Stop: 0 1 6
# Short-Description: Start the ipr init daemon
# Description: Start the ipr initialization daemon
### END INIT INFO
IPRINIT=@sbindir@/iprinit
test -x $IPRINIT || exit 5
. /lib/lsb/init-functions
start() {
echo -n "Starting ipr initialization daemon"
if [ ! -d /sys/class/scsi_generic ] ; then
modprobe sg
fi
start_daemon $IPRINIT --daemon
RETVAL=$?
if [ $RETVAL -eq 0 ]; then
log_success_msg " "
else
log_failure_msg " "
fi
return $RETVAL
}
stop() {
echo -n "Shutting down ipr initialization daemon"
killproc $IPRINIT
RETVAL=$?
if [ $RETVAL -eq 0 ]; then
log_success_msg " "
else
log_failure_msg " "
fi
return $RETVAL
}
restart() {
$0 stop
$0 start
return $RETVAL
}
reload() {
echo -n "Reload ipr initialization daemon"
$0 stop && $0 start
return $RETVAL
}
status() {
echo -n "Checking for ipr initialization daemon: "
pidofproc $IPRINIT > /dev/null 2>&1
RETVAL=$?
if [ $RETVAL -eq 0 ]; then
log_success_msg "running"
else
log_failure_msg "unused"
fi
return $RETVAL
}
case "$1" in
start)
start
;;
stop)
stop
;;
restart)
restart
;;
reload|force-reload)
reload
;;
status)
status
;;
*)
echo "Usage: $0 {start|stop|status|restart|reload}"
exit 1
;;
esac
iprutils-2.4.18.1/systemd/ 0000775 0001750 0001751 00000000000 13474264453 012330 5 0000000 0000000 iprutils-2.4.18.1/systemd/iprutils.target 0000664 0001750 0001751 00000000255 13305527433 015326 0000000 0000000 [Unit]
Description=IBM Power Raid utilities
Requires=iprupdate.service iprinit.service iprdump.service basic.target
Before=default.target
[Install]
WantedBy=default.target
iprutils-2.4.18.1/systemd/iprinit.service.in 0000664 0001750 0001751 00000000217 13305527433 015706 0000000 0000000 [Unit]
Description=IBM Power Raid init daemon
[Service]
Type=forking
ExecStart=@sbindir@/iprinit --daemon
[Install]
WantedBy=iprutils.target
iprutils-2.4.18.1/systemd/Makefile.in 0000664 0001750 0001751 00000037522 13474264421 014321 0000000 0000000 # Makefile.in generated by automake 1.13.4 from Makefile.am.
# @configure_input@
# Copyright (C) 1994-2013 Free Software Foundation, Inc.
# This Makefile.in is free software; the Free Software Foundation
# gives unlimited permission to copy and/or distribute it,
# with or without modifications, as long as this notice is preserved.
# This program is distributed in the hope that it will be useful,
# but WITHOUT ANY WARRANTY, to the extent permitted by law; without
# even the implied warranty of MERCHANTABILITY or FITNESS FOR A
# PARTICULAR PURPOSE.
@SET_MAKE@
# IBM IPR adapter configuration utility
#
# (C) Copyright 2015
# International Business Machines Corporation and others.
# All Rights Reserved. This program and the accompanying
# materials are made available under the terms of the
# Common Public License v1.0 which accompanies this distribution.
#
#
VPATH = @srcdir@
am__is_gnu_make = test -n '$(MAKEFILE_LIST)' && test -n '$(MAKELEVEL)'
am__make_running_with_option = \
case $${target_option-} in \
?) ;; \
*) echo "am__make_running_with_option: internal error: invalid" \
"target option '$${target_option-}' specified" >&2; \
exit 1;; \
esac; \
has_opt=no; \
sane_makeflags=$$MAKEFLAGS; \
if $(am__is_gnu_make); then \
sane_makeflags=$$MFLAGS; \
else \
case $$MAKEFLAGS in \
*\\[\ \ ]*) \
bs=\\; \
sane_makeflags=`printf '%s\n' "$$MAKEFLAGS" \
| sed "s/$$bs$$bs[$$bs $$bs ]*//g"`;; \
esac; \
fi; \
skip_next=no; \
strip_trailopt () \
{ \
flg=`printf '%s\n' "$$flg" | sed "s/$$1.*$$//"`; \
}; \
for flg in $$sane_makeflags; do \
test $$skip_next = yes && { skip_next=no; continue; }; \
case $$flg in \
*=*|--*) continue;; \
-*I) strip_trailopt 'I'; skip_next=yes;; \
-*I?*) strip_trailopt 'I';; \
-*O) strip_trailopt 'O'; skip_next=yes;; \
-*O?*) strip_trailopt 'O';; \
-*l) strip_trailopt 'l'; skip_next=yes;; \
-*l?*) strip_trailopt 'l';; \
-[dEDm]) skip_next=yes;; \
-[JT]) skip_next=yes;; \
esac; \
case $$flg in \
*$$target_option*) has_opt=yes; break;; \
esac; \
done; \
test $$has_opt = yes
am__make_dryrun = (target_option=n; $(am__make_running_with_option))
am__make_keepgoing = (target_option=k; $(am__make_running_with_option))
pkgdatadir = $(datadir)/@PACKAGE@
pkgincludedir = $(includedir)/@PACKAGE@
pkglibdir = $(libdir)/@PACKAGE@
pkglibexecdir = $(libexecdir)/@PACKAGE@
am__cd = CDPATH="$${ZSH_VERSION+.}$(PATH_SEPARATOR)" && cd
install_sh_DATA = $(install_sh) -c -m 644
install_sh_PROGRAM = $(install_sh) -c
install_sh_SCRIPT = $(install_sh) -c
INSTALL_HEADER = $(INSTALL_DATA)
transform = $(program_transform_name)
NORMAL_INSTALL = :
PRE_INSTALL = :
POST_INSTALL = :
NORMAL_UNINSTALL = :
PRE_UNINSTALL = :
POST_UNINSTALL = :
build_triplet = @build@
host_triplet = @host@
subdir = systemd
DIST_COMMON = $(srcdir)/Makefile.in $(srcdir)/Makefile.am \
$(dist_systemdunit_DATA)
ACLOCAL_M4 = $(top_srcdir)/aclocal.m4
am__aclocal_m4_deps = $(top_srcdir)/build-aux/libtool.m4 \
$(top_srcdir)/build-aux/ltoptions.m4 \
$(top_srcdir)/build-aux/ltsugar.m4 \
$(top_srcdir)/build-aux/ltversion.m4 \
$(top_srcdir)/build-aux/lt~obsolete.m4 \
$(top_srcdir)/configure.ac
am__configure_deps = $(am__aclocal_m4_deps) $(CONFIGURE_DEPENDENCIES) \
$(ACLOCAL_M4)
mkinstalldirs = $(install_sh) -d
CONFIG_CLEAN_FILES =
CONFIG_CLEAN_VPATH_FILES =
AM_V_P = $(am__v_P_@AM_V@)
am__v_P_ = $(am__v_P_@AM_DEFAULT_V@)
am__v_P_0 = false
am__v_P_1 = :
AM_V_GEN = $(am__v_GEN_@AM_V@)
am__v_GEN_ = $(am__v_GEN_@AM_DEFAULT_V@)
am__v_GEN_0 = @echo " GEN " $@;
am__v_GEN_1 =
AM_V_at = $(am__v_at_@AM_V@)
am__v_at_ = $(am__v_at_@AM_DEFAULT_V@)
am__v_at_0 = @
am__v_at_1 =
SOURCES =
DIST_SOURCES =
am__can_run_installinfo = \
case $$AM_UPDATE_INFO_DIR in \
n|no|NO) false;; \
*) (install-info --version) >/dev/null 2>&1;; \
esac
am__vpath_adj_setup = srcdirstrip=`echo "$(srcdir)" | sed 's|.|.|g'`;
am__vpath_adj = case $$p in \
$(srcdir)/*) f=`echo "$$p" | sed "s|^$$srcdirstrip/||"`;; \
*) f=$$p;; \
esac;
am__strip_dir = f=`echo $$p | sed -e 's|^.*/||'`;
am__install_max = 40
am__nobase_strip_setup = \
srcdirstrip=`echo "$(srcdir)" | sed 's/[].[^$$\\*|]/\\\\&/g'`
am__nobase_strip = \
for p in $$list; do echo "$$p"; done | sed -e "s|$$srcdirstrip/||"
am__nobase_list = $(am__nobase_strip_setup); \
for p in $$list; do echo "$$p $$p"; done | \
sed "s| $$srcdirstrip/| |;"' / .*\//!s/ .*/ ./; s,\( .*\)/[^/]*$$,\1,' | \
$(AWK) 'BEGIN { files["."] = "" } { files[$$2] = files[$$2] " " $$1; \
if (++n[$$2] == $(am__install_max)) \
{ print $$2, files[$$2]; n[$$2] = 0; files[$$2] = "" } } \
END { for (dir in files) print dir, files[dir] }'
am__base_list = \
sed '$$!N;$$!N;$$!N;$$!N;$$!N;$$!N;$$!N;s/\n/ /g' | \
sed '$$!N;$$!N;$$!N;$$!N;s/\n/ /g'
am__uninstall_files_from_dir = { \
test -z "$$files" \
|| { test ! -d "$$dir" && test ! -f "$$dir" && test ! -r "$$dir"; } \
|| { echo " ( cd '$$dir' && rm -f" $$files ")"; \
$(am__cd) "$$dir" && rm -f $$files; }; \
}
am__installdirs = "$(DESTDIR)$(systemdunitdir)" \
"$(DESTDIR)$(systemdunitdir)"
DATA = $(dist_systemdunit_DATA) $(nodist_systemdunit_DATA)
am__tagged_files = $(HEADERS) $(SOURCES) $(TAGS_FILES) $(LISP)
DISTFILES = $(DIST_COMMON) $(DIST_SOURCES) $(TEXINFOS) $(EXTRA_DIST)
ACLOCAL = @ACLOCAL@
AMTAR = @AMTAR@
AM_DEFAULT_VERBOSITY = @AM_DEFAULT_VERBOSITY@
AR = @AR@
AUTOCONF = @AUTOCONF@
AUTOHEADER = @AUTOHEADER@
AUTOMAKE = @AUTOMAKE@
AWK = @AWK@
CC = @CC@
CCDEPMODE = @CCDEPMODE@
CFLAGS = @CFLAGS@
CPP = @CPP@
CPPFLAGS = @CPPFLAGS@
CYGPATH_W = @CYGPATH_W@
DEFS = @DEFS@
DEPDIR = @DEPDIR@
DLLTOOL = @DLLTOOL@
DSYMUTIL = @DSYMUTIL@
DUMPBIN = @DUMPBIN@
ECHO_C = @ECHO_C@
ECHO_N = @ECHO_N@
ECHO_T = @ECHO_T@
EGREP = @EGREP@
EXEEXT = @EXEEXT@
FGREP = @FGREP@
GREP = @GREP@
INSTALL = @INSTALL@
INSTALL_DATA = @INSTALL_DATA@
INSTALL_PROGRAM = @INSTALL_PROGRAM@
INSTALL_SCRIPT = @INSTALL_SCRIPT@
INSTALL_STRIP_PROGRAM = @INSTALL_STRIP_PROGRAM@
IPRCONFIG_LIBS = @IPRCONFIG_LIBS@
LD = @LD@
LDFLAGS = @LDFLAGS@
LIBOBJS = @LIBOBJS@
LIBS = @LIBS@
LIBTOOL = @LIBTOOL@
LIPO = @LIPO@
LN_S = @LN_S@
LTLIBOBJS = @LTLIBOBJS@
MAKEINFO = @MAKEINFO@
MANIFEST_TOOL = @MANIFEST_TOOL@
MKDIR_P = @MKDIR_P@
NM = @NM@
NMEDIT = @NMEDIT@
OBJDUMP = @OBJDUMP@
OBJEXT = @OBJEXT@
OTOOL = @OTOOL@
OTOOL64 = @OTOOL64@
PACKAGE = @PACKAGE@
PACKAGE_BUGREPORT = @PACKAGE_BUGREPORT@
PACKAGE_NAME = @PACKAGE_NAME@
PACKAGE_STRING = @PACKAGE_STRING@
PACKAGE_TARNAME = @PACKAGE_TARNAME@
PACKAGE_URL = @PACKAGE_URL@
PACKAGE_VERSION = @PACKAGE_VERSION@
PATH_SEPARATOR = @PATH_SEPARATOR@
PYTHON = @PYTHON@
PYTHON_EXEC_PREFIX = @PYTHON_EXEC_PREFIX@
PYTHON_PLATFORM = @PYTHON_PLATFORM@
PYTHON_PREFIX = @PYTHON_PREFIX@
PYTHON_VERSION = @PYTHON_VERSION@
RANLIB = @RANLIB@
SED = @SED@
SET_MAKE = @SET_MAKE@
SHELL = @SHELL@
STRIP = @STRIP@
VERSION = @VERSION@
abs_builddir = @abs_builddir@
abs_srcdir = @abs_srcdir@
abs_top_builddir = @abs_top_builddir@
abs_top_srcdir = @abs_top_srcdir@
ac_ct_AR = @ac_ct_AR@
ac_ct_CC = @ac_ct_CC@
ac_ct_DUMPBIN = @ac_ct_DUMPBIN@
am__include = @am__include@
am__leading_dot = @am__leading_dot@
am__quote = @am__quote@
am__tar = @am__tar@
am__untar = @am__untar@
bindir = @bindir@
build = @build@
build_alias = @build_alias@
build_cpu = @build_cpu@
build_os = @build_os@
build_vendor = @build_vendor@
builddir = @builddir@
datadir = @datadir@
datarootdir = @datarootdir@
docdir = @docdir@
dvidir = @dvidir@
exec_prefix = @exec_prefix@
host = @host@
host_alias = @host_alias@
host_cpu = @host_cpu@
host_os = @host_os@
host_vendor = @host_vendor@
htmldir = @htmldir@
includedir = @includedir@
infodir = @infodir@
initddir = @initddir@
install_sh = @install_sh@
libdir = @libdir@
libexecdir = @libexecdir@
localedir = @localedir@
localstatedir = @localstatedir@
mandir = @mandir@
mkdir_p = @mkdir_p@
oldincludedir = @oldincludedir@
pdfdir = @pdfdir@
pkgpyexecdir = @pkgpyexecdir@
pkgpythondir = @pkgpythondir@
prefix = @prefix@
program_transform_name = @program_transform_name@
psdir = @psdir@
pyexecdir = @pyexecdir@
pythondir = @pythondir@
sbindir = @sbindir@
sharedstatedir = @sharedstatedir@
srcdir = @srcdir@
sysconfdir = @sysconfdir@
systemdunitdir = @systemdunitdir@
target_alias = @target_alias@
top_build_prefix = @top_build_prefix@
top_builddir = @top_builddir@
top_srcdir = @top_srcdir@
udevrulesdir = @udevrulesdir@
nodist_systemdunit_DATA = iprdump.service \
iprinit.service iprupdate.service
EXTRA_DIST = iprdump.service.in \
iprinit.service.in iprupdate.service.in
dist_systemdunit_DATA = iprutils.target
all: all-am
.SUFFIXES:
$(srcdir)/Makefile.in: $(srcdir)/Makefile.am $(am__configure_deps)
@for dep in $?; do \
case '$(am__configure_deps)' in \
*$$dep*) \
( cd $(top_builddir) && $(MAKE) $(AM_MAKEFLAGS) am--refresh ) \
&& { if test -f $@; then exit 0; else break; fi; }; \
exit 1;; \
esac; \
done; \
echo ' cd $(top_srcdir) && $(AUTOMAKE) --foreign systemd/Makefile'; \
$(am__cd) $(top_srcdir) && \
$(AUTOMAKE) --foreign systemd/Makefile
.PRECIOUS: Makefile
Makefile: $(srcdir)/Makefile.in $(top_builddir)/config.status
@case '$?' in \
*config.status*) \
cd $(top_builddir) && $(MAKE) $(AM_MAKEFLAGS) am--refresh;; \
*) \
echo ' cd $(top_builddir) && $(SHELL) ./config.status $(subdir)/$@ $(am__depfiles_maybe)'; \
cd $(top_builddir) && $(SHELL) ./config.status $(subdir)/$@ $(am__depfiles_maybe);; \
esac;
$(top_builddir)/config.status: $(top_srcdir)/configure $(CONFIG_STATUS_DEPENDENCIES)
cd $(top_builddir) && $(MAKE) $(AM_MAKEFLAGS) am--refresh
$(top_srcdir)/configure: $(am__configure_deps)
cd $(top_builddir) && $(MAKE) $(AM_MAKEFLAGS) am--refresh
$(ACLOCAL_M4): $(am__aclocal_m4_deps)
cd $(top_builddir) && $(MAKE) $(AM_MAKEFLAGS) am--refresh
$(am__aclocal_m4_deps):
mostlyclean-libtool:
-rm -f *.lo
clean-libtool:
-rm -rf .libs _libs
install-dist_systemdunitDATA: $(dist_systemdunit_DATA)
@$(NORMAL_INSTALL)
@list='$(dist_systemdunit_DATA)'; test -n "$(systemdunitdir)" || list=; \
if test -n "$$list"; then \
echo " $(MKDIR_P) '$(DESTDIR)$(systemdunitdir)'"; \
$(MKDIR_P) "$(DESTDIR)$(systemdunitdir)" || exit 1; \
fi; \
for p in $$list; do \
if test -f "$$p"; then d=; else d="$(srcdir)/"; fi; \
echo "$$d$$p"; \
done | $(am__base_list) | \
while read files; do \
echo " $(INSTALL_DATA) $$files '$(DESTDIR)$(systemdunitdir)'"; \
$(INSTALL_DATA) $$files "$(DESTDIR)$(systemdunitdir)" || exit $$?; \
done
uninstall-dist_systemdunitDATA:
@$(NORMAL_UNINSTALL)
@list='$(dist_systemdunit_DATA)'; test -n "$(systemdunitdir)" || list=; \
files=`for p in $$list; do echo $$p; done | sed -e 's|^.*/||'`; \
dir='$(DESTDIR)$(systemdunitdir)'; $(am__uninstall_files_from_dir)
install-nodist_systemdunitDATA: $(nodist_systemdunit_DATA)
@$(NORMAL_INSTALL)
@list='$(nodist_systemdunit_DATA)'; test -n "$(systemdunitdir)" || list=; \
if test -n "$$list"; then \
echo " $(MKDIR_P) '$(DESTDIR)$(systemdunitdir)'"; \
$(MKDIR_P) "$(DESTDIR)$(systemdunitdir)" || exit 1; \
fi; \
for p in $$list; do \
if test -f "$$p"; then d=; else d="$(srcdir)/"; fi; \
echo "$$d$$p"; \
done | $(am__base_list) | \
while read files; do \
echo " $(INSTALL_DATA) $$files '$(DESTDIR)$(systemdunitdir)'"; \
$(INSTALL_DATA) $$files "$(DESTDIR)$(systemdunitdir)" || exit $$?; \
done
uninstall-nodist_systemdunitDATA:
@$(NORMAL_UNINSTALL)
@list='$(nodist_systemdunit_DATA)'; test -n "$(systemdunitdir)" || list=; \
files=`for p in $$list; do echo $$p; done | sed -e 's|^.*/||'`; \
dir='$(DESTDIR)$(systemdunitdir)'; $(am__uninstall_files_from_dir)
tags TAGS:
ctags CTAGS:
cscope cscopelist:
distdir: $(DISTFILES)
@srcdirstrip=`echo "$(srcdir)" | sed 's/[].[^$$\\*]/\\\\&/g'`; \
topsrcdirstrip=`echo "$(top_srcdir)" | sed 's/[].[^$$\\*]/\\\\&/g'`; \
list='$(DISTFILES)'; \
dist_files=`for file in $$list; do echo $$file; done | \
sed -e "s|^$$srcdirstrip/||;t" \
-e "s|^$$topsrcdirstrip/|$(top_builddir)/|;t"`; \
case $$dist_files in \
*/*) $(MKDIR_P) `echo "$$dist_files" | \
sed '/\//!d;s|^|$(distdir)/|;s,/[^/]*$$,,' | \
sort -u` ;; \
esac; \
for file in $$dist_files; do \
if test -f $$file || test -d $$file; then d=.; else d=$(srcdir); fi; \
if test -d $$d/$$file; then \
dir=`echo "/$$file" | sed -e 's,/[^/]*$$,,'`; \
if test -d "$(distdir)/$$file"; then \
find "$(distdir)/$$file" -type d ! -perm -700 -exec chmod u+rwx {} \;; \
fi; \
if test -d $(srcdir)/$$file && test $$d != $(srcdir); then \
cp -fpR $(srcdir)/$$file "$(distdir)$$dir" || exit 1; \
find "$(distdir)/$$file" -type d ! -perm -700 -exec chmod u+rwx {} \;; \
fi; \
cp -fpR $$d/$$file "$(distdir)$$dir" || exit 1; \
else \
test -f "$(distdir)/$$file" \
|| cp -p $$d/$$file "$(distdir)/$$file" \
|| exit 1; \
fi; \
done
check-am: all-am
check: check-am
all-am: Makefile $(DATA)
installdirs:
for dir in "$(DESTDIR)$(systemdunitdir)" "$(DESTDIR)$(systemdunitdir)"; do \
test -z "$$dir" || $(MKDIR_P) "$$dir"; \
done
install: install-am
install-exec: install-exec-am
install-data: install-data-am
uninstall: uninstall-am
install-am: all-am
@$(MAKE) $(AM_MAKEFLAGS) install-exec-am install-data-am
installcheck: installcheck-am
install-strip:
if test -z '$(STRIP)'; then \
$(MAKE) $(AM_MAKEFLAGS) INSTALL_PROGRAM="$(INSTALL_STRIP_PROGRAM)" \
install_sh_PROGRAM="$(INSTALL_STRIP_PROGRAM)" INSTALL_STRIP_FLAG=-s \
install; \
else \
$(MAKE) $(AM_MAKEFLAGS) INSTALL_PROGRAM="$(INSTALL_STRIP_PROGRAM)" \
install_sh_PROGRAM="$(INSTALL_STRIP_PROGRAM)" INSTALL_STRIP_FLAG=-s \
"INSTALL_PROGRAM_ENV=STRIPPROG='$(STRIP)'" install; \
fi
mostlyclean-generic:
clean-generic:
distclean-generic:
-test -z "$(CONFIG_CLEAN_FILES)" || rm -f $(CONFIG_CLEAN_FILES)
-test . = "$(srcdir)" || test -z "$(CONFIG_CLEAN_VPATH_FILES)" || rm -f $(CONFIG_CLEAN_VPATH_FILES)
maintainer-clean-generic:
@echo "This command is intended for maintainers to use"
@echo "it deletes files that may require special tools to rebuild."
clean: clean-am
clean-am: clean-generic clean-libtool clean-local mostlyclean-am
distclean: distclean-am
-rm -f Makefile
distclean-am: clean-am distclean-generic
dvi: dvi-am
dvi-am:
html: html-am
html-am:
info: info-am
info-am:
install-data-am: install-dist_systemdunitDATA \
install-nodist_systemdunitDATA
install-dvi: install-dvi-am
install-dvi-am:
install-exec-am:
install-html: install-html-am
install-html-am:
install-info: install-info-am
install-info-am:
install-man:
install-pdf: install-pdf-am
install-pdf-am:
install-ps: install-ps-am
install-ps-am:
installcheck-am:
maintainer-clean: maintainer-clean-am
-rm -f Makefile
maintainer-clean-am: distclean-am maintainer-clean-generic
mostlyclean: mostlyclean-am
mostlyclean-am: mostlyclean-generic mostlyclean-libtool
pdf: pdf-am
pdf-am:
ps: ps-am
ps-am:
uninstall-am: uninstall-dist_systemdunitDATA \
uninstall-nodist_systemdunitDATA
.MAKE: install-am install-strip
.PHONY: all all-am check check-am clean clean-generic clean-libtool \
clean-local cscopelist-am ctags-am distclean distclean-generic \
distclean-libtool distdir dvi dvi-am html html-am info info-am \
install install-am install-data install-data-am \
install-dist_systemdunitDATA install-dvi install-dvi-am \
install-exec install-exec-am install-html install-html-am \
install-info install-info-am install-man \
install-nodist_systemdunitDATA install-pdf install-pdf-am \
install-ps install-ps-am install-strip installcheck \
installcheck-am installdirs maintainer-clean \
maintainer-clean-generic mostlyclean mostlyclean-generic \
mostlyclean-libtool pdf pdf-am ps ps-am tags-am uninstall \
uninstall-am uninstall-dist_systemdunitDATA \
uninstall-nodist_systemdunitDATA
%.service: %.service.in
sed -e 's,[@]sbindir[@],$(sbindir),g' < $< > $@
clean-local:
-rm iprdump.service iprinit.service iprupdate.service
# Tell versions [3.59,3.63) of GNU make to not export all variables.
# Otherwise a system limit (for SysV at least) may be exceeded.
.NOEXPORT:
iprutils-2.4.18.1/systemd/iprupdate.service.in 0000664 0001750 0001751 00000000223 13305527433 016222 0000000 0000000 [Unit]
Description=IBM Power Raid update daemon
[Service]
Type=forking
ExecStart=@sbindir@/iprupdate --daemon
[Install]
WantedBy=iprutils.target
iprutils-2.4.18.1/systemd/Makefile.am 0000664 0001750 0001751 00000001243 13305527433 014275 0000000 0000000 # IBM IPR adapter configuration utility
#
# (C) Copyright 2015
# International Business Machines Corporation and others.
# All Rights Reserved. This program and the accompanying
# materials are made available under the terms of the
# Common Public License v1.0 which accompanies this distribution.
#
#
%.service: %.service.in
sed -e 's,[@]sbindir[@],$(sbindir),g' < $< > $@
systemdunitdir = @systemdunitdir@
nodist_systemdunit_DATA = iprdump.service \
iprinit.service iprupdate.service
EXTRA_DIST = iprdump.service.in \
iprinit.service.in iprupdate.service.in
dist_systemdunit_DATA = iprutils.target
clean-local:
-rm iprdump.service iprinit.service iprupdate.service
iprutils-2.4.18.1/systemd/iprdump.service.in 0000664 0001750 0001751 00000000270 13305527433 015707 0000000 0000000 [Unit]
Description=IBM Power Raid dump daemon
Before=iprinit.service iprupdate.service
[Service]
Type=forking
ExecStart=@sbindir@/iprdump --daemon
[Install]
WantedBy=iprutils.target
iprutils-2.4.18.1/iprdump.8 0000664 0001750 0001751 00000003721 13270167731 012327 0000000 0000000 .\" (C) Copyright 2000, 2004
.\" International Business Machines Corporation and others.
.\" All Rights Reserved. This program and the accompanying
.\" materials are made available under the terms of the
.\" Common Public License v1.0 which accompanies this distribution.
.TH IPRDUMP 8 "February 2005"
.SH NAME
iprdump - IBM Power RAID adapter dump utility
.SH SYNOPSIS
.B "iprdump [-d directory]"
.sp
.BI "iprdump --version --debug --use-polling --use-uevents"
.SH DESCRIPTION
.B iprdump
is used to gather information in the event of an adapter failure.
The dump data will by default be saved in the /var/log/ directory with the
prefix iprdump.# where # will be the dump ID of the file. The ipr dump
utility will make a log in the system error log when a dump is taken.
Iprdump should be started as a service daemon instead of run directly. Nevertheless,
it can also be started at any time and will properly handle adapters being
dynamically added and removed from the system. When it is run directly it will
stay running forever in order to process any dump that might occur. You can
start it with "iprdump --daemon" to force it into the background.
.SH OPTIONS
.TP
.B \-\-version
Print the version number of
.B iprdump
.TP
.B \-\-debug
Enable additional error logging. Enabling this will result in additional
errors logging to /var/log/messages.
.TP
.B \-d
Directory where dump data is to be stored. Default is /var/log/.
.TP
.B \-\-use-polling
Do not use netlink/uevent notification, but rather poll for adapter and
device configuration changes.
.TP
.B \-\-use-uevents
Use netlink/uevent notification rather than polling for adapter and
device configuration changes. If not specified, polling will be used
until the first uevent notification appears, then netlink will be used.
.TP
.B \-\-daemon
Force the daemon to be run in the background
.SH AUTHOR
Originally written by Michael Anderson . Rewritten
for the 2.6 kernel by Brian King .
iprutils-2.4.18.1/iprdbg.c 0000664 0001750 0001751 00000043200 13270167731 012165 0000000 0000000 /**
* IBM IPR adapter debug utility
*
* (C) Copyright 2003
* International Business Machines Corporation and others.
* All Rights Reserved. This program and the accompanying
* materials are made available under the terms of the
* Common Public License v1.0 which accompanies this distribution.
*
*/
/*
* $Header: /cvsroot/iprdd/iprutils/iprdbg.c,v 1.26 2006/09/08 16:26:01 brking Exp $
*/
#ifndef iprlib_h
#include "iprlib.h"
#endif
#include
#include
#include
#include
#include
#include
#include
#include
#define IPR_MAX_FLIT_ENTRIES 59
#define IPR_FLIT_TIMESTAMP_LEN 12
#define IPR_FLIT_FILENAME_LEN 184
#define IPRDBG_CONF "/etc/iprdbg.conf"
#define IPRDBG_LOG "/var/log/iprdbg"
#define SEPARATOR "--------------------------------------------------------------------------------"
char *tool_name = "iprdbg";
enum iprdbg_cmd {
IPRDBG_READ = IPR_IOA_DEBUG_READ_IOA_MEM,
IPRDBG_WRITE = IPR_IOA_DEBUG_WRITE_IOA_MEM,
IPRDBG_FLIT = IPR_IOA_DEBUG_READ_FLIT,
IPRDBG_EDF = IPR_IOA_DEBUG_ENABLE_DBG_FUNC,
IPRDBG_DDF = IPR_IOA_DEBUG_DISABLE_DBG_FUNC
};
struct ipr_bus_speeds {
u8 speed;
char *description;
};
struct ipr_bus_speeds bus_speeds[] = {
{0, "Async"},
{1, "10MB/s"},
{2, "20MB/s"},
{3, "40MB/s"},
{4, "80MB/s"},
{5, "160MB/s (DT)"},
{13, "160MB/s (packetized)"},
{14, "320MB/s (packetized)"}
};
struct ipr_flit_entry {
u32 flags;
u32 load_name;
u32 text_ptr;
u32 text_len;
u32 data_ptr;
u32 data_len;
u32 bss_ptr;
u32 bss_len;
u32 prg_parms;
u32 lid_flags;
u8 timestamp[IPR_FLIT_TIMESTAMP_LEN];
u8 filename[IPR_FLIT_FILENAME_LEN];
};
struct ipr_flit {
u32 ioa_ucode_img_rel_lvl;
u32 num_entries;
struct ipr_flit_entry flit_entry[IPR_MAX_FLIT_ENTRIES];
};
struct dbg_macro {
char *cmd;
};
static struct dbg_macro *macro;
static int num_macros;
static unsigned int last_adx;
static unsigned int last_len;
static unsigned int last_data;
static char time_str[100];
static int getcurtime(char *buf, int max)
{
time_t cur_time, rc;
struct tm *cur_tm;
int len;
buf[0] = '\0';
rc = time(&cur_time);
if (rc == ((time_t)-1))
return -EIO;
cur_tm = localtime(&cur_time);
if (!cur_tm)
return -EIO;
len = strftime(buf, max, "%b %d %T", cur_tm);
return len;
}
#define __logtofile(...) {if (outfile) {fprintf(outfile, __VA_ARGS__);}}
#define logtofile(fmt, ...) \
do { \
if (outfile) { \
getcurtime(time_str, sizeof(time_str)); \
__logtofile("%s: "fmt, time_str, ##__VA_ARGS__); \
} \
} while (0)
#define iprprint(...) {printf(__VA_ARGS__); logtofile(__VA_ARGS__);}
#define __iprprint(...) {printf(__VA_ARGS__); __logtofile(__VA_ARGS__);}
#define ipr_err(...) {fprintf(stderr, __VA_ARGS__); logtofile(__VA_ARGS__);}
#define iprloginfo(...) {syslog(LOG_INFO, __VA_ARGS__); logtofile(__VA_ARGS__);}
static FILE *outfile;
static int debug_ioctl(struct ipr_ioa *ioa, enum iprdbg_cmd cmd, int ioa_adx, int mask,
unsigned int *buffer, int len)
{
u8 cdb[IPR_CCB_CDB_LEN];
struct sense_data_t sense_data;
int rc, fd;
u32 direction = SG_DXFER_NONE;
fd = open(ioa->ioa.gen_name, O_RDWR);
if (fd < 0) {
syslog(LOG_ERR, "Error opening %s. %m\n", ioa->ioa.gen_name);
return fd;
}
memset(cdb, 0, IPR_CCB_CDB_LEN);
cdb[0] = IPR_IOA_DEBUG;
cdb[1] = cmd;
cdb[2] = (ioa_adx >> 24) & 0xff;
cdb[3] = (ioa_adx >> 16) & 0xff;
cdb[4] = (ioa_adx >> 8) & 0xff;
cdb[5] = ioa_adx & 0xff;
cdb[6] = (mask >> 24) & 0xff;
cdb[7] = (mask >> 16) & 0xff;
cdb[8] = (mask >> 8) & 0xff;
cdb[9] = mask & 0xff;
cdb[10] = (len >> 24) & 0xff;
cdb[11] = (len >> 16) & 0xff;
cdb[12] = (len >> 8) & 0xff;
cdb[13] = len & 0xff;
if (cmd == IPRDBG_WRITE)
direction = SG_DXFER_TO_DEV;
else if (len > 0)
direction = SG_DXFER_FROM_DEV;
rc = sg_ioctl_noretry(fd, cdb, buffer,
len, direction,
&sense_data, IPR_INTERNAL_TIMEOUT);
if (rc != 0)
ipr_err("Debug IOCTL failed. %d\n", errno);
close(fd);
return rc;
}
static int format_flit(struct ipr_flit *flit)
{
int num_entries = ntohl(flit->num_entries) - 1;
struct ipr_flit_entry *flit_entry;
signed int len;
char filename[IPR_FLIT_FILENAME_LEN+1];
char time[IPR_FLIT_TIMESTAMP_LEN+1];
char buf1[IPR_FLIT_FILENAME_LEN+1];
char buf2[IPR_FLIT_FILENAME_LEN+1];
char lid_name[IPR_FLIT_FILENAME_LEN+1];
char path[IPR_FLIT_FILENAME_LEN+1];
int num_args, i;
for (i = 0, flit_entry = flit->flit_entry;
(i < num_entries) && (*flit_entry->timestamp);
flit_entry++, i++) {
snprintf(time, IPR_FLIT_TIMESTAMP_LEN, "%s", (char *)flit_entry->timestamp);
time[IPR_FLIT_TIMESTAMP_LEN] = '\0';
snprintf(filename, IPR_FLIT_FILENAME_LEN, "%s", (char *)flit_entry->filename);
filename[IPR_FLIT_FILENAME_LEN] = '\0';
num_args = sscanf(filename, "%184s " "%184s " "%184s "
"%184s ", buf1, buf2, lid_name, path);
if (num_args != 4) {
ipr_err("Cannot parse flit\n");
return 1;
}
len = strlen(path);
iprprint("LID Name: %s (%8X)\n", lid_name, ntohl(flit_entry->load_name));
iprprint("LID Path: %s\n", path);
iprprint("Time Stamp: %s\n", time);
iprprint("LID Path: %s\n", lid_name);
iprprint("Text Segment: Address %08X, Length %8X\n",
ntohl(flit_entry->text_ptr), ntohl(flit_entry->text_len));
iprprint("Data Segment: Address %08X, Length %8X\n",
ntohl(flit_entry->data_ptr), ntohl(flit_entry->data_len));
iprprint("BSS Segment: Address %08X, Length %8X\n",
ntohl(flit_entry->bss_ptr), ntohl(flit_entry->bss_len));
__iprprint("%s\n", SEPARATOR);
}
return 0;
}
static void ipr_fgets(char *buf, int size, FILE *stream)
{
int i, ch = 0;
for (i = 0; ch != EOF && i < (size - 1); i++) {
ch = fgetc(stream);
if (ch == '\n')
break;
buf[i] = ch;
}
buf[i] = '\0';
strcat(buf, "\n");
}
static void dump_data(unsigned int adx, unsigned int *buf, int len)
{
char ascii_buffer[17];
int i, k, j;
for (i = 0; i < (len / 4);) {
iprprint("%08X: ", adx+(i*4));
memset(ascii_buffer, '\0', sizeof(ascii_buffer));
for (j = 0; i < (len / 4) && j < 4; j++, i++) {
__iprprint("%08X ", ntohl(buf[i]));
memcpy(&ascii_buffer[j*4], &buf[i], 4);
for (k = 0; k < 4; k++) {
if (!isprint(ascii_buffer[(j*4)+k]))
ascii_buffer[(j*4)+k] = '.';
}
}
for (;j < 4; j++) {
__iprprint(" ");
strncat(ascii_buffer, "....", sizeof(ascii_buffer)-1);
}
__iprprint(" |%s|\n", ascii_buffer);
}
}
static int flit(struct ipr_ioa *ioa, int argc, char *argv[])
{
struct ipr_flit flit;
int rc;
rc = debug_ioctl(ioa, IPRDBG_FLIT, 0, 0, (unsigned int *)&flit, sizeof(flit));
if (!rc)
format_flit(&flit);
return rc;
}
static int speeds(struct ipr_ioa *ioa, int argc, char *argv[])
{
unsigned int length = 64;
unsigned int *buffer = calloc(length/4, 4);
unsigned int adx, bus_speed;
int num_buses, bus, i, j, rc;
if (!buffer) {
ipr_err("Memory allocation error\n");
return -ENOMEM;
}
if ((ioa->ccin == 0x2780) ||
(ioa->ccin == 0x2757))
num_buses = 4;
else
num_buses = 2;
for (bus = 0, adx = 0xF0016380; bus < num_buses; bus++) {
rc = debug_ioctl(ioa, IPRDBG_READ, adx, 0, buffer, length);
if (!rc) {
__iprprint("%s\n", SEPARATOR);
iprprint("Bus %d speeds:\n", bus);
for (i = 0; i < 16; i++) {
bus_speed = ntohl(buffer[i]) & 0x0000000f;
for (j = 0; j < sizeof(bus_speeds)/sizeof(struct ipr_bus_speeds); j++) {
if (bus_speed == bus_speeds[j].speed)
iprprint("Target %d: %s\n", i, bus_speeds[j].description);
}
}
}
switch(bus) {
case 0:
adx = 0xF001e380;
break;
case 1:
adx = 0xF4016380;
break;
case 2:
adx = 0xF401E380;
break;
};
}
free(buffer);
return 0;
}
static int eddf(struct ipr_ioa *ioa, enum iprdbg_cmd cmd, int argc, char *argv[])
{
unsigned int parm1 = strtoul(argv[0], NULL, 16);
unsigned int parm2 = 0;
if (argc == 2)
parm2 = strtoul(argv[1], NULL, 16);
return debug_ioctl(ioa, cmd, parm1, parm2, NULL, 0);
}
static int edf(struct ipr_ioa *ioa, int argc, char *argv[])
{
return eddf(ioa, IPRDBG_EDF, argc, argv);
}
static int ddf(struct ipr_ioa *ioa, int argc, char *argv[])
{
return eddf(ioa, IPRDBG_DDF, argc, argv);
}
static int raw_cmd(struct ipr_ioa *ioa, int argc, char *argv[])
{
int i, rc;
unsigned int parm[4] = { 0 };
unsigned int *buf = NULL;
for (i = 0; i < argc; i++)
parm[i] = strtoul(argv[i], NULL, 16);
if (argc == 4 && parm[3])
buf = calloc(parm[3]/4, 4);
rc = debug_ioctl(ioa, parm[0], parm[1], parm[2], buf, parm[3]);
if (!rc && buf) {
dump_data(0, buf, parm[3]);
last_data = ntohl(buf[0]);
}
free(buf);
return rc;
}
static unsigned int get_adx(char *arg)
{
if (arg[0] == '@') {
if (arg[1] == '+')
return last_data + strtoul(&arg[2], NULL, 16);
else if (arg[1] == '-')
return last_data - strtoul(&arg[2], NULL, 16);
else
return last_data;
}
return strtoul(arg, NULL, 16);
}
static int bm4(struct ipr_ioa *ioa, int argc, char *argv[])
{
unsigned int adx;
unsigned int write_buf = htonl(strtoul(argv[1], NULL, 16));
unsigned int mask = strtoul(argv[2], NULL, 16);
adx = get_adx(argv[0]);
if ((adx % 4) != 0) {
ipr_err("Address must be 4 byte aligned\n");
return -EINVAL;
}
return debug_ioctl(ioa, IPRDBG_WRITE, adx, mask, &write_buf, 4);
}
static int mw4(struct ipr_ioa *ioa, int argc, char *argv[])
{
int i;
unsigned int write_buf[16];
unsigned int adx;
adx = get_adx(argv[0]);
if ((adx % 4) != 0) {
iprprint("Address must be 4 byte aligned\n");
return -EINVAL;
}
for (i = 0; i < (argc-1); i++)
write_buf[i] = htonl(strtoul(argv[i+1], NULL, 16));
return debug_ioctl(ioa, IPRDBG_WRITE, adx, 0, write_buf, (argc-1)*4);
}
static int __mr4(struct ipr_ioa *ioa, unsigned int adx, int len)
{
unsigned int *buf;
int rc;
if ((adx % 4) != 0) {
ipr_err("Address must be 4 byte aligned\n");
return -EINVAL;
}
if ((len % 4) != 0) {
ipr_err("Length must be a 4 byte multiple\n");
return -EINVAL;
}
buf = calloc(len/4, 4);
if (!buf) {
ipr_err("Memory allocation error\n");
return -ENOMEM;
}
last_len = len;
last_adx = adx;
rc = debug_ioctl(ioa, IPRDBG_READ, adx, 0, buf, len);
if (!rc) {
dump_data(adx, buf, len);
last_data = ntohl(buf[0]);
}
free(buf);
return rc;
}
static int mr4(struct ipr_ioa *ioa, int argc, char *argv[])
{
unsigned int adx;
int len = 4;
if (argc == 0) {
if (!last_len) {
ipr_err("Not enough parameters specified\n");
return -EINVAL;
}
adx = last_adx + last_len;
len = last_len;
} else {
adx = get_adx(argv[0]);
if (argc == 2)
len = strtoul(argv[1], NULL, 16);
}
return __mr4(ioa, adx, len);
}
static int help(struct ipr_ioa *ioa, int argc, char *argv[])
{
printf("\n");
printf("mr4 address length "
"- Read memory\n");
printf("mw4 address data "
"- Write memory\n");
printf("bm4 address data preserve_mask "
"- Modify bits set to 0 in preserve_mask\n");
printf("edf parm1 parm2 "
"- Enable debug function\n");
printf("ddf parm1 parm2 "
"- Disable debug function\n");
printf("raw cmd [parm1] [parm2] [length] "
"- Manually execute IOA debug command\n");
printf("speeds "
"- Current bus speeds for each device\n");
printf("flit "
"- Format the flit\n");
printf("macros "
"- List currently loaded macros\n");
printf("exit "
"- Exit the program\n\n");
return 0;
}
static int quit(struct ipr_ioa *ioa, int argc, char *argv[])
{
closelog();
openlog("iprdbg", LOG_PID, LOG_USER);
iprloginfo("iprdbg on %s exited\n", ioa->pci_address);
closelog();
exit(0);
return 0;
}
static int macros(struct ipr_ioa *ioa, int argc, char *argv[])
{
int i;
if (num_macros == 0)
printf("No macros loaded. Place macros in "IPRDBG_CONF"\n");
for (i = 0; i < num_macros; i++)
printf("%s\n", macro[i].cmd);
return 0;
}
static const struct {
char *cmd;
int min_args;
int max_args;
int (*func)(struct ipr_ioa *,int argc, char *argv[]);
} command [] = {
{ "mr4", 0, 2, mr4 },
{ "mw4", 2, 17, mw4 },
{ "bm4", 3, 3, bm4 },
{ "edf", 1, 2, edf },
{ "ddf", 1, 2, ddf },
{ "raw", 1, 4, raw_cmd },
{ "flit", 0, 0, flit },
{ "speeds", 0, 0, speeds },
{ "help", 0, 0, help },
{ "?", 0, 0, help },
{ "quit", 0, 0, quit },
{ "q", 0, 0, quit },
{ "exit", 0, 0, quit },
{ "x", 0, 0, quit },
{ "macros", 0, 0, macros },
};
static int last_cmd = -1;
static int exec_cmd(struct ipr_ioa *ioa, int cmd, int argc, char *argv[])
{
int num_args = argc - 1;
if (num_args < command[cmd].min_args) {
ipr_err("Not enough arguments specified.\n");
return -EINVAL;
}
if (num_args > command[cmd].max_args) {
ipr_err("Too many arguments specified.\n");
return -EINVAL;
}
if (last_cmd != cmd)
last_len = 0;
last_cmd = cmd;
return command[cmd].func(ioa, num_args, &argv[1]);
}
static int cmd_to_args(char *cmd, int *rargc, char ***rargv)
{
char *p;
char **argv = NULL;
int len = 0;
int total_len = strlen(cmd);
if (cmd[total_len-1] == '\n') {
cmd[total_len-1] = '\0';
total_len--;
}
if (*cmd == '\0')
return 0;
for (p = strrchr(cmd, ' '); p; p = strrchr(cmd, ' '))
*p = '\0';
for (p = strrchr(cmd, '\t'); p; p = strrchr(cmd, '\t'))
*p = '\0';
for (p = cmd, len = 0; p < cmd + total_len; p += (strlen(p) + 1), len++) {
if (strlen(p) == 0) {
len--;
continue;
}
argv = realloc(argv, sizeof(char *)*(len+1));
argv[len] = p;
}
*rargv = argv;
*rargc = len;
return len;
}
static int exec_macro(struct ipr_ioa *ioa, char *cmd);
static int __parse_cmd(struct ipr_ioa *ioa, int argc, char *argv[])
{
int i;
for (i = 0; i < ARRAY_SIZE(command); i++) {
if (strcasecmp(argv[0], command[i].cmd) != 0)
continue;
return exec_cmd(ioa, i, argc, argv);
}
for (i = 0; i < num_macros; i++) {
if (strncasecmp(argv[0], macro[i].cmd, strlen(argv[0])) != 0)
continue;
return exec_macro(ioa, macro[i].cmd);
}
iprprint("Invalid command %s. Use \"help\" for a list "
"of valid commands\n", argv[0]);
return -EINVAL;
}
static int parse_cmd(struct ipr_ioa *ioa, int argc, char *argv[])
{
int i, rc = 0;
int index = 0;
char *end;
for (i = 0; i < argc; i++) {
end = strchr(argv[i], ':');
if (!end)
end = strchr(argv[i], ';');
if (!end)
continue;
if (strlen(argv[i]) == 1) {
rc = __parse_cmd(ioa, i - index, &argv[index]);
} else {
*end = '\0';
rc = __parse_cmd(ioa, (i + 1) - index, &argv[index]);
}
index = i + 1;
if (rc)
return rc;
}
return __parse_cmd(ioa, i - index, &argv[index]);
}
static int exec_macro(struct ipr_ioa *ioa, char *cmd)
{
int argc;
char **argv = NULL;
char *copy = malloc(strlen(cmd) + 1);
int rc = -EINVAL;
if (!copy)
return -ENOMEM;
strcpy(copy, cmd);
if (!cmd_to_args(copy, &argc, &argv))
goto out_free_argv;
rc = parse_cmd(ioa, argc - 1, &argv[1]);
free(copy);
out_free_argv:
free(argv);
return rc;
}
static int main_cmd_line(int argc, char *argv[])
{
struct ipr_dev *dev;
if (argc < 3) {
ipr_err("Invalid option\n");
return -EINVAL;
}
dev = find_dev(argv[argc-1]);
if (!dev) {
ipr_err("Invalid IOA specified: %s\n", argv[argc-1]);
return -EINVAL;
}
return parse_cmd(dev->ioa, argc-2, &argv[1]);
}
static struct ipr_ioa *select_ioa()
{
int i, num_args, ioa_num = 0;
struct ipr_ioa *ioa;
char cmd_line[1000];
if (num_ioas > 1) {
printf("\nSelect adapter to debug:\n");
i = 1;
for_each_ioa(ioa)
printf("%d. IBM %X: Location: %s %s\n",
i++, ioa->ccin, ioa->pci_address, ioa->ioa.gen_name);
printf("%d to quit\n", i);
printf("\nSelection: ");
fgets(cmd_line, 999, stdin);
num_args = sscanf(cmd_line, "%d\n", &ioa_num);
if (ioa_num == i)
return NULL;
if (num_args != 1 || ioa_num > num_ioas)
return NULL;
for (ioa = ipr_ioa_head, i = 1; i < ioa_num; ioa = ioa->next, i++) {}
} else
ioa = ipr_ioa_head;
return ioa;
}
static int exec_shell_cmd(struct ipr_ioa *ioa, char *cmd)
{
char **argv = NULL;
int argc, rc;
if (!cmd_to_args(cmd, &argc, &argv))
return mr4(ioa, 0, NULL);
rc = parse_cmd(ioa, argc, argv);
free(argv);
return rc;
}
static void add_new_macro(char *cmd)
{
char *buf = malloc(strlen(cmd) + 1);
if (!buf)
return;
macro = realloc(macro, (num_macros + 1) * sizeof(struct dbg_macro));
if (!macro) {
free(buf);
return;
}
strcpy(buf, cmd);
if (buf[strlen(buf) - 1] == '\n')
buf[strlen(buf) - 1] = '\0';
macro[num_macros++].cmd = buf;
}
static void load_config()
{
char buf[2000];
FILE *config = fopen(IPRDBG_CONF, "r");
if (!config)
return;
while (!feof(config)) {
if (!fgets(buf, sizeof(buf), config))
break;
if (buf[0] == '#')
continue;
add_new_macro(buf);
}
fclose(config);
}
int main(int argc, char *argv[])
{
char cmd_line[1000];
struct ipr_ioa *ioa;
openlog("iprdbg",
LOG_PERROR | /* Print error to stderr as well */
LOG_PID | /* Include the PID with each error */
LOG_CONS, /* Write to system console if there is an error
sending to system logger */
LOG_USER);
outfile = fopen(IPRDBG_LOG, "a");
if (!outfile)
outfile = fopen(".iprdbglog", "a");
tool_init(0);
check_current_config(false);
load_config();
if (argc > 1)
return main_cmd_line(argc, argv);
ioa = select_ioa();
if (!ioa)
return -ENXIO;
closelog();
openlog("iprdbg", LOG_PID, LOG_USER);
iprloginfo("iprdbg on %s started\n", ioa->pci_address);
closelog();
openlog("iprdbg", LOG_PERROR | LOG_PID | LOG_CONS, LOG_USER);
printf("\nATTENTION: This utility is for adapter developers only! "
"Use at your own risk!\n");
printf("\nUse \"quit\" to exit the program.\n\n");
while(1) {
printf("IPRDB(%X)> ", ioa->ccin);
ipr_fgets(cmd_line, 999, stdin);
__logtofile("%s\n", SEPARATOR);
logtofile("%s", cmd_line);
exec_shell_cmd(ioa, cmd_line);
}
return 0;
}
iprutils-2.4.18.1/iprconfig.8 0000664 0001750 0001751 00000070633 13270167731 012635 0000000 0000000 .\" (C) Copyright 2000, 2009
.\" International Business Machines Corporation and others.
.\" All Rights Reserved. This program and the accompanying
.\" materials are made available under the terms of the
.\" Common Public License v1.0 which accompanies this distribution.
.TH IPRCONFIG 8 "August 2009"
.SH NAME
iprconfig \- IBM Power RAID storage adapter configuration/recovery utility
.SH SYNOPSIS
.BI "iprconfig [-e editor] [-k dir] [-c command]"
.sp
.BI "iprconfig --version --debug --force"
.SH DESCRIPTION
.B iprconfig
is used to configure IBM Power RAID storage adapters, display information
about them, and to perform adapter and disk unit recovery.
The menu options are:
.PP
.B 1. Display hardware status.
.br
This option can be used to display various information regarding
the IBM Power RAID adapters attached to the system and the disk
units controlled by them. For each adapter and disk unit, their
/dev name, physical location, description, vendor/product ID, and
hardware status will be available. Beside each resource is an OPT
field. By entering a 1 beside any resource, detailed information
about that resource can be obtained. For an adapter resource, this
will display the adapter firmware version and the physical location
amongst other things.
.PP
.B 2. Work with Disk Arrays
.br
This option will present a second menu containing disk array related
commands.
.PP
.B Display disk array status
is used to display the status of disk arrays on the system.
.PP
.B Create a disk array
is used to create a disk array.
.PP
.B Delete a disk array
is used to delete disk arrays. Selecting this option will provide you
with a list of disk arrays which can be deleted.
.PP
.B Add a device to a disk array
is used to include devices of similar capacity into an existing disk
array. This function is currently only supported for RAID 5 and RAID 6
disk arrays.
.PP
.B Format device for advanced function
is used to format disks to 522 bytes/sector so that they may be used in
a disk array. Only disks which are not formatted for advanced function
or are formatted for advanced function but are not known to be zeroed will
be available for selection for this function.
.PP
.B Format device for JBOD function (512)
is used to format disks to 512 bytes/sector so that they may be used
as standalone disks. Only disks which are not formatted for JBOD function
or are formatted for JBOD function and are in the Format Required state
will be available for this function.
.PP
.B Work with hot spares
is used to create a hot spare which designates a device as a dedicated hot
spare. It is also used to delete a hot spare which unconfigures a previously
configured hot spare.
.\".B Create a hot spare
.\"is used to designate a device as a dedicated hot spare.
.\".PP
.\".B Delete a hot spare
.\"is used to unconfigure a previously configured hot spare.
.PP
.B Work with asymmetric access
is used to select which path of a disk array will be the primary path in a dual
controller environment. Asymmetric Access must be enabled on the adapter first.
Not all adapters support asymmetric access and adapters that do provide support
may require updated microcode.
.PP
.B Force RAID Consistency Check
is used to force a consistency check on a RAID array. All ipr adapters
continually perform background consistency checking when idle. This
option can be used to force a consistency check to be performed.
.PP
.B Migrate disk array protection
is used to change the RAID protection level for an array to another supported
level. In some cases, this will require adding more disks to the array. In
other cases, disks will be freed.
.PP
.B 3. Work with disk unit recovery
is used to perform the following disk unit recovery actions:
.PP
.B Concurrent add device
is used to concurrently add a new disk to a running system. This feature
is only supported with SES (SCSI Enclosure Services) packaging.
.PP
.B Concurrent remove device
is used to concurrently remove a disk from a running system.
This feature is only supported with SES (SCSI Enclosure Services) packaging.
.PP
.B Initialize and format disk unit
is used to issue a SCSI format command to attached devices. A format
unit command has special meaning to the adapter and is used as a service
action for certain error conditions. Formatting a disk unit will lose
all data on that drive. If the disk is attached to an ipr adapter that
does not support RAID, the drive will be formatted to 512 bytes/sector.
If the disk is attached to an ipr RAID adapter, the block size will not
be changed. To change the block size, use the format menu options under
the disk arrays menu.
.PP
.B Reclaim IOA cache storage
is used to repair cache error conditions.
.B ATTENTION:
Use this option with care. This is used to discard data from the cache
and may result in data loss. This option is designed to be used by
authorized IBM hardware customer engineers.
.PP
.B Rebuild disk unit data
is generally used following concurrent maintenance. Select this option after
a failing array member device has been replaced to reconstruct the device as
an active array member.
.PP
.B Work with resources containing cache battery packs
is used to display information regarding rechargeable cache battery packs
and to force rechargeable cache battery packs into an error state so that
they can be replaced prior to failure.
.B ATTENTION:
Once an error has been forced on a rechargeable cache battery pack write
caching will be disabled until the battery pack is replaced.
.PP
.B 4. Work with SCSI bus configuration
is used to change configurable SCSI bus attributes, such as maximum SCSI
bus speed, SCSI initiator ID, etc.
.PP
.B 5. Work with driver configuration
is used to change driver configurable attributes, such as log_level.
.PP
.B 6. Work with disk configuration
is used to change configurable disk attributes, such as queue depth.
.PP
.B 7. Work with adapter configuration
is used to change configurable adapter attributes, such as dual adapter
settings. Refer to the following command line options: primary, secondary,
query-ha-mode, set-ha-mode, set-ioa-asymmetric-access and
set-array-asymmetric-access for more information regarding these settings.
.PP
.B 8. Download microcode
is used to download microcode to ipr adapters and attached SCSI disks.
.PP
.B 9. Analyze Log
is an option available to analyze /var/log/messages* files. By default
it will use vi as the editor to open the concatenated error log files.
This can be changed by using option 6 on the
.B Kernel Messages Log
menu. Selecting
option 1 on the Kernel Messages Log menu will display only the most recent
errors logged by the ipr device driver and may be useful to filter out
some of the clutter. Option 2 will display all recorded errors logged by the
ipr device driver. Option 3 will display all kernel messages. Option 4 will
display errors logged by the iprconfig utility. This may be useful for
debugging problems. Option 5 can be used to change where the tool looks
to find the kernel messages files. The default is to look in /var/log.
.SH OPTIONS
.TP
.B \-e editor
Default editor for viewing error logs. The default editor is vi, but can be
changed with this parameter.
.TP
.B -k directory
Kernel messages root directory. Root directory to look for kernel messages.
Default is /var/log.
.TP
.B -c command
Command line, non-interactive commands. Currently supported commands include:
.RS
.TP
.B show-config
.br
Show ipr configuration.
.TP
.B show-alt-config
.br
Show alternate ipr configuration information.
.TP
.B show-ioas
.br
Show all ipr adapters.
.TP
.B show-arrays
.br
Show all ipr arrays.
.TP
.B show-battery-info [IOA]
.br
Show cache battery information for specified IOA. Example:
.br
.B iprconfig -c show-battery-info sg5
.TP
.B show-details [device]
.br
Show device details for specified device. Example:
.br
.B iprconfig -c show-details sda
.TP
.B show-hot-spares
.br
Show all configured hot spares.
.TP
.B show-af-disks
.br
Show disks formatted for Advanced Function that are not
configured in an array or as a hot spare.
.TP
.B show-all-af-disks
.br
Show all disks formatted for Advanced Function
.TP
.B show-jbod-disks
.br
Show all disks formatted for JBOD Function.
.TP
.B show-slots
.br
Show all disks slots available on the system.
.TP
.B status [device]
.br
Show the status of the specified device. This is the same status as which shows
up in the last column of the Display hardware status menu. Can specify either a
/dev/sdX name or a /dev/sgX name. Example:
.br
.B iprconfig -c status /dev/sda
.br
.TP
.B alt-status [device]
.br
Show the status of the specified device. This is the same status as above with
the exception of when a long running command is executing to the device, in
which case the percent complete for the long running command is printed.
.br
.TP
.B query-raid-create [IOA]
.br
Show all devices attached to the specified IOA that are candidates for being
used in a RAID array. Example:
.br
.B iprconfig -c query-raid-create sg5
.TP
.B query-raid-delete [IOA]
.br
Show all RAID arrays attached to the specified IOA that can be deleted.
.br
.B iprconfig -c query-raid-delete sg5
.TP
.B query-hot-spare-create [IOA]
.br
Show all devices attached to the specified IOA that are candidates for being
hot spares.
.TP
.B query-hot-spare-delete [IOA]
.br
Show all hot spares attached to the specified IOA that can be deleted.
.TP
.B query-raid-consistency-check
.br
Show all RAID arrays that are candidates for a RAID consistency check.
.TP
.B query-format-for-jbod
.br
Show all disks that can be reformatted for JBOD function.
.TP
.B query-reclaim
.br
Show all IOAs that may need a reclaim cache storage.
.TP
.B query-arrays-raid-include
.br
Show all RAID arrays that can have disks included in them to increase
their capacity.
.TP
.B query-devices-raid-include [array]
.br
Show all disks that can be added to the specified array to increase its
capacity.
.TP
.B query-supported-raid-levels [IOA]
.br
Show all RAID levels supported by the specified adapter.
.TP
.B query-include-allowed [IOA] [raid level]
.br
Some RAID levels allow for adding additional disks to existing disk
arrays to increase their capacity. Prints "yes" to stdout if the specified
RAID level supports this function, else prints "no".
.TP
.B query-max-devices-in-array [IOA] [raid level]
.br
Print the maximum number of devices allowed in a RAID array of the specified
RAID level for the specified RAID adapter.
.TP
.B query-min-devices-in-array [IOA] [raid level]
.br
Print the minimum number of devices allowed in a RAID array of the specified
RAID level for the specified RAID adapter.
.TP
.B query-min-mult-in-array [IOA] [raid level]
.br
Print the minimum multiple of devices required in a RAID array of the specified
RAID level for the specified RAID adapter.
.TP
.B query-supp-stripe-sizes [IOA] [raid level]
.br
Print all supported stripe sizes supported for RAID arrays of the specified
RAID level on the specified RAID adapter. Stripe sizes are printed in
units of KB.
.TP
.B query-recommended-stripe-size [IOA] [raid level]
.br
Print the default/recommended stripe size for RAID arrays of the specified
RAID level on the specified RAID adapter. Stripe size is in units of KB.
.TP
.B query-recovery-format
.br
Show all disks that can be formatted for error recovery purposes.
.TP
.B query-raid-rebuild
.br
Show all disks in RAID arrays that can be rebuilt.
.TP
.B query-format-for-raid
.br
Show all disks that can be formatted such that they can be used
in a RAID array or as a hot spare.
.TP
.B query-ucode-level [device]
.br
Show the microcode level that is currently loaded on the specified device.
Note: The device specified may be the sg device associated with an IOA,
in which case the IOA's microcode level will be shown.
.TP
.B ssd-report [device]
.br
Display information about Read Intensive SSD devices in the system.
.TP
.B show-ucode-levels
.br
Show the microcode level that is currently loaded for every device and
adapter in the system. If newer microcode is available on the filesystem
than what is loaded on the device, an * chararacter will be displayed next
to the device.
.TP
.B query-format-timeout [device]
.br
Show the current format timeout to be used when formatting the specified disk.
This value is only applicable when the device is currently in Advanced Function
format.
.TP
.B query-qdepth [device]
.br
Show the queue depth currently being used for the specified disk.
.TP
.B query-tcq-enable [device]
.br
Print 1 to stdout if tagged queuing is enabled for the specified device,
else print 0 to stdout.
.TP
.B query-log-level [IOA]
.br
Print the current log level being used for the specified IOA. Can be a number
from 0 to n.
.TP
.B query-add-device
.br
Show all empty disk slots that can have a disk concurrently added.
.TP
.B query-remove-device
.br
Show all disk slots which are either empty or have disks in them which can
be concurrently removed from the running system.
.TP
.B query-initiator-id [IOA] [busno]
.br
Show the current SCSI initiator ID used by the IOA for the specified SCSI bus.
.TP
.B query-bus-speed [IOA] [busno]
.br
Show the current maximum SCSI bus speed allowed on the specified SCSI bus.
.TP
.B query-bus-width [IOA] [busno]
.br
Show the current SCSI bus width in units of bits for the specified SCSI bus.
.TP
.B query-path-status [IOA]
.br
Show the current dual path state for the SAS devices attached specified IOA.
.TP
.B query-path-details [device]
.br
Show the current dual path details for the specified SAS device.
.TP
.B query-arrays-raid-migrate
.br
Show the arrays that can be migrated to a different protection level.
.TP
.B query-devices-raid-migrate [array]
.br
Show the AF disks that are candidates to be used in a migration for a given
array.
.TP
.B query-raid-levels-raid-migrate [array]
.br
Show the protection levels to which the given array can be migrated.
.TP
.B query-stripe-sizes-raid-migrate [array] [raid level]
.br
Given an array and a protection level, show the valid stripe sizes to which
the array can be migrated.
.TP
.B query-devices-min-max-raid-migrate [array] [raid level]
.br
Show the number of devices that will be removed for a migration to a protection
level that requires fewer devices. Or, show the minmum number of devices
required, the maximum number of devices allowed and the multiple of the number
of devices required for a migration that requires more devices.
.TP
.B query-ioas-asymmetric-access
.br
Show the IOAs that support asymmetric access.
.TP
.B query-arrays-asymmetric-access
.br
Show the disk arrays that are candidates for setting their asymmetric access
mode to Optimized or Non-Optimized.
.TP
.B query-ioa-asymmetric-access-mode [IOA]
.br
Show the current asymmetric access mode for the given IOA.
.TP
.B query-array-asymmetric-access-mode [array]
.br
Show the current asymmetric access mode for the given disk array.
.TP
.B query-ioa-caching [IOA]
.br
Show whether or not the user requested caching mode for the given IOA is set to
default or disabled.
.TP
.B query-array-label [label]
.br
Show the device name of the array with the specified label. Label must have
been specified when creating the RAID array. See raid-create command.
.TP
.B query-array-rebuild-rate [IOA]
Show the array rebuild rate for the given IOA.
.br
.TP
.B query-array-rebuild-verify [IOA]
Show whether array rebuild verification is enabled for the given IOA.
.br
.TP
.B query-array [location]
.br
Show the device name of the array of which one of the disks in the array
has the specified platform location code.
.TP
.B query-device [location]
.br
Show the device name of the disk that has the specified platform location code.
.TP
.B query-location [device]
.br
The device specified can be either the device name of a disk or the device name
of a single disk RAID 0 array. If the specified device name is a disk, the
platform location code will be displayed. If the specified device name is a single
device RAID 0 array, the platform location of the disk which is a member of the
specified array will be displayed.
.TP
.B query-write-cache-policy [device]
.br
Show the current write cache policy for [device].
.TP
.B raid-create [-r raid_level] [-s stripe_size_in_kb] [-l label] [--skip-format] [-c cache_policy] [devices...]
Create a RAID array. RAID level can be any supported RAID level for the given
adapter, such as 0, 10, 5, 6. Currently supported stripe sizes in kb
include 16, 64, and 256. If raid_level is not specified, it will default to
RAID 5. If stripe size is not specified, it will default to the recommended
stripe size for the selected RAID level. Available cache policies are the
same that can be passed to set-write-cache-policy command. If none is
specified, write back is assumed. Devices are specified with their full
name, either the /dev/sd name or the /dev/sg name is acceptable. On some RAID
adapters, a label can also be specified. Example array
creation:
.br
.B iprconfig -c raid-create -r 5 -s 64 /dev/sda /dev/sdb /dev/sdc
.br
This would create a RAID 5 array with a 64k stripe size using the specified
devices.
.TP
.B raid-delete [RAID device]
Delete the specified RAID array. Specify either the /dev/sd name or the /dev/sg
name. Only 1 array can be deleted with a single command. Example:
.br
.B iprconfig -c raid-delete /dev/sda
.br
This would delete the disk array represented by /dev/sda
.TP
.B raid-include [array] [disk] ... [disk]
.br
Add the specified devices to the specified disk array to increase its capacity.
Example:
.br
.B iprconfig -c raid-include sda sg6 sg7
.TP
.B raid-migrate -r raid_level [-s stripe_size_in_kb] array [disk] ... [disk]
.br
Migrate an existing RAID array to a new RAID protection level. Optionally,
a new stripe size can be given. In some cases one or more new disks must be
added for the migration to succeed.
Example:
.br
.B iprconfig -c raid-migrate -r 10 -s 64 sda sg5 sg6
.TP
.B format-for-raid [disk] ... [disk]
.br
Format the specified disks for Advanced Function so they can be used in
a RAID array or as a hot spare.
.TP
.B format-for-jbod [disk] ... [disk]
.br
Format the specified disks for JBOD Function so they can be used as
standalone disks.
.TP
.B recovery-format [disk] ... [disk]
.br
Format the specified disks as directed by the reference guide for error
recovery purposes.
.TP
.B hot-spare-create [disk]
.br
Create a hot spare using the specified Advanced Function disk.
.TP
.B hot-spare-delete [disk]
.br
Delete the specified hot spare.
.TP
.B disrupt-device [disk]
.br
Force the specified Advanced Function device failed.
.TP
.B reclaim-cache [IOA]
.br
Reclaim the specified IOA's write cache.
.B ATTENTION:
Use this option with care. This is used to discard data from the cache
and may result in data loss. This option is designed to be used by
authorized IBM hardware customer engineers.
.TP
.B reclaim-unknown-cache [IOA]
.br
Reclaim the specified IOA's write cache and allow unknown data loss.
.B ATTENTION:
Use this option with care. This is used to discard data from the cache
and WILL result in data loss. This option is designed to be used by
authorized IBM hardware customer engineers.
.TP
.B raid-consistency-check [array]
.br
Force a full RAID consistency check on the specified array. This command
will return before the RAID consistency check has completed. Use the
.B status
command to check the status of the command.
.TP
.B raid-rebuild [disk]
.br
Following a disk replacement for a failed disk in a RAID array, use
this command to rebuild the failed disk's data onto the new disk and
return the disk array to the
.B Active
state.
.TP
.B update-ucode [device] [microcode file]
.br
Update the microcode on the specified device (IOA or disk) with
the specified microcode file.
.B ATTENTION:
Limited checking of the microcode image is done. Make sure the
specified microcode file is the correct file for the specified device.
.TP
.B update-all-ucodes
.br
Update the microcode of every device with the latest version found in
the system.
.TP
.B set-format-timeout [disk] [timeout in hours]
.br
Set the format timeout to be used when formatting the specified disk.
.TP
.B set-qdepth [device] [queue depth]
.br
Set the queue depth for the specified device or disk array.
.TP
.B set-tcq-enable [device] [0 = disable, 1 = enable]
.br
Enable/disable tagged command queueing for the specified device.
.TP
.B set-log-level [IOA] [log level]
.br
Set the error logging verbosity to use for the specified IOA.
Default is 2.
.TP
.B set-write-cache-policy [device] [writeback|writethrough]
.br
Set the write cache policy for [device]. Available policies are
writeback and writethrough. This command supports JBOD disk (write
cache) and Volume Sets (vset write cache). Example:
.br
.B iprconfig -c set-write-cache-policy sdp writeback
.TP
.B identify-disk [disk] [0 = turn off identify LED, 1 = turn on identify LED]
.br
Turn on/off the disk identify LED for the specified disk. This function
may or may not be available depending on the hardware packaging.
.TP
.B identify-slot [location] [0 = turn off identify LED, 1 = turn on identify LED]
.br
Turn on/off the disk identify LED for the specified location. This function
may or may not be available depending on the hardware packaging. Example:
.br
.B iprconfig -c identify-slot 0000:d8:01.0/0:1:1: 1
.TP
.B remove-disk [disk] [0 = turn off identify LED, 1 = turn on identify LED]
.br
Turn on/off the disk remove identify LED for the specified device. When 1
is specified as the second argument, the specified disk is set to the remove
state. When in this state, the disk may be removed. Once the disk has been
physically removed, iprconfig must be invoked again with the second argument
set to 0. This turns off the slot identifier light and logically removes
the disk from the host operating system.
.TP
.B remove-slot [location] [0 = turn off identify LED, 1 = turn on identify LED]
.br
Turn on/off the disk remove identify LED for the specified location. When 1
is specified as the second argument, the specified location is set to the remove
state. When in this state, the disk may be removed. Once the disk has been
physically removed, iprconfig must be invoked again with the second argument
set to 0. This turns off the slot identifier light and logically removes
the disk from the host operating system. Example:
.br
.B iprconfig -c remove-slot 0000:d8:01.0/0:1:1: 1
.TP
.B add-slot [location] [0 = turn off identify LED, 1 = turn on identify LED]
.br
Turn on/off the disk insert identify LED for the specified location. When 1
is specified as the second argument, the specified location is set to the insert
state. When in this state, the disk may be inserted. Once the disk has been
physically inserted, iprconfig must be invoked again with the second argument
set to 0. This turns off the slot identifier light and logically adds
the disk to the host operating system. Example:
.br
.B iprconfig -c add-slot 0000:d8:01.0/0:1:1: 1
.TP
.B set-initiator-id [IOA] [busno] [initiator id]
.br
Set the IOA's SCSI initiator ID for the specified bus. Must be a value
between 0 and 7 and must not conflict with any other device on the SCSI bus.
.TP
.B set-bus-speed [IOA] [busno] [speed in MB/sec]
.br
Set the maximum SCSI bus speed allowed on the specified SCSI bus.
.TP
.B set-bus-width [IOA] [busno] [bus width in # bits]
.br
Set the SCSI bus width to use for the specified SCSI bus. Example:
.br
.B iprconfig -c set-bus-width sg5 0 16
.TP
.B primary [IOA]
.br
Set the adapter as the
.B preferred primary
adapter. This is used in dual initiator RAID configurations to indicate
which adapter should be the
.B primary
adapter. The
.B primary
adapter should be the adapter receiving the majority of the I/O. Example:
.br
.B iprconfig -c primary sg5
.TP
.B secondary [IOA]
.br
Set the adapter to indicate it is not the
.B preferred primary
adapter. See the notes for the
.B preferred primary
for additional information. Example:
.br
.B iprconfig -c secondary sg5
.TP
.B set-all-primary
.br
Set all attached ipr adapters as the
.B preferred primary
adapter. This can be used when running a dual initiator RAID HA configuration.
This command can be run on the
.B primary
system to quickly enable the
.B preferred primary
mode for all attached adapters. Refer to /etc/ha.d/resource.d/iprha for
an example of how this might be used. Example:
.br
.B iprconfig -c set-all-primary
.TP
.B set-all-secondary
.br
Set all attached ipr adapters to indicate they are not the
.B preferred primary
adapter. Example:
.br
.B iprconfig -c set-all-secondary
.TP
.B query-ha-mode [IOA]
.br
When an adapter is configured in a highly available dual adapter configuration,
it may be able to be configured in one of two ways. The default mode is
.B Normal.
This mode is used for all SCSI adapters and many SAS adapters.
Some SAS adapters also support a
.B JBOD
dual adapter configuration. This mode is to be used when the dual adapter
configuration is to consist of JBOD disks rather than RAID arrays. If the adapter
is
.B NOT
going to be used in a dual adapter configuration, this mode
.B MUST
be set to
.B Normal.
Example:
.br
.B iprconfig -c query-ha-mode sg5
.TP
.B set-ha-mode [IOA] [Normal | RAID]
Used to set the high-availability mode of the adapter. Refer to the
.B query-ha-mode
command for more information regarding these settings. Example:
.br
.B iprconfig -c set-ha-mode sg5 Normal
.TP
.B set-array-asymmetric-access-mode [array] [Optimized | Non-Optimized]
Used to set the asymmetric access mode of the disk array. Example:
.br
.B iprconfig -c set-array-asymmetric-access-mode sda Optimized
.TP
.B set-ioa-asymmetric-access-mode [IOA] [Enabled | Disabled]
Used to set the asymmetric access mode of the IOA.
.br
Example:
.br
.B iprconfig -c set-ioa-asymmetric-access-mode sg5 Enabled
.TP
.B set-ioa-caching [IOA] [Default | Disabled]
Used to set the requested caching mode of the IOA.
.br
Example:
.br
.B iprconfig -c set-ioa-caching sg5 Disabled
.TP
.B set-array-rebuild-verify [IOA] [enable | disable | default]
Used to define whether to perform verification during an array rebuild.
Enabling this can affect performance. The default value is disabled.
.br
Example:
.br
.B iprconfig -c set-array-rebuild-rate sg5 disable
.TP
.B set-array-rebuild-rate [IOA] [Rebuild Rate | default]
Used to set the rebuilt rate ratio of the IOA. [Rebuild Rate] must be in
range 10..100. If 'default' is used, the IOA will reset to the
implementation default rate. The value actually configured may not be
the exact rate configured by the user, but an approximation to the
closest rate supported by the IOA.
.br
Example:
.br
.B iprconfig -c set-array-rebuild-rate sg5 10
.TP
.B get-live-dump [IOA]
Dump the IOA's implementation unique critical information. The dump data
will be saved in the /var/log/ directory with the pattern
ipr-CCIN-PCI_ADDRESS-dump-TIMESTAMP.
.br
Example:
.br
.B iprconfig -c get-live-dump sg5
.br
.TP
.B dump
Display detailed hardware and system information on standard output.
In case a report file is needed, the iprsos command will create one at
/var/log/iprsos.log.
.br
Example:
.br
.B iprconfig -c dump
.br
.RE
.TP
.B \-\-version
Print version number of
.B iprconfig
.TP
.B \-\-debug
Enable additional error logging. Enabling this will result in additional
errors logging to /var/log/messages.
.TP
.B \-\-force
Disable safety checks. Use this to disable safety checks in iprconfig.
This will allow you to format devices that are not at the appropriate
code levels. Only use this option if you really know what you are doing.
.SH AUTHOR
Brian King
.SH NOTES
.TP
.B Notes on using under iSeries 5250 telnet
.PP
Only use this utility across 5250 telnet when there are no other options
available to you. Since there may be occasions when 5250 telnet is your only
option to access your iSeries Linux console, every attempt has been made to
make this utility usable under 5250 telnet. By following a few guidelines,
you can make your 5250 telnet experience more productive and much less
frustrating.
.PP
1. First of all, it will be helpful to know how the keys are mapped under
5250 telnet. From the 5250 telnet window, hit ESC. This will get you to the
.B Send TELNET Control Functions
menu. Take option 6 to display the keyboard map. Take note of how TAB, ESC,
CTLC, and SENDWOCR are bound. They will be useful in the future.
.PP
2. When selecting menu options, enter the menu number, followed by the
enter key, same as usual.
.PP
3. When typing single character commands (eg. r=Refresh), type the single
character followed by the SENDWOCR key (F11 by default).
.PP
4. When on a device/array/IOA selection screen (eg. Display Disk Unit Details),
do NOT use the arrow keys to navigate. Instead use the TAB key (F7 by default)
to navigate these screens.
.PP
5. Beware of the backspace and delete keys. As a rule do NOT use them.
.PP
6. When editing the root kernel message log directory or the default editor,
you may use the arrow keys, but not the backspace and delete keys. Use the
space bar to remove already typed characters.
iprutils-2.4.18.1/depcomp 0000755 0001750 0001751 00000056016 12257332274 012136 0000000 0000000 #! /bin/sh
# depcomp - compile a program generating dependencies as side-effects
scriptversion=2013-05-30.07; # UTC
# Copyright (C) 1999-2013 Free Software Foundation, Inc.
# This program is free software; you can redistribute it and/or modify
# it under the terms of the GNU General Public License as published by
# the Free Software Foundation; either version 2, or (at your option)
# any later version.
# This program is distributed in the hope that it will be useful,
# but WITHOUT ANY WARRANTY; without even the implied warranty of
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
# GNU General Public License for more details.
# You should have received a copy of the GNU General Public License
# along with this program. If not, see .
# As a special exception to the GNU General Public License, if you
# distribute this file as part of a program that contains a
# configuration script generated by Autoconf, you may include it under
# the same distribution terms that you use for the rest of that program.
# Originally written by Alexandre Oliva .
case $1 in
'')
echo "$0: No command. Try '$0 --help' for more information." 1>&2
exit 1;
;;
-h | --h*)
cat <<\EOF
Usage: depcomp [--help] [--version] PROGRAM [ARGS]
Run PROGRAMS ARGS to compile a file, generating dependencies
as side-effects.
Environment variables:
depmode Dependency tracking mode.
source Source file read by 'PROGRAMS ARGS'.
object Object file output by 'PROGRAMS ARGS'.
DEPDIR directory where to store dependencies.
depfile Dependency file to output.
tmpdepfile Temporary file to use when outputting dependencies.
libtool Whether libtool is used (yes/no).
Report bugs to .
EOF
exit $?
;;
-v | --v*)
echo "depcomp $scriptversion"
exit $?
;;
esac
# Get the directory component of the given path, and save it in the
# global variables '$dir'. Note that this directory component will
# be either empty or ending with a '/' character. This is deliberate.
set_dir_from ()
{
case $1 in
*/*) dir=`echo "$1" | sed -e 's|/[^/]*$|/|'`;;
*) dir=;;
esac
}
# Get the suffix-stripped basename of the given path, and save it the
# global variable '$base'.
set_base_from ()
{
base=`echo "$1" | sed -e 's|^.*/||' -e 's/\.[^.]*$//'`
}
# If no dependency file was actually created by the compiler invocation,
# we still have to create a dummy depfile, to avoid errors with the
# Makefile "include basename.Plo" scheme.
make_dummy_depfile ()
{
echo "#dummy" > "$depfile"
}
# Factor out some common post-processing of the generated depfile.
# Requires the auxiliary global variable '$tmpdepfile' to be set.
aix_post_process_depfile ()
{
# If the compiler actually managed to produce a dependency file,
# post-process it.
if test -f "$tmpdepfile"; then
# Each line is of the form 'foo.o: dependency.h'.
# Do two passes, one to just change these to
# $object: dependency.h
# and one to simply output
# dependency.h:
# which is needed to avoid the deleted-header problem.
{ sed -e "s,^.*\.[$lower]*:,$object:," < "$tmpdepfile"
sed -e "s,^.*\.[$lower]*:[$tab ]*,," -e 's,$,:,' < "$tmpdepfile"
} > "$depfile"
rm -f "$tmpdepfile"
else
make_dummy_depfile
fi
}
# A tabulation character.
tab=' '
# A newline character.
nl='
'
# Character ranges might be problematic outside the C locale.
# These definitions help.
upper=ABCDEFGHIJKLMNOPQRSTUVWXYZ
lower=abcdefghijklmnopqrstuvwxyz
digits=0123456789
alpha=${upper}${lower}
if test -z "$depmode" || test -z "$source" || test -z "$object"; then
echo "depcomp: Variables source, object and depmode must be set" 1>&2
exit 1
fi
# Dependencies for sub/bar.o or sub/bar.obj go into sub/.deps/bar.Po.
depfile=${depfile-`echo "$object" |
sed 's|[^\\/]*$|'${DEPDIR-.deps}'/&|;s|\.\([^.]*\)$|.P\1|;s|Pobj$|Po|'`}
tmpdepfile=${tmpdepfile-`echo "$depfile" | sed 's/\.\([^.]*\)$/.T\1/'`}
rm -f "$tmpdepfile"
# Avoid interferences from the environment.
gccflag= dashmflag=
# Some modes work just like other modes, but use different flags. We
# parameterize here, but still list the modes in the big case below,
# to make depend.m4 easier to write. Note that we *cannot* use a case
# here, because this file can only contain one case statement.
if test "$depmode" = hp; then
# HP compiler uses -M and no extra arg.
gccflag=-M
depmode=gcc
fi
if test "$depmode" = dashXmstdout; then
# This is just like dashmstdout with a different argument.
dashmflag=-xM
depmode=dashmstdout
fi
cygpath_u="cygpath -u -f -"
if test "$depmode" = msvcmsys; then
# This is just like msvisualcpp but w/o cygpath translation.
# Just convert the backslash-escaped backslashes to single forward
# slashes to satisfy depend.m4
cygpath_u='sed s,\\\\,/,g'
depmode=msvisualcpp
fi
if test "$depmode" = msvc7msys; then
# This is just like msvc7 but w/o cygpath translation.
# Just convert the backslash-escaped backslashes to single forward
# slashes to satisfy depend.m4
cygpath_u='sed s,\\\\,/,g'
depmode=msvc7
fi
if test "$depmode" = xlc; then
# IBM C/C++ Compilers xlc/xlC can output gcc-like dependency information.
gccflag=-qmakedep=gcc,-MF
depmode=gcc
fi
case "$depmode" in
gcc3)
## gcc 3 implements dependency tracking that does exactly what
## we want. Yay! Note: for some reason libtool 1.4 doesn't like
## it if -MD -MP comes after the -MF stuff. Hmm.
## Unfortunately, FreeBSD c89 acceptance of flags depends upon
## the command line argument order; so add the flags where they
## appear in depend2.am. Note that the slowdown incurred here
## affects only configure: in makefiles, %FASTDEP% shortcuts this.
for arg
do
case $arg in
-c) set fnord "$@" -MT "$object" -MD -MP -MF "$tmpdepfile" "$arg" ;;
*) set fnord "$@" "$arg" ;;
esac
shift # fnord
shift # $arg
done
"$@"
stat=$?
if test $stat -ne 0; then
rm -f "$tmpdepfile"
exit $stat
fi
mv "$tmpdepfile" "$depfile"
;;
gcc)
## Note that this doesn't just cater to obsosete pre-3.x GCC compilers.
## but also to in-use compilers like IMB xlc/xlC and the HP C compiler.
## (see the conditional assignment to $gccflag above).
## There are various ways to get dependency output from gcc. Here's
## why we pick this rather obscure method:
## - Don't want to use -MD because we'd like the dependencies to end
## up in a subdir. Having to rename by hand is ugly.
## (We might end up doing this anyway to support other compilers.)
## - The DEPENDENCIES_OUTPUT environment variable makes gcc act like
## -MM, not -M (despite what the docs say). Also, it might not be
## supported by the other compilers which use the 'gcc' depmode.
## - Using -M directly means running the compiler twice (even worse
## than renaming).
if test -z "$gccflag"; then
gccflag=-MD,
fi
"$@" -Wp,"$gccflag$tmpdepfile"
stat=$?
if test $stat -ne 0; then
rm -f "$tmpdepfile"
exit $stat
fi
rm -f "$depfile"
echo "$object : \\" > "$depfile"
# The second -e expression handles DOS-style file names with drive
# letters.
sed -e 's/^[^:]*: / /' \
-e 's/^['$alpha']:\/[^:]*: / /' < "$tmpdepfile" >> "$depfile"
## This next piece of magic avoids the "deleted header file" problem.
## The problem is that when a header file which appears in a .P file
## is deleted, the dependency causes make to die (because there is
## typically no way to rebuild the header). We avoid this by adding
## dummy dependencies for each header file. Too bad gcc doesn't do
## this for us directly.
## Some versions of gcc put a space before the ':'. On the theory
## that the space means something, we add a space to the output as
## well. hp depmode also adds that space, but also prefixes the VPATH
## to the object. Take care to not repeat it in the output.
## Some versions of the HPUX 10.20 sed can't process this invocation
## correctly. Breaking it into two sed invocations is a workaround.
tr ' ' "$nl" < "$tmpdepfile" \
| sed -e 's/^\\$//' -e '/^$/d' -e "s|.*$object$||" -e '/:$/d' \
| sed -e 's/$/ :/' >> "$depfile"
rm -f "$tmpdepfile"
;;
hp)
# This case exists only to let depend.m4 do its work. It works by
# looking at the text of this script. This case will never be run,
# since it is checked for above.
exit 1
;;
sgi)
if test "$libtool" = yes; then
"$@" "-Wp,-MDupdate,$tmpdepfile"
else
"$@" -MDupdate "$tmpdepfile"
fi
stat=$?
if test $stat -ne 0; then
rm -f "$tmpdepfile"
exit $stat
fi
rm -f "$depfile"
if test -f "$tmpdepfile"; then # yes, the sourcefile depend on other files
echo "$object : \\" > "$depfile"
# Clip off the initial element (the dependent). Don't try to be
# clever and replace this with sed code, as IRIX sed won't handle
# lines with more than a fixed number of characters (4096 in
# IRIX 6.2 sed, 8192 in IRIX 6.5). We also remove comment lines;
# the IRIX cc adds comments like '#:fec' to the end of the
# dependency line.
tr ' ' "$nl" < "$tmpdepfile" \
| sed -e 's/^.*\.o://' -e 's/#.*$//' -e '/^$/ d' \
| tr "$nl" ' ' >> "$depfile"
echo >> "$depfile"
# The second pass generates a dummy entry for each header file.
tr ' ' "$nl" < "$tmpdepfile" \
| sed -e 's/^.*\.o://' -e 's/#.*$//' -e '/^$/ d' -e 's/$/:/' \
>> "$depfile"
else
make_dummy_depfile
fi
rm -f "$tmpdepfile"
;;
xlc)
# This case exists only to let depend.m4 do its work. It works by
# looking at the text of this script. This case will never be run,
# since it is checked for above.
exit 1
;;
aix)
# The C for AIX Compiler uses -M and outputs the dependencies
# in a .u file. In older versions, this file always lives in the
# current directory. Also, the AIX compiler puts '$object:' at the
# start of each line; $object doesn't have directory information.
# Version 6 uses the directory in both cases.
set_dir_from "$object"
set_base_from "$object"
if test "$libtool" = yes; then
tmpdepfile1=$dir$base.u
tmpdepfile2=$base.u
tmpdepfile3=$dir.libs/$base.u
"$@" -Wc,-M
else
tmpdepfile1=$dir$base.u
tmpdepfile2=$dir$base.u
tmpdepfile3=$dir$base.u
"$@" -M
fi
stat=$?
if test $stat -ne 0; then
rm -f "$tmpdepfile1" "$tmpdepfile2" "$tmpdepfile3"
exit $stat
fi
for tmpdepfile in "$tmpdepfile1" "$tmpdepfile2" "$tmpdepfile3"
do
test -f "$tmpdepfile" && break
done
aix_post_process_depfile
;;
tcc)
# tcc (Tiny C Compiler) understand '-MD -MF file' since version 0.9.26
# FIXME: That version still under development at the moment of writing.
# Make that this statement remains true also for stable, released
# versions.
# It will wrap lines (doesn't matter whether long or short) with a
# trailing '\', as in:
#
# foo.o : \
# foo.c \
# foo.h \
#
# It will put a trailing '\' even on the last line, and will use leading
# spaces rather than leading tabs (at least since its commit 0394caf7
# "Emit spaces for -MD").
"$@" -MD -MF "$tmpdepfile"
stat=$?
if test $stat -ne 0; then
rm -f "$tmpdepfile"
exit $stat
fi
rm -f "$depfile"
# Each non-empty line is of the form 'foo.o : \' or ' dep.h \'.
# We have to change lines of the first kind to '$object: \'.
sed -e "s|.*:|$object :|" < "$tmpdepfile" > "$depfile"
# And for each line of the second kind, we have to emit a 'dep.h:'
# dummy dependency, to avoid the deleted-header problem.
sed -n -e 's|^ *\(.*\) *\\$|\1:|p' < "$tmpdepfile" >> "$depfile"
rm -f "$tmpdepfile"
;;
## The order of this option in the case statement is important, since the
## shell code in configure will try each of these formats in the order
## listed in this file. A plain '-MD' option would be understood by many
## compilers, so we must ensure this comes after the gcc and icc options.
pgcc)
# Portland's C compiler understands '-MD'.
# Will always output deps to 'file.d' where file is the root name of the
# source file under compilation, even if file resides in a subdirectory.
# The object file name does not affect the name of the '.d' file.
# pgcc 10.2 will output
# foo.o: sub/foo.c sub/foo.h
# and will wrap long lines using '\' :
# foo.o: sub/foo.c ... \
# sub/foo.h ... \
# ...
set_dir_from "$object"
# Use the source, not the object, to determine the base name, since
# that's sadly what pgcc will do too.
set_base_from "$source"
tmpdepfile=$base.d
# For projects that build the same source file twice into different object
# files, the pgcc approach of using the *source* file root name can cause
# problems in parallel builds. Use a locking strategy to avoid stomping on
# the same $tmpdepfile.
lockdir=$base.d-lock
trap "
echo '$0: caught signal, cleaning up...' >&2
rmdir '$lockdir'
exit 1
" 1 2 13 15
numtries=100
i=$numtries
while test $i -gt 0; do
# mkdir is a portable test-and-set.
if mkdir "$lockdir" 2>/dev/null; then
# This process acquired the lock.
"$@" -MD
stat=$?
# Release the lock.
rmdir "$lockdir"
break
else
# If the lock is being held by a different process, wait
# until the winning process is done or we timeout.
while test -d "$lockdir" && test $i -gt 0; do
sleep 1
i=`expr $i - 1`
done
fi
i=`expr $i - 1`
done
trap - 1 2 13 15
if test $i -le 0; then
echo "$0: failed to acquire lock after $numtries attempts" >&2
echo "$0: check lockdir '$lockdir'" >&2
exit 1
fi
if test $stat -ne 0; then
rm -f "$tmpdepfile"
exit $stat
fi
rm -f "$depfile"
# Each line is of the form `foo.o: dependent.h',
# or `foo.o: dep1.h dep2.h \', or ` dep3.h dep4.h \'.
# Do two passes, one to just change these to
# `$object: dependent.h' and one to simply `dependent.h:'.
sed "s,^[^:]*:,$object :," < "$tmpdepfile" > "$depfile"
# Some versions of the HPUX 10.20 sed can't process this invocation
# correctly. Breaking it into two sed invocations is a workaround.
sed 's,^[^:]*: \(.*\)$,\1,;s/^\\$//;/^$/d;/:$/d' < "$tmpdepfile" \
| sed -e 's/$/ :/' >> "$depfile"
rm -f "$tmpdepfile"
;;
hp2)
# The "hp" stanza above does not work with aCC (C++) and HP's ia64
# compilers, which have integrated preprocessors. The correct option
# to use with these is +Maked; it writes dependencies to a file named
# 'foo.d', which lands next to the object file, wherever that
# happens to be.
# Much of this is similar to the tru64 case; see comments there.
set_dir_from "$object"
set_base_from "$object"
if test "$libtool" = yes; then
tmpdepfile1=$dir$base.d
tmpdepfile2=$dir.libs/$base.d
"$@" -Wc,+Maked
else
tmpdepfile1=$dir$base.d
tmpdepfile2=$dir$base.d
"$@" +Maked
fi
stat=$?
if test $stat -ne 0; then
rm -f "$tmpdepfile1" "$tmpdepfile2"
exit $stat
fi
for tmpdepfile in "$tmpdepfile1" "$tmpdepfile2"
do
test -f "$tmpdepfile" && break
done
if test -f "$tmpdepfile"; then
sed -e "s,^.*\.[$lower]*:,$object:," "$tmpdepfile" > "$depfile"
# Add 'dependent.h:' lines.
sed -ne '2,${
s/^ *//
s/ \\*$//
s/$/:/
p
}' "$tmpdepfile" >> "$depfile"
else
make_dummy_depfile
fi
rm -f "$tmpdepfile" "$tmpdepfile2"
;;
tru64)
# The Tru64 compiler uses -MD to generate dependencies as a side
# effect. 'cc -MD -o foo.o ...' puts the dependencies into 'foo.o.d'.
# At least on Alpha/Redhat 6.1, Compaq CCC V6.2-504 seems to put
# dependencies in 'foo.d' instead, so we check for that too.
# Subdirectories are respected.
set_dir_from "$object"
set_base_from "$object"
if test "$libtool" = yes; then
# Libtool generates 2 separate objects for the 2 libraries. These
# two compilations output dependencies in $dir.libs/$base.o.d and
# in $dir$base.o.d. We have to check for both files, because
# one of the two compilations can be disabled. We should prefer
# $dir$base.o.d over $dir.libs/$base.o.d because the latter is
# automatically cleaned when .libs/ is deleted, while ignoring
# the former would cause a distcleancheck panic.
tmpdepfile1=$dir$base.o.d # libtool 1.5
tmpdepfile2=$dir.libs/$base.o.d # Likewise.
tmpdepfile3=$dir.libs/$base.d # Compaq CCC V6.2-504
"$@" -Wc,-MD
else
tmpdepfile1=$dir$base.d
tmpdepfile2=$dir$base.d
tmpdepfile3=$dir$base.d
"$@" -MD
fi
stat=$?
if test $stat -ne 0; then
rm -f "$tmpdepfile1" "$tmpdepfile2" "$tmpdepfile3"
exit $stat
fi
for tmpdepfile in "$tmpdepfile1" "$tmpdepfile2" "$tmpdepfile3"
do
test -f "$tmpdepfile" && break
done
# Same post-processing that is required for AIX mode.
aix_post_process_depfile
;;
msvc7)
if test "$libtool" = yes; then
showIncludes=-Wc,-showIncludes
else
showIncludes=-showIncludes
fi
"$@" $showIncludes > "$tmpdepfile"
stat=$?
grep -v '^Note: including file: ' "$tmpdepfile"
if test $stat -ne 0; then
rm -f "$tmpdepfile"
exit $stat
fi
rm -f "$depfile"
echo "$object : \\" > "$depfile"
# The first sed program below extracts the file names and escapes
# backslashes for cygpath. The second sed program outputs the file
# name when reading, but also accumulates all include files in the
# hold buffer in order to output them again at the end. This only
# works with sed implementations that can handle large buffers.
sed < "$tmpdepfile" -n '
/^Note: including file: *\(.*\)/ {
s//\1/
s/\\/\\\\/g
p
}' | $cygpath_u | sort -u | sed -n '
s/ /\\ /g
s/\(.*\)/'"$tab"'\1 \\/p
s/.\(.*\) \\/\1:/
H
$ {
s/.*/'"$tab"'/
G
p
}' >> "$depfile"
echo >> "$depfile" # make sure the fragment doesn't end with a backslash
rm -f "$tmpdepfile"
;;
msvc7msys)
# This case exists only to let depend.m4 do its work. It works by
# looking at the text of this script. This case will never be run,
# since it is checked for above.
exit 1
;;
#nosideeffect)
# This comment above is used by automake to tell side-effect
# dependency tracking mechanisms from slower ones.
dashmstdout)
# Important note: in order to support this mode, a compiler *must*
# always write the preprocessed file to stdout, regardless of -o.
"$@" || exit $?
# Remove the call to Libtool.
if test "$libtool" = yes; then
while test "X$1" != 'X--mode=compile'; do
shift
done
shift
fi
# Remove '-o $object'.
IFS=" "
for arg
do
case $arg in
-o)
shift
;;
$object)
shift
;;
*)
set fnord "$@" "$arg"
shift # fnord
shift # $arg
;;
esac
done
test -z "$dashmflag" && dashmflag=-M
# Require at least two characters before searching for ':'
# in the target name. This is to cope with DOS-style filenames:
# a dependency such as 'c:/foo/bar' could be seen as target 'c' otherwise.
"$@" $dashmflag |
sed "s|^[$tab ]*[^:$tab ][^:][^:]*:[$tab ]*|$object: |" > "$tmpdepfile"
rm -f "$depfile"
cat < "$tmpdepfile" > "$depfile"
# Some versions of the HPUX 10.20 sed can't process this sed invocation
# correctly. Breaking it into two sed invocations is a workaround.
tr ' ' "$nl" < "$tmpdepfile" \
| sed -e 's/^\\$//' -e '/^$/d' -e '/:$/d' \
| sed -e 's/$/ :/' >> "$depfile"
rm -f "$tmpdepfile"
;;
dashXmstdout)
# This case only exists to satisfy depend.m4. It is never actually
# run, as this mode is specially recognized in the preamble.
exit 1
;;
makedepend)
"$@" || exit $?
# Remove any Libtool call
if test "$libtool" = yes; then
while test "X$1" != 'X--mode=compile'; do
shift
done
shift
fi
# X makedepend
shift
cleared=no eat=no
for arg
do
case $cleared in
no)
set ""; shift
cleared=yes ;;
esac
if test $eat = yes; then
eat=no
continue
fi
case "$arg" in
-D*|-I*)
set fnord "$@" "$arg"; shift ;;
# Strip any option that makedepend may not understand. Remove
# the object too, otherwise makedepend will parse it as a source file.
-arch)
eat=yes ;;
-*|$object)
;;
*)
set fnord "$@" "$arg"; shift ;;
esac
done
obj_suffix=`echo "$object" | sed 's/^.*\././'`
touch "$tmpdepfile"
${MAKEDEPEND-makedepend} -o"$obj_suffix" -f"$tmpdepfile" "$@"
rm -f "$depfile"
# makedepend may prepend the VPATH from the source file name to the object.
# No need to regex-escape $object, excess matching of '.' is harmless.
sed "s|^.*\($object *:\)|\1|" "$tmpdepfile" > "$depfile"
# Some versions of the HPUX 10.20 sed can't process the last invocation
# correctly. Breaking it into two sed invocations is a workaround.
sed '1,2d' "$tmpdepfile" \
| tr ' ' "$nl" \
| sed -e 's/^\\$//' -e '/^$/d' -e '/:$/d' \
| sed -e 's/$/ :/' >> "$depfile"
rm -f "$tmpdepfile" "$tmpdepfile".bak
;;
cpp)
# Important note: in order to support this mode, a compiler *must*
# always write the preprocessed file to stdout.
"$@" || exit $?
# Remove the call to Libtool.
if test "$libtool" = yes; then
while test "X$1" != 'X--mode=compile'; do
shift
done
shift
fi
# Remove '-o $object'.
IFS=" "
for arg
do
case $arg in
-o)
shift
;;
$object)
shift
;;
*)
set fnord "$@" "$arg"
shift # fnord
shift # $arg
;;
esac
done
"$@" -E \
| sed -n -e '/^# [0-9][0-9]* "\([^"]*\)".*/ s:: \1 \\:p' \
-e '/^#line [0-9][0-9]* "\([^"]*\)".*/ s:: \1 \\:p' \
| sed '$ s: \\$::' > "$tmpdepfile"
rm -f "$depfile"
echo "$object : \\" > "$depfile"
cat < "$tmpdepfile" >> "$depfile"
sed < "$tmpdepfile" '/^$/d;s/^ //;s/ \\$//;s/$/ :/' >> "$depfile"
rm -f "$tmpdepfile"
;;
msvisualcpp)
# Important note: in order to support this mode, a compiler *must*
# always write the preprocessed file to stdout.
"$@" || exit $?
# Remove the call to Libtool.
if test "$libtool" = yes; then
while test "X$1" != 'X--mode=compile'; do
shift
done
shift
fi
IFS=" "
for arg
do
case "$arg" in
-o)
shift
;;
$object)
shift
;;
"-Gm"|"/Gm"|"-Gi"|"/Gi"|"-ZI"|"/ZI")
set fnord "$@"
shift
shift
;;
*)
set fnord "$@" "$arg"
shift
shift
;;
esac
done
"$@" -E 2>/dev/null |
sed -n '/^#line [0-9][0-9]* "\([^"]*\)"/ s::\1:p' | $cygpath_u | sort -u > "$tmpdepfile"
rm -f "$depfile"
echo "$object : \\" > "$depfile"
sed < "$tmpdepfile" -n -e 's% %\\ %g' -e '/^\(.*\)$/ s::'"$tab"'\1 \\:p' >> "$depfile"
echo "$tab" >> "$depfile"
sed < "$tmpdepfile" -n -e 's% %\\ %g' -e '/^\(.*\)$/ s::\1\::p' >> "$depfile"
rm -f "$tmpdepfile"
;;
msvcmsys)
# This case exists only to let depend.m4 do its work. It works by
# looking at the text of this script. This case will never be run,
# since it is checked for above.
exit 1
;;
none)
exec "$@"
;;
*)
echo "Unknown depmode $depmode" 1>&2
exit 1
;;
esac
exit 0
# Local Variables:
# mode: shell-script
# sh-indentation: 2
# eval: (add-hook 'write-file-hooks 'time-stamp)
# time-stamp-start: "scriptversion="
# time-stamp-format: "%:y-%02m-%02d.%02H"
# time-stamp-time-zone: "UTC"
# time-stamp-end: "; # UTC"
# End:
iprutils-2.4.18.1/config.guess 0000755 0001750 0001751 00000130361 12257332274 013075 0000000 0000000 #! /bin/sh
# Attempt to guess a canonical system name.
# Copyright 1992-2013 Free Software Foundation, Inc.
timestamp='2013-06-10'
# This file is free software; you can redistribute it and/or modify it
# under the terms of the GNU General Public License as published by
# the Free Software Foundation; either version 3 of the License, or
# (at your option) any later version.
#
# This program is distributed in the hope that it will be useful, but
# WITHOUT ANY WARRANTY; without even the implied warranty of
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
# General Public License for more details.
#
# You should have received a copy of the GNU General Public License
# along with this program; if not, see .
#
# As a special exception to the GNU General Public License, if you
# distribute this file as part of a program that contains a
# configuration script generated by Autoconf, you may include it under
# the same distribution terms that you use for the rest of that
# program. This Exception is an additional permission under section 7
# of the GNU General Public License, version 3 ("GPLv3").
#
# Originally written by Per Bothner.
#
# You can get the latest version of this script from:
# http://git.savannah.gnu.org/gitweb/?p=config.git;a=blob_plain;f=config.guess;hb=HEAD
#
# Please send patches with a ChangeLog entry to config-patches@gnu.org.
me=`echo "$0" | sed -e 's,.*/,,'`
usage="\
Usage: $0 [OPTION]
Output the configuration name of the system \`$me' is run on.
Operation modes:
-h, --help print this help, then exit
-t, --time-stamp print date of last modification, then exit
-v, --version print version number, then exit
Report bugs and patches to ."
version="\
GNU config.guess ($timestamp)
Originally written by Per Bothner.
Copyright 1992-2013 Free Software Foundation, Inc.
This is free software; see the source for copying conditions. There is NO
warranty; not even for MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE."
help="
Try \`$me --help' for more information."
# Parse command line
while test $# -gt 0 ; do
case $1 in
--time-stamp | --time* | -t )
echo "$timestamp" ; exit ;;
--version | -v )
echo "$version" ; exit ;;
--help | --h* | -h )
echo "$usage"; exit ;;
-- ) # Stop option processing
shift; break ;;
- ) # Use stdin as input.
break ;;
-* )
echo "$me: invalid option $1$help" >&2
exit 1 ;;
* )
break ;;
esac
done
if test $# != 0; then
echo "$me: too many arguments$help" >&2
exit 1
fi
trap 'exit 1' 1 2 15
# CC_FOR_BUILD -- compiler used by this script. Note that the use of a
# compiler to aid in system detection is discouraged as it requires
# temporary files to be created and, as you can see below, it is a
# headache to deal with in a portable fashion.
# Historically, `CC_FOR_BUILD' used to be named `HOST_CC'. We still
# use `HOST_CC' if defined, but it is deprecated.
# Portable tmp directory creation inspired by the Autoconf team.
set_cc_for_build='
trap "exitcode=\$?; (rm -f \$tmpfiles 2>/dev/null; rmdir \$tmp 2>/dev/null) && exit \$exitcode" 0 ;
trap "rm -f \$tmpfiles 2>/dev/null; rmdir \$tmp 2>/dev/null; exit 1" 1 2 13 15 ;
: ${TMPDIR=/tmp} ;
{ tmp=`(umask 077 && mktemp -d "$TMPDIR/cgXXXXXX") 2>/dev/null` && test -n "$tmp" && test -d "$tmp" ; } ||
{ test -n "$RANDOM" && tmp=$TMPDIR/cg$$-$RANDOM && (umask 077 && mkdir $tmp) ; } ||
{ tmp=$TMPDIR/cg-$$ && (umask 077 && mkdir $tmp) && echo "Warning: creating insecure temp directory" >&2 ; } ||
{ echo "$me: cannot create a temporary directory in $TMPDIR" >&2 ; exit 1 ; } ;
dummy=$tmp/dummy ;
tmpfiles="$dummy.c $dummy.o $dummy.rel $dummy" ;
case $CC_FOR_BUILD,$HOST_CC,$CC in
,,) echo "int x;" > $dummy.c ;
for c in cc gcc c89 c99 ; do
if ($c -c -o $dummy.o $dummy.c) >/dev/null 2>&1 ; then
CC_FOR_BUILD="$c"; break ;
fi ;
done ;
if test x"$CC_FOR_BUILD" = x ; then
CC_FOR_BUILD=no_compiler_found ;
fi
;;
,,*) CC_FOR_BUILD=$CC ;;
,*,*) CC_FOR_BUILD=$HOST_CC ;;
esac ; set_cc_for_build= ;'
# This is needed to find uname on a Pyramid OSx when run in the BSD universe.
# (ghazi@noc.rutgers.edu 1994-08-24)
if (test -f /.attbin/uname) >/dev/null 2>&1 ; then
PATH=$PATH:/.attbin ; export PATH
fi
UNAME_MACHINE=`(uname -m) 2>/dev/null` || UNAME_MACHINE=unknown
UNAME_RELEASE=`(uname -r) 2>/dev/null` || UNAME_RELEASE=unknown
UNAME_SYSTEM=`(uname -s) 2>/dev/null` || UNAME_SYSTEM=unknown
UNAME_VERSION=`(uname -v) 2>/dev/null` || UNAME_VERSION=unknown
case "${UNAME_SYSTEM}" in
Linux|GNU|GNU/*)
# If the system lacks a compiler, then just pick glibc.
# We could probably try harder.
LIBC=gnu
eval $set_cc_for_build
cat <<-EOF > $dummy.c
#include
#if defined(__UCLIBC__)
LIBC=uclibc
#elif defined(__dietlibc__)
LIBC=dietlibc
#else
LIBC=gnu
#endif
EOF
eval `$CC_FOR_BUILD -E $dummy.c 2>/dev/null | grep '^LIBC'`
;;
esac
# Note: order is significant - the case branches are not exclusive.
case "${UNAME_MACHINE}:${UNAME_SYSTEM}:${UNAME_RELEASE}:${UNAME_VERSION}" in
*:NetBSD:*:*)
# NetBSD (nbsd) targets should (where applicable) match one or
# more of the tuples: *-*-netbsdelf*, *-*-netbsdaout*,
# *-*-netbsdecoff* and *-*-netbsd*. For targets that recently
# switched to ELF, *-*-netbsd* would select the old
# object file format. This provides both forward
# compatibility and a consistent mechanism for selecting the
# object file format.
#
# Note: NetBSD doesn't particularly care about the vendor
# portion of the name. We always set it to "unknown".
sysctl="sysctl -n hw.machine_arch"
UNAME_MACHINE_ARCH=`(/sbin/$sysctl 2>/dev/null || \
/usr/sbin/$sysctl 2>/dev/null || echo unknown)`
case "${UNAME_MACHINE_ARCH}" in
armeb) machine=armeb-unknown ;;
arm*) machine=arm-unknown ;;
sh3el) machine=shl-unknown ;;
sh3eb) machine=sh-unknown ;;
sh5el) machine=sh5le-unknown ;;
*) machine=${UNAME_MACHINE_ARCH}-unknown ;;
esac
# The Operating System including object format, if it has switched
# to ELF recently, or will in the future.
case "${UNAME_MACHINE_ARCH}" in
arm*|i386|m68k|ns32k|sh3*|sparc|vax)
eval $set_cc_for_build
if echo __ELF__ | $CC_FOR_BUILD -E - 2>/dev/null \
| grep -q __ELF__
then
# Once all utilities can be ECOFF (netbsdecoff) or a.out (netbsdaout).
# Return netbsd for either. FIX?
os=netbsd
else
os=netbsdelf
fi
;;
*)
os=netbsd
;;
esac
# The OS release
# Debian GNU/NetBSD machines have a different userland, and
# thus, need a distinct triplet. However, they do not need
# kernel version information, so it can be replaced with a
# suitable tag, in the style of linux-gnu.
case "${UNAME_VERSION}" in
Debian*)
release='-gnu'
;;
*)
release=`echo ${UNAME_RELEASE}|sed -e 's/[-_].*/\./'`
;;
esac
# Since CPU_TYPE-MANUFACTURER-KERNEL-OPERATING_SYSTEM:
# contains redundant information, the shorter form:
# CPU_TYPE-MANUFACTURER-OPERATING_SYSTEM is used.
echo "${machine}-${os}${release}"
exit ;;
*:Bitrig:*:*)
UNAME_MACHINE_ARCH=`arch | sed 's/Bitrig.//'`
echo ${UNAME_MACHINE_ARCH}-unknown-bitrig${UNAME_RELEASE}
exit ;;
*:OpenBSD:*:*)
UNAME_MACHINE_ARCH=`arch | sed 's/OpenBSD.//'`
echo ${UNAME_MACHINE_ARCH}-unknown-openbsd${UNAME_RELEASE}
exit ;;
*:ekkoBSD:*:*)
echo ${UNAME_MACHINE}-unknown-ekkobsd${UNAME_RELEASE}
exit ;;
*:SolidBSD:*:*)
echo ${UNAME_MACHINE}-unknown-solidbsd${UNAME_RELEASE}
exit ;;
macppc:MirBSD:*:*)
echo powerpc-unknown-mirbsd${UNAME_RELEASE}
exit ;;
*:MirBSD:*:*)
echo ${UNAME_MACHINE}-unknown-mirbsd${UNAME_RELEASE}
exit ;;
alpha:OSF1:*:*)
case $UNAME_RELEASE in
*4.0)
UNAME_RELEASE=`/usr/sbin/sizer -v | awk '{print $3}'`
;;
*5.*)
UNAME_RELEASE=`/usr/sbin/sizer -v | awk '{print $4}'`
;;
esac
# According to Compaq, /usr/sbin/psrinfo has been available on
# OSF/1 and Tru64 systems produced since 1995. I hope that
# covers most systems running today. This code pipes the CPU
# types through head -n 1, so we only detect the type of CPU 0.
ALPHA_CPU_TYPE=`/usr/sbin/psrinfo -v | sed -n -e 's/^ The alpha \(.*\) processor.*$/\1/p' | head -n 1`
case "$ALPHA_CPU_TYPE" in
"EV4 (21064)")
UNAME_MACHINE="alpha" ;;
"EV4.5 (21064)")
UNAME_MACHINE="alpha" ;;
"LCA4 (21066/21068)")
UNAME_MACHINE="alpha" ;;
"EV5 (21164)")
UNAME_MACHINE="alphaev5" ;;
"EV5.6 (21164A)")
UNAME_MACHINE="alphaev56" ;;
"EV5.6 (21164PC)")
UNAME_MACHINE="alphapca56" ;;
"EV5.7 (21164PC)")
UNAME_MACHINE="alphapca57" ;;
"EV6 (21264)")
UNAME_MACHINE="alphaev6" ;;
"EV6.7 (21264A)")
UNAME_MACHINE="alphaev67" ;;
"EV6.8CB (21264C)")
UNAME_MACHINE="alphaev68" ;;
"EV6.8AL (21264B)")
UNAME_MACHINE="alphaev68" ;;
"EV6.8CX (21264D)")
UNAME_MACHINE="alphaev68" ;;
"EV6.9A (21264/EV69A)")
UNAME_MACHINE="alphaev69" ;;
"EV7 (21364)")
UNAME_MACHINE="alphaev7" ;;
"EV7.9 (21364A)")
UNAME_MACHINE="alphaev79" ;;
esac
# A Pn.n version is a patched version.
# A Vn.n version is a released version.
# A Tn.n version is a released field test version.
# A Xn.n version is an unreleased experimental baselevel.
# 1.2 uses "1.2" for uname -r.
echo ${UNAME_MACHINE}-dec-osf`echo ${UNAME_RELEASE} | sed -e 's/^[PVTX]//' | tr 'ABCDEFGHIJKLMNOPQRSTUVWXYZ' 'abcdefghijklmnopqrstuvwxyz'`
# Reset EXIT trap before exiting to avoid spurious non-zero exit code.
exitcode=$?
trap '' 0
exit $exitcode ;;
Alpha\ *:Windows_NT*:*)
# How do we know it's Interix rather than the generic POSIX subsystem?
# Should we change UNAME_MACHINE based on the output of uname instead
# of the specific Alpha model?
echo alpha-pc-interix
exit ;;
21064:Windows_NT:50:3)
echo alpha-dec-winnt3.5
exit ;;
Amiga*:UNIX_System_V:4.0:*)
echo m68k-unknown-sysv4
exit ;;
*:[Aa]miga[Oo][Ss]:*:*)
echo ${UNAME_MACHINE}-unknown-amigaos
exit ;;
*:[Mm]orph[Oo][Ss]:*:*)
echo ${UNAME_MACHINE}-unknown-morphos
exit ;;
*:OS/390:*:*)
echo i370-ibm-openedition
exit ;;
*:z/VM:*:*)
echo s390-ibm-zvmoe
exit ;;
*:OS400:*:*)
echo powerpc-ibm-os400
exit ;;
arm:RISC*:1.[012]*:*|arm:riscix:1.[012]*:*)
echo arm-acorn-riscix${UNAME_RELEASE}
exit ;;
arm*:riscos:*:*|arm*:RISCOS:*:*)
echo arm-unknown-riscos
exit ;;
SR2?01:HI-UX/MPP:*:* | SR8000:HI-UX/MPP:*:*)
echo hppa1.1-hitachi-hiuxmpp
exit ;;
Pyramid*:OSx*:*:* | MIS*:OSx*:*:* | MIS*:SMP_DC-OSx*:*:*)
# akee@wpdis03.wpafb.af.mil (Earle F. Ake) contributed MIS and NILE.
if test "`(/bin/universe) 2>/dev/null`" = att ; then
echo pyramid-pyramid-sysv3
else
echo pyramid-pyramid-bsd
fi
exit ;;
NILE*:*:*:dcosx)
echo pyramid-pyramid-svr4
exit ;;
DRS?6000:unix:4.0:6*)
echo sparc-icl-nx6
exit ;;
DRS?6000:UNIX_SV:4.2*:7* | DRS?6000:isis:4.2*:7*)
case `/usr/bin/uname -p` in
sparc) echo sparc-icl-nx7; exit ;;
esac ;;
s390x:SunOS:*:*)
echo ${UNAME_MACHINE}-ibm-solaris2`echo ${UNAME_RELEASE}|sed -e 's/[^.]*//'`
exit ;;
sun4H:SunOS:5.*:*)
echo sparc-hal-solaris2`echo ${UNAME_RELEASE}|sed -e 's/[^.]*//'`
exit ;;
sun4*:SunOS:5.*:* | tadpole*:SunOS:5.*:*)
echo sparc-sun-solaris2`echo ${UNAME_RELEASE}|sed -e 's/[^.]*//'`
exit ;;
i86pc:AuroraUX:5.*:* | i86xen:AuroraUX:5.*:*)
echo i386-pc-auroraux${UNAME_RELEASE}
exit ;;
i86pc:SunOS:5.*:* | i86xen:SunOS:5.*:*)
eval $set_cc_for_build
SUN_ARCH="i386"
# If there is a compiler, see if it is configured for 64-bit objects.
# Note that the Sun cc does not turn __LP64__ into 1 like gcc does.
# This test works for both compilers.
if [ "$CC_FOR_BUILD" != 'no_compiler_found' ]; then
if (echo '#ifdef __amd64'; echo IS_64BIT_ARCH; echo '#endif') | \
(CCOPTS= $CC_FOR_BUILD -E - 2>/dev/null) | \
grep IS_64BIT_ARCH >/dev/null
then
SUN_ARCH="x86_64"
fi
fi
echo ${SUN_ARCH}-pc-solaris2`echo ${UNAME_RELEASE}|sed -e 's/[^.]*//'`
exit ;;
sun4*:SunOS:6*:*)
# According to config.sub, this is the proper way to canonicalize
# SunOS6. Hard to guess exactly what SunOS6 will be like, but
# it's likely to be more like Solaris than SunOS4.
echo sparc-sun-solaris3`echo ${UNAME_RELEASE}|sed -e 's/[^.]*//'`
exit ;;
sun4*:SunOS:*:*)
case "`/usr/bin/arch -k`" in
Series*|S4*)
UNAME_RELEASE=`uname -v`
;;
esac
# Japanese Language versions have a version number like `4.1.3-JL'.
echo sparc-sun-sunos`echo ${UNAME_RELEASE}|sed -e 's/-/_/'`
exit ;;
sun3*:SunOS:*:*)
echo m68k-sun-sunos${UNAME_RELEASE}
exit ;;
sun*:*:4.2BSD:*)
UNAME_RELEASE=`(sed 1q /etc/motd | awk '{print substr($5,1,3)}') 2>/dev/null`
test "x${UNAME_RELEASE}" = "x" && UNAME_RELEASE=3
case "`/bin/arch`" in
sun3)
echo m68k-sun-sunos${UNAME_RELEASE}
;;
sun4)
echo sparc-sun-sunos${UNAME_RELEASE}
;;
esac
exit ;;
aushp:SunOS:*:*)
echo sparc-auspex-sunos${UNAME_RELEASE}
exit ;;
# The situation for MiNT is a little confusing. The machine name
# can be virtually everything (everything which is not
# "atarist" or "atariste" at least should have a processor
# > m68000). The system name ranges from "MiNT" over "FreeMiNT"
# to the lowercase version "mint" (or "freemint"). Finally
# the system name "TOS" denotes a system which is actually not
# MiNT. But MiNT is downward compatible to TOS, so this should
# be no problem.
atarist[e]:*MiNT:*:* | atarist[e]:*mint:*:* | atarist[e]:*TOS:*:*)
echo m68k-atari-mint${UNAME_RELEASE}
exit ;;
atari*:*MiNT:*:* | atari*:*mint:*:* | atarist[e]:*TOS:*:*)
echo m68k-atari-mint${UNAME_RELEASE}
exit ;;
*falcon*:*MiNT:*:* | *falcon*:*mint:*:* | *falcon*:*TOS:*:*)
echo m68k-atari-mint${UNAME_RELEASE}
exit ;;
milan*:*MiNT:*:* | milan*:*mint:*:* | *milan*:*TOS:*:*)
echo m68k-milan-mint${UNAME_RELEASE}
exit ;;
hades*:*MiNT:*:* | hades*:*mint:*:* | *hades*:*TOS:*:*)
echo m68k-hades-mint${UNAME_RELEASE}
exit ;;
*:*MiNT:*:* | *:*mint:*:* | *:*TOS:*:*)
echo m68k-unknown-mint${UNAME_RELEASE}
exit ;;
m68k:machten:*:*)
echo m68k-apple-machten${UNAME_RELEASE}
exit ;;
powerpc:machten:*:*)
echo powerpc-apple-machten${UNAME_RELEASE}
exit ;;
RISC*:Mach:*:*)
echo mips-dec-mach_bsd4.3
exit ;;
RISC*:ULTRIX:*:*)
echo mips-dec-ultrix${UNAME_RELEASE}
exit ;;
VAX*:ULTRIX*:*:*)
echo vax-dec-ultrix${UNAME_RELEASE}
exit ;;
2020:CLIX:*:* | 2430:CLIX:*:*)
echo clipper-intergraph-clix${UNAME_RELEASE}
exit ;;
mips:*:*:UMIPS | mips:*:*:RISCos)
eval $set_cc_for_build
sed 's/^ //' << EOF >$dummy.c
#ifdef __cplusplus
#include /* for printf() prototype */
int main (int argc, char *argv[]) {
#else
int main (argc, argv) int argc; char *argv[]; {
#endif
#if defined (host_mips) && defined (MIPSEB)
#if defined (SYSTYPE_SYSV)
printf ("mips-mips-riscos%ssysv\n", argv[1]); exit (0);
#endif
#if defined (SYSTYPE_SVR4)
printf ("mips-mips-riscos%ssvr4\n", argv[1]); exit (0);
#endif
#if defined (SYSTYPE_BSD43) || defined(SYSTYPE_BSD)
printf ("mips-mips-riscos%sbsd\n", argv[1]); exit (0);
#endif
#endif
exit (-1);
}
EOF
$CC_FOR_BUILD -o $dummy $dummy.c &&
dummyarg=`echo "${UNAME_RELEASE}" | sed -n 's/\([0-9]*\).*/\1/p'` &&
SYSTEM_NAME=`$dummy $dummyarg` &&
{ echo "$SYSTEM_NAME"; exit; }
echo mips-mips-riscos${UNAME_RELEASE}
exit ;;
Motorola:PowerMAX_OS:*:*)
echo powerpc-motorola-powermax
exit ;;
Motorola:*:4.3:PL8-*)
echo powerpc-harris-powermax
exit ;;
Night_Hawk:*:*:PowerMAX_OS | Synergy:PowerMAX_OS:*:*)
echo powerpc-harris-powermax
exit ;;
Night_Hawk:Power_UNIX:*:*)
echo powerpc-harris-powerunix
exit ;;
m88k:CX/UX:7*:*)
echo m88k-harris-cxux7
exit ;;
m88k:*:4*:R4*)
echo m88k-motorola-sysv4
exit ;;
m88k:*:3*:R3*)
echo m88k-motorola-sysv3
exit ;;
AViiON:dgux:*:*)
# DG/UX returns AViiON for all architectures
UNAME_PROCESSOR=`/usr/bin/uname -p`
if [ $UNAME_PROCESSOR = mc88100 ] || [ $UNAME_PROCESSOR = mc88110 ]
then
if [ ${TARGET_BINARY_INTERFACE}x = m88kdguxelfx ] || \
[ ${TARGET_BINARY_INTERFACE}x = x ]
then
echo m88k-dg-dgux${UNAME_RELEASE}
else
echo m88k-dg-dguxbcs${UNAME_RELEASE}
fi
else
echo i586-dg-dgux${UNAME_RELEASE}
fi
exit ;;
M88*:DolphinOS:*:*) # DolphinOS (SVR3)
echo m88k-dolphin-sysv3
exit ;;
M88*:*:R3*:*)
# Delta 88k system running SVR3
echo m88k-motorola-sysv3
exit ;;
XD88*:*:*:*) # Tektronix XD88 system running UTekV (SVR3)
echo m88k-tektronix-sysv3
exit ;;
Tek43[0-9][0-9]:UTek:*:*) # Tektronix 4300 system running UTek (BSD)
echo m68k-tektronix-bsd
exit ;;
*:IRIX*:*:*)
echo mips-sgi-irix`echo ${UNAME_RELEASE}|sed -e 's/-/_/g'`
exit ;;
????????:AIX?:[12].1:2) # AIX 2.2.1 or AIX 2.1.1 is RT/PC AIX.
echo romp-ibm-aix # uname -m gives an 8 hex-code CPU id
exit ;; # Note that: echo "'`uname -s`'" gives 'AIX '
i*86:AIX:*:*)
echo i386-ibm-aix
exit ;;
ia64:AIX:*:*)
if [ -x /usr/bin/oslevel ] ; then
IBM_REV=`/usr/bin/oslevel`
else
IBM_REV=${UNAME_VERSION}.${UNAME_RELEASE}
fi
echo ${UNAME_MACHINE}-ibm-aix${IBM_REV}
exit ;;
*:AIX:2:3)
if grep bos325 /usr/include/stdio.h >/dev/null 2>&1; then
eval $set_cc_for_build
sed 's/^ //' << EOF >$dummy.c
#include
main()
{
if (!__power_pc())
exit(1);
puts("powerpc-ibm-aix3.2.5");
exit(0);
}
EOF
if $CC_FOR_BUILD -o $dummy $dummy.c && SYSTEM_NAME=`$dummy`
then
echo "$SYSTEM_NAME"
else
echo rs6000-ibm-aix3.2.5
fi
elif grep bos324 /usr/include/stdio.h >/dev/null 2>&1; then
echo rs6000-ibm-aix3.2.4
else
echo rs6000-ibm-aix3.2
fi
exit ;;
*:AIX:*:[4567])
IBM_CPU_ID=`/usr/sbin/lsdev -C -c processor -S available | sed 1q | awk '{ print $1 }'`
if /usr/sbin/lsattr -El ${IBM_CPU_ID} | grep ' POWER' >/dev/null 2>&1; then
IBM_ARCH=rs6000
else
IBM_ARCH=powerpc
fi
if [ -x /usr/bin/oslevel ] ; then
IBM_REV=`/usr/bin/oslevel`
else
IBM_REV=${UNAME_VERSION}.${UNAME_RELEASE}
fi
echo ${IBM_ARCH}-ibm-aix${IBM_REV}
exit ;;
*:AIX:*:*)
echo rs6000-ibm-aix
exit ;;
ibmrt:4.4BSD:*|romp-ibm:BSD:*)
echo romp-ibm-bsd4.4
exit ;;
ibmrt:*BSD:*|romp-ibm:BSD:*) # covers RT/PC BSD and
echo romp-ibm-bsd${UNAME_RELEASE} # 4.3 with uname added to
exit ;; # report: romp-ibm BSD 4.3
*:BOSX:*:*)
echo rs6000-bull-bosx
exit ;;
DPX/2?00:B.O.S.:*:*)
echo m68k-bull-sysv3
exit ;;
9000/[34]??:4.3bsd:1.*:*)
echo m68k-hp-bsd
exit ;;
hp300:4.4BSD:*:* | 9000/[34]??:4.3bsd:2.*:*)
echo m68k-hp-bsd4.4
exit ;;
9000/[34678]??:HP-UX:*:*)
HPUX_REV=`echo ${UNAME_RELEASE}|sed -e 's/[^.]*.[0B]*//'`
case "${UNAME_MACHINE}" in
9000/31? ) HP_ARCH=m68000 ;;
9000/[34]?? ) HP_ARCH=m68k ;;
9000/[678][0-9][0-9])
if [ -x /usr/bin/getconf ]; then
sc_cpu_version=`/usr/bin/getconf SC_CPU_VERSION 2>/dev/null`
sc_kernel_bits=`/usr/bin/getconf SC_KERNEL_BITS 2>/dev/null`
case "${sc_cpu_version}" in
523) HP_ARCH="hppa1.0" ;; # CPU_PA_RISC1_0
528) HP_ARCH="hppa1.1" ;; # CPU_PA_RISC1_1
532) # CPU_PA_RISC2_0
case "${sc_kernel_bits}" in
32) HP_ARCH="hppa2.0n" ;;
64) HP_ARCH="hppa2.0w" ;;
'') HP_ARCH="hppa2.0" ;; # HP-UX 10.20
esac ;;
esac
fi
if [ "${HP_ARCH}" = "" ]; then
eval $set_cc_for_build
sed 's/^ //' << EOF >$dummy.c
#define _HPUX_SOURCE
#include
#include
int main ()
{
#if defined(_SC_KERNEL_BITS)
long bits = sysconf(_SC_KERNEL_BITS);
#endif
long cpu = sysconf (_SC_CPU_VERSION);
switch (cpu)
{
case CPU_PA_RISC1_0: puts ("hppa1.0"); break;
case CPU_PA_RISC1_1: puts ("hppa1.1"); break;
case CPU_PA_RISC2_0:
#if defined(_SC_KERNEL_BITS)
switch (bits)
{
case 64: puts ("hppa2.0w"); break;
case 32: puts ("hppa2.0n"); break;
default: puts ("hppa2.0"); break;
} break;
#else /* !defined(_SC_KERNEL_BITS) */
puts ("hppa2.0"); break;
#endif
default: puts ("hppa1.0"); break;
}
exit (0);
}
EOF
(CCOPTS= $CC_FOR_BUILD -o $dummy $dummy.c 2>/dev/null) && HP_ARCH=`$dummy`
test -z "$HP_ARCH" && HP_ARCH=hppa
fi ;;
esac
if [ ${HP_ARCH} = "hppa2.0w" ]
then
eval $set_cc_for_build
# hppa2.0w-hp-hpux* has a 64-bit kernel and a compiler generating
# 32-bit code. hppa64-hp-hpux* has the same kernel and a compiler
# generating 64-bit code. GNU and HP use different nomenclature:
#
# $ CC_FOR_BUILD=cc ./config.guess
# => hppa2.0w-hp-hpux11.23
# $ CC_FOR_BUILD="cc +DA2.0w" ./config.guess
# => hppa64-hp-hpux11.23
if echo __LP64__ | (CCOPTS= $CC_FOR_BUILD -E - 2>/dev/null) |
grep -q __LP64__
then
HP_ARCH="hppa2.0w"
else
HP_ARCH="hppa64"
fi
fi
echo ${HP_ARCH}-hp-hpux${HPUX_REV}
exit ;;
ia64:HP-UX:*:*)
HPUX_REV=`echo ${UNAME_RELEASE}|sed -e 's/[^.]*.[0B]*//'`
echo ia64-hp-hpux${HPUX_REV}
exit ;;
3050*:HI-UX:*:*)
eval $set_cc_for_build
sed 's/^ //' << EOF >$dummy.c
#include
int
main ()
{
long cpu = sysconf (_SC_CPU_VERSION);
/* The order matters, because CPU_IS_HP_MC68K erroneously returns
true for CPU_PA_RISC1_0. CPU_IS_PA_RISC returns correct
results, however. */
if (CPU_IS_PA_RISC (cpu))
{
switch (cpu)
{
case CPU_PA_RISC1_0: puts ("hppa1.0-hitachi-hiuxwe2"); break;
case CPU_PA_RISC1_1: puts ("hppa1.1-hitachi-hiuxwe2"); break;
case CPU_PA_RISC2_0: puts ("hppa2.0-hitachi-hiuxwe2"); break;
default: puts ("hppa-hitachi-hiuxwe2"); break;
}
}
else if (CPU_IS_HP_MC68K (cpu))
puts ("m68k-hitachi-hiuxwe2");
else puts ("unknown-hitachi-hiuxwe2");
exit (0);
}
EOF
$CC_FOR_BUILD -o $dummy $dummy.c && SYSTEM_NAME=`$dummy` &&
{ echo "$SYSTEM_NAME"; exit; }
echo unknown-hitachi-hiuxwe2
exit ;;
9000/7??:4.3bsd:*:* | 9000/8?[79]:4.3bsd:*:* )
echo hppa1.1-hp-bsd
exit ;;
9000/8??:4.3bsd:*:*)
echo hppa1.0-hp-bsd
exit ;;
*9??*:MPE/iX:*:* | *3000*:MPE/iX:*:*)
echo hppa1.0-hp-mpeix
exit ;;
hp7??:OSF1:*:* | hp8?[79]:OSF1:*:* )
echo hppa1.1-hp-osf
exit ;;
hp8??:OSF1:*:*)
echo hppa1.0-hp-osf
exit ;;
i*86:OSF1:*:*)
if [ -x /usr/sbin/sysversion ] ; then
echo ${UNAME_MACHINE}-unknown-osf1mk
else
echo ${UNAME_MACHINE}-unknown-osf1
fi
exit ;;
parisc*:Lites*:*:*)
echo hppa1.1-hp-lites
exit ;;
C1*:ConvexOS:*:* | convex:ConvexOS:C1*:*)
echo c1-convex-bsd
exit ;;
C2*:ConvexOS:*:* | convex:ConvexOS:C2*:*)
if getsysinfo -f scalar_acc
then echo c32-convex-bsd
else echo c2-convex-bsd
fi
exit ;;
C34*:ConvexOS:*:* | convex:ConvexOS:C34*:*)
echo c34-convex-bsd
exit ;;
C38*:ConvexOS:*:* | convex:ConvexOS:C38*:*)
echo c38-convex-bsd
exit ;;
C4*:ConvexOS:*:* | convex:ConvexOS:C4*:*)
echo c4-convex-bsd
exit ;;
CRAY*Y-MP:*:*:*)
echo ymp-cray-unicos${UNAME_RELEASE} | sed -e 's/\.[^.]*$/.X/'
exit ;;
CRAY*[A-Z]90:*:*:*)
echo ${UNAME_MACHINE}-cray-unicos${UNAME_RELEASE} \
| sed -e 's/CRAY.*\([A-Z]90\)/\1/' \
-e y/ABCDEFGHIJKLMNOPQRSTUVWXYZ/abcdefghijklmnopqrstuvwxyz/ \
-e 's/\.[^.]*$/.X/'
exit ;;
CRAY*TS:*:*:*)
echo t90-cray-unicos${UNAME_RELEASE} | sed -e 's/\.[^.]*$/.X/'
exit ;;
CRAY*T3E:*:*:*)
echo alphaev5-cray-unicosmk${UNAME_RELEASE} | sed -e 's/\.[^.]*$/.X/'
exit ;;
CRAY*SV1:*:*:*)
echo sv1-cray-unicos${UNAME_RELEASE} | sed -e 's/\.[^.]*$/.X/'
exit ;;
*:UNICOS/mp:*:*)
echo craynv-cray-unicosmp${UNAME_RELEASE} | sed -e 's/\.[^.]*$/.X/'
exit ;;
F30[01]:UNIX_System_V:*:* | F700:UNIX_System_V:*:*)
FUJITSU_PROC=`uname -m | tr 'ABCDEFGHIJKLMNOPQRSTUVWXYZ' 'abcdefghijklmnopqrstuvwxyz'`
FUJITSU_SYS=`uname -p | tr 'ABCDEFGHIJKLMNOPQRSTUVWXYZ' 'abcdefghijklmnopqrstuvwxyz' | sed -e 's/\///'`
FUJITSU_REL=`echo ${UNAME_RELEASE} | sed -e 's/ /_/'`
echo "${FUJITSU_PROC}-fujitsu-${FUJITSU_SYS}${FUJITSU_REL}"
exit ;;
5000:UNIX_System_V:4.*:*)
FUJITSU_SYS=`uname -p | tr 'ABCDEFGHIJKLMNOPQRSTUVWXYZ' 'abcdefghijklmnopqrstuvwxyz' | sed -e 's/\///'`
FUJITSU_REL=`echo ${UNAME_RELEASE} | tr 'ABCDEFGHIJKLMNOPQRSTUVWXYZ' 'abcdefghijklmnopqrstuvwxyz' | sed -e 's/ /_/'`
echo "sparc-fujitsu-${FUJITSU_SYS}${FUJITSU_REL}"
exit ;;
i*86:BSD/386:*:* | i*86:BSD/OS:*:* | *:Ascend\ Embedded/OS:*:*)
echo ${UNAME_MACHINE}-pc-bsdi${UNAME_RELEASE}
exit ;;
sparc*:BSD/OS:*:*)
echo sparc-unknown-bsdi${UNAME_RELEASE}
exit ;;
*:BSD/OS:*:*)
echo ${UNAME_MACHINE}-unknown-bsdi${UNAME_RELEASE}
exit ;;
*:FreeBSD:*:*)
UNAME_PROCESSOR=`/usr/bin/uname -p`
case ${UNAME_PROCESSOR} in
amd64)
echo x86_64-unknown-freebsd`echo ${UNAME_RELEASE}|sed -e 's/[-(].*//'` ;;
*)
echo ${UNAME_PROCESSOR}-unknown-freebsd`echo ${UNAME_RELEASE}|sed -e 's/[-(].*//'` ;;
esac
exit ;;
i*:CYGWIN*:*)
echo ${UNAME_MACHINE}-pc-cygwin
exit ;;
*:MINGW64*:*)
echo ${UNAME_MACHINE}-pc-mingw64
exit ;;
*:MINGW*:*)
echo ${UNAME_MACHINE}-pc-mingw32
exit ;;
i*:MSYS*:*)
echo ${UNAME_MACHINE}-pc-msys
exit ;;
i*:windows32*:*)
# uname -m includes "-pc" on this system.
echo ${UNAME_MACHINE}-mingw32
exit ;;
i*:PW*:*)
echo ${UNAME_MACHINE}-pc-pw32
exit ;;
*:Interix*:*)
case ${UNAME_MACHINE} in
x86)
echo i586-pc-interix${UNAME_RELEASE}
exit ;;
authenticamd | genuineintel | EM64T)
echo x86_64-unknown-interix${UNAME_RELEASE}
exit ;;
IA64)
echo ia64-unknown-interix${UNAME_RELEASE}
exit ;;
esac ;;
[345]86:Windows_95:* | [345]86:Windows_98:* | [345]86:Windows_NT:*)
echo i${UNAME_MACHINE}-pc-mks
exit ;;
8664:Windows_NT:*)
echo x86_64-pc-mks
exit ;;
i*:Windows_NT*:* | Pentium*:Windows_NT*:*)
# How do we know it's Interix rather than the generic POSIX subsystem?
# It also conflicts with pre-2.0 versions of AT&T UWIN. Should we
# UNAME_MACHINE based on the output of uname instead of i386?
echo i586-pc-interix
exit ;;
i*:UWIN*:*)
echo ${UNAME_MACHINE}-pc-uwin
exit ;;
amd64:CYGWIN*:*:* | x86_64:CYGWIN*:*:*)
echo x86_64-unknown-cygwin
exit ;;
p*:CYGWIN*:*)
echo powerpcle-unknown-cygwin
exit ;;
prep*:SunOS:5.*:*)
echo powerpcle-unknown-solaris2`echo ${UNAME_RELEASE}|sed -e 's/[^.]*//'`
exit ;;
*:GNU:*:*)
# the GNU system
echo `echo ${UNAME_MACHINE}|sed -e 's,[-/].*$,,'`-unknown-${LIBC}`echo ${UNAME_RELEASE}|sed -e 's,/.*$,,'`
exit ;;
*:GNU/*:*:*)
# other systems with GNU libc and userland
echo ${UNAME_MACHINE}-unknown-`echo ${UNAME_SYSTEM} | sed 's,^[^/]*/,,' | tr '[A-Z]' '[a-z]'``echo ${UNAME_RELEASE}|sed -e 's/[-(].*//'`-${LIBC}
exit ;;
i*86:Minix:*:*)
echo ${UNAME_MACHINE}-pc-minix
exit ;;
aarch64:Linux:*:*)
echo ${UNAME_MACHINE}-unknown-linux-${LIBC}
exit ;;
aarch64_be:Linux:*:*)
UNAME_MACHINE=aarch64_be
echo ${UNAME_MACHINE}-unknown-linux-${LIBC}
exit ;;
alpha:Linux:*:*)
case `sed -n '/^cpu model/s/^.*: \(.*\)/\1/p' < /proc/cpuinfo` in
EV5) UNAME_MACHINE=alphaev5 ;;
EV56) UNAME_MACHINE=alphaev56 ;;
PCA56) UNAME_MACHINE=alphapca56 ;;
PCA57) UNAME_MACHINE=alphapca56 ;;
EV6) UNAME_MACHINE=alphaev6 ;;
EV67) UNAME_MACHINE=alphaev67 ;;
EV68*) UNAME_MACHINE=alphaev68 ;;
esac
objdump --private-headers /bin/sh | grep -q ld.so.1
if test "$?" = 0 ; then LIBC="gnulibc1" ; fi
echo ${UNAME_MACHINE}-unknown-linux-${LIBC}
exit ;;
arc:Linux:*:* | arceb:Linux:*:*)
echo ${UNAME_MACHINE}-unknown-linux-${LIBC}
exit ;;
arm*:Linux:*:*)
eval $set_cc_for_build
if echo __ARM_EABI__ | $CC_FOR_BUILD -E - 2>/dev/null \
| grep -q __ARM_EABI__
then
echo ${UNAME_MACHINE}-unknown-linux-${LIBC}
else
if echo __ARM_PCS_VFP | $CC_FOR_BUILD -E - 2>/dev/null \
| grep -q __ARM_PCS_VFP
then
echo ${UNAME_MACHINE}-unknown-linux-${LIBC}eabi
else
echo ${UNAME_MACHINE}-unknown-linux-${LIBC}eabihf
fi
fi
exit ;;
avr32*:Linux:*:*)
echo ${UNAME_MACHINE}-unknown-linux-${LIBC}
exit ;;
cris:Linux:*:*)
echo ${UNAME_MACHINE}-axis-linux-${LIBC}
exit ;;
crisv32:Linux:*:*)
echo ${UNAME_MACHINE}-axis-linux-${LIBC}
exit ;;
frv:Linux:*:*)
echo ${UNAME_MACHINE}-unknown-linux-${LIBC}
exit ;;
hexagon:Linux:*:*)
echo ${UNAME_MACHINE}-unknown-linux-${LIBC}
exit ;;
i*86:Linux:*:*)
echo ${UNAME_MACHINE}-pc-linux-${LIBC}
exit ;;
ia64:Linux:*:*)
echo ${UNAME_MACHINE}-unknown-linux-${LIBC}
exit ;;
m32r*:Linux:*:*)
echo ${UNAME_MACHINE}-unknown-linux-${LIBC}
exit ;;
m68*:Linux:*:*)
echo ${UNAME_MACHINE}-unknown-linux-${LIBC}
exit ;;
mips:Linux:*:* | mips64:Linux:*:*)
eval $set_cc_for_build
sed 's/^ //' << EOF >$dummy.c
#undef CPU
#undef ${UNAME_MACHINE}
#undef ${UNAME_MACHINE}el
#if defined(__MIPSEL__) || defined(__MIPSEL) || defined(_MIPSEL) || defined(MIPSEL)
CPU=${UNAME_MACHINE}el
#else
#if defined(__MIPSEB__) || defined(__MIPSEB) || defined(_MIPSEB) || defined(MIPSEB)
CPU=${UNAME_MACHINE}
#else
CPU=
#endif
#endif
EOF
eval `$CC_FOR_BUILD -E $dummy.c 2>/dev/null | grep '^CPU'`
test x"${CPU}" != x && { echo "${CPU}-unknown-linux-${LIBC}"; exit; }
;;
or1k:Linux:*:*)
echo ${UNAME_MACHINE}-unknown-linux-${LIBC}
exit ;;
or32:Linux:*:*)
echo ${UNAME_MACHINE}-unknown-linux-${LIBC}
exit ;;
padre:Linux:*:*)
echo sparc-unknown-linux-${LIBC}
exit ;;
parisc64:Linux:*:* | hppa64:Linux:*:*)
echo hppa64-unknown-linux-${LIBC}
exit ;;
parisc:Linux:*:* | hppa:Linux:*:*)
# Look for CPU level
case `grep '^cpu[^a-z]*:' /proc/cpuinfo 2>/dev/null | cut -d' ' -f2` in
PA7*) echo hppa1.1-unknown-linux-${LIBC} ;;
PA8*) echo hppa2.0-unknown-linux-${LIBC} ;;
*) echo hppa-unknown-linux-${LIBC} ;;
esac
exit ;;
ppc64:Linux:*:*)
echo powerpc64-unknown-linux-${LIBC}
exit ;;
ppc:Linux:*:*)
echo powerpc-unknown-linux-${LIBC}
exit ;;
ppc64le:Linux:*:*)
echo powerpc64le-unknown-linux-${LIBC}
exit ;;
ppcle:Linux:*:*)
echo powerpcle-unknown-linux-${LIBC}
exit ;;
s390:Linux:*:* | s390x:Linux:*:*)
echo ${UNAME_MACHINE}-ibm-linux-${LIBC}
exit ;;
sh64*:Linux:*:*)
echo ${UNAME_MACHINE}-unknown-linux-${LIBC}
exit ;;
sh*:Linux:*:*)
echo ${UNAME_MACHINE}-unknown-linux-${LIBC}
exit ;;
sparc:Linux:*:* | sparc64:Linux:*:*)
echo ${UNAME_MACHINE}-unknown-linux-${LIBC}
exit ;;
tile*:Linux:*:*)
echo ${UNAME_MACHINE}-unknown-linux-${LIBC}
exit ;;
vax:Linux:*:*)
echo ${UNAME_MACHINE}-dec-linux-${LIBC}
exit ;;
x86_64:Linux:*:*)
echo ${UNAME_MACHINE}-unknown-linux-${LIBC}
exit ;;
xtensa*:Linux:*:*)
echo ${UNAME_MACHINE}-unknown-linux-${LIBC}
exit ;;
i*86:DYNIX/ptx:4*:*)
# ptx 4.0 does uname -s correctly, with DYNIX/ptx in there.
# earlier versions are messed up and put the nodename in both
# sysname and nodename.
echo i386-sequent-sysv4
exit ;;
i*86:UNIX_SV:4.2MP:2.*)
# Unixware is an offshoot of SVR4, but it has its own version
# number series starting with 2...
# I am not positive that other SVR4 systems won't match this,
# I just have to hope. -- rms.
# Use sysv4.2uw... so that sysv4* matches it.
echo ${UNAME_MACHINE}-pc-sysv4.2uw${UNAME_VERSION}
exit ;;
i*86:OS/2:*:*)
# If we were able to find `uname', then EMX Unix compatibility
# is probably installed.
echo ${UNAME_MACHINE}-pc-os2-emx
exit ;;
i*86:XTS-300:*:STOP)
echo ${UNAME_MACHINE}-unknown-stop
exit ;;
i*86:atheos:*:*)
echo ${UNAME_MACHINE}-unknown-atheos
exit ;;
i*86:syllable:*:*)
echo ${UNAME_MACHINE}-pc-syllable
exit ;;
i*86:LynxOS:2.*:* | i*86:LynxOS:3.[01]*:* | i*86:LynxOS:4.[02]*:*)
echo i386-unknown-lynxos${UNAME_RELEASE}
exit ;;
i*86:*DOS:*:*)
echo ${UNAME_MACHINE}-pc-msdosdjgpp
exit ;;
i*86:*:4.*:* | i*86:SYSTEM_V:4.*:*)
UNAME_REL=`echo ${UNAME_RELEASE} | sed 's/\/MP$//'`
if grep Novell /usr/include/link.h >/dev/null 2>/dev/null; then
echo ${UNAME_MACHINE}-univel-sysv${UNAME_REL}
else
echo ${UNAME_MACHINE}-pc-sysv${UNAME_REL}
fi
exit ;;
i*86:*:5:[678]*)
# UnixWare 7.x, OpenUNIX and OpenServer 6.
case `/bin/uname -X | grep "^Machine"` in
*486*) UNAME_MACHINE=i486 ;;
*Pentium) UNAME_MACHINE=i586 ;;
*Pent*|*Celeron) UNAME_MACHINE=i686 ;;
esac
echo ${UNAME_MACHINE}-unknown-sysv${UNAME_RELEASE}${UNAME_SYSTEM}${UNAME_VERSION}
exit ;;
i*86:*:3.2:*)
if test -f /usr/options/cb.name; then
UNAME_REL=`sed -n 's/.*Version //p' /dev/null >/dev/null ; then
UNAME_REL=`(/bin/uname -X|grep Release|sed -e 's/.*= //')`
(/bin/uname -X|grep i80486 >/dev/null) && UNAME_MACHINE=i486
(/bin/uname -X|grep '^Machine.*Pentium' >/dev/null) \
&& UNAME_MACHINE=i586
(/bin/uname -X|grep '^Machine.*Pent *II' >/dev/null) \
&& UNAME_MACHINE=i686
(/bin/uname -X|grep '^Machine.*Pentium Pro' >/dev/null) \
&& UNAME_MACHINE=i686
echo ${UNAME_MACHINE}-pc-sco$UNAME_REL
else
echo ${UNAME_MACHINE}-pc-sysv32
fi
exit ;;
pc:*:*:*)
# Left here for compatibility:
# uname -m prints for DJGPP always 'pc', but it prints nothing about
# the processor, so we play safe by assuming i586.
# Note: whatever this is, it MUST be the same as what config.sub
# prints for the "djgpp" host, or else GDB configury will decide that
# this is a cross-build.
echo i586-pc-msdosdjgpp
exit ;;
Intel:Mach:3*:*)
echo i386-pc-mach3
exit ;;
paragon:*:*:*)
echo i860-intel-osf1
exit ;;
i860:*:4.*:*) # i860-SVR4
if grep Stardent /usr/include/sys/uadmin.h >/dev/null 2>&1 ; then
echo i860-stardent-sysv${UNAME_RELEASE} # Stardent Vistra i860-SVR4
else # Add other i860-SVR4 vendors below as they are discovered.
echo i860-unknown-sysv${UNAME_RELEASE} # Unknown i860-SVR4
fi
exit ;;
mini*:CTIX:SYS*5:*)
# "miniframe"
echo m68010-convergent-sysv
exit ;;
mc68k:UNIX:SYSTEM5:3.51m)
echo m68k-convergent-sysv
exit ;;
M680?0:D-NIX:5.3:*)
echo m68k-diab-dnix
exit ;;
M68*:*:R3V[5678]*:*)
test -r /sysV68 && { echo 'm68k-motorola-sysv'; exit; } ;;
3[345]??:*:4.0:3.0 | 3[34]??A:*:4.0:3.0 | 3[34]??,*:*:4.0:3.0 | 3[34]??/*:*:4.0:3.0 | 4400:*:4.0:3.0 | 4850:*:4.0:3.0 | SKA40:*:4.0:3.0 | SDS2:*:4.0:3.0 | SHG2:*:4.0:3.0 | S7501*:*:4.0:3.0)
OS_REL=''
test -r /etc/.relid \
&& OS_REL=.`sed -n 's/[^ ]* [^ ]* \([0-9][0-9]\).*/\1/p' < /etc/.relid`
/bin/uname -p 2>/dev/null | grep 86 >/dev/null \
&& { echo i486-ncr-sysv4.3${OS_REL}; exit; }
/bin/uname -p 2>/dev/null | /bin/grep entium >/dev/null \
&& { echo i586-ncr-sysv4.3${OS_REL}; exit; } ;;
3[34]??:*:4.0:* | 3[34]??,*:*:4.0:*)
/bin/uname -p 2>/dev/null | grep 86 >/dev/null \
&& { echo i486-ncr-sysv4; exit; } ;;
NCR*:*:4.2:* | MPRAS*:*:4.2:*)
OS_REL='.3'
test -r /etc/.relid \
&& OS_REL=.`sed -n 's/[^ ]* [^ ]* \([0-9][0-9]\).*/\1/p' < /etc/.relid`
/bin/uname -p 2>/dev/null | grep 86 >/dev/null \
&& { echo i486-ncr-sysv4.3${OS_REL}; exit; }
/bin/uname -p 2>/dev/null | /bin/grep entium >/dev/null \
&& { echo i586-ncr-sysv4.3${OS_REL}; exit; }
/bin/uname -p 2>/dev/null | /bin/grep pteron >/dev/null \
&& { echo i586-ncr-sysv4.3${OS_REL}; exit; } ;;
m68*:LynxOS:2.*:* | m68*:LynxOS:3.0*:*)
echo m68k-unknown-lynxos${UNAME_RELEASE}
exit ;;
mc68030:UNIX_System_V:4.*:*)
echo m68k-atari-sysv4
exit ;;
TSUNAMI:LynxOS:2.*:*)
echo sparc-unknown-lynxos${UNAME_RELEASE}
exit ;;
rs6000:LynxOS:2.*:*)
echo rs6000-unknown-lynxos${UNAME_RELEASE}
exit ;;
PowerPC:LynxOS:2.*:* | PowerPC:LynxOS:3.[01]*:* | PowerPC:LynxOS:4.[02]*:*)
echo powerpc-unknown-lynxos${UNAME_RELEASE}
exit ;;
SM[BE]S:UNIX_SV:*:*)
echo mips-dde-sysv${UNAME_RELEASE}
exit ;;
RM*:ReliantUNIX-*:*:*)
echo mips-sni-sysv4
exit ;;
RM*:SINIX-*:*:*)
echo mips-sni-sysv4
exit ;;
*:SINIX-*:*:*)
if uname -p 2>/dev/null >/dev/null ; then
UNAME_MACHINE=`(uname -p) 2>/dev/null`
echo ${UNAME_MACHINE}-sni-sysv4
else
echo ns32k-sni-sysv
fi
exit ;;
PENTIUM:*:4.0*:*) # Unisys `ClearPath HMP IX 4000' SVR4/MP effort
# says
echo i586-unisys-sysv4
exit ;;
*:UNIX_System_V:4*:FTX*)
# From Gerald Hewes .
# How about differentiating between stratus architectures? -djm
echo hppa1.1-stratus-sysv4
exit ;;
*:*:*:FTX*)
# From seanf@swdc.stratus.com.
echo i860-stratus-sysv4
exit ;;
i*86:VOS:*:*)
# From Paul.Green@stratus.com.
echo ${UNAME_MACHINE}-stratus-vos
exit ;;
*:VOS:*:*)
# From Paul.Green@stratus.com.
echo hppa1.1-stratus-vos
exit ;;
mc68*:A/UX:*:*)
echo m68k-apple-aux${UNAME_RELEASE}
exit ;;
news*:NEWS-OS:6*:*)
echo mips-sony-newsos6
exit ;;
R[34]000:*System_V*:*:* | R4000:UNIX_SYSV:*:* | R*000:UNIX_SV:*:*)
if [ -d /usr/nec ]; then
echo mips-nec-sysv${UNAME_RELEASE}
else
echo mips-unknown-sysv${UNAME_RELEASE}
fi
exit ;;
BeBox:BeOS:*:*) # BeOS running on hardware made by Be, PPC only.
echo powerpc-be-beos
exit ;;
BeMac:BeOS:*:*) # BeOS running on Mac or Mac clone, PPC only.
echo powerpc-apple-beos
exit ;;
BePC:BeOS:*:*) # BeOS running on Intel PC compatible.
echo i586-pc-beos
exit ;;
BePC:Haiku:*:*) # Haiku running on Intel PC compatible.
echo i586-pc-haiku
exit ;;
x86_64:Haiku:*:*)
echo x86_64-unknown-haiku
exit ;;
SX-4:SUPER-UX:*:*)
echo sx4-nec-superux${UNAME_RELEASE}
exit ;;
SX-5:SUPER-UX:*:*)
echo sx5-nec-superux${UNAME_RELEASE}
exit ;;
SX-6:SUPER-UX:*:*)
echo sx6-nec-superux${UNAME_RELEASE}
exit ;;
SX-7:SUPER-UX:*:*)
echo sx7-nec-superux${UNAME_RELEASE}
exit ;;
SX-8:SUPER-UX:*:*)
echo sx8-nec-superux${UNAME_RELEASE}
exit ;;
SX-8R:SUPER-UX:*:*)
echo sx8r-nec-superux${UNAME_RELEASE}
exit ;;
Power*:Rhapsody:*:*)
echo powerpc-apple-rhapsody${UNAME_RELEASE}
exit ;;
*:Rhapsody:*:*)
echo ${UNAME_MACHINE}-apple-rhapsody${UNAME_RELEASE}
exit ;;
*:Darwin:*:*)
UNAME_PROCESSOR=`uname -p` || UNAME_PROCESSOR=unknown
eval $set_cc_for_build
if test "$UNAME_PROCESSOR" = unknown ; then
UNAME_PROCESSOR=powerpc
fi
if [ "$CC_FOR_BUILD" != 'no_compiler_found' ]; then
if (echo '#ifdef __LP64__'; echo IS_64BIT_ARCH; echo '#endif') | \
(CCOPTS= $CC_FOR_BUILD -E - 2>/dev/null) | \
grep IS_64BIT_ARCH >/dev/null
then
case $UNAME_PROCESSOR in
i386) UNAME_PROCESSOR=x86_64 ;;
powerpc) UNAME_PROCESSOR=powerpc64 ;;
esac
fi
fi
echo ${UNAME_PROCESSOR}-apple-darwin${UNAME_RELEASE}
exit ;;
*:procnto*:*:* | *:QNX:[0123456789]*:*)
UNAME_PROCESSOR=`uname -p`
if test "$UNAME_PROCESSOR" = "x86"; then
UNAME_PROCESSOR=i386
UNAME_MACHINE=pc
fi
echo ${UNAME_PROCESSOR}-${UNAME_MACHINE}-nto-qnx${UNAME_RELEASE}
exit ;;
*:QNX:*:4*)
echo i386-pc-qnx
exit ;;
NEO-?:NONSTOP_KERNEL:*:*)
echo neo-tandem-nsk${UNAME_RELEASE}
exit ;;
NSE-*:NONSTOP_KERNEL:*:*)
echo nse-tandem-nsk${UNAME_RELEASE}
exit ;;
NSR-?:NONSTOP_KERNEL:*:*)
echo nsr-tandem-nsk${UNAME_RELEASE}
exit ;;
*:NonStop-UX:*:*)
echo mips-compaq-nonstopux
exit ;;
BS2000:POSIX*:*:*)
echo bs2000-siemens-sysv
exit ;;
DS/*:UNIX_System_V:*:*)
echo ${UNAME_MACHINE}-${UNAME_SYSTEM}-${UNAME_RELEASE}
exit ;;
*:Plan9:*:*)
# "uname -m" is not consistent, so use $cputype instead. 386
# is converted to i386 for consistency with other x86
# operating systems.
if test "$cputype" = "386"; then
UNAME_MACHINE=i386
else
UNAME_MACHINE="$cputype"
fi
echo ${UNAME_MACHINE}-unknown-plan9
exit ;;
*:TOPS-10:*:*)
echo pdp10-unknown-tops10
exit ;;
*:TENEX:*:*)
echo pdp10-unknown-tenex
exit ;;
KS10:TOPS-20:*:* | KL10:TOPS-20:*:* | TYPE4:TOPS-20:*:*)
echo pdp10-dec-tops20
exit ;;
XKL-1:TOPS-20:*:* | TYPE5:TOPS-20:*:*)
echo pdp10-xkl-tops20
exit ;;
*:TOPS-20:*:*)
echo pdp10-unknown-tops20
exit ;;
*:ITS:*:*)
echo pdp10-unknown-its
exit ;;
SEI:*:*:SEIUX)
echo mips-sei-seiux${UNAME_RELEASE}
exit ;;
*:DragonFly:*:*)
echo ${UNAME_MACHINE}-unknown-dragonfly`echo ${UNAME_RELEASE}|sed -e 's/[-(].*//'`
exit ;;
*:*VMS:*:*)
UNAME_MACHINE=`(uname -p) 2>/dev/null`
case "${UNAME_MACHINE}" in
A*) echo alpha-dec-vms ; exit ;;
I*) echo ia64-dec-vms ; exit ;;
V*) echo vax-dec-vms ; exit ;;
esac ;;
*:XENIX:*:SysV)
echo i386-pc-xenix
exit ;;
i*86:skyos:*:*)
echo ${UNAME_MACHINE}-pc-skyos`echo ${UNAME_RELEASE}` | sed -e 's/ .*$//'
exit ;;
i*86:rdos:*:*)
echo ${UNAME_MACHINE}-pc-rdos
exit ;;
i*86:AROS:*:*)
echo ${UNAME_MACHINE}-pc-aros
exit ;;
x86_64:VMkernel:*:*)
echo ${UNAME_MACHINE}-unknown-esx
exit ;;
esac
eval $set_cc_for_build
cat >$dummy.c <
# include
#endif
main ()
{
#if defined (sony)
#if defined (MIPSEB)
/* BFD wants "bsd" instead of "newsos". Perhaps BFD should be changed,
I don't know.... */
printf ("mips-sony-bsd\n"); exit (0);
#else
#include
printf ("m68k-sony-newsos%s\n",
#ifdef NEWSOS4
"4"
#else
""
#endif
); exit (0);
#endif
#endif
#if defined (__arm) && defined (__acorn) && defined (__unix)
printf ("arm-acorn-riscix\n"); exit (0);
#endif
#if defined (hp300) && !defined (hpux)
printf ("m68k-hp-bsd\n"); exit (0);
#endif
#if defined (NeXT)
#if !defined (__ARCHITECTURE__)
#define __ARCHITECTURE__ "m68k"
#endif
int version;
version=`(hostinfo | sed -n 's/.*NeXT Mach \([0-9]*\).*/\1/p') 2>/dev/null`;
if (version < 4)
printf ("%s-next-nextstep%d\n", __ARCHITECTURE__, version);
else
printf ("%s-next-openstep%d\n", __ARCHITECTURE__, version);
exit (0);
#endif
#if defined (MULTIMAX) || defined (n16)
#if defined (UMAXV)
printf ("ns32k-encore-sysv\n"); exit (0);
#else
#if defined (CMU)
printf ("ns32k-encore-mach\n"); exit (0);
#else
printf ("ns32k-encore-bsd\n"); exit (0);
#endif
#endif
#endif
#if defined (__386BSD__)
printf ("i386-pc-bsd\n"); exit (0);
#endif
#if defined (sequent)
#if defined (i386)
printf ("i386-sequent-dynix\n"); exit (0);
#endif
#if defined (ns32000)
printf ("ns32k-sequent-dynix\n"); exit (0);
#endif
#endif
#if defined (_SEQUENT_)
struct utsname un;
uname(&un);
if (strncmp(un.version, "V2", 2) == 0) {
printf ("i386-sequent-ptx2\n"); exit (0);
}
if (strncmp(un.version, "V1", 2) == 0) { /* XXX is V1 correct? */
printf ("i386-sequent-ptx1\n"); exit (0);
}
printf ("i386-sequent-ptx\n"); exit (0);
#endif
#if defined (vax)
# if !defined (ultrix)
# include
# if defined (BSD)
# if BSD == 43
printf ("vax-dec-bsd4.3\n"); exit (0);
# else
# if BSD == 199006
printf ("vax-dec-bsd4.3reno\n"); exit (0);
# else
printf ("vax-dec-bsd\n"); exit (0);
# endif
# endif
# else
printf ("vax-dec-bsd\n"); exit (0);
# endif
# else
printf ("vax-dec-ultrix\n"); exit (0);
# endif
#endif
#if defined (alliant) && defined (i860)
printf ("i860-alliant-bsd\n"); exit (0);
#endif
exit (1);
}
EOF
$CC_FOR_BUILD -o $dummy $dummy.c 2>/dev/null && SYSTEM_NAME=`$dummy` &&
{ echo "$SYSTEM_NAME"; exit; }
# Apollos put the system type in the environment.
test -d /usr/apollo && { echo ${ISP}-apollo-${SYSTYPE}; exit; }
# Convex versions that predate uname can use getsysinfo(1)
if [ -x /usr/convex/getsysinfo ]
then
case `getsysinfo -f cpu_type` in
c1*)
echo c1-convex-bsd
exit ;;
c2*)
if getsysinfo -f scalar_acc
then echo c32-convex-bsd
else echo c2-convex-bsd
fi
exit ;;
c34*)
echo c34-convex-bsd
exit ;;
c38*)
echo c38-convex-bsd
exit ;;
c4*)
echo c4-convex-bsd
exit ;;
esac
fi
cat >&2 < in order to provide the needed
information to handle your system.
config.guess timestamp = $timestamp
uname -m = `(uname -m) 2>/dev/null || echo unknown`
uname -r = `(uname -r) 2>/dev/null || echo unknown`
uname -s = `(uname -s) 2>/dev/null || echo unknown`
uname -v = `(uname -v) 2>/dev/null || echo unknown`
/usr/bin/uname -p = `(/usr/bin/uname -p) 2>/dev/null`
/bin/uname -X = `(/bin/uname -X) 2>/dev/null`
hostinfo = `(hostinfo) 2>/dev/null`
/bin/universe = `(/bin/universe) 2>/dev/null`
/usr/bin/arch -k = `(/usr/bin/arch -k) 2>/dev/null`
/bin/arch = `(/bin/arch) 2>/dev/null`
/usr/bin/oslevel = `(/usr/bin/oslevel) 2>/dev/null`
/usr/convex/getsysinfo = `(/usr/convex/getsysinfo) 2>/dev/null`
UNAME_MACHINE = ${UNAME_MACHINE}
UNAME_RELEASE = ${UNAME_RELEASE}
UNAME_SYSTEM = ${UNAME_SYSTEM}
UNAME_VERSION = ${UNAME_VERSION}
EOF
exit 1
# Local variables:
# eval: (add-hook 'write-file-hooks 'time-stamp)
# time-stamp-start: "timestamp='"
# time-stamp-format: "%:y-%02m-%02d"
# time-stamp-end: "'"
# End:
iprutils-2.4.18.1/iprdumpfmt.c 0000664 0001750 0001751 00000035046 13270167731 013116 0000000 0000000 /**
* IBM IPR dump formatting utility
*
* (C) Copyright 2015
* International Business Machines Corporation and others.
* All Rights Reserved. This program and the accompanying
* materials are made available under the terms of the
* Common Public License v1.0 which accompanies this distribution.
**/
#include
#include
#include "iprlib.h"
#define EYE_CATCHER_BE 0xC5D4E3F2
#define EYE_CATCHER_LE 0xF2E3D4C5
#define OS_LINUX 0x4C4E5558
#define DRV_IPR2 0x49505232
#define TYPE_ASCII 0x41534349
#define TYPE_BIN 0x42494E41
#define TYPE_MR32 0x4D523332
#define TYPE_MR64 0x4D523634
#define ID_IOA_DUMP 0x494F4131
#define ID_IOA_LOC 0x4C4F4341
#define ID_DRV_TRACE 0x54524143
#define ID_DRV_VER 0x44525652
#define ID_DRV_TYPE 0x54595045
#define ID_DRV_CTRL_BLK 0x494F4342
#define ID_DRV_PEND_OPS 0x414F5053
#define IPR_DUMP_STATUS_SUCCESS 0
#define IPR_DUMP_STATUS_QUAL_SUCCESS 2
#define IPR_DUMP_STATUS_FAILED 0xFFFFFFFF
static const struct {
const u8 op;
const char *name;
} scsi_cmnds[] = {
{ 0xc1, "IPR_CANCEL_REQUEST" },
{ 0xc2, "IPR_QUERY_RSRC_STATE" },
{ 0xc3, "IPR_RESET_DEVICE" },
{ 0xc4, "IPR_ID_HOST_RR_Q" },
{ 0xc5, "IPR_QUERY_IOA_CONFIG" },
{ 0xce, "IPR_CANCEL_ALL_REQUESTS" },
{ 0xcf, "IPR_HOST_CONTROLLED_ASYNC" },
{ 0xfb, "IPR_SET_SUPPORTED_DEVICES" },
{ 0xf7, "IPR_IOA_SHUTDOWN" },
{ 0x00, "TEST_UNIT_READY" },
{ 0x01, "REZERO_UNIT" },
{ 0x03, "REQUEST_SENSE" },
{ 0x04, "FORMAT_UNIT" },
{ 0x05, "READ_BLOCK_LIMITS" },
{ 0x07, "REASSIGN_BLOCKS" },
{ 0x07, "INITIALIZE_ELEMENT_STATUS" },
{ 0x08, "READ_6" },
{ 0x0a, "WRITE_6" },
{ 0x0b, "SEEK_6" },
{ 0x0f, "READ_REVERSE" },
{ 0x10, "WRITE_FILEMARKS" },
{ 0x11, "SPACE" },
{ 0x12, "INQUIRY" },
{ 0x14, "RECOVER_BUFFERED_DATA" },
{ 0x15, "MODE_SELECT" },
{ 0x16, "RESERVE" },
{ 0x17, "RELEASE" },
{ 0x18, "COPY" },
{ 0x19, "ERASE" },
{ 0x1a, "MODE_SENSE" },
{ 0x1b, "START_STOP" },
{ 0x1c, "RECEIVE_DIAGNOSTIC" },
{ 0x1d, "SEND_DIAGNOSTIC" },
{ 0x1e, "ALLOW_MEDIUM_REMOVAL" },
{ 0x23, "READ_FORMAT_CAPACITIES" },
{ 0x24, "SET_WINDOW" },
{ 0x25, "READ_CAPACITY" },
{ 0x28, "READ_10" },
{ 0x2a, "WRITE_10" },
{ 0x2b, "SEEK_10" },
{ 0x2b, "POSITION_TO_ELEMENT" },
{ 0x2e, "WRITE_VERIFY" },
{ 0x2f, "VERIFY" },
{ 0x30, "SEARCH_HIGH" },
{ 0x31, "SEARCH_EQUAL" },
{ 0x32, "SEARCH_LOW" },
{ 0x33, "SET_LIMITS" },
{ 0x34, "PRE_FETCH" },
{ 0x34, "READ_POSITION" },
{ 0x35, "SYNCHRONIZE_CACHE" },
{ 0x36, "LOCK_UNLOCK_CACHE" },
{ 0x37, "READ_DEFECT_DATA" },
{ 0x38, "MEDIUM_SCAN" },
{ 0x39, "COMPARE" },
{ 0x3a, "COPY_VERIFY" },
{ 0x3b, "WRITE_BUFFER" },
{ 0x3c, "READ_BUFFER" },
{ 0x3d, "UPDATE_BLOCK" },
{ 0x3e, "READ_LONG" },
{ 0x3f, "WRITE_LONG" },
{ 0x40, "CHANGE_DEFINITION" },
{ 0x41, "WRITE_SAME" },
{ 0x42, "UNMAP" },
{ 0x43, "READ_TOC" },
{ 0x44, "READ_HEADER" },
{ 0x4a, "GET_EVENT_STATUS_NOTIFICATION" },
{ 0x4c, "LOG_SELECT" },
{ 0x4d, "LOG_SENSE" },
{ 0x53, "XDWRITEREAD_10" },
{ 0x55, "MODE_SELECT_10" },
{ 0x56, "RESERVE_10" },
{ 0x57, "RELEASE_10" },
{ 0x5a, "MODE_SENSE_10" },
{ 0x5e, "PERSISTENT_RESERVE_IN" },
{ 0x5f, "PERSISTENT_RESERVE_OUT" },
{ 0x7f, "VARIABLE_LENGTH_CMD" },
{ 0xa0, "REPORT_LUNS" },
{ 0xa2, "SECURITY_PROTOCOL_IN" },
{ 0xa3, "MAINTENANCE_IN" },
{ 0xa4, "MAINTENANCE_OUT" },
{ 0xa5, "MOVE_MEDIUM" },
{ 0xa6, "EXCHANGE_MEDIUM" },
{ 0xa8, "READ_12" },
{ 0xa9, "SERVICE_ACTION_OUT_12" },
{ 0xaa, "WRITE_12" },
{ 0xab, "SERVICE_ACTION_IN_12" },
{ 0xae, "WRITE_VERIFY_12" },
{ 0xaf, "VERIFY_12" },
{ 0xb0, "SEARCH_HIGH_12" },
{ 0xb1, "SEARCH_EQUAL_12" },
{ 0xb2, "SEARCH_LOW_12" },
{ 0xb5, "SECURITY_PROTOCOL_OUT" },
{ 0xb8, "READ_ELEMENT_STATUS" },
{ 0xb6, "SEND_VOLUME_TAG" },
{ 0xea, "WRITE_LONG_2" },
{ 0x83, "EXTENDED_COPY" },
{ 0x84, "RECEIVE_COPY_RESULTS" },
{ 0x86, "ACCESS_CONTROL_IN" },
{ 0x87, "ACCESS_CONTROL_OUT" },
{ 0x88, "READ_16" },
{ 0x89, "COMPARE_AND_WRITE" },
{ 0x8a, "WRITE_16" },
{ 0x8c, "READ_ATTRIBUTE" },
{ 0x8d, "WRITE_ATTRIBUTE" },
{ 0x8f, "VERIFY_16" },
{ 0x91, "SYNCHRONIZE_CACHE_16" },
{ 0x93, "WRITE_SAME_16" },
{ 0x9d, "SERVICE_ACTION_BIDIRECTIONAL" },
{ 0x9e, "SERVICE_ACTION_IN_16" },
{ 0x9f, "SERVICE_ACTION_OUT_16" }
};
struct ipr_dump_header {
u32 eye_catcher;
u32 len;
u32 num_entries;
u32 first_entry_offset;
u32 status;
u32 os;
u32 driver_name;
};
struct ipr_dump_entry_header {
u32 eye_catcher;
u32 len; /* does not include entry header */
u32 num_elems;
u32 offset; /* offset to data from beginning of dump file */
u32 data_type;
u32 id;
u32 status;
};
struct ipr_trace_entry {
u32 time;
u8 op_code; /* SCSI opcode */
u8 ata_op_code;
u8 type;
#define IPR_TRACE_START 0x00
#define IPR_TRACE_FINISH 0xff
u8 cmd_index;
u32 res_handle; /* stored as BE */
union {
u32 ioasc;
u32 add_data;
u32 res_addr;
} u;
};
static void *dump_map; /* ipr dump memory map */
static FILE *out_fp; /* output report file pointer */
static int verbose_trace; /* flag for verbose trace printing */
#define TARGET_TO_HOST32(value, eye_catcher) \
(eye_catcher == EYE_CATCHER_BE ? \
be32toh(value) : \
le32toh(value))
/**
* get_scsi_command_literal -
* @value: SCSI opcode
*
* Returns:
* SCSI command string
**/
static const char* get_scsi_command_literal(u32 value)
{
u32 i = 0;
for (i = 0; i < ARRAY_SIZE(scsi_cmnds); ++i) {
if (value == scsi_cmnds[i].op)
return scsi_cmnds[i].name;
}
return NULL;
}
/**
* read_dump_header -
* @hdr: ipr dump header pointer
*
* Returns:
* nothing
**/
static void read_dump_header(struct ipr_dump_header *hdr)
{
struct ipr_dump_header *raw_hdr = dump_map;
hdr->eye_catcher = htobe32(raw_hdr->eye_catcher);
/* convert to correct endianness */
hdr->len = TARGET_TO_HOST32(raw_hdr->len, hdr->eye_catcher);
hdr->num_entries = TARGET_TO_HOST32(raw_hdr->num_entries,
hdr->eye_catcher);
hdr->first_entry_offset = TARGET_TO_HOST32(raw_hdr->first_entry_offset,
hdr->eye_catcher);
hdr->status = TARGET_TO_HOST32(raw_hdr->status, hdr->eye_catcher);
hdr->os = TARGET_TO_HOST32(raw_hdr->os, hdr->eye_catcher);
hdr->driver_name = TARGET_TO_HOST32(raw_hdr->driver_name,
hdr->eye_catcher);
}
/**
* print_dump_header -
* @hdr: ipr dump header pointer
*
* Returns:
* nothing
**/
static void print_dump_header(struct ipr_dump_header *hdr)
{
fprintf(out_fp, "IPR Adapter Dump Report\n\n");
switch (hdr->eye_catcher) {
case EYE_CATCHER_BE:
fprintf(out_fp, "Big Endian format: ");
break;
case EYE_CATCHER_LE:
fprintf(out_fp, "Little Endian format: ");
break;
default:
fprintf(out_fp, "Unknown dump format: ");
}
fprintf(out_fp, "Eye Catcher is 0x%08X\n", hdr->eye_catcher);
fprintf(out_fp, "Total length: %d bytes\n", hdr->len);
fprintf(out_fp, "Number of dump entries: %d\n", hdr->num_entries);
fprintf(out_fp, "Offset to first entry: 0x%08X bytes\n",
hdr->first_entry_offset);
fprintf(out_fp, "Dump status: 0x%08X ", hdr->status);
switch (hdr->status) {
case IPR_DUMP_STATUS_SUCCESS:
fprintf(out_fp, "(SUCCESS)\n");
break;
case IPR_DUMP_STATUS_QUAL_SUCCESS:
fprintf(out_fp, "(QUAL_SUCCESS)\n");
break;
case IPR_DUMP_STATUS_FAILED:
fprintf(out_fp, "(FAILED)\n");
break;
default:
fprintf(out_fp, "(UNKNOWN)\n");
}
fprintf(out_fp, "Operating System: ");
switch (hdr->os) {
case OS_LINUX:
fprintf(out_fp, "Linux\n");
break;
default:
fprintf(out_fp, "unknown\n");
}
fprintf(out_fp, "Driver: ");
switch (hdr->driver_name) {
case DRV_IPR2:
fprintf(out_fp, "ipr2\n");
break;
default:
fprintf(out_fp, "unknown\n");
}
}
/**
* read_entry_header -
* @hdr: ipr dump entry header pointer
* @offset: offset to entry data
*
* Returns:
* offset to next entry header
**/
static u32 read_entry_header(struct ipr_dump_entry_header *hdr, u32 offset)
{
struct ipr_dump_entry_header *raw_hdr = dump_map+offset;
hdr->eye_catcher = htobe32(raw_hdr->eye_catcher);
/* convert to correct endianness */
hdr->len = TARGET_TO_HOST32(raw_hdr->len, hdr->eye_catcher);
hdr->num_elems = TARGET_TO_HOST32(raw_hdr->num_elems, hdr->eye_catcher);
hdr->offset = TARGET_TO_HOST32(raw_hdr->offset, hdr->eye_catcher);
hdr->data_type = TARGET_TO_HOST32(raw_hdr->data_type, hdr->eye_catcher);
hdr->id = TARGET_TO_HOST32(raw_hdr->id, hdr->eye_catcher);
hdr->status = TARGET_TO_HOST32(raw_hdr->status, hdr->eye_catcher);
hdr->offset += offset;
return (hdr->offset + hdr->len);
}
/**
* read_trace_data -
* @offset: offset to entry data
* @eye_catcher: ipr entry eye catcher
*
* Returns:
* ipr trace entry structure
**/
static struct ipr_trace_entry read_trace_data(u32 offset, u32 eye_catcher)
{
struct ipr_trace_entry trace;
struct ipr_trace_entry *raw_trace = dump_map+offset;
/* always stored as BE */
trace.res_handle = htobe32(raw_trace->res_handle);
/* convert to correct endianness */
trace.time = TARGET_TO_HOST32(raw_trace->time, eye_catcher);
trace.u.add_data = TARGET_TO_HOST32(raw_trace->u.add_data, eye_catcher);
/* copy remaining trace fields */
trace.op_code = raw_trace->op_code;
trace.ata_op_code = raw_trace->ata_op_code;
trace.type = raw_trace->type;
trace.cmd_index = raw_trace->cmd_index;
return trace;
}
#define JIFF_TO_USEC(x) x * 1000 * 1000 / sysconf(_SC_CLK_TCK)
/**
* print_trace -
* @hdr: ipr entry header pointer
*
* Returns:
* nothing
**/
static void print_trace(struct ipr_dump_entry_header *hdr)
{
u32 i, min_pos, min_time, num_entries, offset;
struct ipr_trace_entry *raw_trace;
struct ipr_trace_entry t;
const char *cmnd;
num_entries = hdr->len / sizeof(*raw_trace);
raw_trace = dump_map + hdr->offset;
min_pos = 0;
min_time = TARGET_TO_HOST32(raw_trace->time, hdr->eye_catcher);
fprintf(out_fp, "\t entries found: %d\n\n", num_entries);
for (i = 1; i < num_entries; ++i) {
raw_trace = dump_map + hdr->offset + i*sizeof(*raw_trace);
if (TARGET_TO_HOST32(raw_trace->time, hdr->eye_catcher) <
min_time) {
min_time = TARGET_TO_HOST32(raw_trace->time,
hdr->eye_catcher);
min_pos = i;
}
}
for (i = 0; i < num_entries; ++i) {
offset = hdr->offset +
((min_pos+i)%num_entries) * sizeof(*raw_trace);
t = read_trace_data(offset, hdr->eye_catcher);
fprintf(out_fp, "\t %08X %02X%02X%02X%02X %08X %08X",
t.time, t.op_code, t.ata_op_code, t.type, t.cmd_index,
t.res_handle, t.u.add_data);
if (verbose_trace) {
t.time -= min_time;
fprintf(out_fp, "\t|\t%+10lld\xC2\xB5s\t",
(long long unsigned)JIFF_TO_USEC(t.time));
switch(t.type) {
case IPR_TRACE_START:
fprintf(out_fp, "START\t");
break;
case IPR_TRACE_FINISH:
fprintf(out_fp, "FINISH\t");
break;
default:
fprintf(out_fp, "\t");
}
cmnd = get_scsi_command_literal(t.op_code);
if (cmnd)
fprintf(out_fp, "%s", cmnd);
}
fprintf(out_fp, "\n");
}
}
/**
* dump_entry_data -
* @hdr: ipr dump entry header pointer
*
* Returns:
* nothing
**/
static void dump_entry_data(struct ipr_dump_entry_header *hdr)
{
u32 i;
char *s;
switch (hdr->id) {
case ID_IOA_LOC:
fprintf(out_fp, "IOA Location:\n");
s = dump_map+hdr->offset;
fprintf(out_fp, "\t %.*s\n\n", hdr->len, s);
break;
case ID_DRV_VER:
fprintf(out_fp, "Driver Version:\n");
s = dump_map+hdr->offset;
fprintf(out_fp, "\t %.*s\n\n", hdr->len, s);
break;
case ID_DRV_TRACE:
fprintf(out_fp, "Driver Trace Entries:\n");
print_trace(hdr);
fprintf(out_fp, "\n");
break;
case ID_DRV_TYPE:
fprintf(out_fp, "Driver Type:\n");
i = TARGET_TO_HOST32(*(int*)(dump_map+hdr->offset),
hdr->eye_catcher);
fprintf(out_fp, "\t CCIN: 0x%04X\n", i);
i = TARGET_TO_HOST32(*(int*)(dump_map+hdr->offset+sizeof(i)),
hdr->eye_catcher);
fprintf(out_fp,"\t Adapter firmware Version: "
" %02X%02X%02X%02X\n\n",
i >> 24, /* major release */
(i & 0x00FF0000) >> 16, /* card type */
(i & 0x0000FF00) >> 8, /* minor release 0 */
i & 0x000000FF); /* minor release 1 */
break;
case ID_IOA_DUMP:
/* skip this one, not very useful for driver debugging */
break;
case ID_DRV_CTRL_BLK:
case ID_DRV_PEND_OPS:
/* not implemented yet */
fprintf(stderr,
"Warning: found IPR Control Block or IPR Pending Ops!\n"
"These are not implemented yet. Skipping...\n");
break;
default:
fprintf(stderr,
"Warning: did not recognize data identification "
"(id 0x%08X). Skipping...\n\n", hdr->id);
}
}
/**
* fsize -
* @filename: ipr dump file name
*
* Returns:
* ipr dump file size
**/
off_t fsize(const char *filename)
{
struct stat st;
if (stat(filename, &st) == 0)
return st.st_size;
return -1;
}
/**
* print_usage -
*
* Returns:
* nothing
**/
static void print_usage()
{
fprintf(stdout,
"Usage: iprdumpfmt [options] dump_file\n"
" Options:\n"
"\t-h --help\tPrint this message\n"
"\t-o --output\tSpecify an output file\n"
"\t-v --verbose\tPrint verbose trace data\n");
}
static struct option long_options[] = {
{"output", required_argument, 0, 'o'},
{"help", no_argument, 0, 'h'},
{"verbose", no_argument, &verbose_trace, 1},
{0, 0, 0, 0}
};
int main(int argc, char *argv[])
{
u32 i, offset;
int in_fd, filesize;
struct ipr_dump_header hdr;
struct ipr_dump_entry_header entry_hdr;
int c, option_index = 0;
char out_filename[512] = {'\0'};
while ((c = getopt_long(argc, argv, "hvo:", long_options,
&option_index)) != -1) {
switch (c) {
case 0:
break;
case 'o':
strncpy(out_filename, optarg, sizeof(out_filename) - 1);
break;
case '?':
case 'h':
print_usage();
return 0;
case 'v':
verbose_trace = 1;
break;
default:
return -1;
}
}
if (argc - optind < 1) {
/* needs at least a dump file */
print_usage();
return -1;
}
in_fd = open(argv[optind], O_RDONLY);
if (in_fd < 0) {
int rc = errno;
fprintf(stderr, "Could not open dump file %s: %s\n",
argv[optind], strerror(errno));
return rc;
}
if (out_filename[0] == '\0')
snprintf(out_filename, sizeof(out_filename), "%s.report",
argv[optind]);
out_fp = fopen(out_filename, "w");
if (out_fp == NULL) {
int rc = errno;
fprintf(stderr, "Could not open output file %s: %s\n",
out_filename, strerror(errno));
return rc;
}
filesize = fsize(argv[optind]);
if (filesize < 0) {
int rc = errno;
fprintf(stderr, "Could not determine size of %s: %s\n",
argv[optind], strerror(errno));
return rc;
}
dump_map = mmap(NULL, filesize, PROT_READ, MAP_PRIVATE, in_fd, 0);
if (dump_map == MAP_FAILED) {
int rc = errno;
fprintf(stderr, "Could not map dump file to memory: %s\n",
strerror(errno));
return rc;
}
read_dump_header(&hdr);
print_dump_header(&hdr);
fprintf(out_fp, "\n");
offset = hdr.first_entry_offset;
for (i = 0; i < hdr.num_entries; ++i) {
offset = read_entry_header(&entry_hdr, offset);
dump_entry_data(&entry_hdr);
}
return 0;
}
iprutils-2.4.18.1/iprupdate.c 0000664 0001750 0001751 00000011266 13270167731 012722 0000000 0000000 /**
* IBM IPR adapter microcode update utility
*
* (C) Copyright 2000, 2008
* International Business Machines Corporation and others.
* All Rights Reserved. This program and the accompanying
* materials are made available under the terms of the
* Common Public License v1.0 which accompanies this distribution.
*
*/
/*
* $Header: /cvsroot/iprdd/iprutils/iprupdate.c,v 1.23 2008/11/20 01:20:20 wboyer Exp $
*/
#include
#include
#include
#include
#ifndef iprlib_h
#include "iprlib.h"
#endif
#include
char *tool_name = "iprupdate";
static int force_devs;
static int force_ioas;
static int ioa_needs_update(struct ipr_ioa *ioa, int silent)
{
u32 fw_version = get_fw_version(&ioa->ioa);
if (fw_version >= ioa->msl)
return 0;
if (!silent)
ioa_info(ioa, "Adapter needs microcode update\n");
return 1;
}
static int dev_needs_update(struct ipr_dev *dev)
{
struct ipr_std_inq_data std_inq_data;
struct ipr_dasd_inquiry_page3 page3_inq;
struct unsupported_af_dasd *unsupp_af;
if (!dev->scsi_dev_data || ipr_is_volume_set(dev) ||
(dev->scsi_dev_data->type != TYPE_DISK &&
dev->scsi_dev_data->type != IPR_TYPE_AF_DISK))
return 0;
memset(&std_inq_data, 0, sizeof(std_inq_data));
if (ipr_inquiry(dev, IPR_STD_INQUIRY, &std_inq_data, sizeof(std_inq_data)))
return 0;
if (ipr_inquiry(dev, 3, &page3_inq, sizeof(page3_inq)))
return 0;
unsupp_af = get_unsupp_af(&std_inq_data, &page3_inq);
if (!unsupp_af)
return 0;
if (!disk_needs_msl(unsupp_af, &std_inq_data))
return 0;
scsi_info(dev, "Device needs microcode update\n");
return 1;
}
static int update_ioa_fw(struct ipr_ioa *ioa, int force)
{
int rc;
struct ipr_fw_images *list;
if (!ioa_needs_update(ioa, 1) && !force)
return 0;
rc = get_ioa_firmware_image_list(ioa, &list);
if (rc < 1) {
if (ioa->should_init)
ipr_log_ucode_error(ioa);
return rc;
}
rc = ipr_update_ioa_fw(ioa, list, force);
free(list);
return rc;
}
static int update_disk_fw(struct ipr_dev *dev)
{
int rc;
struct ipr_fw_images *list;
if (polling_mode && !dev->should_init)
return 0;
if (!dev->scsi_dev_data || ipr_is_volume_set(dev) ||
(dev->scsi_dev_data->type != TYPE_DISK &&
dev->scsi_dev_data->type != IPR_TYPE_AF_DISK))
return 0;
rc = get_dasd_firmware_image_list(dev, &list);
if (rc > 0) {
rc = ipr_update_disk_fw(dev, list, force_devs);
free(list);
}
return rc;
}
static int download_needed(struct ipr_ioa *ioa)
{
struct ipr_dev *dev;
int rc = 0;
rc |= ioa_needs_update(ioa, 0);
for_each_dev(ioa, dev)
rc |= dev_needs_update(dev);
return rc;
}
static int any_download_needed()
{
struct ipr_ioa *ioa;
int rc = 0;
tool_init(1);
check_current_config(false);
for_each_ioa(ioa)
rc |= download_needed(ioa);
return rc;
}
static int update_ioa(struct ipr_ioa *ioa)
{
struct ipr_dev *dev;
int rc = 0;
if (polling_mode && !ioa->should_init)
return 0;
rc |= update_ioa_fw(ioa, force_ioas);
for_each_dev(ioa, dev)
rc |= update_disk_fw(dev);
return rc;
}
static int __update_all()
{
struct ipr_ioa *ioa;
int rc = 0;
polling_mode = 1;
tool_init(1);
check_current_config(false);
for_each_ioa(ioa)
rc |= update_ioa(ioa);
return rc;
}
static void update_all()
{
__update_all();
}
static void kevent_handler(char *buf)
{
polling_mode = 0;
if (!strncmp(buf, "change@/class/scsi_host", 23) ||
(!strncmp(buf, "change@/devices/pci", 19) && strstr(buf, "scsi_host")))
scsi_host_kevent(buf, update_ioa);
else if (!strncmp(buf, "add@/class/scsi_generic", 23) ||
(!strncmp(buf, "add@/devices/pci", 16) && strstr(buf, "scsi_generic")))
scsi_dev_kevent(buf, find_gen_dev, update_disk_fw);
else if (!strncmp(buf, "add@/block/sd", 13))
scsi_dev_kevent(buf, find_blk_dev, update_disk_fw);
}
int main(int argc, char *argv[])
{
int i, rc;
int check_levels = 0;
openlog("iprupdate", LOG_PERROR | LOG_PID | LOG_CONS, LOG_USER);
for (i = 1; i < argc; i++) {
if (parse_option(argv[i]))
continue;
else if (strcmp(argv[i], "--force-devs") == 0)
force_devs = 1;
else if (strcmp(argv[i], "--force-ioas") == 0)
force_ioas = 1;
else if (strcmp(argv[i], "--check_only") == 0)
check_levels = 1;
else {
printf("Usage: iprupdate [options]\n");
printf(" Options: --version Print iprupdate version\n");
printf(" --daemon Run as a daemon\n");
printf(" --check_only Check for needed updates\n");
exit(1);
}
}
if (ipr_force)
force_devs = force_ioas = 1;
ipr_sg_required = 1;
if (check_levels)
return any_download_needed();
rc = __update_all();
if (!daemonize)
return rc;
force_devs = force_ioas = 0;
ipr_daemonize();
return handle_events(update_all, 60, kevent_handler);
}
iprutils-2.4.18.1/iprconfig.c 0000664 0001750 0001751 00001630747 13471266516 012725 0000000 0000000 /**
* IBM IPR adapter configuration utility
*
* (C) Copyright 2000, 2004
* International Business Machines Corporation and others.
* All Rights Reserved. This program and the accompanying
* materials are made available under the terms of the
* Common Public License v1.0 which accompanies this distribution.
**/
#ifndef iprlib_h
#include "iprlib.h"
#endif
#include
#include
#include
#include
#include
#include
#include
#include
#include "iprconfig.h"
#include
#include
#include
#include
#include
#include
#include
#include
char *tool_name = "iprconfig";
#define MAX_CMD_LENGTH 1000
struct devs_to_init_t {
struct ipr_dev *dev;
struct ipr_ioa *ioa;
u64 device_id;
int new_block_size;
int cmplt;
int do_init;
int done;
int dev_type;
#define IPR_AF_DASD_DEVICE 1
#define IPR_JBOD_DASD_DEVICE 2
struct devs_to_init_t *next;
};
#define for_each_dev_to_init(dev) for (dev = dev_init_head; dev; dev = dev->next)
struct prot_level {
struct ipr_array_cap_entry *array_cap_entry;
u8 is_valid:1;
u8 reserved:7;
};
struct array_cmd_data {
u8 array_id;
u8 prot_level;
u16 stripe_size;
int qdepth;
u32 do_cmd;
int vset_cache;
struct ipr_ioa *ioa;
struct ipr_dev *dev;
struct ipr_array_query_data *qac;
struct array_cmd_data *next;
};
/* not needed once menus incorporated into screen_driver */
struct window_l {
WINDOW *win;
struct window_l *next;
};
struct panel_l {
PANEL *panel;
struct panel_l *next;
};
static struct devs_to_init_t *dev_init_head = NULL;
static struct devs_to_init_t *dev_init_tail = NULL;
static struct array_cmd_data *raid_cmd_head = NULL;
static struct array_cmd_data *raid_cmd_tail = NULL;
static i_container *i_con_head = NULL; /* FIXME requires multiple heads */
static char log_root_dir[200];
static char editor[200];
FILE *errpath;
static int toggle_field;
nl_catd catd;
static char **add_args;
static int num_add_args;
static int use_curses;
#define for_each_raid_cmd(cmd) for (cmd = raid_cmd_head; cmd; cmd = cmd->next)
#define DEFAULT_LOG_DIR "/var/log"
#define DEFAULT_EDITOR "less"
#define IS_CANCEL_KEY(c) ((c == KEY_F(12)) || (c == 'q') || (c == 'Q'))
#define CANCEL_KEY_LABEL "q=Cancel "
#define IS_EXIT_KEY(c) ((c == KEY_F(3)) || (c == 'e') || (c == 'E'))
#define EXIT_KEY_LABEL "e=Exit "
#define CONFIRM_KEY_LABEL "c=Confirm "
#define CONFIRM_REC_KEY_LABEL "s=Confirm Reclaim "
#define ENTER_KEY '\n'
#define IS_ENTER_KEY(c) ((c == KEY_ENTER) || (c == ENTER_KEY))
#define IS_REFRESH_KEY(c) ((c == 'r') || (c == 'R'))
#define REFRESH_KEY_LABEL "r=Refresh "
#define IS_TOGGLE_KEY(c) ((c == 't') || (c == 'T'))
#define TOGGLE_KEY_LABEL "t=Toggle "
#define IS_PGDN_KEY(c) ((c == KEY_NPAGE) || (c == 'f') || (c == 'F'))
#define PAGE_DOWN_KEY_LABEL "f=PageDn "
#define IS_PGUP_KEY(c) ((c == KEY_PPAGE) || (c == 'b') || (c == 'B'))
#define PAGE_UP_KEY_LABEL "b=PageUp "
#define IS_5250_CHAR(c) (c == 0xa)
#define is_digit(ch) (((ch)>=(unsigned)'0'&&(ch)<=(unsigned)'9')?1:0)
struct special_status {
int index;
int num;
char *str;
} s_status;
char *print_device(struct ipr_dev *, char *, char *, int);
int display_menu(ITEM **, int, int, int **);
char *__print_device(struct ipr_dev *, char *, char *, int, int, int, int, int, int, int, int, int, int, int, int, int, int, int);
static char *print_path_details(struct ipr_dev *, char *);
static int get_drive_phy_loc(struct ipr_ioa *ioa);
static char *print_ssd_report(struct ipr_dev *dev, char *body);
static char *af_dasd_perf (char *body, struct ipr_dev *dev);
#define print_dev(i, dev, buf, fmt, type) \
for (i = 0; i < 2; i++) \
(buf)[i] = print_device(dev, (buf)[i], fmt, type);
#define print_dev_conc(i, dev, buf, fmt, type) \
for (i = 0; i < 3; i++) \
(buf)[i] = print_device(dev, (buf)[i], fmt, (type + 5));
#define print_dev_enclosure(i, dev, buf, fmt, type) \
for (i = 0; i < 2; i++) { \
if ( i == 0 ) \
(buf)[i] = print_device(dev, (buf)[i], fmt, (type + 8)); \
if (i == 1) \
(buf)[i] = print_device(dev, (buf)[i], fmt, (type + 8)); \
}
static struct sysfs_dev *head_sdev;
static struct sysfs_dev *tail_sdev;
/**
* is_format_allowed -
* @dev: ipr dev struct
*
* Returns:
* 1 if format is allowed / 0 otherwise
**/
static int is_format_allowed(struct ipr_dev *dev)
{
int rc;
struct ipr_cmd_status cmd_status;
struct ipr_cmd_status_record *status_record;
struct sense_data_t sense_data;
if (ipr_is_af_dasd_device(dev)) {
rc = ipr_query_command_status(dev, &cmd_status);
if (rc == 0 && cmd_status.num_records != 0) {
status_record = cmd_status.record;
if ((status_record->status != IPR_CMD_STATUS_SUCCESSFUL)
&& (status_record->status != IPR_CMD_STATUS_FAILED))
return 0;
}
} else {
rc = ipr_test_unit_ready(dev, &sense_data);
if (rc == CHECK_CONDITION && (sense_data.error_code & 0x7F) == 0x70) {
if (sense_data.add_sense_code == 0x31 &&
sense_data.add_sense_code_qual == 0x00)
return 1;
else if ((sense_data.sense_key & 0x0F) == 0x02)
return 0;
}
}
return 1;
}
/**
* can_format_for_raid -
* @dev: ipr dev struct
*
* Returns:
* 1 if format for raid is allowed / 0 otherwise
**/
static int can_format_for_raid(struct ipr_dev *dev)
{
if (dev->ioa->is_secondary)
return 0;
if (!ipr_is_gscsi(dev) && !ipr_is_af_dasd_device(dev))
return 0;
if (ipr_is_hot_spare(dev) || !device_supported(dev))
return 0;
if (ipr_is_array_member(dev) && !dev->dev_rcd->no_cfgte_vol)
return 0;
if (ipr_is_af_dasd_device(dev) && ipr_device_is_zeroed(dev))
return 0;
if (!ipr_is_af_dasd_device(dev)) {
/* If on a JBOD adapter */
if (!dev->ioa->qac_data->num_records)
return 0;
if (is_af_blocked(dev, 0))
return 0;
}
if (!is_format_allowed(dev))
return 0;
return 1;
}
static int wait_for_formatted_af_dasd(int timeout_in_secs)
{
struct devs_to_init_t *dev = dev_init_head;
struct scsi_dev_data *scsi_devs;
struct scsi_dev_data *scsi_dev_data;
int num_devs, j, af_found, jbod2af_formats, num_secs;
u64 device_id;
for (num_secs = 0; num_secs < timeout_in_secs; num_secs++) {
af_found = 0;
jbod2af_formats = 0;
scsi_devs = NULL;
num_devs = get_scsi_dev_data(&scsi_devs);
for_each_dev_to_init(dev) {
if (!dev->dev || !dev->ioa)
continue;
if (!dev->dev->scsi_dev_data)
continue;
if (dev->dev_type != IPR_JBOD_DASD_DEVICE)
continue;
if (!ipr_is_af_blk_size(dev->ioa, dev->new_block_size))
continue;
if (!dev->do_init)
continue;
jbod2af_formats++;
device_id = dev->dev->scsi_dev_data->device_id;
for (j = 0, scsi_dev_data = scsi_devs;
j < num_devs; j++, scsi_dev_data++) {
if (scsi_dev_data->host != dev->ioa->host_num)
continue;
if (get_sg_name(scsi_dev_data))
continue;
if (scsi_dev_data->type != IPR_TYPE_AF_DISK)
continue;
if (dev->device_id != scsi_dev_data->device_id)
continue;
scsi_dbg(dev->dev, "Format complete. AF DASD found. New Device ID=%lx, Old Device ID=%lx\n",
scsi_dev_data->device_id, dev->device_id);
af_found++;
break;
}
}
free(scsi_devs);
if (af_found == jbod2af_formats)
break;
sleep(1);
}
return ((af_found == jbod2af_formats) ? 0 : -ETIMEDOUT);
}
/**
* flush_stdscr -
*
* Returns:
* nothing
**/
/* not needed after screen_driver can do menus */
static void flush_stdscr()
{
if (!use_curses) {
fprintf(stdout, "\r");
fflush(stdout);
return;
}
nodelay(stdscr, TRUE);
while(getch() != ERR) {}
nodelay(stdscr, FALSE);
}
/**
* free_i_con - free memory from an i_container list
* @i_con: i_container struct
*
* Returns:
* NULL
**/
static i_container *free_i_con(i_container *i_con)
{
i_container *temp_i_con;
i_con = i_con_head;
if (i_con == NULL)
return NULL;
do {
temp_i_con = i_con->next_item;
free(i_con);
i_con = temp_i_con;
} while (i_con);
i_con_head = NULL;
return NULL;
}
/**
* add_i_con - create a new i_con list or add an i_container to a list
* @i_con: i_container struct
* @f: field data
* @d: data buffer
*
* Returns:
* i_container pointen
**/
static i_container *add_i_con(i_container *i_con, char *f, void *d)
{
i_container *new_i_con;
new_i_con = malloc(sizeof(i_container));
new_i_con->next_item = NULL;
/* used to hold data entered into user-entry fields */
strncpy(new_i_con->field_data, f, MAX_FIELD_SIZE+1);
new_i_con->field_data[strlen(f)+1] = '\0';
/* a pointen to the device information represented by the i_con */
new_i_con->data = d;
if (i_con)
i_con->next_item = new_i_con;
else
i_con_head = new_i_con;
return new_i_con;
}
/**
* exit_confirmed -
* @i_con: i_container struct
*
* Returns:
* 0
**/
int exit_confirmed(i_container *i_con)
{
exit_func();
exit(0);
return 0;
}
/**
* free_screen -
* @panel:
* @win:
* @fields:
*
* Returns:
* nothing
**/
/*not needed after screen_driver can do menus */
static void free_screen(struct panel_l *panel, struct window_l *win,
FIELD **fields)
{
struct panel_l *cur_panel;
struct window_l *cur_win;
int i;
cur_panel = panel;
while(cur_panel) {
panel = panel->next;
del_panel(cur_panel->panel);
free(cur_panel);
cur_panel = panel;
}
cur_win = win;
while(cur_win) {
win = win->next;
delwin(cur_win->win);
free(cur_win);
cur_win = win;
}
if (fields) {
for (i = 0; fields[i] != NULL; i++)
free_field(fields[i]);
}
}
/**
* add_raid_cmd_tail -
* @ioa: ipr ioa struct
* @dev: ipr dev struct
* @array_id: array ID
*
* Returns:
* nothing
**/
static void add_raid_cmd_tail(struct ipr_ioa *ioa, struct ipr_dev *dev, u8 array_id)
{
if (raid_cmd_head) {
raid_cmd_tail->next = malloc(sizeof(struct array_cmd_data));
raid_cmd_tail = raid_cmd_tail->next;
} else {
raid_cmd_head = raid_cmd_tail = malloc(sizeof(struct array_cmd_data));
}
memset(raid_cmd_tail, 0, sizeof(struct array_cmd_data));
raid_cmd_tail->array_id = array_id;
raid_cmd_tail->ioa = ioa;
raid_cmd_tail->dev = dev;
}
/**
* free_raid_cmds - free the raid_cmd_head list
*
* Returns:
* nothing
**/
static void free_raid_cmds()
{
struct array_cmd_data *cur = raid_cmd_head;
while(cur) {
free(cur->qac);
cur = cur->next;
free(raid_cmd_head);
raid_cmd_head = cur;
}
}
/**
* free_devs_to_init - free the dev_init_head list
*
* Returns:
* nothing
**/
static void free_devs_to_init()
{
struct devs_to_init_t *dev = dev_init_head;
while (dev) {
dev = dev->next;
free(dev_init_head);
dev_init_head = dev;
}
}
/**
* strip_trailing_whitespace - remove trailing white space from a string
* @p_str: string
*
* Returns:
* 0 if success / non-zero on failure
**/
static char *strip_trailing_whitespace(char *p_str)
{
int len;
char *p_tmp;
len = strlen(p_str);
if (len == 0)
return p_str;
p_tmp = p_str + len - 1;
while(*p_tmp == ' ' || *p_tmp == '\n')
p_tmp--;
p_tmp++;
*p_tmp = '\0';
return p_str;
}
/**
* tool_exit_func - clean up curses stuff on exit if needed
*
* Returns:
* nothing
**/
static void tool_exit_func()
{
if (use_curses) {
clearenv();
clear();
refresh();
endwin();
}
}
/**
* cmdline_exit_func -
*
* Returns:
* nothing
**/
static void cmdline_exit_func()
{
}
/**
* ipr_list_opts -
* @body:
* @key:
* @list_str:
*
* Returns:
* pointen to body string
**/
static char *ipr_list_opts(char *body, char *key, char *list_str)
{
int start_len = 0;
char *string_buf = _("Select one of the following");
if (!body) {
body = realloc(body, strlen(string_buf) + 8);
sprintf(body, "\n%s:\n\n", string_buf);
}
start_len = strlen(body);
body = realloc(body, start_len + strlen(key) + strlen(_(list_str)) + 16);
sprintf(body + start_len, " %s. %s\n", key, _(list_str));
return body;
}
/**
* ipr_end_list -
* @body:
*
* Returns:
* pointen to body string
**/
static char *ipr_end_list(char *body)
{
int start_len = 0;
char *string_buf = _("Selection");
start_len = strlen(body);
body = realloc(body, start_len + strlen(string_buf) + 16);
sprintf(body + start_len, "\n\n%s: %%1", string_buf);
return body;
}
/**
* screen_driver - Main driver for curses based display
* @screen: s_node
* @header_lines: number of header lines
* @i_con: i_container struct
*
* Returns:
* screen_output struct
**/
static struct screen_output *screen_driver(s_node *screen, int header_lines, i_container *i_con)
{
WINDOW *w_pad = NULL,*w_page_header = NULL; /* windows to hold text */
FIELD **fields = NULL; /* field list for forms */
FORM *form = NULL; /* form for input fields */
int rc = 0; /* the status of the screen */
char *status; /* displays screen operations */
char buffer[100]; /* needed for special status strings */
bool invalid = false; /* invalid status display */
bool ground_cursor=false;
int stdscr_max_y,stdscr_max_x;
int w_pad_max_y=0,w_pad_max_x=0; /* limits of the windows */
int pad_l=0,pad_scr_r,pad_t=0,viewable_body_lines;
int title_lines=2,footer_lines=2; /* position of the pad */
int center,len=0,ch;
int i=0,j,k,row=0,col=0,bt_len=0; /* text positioning */
int field_width,num_fields=0; /* form positioning */
int h,w,t,l,o,b; /* form querying */
int active_field = 0; /* return to same active field after a quit */
bool pages = false,is_bottom = false; /* control page up/down in multi-page screens */
bool form_adjust = false; /* correct cursor position in multi-page screens */
bool refresh_stdscr = true;
bool x_offscr,y_offscr; /* scrolling windows */
bool pagedn, fakepagedn;
char *input = NULL;
struct screen_output *s_out;
struct screen_opts *temp; /* reference to another screen */
char *title,*body,*body_text; /* screen text */
i_container *temp_i_con;
int num_i_cons = 0;
int x, y;
int f_flags;
s_out = malloc(sizeof(struct screen_output)); /* passes an i_con and an rc value back to the function */
/* create text strings */
title = _(screen->title);
body = screen->body;
f_flags = screen->f_flags;
if (f_flags & ENTER_FLAG)
footer_lines += 3;
else if (f_flags & FWD_FLAG)
footer_lines++;
if (f_flags & TOGGLE_FLAG)
active_field = toggle_field;
bt_len = strlen(body);
body_text = calloc(bt_len + 1, sizeof(char));
/* determine max size needed and find where to put form fields and device
* input in the text and add them
* '%' marks a field. The number after '%' represents the field's width
*/
i=0;
temp_i_con = i_con_head;
while(body[i] != '\0') {
if (body[i] == '\n') {
row++;
col = -1;
body_text[len] = body[i];
len++;
} else if ((body[i] == '%') && is_digit(body[i+1])) {
fields = realloc(fields,sizeof(FIELD **) * (num_fields + 1));
i++;
field_width = 0;
sscanf(&(body[i]),"%d",&field_width);
fields[num_fields] = new_field(1,field_width,row,col,0,0);
if (field_width >= 30)
field_opts_off(fields[num_fields],O_AUTOSKIP);
if (field_width > 9)
/* skip second digit of field index */
i++;
if ((temp_i_con) && (temp_i_con->field_data[0]) && (f_flags & MENU_FLAG)) {
set_field_buffer(fields[num_fields], 0, temp_i_con->field_data);
input = field_buffer(fields[num_fields],0);
temp_i_con = temp_i_con->next_item;
num_i_cons++;
}
set_field_userptr(fields[num_fields],NULL);
num_fields++;
col += field_width-1;
bt_len += field_width;
body_text = realloc(body_text,bt_len);
for(k = 0; k < field_width; k++)
body_text[len+k] = ' ';
len += field_width;
} else {
body_text[len] = body[i];
len++;
}
col++;
i++;
if (col > w_pad_max_x)
w_pad_max_x = col;
}
body_text[len] = '\0';
w_pad_max_y = row;
w_pad_max_y++; /* some forms may not display correctly if this is not included */
w_pad_max_x++; /* adds a column for return char \n : else, a blank line will appear in the pad */
w_pad = newpad(w_pad_max_y,w_pad_max_x);
keypad(w_pad,TRUE);
if (num_fields) {
fields = realloc(fields,sizeof(FIELD **) * (num_fields + 1));
fields[num_fields] = NULL;
form = new_form(fields);
}
/* make the form appear in the pad; not stdscr */
set_form_win(form,w_pad);
set_form_sub(form,w_pad);
while(1) {
getmaxyx(stdscr,stdscr_max_y,stdscr_max_x);
/* clear all windows before writing new text to them */
clear();
wclear(w_pad);
if(pages)
wclear(w_page_header);
center = stdscr_max_x/2;
len = strlen(title);
/* add the title at the center of stdscr */
mvaddstr(0,(center-len/2)>0?center-len/2:0,title);
/* set the boundaries of the pad based on the size of the screen
and determine whether or not the user is able to scroll */
if ((stdscr_max_y - title_lines - footer_lines + 1) >= w_pad_max_y) {
viewable_body_lines = w_pad_max_y;
pad_t = 0;
y_offscr = false; /*not scrollable*/
pages = false;
for (i = 0; i < num_fields; i++)
field_opts_on(fields[i],O_ACTIVE);
} else {
viewable_body_lines = stdscr_max_y - title_lines - footer_lines - 1;
y_offscr = true; /*scrollable*/
if (f_flags & FWD_FLAG) {
pages = true;
w_page_header = subpad(w_pad,header_lines,w_pad_max_x,0,0);
}
}
if (stdscr_max_x > w_pad_max_x) {
pad_scr_r = w_pad_max_x;
pad_l = 0;
x_offscr = false;
} else {
pad_scr_r = stdscr_max_x;
x_offscr = true;
}
move(stdscr_max_y - footer_lines,0);
if (f_flags & ENTER_FLAG) {
if (num_fields == 0) {
addstr(_("\nPress Enter to Continue\n\n"));
ground_cursor = true;
} else
addstr(_("\nOr leave blank and press Enter to cancel\n\n"));
}
if ((f_flags & FWD_FLAG) && !(f_flags & ENTER_FLAG))
addstr("\n");
if (f_flags & CONFIRM_FLAG)
addstr(CONFIRM_KEY_LABEL);
if (f_flags & EXIT_FLAG)
addstr(EXIT_KEY_LABEL);
if (f_flags & CANCEL_FLAG)
addstr(CANCEL_KEY_LABEL);
if (f_flags & CONFIRM_REC_FLAG)
addstr(CONFIRM_REC_KEY_LABEL);
if (f_flags & REFRESH_FLAG)
addstr(REFRESH_KEY_LABEL);
if (f_flags & TOGGLE_FLAG)
addstr(TOGGLE_KEY_LABEL);
if ((f_flags & FWD_FLAG) && y_offscr) {
addstr(PAGE_DOWN_KEY_LABEL);
addstr(PAGE_UP_KEY_LABEL);
}
post_form(form);
/* add the body of the text to the screen */
if (pages) {
wmove(w_page_header,0,0);
waddstr(w_page_header,body_text);
}
wmove(w_pad,0,0);
waddstr(w_pad,body_text);
if (num_fields) {
set_current_field(form,fields[active_field]);
if (active_field == 0)
form_driver(form,REQ_NEXT_FIELD);
form_driver(form,REQ_PREV_FIELD);
}
refresh_stdscr = true;
for(;;) {
/* add global status if defined */
if (s_status.index) {
rc = s_status.index;
s_status.index = 0;
}
if (invalid) {
status = (char *)screen_status[INVALID_OPTION_STATUS];
invalid = false;
} else if (rc != 0) {
if ((status = strchr(screen_status[rc],'%')) == NULL) {
status = (char *)screen_status[rc];
} else if (status[1] == 'd') {
sprintf(buffer,screen_status[rc],s_status.num);
status = buffer;
} else if (status[1] == 's') {
sprintf(buffer,screen_status[rc],s_status.str);
status = buffer;
}
rc = 0;
} else
status = NULL;
move(stdscr_max_y-1,0);
clrtoeol(); /* clear last line */
mvaddstr(stdscr_max_y-1,0,status);
status = NULL;
pagedn = false;
if ((f_flags & FWD_FLAG) && y_offscr) {
if (!is_bottom)
mvaddstr(stdscr_max_y-footer_lines,stdscr_max_x-8,_("More..."));
else
mvaddstr(stdscr_max_y-footer_lines,stdscr_max_x-8," ");
for (i = 0; i < num_fields; i++) {
if (!fields[i])
continue;
/* height, width, top, left, offscreen rows, buffer */
field_info(fields[i],&h,&w,&t,&l,&o,&b);
/* turn all offscreen fields off */
if ((t >= (header_lines + pad_t)) &&
(t <= (viewable_body_lines + pad_t))) {
field_opts_on(fields[i],O_ACTIVE);
if (!form_adjust)
continue;
if (!(f_flags & TOGGLE_FLAG) || !toggle_field)
set_current_field(form,fields[i]);
form_adjust = false;
} else if (field_opts_off(fields[i],O_ACTIVE) == E_CURRENT &&
toggle_field && i == (toggle_field - 1)) {
pagedn = true;
}
}
}
if (f_flags & MENU_FLAG) {
for (i = 0; i < num_fields; i++) {
field_opts_off(fields[i],O_VISIBLE);
field_opts_on(fields[i],O_VISIBLE);
set_field_fore(fields[i],A_BOLD);
}
}
if ((f_flags & TOGGLE_FLAG) && toggle_field &&
(((field_opts(fields[toggle_field-1]) & O_ACTIVE) != O_ACTIVE) ||
pagedn)) {
pagedn = false;
fakepagedn = true;
ch = KEY_NPAGE;
} else {
fakepagedn = false;
toggle_field = 0;
if (refresh_stdscr) {
touchwin(stdscr);
refresh_stdscr = FALSE;
} else
touchline(stdscr,stdscr_max_y - 1,1);
refresh();
if (pages) {
touchwin(w_page_header);
prefresh(w_page_header, 0, pad_l,
title_lines, 0,
title_lines + header_lines - 1, pad_scr_r - 1);
touchwin(w_pad);
prefresh(w_pad, pad_t + header_lines, pad_l,
title_lines + header_lines, 0,
title_lines + viewable_body_lines, pad_scr_r - 1);
} else {
touchwin(w_pad);
prefresh(w_pad, pad_t, pad_l,
title_lines, 0,
title_lines + viewable_body_lines, pad_scr_r - 1);
}
if (ground_cursor) {
move(stdscr_max_y - 1, stdscr_max_x - 1);
refresh();
}
ch = wgetch(w_pad); /* pause for user input */
}
if (ch == KEY_RESIZE)
break;
if (IS_ENTER_KEY(ch)) {
if (num_fields > 0)
active_field = field_index(current_field(form));
if ((f_flags & ENTER_FLAG) && num_fields == 0) {
rc = (CANCEL_FLAG | rc);
goto leave;
} else if (f_flags & ENTER_FLAG) {
/* cancel if all fields are empty */
form_driver(form,REQ_VALIDATION);
for (i = 0; i < num_fields; i++) {
if (strlen(field_buffer(fields[i],0)) != 0)
/* fields are not empty -> continue */
break;
if (i == (num_fields - 1)) {
/* all fields are empty */
rc = (CANCEL_FLAG | rc);
goto leave;
}
}
}
if (num_fields > 0)
input = field_buffer(fields[active_field],0);
invalid = true;
for (i = 0; i < screen->num_opts; i++) {
temp = &(screen->options[i]);
if ((temp->key[0] == '\n') ||
((num_fields > 0)?(strcasecmp(input,temp->key) == 0):0)) {
invalid = false;
if ((temp->key[0] == '\n') && (num_fields > 0)) {
/* store field data to existing i_con (which should already
contain pointens) */
i_container *temp_i_con = i_con_head;
form_driver(form,REQ_VALIDATION);
for (i = 0; i < num_fields; i++) {
strncpy(temp_i_con->field_data,field_buffer(fields[i],0),MAX_FIELD_SIZE);
temp_i_con = temp_i_con->next_item;
}
}
if (temp->screen_function == NULL)
/* continue with function */
goto leave;
toggle_field = 0;
do
rc = temp->screen_function(i_con_head);
while (rc == REFRESH_SCREEN || rc & REFRESH_FLAG);
/* if screen flags exist on rc and they don't match
the screen's flags, return */
if ((rc & 0xF000) && !(screen->rc_flags & (rc & 0xF000)))
goto leave;
/* strip screen flags from rc */
rc &= ~(EXIT_FLAG | CANCEL_FLAG | REFRESH_FLAG);
if (screen->rc_flags & REFRESH_FLAG) {
s_status.index = rc;
rc = (REFRESH_FLAG | rc);
goto leave;
}
break;
}
}
if (!invalid) {
/*clear fields*/
form_driver(form,REQ_LAST_FIELD);
for (i = 0; i < num_fields; i++) {
form_driver(form,REQ_CLR_FIELD);
form_driver(form,REQ_NEXT_FIELD);
}
break;
}
} else if (IS_EXIT_KEY(ch) && (f_flags & EXIT_FLAG)) {
rc = (EXIT_FLAG | rc);
goto leave;
} else if (IS_CANCEL_KEY(ch) &&
((f_flags & CANCEL_FLAG) || screen == &n_main_menu)) {
rc = (CANCEL_FLAG | rc);
goto leave;
} else if ((IS_REFRESH_KEY(ch) && (f_flags & REFRESH_FLAG)) ||
(ch == KEY_HOME && (f_flags & REFRESH_FLAG))) {
rc = REFRESH_SCREEN;
if (num_fields > 1)
toggle_field = field_index(current_field(form)) + 1;
goto leave;
} else if (IS_TOGGLE_KEY(ch) && (f_flags & TOGGLE_FLAG)) {
rc = TOGGLE_SCREEN;
if (num_fields > 1)
toggle_field = field_index(current_field(form)) + 1;
goto leave;
} else if (IS_PGUP_KEY(ch) && (f_flags & FWD_FLAG) && y_offscr) {
invalid = false;
if (pad_t > 0) {
pad_t -= (viewable_body_lines - header_lines + 1);
rc = PGUP_STATUS;
} else if ((f_flags & FWD_FLAG) && y_offscr)
rc = TOP_STATUS;
else
invalid = true;
if (!invalid) {
if (pad_t < 0)
pad_t = 0;
is_bottom = false;
form_adjust = true;
refresh_stdscr = true;
}
} else if (IS_PGDN_KEY(ch) && (f_flags & FWD_FLAG) && y_offscr) {
invalid = false;
if ((stdscr_max_y - title_lines - footer_lines + 1) < (w_pad_max_y - pad_t)) {
pad_t += (viewable_body_lines - header_lines + 1);
rc = PGDN_STATUS;
if ((stdscr_max_y - title_lines - footer_lines + 1) >= (w_pad_max_y - pad_t))
is_bottom = true;
} else if (is_bottom)
rc = BTM_STATUS;
else
invalid = true;
if (fakepagedn)
rc = 0;
if (!invalid) {
form_adjust = true;
refresh_stdscr = true;
}
} else if (ch == KEY_RIGHT) {
if (x_offscr && stdscr_max_x+pad_l0)
pad_l--;
else
form_driver(form, REQ_PREV_CHAR);
} else if (ch == KEY_UP) {
if ((y_offscr || (num_fields == 0)) && !pages) {
if (pad_t > 0) {
pad_t--;
form_adjust = true;
is_bottom = false;
}
} else
form_driver(form, REQ_PREV_FIELD);
} else if (ch == KEY_DOWN) {
if ((y_offscr || (num_fields == 0)) && !pages) {
if (y_offscr && ((stdscr_max_y + pad_t ) <
(w_pad_max_y + title_lines + footer_lines))) {
pad_t++;
form_adjust = true;
}
if (!((stdscr_max_y + pad_t) <
(w_pad_max_y + title_lines + footer_lines)))
is_bottom = true;
}
else
form_driver(form, REQ_NEXT_FIELD);
} else if ((ch == KEY_BACKSPACE) || (ch == 127))
form_driver(form, REQ_DEL_PREV);
else if (ch == KEY_DC)
form_driver(form, REQ_DEL_CHAR);
else if (ch == KEY_IC)
form_driver(form, REQ_INS_MODE);
else if (ch == KEY_EIC)
form_driver(form, REQ_OVL_MODE);
else if (ch == KEY_HOME)
form_driver(form, REQ_BEG_FIELD);
else if (ch == KEY_END)
form_driver(form, REQ_END_FIELD);
else if (ch == '\t')
form_driver(form, REQ_NEXT_FIELD);
else if ((f_flags & MENU_FLAG) || (num_fields == 0)) {
invalid = true;
for (i = 0; i < screen->num_opts; i++) {
temp = &(screen->options[i]);
if ((temp->key) && (ch == temp->key[0])) {
invalid = false;
if (num_fields > 0) {
active_field = field_index(current_field(form));
input = field_buffer(fields[active_field],0);
if (active_field < num_i_cons) {
temp_i_con = i_con_head;
for (j = 0; j < active_field; j++)
temp_i_con = temp_i_con->next_item;
temp_i_con->field_data[0] = '\0';
getyx(w_pad,y,x);
temp_i_con->y = y;
temp_i_con->x = x;
}
toggle_field = field_index(current_field(form)) + 1;
}
if (temp->screen_function == NULL)
goto leave;
do
rc = temp->screen_function(i_con_head);
while (rc == REFRESH_SCREEN || rc & REFRESH_FLAG);
if ((rc & 0xF000) && !(screen->rc_flags & (rc & 0xF000)))
goto leave;
rc &= ~(EXIT_FLAG | CANCEL_FLAG | REFRESH_FLAG);
if (screen->rc_flags & REFRESH_FLAG) {
rc = (REFRESH_FLAG | rc);
goto leave;
}
break;
}
}
} else if (isascii(ch))
form_driver(form, ch);
}
}
leave:
s_out->i_con = i_con_head;
s_out->rc = rc;
free(body_text);
unpost_form(form);
free_form(form);
for (i = 0; i < num_fields; i++) {
if (fields[i] != NULL)
free_field(fields[i]);
}
free(fields);
delwin(w_pad);
delwin(w_page_header);
return s_out;
}
static char *status_hdr[] = {
/* . . . . . */
/*012345678901234567890123456789012345678901234567890123456789012345678901234567890 */
"OPT Name Resource Path/Address Vendor Product ID Status",
"OPT Name PCI/SCSI Location Description Status",
"Name Resource Path/Address Vendor Product ID Status",
"Name PCI/SCSI Location Description Status",
"OPT SAS Port/SAS Address Description Active Status Info",
"OPT SAS Port/SAS Address Description Active Status Info",
"SAS Port/SAS Address Description Active Status Info",
"SAS Port/SAS Address Description Active Status Info",
"OPT Name Platform Location Description Status",
"OPT Name SCSI Host/Resource Path Vendor Product ID Status",
"OPT Name SCSI Host/Resource Path Vendor Product ID Status",
"Name Platform Location Description Status",
"OPT Name PCI/Host/Resource Path Serial Number Status",
"OPT Name Physical Location Production ID Status",
"Name Physical Location Serial Number Status",
"Name PCI/SCSI Location Vendor Product ID Current Available",
"OPT Name PCI/SCSI Location Vendor Product ID Current Available",
"OPT Name Resource Path/Address Vendor Product ID Current Available",
};
static char *status_sep[] = {
"--- ------ -------------------------- -------- ------------------- -----------------",
"--- ------ ------------------------- ---------------------------- -----------------",
"------ -------------------------- -------- ---------------- -----------------",
"------ ------------------------- ------------------------- -----------------",
"--- --------------------- ------------------ ------ ----------------- ----------",
"--- ---------------------- ------------------ ------ ----------------- ----------",
"---------------------- ------------------ ------ ----------------- ----------",
"---------------------- ------------------ ------ ----------------- ----------",
"--- ------ -------------------------- ---------------------------- -----------------",
"--- ------ ---------------------------- -------- ------------------- --------------",
"--- ------ ---------------------------- -------- ------------------- --------------",
"------ -------------------------- ---------------------------- ------------",
"--- ------ ---------------------------------------- ------------- ------------",
"--- ------ ---------------------------------------- ---------------- ------------",
"------ ---------------------------------------- ------------- ------------",
"----- ---------------------- -------- ---------------- --------- ----------",
"--- ----- ---------------------- -------- ---------------- --------- ----------",
"--- ----- ---------------------- -------- ---------------- --------- ----------",
};
/**
* status_header -
* @buffer: data buffer
* @num_lines: number of lines
* @type: type index
*
* Returns:
* buffer
**/
static char *status_header(char *buffer, int *num_lines, int type)
{
int cur_len = strlen(buffer);
int header_lines = 0;
buffer = realloc(buffer, cur_len + strlen(status_hdr[type]) + strlen(status_sep[type]) + 8);
cur_len += sprintf(buffer + cur_len, "%s\n", status_hdr[type]);
cur_len += sprintf(buffer + cur_len, "%s\n", status_sep[type]);
header_lines += 2;
*num_lines = header_lines + *num_lines;
return buffer;
}
/**
* add_string_to_body - adds a string of data to fit in the text window,
* putting carraige returns in when necessary
* @body:
* @new_text:
* @line_fill:
* @line_num:
*
* Returns:
* body on success / 0 if no space available
**/
/* NOTE: This routine expects the language conversion to be done before
entering this routine */
static char *add_string_to_body(char *body, char *new_text, char *line_fill, int *line_num)
{
int body_len = 0;
int new_text_len = strlen(new_text);
int line_fill_len = strlen(line_fill);
int rem_length;
int new_text_offset = 0;
int max_y, max_x;
int len, i;
int num_lines = 0;
struct winsize w;
if (body)
body_len = strlen(body);
len = body_len;
if (use_curses)
getmaxyx(stdscr,max_y,max_x);
else {
memset(&w, 0, sizeof(struct winsize));
ioctl(STDOUT_FILENO, TIOCGWINSZ, &w);
if (w.ws_col > 0)
max_x = w.ws_col;
else
max_x = 80;
}
rem_length = max_x - 1;
for (i = 0; i < strlen(new_text); i++) {
if (new_text[i] == '\n')
num_lines++;
}
while (len != 0) {
if (body[len--] == '\n')
break;
rem_length--;
}
while (1) {
if (new_text_len < rem_length) {
/* done, all data fits in current line */
body = realloc(body, body_len + new_text_len + 8);
sprintf(body + body_len, "%s", &new_text[new_text_offset]);
break;
}
len = rem_length;
while (len != 0) {
if (new_text[new_text_offset + len] == ' ') {
/* found a place to \n */
break;
}
len--;
}
if (len == 0)
/* no space to fit any word */
return 0;
/* adjust len to compensate 0 based array */
len += 1;
body = realloc(body, body_len + len + line_fill_len + 8);
strncpy(body + body_len, new_text + new_text_offset, len);
body_len += len;
new_text_offset += len;
new_text_len -= len;
body_len += sprintf(body + body_len, "\n%s", line_fill);
rem_length = max_x - 1 - line_fill_len;
num_lines++;
}
if (line_num)
*line_num = *line_num + num_lines;
return body;
}
/**
* add_line_to_body - adds a single line to the body text of the screen, it is
* intented primarily to list items with the desciptor on the
* left of the screen and ". . . :" to the data field for the
* descriptor.
* @body:
* @new_text:
* @field_data:
*
* Returns:
* body
**/
/* NOTE: This routine expects the language conversion to be done before
entering this routine */
#define DETAILS_DESCR_LEN 40
static char *add_line_to_body(char *body, char *new_text, char *field_data)
{
int cur_len = 0, start_len = 0;
int str_len, field_data_len;
int i;
if (body != NULL)
start_len = cur_len = strlen(body);
str_len = strlen(new_text);
if (!field_data) {
body = realloc(body, cur_len + str_len + 8);
sprintf(body + cur_len, "%s\n", new_text);
} else {
field_data_len = strlen(field_data);
if (str_len < DETAILS_DESCR_LEN) {
body = realloc(body, cur_len + field_data_len + DETAILS_DESCR_LEN + 8);
cur_len += sprintf(body + cur_len, "%s", new_text);
for (i = cur_len; i < DETAILS_DESCR_LEN + start_len; i++) {
if ((cur_len + start_len) % 2)
cur_len += sprintf(body + cur_len, ".");
else
cur_len += sprintf(body + cur_len, " ");
}
sprintf(body + cur_len, " : %s\n", field_data);
} else {
body = realloc(body, cur_len + str_len + field_data_len + 8);
sprintf(body + cur_len, "%s : %s\n",new_text, field_data);
}
}
return body;
}
/**
* __body_init_status -
* @header:
* @num_lines: number of lines
* @type: type index
*
* Returns:
* data buffer
**/
static char *__body_init_status(char **header, int *num_lines, int type)
{
char *buffer = NULL;
int header_lines = 0;
int j;
char *x_header;
for (j = 0, x_header = _(header[j]); strlen(x_header) != 0; j++, x_header = _(header[j]))
buffer = add_string_to_body(buffer, x_header, "", &header_lines);
buffer = status_header(buffer, &header_lines, type);
if (num_lines != NULL)
*num_lines = header_lines;
return buffer;
}
/**
* body_init_status -
* @buffer: char array
* @header:
* @num_lines: number of lines
*
* Returns:
* nothing
**/
static void body_init_status(char *buffer[2], char **header, int *num_lines)
{
int z;
for (z = 0; z < 2; z++)
buffer[z] = __body_init_status(header, num_lines, z);
}
static void body_init_status2(char *buffer[2], char **header, int *num_lines,
int type)
{
int z;
for (z = 0; z < 2; z++)
buffer[z] = __body_init_status(header, num_lines, type+z);
}
/**
* body_init_status_conc -
* @buffer: char array
* @header:
* @num_lines: number of lines
*
* Returns:
* nothing
**/
static void body_init_status_conc(char *buffer[3], char **header, int *num_lines)
{
int z;
for (z = 0; z < 3; z++)
buffer[z] = __body_init_status(header, num_lines, (z + 8));
}
/**
* body_init_status_enclosure -
* @buffer: char array
* @header:
* @num_lines: number of lines
*
* Returns:
* nothing
**/
static void body_init_status_enclosure(char *buffer[2], char **header, int *num_lines)
{
buffer[0] = __body_init_status(header, num_lines, 12);
buffer[1] = __body_init_status(header, num_lines, 13);
}
/**
* __body_init -
* @buffer: char array
* @header:
* @num_lines: number of lines
*
* Returns:
* data buffer
**/
static char *__body_init(char *buffer, char **header, int *num_lines)
{
int j;
int header_lines = 0;
char *x_header;
if (num_lines)
header_lines = *num_lines;
for (j = 0, x_header = _(header[j]); strlen(x_header) != 0; j++, x_header = _(header[j])) {
if (j == 0)
buffer = add_string_to_body(buffer, x_header, "", &header_lines);
else
buffer = add_string_to_body(buffer, x_header, " ", &header_lines);
}
if (num_lines)
*num_lines = header_lines;
return buffer;
}
/**
* body_init -
* @header:
* @num_lines: number of lines
*
* Returns:
* data buffer
**/
static char *body_init(char **header, int *num_lines)
{
if (num_lines)
*num_lines = 0;
return __body_init(NULL, header, num_lines);
}
/**
* __complete_screen_driver_curses -
* @n_screen:
* @complete: % complete string
* @allow_exit: allow exit flag
*
* Returns:
* 0 if success / non-zero on failure
**/
static int __complete_screen_driver_curses(s_node *n_screen, char *complete, int allow_exit)
{
int stdscr_max_y,stdscr_max_x,center,len;
int ch;
char *exit = _("Return to menu, current operations will continue.");
char *exit_str;
getmaxyx(stdscr,stdscr_max_y,stdscr_max_x);
clear();
center = stdscr_max_x/2;
len = strlen(n_screen->title);
/* add the title at the center of stdscr */
mvaddstr(0,(center - len/2) > 0 ? center-len/2:0, n_screen->title);
mvaddstr(2,0,n_screen->body);
len = strlen(complete);
mvaddstr(stdscr_max_y/2,(center - len/2) > 0 ? center - len/2:0,
complete);
if (allow_exit) {
exit_str = malloc(strlen(exit) + strlen(EXIT_KEY_LABEL) + 8);
sprintf(exit_str, EXIT_KEY_LABEL"%s",exit);
mvaddstr(stdscr_max_y - 3, 2, exit_str);
nodelay(stdscr, TRUE);
do {
ch = getch();
if (IS_EXIT_KEY(ch)) {
nodelay(stdscr, FALSE);
return EXIT_FLAG;
}
} while (ch != ERR);
nodelay(stdscr, FALSE);
}
move(stdscr_max_y - 1, stdscr_max_x - 1);
refresh();
return 0;
}
/**
* __complete_screen_driver -
* @n_screen:
* @complete: % complete string
* @allow_exit: allow_exit flag
*
* Returns:
* 0
**/
static int __complete_screen_driver(s_node *n_screen, char *complete, int allow_exit)
{
fprintf(stdout, "\r%s", complete);
fflush(stdout);
return 0;
}
/**
* complete_screen_driver -
* @n_screen:
* @percent: % complete value
* @allow_exit: allow exit flag
*
* Returns:
* 0 if success / non-zero on failure
**/
static int complete_screen_driver(s_node *n_screen, int percent, int allow_exit)
{
char *complete = _("Complete");
char *percent_comp;
int rc;
percent_comp = malloc(strlen(complete) + 8);
sprintf(percent_comp,"%3d%% %s", percent, complete);
if (use_curses)
rc = __complete_screen_driver_curses(n_screen, percent_comp, allow_exit);
else
rc = __complete_screen_driver(n_screen, percent_comp, allow_exit);
free(percent_comp);
return rc;
}
/**
* time_screen_driver -
* @n_screen:
* @seconds: number of seconds
* @allow_exit: allow exit flag
*
* Returns:
* 0 if success / non-zero on failure
**/
static int time_screen_driver(s_node *n_screen, unsigned long seconds, int allow_exit)
{
char *complete = _("Elapsed Time: ");
char *comp_str;
int rc, hours, minutes;
hours = seconds/3600;
seconds -= (hours * 3600);
minutes = seconds/60;
seconds -= (minutes *60);
comp_str = malloc(strlen(complete) + 40);
sprintf(comp_str,"%s%d:%02d:%02ld", complete, hours, minutes, seconds);
if (use_curses)
rc = __complete_screen_driver_curses(n_screen, comp_str, allow_exit);
else
rc = __complete_screen_driver(n_screen, comp_str, allow_exit);
free(comp_str);
return rc;
}
/**
* evaluate_device -
* @dev: ipr dev struct
* @ioa: ipr ioa struct
* @new_block_size: not used?
*
* Returns:
* nothing
**/
static void evaluate_device(struct ipr_dev *dev, struct ipr_ioa *ioa,
int new_block_size)
{
struct scsi_dev_data *scsi_dev_data = dev->scsi_dev_data;
struct ipr_res_addr res_addr;
struct ipr_dev_record *dev_record;
int device_converted;
int timeout = 60;
u32 res_handle;
if (scsi_dev_data) {
res_handle = scsi_dev_data->handle;
res_addr.bus = scsi_dev_data->channel;
res_addr.target = scsi_dev_data->id;
res_addr.lun = scsi_dev_data->lun;
} else if (ipr_is_af_dasd_device(dev)) {
dev_record = dev->dev_rcd;
if (dev_record->no_cfgte_dev)
return;
res_handle = ntohl(dev->resource_handle);
res_addr.bus = dev_record->type2.resource_addr.bus;
res_addr.target = dev_record->type2.resource_addr.target;
res_addr.lun = dev_record->type2.resource_addr.lun;
} else
return;
/* send evaluate device down */
ipr_evaluate_device(&ioa->ioa, res_handle);
device_converted = 0;
while (!device_converted && timeout) {
/* xxx FIXME how to determine evaluate device completed? */
device_converted = 1;
sleep(1);
timeout--;
}
}
/**
* verify_device -
* @dev: ipr dev struct
*
* Returns:
* nothing
**/
static void verify_device(struct ipr_dev *dev)
{
int rc;
struct ipr_cmd_status cmd_status;
struct sense_data_t sense_data;
if (ipr_fast)
return;
/* Send Test Unit Ready to start device if its a volume set */
if (ipr_is_volume_set(dev)) {
ipr_test_unit_ready(dev, &sense_data);
return;
}
if (ipr_device_lock(dev))
return;
if (ipr_is_af(dev)) {
if ((rc = ipr_query_command_status(dev, &cmd_status)))
return;
if (cmd_status.num_records != 0 &&
cmd_status.record->status == IPR_CMD_STATUS_SUCCESSFUL) {
if (ipr_get_blk_size(dev) == 512)
evaluate_device(dev, dev->ioa, IPR_JBOD_BLOCK_SIZE);
else if (dev->ioa->support_4k && ipr_get_blk_size(dev) == IPR_JBOD_4K_BLOCK_SIZE)
evaluate_device(dev, dev->ioa, IPR_JBOD_4K_BLOCK_SIZE);
}
} else if (dev->scsi_dev_data->type == TYPE_DISK) {
rc = ipr_test_unit_ready(dev, &sense_data);
if (!rc) {
if (ipr_get_blk_size(dev) == dev->ioa->af_block_size &&
dev->ioa->qac_data->num_records != 0) {
enable_af(dev);
evaluate_device(dev, dev->ioa, dev->ioa->af_block_size);
}
else if (dev->ioa->support_4k && ipr_get_blk_size(dev) == IPR_AF_4K_BLOCK_SIZE &&
dev->ioa->qac_data->num_records != 0) {
enable_af(dev);
evaluate_device(dev, dev->ioa, IPR_AF_4K_BLOCK_SIZE);
}
}
}
ipr_device_unlock(dev);
}
/**
* processing - displays "Processing" at the bottom of the screen
*
* Returns:
* nothing
**/
static void processing()
{
int max_y, max_x;
if (!use_curses)
return;
getmaxyx(stdscr,max_y,max_x);
move(max_y-1,0);
printw(_("Processing"));
refresh();
}
int display_features_menu(i_container *i_con, s_node *menu)
{
char cmnd[MAX_CMD_LENGTH];
int rc, loop;
struct stat file_stat;
struct screen_output *s_out;
int offset = 0;
for (loop = 0; loop < (menu->num_opts); loop++) {
menu->body = ipr_list_opts(menu->body,
menu->options[loop].key,
menu->options[loop].list_str);
}
menu->body = ipr_end_list(menu->body);
s_out = screen_driver(menu, 0, NULL);
free(menu->body);
menu->body = NULL;
rc = s_out->rc;
i_con = s_out->i_con;
i_con = free_i_con(i_con);
free(s_out);
return rc;
}
/**
* main_menu - Main menu
* @i_con: i_container struct
*
* Returns:
* 0 if success / non-zero on failure
**/
int main_menu(i_container *i_con)
{
int j;
struct ipr_ioa *ioa;
struct scsi_dev_data *scsi_dev_data;
processing();
check_current_config(false);
for_each_ioa(ioa) {
for (j = 0; j < ioa->num_devices; j++) {
scsi_dev_data = ioa->dev[j].scsi_dev_data;
if (ipr_is_ioa(&ioa->dev[j]))
continue;
verify_device(&ioa->dev[j]);
}
}
return display_features_menu(i_con, &n_main_menu);
}
/**
* conf_menu - Config menu
* @i_con: i_container struct
*
* Returns:
* 0 if success / non-zero on failure
**/
int config_menu(i_container *i_con)
{
return display_features_menu(i_con, &n_config_menu);
}
/**
* print_standalone_disks -
* @ioa: ipr ioa struct
* @i_con: i_container struct
* @buffer:
* @type:
*
* Returns:
* number of lines printed
**/
static int print_standalone_disks(struct ipr_ioa *ioa,
i_container **i_con, char **buffer, int type)
{
struct ipr_dev *dev;
int k;
int num_lines = 0;
__for_each_standalone_disk(ioa, dev) {
print_dev (k, dev, buffer, "%1", type+k);
*i_con = add_i_con(*i_con, "\0", dev);
num_lines++;
}
return num_lines;
}
/**
* print_hotspare_disks -
* @ioa: ipr ioa struct
* @i_con: i_container struct
* @buffer:
* @type:
*
* Returns:
* number of lines printed
**/
static int print_hotspare_disks(struct ipr_ioa *ioa,
i_container **i_con, char **buffer, int type)
{
struct ipr_dev *dev;
int k;
int num_lines = 0;
for_each_hot_spare(ioa, dev) {
print_dev(k, dev, buffer, "%1", type+k);
*i_con = add_i_con(*i_con, "\0", dev);
num_lines++;
}
return num_lines;
}
/**
* print_ses_devices -
* @ioa: ipr ioa struct
* @i_con: i_container struct
* @buffer:
* @type:
*
* Returns:
* number of lines printed
**/
static int print_ses_devices(struct ipr_ioa *ioa,
i_container **i_con, char **buffer, int type)
{
struct ipr_dev *dev;
int k;
int num_lines = 0;
for_each_ses(ioa, dev) {
print_dev(k, dev, buffer, "%1", type+k);
*i_con = add_i_con(*i_con, "\0", dev);
num_lines++;
}
return num_lines;
}
static int print_dvd_tape_devices(struct ipr_ioa *ioa,
i_container **i_con, char **buffer, int type)
{
struct ipr_dev *dev;
int k;
int num_lines = 0;
for_each_dvd_tape(ioa, dev) {
print_dev(k, dev, buffer, "%1", type+k);
*i_con = add_i_con(*i_con, "\0", dev);
num_lines++;
}
return num_lines;
}
/**
* print_sas_ses_devices -
* @ioa: ipr ioa struct
* @i_con: i_container struct
* @buffer:
* @type:
*
* Returns:
* number of lines printed
**/
static int print_sas_ses_devices(struct ipr_ioa *ioa,
i_container **i_con, char **buffer, int type)
{
struct ipr_dev *dev;
int k;
int num_lines = 0;
if (__ioa_is_spi(ioa))
return 0;
for_each_ses(ioa, dev) {
print_dev(k, dev, buffer, "%1", type+k);
*i_con = add_i_con(*i_con, "\0", dev);
num_lines++;
}
return num_lines;
}
/**
* print_vsets -
* @ioa: ipr ioa struct
* @i_con: i_container struct
* @buffer:
* @type:
*
* Returns:
* number of lines printed
**/
static int print_vsets(struct ipr_ioa *ioa,
i_container **i_con, char **buffer, int type)
{
int k;
int num_lines = 0;
struct ipr_dev *vset, *dev;
/* print volume set and associated devices*/
for_each_vset(ioa, vset) {
print_dev(k, vset, buffer, "%1", type+k);
*i_con = add_i_con(*i_con, "\0", vset);
num_lines++;
for_each_dev_in_vset(vset, dev) {
print_dev(k, dev, buffer, "%1", type+k);
*i_con = add_i_con(*i_con, "\0", dev);
num_lines++;
}
}
return num_lines;
}
/**
* disk_status -
* @i_con: i_container struct
*
* Returns:
* 0 if success / non-zero on failure
**/
int disk_status(i_container *i_con)
{
int rc, k;
int len = 0;
int num_lines = 0;
struct ipr_ioa *ioa;
struct ipr_dev *dev;
struct screen_output *s_out;
int header_lines;
char *buffer[2];
int toggle = 1;
processing();
rc = RC_SUCCESS;
i_con = free_i_con(i_con);
check_current_config(false);
body_init_status(buffer, n_disk_status.header, &header_lines);
for_each_ioa(ioa) {
if (!ioa->ioa.scsi_dev_data)
continue;
print_dev(k, &ioa->ioa, buffer, "%1", 2+k);
i_con = add_i_con(i_con, "\0", &ioa->ioa);
num_lines++;
/* xxxx remove? */
__for_each_standalone_disk(ioa, dev)
verify_device(dev);
num_lines += print_standalone_disks(ioa, &i_con, buffer, 2);
num_lines += print_hotspare_disks(ioa, &i_con, buffer, 2);
num_lines += print_vsets(ioa, &i_con, buffer, 2);
num_lines += print_dvd_tape_devices(ioa, &i_con, buffer, 2);
num_lines += print_ses_devices(ioa, &i_con, buffer, 2);
}
if (num_lines == 0) {
for (k = 0; k < 2; k++) {
len = strlen(buffer[k]);
buffer[k] = realloc(buffer[k], len +
strlen(_(no_dev_found)) + 8);
sprintf(buffer[k] + len, "\n%s", _(no_dev_found));
}
}
do {
n_disk_status.body = buffer[toggle&1];
s_out = screen_driver(&n_disk_status, header_lines, i_con);
rc = s_out->rc;
free(s_out);
toggle++;
} while (rc == TOGGLE_SCREEN);
for (k = 0; k < 2; k++) {
free(buffer[k]);
buffer[k] = NULL;
}
n_disk_status.body = NULL;
return rc;
}
/**
* device_details_get_device -
* @i_con: i_container struct
* @device: ipr dev struct
*
* Returns:
* 0 if success / non-zero on failure
**/
static int device_details_get_device(i_container *i_con,
struct ipr_dev **device)
{
i_container *temp_i_con;
int invalid=0;
int dev_num = 0;
struct ipr_dev *cur_device;
char *input;
if (!i_con)
return 1;
for (temp_i_con = i_con_head; temp_i_con && !invalid;
temp_i_con = temp_i_con->next_item) {
cur_device = (struct ipr_dev *)(temp_i_con->data);
if (!cur_device)
continue;
input = temp_i_con->field_data;
if (!input)
continue;
if (strcmp(input, "1") == 0) {
if (dev_num) {
dev_num++;
break;
} else {
*device = cur_device;
dev_num++;
}
} else if ((strcmp(input, " ") != 0) &&
(input != NULL) &&
(strcmp(input, "") != 0)) {
invalid = 1;
}
}
if (invalid)
/* The selection is not valid */
return 15;
if (dev_num == 0)
/* Invalid option. No devices selected. */
return 17;
else if (dev_num != 1)
/* Error. More than one unit was selected. */
return 16;
return 0;
}
/**
* ioa_details - get IOA details
* @body: data buffer
* @dev: ipr dev struct
*
* Returns:
* body
**/
static char *ioa_details(char *body, struct ipr_dev *dev)
{
struct ipr_ioa_vpd ioa_vpd;
struct ipr_cfc_vpd cfc_vpd;
struct ipr_cache_cap_vpd cc_vpd;
struct ipr_dram_vpd dram_vpd;
struct ipr_inquiry_page0 page0_inq;
struct scsi_dev_data *scsi_dev_data = dev->scsi_dev_data;
struct ipr_dual_ioa_entry *ioa_entry;
struct ipr_reclaim_query_data reclaim_data;
int rc, i;
char buffer[200];
char *dynbuf;
int cache_size, dram_size;
u32 fw_level;
memset(&ioa_vpd, 0, sizeof(ioa_vpd));
memset(&cfc_vpd, 0, sizeof(cfc_vpd));
memset(&cc_vpd, 0, sizeof(cc_vpd));
memset(&dram_vpd, 0, sizeof(dram_vpd));
memset(&reclaim_data, 0, sizeof(reclaim_data));
ipr_inquiry(dev, IPR_STD_INQUIRY, &ioa_vpd, sizeof(ioa_vpd));
rc = ipr_inquiry(dev, 0, &page0_inq, sizeof(page0_inq));
for (i = 0; !rc && i < page0_inq.page_length; i++) {
if (page0_inq.supported_page_codes[i] == 1) {
ipr_inquiry(dev, 1, &cfc_vpd, sizeof(cfc_vpd));
break;
}
if (page0_inq.supported_page_codes[i] == 0xC4) {
ipr_inquiry(dev, 0xC4, &cc_vpd, sizeof(cc_vpd));
break;
}
}
ipr_inquiry(dev, 2, &dram_vpd, sizeof(dram_vpd));
fw_level = get_fw_version(&dev->ioa->ioa);
body = add_line_to_body(body,"", NULL);
ipr_strncpy_0(buffer, scsi_dev_data->vendor_id, IPR_VENDOR_ID_LEN);
body = add_line_to_body(body,_("Manufacturer"), buffer);
ipr_strncpy_0(buffer, scsi_dev_data->product_id, IPR_PROD_ID_LEN);
body = add_line_to_body(body,_("Machine Type and Model"), buffer);
sprintf(buffer,"%08X", fw_level);
body = add_line_to_body(body,_("Firmware Version"), buffer);
if (!dev->ioa->ioa_dead) {
ipr_strncpy_0(buffer, (char *)ioa_vpd.std_inq_data.serial_num, IPR_SERIAL_NUM_LEN);
body = add_line_to_body(body,_("Serial Number"), buffer);
ipr_strncpy_0(buffer, (char *)ioa_vpd.ascii_part_num, IPR_VPD_PART_NUM_LEN);
body = add_line_to_body(body,_("Part Number"), buffer);
ipr_strncpy_0(buffer, (char *)ioa_vpd.ascii_plant_code, IPR_VPD_PLANT_CODE_LEN);
body = add_line_to_body(body,_("Plant of Manufacturer"), buffer);
if (cfc_vpd.cache_size[0]) {
ipr_strncpy_0(buffer, (char *)cfc_vpd.cache_size, IPR_VPD_CACHE_SIZE_LEN);
cache_size = strtoul(buffer, NULL, 16);
sprintf(buffer,"%d MB", cache_size);
body = add_line_to_body(body,_("Cache Size"), buffer);
}
if (ntohl(cc_vpd.write_cache_size)) {
sprintf(buffer,"%d MB", ntohl(cc_vpd.write_cache_size));
body = add_line_to_body(body,_("Write Cache Size"), buffer);
}
if (ntohl(cc_vpd.data_store_size)) {
sprintf(buffer,"%d MB", ntohl(cc_vpd.data_store_size));
body = add_line_to_body(body,_("DRAM Size"), buffer);
} else {
ipr_strncpy_0(buffer, (char *)dram_vpd.dram_size,
IPR_VPD_DRAM_SIZE_LEN);
dram_size = strtoul(buffer, NULL, 16);
sprintf(buffer, "%d MB", dram_size);
body = add_line_to_body(body,_("DRAM Size"), buffer);
}
}
body = add_line_to_body(body,_("Resource Name"), dev->gen_name);
body = add_line_to_body(body,"", NULL);
body = add_line_to_body(body,_("Physical location"), NULL);
body = add_line_to_body(body,_("PCI Address"), dev->ioa->pci_address);
if (dev->ioa->sis64)
body = add_line_to_body(body,_("Resource Path"), scsi_dev_data->res_path);
sprintf(buffer,"%d", dev->ioa->host_num);
body = add_line_to_body(body,_("SCSI Host Number"), buffer);
if (strlen(dev->ioa->physical_location))
body = add_line_to_body(body,_("Platform Location"),
dev->ioa->physical_location);
if (dev->ioa->dual_raid_support) {
ioa_entry = (struct ipr_dual_ioa_entry *)
(((unsigned long)&dev->ioa->ioa_status.cap) +
ntohl(dev->ioa->ioa_status.cap.length));
body = add_line_to_body(body,"", NULL);
body = add_line_to_body(body,_("Current Dual Adapter State"),
dev->ioa->dual_state);
body = add_line_to_body(body,_("Preferred Dual Adapter State"),
dev->ioa->preferred_dual_state);
if (ntohl(dev->ioa->ioa_status.num_entries)) {
ipr_strncpy_0(buffer, (char *)ioa_entry->fmt0.remote_vendor_id, IPR_VENDOR_ID_LEN);
body = add_line_to_body(body,_("Remote Adapter Manufacturer"), buffer);
ipr_strncpy_0(buffer, (char *)ioa_entry->fmt0.remote_prod_id, IPR_PROD_ID_LEN);
body = add_line_to_body(body,_("Remote Adapter Machine Type And Model"),
buffer);
ipr_strncpy_0(buffer, (char *)ioa_entry->fmt0.remote_sn, IPR_SERIAL_NUM_LEN);
body = add_line_to_body(body,_("Remote Adapter Serial Number"), buffer);
}
}
if (dev->ioa->configure_rebuild_verify) {
if (dev->ioa->disable_rebuild_verify)
body = add_line_to_body(body,_("Rebuild Verification"), "Disabled");
else
body = add_line_to_body(body,_("Rebuild Verification"), "Enabled");
}
if (dev->ioa->asymmetric_access) {
body = add_line_to_body(body,"", NULL);
if (dev->ioa->asymmetric_access_enabled)
body = add_line_to_body(body,_("Current Asymmetric Access State"), _("Enabled"));
else
body = add_line_to_body(body,_("Current Asymmetric Access State"), _("Disabled"));
}
if (dev->ioa->has_cache && !dev->ioa->has_vset_write_cache) {
if (get_ioa_caching(dev->ioa) == IPR_IOA_REQUESTED_CACHING_DISABLED)
body = add_line_to_body(body,_("Current Requested Caching Mode"), _("Disabled"));
else
body = add_line_to_body(body,_("Current Requested Caching Mode"), _("Default"));
}
if (dev->ioa->has_cache) {
if (dev->ioa->vset_write_cache) {
dynbuf = "Synchronize Cache";
} else if (!dev->ioa->has_vset_write_cache) {
if (ipr_reclaim_cache_store(dev->ioa,
IPR_RECLAIM_QUERY,
&reclaim_data))
goto out;
dynbuf = (reclaim_data.rechargeable_battery_type ?
"Battery Backed" : "Supercap Protected");
} else {
/* This is the case where adapters even support
Sync cache, but it is disabled. This should
never happen... unless it is an old Bare
Metal system. Let's handle this here so
people don't get confused. */
goto out;
}
body = add_line_to_body(body, _("Cache Protection"), dynbuf);
}
out:
return body;
}
/**
* vset_array_details - get vset/array details
* @body: data buffer
* @dev: ipr dev struct
*
* Returns:
* body
**/
static char *vset_array_details(char *body, struct ipr_dev *dev)
{
struct ipr_read_cap16 read_cap16;
unsigned long long max_user_lba_int;
long double device_capacity;
double lba_divisor;
struct ipr_array_record *array_rcd = dev->array_rcd;
char buffer[100];
int rc;
int scsi_channel, scsi_id, scsi_lun;
if (dev->scsi_dev_data) {
scsi_channel = dev->scsi_dev_data->channel;
scsi_id = dev->scsi_dev_data->id;
scsi_lun = dev->scsi_dev_data->lun;
} else if (!dev->ioa->sis64) {
scsi_channel = array_rcd->type2.last_resource_addr.bus;
scsi_id = array_rcd->type2.last_resource_addr.target;
scsi_lun = array_rcd->type2.last_resource_addr.lun;
}
body = add_line_to_body(body,"", NULL);
ipr_strncpy_0(buffer, (char *)dev->vendor_id, IPR_VENDOR_ID_LEN);
body = add_line_to_body(body,_("Manufacturer"), buffer);
sprintf(buffer,"RAID %s", dev->prot_level_str);
body = add_line_to_body(body,_("RAID Level"), buffer);
if (ntohs(dev->stripe_size) > 1024)
sprintf(buffer,"%d M", ntohs(dev->stripe_size)/1024);
else
sprintf(buffer,"%d k", ntohs(dev->stripe_size));
body = add_line_to_body(body,_("Stripe Size"), buffer);
/* Do a read capacity to determine the capacity */
rc = ipr_read_capacity_16(dev, &read_cap16);
if (!rc && (ntohl(read_cap16.max_user_lba_hi) ||
ntohl(read_cap16.max_user_lba_lo)) &&
ntohl(read_cap16.block_length)) {
max_user_lba_int = ntohl(read_cap16.max_user_lba_hi);
max_user_lba_int <<= 32;
max_user_lba_int |= ntohl(read_cap16.max_user_lba_lo);
device_capacity = max_user_lba_int + 1;
lba_divisor =
(1000*1000*1000) / ntohl(read_cap16.block_length);
sprintf(buffer, "%.2Lf GB", device_capacity / lba_divisor);
body = add_line_to_body(body, _("Capacity"), buffer);
}
if (ipr_is_volume_set(dev)) {
body = add_line_to_body(body, _("Resource Name"), dev->dev_name);
if (dev->ioa->sis64 && dev->array_rcd->type3.desc[0] != ' ') {
ipr_strncpy_0(buffer, (char *)dev->array_rcd->type3.desc,
sizeof (dev->array_rcd->type3.desc));
body = add_line_to_body(body,_("Label"), buffer);
}
}
ipr_strncpy_0(buffer, (char *)dev->serial_number, IPR_SERIAL_NUM_LEN);
body = add_line_to_body(body,_("Serial Number"), buffer);
body = add_line_to_body(body, "", NULL);
body = add_line_to_body(body, _("Physical location"), NULL);
body = add_line_to_body(body, _("PCI Address"), dev->ioa->pci_address);
if (dev->ioa->sis64) {
if (dev->scsi_dev_data)
body = add_line_to_body(body,_("Resource Path"), dev->scsi_dev_data->res_path);
else {
ipr_format_res_path(dev->dev_rcd->type3.res_path, dev->res_path_name, IPR_MAX_RES_PATH_LEN);
body = add_line_to_body(body,_("Resource Path"), dev->res_path_name);
}
}
if (dev->scsi_dev_data || !dev->ioa->sis64) {
sprintf(buffer, "%d", dev->ioa->host_num);
body = add_line_to_body(body, _("SCSI Host Number"), buffer);
sprintf(buffer, "%d", scsi_channel);
body = add_line_to_body(body, _("SCSI Channel"), buffer);
sprintf(buffer, "%d", scsi_id);
body = add_line_to_body(body, _("SCSI Id"), buffer);
sprintf(buffer, "%d", scsi_lun);
body = add_line_to_body(body, _("SCSI Lun"), buffer);
}
return body;
}
/**
* disk_extended_details - get extended disk details
* @body: data buffer
* @dev: ipr dev struct
* @std_inq: ipr_std_inq_data_long struct
*
* Returns:
* body
**/
static char *disk_extended_details(char *body, struct ipr_dev *dev,
struct ipr_std_inq_data_long *std_inq)
{
int rc, i;
struct ipr_inquiry_page0 page0_inq;
char buffer[100];
char *hex;
rc = ipr_inquiry(dev, 0, &page0_inq, sizeof(page0_inq));
for (i = 0; !rc && i < page0_inq.page_length; i++) {
if (page0_inq.supported_page_codes[i] == 0xC7) {
/* FIXME 0xC7 is SCSD, do further research to find
what needs to be tested for this affirmation.*/
/* xxx add_str_to_body that does the strncpy_0? */
body = add_line_to_body(body,"", NULL);
body = add_line_to_body(body,_("Extended Details"), NULL);
ipr_strncpy_0(buffer, (char *)std_inq->fru_number, IPR_STD_INQ_FRU_NUM_LEN);
body = add_line_to_body(body,_("FRU Number"), buffer);
ipr_strncpy_0(buffer, (char *)std_inq->ec_level, IPR_STD_INQ_EC_LEVEL_LEN);
body = add_line_to_body(body,_("EC Level"), buffer);
ipr_strncpy_0(buffer, (char *)std_inq->part_number, IPR_STD_INQ_PART_NUM_LEN);
body = add_line_to_body(body,_("Part Number"), buffer);
hex = (char *)&std_inq->std_inq_data;
sprintf(buffer, "%02X%02X%02X%02X%02X%02X%02X%02X",
hex[0], hex[1], hex[2], hex[3], hex[4], hex[5], hex[6], hex[7]);
body = add_line_to_body(body,_("Device Specific (Z0)"), buffer);
ipr_strncpy_0(buffer, (char *)std_inq->z1_term, IPR_STD_INQ_Z1_TERM_LEN);
body = add_line_to_body(body,_("Device Specific (Z1)"), buffer);
ipr_strncpy_0(buffer, (char *)std_inq->z2_term, IPR_STD_INQ_Z2_TERM_LEN);
body = add_line_to_body(body,_("Device Specific (Z2)"), buffer);
ipr_strncpy_0(buffer, (char *)std_inq->z3_term, IPR_STD_INQ_Z3_TERM_LEN);
body = add_line_to_body(body,_("Device Specific (Z3)"), buffer);
ipr_strncpy_0(buffer, (char *)std_inq->z4_term, IPR_STD_INQ_Z4_TERM_LEN);
body = add_line_to_body(body,_("Device Specific (Z4)"), buffer);
ipr_strncpy_0(buffer, (char *)std_inq->z5_term, IPR_STD_INQ_Z5_TERM_LEN);
body = add_line_to_body(body,_("Device Specific (Z5)"), buffer);
ipr_strncpy_0(buffer, (char *)std_inq->z6_term, IPR_STD_INQ_Z6_TERM_LEN);
body = add_line_to_body(body,_("Device Specific (Z6)"), buffer);
break;
}
}
return body;
}
/**
* disk_details - get disk details
* @body: data buffer
* @dev: ipr dev struct
*
* Returns:
* body
**/
static char *disk_details(char *body, struct ipr_dev *dev)
{
int rc;
struct ipr_std_inq_data_long std_inq;
struct ipr_dev_record *device_record;
struct ipr_dasd_inquiry_page3 page3_inq;
struct ipr_read_cap16 read_cap16;
unsigned long long max_user_lba_int;
struct ipr_query_res_state res_state;
long double device_capacity;
double lba_divisor;
char product_id[IPR_PROD_ID_LEN+1];
char vendor_id[IPR_VENDOR_ID_LEN+1];
char serial_num[IPR_SERIAL_NUM_LEN+1];
char buffer[100];
int len, scsi_channel, scsi_id, scsi_lun;
device_record = (struct ipr_dev_record *)dev->dev_rcd;
if (strlen(dev->physical_location) == 0)
get_drive_phy_loc(dev->ioa);
if (dev->scsi_dev_data) {
scsi_channel = dev->scsi_dev_data->channel;
scsi_id = dev->scsi_dev_data->id;
scsi_lun = dev->scsi_dev_data->lun;
} else if (device_record) {
scsi_channel = device_record->type2.last_resource_addr.bus;
scsi_id = device_record->type2.last_resource_addr.target;
scsi_lun = device_record->type2.last_resource_addr.lun;
}
rc = ipr_inquiry(dev, IPR_STD_INQUIRY, &std_inq, sizeof(std_inq));
if (!rc) {
ipr_strncpy_0(vendor_id, (char *)std_inq.std_inq_data.vpids.vendor_id,
IPR_VENDOR_ID_LEN);
ipr_strncpy_0(product_id, (char *)std_inq.std_inq_data.vpids.product_id,
IPR_PROD_ID_LEN);
ipr_strncpy_0(serial_num, (char *)std_inq.std_inq_data.serial_num,
IPR_SERIAL_NUM_LEN);
} else if (device_record) {
ipr_strncpy_0(vendor_id, (char *)dev->vendor_id, IPR_VENDOR_ID_LEN);
ipr_strncpy_0(product_id, (char *)dev->product_id, IPR_PROD_ID_LEN);
ipr_strncpy_0(serial_num, (char *)dev->serial_number, IPR_SERIAL_NUM_LEN);
} else {
ipr_strncpy_0(vendor_id, dev->scsi_dev_data->vendor_id, IPR_VENDOR_ID_LEN);
ipr_strncpy_0(product_id, dev->scsi_dev_data->product_id, IPR_PROD_ID_LEN);
serial_num[0] = '\0';
}
body = add_line_to_body(body,"", NULL);
body = add_line_to_body(body,_("Manufacturer"), vendor_id);
body = add_line_to_body(body,_("Product ID"), product_id);
rc = ipr_inquiry(dev, 0x03, &page3_inq, sizeof(page3_inq));
if (!rc) {
len = sprintf(buffer, "%X%X%X%X", page3_inq.release_level[0],
page3_inq.release_level[1], page3_inq.release_level[2],
page3_inq.release_level[3]);
if (isalnum(page3_inq.release_level[0]) && isalnum(page3_inq.release_level[1]) &&
isalnum(page3_inq.release_level[2]) && isalnum(page3_inq.release_level[3])) {
sprintf(buffer + len, " (%c%c%c%c)", page3_inq.release_level[0],
page3_inq.release_level[1], page3_inq.release_level[2],
page3_inq.release_level[3]);
}
body = add_line_to_body(body, _("Firmware Version"), buffer);
}
if (strcmp(vendor_id,"IBMAS400") == 0) {
sprintf(buffer, "%X", std_inq.as400_service_level);
body = add_line_to_body(body,_("Level"), buffer);
}
if (serial_num[0] != '\0')
body = add_line_to_body(body, _("Serial Number"), serial_num);
/* Do a read capacity to determine the capacity */
memset(&read_cap16, 0, sizeof(read_cap16));
rc = ipr_read_capacity_16(dev, &read_cap16);
if (!rc && (ntohl(read_cap16.max_user_lba_hi) ||
ntohl(read_cap16.max_user_lba_lo)) &&
ntohl(read_cap16.block_length)) {
max_user_lba_int = ntohl(read_cap16.max_user_lba_hi);
max_user_lba_int <<= 32;
max_user_lba_int |= ntohl(read_cap16.max_user_lba_lo);
device_capacity = max_user_lba_int + 1;
lba_divisor =
(1000*1000*1000) / ntohl(read_cap16.block_length);
sprintf(buffer, "%.2Lf GB", device_capacity / lba_divisor);
body = add_line_to_body(body, _("Capacity"), buffer);
}
if (strlen(dev->dev_name) > 0)
body = add_line_to_body(body,_("Resource Name"), dev->dev_name);
rc = ipr_query_resource_state(dev, &res_state);
if (!rc && !res_state.not_oper && !res_state.not_ready) {
if (ioa_is_spi(dev->ioa) && !res_state.prot_dev_failed) {
if (ntohl(res_state.gscsi.data_path_width) == 16)
body = add_line_to_body(body, _("Wide Enabled"), _("Yes"));
else
body = add_line_to_body(body, _("Wide Enabled"), _("No"));
sprintf(buffer, "%d MB/s",
(ntohl(res_state.gscsi.data_xfer_rate) *
ntohl(res_state.gscsi.data_path_width))/(10 * 8));
if (res_state.gscsi.data_xfer_rate != 0xffffffff)
body = add_line_to_body(body, _("Current Bus Throughput"), buffer);
}
}
body = add_line_to_body(body, "", NULL);
body = add_line_to_body(body, _("Physical location"), NULL);
body = add_line_to_body(body ,_("PCI Address"), dev->ioa->pci_address);
if (dev->ioa->sis64) {
if (dev->scsi_dev_data)
body = add_line_to_body(body,_("Resource Path"), dev->scsi_dev_data->res_path);
else {
ipr_format_res_path(dev->dev_rcd->type3.res_path, dev->res_path_name, IPR_MAX_RES_PATH_LEN);
body = add_line_to_body(body,_("Resource Path"), dev->res_path_name);
}
}
sprintf(buffer, "%d", dev->ioa->host_num);
body = add_line_to_body(body, _("SCSI Host Number"), buffer);
sprintf(buffer, "%d", scsi_channel);
body = add_line_to_body(body, _("SCSI Channel"), buffer);
sprintf(buffer, "%d", scsi_id);
body = add_line_to_body(body, _("SCSI Id"), buffer);
sprintf(buffer, "%d", scsi_lun);
body = add_line_to_body(body, _("SCSI Lun"), buffer);
if (strlen(dev->physical_location))
body = add_line_to_body(body,_("Platform Location"), dev->physical_location);
body = disk_extended_details(body, dev, &std_inq);
return body;
}
/**
* get_ses_phy_loc - get ses physical location
* @dev: ipr dev struct
*
* Returns:
* body
**/
int get_ses_phy_loc(struct ipr_dev *dev)
{
int rc, i, ret = 1;
struct ses_inquiry_page0 ses_page0_inq;
struct ses_serial_num_vpd ses_vpd_inq;
struct esm_serial_num_vpd esm_vpd_inq;
char buffer[100];
memset(&ses_vpd_inq, 0, sizeof(ses_vpd_inq));
rc = ipr_inquiry(dev, 0x00, &ses_page0_inq, sizeof(ses_page0_inq));
for (i = 0; !rc && i < ses_page0_inq.page_length; i++) {
if (ses_page0_inq.supported_vpd_page[i] == 0x04) {
ret = ipr_inquiry(dev, 0x04, &ses_vpd_inq, sizeof(ses_vpd_inq));
break;
}
}
if (ret == 0 ) {
dev->physical_location[0] = '\0';
strncat(dev->physical_location, "U", strlen("U"));
ipr_strncpy_0(buffer, (char *)ses_vpd_inq.feature_code,
sizeof(ses_vpd_inq.feature_code));
strncat(dev->physical_location, buffer, strlen(buffer));
ipr_strncpy_0(buffer, (char *)ses_vpd_inq.count,
sizeof(ses_vpd_inq.count));
strncat(dev->physical_location, ".", strlen("."));
strncat(dev->physical_location, buffer, strlen(buffer));
ipr_strncpy_0(buffer, (char *)ses_vpd_inq.ses_serial_num,
sizeof(ses_vpd_inq.ses_serial_num));
strncat(dev->physical_location, ".", strlen("."));
strncat(dev->physical_location, buffer, strlen(buffer));
}
if (strlen(dev->physical_location)) {
for (i = 0; !rc && i < ses_page0_inq.page_length; i++) {
if (ses_page0_inq.supported_vpd_page[i] == 0x01) {
ret = ipr_inquiry(dev, 0x01, &esm_vpd_inq, sizeof(esm_vpd_inq));
break;
}
}
if (ret == 0 ) {
ipr_strncpy_0((char *)&dev->serial_number, (char *)&esm_vpd_inq.esm_serial_num[0], sizeof(esm_vpd_inq.esm_serial_num));
ipr_strncpy_0(buffer, (char *)esm_vpd_inq.frb_label,
sizeof(esm_vpd_inq.frb_label));
strncat(dev->physical_location, "-", strlen("-"));
strncat(dev->physical_location, buffer, strlen(buffer));
return 0;
}
}
return 1;
}
int get_drive_phy_loc_with_ses_phy_loc(struct ipr_dev *ses, struct drive_elem_desc_pg *drive_data, int slot_id, char *buf, int conc_maint)
{
char buffer[DISK_PHY_LOC_LENGTH + 1], *first_hyphen;
char unit_phy_loc[PHYSICAL_LOCATION_LENGTH+1];
ipr_strncpy_0(buffer, (char *)drive_data->dev_elem[slot_id].disk_physical_loc, DISK_PHY_LOC_LENGTH);
if (strlen(ses->physical_location)) {
if (strlen(buffer)) {
ipr_strncpy_0(unit_phy_loc, ses->physical_location, PHYSICAL_LOCATION_LENGTH);
first_hyphen = strchr(unit_phy_loc, '-');
if (first_hyphen != NULL)
*first_hyphen = '\0';
sprintf(buf, "%s-%s", unit_phy_loc, buffer);
}
else
sprintf(buf, "%s", "\0");
}
else if (strlen(buffer)) {
if (strlen(ses->ioa->physical_location)) {
ipr_strncpy_0(unit_phy_loc, ses->ioa->physical_location, PHYSICAL_LOCATION_LENGTH);
first_hyphen = strchr(unit_phy_loc, '-');
if (first_hyphen != NULL)
*first_hyphen = '\0';
sprintf(buf, "%s-%s", unit_phy_loc, buffer);
} else
sprintf(buf, "%s", "\0");
}
else
sprintf(buf, "%s", "\0");
return 0;
}
int index_in_page2(struct ipr_encl_status_ctl_pg *ses_data, int slot_id)
{
int i;
for (i = 1; i < IPR_NUM_DRIVE_ELEM_STATUS_ENTRIES; i++) {
if (ses_data->elem_status[i].slot_id == slot_id)
return (i - 1);
}
return -1;
}
/**
* ses_details - get ses details
* @body: data buffer
* @dev: ipr dev struct
*
* Returns:
* body
**/
static char *ses_details(char *body, struct ipr_dev *dev)
{
int rc;
u8 release_level[4];
char product_id[IPR_PROD_ID_LEN+1];
char vendor_id[IPR_VENDOR_ID_LEN+1];
char buffer[100];
int len;
if (strlen(dev->physical_location) == 0)
get_ses_phy_loc(dev);
ipr_strncpy_0(vendor_id, dev->scsi_dev_data->vendor_id, IPR_VENDOR_ID_LEN);
ipr_strncpy_0(product_id, dev->scsi_dev_data->product_id, IPR_PROD_ID_LEN);
ipr_strncpy_0(buffer, (char *)&dev->serial_number, ESM_SERIAL_NUM_LEN);
body = add_line_to_body(body,"", NULL);
body = add_line_to_body(body,_("Manufacturer"), vendor_id);
body = add_line_to_body(body,_("Product ID"), product_id);
body = add_line_to_body(body,_("Serial Number"), buffer);
rc = ipr_get_fw_version(dev, release_level);
if (!rc) {
len = sprintf(buffer, "%X%X%X%X", release_level[0], release_level[1],
release_level[2], release_level[3]);
if (isalnum(release_level[0]) && isalnum(release_level[1]) &&
isalnum(release_level[2]) && isalnum(release_level[3])) {
sprintf(buffer + len, " (%c%c%c%c)", release_level[0],
release_level[1], release_level[2], release_level[3]);
}
body = add_line_to_body(body, _("Firmware Version"), buffer);
}
if (strlen(dev->gen_name) > 0)
body = add_line_to_body(body,_("Resource Name"), dev->gen_name);
body = add_line_to_body(body, "", NULL);
body = add_line_to_body(body, _("Physical location"), NULL);
body = add_line_to_body(body ,_("PCI Address"), dev->ioa->pci_address);
if (dev->ioa->sis64)
body = add_line_to_body(body,_("Resource Path"), dev->scsi_dev_data->res_path);
sprintf(buffer, "%d", dev->ioa->host_num);
body = add_line_to_body(body, _("SCSI Host Number"), buffer);
sprintf(buffer, "%d", dev->scsi_dev_data->channel);
body = add_line_to_body(body, _("SCSI Channel"), buffer);
sprintf(buffer, "%d", dev->scsi_dev_data->id);
body = add_line_to_body(body, _("SCSI Id"), buffer);
sprintf(buffer, "%d", dev->scsi_dev_data->lun);
body = add_line_to_body(body, _("SCSI Lun"), buffer);
if (strlen(dev->physical_location))
body = add_line_to_body(body,_("Platform Location"), dev->physical_location);
return body;
}
/**
* device_details -
* @i_con: i_container struct
*
* Returns:
* 0 if success / non-zero on failure
**/
int device_details(i_container *i_con)
{
char *body = NULL;
struct ipr_dev *dev;
struct screen_output *s_out;
s_node *n_screen;
int rc;
processing();
if ((rc = device_details_get_device(i_con, &dev)))
return rc;
if (ipr_is_ioa(dev)) {
n_screen = &n_adapter_details;
body = ioa_details(body, dev);
} else if (ipr_is_volume_set(dev)) {
n_screen = &n_vset_details;
body = vset_array_details(body, dev);
} else if (ipr_is_ses(dev)) {
n_screen = &n_ses_details;
body = ses_details(body, dev);
} else {
n_screen = &n_device_details;
body = disk_details(body, dev);
}
n_screen->body = body;
s_out = screen_driver(n_screen, 0, i_con);
free(n_screen->body);
n_screen->body = NULL;
rc = s_out->rc;
free(s_out);
return rc;
}
int device_stats(i_container *i_con)
{
int rc;
struct ipr_dev *dev;
char *body = NULL;
char *tmp;
s_node *n_screen = &n_device_stats;
struct screen_output *s_out;
processing();
if ((rc = device_details_get_device(i_con, &dev)))
return rc;
body = print_ssd_report(dev, body);
if (ipr_is_af_dasd_device(dev)) {
body = af_dasd_perf(body, dev);
}
if (!body)
return rc;
n_screen->body = body;
s_out = screen_driver(n_screen, 0, i_con);
free(n_screen->body);
n_screen->body = NULL;
rc = s_out->rc;
free(s_out);
return rc;
}
int statistics_menu(i_container *i_con)
{
int rc, k;
int len = 0;
int num_lines = 0;
struct ipr_ioa *ioa;
struct ipr_dev *dev;
struct screen_output *s_out;
int header_lines;
char *buffer[2];
int toggle = 1;
struct ipr_dev *vset;
struct ipr_sas_std_inq_data std_inq;
processing();
rc = RC_SUCCESS;
i_con = free_i_con(i_con);
check_current_config(false);
body_init_status(buffer, n_device_stats.header, &header_lines);
for_each_ioa(ioa) {
if (!ioa->ioa.scsi_dev_data)
continue;
__for_each_standalone_disk(ioa, dev) {
if (ipr_is_gscsi(dev)) {
rc = ipr_inquiry(dev, IPR_STD_INQUIRY, &std_inq, sizeof(std_inq));
if (rc || !std_inq.is_ssd)
continue;
}
print_dev(k, dev, buffer, "%1", 2+k);
i_con = add_i_con(i_con, "\0", dev);
num_lines++;
}
num_lines += print_hotspare_disks(ioa, &i_con, buffer, 2);
for_each_vset(ioa, vset) {
for_each_dev_in_vset(vset, dev) {
print_dev(k, dev, buffer, "%1", k);
i_con = add_i_con(i_con, "\0", dev);
num_lines++;
}
}
}
if (num_lines == 0) {
for (k = 0; k < 2; k++) {
len = strlen(buffer[k]);
buffer[k] = realloc(buffer[k], len +
strlen(_(no_dev_found)) + 8);
sprintf(buffer[k] + len, "\n%s", _(no_dev_found));
}
}
do {
n_device_stats.body = buffer[toggle&1];
s_out = screen_driver(&n_device_stats, header_lines,
i_con);
rc = s_out->rc;
free(s_out);
toggle++;
} while (rc == TOGGLE_SCREEN);
for (k = 0; k < 2; k++) {
free(buffer[k]);
buffer[k] = NULL;
}
n_device_stats.body = NULL;
return rc;
}
#define IPR_INCLUDE 0
#define IPR_REMOVE 1
#define IPR_ADD_HOT_SPARE 0
#define IPR_RMV_HOT_SPARE 1
#define IPR_FMT_JBOD 0
#define IPR_FMT_RECOVERY 1
/**
* hot_spare_screen - Display choices for working with hot spares.
* @i_con: i_container struct
*
* Returns:
* 0 if success / non-zero on failure
**/
int hot_spare_screen(i_container *i_con)
{
return display_features_menu(i_con, &n_hot_spare_screen);
}
/**
* raid_screen -
* @i_con: i_container struct
*
* Returns:
* 0 if success / non-zero on failure
**/
int raid_screen(i_container *i_con)
{
return display_features_menu(i_con, &n_raid_screen);
}
/**
* raid_status -
* @i_con: i_container struct
*
* Returns:
* 0 if success / non-zero on failure
**/
int raid_status(i_container *i_con)
{
int rc, k;
int len = 0;
int num_lines = 0;
struct ipr_ioa *ioa;
struct screen_output *s_out;
int header_lines;
char *buffer[2];
int toggle = 1;
processing();
rc = RC_SUCCESS;
i_con = free_i_con(i_con);
check_current_config(false);
body_init_status(buffer, n_raid_status.header, &header_lines);
for_each_ioa(ioa) {
if (!ioa->ioa.scsi_dev_data)
continue;
num_lines += print_hotspare_disks(ioa, &i_con, buffer, 2);
num_lines += print_vsets(ioa, &i_con, buffer, 2);
}
if (num_lines == 0) {
for (k = 0; k < 2; k++) {
len = strlen(buffer[k]);
buffer[k] = realloc(buffer[k], len +
strlen(_(no_dev_found)) + 8);
sprintf(buffer[k] + len, "%s\n", _(no_dev_found));
}
}
toggle_field = 0;
do {
n_raid_status.body = buffer[toggle&1];
s_out = screen_driver(&n_raid_status, header_lines, i_con);
rc = s_out->rc;
free(s_out);
toggle++;
} while (rc == TOGGLE_SCREEN);
for (k = 0; k < 2; k++) {
free(buffer[k]);
buffer[k] = NULL;
}
n_raid_status.body = NULL;
return rc;
}
/**
* is_array_in_use -
* @ioa: ipr ioa struct
* @array_id: array ID
*
* Returns:
* 1 if the array is in use / 0 otherwise
*
* TODO: This routine no longer works. It was originally designed to work
* with the 2.4 kernels. For now, the routine will just return 0.
* The rest of the code is being left in place in case this kind of
* test becomes possible in the future.
* JWB - August 11, 2009
**/
static int is_array_in_use(struct ipr_ioa *ioa,
u8 array_id)
{
int opens;
struct ipr_dev *vset;
return 0;
for_each_vset(ioa, vset) {
if (array_id == vset->array_id) {
if (!vset->scsi_dev_data)
continue;
opens = num_device_opens(vset->scsi_dev_data->host,
vset->scsi_dev_data->channel,
vset->scsi_dev_data->id,
vset->scsi_dev_data->lun);
if (opens != 0)
return 1;
}
}
return 0;
}
/**
* raid_stop -
* @i_con: i_container struct
*
* Returns:
* 0 if success / non-zero on failure
**/
int raid_stop(i_container *i_con)
{
int rc, k;
int found = 0;
char *buffer[2];
struct ipr_ioa *ioa;
struct ipr_dev *dev;
int header_lines;
int toggle = 1;
struct screen_output *s_out;
processing();
/* empty the linked list that contains field pointens */
i_con = free_i_con(i_con);
rc = RC_SUCCESS;
check_current_config(false);
body_init_status(buffer, n_raid_stop.header, &header_lines);
for_each_ioa(ioa) {
for_each_vset(ioa, dev) {
if (!dev->array_rcd->stop_cand)
continue;
if ((rc = is_array_in_use(ioa, dev->array_id)))
continue;
add_raid_cmd_tail(ioa, dev, dev->array_id);
i_con = add_i_con(i_con, "\0", raid_cmd_tail);
print_dev(k, dev, buffer, "%1", 2+k);
found++;
}
}
if (!found) {
/* Stop Device Parity Protection Failed */
n_raid_stop_fail.body = body_init(n_raid_stop_fail.header, NULL);
s_out = screen_driver(&n_raid_stop_fail, 0, i_con);
free(n_raid_stop_fail.body);
n_raid_stop_fail.body = NULL;
rc = s_out->rc;
free(s_out);
} else {
toggle_field = 0;
do {
n_raid_stop.body = buffer[toggle&1];
s_out = screen_driver(&n_raid_stop, header_lines, i_con);
rc = s_out->rc;
free(s_out);
toggle++;
} while (rc == TOGGLE_SCREEN);
}
for (k = 0; k < 2; k++) {
free(buffer[k]);
buffer[k] = NULL;
}
n_raid_stop.body = NULL;
return rc;
}
/**
* confirm_raid_stop -
* @i_con: i_container struct
*
* Returns:
* 0 if success / non-zero on failure
**/
int confirm_raid_stop(i_container *i_con)
{
struct ipr_dev *dev;
struct ipr_array_record *array_record;
struct array_cmd_data *cur_raid_cmd;
struct ipr_ioa *ioa;
int rc, k;
int found = 0;
char *input;
char *buffer[2];
i_container *temp_i_con;
struct screen_output *s_out;
int toggle = 1;
int header_lines;
found = 0;
body_init_status(buffer, n_confirm_raid_stop.header, &header_lines);
for_each_icon(temp_i_con) {
cur_raid_cmd = (struct array_cmd_data *)(temp_i_con->data);
if (!cur_raid_cmd)
continue;
input = temp_i_con->field_data;
array_record = cur_raid_cmd->dev->array_rcd;
if (strcmp(input, "1") == 0) {
found = 1;
cur_raid_cmd->do_cmd = 1;
if (!array_record->issue_cmd)
array_record->issue_cmd = 1;
} else {
cur_raid_cmd->do_cmd = 0;
if (array_record->issue_cmd)
array_record->issue_cmd = 0;
}
}
if (!found)
return INVALID_OPTION_STATUS;
rc = RC_SUCCESS;
for_each_raid_cmd(cur_raid_cmd) {
if (!cur_raid_cmd->do_cmd)
continue;
ioa = cur_raid_cmd->ioa;
print_dev(k, cur_raid_cmd->dev, buffer, "1", 2+k);
for_each_dev_in_vset(cur_raid_cmd->dev, dev)
print_dev(k, dev, buffer, "1", 2+k);
}
toggle_field = 0;
do {
n_confirm_raid_stop.body = buffer[toggle&1];
s_out = screen_driver(&n_confirm_raid_stop, header_lines, i_con);
rc = s_out->rc;
free(s_out);
toggle++;
} while (rc == TOGGLE_SCREEN);
for (k = 0; k < 2; k++) {
free(buffer[k]);
buffer[k] = NULL;
}
n_confirm_raid_stop.body = NULL;
return rc;
}
/**
* raid_stop_complete -
*
* Returns:
* 21 | EXIT_FLAG if success / 20 | EXIT_FLAG on failure
**/
static int raid_stop_complete()
{
struct ipr_cmd_status cmd_status;
struct ipr_cmd_status_record *status_record;
int done_bad;
int not_done = 0;
int rc;
struct ipr_ioa *ioa;
struct array_cmd_data *cur_raid_cmd;
while(1) {
done_bad = 0;
not_done = 0;
for_each_raid_cmd(cur_raid_cmd) {
ioa = cur_raid_cmd->ioa;
rc = ipr_query_command_status(&ioa->ioa, &cmd_status);
if (rc) {
done_bad = 1;
continue;
}
for_each_cmd_status(status_record, &cmd_status) {
if (status_record->command_code == IPR_STOP_ARRAY_PROTECTION &&
cur_raid_cmd->array_id == status_record->array_id) {
if (status_record->status == IPR_CMD_STATUS_IN_PROGRESS)
not_done = 1;
else if (status_record->status != IPR_CMD_STATUS_SUCCESSFUL)
/* "Stop Parity Protection failed" */
done_bad = 1;
break;
}
}
}
if (!not_done) {
if (done_bad)
/* "Stop Parity Protection failed" */
return (20 | EXIT_FLAG);
check_current_config(false);
/* "Stop Parity Protection completed successfully" */
return (21 | EXIT_FLAG);
}
not_done = 0;
sleep(1);
}
}
/**
* do_confirm_raid_stop -
* @i_con: i_container struct
*
* Returns:
* 21 | EXIT_FLAG if success / 20 | EXIT_FLAG on failure
**/
int do_confirm_raid_stop(i_container *i_con)
{
struct ipr_dev *vset;
struct array_cmd_data *cur_raid_cmd;
struct ipr_ioa *ioa;
int rc;
int max_y, max_x;
struct ipr_res_addr *ra;
for_each_raid_cmd(cur_raid_cmd) {
if (!cur_raid_cmd->do_cmd)
continue;
ioa = cur_raid_cmd->ioa;
vset = cur_raid_cmd->dev;
rc = is_array_in_use(ioa, cur_raid_cmd->array_id);
if (rc != 0) {
syslog(LOG_ERR,
_("Array %s is currently in use and cannot be deleted.\n"),
vset->dev_name);
return (20 | EXIT_FLAG);
}
getmaxyx(stdscr, max_y, max_x);
move(max_y-1, 0);
printw(_("Operation in progress - please wait"));
refresh();
if (vset->scsi_dev_data) {
ipr_allow_restart(vset, 0);
ipr_set_manage_start_stop(vset);
ipr_start_stop_stop(vset);
ipr_write_dev_attr(vset, "delete", "1");
}
if (vset->alt_path && vset->alt_path->scsi_dev_data) {
ipr_allow_restart(vset->alt_path, 0);
ipr_set_manage_start_stop(vset->alt_path);
ipr_start_stop_stop(vset->alt_path);
ipr_write_dev_attr(vset->alt_path, "delete", "1");
}
ioa->num_raid_cmds++;
}
sleep(2);
for_each_ioa(ioa) {
if (ioa->num_raid_cmds == 0)
continue;
ioa->num_raid_cmds = 0;
rc = ipr_stop_array_protection(ioa);
if (rc != 0) {
if (vset->scsi_dev_data) {
ra = &vset->res_addr[0];
ipr_scan(vset->ioa, ra->bus, ra->target, ra->lun);
ipr_allow_restart(vset, 1);
}
if (vset->alt_path && vset->alt_path->scsi_dev_data) {
ra = &vset->alt_path->res_addr[0];
ipr_scan(vset->alt_path->ioa, ra->bus, ra->target, ra->lun);
ipr_allow_restart(vset->alt_path, 1);
}
return (20 | EXIT_FLAG);
}
}
rc = raid_stop_complete();
return rc;
}
/**
* raid_start -
* @i_con: i_container struct
*
* Returns:
* 0 if success / non-zero on failure
**/
int raid_start(i_container *i_con)
{
int rc, k;
int found = 0;
char *buffer[2];
struct ipr_ioa *ioa;
struct screen_output *s_out;
int header_lines;
int toggle = 0;
u8 array_id;
processing();
/* empty the linked list that contains field pointens */
i_con = free_i_con(i_con);
rc = RC_SUCCESS;
check_current_config(false);
body_init_status(buffer, n_raid_start.header, &header_lines);
for_each_ioa(ioa) {
if (!ioa->start_array_qac_entry)
continue;
if (ioa->sis64)
array_id = ioa->start_array_qac_entry->type3.array_id;
else
array_id = ioa->start_array_qac_entry->type2.array_id;
add_raid_cmd_tail(ioa, &ioa->ioa, array_id);
i_con = add_i_con(i_con,"\0",raid_cmd_tail);
print_dev(k, &ioa->ioa, buffer, "%1", k);
found++;
}
if (!found) {
/* Start Device Parity Protection Failed */
n_raid_start_fail.body = body_init(n_raid_start_fail.header, NULL);
s_out = screen_driver(&n_raid_start_fail, 0, i_con);
free(n_raid_start_fail.body);
n_raid_start_fail.body = NULL;
rc = s_out->rc;
free(s_out);
} else {
do {
n_raid_start.body = buffer[toggle&1];
s_out = screen_driver(&n_raid_start, header_lines, i_con);
rc = s_out->rc;
free(s_out);
toggle++;
} while (rc == TOGGLE_SCREEN);
free_raid_cmds();
}
for (k = 0; k < 2; k++) {
free(buffer[k]);
buffer[k] = NULL;
}
n_raid_start.body = NULL;
return rc;
}
/**
* raid_start_loop -
* @i_con: i_container struct
*
* Returns:
* 0 if success / non-zero on failure
**/
int raid_start_loop(i_container *i_con)
{
int rc;
struct array_cmd_data *cur_raid_cmd;
int found = 0;
char *input;
i_container *temp_i_con;
for_each_icon(temp_i_con) {
cur_raid_cmd = (struct array_cmd_data *)(temp_i_con->data);
if (!cur_raid_cmd)
continue;
input = temp_i_con->field_data;
if (strcmp(input, "1") == 0) {
rc = configure_raid_start(temp_i_con);
if (RC_SUCCESS == rc) {
found = 1;
cur_raid_cmd->do_cmd = 1;
} else
return rc;
} else
cur_raid_cmd->do_cmd = 0;
}
if (found != 0) {
/* Go to verification screen */
rc = confirm_raid_start(NULL);
rc |= EXIT_FLAG;
} else
rc = INVALID_OPTION_STATUS; /* "Invalid options specified" */
return rc;
}
/**
* configure_raid_start -
* @i_con: i_container struct
*
* Returns:
* 0 if success / non-zero on failure
**/
int configure_raid_start(i_container *i_con)
{
char *input;
int found;
struct ipr_dev *dev;
struct array_cmd_data *cur_raid_cmd;
int rc, k;
char *buffer[2];
struct ipr_ioa *ioa;
i_container *i_con2 = NULL;
i_container *i_con_head_saved;
i_container *temp_i_con = NULL;
i_container *temp_i_con2;
struct screen_output *s_out;
int header_lines;
int toggle = 0;
rc = RC_SUCCESS;
cur_raid_cmd = (struct array_cmd_data *)(i_con->data);
ioa = cur_raid_cmd->ioa;
body_init_status(buffer, n_configure_raid_start.header, &header_lines);
i_con_head_saved = i_con_head;
i_con_head = NULL;
for_each_af_dasd(ioa, dev) {
if (!dev->scsi_dev_data)
continue;
if (dev->dev_rcd->start_cand && device_supported(dev)) {
print_dev(k, dev, buffer, "%1", k);
i_con2 = add_i_con(i_con2, "\0", dev);
}
}
do {
toggle_field = 0;
do {
n_configure_raid_start.body = buffer[toggle&1];
s_out = screen_driver(&n_configure_raid_start, header_lines, i_con2);
temp_i_con2 = s_out->i_con;
rc = s_out->rc;
free(s_out);
toggle++;
} while (rc == TOGGLE_SCREEN);
if (rc > 0)
goto leave;
i_con2 = temp_i_con2;
found = 0;
for_each_icon(temp_i_con) {
dev = (struct ipr_dev *)temp_i_con->data;
input = temp_i_con->field_data;
if (dev && strcmp(input, "1") == 0) {
found = 1;
dev->dev_rcd->issue_cmd = 1;
}
}
if (found != 0) {
/* Go to parameters screen */
rc = configure_raid_parameters(i_con);
if ((rc & EXIT_FLAG) ||
!(rc & CANCEL_FLAG))
goto leave;
/* User selected Cancel, clear out current selections
for redisplay */
for_each_icon(temp_i_con) {
dev = (struct ipr_dev *)temp_i_con->data;
input = temp_i_con->field_data;
if (dev && (strcmp(input, "1") == 0))
dev->dev_rcd->issue_cmd = 0;
}
rc = REFRESH_FLAG;
continue;
} else {
s_status.index = INVALID_OPTION_STATUS;
rc = REFRESH_FLAG;
}
} while (rc & REFRESH_FLAG);
leave:
i_con2 = free_i_con(i_con2);
i_con_head = i_con_head_saved;
for (k = 0; k < 2; k++) {
free(buffer[k]);
buffer[k] = NULL;
}
n_configure_raid_start.body = NULL;
return rc;
}
/**
* display_input -
* @field_start_row:
* @userprt:
*
* Returns:
* 0 if success / non-zero on failure
**/
int display_input(int field_start_row, int *userptr)
{
FIELD *input_fields[3];
FORM *form;
WINDOW *box1_win, *field_win;
int field_rows = 2;
int field_cols = 16;
char *input;
int ch;
int rc = RC_SUCCESS;
input_fields[0] = new_field(1, 16, 0, 0, 0, 0);
input_fields[1] = new_field(1, 3, 1, 0, 0, 0);
input_fields[2] = NULL;
set_field_buffer(input_fields[0],0, "Enter new value");
field_opts_off(input_fields[0], O_ACTIVE);
field_opts_off(input_fields[0], O_EDIT);
box1_win = newwin(field_rows + 2, field_cols + 2, field_start_row - 1, 54);
field_win = newwin(field_rows, field_cols, field_start_row, 55);
box(box1_win,ACS_VLINE,ACS_HLINE);
form = new_form(input_fields);
set_current_field(form, input_fields[1]);
set_form_win(form,field_win);
set_form_sub(form,field_win);
post_form(form);
form_driver(form, REQ_FIRST_FIELD);
wnoutrefresh(box1_win);
while (1) {
wnoutrefresh(field_win);
doupdate();
ch = getch();
if (IS_ENTER_KEY(ch)) {
form_driver(form,REQ_VALIDATION);
input = field_buffer(input_fields[1],0);
sscanf(input, "%d",userptr);
break;
} else if (IS_EXIT_KEY(ch)) {
rc = EXIT_FLAG;
break;
} else if (IS_CANCEL_KEY(ch)) {
rc = CANCEL_FLAG;
break;
} else if (isascii(ch))
form_driver(form, ch);
}
wclear(field_win);
wrefresh(field_win);
delwin(field_win);
wclear(box1_win);
wrefresh(box1_win);
delwin(box1_win);
return rc;
}
/**
* configure_raid_parameters -
* @i_con: i_container struct
*
* Returns:
* 0 if success / non-zero on failure
**/
int configure_raid_parameters(i_container *i_con)
{
FIELD *input_fields[6];
FIELD *cur_field;
FORM *form;
ITEM **raid_item = NULL;
struct array_cmd_data *cur_raid_cmd = (struct array_cmd_data *)(i_con->data);
int raid_index_default;
unsigned long raid_index = 0;
unsigned long index;
char buffer[24];
int rc, i;
struct ipr_ioa *ioa;
struct ipr_dev *dev;
struct ipr_supported_arrays *supported_arrays;
struct ipr_array_cap_entry *cap_entry;
struct text_str
{
char line[16];
} *raid_menu_str = NULL, *stripe_menu_str = NULL;
char *cache_pols[] = {"Write Through", "Write Back"};
ITEM *cache_prot_item[ARRAY_SIZE(cache_pols) + 1];
char raid_str[16], stripe_str[16], qdepth_str[4], *cache_prot_str;
int ch, start_row;
int cur_field_index;
int selected_count = 0, ssd_num = 0, hdd_num = 0;
int stripe_sz, stripe_sz_mask, stripe_sz_list[16];
struct prot_level *prot_level_list;
int *userptr = NULL;
int *retptr;
int max_x,max_y,start_y,start_x;
int qdepth, new_qdepth, max_qdepth;
int cache_prot;
getmaxyx(stdscr,max_y,max_x);
getbegyx(stdscr,start_y,start_x);
rc = RC_SUCCESS;
ioa = cur_raid_cmd->ioa;
supported_arrays = ioa->supported_arrays;
cap_entry = supported_arrays->entry;
/* determine number of devices selected for this parity set */
for_each_af_dasd(ioa, dev) {
if (dev->dev_rcd->issue_cmd) {
selected_count++;
if (dev->block_dev_class & IPR_SSD)
ssd_num++;
else
hdd_num++;
}
}
max_qdepth = ipr_max_queue_depth(ioa, selected_count, ssd_num);
if (ioa->sis64)
qdepth = selected_count * 16;
else
qdepth = selected_count * 4;
cur_raid_cmd->qdepth = qdepth;
/* set up raid lists */
raid_index = 0;
raid_index_default = -1;
prot_level_list = malloc(sizeof(struct prot_level));
prot_level_list[raid_index].is_valid = 0;
for_each_cap_entry(cap_entry, supported_arrays) {
if (selected_count <= cap_entry->max_num_array_devices &&
selected_count >= cap_entry->min_num_array_devices &&
((selected_count % cap_entry->min_mult_array_devices) == 0)) {
if (cap_entry->min_num_per_tier &&
(ssd_num < cap_entry->min_num_per_tier ||
hdd_num < cap_entry->min_num_per_tier))
continue;
prot_level_list[raid_index].array_cap_entry = cap_entry;
prot_level_list[raid_index].is_valid = 1;
if (raid_index_default == -1 &&
!strcmp((char *)cap_entry->prot_level_str, "10"))
raid_index_default = raid_index;
else if (!strcmp((char *)cap_entry->prot_level_str, IPR_DEFAULT_RAID_LVL))
raid_index_default = raid_index;
raid_index++;
prot_level_list = realloc(prot_level_list, sizeof(struct prot_level) * (raid_index + 1));
prot_level_list[raid_index].is_valid = 0;
}
}
if (!raid_index)
return 69 | EXIT_FLAG;
if (raid_index_default == -1)
raid_index_default = 0;
/* Title */
input_fields[0] = new_field(1, max_x - start_x, /* new field size */
0, 0, /* upper left corner */
0, /* number of offscreen rows */
0); /* number of working buffers */
/* Protection Level */
input_fields[1] = new_field(1, 9, /* new field size */
8, 44, /* */
0, /* number of offscreen rows */
0); /* number of working buffers */
/* Stripe Size */
input_fields[2] = new_field(1, 9, /* new field size */
9, 44, /* */
0, /* number of offscreen rows */
0); /* number of working buffers */
/* Queue depth */
input_fields[3] = new_field(1, 3, /* new field size */
10, 44, /* */
0, /* number of offscreen rows */
0); /* number of working buffers */
if (ioa->vset_write_cache) {
/* Sync Cache protection */
input_fields[4] = new_field(1, 13, /* new field size */
11, 44, /* */
0, /* number of offscreen rows */
0); /* number of working buffers */
cache_prot = IPR_DEV_CACHE_WRITE_BACK;
set_field_just(input_fields[4], JUSTIFY_LEFT);
field_opts_off(input_fields[4], O_EDIT);
} else {
input_fields [4] = NULL;
}
input_fields[5] = NULL;
raid_index = raid_index_default;
cap_entry = prot_level_list[raid_index].array_cap_entry;
stripe_sz = ntohs(cap_entry->recommended_stripe_size);
form = new_form(input_fields);
set_current_field(form, input_fields[1]);
set_field_just(input_fields[0], JUSTIFY_CENTER);
set_field_just(input_fields[3], JUSTIFY_LEFT);
field_opts_off(input_fields[0], O_ACTIVE);
field_opts_off(input_fields[1], O_EDIT);
field_opts_off(input_fields[2], O_EDIT);
field_opts_off(input_fields[3], O_EDIT);
set_field_buffer(input_fields[0], /* field to alter */
0, /* number of buffer to alter */
_("Select Protection Level and Stripe Size")); /* string value to set */
form_opts_off(form, O_BS_OVERLOAD);
flush_stdscr();
clear();
set_form_win(form,stdscr);
set_form_sub(form,stdscr);
post_form(form);
mvaddstr(2, 1, _("Default array configurations are shown. To change"));
mvaddstr(3, 1, _("setting hit \"c\" for options menu. Highlight desired"));
mvaddstr(4, 1, _("option then hit Enter"));
mvaddstr(6, 1, _("c=Change Setting"));
mvaddstr(8, 0, "Protection Level . . . . . . . . . . . . :");
mvaddstr(9, 0, "Stripe Size . . . . . . . . . . . . . . :");
mvprintw(10, 0, "Queue Depth (default = %3d)(max = %3d) . :", qdepth, max_qdepth);
if (ioa->vset_write_cache)
mvprintw(11, 0, "Array Write Cache Policy . . . . . . . . :");
mvaddstr(max_y - 4, 0, _("Press Enter to Continue"));
mvaddstr(max_y - 2, 0, EXIT_KEY_LABEL CANCEL_KEY_LABEL);
form_driver(form, /* form to pass input to */
REQ_FIRST_FIELD ); /* form request code */
while (1) {
sprintf(raid_str,"RAID %s",cap_entry->prot_level_str);
set_field_buffer(input_fields[1], /* field to alter */
0, /* number of buffer to alter */
raid_str); /* string value to set */
if (stripe_sz > 1024)
sprintf(stripe_str,"%d M",stripe_sz/1024);
else
sprintf(stripe_str,"%d k",stripe_sz);
set_field_buffer(input_fields[2], /* field to alter */
0, /* number of buffer to alter */
stripe_str); /* string value to set */
sprintf(qdepth_str,"%3d",qdepth);
set_field_buffer(input_fields[3], /* field to alter */
0, /* number of buffer to alter */
qdepth_str); /* string value to set */
if (ioa->vset_write_cache) {
cache_prot_str = cache_pols[cache_prot];
set_field_buffer(input_fields[4], /* field to alter */
0, /* number of buffer to alter */
cache_prot_str); /* string value to set */
}
refresh();
ch = getch();
if (IS_EXIT_KEY(ch)) {
rc = EXIT_FLAG;
goto leave;
} else if (IS_CANCEL_KEY(ch)) {
rc = CANCEL_FLAG;
goto leave;
} else if (ch == 'c') {
cur_field = current_field(form);
cur_field_index = field_index(cur_field);
if (cur_field_index == 1) {
/* count the number of valid entries */
index = 0;
while (prot_level_list[index].is_valid)
index++;
/* get appropriate memory, the text portion needs to be
done up front as the new_item() function uses the
passed pointen to display data */
raid_item = realloc(raid_item, sizeof(ITEM **) * (index + 1));
raid_menu_str = realloc(raid_menu_str, sizeof(struct text_str) * (index));
userptr = realloc(userptr, sizeof(int) * (index + 1));
/* set up protection level menu */
index = 0;
while (prot_level_list[index].is_valid) {
raid_item[index] = (ITEM *)NULL;
sprintf(raid_menu_str[index].line,"RAID %s",prot_level_list[index].array_cap_entry->prot_level_str);
raid_item[index] = new_item(raid_menu_str[index].line,"");
userptr[index] = index;
set_item_userptr(raid_item[index],
(char *)&userptr[index]);
index++;
}
raid_item[index] = (ITEM *)NULL;
start_row = 8;
rc = display_menu(raid_item, start_row, index, &retptr);
if (rc == RC_SUCCESS) {
raid_index = *retptr;
/* find recommended stripe size */
cap_entry = prot_level_list[raid_index].array_cap_entry;
stripe_sz = ntohs(cap_entry->recommended_stripe_size);
}
} else if (cur_field_index == 2) {
/* count the number of valid entries */
index = 0;
for (i = 0; i < 16; i++) {
stripe_sz_mask = 1 << i;
if ((stripe_sz_mask & ntohs(cap_entry->supported_stripe_sizes))
== stripe_sz_mask) {
index++;
}
}
/* get appropriate memory, the text portion needs to be
done up front as the new_item() function uses the
passed pointen to display data */
raid_item = realloc(raid_item, sizeof(ITEM **) * (index + 1));
stripe_menu_str = realloc(stripe_menu_str, sizeof(struct text_str) * (index));
userptr = realloc(userptr, sizeof(int) * (index + 1));
/* set up stripe size menu */
index = 0;
for (i = 0; i < 16; i++) {
stripe_sz_mask = 1 << i;
raid_item[index] = (ITEM *)NULL;
if ((stripe_sz_mask & ntohs(cap_entry->supported_stripe_sizes))
== stripe_sz_mask) {
stripe_sz_list[index] = stripe_sz_mask;
if (stripe_sz_mask > 1024)
sprintf(stripe_menu_str[index].line,"%d M",stripe_sz_mask/1024);
else
sprintf(stripe_menu_str[index].line,"%d k",stripe_sz_mask);
if (stripe_sz_mask == ntohs(cap_entry->recommended_stripe_size)) {
sprintf(buffer,_("%s - recommend"),stripe_menu_str[index].line);
raid_item[index] = new_item(buffer, "");
} else {
raid_item[index] = new_item(stripe_menu_str[index].line, "");
}
userptr[index] = index;
set_item_userptr(raid_item[index],
(char *)&userptr[index]);
index++;
}
}
raid_item[index] = (ITEM *)NULL;
start_row = 9;
rc = display_menu(raid_item, start_row, index, &retptr);
if (rc == RC_SUCCESS)
stripe_sz = stripe_sz_list[*retptr];
} else if (cur_field_index == 3) {
start_row = 10;
rc = display_input(start_row, &new_qdepth);
if (rc == EXIT_FLAG)
goto leave;
if (rc == CANCEL_FLAG)
continue;
qdepth = (new_qdepth < max_qdepth)? new_qdepth:max_qdepth;
continue;
} else if (cur_field_index == 4 && ioa->vset_write_cache) {
userptr = realloc(userptr,
(sizeof(int) *
(ARRAY_SIZE(cache_pols) + 1)));
for (index = 0; index < ARRAY_SIZE(cache_pols);
index++) {
cache_prot_item[index] =
new_item(cache_pols[index], "");
userptr[index] = index;
set_item_userptr(cache_prot_item[index],
(char *)&userptr[index]);
}
cache_prot_item[index] = (ITEM *) NULL;
start_row = 8;
rc = display_menu(cache_prot_item, start_row,
index, &retptr);
if (rc == RC_SUCCESS) {
cache_prot = *retptr;
}
for (index = 0; index < ARRAY_SIZE(cache_pols);
index++)
free_item(cache_prot_item[index]);
if (rc == EXIT_FLAG)
goto leave;
continue;
} else
continue;
i = 0;
while (raid_item[i] != NULL)
free_item(raid_item[i++]);
free(raid_item);
raid_item = NULL;
if (rc == EXIT_FLAG)
goto leave;
} else if (IS_ENTER_KEY(ch)) {
/* set protection level and stripe size appropriately */
cur_raid_cmd->prot_level = cap_entry->prot_level;
cur_raid_cmd->stripe_size = stripe_sz;
cur_raid_cmd->qdepth = qdepth;
if (ioa->vset_write_cache)
cur_raid_cmd->vset_cache = cache_prot;
goto leave;
} else if (ch == KEY_RIGHT)
form_driver(form, REQ_NEXT_CHAR);
else if (ch == KEY_LEFT)
form_driver(form, REQ_PREV_CHAR);
else if ((ch == KEY_BACKSPACE) || (ch == 127))
form_driver(form, REQ_DEL_PREV);
else if (ch == KEY_DC)
form_driver(form, REQ_DEL_CHAR);
else if (ch == KEY_IC)
form_driver(form, REQ_INS_MODE);
else if (ch == KEY_EIC)
form_driver(form, REQ_OVL_MODE);
else if (ch == KEY_HOME)
form_driver(form, REQ_BEG_FIELD);
else if (ch == KEY_END)
form_driver(form, REQ_END_FIELD);
else if (ch == '\t')
form_driver(form, REQ_NEXT_FIELD);
else if (ch == KEY_UP)
form_driver(form, REQ_PREV_FIELD);
else if (ch == KEY_DOWN)
form_driver(form, REQ_NEXT_FIELD);
else if (isascii(ch))
form_driver(form, ch);
}
leave:
unpost_form(form);
free_form(form);
free_screen(NULL, NULL, input_fields);
flush_stdscr();
return rc;
}
/**
* confirm_raid_start -
* @i_con: i_container struct
*
* Returns:
* 0 if success / non-zero on failure
**/
int confirm_raid_start(i_container *i_con)
{
struct array_cmd_data *cur_raid_cmd;
struct ipr_ioa *ioa;
int rc, k;
char *buffer[2];
struct ipr_dev *dev;
int header_lines;
int toggle = 0;
struct screen_output *s_out;
int is_ri_count = 0, non_ri_count = 0;
rc = RC_SUCCESS;
body_init_status(buffer, n_confirm_raid_start.header, &header_lines);
for_each_raid_cmd(cur_raid_cmd) {
if (cur_raid_cmd->do_cmd) {
ioa = cur_raid_cmd->ioa;
print_dev(k, cur_raid_cmd->dev, buffer, "1", k);
for_each_af_dasd(ioa, dev) {
if (dev->dev_rcd->issue_cmd) {
print_dev(k, dev, buffer, "1", k);
if (dev->block_dev_class & IPR_SSD) {
if (dev->read_intensive & IPR_RI)
is_ri_count++;
else
non_ri_count++;
}
}
}
}
}
if (is_ri_count > 0 && non_ri_count > 0) {
rc = RC_95_Mixed_RISSD_SSDs;
return rc;
}
toggle_field = 0;
do {
n_confirm_raid_start.body = buffer[toggle&1];
s_out = screen_driver(&n_confirm_raid_start, header_lines, NULL);
rc = s_out->rc;
free(s_out);
toggle++;
} while (rc == TOGGLE_SCREEN);
for (k = 0; k < 2; k++) {
free(buffer[k]);
buffer[k] = NULL;
}
n_confirm_raid_start.body = NULL;
if (rc > 0)
return rc;
/* verify the devices are not in use */
for_each_raid_cmd(cur_raid_cmd) {
if (!cur_raid_cmd->do_cmd)
continue;
ioa = cur_raid_cmd->ioa;
rc = is_array_in_use(ioa, cur_raid_cmd->array_id);
if (rc != 0) {
/* "Start Parity Protection failed." */
rc = RC_19_Create_Fail;
syslog(LOG_ERR, _("Devices may have changed state. Command cancelled,"
" please issue commands again if RAID still desired %s.\n"),
ioa->ioa.gen_name);
return rc;
}
}
/* now issue the start array command */
for_each_raid_cmd(cur_raid_cmd) {
if (!cur_raid_cmd->do_cmd)
continue;
ioa = cur_raid_cmd->ioa;
rc = ipr_start_array_protection(ioa,
cur_raid_cmd->stripe_size,
cur_raid_cmd->prot_level);
if (rc)
return RC_19_Create_Fail;
}
rc = raid_start_complete();
return rc;
}
/**
* raid_start_complete -
*
* Returns:
* 0 if success / non-zero on failure
**/
int raid_start_complete()
{
struct ipr_cmd_status cmd_status;
struct ipr_cmd_status_record *status_record;
int done_bad;
int not_done = 0;
int retry = 1;
int timeout;
int rc;
u32 percent_cmplt = 0;
int device_available = 0;
int wait_device = 0;
int exit_now = 0;
struct ipr_ioa *ioa;
struct array_cmd_data *cur_raid_cmd;
struct ipr_dev *dev;
struct ipr_disk_attr attr;
while (1) {
rc = complete_screen_driver(&n_raid_start_complete, percent_cmplt, 1);
if ((rc & EXIT_FLAG) || exit_now) {
exit_now = 1;
if (device_available)
return EXIT_FLAG;
}
percent_cmplt = 100;
done_bad = 0;
not_done = 0;
for_each_raid_cmd(cur_raid_cmd) {
if (cur_raid_cmd->do_cmd == 0)
continue;
ioa = cur_raid_cmd->ioa;
rc = ipr_query_command_status(&ioa->ioa, &cmd_status);
if (rc) {
done_bad = 1;
continue;
}
for_each_cmd_status(status_record, &cmd_status) {
if ((status_record->command_code != IPR_START_ARRAY_PROTECTION) ||
(cur_raid_cmd->array_id != status_record->array_id))
continue;
if (!device_available &&
(status_record->resource_handle != IPR_IOA_RESOURCE_HANDLE)) {
timeout = 30;
while (retry && timeout) {
check_current_config(false);
dev = get_dev_from_handle(ioa, status_record->resource_handle);
if (dev && dev->scsi_dev_data) {
device_available = 1;
if (ipr_init_new_dev(dev)) {
sleep(1);
timeout--;
continue;
} else
retry = 0;
if (ipr_get_dev_attr(dev, &attr)) {
syslog(LOG_ERR,
_("Unable to read attributes when creating arrays"));
} else {
attr.queue_depth = cur_raid_cmd->qdepth;
attr.write_cache_policy = cur_raid_cmd->vset_cache;
if (ipr_set_dev_attr(dev, &attr, 1))
syslog(LOG_ERR,
_("Unable to set attributes when creating arrays"));
}
} else
break;
}
}
if (status_record->status == IPR_CMD_STATUS_IN_PROGRESS) {
if (status_record->percent_complete < percent_cmplt)
percent_cmplt = status_record->percent_complete;
not_done = 1;
} else if (status_record->status != IPR_CMD_STATUS_SUCCESSFUL) {
done_bad = 1;
if (status_record->status == IPR_CMD_STATUS_MIXED_BLK_DEV_CLASESS) {
syslog(LOG_ERR, _("Start parity protect to %s failed. "
"SSDs and HDDs can not be mixed in an array.\n"),
ioa->ioa.gen_name);
rc = RC_22_Mixed_Block_Dev_Classes;
} else if (status_record->status == IPR_CMD_STATUS_MIXED_LOG_BLK_SIZE) {
syslog(LOG_ERR, _("Start parity protect to %s failed. "
"non 4K disks and 4K disks can not be mixed in an array.\n"),
ioa->ioa.gen_name);
rc = RC_91_Mixed_Logical_Blk_Size;
} else if (status_record->status == IPR_CMD_STATUS_UNSUPT_REQ_BLK_DEV_CLASS) {
syslog(LOG_ERR, _("Start parity protect to %s failed. "
"These device contained a conmination of block device class filed that was not supported in an array.\n"),
ioa->ioa.gen_name);
rc = RC_92_UNSUPT_REQ_BLK_DEV_CLASS;
} else {
syslog(LOG_ERR, _("Start parity protect to %s failed. "
"Check device configuration for proper format.\n"),
ioa->ioa.gen_name);
rc = RC_FAILED;
}
} else if (!(device_available)) {
wait_device++;
/* if device did not show up after
parity set created, allow exit */
if (wait_device == 20)
syslog(LOG_ERR, _("Unable to set queue_depth"));
else
not_done = 1;
}
break;
}
}
if (!not_done) {
flush_stdscr();
if (done_bad) {
if (status_record->status == IPR_CMD_STATUS_MIXED_BLK_DEV_CLASESS)
return RC_22_Mixed_Block_Dev_Classes;
if (status_record->status == IPR_CMD_STATUS_MIXED_LOG_BLK_SIZE)
return RC_91_Mixed_Logical_Blk_Size;
if (status_record->status == IPR_CMD_STATUS_UNSUPT_REQ_BLK_DEV_CLASS)
return RC_92_UNSUPT_REQ_BLK_DEV_CLASS;
/* Start Parity Protection failed. */
return RC_19_Create_Fail;
}
format_done = 1;
check_current_config(false);
/* Start Parity Protection completed successfully */
return RC_18_Array_Created;
}
not_done = 0;
sleep(1);
}
}
/**
* raid_rebuild -
* @i_con: i_container struct
*
* Returns:
* 0 if success / non-zero on failure
**/
int raid_rebuild(i_container *i_con)
{
int rc, k;
int found = 0;
struct ipr_dev *dev;
char *buffer[2];
struct ipr_ioa *ioa;
struct screen_output *s_out;
int header_lines;
int toggle=1;
processing();
i_con = free_i_con(i_con);
rc = RC_SUCCESS;
check_current_config(true);
body_init_status(buffer, n_raid_rebuild.header, &header_lines);
for_each_ioa(ioa) {
ioa->num_raid_cmds = 0;
for_each_af_dasd(ioa, dev) {
if (!dev->dev_rcd->rebuild_cand)
continue;
add_raid_cmd_tail(ioa, dev, 0);
i_con = add_i_con(i_con,"\0",raid_cmd_tail);
print_dev(k, dev, buffer, "%1", k);
enable_af(dev);
found++;
ioa->num_raid_cmds++;
}
}
if (!found) {
/* Start Device Parity Protection Failed */
n_raid_rebuild_fail.body = body_init(n_raid_rebuild_fail.header, NULL);
s_out = screen_driver(&n_raid_rebuild_fail, 0, NULL);
free(n_raid_rebuild_fail.body);
n_raid_rebuild_fail.body = NULL;
rc = s_out->rc;
free(s_out);
} else {
do {
n_raid_rebuild.body = buffer[toggle&1];
s_out = screen_driver(&n_raid_rebuild, header_lines, i_con);
rc = s_out->rc;
free(s_out);
toggle++;
} while (rc == TOGGLE_SCREEN);
free_raid_cmds();
}
for (k = 0; k < 2; k++) {
free(buffer[k]);
buffer[k] = NULL;
}
n_raid_rebuild.body = NULL;
return rc;
}
/**
* confirm_raid_rebuild -
* @i_con: i_container struct
*
* Returns:
*
**/
int confirm_raid_rebuild(i_container *i_con)
{
struct array_cmd_data *cur_raid_cmd;
struct ipr_ioa *ioa;
int rc;
char *buffer[2];
int found = 0;
char *input;
int k;
int header_lines;
int toggle=1;
i_container *temp_i_con;
struct screen_output *s_out;
for_each_icon(temp_i_con) {
cur_raid_cmd = (struct array_cmd_data *)temp_i_con->data;
if (!cur_raid_cmd)
continue;
input = temp_i_con->field_data;
if (strcmp(input, "1") == 0) {
cur_raid_cmd->do_cmd = 1;
if (cur_raid_cmd->dev->dev_rcd)
cur_raid_cmd->dev->dev_rcd->issue_cmd = 1;
found++;
} else {
cur_raid_cmd->do_cmd = 0;
if (cur_raid_cmd->dev->dev_rcd)
cur_raid_cmd->dev->dev_rcd->issue_cmd = 0;
}
}
if (!found)
return INVALID_OPTION_STATUS;
body_init_status(buffer, n_confirm_raid_rebuild.header, &header_lines);
for_each_raid_cmd(cur_raid_cmd) {
if (!cur_raid_cmd->do_cmd)
continue;
ioa = cur_raid_cmd->ioa;
print_dev(k, cur_raid_cmd->dev, buffer, "1", k);
}
do {
n_confirm_raid_rebuild.body = buffer[toggle&1];
s_out = screen_driver(&n_confirm_raid_rebuild, header_lines, NULL);
rc = s_out->rc;
free(s_out);
toggle++;
} while (rc == TOGGLE_SCREEN);
for (k = 0; k < 2; k++) {
free(buffer[k]);
buffer[k] = NULL;
}
n_confirm_raid_rebuild.body = NULL;
if (rc)
return rc;
for_each_ioa(ioa) {
if (ioa->num_raid_cmds == 0)
continue;
if ((rc = ipr_rebuild_device_data(ioa)))
/* Rebuild failed */
return (29 | EXIT_FLAG);
}
/* Rebuild started, view Parity Status Window for rebuild progress */
return (28 | EXIT_FLAG);
}
/**
* raid_resync_complete -
*
* Returns:
* EXIT_FLAG / 74 | EXIT_FLAG on success / 73 | EXIT_FLAG otherwise
**/
static int raid_resync_complete()
{
struct ipr_cmd_status cmd_status;
struct ipr_cmd_status_record *status_record;
int done_bad;
int not_done = 0;
int rc;
u32 percent_cmplt = 0;
struct ipr_ioa *ioa;
struct array_cmd_data *cur_raid_cmd;
while (1) {
rc = complete_screen_driver(&n_raid_resync_complete, percent_cmplt, 1);
if (rc & EXIT_FLAG)
return EXIT_FLAG;
percent_cmplt = 100;
done_bad = 0;
not_done = 0;
for_each_raid_cmd(cur_raid_cmd) {
if (cur_raid_cmd->do_cmd == 0)
continue;
ioa = cur_raid_cmd->ioa;
rc = ipr_query_command_status(&ioa->ioa, &cmd_status);
if (rc) {
done_bad = 1;
continue;
}
for_each_cmd_status(status_record, &cmd_status) {
if ((status_record->command_code != IPR_RESYNC_ARRAY_PROTECTION) ||
(cur_raid_cmd->array_id != status_record->array_id))
continue;
if (status_record->status == IPR_CMD_STATUS_IN_PROGRESS) {
if (status_record->percent_complete < percent_cmplt)
percent_cmplt = status_record->percent_complete;
not_done = 1;
} else if (status_record->status != IPR_CMD_STATUS_SUCCESSFUL) {
done_bad = 1;
syslog(LOG_ERR, _("Resync array to %s failed.\n"),
ioa->ioa.gen_name);
rc = RC_FAILED;
}
break;
}
}
if (!not_done) {
flush_stdscr();
if (done_bad)
/* Resync array failed. */
return (73 | EXIT_FLAG);
/* Resync completed successfully */
return (74 | EXIT_FLAG);
}
not_done = 0;
sleep(1);
}
}
/**
* raid_resync -
* @i_con: i_container struct
*
* Returns:
* 0 if success / non-zero on failure
**/
int raid_resync(i_container *i_con)
{
int rc, k;
int found = 0;
struct ipr_dev *dev, *array;
char *buffer[2];
struct ipr_ioa *ioa;
struct screen_output *s_out;
int header_lines;
int toggle=1;
processing();
i_con = free_i_con(i_con);
rc = RC_SUCCESS;
check_current_config(true);
body_init_status(buffer, n_raid_resync.header, &header_lines);
for_each_ioa(ioa) {
ioa->num_raid_cmds = 0;
for_each_array(ioa, array) {
if (!array->array_rcd->resync_cand)
continue;
dev = array;
add_raid_cmd_tail(ioa, dev, dev->array_id);
i_con = add_i_con(i_con, "\0", raid_cmd_tail);
print_dev(k, dev, buffer, "%1", 2+k);
found++;
ioa->num_raid_cmds++;
}
}
if (!found) {
/* Start Device Parity Protection Failed */
n_raid_resync_fail.body = body_init(n_raid_resync_fail.header, NULL);
s_out = screen_driver(&n_raid_resync_fail, 0, NULL);
free(n_raid_resync_fail.body);
n_raid_resync_fail.body = NULL;
rc = s_out->rc;
free(s_out);
} else {
do {
n_raid_resync.body = buffer[toggle&1];
s_out = screen_driver(&n_raid_resync, header_lines, i_con);
rc = s_out->rc;
free(s_out);
toggle++;
} while (rc == TOGGLE_SCREEN);
free_raid_cmds();
}
for (k = 0; k < 2; k++) {
free(buffer[k]);
buffer[k] = NULL;
}
n_raid_resync.body = NULL;
return rc;
}
/**
* confirm_raid_resync -
* @i_con: i_container struct
*
* Returns:
* EXIT_FLAG / 74 | EXIT_FLAG on success / 73 | EXIT_FLAG otherwise
* INVALID_OPTION_STATUS if nothing to process
**/
int confirm_raid_resync(i_container *i_con)
{
struct array_cmd_data *cur_raid_cmd;
struct ipr_ioa *ioa;
int rc;
char *buffer[2];
int found = 0;
char *input;
int k;
int header_lines;
int toggle=1;
i_container *temp_i_con;
struct screen_output *s_out;
for_each_icon(temp_i_con) {
cur_raid_cmd = (struct array_cmd_data *)temp_i_con->data;
if (!cur_raid_cmd)
continue;
input = temp_i_con->field_data;
if (strcmp(input, "1") == 0) {
cur_raid_cmd->do_cmd = 1;
if (cur_raid_cmd->dev->dev_rcd)
cur_raid_cmd->dev->dev_rcd->issue_cmd = 1;
found++;
} else {
cur_raid_cmd->do_cmd = 0;
if (cur_raid_cmd->dev->dev_rcd)
cur_raid_cmd->dev->dev_rcd->issue_cmd = 0;
}
}
if (!found)
return INVALID_OPTION_STATUS;
body_init_status(buffer, n_confirm_raid_resync.header, &header_lines);
for_each_raid_cmd(cur_raid_cmd) {
if (!cur_raid_cmd->do_cmd)
continue;
ioa = cur_raid_cmd->ioa;
print_dev(k, cur_raid_cmd->dev, buffer, "1", k);
}
do {
n_confirm_raid_resync.body = buffer[toggle&1];
s_out = screen_driver(&n_confirm_raid_resync, header_lines, NULL);
rc = s_out->rc;
free(s_out);
toggle++;
} while (rc == TOGGLE_SCREEN);
for (k = 0; k < 2; k++) {
free(buffer[k]);
buffer[k] = NULL;
}
n_confirm_raid_resync.body = NULL;
if (rc)
return rc;
for_each_ioa(ioa) {
if (ioa->num_raid_cmds == 0)
continue;
if ((rc = ipr_resync_array(ioa)))
return (73 | EXIT_FLAG);
}
return raid_resync_complete();
}
/**
* do_raid_migrate - Process the command line Migrate Array command. Check the
* arguments against the qac data to make sure that the
* migration is possible. Then issue the migrate command.
* @ioa: struct ipr_ioa
* @qac_data: query array config data
* @vset: struct ipr_dev
* @raid_level: new raid level
* @stripe_size: new stripe size
* @num_devs: number of devices to add
* @fd: file descriptor
*
* Returns:
* 0 if success / non-zero on failure
**/
int do_raid_migrate(struct ipr_ioa *ioa, struct ipr_array_query_data *qac_data,
struct ipr_dev *vset, char *raid_level, int stripe_size,
int num_devs, int fd)
{
int found = 0, rc = 0;
int enc_raid_level;
struct ipr_dev *dev = NULL;
struct sysfs_dev *sdev;
struct ipr_array_cap_entry *cap;
struct ipr_array_record *array_rcd;
struct ipr_dev_record *dev_rcd;
struct ipr_supported_arrays *supported_arrays = NULL;
/* check that the given raid level is valid */
for_each_supported_arrays_rcd(supported_arrays, qac_data) {
cap = get_cap_entry(supported_arrays, raid_level);
if (cap)
break;
}
if (!cap) {
fprintf(stderr, "RAID level %s is unsupported.\n", raid_level);
return -EINVAL;
}
enc_raid_level = cap->prot_level;
if (ioa->sis64)
vset = get_array_from_vset(ioa, vset);
/* loop through returned records - looking at array records */
for_each_array_rcd(array_rcd, qac_data) {
if (vset->resource_handle == ipr_get_arr_res_handle(ioa, array_rcd)) {
if (array_rcd->migrate_cand) {
array_rcd->issue_cmd = 1;
found = 1;
}
break;
}
}
/* device is valid, but array migration is not supported */
if (!found) {
fprintf(stderr, "Migrate array protection is not currently ");
fprintf(stderr, "possible on the %s device.\n", vset->gen_name);
return -EINVAL;
}
/* process stripe size */
if (stripe_size) {
/* is stripe size supported? */
if ((stripe_size & ntohs(cap->supported_stripe_sizes)) != stripe_size) {
fprintf(stderr, "Unsupported stripe size for ");
fprintf(stderr, "selected adapter. %d\n", stripe_size);
return -EINVAL;
}
} else
/* get current stripe size */
if (ioa->sis64)
stripe_size = ntohs(array_rcd->type3.stripe_size);
else
stripe_size = ntohs(array_rcd->type2.stripe_size);
/* if adding devices, check that there are a valid number of them */
if (cap->format_overlay_type == IPR_FORMAT_ADD_DEVICES) {
rc = raid_create_check_num_devs(cap, num_devs, 0);
if (rc != 0) {
fprintf(stderr,"Incorrect number of devices given.\n");
fprintf(stderr,"Minimum number of devices = %d\n",
cap->min_num_array_devices);
fprintf(stderr,"Maximum number of devices = %d\n",
cap->max_num_array_devices);
return rc;
}
}
/* if adding devs, verify them and set issue_cmd = 1 */
for_each_dev_rcd(dev_rcd, qac_data) {
if (num_devs == 0)
break;
/* check the given devices for migrate candidate status */
for (sdev = head_sdev; sdev; sdev = sdev->next) {
dev = ipr_sysfs_dev_to_dev(sdev);
if (ipr_get_dev_res_handle(ioa, dev_rcd) == dev->resource_handle) {
if (dev_rcd->migrate_array_prot_cand)
dev_rcd->issue_cmd = 1;
else {
fprintf(stderr, "%s is not available "
"for migrate array "
"protection\n", dev->gen_name);
return -EINVAL;
}
}
}
}
/* send command to adapter */
rc = ipr_migrate_array_protection(ioa, qac_data, fd, stripe_size, enc_raid_level);
return rc;
}
/**
* raid_migrate_cmd - Command line handler for Migrate Array command. Process
* the command arguments and prepare for do_raid_migrate().
* @args: argument vector
* @num_args: number of arguments
*
* Returns:
* 0 if success / non-zero on failure
**/
static int raid_migrate_cmd(char **args, int num_args)
{
int i, fd, rc = 0;
int next_raid_level = 0, raid_level_set = 0;
int next_stripe_size = 0;
int stripe_size = 0;
int num_devs = 0;
char *raid_level = IPR_DEFAULT_RAID_LVL;
struct ipr_dev *dev = NULL, *vset = NULL;
struct ipr_ioa *ioa = NULL;
struct ipr_array_query_data qac_data;
memset(&qac_data, 0, sizeof(qac_data));
for (i = 0; i < num_args; i++) {
if (strcmp(args[i], "-r") == 0)
next_raid_level = 1;
else if (strcmp(args[i], "-s") == 0)
next_stripe_size = 1;
else if (next_raid_level) {
next_raid_level = 0;
raid_level_set = 1;
raid_level = args[i];
} else if (next_stripe_size) {
next_stripe_size = 0;
stripe_size = strtoul(args[i], NULL, 10);
} else {
dev = find_dev(args[i]);
if (!dev) {
fprintf(stderr, "Cannot find %s\n", args[i]);
return -EINVAL;
}
if (ipr_is_volume_set(dev)) {
if (vset) {
fprintf(stderr, "Invalid parameters. "
"Only one disk "
"array can be specified.\n");
return -EINVAL;
}
vset = dev;
ioa = vset->ioa;
continue;
}
if (!ipr_is_af_dasd_device(dev)) {
fprintf(stderr, "Invalid device specified. "
"Device must be formatted "
"to Advanced Function Format.\n");
return -EINVAL;
} else {
/* keep track of these */
num_devs++;
ipr_add_sysfs_dev(dev, &head_sdev, &tail_sdev);
}
}
}
if (vset == NULL) {
fprintf(stderr, "No RAID device specified\n");
return -EINVAL;
}
if (!raid_level_set) {
fprintf(stderr, "No RAID level specified\n");
return -EINVAL;
}
/* lock the ioa device */
fd = open_and_lock(ioa->ioa.gen_name);
if (fd <= 1)
return -EIO;
/* query array configuration for volume set migrate status */
rc = __ipr_query_array_config(ioa, fd, 0, 0, 1, vset->array_id, &qac_data);
if (rc != 0) {
fprintf(stderr, "Array query failed. rc = %d\n", rc);
close(fd);
return -EINVAL;
}
/* Check arguments against the qac data and issue the migrate command */
rc = do_raid_migrate(ioa, &qac_data, vset, raid_level, stripe_size, num_devs, fd);
close(fd);
return rc;
}
/**
* raid_migrate_complete - Display a status screen showing the command
* completion percentage.
*
* Returns:
* 0 if success / non-zero on failure
**/
int raid_migrate_complete()
{
struct ipr_cmd_status cmd_status;
struct ipr_cmd_status_record *status_record;
int done_bad;
int not_done = 0;
int rc;
u32 percent_cmplt = 0;
int device_available = 0;
int exit_now = 0;
struct ipr_ioa *ioa;
struct array_cmd_data *cur_raid_cmd;
struct ipr_dev *dev;
ENTER;
while (1) {
rc = complete_screen_driver(&n_raid_migrate_complete, percent_cmplt, 1);
if (rc & EXIT_FLAG || exit_now) {
exit_now = 1;
if (device_available)
return EXIT_FLAG;
}
percent_cmplt = 100;
done_bad = 0;
not_done = 0;
for_each_raid_cmd(cur_raid_cmd) {
if (cur_raid_cmd->do_cmd == 0)
continue;
ioa = cur_raid_cmd->ioa;
rc = ipr_query_command_status(&ioa->ioa, &cmd_status);
if (rc) {
done_bad = 1;
continue;
}
for_each_cmd_status(status_record, &cmd_status) {
if ((status_record->command_code != IPR_MIGRATE_ARRAY_PROTECTION) ||
(cur_raid_cmd->array_id != status_record->array_id))
continue;
if (!device_available &&
(status_record->resource_handle != IPR_IOA_RESOURCE_HANDLE)) {
check_current_config(false);
dev = get_dev_from_handle(ioa, status_record->resource_handle);
if (dev && dev->scsi_dev_data)
device_available = 1;
}
if (status_record->status == IPR_CMD_STATUS_IN_PROGRESS) {
if (status_record->percent_complete < percent_cmplt)
percent_cmplt = status_record->percent_complete;
not_done = 1;
} else if (status_record->status != IPR_CMD_STATUS_SUCCESSFUL) {
done_bad = 1;
ioa_err(ioa, "Migrate array protection failed.\n");
rc = RC_FAILED;
} else if (!device_available)
not_done = 1;
break;
}
}
if (!not_done) {
flush_stdscr();
if (done_bad)
/* Migrate Array Protection failed. */
return RC_80_Migrate_Prot_Fail;
check_current_config(false);
/* Migrate Array Protection completed successfully */
LEAVE;
return RC_79_Migrate_Prot_Success;
}
not_done = 0;
sleep(1);
}
}
/**
* confirm_raid_migrate - Confirm that the migration choices are correct.
* @i_con: i_container struct
*
* Returns:
* 0 if success / non-zero on failure
**/
int confirm_raid_migrate()
{
struct array_cmd_data *cur_raid_cmd;
int rc, k;
char *buffer[2];
struct screen_output *s_out;
int toggle = 1;
int header_lines;
ENTER;
body_init_status(buffer, n_confirm_raid_migrate.header, &header_lines);
/* Display the array being migrated. Also display any disks if
they are required for the migration. */
for_each_raid_cmd(cur_raid_cmd) {
if (!cur_raid_cmd->do_cmd)
continue;
print_dev(k, cur_raid_cmd->dev, buffer, "1", 2+k);
}
rc = RC_SUCCESS;
toggle_field = 0;
do {
n_confirm_raid_migrate.body = buffer[toggle&1];
s_out = screen_driver(&n_confirm_raid_migrate, header_lines, NULL);
rc = s_out->rc;
free(s_out);
toggle++;
} while (rc == TOGGLE_SCREEN);
for (k = 0; k < 2; k++) {
free(buffer[k]);
buffer[k] = NULL;
}
n_confirm_raid_migrate.body = NULL;
LEAVE;
return rc;
}
/**
* choose_migrate_disks - Choose the additional disks required for migration.
* @ioa:
* @qac: i_query_array_data struct
* @cap_entry:
*
* Returns:
* 0 if success / non-zero on failure
**/
int choose_migrate_disks(struct ipr_ioa *ioa, struct ipr_array_query_data *qac,
struct ipr_array_cap_entry *cap_entry)
{
struct array_cmd_data *tmp_raid_cmd;
struct ipr_dev_record *dev_rcd;
struct ipr_dev *dev;
i_container *dev_i_con, *temp_i_con;
int rc, min, max, mult;
int k = 0;
char *buffer[2];
char info[256];
int header_lines = 0;
struct screen_output *s_out;
int toggle = 0;
int found = 0;
char *input;
ENTER;
min = cap_entry->min_num_array_devices;
max = cap_entry->max_num_array_devices;
mult = cap_entry->min_mult_array_devices;
sprintf(info, _("A minimum of %d disks must be selected.\n"), min);
buffer[0] = add_string_to_body(NULL, info, "", &header_lines);
buffer[1] = add_string_to_body(NULL, info, "", &header_lines);
sprintf(info, _("A maximum of %d disks must be selected.\n"), max);
buffer[0] = add_string_to_body(buffer[0], info, "", &header_lines);
buffer[1] = add_string_to_body(buffer[1], info, "", &header_lines);
sprintf(info, _("The number of disks selected must be a multiple of %d.\n\n"), mult);
buffer[0] = add_string_to_body(buffer[0], info, "", &header_lines);
buffer[1] = add_string_to_body(buffer[1], info, "", &header_lines);
buffer[0] = status_header(buffer[0], &header_lines, 0);
buffer[1] = status_header(buffer[1], &header_lines, 1);
/* Ensure i_con_head gets set to the head of the
disk candidate list in add_i_con() */
dev_i_con = NULL;
for_each_dev_rcd(dev_rcd, qac) {
if (!dev_rcd->migrate_array_prot_cand)
continue;
dev = get_dev_from_handle(ioa, ipr_get_dev_res_handle(ioa, dev_rcd));
if (dev) {
print_dev(k, dev, buffer, "%1", 2);
add_raid_cmd_tail(NULL, dev, 0);
/* Add disk candidates to the i_con list. */
dev_i_con = add_i_con(dev_i_con, "\0", raid_cmd_tail);
}
}
do {
toggle_field = 0;
do {
n_raid_migrate_add_disks.body = buffer[toggle&1];
/* select disks to use */
s_out = screen_driver(&n_raid_migrate_add_disks, header_lines, NULL);
rc = s_out->rc;
free(s_out);
toggle++;
} while (rc == TOGGLE_SCREEN);
if (rc)
break;
found = 0;
/* Loop through, count the selected devices and
* set the do_cmd flag. */
for_each_icon(temp_i_con) {
tmp_raid_cmd = temp_i_con->data;
input = temp_i_con->field_data;
if (strcmp(input, "1") == 0) {
found++;
tmp_raid_cmd->do_cmd = 1;
}
}
if (found) {
rc = raid_create_check_num_devs(cap_entry, found, 1);
if (rc == 0)
break;
if (rc == RC_77_Too_Many_Disks) {
s_status.num = cap_entry->max_num_array_devices;
s_status.index = RC_77_Too_Many_Disks;
}
if (rc == RC_78_Too_Few_Disks) {
s_status.num = cap_entry->min_num_array_devices;
s_status.index = RC_78_Too_Few_Disks;
}
if (rc == RC_25_Devices_Multiple) {
s_status.num = cap_entry->min_mult_array_devices;
s_status.index = RC_25_Devices_Multiple;
}
/* clear the do_cmd flag */
for_each_icon(temp_i_con) {
tmp_raid_cmd = (struct array_cmd_data *)temp_i_con->data;
input = temp_i_con->field_data;
if (tmp_raid_cmd && strcmp(input, "1") == 0)
tmp_raid_cmd->do_cmd = 0;
}
}
rc = REFRESH_FLAG;
} while (rc & REFRESH_FLAG);
LEAVE;
return rc;
}
/**
* do_ipr_migrate_array_protection - Migrate array protection for an array
* @array_i_con: i_container for selected array
* @ioa: ipr ioa struct
* @qac_data: struct ipr_array_query_data
* @stripe_size: new or existing stripe size for array
* @prot_level: new protection (RAID) level for array
* @array_id: array id
*
* Returns:
* 0 if success / non-zero on failure
**/
int do_ipr_migrate_array_protection(i_container *array_i_con, struct ipr_ioa *ioa,
struct ipr_array_query_data *qac,
int stripe_size, int prot_level, u8 array_id)
{
int fd, rc;
i_container *temp_i_con;
struct array_cmd_data *acd;
struct ipr_array_record *array_rcd;
struct ipr_dev_record *dev_rcd;
struct ipr_array_query_data new_qac;
char *input;
ENTER;
/* Now that we have the selected array, lock the ioa
* device, then issue another query to make sure that
* the adapter's version of the QAC data matches what
* we are processing. */
fd = open_and_lock(ioa->ioa.gen_name);
if (fd <= 1)
return fd;
rc = __ipr_query_array_config(ioa, fd, 0, 0, 1, array_id, &new_qac);
if (rc) {
close(fd);
return rc;
}
/* Set the "do it" bit for the select disks if needed. */
for_each_icon(temp_i_con) {
acd = temp_i_con->data;
input = temp_i_con->field_data;
if (acd && strcmp(input, "1") == 0)
for_each_dev_rcd(dev_rcd, &new_qac)
if (acd->dev->resource_handle == ipr_get_dev_res_handle(ioa, dev_rcd))
dev_rcd->issue_cmd = 1;
}
/* get the array command data and associated data from the data field
of the passed in array info container. */
acd = array_i_con->data;
/* Set the "do it" bit for the selected array. */
for_each_array_rcd(array_rcd, &new_qac)
if (acd->dev->resource_handle == ipr_get_arr_res_handle(ioa, array_rcd))
array_rcd->issue_cmd = 1;
rc = ipr_migrate_array_protection(ioa, &new_qac, fd, stripe_size, prot_level);
close(fd);
LEAVE;
return rc;
}
/**
* configure_raid_migrate - The array to migrate has been selected, now get the
* new RAID level.
* @array_i_con: i_container struct
*
* Returns:
* 0 if success / non-zero on failure
**/
int configure_raid_migrate(i_container *array_i_con)
{
FIELD *input_fields[3];
FIELD *cur_field;
FORM *form;
ITEM **raid_item = NULL;
struct array_cmd_data *cur_raid_cmd;
int raid_index_default = 0;
unsigned long raid_index = 0;
unsigned long index;
int rc, i;
struct ipr_ioa *ioa;
struct ipr_dev *dev;
struct ipr_array_query_data qac;
struct ipr_supported_arrays *supported_arrays;
struct ipr_array_cap_entry *cap_entry;
struct text_str
{
char line[16];
} *raid_menu_str = NULL;
char raid_str[16];
char dev_str[60];
int ch, start_row;
int cur_field_index;
struct prot_level *prot_level_list;
int *userptr = NULL;
int *retptr;
int max_x,max_y,start_y,start_x;
i_container *saved_i_con_head;
ENTER;
getmaxyx(stdscr,max_y,max_x);
getbegyx(stdscr,start_y,start_x);
/* get the array command data and associated data from the data field
of the passed in array info container. */
cur_raid_cmd = array_i_con->data;
ioa = cur_raid_cmd->ioa;
dev = cur_raid_cmd->dev;
/* Get the QAC data for the chosen array. */
rc = ipr_query_array_config(ioa, 0, 0, 1, cur_raid_cmd->array_id, &qac);
if (rc)
return RC_80_Migrate_Prot_Fail | EXIT_FLAG;
/* allows cancelling out if the user doesn't change the existing
protection level. */
rc = CANCEL_FLAG;
/* Save the current i_con_head, as it points to the list of array
candidates. We need to restore this before leaving this routine. */
saved_i_con_head = i_con_head;
i_con_head = NULL;
/* set up raid lists */
prot_level_list = malloc(sizeof(struct prot_level));
prot_level_list[raid_index].is_valid = 0;
for_each_supported_arrays_rcd(supported_arrays, &qac) {
for_each_cap_entry(cap_entry, supported_arrays) {
prot_level_list[raid_index].array_cap_entry = cap_entry;
prot_level_list[raid_index].is_valid = 1;
if (!strcmp((char *)cap_entry->prot_level_str, dev->prot_level_str))
raid_index_default = raid_index;
raid_index++;
prot_level_list = realloc(prot_level_list, sizeof(struct prot_level) * (raid_index + 1));
prot_level_list[raid_index].is_valid = 0;
}
}
if (!raid_index) {
/* We should never get here. */
free(prot_level_list);
scsi_err(dev, "The query data for the array indicate "
"that there are no supported RAID levels.\n");
return RC_80_Migrate_Prot_Fail | EXIT_FLAG;
}
/* Title */
input_fields[0] = new_field(1, max_x - start_x, /* new field size */
0, 0, /* upper left corner */
0, /* number of offscreen rows */
0); /* number of working buffers */
/* Protection Level */
input_fields[1] = new_field(1, 9, /* new field size */
8, 44, /* */
0, /* number of offscreen rows */
0); /* number of working buffers */
input_fields[2] = NULL;
raid_index = raid_index_default;
cap_entry = prot_level_list[raid_index].array_cap_entry;
form = new_form(input_fields);
set_current_field(form, input_fields[1]);
set_field_just(input_fields[0], JUSTIFY_CENTER);
field_opts_off(input_fields[0], O_ACTIVE);
field_opts_off(input_fields[1], O_EDIT);
set_field_buffer(input_fields[0], /* field to alter */
0, /* number of buffer to alter */
_("Select Protection Level")); /* string value to set */
form_opts_off(form, O_BS_OVERLOAD);
flush_stdscr();
clear();
set_form_win(form,stdscr);
set_form_sub(form,stdscr);
post_form(form);
mvaddstr(2, 1, _("Current RAID protection level is shown. To change"));
mvaddstr(3, 1, _("setting hit \"c\" for options menu. Highlight desired"));
mvaddstr(4, 1, _("option then hit Enter"));
mvaddstr(6, 1, _("c=Change Setting"));
sprintf(dev_str, "%s - Protection Level . . . . . . :", dev->dev_name);
mvaddstr(8, 0, dev_str);
mvaddstr(max_y - 4, 0, _("Press Enter to Continue"));
mvaddstr(max_y - 2, 0, EXIT_KEY_LABEL CANCEL_KEY_LABEL);
form_driver(form, /* form to pass input to */
REQ_FIRST_FIELD ); /* form request code */
sprintf(raid_str, "RAID %s", dev->prot_level_str);
while (1) {
set_field_buffer(input_fields[1], /* field to alter */
0, /* number of buffer to alter */
raid_str); /* string value to set */
refresh();
ch = getch();
if (IS_EXIT_KEY(ch)) {
rc = EXIT_FLAG;
break;
} else if (IS_CANCEL_KEY(ch)) {
rc = CANCEL_FLAG;
break;
} else if (ch == 'c') {
cur_field = current_field(form);
cur_field_index = field_index(cur_field);
if (cur_field_index == 1) {
/* count the number of valid entries */
index = 0;
while (prot_level_list[index].is_valid)
index++;
/* get appropriate memory, the text portion
needs to be done up front as the new_item()
function uses the passed pointen to display data */
raid_item = realloc(raid_item, sizeof(ITEM **) * (index + 1));
raid_menu_str = realloc(raid_menu_str, sizeof(struct text_str) * (index));
userptr = realloc(userptr, sizeof(int) * (index + 1));
/* set up protection level menu */
index = 0;
while (prot_level_list[index].is_valid) {
raid_item[index] = NULL;
cap_entry = prot_level_list[index].array_cap_entry;
sprintf(raid_menu_str[index].line,
"RAID %s", cap_entry->prot_level_str);
raid_item[index] = new_item(raid_menu_str[index].line,"");
userptr[index] = index;
set_item_userptr(raid_item[index],
(char *)&userptr[index]);
index++;
}
raid_item[index] = NULL;
start_row = 8;
/* select the desired new protection level */
rc = display_menu(raid_item, start_row, index, &retptr);
if (rc == RC_SUCCESS) {
raid_index = *retptr;
cap_entry = prot_level_list[raid_index].array_cap_entry;
sprintf(raid_str, "RAID %s", cap_entry->prot_level_str);
}
/* clean up */
for (i=0; raid_item[i] != NULL; i++)
free_item(raid_item[i]);
free(raid_item);
raid_item = NULL;
} else
continue;
} else if (IS_ENTER_KEY(ch)) {
/* don't change anything if Cancel or Exit */
if (rc != RC_SUCCESS)
break;
/* set protection level */
cur_raid_cmd->prot_level = cap_entry->prot_level;
/* are additional devices needed? */
if (cap_entry->format_overlay_type == IPR_FORMAT_ADD_DEVICES) {
rc = choose_migrate_disks(ioa, &qac, cap_entry);
if (rc)
break;
} else if (cap_entry->format_overlay_type != IPR_FORMAT_REMOVE_DEVICES) {
/* We should never get here. */
scsi_err(dev, "The capability entry for the array "
"does not have a valid overlay type.\n");
return RC_80_Migrate_Prot_Fail | EXIT_FLAG;
}
rc = confirm_raid_migrate();
if (rc)
break;
/* set up qac and send command to adapter */
rc = do_ipr_migrate_array_protection(array_i_con, ioa, &qac,
ntohs(dev->stripe_size),
cur_raid_cmd->prot_level,
cur_raid_cmd->array_id);
break;
} else if (ch == KEY_RIGHT)
form_driver(form, REQ_NEXT_CHAR);
else if (ch == KEY_LEFT)
form_driver(form, REQ_PREV_CHAR);
else if ((ch == KEY_BACKSPACE) || (ch == 127))
form_driver(form, REQ_DEL_PREV);
else if (ch == KEY_DC)
form_driver(form, REQ_DEL_CHAR);
else if (ch == KEY_IC)
form_driver(form, REQ_INS_MODE);
else if (ch == KEY_EIC)
form_driver(form, REQ_OVL_MODE);
else if (ch == KEY_HOME)
form_driver(form, REQ_BEG_FIELD);
else if (ch == KEY_END)
form_driver(form, REQ_END_FIELD);
else if (ch == '\t')
form_driver(form, REQ_NEXT_FIELD);
else if (ch == KEY_UP)
form_driver(form, REQ_PREV_FIELD);
else if (ch == KEY_DOWN)
form_driver(form, REQ_NEXT_FIELD);
else if (isascii(ch))
form_driver(form, ch);
}
/* restore i_con_head */
i_con_head = saved_i_con_head;
free(prot_level_list);
free(raid_menu_str);
free(userptr);
unpost_form(form);
free_form(form);
free_screen(NULL, NULL, input_fields);
flush_stdscr();
LEAVE;
return rc;
}
/**
* process_raid_migrate - Process the list of arrays that can be migrated.
* @buffer:
* @header_lines:
* @last_array_cmd:
*
* Returns:
* 0 if success / non-zero on failure
**/
int process_raid_migrate(char *buffer[], int header_lines)
{
struct array_cmd_data *acd, *saved_cmd_head;
struct array_cmd_data *last_array_cmd;
struct screen_output *s_out;
int found = 0;
int toggle = 1;
i_container *temp_i_con;
char *input;
int rc = REFRESH_FLAG;
ENTER;
while (rc & REFRESH_FLAG) {
toggle_field = 0;
do {
n_raid_migrate.body = buffer[toggle&1];
/* display disk array selection screen */
s_out = screen_driver(&n_raid_migrate, header_lines, NULL);
rc = s_out->rc;
free(s_out);
toggle++;
} while (rc == TOGGLE_SCREEN);
if (rc & EXIT_FLAG || rc & CANCEL_FLAG)
break;
found = 0;
/* Only one migration is allowed at a time. Set the do_cmd
* flag for the first one that is found. */
for_each_icon(temp_i_con) {
acd = temp_i_con->data;
input = temp_i_con->field_data;
if (acd && strcmp(input, "1") == 0) {
found++;
acd->do_cmd = 1;
break;
}
}
if (found) {
last_array_cmd = raid_cmd_tail;
/* Go to protection level selection screen */
rc = configure_raid_migrate(temp_i_con);
/* Keep the array information in the list, but
* strip off any disk inforamtion. */
saved_cmd_head = raid_cmd_head;
raid_cmd_head = last_array_cmd->next;
free_raid_cmds();
raid_cmd_head = saved_cmd_head;
raid_cmd_tail = last_array_cmd;
last_array_cmd->next = NULL;
/* Done on success or exit, otherwise refresh */
if (rc == RC_SUCCESS || rc & EXIT_FLAG)
break;
/* clear the do_cmd flag */
acd->do_cmd = 0;
rc = REFRESH_FLAG;
} else {
s_status.index = INVALID_OPTION_STATUS;
rc = REFRESH_FLAG;
}
toggle++;
}
LEAVE;
return rc;
}
/**
* raid_migrate - GUI routine for migrate raid array protection.
* @i_con: i_container struct
*
* Returns:
* 0 if success / non-zero on failure
**/
int raid_migrate(i_container *i_con)
{
int rc, k;
int found = 0;
struct ipr_dev *array, *dev;
char *buffer[2];
struct ipr_ioa *ioa;
struct screen_output *s_out;
int header_lines;
ENTER;
processing();
/* make sure the i_con list is empty */
i_con = free_i_con(i_con);
rc = RC_SUCCESS;
check_current_config(false);
body_init_status(buffer, n_raid_migrate.header, &header_lines);
for_each_primary_ioa(ioa) {
for_each_array(ioa, array) {
dev = array;
if (!dev->array_rcd->migrate_cand)
continue;
if (ioa->sis64)
dev = get_vset_from_array(ioa, dev);
add_raid_cmd_tail(ioa, dev, dev->array_id);
i_con = add_i_con(i_con, "\0", raid_cmd_tail);
print_dev(k, dev, buffer, "%1", 2+k);
found++;
}
}
if (!found) {
n_raid_migrate_fail.body = body_init(n_raid_migrate_fail.header, NULL);
s_out = screen_driver(&n_raid_migrate_fail, 0, i_con);
free(n_raid_migrate_fail.body);
n_raid_migrate_fail.body = NULL;
rc = s_out->rc | CANCEL_FLAG;
free(s_out);
} else
rc = process_raid_migrate(buffer, header_lines);
/* Display a progress screen. */
if (rc == 0)
return raid_migrate_complete();
/* Free the remaining raid commands. */
free_raid_cmds();
for (k = 0; k < 2; k++) {
free(buffer[k]);
buffer[k] = NULL;
}
n_raid_migrate.body = NULL;
LEAVE;
return rc;
}
/**
* asym_access_menu - Display the Optimized and Non-Optimized choices.
* @i_con: i_container struct
*
* Returns:
* 0 if success / non-zero on failure
**/
int asym_access_menu(i_container *i_con)
{
struct array_cmd_data *acd;
int start_row;
int num_menu_items;
int menu_index = 0;
ITEM ** menu_item = NULL;
int *userptr = NULL;
int *new_state;
int rc;
acd = (struct array_cmd_data *)i_con->data;
start_row = i_con->y + 2;
num_menu_items = 3;
menu_item = malloc(sizeof(ITEM **) * (num_menu_items + 1));
userptr = malloc(sizeof(int) * num_menu_items);
menu_item[menu_index] = new_item("Optimized","");
userptr[menu_index] = 0;
set_item_userptr(menu_item[menu_index],
(char *)&userptr[menu_index]);
menu_index++;
menu_item[menu_index] = new_item("Non-Optimized","");
userptr[menu_index] = 1;
set_item_userptr(menu_item[menu_index],
(char *)&userptr[menu_index]);
menu_index++;
menu_item[menu_index] = new_item("Not Set","");
userptr[menu_index] = 2;
set_item_userptr(menu_item[menu_index],
(char *)&userptr[menu_index]);
menu_index++;
menu_item[menu_index] = NULL;
rc = display_menu(menu_item, start_row, menu_index, &new_state);
if (rc == RC_SUCCESS) {
/* set field_data based on menu choice */
if (*new_state == IPR_ACTIVE_OPTIMIZED)
sprintf(i_con->field_data, "Optimized");
else if (*new_state == IPR_ACTIVE_NON_OPTIMIZED)
sprintf(i_con->field_data, "Non-Optimized");
else if (*new_state == IPR_ACTIVE_STANDBY)
sprintf(i_con->field_data, "Not Set");
/* only issue the command if the state selection changed */
if (acd->dev->array_rcd->saved_asym_access_state != *new_state)
acd->do_cmd = 1;
else
acd->do_cmd = 0;
} else {
/* set field_data based on existing value */
if (acd->dev->array_rcd->saved_asym_access_state == IPR_ACTIVE_OPTIMIZED)
sprintf(i_con->field_data, "Optimized");
else if (acd->dev->array_rcd->saved_asym_access_state == IPR_ACTIVE_NON_OPTIMIZED)
sprintf(i_con->field_data, "Non-Optimized");
else
sprintf(i_con->field_data, "Not Set");
}
menu_index = 0;
while (menu_item[menu_index] != NULL)
free_item(menu_item[menu_index++]);
free(menu_item);
free(userptr);
menu_item = NULL;
return rc;
}
/**
* configure_asym_access - Configure the array setting for asymmetric access.
* @i_con: i_container struct
*
* Returns:
* 0 if success / non-zero on failure
**/
int configure_asym_access(struct array_cmd_data *acd)
{
i_container *new_i_con, *i_con_head_saved;
int header_lines = 0;
char pref_str[20];
char buffer[128];
char *body = NULL;
struct screen_output *s_out;
int state = 0, rc = REFRESH_FLAG;
i_con_head_saved = i_con_head;
i_con_head = new_i_con = NULL;
body = body_init(n_change_array_asym_access.header, &header_lines);
sprintf(buffer, "Array: %s", acd->dev->dev_name);
body = add_line_to_body(body, buffer, NULL);
if (acd->dev->array_rcd->current_asym_access_state == IPR_ACTIVE_OPTIMIZED)
sprintf(buffer, "Current asymmetric access state: Optimized");
else
sprintf(buffer, "Current asymmetric access state: Non-Optimized");
body = add_line_to_body(body, buffer, NULL);
if (acd->dev->array_rcd->saved_asym_access_state == IPR_ACTIVE_OPTIMIZED) {
sprintf(buffer, "Saved asymmetric access state: Optimized\n");
sprintf(pref_str, "Optimized");
} else if (acd->dev->array_rcd->saved_asym_access_state == IPR_ACTIVE_NON_OPTIMIZED) {
sprintf(buffer, "Saved asymmetric access state: Non-Optimized\n");
sprintf(pref_str, "Non-Optimized");
} else {
sprintf(buffer, "Saved asymmetric access state: Not Set\n");
sprintf(pref_str, "Not Set");
}
body = add_line_to_body(body, buffer, NULL);
header_lines += 2;
body = add_line_to_body(body,_("Preferred Asymmetric Access State"), "%13");
new_i_con = add_i_con(new_i_con, pref_str, acd);
n_change_array_asym_access.body = body;
while (rc & REFRESH_FLAG) {
s_out = screen_driver(&n_change_array_asym_access, header_lines, NULL);
rc = s_out->rc;
free(s_out);
if (rc == RC_SUCCESS) {
if (!acd->do_cmd) {
rc = REFRESH_FLAG;
break;
}
if (!strncmp(new_i_con->field_data, "Optimized", 8))
state = IPR_ACTIVE_OPTIMIZED;
else if (!strncmp(new_i_con->field_data, "Non-Optimized", 8))
state = IPR_ACTIVE_NON_OPTIMIZED;
else
state = IPR_ACTIVE_STANDBY;
acd->dev->array_rcd->issue_cmd = 1;
acd->dev->array_rcd->saved_asym_access_state = state;
rc = ipr_set_array_asym_access(acd->ioa);
}
}
processing();
free(n_change_array_asym_access.body);
n_change_array_asym_access.body = NULL;
free_i_con(new_i_con);
i_con_head = i_con_head_saved;
return rc;
}
/**
* process_asym_access - Process the arrays that support asymmetric access.
* @buffer:
* @header_lines:
*
* Returns:
* 0 if success / non-zero on failure
**/
int process_asym_access(char *buffer[], int header_lines)
{
struct screen_output *s_out;
int found = 0;
int toggle = 1;
i_container *i_con;
char *input;
int rc;
struct array_cmd_data *acd;
while (1) {
toggle_field = 0;
do {
n_asym_access.body = buffer[toggle&1];
/* display array selection screen */
s_out = screen_driver(&n_asym_access, header_lines, NULL);
rc = s_out->rc;
free(s_out);
toggle++;
} while (rc == TOGGLE_SCREEN);
if (rc & EXIT_FLAG || rc & CANCEL_FLAG)
break;
found = 0;
/* do one at a time */
for_each_icon(i_con) {
acd = i_con->data;
input = i_con->field_data;
if (acd && strcmp(input, "1") == 0) {
found++;
break;
}
}
if (found) {
/* Go to asymmetric access selection screen */
rc = configure_asym_access(acd);
/* Done on success or exit */
if (rc == RC_SUCCESS || rc & EXIT_FLAG)
break;
/* clear the do_cmd flag */
acd->do_cmd = 0;
} else
s_status.index = INVALID_OPTION_STATUS;
}
return rc;
}
/**
* asym_access - GUI routine for setting array asymmetric access.
* @i_con: i_container struct
*
* Returns:
* 0 if success / non-zero on failure
**/
int asym_access(i_container *i_con)
{
int rc, k;
int found = 0;
char *buffer[2];
struct screen_output *s_out;
int header_lines;
struct ipr_ioa *ioa;
struct ipr_dev *array;
processing();
/* make sure the i_con list is empty */
i_con = free_i_con(i_con);
check_current_config(false);
rc = RC_SUCCESS;
body_init_status(buffer, n_asym_access.header, &header_lines);
for_each_primary_ioa(ioa) {
if (!ioa->asymmetric_access || !ioa->asymmetric_access_enabled)
continue;
for_each_array(ioa, array) {
if (!array->array_rcd->asym_access_cand) {
syslog_dbg("candidate not set\n");
continue;
}
add_raid_cmd_tail(ioa, array, array->array_id);
i_con = add_i_con(i_con, "\0", raid_cmd_tail);
print_dev(k, array, buffer, "%1", k+2);
found++;
}
}
if (!found) {
n_asym_access_fail.body = body_init(n_asym_access_fail.header, NULL);
s_out = screen_driver(&n_asym_access_fail, 0, i_con);
free(n_asym_access_fail.body);
n_asym_access_fail.body = NULL;
rc = s_out->rc | CANCEL_FLAG;
free(s_out);
} else
rc = process_asym_access(buffer, header_lines);
for (k = 0; k < 2; k++) {
free(buffer[k]);
buffer[k] = NULL;
}
return rc;
}
/**
* raid_include -
* @i_con: i_container struct
*
* Returns:
* 0 if success / non-zero on failure
**/
int raid_include(i_container *i_con)
{
int k;
int found = 0;
struct ipr_array_record *array_rcd;
char *buffer[2];
struct ipr_ioa *ioa;
struct ipr_dev *dev;
struct ipr_array_cap_entry *cap_entry;
int rc = RC_SUCCESS;
struct screen_output *s_out;
int header_lines;
int toggle = 1;
processing();
i_con = free_i_con(i_con);
check_current_config(false);
body_init_status(buffer, n_raid_include.header, &header_lines);
for_each_ioa(ioa) {
if (ioa->is_secondary)
continue;
for_each_vset(ioa, dev) {
array_rcd = dev->array_rcd;
cap_entry = get_raid_cap_entry(ioa->supported_arrays,
dev->raid_level);
if (!cap_entry || !cap_entry->include_allowed || !array_rcd->established)
continue;
add_raid_cmd_tail(ioa, dev, dev->array_id);
i_con = add_i_con(i_con,"\0",raid_cmd_tail);
print_dev(k, dev, buffer, "%1", k);
found++;
}
}
if (!found) {
/* Include Device Parity Protection Failed */
n_raid_include_fail.body = body_init(n_raid_include_fail.header, NULL);
s_out = screen_driver(&n_raid_include_fail, 0, i_con);
free(n_raid_include_fail.body);
n_raid_include_fail.body = NULL;
rc = s_out->rc;
free(s_out);
} else {
toggle_field = 0;
do {
n_raid_include.body = buffer[toggle&1];
s_out = screen_driver(&n_raid_include, header_lines, i_con);
rc = s_out->rc;
free(s_out);
toggle++;
} while (rc == TOGGLE_SCREEN);
free_raid_cmds();
}
for (k = 0; k < 2; k++) {
free(buffer[k]);
buffer[k] = NULL;
}
n_raid_include.body = NULL;
return rc;
}
/**
* configure_raid_include -
* @i_con: i_container struct
*
* Returns:
* 0 if success / non-zero on failure FIXME
* INVALID_OPTION_STATUS if nothing to process
**/
int configure_raid_include(i_container *i_con)
{
int k;
int found = 0;
struct array_cmd_data *cur_raid_cmd = NULL;
struct ipr_array_query_data *qac_data = calloc(1,sizeof(struct ipr_array_query_data));
struct ipr_dev_record *dev_rcd;
struct scsi_dev_data *scsi_dev_data;
char *buffer[2];
struct ipr_ioa *ioa;
char *input;
struct ipr_dev *vset, *dev;
struct ipr_array_cap_entry *cap_entry;
u8 min_mult_array_devices = 1;
int rc = RC_SUCCESS;
int header_lines;
i_container *temp_i_con;
int toggle = 0;
struct screen_output *s_out;
for_each_icon(temp_i_con) {
cur_raid_cmd = temp_i_con->data;
if (!cur_raid_cmd)
continue;
input = temp_i_con->field_data;
if (strcmp(input, "1") == 0) {
found++;
cur_raid_cmd->do_cmd = 1;
break;
}
}
if (found != 1)
return INVALID_OPTION_STATUS;
i_con = free_i_con(i_con);
body_init_status(buffer, n_configure_raid_include.header, &header_lines);
ioa = cur_raid_cmd->ioa;
vset = cur_raid_cmd->dev;
/* Get Query Array Config Data */
rc = ipr_query_array_config(ioa, 0, 1, 0, cur_raid_cmd->array_id, qac_data);
found = 0;
if (rc != 0)
free(qac_data);
else {
cur_raid_cmd->qac = qac_data;
cap_entry = get_raid_cap_entry(ioa->supported_arrays,
vset->raid_level);
if (cap_entry)
min_mult_array_devices = cap_entry->min_mult_array_devices;
for_each_dev_rcd(dev_rcd, qac_data) {
for_each_dev(ioa, dev) {
scsi_dev_data = dev->scsi_dev_data;
if (!scsi_dev_data)
continue;
if (scsi_dev_data->handle == ipr_get_dev_res_handle(ioa, dev_rcd) &&
scsi_dev_data->opens == 0 &&
dev_rcd->include_cand && device_supported(dev)) {
dev->dev_rcd = dev_rcd;
i_con = add_i_con(i_con, "\0", dev);
print_dev(k, dev, buffer, "%1", k);
found++;
break;
}
}
}
}
if (found < min_mult_array_devices) {
/* Include Device Parity Protection Failed */
n_configure_raid_include_fail.body = body_init(n_configure_raid_include_fail.header, NULL);
s_out = screen_driver(&n_configure_raid_include_fail, 0, i_con);
free(n_configure_raid_include_fail.body);
n_configure_raid_include_fail.body = NULL;
rc = s_out->rc;
free(s_out);
return rc;
}
toggle_field = 0;
do {
n_configure_raid_include.body = buffer[toggle&1];
s_out = screen_driver(&n_configure_raid_include, header_lines, i_con);
temp_i_con = s_out->i_con;
rc = s_out->rc;
free(s_out);
toggle++;
} while (rc == TOGGLE_SCREEN);
for (k = 0; k < 2; k++) {
free(buffer[k]);
buffer[k] = NULL;
}
n_configure_raid_include.body = NULL;
i_con = temp_i_con;
if (rc > 0)
goto leave;
/* first, count devices selected to be sure min multiple is satisfied */
found = 0;
for_each_icon(temp_i_con) {
input = temp_i_con->field_data;
if (strcmp(input, "1") == 0)
found++;
}
if (found % min_mult_array_devices != 0) {
/* "Error: number of devices selected must be a multiple of %d" */
s_status.num = min_mult_array_devices;
return 25 | REFRESH_FLAG;
}
for_each_icon(temp_i_con) {
dev = (struct ipr_dev *)temp_i_con->data;
if (!dev)
continue;
input = temp_i_con->field_data;
if (strcmp(input, "1") == 0) {
if (!dev->dev_rcd->issue_cmd) {
dev->dev_rcd->issue_cmd = 1;
dev->dev_rcd->known_zeroed = 1;
}
} else {
if (dev->dev_rcd->issue_cmd) {
dev->dev_rcd->issue_cmd = 0;
dev->dev_rcd->known_zeroed = 0;
}
}
}
rc = confirm_raid_include(i_con);
leave:
return rc;
}
/**
* confirm_raid_include -
* @i_con: i_container struct
*
* Returns:
* 0 if success / non-zero on failure FIXME
**/
int confirm_raid_include(i_container *i_con)
{
struct array_cmd_data *cur_raid_cmd;
struct ipr_ioa *ioa;
struct ipr_dev *dev;
int k;
char *buffer[2];
int rc = RC_SUCCESS;
struct screen_output *s_out;
int num_devs = 0;
int dev_include_complete(u8 num_devs);
int format_include_cand();
int header_lines;
int toggle = 0;
int need_formats = 0;
body_init_status(buffer, n_confirm_raid_include.header, &header_lines);
for_each_raid_cmd(cur_raid_cmd) {
if (!cur_raid_cmd->qac)
continue;
ioa = cur_raid_cmd->ioa;
for_each_af_dasd(ioa, dev) {
if (!dev->dev_rcd->issue_cmd)
continue;
print_dev(k, dev, buffer, "1", k);
if (!ipr_device_is_zeroed(dev))
need_formats = 1;
num_devs++;
}
}
do {
n_confirm_raid_include.body = buffer[toggle&1];
s_out = screen_driver(&n_confirm_raid_include, header_lines, NULL);
rc = s_out->rc;
free(s_out);
toggle++;
} while (rc == TOGGLE_SCREEN);
for (k = 0; k < 2; k++) {
free(buffer[k]);
buffer[k] = NULL;
}
n_confirm_raid_include.body = NULL;
if (rc)
return rc;
/* now format each of the devices */
if (need_formats)
num_devs = format_include_cand();
rc = dev_include_complete(num_devs);
free_devs_to_init();
return rc;
}
/**
* format_include_cand -
*
* Returns:
* number of devices processed
**/
int format_include_cand()
{
struct scsi_dev_data *scsi_dev_data;
struct array_cmd_data *cur_raid_cmd;
struct ipr_ioa *ioa;
struct ipr_dev *dev;
int num_devs = 0;
int rc = 0;
struct ipr_dev_record *device_record;
int opens = 0;
for_each_raid_cmd(cur_raid_cmd) {
if (!cur_raid_cmd->do_cmd)
continue;
ioa = cur_raid_cmd->ioa;
for_each_dev(ioa, dev) {
device_record = dev->dev_rcd;
if (!device_record || !device_record->issue_cmd)
continue;
/* get current "opens" data for this device to determine conditions to continue */
scsi_dev_data = dev->scsi_dev_data;
if (scsi_dev_data)
opens = num_device_opens(scsi_dev_data->host,
scsi_dev_data->channel,
scsi_dev_data->id,
scsi_dev_data->lun);
if (opens != 0) {
syslog(LOG_ERR,_("Include Device not allowed, device in use - %s\n"),
dev->gen_name);
device_record->issue_cmd = 0;
continue;
}
if (dev_init_head) {
dev_init_tail->next = malloc(sizeof(struct devs_to_init_t));
dev_init_tail = dev_init_tail->next;
} else
dev_init_head = dev_init_tail =
malloc(sizeof(struct devs_to_init_t));
memset(dev_init_tail, 0, sizeof(struct devs_to_init_t));
dev_init_tail->ioa = ioa;
dev_init_tail->dev = dev;
dev_init_tail->do_init = 1;
/* Issue the format. Failure will be detected by query command status */
rc = ipr_format_unit(dev);
num_devs++;
}
}
return num_devs;
}
/**
* update_include_qac_data -
* @ioa: ipr ioa struct
* @old_qac: ipr_array_query_data struct
* @new_qac: ipr_array_query_data struct
*
* Returns:
* 0 if success / 26 on failure
**/
static int update_include_qac_data(struct ipr_ioa *ioa,
struct ipr_array_query_data *old_qac,
struct ipr_array_query_data *new_qac)
{
struct ipr_dev_record *old_dev_rcd, *new_dev_rcd;
int found;
for_each_dev_rcd(old_dev_rcd, old_qac) {
if (!old_dev_rcd->issue_cmd)
continue;
found = 0;
for_each_dev_rcd(new_dev_rcd, new_qac) {
if (ipr_get_dev_res_handle(ioa, new_dev_rcd) !=
ipr_get_dev_res_handle(ioa, old_dev_rcd))
continue;
new_dev_rcd->issue_cmd = 1;
new_dev_rcd->known_zeroed = 1;
found = 1;
break;
}
if (!found)
return 26;
}
return 0;
}
/**
* do_array_include -
* @ioa: ipr ioa struct
* @array_id: array ID
* @qac: ipr_array_query_data struct
*
* Returns:
* 0 if success / non-zero on failure
**/
static int do_array_include(struct ipr_ioa *ioa, int array_id,
struct ipr_array_query_data *qac)
{
int fd, rc;
struct ipr_array_query_data qac_data;
memset(&qac_data, 0, sizeof(qac_data));
fd = open(ioa->ioa.gen_name, O_RDWR);
if (fd <= 1)
return -EIO;
rc = flock(fd, LOCK_EX);
if (rc)
goto out;
rc = __ipr_query_array_config(ioa, fd, 0, 1, 0, array_id, &qac_data);
if (rc)
goto out;
rc = update_include_qac_data(ioa, qac, &qac_data);
if (rc)
goto out;
rc = ipr_add_array_device(ioa, fd, &qac_data);
out:
close(fd);
return rc;
}
/**
* dev_include_complete -
* @num_devs: not used ?
*
* Returns:
* 27 | EXIT_FLAG on success / 26 | EXIT_FLAG otherwise
**/
int dev_include_complete(u8 num_devs)
{
int done_bad;
struct ipr_cmd_status cmd_status;
struct ipr_cmd_status_record *status_record;
int not_done = 0;
int rc;
struct devs_to_init_t *cur_dev_init;
u32 percent_cmplt = 0;
struct ipr_ioa *ioa;
struct array_cmd_data *cur_raid_cmd;
struct ipr_common_record *common_record;
n_dev_include_complete.body = n_dev_include_complete.header[0];
while(1) {
complete_screen_driver(&n_dev_include_complete, percent_cmplt, 0);
percent_cmplt = 100;
done_bad = 0;
for_each_dev_to_init(cur_dev_init) {
if (cur_dev_init->do_init) {
rc = ipr_query_command_status(cur_dev_init->dev, &cmd_status);
if (rc || cmd_status.num_records == 0) {
cur_dev_init->cmplt = 100;
continue;
}
status_record = cmd_status.record;
if (status_record->status == IPR_CMD_STATUS_FAILED) {
cur_dev_init->cmplt = 100;
done_bad = 1;
} else if (status_record->status != IPR_CMD_STATUS_SUCCESSFUL) {
cur_dev_init->cmplt = status_record->percent_complete;
if (cur_dev_init->cmplt < percent_cmplt)
percent_cmplt = cur_dev_init->cmplt;
not_done = 1;
}
}
}
if (!not_done) {
flush_stdscr();
if (done_bad) {
/* "Include failed" */
rc = 26;
return rc | EXIT_FLAG;
}
break;
}
not_done = 0;
sleep(1);
}
complete_screen_driver(&n_dev_include_complete, percent_cmplt, 0);
/* now issue the start array command with "known to be zero" */
for_each_raid_cmd(cur_raid_cmd) {
if (!cur_raid_cmd->do_cmd)
continue;
if (do_array_include(cur_raid_cmd->ioa,
cur_raid_cmd->array_id, cur_raid_cmd->qac)) {
rc = 26;
continue;
}
}
not_done = 0;
percent_cmplt = 0;
n_dev_include_complete.body = n_dev_include_complete.header[1];
while(1) {
complete_screen_driver(&n_dev_include_complete, percent_cmplt, 1);
percent_cmplt = 100;
done_bad = 0;
for_each_raid_cmd(cur_raid_cmd) {
ioa = cur_raid_cmd->ioa;
rc = ipr_query_command_status(&ioa->ioa, &cmd_status);
if (rc) {
done_bad = 1;
continue;
}
for_each_cmd_status(status_record, &cmd_status) {
if (status_record->command_code == IPR_ADD_ARRAY_DEVICE &&
cur_raid_cmd->array_id == status_record->array_id) {
if (status_record->status == IPR_CMD_STATUS_IN_PROGRESS) {
if (status_record->percent_complete < percent_cmplt)
percent_cmplt = status_record->percent_complete;
not_done = 1;
} else if (status_record->status != IPR_CMD_STATUS_SUCCESSFUL)
/* "Include failed" */
rc = RC_26_Include_Fail;
break;
}
}
}
if (!not_done) {
/* Call ioctl() to re-read partition table to handle change in size */
for_each_raid_cmd(cur_raid_cmd) {
if (!cur_raid_cmd->do_cmd)
continue;
common_record = cur_raid_cmd->dev->qac_entry;
if (common_record &&
common_record->record_id == IPR_RECORD_ID_ARRAY_RECORD)
rc = ipr_write_dev_attr(cur_raid_cmd->dev, "rescan", "1");
}
flush_stdscr();
if (done_bad)
/* "Include failed" */
return RC_26_Include_Fail | EXIT_FLAG;
/* "Include Unit completed successfully" */
complete_screen_driver(&n_dev_include_complete, percent_cmplt, 1);
return RC_27_Include_Success | EXIT_FLAG;
}
not_done = 0;
sleep(1);
}
}
/**
* add_format_device -
* @dev: ipr dev struct
* @blk_size: block size
*
* Returns:
* nothing
**/
static void add_format_device(struct ipr_dev *dev, int blk_size)
{
if (dev_init_head) {
dev_init_tail->next = malloc(sizeof(struct devs_to_init_t));
dev_init_tail = dev_init_tail->next;
}
else
dev_init_head = dev_init_tail = malloc(sizeof(struct devs_to_init_t));
memset(dev_init_tail, 0, sizeof(struct devs_to_init_t));
dev_init_tail->ioa = dev->ioa;
if (ipr_is_af_dasd_device(dev))
dev_init_tail->dev_type = IPR_AF_DASD_DEVICE;
else
dev_init_tail->dev_type = IPR_JBOD_DASD_DEVICE;
dev_init_tail->new_block_size = blk_size;
dev_init_tail->dev = dev;
dev_init_tail->device_id = dev->scsi_dev_data->device_id;
scsi_dbg(dev, "Formatting device to %d bytes/block. Device ID=%lx\n",
blk_size, dev_init_tail->device_id);
}
/**
* configure_af_device -
* @i_con: i_container struct
* @action_code: include or remove
*
* Returns:
* 0 if success / non-zero on failure
**/
static int configure_af_device(i_container *i_con, int action_code)
{
int rc, j, k;
struct scsi_dev_data *scsi_dev_data;
int can_init;
int dev_type;
int new_block_size;
char *buffer[2];
int num_devs = 0;
struct ipr_ioa *ioa;
int toggle = 0;
int header_lines;
s_node *n_screen;
struct screen_output *s_out;
processing();
i_con = free_i_con(i_con);
rc = RC_SUCCESS;
check_current_config(false);
/* Setup screen title */
if (action_code == IPR_INCLUDE)
n_screen = &n_af_init_device;
else
n_screen = &n_jbod_init_device;
body_init_status(buffer, n_screen->header, &header_lines);
for_each_ioa(ioa) {
if (ioa->is_secondary)
continue;
for (j = 0; j < ioa->num_devices; j++) {
can_init = 1;
scsi_dev_data = ioa->dev[j].scsi_dev_data;
/* If not a DASD, disallow format */
if (!scsi_dev_data ||
ipr_is_hot_spare(&ioa->dev[j]) ||
ipr_is_volume_set(&ioa->dev[j]) ||
!device_supported(&ioa->dev[j]) ||
(scsi_dev_data->type != TYPE_DISK &&
scsi_dev_data->type != IPR_TYPE_AF_DISK))
continue;
/* If Advanced Function DASD */
if (ipr_is_af_dasd_device(&ioa->dev[j])) {
if (action_code == IPR_INCLUDE) {
if (ipr_device_is_zeroed(&ioa->dev[j]))
continue;
new_block_size = 0;
} else if (ioa->dev[j].block_dev_class & IPR_BLK_DEV_CLASS_4K)
new_block_size = IPR_JBOD_4K_BLOCK_SIZE;
else
new_block_size = IPR_JBOD_BLOCK_SIZE;
dev_type = IPR_AF_DASD_DEVICE;
/* We allow the user to format the drive if nobody is using it */
if (ioa->dev[j].scsi_dev_data->opens != 0) {
syslog(LOG_ERR, _("Format not allowed to %s, device in use\n"), ioa->dev[j].gen_name);
continue;
}
if (ipr_is_array_member(&ioa->dev[j])) {
if (ioa->dev[j].dev_rcd->no_cfgte_vol)
can_init = 1;
else
can_init = 0;
} else
can_init = is_format_allowed(&ioa->dev[j]);
} else if (scsi_dev_data->type == TYPE_DISK){
/* If on a JBOD adapter */
if (!ioa->qac_data->num_records) {
if (action_code != IPR_REMOVE)
continue;
} else if (is_af_blocked(&ioa->dev[j], 0))
continue;
if (action_code == IPR_REMOVE && !format_req(&ioa->dev[j]))
continue;
if (action_code == IPR_REMOVE) {
if (ioa->support_4k && ioa->dev[j].block_dev_class & IPR_BLK_DEV_CLASS_4K)
new_block_size = IPR_JBOD_4K_BLOCK_SIZE;
else
new_block_size = IPR_JBOD_BLOCK_SIZE;
} else {
if (ioa->support_4k && ioa->dev[j].block_dev_class & IPR_BLK_DEV_CLASS_4K)
new_block_size = IPR_AF_4K_BLOCK_SIZE;
else
new_block_size = ioa->af_block_size;
}
dev_type = IPR_JBOD_DASD_DEVICE;
/* We allow the user to format the drive if nobody is using it, or
the device is read write protected. If the drive fails, then is replaced
concurrently it will be read write protected, but the system may still
have a use count for it. We need to allow the format to get the device
into a state where the system can use it */
if (ioa->dev[j].scsi_dev_data->opens != 0) {
syslog(LOG_ERR, _("Format not allowed to %s, device in use\n"), ioa->dev[j].gen_name);
continue;
}
can_init = is_format_allowed(&ioa->dev[j]);
} else
continue;
if (can_init) {
add_format_device(&ioa->dev[j], new_block_size);
print_dev(k, &ioa->dev[j], buffer, "%1", k);
i_con = add_i_con(i_con,"\0",dev_init_tail);
num_devs++;
}
}
}
if (!num_devs) {
if (action_code == IPR_INCLUDE) {
n_af_include_fail.body = body_init(n_af_include_fail.header, NULL);
s_out = screen_driver(&n_af_include_fail, 0, i_con);
free(n_af_include_fail.body);
n_af_include_fail.body = NULL;
} else {
n_af_remove_fail.body = body_init(n_af_remove_fail.header, NULL);
s_out = screen_driver(&n_af_remove_fail, 0, i_con);
free(n_af_remove_fail.body);
n_af_remove_fail.body = NULL;
}
rc = s_out->rc;
free(s_out);
} else {
toggle_field = 0;
do {
n_screen->body = buffer[toggle&1];
s_out = screen_driver(n_screen, header_lines, i_con);
rc = s_out->rc;
free(s_out);
toggle++;
} while (rc == TOGGLE_SCREEN);
free_devs_to_init();
}
for (k = 0; k < 2; k++) {
free(buffer[k]);
buffer[k] = NULL;
}
n_screen->body = NULL;
return rc;
}
/**
* af_include -
* @i_con: i_container struct
*
* Returns:
* 0 if success / non-zero on failure
**/
int af_include(i_container *i_con)
{
int rc;
rc = configure_af_device(i_con, IPR_INCLUDE);
return rc;
}
/**
* af_remove -
* @i_con: i_container struct
*
* Returns:
* 0 if success / non-zero on failure
**/
int af_remove(i_container *i_con)
{
int rc;
rc = configure_af_device(i_con, IPR_REMOVE);
return rc;
}
/**
* add_hot_spare -
* @i_con: i_container struct
*
* Returns:
* 0 if success / non-zero on failure FIXME
**/
int add_hot_spare(i_container *i_con)
{
int rc;
do {
rc = hot_spare(i_con, IPR_ADD_HOT_SPARE);
} while (rc & REFRESH_FLAG);
return rc;
}
/**
* remove_hot_spare -
* @i_con: i_container struct
*
* Returns:
* 0 if success / non-zero on failure FIXME
**/
int remove_hot_spare(i_container *i_con)
{
int rc;
do {
rc = hot_spare(i_con, IPR_RMV_HOT_SPARE);
} while (rc & REFRESH_FLAG);
return rc;
}
/**
* hot_spare -
* @i_con: i_container struct
* @action: add or remove
*
* Returns:
* 0 if success / non-zero on failure FIXME
**/
int hot_spare(i_container *i_con, int action)
{
int rc, k;
struct array_cmd_data *cur_raid_cmd;
char *buffer[2];
struct ipr_ioa *ioa;
struct ipr_dev *dev;
int found = 0;
char *input;
int toggle = 0;
i_container *temp_i_con;
struct screen_output *s_out;
s_node *n_screen;
int header_lines;
processing();
i_con = free_i_con(i_con);
rc = RC_SUCCESS;
check_current_config(false);
if (action == IPR_ADD_HOT_SPARE)
n_screen = &n_add_hot_spare;
else
n_screen = &n_remove_hot_spare;
body_init_status(buffer, n_screen->header, &header_lines);
for_each_ioa(ioa) {
for_each_af_dasd(ioa, dev) {
if ((action == IPR_ADD_HOT_SPARE &&
dev->dev_rcd->add_hot_spare_cand) ||
(action == IPR_RMV_HOT_SPARE &&
dev->dev_rcd->rmv_hot_spare_cand)) {
add_raid_cmd_tail(ioa, NULL, 0);
i_con = add_i_con(i_con,"\0",raid_cmd_tail);
print_dev(k, &ioa->ioa, buffer, "%1", k);
found++;
break;
}
}
}
if (!found) {
if (action == IPR_ADD_HOT_SPARE) {
n_add_hot_spare_fail.body = body_init(n_add_hot_spare_fail.header, NULL);
s_out = screen_driver(&n_add_hot_spare_fail, 0, i_con);
free(n_add_hot_spare_fail.body);
n_add_hot_spare_fail.body = NULL;
} else {
n_remove_hot_spare_fail.body = body_init(n_remove_hot_spare_fail.header, NULL);
s_out = screen_driver(&n_remove_hot_spare_fail, 0, i_con);
free(n_remove_hot_spare_fail.body);
n_remove_hot_spare_fail.body = NULL;
}
free(s_out);
rc = EXIT_FLAG;
goto leave;
}
do {
n_screen->body = buffer[toggle&1];
s_out = screen_driver(n_screen, header_lines, i_con);
temp_i_con = s_out->i_con;
rc = s_out->rc;
free(s_out);
toggle++;
} while (rc == TOGGLE_SCREEN);
i_con = temp_i_con;
if (rc > 0) {
rc = EXIT_FLAG;
goto leave;
}
found = 0;
for_each_icon(temp_i_con) {
cur_raid_cmd = (struct array_cmd_data *)temp_i_con->data;
if (cur_raid_cmd) {
input = temp_i_con->field_data;
if (strcmp(input, "1") == 0) {
do {
rc = select_hot_spare(temp_i_con, action);
} while (rc & REFRESH_FLAG);
if (rc > 0)
goto leave;
found = 1;
cur_raid_cmd->do_cmd = 1;
} else {
cur_raid_cmd->do_cmd = 0;
}
}
}
if (found) {
/* Go to verification screen */
rc = confirm_hot_spare(action);
} else
rc = REFRESH_FLAG | INVALID_OPTION_STATUS;
leave:
if (rc & CANCEL_FLAG) {
s_status.index = (rc & ~CANCEL_FLAG);
rc = (rc | REFRESH_FLAG) & ~CANCEL_FLAG;
}
i_con = free_i_con(i_con);
for (k = 0; k < 2; k++) {
free(buffer[k]);
buffer[k] = NULL;
}
n_screen->body = NULL;
free_raid_cmds();
return rc;
}
/**
* select_hot_spare -
* @i_con: i_container struct
* @action: add or remove
*
* Returns:
* 0 if success / non-zero on failure FIXME
**/
int select_hot_spare(i_container *i_con, int action)
{
struct array_cmd_data *cur_raid_cmd;
int rc, k, found;
char *buffer[2];
int num_devs = 0;
struct ipr_ioa *ioa;
char *input;
struct ipr_dev *dev;
struct scsi_dev_data *scsi_dev_data;
struct ipr_dev_record *dev_rcd;
i_container *temp_i_con,*i_con2 = NULL;
i_container *temp_i_con2;
struct screen_output *s_out = NULL;
int header_lines;
s_node *n_screen;
int toggle = 0;
i_container *i_con_head_saved;
if (action == IPR_ADD_HOT_SPARE)
n_screen = &n_select_add_hot_spare;
else
n_screen = &n_select_remove_hot_spare;
body_init_status(buffer, n_screen->header, &header_lines);
cur_raid_cmd = (struct array_cmd_data *) i_con->data;
rc = RC_SUCCESS;
ioa = cur_raid_cmd->ioa;
i_con_head_saved = i_con_head; /* FIXME */
i_con_head = NULL;
for_each_af_dasd(ioa, dev) {
scsi_dev_data = dev->scsi_dev_data;
dev_rcd = dev->dev_rcd;
if (!scsi_dev_data)
continue;
if (device_supported(dev) &&
((dev_rcd->add_hot_spare_cand && action == IPR_ADD_HOT_SPARE) ||
(dev_rcd->rmv_hot_spare_cand && action == IPR_RMV_HOT_SPARE))) {
i_con2 = add_i_con(i_con2, "\0", dev);
print_dev(k, dev, buffer, "%1", k);
num_devs++;
}
}
if (num_devs) {
do {
n_screen->body = buffer[toggle&1];
s_out = screen_driver(n_screen, header_lines, i_con2);
temp_i_con2 = s_out->i_con;
rc = s_out->rc;
free(s_out);
toggle++;
} while (rc == TOGGLE_SCREEN);
for (k = 0; k < 2; k++) {
free(buffer[k]);
buffer[k] = NULL;
}
n_screen->body = NULL;
i_con2 = temp_i_con2;
if (rc > 0)
goto leave;
found = 0;
for_each_icon(temp_i_con) {
dev = (struct ipr_dev *)temp_i_con->data;
if (dev != NULL) {
input = temp_i_con->field_data;
if (strcmp(input, "1") == 0) {
found = 1;
dev->dev_rcd->issue_cmd = 1;
}
}
}
if (found)
rc = RC_SUCCESS;
else {
s_status.index = INVALID_OPTION_STATUS;
rc = REFRESH_FLAG;
}
} else
/* "No devices available for the selected hot spare operation" */
rc = 52 | CANCEL_FLAG;
leave:
i_con2 = free_i_con(i_con2);
i_con_head = i_con_head_saved;
return rc;
}
/**
* confirm_hot_spare -
* @action: add or remove
*
* Returns:
* 0 if success / non-zero on failure FIXME
**/
int confirm_hot_spare(int action)
{
struct array_cmd_data *cur_raid_cmd;
struct ipr_ioa *ioa;
struct ipr_dev *dev;
int rc, k;
char *buffer[2];
int hot_spare_complete(int action);
struct screen_output *s_out;
s_node *n_screen;
int header_lines;
int toggle = 0;
rc = RC_SUCCESS;
if (action == IPR_ADD_HOT_SPARE)
n_screen = &n_confirm_add_hot_spare;
else
n_screen = &n_confirm_remove_hot_spare;
body_init_status(buffer, n_screen->header, &header_lines);
for_each_raid_cmd(cur_raid_cmd) {
if (!cur_raid_cmd->do_cmd)
continue;
ioa = cur_raid_cmd->ioa;
for_each_af_dasd(ioa, dev) {
if (dev->dev_rcd->issue_cmd)
print_dev(k, dev, buffer, "1", k);
}
}
do {
n_screen->body = buffer[toggle&1];
s_out = screen_driver(n_screen, header_lines, NULL);
rc = s_out->rc;
free(s_out);
toggle++;
} while (rc == TOGGLE_SCREEN);
for (k = 0; k < 2; k++) {
free(buffer[k]);
buffer[k] = NULL;
}
n_screen->body = NULL;
if(rc > 0)
goto leave;
rc = hot_spare_complete(action);
leave:
return rc;
}
/**
* hot_spare_complete -
* @action: add or remove
*
* Returns:
* 0 if success / non-zero on failure FIXME
**/
int hot_spare_complete(int action)
{
int rc;
struct ipr_ioa *ioa;
struct array_cmd_data *cmd;
for_each_ioa(ioa) {
for_each_raid_cmd(cmd) {
if (cmd->do_cmd == 0 || ioa != cmd->ioa)
continue;
flush_stdscr();
if (action == IPR_ADD_HOT_SPARE)
rc = ipr_add_hot_spare(ioa);
else
rc = ipr_remove_hot_spare(ioa);
if (rc != 0) {
if (action == IPR_ADD_HOT_SPARE)
/* Enable Device as Hot Spare failed */
return 55 | EXIT_FLAG;
else
/* Disable Device as Hot Spare failed */
return 56 | EXIT_FLAG;
}
}
}
flush_stdscr();
if (action == IPR_ADD_HOT_SPARE)
/* "Enable Device as Hot Spare Completed successfully" */
rc = 53 | EXIT_FLAG;
else
/* "Disable Device as Hot Spare Completed successfully" */
rc = 54 | EXIT_FLAG;
return rc;
}
/**
* disk_unit_recovery -
* @i_con: i_container struct
*
* Returns:
* 0 if success / non-zero on failure FIXME
**/
int disk_unit_recovery(i_container *i_con)
{
int rc;
struct screen_output *s_out;
int loop;
for (loop = 0; loop < n_disk_unit_recovery.num_opts; loop++) {
n_disk_unit_recovery.body = ipr_list_opts(n_disk_unit_recovery.body,
n_disk_unit_recovery.options[loop].key,
n_disk_unit_recovery.options[loop].list_str);
}
n_disk_unit_recovery.body = ipr_end_list(n_disk_unit_recovery.body);
s_out = screen_driver(&n_disk_unit_recovery, 0, NULL);
free(n_disk_unit_recovery.body);
n_disk_unit_recovery.body = NULL;
rc = s_out->rc;
free(s_out);
return rc;
}
/**
* get_elem_status -
* @dev: ipr dev struct
* @ses: ipr dev struct
* @ses_data: ipr_encl_status_ctl_pg struct
* @ses_config: ipr_ses_config_pg struct
*
* Returns:
* ipr_drive_elem_status struct if success / NULL otherwise
**/
static struct ipr_drive_elem_status *
get_elem_status(struct ipr_dev *dev, struct ipr_dev *ses,
struct ipr_encl_status_ctl_pg *ses_data, struct ipr_ses_config_pg *ses_cfg)
{
struct ipr_ioa *ioa = dev->ioa;
struct ipr_res_addr *ra;
struct ipr_drive_elem_status *elem_status, *overall;
int bus = ses->scsi_dev_data->channel;
int box, slot, is_vses;
if (ioa->hop_count == IPR_2BIT_HOP)
box = ses->scsi_dev_data->phy_2bit_hop.box;
else
box = ses->scsi_dev_data->phy.box;
if (ipr_receive_diagnostics(ses, 2, ses_data, sizeof(*ses_data)))
return NULL;
if (ipr_receive_diagnostics(ses, 1, ses_cfg, sizeof(*ses_cfg)))
return NULL;
overall = ipr_get_overall_elem(ses_data, ses_cfg);
if (!ioa_is_spi(dev->ioa) && (overall->device_environment == 0))
is_vses = 1;
else
is_vses = 0;
for_each_elem_status(elem_status, ses_data, ses_cfg) {
slot = elem_status->slot_id;
for_each_ra(ra, dev) {
if (is_vses && (ra->bus != slot || ra->target != 0))
continue;
if (ioa->hop_count == IPR_2BIT_HOP) {
if (!is_vses && (ra->bus != bus ||
ra->phy_2bit_hop.box != box ||
ra->phy_2bit_hop.phy != slot))
continue;
} else {
if (!is_vses && (ra->bus != bus ||
ra->phy.box != box ||
ra->phy.phy != slot))
continue;
}
return elem_status;
}
}
return NULL;
}
/**
* get_elem_status_64bit -
* @dev: ipr dev struct
* @ses: ipr dev struct
* @ses_data: ipr_encl_status_ctl_pg struct
* @ses_config: ipr_ses_config_pg struct
*
* Returns:
* ipr_drive_elem_status struct if success / NULL otherwise
**/
static struct ipr_drive_elem_status *
get_elem_status_64bit(struct ipr_dev *dev, struct ipr_dev *ses,
struct ipr_encl_status_ctl_pg *ses_data, struct ipr_ses_config_pg *ses_cfg)
{
struct ipr_res_path *rp;
struct ipr_drive_elem_status *elem_status;
int slot, res_path_len, dev_slot, ses_path_len;
if (ipr_receive_diagnostics(ses, 2, ses_data, sizeof(*ses_data)))
return NULL;
if (ipr_receive_diagnostics(ses, 1, ses_cfg, sizeof(*ses_cfg)))
return NULL;
ses_path_len = strlen(ses->res_path_name);
res_path_len = strlen(dev->res_path_name);
dev_slot = strtoul(dev->res_path_name + (res_path_len-2), NULL, 16);
if (ses_path_len != res_path_len)
return NULL;
for_each_elem_status(elem_status, ses_data, ses_cfg) {
slot = elem_status->slot_id;
for_each_rp(rp, dev) {
if (!memcmp(&rp->res_path_bytes, &ses->res_path[0], ses_path_len/3) && slot == dev_slot)
return elem_status;
}
}
return NULL;
}
/**
* wait_for_new_dev -
* @ioa: ipr ioa struct
* @res_addr: ipr_res_addr struct
*
* Returns:
* nothing
**/
static void wait_for_new_dev(struct ipr_ioa *ioa, struct ipr_res_addr *res_addr)
{
int time = 12;
struct ipr_dev *dev;
struct ipr_res_addr_aliases aliases;
struct ipr_res_addr *ra;
ipr_query_res_addr_aliases(ioa, res_addr, &aliases);
for_each_ra_alias(ra, &aliases)
ipr_scan(ioa, ra->bus, ra->target, ra->lun);
while (time--) {
check_current_config(false);
for_each_ra_alias(ra, &aliases) {
if ((dev = get_dev_from_addr(ra))) {
ipr_init_new_dev(dev);
return;
}
}
sleep(5);
}
}
/**
* get_dev_from_res_path -
* @res_addr: ipr_res_addr struct
*
* Returns:
* ipr_dev struct if success / NULL otherwise
**/
struct ipr_dev *get_dev_from_res_path(struct ipr_res_path *res_path)
{
struct ipr_ioa *ioa;
int j;
struct scsi_dev_data *scsi_dev_data;
char res_path_name[IPR_MAX_RES_PATH_LEN];
ipr_format_res_path(res_path->res_path_bytes, res_path_name, IPR_MAX_RES_PATH_LEN);
for_each_primary_ioa(ioa) {
for (j = 0; j < ioa->num_devices; j++) {
scsi_dev_data = ioa->dev[j].scsi_dev_data;
if (!scsi_dev_data)
continue;
if (!strncmp(scsi_dev_data->res_path, res_path_name, IPR_MAX_RES_PATH_LEN))
return &ioa->dev[j];
}
}
return NULL;
}
static void wait_for_new_dev_64bit(struct ipr_ioa *ioa, struct ipr_res_path *res_path)
{
int time = 12;
struct ipr_dev *dev;
struct ipr_res_path_aliases aliases;
struct ipr_res_path *rp;
ipr_query_res_path_aliases(ioa, res_path, &aliases);
if (aliases.length < (4 + 2 * sizeof(struct ipr_res_path))) {
aliases.length = 4 + 2 * sizeof(struct ipr_res_path);
memcpy(&aliases.res_path[0], res_path, 2 * sizeof(struct ipr_res_path));
}
ipr_scan(ioa, 0, -1, -1);
while (time--) {
check_current_config(false);
for_each_rp_alias(rp, &aliases) {
if ((dev = get_dev_from_res_path(rp))) {
ipr_init_new_dev(dev);
return;
}
}
sleep(5);
}
}
static struct ipr_dev *delete_secondary_sysfs_name(struct ipr_dev *delete_dev)
{
struct ipr_ioa *ioa;
struct ipr_dev *dev, *ses;
for_each_secondary_ioa(ioa) {
for_each_ses(ioa, ses) {
for_each_dev(ses->ioa, dev) {
if (ipr_is_ses(dev))
continue;
if (!strncmp(dev->res_path_name, delete_dev->res_path_name, strlen(delete_dev->res_path_name)))
return dev;
}
}
}
return NULL;
}
int remove_or_add_back_device_64bit(struct ipr_dev *dev)
{
struct ipr_encl_status_ctl_pg ses_data;
struct ipr_drive_elem_status *elem_status;
struct ipr_ses_config_pg ses_cfg;
int res_path_len, dev_slot;
struct ipr_dev *sec_dev, *tmp_dev;
char new_sysfs_res_path[IPR_MAX_RES_PATH_LEN];
int rc;
res_path_len = strlen(dev->res_path_name);
dev_slot = strtoul(dev->res_path_name + (res_path_len - 2), NULL, 16);
if (!ipr_read_dev_attr(dev, "resource_path",
new_sysfs_res_path, IPR_MAX_RES_PATH_LEN))
if (strncmp(dev->res_path_name, new_sysfs_res_path, sizeof(dev->res_path_name)))
for_each_dev(dev->ioa, tmp_dev)
if (!strncmp(tmp_dev->res_path_name, new_sysfs_res_path, sizeof(tmp_dev->res_path_name))) {
dev = tmp_dev;
break;
}
evaluate_device(dev, dev->ioa, 0);
if (ipr_receive_diagnostics(dev->ses[0], 2, &ses_data, sizeof(ses_data)))
return INVALID_OPTION_STATUS;
if (ipr_receive_diagnostics(dev->ses[0], 1, &ses_cfg, sizeof(ses_cfg)))
return INVALID_OPTION_STATUS;
for_each_elem_status(elem_status, &ses_data, &ses_cfg) {
if (elem_status->slot_id == dev_slot &&
elem_status->status == IPR_DRIVE_ELEM_STATUS_POPULATED ) {
wait_for_new_dev_64bit(dev->ioa, &(dev->res_path[0]));
rc = 0;
break;
}
else
if (elem_status->slot_id == dev_slot &&
elem_status->status == IPR_DRIVE_ELEM_STATUS_EMPTY ) {
ipr_write_dev_attr(dev, "delete", "1");
ipr_del_zeroed_dev(dev);
sec_dev = delete_secondary_sysfs_name(dev);
if (sec_dev) {
evaluate_device(sec_dev, dev->ioa, 0);
ipr_write_dev_attr(sec_dev, "delete", "1");
ipr_del_zeroed_dev(sec_dev);
}
rc = 1;
break;
}
}/*for_each_elem_status*/
return rc;
}
/**
* process_conc_maint -
* @i_con: i_container struct
* @action: add or remove
*
* Returns:
* 0 if success / non-zero on failure FIXME
**/
int process_conc_maint(i_container *i_con, int action)
{
i_container *temp_i_con;
int found = 0;
struct ipr_dev *dev, *ses;
char *input;
struct ipr_ioa *ioa;
int k, rc;
struct ipr_dev_record *dev_rcd;
struct ipr_encl_status_ctl_pg ses_data;
struct ipr_ses_config_pg ses_cfg;
struct ipr_drive_elem_status *elem_status, *overall;
char *buffer[3];
int header_lines;
int toggle=0;
s_node *n_screen;
struct screen_output *s_out;
struct ipr_res_addr res_addr;
struct ipr_res_path res_path[2];
int max_y, max_x;
for_each_icon(temp_i_con) {
input = temp_i_con->field_data;
if (strcmp(input, "1") == 0) {
dev = (struct ipr_dev *)temp_i_con->data;
if (dev != NULL)
found++;
}
}
if (found != 1)
return INVALID_OPTION_STATUS;
if (dev->ioa->sis64)
memcpy(&res_path, &(dev->res_path), sizeof(struct ipr_res_path)*2);
else
memcpy(&res_addr, &(dev->res_addr), sizeof(res_addr));
if (ipr_is_af_dasd_device(dev) &&
(action == IPR_VERIFY_CONC_REMOVE || action == IPR_WAIT_CONC_REMOVE)) {
/* issue suspend device bus to verify operation
is allowable */
if (!ipr_can_remove_device(dev))
return INVALID_OPTION_STATUS; /* FIXME */
} else if (num_device_opens(res_addr.host, res_addr.bus,
res_addr.target, res_addr.lun))
return INVALID_OPTION_STATUS; /* FIXME */
ioa = dev->ioa;
ses = dev->ses[0];
if (ioa->sis64)
elem_status = get_elem_status_64bit(dev, ses, &ses_data, &ses_cfg);
else
elem_status = get_elem_status(dev, ses, &ses_data, &ses_cfg);
if (!elem_status)
return INVALID_OPTION_STATUS;
if ((action == IPR_VERIFY_CONC_REMOVE) ||
(action == IPR_VERIFY_CONC_ADD)) {
elem_status->select = 1;
elem_status->identify = 1;
} else if (action == IPR_WAIT_CONC_REMOVE) {
elem_status->select = 1;
elem_status->remove = 1;
elem_status->identify = 1;
} else if (action == IPR_WAIT_CONC_ADD) {
elem_status->select = 1;
elem_status->insert = 1;
elem_status->identify = 1;
elem_status->enable_byp = 0;
}
overall = ipr_get_overall_elem(&ses_data, &ses_cfg);
overall->select = 1;
overall->insert = 0;
overall->remove = 0;
overall->identify = 0;
if (action == IPR_WAIT_CONC_REMOVE || action == IPR_WAIT_CONC_ADD)
overall->disable_resets = 1;
if (action == IPR_VERIFY_CONC_REMOVE)
n_screen = &n_verify_conc_remove;
else if (action == IPR_VERIFY_CONC_ADD)
n_screen = &n_verify_conc_add;
else if (action == IPR_WAIT_CONC_REMOVE)
n_screen = &n_wait_conc_remove;
else
n_screen = &n_wait_conc_add;
processing();
for (k = 0; k < 3; k++) {
buffer[k] = __body_init_status(n_screen->header, &header_lines, (k + 8));
buffer[k] = print_device(dev, buffer[k], "1", (k + 5));
}
rc = ipr_send_diagnostics(ses, &ses_data, ntohs(ses_data.byte_count) + 4);
if (rc) {
for (k = 0; k < 3; k++) {
free(buffer[k]);
buffer[k] = NULL;
}
return 30 | EXIT_FLAG;
}
/* call screen driver */
do {
n_screen->body = buffer[toggle%3];
s_out = screen_driver(n_screen, header_lines, i_con);
rc = s_out->rc;
free(s_out);
toggle++;
} while (rc == TOGGLE_SCREEN);
for (k = 0; k < 3; k++) {
free(buffer[k]);
buffer[k] = NULL;
}
n_screen->body = NULL;
if (ioa->sis64)
elem_status = get_elem_status_64bit(dev, ses, &ses_data, &ses_cfg);
else
elem_status = get_elem_status(dev, ses, &ses_data, &ses_cfg);
if (!elem_status)
return 30 | EXIT_FLAG;;
/* turn light off flashing light */
overall = ipr_get_overall_elem(&ses_data, &ses_cfg);
overall->select = 1;
overall->disable_resets = 0;
overall->insert = 0;
overall->remove = 0;
overall->identify = 0;
elem_status->select = 1;
elem_status->insert = 0;
elem_status->remove = 0;
elem_status->identify = 0;
ipr_send_diagnostics(ses, &ses_data, ntohs(ses_data.byte_count) + 4);
/* call function to complete conc maint */
if (!rc) {
if (action == IPR_VERIFY_CONC_REMOVE) {
rc = process_conc_maint(i_con, IPR_WAIT_CONC_REMOVE);
if (!rc) {
dev_rcd = dev->dev_rcd;
getmaxyx(stdscr,max_y,max_x);
move(max_y-1,0);
printw(_("Operation in progress - please wait"));
refresh();
if (dev->ioa->sis64) {
if (!remove_or_add_back_device_64bit(dev)) {
clear();
move(max_y/2,0);
printw(_(" Disk was not removed!") );
refresh();
sleep(5);
}
}
else {
ipr_write_dev_attr(dev, "delete", "1");
evaluate_device(dev, dev->ioa, 0);
ipr_del_zeroed_dev(dev);
}
}
} else if (action == IPR_VERIFY_CONC_ADD) {
rc = process_conc_maint(i_con, IPR_WAIT_CONC_ADD);
if (!rc) {
getmaxyx(stdscr,max_y,max_x);
move(max_y-1,0);
printw(_("Operation in progress - please wait"));
refresh();
if (ioa->sis64)
wait_for_new_dev_64bit(ioa, res_path);
else
wait_for_new_dev(ioa, &res_addr);
}
}
}
return rc;
}
/**
* format_in_prog - check to determine if format is in progress
* @dev: ipr dev struct
*
* Returns:
* 0 if format is not in progress / 1 if format is in progress
**/
static int format_in_prog(struct ipr_dev *dev)
{
struct ipr_cmd_status cmd_status;
struct sense_data_t sense_data;
int rc;
if (ipr_is_af_dasd_device(dev)) {
rc = ipr_query_command_status(dev, &cmd_status);
if (!rc && cmd_status.num_records != 0 &&
cmd_status.record->status == IPR_CMD_STATUS_IN_PROGRESS)
return 1;
} else if (ipr_is_gscsi(dev)) {
rc = ipr_test_unit_ready(dev, &sense_data);
if (rc == CHECK_CONDITION &&
(sense_data.error_code & 0x7F) == 0x70 &&
(sense_data.sense_key & 0x0F) == 0x02 && /* NOT READY */
sense_data.add_sense_code == 0x04 && /* LOGICAL UNIT NOT READY */
sense_data.add_sense_code_qual == 0x04) /* FORMAT IN PROGRESS */
return 1;
}
return 0;
}
/**
* free_empty_slot -
* @dev: ipr dev struct
*
* Returns:
* nothing
**/
static void free_empty_slot(struct ipr_dev *dev)
{
if (!dev->scsi_dev_data)
return;
if (dev->scsi_dev_data->type != IPR_TYPE_EMPTY_SLOT)
return;
free(dev->scsi_dev_data);
dev->scsi_dev_data = NULL;
free(dev);
}
/**
* free_empty_slots -
* @dev: ipr dev struct
* @num: number of slots to free
*
* Returns:
* nothing
**/
static void free_empty_slots(struct ipr_dev **dev, int num)
{
int i;
for (i = 0; i < num; i++) {
if (!dev[i] || !dev[i]->scsi_dev_data)
continue;
if (dev[i]->scsi_dev_data->type != IPR_TYPE_EMPTY_SLOT)
continue;
free_empty_slot(dev[i]);
dev[i] = NULL;
}
}
/**
* get_res_addrs -
* @dev: ipr dev struct
*
* Returns:
* 0
**/
static int get_res_addrs(struct ipr_dev *dev)
{
struct ipr_res_addr *ra;
struct ipr_res_addr_aliases aliases;
int i = 0;
ipr_query_res_addr_aliases(dev->ioa, &(dev->res_addr[0]), &aliases);
for_each_ra_alias(ra, &aliases) {
memcpy(&(dev->res_addr[i]), ra, sizeof(*ra));
if (++i >= IPR_DEV_MAX_PATHS)
break;
}
scsi_dbg(dev, "Resource address aliases: %08X %08X\n",
IPR_GET_PHYSICAL_LOCATOR(&(dev->res_addr[0])),
IPR_GET_PHYSICAL_LOCATOR(&(dev->res_addr[1])));
return 0;
}
/**
* get_res_path -
* @dev: ipr dev struct
*
* Returns:
* 0
**/
static int get_res_path(struct ipr_dev *dev)
{
struct ipr_res_path *rp;
struct ipr_res_path_aliases aliases;
int i = 0;
ipr_query_res_path_aliases(dev->ioa, &(dev->res_path[0]), &aliases);
for_each_rp_alias(rp, &aliases) {
memcpy(&(dev->res_path[i]), rp, sizeof(*rp));
if (++i >= IPR_DEV_MAX_PATHS)
break;
}
while (i < IPR_DEV_MAX_PATHS)
memset(&dev->res_path[i++], 0xff, sizeof(struct ipr_res_path));
return 0;
}
/**
* alloc_empty_slot -
* @ses: ipr dev struct
* @slot: slot number
* @is_vses: vses flag
*
* Returns:
* ipr_dev struct
**/
static struct ipr_dev *alloc_empty_slot(struct ipr_dev *ses, int slot, int is_vses, char *phy_loc)
{
struct ipr_ioa *ioa = ses->ioa;
struct ipr_dev *dev;
struct scsi_dev_data *scsi_dev_data;
int bus = ses->scsi_dev_data->channel;
int box;
if (ioa->hop_count == IPR_2BIT_HOP)
box = ses->scsi_dev_data->phy_2bit_hop.box;
else
box = ses->scsi_dev_data->phy.box;
dev = calloc(1, sizeof(*dev));
scsi_dev_data = calloc(1, sizeof(*scsi_dev_data));
scsi_dev_data->type = IPR_TYPE_EMPTY_SLOT;
scsi_dev_data->host = ioa->host_num;
scsi_dev_data->lun = 0;
if (is_vses) {
scsi_dev_data->channel = slot;
scsi_dev_data->id = 0;
} else {
scsi_dev_data->channel = bus;
if (ioa->hop_count == IPR_2BIT_HOP)
scsi_dev_data->id = slot | (box << 6);
else
scsi_dev_data->id = slot | (box << 5);
}
dev->res_addr[0].bus = scsi_dev_data->channel;
dev->res_addr[0].target = scsi_dev_data->id;
dev->res_addr[0].lun = 0;
dev->scsi_dev_data = scsi_dev_data;
dev->ses[0] = ses;
dev->ioa = ioa;
dev->physical_location[0] = '\0';
strncat(dev->physical_location, phy_loc, strlen(phy_loc));
get_res_addrs(dev);
return dev;
}
/**
* alloc_empty_slot_64bit -
* @ses: ipr dev struct
* @slot: slot number
* @is_vses: vses flag
*
* Returns:
* ipr_dev struct
**/
static struct ipr_dev *alloc_empty_slot_64bit(struct ipr_dev *ses, int slot, int is_vses, char *phy_loc)
{
struct ipr_ioa *ioa = ses->ioa;
struct ipr_dev *dev;
struct scsi_dev_data *scsi_dev_data;
char slot_buf[50];
int n, len;
dev = calloc(1, sizeof(*dev));
scsi_dev_data = calloc(1, sizeof(*scsi_dev_data));
scsi_dev_data->type = IPR_TYPE_EMPTY_SLOT;
scsi_dev_data->host = ioa->host_num;
n = sprintf(slot_buf, "%02X",slot);
strncpy(scsi_dev_data->res_path, ses->scsi_dev_data->res_path, strlen(ses->scsi_dev_data->res_path));
scsi_dev_data->res_path[strlen(ses->scsi_dev_data->res_path) -2] = slot_buf[0];
scsi_dev_data->res_path[strlen(ses->scsi_dev_data->res_path) -1] = slot_buf[1];
strncpy(dev->res_path_name, scsi_dev_data->res_path, strlen(scsi_dev_data->res_path));
len = strlen(ses->scsi_dev_data->res_path);
memcpy(&dev->res_path[0], &ses->res_path[0], sizeof(struct ipr_res_path));
dev->res_path[0].res_path_bytes[len/3] = slot;
dev->scsi_dev_data = scsi_dev_data;
dev->ses[0] = ses;
dev->ioa = ioa;
dev->physical_location[0] = '\0';
strncat(dev->physical_location, phy_loc, strlen(phy_loc));
get_res_path(dev);
return dev;
}
/**
* can_perform_conc_action -
* @dev: ipr dev struct
* @action: action type
*
* Returns:
* 1 if able to perform the action / 0 otherwise
**/
static int can_perform_conc_action(struct ipr_dev *dev, int action)
{
if (action == IPR_CONC_REMOVE) {
if (format_in_prog(dev))
return 0;
if (!ipr_can_remove_device(dev))
return 0;
} else if (dev->scsi_dev_data && action != IPR_CONC_IDENTIFY)
return 0;
return 1;
}
/**
* get_dev_for_slot -
* @ses: ipr dev struct
* @slot: slot number
* @is_vses: action type
*
* Returns:
* ipr_dev struct if success / NULL otherwise
**/
static struct ipr_dev *get_dev_for_slot(struct ipr_dev *ses, int slot, int is_vses, char *phy_loc)
{
struct ipr_ioa *ioa = ses->ioa;
struct ipr_dev *dev;
struct ipr_res_addr *ra;
int bus = ses->scsi_dev_data->channel;
int box, i;
if (ioa->hop_count == IPR_2BIT_HOP)
box = ses->scsi_dev_data->phy_2bit_hop.box;
else
box = ses->scsi_dev_data->phy.box;
for_each_dev(ses->ioa, dev) {
if (ipr_is_ses(dev))
continue;
for_each_ra(ra, dev) {
if (is_vses && (ra->bus != slot || ra->target != 0))
continue;
if (ioa->hop_count == IPR_2BIT_HOP) {
if (!is_vses && (ra->bus != bus ||
ra->phy_2bit_hop.box != box ||
ra->phy_2bit_hop.phy != slot))
continue;
} else {
if (!is_vses && (ra->bus != bus ||
ra->phy.box != box ||
ra->phy.phy != slot))
continue;
}
for (i = 0; i < IPR_DEV_MAX_PATHS; i++) {
if (dev->ses[i])
continue;
dev->ses[i] = ses;
}
dev->physical_location[0] = '\0';
if (strlen(phy_loc))
strncat(dev->physical_location, phy_loc, strlen(phy_loc));
return dev;
}
}
return NULL;
}
/**
* get_dev_for_slot_64bit -
* @ses: ipr dev struct
* @slot: slot number
* @is_vses: action type
*
* Returns:
* ipr_dev struct if success / NULL otherwise
**/
static struct ipr_dev *get_dev_for_slot_64bit(struct ipr_dev *ses, int slot, char *phy_loc)
{
struct ipr_dev *dev;
struct ipr_res_path *rp;
int i, dev_slot, res_path_len,ses_path_len;
for_each_dev(ses->ioa, dev) {
if (ipr_is_ses(dev))
continue;
ses_path_len = strlen(ses->res_path_name);
res_path_len = strlen(dev->res_path_name);
dev_slot = strtoul(dev->res_path_name + (res_path_len - 2), NULL, 16);
if (ses_path_len != res_path_len)
continue;
if (ipr_is_volume_set(dev) || ipr_is_array(dev))
continue;
for_each_rp(rp, dev) {
if ( !memcmp(&rp->res_path_bytes, &ses->res_path[0], ses_path_len/3) && slot == dev_slot ) {
for (i = 0; i < IPR_DEV_MAX_PATHS; i++) {
if (dev->ses[i])
continue;
dev->ses[i] = ses;
break;
}
dev->physical_location[0] = '\0';
if (strlen(phy_loc))
strncat(dev->physical_location, phy_loc, strlen(phy_loc));
return dev;
}
}
}
return NULL;
}
/**
* search_empty_dev64 -
* @dev: ipr dev struct
* @devs: ipr dev struct array
* @num_devs: number of devices
*
* Returns:
* 1 if duplicate device detected / 0 otherwise
**/
static int search_empty_dev64(struct ipr_dev *dev, struct ipr_dev **devs, int num_devs)
{
int i;
u8 empty_res_path[8];
memset(&empty_res_path, 0xff, sizeof(struct ipr_res_path));
if (memcmp(&dev->res_path[1], &empty_res_path, sizeof(struct ipr_res_path)))
return 0;
for (i = 0; i < num_devs; i++) {
if (devs[i]->scsi_dev_data && devs[i]->scsi_dev_data->type == IPR_TYPE_EMPTY_SLOT &&
!strncmp(dev->physical_location, devs[i]->physical_location, PHYSICAL_LOCATION_LENGTH)) {
memcpy(&devs[i]->res_path[1], &dev->res_path[0], sizeof(struct ipr_res_path));
devs[i]->ses[1] = dev->ses[0];
return 1;
}
}
return 0;
}
/**
* conc_dev_is_dup -
* @dev: ipr dev struct
* @devs: ipr dev struct array
* @num_devs: number of devices
*
* Returns:
* 1 if duplicate device detected / 0 otherwise
**/
static int conc_dev_is_dup(struct ipr_dev *dev, struct ipr_dev **devs, int num_devs)
{
int i;
for (i = 0; i < num_devs; i++)
if (dev == devs[i])
return 1;
return 0;
}
/**
* dev_is_dup - indicate whether or not the devices are the same
* @first: ipr dev struct
* @second: ipr dev struct
*
* Returns:
* 1 if devices are the same / 0 otherwise
**/
static int dev_is_dup(struct ipr_dev *first, struct ipr_dev *second)
{
struct ipr_res_addr *first_ra;
struct ipr_res_addr *second_ra;
if (first->ioa != second->ioa)
return 0;
for_each_ra(first_ra, first) {
for_each_ra(second_ra, second) {
if (!memcmp(first_ra, second_ra, sizeof(*first_ra)))
return 1;
}
}
return 0;
}
/**
* dev_is_dup64 - indicate whether or not the devices are the same
* @first: ipr dev struct
* @second: ipr dev struct
*
* Returns:
* 1 if devices are the same / 0 otherwise
**/
static int dev_is_dup64(struct ipr_dev *first, struct ipr_dev *second)
{
struct ipr_res_path *first_rp;
struct ipr_res_path *second_rp;
struct ipr_res_path no_exist_rp;
if (first->ioa != second->ioa)
return 0;
memset(&no_exist_rp, 0xff, sizeof(struct ipr_res_path));
for_each_rp(first_rp, first) {
for_each_rp(second_rp, second) {
if (!memcmp(first_rp, &no_exist_rp, sizeof(*first_rp))
|| !memcmp(second_rp, &no_exist_rp, sizeof(*second_rp)))
continue;
if (!memcmp(first_rp, second_rp, sizeof(*first_rp)))
return 1;
}
}
return 0;
}
/**
* find_dup -
* @dev: ipr dev struct
* @devs: ipr dev struct array
* @num_devs: number of devices
*
* Returns:
* ipr_dev struct if duplicate found / NULL otherwise
**/
static struct ipr_dev *find_dup(struct ipr_dev *dev, struct ipr_dev **devs, int num_devs)
{
int i;
for (i = 0; i < num_devs; i++) {
if (dev->ioa->sis64) {
if (dev_is_dup64(dev, devs[i]))
return devs[i];
}
else {
if (dev_is_dup(dev, devs[i]))
return devs[i];
}
}
return NULL;
}
/**
* remove_dup_dev -
* @dev: ipr dev struct
* @devs: ipr dev struct array
* @num_devs: number of devices
*
* Returns:
* num_devs
**/
static int remove_dup_dev(struct ipr_dev *dev, struct ipr_dev **devs, int num_devs)
{
int i, j;
for (i = 0; i < num_devs; i++) {
if (dev == devs[i]) {
free_empty_slot(dev);
devs[i] = NULL;
for (j = (i + 1); j < num_devs; j++) {
devs[j - 1] = devs[j];
devs[j] = NULL;
}
return (num_devs - 1);
}
}
return num_devs;
}
/**
* remove_conc_dups -
* @devs: ipr dev struct array
* @num_devs: number of devices
*
* Returns:
* num_devs
**/
static int remove_conc_dups(struct ipr_dev **devs, int num_devs)
{
int i;
struct ipr_dev *dev;
for (i = 0; i < num_devs; i++) {
dev = find_dup(devs[i], &devs[i+1], (num_devs - i - 1));
if (!dev)
continue;
num_devs = remove_dup_dev(dev, devs, num_devs);
}
return num_devs;
}
/**
* get_conc_devs -
* @ret: ipr dev struct
* @action: action typoe
*
* Returns:
* num)devs
**/
static int get_conc_devs(struct ipr_dev ***ret, int action)
{
struct ipr_ioa *ioa;
struct ipr_encl_status_ctl_pg ses_data;
struct ipr_drive_elem_status *elem_status, *overall;
struct ipr_dev **devs = NULL;
struct ipr_dev *ses, *dev;
int num_devs = 0;
int ses_bus, scsi_id_found, is_spi, is_vses;
struct ipr_ses_config_pg ses_cfg;
struct drive_elem_desc_pg drive_data;
char phy_loc[PHYSICAL_LOCATION_LENGTH + 1];
int times, index;
for_each_primary_ioa(ioa) {
is_spi = ioa_is_spi(ioa);
for_each_hotplug_dev(ioa, dev) {
if (ioa->sis64)
get_res_path(dev);
else
get_res_addrs(dev);
}
for_each_ses(ioa, ses) {
times = 5;
if (strlen(ses->physical_location) == 0)
get_ses_phy_loc(ses);
while (times--) {
if (!ipr_receive_diagnostics(ses, 2, &ses_data, sizeof(ses_data)))
break;
}
if (times < 0 ) continue;
if (ipr_receive_diagnostics(ses, 1, &ses_cfg, sizeof(ses_cfg)))
continue;
if (ipr_receive_diagnostics(ses, 7, &drive_data, sizeof(drive_data)))
continue;
overall = ipr_get_overall_elem(&ses_data, &ses_cfg);
ses_bus = ses->scsi_dev_data->channel;
scsi_id_found = 0;
if (!is_spi && (overall->device_environment == 0))
is_vses = 1;
else
is_vses = 0;
scsi_dbg(ses, "%s\n", is_vses ? "Found VSES" : "Found real SES");
for_each_elem_status(elem_status, &ses_data, &ses_cfg) {
index = index_in_page2(&ses_data, elem_status->slot_id);
if (index != -1)
get_drive_phy_loc_with_ses_phy_loc(ses, &drive_data, index, phy_loc, 0);
if (elem_status->status == IPR_DRIVE_ELEM_STATUS_UNSUPP)
continue;
if (elem_status->status == IPR_DRIVE_ELEM_STATUS_NO_ACCESS)
continue;
if (is_spi && (scsi_id_found & (1 << elem_status->slot_id)))
continue;
scsi_id_found |= (1 << elem_status->slot_id);
if (elem_status->status == IPR_DRIVE_ELEM_STATUS_EMPTY) {
if (ioa->sis64) {
dev = alloc_empty_slot_64bit(ses, elem_status->slot_id, is_vses, phy_loc);
if (!search_empty_dev64(dev, devs, num_devs)){
devs = realloc(devs, (sizeof(struct ipr_dev *) * (num_devs + 1)));
devs[num_devs++] = dev;
}
else
free_empty_slot(dev);
}
else {
devs = realloc(devs, (sizeof(struct ipr_dev *) * (num_devs + 1)));
devs[num_devs++] = alloc_empty_slot(ses, elem_status->slot_id, is_vses, phy_loc);
}
continue;
}
if (ioa->sis64)
dev = get_dev_for_slot_64bit(ses, elem_status->slot_id, phy_loc);
else
dev = get_dev_for_slot(ses, elem_status->slot_id, is_vses, phy_loc);
if (dev && !can_perform_conc_action(dev, action))
continue;
if (dev && conc_dev_is_dup(dev, devs, num_devs))
continue;
else if (!dev) {
if (ioa->sis64)
dev = alloc_empty_slot_64bit(ses, elem_status->slot_id, is_vses, phy_loc);
else
dev = alloc_empty_slot(ses, elem_status->slot_id, is_vses, phy_loc);
}
devs = realloc(devs, (sizeof(struct ipr_dev *) * (num_devs + 1)));
devs[num_devs++] = dev;
}
}
}
num_devs = remove_conc_dups(devs, num_devs);
*ret = devs;
return num_devs;
}
/**
* start_conc_maint -
* @i_con: i_container struct
* @action: action type
*
* Returns:
* 0 if success / non-zero on failure FIXME
**/
int start_conc_maint(i_container *i_con, int action)
{
int rc, s_rc, i, k;
char *buffer[3];
int num_lines = 0;
struct screen_output *s_out;
struct ipr_dev **devs;
int toggle = 0;
s_node *n_screen;
int header_lines;
int num_devs;
processing();
rc = RC_SUCCESS;
i_con = free_i_con(i_con);
check_current_config(false);
/* Setup screen title */
if (action == IPR_CONC_REMOVE)
n_screen = &n_concurrent_remove_device;
else
n_screen = &n_concurrent_add_device;
body_init_status_conc(buffer, n_screen->header, &header_lines);
num_devs = get_conc_devs(&devs, action);
for (i = 0; i < num_devs; i++) {
print_dev_conc(k, devs[i], buffer, "%1", k);
i_con = add_i_con(i_con,"\0", devs[i]);
num_lines++;
}
if (num_lines == 0) {
for (k = 0; k < 3; k++)
buffer[k] = add_string_to_body(buffer[k], _("(No Eligible Devices Found)"),
"", NULL);
}
do {
n_screen->body = buffer[toggle%3];
s_out = screen_driver(n_screen, header_lines, i_con);
s_rc = s_out->rc;
free(s_out);
toggle++;
} while (s_rc == TOGGLE_SCREEN);
for (k = 0; k < 3; k++) {
free(buffer[k]);
buffer[k] = NULL;
}
n_screen->body = NULL;
if (!s_rc) {
if (action == IPR_CONC_REMOVE)
rc = process_conc_maint(i_con, IPR_VERIFY_CONC_REMOVE);
else
rc = process_conc_maint(i_con, IPR_VERIFY_CONC_ADD);
}
if (rc & CANCEL_FLAG) {
s_status.index = (rc & ~CANCEL_FLAG);
rc = (rc | REFRESH_FLAG) & ~CANCEL_FLAG;
}
free_empty_slots(devs, num_devs);
free(devs);
return rc;
}
/**
* concurrent_add_device -
* @i_con: i_container struct
*
* Returns:
* 0 if success / non-zero on failure FIXME
**/
int concurrent_add_device(i_container *i_con)
{
return start_conc_maint(i_con, IPR_CONC_ADD);
}
/**
* concurrent_remove_device -
* @i_con: i_container struct
*
* Returns:
* 0 if success / non-zero on failure FIXME
**/
int concurrent_remove_device(i_container *i_con)
{
return start_conc_maint(i_con, IPR_CONC_REMOVE);
}
/**
* path_details -
* @i_con: i_container struct
*
* Returns:
* 0 if success / non-zero on failure FIXME
**/
int path_details(i_container *i_con)
{
int rc, header_lines = 2;
char *body = NULL;
struct ipr_dev *dev;
struct screen_output *s_out;
char location[512];
char *name;
rc = RC_SUCCESS;
processing();
if ((rc = device_details_get_device(i_con, &dev)))
return rc;
if (strlen(dev->dev_name))
name = dev->dev_name;
else
name = dev->gen_name;
if (dev->ioa->sis64)
sprintf(location, "%d/%s", dev->ioa->host_num,dev->scsi_dev_data->res_path);
else
sprintf(location, "%s/%d:%d:%d:%d", dev->ioa->pci_address, dev->ioa->host_num,
dev->res_addr[0].bus, dev->res_addr[0].target, dev->res_addr[0].lun);
body = add_line_to_body(body, _("Device"), name);
if (strlen(dev->physical_location))
body = add_line_to_body(body, _("Location"), dev->physical_location);
else
body = add_line_to_body(body, _("Location"), location);
body = __body_init(body, n_path_details.header, &header_lines);
body = status_header(body, &header_lines, 6);
body = print_path_details(dev, body);
n_path_details.body = body;
s_out = screen_driver(&n_path_details, header_lines, i_con);
free(n_path_details.body);
n_path_details.body = NULL;
rc = s_out->rc;
free(s_out);
return rc;
}
/**
* path_status -
* @i_con: i_container struct
*
* Returns:
* 0 if success / non-zero on failure FIXME
**/
int path_status(i_container * i_con)
{
int rc, k, header_lines;
char *buffer[2];
struct ipr_ioa *ioa;
struct ipr_dev *dev;
struct screen_output *s_out;
int toggle = 1, num_devs = 0;
rc = RC_SUCCESS;
processing();
i_con = free_i_con(i_con);
check_current_config(false);
for (k = 0; k < 2; k++)
buffer[k] = __body_init_status(n_path_status.header, &header_lines, k);
for_each_sas_ioa(ioa) {
if (ioa->ioa_dead)
continue;
for_each_disk(ioa, dev) {
buffer[0] = __print_device(dev, buffer[0], "%1", 1, 1, 1, 0, 0, 1, 0, 1, 0 ,0, 0, 0, 0, 0, 0);
buffer[1] = __print_device(dev, buffer[1], "%1", 1, 1, 0, 0, 0, 0, 0, 1, 0 ,0, 0, 0, 0, 0, 0);
i_con = add_i_con(i_con, "\0", dev);
num_devs++;
}
}
if (!num_devs)
/* "No SAS disks available" */
return 76;
do {
n_path_status.body = buffer[toggle&1];
s_out = screen_driver(&n_path_status, header_lines, i_con);
rc = s_out->rc;
free(s_out);
toggle++;
} while (rc == TOGGLE_SCREEN);
for (k = 0; k < 2; k++) {
free(buffer[k]);
buffer[k] = NULL;
}
n_path_status.body = NULL;
return rc;
}
/**
* init_device -
* @i_con: i_container struct
*
* Returns:
* 0 if success / non-zero on failure FIXME
**/
int init_device(i_container *i_con)
{
int rc, k;
struct scsi_dev_data *scsi_dev_data;
struct ipr_dev_record *device_record;
int can_init;
int dev_type;
char *buffer[2];
int num_devs = 0;
struct ipr_ioa *ioa;
struct ipr_dev *dev;
struct screen_output *s_out;
int header_lines;
int toggle = 0;
rc = RC_SUCCESS;
processing();
i_con = free_i_con(i_con);
check_current_config(false);
body_init_status(buffer, n_init_device.header, &header_lines);
for_each_primary_ioa(ioa) {
if (ioa->ioa_dead)
continue;
for_each_dev(ioa, dev) {
can_init = 1;
scsi_dev_data = dev->scsi_dev_data;
/* If not a DASD, disallow format */
if (!scsi_dev_data || ipr_is_hot_spare(dev) ||
ipr_is_volume_set(dev) || !device_supported(dev) ||
(scsi_dev_data->type != TYPE_DISK &&
scsi_dev_data->type != IPR_TYPE_AF_DISK))
continue;
/* If Advanced Function DASD */
if (ipr_is_af_dasd_device(dev)) {
dev_type = IPR_AF_DASD_DEVICE;
device_record = dev->dev_rcd;
/* We allow the user to format the drive if nobody is using it */
if (scsi_dev_data->opens != 0) {
syslog(LOG_ERR,
_("Format not allowed to %s, device in use\n"),
dev->gen_name);
continue;
}
if (ipr_is_array_member(dev)) {
if (device_record->no_cfgte_vol)
can_init = 1;
else
can_init = 0;
} else
can_init = is_format_allowed(dev);
} else if (scsi_dev_data->type == TYPE_DISK) {
/* We allow the user to format the drive if nobody is using it */
if (scsi_dev_data->opens != 0) {
syslog(LOG_ERR,
_("Format not allowed to %s, device in use\n"),
dev->gen_name);
continue;
}
dev_type = IPR_JBOD_DASD_DEVICE;
can_init = is_format_allowed(dev);
} else
continue;
if (can_init) {
add_format_device(dev, 0);
print_dev(k, dev, buffer, "%1", k);
i_con = add_i_con(i_con,"\0",dev_init_tail);
num_devs++;
}
}
}
if (!num_devs)
/* "No units available for initialize and format" */
return 49;
do {
n_init_device.body = buffer[toggle&1];
s_out = screen_driver(&n_init_device, header_lines, i_con);
rc = s_out->rc;
free(s_out);
toggle++;
} while (rc == TOGGLE_SCREEN);
for (k = 0; k < 2; k++) {
free(buffer[k]);
buffer[k] = NULL;
}
n_init_device.body = NULL;
free_devs_to_init();
return rc;
}
/**
* confirm_init_device -
* @i_con: i_container struct
*
* Returns:
* 0 if success / non-zero on failure FIXME
**/
int confirm_init_device(i_container *i_con)
{
char *input;
char *buffer[2];
struct devs_to_init_t *cur_dev_init;
int rc = RC_SUCCESS;
struct screen_output *s_out;
int header_lines = 0;
int toggle = 0;
int k;
i_container *temp_i_con;
int found = 0;
int post_attention = 0;
struct ipr_dev *dev;
for_each_icon(temp_i_con) {
if (temp_i_con->data == NULL)
continue;
input = temp_i_con->field_data;
if (strcmp(input, "1") == 0) {
found++;
cur_dev_init =(struct devs_to_init_t *)(temp_i_con->data);
cur_dev_init->do_init = 1;
dev = cur_dev_init->dev;
if (ipr_is_gscsi(dev))
post_attention++;
} else {
cur_dev_init = (struct devs_to_init_t *)(temp_i_con->data);
cur_dev_init->do_init = 0;
}
}
if (!found)
return INVALID_OPTION_STATUS;
if (post_attention) {
for (k = 0; k < 2; k++) {
header_lines = 0;
buffer[k] = add_string_to_body(NULL, _("ATTENTION! System crash may occur "
"if selected device is in use. Data loss will "
"occur on selected device. Proceed with "
"caution.\n\n"), "", &header_lines);
buffer[k] = __body_init(buffer[k],n_confirm_init_device.header, &header_lines);
buffer[k] = status_header(buffer[k], &header_lines, k);
}
} else {
body_init_status(buffer, n_confirm_init_device.header, &header_lines);
}
for_each_dev_to_init(cur_dev_init) {
if (!cur_dev_init->do_init)
continue;
print_dev(k, cur_dev_init->dev, buffer, "1", k);
}
do {
n_confirm_init_device.body = buffer[toggle&1];
s_out = screen_driver(&n_confirm_init_device, header_lines, NULL);
rc = s_out->rc;
free(s_out);
toggle++;
} while (rc == TOGGLE_SCREEN);
for (k = 0; k < 2; k++) {
free(buffer[k]);
buffer[k] = NULL;
}
n_confirm_init_device.body = NULL;
return rc;
}
/**
* dev_init_complete -
* @num_devs: number of devices
*
* Returns:
* 50 | EXIT_FLAG if success / 51 | EXIT_FLAG on failure
**/
static int dev_init_complete(u8 num_devs)
{
int done_bad = 0;
struct ipr_cmd_status cmd_status;
struct ipr_cmd_status_record *status_record;
int not_done = 0;
int rc = 0;
struct devs_to_init_t *dev;
u32 percent_cmplt = 0;
struct sense_data_t sense_data;
struct ipr_ioa *ioa;
int pid = 1;
char dev_type[100];
int type;
while(1) {
if (pid)
rc = complete_screen_driver(&n_dev_init_complete, percent_cmplt, 0);
if (rc & EXIT_FLAG) {
pid = fork();
if (pid)
return rc;
rc = 0;
}
percent_cmplt = 100;
for_each_dev_to_init(dev) {
if (!dev->do_init || dev->done)
continue;
if (ipr_read_dev_attr(dev->dev, "type",
dev_type, 100)) {
dev->done = 1;
continue;
}
if (sscanf(dev_type, "%d", &type) != 1) {
dev->done = 1;
continue;
}
if (dev->dev_type == IPR_AF_DASD_DEVICE) {
if (type != IPR_TYPE_AF_DISK) {
dev->done = 1;
continue;
}
rc = ipr_query_command_status(dev->dev, &cmd_status);
if (rc || cmd_status.num_records == 0) {
dev->done = 1;
continue;
}
status_record = cmd_status.record;
if (status_record->status == IPR_CMD_STATUS_FAILED) {
done_bad = 1;
dev->done = 1;
} else if (status_record->status != IPR_CMD_STATUS_SUCCESSFUL) {
if (status_record->percent_complete < percent_cmplt)
percent_cmplt = status_record->percent_complete;
not_done = 1;
} else
dev->done = 1;
} else if (dev->dev_type == IPR_JBOD_DASD_DEVICE) {
if (type != TYPE_DISK) {
dev->done = 1;
continue;
}
/* Send Test Unit Ready to find percent complete in sense data. */
rc = ipr_test_unit_ready(dev->dev,
&sense_data);
if (rc < 0) {
dev->done = 1;
done_bad = 1;
continue;
}
if (rc == CHECK_CONDITION &&
(sense_data.error_code & 0x7F) == 0x70 &&
(sense_data.sense_key & 0x0F) == 0x02 &&
sense_data.add_sense_code == 0x04 &&
sense_data.add_sense_code_qual == 0x04) {
dev->cmplt = ((int)sense_data.sense_key_spec[1]*100)/0x100;
if (dev->cmplt < percent_cmplt)
percent_cmplt = dev->cmplt;
not_done = 1;
} else
dev->done = 1;
}
}
if (!not_done) {
for_each_dev_to_init(dev) {
if (!dev->do_init)
continue;
ioa = dev->ioa;
if (ipr_is_gscsi(dev->dev)) {
rc = ipr_test_unit_ready(dev->dev, &sense_data);
if (rc) {
done_bad = 1;
} else if (!ipr_is_af_blk_size(ioa, dev->new_block_size)) {
ipr_write_dev_attr(dev->dev, "rescan", "1");
ipr_init_dev(dev->dev);
}
}
if (dev->new_block_size != 0) {
if (ipr_is_af_blk_size(ioa, dev->new_block_size))
enable_af(dev->dev);
evaluate_device(dev->dev, ioa, dev->new_block_size);
}
ipr_device_unlock(dev->dev);
if (ipr_is_af_blk_size(ioa, dev->new_block_size) || ipr_is_af_dasd_device(dev->dev))
ipr_add_zeroed_dev(dev->dev);
}
flush_stdscr();
if (done_bad) {
if (!pid)
exit(0);
/* Initialize and format failed */
return 51 | EXIT_FLAG;
}
format_done = 1;
wait_for_formatted_af_dasd(30);
check_current_config(false);
if (!pid)
exit(0);
/* Initialize and format completed successfully */
return 50 | EXIT_FLAG;
}
not_done = 0;
sleep(1);
}
}
/**
* send_dev_inits -
* @i_con: i_container struct
*
* Returns:
* 50 | EXIT_FLAG if success / 51 | EXIT_FLAG on failure
**/
int send_dev_inits(i_container *i_con)
{
u8 num_devs = 0;
struct devs_to_init_t *cur_dev_init;
int rc = 0;
struct ipr_query_res_state res_state;
u8 ioctl_buffer[IOCTL_BUFFER_SIZE];
struct ipr_mode_parm_hdr *mode_parm_hdr;
struct ipr_block_desc *block_desc;
struct scsi_dev_data *scsi_dev_data;
struct ipr_ioa *ioa;
int status;
int opens;
u8 failure = 0;
int max_y, max_x;
u8 length;
if (use_curses) {
getmaxyx(stdscr,max_y,max_x);
mvaddstr(max_y-1,0,wait_for_next_screen);
refresh();
}
for_each_dev_to_init(cur_dev_init) {
if (cur_dev_init->do_init &&
cur_dev_init->dev_type == IPR_AF_DASD_DEVICE) {
num_devs++;
ioa = cur_dev_init->ioa;
rc = ipr_query_resource_state(cur_dev_init->dev, &res_state);
if (rc != 0) {
cur_dev_init->do_init = 0;
num_devs--;
failure++;
continue;
}
scsi_dev_data = cur_dev_init->dev->scsi_dev_data;
if (!scsi_dev_data) {
cur_dev_init->do_init = 0;
num_devs--;
failure++;
continue;
}
opens = num_device_opens(scsi_dev_data->host,
scsi_dev_data->channel,
scsi_dev_data->id,
scsi_dev_data->lun);
if ((opens != 0) && (!res_state.read_write_prot)) {
syslog(LOG_ERR,
_("Cannot obtain exclusive access to %s\n"),
cur_dev_init->dev->gen_name);
cur_dev_init->do_init = 0;
num_devs--;
failure++;
continue;
}
ipr_disable_qerr(cur_dev_init->dev);
if (cur_dev_init->new_block_size == IPR_JBOD_BLOCK_SIZE ||
cur_dev_init->new_block_size == IPR_JBOD_4K_BLOCK_SIZE) {
/* Issue mode select to change block size */
mode_parm_hdr = (struct ipr_mode_parm_hdr *)ioctl_buffer;
memset(ioctl_buffer, 0, 255);
mode_parm_hdr->block_desc_len = sizeof(struct ipr_block_desc);
block_desc = (struct ipr_block_desc *)(mode_parm_hdr + 1);
/* Setup block size */
block_desc->block_length[0] = 0x00;
block_desc->block_length[1] = cur_dev_init->new_block_size >> 8;
block_desc->block_length[2] = cur_dev_init->new_block_size & 0xff;
rc = ipr_mode_select(cur_dev_init->dev,ioctl_buffer,
sizeof(struct ipr_block_desc) +
sizeof(struct ipr_mode_parm_hdr));
if (rc != 0) {
cur_dev_init->do_init = 0;
num_devs--;
failure++;
continue;
}
}
/* Issue the format. Failure will be detected by query command status */
rc = ipr_format_unit(cur_dev_init->dev);
} else if (cur_dev_init->do_init &&
cur_dev_init->dev_type == IPR_JBOD_DASD_DEVICE) {
num_devs++;
ioa = cur_dev_init->ioa;
scsi_dev_data = cur_dev_init->dev->scsi_dev_data;
if (!scsi_dev_data) {
cur_dev_init->do_init = 0;
num_devs--;
failure++;
continue;
}
opens = num_device_opens(scsi_dev_data->host,
scsi_dev_data->channel,
scsi_dev_data->id,
scsi_dev_data->lun);
if (opens) {
syslog(LOG_ERR,
_("Cannot obtain exclusive access to %s\n"),
cur_dev_init->dev->gen_name);
cur_dev_init->do_init = 0;
num_devs--;
failure++;
continue;
}
ipr_disable_qerr(cur_dev_init->dev);
/* Issue mode select to setup block size */
mode_parm_hdr = (struct ipr_mode_parm_hdr *)ioctl_buffer;
memset(ioctl_buffer, 0, 255);
mode_parm_hdr->block_desc_len = sizeof(struct ipr_block_desc);
block_desc = (struct ipr_block_desc *)(mode_parm_hdr + 1);
/* xxx Setup block size */
if (cur_dev_init->new_block_size == ioa->af_block_size) {
block_desc->block_length[0] = 0x00;
block_desc->block_length[1] = ioa->af_block_size >> 8;
block_desc->block_length[2] = ioa->af_block_size & 0xff;
} else {
block_desc->block_length[0] = 0x00;
block_desc->block_length[1] = cur_dev_init->new_block_size >> 8;
block_desc->block_length[2] = cur_dev_init->new_block_size & 0xff;
}
length = sizeof(struct ipr_block_desc) +
sizeof(struct ipr_mode_parm_hdr);
status = ipr_mode_select(cur_dev_init->dev,
&ioctl_buffer, length);
if (status && ipr_is_af_blk_size(ioa, cur_dev_init->new_block_size)) {
cur_dev_init->do_init = 0;
num_devs--;
failure++;
continue;
}
/* unbind device */
if (ipr_jbod_sysfs_bind(cur_dev_init->dev,
IPR_JBOD_SYSFS_UNBIND))
syslog(LOG_ERR, "Could not unbind %s: %m\n",
cur_dev_init->dev->dev_name);
status = 0;
if (ipr_is_af_blk_size(ioa, cur_dev_init->new_block_size))
status = ipr_device_lock(cur_dev_init->dev);
if (!status)
status = ipr_format_unit(cur_dev_init->dev);
if (status) {
/* Send a device reset to cleanup any old state */
rc = ipr_reset_device(cur_dev_init->dev);
if (ipr_jbod_sysfs_bind(cur_dev_init->dev,
IPR_JBOD_SYSFS_BIND))
syslog(LOG_ERR,
"Could not bind %s: %m\n",
cur_dev_init->dev->dev_name);
ipr_device_unlock(cur_dev_init->dev);
cur_dev_init->do_init = 0;
num_devs--;
failure++;
continue;
}
}
}
if (num_devs)
rc = dev_init_complete(num_devs);
if (failure == 0)
return rc;
else
/* "Initialize and format failed" */
return 51 | EXIT_FLAG;
}
/**
* reclaim_cache -
* @i_con: i_container struct
*
* Returns:
* 0 if success / non-zero on failure FIXME
**/
int reclaim_cache(i_container* i_con)
{
int rc;
struct ipr_ioa *ioa;
struct ipr_reclaim_query_data *reclaim_buffer;
struct ipr_reclaim_query_data *cur_reclaim_buffer;
int found = 0;
char *buffer[2];
struct screen_output *s_out;
int header_lines;
int toggle=1;
int k;
processing();
/* empty the linked list that contains field pointens */
i_con = free_i_con(i_con);
check_current_config(false);
body_init_status(buffer, n_reclaim_cache.header, &header_lines);
reclaim_buffer = malloc(sizeof(struct ipr_reclaim_query_data) * num_ioas);
for (ioa = ipr_ioa_head, cur_reclaim_buffer = reclaim_buffer;
ioa != NULL; ioa = ioa->next, cur_reclaim_buffer++) {
rc = ipr_reclaim_cache_store(ioa,
IPR_RECLAIM_QUERY,
cur_reclaim_buffer);
if (rc != 0) {
ioa->reclaim_data = NULL;
continue;
}
ioa->reclaim_data = cur_reclaim_buffer;
if (cur_reclaim_buffer->reclaim_known_needed ||
cur_reclaim_buffer->reclaim_unknown_needed) {
print_dev(k, &ioa->ioa, buffer, "%1", k);
i_con = add_i_con(i_con, "\0",ioa);
found++;
}
}
if (!found) {
/* "No Reclaim IOA Cache Storage is necessary" */
rc = 38;
goto leave;
}
do {
n_reclaim_cache.body = buffer[toggle&1];
s_out = screen_driver(&n_reclaim_cache, header_lines, i_con);
rc = s_out->rc;
free(s_out);
toggle++;
} while (rc == TOGGLE_SCREEN);
leave:
for (k = 0; k < 2; k++) {
free(buffer[k]);
buffer[k] = NULL;
}
n_reclaim_cache.body = NULL;
return rc;
}
/**
* confirm_reclaim -
* @i_con: i_container struct
*
* Returns:
* 0 if success / non-zero on failure FIXME
**/
int confirm_reclaim(i_container *i_con)
{
struct ipr_ioa *ioa, *reclaim_ioa;
struct scsi_dev_data *scsi_dev_data;
struct ipr_query_res_state res_state;
struct ipr_dev *dev;
int k, rc;
char *buffer[2];
i_container* temp_i_con;
struct screen_output *s_out;
int header_lines;
int toggle=1;
int ioa_num = 0;
for_each_icon(temp_i_con) {
ioa = (struct ipr_ioa *) temp_i_con->data;
if (!ioa)
continue;
if (strcmp(temp_i_con->field_data, "1") != 0)
continue;
if (ioa->reclaim_data->reclaim_known_needed ||
ioa->reclaim_data->reclaim_unknown_needed) {
reclaim_ioa = ioa;
ioa_num++;
}
}
if (ioa_num == 0)
/* "Invalid option. No devices selected." */
return 17;
else if (ioa_num > 1)
/* "Error. More than one unit was selected." */
return 16;
/* One IOA selected, ready to proceed */
body_init_status(buffer, n_confirm_reclaim.header, &header_lines);
for_each_dev(reclaim_ioa, dev) {
scsi_dev_data = dev->scsi_dev_data;
if (!scsi_dev_data || !ipr_is_af(dev))
continue;
/* Do a query resource state to see whether or not the
device will be affected by the operation */
rc = ipr_query_resource_state(dev, &res_state);
if (rc != 0)
res_state.not_oper = 1;
if (!res_state.read_write_prot && !res_state.not_oper)
continue;
print_dev(k, dev, buffer, "1", k);
}
i_con = free_i_con(i_con);
/* Save the chosen IOA for later use */
add_i_con(i_con, "\0", reclaim_ioa);
do {
n_confirm_reclaim.body = buffer[toggle&1];
s_out = screen_driver(&n_confirm_reclaim, header_lines, i_con);
rc = s_out->rc;
free(s_out);
toggle++;
} while (rc == TOGGLE_SCREEN);
for (k = 0; k < 2; k++) {
free(buffer[k]);
buffer[k] = NULL;
}
n_confirm_reclaim.body = NULL;
return rc;
}
/**
* reclaim_warning -
* @i_con: i_container struct
*
* Returns:
* 0 if success / non-zero on failure FIXME
**/
int reclaim_warning(i_container *i_con)
{
struct ipr_ioa *reclaim_ioa;
int k, rc;
char *buffer[2];
struct screen_output *s_out;
int header_lines;
int toggle=1;
reclaim_ioa = (struct ipr_ioa *)i_con->data;
if (!reclaim_ioa)
/* "Invalid option. No devices selected." */
return 17;
for (k = 0; k < 2; k++) {
buffer[k] = __body_init_status(n_confirm_reclaim_warning.header, &header_lines, k);
buffer[k] = print_device(&reclaim_ioa->ioa, buffer[k], "1", k);
}
do {
n_confirm_reclaim_warning.body = buffer[toggle&1];
s_out = screen_driver(&n_confirm_reclaim_warning, header_lines, i_con);
rc = s_out->rc;
free(s_out);
toggle++;
} while (rc == TOGGLE_SCREEN);
for (k = 0; k < 2; k++) {
free(buffer[k]);
buffer[k] = NULL;
}
n_confirm_reclaim_warning.body = NULL;
return rc;
}
/**
* get_reclaim_results -
* @buf: ipr_reclaim_query_data struct
*
* Returns:
* ipr_reclaim_results struct
**/
static char *get_reclaim_results(struct ipr_reclaim_query_data *buf)
{
char *body = NULL;
char buffer[32];
if (buf->reclaim_known_performed) {
body = add_string_to_body(body,
_("IOA cache storage reclamation has completed. "
"Use the number of lost sectors to decide whether "
"to restore data from the most recent save media "
"or to continue with possible data loss.\n"),
"", NULL);
if (buf->num_blocks_needs_multiplier)
sprintf(buffer, "%12d", ntohs(buf->num_blocks) *
IPR_RECLAIM_NUM_BLOCKS_MULTIPLIER);
else
sprintf(buffer, "%12d", ntohs(buf->num_blocks));
body = add_line_to_body(body, _("Number of lost sectors"), buffer);
} else if (buf->reclaim_unknown_performed) {
body = add_string_to_body(body,
_("IOA cache storage reclamation has completed. "
"The number of lost sectors could not be determined.\n"),
"", NULL);
} else {
body = add_string_to_body(body,
_("IOA cache storage reclamation has failed.\n"),
"", NULL);
}
return body;
}
/**
* print_reclaim_results - display reclaim results
* @buf: ipr_reclaim_query_data struct
*
* Returns:
* nothing
**/
static void print_reclaim_results(struct ipr_reclaim_query_data *buf)
{
char *body = get_reclaim_results(buf);
printf("%s", body);
free(body);
}
/**
* reclaim_result -
* @i_con: i_container struct
*
* Returns:
* EXIT_FLAG if success / 37 | EXIT_FLAG on failure
**/
int reclaim_result(i_container *i_con)
{
int rc;
struct ipr_ioa *reclaim_ioa;
int max_y,max_x;
struct screen_output *s_out;
int action;
reclaim_ioa = (struct ipr_ioa *) i_con->data;
action = IPR_RECLAIM_PERFORM;
/* Everything going according to plan. Proceed with reclaim. */
getmaxyx(stdscr,max_y,max_x);
move(max_y-1,0);
printw("Please wait - reclaim in progress");
refresh();
if (reclaim_ioa->reclaim_data->reclaim_unknown_needed)
action |= IPR_RECLAIM_UNKNOWN_PERM;
rc = ipr_reclaim_cache_store(reclaim_ioa,
action,
reclaim_ioa->reclaim_data);
if (rc != 0)
/* "Reclaim IOA Cache Storage failed" */
return (EXIT_FLAG | 37);
memset(reclaim_ioa->reclaim_data, 0, sizeof(struct ipr_reclaim_query_data));
rc = ipr_reclaim_cache_store(reclaim_ioa,
IPR_RECLAIM_QUERY,
reclaim_ioa->reclaim_data);
if (rc != 0)
/* "Reclaim IOA Cache Storage failed" */
return (EXIT_FLAG | 37);
n_reclaim_result.body = get_reclaim_results(reclaim_ioa->reclaim_data);
s_out = screen_driver(&n_reclaim_result, 0, NULL);
free(s_out);
free(n_reclaim_result.body);
n_reclaim_result.body = NULL;
rc = ipr_reclaim_cache_store(reclaim_ioa,
IPR_RECLAIM_RESET,
reclaim_ioa->reclaim_data);
if (rc != 0)
rc = (EXIT_FLAG | 37);
else
rc = EXIT_FLAG;
return rc;
}
/**
* battery_maint -
* @i_con: i_container struct
*
* Returns:
* 0 if success / non-zero on failure FIXME
**/
int battery_maint(i_container *i_con)
{
int rc, k;
struct ipr_reclaim_query_data *cur_reclaim_buffer;
struct ipr_ioa *ioa;
int found = 0;
char *buffer[2];
struct screen_output *s_out;
int header_lines;
int toggle=1;
i_con = free_i_con(i_con);
body_init_status(buffer, n_battery_maint.header, &header_lines);
cur_reclaim_buffer = malloc(sizeof(struct ipr_reclaim_query_data) * num_ioas);
for (ioa = ipr_ioa_head; ioa; ioa = ioa->next, cur_reclaim_buffer++) {
rc = ipr_reclaim_cache_store(ioa,
IPR_RECLAIM_QUERY | IPR_RECLAIM_EXTENDED_INFO,
cur_reclaim_buffer);
if (rc != 0) {
ioa->reclaim_data = NULL;
continue;
}
ioa->reclaim_data = cur_reclaim_buffer;
if (cur_reclaim_buffer->rechargeable_battery_type) {
i_con = add_i_con(i_con, "\0",ioa);
print_dev(k, &ioa->ioa, buffer, "%1", k);
found++;
}
}
if (!found) {
/* No configured resources contain a cache battery pack */
rc = 44;
goto leave;
}
do {
n_battery_maint.body = buffer[toggle&1];
s_out = screen_driver(&n_battery_maint, header_lines, i_con);
rc = s_out->rc;
free(s_out);
toggle++;
} while (rc == TOGGLE_SCREEN);
leave:
for (k = 0; k < 2; k++) {
free(buffer[k]);
buffer[k] = NULL;
}
n_battery_maint.body = NULL;
return rc;
}
/**
* get_battery_info -
* @ioa: ipr ioa struct
*
* Returns:
* char *
**/
static char *get_battery_info(struct ipr_ioa *ioa)
{
struct ipr_reclaim_query_data *reclaim_data = ioa->reclaim_data;
char buffer[128];
struct ipr_ioa_vpd ioa_vpd;
struct ipr_cfc_vpd cfc_vpd;
char product_id[IPR_PROD_ID_LEN+1];
char serial_num[IPR_SERIAL_NUM_LEN+1];
char *body = NULL;
memset(&ioa_vpd, 0, sizeof(ioa_vpd));
memset(&cfc_vpd, 0, sizeof(cfc_vpd));
ipr_inquiry(&ioa->ioa, IPR_STD_INQUIRY, &ioa_vpd, sizeof(ioa_vpd));
ipr_inquiry(&ioa->ioa, 1, &cfc_vpd, sizeof(cfc_vpd));
ipr_strncpy_0(product_id,
(char *)ioa_vpd.std_inq_data.vpids.product_id,
IPR_PROD_ID_LEN);
ipr_strncpy_0(serial_num, (char *)cfc_vpd.serial_num,
IPR_SERIAL_NUM_LEN);
body = add_line_to_body(body,"", NULL);
body = add_line_to_body(body,_("Resource Name"), ioa->ioa.gen_name);
body = add_line_to_body(body,_("Serial Number"), serial_num);
body = add_line_to_body(body,_("Type"), product_id);
body = add_line_to_body(body,_("PCI Address"), ioa->pci_address);
if (ioa->sis64)
body = add_line_to_body(body,_("Resource Path"), ioa->ioa.scsi_dev_data->res_path);
sprintf(buffer,"%d", ioa->host_num);
body = add_line_to_body(body,_("SCSI Host Number"), buffer);
switch (reclaim_data->rechargeable_battery_type) {
case IPR_BATTERY_TYPE_NICD:
sprintf(buffer,_("Nickel Cadmium (NiCd)"));
break;
case IPR_BATTERY_TYPE_NIMH:
sprintf(buffer,_("Nickel Metal Hydride (NiMH)"));
break;
case IPR_BATTERY_TYPE_LIION:
sprintf(buffer,_("Lithium Ion (LiIon)"));
break;
default:
sprintf(buffer,_("Unknown"));
break;
}
body = add_line_to_body(body,_("Battery type"), buffer);
switch (reclaim_data->rechargeable_battery_error_state) {
case IPR_BATTERY_NO_ERROR_STATE:
sprintf(buffer,_("No battery warning"));
break;
case IPR_BATTERY_WARNING_STATE:
sprintf(buffer,_("Battery warning issued"));
break;
case IPR_BATTERY_ERROR_STATE:
sprintf(buffer,_("Battery error issued"));
break;
default:
sprintf(buffer,_("Unknown"));
break;
}
body = add_line_to_body(body,_("Battery state"), buffer);
sprintf(buffer,"%d",htons(reclaim_data->raw_power_on_time));
body = add_line_to_body(body,_("Power on time (days)"), buffer);
sprintf(buffer,"%d",htons(reclaim_data->adjusted_power_on_time));
body = add_line_to_body(body,_("Adjusted power on time (days)"), buffer);
sprintf(buffer,"%d",htons(reclaim_data->estimated_time_to_battery_warning));
body = add_line_to_body(body,_("Estimated time to warning (days)"), buffer);
sprintf(buffer,"%d",htons(reclaim_data->estimated_time_to_battery_failure));
body = add_line_to_body(body,_("Estimated time to error (days)"), buffer);
if (reclaim_data->conc_maint_battery)
sprintf(buffer, "%s", _("Yes"));
else
sprintf(buffer, "%s", _("No"));
body = add_line_to_body(body,_("Concurrently maintainable battery pack"), buffer);
if (reclaim_data->battery_replace_allowed)
sprintf(buffer, "%s", _("Yes"));
else
sprintf(buffer, "%s", _("No"));
body = add_line_to_body(body,_("Battery pack can be safely replaced"), buffer);
return body;
}
/**
* show_battery_info -
* @ioa: ipr ioa struct
*
* Returns:
* 0 if success / non-zero on failure FIXME
**/
int show_battery_info(struct ipr_ioa *ioa)
{
struct screen_output *s_out;
int rc;
n_show_battery_info.body = get_battery_info(ioa);
s_out = screen_driver(&n_show_battery_info, 0, NULL);
free(n_show_battery_info.body);
n_show_battery_info.body = NULL;
rc = s_out->rc;
free(s_out);
return rc;
}
/**
* confirm_force_battery_error -
*
* Returns:
* 0 if success / non-zero on failure FIXME
**/
int confirm_force_battery_error(void)
{
int rc,k;
struct ipr_ioa *ioa;
char *buffer[2];
struct screen_output *s_out;
int header_lines;
int toggle=1;
rc = RC_SUCCESS;
body_init_status(buffer, n_confirm_force_battery_error.header, &header_lines);
for_each_ioa(ioa) {
if (!ioa->reclaim_data || !ioa->ioa.is_reclaim_cand)
continue;
print_dev(k, &ioa->ioa, buffer, "2", k);
}
do {
n_confirm_force_battery_error.body = buffer[toggle&1];
s_out = screen_driver(&n_confirm_force_battery_error, header_lines, NULL);
rc = s_out->rc;
free(s_out);
toggle++;
} while (rc == TOGGLE_SCREEN);
for (k = 0; k < 2; k++) {
free(buffer[k]);
buffer[k] = NULL;
}
n_confirm_force_battery_error.body = NULL;
return rc;
}
/**
* enable_battery -
* @i_con: i_container struct
*
* Returns:
* 71 | EXIT_FLAG if success / 70 | EXIT_FLAG on failure
**/
int enable_battery(i_container *i_con)
{
int rc, reclaim_rc;
struct ipr_ioa *ioa;
reclaim_rc = rc = RC_SUCCESS;
for_each_ioa(ioa) {
if (!ioa->reclaim_data || !ioa->ioa.is_reclaim_cand)
continue;
rc = ipr_reclaim_cache_store(ioa,
IPR_RECLAIM_RESET_BATTERY_ERROR | IPR_RECLAIM_EXTENDED_INFO,
ioa->reclaim_data);
if (rc != 0)
reclaim_rc = 70;
if (ioa->reclaim_data->action_status != IPR_ACTION_SUCCESSFUL) {
ioa_err(ioa, "Start IOA cache failed.\n");
reclaim_rc = 70;
}
}
if (reclaim_rc != RC_SUCCESS)
return reclaim_rc | EXIT_FLAG;
return 71 | EXIT_FLAG;
}
/**
* confirm_enable_battery -
*
* Returns:
* 0 if success / non-zero on failure FIXME
**/
int confirm_enable_battery(void)
{
int rc,k;
struct ipr_ioa *ioa;
char *buffer[2];
struct screen_output *s_out;
int header_lines;
int toggle=1;
rc = RC_SUCCESS;
body_init_status(buffer, n_confirm_start_cache.header, &header_lines);
for_each_ioa(ioa) {
if (!ioa->reclaim_data || !ioa->ioa.is_reclaim_cand)
continue;
print_dev(k, &ioa->ioa, buffer, "3", k);
}
do {
n_confirm_start_cache.body = buffer[toggle&1];
s_out = screen_driver(&n_confirm_start_cache, header_lines, NULL);
rc = s_out->rc;
free(s_out);
toggle++;
} while (rc == TOGGLE_SCREEN);
for (k = 0; k < 2; k++) {
free(buffer[k]);
buffer[k] = NULL;
}
n_confirm_start_cache.body = NULL;
return rc;
}
/**
* battery_fork -
* @i_con: i_container struct
*
* Returns:
* 0 if success / non-zero on failure FIXME
**/
int battery_fork(i_container *i_con)
{
int rc = 0;
int force_error = 0;
struct ipr_ioa *ioa;
char *input;
i_container *temp_i_con;
for_each_icon(temp_i_con) {
ioa = (struct ipr_ioa *)temp_i_con->data;
if (ioa == NULL)
continue;
input = temp_i_con->field_data;
if (strcmp(input, "3") == 0) {
ioa->ioa.is_reclaim_cand = 1;
return confirm_enable_battery();
} else if (strcmp(input, "2") == 0) {
force_error++;
ioa->ioa.is_reclaim_cand = 1;
} else if (strcmp(input, "1") == 0) {
rc = show_battery_info(ioa);
return rc;
} else
ioa->ioa.is_reclaim_cand = 0;
}
if (force_error) {
rc = confirm_force_battery_error();
return rc;
}
return INVALID_OPTION_STATUS;
}
/**
* force_battery_error -
* @i_con: i_container struct
*
* Returns:
* 72 | EXIT_FLAG if success / 43 | EXIT_FLAG on failure
**/
int force_battery_error(i_container *i_con)
{
int rc, reclaim_rc;
struct ipr_ioa *ioa;
struct ipr_reclaim_query_data reclaim_buffer;
reclaim_rc = rc = RC_SUCCESS;
for_each_ioa(ioa) {
if (!ioa->reclaim_data || !ioa->ioa.is_reclaim_cand)
continue;
rc = ipr_reclaim_cache_store(ioa,
IPR_RECLAIM_FORCE_BATTERY_ERROR,
&reclaim_buffer);
if (rc != 0)
reclaim_rc = 43;
if (reclaim_buffer.action_status != IPR_ACTION_SUCCESSFUL) {
ioa_err(ioa, "Battery Force Error failed.\n");
reclaim_rc = 43;
}
}
if (reclaim_rc != RC_SUCCESS)
return reclaim_rc | EXIT_FLAG;
return 72 | EXIT_FLAG;
}
/**
* bus_config -
* @i_con: i_container struct
*
* Returns:
* 0 if success / non-zero on failure FIXME
**/
int bus_config(i_container *i_con)
{
int rc, k;
int found = 0;
char *buffer[2];
struct ipr_ioa *ioa;
u8 ioctl_buffer[255];
struct ipr_mode_parm_hdr *mode_parm_hdr;
struct ipr_mode_page_28_header *modepage_28_hdr;
struct screen_output *s_out;
int header_lines;
int toggle = 0;
rc = RC_SUCCESS;
processing();
i_con = free_i_con(i_con);
check_current_config(false);
body_init_status(buffer, n_bus_config.header, &header_lines);
for_each_ioa(ioa) {
if ((!ioa_is_spi(ioa) || ioa->is_aux_cache) && !ipr_debug)
continue;
/* mode sense page28 to focal point */
mode_parm_hdr = (struct ipr_mode_parm_hdr *)ioctl_buffer;
rc = ipr_mode_sense(&ioa->ioa, 0x28, mode_parm_hdr);
if (rc != 0)
continue;
modepage_28_hdr = (struct ipr_mode_page_28_header *) (mode_parm_hdr + 1);
if (modepage_28_hdr->num_dev_entries == 0)
continue;
i_con = add_i_con(i_con,"\0",(char *)ioa);
print_dev(k, &ioa->ioa, buffer, "%1", k);
found++;
}
if (!found) {
n_bus_config_fail.body = body_init(n_bus_config_fail.header, NULL);
s_out = screen_driver(&n_bus_config_fail, 0, NULL);
free(n_bus_config_fail.body);
n_bus_config_fail.body = NULL;
rc = s_out->rc;
free(s_out);
} else {
do {
n_bus_config.body = buffer[toggle&1];
s_out = screen_driver(&n_bus_config, header_lines, i_con);
rc = s_out->rc;
free(s_out);
toggle++;
} while (rc == TOGGLE_SCREEN);
}
for (k = 0; k < 2; k++) {
free(buffer[k]);
buffer[k] = NULL;
}
n_bus_config.body = NULL;
return rc;
}
enum attr_type {qas_capability_type, scsi_id_type, bus_width_type, max_xfer_rate_type};
struct bus_attr {
enum attr_type type;
u8 bus;
struct ipr_scsi_buses *page_28;
struct ipr_ioa *ioa;
struct bus_attr *next;
};
struct bus_attr *bus_attr_head = NULL;
/**
* get_bus_attr_buf - Start array protection for an array
* @bus_attr: bus_attr struct
*
* Returns:
* bus_attr struct
**/
static struct bus_attr *get_bus_attr_buf(struct bus_attr *bus_attr)
{
if (!bus_attr) {
bus_attr_head = malloc(sizeof(struct bus_attr));
bus_attr_head->next = NULL;
return bus_attr_head;
}
bus_attr->next = malloc(sizeof(struct bus_attr));
bus_attr->next->next = NULL;
return bus_attr->next;
}
/**
* free_all_bus_attr_buf -
*
* Returns:
* nothing
**/
static void free_all_bus_attr_buf(void)
{
struct bus_attr *bus_attr;
while (bus_attr_head) {
bus_attr = bus_attr_head->next;
free(bus_attr_head);
bus_attr_head = bus_attr;
}
}
/**
* get_changeable_bus_attr -
* @ioa: ipr ioa struct
* @page28: ipr_scsi_buses struct
* @num_buses: number of busses
*
* Returns:
* nothing
**/
static void get_changeable_bus_attr(struct ipr_ioa *ioa,
struct ipr_scsi_buses *page28, int num_buses)
{
int j;
struct ipr_dev *dev;
for (j = 0; j < num_buses; j++) {
page28->bus[j].qas_capability = 0;
if (ioa->scsi_id_changeable)
page28->bus[j].scsi_id = 1;
else
page28->bus[j].scsi_id = 0;
page28->bus[j].bus_width = 1;
for_each_dev(ioa, dev) {
if (!dev->scsi_dev_data)
continue;
if (j != dev->scsi_dev_data->channel)
continue;
if (dev->scsi_dev_data->id <= 7)
continue;
page28->bus[j].bus_width = 0;
break;
}
page28->bus[j].max_xfer_rate = 1;
}
if (ioa->protect_last_bus && num_buses) {
page28->bus[num_buses-1].qas_capability = 0;
page28->bus[num_buses-1].scsi_id = 0;
page28->bus[num_buses-1].bus_width = 0;
page28->bus[num_buses-1].max_xfer_rate = 0;
}
}
/**
* change_bus_attr -
* @i_con: i_container struct
*
* Returns:
* 0 if success / non-zero on failure FIXME
**/
int change_bus_attr(i_container *i_con)
{
struct ipr_ioa *ioa;
struct ipr_dev *dev;
int rc, j;
struct ipr_scsi_buses page_28_cur;
struct ipr_scsi_buses page_28_chg;
struct scsi_dev_data *scsi_dev_data;
char scsi_id_str[5][16];
char max_xfer_rate_str[5][16];
i_container *temp_i_con;
int found = 0;
char *input;
struct bus_attr *bus_attr = NULL;
int header_lines = 0;
char *body = NULL;
char buffer[128];
struct screen_output *s_out;
u8 bus_num;
int bus_attr_menu(struct ipr_ioa *ioa,
struct bus_attr *bus_attr,
int row,
int header_lines);
rc = RC_SUCCESS;
for_each_icon(temp_i_con) {
ioa = (struct ipr_ioa *)temp_i_con->data;
if (!ioa)
continue;
input = temp_i_con->field_data;
if (strcmp(input, "1") == 0) {
found++;
break;
}
}
if (!found)
return INVALID_OPTION_STATUS;
i_con = free_i_con(i_con);
/* zero out user page 28 page, this data is used to indicate
which fields the user changed */
memset(&page_28_cur, 0, sizeof(struct ipr_scsi_buses));
memset(&page_28_chg, 0, sizeof(struct ipr_scsi_buses));
/* mode sense page28 to get current parms */
rc = ipr_get_bus_attr(ioa, &page_28_cur);
if (rc != 0)
/* "Change SCSI Bus configurations failed" */
return 46 | EXIT_FLAG;
get_changeable_bus_attr(ioa, &page_28_chg, page_28_cur.num_buses);
body = body_init(n_change_bus_attr.header, &header_lines);
sprintf(buffer, "Adapter Location: %s\n", ioa->pci_address);
body = add_line_to_body(body, buffer, NULL);
header_lines++;
for (j = 0; j < page_28_cur.num_buses; j++) {
if (ioa->protect_last_bus && j == (page_28_cur.num_buses - 1))
continue;
sprintf(buffer,_(" BUS%d"), j);
body = add_line_to_body(body, buffer, NULL);
if (page_28_chg.bus[j].qas_capability) {
body = add_line_to_body(body,_("QAS Capability"), "%9");
bus_attr = get_bus_attr_buf(bus_attr);
bus_attr->type = qas_capability_type;
bus_attr->bus = j;
bus_attr->page_28 = &page_28_cur;
bus_attr->ioa = ioa;
if (page_28_cur.bus[j].qas_capability ==
IPR_MODEPAGE28_QAS_CAPABILITY_DISABLE_ALL)
i_con = add_i_con(i_con,_("Disabled"),bus_attr);
else
i_con = add_i_con(i_con,_("Enabled"),bus_attr);
}
if (page_28_chg.bus[j].scsi_id) {
body = add_line_to_body(body,_("Host SCSI ID"), "%3");
bus_attr = get_bus_attr_buf(bus_attr);
bus_attr->type = scsi_id_type;
bus_attr->bus = j;
bus_attr->page_28 = &page_28_cur;
bus_attr->ioa = ioa;
sprintf(scsi_id_str[j],"%d",page_28_cur.bus[j].scsi_id);
i_con = add_i_con(i_con,scsi_id_str[j],bus_attr);
}
if (page_28_chg.bus[j].bus_width) {
/* check if 8 bit bus is allowable with current configuration before
enabling option */
for_each_dev(ioa, dev) {
scsi_dev_data = dev->scsi_dev_data;
if (scsi_dev_data && (scsi_dev_data->id & 0xF8) &&
(j == scsi_dev_data->channel)) {
page_28_chg.bus[j].bus_width = 0;
break;
}
}
}
if (page_28_chg.bus[j].bus_width) {
body = add_line_to_body(body,_("Wide Enabled"), "%4");
bus_attr = get_bus_attr_buf(bus_attr);
bus_attr->type = bus_width_type;
bus_attr->bus = j;
bus_attr->page_28 = &page_28_cur;
bus_attr->ioa = ioa;
if (page_28_cur.bus[j].bus_width == 16)
i_con = add_i_con(i_con,_("Yes"),bus_attr);
else
i_con = add_i_con(i_con,_("No"),bus_attr);
}
if (page_28_chg.bus[j].max_xfer_rate) {
body = add_line_to_body(body,_("Maximum Bus Throughput"), "%9");
bus_attr = get_bus_attr_buf(bus_attr);
bus_attr->type = max_xfer_rate_type;
bus_attr->bus = j;
bus_attr->page_28 = &page_28_cur;
bus_attr->ioa = ioa;
sprintf(max_xfer_rate_str[j],"%d MB/s",
(page_28_cur.bus[j].max_xfer_rate *
page_28_cur.bus[j].bus_width)/(10 * 8));
i_con = add_i_con(i_con,max_xfer_rate_str[j],bus_attr);
}
}
n_change_bus_attr.body = body;
while (1) {
s_out = screen_driver(&n_change_bus_attr, header_lines, i_con);
rc = s_out->rc;
free(s_out);
for_each_icon(temp_i_con) {
if (!temp_i_con->field_data[0]) {
bus_attr = (struct bus_attr *)temp_i_con->data;
rc = bus_attr_menu(ioa, bus_attr, temp_i_con->y, header_lines);
if (rc == CANCEL_FLAG)
rc = RC_SUCCESS;
bus_num = bus_attr->bus;
if (bus_attr->type == qas_capability_type) {
if (page_28_cur.bus[bus_num].qas_capability ==
IPR_MODEPAGE28_QAS_CAPABILITY_DISABLE_ALL)
sprintf(temp_i_con->field_data,_("Disable"));
else
sprintf(temp_i_con->field_data,_("Enable"));
} else if (bus_attr->type == scsi_id_type) {
sprintf(temp_i_con->field_data,"%d",page_28_cur.bus[bus_num].scsi_id);
} else if (bus_attr->type == bus_width_type) {
if (page_28_cur.bus[bus_num].bus_width == 16)
sprintf(temp_i_con->field_data,_("Yes"));
else
sprintf(temp_i_con->field_data,_("No"));
} else if (bus_attr->type == max_xfer_rate_type) {
sprintf(temp_i_con->field_data,"%d MB/s",
(page_28_cur.bus[bus_num].max_xfer_rate *
page_28_cur.bus[bus_num].bus_width)/(10 * 8));
}
break;
}
}
if (rc)
goto leave;
}
leave:
free_all_bus_attr_buf();
free(n_change_bus_attr.body);
n_change_bus_attr.body = NULL;
free_i_con(i_con);
return rc;
}
/**
* confirm_change_bus_attr -
* @i_con: i_container struct
*
* Returns:
* 0 if success / 45 | EXIT_FLAG on failure
**/
int confirm_change_bus_attr(i_container *i_con)
{
struct ipr_ioa *ioa;
int rc, j;
struct ipr_scsi_buses *page_28_cur;
struct ipr_scsi_buses page_28_chg;
char scsi_id_str[5][16];
char max_xfer_rate_str[5][16];
int header_lines = 0;
char *body = NULL;
char buffer[128];
struct screen_output *s_out;
rc = RC_SUCCESS;
page_28_cur = bus_attr_head->page_28;
ioa = bus_attr_head->ioa;
get_changeable_bus_attr(ioa, &page_28_chg, page_28_cur->num_buses);
body = body_init(n_confirm_change_bus_attr.header, &header_lines);
body = add_line_to_body(body, ioa->ioa.gen_name, NULL);
header_lines++;
for (j = 0; j < page_28_cur->num_buses; j++) {
if (ioa->protect_last_bus && j == (page_28_cur->num_buses - 1))
continue;
sprintf(buffer,_(" BUS%d"), j);
body = add_line_to_body(body, buffer, NULL);
if (page_28_chg.bus[j].qas_capability) {
if (page_28_cur->bus[j].qas_capability ==
IPR_MODEPAGE28_QAS_CAPABILITY_DISABLE_ALL)
body = add_line_to_body(body, _("QAS Capability"), _("Disable"));
else
body = add_line_to_body(body, _("QAS Capability"), _("Enable"));
}
if (page_28_chg.bus[j].scsi_id) {
sprintf(scsi_id_str[j],"%d",page_28_cur->bus[j].scsi_id);
body = add_line_to_body(body,_("Host SCSI ID"), scsi_id_str[j]);
}
if (page_28_chg.bus[j].bus_width) {
if (page_28_cur->bus[j].bus_width == 16)
body = add_line_to_body(body,_("Wide Enabled"), _("Yes"));
else
body = add_line_to_body(body,_("Wide Enabled"), _("No"));
}
if (page_28_chg.bus[j].max_xfer_rate) {
sprintf(max_xfer_rate_str[j],"%d MB/s",
(page_28_cur->bus[j].max_xfer_rate *
page_28_cur->bus[j].bus_width)/(10 * 8));
body = add_line_to_body(body,_("Maximum Bus Throughput"), max_xfer_rate_str[j]);
}
}
n_confirm_change_bus_attr.body = body;
s_out = screen_driver(&n_confirm_change_bus_attr, header_lines, NULL);
rc = s_out->rc;
free(s_out);
free(n_confirm_change_bus_attr.body);
n_confirm_change_bus_attr.body = NULL;
if (rc)
return rc;
processing();
rc = ipr_set_bus_attr(ioa, page_28_cur, 1);
if (!rc)
rc = 45 | EXIT_FLAG;
return rc;
}
/**
* bus_attr_menu -
* @ioa: ipr ioa struct
* @bus_attr: bus_attr struct
* @start_row: starting row number
* @header_lines: number of header lines
*
* Returns:
* 0 if success / non-zero on failure
**/
int bus_attr_menu(struct ipr_ioa *ioa, struct bus_attr *bus_attr, int start_row, int header_lines)
{
int i, scsi_id, found;
int num_menu_items;
int menu_index = 0;
ITEM **menu_item = NULL;
struct ipr_scsi_buses *page_28_cur;
struct ipr_dev *dev;
int *userptr;
int *retptr;
u8 bus_num;
int max_bus_width, max_xfer_rate;
int rc = RC_SUCCESS;
/* start_row represents the row in which the top most
menu item will be placed. Ideally this will be on the
same line as the field in which the menu is opened for*/
start_row += 2; /* for title */ /* FIXME */
page_28_cur = bus_attr->page_28;
bus_num = bus_attr->bus;
if (bus_attr->type == qas_capability_type) {
num_menu_items = 2;
menu_item = malloc(sizeof(ITEM **) * (num_menu_items + 1));
userptr = malloc(sizeof(int) * num_menu_items);
menu_item[0] = new_item("Enable","");
userptr[0] = 2;
set_item_userptr(menu_item[0],
(char *)&userptr[0]);
menu_item[1] = new_item("Disable","");
userptr[1] = 1;
set_item_userptr(menu_item[1],
(char *)&userptr[1]);
menu_item[2] = (ITEM *)NULL;
rc = display_menu(menu_item, start_row, menu_index, &retptr);
if ((rc == RC_SUCCESS) &&
(page_28_cur->bus[bus_num].qas_capability != *retptr)) {
page_28_cur->bus[bus_num].qas_capability = *retptr;
}
i=0;
while (menu_item[i] != NULL)
free_item(menu_item[i++]);
free(menu_item);
free(userptr);
menu_item = NULL;
} else if (bus_attr->type == scsi_id_type) {
num_menu_items = 16;
menu_item = malloc(sizeof(ITEM **) * (num_menu_items + 1));
userptr = malloc(sizeof(int) * num_menu_items);
menu_index = 0;
for (scsi_id = 0, found = 0; scsi_id < 16; scsi_id++, found = 0) {
for_each_dev(ioa, dev) {
if (!dev->scsi_dev_data)
continue;
if (scsi_id == dev->scsi_dev_data->id &&
bus_num == dev->scsi_dev_data->channel) {
found = 1;
break;
}
}
if (!found) {
switch (scsi_id) {
case 0:
menu_item[menu_index] = new_item("0","");
userptr[menu_index] = 0;
set_item_userptr(menu_item[menu_index],
(char *)&userptr[menu_index]);
menu_index++;
break;
case 1:
menu_item[menu_index] = new_item("1","");
userptr[menu_index] = 1;
set_item_userptr(menu_item[menu_index],
(char *)&userptr[menu_index]);
menu_index++;
break;
case 2:
menu_item[menu_index] = new_item("2","");
userptr[menu_index] = 2;
set_item_userptr(menu_item[menu_index],
(char *)&userptr[menu_index]);
menu_index++;
break;
case 3:
menu_item[menu_index] = new_item("3","");
userptr[menu_index] = 3;
set_item_userptr(menu_item[menu_index],
(char *)&userptr[menu_index]);
menu_index++;
break;
case 4:
menu_item[menu_index] = new_item("4","");
userptr[menu_index] = 4;
set_item_userptr(menu_item[menu_index],
(char *)&userptr[menu_index]);
menu_index++;
break;
case 5:
menu_item[menu_index] = new_item("5","");
userptr[menu_index] = 5;
set_item_userptr(menu_item[menu_index],
(char *)&userptr[menu_index]);
menu_index++;
break;
case 6:
menu_item[menu_index] = new_item("6","");
userptr[menu_index] = 6;
set_item_userptr(menu_item[menu_index],
(char *)&userptr[menu_index]);
menu_index++;
break;
case 7:
menu_item[menu_index] = new_item("7","");
userptr[menu_index] = 7;
set_item_userptr(menu_item[menu_index],
(char *)&userptr[menu_index]);
menu_index++;
break;
default:
break;
}
}
}
menu_item[menu_index] = (ITEM *)NULL;
rc = display_menu(menu_item, start_row, menu_index, &retptr);
if ((rc == RC_SUCCESS) &&
(page_28_cur->bus[bus_num].scsi_id != *retptr)) {
page_28_cur->bus[bus_num].scsi_id = *retptr;
}
i=0;
while (menu_item[i] != NULL)
free_item(menu_item[i++]);
free(menu_item);
free(userptr);
menu_item = NULL;
} else if (bus_attr->type == bus_width_type) {
num_menu_items = 2;
menu_item = malloc(sizeof(ITEM **) * (num_menu_items + 1));
userptr = malloc(sizeof(int) * num_menu_items);
menu_index = 0;
menu_item[menu_index] = new_item("No","");
userptr[menu_index] = 8;
set_item_userptr(menu_item[menu_index],
(char *)&userptr[menu_index]);
menu_index++;
max_bus_width = 16;
if (max_bus_width == 16) {
menu_item[menu_index] = new_item("Yes","");
userptr[menu_index] = 16;
set_item_userptr(menu_item[menu_index],
(char *)&userptr[menu_index]);
menu_index++;
}
menu_item[menu_index] = (ITEM *)NULL;
rc = display_menu(menu_item, start_row, menu_index, &retptr);
if ((rc == RC_SUCCESS) &&
(page_28_cur->bus[bus_num].bus_width != *retptr)) {
page_28_cur->bus[bus_num].bus_width = *retptr;
}
i=0;
while (menu_item[i] != NULL)
free_item(menu_item[i++]);
free(menu_item);
free(userptr);
menu_item = NULL;
} else if (bus_attr->type == max_xfer_rate_type) {
num_menu_items = 7;
menu_item = malloc(sizeof(ITEM **) * (num_menu_items + 1));
userptr = malloc(sizeof(int) * num_menu_items);
menu_index = 0;
max_xfer_rate = get_max_bus_speed(ioa, bus_num);
switch (max_xfer_rate) {
case 320:
menu_item[menu_index] = new_item("320 MB/s","");
userptr[menu_index] = 3200;
set_item_userptr(menu_item[menu_index],
(char *)&userptr[menu_index]);
menu_index++;
case 160:
menu_item[menu_index] = new_item("160 MB/s","");
userptr[menu_index] = 1600;
set_item_userptr(menu_item[menu_index],
(char *)&userptr[menu_index]);
menu_index++;
case 80:
menu_item[menu_index] = new_item(" 80 MB/s","");
userptr[menu_index] = 800;
set_item_userptr(menu_item[menu_index],
(char *)&userptr[menu_index]);
menu_index++;
case 40:
menu_item[menu_index] = new_item(" 40 MB/s","");
userptr[menu_index] = 400;
set_item_userptr(menu_item[menu_index],
(char *)&userptr[menu_index]);
menu_index++;
case 20:
menu_item[menu_index] = new_item(" 20 MB/s","");
userptr[menu_index] = 200;
set_item_userptr(menu_item[menu_index],
(char *)&userptr[menu_index]);
menu_index++;
case 10:
menu_item[menu_index] = new_item(" 10 MB/s","");
userptr[menu_index] = 100;
set_item_userptr(menu_item[menu_index],
(char *)&userptr[menu_index]);
menu_index++;
case 5:
menu_item[menu_index] = new_item(" 5 MB/s","");
userptr[menu_index] = 50;
set_item_userptr(menu_item[menu_index],
(char *)&userptr[menu_index]);
menu_index++;
break;
default:
menu_item[menu_index] = new_item(" ","");
userptr[menu_index] = 0;
set_item_userptr(menu_item[menu_index],
(char *)&userptr[menu_index]);
menu_index++;
break;
}
menu_item[menu_index] = (ITEM *)NULL;
rc = display_menu(menu_item, start_row, menu_index, &retptr);
if ((rc == RC_SUCCESS) &&
(page_28_cur->bus[bus_num].max_xfer_rate !=
((*retptr) * 8)/page_28_cur->bus[bus_num].bus_width)) {
page_28_cur->bus[bus_num].max_xfer_rate =
((*retptr) * 8)/page_28_cur->bus[bus_num].bus_width;
}
i=0;
while (menu_item[i] != NULL)
free_item(menu_item[i++]);
free(menu_item);
free(userptr);
menu_item = NULL;
}
return rc;
}
/**
* display_menu -
* @menu_item: menu items
* @menu_start_row: start row
* @menu_index_max: max menu index
* @userptrptr:
*
* Returns:
* 0 if success / non-zero on failure FIXME
**/
int display_menu(ITEM **menu_item,
int menu_start_row,
int menu_index_max,
int **userptrptr)
{
ITEM *cur_item;
MENU *menu;
WINDOW *box1_win, *box2_win, *field_win;
int menu_rows, menu_cols, menu_rows_disp;
int menu_index;
int use_box2 = 0;
int cur_item_index;
int ch, i;
int rc = RC_SUCCESS;
int max_y,max_x;
getmaxyx(stdscr,max_y,max_x);
menu = new_menu(menu_item);
scale_menu(menu, &menu_rows, &menu_cols);
menu_rows_disp = menu_rows;
/* check if fits in current screen, + 1 is added for
bottom border, +1 is added for buffer */
if ((menu_start_row + menu_rows + 1 + 1) > max_y) {
menu_start_row = max_y - (menu_rows + 1 + 1);
if (menu_start_row < (8 + 1)) {
/* size is adjusted by 2 to allow for top
and bottom border, add +1 for buffer */
menu_rows_disp = max_y - (8 + 2 + 1);
menu_start_row = (8 + 1);
}
}
if (menu_rows > menu_rows_disp) {
set_menu_format(menu, menu_rows_disp, 1);
use_box2 = 1;
}
set_menu_mark(menu, "*");
scale_menu(menu, &menu_rows, &menu_cols);
box1_win = newwin(menu_rows + 2, menu_cols + 2, menu_start_row - 1, 54);
field_win = newwin(menu_rows, menu_cols, menu_start_row, 55);
set_menu_win(menu, field_win);
set_menu_sub(menu, derwin(field_win, menu_rows, menu_cols, 0, 0));
post_menu(menu);
box(box1_win,ACS_VLINE,ACS_HLINE);
if (use_box2) {
box2_win = newwin(menu_rows + 2, 3, menu_start_row - 1, 54 + menu_cols + 1);
box(box2_win,ACS_VLINE,ACS_HLINE);
/* initialize scroll bar */
for (i = 0; i < menu_rows_disp/2; i++)
mvwaddstr(box2_win, i + 1, 1, "#");
/* put down arrows in */
for (i = menu_rows_disp; i > (menu_rows_disp - menu_rows_disp/2); i--)
mvwaddstr(box2_win, i, 1, "v");
}
wnoutrefresh(box1_win);
menu_index = 0;
while (1) {
if (use_box2)
wnoutrefresh(box2_win);
wnoutrefresh(field_win);
doupdate();
ch = getch();
if (IS_ENTER_KEY(ch)) {
cur_item = current_item(menu);
cur_item_index = item_index(cur_item);
*userptrptr = item_userptr(menu_item[cur_item_index]);
break;
} else if ((ch == KEY_DOWN) || (ch == '\t')) {
if (use_box2 && (menu_index < (menu_index_max - 1))) {
menu_index++;
if (menu_index == menu_rows_disp) {
/* put up arrows in */
for (i = 0; i < menu_rows_disp/2; i++)
mvwaddstr(box2_win, i + 1, 1, "^");
}
if (menu_index == (menu_index_max - 1)) {
/* remove down arrows */
for (i = menu_rows_disp; i > (menu_rows_disp - menu_rows_disp/2); i--)
mvwaddstr(box2_win, i, 1, "#");
}
}
menu_driver(menu,REQ_DOWN_ITEM);
} else if (ch == KEY_UP) {
if (use_box2 && menu_index != 0) {
menu_index--;
if (menu_index == (menu_index_max - menu_rows_disp - 1)) {
/* put down arrows in */
for (i = menu_rows_disp; i > (menu_rows_disp - menu_rows_disp/2); i--)
mvwaddstr(box2_win, i, 1, "v");
}
if (menu_index == 0) {
/* remove up arrows */
for (i = 0; i < menu_rows_disp/2; i++)
mvwaddstr(box2_win, i + 1, 1, "#");
}
}
menu_driver(menu,REQ_UP_ITEM);
} else if (IS_EXIT_KEY(ch)) {
rc = EXIT_FLAG;
break;
} else if (IS_CANCEL_KEY(ch)) {
rc = CANCEL_FLAG;
break;
}
}
unpost_menu(menu);
free_menu(menu);
wclear(field_win);
wrefresh(field_win);
delwin(field_win);
wclear(box1_win);
wrefresh(box1_win);
delwin(box1_win);
if (use_box2) {
wclear(box2_win);
wrefresh(box2_win);
delwin(box2_win);
}
return rc;
}
/**
* driver_config -
* @i_con: i_container struct
*
* Returns:
* 0 if success / non-zero on failure FIXME
**/
int driver_config(i_container *i_con)
{
int rc, k;
char *buffer[2];
struct ipr_ioa *ioa;
struct screen_output *s_out;
int header_lines;
int toggle = 0;
processing();
/* empty the linked list that contains field pointens */
i_con = free_i_con(i_con);
rc = RC_SUCCESS;
check_current_config(false);
body_init_status(buffer, n_driver_config.header, &header_lines);
for_each_ioa(ioa) {
i_con = add_i_con(i_con,"\0",ioa);
print_dev(k, &ioa->ioa, buffer, "%1", k);
}
do {
n_driver_config.body = buffer[toggle&1];
s_out = screen_driver(&n_driver_config, header_lines, i_con);
rc = s_out->rc;
free(s_out);
toggle++;
} while (rc == TOGGLE_SCREEN);
for (k = 0; k < 2; k++) {
free(buffer[k]);
buffer[k] = NULL;
}
n_driver_config.body = NULL;
return rc;
}
/**
* get_log_level - return the log level
* @ioa: ipr ioa struct
*
* Returns:
* log level value if success / 0 on failure
**/
int get_log_level(struct ipr_ioa *ioa)
{
char value_str[100];
int value;
if (ipr_read_host_attr(ioa, "log_level", value_str, 100) < 0)
return 0;
sscanf(value_str, "%d", &value);
return value;
}
/**
* set_log_level - set the log level
* @ioa: ipr ioa struct
* @log_level: log level string
*
* Returns:
* nothing
**/
void set_log_level(struct ipr_ioa *ioa, char *log_level)
{
ipr_write_host_attr(ioa, "log_level", log_level,
strlen(log_level));
}
/**
* change_driver_config -
* @i_con: i_container struct
*
* Returns:
* 0 if success / non-zero on failure
**/
int change_driver_config(i_container *i_con)
{
int rc, i, digits;
int found = 0;
i_container *temp_i_con;
struct ipr_ioa *ioa;
struct screen_output *s_out;
char buffer[128];
char *body = NULL;
char *input;
for_each_icon(temp_i_con) {
ioa = (struct ipr_ioa *)(temp_i_con->data);
if (ioa == NULL)
continue;
input = temp_i_con->field_data;
if (strcmp(input, "1") == 0) {
found++;
break;
}
}
if (!found)
return 2;
i_con = free_i_con(i_con);
/* i_con to return field data */
i_con = add_i_con(i_con,"",NULL);
body = body_init(n_change_driver_config.header, NULL);
sprintf(buffer,"Adapter Location: %s\n", ioa->pci_address);
body = add_line_to_body(body, buffer, NULL);
sprintf(buffer,"%d", get_log_level(ioa));
body = add_line_to_body(body,_("Current Log Level"), buffer);
body = add_line_to_body(body,_("New Log Level"), "%2");
n_change_driver_config.body = body;
s_out = screen_driver(&n_change_driver_config, 0, i_con);
free(n_change_driver_config.body);
n_change_driver_config.body = NULL;
rc = s_out->rc;
if (!rc) {
for (i = 0, digits = 0; i < strlen(i_con->field_data); i++) {
if (isdigit(i_con->field_data[i])) {
digits++;
} else if (!isspace(i_con->field_data[i])) {
rc = 48;
break;
}
}
if (!rc && digits) {
set_log_level(ioa, i_con->field_data);
rc = 57;
}
}
free(s_out);
return rc;
}
/**
* disk_config -
* @i_con: i_container struct
*
* Returns:
* 0 if success / non-zero on failure FIXME
**/
int disk_config(i_container * i_con)
{
int rc, k;
int len = 0;
int num_lines = 0;
struct ipr_ioa *ioa;
struct screen_output *s_out;
int header_lines;
char *buffer[2];
int toggle = 1;
processing();
rc = RC_SUCCESS;
i_con = free_i_con(i_con);
check_current_config(false);
body_init_status(buffer, n_disk_config.header, &header_lines);
for_each_ioa(ioa) {
if (ioa->is_secondary || ioa->ioa_dead || !ioa->ioa.scsi_dev_data)
continue;
num_lines += print_standalone_disks(ioa, &i_con, buffer, 0);
num_lines += print_hotspare_disks(ioa, &i_con, buffer, 0);
num_lines += print_vsets(ioa, &i_con, buffer, 0);
}
if (num_lines == 0) {
for (k = 0; k < 2; k++) {
len = strlen(buffer[k]);
buffer[k] = realloc(buffer[k], len +
strlen(_(no_dev_found)) + 8);
sprintf(buffer[k] + len, "\n%s", _(no_dev_found));
}
}
do {
n_disk_config.body = buffer[toggle&1];
s_out = screen_driver(&n_disk_config, header_lines, i_con);
rc = s_out->rc;
free(s_out);
toggle++;
} while (rc == TOGGLE_SCREEN);
for (k = 0; k < 2; k++) {
free(buffer[k]);
buffer[k] = NULL;
}
n_disk_config.body = NULL;
return rc;
}
struct disk_config_attr {
int option;
int queue_depth;
int format_timeout;
int tcq_enabled;
int write_cache_policy;
};
/**
* disk_config_menu -
* @disk_config_attr: disk_config_attr struct
* @start_row: start row number
* @header_lines: number of header lines
*
* Returns:
* 0 if success / non-zero on failure FIXME
**/
static int disk_config_menu(struct disk_config_attr *disk_config_attr,
int start_row, int header_lines)
{
int i;
int num_menu_items;
int menu_index;
ITEM **menu_item = NULL;
int *retptr;
int *userptr = NULL;
int rc = RC_SUCCESS;
/* start_row represents the row in which the top most
menu item will be placed. Ideally this will be on the
same line as the field in which the menu is opened for*/
start_row += 2; /* for title */ /* FIXME */
if (disk_config_attr->option == 1) { /* queue depth*/
rc = display_input(start_row, &disk_config_attr->queue_depth);
} else if (disk_config_attr->option == 3) { /* tag command queue.*/
num_menu_items = 2;
menu_item = malloc(sizeof(ITEM **) * (num_menu_items + 1));
userptr = malloc(sizeof(int) * num_menu_items);
menu_index = 0;
menu_item[menu_index] = new_item("No","");
userptr[menu_index] = 0;
set_item_userptr(menu_item[menu_index],
(char *)&userptr[menu_index]);
menu_index++;
menu_item[menu_index] = new_item("Yes","");
userptr[menu_index] = 1;
set_item_userptr(menu_item[menu_index],
(char *)&userptr[menu_index]);
menu_index++;
menu_item[menu_index] = (ITEM *)NULL;
rc = display_menu(menu_item, start_row, menu_index, &retptr);
if (rc == RC_SUCCESS)
disk_config_attr->tcq_enabled = *retptr;
i=0;
while (menu_item[i] != NULL)
free_item(menu_item[i++]);
free(menu_item);
free(userptr);
menu_item = NULL;
} else if (disk_config_attr->option == 2) { /* format t.o.*/
num_menu_items = 5;
menu_item = malloc(sizeof(ITEM **) * (num_menu_items + 1));
userptr = malloc(sizeof(int) * num_menu_items);
menu_index = 0;
menu_item[menu_index] = new_item("8 hr","");
userptr[menu_index] = 8;
set_item_userptr(menu_item[menu_index],
(char *)&userptr[menu_index]);
menu_index++;
menu_item[menu_index] = new_item("4 hr","");
userptr[menu_index] = 4;
set_item_userptr(menu_item[menu_index],
(char *)&userptr[menu_index]);
menu_index++;
menu_item[menu_index] = new_item("3 hr","");
userptr[menu_index] = 3;
set_item_userptr(menu_item[menu_index],
(char *)&userptr[menu_index]);
menu_index++;
menu_item[menu_index] = new_item("2 hr","");
userptr[menu_index] = 2;
set_item_userptr(menu_item[menu_index],
(char *)&userptr[menu_index]);
menu_index++;
menu_item[menu_index] = new_item("1 hr","");
userptr[menu_index] = 1;
set_item_userptr(menu_item[menu_index],
(char *)&userptr[menu_index]);
menu_index++;
menu_item[menu_index] = (ITEM *)NULL;
rc = display_menu(menu_item, start_row, menu_index, &retptr);
if (rc == RC_SUCCESS)
disk_config_attr->format_timeout = *retptr;
i=0;
while (menu_item[i] != NULL)
free_item(menu_item[i++]);
free(menu_item);
free(userptr);
menu_item = NULL;
} else if (disk_config_attr->option == 4) { /* write cache policy.*/
num_menu_items = 2;
menu_item = malloc(sizeof(ITEM **) * (num_menu_items + 1));
userptr = malloc(sizeof(int) * num_menu_items);
menu_index = 0;
menu_item[menu_index] = new_item("Write Through","");
userptr[menu_index] = IPR_DEV_CACHE_WRITE_THROUGH;
set_item_userptr(menu_item[menu_index],
(char *)&userptr[menu_index]);
menu_index++;
menu_item[menu_index] = new_item("Write Back","");
userptr[menu_index] = IPR_DEV_CACHE_WRITE_BACK;
set_item_userptr(menu_item[menu_index],
(char *)&userptr[menu_index]);
menu_index++;
menu_item[menu_index] = (ITEM *)NULL;
rc = display_menu(menu_item, start_row, menu_index, &retptr);
if (rc == RC_SUCCESS) {
disk_config_attr->write_cache_policy = *retptr;
}
i=0;
while (menu_item[i] != NULL)
free_item(menu_item[i++]);
free(menu_item);
free(userptr);
menu_item = NULL;
}
return rc;
}
/**
* change_disk_config -
* @i_con: i_container struct
*
* Returns:
* non-zero
**/
int change_disk_config(i_container * i_con)
{
int rc;
i_container *i_con_head_saved;
struct ipr_dev *dev;
char qdepth_str[4];
char format_timeout_str[8];
char buffer[200];
i_container *temp_i_con;
int found = 0;
char *input;
struct disk_config_attr disk_config_attr[4];
struct disk_config_attr *config_attr = NULL;
struct ipr_disk_attr disk_attr;
int header_lines = 0;
char *body = NULL;
struct screen_output *s_out;
struct ipr_array_record *array_record;
int tcq_warning = 0;
int tcq_blocked = 0;
int tcq_enabled = 0;
int num_devs, ssd_num_devs, max_qdepth;
rc = RC_SUCCESS;
for_each_icon(temp_i_con) {
dev = (struct ipr_dev *)temp_i_con->data;
if (!dev)
continue;
input = temp_i_con->field_data;
if (strcmp(input, "1") == 0) {
found++;
break;
}
}
if (!found)
return INVALID_OPTION_STATUS;
rc = ipr_get_dev_attr(dev, &disk_attr);
if (rc)
return 66 | EXIT_FLAG;
i_con_head_saved = i_con_head; /* FIXME */
i_con_head = i_con = NULL;
body = body_init(n_change_disk_config.header, &header_lines);
sprintf(buffer, "Device: %s %s\n", dev->scsi_dev_data->sysfs_device_name,
dev->dev_name);
header_lines += 2;
if (ipr_is_volume_set(dev) || page0x0a_setup(dev))
header_lines += 1;
/* xxx
else if (ipr_is_af_dasd_device(dev) && disk_attr.queue_depth > 1)
tcq_warning = 1;
else if (ipr_is_gscsi(dev) && disk_attr.tcq_enabled)
tcq_warning = 1;
else
tcq_blocked = 1;
*/
if (tcq_warning) {
body = add_line_to_body(body, buffer, NULL);
body = add_string_to_body(body,
_("Note: Tagged queuing to this device is ENABLED "
"and it does not support the required "
"control mode page settings to run safely in this mode!\n\n"),
"", &header_lines);
} else if (tcq_blocked) {
body = add_line_to_body(body, buffer, NULL);
body = add_string_to_body(body,
_("Note: Tagged queuing to this device is disabled by default "
"since it does not support the required control mode page "
"settings to run safely in this mode.\n\n"),
"", &header_lines);
}
if (ipr_force)
tcq_warning = tcq_blocked = 0;
if (!tcq_blocked || ipr_is_gscsi(dev)) {
ipr_count_devices_in_vset(dev, &num_devs, &ssd_num_devs);
max_qdepth = ipr_max_queue_depth(dev->ioa, num_devs, ssd_num_devs);
sprintf(buffer, "Queue Depth (max = %03d)", max_qdepth);
body = add_line_to_body(body, buffer, "%3");
disk_config_attr[0].option = 1;
if (disk_attr.queue_depth > max_qdepth)
disk_attr.queue_depth = max_qdepth;
disk_config_attr[0].queue_depth = disk_attr.queue_depth;
sprintf(qdepth_str, "%d", disk_config_attr[0].queue_depth);
i_con = add_i_con(i_con, qdepth_str, &disk_config_attr[0]);
}
array_record = dev->array_rcd;
if (array_record &&
ipr_is_vset_record(array_record->common.record_id)) {
/* VSET, no further fields */
} else if (ipr_is_af_dasd_device(dev)) {
disk_config_attr[1].option = 2;
disk_config_attr[1].format_timeout = disk_attr.format_timeout / (60 * 60);
body = add_line_to_body(body,_("Format Timeout"), "%4");
snprintf(format_timeout_str, sizeof(format_timeout_str), "%d hr",
disk_config_attr[1].format_timeout);
i_con = add_i_con(i_con, format_timeout_str, &disk_config_attr[1]);
} else if (!tcq_blocked) {
disk_config_attr[2].option = 3;
disk_config_attr[2].tcq_enabled = disk_attr.tcq_enabled;
body = add_line_to_body(body,_("Tag Command Queueing"), "%4");
tcq_enabled = disk_config_attr[2].tcq_enabled;
if (disk_config_attr[2].tcq_enabled)
i_con = add_i_con(i_con,_("Yes"),&disk_config_attr[2]);
else
i_con = add_i_con(i_con,_("No"),&disk_config_attr[2]);
}
if (ipr_is_gscsi(dev) ||
(dev->ioa->vset_write_cache && ipr_is_volume_set(dev))) {
disk_config_attr[3].option = 4;
disk_config_attr[3].write_cache_policy =
disk_attr.write_cache_policy;
body = add_line_to_body(body,_("Device Write Cache Policy"), "%14");
if (disk_config_attr[3].write_cache_policy ==
IPR_DEV_CACHE_WRITE_THROUGH)
i_con = add_i_con(i_con,_("Write Through"),
&disk_config_attr[3]);
else
i_con = add_i_con(i_con,_("Write Back"),
&disk_config_attr[3]);
}
n_change_disk_config.body = body;
while (1) {
s_out = screen_driver(&n_change_disk_config, header_lines, i_con);
rc = s_out->rc;
free(s_out);
found = 0;
for_each_icon(temp_i_con) {
if (!temp_i_con->field_data[0]) {
config_attr = (struct disk_config_attr *)temp_i_con->data;
rc = disk_config_menu(config_attr, temp_i_con->y, header_lines);
if (rc == CANCEL_FLAG)
rc = RC_SUCCESS;
if (config_attr->option == 1) {
sprintf(temp_i_con->field_data,"%d", config_attr->queue_depth);
if (config_attr->queue_depth > max_qdepth)
disk_attr.queue_depth = max_qdepth;
else
disk_attr.queue_depth = config_attr->queue_depth;
}
else if (config_attr->option == 2) {
sprintf(temp_i_con->field_data,"%d hr", config_attr->format_timeout);
disk_attr.format_timeout = config_attr->format_timeout * 60 * 60;
}
else if (config_attr->option == 3) {
if (config_attr->tcq_enabled)
sprintf(temp_i_con->field_data,_("Yes"));
else
sprintf(temp_i_con->field_data,_("No"));
disk_attr.tcq_enabled = config_attr->tcq_enabled;
}
else if (config_attr->option == 4) {
if (config_attr->write_cache_policy == IPR_DEV_CACHE_WRITE_THROUGH)
sprintf(temp_i_con->field_data,
_("Write Through"));
else
sprintf(temp_i_con->field_data,
_("Write Back"));
disk_attr.write_cache_policy =
config_attr->write_cache_policy;
}
found++;
break;
}
}
if (rc)
goto leave;
if (!found)
break;
}
ipr_set_dev_attr(dev, &disk_attr, 1);
check_current_config(false);
leave:
free(n_change_disk_config.body);
n_change_disk_config.body = NULL;
free_i_con(i_con);
i_con_head = i_con_head_saved;
return rc;
}
struct ioa_config_attr {
int option;
int preferred_primary;
int gscsi_only_ha;
int active_active;
int caching;
int verify_array_rebuild;
int rebuild_rate;
};
/**
* ioa_config_menu -
* @ioa_config_attr: ipr_config_attr struct
* @start_row: start row
* @header_lines: number of header lines
*
* Returns:
* 0 if success / non-zero on failure
**/
int ioa_config_menu(struct ioa_config_attr *ioa_config_attr,
int start_row, int header_lines)
{
int i;
int num_menu_items;
int menu_index;
ITEM **menu_item = NULL;
int *retptr;
int *userptr = NULL;
int rc = RC_SUCCESS;
/* start_row represents the row in which the top most
menu item will be placed. Ideally this will be on the
same line as the field in which the menu is opened for*/
start_row += 2; /* for title */ /* FIXME */
if (ioa_config_attr->option == 1 || ioa_config_attr->option == 2
|| ioa_config_attr->option == 3 || ioa_config_attr->option == 4
|| ioa_config_attr->option == 5) {
num_menu_items = 4;
menu_item = malloc(sizeof(ITEM **) * (num_menu_items + 1));
userptr = malloc(sizeof(int) * num_menu_items);
menu_index = 0;
if (ioa_config_attr->option == 1)
menu_item[menu_index] = new_item("None","");
else if (ioa_config_attr->option == 2)
menu_item[menu_index] = new_item("RAID","");
else if (ioa_config_attr->option == 3)
menu_item[menu_index] = new_item("Disabled","");
else if (ioa_config_attr->option == 5)
menu_item[menu_index] = new_item("Enabled","");
else
menu_item[menu_index] = new_item("Default","");
userptr[menu_index] = 0;
set_item_userptr(menu_item[menu_index],
(char *)&userptr[menu_index]);
menu_index++;
if (ioa_config_attr->option == 1)
menu_item[menu_index] = new_item("Primary","");
else if (ioa_config_attr->option == 2)
menu_item[menu_index] = new_item("JBOD","");
else if (ioa_config_attr->option == 3)
menu_item[menu_index] = new_item("Enabled","");
else if (ioa_config_attr->option == 5)
menu_item[menu_index] = new_item("Disabled","");
else
menu_item[menu_index] = new_item("Disabled","");
userptr[menu_index] = 1;
set_item_userptr(menu_item[menu_index],
(char *)&userptr[menu_index]);
menu_index++;
menu_item[menu_index] = (ITEM *)NULL;
rc = display_menu(menu_item, start_row, menu_index, &retptr);
if (rc == RC_SUCCESS) {
if (ioa_config_attr->option == 1)
ioa_config_attr->preferred_primary = *retptr;
else if (ioa_config_attr->option == 2)
ioa_config_attr->gscsi_only_ha = *retptr;
else if (ioa_config_attr->option == 3)
ioa_config_attr->active_active = *retptr;
else if (ioa_config_attr->option == 5)
ioa_config_attr->verify_array_rebuild = *retptr;
else
ioa_config_attr->caching = *retptr;
}
i = 0;
while (menu_item[i] != NULL)
free_item(menu_item[i++]);
free(menu_item);
free(userptr);
menu_item = NULL;
} else if (ioa_config_attr->option == 6) {
rc = display_input(start_row + 1,
&ioa_config_attr->rebuild_rate);
/* (start_row + 1) to correct window location */
if (ioa_config_attr->rebuild_rate > 100)
ioa_config_attr->rebuild_rate = 100;
if (ioa_config_attr->rebuild_rate < 0)
ioa_config_attr->rebuild_rate = 0;
ioa_config_attr->rebuild_rate =
(ioa_config_attr->rebuild_rate * 15) / 100;
/*
* this constant multiplication *(15/100) it's only used to
* give the user values 0-100 even though IOA only knows 0-15
*/
}
return rc;
}
/**
* change_ioa_config -
* @i_con: i_container struct
*
* Returns:
* non-zero on exit
**/
int change_ioa_config(i_container * i_con)
{
int rc;
i_container *i_con_head_saved;
struct ipr_dev *dev;
char pref_str[20];
char buffer[128];
i_container *temp_i_con;
int found = 0;
char *input;
struct ioa_config_attr ioa_config_attr[6];
/*
* For now, the above 6 is a magic number - it means the maximum
* number of options showed at screen. It should be more generic...
*/
struct ioa_config_attr *config_attr = NULL;
struct ipr_ioa_attr ioa_attr;
int header_lines = 0, index = 0;
char *body = NULL;
struct screen_output *s_out;
rc = RC_SUCCESS;
for_each_icon(temp_i_con) {
dev = (struct ipr_dev *)temp_i_con->data;
if (!dev)
continue;
input = temp_i_con->field_data;
if (strcmp(input, "1") == 0) {
found++;
break;
}
}
if (!found)
return INVALID_OPTION_STATUS;
rc = ipr_get_ioa_attr(dev->ioa, &ioa_attr);
if (rc)
return 66 | EXIT_FLAG;
i_con_head_saved = i_con_head; /* FIXME */
i_con_head = i_con = NULL;
body = body_init(n_change_ioa_config.header, &header_lines);
sprintf(buffer, "Adapter: %s/%d %s %s\n", dev->ioa->pci_address,
dev->ioa->host_num, dev->scsi_dev_data->vendor_id,
dev->scsi_dev_data->product_id);
body = add_line_to_body(body, buffer, NULL);
header_lines += 2;
if (dev->ioa->dual_raid_support) {
body = add_line_to_body(body,_("Preferred Dual Adapter State"), "%13");
ioa_config_attr[index].option = 1;
ioa_config_attr[index].preferred_primary = ioa_attr.preferred_primary;
if (ioa_attr.preferred_primary)
sprintf(pref_str, "Primary");
else
sprintf(pref_str, "None");
i_con = add_i_con(i_con, pref_str, &ioa_config_attr[index++]);
}
if (dev->ioa->gscsi_only_ha) {
body = add_line_to_body(body,_("High-Availability Mode"), "%13");
ioa_config_attr[index].option = 2;
ioa_config_attr[index].gscsi_only_ha = ioa_attr.gscsi_only_ha;
if (ioa_attr.gscsi_only_ha)
sprintf(pref_str, "JBOD");
else
sprintf(pref_str, "Normal");
i_con = add_i_con(i_con, pref_str, &ioa_config_attr[index++]);
}
if (dev->ioa->asymmetric_access) {
body = add_line_to_body(body,_("Active/Active Mode"), "%13");
ioa_config_attr[index].option = 3;
ioa_config_attr[index].active_active = ioa_attr.active_active;
if (ioa_attr.active_active)
sprintf(pref_str, "Enabled");
else
sprintf(pref_str, "Disabled");
i_con = add_i_con(i_con, pref_str, &ioa_config_attr[index++]);
}
if (dev->ioa->has_cache && !dev->ioa->has_vset_write_cache) {
body = add_line_to_body(body,_("IOA Caching Mode"), "%13");
ioa_config_attr[index].option = 4;
ioa_config_attr[index].caching = ioa_attr.caching;
if (ioa_attr.caching == IPR_IOA_REQUESTED_CACHING_DEFAULT)
sprintf(pref_str, "Default");
else
sprintf(pref_str, "Disabled");
i_con = add_i_con(i_con, pref_str, &ioa_config_attr[index++]);
}
if (dev->ioa->configure_rebuild_verify) {
body = add_line_to_body(body,
_("Verify data during array rebuild"),
"%13");
ioa_config_attr[index].option = 5;
ioa_config_attr[index].verify_array_rebuild
= ioa_attr.disable_rebuild_verify;
if (ioa_attr.disable_rebuild_verify == 1)
sprintf(pref_str, "Disabled");
else
sprintf(pref_str, "Enabled");
i_con = add_i_con(i_con, pref_str,
&ioa_config_attr[index++]);
}
if (dev->ioa->sis64) {
body = add_line_to_body(body, _("Array rebuild rate"), "%3");
ioa_config_attr[index].option = 6;
ioa_config_attr[index].rebuild_rate = ioa_attr.rebuild_rate;
sprintf(pref_str, "%d",
(ioa_config_attr[index].rebuild_rate* 100) / 15);
i_con = add_i_con(i_con, pref_str, &ioa_config_attr[index++]);
}
n_change_ioa_config.body = body;
while (1) {
s_out = screen_driver(&n_change_ioa_config, header_lines, i_con);
rc = s_out->rc;
free(s_out);
found = 0;
for_each_icon(temp_i_con) {
if (!temp_i_con->field_data[0]) {
config_attr = (struct ioa_config_attr *)temp_i_con->data;
rc = ioa_config_menu(config_attr, temp_i_con->y, header_lines);
if (rc == CANCEL_FLAG)
rc = RC_SUCCESS;
if (config_attr->option == 1) {
if (config_attr->preferred_primary)
sprintf(temp_i_con->field_data, "Primary");
else
sprintf(temp_i_con->field_data, "None");
ioa_attr.preferred_primary = config_attr->preferred_primary;
} else if (config_attr->option == 2) {
if (config_attr->gscsi_only_ha)
sprintf(temp_i_con->field_data, "JBOD");
else
sprintf(temp_i_con->field_data, "Normal");
ioa_attr.gscsi_only_ha = config_attr->gscsi_only_ha;
} else if (config_attr->option == 3) {
if (config_attr->active_active)
sprintf(temp_i_con->field_data, "Enabled");
else
sprintf(temp_i_con->field_data, "Disabled");
ioa_attr.active_active = config_attr->active_active;
} else if (config_attr->option == 4) {
if (config_attr->caching == IPR_IOA_REQUESTED_CACHING_DEFAULT)
sprintf(temp_i_con->field_data, "Default");
else
sprintf(temp_i_con->field_data, "Disabled");
ioa_attr.caching = config_attr->caching;
} else if (config_attr->option == 5) {
if (config_attr->verify_array_rebuild == 0) {
sprintf(temp_i_con->field_data, "Enabled");
ioa_attr.disable_rebuild_verify = 0;
}
else {
sprintf(temp_i_con->field_data, "Disabled");
ioa_attr.disable_rebuild_verify = 1;
}
} else if (config_attr->option == 6) {
sprintf( temp_i_con->field_data, "%d",
(config_attr->rebuild_rate * 100) / 15 );
ioa_attr.rebuild_rate =
config_attr->rebuild_rate;
}
found++;
break;
}
}
if (rc)
goto leave;
if (!found)
break;
}
processing();
rc = ipr_set_ioa_attr(dev->ioa, &ioa_attr, 1);
check_current_config(false);
leave:
free(n_change_ioa_config.body);
n_change_ioa_config.body = NULL;
free_i_con(i_con);
i_con_head = i_con_head_saved;
return rc;
}
/**
* ioa_config -
* @i_con: i_container struct
*
* Returns:
* 0 if success / non-zero on failure FIXME
**/
int ioa_config(i_container * i_con)
{
int rc, k;
int len = 0;
int num_lines = 0;
struct ipr_ioa *ioa;
struct screen_output *s_out;
int header_lines;
char *buffer[2];
int toggle = 1;
processing();
rc = RC_SUCCESS;
i_con = free_i_con(i_con);
check_current_config(false);
body_init_status(buffer, n_ioa_config.header, &header_lines);
for_each_ioa(ioa) {
if (ioa->ioa.scsi_dev_data == NULL)
continue;
if (!ioa->dual_raid_support && !ioa->gscsi_only_ha && !ioa->sis64)
continue;
print_dev(k, &ioa->ioa, buffer, "%1", k);
i_con = add_i_con(i_con, "\0", &ioa->ioa);
num_lines++;
}
if (num_lines == 0) {
for (k = 0; k < 2; k++) {
len = strlen(buffer[k]);
buffer[k] = realloc(buffer[k], len +
strlen(_(no_dev_found)) + 8);
sprintf(buffer[k] + len, "\n%s", _(no_dev_found));
}
}
do {
n_ioa_config.body = buffer[toggle&1];
s_out = screen_driver(&n_ioa_config, header_lines, i_con);
rc = s_out->rc;
free(s_out);
toggle++;
} while (rc == TOGGLE_SCREEN);
for (k = 0; k < 2; k++) {
free(buffer[k]);
buffer[k] = NULL;
}
n_ioa_config.body = NULL;
return rc;
}
/**
* download_ucode -
* @i_con: i_container struct
*
* Returns:
* 0 if success / non-zero on failure FIXME
**/
int download_ucode(i_container * i_con)
{
int rc, k;
int len = 0;
int num_lines = 0;
struct ipr_ioa *ioa;
struct ipr_dev *dev, *vset;
struct screen_output *s_out;
int header_lines = 0;
char *buffer[2];
int toggle = 0;
processing();
rc = RC_SUCCESS;
i_con = free_i_con(i_con);
check_current_config(false);
body_init_status2(buffer, n_download_ucode.header, &header_lines, 16);
for_each_ioa(ioa) {
if (!ioa->ioa.scsi_dev_data || ioa->ioa_dead)
continue;
print_dev(k, &ioa->ioa, buffer, "%1", 10);
i_con = add_i_con(i_con, "\0", &ioa->ioa);
num_lines++;
if (ioa->is_secondary)
continue;
num_lines += print_standalone_disks(ioa, &i_con, buffer, 10);
num_lines += print_sas_ses_devices(ioa, &i_con, buffer, 10);
num_lines += print_hotspare_disks(ioa, &i_con, buffer, 10);
/* print volume set associated devices*/
for_each_vset(ioa, vset) {
num_lines++;
for_each_dev_in_vset(vset, dev) {
print_dev(k, dev, buffer, "%1", 10);
i_con = add_i_con(i_con, "\0", dev);
num_lines++;
}
}
}
if (num_lines == 0) {
for (k = 0; k < 2; k++) {
len = strlen(buffer[k]);
buffer[k] = realloc(buffer[k], len +
strlen(_(no_dev_found)) + 8);
sprintf(buffer[k] + len, "\n%s", _(no_dev_found));
}
}
do {
n_download_ucode.body = buffer[toggle&1];
s_out = screen_driver(&n_download_ucode, header_lines, i_con);
rc = s_out->rc;
free(s_out);
toggle++;
} while (rc == TOGGLE_SCREEN);
for (k = 0; k < 2; k++) {
free(buffer[k]);
buffer[k] = NULL;
}
n_download_ucode.body = NULL;
return rc;
}
/**
* update_ucode -
* @dev: ipr dev struct
* @fw_image: ipr_fw_images struct
*
* Returns:
* 0 if success / 67 | EXIT_FLAG on failure
**/
static int update_ucode(struct ipr_dev *dev, struct ipr_fw_images *fw_image)
{
char *body;
int header_lines, status, time = 0;
pid_t pid, done;
u8 release_level[5];
u32 fw_version;
int rc = 0;
body = body_init(n_download_ucode_in_progress.header, &header_lines);
n_download_ucode_in_progress.body = body;
time_screen_driver(&n_download_ucode_in_progress, time, 0);
pid = fork();
if (pid) {
do {
done = waitpid(pid, &status, WNOHANG);
sleep(1);
time++;
time_screen_driver(&n_download_ucode_in_progress, time, 0);
} while (done == 0);
} else {
if (ipr_is_ioa(dev))
ipr_update_ioa_fw(dev->ioa, fw_image, 1);
else
ipr_update_disk_fw(dev, fw_image, 1);
exit(0);
}
ipr_get_fw_version(dev, release_level);
fw_version = release_level[0] << 24 | release_level[1] << 16 |
release_level[2] << 8 | release_level[3];
if (fw_version != fw_image->version)
rc = 67 | EXIT_FLAG;
free(n_download_ucode_in_progress.body);
n_download_ucode_in_progress.body = NULL;
return rc;
}
struct download_ucode_elem {
struct ipr_dev* dev;
struct ipr_fw_images *lfw;
struct download_ucode_elem *next;
};
/**
* download_all_ucode -
* @i_con: i_container struct
*
* Returns:
* 0 if success / non-zero on failure FIXME
**/
int download_all_ucode(i_container *i_con)
{
struct ipr_ioa *ioa;
struct ipr_dev *dev;
struct ipr_fw_images *lfw;
struct screen_output *s_out = NULL;
struct download_ucode_elem *elem, *update_list = NULL;
int header_lines;
char line[BUFSIZ];
char *body;
int rc = RC_93_All_Up_To_Date;
processing();
i_con = free_i_con(i_con);
check_current_config(false);
body = body_init(n_confirm_download_all_ucode.header, &header_lines);
for_each_ioa(ioa) {
if (!ioa->ioa.scsi_dev_data || ioa->ioa_dead)
continue;
for_ioa_and_each_dev (ioa, dev) {
if (ipr_is_volume_set(dev))
continue;
lfw = get_latest_fw_image(dev);
if (!lfw || lfw->version <= get_fw_version(dev)) {
free(lfw);
continue;
}
if (ioa->is_secondary) {
free(lfw);
continue;
}
sprintf(line, "%-6s %-10X %-10s %s\n",
basename(dev->gen_name), lfw->version,
lfw->date, lfw->file);
body = add_string_to_body(body, line, "", &header_lines);
/* Add device to update list */
elem = malloc(sizeof(struct download_ucode_elem));
elem->dev = dev;
elem->lfw = lfw;
elem->next = update_list;
update_list = elem;
}
}
if (update_list) {
n_confirm_download_all_ucode.body = body;
s_out = screen_driver(&n_confirm_download_all_ucode, header_lines, i_con);
}
if (!s_out || s_out->rc != CANCEL_FLAG) {
while (update_list) {
elem = update_list;
update_list = elem->next;
update_ucode(elem->dev, elem->lfw);
free(elem->lfw);
free(elem);
}
}
if (s_out) {
rc = s_out->rc;
free(s_out);
}
return rc;
}
/**
* process_choose_ucode -
* @dev: ipr dev struct
*
* Returns:
* 0 if success / 67 | EXIT_FLAG on failure
**/
int process_choose_ucode(struct ipr_dev *dev)
{
struct ipr_fw_images *list;
struct ipr_fw_images *fw_image;
char *body = NULL;
int header_lines = 0;
int list_count, rc, i;
char buffer[256];
int found = 0;
i_container *i_con_head_saved;
i_container *i_con = NULL;
i_container *temp_i_con;
char *input;
int version_swp;
char *version;
struct screen_output *s_out;
u8 release_level[4];
if (!dev->scsi_dev_data)
return 67 | EXIT_FLAG;
if (ipr_is_ioa(dev))
rc = get_ioa_firmware_image_list(dev->ioa, &list);
else if (dev->scsi_dev_data->type == TYPE_ENCLOSURE || dev->scsi_dev_data->type == TYPE_PROCESSOR)
rc = get_ses_firmware_image_list(dev, &list);
else
rc = get_dasd_firmware_image_list(dev, &list);
if (rc < 0)
return 67 | EXIT_FLAG;
else
list_count = rc;
ipr_get_fw_version(dev, release_level);
if (ipr_is_ioa(dev)) {
sprintf(buffer, _("Adapter to download: %-8s %-16s\n"),
dev->scsi_dev_data->vendor_id,
dev->scsi_dev_data->product_id);
body = add_string_to_body(NULL, buffer, "", &header_lines);
sprintf(buffer, _("Adapter Location: %s.%d/\n"),
dev->ioa->pci_address, dev->ioa->host_num);
} else {
sprintf(buffer, _("Device to download: %-8s %-16s\n"),
dev->scsi_dev_data->vendor_id,
dev->scsi_dev_data->product_id);
body = add_string_to_body(NULL, buffer, "", &header_lines);
sprintf(buffer, _("Device Location: %d:%d:%d\n"),
dev->res_addr[0].bus, dev->res_addr[0].target, dev->res_addr[0].lun);
}
body = add_string_to_body(body, buffer, "", &header_lines);
if (isprint(release_level[0]) &&
isprint(release_level[1]) &&
isprint(release_level[2]) &&
isprint(release_level[3]))
sprintf(buffer, "%s%02X%02X%02X%02X (%c%c%c%c)\n\n",
_("The current microcode for this device is: "),
release_level[0], release_level[1],
release_level[2], release_level[3],
release_level[0], release_level[1],
release_level[2], release_level[3]);
else
sprintf(buffer, "%s%02X%02X%02X%02X\n\n",
_("The current microcode for this device is: "),
release_level[0], release_level[1],
release_level[2], release_level[3]);
body = add_string_to_body(body, buffer, "", &header_lines);
body = __body_init(body, n_choose_ucode.header, &header_lines);
i_con_head_saved = i_con_head;
i_con_head = i_con = NULL;
if (list_count) {
for (i = 0; i < list_count; i++) {
version_swp = htonl(list[i].version);
version = (char *)&version_swp;
if (isprint(version[0]) && isprint(version[1]) &&
isprint(version[2]) && isprint(version[3]))
sprintf(buffer," %%1 %.8X (%c%c%c%c) %s %s",list[i].version,
version[0], version[1], version[2], version[3],
list[i].date, list[i].file);
else
sprintf(buffer," %%1 %.8X %s %s",list[i].version, list[i].date, list[i].file);
body = add_line_to_body(body, buffer, NULL);
i_con = add_i_con(i_con, "\0", &list[i]);
}
} else {
body = add_line_to_body(body,"(No available images)",NULL);
}
n_choose_ucode.body = body;
s_out = screen_driver(&n_choose_ucode, header_lines, i_con);
free(s_out);
free(n_choose_ucode.body);
n_choose_ucode.body = NULL;
for_each_icon(temp_i_con) {
fw_image =(struct ipr_fw_images *)(temp_i_con->data);
if (dev == NULL)
continue;
input = temp_i_con->field_data;
if (input == NULL)
continue;
if (strcmp(input, "1") == 0) {
found++;
break;
}
}
if (!found)
goto leave;
body = body_init(n_confirm_download_ucode.header, &header_lines);
version_swp = htonl(fw_image->version);
version = (char *)&version_swp;
if (isprint(version[0]) && isprint(version[1]) &&
isprint(version[2]) && isprint(version[3]))
sprintf(buffer," 1 %.8X (%c%c%c%c) %s %s\n",fw_image->version,
version[0], version[1], version[2], version[3],
fw_image->date, fw_image->file);
else
sprintf(buffer," 1 %.8X %s %s\n",fw_image->version,fw_image->date, fw_image->file);
body = add_line_to_body(body, buffer, NULL);
n_confirm_download_ucode.body = body;
s_out = screen_driver(&n_confirm_download_ucode, header_lines, i_con);
free(n_confirm_download_ucode.body);
n_confirm_download_ucode.body = NULL;
if (!s_out->rc)
rc = update_ucode(dev, fw_image);
free(s_out);
leave:
free(list);
i_con = free_i_con(i_con);
i_con_head = i_con_head_saved;
return rc;
}
/**
* choose_ucode -
* @i_con: i_container struct
*
* Returns:
* 0 if success / 67 | EXIT_FLAG on failure
**/
int choose_ucode(i_container * i_con)
{
i_container *temp_i_con;
struct ipr_dev *dev;
char *input;
int rc;
int dev_num = 0;
if (!i_con)
return 1;
for_each_icon(temp_i_con) {
if (!temp_i_con->data)
continue;
if (!temp_i_con->field_data)
continue;
dev =(struct ipr_dev *)(temp_i_con->data);
input = temp_i_con->field_data;
if (strcmp(input, "1") == 0) {
rc = process_choose_ucode(dev);
if (rc & EXIT_FLAG)
return rc;
dev_num++;
}
}
if (dev_num == 0)
/* Invalid option. No devices selected. */
return 17;
return 0;
}
/**
* ucode_screen - Configure microcode screen
* @i_con: i_container struct
*
* Returns:
* 0 if success / non-zero on failure
**/
int ucode_screen(i_container *i_con)
{
return display_features_menu(i_con, &n_ucode_screen);
}
/**
* log_menu -
* @i_con: i_container struct
*
* Returns:
* 0 if success / non-zero on failure FIXME
**/
int log_menu(i_container *i_con)
{
char cmnd[MAX_CMD_LENGTH];
int rc, loop;
struct stat file_stat;
struct screen_output *s_out;
int offset = 0;
sprintf(cmnd,"%s/boot.msg",log_root_dir);
rc = stat(cmnd, &file_stat);
if (rc)
/* file does not exist - do not display option */
offset--;
for (loop = 0; loop < (n_log_menu.num_opts + offset); loop++) {
n_log_menu.body = ipr_list_opts(n_log_menu.body,
n_log_menu.options[loop].key,
n_log_menu.options[loop].list_str);
}
n_log_menu.body = ipr_end_list(n_log_menu.body);
s_out = screen_driver(&n_log_menu, 0, NULL);
free(n_log_menu.body);
n_log_menu.body = NULL;
rc = s_out->rc;
i_con = s_out->i_con;
i_con = free_i_con(i_con);
free(s_out);
return rc;
}
static int invoke_pager(char *filename)
{
int pid, status;
char *argv[] = {
DEFAULT_EDITOR, "-c",
filename, NULL
};
pid = fork();
if (pid) {
waitpid(pid, &status, 0);
} else {
/* disable insecure pager features */
putenv("LESSSECURE=1");
execvp(argv[0], argv);
_exit(errno);
}
return WEXITSTATUS(status);
}
#define EDITOR_MAX_ARGS 32
static int invoke_editor(char* filename)
{
int i;
int rc, pid, status;
/* if editor not set, use secure pager */
if (strcmp(editor, DEFAULT_EDITOR) == 0) {
rc = invoke_pager(filename);
return rc;
}
pid = fork();
if (pid == 0) {
char *tok;
char *argv[EDITOR_MAX_ARGS];
char cmnd[MAX_CMD_LENGTH];
/* copy editor name to argv[0] */
strncpy(cmnd, editor, sizeof(cmnd) - 1);
tok = strtok(cmnd, " ");
argv[0] = malloc(strlen(tok));
strcpy(argv[0], tok);
/* handle editor arguments, if any */
for (i = 1; i < EDITOR_MAX_ARGS - 2; ++i) {
tok = strtok(NULL, " ");
if (tok == NULL)
break;
argv[i] = malloc(strlen(tok));
strcpy(argv[i], tok);
}
argv[i] = filename;
argv[i+1] = NULL;
execvp(argv[0], argv);
_exit(errno);
} else {
waitpid(pid, &status, 0);
}
return WEXITSTATUS(status);
}
/**
* ibm_storage_log_tail -
* @i_con: i_container struct
*
* Returns:
* 0 on success / non-zero on failure
**/
int ibm_storage_log_tail(i_container *i_con)
{
int rc, len;
int log_fd;
char line[MAX_CMD_LENGTH];
char logfile[MAX_CMD_LENGTH];
char *tmp_log;
FILE *logsource_fp;
/* aux variables for erasing unnecessary log info */
const char *local_s = "localhost kernel: ipr";
const char *kernel_s = "kernel: ipr";
char prefix[256];
char host[256];
char *dot;
tmp_log = strdup(_PATH_TMP"iprerror-XXXXXX");
log_fd = mkstemp(tmp_log);
if (log_fd < 0) {
s_status.str = strerror(errno);
syslog(LOG_ERR, "Could not create tmp log file: %m\n");
free(tmp_log);
return RC_94_Tmp_Log_Fail;
}
def_prog_mode();
endwin();
snprintf(logfile, sizeof(logfile), "%s/messages", log_root_dir);
logsource_fp = fopen(logfile, "r");
if (!logsource_fp) {
syslog(LOG_ERR, "Could not open %s: %m\n", logfile);
free(tmp_log);
close(log_fd);
return RC_75_Failed_Read_Err_Log;
}
while (fgets(line, sizeof(line), logsource_fp)) {
/* ignore lines that dont contain 'ipr' */
if (strstr(line, "ipr") == NULL)
continue;
/* build prefix using current hostname */
gethostname(host, sizeof(host));
dot = strchr(host, '.');
if (dot)
*dot = '\0';
snprintf(prefix, sizeof(prefix), "%s kernel: ipr", host);
/* erase prefix, local_s and kernel_s from line:
* dot+strlen points to beginning of prefix
* strlen(dot) - strlen(prefix) + 1 == size of the rest of line
*
* code below moves 'rest of line' on top of prefix et al. */
if (dot = strstr(line, prefix)) {
memmove(dot, dot + strlen(prefix),
strlen(dot) - strlen(prefix) + 1);
} else if (dot = strstr(line, local_s)) {
memmove(dot, dot+strlen(local_s),
strlen(dot) - strlen(local_s) + 1);
} else if (dot = strstr(line, kernel_s)) {
memmove(dot, dot+strlen(kernel_s),
strlen(dot) - strlen(kernel_s) + 1);
}
write(log_fd, line, strlen(line));
}
fclose(logsource_fp);
close(log_fd);
rc = invoke_editor(tmp_log);
free(tmp_log);
if ((rc != 0) && (rc != 127)) {
/* "Editor returned %d. Try setting the default editor" */
s_status.num = rc;
return RC_65_Set_Default_Editor;
} else {
/* return with success */
return RC_0_Success;
}
}
/**
* select_log_file -
* @dir_entry: dirent struct
*
* Returns:
* 1 if "messages" if found in the dir_entry->d_name / 0 otherwise
**/
static int select_log_file(const struct dirent *dir_entry)
{
if (dir_entry) {
if (strstr(dir_entry->d_name, "messages") == dir_entry->d_name)
return 1;
}
return 0;
}
/**
* compare_log_file -
* @log_file1:
* @log_file2:
*
* Returns:
* 0 if success / non-zero on failure FIXME
**/
static int compare_log_file(const struct dirent **first_dir, const struct dirent **second_dir)
{
char name1[MAX_CMD_LENGTH], name2[MAX_CMD_LENGTH];
struct stat stat1, stat2;
if (strcmp((*first_dir)->d_name, "messages") == 0)
return 1;
if (strcmp((*second_dir)->d_name, "messages") == 0)
return -1;
sprintf(name1, "%s/%s", log_root_dir, (*first_dir)->d_name);
sprintf(name2, "%s/%s", log_root_dir, (*second_dir)->d_name);
if (stat(name1, &stat1))
return 1;
if (stat(name2, &stat2))
return -1;
if (stat1.st_mtime < stat2.st_mtime)
return -1;
if (stat1.st_mtime > stat2.st_mtime)
return 1;
return 0;
}
/**
* ibm_storage_log -
* @i_con: i_container struct
*
* Returns:
* 0 on success / non-zero on failure FIXME
**/
int ibm_storage_log(i_container *i_con)
{
char line[MAX_CMD_LENGTH];
char logfile[MAX_CMD_LENGTH];
int i;
struct dirent **log_files;
struct dirent **dirent;
int num_dir_entries;
int rc, len;
int log_fd;
char *tmp_log;
gzFile logsource_fp;
/* aux variables for erasing unnecessary log info */
const char *local_s = "localhost kernel: ipr";
const char *kernel_s = "kernel: ipr";
char prefix[256];
char host[256];
char *dot;
tmp_log = strdup(_PATH_TMP"iprerror-XXXXXX");
log_fd = mkstemp(tmp_log);
if (log_fd < 0) {
s_status.str = strerror(errno);
syslog(LOG_ERR, "Could not create tmp log file: %m\n");
free(tmp_log);
return RC_94_Tmp_Log_Fail;
}
def_prog_mode();
endwin();
num_dir_entries = scandir(log_root_dir, &log_files, select_log_file, compare_log_file);
if (num_dir_entries < 0) {
s_status.num = 75;
return RC_75_Failed_Read_Err_Log;
}
if (num_dir_entries)
dirent = log_files;
for (i = 0; i < num_dir_entries; ++i) {
snprintf(logfile, sizeof(logfile), "%s/%s", log_root_dir,
(*dirent)->d_name);
logsource_fp = gzopen(logfile, "r");
if (logsource_fp == NULL) {
syslog(LOG_ERR, "Could not open %s: %m\n", line);
close(log_fd);
continue; /* proceed to next log file */
}
while (gzgets(logsource_fp, line, sizeof(line))) {
/* ignore lines that dont contain 'ipr' */
if (strstr(line, "ipr") == NULL)
continue;
gethostname(host, sizeof(host));
dot = strchr(host, '.');
if (dot)
*dot = '\0';
snprintf(prefix, sizeof(prefix), "%s kernel: ipr",
host);
/* erase prefix, local_s and kernel_s from line:
* dot+strlen points to beginning of prefix
* strlen(dot) - strlen(prefix) + 1 ==
* size of the rest of line
*
* code below moves 'rest of line' on top of prefix */
if (dot = strstr(line, prefix)) {
memmove(dot, dot + strlen(prefix),
strlen(dot) - strlen(prefix) + 1);
} else if (dot = strstr(line, local_s)) {
memmove(dot, dot + strlen(local_s),
strlen(dot) - strlen(local_s) + 1);
} else if (dot = strstr(line, kernel_s)) {
memmove(dot, dot + strlen(kernel_s),
strlen(dot) - strlen(kernel_s) + 1);
}
write(log_fd, line, strlen(line));
}
gzclose(logsource_fp);
dirent++;
}
close(log_fd);
rc = invoke_editor(tmp_log);
free(tmp_log);
if (num_dir_entries) {
while (num_dir_entries--)
free(log_files[num_dir_entries]);
free(log_files);
}
if ((rc != 0) && (rc != 127)) {
/* "Editor returned %d. Try setting the default editor" */
s_status.num = rc;
return RC_65_Set_Default_Editor;
} else {
/* return with success */
return RC_0_Success;
}
}
/**
* kernel_log -
* @i_con: i_container struct
*
* Returns:
* 0 if success / non-zero on failure FIXME
**/
int kernel_log(i_container *i_con)
{
char line[MAX_CMD_LENGTH];
char logfile[MAX_CMD_LENGTH];
int rc, i;
struct dirent **log_files;
struct dirent **dirent;
int num_dir_entries;
int len;
int log_fd;
char *tmp_log;
gzFile logsource_fp;
tmp_log = strdup(_PATH_TMP"iprerror-XXXXXX");
log_fd = mkstemp(tmp_log);
if (log_fd < 0) {
s_status.str = strerror(errno);
syslog(LOG_ERR, "Could not create tmp log file: %m\n");
free(tmp_log);
return RC_94_Tmp_Log_Fail;
}
def_prog_mode();
endwin();
num_dir_entries = scandir(log_root_dir, &log_files, select_log_file, compare_log_file);
if (num_dir_entries < 0) {
s_status.num = 75;
return RC_75_Failed_Read_Err_Log;
}
if (num_dir_entries)
dirent = log_files;
for (i = 0; i < num_dir_entries; ++i) {
snprintf(logfile, sizeof(logfile), "%s/%s", log_root_dir,
(*dirent)->d_name);
logsource_fp = gzopen(logfile, "r");
if (logsource_fp == NULL) {
syslog(LOG_ERR, "Could not open %s: %m\n", line);
close(log_fd);
continue; /* proceed to next log file */
}
while (gzgets(logsource_fp, line, sizeof(line)))
write(log_fd, line, strlen(line));
gzclose(logsource_fp);
dirent++;
}
close(log_fd);
rc = invoke_editor(tmp_log);
free(tmp_log);
if (num_dir_entries > 0) {
while (num_dir_entries--)
free(log_files[num_dir_entries]);
free(log_files);
}
if ((rc != 0) && (rc != 127)) {
/* "Editor returned %d. Try setting the default editor" */
s_status.num = rc;
return RC_65_Set_Default_Editor;
}
else {
/* return with success */
return RC_0_Success;
}
}
/**
* iprconfig_log -
* @i_con: i_container struct
*
* Returns:
* 0 if success / non-zero on failure FIXME
**/
int iprconfig_log(i_container *i_con)
{
char line[MAX_CMD_LENGTH];
char logfile[MAX_CMD_LENGTH];
int rc, i;
struct dirent **log_files;
struct dirent **dirent;
int num_dir_entries;
int len;
int log_fd;
char *tmp_log;
gzFile logsource_fp;
tmp_log = strdup(_PATH_TMP"iprerror-XXXXXX");
log_fd = mkstemp(tmp_log);
if (log_fd < 0) {
s_status.str = strerror(errno);
syslog(LOG_ERR, "Could not create tmp log file: %m\n");
free(tmp_log);
return RC_94_Tmp_Log_Fail;
}
def_prog_mode();
endwin();
num_dir_entries = scandir(log_root_dir, &log_files, select_log_file, compare_log_file);
if (num_dir_entries < 0) {
s_status.num = 75;
return RC_75_Failed_Read_Err_Log;
}
if (num_dir_entries)
dirent = log_files;
for (i = 0; i < num_dir_entries; ++i) {
snprintf(logfile, sizeof(logfile), "%s/%s", log_root_dir,
(*dirent)->d_name);
logsource_fp = gzopen(logfile, "r");
if (logsource_fp == NULL) {
syslog(LOG_ERR, "Could not open %s: %m\n", line);
close(log_fd);
continue; /* proceed to next log file */
}
while (gzgets(logsource_fp, line, sizeof(line))) {
/* ignore lines that dont contain 'iprconfig' */
if (strstr(line, "iprconfig") == NULL)
continue;
write(log_fd, line, strlen(line));
}
gzclose(logsource_fp);
dirent++;
}
close(log_fd);
rc = invoke_editor(tmp_log);
free(tmp_log);
if (num_dir_entries) {
while (num_dir_entries--)
free(log_files[num_dir_entries]);
free(log_files);
}
if ((rc != 0) && (rc != 127)) {
/* "Editor returned %d. Try setting the default editor" */
s_status.num = rc;
return RC_65_Set_Default_Editor;
} else {
/* return with success */
return RC_0_Success;
}
}
/**
* kernel_root -
* @i_con: i_container struct
*
* Returns:
* 0 if success / non-zero on failure FIXME
**/
int kernel_root(i_container *i_con)
{
int rc;
struct screen_output *s_out;
char *body = NULL;
i_con = free_i_con(i_con);
/* i_con to return field data */
i_con = add_i_con(i_con,"",NULL);
body = body_init(n_kernel_root.header, NULL);
body = add_line_to_body(body,_("Current root directory"), log_root_dir);
body = add_line_to_body(body,_("New root directory"), "%39");
n_kernel_root.body = body;
s_out = screen_driver(&n_kernel_root, 0, i_con);
free(n_kernel_root.body);
n_kernel_root.body = NULL;
rc = s_out->rc;
free(s_out);
return rc;
}
/**
* confirm_kernel_root -
* @i_con: i_container struct
*
* Returns:
* 0 if success / non-zero on failure FIXME
**/
int confirm_kernel_root(i_container *i_con)
{
int rc;
DIR *dir;
char *input;
struct screen_output *s_out;
char *body = NULL;
input = strip_trailing_whitespace(i_con->field_data);
if (strlen(input) == 0)
return (EXIT_FLAG | 61);
dir = opendir(input);
if (dir == NULL)
/* "Invalid directory" */
return 59;
else {
closedir(dir);
if (strcmp(log_root_dir, input) == 0)
/*"Root directory unchanged"*/
return (EXIT_FLAG | 61);
}
body = body_init(n_confirm_kernel_root.header, NULL);
body = add_line_to_body(body,_("New root directory"), input);
n_confirm_kernel_root.body = body;
s_out = screen_driver(&n_confirm_kernel_root, 0, i_con);
free(n_confirm_kernel_root.body);
n_confirm_kernel_root.body = NULL;
rc = s_out->rc;
if (rc == 0) {
/*"Root directory changed to %s"*/
strcpy(log_root_dir, i_con->field_data);
s_status.str = log_root_dir;
rc = (EXIT_FLAG | 60);
}
else
/*"Root directory unchanged"*/
rc = (EXIT_FLAG | 61);
free(s_out);
return rc;
}
/**
* set_default_editor -
* @i_con: i_container struct
*
* Returns:
* 0 if success / non-zero on failure FIXME
**/
int set_default_editor(i_container *i_con)
{
int rc = 0;
struct screen_output *s_out;
char *body = NULL;
i_con = free_i_con(i_con);
i_con = add_i_con(i_con,"",NULL);
body = body_init(n_set_default_editor.header, NULL);
body = add_line_to_body(body, _("Current editor"), editor);
body = add_line_to_body(body, _("New editor"), "%39");
n_set_default_editor.body = body;
s_out = screen_driver(&n_set_default_editor, 0, i_con);
free(n_set_default_editor.body);
n_set_default_editor.body = NULL;
rc = s_out->rc;
free(s_out);
return rc;
}
/**
* confirm_set_default_editor -
* @i_con: i_container struct
*
* Returns:
* EXIT_FLAG | 62 if editor changed / EXIT_FLAG | 63 if editor unchanged
**/
int confirm_set_default_editor(i_container *i_con)
{
int rc;
char *input;
struct screen_output *s_out;
char *body = NULL;
input = strip_trailing_whitespace(i_con->field_data);
if (strlen(input) == 0)
/*"Editor unchanged"*/
return (EXIT_FLAG | 63);
if (strcmp(editor, input) == 0)
/*"Editor unchanged"*/
return (EXIT_FLAG | 63);
body = body_init(n_confirm_set_default_editor.header, NULL);
body = add_line_to_body(body,_("New editor"), input);
n_confirm_set_default_editor.body = body;
s_out = screen_driver(&n_confirm_set_default_editor, 0, i_con);
free(n_confirm_set_default_editor.body);
n_confirm_set_default_editor.body = NULL;
rc = s_out->rc;
if (rc == 0) {
/*"Editor changed to %s"*/
strcpy(editor, i_con->field_data);
s_status.str = editor;
rc = (EXIT_FLAG | 62);
} else
/*"Editor unchanged"*/
rc = (EXIT_FLAG | 63);
free(s_out);
return rc;
}
/**
* restore_log_defaults -
* @i_con: i_container struct
*
* Returns:
* 64
**/
int restore_log_defaults(i_container *i_con)
{
strcpy(log_root_dir, DEFAULT_LOG_DIR);
strcpy(editor, DEFAULT_EDITOR);
return 64; /*"Default log values restored"*/
}
/**
* ibm_boot_log -
* @i_con: i_container struct
*
* Returns:
* 0 if success / non-zero on failure FIXME
**/
int ibm_boot_log(i_container *i_con)
{
char line[MAX_CMD_LENGTH];
char logfile[MAX_CMD_LENGTH];
int rc;
int len;
struct stat file_stat;
int log_fd;
char *tmp_log;
FILE *logsource_fp;
sprintf(line,"%s/boot.msg",log_root_dir);
rc = stat(line, &file_stat);
if (rc)
return 2; /* "Invalid option specified" */
tmp_log = strdup(_PATH_TMP"iprerror-XXXXXX");
log_fd = mkstemp(tmp_log);
if (log_fd < 0) {
s_status.str = strerror(errno);
syslog(LOG_ERR, "Could not create temp log file: %m\n");
free(tmp_log);
return RC_94_Tmp_Log_Fail;
}
def_prog_mode();
endwin();
snprintf(logfile, sizeof(logfile), "%s/boot.msg", log_root_dir);
logsource_fp = fopen(logfile, "r");
if (!logsource_fp) {
syslog(LOG_ERR, "Could not open %s: %m\n", line);
free(tmp_log);
close(log_fd);
return RC_75_Failed_Read_Err_Log;
}
while (fgets(line, sizeof(line), logsource_fp)) {
/* ignore lines that dont contain 'ipr' */
if (strstr(line, "ipr") == NULL)
continue;
write(log_fd, line, strlen(line));
}
fclose(logsource_fp);
close(log_fd);
rc = invoke_editor(tmp_log);
free(tmp_log);
if ((rc != 0) && (rc != 127)) {
/* "Editor returned %d. Try setting the default editor" */
s_status.num = rc;
return RC_65_Set_Default_Editor;
} else {
/* return with no status */
return RC_0_Success;
}
}
int get_ses_ioport_status(struct ipr_dev *ses)
{
struct ipr_query_io_port io_status;
int rc = ipr_query_io_dev_port(ses, &io_status);
if (!rc)
ses->active_suspend = io_status.port_state;
else
ses->active_suspend = IOA_DEV_PORT_UNKNOWN;
return rc;
}
/**
* get_status -
* @dev: ipr dev struct
* @buf: data buffer
* @percent:
* @path_status:
*
* Returns:
* nothing
**/
static void get_status(struct ipr_dev *dev, char *buf, int percent, int path_status)
{
struct scsi_dev_data *scsi_dev_data = dev->scsi_dev_data;
struct ipr_ioa *ioa = dev->ioa;
struct ipr_query_res_state res_state;
int status, rc;
int format_req = 0;
int blk_size = 0;
struct ipr_mode_pages mode_pages;
struct ipr_block_desc *block_desc;
struct sense_data_t sense_data;
struct ipr_cmd_status cmd_status;
struct ipr_cmd_status_record *status_record;
int percent_cmplt = 0;
int format_in_progress = 0;
int resync_in_progress = 0;
int migrate_in_progress = 0;
int initialization_in_progress = 0;
struct ipr_res_redundancy_info info;
if (ipr_is_ioa(dev)) {
if (!scsi_dev_data->online)
sprintf(buf, "Offline");
else if (ioa->ioa_dead)
sprintf(buf, "Not Operational");
else if (ioa->nr_ioa_microcode)
sprintf(buf, "Not Ready");
else
sprintf(buf, "Operational");
} else if (scsi_dev_data && scsi_dev_data->type == IPR_TYPE_EMPTY_SLOT) {
sprintf(buf, "Empty");
} else {
if (ipr_is_volume_set(dev) || ipr_is_array(dev)) {
rc = ipr_query_command_status(&ioa->ioa, &cmd_status);
if (!rc) {
for_each_cmd_status(status_record, &cmd_status) {
if (dev->array_id != status_record->array_id)
continue;
if (status_record->status != IPR_CMD_STATUS_IN_PROGRESS)
continue;
if (status_record->command_code == IPR_RESYNC_ARRAY_PROTECTION)
resync_in_progress = 1;
if (status_record->command_code == IPR_START_ARRAY_PROTECTION)
initialization_in_progress = 1;
if (status_record->command_code == IPR_MIGRATE_ARRAY_PROTECTION)
migrate_in_progress = 1;
percent_cmplt = status_record->percent_complete;
}
}
} else if (ipr_is_af_dasd_device(dev)) {
rc = ipr_query_command_status(dev, &cmd_status);
if ((rc == 0) && (cmd_status.num_records != 0)) {
status_record = cmd_status.record;
if (status_record->status != IPR_CMD_STATUS_SUCCESSFUL &&
status_record->status != IPR_CMD_STATUS_FAILED) {
percent_cmplt = status_record->percent_complete;
format_in_progress++;
}
}
} else if (ipr_is_gscsi(dev)) {
/* Send Test Unit Ready to find percent complete in sense data. */
rc = ipr_test_unit_ready(dev, &sense_data);
if ((rc == CHECK_CONDITION) &&
((sense_data.error_code & 0x7F) == 0x70) &&
((sense_data.sense_key & 0x0F) == 0x02) && /* NOT READY */
(sense_data.add_sense_code == 0x04) && /* LOGICAL UNIT NOT READY */
(sense_data.add_sense_code_qual == 0x04)) {/* FORMAT IN PROGRESS */
percent_cmplt = ((int)sense_data.sense_key_spec[1]*100)/0x100;
format_in_progress++;
}
}
memset(&res_state, 0, sizeof(res_state));
if (ipr_is_af(dev)) {
rc = ipr_query_resource_state(dev, &res_state);
if (rc != 0)
res_state.not_oper = 1;
} else if (ipr_is_gscsi(dev)) {
format_req = 0;
/* Issue mode sense/mode select to determine if device needs to be formatted */
status = ipr_mode_sense(dev, 0x0a, &mode_pages);
if (status == CHECK_CONDITION &&
sense_data.add_sense_code == 0x31 &&
sense_data.add_sense_code_qual == 0x00) {
format_req = 1;
} else {
if (!status) {
if (mode_pages.hdr.block_desc_len > 0) {
block_desc = (struct ipr_block_desc *)(mode_pages.data);
blk_size = block_desc->block_length[2] +
(block_desc->block_length[1] << 8) +
(block_desc->block_length[0] << 16);
if ((blk_size != IPR_JBOD_BLOCK_SIZE) &&
(blk_size != IPR_JBOD_4K_BLOCK_SIZE))
format_req = 1;
}
}
/* check device with test unit ready */
rc = ipr_test_unit_ready(dev, &sense_data);
if (rc == CHECK_CONDITION &&
sense_data.add_sense_code == 0x31 &&
sense_data.add_sense_code_qual == 0x00)
format_req = 1;
else if (rc)
res_state.not_oper = 1;
}
}
if (path_status)
rc = ipr_query_res_redundancy_info(dev, &info);
if (ioa->ioa_dead)
sprintf(buf, "Unknown");
else if (path_status && !rc) {
if (info.healthy_paths > 1)
sprintf(buf, "Redundant");
else if (info.healthy_paths)
sprintf(buf, "Single");
else
sprintf(buf, "No Paths");
} else if (format_in_progress)
sprintf(buf, "%d%% Formatted", percent_cmplt);
else if (ioa->sis64 && ipr_is_remote_af_dasd_device(dev)) {
if (!scsi_dev_data)
sprintf(buf, "Missing");
else
sprintf(buf, "Remote");
}
else if (!ioa->sis64 && ioa->is_secondary && !scsi_dev_data)
sprintf(buf, "Remote");
else if (!scsi_dev_data)
sprintf(buf, "Missing");
else if (!scsi_dev_data->online) {
if (dev->scsi_dev_data->type == TYPE_ENCLOSURE) {
get_ses_ioport_status(dev);
if (dev->active_suspend == IOA_DEV_PORT_SUSPEND)
sprintf(buf, "Suspend");
else
sprintf(buf, "Offline");
}
}
else if (res_state.not_oper || res_state.not_func)
sprintf(buf, "Failed");
else if (res_state.read_write_prot)
sprintf(buf, "R/W Protected");
else if (res_state.prot_dev_failed)
sprintf(buf, "Failed");
else if (ipr_is_volume_set(dev) || ipr_is_array(dev)) {
if (res_state.prot_resuming) {
if (!percent || (percent_cmplt == 0))
sprintf(buf, "Rebuilding");
else
sprintf(buf, "%d%% Rebuilt", percent_cmplt);
} else if (resync_in_progress) {
if (!percent || (percent_cmplt == 0))
sprintf(buf, "Checking");
else
sprintf(buf, "%d%% Checked", percent_cmplt);
} else if (initialization_in_progress) {
if ((!percent || (percent_cmplt == 0)))
sprintf(buf, "Initializing");
else
sprintf(buf, "%d%% Initializing", percent_cmplt);
} else if (migrate_in_progress) {
if ((!percent || (percent_cmplt == 0)))
sprintf(buf, "Migrating");
else
sprintf(buf, "%d%% Migrated", percent_cmplt);
} else if (res_state.prot_suspended)
sprintf(buf, "Degraded");
else if (res_state.degraded_oper || res_state.service_req)
sprintf(buf, "Degraded");
else if ((dev->ioa->asymmetric_access &&
dev->array_rcd->current_asym_access_state == IPR_ACTIVE_OPTIMIZED)
|| (!dev->ioa->is_secondary && !dev->ioa->asymmetric_access))
sprintf(buf, "Optimized");
else
sprintf(buf, "Non-Optimized");
} else if (format_req)
sprintf(buf, "Format Required");
else if (ipr_device_is_zeroed(dev))
sprintf(buf, "Zeroed");
else
sprintf(buf, "Active");
}
}
static const struct {
u8 status;
char *desc;
} path_status_desc[] = {
{ IPR_PATH_CFG_NO_PROB, "Functional" },
{ IPR_PATH_CFG_DEGRADED, "Degraded" },
{ IPR_PATH_CFG_FAILED, "Failed" },
{ IPR_PATH_CFG_SUSPECT, "Suspect" },
{ IPR_PATH_NOT_DETECTED, "Missing" },
{ IPR_PATH_INCORRECT_CONN, "Incorrect connect" }
};
/**
* get_phy_state -
* @state: state value
*
* Returns:
* state description
**/
static const char *get_phy_state(u8 state)
{
int i;
u8 mstate = state & IPR_PATH_CFG_STATUS_MASK;
for (i = 0; i < ARRAY_SIZE(path_status_desc); i++) {
if (path_status_desc[i].status == mstate)
return path_status_desc[i].desc;
}
return "Unknown";
}
static const struct {
u8 type;
char *desc;
} path_type_desc[] = {
{ IPR_PATH_CFG_IOA_PORT, "IOA port" },
{ IPR_PATH_CFG_EXP_PORT, "Expander port" },
{ IPR_PATH_CFG_DEVICE_PORT, "Device port" },
{ IPR_PATH_CFG_DEVICE_LUN, "Device LUN" }
};
/**
* get_phy_type -
* @type: type value
*
* Returns:
* type description
**/
static const char *get_phy_type(u8 type)
{
int i;
u8 mtype = type & IPR_PATH_CFG_TYPE_MASK;
for (i = 0; i < ARRAY_SIZE(path_type_desc); i++) {
if (path_type_desc[i].type == mtype)
return path_type_desc[i].desc;
}
return "Unknown";
}
static const char *link_rate[] = {
"Enabled",
"Disabled",
"Reset Prob",
"SpinupHold",
"Port Selec",
"Resetting",
"Unknown",
"Unknown",
"1.5Gbps",
"3.0Gbps",
"6.0Gbps",
"12.0Gbps",
"22.5Gbps",
"Enabled",
"Enabled",
"Enabled"
};
static const struct {
u8 state;
char *desc;
} path_state_desc[] = {
{ IPR_PATH_STATE_NO_INFO, "Unknown" },
{ IPR_PATH_HEALTHY, "Healthy" },
{ IPR_PATH_DEGRADED, "Degraded" },
{ IPR_PATH_FAILED, "Failed" }
};
/**
* get_path_state -
* @path_state: path_state value
*
* Returns:
* path state description
**/
static const char *get_path_state(u8 path_state)
{
int i;
u8 state = path_state & IPR_PATH_STATE_MASK;
for (i = 0; i < ARRAY_SIZE(path_state_desc); i++) {
if (path_state_desc[i].state == state)
return path_state_desc[i].desc;
}
return "Unknown";
}
/**
* print_phy -
* @cfg: ipr_fabric_config_element struct
* @body: message buffer
*
* Returns:
* body
**/
static char *print_phy(struct ipr_fabric_config_element *cfg, char *body)
{
int len = strlen(body);
body = realloc(body, len + 256);
body[len] = '\0';
len += sprintf(body + len, "%2X/%08X%08X ", cfg->phy,
ntohl(cfg->wwid[0]), ntohl(cfg->wwid[1]));
len += sprintf(body + len, " %-17s ", get_phy_type(cfg->type_status));
len += sprintf(body + len, " %-17s", get_phy_state(cfg->type_status));
len += sprintf(body + len, " %s \n",
link_rate[cfg->link_rate & IPR_PHY_LINK_RATE_MASK]);
return body;
}
/**
* print_phy64 -
* @cfg: ipr_fabric_config_element struct
* @body: message buffer
*
* Returns:
* body
**/
static char *print_phy64(struct ipr_fabric_config_element64 *cfg, char *body, int res_path_len)
{
int i, ff_len;
int len = strlen(body);
char buffer[IPR_MAX_RES_PATH_LEN];
body = realloc(body, len + 256);
body[len] = '\0';
ipr_format_res_path_wo_hyphen(cfg->res_path, buffer, IPR_MAX_RES_PATH_LEN);
ff_len = res_path_len - strlen(buffer);
for ( i = 0; i < ff_len; i++)
strncat(buffer, "F", strlen("F"));
len += sprintf(body + len, "%s", buffer);
len += sprintf(body + len, "/%08X%08X",
ntohl(cfg->wwid[0]), ntohl(cfg->wwid[1]));
len += sprintf(body + len, " %-17s ", get_phy_type(cfg->type_status));
len += sprintf(body + len, " %-17s", get_phy_state(cfg->type_status));
len += sprintf(body + len, " %s \n",
link_rate[cfg->link_rate & IPR_PHY_LINK_RATE_MASK]);
return body;
}
/**
* print_path -
* @ioa: ipr_fabric_descriptor struct
* @body: message buffer
*
* Returns:
* body
**/
static char *print_path(struct ipr_fabric_descriptor *fabric, char *body)
{
int len = strlen(body);
struct ipr_fabric_config_element *cfg;
body = realloc(body, len + 256);
body[len] = '\0';
len += sprintf(body + len, "%2X/ "
"Physical Path ", fabric->ioa_port);
if (fabric->path_state & IPR_PATH_ACTIVE)
len += sprintf(body + len, " Yes ");
else if (fabric->path_state & IPR_PATH_NOT_ACTIVE)
len += sprintf(body + len, " No ");
else
len += sprintf(body + len, " ??? ");
len += sprintf(body + len, "%-17s \n", get_path_state(fabric->path_state));
for_each_fabric_cfg(fabric, cfg)
body = print_phy(cfg, body);
return body;
}
/**
* print_path64 -
* @ioa: ipr_fabric_descriptor64 struct
* @body: message buffer
*
* Returns:
* body
**/
static char *print_path64(struct ipr_fabric_descriptor64 *fabric, char *body)
{
int len = strlen(body);
struct ipr_fabric_config_element64 *cfg;
char buffer[IPR_MAX_RES_PATH_LEN];
int max_res_path_len = 0;
body = realloc(body, len + 256);
body[len] = '\0';
ipr_format_res_path_wo_hyphen(fabric->res_path, buffer, IPR_MAX_RES_PATH_LEN);
len += sprintf(body + len, "%s "
"Resource Path ", buffer);
if (fabric->path_state & IPR_PATH_ACTIVE)
len += sprintf(body + len, " Yes ");
else if (fabric->path_state & IPR_PATH_NOT_ACTIVE)
len += sprintf(body + len, " No ");
else
len += sprintf(body + len, " ??? ");
len += sprintf(body + len, "%-17s \n", get_path_state(fabric->path_state));
for_each_fabric_cfg(fabric, cfg) {
ipr_format_res_path_wo_hyphen(cfg->res_path, buffer, IPR_MAX_RES_PATH_LEN);
if (strlen(buffer) > max_res_path_len)
max_res_path_len = strlen(buffer);
}
for_each_fabric_cfg(fabric, cfg) {
body = print_phy64(cfg, body, max_res_path_len);
}
return body;
}
/**
* print_path_details -
* @dev: ipr dev struct
* @body: message buffer
*
* Returns:
* body
**/
static char *print_path_details(struct ipr_dev *dev, char *body)
{
int rc, len = 0;
struct ipr_res_redundancy_info info;
struct ipr_fabric_descriptor *fabric;
struct ipr_fabric_descriptor64 *fabric64;
rc = ipr_query_res_redundancy_info(dev, &info);
if (rc)
return body;
if (body)
len = strlen(body);
body = realloc(body, len + 256);
body[len] = '\0';
if (dev->ioa->sis64)
for_each_fabric_desc64(fabric64, &info)
body = print_path64(fabric64, body);
else
for_each_fabric_desc(fabric, &info)
body = print_path(fabric, body);
return body;
}
/**
* __print_device -
* @dev: ipr dev struct
* @body: message buffer
* @option:
* @sd:
* @sg:
* @vpd:
* @percent:
* @indent:
* @res_path:
* @ra:
* @path_status:
*
* Returns:
* char * buffer
**/
char *__print_device(struct ipr_dev *dev, char *body, char *option,
int sd, int sg, int vpd, int percent, int indent,
int res_path, int ra, int path_status,
int hw_loc, int conc_main, int ioa_flag, int serial_num,
int ucode, int skip_status, int skip_vset)
{
u16 len = 0;
struct scsi_dev_data *scsi_dev_data = dev->scsi_dev_data;
int i;
char *dev_name = dev->dev_name;
char *gen_name = dev->gen_name;
char node_name[7], buf[100], raid_str[48];
char res_path_name[IPR_MAX_RES_PATH_LEN];
int tab_stop = 0;
int loc_len = 0;
char vendor_id[IPR_VENDOR_ID_LEN + 1];
char product_id[IPR_PROD_ID_LEN + 1];
struct ipr_ioa *ioa = dev->ioa, *ioa_phy_loc;
bool is4k = false, isri = false;
/* In cases where we're having problems with the device */
if (!ioa)
return body;
if (skip_vset && ipr_is_volume_set (dev))
return body;
if (ioa_flag)
ioa_phy_loc = dev->ioa;
if (body)
len = strlen(body);
body = realloc(body, len + 256);
if (sd && strlen(dev_name) > 5)
ipr_strncpy_0(node_name, &dev_name[5], 6);
else if (sg && (strlen(gen_name) > 5))
ipr_strncpy_0(node_name, &gen_name[5], 6);
else
node_name[0] = '\0';
if (option)
len += sprintf(body + len, " %s ", option);
if (scsi_dev_data && scsi_dev_data->type == TYPE_ENCLOSURE && (serial_num == 1 || hw_loc == 1))
len += sprintf(body + len, "%-8s ", node_name);
else
len += sprintf(body + len, "%-6s ", node_name);
if (hw_loc) {
if (ioa_flag) {
if (strlen(ioa_phy_loc->physical_location)) {
loc_len = sprintf(body + len, "%-40s ", ioa_phy_loc->physical_location);
len += loc_len;
}
else {
for (i = 0; i < 40-loc_len; i++)
body[len+i] = ' ';
len += 40-loc_len;
}
} else {
if (strlen(dev->physical_location)) {
if (conc_main) {
loc_len = sprintf(body + len, "%-26s ", dev->physical_location);
len += loc_len;
} else {
loc_len = sprintf(body + len, "%-38s ", dev->physical_location);
len += loc_len;
}
} else {
if (conc_main) {
loc_len = sprintf(body + len, "%d/%d:", ioa->host_num,ioa->host_num);
len += loc_len;
} else {
for (i = 0; i < 39-loc_len; i++)
body[len+i] = ' ';
len += 39-loc_len;
}
}
}
}
else {
if (res_path) {
if (ioa->sis64)
if (serial_num == 1) {
if (ipr_is_ioa(dev))
loc_len = sprintf(body + len, "%s/%-28d", ioa->pci_address, ioa->host_num);
else {
ipr_format_res_path(dev->res_path[ra].res_path_bytes, res_path_name, IPR_MAX_RES_PATH_LEN);
loc_len = sprintf(body + len, "%s/%d/%-24s", ioa->pci_address, ioa->host_num, res_path_name);
}
} else if (conc_main) {
ipr_format_res_path(dev->res_path[ra].res_path_bytes, res_path_name, IPR_MAX_RES_PATH_LEN);
loc_len = sprintf(body + len, "%d/%-26s ", ioa->host_num, res_path_name);
} else
loc_len = sprintf(body + len, "%-26s ",scsi_dev_data ?
scsi_dev_data->res_path : "");
else /*32bit*/
if (serial_num == 1) {
if (ipr_is_ioa(dev))
loc_len = sprintf(body + len, "%s/%-29d:", ioa->pci_address, ioa->host_num);
else
loc_len = sprintf(body + len, "%s/%d", ioa->pci_address, ioa->host_num);
} else if (conc_main)
loc_len = sprintf(body + len, "%d/%d:", ioa->host_num,ioa->host_num);
else
loc_len = sprintf(body + len, "%d:", ioa->host_num);
len += loc_len;
}
else {
loc_len = sprintf(body + len, "%s/%d:",
ioa->pci_address,
ioa->host_num);
len += loc_len;
}
}
if (ipr_is_ioa(dev)) {
if (serial_num == 1 ) {
if (!res_path || !ioa->sis64) {
for (i = 0; i < 28-loc_len; i++)
body[len+i] = ' ';
len += 28-loc_len;
}
len += sprintf(body + len,"%-13s ",
ioa->yl_serial_num);
} else if (hw_loc == 1 ) {
if (!res_path || !ioa->sis64) {
for (i = 0; i < 40-loc_len; i++)
body[len+i] = ' ';
len += 40-loc_len;
}
len += sprintf(body + len,"%-19s ",
scsi_dev_data->product_id);
}
else {
if (!res_path || !ioa->sis64) {
for (i = 0; i < 27-loc_len; i++)
body[len+i] = ' ';
len += 27-loc_len;
}
if (!vpd) {
tab_stop = sprintf(body + len,"%s %s", get_bus_desc(ioa),
get_ioa_desc(dev->ioa));
len += tab_stop;
for (i = 0; i < 29-tab_stop; i++)
body[len+i] = ' ';
len += 29-tab_stop;
} else
len += sprintf(body + len,"%-8s %-19s ",
scsi_dev_data->vendor_id,
scsi_dev_data->product_id);
}
} else if (scsi_dev_data && scsi_dev_data->type == IPR_TYPE_EMPTY_SLOT) {
if (!res_path || !ioa->sis64) {
if (hw_loc) {
for (i = 0; i < 27-loc_len; i++)
body[len+i] = ' ';
len += 27-loc_len;
}
else {
tab_stop = sprintf(body + len,"%d:%d: ",
dev->res_addr[ra].bus,
dev->res_addr[ra].target);
loc_len += tab_stop;
len += tab_stop;
for (i = 0; i < 29-loc_len; i++)
body[len+i] = ' ';
len += 29-loc_len;
}
}
len += sprintf(body + len, "%-8s %-19s ", " ", " ");
} else {
if (serial_num) {
if (!res_path || !ioa->sis64) {
for (i = 0; i < 26-loc_len; i++)
body[len+i] = ' ';
len += 26-loc_len;
}
}
else if (hw_loc) {
if (!res_path || !ioa->sis64) {
for (i = 0; i < 27-loc_len; i++)
body[len+i] = ' ';
len += 27-loc_len;
}
}
else {
if (!res_path || !ioa->sis64) {
tab_stop = sprintf(body + len,"%d:%d:%d ", dev->res_addr[ra].bus,
dev->res_addr[ra].target, dev->res_addr[ra].lun);
loc_len += tab_stop;
len += tab_stop;
if (conc_main && (hw_loc != 1)) {
for (i = 0; i < 29-loc_len; i++)
body[len+i] = ' ';
len += 29-loc_len;
} else {
for (i = 0; i < 27-loc_len; i++)
body[len+i] = ' ';
len += 27-loc_len;
}
}
}
if (vpd) {
if (scsi_dev_data) {
if (dev->qac_entry && ipr_is_device_record(dev->qac_entry->record_id)) {
ipr_strncpy_0(vendor_id, (char *)dev->vendor_id, IPR_VENDOR_ID_LEN);
ipr_strncpy_0(product_id, (char *)dev->product_id, IPR_PROD_ID_LEN);
} else {
ipr_strncpy_0(vendor_id, scsi_dev_data->vendor_id, IPR_VENDOR_ID_LEN);
ipr_strncpy_0(product_id, scsi_dev_data->product_id, IPR_PROD_ID_LEN);
}
} else if (dev->qac_entry) {
if (ipr_is_device_record(dev->qac_entry->record_id)) {
ipr_strncpy_0(vendor_id, (char *)dev->vendor_id, IPR_VENDOR_ID_LEN);
ipr_strncpy_0(product_id, (char *)dev->product_id, IPR_PROD_ID_LEN);
} else if (ipr_is_vset_record(dev->qac_entry->record_id)) {
ipr_strncpy_0(vendor_id, (char *)dev->vendor_id, IPR_VENDOR_ID_LEN);
ipr_strncpy_0(product_id, (char *)dev->product_id, IPR_PROD_ID_LEN);
}
}
if (hw_loc) {
len += sprintf(body + len, "%-19s ",
product_id);
}
else {
len += sprintf(body + len, "%-8s %-19s ",
vendor_id, product_id);
}
} else {
if (ioa->support_4k && dev->block_dev_class & IPR_BLK_DEV_CLASS_4K)
is4k = true;
else
is4k = false;
if (ipr_is_hot_spare(dev)) {
if (dev->block_dev_class & IPR_SSD) {
if (dev->read_intensive & IPR_RI)
isri = true;
else
isri = false;
sprintf(buf, "%s%sSSD Hot Spare", is4k ? "4K " : "", isri ? "RI " : "");
} else
sprintf(buf, "%s Hot Spare", is4k ? "4K " : "");
len += sprintf(body + len, "%-28s ", buf);
} else if (ipr_is_volume_set(dev) || ipr_is_array(dev)) {
if (dev->block_dev_class & IPR_SSD) {
if (dev->read_intensive & IPR_RI)
isri = true;
else
isri = false;
sprintf(buf, "RAID %s%s%s SSD Array",
get_prot_level_str(ioa->supported_arrays, dev->raid_level),
is4k ? " 4K" : "", isri ? " RI" : "");
} else
sprintf(buf, "RAID %s%s Array",
get_prot_level_str(ioa->supported_arrays, dev->raid_level),
is4k ? " 4K" : "");
len += sprintf(body + len, "%-28s ", buf);
} else if (ipr_is_array_member(dev)) {
if (indent)
if (dev->block_dev_class & IPR_SSD) {
if (dev->read_intensive & IPR_RI)
isri = true;
else
isri = false;
sprintf(raid_str," RAID %s%s%s SSD Member",
dev->prot_level_str, is4k ? " 4K" : "", isri ? " RI" : "");
} else
sprintf(raid_str," RAID %s%s Array Member",
dev->prot_level_str, is4k ? " 4K" : "");
else
if (dev->block_dev_class & IPR_SSD) {
if (dev->read_intensive & IPR_RI)
isri = true;
else
isri = false;
sprintf(raid_str,"RAID %s%s SSD %s Member",
dev->prot_level_str, is4k ? " 4K" : "", isri ? " RI" : "");
} else
sprintf(raid_str,"RAID %s%s Array Member",
dev->prot_level_str, is4k ? " 4K" : "");
len += sprintf(body + len, "%-28s ", raid_str);
} else if (ipr_is_af_dasd_device(dev))
if (dev->block_dev_class & IPR_SSD) {
if (dev->read_intensive & IPR_RI)
len += sprintf(body + len, "%-28s ", is4k ? "Advanced Function 4K RI SSD" :
"Advanced Function RI SSD");
else
len += sprintf(body + len, "%-28s ", is4k ? "Advanced Function 4K SSD" :
"Advanced Function SSD");
} else
len += sprintf(body + len, "%-28s ", is4k ? "Advanced Function 4K Disk" :
"Advanced Function Disk");
else if (scsi_dev_data && scsi_dev_data->type == TYPE_ENCLOSURE) {
if (serial_num == 1)
len += sprintf(body + len, "%-13s ", (char *)&dev->serial_number);
else
len += sprintf(body + len, "%-28s ", "Enclosure");
} else if (scsi_dev_data && scsi_dev_data->type == TYPE_PROCESSOR)
len += sprintf(body + len, "%-28s ", "Processor");
else if (scsi_dev_data && scsi_dev_data->type == TYPE_ROM)
len += sprintf(body + len, "%-28s ", "CD/DVD");
else if (scsi_dev_data && scsi_dev_data->type == TYPE_TAPE)
len += sprintf(body + len, "%-28s ", "Tape");
else if (ioa->ioa_dead)
len += sprintf(body + len, "%-28s ", "Unavailable Device");
else {
len += sprintf(body + len, "%-28s ",
is4k ? "Physical 4K Disk" : "Physical Disk");
}
}
}
if (ucode) {
int cur_ulevel = get_fw_version(dev);
int newest_ulevel = get_latest_fw_image_version(dev);
char updatable;
newest_ulevel = (newest_ulevel < 0) ?
cur_ulevel:newest_ulevel;
updatable = (cur_ulevel < newest_ulevel) ? '*':' ';
len += sprintf(body + len, "%-10X %X%c", cur_ulevel,
newest_ulevel, updatable);
}
if (!skip_status) {
get_status(dev, buf, percent, path_status);
len += sprintf(body + len, "%s", buf);
}
sprintf(body + len, "\n");
return body;
}
/**
* print_device -
* @dev: ipr dev struct
* @body: message buffer
* @option:
* @type: bitfield - type if information to print
*
* Returns:
* char * buffer
**/
/*
* Print the given device to a buffer. The type parameter is defined as
* a bitfield which has the following behavior:
*
* 0: print sd, resource address (sis32)/resource path (sis64), device VPD
* 1: print sd, pci/scsi location, device description, print % complete
* 2: print sg, resource address (sis32)/resource path (sis64), device VPD
* 3: print sd, pci/scsi location, device description, indent array members, print % complete
* 4: print sg, pci/scsi location, device description, print % complete
* 5: print sd, hardware location, status
* 6: print sd, the first resource adress(sis32)/resource path(sis64), dev VPD
* 7: print sd, the second resource adress(sis32)/resource path(sis64), dev VPD
* 8: print sg, pci/host/resource path, serial number, status
* 9: print sg, physical location, production id, status
* 10: print sg, pci/host/resource vendor, product id, ucode version, available ucode
* 11: print sd, resource address (sis32)/resource path (sis64), vendor, product id, ucode version, available ucode
*/
char *print_device(struct ipr_dev *dev, char *body, char *option, int type)
{
int sd, sg, vpd, percent, indent, res_path, hw_loc, conc_main, ioa_flag, serial_num;
int ucode = 0;
int skip_status = 0;
int skip_vset = 0;
sd = sg = vpd = percent = indent = res_path = hw_loc = conc_main = ioa_flag = serial_num = 0;
if ((type & 0x1000) == 0x1000) ioa_flag = 1;
type &= 0x0fff;
if (type == 2 || type == 4)
sg = 1;
else
sd = 1;
if (type == 0 || type == 2 || type == 6 || type == 7) {
vpd = 1;
res_path = 1;
} else
percent = 1;
if (type == 3)
indent = 1;
if (type == 5) {
hw_loc = 1;
conc_main = 1;
sg = 1;
}
if (type == 6 || type == 7) {
conc_main = 1;
sg = 1;
}
if (type == 8) {
sg = 1;
if (dev->ioa->sis64)
res_path = 1;
else
res_path = 0;
serial_num = 1;
}
if (type == 9) {
sg = 1;
hw_loc = 1;
if (dev->ioa->sis64)
res_path = 1;
else
res_path = 0;
vpd = 1;
}
if (type == 10) {
ucode = 1;
sd = 1;
sg = 1;
vpd = 1;
skip_status = 1;
skip_vset = 1;
}
if (type == 11) {
ucode = 1;
sg = 1;
vpd = 1;
skip_status = 1;
skip_vset = 1;
res_path = 1;
percent =1;
}
return __print_device(dev, body, option, sd, sg, vpd, percent,
indent, res_path, type&1, 0, hw_loc,
conc_main, ioa_flag, serial_num, ucode,
skip_status, skip_vset);
}
/**
* usage - display usage information
*
* Returns:
* nothing
**/
static void usage()
{
printf(_("Usage: iprconfig [options]\n"));
printf(_(" Options: -e name Default editor for viewing error logs\n"));
printf(_(" -k dir Kernel messages root directory\n"));
printf(_(" -c command Command line configuration\n"));
printf(_(" See man page for complete details\n"));
printf(_(" --version Print iprconfig version\n"));
printf(_(" --debug Enable additional error logging\n"));
printf(_(" --force Disable safety checks. See man page for details.\n"));
printf(_(" Use quotes around parameters with spaces\n"));
}
/**
* find_and_add_dev -
* @name: device name
*
* Returns:
* ipr_dev struct if success / NULL on failure
**/
static struct ipr_dev *find_and_add_dev(char *name)
{
struct ipr_dev *dev = find_dev(name);
if (!dev) {
syslog(LOG_ERR, _("Invalid device specified: %s\n"), name);
return NULL;
}
ipr_add_sysfs_dev(dev, &head_sdev, &tail_sdev);
return dev;
}
/**
* raid_create_add_dev -
* @name: device name
*
* Returns:
* 0 if success / non-zero on failure
**/
static int raid_create_add_dev(char *name, const char *raid_level, int skip_format)
{
struct ipr_dev *dev = find_and_add_dev(name);
if (!dev)
return -EINVAL;
if (ipr_is_gscsi(dev)) {
if (is_af_blocked(dev, 0))
return -EINVAL;
if (!is_format_allowed(dev))
return -EIO;
} else if (ipr_is_af_dasd_device(dev)) {
/* We always skip formatting for SIS32 if we are building
* a RAID0 */
if (!dev->ioa->sis64 && strcmp (raid_level, "0") == 0)
skip_format = 1;
}
if (!skip_format) {
/* Format device */
if (dev->ioa->support_4k && dev->block_dev_class & IPR_BLK_DEV_CLASS_4K)
add_format_device(dev, IPR_AF_4K_BLOCK_SIZE);
else
add_format_device(dev, dev->ioa->af_block_size);
dev_init_tail->do_init = 1;
}
return 0;
}
/**
* raid_create_check_num_devs -
* @ioa: ipr_array_cap_entry struct
* @num_devs: number of devices
*
* Returns:
* 0 if success / non-zero on failure
**/
static int raid_create_check_num_devs(struct ipr_array_cap_entry *cap,
int num_devs, int err_type)
{
if (num_devs < cap->min_num_array_devices ||
num_devs > cap->max_num_array_devices ||
(num_devs % cap->min_mult_array_devices) != 0) {
syslog(LOG_ERR, _("Invalid number of devices (%d) selected for "
"RAID %s array.\n"
"Must select a minimum of %d devices, a "
"maximum of %d devices, "
"and must be a multiple of %d devices.\n"),
num_devs, cap->prot_level_str, cap->min_num_array_devices,
cap->max_num_array_devices, cap->min_mult_array_devices);
if (err_type == 0)
return -EINVAL;
else if (num_devs > cap->min_num_array_devices)
return RC_77_Too_Many_Disks;
else if (num_devs < cap->min_num_array_devices)
return RC_78_Too_Few_Disks;
else if ((num_devs % cap->min_num_array_devices) != 0)
return RC_25_Devices_Multiple;
}
return 0;
}
/**
* curses_init - initialize curses
*
* Returns:
* nothing
**/
static void curses_init()
{
/* makes program compatible with all terminals -
originally didn't display text correctly when user was running xterm */
setenv("TERM", "vt100", 1);
setlocale(LC_ALL, "");
initscr();
}
/**
* format_devices -
* @args: argument vector
* @num_args: number of arguments
* @blksz: block size
*
* Returns:
* 0 if success / non-zero on failure FIXME
**/
static int format_devices(char **args, int num_args, int fmt_flag)
{
int i, rc, blksz;
struct ipr_dev *dev;
for (i = 0; i < num_args; i++) {
dev = find_dev(args[i]);
if (!dev) {
fprintf(stderr, "Invalid device: %s\n", args[i]);
continue;
}
if (!dev->ioa->support_4k && dev->block_dev_class & IPR_BLK_DEV_CLASS_4K) {
fprintf(stderr, "Invalid device specified: %s. 4K disks not supported on this adapter", args[i]);
continue;
}
if (fmt_flag == IPR_FMT_JBOD ) {
if (dev->ioa->support_4k && dev->block_dev_class & IPR_BLK_DEV_CLASS_4K)
blksz = IPR_JBOD_4K_BLOCK_SIZE;
else
blksz = IPR_JBOD_BLOCK_SIZE;
} else if (fmt_flag == IPR_FMT_RECOVERY)
blksz = 0;
if (!ipr_is_af_dasd_device(dev) && !ipr_is_gscsi(dev))
continue;
if (ipr_is_af_dasd_device(dev)) {
if (ipr_is_array_member(dev) && !dev->dev_rcd->no_cfgte_vol)
continue;
if (!is_format_allowed(dev))
continue;
} else {
if (!is_format_allowed(dev))
continue;
}
add_format_device(dev, blksz);
dev_init_tail->do_init = 1;
}
rc = send_dev_inits(NULL);
free_devs_to_init();
return IPR_XLATE_DEV_FMT_RC(rc);
}
/**
* recovery_format -
* @args: argument vector
* @num_args: number of arguments
*
* Returns:
* 0 if success / non-zero on failure FIXME
**/
static int recovery_format(char **args, int num_args)
{
return format_devices(args, num_args, IPR_FMT_RECOVERY);
}
/**
* format_for_jbod -
* @args: argument vector
* @num_args: number of arguments
*
* Returns:
* 0 if success / non-zero on failure FIXME
**/
static int format_for_jbod(char **args, int num_args)
{
return format_devices(args, num_args, IPR_FMT_JBOD);
}
/**
* format_for_raid -
* @args: argument vector
* @num_args: number of arguments
*
* Returns:
* 0 if success / non-zero on failure FIXME
**/
static int format_for_raid(char **args, int num_args)
{
int i, rc, blk_size;
struct ipr_dev *dev;
for (i = 0; i < num_args; i++) {
dev = find_and_add_dev(args[i]);
if (!dev || !can_format_for_raid(dev)) {
fprintf(stderr, "Invalid device: %s\n", args[i]);
return -EINVAL;
}
if (!dev->ioa->support_4k && dev->block_dev_class & IPR_BLK_DEV_CLASS_4K) {
fprintf(stderr, "Invalid device specified: %s. 4K disks not supported on this adapter\n", args[i]);
return -EINVAL;
}
if (dev->ioa->support_4k && dev->block_dev_class & IPR_BLK_DEV_CLASS_4K)
blk_size = IPR_AF_4K_BLOCK_SIZE;
else
blk_size = dev->ioa->af_block_size;
add_format_device(dev, blk_size);
dev_init_tail->do_init = 1;
}
rc = send_dev_inits(NULL);
free_devs_to_init();
return IPR_XLATE_DEV_FMT_RC(rc);
}
/**
* raid_create
* @args: argument vector
* @num_args: number of arguments
*
* Returns:
* 0 if success / non-zero on failure FIXME
**/
static int raid_create(char **args, int num_args)
{
int i, num_devs = 0, ssd_num_devs = 0, rc, prot_level;
int non_4k_count = 0, is_4k_count = 0;
int non_ri_count = 0, is_ri_count = 0;
int next_raid_level, next_stripe_size, next_qdepth, next_label;
char *raid_level = IPR_DEFAULT_RAID_LVL;
char label[8];
int stripe_size, qdepth, zeroed_devs, skip_format, max_qdepth;
int next_vcache, vcache = -1;
struct ipr_dev *dev;
struct sysfs_dev *sdev;
struct ipr_ioa *ioa = NULL;
struct ipr_array_cap_entry *cap;
u8 array_id;
label[0] = '\0';
next_raid_level = 0;
next_stripe_size = 0;
next_qdepth = 0;
next_label = 0;
next_vcache = 0;
stripe_size = 0;
qdepth = 0;
zeroed_devs = 0;
skip_format = 0;
for (i = 0; i < num_args; i++) {
if (strcmp(args[i], "-z") == 0)
zeroed_devs = 1;
else if (strcmp(args[i], "-r") == 0)
next_raid_level = 1;
else if (strcmp(args[i], "-s") == 0)
next_stripe_size = 1;
else if (strcmp(args[i], "-q") == 0)
next_qdepth = 1;
else if (strcmp(args[i], "-l") == 0)
next_label = 1;
else if (strcmp(args[i], "-c") == 0)
next_vcache = 1;
else if (strcmp(args[i], "--skip-format") == 0)
skip_format = 1;
else if (next_raid_level) {
next_raid_level = 0;
raid_level = args[i];
} else if (next_stripe_size) {
next_stripe_size = 0;
stripe_size = strtoul(args[i], NULL, 10);
} else if (next_qdepth) {
next_qdepth = 0;
qdepth = strtoul(args[i], NULL, 10);
} else if (next_vcache) {
next_vcache = 0;
if (strcmp(args[i], "writethrough") == 0)
vcache = IPR_DEV_CACHE_WRITE_THROUGH;
else if (strcmp(args[i], "writeback") == 0)
vcache = IPR_DEV_CACHE_WRITE_BACK;
else {
syslog(LOG_ERR,
_("Invalid value passed to -c."));
return -EINVAL;
}
} else if (next_label) {
next_label = 0;
if (strlen(args[i]) > (sizeof(label) - 1)) {
syslog(LOG_ERR, _("RAID array label too long. Maximum length is %d characters\n"),
(int)(sizeof(label) - 1));
return -EINVAL;
}
strcpy(label, args[i]);
} else if ((dev = find_dev(args[i]))) {
if (dev->block_dev_class & IPR_SSD)
ssd_num_devs++;
num_devs++;
if (zeroed_devs)
ipr_add_zeroed_dev(dev);
if (raid_create_add_dev(args[i], raid_level, skip_format))
return -EIO;
}
}
for (sdev = head_sdev; sdev; sdev = sdev->next) {
dev = ipr_sysfs_dev_to_dev(sdev);
if (!dev) {
syslog(LOG_ERR, _("Cannot find device\n"));
return -EINVAL;
}
if (!ioa)
ioa = dev->ioa;
else if (ioa != dev->ioa) {
syslog(LOG_ERR, _("All devices must be attached to the same adapter.\n"));
return -EINVAL;
}
if (dev->block_dev_class & IPR_BLK_DEV_CLASS_4K)
is_4k_count++;
else
non_4k_count++;
if (dev->block_dev_class & IPR_SSD)
if (dev->read_intensive & IPR_RI)
is_ri_count++;
else
non_ri_count++;
}
if (is_4k_count > 0 && non_4k_count > 0) {
syslog(LOG_ERR, _("4K disks and 5XX disks can not be mixed in an array.\n"));
return -EINVAL;
}
if (is_ri_count > 0 && non_ri_count > 0) {
syslog(LOG_ERR, _("SSD disks and RI SSD disks can not be mixed in an array.\n"));
return -EINVAL;
}
if (!ioa) {
syslog(LOG_ERR, _("No valid devices specified.\n"));
return -EINVAL;
}
cap = get_cap_entry(ioa->supported_arrays, raid_level);
if (!cap) {
syslog(LOG_ERR, _("Invalid RAID level for selected adapter. %s\n"), raid_level);
return -EINVAL;
}
prot_level = cap->prot_level >> 4;
if (dev->block_dev_class == IPR_HDD
&& (prot_level == 0x5 || prot_level == 0x6)
&& !ioa->has_cache && !ipr_force) {
fprintf(stderr,"\
Warning: Performance may be suboptimal for this RAID level without an \
IOA write cache. Use --force to force creation.\n");
return -EINVAL;
}
if (stripe_size && ((cap->supported_stripe_sizes & stripe_size) != stripe_size)) {
syslog(LOG_ERR, _("Unsupported stripe size for selected adapter. %d\n"),
stripe_size);
return -EINVAL;
}
if ((rc = raid_create_check_num_devs(cap, num_devs, 0)))
return rc;
if (!stripe_size)
stripe_size = ntohs(cap->recommended_stripe_size);
max_qdepth = ipr_max_queue_depth(dev->ioa, num_devs, ssd_num_devs);
if (qdepth > max_qdepth)
qdepth = max_qdepth;
if (!qdepth) {
if (ioa->sis64)
qdepth = num_devs * 16;
else
qdepth = num_devs * 4;
}
if (vcache == IPR_DEV_CACHE_WRITE_BACK && !ioa->vset_write_cache)
syslog(LOG_ERR,
_("Cannot set requested caching mode, using default.\n"));
else if(ioa->vset_write_cache && vcache < 0) {
/* For performance reasons Writeback is the default
Vset Cache policy. Users can override this setting
by passing option '-c writethrough' to raid create */
vcache = IPR_DEV_CACHE_WRITE_BACK;
}
if (dev_init_head) {
rc = send_dev_inits(NULL);
free_devs_to_init();
if (IPR_XLATE_DEV_FMT_RC(rc))
return rc;
}
check_current_config(false);
for (sdev = head_sdev; sdev; sdev = sdev->next) {
dev = ipr_sysfs_dev_to_dev(sdev);
if (!dev) {
syslog(LOG_ERR, _("Cannot find device: %lx\n"),
sdev->device_id);
return -EIO;
}
if (!ipr_is_af_dasd_device(dev)) {
scsi_err(dev, "Invalid device type\n");
return -EIO;
}
dev->dev_rcd->issue_cmd = 1;
}
if (!ioa->start_array_qac_entry) {
scsi_err(dev, "Invalid device type\n");
return -EIO;
}
if (ioa->sis64) {
array_id = ioa->start_array_qac_entry->type3.array_id;
if (strlen(label))
strcpy((char *)ioa->start_array_qac_entry->type3.desc, label);
} else
array_id = ioa->start_array_qac_entry->type2.array_id;
add_raid_cmd_tail(ioa, &ioa->ioa, array_id);
raid_cmd_tail->qdepth = qdepth;
raid_cmd_tail->do_cmd = 1;
raid_cmd_tail->vset_cache = vcache;
rc = ipr_start_array_protection(ioa, stripe_size, cap->prot_level);
if (rc)
return rc;
rc = raid_start_complete();
format_done = 1;
if (rc == RC_18_Array_Created)
return 0;
else
return -EIO;
}
/**
* hot_spare_delete -
* @args: argument vector
* @num_args: number of arguments
*
* Returns:
* 0 if success / non-zero on failure FIXME
**/
static int hot_spare_delete(char **args, int num_args)
{
struct ipr_dev *dev;
dev = find_dev(args[0]);
if (!dev) {
fprintf(stderr, "Cannot find %s\n", args[0]);
return -EINVAL;
}
dev->dev_rcd->issue_cmd = 1;
return ipr_remove_hot_spare(dev->ioa);
}
/**
* hot_spare_create -
* @args: argument vector
* @num_args: number of arguments
*
* Returns:
* 0 if success / non-zero on failure FIXME
**/
static int hot_spare_create(char **args, int num_args)
{
struct ipr_dev *dev;
dev = find_dev(args[0]);
if (!dev) {
fprintf(stderr, "Cannot find %s\n", args[0]);
return -EINVAL;
}
dev->dev_rcd->issue_cmd = 1;
return ipr_add_hot_spare(dev->ioa);
}
/**
* raid_include_cmd -
* @args: argument vector
* @num_args: number of arguments
*
* Returns:
* 0 if success / non-zero on failure FIXME
**/
static int raid_include_cmd(char **args, int num_args)
{
int i, rc, zeroed = 0;
struct ipr_dev *dev, *vset = NULL;
struct ipr_ioa *ioa;
struct devs_to_init_t *dev_init;
for (i = 0; i < num_args; i++) {
if (!strcmp(args[i], "-z"))
zeroed = 1;
}
for (i = 0; i < num_args; i++) {
if (!strcmp(args[i], "-z"))
continue;
dev = find_and_add_dev(args[i]);
if (!dev)
return -EINVAL;
if (ipr_is_volume_set(dev)) {
if (vset) {
fprintf(stderr, "Invalid parameters. Only one "
"disk array can be specified at a time.\n");
return -EINVAL;
}
vset = dev;
ioa = vset->ioa;
continue;
}
if (!ipr_is_af_dasd_device(dev)) {
fprintf(stderr, "Invalid device specified. Device must "
"be formatted to Advanced Function Format.\n");
return -EINVAL;
}
dev->dev_rcd->issue_cmd = 1;
if (!zeroed) {
if (!is_format_allowed(dev)) {
fprintf(stderr, "Format not allowed to %s\n", args[i]);
return -EIO;
}
add_format_device(dev, 0);
dev_init_tail->do_init = 1;
}
}
if (!vset) {
fprintf(stderr, "Invalid parameters. A disk array must be specified.\n");
return -EINVAL;
}
for_each_dev_to_init(dev_init)
if (vset->block_dev_class != dev_init->dev->block_dev_class) {
fprintf(stderr, "Invalid parameter. Can not mix SSDs and HDDs.\n");
return -EINVAL;
}
if (!zeroed) {
rc = send_dev_inits(NULL);
free_devs_to_init();
if (IPR_XLATE_DEV_FMT_RC(rc))
return rc;
}
return do_array_include(vset->ioa, vset->array_id,
vset->ioa->qac_data);
}
/**
* raid_delete -
* @args: argument vector
* @num_args: number of arguments
*
* Returns:
* 0 if success / non-zero on failure FIXME
**/
static int raid_delete(char **args, int num_args)
{
int rc;
struct ipr_dev *dev;
struct ipr_res_addr *ra;
dev = find_and_add_dev(args[0]);
if (!dev || !ipr_is_volume_set(dev) || dev->ioa->is_secondary) {
syslog(LOG_ERR, _("Invalid device specified: %s\n"), args[0]);
return -EINVAL;
}
dev->array_rcd->issue_cmd = 1;
if (dev->scsi_dev_data) {
ipr_allow_restart(dev, 0);
ipr_set_manage_start_stop(dev);
ipr_start_stop_stop(dev);
ipr_write_dev_attr(dev, "delete", "1");
}
if (dev->alt_path && dev->alt_path->scsi_dev_data) {
ipr_allow_restart(dev->alt_path, 0);
ipr_set_manage_start_stop(dev->alt_path);
ipr_start_stop_stop(dev->alt_path);
ipr_write_dev_attr(dev->alt_path, "delete", "1");
}
sleep(2);
rc = ipr_stop_array_protection(dev->ioa);
if (rc != 0) {
if (dev->scsi_dev_data) {
ra = &dev->res_addr[0];
ipr_scan(dev->ioa, ra->bus, ra->target, ra->lun);
ipr_allow_restart(dev, 1);
}
if (dev->alt_path && dev->alt_path->scsi_dev_data) {
ra = &dev->alt_path->res_addr[0];
ipr_scan(dev->alt_path->ioa, ra->bus, ra->target, ra->lun);
ipr_allow_restart(dev->alt_path, 1);
}
}
return rc;
}
/**
* printf_device - Display the given device
* @dev: ipr dev struct
* @type: type of information to print
*
* Returns:
* nothing
**/
static void printf_device(struct ipr_dev *dev, int type)
{
char *buf = print_device(dev, NULL, NULL, type);
if (buf) {
printf("%s", buf);
free(buf);
}
}
/**
* __printf_device -
* @dev: ipr dev struct
* @sd:
* @sg:
* @vpd:
* @percent:
* @indent:
* @res_path:
*
* Returns:
* nothing
**/
static void __printf_device(struct ipr_dev *dev, int sd, int sg, int vpd,
int percent, int indent, int res_path)
{
char *buf = __print_device(dev, NULL, NULL, sd, sg, vpd, percent, indent, res_path, 0, 0, 0, 0, 0, 0, 0, 0 ,0);
if (buf) {
printf("%s", buf);
free(buf);
}
}
/**
* printf_vsets -
* @ioa: ipr ioa struct
* @type: type of information to print
*
* Returns:
* nothing
**/
static void printf_vsets(struct ipr_ioa *ioa, int type)
{
struct ipr_dev *vset, *dev;
for_each_vset(ioa, vset) {
printf_device(vset, type);
for_each_dev_in_vset(vset, dev)
printf_device(dev, type);
}
}
/**
* printf_hot_spare_disks -
* @ioa: ipr ioa struct
* @type: type of information to print
*
* Returns:
* nothing
**/
static void printf_hot_spare_disks(struct ipr_ioa *ioa, int type)
{
struct ipr_dev *dev;
for_each_hot_spare(ioa, dev)
printf_device(dev, type);
}
/**
* printf_standlone_disks -
* @ioa: ipr ioa struct
* @type: type of information to print
*
* Returns:
* nothing
**/
static void printf_standlone_disks(struct ipr_ioa *ioa, int type)
{
struct ipr_dev *dev;
for_each_standalone_disk(ioa, dev)
printf_device(dev, type);
}
/**
* printf_ses_devices -
* @ioa: ipr ioa struct
* @type: type of information to print
*
* Returns:
* nothing
**/
static void printf_ses_devices(struct ipr_ioa *ioa, int type)
{
struct ipr_dev *dev;
for_each_ses(ioa, dev)
printf_device(dev, type);
}
/**
* printf_ioa -
* @ioa: ipr ioa struct
* @type: type of information to print
*
* Returns:
* nothing
**/
static void printf_ioa(struct ipr_ioa *ioa, int type)
{
if (!ioa->ioa.scsi_dev_data)
return;
printf_device(&ioa->ioa, type);
printf_standlone_disks(ioa, type);
printf_hot_spare_disks(ioa, type);
printf_vsets(ioa, type);
printf_ses_devices(ioa, type);
}
/**
* query_raid_create -
* @args: argument vector
* @num_args: number of arguments
*
* Returns:
* 0 if success / non-zero on failure
**/
static int query_raid_create(char **args, int num_args)
{
struct ipr_dev *dev;
struct ipr_ioa *ioa;
int num = 0;
dev = find_dev(args[0]);
if (!dev) {
fprintf(stderr, "Cannot find %s\n", args[0]);
return -EINVAL;
}
if (!ipr_is_ioa(dev)) {
fprintf(stderr, "Device is not an IOA\n");
return -EINVAL;
}
ioa = dev->ioa;
if (!ioa->qac_data->num_records)
return 0;
for_each_disk(ioa, dev) {
if (!device_supported(dev))
continue;
if (ipr_is_af_dasd_device(dev) && !dev->dev_rcd->start_cand)
continue;
if (!num)
printf("%s\n%s\n", status_hdr[2], status_sep[2]);
__printf_device(dev, 1, 1, 1, 0, 0, 0);
num++;
}
if (num)
printf("\b\n");
return 0;
}
/**
* query_raid_delete -
* @args: argument vector
* @num_args: number of arguments
*
* Returns:
* 0 if success / non-zero on failure
**/
static int query_raid_delete(char **args, int num_args)
{
struct ipr_dev *dev;
struct ipr_ioa *ioa;
int num = 0;
dev = find_dev(args[0]);
if (!dev) {
fprintf(stderr, "Cannot find %s\n", args[0]);
return -EINVAL;
}
if (!ipr_is_ioa(dev)) {
fprintf(stderr, "Device is not an IOA\n");
return -EINVAL;
}
ioa = dev->ioa;
for_each_vset(ioa, dev) {
if (!dev->array_rcd->stop_cand)
continue;
if (is_array_in_use(ioa, dev->array_id))
continue;
if (!num)
printf("%s\n%s\n", status_hdr[3], status_sep[3]);
printf_device(dev, 3);
num++;
}
return 0;
}
/**
* query_hot_spare_create -
* @args: argument vector
* @num_args: number of arguments
*
* Returns:
* 0 if success / non-zero on failure
**/
static int query_hot_spare_create(char **args, int num_args)
{
struct ipr_dev *dev;
struct ipr_ioa *ioa;
int hdr = 0;
dev = find_dev(args[0]);
if (!dev) {
fprintf(stderr, "Cannot find %s\n", args[0]);
return -EINVAL;
}
ioa = dev->ioa;
for_each_af_dasd(ioa, dev) {
if (!dev->dev_rcd->add_hot_spare_cand)
continue;
if (!hdr) {
hdr = 1;
printf("%s\n%s\n", status_hdr[2], status_sep[2]);
}
printf_device(dev, 2);
}
return 0;
}
/**
* query_hot_spare_delete -
* @args: argument vector
* @num_args: number of arguments
*
* Returns:
* 0 if success / non-zero on failure
**/
static int query_hot_spare_delete(char **args, int num_args)
{
struct ipr_dev *dev;
struct ipr_ioa *ioa;
int hdr = 0;
dev = find_dev(args[0]);
if (!dev) {
fprintf(stderr, "Cannot find %s\n", args[0]);
return -EINVAL;
}
ioa = dev->ioa;
for_each_hot_spare(ioa, dev) {
if (!dev->dev_rcd->rmv_hot_spare_cand)
continue;
if (!hdr) {
hdr = 1;
printf("%s\n%s\n", status_hdr[2], status_sep[2]);
}
printf_device(dev, 2);
}
return 0;
}
/**
* query_raid_consistency_check -
* @args: argument vector
* @num_args: number of arguments
*
* Returns:
* 0 if success / non-zero on failure
**/
static int query_raid_consistency_check(char **args, int num_args)
{
struct ipr_dev *dev, *array;
struct ipr_ioa *ioa;
int hdr = 0;
for_each_ioa(ioa) {
for_each_array(ioa, array) {
if (!array->array_rcd->resync_cand)
continue;
dev = array;
if (ioa->sis64)
dev = get_vset_from_array(ioa, dev);
if (!hdr) {
hdr = 1;
printf("%s\n%s\n", status_hdr[3], status_sep[3]);
}
printf_device(dev, 1);
}
}
return 0;
}
/**
* raid_consistency_check -
* @args: argument vector
* @num_args: number of arguments
*
* Returns:
* 0 if success / non-zero on failure
**/
static int raid_consistency_check(char **args, int num_args)
{
struct ipr_dev *dev = find_dev(args[0]);
if (!dev) {
fprintf(stderr, "Cannot find %s\n", args[0]);
return -EINVAL;
}
if (dev->ioa->sis64)
dev = get_array_from_vset(dev->ioa, dev);
if (!dev->array_rcd->resync_cand) {
fprintf(stderr, "%s is not a candidate for checking.\n", args[0]);
return -EINVAL;
}
dev->array_rcd->issue_cmd = 1;
return ipr_resync_array(dev->ioa);
}
/**
* start_ioa_cache -
* @args: argument vector
* @num_args: number of arguments
*
* Returns:
* 0 if success / non-zero on failure
**/
static int start_ioa_cache(char **args, int num_args)
{
struct ipr_dev *dev = find_dev(args[0]);
struct ipr_reclaim_query_data reclaim_buffer;
int rc;
if (!dev) {
fprintf(stderr, "Cannot find %s\n", args[0]);
return -EINVAL;
}
rc = ipr_reclaim_cache_store(dev->ioa,
IPR_RECLAIM_RESET_BATTERY_ERROR | IPR_RECLAIM_EXTENDED_INFO,
&reclaim_buffer);
if (rc)
return rc;
if (reclaim_buffer.action_status != IPR_ACTION_SUCCESSFUL)
rc = -EIO;
return rc;
}
/**
* force_cache_battery_error -
* @args: argument vector
* @num_args: number of arguments
*
* Returns:
* 0 if success / non-zero on failure
**/
static int force_cache_battery_error(char **args, int num_args)
{
struct ipr_dev *dev = find_dev(args[0]);
struct ipr_reclaim_query_data reclaim_buffer;
if (!dev) {
fprintf(stderr, "Cannot find %s\n", args[0]);
return -EINVAL;
}
return ipr_reclaim_cache_store(dev->ioa, IPR_RECLAIM_FORCE_BATTERY_ERROR,
&reclaim_buffer);
}
/**
* set_bus_width -
* @args: argument vector
* @num_args: number of arguments
*
* Returns:
* 0 if success / non-zero on failure
**/
static int set_bus_width(char **args, int num_args)
{
int rc;
struct ipr_scsi_buses page_28_cur;
struct ipr_scsi_buses page_28_chg;
struct ipr_ioa *ioa;
struct ipr_dev *dev = find_dev(args[0]);
int bus = strtoul(args[1], NULL, 10);
int width = strtoul(args[2], NULL, 10);
if (!dev) {
fprintf(stderr, "Invalid device %s\n", args[0]);
return -EINVAL;
}
if (!ioa_is_spi(dev->ioa) || dev->ioa->is_aux_cache)
return -EINVAL;
ioa = dev->ioa;
memset(&page_28_cur, 0, sizeof(page_28_cur));
memset(&page_28_chg, 0, sizeof(page_28_chg));
rc = ipr_get_bus_attr(ioa, &page_28_cur);
if (rc)
return rc;
if (bus >= page_28_cur.num_buses) {
fprintf(stderr, "Invalid bus specified: %d\n", bus);
return -EINVAL;
}
get_changeable_bus_attr(ioa, &page_28_chg, page_28_cur.num_buses);
if (!page_28_chg.bus[bus].bus_width) {
fprintf(stderr, "Bus width not changeable for this device\n");
return -EINVAL;
}
page_28_cur.bus[bus].bus_width = width;
return ipr_set_bus_attr(ioa, &page_28_cur, 1);
}
/**
* set_bus_speed -
* @args: argument vector
* @num_args: number of arguments
*
* Returns:
* 0 if success / non-zero on failure
**/
static int set_bus_speed(char **args, int num_args)
{
int rc, max_speed, new_xfer_rate;
struct ipr_scsi_buses page_28_cur;
struct ipr_scsi_buses page_28_chg;
struct ipr_ioa *ioa;
struct ipr_dev *dev = find_dev(args[0]);
int bus = strtoul(args[1], NULL, 10);
int speed = strtoul(args[2], NULL, 10);
if (!dev) {
fprintf(stderr, "Invalid device %s\n", args[0]);
return -EINVAL;
}
if (!ioa_is_spi(dev->ioa) || dev->ioa->is_aux_cache)
return -EINVAL;
ioa = dev->ioa;
memset(&page_28_cur, 0, sizeof(page_28_cur));
memset(&page_28_chg, 0, sizeof(page_28_chg));
rc = ipr_get_bus_attr(ioa, &page_28_cur);
if (rc)
return rc;
if (bus >= page_28_cur.num_buses) {
fprintf(stderr, "Invalid bus specified: %d\n", bus);
return -EINVAL;
}
get_changeable_bus_attr(ioa, &page_28_chg, page_28_cur.num_buses);
max_speed = get_max_bus_speed(ioa, bus);
new_xfer_rate = IPR_BUS_THRUPUT_TO_XFER_RATE(speed,
page_28_cur.bus[bus].bus_width);
if (speed > max_speed) {
fprintf(stderr, "Max speed allowed: %d MB/sec\n", max_speed);
return -EINVAL;
}
page_28_cur.bus[bus].max_xfer_rate = new_xfer_rate;
return ipr_set_bus_attr(ioa, &page_28_cur, 1);
}
/**
* set_initiator_id -
* @args: argument vector
* @num_args: number of arguments
*
* Returns:
* 0 if success / non-zero on failure
**/
static int set_initiator_id(char **args, int num_args)
{
int rc;
struct ipr_scsi_buses page_28_cur;
struct ipr_scsi_buses page_28_chg;
struct ipr_ioa *ioa;
struct ipr_dev *dev = find_dev(args[0]);
int bus = strtoul(args[1], NULL, 10);
int scsi_id = strtoul(args[2], NULL, 10);
if (!dev) {
fprintf(stderr, "Invalid device %s\n", args[0]);
return -EINVAL;
}
if (!ioa_is_spi(dev->ioa) || dev->ioa->is_aux_cache)
return -EINVAL;
if (scsi_id > 7) {
fprintf(stderr, "Host scsi id must be < 7\n");
return -EINVAL;
}
ioa = dev->ioa;
memset(&page_28_cur, 0, sizeof(page_28_cur));
memset(&page_28_chg, 0, sizeof(page_28_chg));
rc = ipr_get_bus_attr(ioa, &page_28_cur);
if (rc)
return rc;
if (bus >= page_28_cur.num_buses) {
fprintf(stderr, "Invalid bus specified: %d\n", bus);
return -EINVAL;
}
get_changeable_bus_attr(ioa, &page_28_chg, page_28_cur.num_buses);
if (!page_28_chg.bus[bus].scsi_id) {
fprintf(stderr, "SCSI ID is not changeable for this adapter.\n");
return -EINVAL;
}
for_each_dev(ioa, dev) {
if (!dev->scsi_dev_data)
continue;
if (scsi_id == dev->scsi_dev_data->id &&
bus == dev->scsi_dev_data->channel) {
fprintf(stderr, "SCSI ID %d conflicts with a device\n", scsi_id);
return -EINVAL;
}
}
page_28_cur.bus[bus].scsi_id = scsi_id;
return ipr_set_bus_attr(ioa, &page_28_cur, 1);
}
/**
* find_slot -
* @devs: ipr_dev struct
* @num_devs: number of devices
* @slot: slot description
*
* Returns:
* ipr_dev struct on success / NULL otherwise
**/
static struct ipr_dev *find_slot(struct ipr_dev **devs, int num_devs, char *slot)
{
int i;
for (i = 0; i < num_devs; i++) {
syslog_dbg("Looking for slot %s at pos %d\n", slot, i);
if (!strncmp(devs[i]->physical_location, slot, strlen(slot)))
return devs[i];
}
return NULL;
}
/**
* __add_device -
* @dev: ipr dev struct
* @on:
*
* Returns:
* 0 if success / non-zero on failure
**/
static int __add_device(struct ipr_dev *dev, int on)
{
struct ipr_dev *ses = dev->ses[0];
struct ipr_encl_status_ctl_pg ses_data;
struct ipr_drive_elem_status *elem_status, *overall;
struct ipr_ses_config_pg ses_cfg;
int rc;
if (!ses) {
fprintf(stderr, "Invalid device\n");
return -EINVAL;
}
if (dev->ioa->sis64)
elem_status = get_elem_status_64bit(dev, ses, &ses_data, &ses_cfg);
else
elem_status = get_elem_status(dev, ses, &ses_data, &ses_cfg);
if (!elem_status) {
scsi_err(dev, "Cannot find SES device for specified device\n");
return -EINVAL;
}
elem_status->select = 1;
elem_status->remove = 0;
elem_status->insert = on;
elem_status->identify = on;
elem_status->enable_byp = 0;
overall = ipr_get_overall_elem(&ses_data, &ses_cfg);
overall->select = 1;
overall->disable_resets = on;
rc = ipr_send_diagnostics(ses, &ses_data, ntohs(ses_data.byte_count) + 4);
if (!on) {
if (dev->ioa->sis64)
wait_for_new_dev_64bit(dev->ioa, &(dev->res_path[0]));
else
wait_for_new_dev(dev->ioa, &(dev->res_addr[0]));
}
return rc;
}
/**
* __remove_device -
* @dev: ipr dev struct
* @on:
*
* Returns:
* 0 if success / non-zero on failure
**/
static int __remove_device(struct ipr_dev *dev, int on)
{
struct ipr_dev *ses = dev->ses[0];
struct ipr_encl_status_ctl_pg ses_data;
struct ipr_drive_elem_status *elem_status, *overall;
struct ipr_ses_config_pg ses_cfg;
int rc;
if (!dev->ses) {
fprintf(stderr, "Invalid device specified\n");
return -EINVAL;
}
if (!on && ipr_is_af_dasd_device(dev)) {
if (!ipr_can_remove_device(dev)) {
scsi_err(dev, "Cannot remove device\n");
return -EINVAL;
}
}
if (dev->ioa->sis64)
elem_status = get_elem_status_64bit(dev, ses, &ses_data, &ses_cfg);
else
elem_status = get_elem_status(dev, ses, &ses_data, &ses_cfg);
if (!elem_status) {
scsi_err(dev, "Invalid device specified\n");
return -EINVAL;
}
elem_status->select = 1;
elem_status->remove = on;
elem_status->insert = 0;
elem_status->identify = on;
overall = ipr_get_overall_elem(&ses_data, &ses_cfg);
overall->select = 1;
overall->disable_resets = on;
rc = ipr_send_diagnostics(ses, &ses_data, ntohs(ses_data.byte_count) + 4);
if (!on) {
if (dev->ioa->sis64) {
if (!remove_or_add_back_device_64bit(dev)) {
printf(_("Disk is not removed physically, Add it back automically\n"));
sleep(5);
}
}
else {
ipr_write_dev_attr(dev, "delete", "1");
evaluate_device(dev, dev->ioa, 0);
ipr_del_zeroed_dev(dev);
}
}
return rc;
}
/**
* add_slot -
* @args: argument vector
* @num_args: number of arguments
*
* Returns:
* 0 if success / non-zero on failure
**/
static int add_slot(char **args, int num_args)
{
int num_devs, rc;
struct ipr_dev *dev, **devs;
int on = strtoul(args[1], NULL, 10);
num_devs = get_conc_devs(&devs, IPR_CONC_ADD);
dev = find_slot(devs, num_devs, args[0]);
if (!dev) {
fprintf(stderr, "Invalid location %s\n", args[0]);
return -EINVAL;
}
rc = __add_device(dev, on);
free_empty_slots(devs, num_devs);
free(devs);
return rc;
}
/**
* remove_slot -
* @args: argument vector
* @num_args: number of arguments
*
* Returns:
* 0 if success / non-zero on failure
**/
static int remove_slot(char **args, int num_args)
{
int num_devs, rc;
struct ipr_dev *dev, **devs;
int on = strtoul(args[1], NULL, 10);
num_devs = get_conc_devs(&devs, IPR_CONC_REMOVE);
dev = find_slot(devs, num_devs, args[0]);
if (!dev) {
fprintf(stderr, "Invalid location %s\n", args[0]);
return -EINVAL;
}
rc = __remove_device(dev, on);
free_empty_slots(devs, num_devs);
free(devs);
return rc;
}
/**
* remove_disk -
* @args: argument vector
* @num_args: number of arguments
*
* Returns:
* 0 if success / non-zero on failure
**/
static int remove_disk(char **args, int num_args)
{
int num_devs, i;
struct ipr_dev **devs;
struct ipr_dev *dev = find_dev(args[0]);
int on = strtoul(args[1], NULL, 10);
int rc = -EINVAL;
if (!dev) {
fprintf(stderr, "Invalid device %s\n", args[0]);
return -EINVAL;
}
num_devs = get_conc_devs(&devs, IPR_CONC_REMOVE);
for (i = 0; i < num_devs; i++) {
if (devs[i] == dev) {
rc = __remove_device(dev, on);
break;
}
}
free_empty_slots(devs, num_devs);
free(devs);
return rc;
}
/**
* __identify_device -
* @dev: ipr dev struct
* @on:
*
* Returns:
* 0 if success / non-zero on failure
**/
static int __identify_device(struct ipr_dev *dev, int on)
{
struct ipr_dev *ses = dev->ses[0];
struct ipr_encl_status_ctl_pg ses_data;
struct ipr_drive_elem_status *elem_status;
struct ipr_ses_config_pg ses_cfg;
if (!dev->ses) {
fprintf(stderr, "Invalid device specified\n");
return -EINVAL;
}
if (dev->ioa->sis64)
elem_status = get_elem_status_64bit(dev, ses, &ses_data, &ses_cfg);
else
elem_status = get_elem_status(dev, ses, &ses_data, &ses_cfg);
if (!elem_status) {
scsi_err(dev, "Invalid device specified\n");
return -EINVAL;
}
elem_status->select = 1;
elem_status->identify = on;
elem_status->insert = 0;
elem_status->remove = 0;
return ipr_send_diagnostics(ses, &ses_data, ntohs(ses_data.byte_count) + 4);
}
/**
* identify_slot -
* @args: argument vector
* @num_args: number of arguments
*
* Returns:
* 0 if success / non-zero on failure
**/
static int identify_slot(char **args, int num_args)
{
int num_devs, rc;
struct ipr_dev *dev, **devs;
int on = strtoul(args[1], NULL, 10);
num_devs = get_conc_devs(&devs, IPR_CONC_IDENTIFY);
dev = find_slot(devs, num_devs, args[0]);
if (!dev) {
fprintf(stderr, "Invalid location %s\n", args[0]);
return -EINVAL;
}
rc = __identify_device(dev, on);
free_empty_slots(devs, num_devs);
free(devs);
return rc;
}
/**
* identify_disk -
* @args: argument vector
* @num_args: number of arguments
*
* Returns:
* 0 if success / non-zero on failure
**/
static int identify_disk(char **args, int num_args)
{
int num_devs, i;
struct ipr_dev **devs;
struct ipr_dev *dev = find_dev(args[0]);
int rc = -EINVAL;
if (!dev) {
fprintf(stderr, "Cannot find %s\n", args[0]);
return -EINVAL;
}
num_devs = get_conc_devs(&devs, IPR_CONC_IDENTIFY);
for (i = 0; i < num_devs; i++) {
if (devs[i] == dev) {
rc = __identify_device(dev, strtoul(args[1], NULL, 10));
break;
}
}
free_empty_slots(devs, num_devs);
free(devs);
return rc;
}
/**
* set_log_level_cmd -
* @args: argument vector
* @num_args: number of arguments
*
* Returns:
* 0 if success / non-zero on failure
**/
static int set_log_level_cmd(char **args, int num_args)
{
char buf[4];
struct ipr_dev *dev = find_dev(args[0]);
if (!dev) {
fprintf(stderr, "Cannot find %s\n", args[0]);
return -EINVAL;
}
if (!ipr_is_ioa(dev)) {
fprintf(stderr, "Device is not an IOA\n");
return -EINVAL;
}
snprintf(buf, sizeof(buf), "%s\n", args[1]);
set_log_level(dev->ioa, buf);
return 0;
}
/**
* set_tcq_enable -
* @args: argument vector
* @num_args: number of arguments
*
* Returns:
* 0 if success / non-zero on failure
**/
static int set_tcq_enable(char **args, int num_args)
{
int rc;
struct ipr_disk_attr attr;
struct ipr_dev *dev = find_dev(args[0]);
if (!dev) {
fprintf(stderr, "Cannot find %s\n", args[0]);
return -EINVAL;
}
rc = ipr_get_dev_attr(dev, &attr);
if (rc)
return rc;
rc = ipr_modify_dev_attr(dev, &attr);
if (rc)
return rc;
attr.tcq_enabled = strtoul(args[1], NULL, 10);
if (attr.tcq_enabled != 0 && attr.tcq_enabled != 1) {
fprintf(stderr, "Invalid parameter\n");
return -EINVAL;
}
return ipr_set_dev_attr(dev, &attr, 1);
}
/**
* set_qdepth -
* @args: argument vector
* @num_args: number of arguments
*
* Returns:
* 0 if success / non-zero on failure
**/
static int set_qdepth(char **args, int num_args)
{
int rc;
struct ipr_disk_attr attr;
struct ipr_dev *dev = find_dev(args[0]);
int num_devs, ssd_num_devs, max_qdepth;
if (!dev) {
fprintf(stderr, "Cannot find %s\n", args[0]);
return -EINVAL;
}
rc = ipr_get_dev_attr(dev, &attr);
if (rc)
return rc;
rc = ipr_modify_dev_attr(dev, &attr);
if (rc)
return rc;
ipr_count_devices_in_vset(dev, &num_devs, &ssd_num_devs);
max_qdepth = ipr_max_queue_depth(dev->ioa, num_devs, ssd_num_devs);
attr.queue_depth = strtoul(args[1], NULL, 10);
if (attr.queue_depth > max_qdepth) {
fprintf(stderr, "Invalid queue depth, max queue depth is %d\n",
max_qdepth);
return -EINVAL;
}
return ipr_set_dev_attr(dev, &attr, 1);
}
/**
* set_format_timeout -
* @args: argument vector
* @num_args: number of arguments
*
* Returns:
* 0 if success / non-zero on failure
**/
static int set_format_timeout(char **args, int num_args)
{
int rc;
struct ipr_disk_attr attr;
struct ipr_dev *dev = find_dev(args[0]);
if (!dev) {
fprintf(stderr, "Cannot find %s\n", args[0]);
return -EINVAL;
}
rc = ipr_get_dev_attr(dev, &attr);
if (rc)
return rc;
rc = ipr_modify_dev_attr(dev, &attr);
if (rc)
return rc;
attr.format_timeout = strtoul(args[1], NULL, 10) * 3600;
return ipr_set_dev_attr(dev, &attr, 1);
}
/**
* set_device_write_cache_policy
*
* Sets the write cache policy for a device. The aruments are the
* device (sd*, sg*) and the new policy (writeback,writethrough).
*
* @args: argument vector
* @num_args: number of arguments
*
* Returns:
* 0 if success / non-zero on failure
**/
static int set_device_write_cache_policy(char **args, int num_args)
{
struct ipr_dev *dev = find_dev(args[0]);
struct ipr_disk_attr attr;
char *policy = args[1];
int ipolicy;
int rc;
if (!dev) {
fprintf(stderr, "Cannot find %s\n", args[0]);
return -EINVAL;
}
if (!ipr_is_gscsi(dev) &&
(!ipr_is_volume_set(dev) || !dev->ioa->vset_write_cache)) {
scsi_err(dev, "Unable to set cache policy.\n");
return -EINVAL;
}
if (strncmp(policy, "writethrough", sizeof ("writethrough") - 1) == 0)
ipolicy = IPR_DEV_CACHE_WRITE_THROUGH;
else if (strncmp(policy, "writeback", sizeof ("writeback") - 1) == 0)
ipolicy = IPR_DEV_CACHE_WRITE_BACK;
else {
fprintf(stderr, "Invalid cache policy.\n");
return -EINVAL;
}
rc = ipr_get_dev_attr(dev, &attr);
if (rc)
return rc;
attr.write_cache_policy = ipolicy;
rc = ipr_set_dev_attr(dev, &attr, 1);
if (rc) {
scsi_err(dev, "Unable to set cache policy.\n");
return rc;
}
return 0;
}
/**
* query_device_write_cache_policy
*
* Query the write cache policy for a device. User passes the
* device (sd*, sg*) to be queried.
*
* @args: argument vector
* @num_args: number of arguments
*
* Returns:
* 0 if success / non-zero on failure
**/
static int query_device_write_cache_policy(char **args, int num_args)
{
struct ipr_dev *dev = find_dev(args[0]);
struct ipr_disk_attr attr;
char *policy;
int rc;
if (!dev) {
fprintf(stderr, "Cannot find %s\n", args[0]);
return -EINVAL;
}
if (!ipr_is_gscsi(dev) && !ipr_is_volume_set(dev)) {
scsi_err(dev, "Cannot query write back policy.\n");
return -EINVAL;
}
rc = ipr_get_dev_attr(dev, &attr);
if (rc)
return rc;
switch (attr.write_cache_policy) {
case IPR_DEV_CACHE_WRITE_THROUGH:
policy = "write through";
break;
case IPR_DEV_CACHE_WRITE_BACK:
policy = "write back";
break;
default:
return -EINVAL;
}
printf("%s\n", policy);
return 0;
}
/**
* update_ioa_ucode -
* @ioa: ipr ioa struct
* @file: file name
*
* Returns:
* 0 if success / non-zero on failure
**/
static int update_ioa_ucode(struct ipr_ioa *ioa, char *file)
{
struct ipr_fw_images image;
int rc;
strcpy(image.file, file);
image.version = get_ioa_ucode_version(file);
image.has_header = 0;
rc = ipr_update_ioa_fw(ioa, &image, 1);
if (image.version != get_fw_version(&ioa->ioa))
return -EIO;
return rc;
}
/**
* update_dev_ucode -
* @dev: ipr dev struct
* @file: file name
*
* Returns:
* 0 if success / non-zero on failure
**/
static int update_dev_ucode(struct ipr_dev *dev, char *file)
{
struct ipr_fw_images image;
int rc;
strcpy(image.file, file);
if (dev->scsi_dev_data->type == TYPE_ENCLOSURE ||
dev->scsi_dev_data->type == TYPE_PROCESSOR) {
image.version = get_ses_ucode_version(file);
} else {
image.version = get_dasd_ucode_version(file, 1);
image.has_header = 1;
}
rc = ipr_update_disk_fw(dev, &image, 1);
if (image.version != get_fw_version(dev))
return -EIO;
return rc;
}
/**
* update_ucode_cmd -
* @args: argument vector
* @num_args: number of arguments
*
* Returns:
* 0 if success / non-zero on failure
**/
static int update_ucode_cmd(char **args, int num_args)
{
struct ipr_dev *dev = find_dev(args[0]);
if (!dev) {
fprintf(stderr, "Cannot find %s\n", args[0]);
return -EINVAL;
}
if (ipr_is_ioa(dev))
return update_ioa_ucode(dev->ioa, args[1]);
else
return update_dev_ucode(dev, args[1]);
}
/**
* update_all_ucodes - update-all-ucodes Command line interface.
* @args: argument vector
* @num_args: number of arguments
*
* Returns:
* 0 if success / non-zero on failure
**/
static int update_all_ucodes(char **args, int num_args)
{
struct ipr_ioa *ioa;
struct ipr_dev *dev;
int failed_count = 0;
struct ipr_fw_images *lfw;
int rc;
for_each_ioa(ioa) {
if (!ioa->ioa.scsi_dev_data)
continue;
for_ioa_and_each_dev(ioa, dev) {
if (ipr_is_volume_set(dev))
continue;
lfw = get_latest_fw_image(dev);
if (!lfw || lfw->version <= get_fw_version(dev))
continue;
if (ipr_is_ioa(dev))
rc = update_ioa_ucode(dev->ioa, lfw->file);
else
rc = update_dev_ucode(dev, lfw->file);
free(lfw);
if (rc)
failed_count++;
}
}
if (failed_count)
fprintf(stderr, "\
Failed to update %d devices. Run dmesg for more information.\n",
failed_count);
return 0;
}
/**
* show_ucode_levels - List microcode level of every device and adapter
* @args: argument vector
* @num_args: number of arguments
*
* Returns:
* 0 if success / non-zero on failure
**/
static int show_ucode_levels(char **args, int num_args)
{
struct ipr_ioa *ioa;
printf("%s\n%s\n", status_hdr[15], status_sep[15]);
for_each_ioa(ioa) {
if (ioa->is_secondary){
printf_device(&ioa->ioa, 10);
continue;
}
printf_ioa(ioa, 10);
}
return 0;
}
/**
* disrupt_device_cmd -
* @args: argument vector
* @num_args: number of arguments
*
* Returns:
* 0 if success / non-zero on failure
**/
static int disrupt_device_cmd(char **args, int num_args)
{
struct ipr_dev *dev = find_dev(args[0]);
if (!dev) {
fprintf(stderr, "Cannot find %s\n", args[0]);
return -EINVAL;
}
if (!ipr_is_af_dasd_device(dev)) {
fprintf(stderr, "%s is not an Advanced Function disk\n", args[0]);
return -EINVAL;
}
return ipr_disrupt_device(dev);
}
/**
* raid_rebuild_cmd -
* @args: argument vector
* @num_args: number of arguments
*
* Returns:
* 0 if success / non-zero on failure
**/
static int raid_rebuild_cmd(char **args, int num_args)
{
struct ipr_dev *dev = find_dev(args[0]);
if (!dev) {
fprintf(stderr, "Cannot find %s\n", args[0]);
return -EINVAL;
}
if (!ipr_is_af_dasd_device(dev)) {
fprintf(stderr, "%s is not an Advanced Function disk\n", args[0]);
return -EINVAL;
}
enable_af(dev);
dev->dev_rcd->issue_cmd = 1;
return ipr_rebuild_device_data(dev->ioa);
}
/**
* __reclaim - Reclaim the specified IOA's write cache.
* @args: argument vector
* @num_args: number of arguments
* @action:
*
* Returns:
* 0 if success / non-zero on failure
**/
static int __reclaim(char **args, int num_args, int action)
{
struct ipr_reclaim_query_data buf;
struct ipr_dev *dev;
struct ipr_ioa *ioa;
int rc;
dev = find_dev(args[0]);
if (!dev) {
fprintf(stderr, "Cannot find %s\n", args[0]);
return -EINVAL;
}
ioa = dev->ioa;
rc = ipr_reclaim_cache_store(ioa, action, &buf);
if (rc != 0)
return rc;
memset(&buf, 0, sizeof(buf));
rc = ipr_reclaim_cache_store(ioa, IPR_RECLAIM_QUERY, &buf);
if (rc != 0)
return rc;
print_reclaim_results(&buf);
return 0;
}
/**
* reclaim - Reclaim the specified IOA's write cache.
* @args: argument vector
* @num_args: number of arguments
*
* Returns:
* 0 if success / non-zero on failure
**/
static int reclaim(char **args, int num_args)
{
return __reclaim(args, num_args, IPR_RECLAIM_PERFORM);
}
/**
* reclaim_unknown - Reclaim the specified IOA's write cache and allow
* unknown data loss.
* @args: argument vector
* @num_args: number of arguments
*
* Returns:
* 0 if success / non-zero on failure
**/
static int reclaim_unknown(char **args, int num_args)
{
return __reclaim(args, num_args,
IPR_RECLAIM_PERFORM | IPR_RECLAIM_UNKNOWN_PERM);
}
/**
* query_path_details -
* @args: argument vector
* @num_args: number of arguments
*
* Returns:
* 0 if success / non-zero on failure
**/
static int query_path_details(char **args, int num_args)
{
char *buf;
struct ipr_dev *dev = find_dev(args[0]);
if (!dev) {
fprintf(stderr, "Invalid device %s\n", args[0]);
return -EINVAL;
}
buf = print_path_details(dev, NULL);
if (buf) {
printf("%s\n%s\n", status_hdr[6], status_sep[6]);
printf("%s", buf);
free(buf);
}
return 0;
}
/**
* printf_path_status -
* @dev: ipr dev struct
*
* Returns:
* nothing
**/
static void printf_path_status(struct ipr_dev *dev)
{
char *buf = __print_device(dev, NULL, NULL, 1, 1, 1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0);
if (buf) {
printf("%s", buf);
free(buf);
}
}
/**
* printf_ioa_path_status -
* @ioa: ipr ioa struct
*
* Returns:
* 0
**/
static int printf_ioa_path_status(struct ipr_ioa *ioa)
{
struct ipr_dev *dev;
if (__ioa_is_spi(ioa))
return 0;
for_each_disk(ioa, dev)
printf_path_status(dev);
return 0;
}
/**
* query_path_status -
* @args: argument vector
* @num_args: number of arguments
*
* Returns:
* 0 if success / non-zero on failure
**/
static int query_path_status(char **args, int num_args)
{
struct ipr_ioa *ioa;
struct ipr_dev *dev = NULL;
int hdr = 1;
if (!num_args) {
for_each_sas_ioa(ioa) {
if (hdr) {
printf("%s\n%s\n", status_hdr[2], status_sep[2]);
hdr = 0;
}
printf_ioa_path_status(ioa);
}
return 0;
}
dev = find_dev(args[0]);
if (!dev)
return -ENXIO;
printf("%s\n%s\n", status_hdr[2], status_sep[2]);
if (ipr_is_ioa(dev))
printf_ioa_path_status(dev->ioa);
else
printf_path_status(dev);
return 0;
}
/**
* query_recommended_stripe_size -
* @args: argument vector
* @num_args: number of arguments
*
* Returns:
* 0 if success / non-zero on failure
**/
static int query_recommended_stripe_size(char **args, int num_args)
{
struct ipr_dev *dev = find_dev(args[0]);
struct ipr_array_cap_entry *cap;
if (!dev) {
fprintf(stderr, "Invalid device %s\n", args[0]);
return -EINVAL;
}
if (dev->ioa->is_aux_cache || !dev->ioa->supported_arrays)
return -EINVAL;
cap = get_cap_entry(dev->ioa->supported_arrays, args[1]);
if (cap)
printf("%d\n", ntohs(cap->recommended_stripe_size));
return 0;
}
/**
* query_supp_stripe_sizes -
* @args: argument vector
* @num_args: number of arguments
*
* Returns:
* 0 if success / non-zero on failure
**/
static int query_supp_stripe_sizes(char **args, int num_args)
{
struct ipr_dev *dev = find_dev(args[0]);
struct ipr_array_cap_entry *cap;
int i;
if (!dev) {
fprintf(stderr, "Invalid device %s\n", args[0]);
return -EINVAL;
}
if (dev->ioa->is_aux_cache || !dev->ioa->supported_arrays)
return -EINVAL;
cap = get_cap_entry(dev->ioa->supported_arrays, args[1]);
if (!cap)
return 0;
for (i = 0; i < (sizeof(cap->supported_stripe_sizes) * 8); i++)
if (ntohs(cap->supported_stripe_sizes) & (1 << i))
printf("%d ", (1 << i));
printf("\n");
return 0;
}
/**
* query_min_mult_in_array - Start array protection for an array
* @args: argument vector
* @num_args: number of arguments
*
* Returns:
* 0 if success / non-zero on failure
**/
static int query_min_mult_in_array(char **args, int num_args)
{
struct ipr_dev *dev = find_dev(args[0]);
struct ipr_array_cap_entry *cap;
if (!dev) {
fprintf(stderr, "Invalid device %s\n", args[0]);
return -EINVAL;
}
if (dev->ioa->is_aux_cache || !dev->ioa->supported_arrays)
return -EINVAL;
cap = get_cap_entry(dev->ioa->supported_arrays, args[1]);
if (cap)
printf("%d\n", cap->min_mult_array_devices);
return 0;
}
/**
* query_min_array_devices -
* @args: argument vector
* @num_args: number of arguments
*
* Returns:
* 0 if success / non-zero on failure
**/
static int query_min_array_devices(char **args, int num_args)
{
struct ipr_dev *dev = find_dev(args[0]);
struct ipr_array_cap_entry *cap;
if (!dev) {
fprintf(stderr, "Invalid device %s\n", args[0]);
return -EINVAL;
}
if (dev->ioa->is_aux_cache || !dev->ioa->supported_arrays)
return -EINVAL;
cap = get_cap_entry(dev->ioa->supported_arrays, args[1]);
if (cap)
printf("%d\n", cap->min_num_array_devices);
return 0;
}
/**
* query_max_array_devices -
* @args: argument vector
* @num_args: number of arguments
*
* Returns:
* 0 if success / non-zero on failure
**/
static int query_max_array_devices(char **args, int num_args)
{
struct ipr_dev *dev = find_dev(args[0]);
struct ipr_array_cap_entry *cap;
if (!dev) {
fprintf(stderr, "Invalid device %s\n", args[0]);
return -EINVAL;
}
if (dev->ioa->is_aux_cache || !dev->ioa->supported_arrays)
return -EINVAL;
cap = get_cap_entry(dev->ioa->supported_arrays, args[1]);
if (cap)
printf("%d\n", cap->max_num_array_devices);
return 0;
}
/**
* query_include_allowed -
* @args: argument vector
* @num_args: number of arguments
*
* Returns:
* 0 if success / non-zero on failure
**/
static int query_include_allowed(char **args, int num_args)
{
struct ipr_dev *dev = find_dev(args[0]);
struct ipr_array_cap_entry *cap;
if (!dev) {
fprintf(stderr, "Invalid device %s\n", args[0]);
return -EINVAL;
}
if (dev->ioa->is_aux_cache || !dev->ioa->supported_arrays) {
printf("no\n");
return 0;
}
cap = get_cap_entry(dev->ioa->supported_arrays, args[1]);
if (!cap) {
printf("no\n");
return 0;
}
if (cap->include_allowed)
printf("yes\n");
else
printf("no\n");
return 0;
}
/**
* query_raid_levels -
* @args: argument vector
* @num_args: number of arguments
*
* Returns:
* 0 if success / non-zero on failure
**/
static int query_raid_levels(char **args, int num_args)
{
struct ipr_dev *dev = find_dev(args[0]);
struct ipr_array_cap_entry *cap;
if (!dev) {
fprintf(stderr, "Invalid device %s\n", args[0]);
return -EINVAL;
}
if (dev->ioa->is_aux_cache || !dev->ioa->supported_arrays)
return 0;
for_each_cap_entry(cap, dev->ioa->supported_arrays)
printf("%s ", cap->prot_level_str);
printf("\n");
return 0;
}
/**
* query_bus_width -
* @args: argument vector
* @num_args: number of arguments
*
* Returns:
* 0 if success / non-zero on failure
**/
static int query_bus_width(char **args, int num_args)
{
int rc, bus;
struct ipr_scsi_buses page_28;
struct ipr_dev *dev = find_dev(args[0]);
if (!dev) {
fprintf(stderr, "Invalid device %s\n", args[0]);
return -EINVAL;
}
if (!ioa_is_spi(dev->ioa) || dev->ioa->is_aux_cache)
return -EINVAL;
memset(&page_28, 0, sizeof(struct ipr_scsi_buses));
rc = ipr_get_bus_attr(dev->ioa, &page_28);
if (rc)
return rc;
bus = strtoul(args[1], NULL, 10);
if (bus >= page_28.num_buses) {
fprintf(stderr, "Invalid bus specified: %d\n", bus);
return -EINVAL;
}
fprintf(stdout, "%d\n", page_28.bus[bus].bus_width);
return 0;
}
/**
* query_bus_speed -
* @args: argument vector
* @num_args: number of arguments
*
* Returns:
* 0 if success / non-zero on failure
**/
static int query_bus_speed(char **args, int num_args)
{
int rc, bus;
struct ipr_scsi_buses page_28;
struct ipr_dev *dev = find_dev(args[0]);
if (!dev) {
fprintf(stderr, "Invalid device %s\n", args[0]);
return -EINVAL;
}
if (!ioa_is_spi(dev->ioa) || dev->ioa->is_aux_cache)
return -EINVAL;
memset(&page_28, 0, sizeof(struct ipr_scsi_buses));
rc = ipr_get_bus_attr(dev->ioa, &page_28);
if (rc)
return rc;
bus = strtoul(args[1], NULL, 10);
if (bus >= page_28.num_buses) {
fprintf(stderr, "Invalid bus specified: %d\n", bus);
return -EINVAL;
}
fprintf(stdout, "%d\n",
IPR_BUS_XFER_RATE_TO_THRUPUT(page_28.bus[bus].max_xfer_rate,
page_28.bus[bus].bus_width));
return 0;
}
/**
* query_initiator_id -
* @args: argument vector
* @num_args: number of arguments
*
* Returns:
* 0 if success / non-zero on failure
**/
static int query_initiator_id(char **args, int num_args)
{
int rc, bus;
struct ipr_scsi_buses page_28;
struct ipr_dev *dev = find_dev(args[0]);
if (!dev) {
fprintf(stderr, "Invalid device %s\n", args[0]);
return -EINVAL;
}
if (!ioa_is_spi(dev->ioa) || dev->ioa->is_aux_cache)
return -EINVAL;
memset(&page_28, 0, sizeof(struct ipr_scsi_buses));
rc = ipr_get_bus_attr(dev->ioa, &page_28);
if (rc)
return rc;
bus = strtoul(args[1], NULL, 10);
if (bus >= page_28.num_buses) {
fprintf(stderr, "Invalid bus specified: %d\n", bus);
return -EINVAL;
}
fprintf(stdout, "%d\n", page_28.bus[bus].scsi_id);
return 0;
}
/**
* query_add_remove -
* @action: action type
*
* Returns:
* 0
**/
static int query_add_remove(int action)
{
int i, num_devs;
struct ipr_dev **devs;
num_devs = get_conc_devs(&devs, action);
for (i = 0; i < num_devs; i++) {
if (i == 0)
printf("%s\n%s\n", status_hdr[11], status_sep[11]);
printf_device(devs[i], 5);
}
free_empty_slots(devs, num_devs);
free(devs);
return 0;
}
/**
* query_remove_device -
* @args: argument vector
* @num_args: number of arguments
*
* Returns:
* 0 if success / non-zero on failure
**/
static int query_remove_device(char **args, int num_args)
{
return query_add_remove(IPR_CONC_REMOVE);
}
/**
* query_add_device -
* @args: argument vector
* @num_args: number of arguments
*
* Returns:
* 0 if success / non-zero on failure
**/
static int query_add_device(char **args, int num_args)
{
return query_add_remove(IPR_CONC_ADD);
}
/**
* show_slots -
* @args: argument vector
* @num_args: number of arguments
*
* Returns:
* 0 if success / non-zero on failure
**/
static int show_slots(char **args, int num_args)
{
return query_add_remove(IPR_CONC_IDENTIFY);
}
/**
* query_log_level -
* @args: argument vector
* @num_args: number of arguments
*
* Returns:
* 0 if success / non-zero on failure
**/
static int query_log_level(char **args, int num_args)
{
struct ipr_dev *dev = find_dev(args[0]);
if (!dev) {
fprintf(stderr, "Cannot find %s\n", args[0]);
return -EINVAL;
}
if (!ipr_is_ioa(dev)) {
fprintf(stderr, "Device is not an IOA\n");
return -EINVAL;
}
printf("%d\n", get_log_level(dev->ioa));
return 0;
}
/**
* query_tcq_enable -
* @args: argument vector
* @num_args: number of arguments
*
* Returns:
* 0 if success / non-zero on failure
**/
static int query_tcq_enable(char **args, int num_args)
{
int rc;
struct ipr_disk_attr attr;
struct ipr_dev *dev = find_dev(args[0]);
if (!dev) {
fprintf(stderr, "Cannot find %s\n", args[0]);
return -EINVAL;
}
rc = ipr_get_dev_attr(dev, &attr);
if (rc)
return rc;
printf("%d\n", attr.tcq_enabled);
return 0;
}
/**
* query_qdepth -
* @args: argument vector
* @num_args: number of arguments
*
* Returns:
* 0 if success / non-zero on failure
**/
static int query_qdepth(char **args, int num_args)
{
int rc;
struct ipr_disk_attr attr;
struct ipr_dev *dev = find_dev(args[0]);
if (!dev) {
fprintf(stderr, "Cannot find %s\n", args[0]);
return -EINVAL;
}
rc = ipr_get_dev_attr(dev, &attr);
if (rc)
return rc;
printf("%d\n", attr.queue_depth);
return 0;
}
/**
* query_format_timeout -
* @args: argument vector
* @num_args: number of arguments
*
* Returns:
* 0 if success / non-zero on failure
**/
static int query_format_timeout(char **args, int num_args)
{
int rc;
struct ipr_disk_attr attr;
struct ipr_dev *dev = find_dev(args[0]);
if (!dev) {
fprintf(stderr, "Cannot find %s\n", args[0]);
return -EINVAL;
}
if (!ipr_is_af_dasd_device(dev)) {
dprintf("%s is not an Advanced Function disk\n", args[0]);
return -EINVAL;
}
rc = ipr_get_dev_attr(dev, &attr);
if (rc)
return rc;
printf("%d\n", attr.format_timeout / 3600);
return 0;
}
/**
* query_ucode_level -
* @args: argument vector
* @num_args: number of arguments
*
* Returns:
* 0 if success / non-zero on failure
**/
static int query_ucode_level(char **args, int num_args)
{
struct ipr_dev *dev = find_dev(args[0]);
u32 level, level_sw;
char *asc;
if (!dev) {
fprintf(stderr, "Cannot find %s\n", args[0]);
return -EINVAL;
}
if (ipr_is_ioa(dev))
printf("%08X\n", get_fw_version(dev));
else {
level = get_fw_version(dev);
level_sw = htonl(level);
asc = (char *)&level_sw;
if (isprint(asc[0]) && isprint(asc[1]) &&
isprint(asc[2]) && isprint(asc[3]))
printf("%.8X (%c%c%c%c)\n", level, asc[0],
asc[1], asc[2], asc[3]);
else
printf("%.8X\n", level);
}
return 0;
}
/**
* query_format_for_raid -
* @args: argument vector
* @num_args: number of arguments
*
* Returns:
* 0 if success / non-zero on failure
**/
static int query_format_for_raid(char **args, int num_args)
{
struct ipr_ioa *ioa;
struct ipr_dev *dev;
int hdr = 0;
for_each_primary_ioa(ioa) {
for_each_disk(ioa, dev) {
if (!can_format_for_raid(dev))
continue;
if (!hdr) {
hdr = 1;
printf("%s\n%s\n", status_hdr[2], status_sep[2]);
}
if (strlen(dev->dev_name))
printf_device(dev, 0);
else
printf_device(dev, 2);
}
}
return 0;
}
/**
* query_raid_rebuild -
* @args: argument vector
* @num_args: number of arguments
*
* Returns:
* 0 if success / non-zero on failure
**/
static int query_raid_rebuild(char **args, int num_args)
{
struct ipr_ioa *ioa;
struct ipr_dev *dev;
int hdr = 0;
for_each_ioa(ioa) {
for_each_af_dasd(ioa, dev) {
if (!dev->dev_rcd->rebuild_cand)
continue;
if (!hdr) {
hdr = 1;
printf("%s\n%s\n", status_hdr[2], status_sep[2]);
}
printf_device(dev, 2);
}
}
return 0;
}
/**
* query_recovery_format -
* @args: argument vector
* @num_args: number of arguments
*
* Returns:
* 0 if success / non-zero on failure
**/
static int query_recovery_format(char **args, int num_args)
{
struct ipr_ioa *ioa;
struct ipr_dev *dev;
int hdr = 0;
for_each_primary_ioa(ioa) {
for_each_disk(ioa, dev) {
if (ipr_is_hot_spare(dev) || !device_supported(dev))
continue;
if (ipr_is_array_member(dev) && !dev->dev_rcd->no_cfgte_vol)
continue;;
if (!is_format_allowed(dev))
continue;
if (!hdr) {
hdr = 1;
printf("%s\n%s\n", status_hdr[2], status_sep[2]);
}
if (strlen(dev->dev_name))
printf_device(dev, 0);
else
printf_device(dev, 2);
}
}
return 0;
}
/**
* query_devices_include -
* @args: argument vector
* @num_args: number of arguments
*
* Returns:
* 0 if success / non-zero on failure
**/
static int query_devices_include(char **args, int num_args)
{
int rc, hdr = 0;;
struct ipr_array_query_data qac_data;
struct ipr_dev *dev;
struct ipr_ioa *ioa;
struct ipr_dev *vset = find_dev(args[0]);
struct ipr_dev_record *dev_rcd;
if (!vset) {
fprintf(stderr, "Cannot find %s\n", args[0]);
return -EINVAL;
}
ioa = vset->ioa;
memset(&qac_data, 0, sizeof(qac_data));
rc = ipr_query_array_config(ioa, 0, 1, 0, vset->array_id, &qac_data);
if (rc)
return rc;
for_each_dev_rcd(dev_rcd, &qac_data) {
for_each_disk(ioa, dev) {
if (dev->scsi_dev_data->handle == ipr_get_dev_res_handle(ioa, dev_rcd) &&
dev_rcd->include_cand && device_supported(dev)) {
if (!hdr) {
hdr = 1;
printf("%s\n%s\n", status_hdr[2], status_sep[2]);
}
printf_device(dev, 2);
break;
}
}
}
return 0;
}
/**
* query_arrays_include -
* @args: argument vector
* @num_args: number of arguments
*
* Returns:
* 0 if success / non-zero on failure
**/
static int query_arrays_include(char **args, int num_args)
{
struct ipr_ioa *ioa;
struct ipr_dev *vset;
struct ipr_array_cap_entry *cap_entry;
struct ipr_array_record *array_rcd;
int hdr = 0;
for_each_primary_ioa(ioa) {
for_each_vset(ioa, vset) {
array_rcd = vset->array_rcd;
cap_entry = get_raid_cap_entry(ioa->supported_arrays,
vset->raid_level);
if (!cap_entry || !cap_entry->include_allowed || !array_rcd->established)
continue;
if (!hdr) {
hdr = 1;
printf("%s\n%s\n", status_hdr[3], status_sep[3]);
}
printf_device(vset, 1);
}
}
return 0;
}
/**
* query_reclaim -
* @args: argument vector
* @num_args: number of arguments
*
* Returns:
* 0 if success / non-zero on failure
**/
static int query_reclaim(char **args, int num_args)
{
struct ipr_reclaim_query_data buf;
struct ipr_ioa *ioa;
int hdr = 0, rc;
for_each_ioa(ioa) {
memset(&buf, 0, sizeof(buf));
rc = ipr_reclaim_cache_store(ioa, IPR_RECLAIM_QUERY, &buf);
if (rc != 0)
continue;
if (buf.reclaim_known_needed || buf.reclaim_unknown_needed) {
if (!hdr) {
hdr = 1;
printf("%s\n%s\n", status_hdr[2], status_sep[2]);
}
printf_device(&ioa->ioa, 2);
}
}
return 0;
}
/**
* query_arrays_raid_migrate - Show the arrays that can be migrated to a
* different protection level.
* @args: argument vector
* @num_args: number of arguments
*
* Returns:
* 0 if success / non-zero on failure
**/
static int query_arrays_raid_migrate(char **args, int num_args)
{
int hdr = 0;
struct ipr_dev *array, *vset;
struct ipr_ioa *ioa;
for_each_primary_ioa(ioa) {
for_each_array(ioa, array) {
if (!array->array_rcd->migrate_cand)
continue;
if (!hdr) {
hdr = 1;
printf("%s\n%s\n", status_hdr[3], status_sep[3]);
}
if (ioa->sis64) {
vset = get_vset_from_array(ioa, array);
printf_device(vset, 1);
} else
printf_device(array, 1);
}
}
return 0;
}
/**
* query_devices_raid_migrate - Given an array, show the AF disks that are
* candidates to be used in a migration.
* @args: argument vector
* @num_args: number of arguments
*
* Returns:
* 0 if success / non-zero on failure
**/
static int query_devices_raid_migrate(char **args, int num_args)
{
struct ipr_dev *dev;
struct ipr_dev_record *dev_rcd;
int hdr = 0;
int rc = 0;
struct ipr_array_query_data qac_data;
memset(&qac_data, 0, sizeof(qac_data));
dev = find_dev(args[0]);
if (!dev) {
fprintf(stderr, "Cannot find %s\n", args[0]);
return -EINVAL;
}
if (dev->ioa->sis64 && ipr_is_volume_set(dev))
dev = get_array_from_vset(dev->ioa, dev);
if (!ipr_is_array(dev)) {
fprintf(stderr, "%s is not an array.\n", args[0]);
return -EINVAL;
}
/* query array config for volume set migrate status */
rc = ipr_query_array_config(dev->ioa, 0, 0, 1, dev->array_id, &qac_data);
if (rc != 0)
return rc;
for_each_dev_rcd(dev_rcd, &qac_data) {
if (!dev_rcd->migrate_array_prot_cand)
continue;
if (!hdr) {
hdr = 1;
printf("%s\n%s\n", status_hdr[2], status_sep[2]);
}
dev = get_dev_from_handle(dev->ioa, ipr_get_dev_res_handle(dev->ioa, dev_rcd));
if (dev)
printf_device(dev, 2);
}
return 0;
}
/**
* query_raid_levels_raid_migrate - Given an array, display the protection
* levels to which the array can be migrated.
* @args: argument vector
* @num_args: number of arguments
*
* Returns:
* 0 if success / non-zero on failure
**/
static int query_raid_levels_raid_migrate(char **args, int num_args)
{
struct ipr_dev *dev;
int rc = 0;
struct ipr_array_query_data qac_data;
struct ipr_supported_arrays *sa_rcd;
struct ipr_array_cap_entry *cap_entry;
memset(&qac_data, 0, sizeof(qac_data));
dev = find_dev(args[0]);
if (!dev) {
fprintf(stderr, "Cannot find %s\n", args[0]);
return -EINVAL;
}
if (dev->ioa->sis64 && ipr_is_volume_set(dev))
dev = get_array_from_vset(dev->ioa, dev);
if (!ipr_is_array(dev)) {
fprintf(stderr, "%s is not an array.\n", args[0]);
return -EINVAL;
}
if (!dev->array_rcd->migrate_cand) {
scsi_err(dev, "%s is not a candidate for array migration.\n",
args[0]);
return -EINVAL;
}
/* query array config for volume set migrate status */
rc = ipr_query_array_config(dev->ioa, 0, 0, 1, dev->array_id, &qac_data);
if (rc)
return rc;
for_each_supported_arrays_rcd(sa_rcd, &qac_data)
for_each_cap_entry(cap_entry, sa_rcd)
printf("%s ", cap_entry->prot_level_str);
printf("\n");
return 0;
}
/**
* query_stripe_sizes_raid_migrate - Given an array and a protection level,
* show the valid stripe sizes to which the
* array can be migrated.
* @args: argument vector
* @num_args: number of arguments
*
* Returns:
* 0 if success / non-zero on failure
**/
static int query_stripe_sizes_raid_migrate(char **args, int num_args)
{
struct ipr_dev *dev;
int i;
int rc = 0;
struct ipr_array_query_data qac_data;
struct ipr_supported_arrays *sa_rcd;
struct ipr_array_cap_entry *cap_entry;
memset(&qac_data, 0, sizeof(qac_data));
dev = find_dev(args[0]);
if (!dev) {
fprintf(stderr, "Cannot find %s\n", args[0]);
return -EINVAL;
}
if (dev->ioa->sis64 && ipr_is_volume_set(dev))
dev = get_array_from_vset(dev->ioa, dev);
if (!ipr_is_array(dev)) {
fprintf(stderr, "%s is not an array.\n", args[0]);
return -EINVAL;
}
/* query array config for volume set migrate status */
rc = ipr_query_array_config(dev->ioa, 0, 0, 1, dev->array_id, &qac_data);
if (rc)
return rc;
for_each_supported_arrays_rcd(sa_rcd, &qac_data) {
for_each_cap_entry(cap_entry, sa_rcd) {
if (strcmp(args[1], (char *)cap_entry->prot_level_str))
continue;
for (i = 0; i < (sizeof(cap_entry->supported_stripe_sizes) * 8); i++)
if (ntohs(cap_entry->supported_stripe_sizes) & (1 << i))
printf("%d ", (1 << i));
printf("\n");
break;
}
}
return 0;
}
/**
* query_devices_min_max_raid_migrate - Given an array and a protection level,
* show the minimum and maximum number of
* devices needed to do the migration.
* @args: argument vector
* @num_args: number of arguments
*
* Returns:
* 0 if success / non-zero on failure
**/
int query_devices_min_max_raid_migrate(char **args, int num_args)
{
struct ipr_dev *dev;
int rc = 0;
struct ipr_array_query_data qac_data;
struct ipr_supported_arrays *supported_arrays;
struct ipr_array_cap_entry *cap;
memset(&qac_data, 0, sizeof(qac_data));
dev = find_dev(args[0]);
if (!dev) {
fprintf(stderr, "Cannot find %s\n", args[0]);
return -EINVAL;
}
if (dev->ioa->sis64 && ipr_is_volume_set(dev))
dev = get_array_from_vset(dev->ioa, dev);
if (!ipr_is_array(dev)) {
fprintf(stderr, "%s is not an array.\n", args[0]);
return -EINVAL;
}
/* query array config for volume set migrate status */
rc = ipr_query_array_config(dev->ioa, 0, 0, 1, dev->array_id, &qac_data);
if (rc)
return rc;
/* check that the given raid level is valid */
for_each_supported_arrays_rcd(supported_arrays, &qac_data) {
cap = get_cap_entry(supported_arrays, args[1]);
if (cap)
break;
}
if (!cap) {
fprintf(stderr, "RAID level %s is unsupported.\n", args[1]);
return -EINVAL;
}
if (cap->format_overlay_type == IPR_FORMAT_REMOVE_DEVICES)
fprintf(stderr, "%d %s will be removed from the array\n",
cap->min_num_array_devices,
cap->min_num_array_devices == 1 ? "device" : "devices");
else if (cap->format_overlay_type == IPR_FORMAT_ADD_DEVICES) {
fprintf(stderr, "Minimum number of devices required = %d\n",
cap->min_num_array_devices);
fprintf(stderr, "Maximum number of devices allowed = %d\n",
cap->max_num_array_devices);
fprintf(stderr, "Number of devices must be a multiple of %d\n",
cap->min_mult_array_devices);
} else {
fprintf(stderr, "Unknown overlay type in qac data\n");
return -EINVAL;
}
return 0;
}
/**
* query_ioas_asym_access - Show the ioas that support asymmetric access.
* @args: argument vector
* @num_args: number of arguments
*
* Returns:
* 0 if success / non-zero on failure
**/
static int query_ioas_asym_access(char **args, int num_args)
{
int hdr = 0;
struct ipr_ioa *ioa;
for_each_ioa(ioa) {
if (!ioa->asymmetric_access)
continue;
if (!hdr) {
hdr = 1;
printf("%s\n%s\n", status_hdr[3], status_sep[3]);
}
printf_device(&ioa->ioa, 2);
}
return 0;
}
/**
* query_arrays_asym_access - Show the arrays that support asymmetric access.
* @args: argument vector
* @num_args: number of arguments
*
* Returns:
* 0 if success / non-zero on failure
**/
static int query_arrays_asym_access(char **args, int num_args)
{
int hdr = 0;
struct ipr_ioa *ioa;
struct ipr_dev *array;
for_each_ioa(ioa) {
if (!ioa->asymmetric_access || !ioa->asymmetric_access_enabled)
continue;
for_each_array(ioa, array) {
if (!array->array_rcd->asym_access_cand)
continue;
if (!hdr) {
hdr = 1;
printf("%s\n%s\n", status_hdr[3], status_sep[3]);
}
if (ioa->sis64)
printf_device(array, 4);
else
printf_device(array, 1);
}
}
return 0;
}
/**
* query_ioa_asym_access_mode - Show the current asymmetric access state for
* the given IOA.
* @args: argument vector
* @num_args: number of arguments
*
* Returns:
* 0 if success / non-zero on failure
**/
static int query_ioa_asym_access_mode(char **args, int num_args)
{
struct ipr_dev *dev;
dev = find_dev(args[0]);
if (!dev) {
fprintf(stderr, "Cannot find %s\n", args[0]);
return -EINVAL;
}
if (!ipr_is_ioa(dev)) {
fprintf(stderr, "%s is not an IOA.\n", args[0]);
return -EINVAL;
}
if (dev->ioa->asymmetric_access_enabled)
printf("Enabled\n");
else if (dev->ioa->asymmetric_access)
printf("Disabled\n");
else
printf("Unsupported\n");
return 0;
}
/**
* query_array_asym_access_mode - Show the current asymmetric access state for
* the given array.
* @args: argument vector
* @num_args: number of arguments
*
* Returns:
* 0 if success / non-zero on failure
**/
static int query_array_asym_access_mode(char **args, int num_args)
{
struct ipr_dev *array;
array = find_dev(args[0]);
if (!array) {
fprintf(stderr, "Cannot find %s\n", args[0]);
return -EINVAL;
}
if (!ipr_is_array(array)) {
if (array->ioa->sis64 && ipr_is_volume_set(array))
array = get_array_from_vset(array->ioa, array);
else {
fprintf(stderr, "%s is not an array.\n", array->gen_name);
return -EINVAL;
}
}
if (!array->array_rcd->asym_access_cand)
printf("Unsupported\n");
else if (array->array_rcd->current_asym_access_state == IPR_ACTIVE_OPTIMIZED)
printf("Optimized\n");
else if (array->array_rcd->current_asym_access_state == IPR_ACTIVE_NON_OPTIMIZED)
printf("Not Optimized\n");
else
scsi_dbg(array, "Unrecognized state - %d.", array->array_rcd->current_asym_access_state);
return 0;
}
/**
* query_format_for_jbod -
* @args: argument vector
* @num_args: number of arguments
*
* Returns:
* 0 if success / non-zero on failure
**/
static int query_format_for_jbod(char **args, int num_args)
{
struct ipr_dev *dev;
struct ipr_ioa *ioa;
int hdr = 0;
for_each_primary_ioa(ioa) {
for_each_af_dasd(ioa, dev) {
if (ipr_device_is_zeroed(dev))
continue;
if ((ipr_is_array_member(dev) && dev->dev_rcd->no_cfgte_vol) ||
(!ipr_is_array_member(dev) && is_format_allowed(dev))) {
if (!hdr) {
hdr = 1;
printf("%s\n%s\n", status_hdr[2], status_sep[2]);
}
printf_device(dev, 2);
}
}
}
return 0;
}
/**
* show_dev_details -
* @dev: ipr dev struct
*
* Returns:
* nothing
**/
static void show_dev_details(struct ipr_dev *dev)
{
char *body = NULL;
if (ipr_is_ioa(dev))
body = ioa_details(body, dev);
else if (ipr_is_volume_set(dev) || ipr_is_array(dev))
body = vset_array_details(body, dev);
else if (ipr_is_ses(dev))
body = ses_details(body, dev);
else
body = disk_details(body, dev);
printf("%s\n", body);
free(body);
}
/**
* show_jbod_disks -
* @args: argument vector
* @num_args: number of arguments
*
* Returns:
* 0 if success / non-zero on failure
**/
static int show_jbod_disks(char **args, int num_args)
{
struct ipr_ioa *ioa;
struct ipr_dev *dev;
int hdr = 0;
for_each_ioa(ioa) {
for_each_jbod_disk(ioa, dev) {
if (!hdr) {
hdr = 1;
printf("%s\n%s\n", status_hdr[2], status_sep[2]);
}
printf_device(dev, 0);
}
}
return 0;
}
/**
* show_all_af_disks -
* @args: argument vector
* @num_args: number of arguments
*
* Returns:
* 0 if success / non-zero on failure
**/
static int show_all_af_disks(char **args, int num_args)
{
struct ipr_ioa *ioa;
struct ipr_dev *dev;
int hdr = 0;
for_each_ioa(ioa) {
for_each_af_dasd(ioa, dev) {
if (!hdr) {
hdr = 1;
printf("%s\n%s\n", status_hdr[2], status_sep[2]);
}
printf_device(dev, 2);
}
}
return 0;
}
/**
* show_af_disks -
* @args: argument vector
* @num_args: number of arguments
*
* Returns:
* 0 if success / non-zero on failure
**/
static int show_af_disks(char **args, int num_args)
{
struct ipr_ioa *ioa;
struct ipr_dev *dev;
int hdr = 0;
for_each_ioa(ioa) {
for_each_standalone_af_disk(ioa, dev) {
if (!hdr) {
hdr = 1;
printf("%s\n%s\n", status_hdr[2], status_sep[2]);
}
printf_device(dev, 2);
}
}
return 0;
}
/**
* show_hot_spares -
* @args: argument vector
* @num_args: number of arguments
*
* Returns:
* 0 if success / non-zero on failure
**/
static int show_hot_spares(char **args, int num_args)
{
struct ipr_ioa *ioa;
struct ipr_dev *dev;
int hdr = 0;
for_each_ioa(ioa) {
for_each_hot_spare(ioa, dev) {
if (!hdr) {
hdr = 1;
printf("%s\n%s\n", status_hdr[2], status_sep[2]);
}
printf_device(dev, 2);
}
}
return 0;
}
/**
* show_details -
* @args: argument vector
* @num_args: number of arguments
*
* Returns:
* 0 if success / non-zero on failure
**/
static int show_details(char **args, int num_args)
{
struct ipr_dev *dev = find_dev(args[0]);
if (!dev) {
fprintf(stderr, "Missing device: %s\n", args[0]);
return -EINVAL;
}
show_dev_details(dev);
return 0;
}
/**
* __print_status -
* @args: argument vector
* @num_args: number of arguments
* @percent: percent value
*
* Returns:
* 0 if success / non-zero on failure
**/
static int __print_status(char **args, int num_args, int percent)
{
struct ipr_dev *dev = find_dev(args[0]);
char buf[100];
if (!dev) {
printf("Missing\n");
return -EINVAL;
}
get_status(dev, buf, percent, 0);
printf("%s\n", buf);
return 0;
}
/**
* print_alt_status -
* @args: argument vector
* @num_args: number of arguments
*
* Returns:
* 0 if success / non-zero on failure
**/
static int print_alt_status(char **args, int num_args)
{
return __print_status(args, num_args, 1);
}
/**
* print_status -
* @args: argument vector
* @num_args: number of arguments
*
* Returns:
* 0 if success / non-zero on failure
**/
static int print_status(char **args, int num_args)
{
return __print_status(args, num_args, 0);
}
/**
* __show_config -
* @type: type value
*
* Returns:
* 0 if success / non-zero on failure
**/
static int __show_config(int type)
{
struct ipr_ioa *ioa;
printf("%s\n%s\n", status_hdr[(type&1)+2], status_sep[(type&1)+2]);
for_each_ioa(ioa)
printf_ioa(ioa, type);
return 0;
}
/**
* show_config -
* @args: argument vector
* @num_args: number of arguments
*
* Returns:
* 0 if success / non-zero on failure
**/
static int show_config(char **args, int num_args)
{
return __show_config(3);
}
/**
* show_alt_config -
* @args: argument vector
* @num_args: number of arguments
*
* Returns:
* 0 if success / non-zero on failure
**/
static int show_alt_config(char **args, int num_args)
{
return __show_config(2);
}
/**
* show_ioas -
* @args: argument vector
* @num_args: number of arguments
*
* Returns:
* 0 if success / non-zero on failure
**/
static int show_ioas(char **args, int num_args)
{
struct ipr_ioa *ioa;
if (num_ioas)
printf("%s\n%s\n", status_hdr[2], status_sep[2]);
else
printf("No IOAs found\n");
for_each_ioa(ioa)
printf_device(&ioa->ioa, 2);
return 0;
}
/**
* show_arrays -
* @args: argument vector
* @num_args: number of arguments
*
* Returns:
* 0 if success / non-zero on failure
**/
static int show_arrays(char **args, int num_args)
{
struct ipr_ioa *ioa;
struct ipr_dev *vset;
int hdr = 0;
for_each_ioa(ioa) {
for_each_vset(ioa, vset) {
if (!hdr) {
hdr = 1;
printf("%s\n%s\n", status_hdr[3], status_sep[3]);
}
printf_device(vset, 3);
}
}
return 0;
}
/**
* battery_info -
* @args: argument vector
* @num_args: number of arguments
*
* Returns:
* 0 if success / non-zero on failure
**/
static int battery_info(char **args, int num_args)
{
struct ipr_reclaim_query_data reclaim;
struct ipr_dev *dev;
char *buf;
int rc;
dev = find_dev(args[0]);
if (!dev) {
fprintf(stderr, "Cannot find %s\n", args[0]);
return -EINVAL;
}
rc = ipr_reclaim_cache_store(dev->ioa,
IPR_RECLAIM_QUERY | IPR_RECLAIM_EXTENDED_INFO,
&reclaim);
if (rc)
return rc;
dev->ioa->reclaim_data = &reclaim;
buf = get_battery_info(dev->ioa);
printf("%s\n", buf);
dev->ioa->reclaim_data = NULL;
free(buf);
return 0;
}
/**
* get_ha_mode -
* @args: argument vector
* @num_args: number of arguments
*
* Returns:
* 0 if success / non-zero on failure
**/
static int get_ha_mode(char **args, int num_args)
{
struct ipr_dev *dev = find_gen_dev(args[0]);
if (!dev)
return -ENXIO;
if (dev->ioa->in_gscsi_only_ha)
printf("JBOD\n");
else
printf("Normal\n");
return 0;
}
/**
* __set_ha_mode -
* @args: argument vector
* @num_args: number of arguments
*
* Returns:
* 0 if success / non-zero on failure
**/
static int __set_ha_mode(char **args, int num_args)
{
struct ipr_dev *dev = find_gen_dev(args[0]);
if (!dev)
return -ENXIO;
if (!strncasecmp(args[1], "Normal", 4))
return set_ha_mode(dev->ioa, 0);
else if (!strncasecmp(args[1], "JBOD", 4))
return set_ha_mode(dev->ioa, 1);
return -EINVAL;
}
/**
* __set_preferred_primary -
* @sg_name: sg device name
* @preferred_primary: preferred primary value
*
* Returns:
* 0 if success / non-zero on failure
**/
static int __set_preferred_primary(char *sg_name, int preferred_primary)
{
struct ipr_dev *dev = find_gen_dev(sg_name);
if (dev)
return set_preferred_primary(dev->ioa, preferred_primary);
return -ENXIO;
}
/**
* set_primary -
* @args: argument vector
* @num_args: number of arguments
*
* Returns:
* 0 if success / non-zero on failure
**/
static int set_primary(char **args, int num_args)
{
return __set_preferred_primary(args[0], 1);
}
/**
* set_secondary -
* @args: argument vector
* @num_args: number of arguments
*
* Returns:
* 0 if success / non-zero on failure
**/
static int set_secondary(char **args, int num_args)
{
return __set_preferred_primary(args[0], 0);
}
/**
* set_all_primary -
* @args: argument vector
* @num_args: number of arguments
*
* Returns:
* 0 if success / non-zero on failure
**/
static int set_all_primary(char **args, int num_args)
{
struct ipr_ioa *ioa;
for_each_ioa(ioa)
set_preferred_primary(ioa, 1);
return 0;
}
/**
* set_all_secondary -
* @args: argument vector
* @num_args: number of arguments
*
* Returns:
* 0 if success / non-zero on failure
**/
static int set_all_secondary(char **args, int num_args)
{
struct ipr_ioa *ioa;
for_each_ioa(ioa)
set_preferred_primary(ioa, 0);
return 0;
}
/**
* check_and_set_active_active - Do some sanity checks and then set the
* active/active state to the requested mode.
* @dev_name: specified IOA
* @mode: mode to set - enable or disable
*
* Returns:
* 0 if success / non-zero on failure
**/
static int check_and_set_active_active(char *dev_name, int mode)
{
struct ipr_dev *dev;
dev = find_dev(dev_name);
if (!dev) {
fprintf(stderr, "Cannot find %s\n", dev_name);
return -EINVAL;
}
if (!ipr_is_ioa(dev)) {
fprintf(stderr, "%s is not an IOA.\n", dev_name);
return -EINVAL;
}
/* Check that asymmetric access is supported by the adapter. */
if (!dev->ioa->asymmetric_access) {
ioa_err(dev->ioa, "IOA does not support asymmetric access.\n");
return -EINVAL;
}
/* Check the state of asymmetric access. */
if (dev->ioa->asymmetric_access_enabled == mode) {
ioa_dbg(dev->ioa, "Asymmetric access is already %s.\n",
mode == 0 ? "disabled" : "enabled");
return 0;
}
return set_active_active_mode(dev->ioa, mode);
}
/**
* get_drive_phy_loc - get drive physical location
* @ioa: ipr ioa struct
*
* Returns:
* body
**/
static int get_drive_phy_loc(struct ipr_ioa *ioa)
{
struct ipr_encl_status_ctl_pg ses_data;
struct ipr_drive_elem_status *elem_status, *overall;
struct ipr_dev *ses, *dev;
struct ipr_ses_config_pg ses_cfg;
int ses_bus, scsi_id_found, is_spi, is_vses;
struct drive_elem_desc_pg drive_data;
char phy_loc[PHYSICAL_LOCATION_LENGTH + 1];
int times, index;
is_spi = ioa_is_spi(ioa);
for_each_hotplug_dev(ioa, dev) {
if (ioa->sis64)
get_res_path(dev);
else
get_res_addrs(dev);
}
for_each_ses(ioa, ses) {
times = 5;
if (strlen(ses->physical_location) == 0)
get_ses_phy_loc(ses);
while (times--) {
if (!ipr_receive_diagnostics(ses, 2, &ses_data, sizeof(ses_data)))
break;
}
if (times < 0 ) continue;
if (ipr_receive_diagnostics(ses, 1, &ses_cfg, sizeof(ses_cfg)))
continue;
if (ipr_receive_diagnostics(ses, 7, &drive_data, sizeof(drive_data)))
continue;
overall = ipr_get_overall_elem(&ses_data, &ses_cfg);
ses_bus = ses->scsi_dev_data->channel;
scsi_id_found = 0;
if (!is_spi && (overall->device_environment == 0))
is_vses = 1;
else
is_vses = 0;
scsi_dbg(ses, "%s\n", is_vses ? "Found VSES" : "Found real SES");
for_each_elem_status(elem_status, &ses_data, &ses_cfg) {
index = index_in_page2(&ses_data, elem_status->slot_id);
if (index != -1)
get_drive_phy_loc_with_ses_phy_loc(ses, &drive_data, index, phy_loc, 0);
if (elem_status->status == IPR_DRIVE_ELEM_STATUS_UNSUPP)
continue;
if (elem_status->status == IPR_DRIVE_ELEM_STATUS_NO_ACCESS)
continue;
if (is_spi && (scsi_id_found & (1 << elem_status->slot_id)))
continue;
scsi_id_found |= (1 << elem_status->slot_id);
if (ioa->sis64)
dev = get_dev_for_slot_64bit(ses, elem_status->slot_id, phy_loc);
else
dev = get_dev_for_slot(ses, elem_status->slot_id, is_vses, phy_loc);
if (!dev)
continue;
}
}
return 0;
}
/**
* set_ioa_asymmetric_access - Change the asymmetric access mode for an IOA.
* Enabling occurs by sending a change multi adapter
* assignment command from ipr_set_ioa_attr().
* Disabling occurs by resetting the adapter and
* then sending a mode select
* page 24 in ipr_set_active_active_mode().
* @args: argument vector
* @num_args: number of arguments
*
* Returns:
* 0 if success / non-zero on failure
**/
static int set_ioa_asymmetric_access(char **args, int num_args)
{
if (!strncasecmp(args[1], "Enable", 4))
return check_and_set_active_active(args[0], 1);
else if (!strncasecmp(args[1], "Disable", 4))
return check_and_set_active_active(args[0], 0);
return -EINVAL;
}
/**
* set_array_asymmetric_access - Set the desired asymmetric access state of the
* array to "Optimized" or "Non-Optimized".
*
* @args: argument vector
* @num_args: number of arguments
*
* Returns:
* 0 if success / non-zero on failure
**/
static int set_array_asymmetric_access(char **args, int num_args)
{
int state;
struct ipr_dev *array = NULL;
array = find_dev(args[0]);
if (!array) {
fprintf(stderr, "Cannot find %s\n", args[0]);
return -EINVAL;
}
if (!ipr_is_array(array)) {
if (array->ioa->sis64 && ipr_is_volume_set(array))
array = get_array_from_vset(array->ioa, array);
else {
scsi_err(array, "Given device is not an array.");
return -EINVAL;
}
}
/* Check that the adapter is a primary adapter. */
if (array->ioa->is_secondary) {
ioa_err(array->ioa, "Asymmetric access commands must be issued "
"for arrays on the primary IOA");
return -EINVAL;
}
/* Check that asymmetric access is supported by the adapter. */
if (!array->ioa->asymmetric_access) {
ioa_err(array->ioa, "Asymmetric access is not supported.");
return -EINVAL;
}
/* Check that asymmetric access is enabled on the adapter. */
if (!array->ioa->asymmetric_access_enabled) {
ioa_err(array->ioa, "Asymmetric access is not enabled.");
return -EINVAL;
}
/* Optimized or Non-optimized? */
if (!strncasecmp(args[1], "Optimized", 3))
state = IPR_ACTIVE_OPTIMIZED;
else if (!strncasecmp(args[1], "Non-Optimized", 3))
state = IPR_ACTIVE_NON_OPTIMIZED;
else {
scsi_err(array, "Unrecognized state given for asymmetric access.");
return -EINVAL;
}
if (array->array_rcd->saved_asym_access_state == state) {
scsi_dbg(array, "Array is already set to requested state.");
return 0;
}
if (array->array_rcd->asym_access_cand)
array->array_rcd->issue_cmd = 1;
else {
scsi_err(array, "%s is not a candidate for asymmetric access.",
array->dev_name);
return -EINVAL;
}
array->array_rcd->saved_asym_access_state = state;
return ipr_set_array_asym_access(array->ioa);
}
static int __query_array_label(struct ipr_ioa *ioa, char *name)
{
struct ipr_dev *vset;
if (ioa->sis64) {
for_each_vset(ioa, vset) {
if (!strcmp((char *)vset->array_rcd->type3.desc, name)) {
fprintf(stdout, "%s\n", vset->dev_name);
return 0;
}
}
}
return -ENODEV;
}
/**
* query_array_label - Display the device name for the specified label
* @args: argument vector
* @num_args: number of arguments
*
* Returns:
* 0 if success / non-zero on failure
**/
static int query_array_label(char **args, int num_args)
{
struct ipr_ioa *ioa;
for_each_primary_ioa(ioa) {
if (!__query_array_label(ioa, args[0]))
return 0;
}
for_each_secondary_ioa(ioa) {
if (!__query_array_label(ioa, args[0]))
return 0;
}
return -ENODEV;
}
static int __query_array(struct ipr_ioa *ioa, char *name)
{
struct ipr_dev *vset;
struct ipr_dev *dev;
get_drive_phy_loc(ioa);
for_each_vset(ioa, vset) {
for_each_dev_in_vset(vset, dev) {
strip_trailing_whitespace(dev->physical_location);
if (!strcmp(dev->physical_location, name)) {
fprintf(stdout, "%s\n", vset->dev_name);
return 0;
}
}
}
return -ENODEV;
}
/**
* query_array - Display the array device name for the specified device location
* @args: argument vector
* @num_args: number of arguments
*
* Returns:
* 0 if success / non-zero on failure
**/
static int query_array(char **args, int num_args)
{
struct ipr_ioa *ioa;
for_each_primary_ioa(ioa) {
if (!__query_array(ioa, args[0]))
return 0;
}
for_each_secondary_ioa(ioa) {
if (!__query_array(ioa, args[0]))
return 0;
}
return -ENODEV;
}
static int __query_device(struct ipr_ioa *ioa, char *name)
{
struct ipr_dev *dev;
get_drive_phy_loc(ioa);
for_each_disk(ioa, dev) {
strip_trailing_whitespace(dev->physical_location);
if (!strcmp(dev->physical_location, name)) {
if (strlen(dev->dev_name))
fprintf(stdout, "%s\n", dev->dev_name);
else
fprintf(stdout, "%s\n", dev->gen_name);
return 0;
}
}
return -ENODEV;
}
/**
* query_device - Display the device name for the specified device location
* @args: argument vector
* @num_args: number of arguments
*
* Returns:
* 0 if success / non-zero on failure
**/
static int query_device(char **args, int num_args)
{
struct ipr_ioa *ioa;
for_each_primary_ioa(ioa) {
if (!__query_device(ioa, args[0]))
return 0;
}
for_each_secondary_ioa(ioa) {
if (!__query_device(ioa, args[0]))
return 0;
}
return -ENODEV;
}
/**
* query_location - Display the physical location for the specified device name
* @args: argument vector
* @num_args: number of arguments
*
* Returns:
* 0 if success / non-zero on failure
**/
static int query_location(char **args, int num_args)
{
struct ipr_dev *dev, *tmp, *cdev;
int num_devs = 0;
dev = find_dev(args[0]);
if (!dev)
return -ENODEV;
get_drive_phy_loc(dev->ioa);
if (!ipr_is_volume_set(dev)){
if (ipr_is_ioa(dev))
fprintf(stdout, "%s\n", dev->ioa->physical_location);
else
fprintf(stdout, "%s\n", dev->physical_location);
return 0;
}
for_each_dev_in_vset(dev, tmp) {
cdev = tmp;
num_devs++;
}
if (num_devs != 1)
return -EINVAL;
fprintf(stdout, "%s\n", cdev->physical_location);
return 0;
}
/**
* query_ioa_caching - Show whether or not user requested caching mode is set
* to default or disabled.
* @args: argument vector
* @num_args: number of arguments
*
* Returns:
* 0 if success / non-zero on failure
**/
static int query_ioa_caching(char **args, int num_args)
{
int mode;
struct ipr_dev *dev;
dev = find_dev(args[0]);
if (!dev) {
fprintf(stderr, "Cannot find %s\n", args[0]);
return -EINVAL;
}
if (!ipr_is_ioa(dev)) {
fprintf(stderr, "%s is not an IOA.\n", args[0]);
return -EINVAL;
}
if (!dev->ioa->has_cache) {
printf("none\n");
return 0;
}
mode = get_ioa_caching(dev->ioa);
switch (mode) {
case IPR_IOA_REQUESTED_CACHING_DISABLED:
printf("disabled\n");
break;
case IPR_IOA_CACHING_DISABLED_DUAL_ENABLED:
printf("disabled, 0x3\n");
break;
case IPR_IOA_CACHING_DEFAULT_DUAL_ENABLED:
printf("default, 0x3\n");
break;
default:
printf("default\n");
break;
}
return 0;
}
/**
* set_ioa_caching - Set the requested IOA caching mode to default or disabled.
* @args: argument vector
* @num_args: number of arguments
*
* Returns:
* 0 if success / non-zero on failure
**/
static int set_ioa_caching(char **args, int num_args)
{
int mode, rc;
struct ipr_dev *dev;
dev = find_dev(args[0]);
if (!dev) {
fprintf(stderr, "Cannot find %s\n", args[0]);
return -EINVAL;
}
if (!ipr_is_ioa(dev)) {
fprintf(stderr, "%s is not an IOA.\n", args[0]);
return -EINVAL;
}
if (dev->ioa->is_aux_cache) {
return -EINVAL;
}
if (!dev->ioa->has_cache) {
fprintf(stderr, "%s does not have cache.\n", args[0]);
return -EINVAL;
}
if (!strncasecmp(args[1], "Default", 3))
mode = IPR_IOA_SET_CACHING_DEFAULT;
else if (!strncasecmp(args[1], "Disabled", 3))
mode = IPR_IOA_SET_CACHING_DISABLED;
else if (!strncasecmp(args[1], "Dual-Disabled", 8))
mode = IPR_IOA_SET_CACHING_DUAL_DISABLED;
else if (!strncasecmp(args[1], "Dual-Enabled", 8))
mode = IPR_IOA_SET_CACHING_DUAL_ENABLED;
else {
scsi_err(dev, "Unrecognized mode given for IOA caching.");
return -EINVAL;
}
rc = ipr_change_cache_parameters(dev->ioa , mode);
return rc;
}
/**
* set_array_rebuild_verify - Enable/Disable Verification during an array rebuild.
* @args: IOA
* @num_args:
*
* Returns:
* 0 if success / non-zero on failure
**/
static int set_array_rebuild_verify(char **args, int num_args)
{
int rc;
struct ipr_ioa_attr attr;
struct ipr_ioa *ioa;
struct ipr_dev *dev;
int disable_rebuild_verify;
dev = find_dev(args[0]);
if (!dev) {
fprintf(stderr, "Cannot find %s\n", args[0]);
return -EINVAL;
}
if (!ipr_is_ioa(dev)) {
fprintf(stderr, "%s is not an IOA.\n", args[0]);
return -EINVAL;
}
if (strncasecmp(args[1], "enable", 6) == 0)
disable_rebuild_verify = 0;
else if (strncasecmp(args[1], "disable", 7) == 0
|| strncasecmp(args[1], "default", 7) == 0)
disable_rebuild_verify = 1;
else {
scsi_err(dev, "'%s' is not a valid value.\n"
"Accepted values are [enable|disable].\n",
args[1]);
return -EINVAL;
}
ioa = dev->ioa;
if (ioa->configure_rebuild_verify == 0
&& disable_rebuild_verify == 1) {
scsi_err(dev, "Adapter doesn't support disabling array "
"rebuild data verification.\n");
return -EINVAL;
}
if (ipr_get_ioa_attr(ioa, &attr))
return -EIO;
attr.disable_rebuild_verify = disable_rebuild_verify;
rc = ipr_set_ioa_attr(ioa, &attr, 1);
if (rc) {
scsi_err(ioa->dev, "Unable to %s array rebuild verification.",
args[1]);
return rc;
}
return 0;
}
/**
* query_array_rebuild_verify - Query whether verification is enabled
* during an array rebuild.
* @args: IOA
* @num_args:
*
* Returns:
* 0 if success / non-zero on failure
**/
static int query_array_rebuild_verify(char **args, int num_args)
{
struct ipr_ioa *ioa;
struct ipr_dev *dev;
dev = find_dev(args[0]);
if (!dev) {
fprintf(stderr, "Cannot find %s\n", args[0]);
return -EINVAL;
}
if (!ipr_is_ioa(dev)) {
fprintf(stderr, "%s is not an IOA.\n", args[0]);
return -EINVAL;
}
ioa = dev->ioa;
if (ioa->disable_rebuild_verify == 1)
printf("Disabled\n");
else
printf("Enabled\n");
return 0;
}
/**
* set_array_rebuild_rate - Set the Array Rebuild Rate for every array of an IOA.
* @args: IOA
* @num_args: Array Rebuild Rate in range [0-100]
*
* Returns:
* 0 if success / non-zero on failure
**/
static int set_array_rebuild_rate(char**args, int num_args)
{
int err_rebuild_rate = 0;
int rebuild_rate = 0;
int rc;
struct ipr_ioa_attr attr;
struct ipr_ioa *ioa;
struct ipr_dev *dev;
dev = find_dev(args[0]);
if (!dev) {
fprintf(stderr, "Cannot find %s\n", args[0]);
return -EINVAL;
}
if (!ipr_is_ioa(dev)) {
fprintf(stderr, "%s is not an IOA.\n", args[0]);
return -EINVAL;
}
if (strncmp(args[1], "default", 7) == 0) {
rebuild_rate = 0;
} else {
char *endptr = NULL;
rebuild_rate = strtol(args[1], &endptr, 10);
if (endptr == args[1]
|| rebuild_rate < 10 || rebuild_rate > 100) {
scsi_err(dev,
"'%s' is not a valid rebuild rate value.\n"
"Supported values are in the range 10-100.\n"
"Use 'default' to reset the configuration.\n"
"Higher values may affect performance but "
"decrease the total rebuild time.\n", args[1]);
return -EINVAL;
}
err_rebuild_rate = rebuild_rate;
rebuild_rate = (rebuild_rate * 15) / 100;
}
ioa = dev->ioa;
if (!ioa->sis64) {
scsi_err(dev,
"Adapter doesn't support modifying Array Rebuild Rate\n.");
return -EINVAL;
}
if (ipr_get_ioa_attr(ioa, &attr))
return -EIO;
attr.rebuild_rate = rebuild_rate;
rc = ipr_set_ioa_attr(ioa, &attr, 1);
if (rc) {
scsi_err(ioa->dev, "Unable to set rebuild rate value %d",
err_rebuild_rate);
return rc;
}
return 0;
}
/**
* query_array_rebuild_rate - Fetch the Array Rebuild Rate of an IOA.
* @args: IOA
*
* Returns:
* 0 if success / non-zero on failure
**/
static int query_array_rebuild_rate(char**args, int num_args)
{
struct ipr_ioa_attr attr;
struct ipr_ioa *ioa;
struct ipr_dev *dev;
int rebuild_rate = 0;
dev = find_dev(args[0]);
if (!dev) {
fprintf(stderr, "Cannot find %s\n", args[0]);
return -EINVAL;
}
if (!ipr_is_ioa(dev)) {
fprintf(stderr, "%s is not an IOA.\n", args[0]);
return -EINVAL;
}
ioa = dev->ioa;
if (!ioa->sis64) {
scsi_err(dev,
"Adapter doesn't support modifying Array Rebuild Rate\n.");
return -EINVAL;
}
if (ipr_get_ioa_attr(ioa, &attr))
return -EIO;
rebuild_rate = (attr.rebuild_rate * 100) / 15;
if (rebuild_rate == 0)
printf("default\n");
else
printf("%d\n", rebuild_rate);
return 0;
}
/**
* get_live_dump -
* @args: argument vector
* @num_args: number of arguments
*
* Returns:
* 0 if success / non-zero on failure
**/
static int get_live_dump (char **args, int num_args)
{
struct ipr_dev *dev = find_gen_dev(args[0]);
if (dev)
return ipr_get_live_dump(dev->ioa);
return -ENXIO;
}
/**
* query_ses_mode -
* @args: argument vector
* @num_args: number of arguments
*
* Returns:
* 0 if success / non-zero on failure
**/
static int query_ses_mode (char **args, int num_args)
{
struct ipr_dev *dev = find_gen_dev(args[0]);
struct ipr_ses_inquiry_pageC3 pageC3_inq;
int rc;
if (!dev) {
fprintf(stderr, "Cannot find %s\n", args[0]);
return -EINVAL;
}
if (!ipr_is_ses(dev)) {
fprintf(stderr, "Invalid device type\n");
return -EINVAL;
}
memset(&pageC3_inq, 0, sizeof(pageC3_inq));
rc = ipr_inquiry(dev, 0xc3, &pageC3_inq, sizeof(pageC3_inq));
if (rc != 0) {
scsi_dbg(dev, "Inquiry failed\n");
return -EIO;
}
printf("%c%c%c%c\n", pageC3_inq.mode[0], pageC3_inq.mode[1],
pageC3_inq.mode[2], pageC3_inq.mode[3]);
return 0;
}
/**
* set_ses_mode -
* @args: argument vector
* @num_args: number of arguments
*
* Returns:
* 0 if success / non-zero on failure
**/
static int set_ses_mode (char **args, int num_args)
{
struct ipr_dev *dev = find_gen_dev(args[0]);
int mode = atoi(args[1]);
int rc;
if (!dev) {
fprintf(stderr, "Cannot find %s\n", args[0]);
return -EINVAL;
}
if (!ipr_is_ses(dev)) {
fprintf(stderr, "Invalid device type\n");
return -EINVAL;
}
rc = ipr_set_ses_mode(dev, mode);
if (rc != 0) {
scsi_dbg(dev, "Change SES mode command failed");
return -EIO;
}
return 0;
}
/**
* show_enclosure_info -
* @ioa: ipr ioa struct
*
* Returns:
* 0 if success / non-zero on failure FIXME
**/
int show_enclosure_info(struct ipr_dev *ses)
{
struct screen_output *s_out;
int rc;
if (ses->scsi_dev_data->type == TYPE_ENCLOSURE)
n_show_enclosure_info.body = ses_details(n_show_enclosure_info.body, ses);
else
n_show_enclosure_info.body = ioa_details(n_show_enclosure_info.body, ses);
s_out = screen_driver(&n_show_enclosure_info, 0, NULL);
free(n_show_enclosure_info.body);
n_show_enclosure_info.body = NULL;
rc = s_out->rc;
free(s_out);
return rc;
}
int ipr_suspend_disk_enclosure(i_container *i_con)
{
int rc, suspend_rc;
struct ipr_ioa *ioa;
struct ipr_dev *ses;
suspend_rc = rc = RC_SUCCESS;
for_each_ioa(ioa) {
for_each_ses(ioa, ses) {
if (ses->is_suspend_cand) {
rc = ipr_suspend_device_bus(ses, &ses->res_addr[0],
IPR_SDB_CHECK_AND_QUIESCE_ENC);
if (rc !=0 )
suspend_rc = RC_82_Suspended_Fail;
else
rc = ipr_write_dev_attr(ses, "state", "offline\n");
}
}
}
if (suspend_rc != RC_SUCCESS)
return suspend_rc | EXIT_FLAG;
return RC_81_Suspended_Success | EXIT_FLAG;
}
int ipr_resume_disk_enclosure(i_container *i_con)
{
int rc, resume_rc;
struct ipr_ioa *ioa;
struct ipr_dev *ses;
resume_rc = rc = RC_SUCCESS;
for_each_ioa(ioa) {
for_each_ses(ioa, ses) {
if (ses->is_resume_cand) {
rc = ipr_resume_device_bus(ses, &ses->res_addr[0]);
if (rc !=0 )
resume_rc = RC_86_Enclosure_Resume_Fail;
else
ipr_write_dev_attr(ses, "state", "running\n");
}
}
}
if (resume_rc != RC_SUCCESS)
return resume_rc | EXIT_FLAG;
return RC_85_Enclosure_Resume_Success | EXIT_FLAG;
}
/**
* confirm_suspend_disk_enclosure -
*
* Returns:
* 0 if success / non-zero on failure FIXME
**/
int confirm_suspend_disk_enclosure(void)
{
int rc,k;
struct ipr_ioa *ioa;
struct ipr_dev *ses;
char *buffer[2];
struct screen_output *s_out;
int header_lines;
int toggle= 0;
rc = RC_SUCCESS;
body_init_status_enclosure(buffer, n_confirm_suspend_disk_enclosure.header, &header_lines);
for_each_ioa(ioa) {
for_each_ses(ioa, ses) {
if (!ses->is_suspend_cand)
continue;
print_dev_enclosure(k, ses, buffer, "2", k);
}
}
do {
n_confirm_suspend_disk_enclosure.body = buffer[toggle&1];
s_out = screen_driver(&n_confirm_suspend_disk_enclosure, header_lines, NULL);
rc = s_out->rc;
free(s_out);
toggle++;
} while (rc == TOGGLE_SCREEN);
for (k = 0; k < 2; k++) {
free(buffer[k]);
buffer[k] = NULL;
}
n_confirm_suspend_disk_enclosure.body = NULL;
return rc;
}
/**
* confirm_resume_disk_enclosure -
*
* Returns:
* 0 if success / non-zero on failure FIXME
**/
int confirm_resume_disk_enclosure(void)
{
int rc,k;
struct ipr_ioa *ioa;
struct ipr_dev *ses;
char *buffer[2];
struct screen_output *s_out;
int header_lines;
int toggle= 0;
rc = RC_SUCCESS;
body_init_status_enclosure(buffer, n_confirm_resume_disk_enclosure.header, &header_lines);
for_each_ioa(ioa) {
for_each_ses(ioa, ses) {
if (!ses->is_resume_cand)
continue;
print_dev_enclosure(k, ses, buffer, "3", k);
}
}
do {
n_confirm_resume_disk_enclosure.body = buffer[toggle&1];
s_out = screen_driver(&n_confirm_resume_disk_enclosure, header_lines, NULL);
rc = s_out->rc;
free(s_out);
toggle++;
} while (rc == TOGGLE_SCREEN);
for (k = 0; k < 2; k++) {
free(buffer[k]);
buffer[k] = NULL;
}
n_confirm_resume_disk_enclosure.body = NULL;
return rc;
}
/**
* enclosures_fork -
* @i_con: i_container struct
*
* Returns:
* 0 if success / non-zero on failure FIXME
**/
int enclosures_fork(i_container *i_con)
{
int rc = 0, suspend_flag =0, resume_flag = 0;
struct ipr_dev *ses;
struct ipr_ioa *ioa;
char *input;
i_container *temp_i_con;
for_each_icon(temp_i_con) {
ses = (struct ipr_dev *)temp_i_con->data;
if (ses == NULL)
continue;
input = temp_i_con->field_data;
if (strcmp(input, "3") == 0) {
if (ipr_is_ioa(ses))
return RC_89_Invalid_Dev_For_Resume;
if (ses->active_suspend == IOA_DEV_PORT_UNKNOWN)
return RC_90_Enclosure_Is_Unknown;
if (ses->active_suspend == IOA_DEV_PORT_ACTIVE)
return RC_84_Enclosure_Is_Active;
ses->is_resume_cand = 1;
resume_flag = 1;
} else if (strcmp(input, "2") == 0) {
if (ipr_is_ioa(ses))
return RC_88_Invalid_Dev_For_Suspend;
if (ses->active_suspend == IOA_DEV_PORT_UNKNOWN)
return RC_90_Enclosure_Is_Unknown;
if (!strncmp((char *)&ses->serial_number, (char *)&ses->ioa->yl_serial_num[0], ESM_SERIAL_NUM_LEN))
return RC_87_No_Suspend_Same_Seri_Num;
if (ses->active_suspend == IOA_DEV_PORT_SUSPEND)
return RC_83_Enclosure_Is_Suspend;
ses->is_suspend_cand = 1;
suspend_flag = 1;
} else if (strcmp(input, "1") == 0) {
rc = show_enclosure_info(ses);
return rc;
}
}
if (suspend_flag) {
rc =confirm_suspend_disk_enclosure();
for_each_ioa(ioa)
for_each_ses(ioa, ses)
ses->is_suspend_cand = 0;
return rc;
}
if (resume_flag) {
rc = confirm_resume_disk_enclosure();
for_each_ioa(ioa)
for_each_ses(ioa, ses)
ses->is_resume_cand = 0;
return rc;
}
return INVALID_OPTION_STATUS;
}
/**
* enclosures_maint -
* @i_con: i_container struct
*
* Returns:
* 0 if success / non-zero on failure FIXME
**/
int enclosures_maint(i_container *i_con)
{
int rc, k, first_ses;
struct ipr_ioa *ioa;
struct ipr_dev *ses;
char *buffer[2];
struct screen_output *s_out;
int header_lines;
int toggle=0;
char product_id[IPR_PROD_ID_LEN + 1];
processing();
i_con = free_i_con(i_con);
body_init_status_enclosure(buffer, n_enclosures_maint.header, &header_lines);
check_current_config(false);
for_each_ioa(ioa) {
if (!ioa->sis64)
continue;
first_ses = 1;
for_each_ses(ioa, ses) {
ipr_strncpy_0(product_id, ses->scsi_dev_data->product_id, IPR_PROD_ID_LEN);
if (!strncmp(product_id,"5888", strlen("5888")) || !strncmp(product_id, "EDR1", strlen("EDR1"))) {
if (strlen(ses->physical_location) == 0)
get_ses_phy_loc(ses);
if (first_ses) {
i_con = add_i_con(i_con, "\0",ioa);
print_dev_enclosure(k, &ioa->ioa, buffer, "%1", (k | 0x1000));
first_ses = 0;
}
i_con = add_i_con(i_con, "\0",ses);
print_dev_enclosure(k, ses, buffer, "%1", k);
}
}
}
do {
n_enclosures_maint.body = buffer[toggle&1];
s_out = screen_driver(&n_enclosures_maint, header_lines, i_con);
rc = s_out->rc;
free(s_out);
toggle++;
} while (rc == TOGGLE_SCREEN);
for (k = 0; k < 2; k++) {
free(buffer[k]);
buffer[k] = NULL;
}
n_enclosures_maint.body = NULL;
return rc;
}
/**
* suspend_disk_enclosure -
* @args: argument vector
* @num_args: number of arguments
*
* Returns:
* 0 if success / non-zero on failure
**/
static int suspend_disk_enclosure(char **args, int num_args)
{
struct ipr_dev *ses;
int rc = 0;
ses = find_dev(args[0]);
get_ses_ioport_status(ses);
if (ipr_is_ioa(ses)) {
fprintf(stderr,"Incorrect device type specified. Please specify a valid SAS device to suspend.\n");
return 1;
}
if (ses->scsi_dev_data && ses->scsi_dev_data->type != TYPE_ENCLOSURE) {
fprintf(stderr, "Selected device is not SAS expander.\n");
return 1;
}
if (strlen(ses->physical_location) == 0)
get_ses_phy_loc(ses);
if (!strncmp((char *)&ses->serial_number, (char *)&ses->ioa->yl_serial_num[0], ESM_SERIAL_NUM_LEN)) {
fprintf(stderr, "Could not suspend an expander from the RAID controller with the same serial number.\n");
return 1;
}
if (ses->active_suspend == IOA_DEV_PORT_SUSPEND) {
printf("The expander is already suspended\n");
return 1;
}
if (ses->active_suspend == IOA_DEV_PORT_UNKNOWN)
return 90;
rc = ipr_suspend_device_bus(ses, &ses->res_addr[0],
IPR_SDB_CHECK_AND_QUIESCE_ENC);
if (!rc) {
rc = ipr_write_dev_attr(ses, "state", "offline\n");
printf("Selected disk enclosure was suspended successfully.\n");
return rc;
}
fprintf(stderr, "Failed to suspend this SAS expander.\n");
return 1;
}
/**
* resume_disk_enclosure -
* @args: argument vector
* @num_args: number of arguments
*
* Returns:
* 0 if success / non-zero on failure
**/
static int resume_disk_enclosure(char **args, int num_args)
{
struct ipr_dev *ses;
int rc = 0;
ses = find_dev(args[0]);
get_ses_ioport_status(ses);
if (ipr_is_ioa(ses)) {
fprintf(stderr,"Incorrect device type specified. Please specify a valid SAS device to resume.\n");
return 1;
}
if (ses->scsi_dev_data && ses->scsi_dev_data->type != TYPE_ENCLOSURE) {
fprintf(stderr, "Selected device is not SAS expander.\n");
return 1;
}
if (ses->active_suspend == IOA_DEV_PORT_ACTIVE) {
printf("The expander is already in active state.\n");
return 1;
}
if (ses->active_suspend == IOA_DEV_PORT_UNKNOWN) {
printf("The expander is an unknown state.\n");
return 1;
}
rc = ipr_resume_device_bus(ses, &ses->res_addr[0]);
if (!rc) {
ipr_write_dev_attr(ses, "state", "running\n");
printf("Selected disk enclosure was resumed successfully.\n");
return rc;
}
printf("Failed to resume this SAS expander.\n");
return 1;
}
/**
* query_disk_enclosure_status -
* @args: argument vector
* @num_args: number of arguments
*
* Returns:
* 0 if success / non-zero on failure
**/
static int query_disk_enclosure_status(char **args, int num_args)
{
struct ipr_ioa *ioa;
struct ipr_dev *ses;
int rc = 0;
printf("%s\n%s\n", status_hdr[14], status_sep[14]);
for_each_ioa(ioa) {
printf_device((struct ipr_dev *)ioa, 0x8 | 0x1000);
for_each_ses(ioa, ses) {
get_ses_ioport_status(ses);
if (strlen(ses->physical_location) == 0)
get_ses_phy_loc(ses);
printf_device(ses, 0x8);
}
}
return rc;
}
static char *af_dasd_perf (char *body, struct ipr_dev *dev)
{
struct ipr_dasd_perf_counters_log_page30 log;
char buffer[200];
unsigned long long idle_loop_count;
u32 idle_count;
memset(&log, 0, sizeof(log));
body = add_line_to_body(body,"", NULL);
if (!ipr_is_log_page_supported(dev, 0x30)) {
body = add_line_to_body(body,_("Log page 30 not supported"), NULL);
return body;
}
ipr_log_sense(dev, 0x30, &log, sizeof(log));
sprintf(buffer,"%d", ntohs(log.dev_no_seeks));
body = add_line_to_body(body,_("Seek = 0 disk"), buffer);
sprintf(buffer,"%d", ntohs(log.dev_seeks_2_3));
body = add_line_to_body(body,_("Seek >= 2/3 disk"), buffer);
sprintf(buffer,"%d", ntohs(log.dev_seeks_1_3));
body = add_line_to_body(body,_("Seek >= 1/3 and < 2/3 disk"), buffer);
sprintf(buffer,"%d", ntohs(log.dev_seeks_1_6));
body = add_line_to_body(body,_("Seek >= 1/6 and < 1/3 disk"), buffer);
sprintf(buffer,"%d", ntohs(log.dev_seeks_1_12));
body = add_line_to_body(body,_("Seek >= 1/12 and < 1/6 disk"), buffer);
sprintf(buffer,"%d", ntohs(log.dev_seeks_0));
body = add_line_to_body(body,_("Seek > 0 and < 1/12 disk"), buffer);
body = add_line_to_body(body,"", NULL);
sprintf(buffer,"%d", ntohs(log.dev_read_buf_overruns));
body = add_line_to_body(body,_("Device Read Buffer Overruns"), buffer);
sprintf(buffer,"%d", ntohs(log.dev_write_buf_underruns));
body = add_line_to_body(body,_("Device Write Buffer Underruns"), buffer);
sprintf(buffer,"%d", ntohl(log.dev_cache_read_hits));
body = add_line_to_body(body,_("Device Cache Read Hits"), buffer);
sprintf(buffer,"%d", ntohl(log.dev_cache_partial_read_hits));
body = add_line_to_body(body,_("Device Partial Read Hits"), buffer);
sprintf(buffer,"%d", ntohl(log.dev_cache_write_hits));
body = add_line_to_body(body,_("Device Cache Write Hits"), buffer);
sprintf(buffer,"%d", ntohl(log.dev_cache_fast_write_hits));
body = add_line_to_body(body,_("Device Cache Fast Writes"), buffer);
body = add_line_to_body(body,"", NULL);
sprintf(buffer,"%d", ntohl(log.ioa_dev_read_ops));
body = add_line_to_body(body,_("IOA Issued Device Reads"), buffer);
sprintf(buffer,"%d", ntohl(log.ioa_dev_write_ops));
body = add_line_to_body(body,_("IOA Issued Device Writes"), buffer);
sprintf(buffer,"%d", ntohl(log.ioa_cache_read_hits));
body = add_line_to_body(body,_("IOA Cache Read Hits"), buffer);
sprintf(buffer,"%d", ntohl(log.ioa_cache_partial_read_hits));
body = add_line_to_body(body,_("IOA Cache Partial Read Hits"), buffer);
sprintf(buffer,"%d", ntohl(log.ioa_cache_write_hits));
body = add_line_to_body(body,_("IOA Cache Write Hits"), buffer);
sprintf(buffer,"%d", ntohl(log.ioa_cache_fast_write_hits));
body = add_line_to_body(body,_("IOA Cache Fast Writes"), buffer);
sprintf(buffer,"%d", ntohl(log.ioa_cache_emu_read_hits));
body = add_line_to_body(body,_("IOA Emulated Read Hits"), buffer);
body = add_line_to_body(body,"", NULL);
sprintf(buffer,"%08X%08X", ntohl(log.ioa_idle_loop_count[0]),
ntohl(log.ioa_idle_loop_count[1]));
idle_loop_count = strtoull(buffer, NULL, 16);
sprintf(buffer,"%llu", idle_loop_count);
body = add_line_to_body(body,_("IOA Idle Loop Count"), buffer);
idle_count = ntohl(log.ioa_idle_count_value);
sprintf(buffer,"%d", idle_count);
body = add_line_to_body(body,_("IOA Idle Count"), buffer);
sprintf(buffer,"%d", log.ioa_idle_units);
body = add_line_to_body(body,_("IOA Idle Units"), buffer);
idle_count = idle_loop_count * ( idle_count * pow(10, -log.ioa_idle_units));
sprintf(buffer,"%d seconds.", idle_count);
body = add_line_to_body(body,_("IOA Idle Time"), buffer);
return body;
}
static int show_perf (char **args, int num_args)
{
char *body = NULL;
struct ipr_dev *dev = find_dev(args[0]);
if (!dev) {
fprintf(stderr, "Cannot find %s\n", args[0]);
return -EINVAL;
}
if (ipr_is_af_dasd_device(dev)) {
body = af_dasd_perf(body, dev);
} else {
fprintf(stderr, "%s is not a valid DASD\n", args[0]);
return -EINVAL;
}
printf("%s\n", body);
free(body);
return 0;
}
static int dump (char **args, int num_args)
{
struct ipr_ioa *ioa;
struct ipr_dev *dev;
struct ipr_disk_attr attr;
if (!ipr_ioa_head) {
printf("There are no IPR adapters in the system. No dump collected...\n");
return 0;
}
printf("\n === Running 'show-config' ===\n");
show_config(NULL,0);
printf("\n === Running 'show-alt-config' ===\n");
show_alt_config(NULL,0);
printf("\n === Running 'show-ioas' ===\n");
show_ioas(NULL, 0);
printf("\n === Running 'show-arrays' ===\n");
show_arrays(NULL,0);
printf("\n === Running 'show-hot-spares' ===\n");
show_hot_spares(NULL, 0);
printf("\n === Running 'show-af-disks' ===\n");
show_af_disks(NULL, 0);
printf("\n === Running 'show-all-af-disks' ===\n");
show_all_af_disks(NULL, 0);
printf("\n === Running 'show-jbod-disks' ===\n");
show_jbod_disks(NULL, 0);
printf("\n === Running 'show-slots' ===\n");
show_slots(NULL, 0);
printf("\n === Running show-details ===\n");
for_each_ioa(ioa){
printf("IOA %s:\n", ioa->ioa.gen_name);
show_dev_details(&ioa->ioa);
for_each_dev(ioa, dev){
printf("Device %s:\n", dev->gen_name);
show_dev_details(dev);
if (ipr_is_volume_set(dev) || ipr_is_gscsi(dev)) {
if (ipr_get_dev_attr(dev, &attr))
continue;
printf("Write cache mode: %s\n\n",
attr.write_cache_policy ?
"write back" : "write through");
}
}
}
printf("\n === Running show-battery-info ===\n");
for_each_ioa(ioa){
char *array[] = { ioa->ioa.gen_name };
printf("Device %s:\n", ioa->ioa.gen_name);
battery_info(array, 1);
}
printf("\n === Running 'query-path-status' ===\n");
for_each_primary_ioa(ioa){
for_each_dev(ioa, dev){
char *array[] = { dev->gen_name };
printf("\nDevice %s:\n", dev->gen_name);
query_path_status(array, 1);
}
}
printf("\n\n === Running 'query-path-details' ===\n");
for_each_primary_ioa(ioa){
for_each_dev(ioa, dev){
char *array[] = { dev->gen_name };
printf("\nDevice: %s\n", dev->gen_name);
query_path_details(array, 1);
}
}
printf("\n === Running 'show-perf' ===\n");
for_each_ioa(ioa){
for_each_dev(ioa, dev){
if (ipr_is_af_dasd_device(dev)) {
char *array[] = { dev->gen_name };
printf("\nDevice: %s\n", dev->gen_name);
show_perf(array, 1);
}
}
}
return 0;
}
static char *print_ssd_report(struct ipr_dev *dev, char *body)
{
struct ipr_inquiry_page0 page0_inq;
struct ipr_dasd_inquiry_page3 page3_inq;
struct ipr_sas_std_inq_data std_inq;
struct ipr_sas_inquiry_pageC4 pageC4_inq;
struct ipr_sas_inquiry_pageC7 pageC7_inq;
struct ipr_sas_log_page page34_log;
struct ipr_sas_log_page page2F_log;
struct ipr_sas_log_page page02_log;
struct ipr_sas_log_smart_attr *smart_attr;
struct ipr_sas_log_inf_except_attr *inf_except_attr;
struct ipr_sas_log_write_err_cnt_attr *bytes_counter;
char buffer[BUFSIZ];
int rc, len, nentries = 0;
u64 aux;
u64 total_gb_writ = 0;
u32 uptime = 0;
u32 life_remain = 0;
int pfa_trip = 0;
memset(&std_inq, 0, sizeof(std_inq));
memset(&pageC4_inq, 0, sizeof(pageC4_inq));
memset(&pageC7_inq, 0, sizeof(pageC7_inq));
memset(&page0_inq, 0, sizeof(page0_inq));
memset(&page3_inq, 0, sizeof(page3_inq));
memset(&page34_log, 0, sizeof(page34_log));
memset(&page2F_log, 0, sizeof(page2F_log));
memset(&page02_log, 0, sizeof(page02_log));
rc = ipr_inquiry(dev, IPR_STD_INQUIRY, &std_inq, sizeof(std_inq));
if (rc)
return NULL;
if (!std_inq.is_ssd) {
scsi_err(dev, "%s is not a SSD.\n", dev->gen_name);
return NULL;
}
rc = ipr_inquiry(dev, 0xC4, &pageC4_inq, sizeof(pageC4_inq));
if (rc)
return NULL;
if (pageC4_inq.endurance != IPR_SAS_ENDURANCE_LOW_EZ &&
pageC4_inq.endurance != IPR_SAS_ENDURANCE_LOW3 &&
pageC4_inq.endurance != IPR_SAS_ENDURANCE_LOW1) {
scsi_err(dev, "%s is not a Read Intensive SSD.\n",
dev->gen_name);
return NULL;
}
rc = ipr_inquiry(dev, 0x3, &page3_inq, sizeof(page3_inq));
if (rc)
return NULL;
rc = ipr_inquiry(dev, 0xC7, &pageC7_inq, sizeof(pageC7_inq));
if (rc)
return NULL;
rc = ipr_log_sense(dev, 0x34, &page34_log, sizeof(page34_log));
if (rc)
return NULL;
smart_attr = ipr_sas_log_get_param(&page34_log, 0xE7, NULL);
if (smart_attr && smart_attr->norm_worst_val > 0)
life_remain = smart_attr->norm_worst_val;
smart_attr = ipr_sas_log_get_param(&page34_log, 0x09, NULL);
if (smart_attr)
uptime = ntohl(*((u32 *) smart_attr->raw_data));
rc = ipr_log_sense(dev, 0x02, &page02_log, sizeof(page02_log));
if (rc)
return NULL;
bytes_counter = ipr_sas_log_get_param(&page02_log, 0x05, NULL);
if (bytes_counter)
total_gb_writ = be64toh(*(u64 *) &bytes_counter->counter) >> 14;
rc = ipr_log_sense(dev, 0x2F, &page2F_log, sizeof(page2F_log));
if (rc)
return NULL;
inf_except_attr = ipr_sas_log_get_param(&page2F_log, 0x0, &nentries);
if (inf_except_attr)
pfa_trip = inf_except_attr->inf_except_add_sense_code;
if (nentries > 1)
pfa_trip = 1;
body = add_line_to_body(body, "", NULL);
/* FRU Number */
ipr_strncpy_0(buffer, std_inq.asm_part_num,
IPR_SAS_STD_INQ_ASM_PART_NUM);
body = add_line_to_body(body, _("FRU Number"), buffer);
/* Serial number */
ipr_strncpy_0(buffer, (char *)std_inq.std_inq_data.serial_num,
IPR_SERIAL_NUM_LEN);
body = add_line_to_body(body, _("Serial Number"), buffer);
/* FW level */
len = sprintf(buffer, "%X%X%X%X", page3_inq.release_level[0],
page3_inq.release_level[1], page3_inq.release_level[2],
page3_inq.release_level[3]);
if (isalnum(page3_inq.release_level[0]) &&
isalnum(page3_inq.release_level[1]) &&
isalnum(page3_inq.release_level[2]) &&
isalnum(page3_inq.release_level[3]))
sprintf(buffer + len, " (%c%c%c%c)", page3_inq.release_level[0],
page3_inq.release_level[1], page3_inq.release_level[2],
page3_inq.release_level[3]);
body = add_line_to_body(body, _("Firmware Version"), buffer);
/* Bytes written */
snprintf(buffer, BUFSIZ, "%ld GB", total_gb_writ);
body = add_line_to_body(body, _("Total Bytes Written"), buffer);
/* Max bytes. */
aux = ntohl(*((u32 *) pageC7_inq.total_bytes_warranty)) >> 8;
snprintf(buffer, BUFSIZ, "%ld GB", aux * 1024L);
body = add_line_to_body(body, _("Number of written bytes supported"),
buffer);
/* Life remaining */
snprintf(buffer, BUFSIZ, "%hhd %%", life_remain);
body = add_line_to_body(body, _("Life Remaining Gauge"), buffer);
/* PFA Trip */
body = add_line_to_body(body, _("PFA Trip"), pfa_trip? "yes": "no");
/* Power-on days */
snprintf (buffer, 4, "%d", uptime / 24);
body = add_line_to_body(body, _("Power-on Days"), buffer);
return body;
}
static int ssd_report(char **args, int num_args)
{
struct ipr_dev *dev = find_dev(args[0]);
char *body;
if (!dev) {
fprintf(stderr, "Cannot find %s\n", args[0]);
return -EINVAL;
}
body = print_ssd_report(dev, NULL);
if (!body) {
scsi_err(dev, "Device inquiry failed.\n");
return -EIO;
}
printf("%s", body);
return 0;
}
static const struct {
char *cmd;
int min_args;
int unlimited_max;
int max_args;
int (*func)(char **, int);
char *usage;
} command [] = {
{ "show-config", 0, 0, 0, show_config, "" },
{ "show-alt-config", 0, 0, 0, show_alt_config, "" },
{ "show-ioas", 0, 0, 0, show_ioas, "" },
{ "show-arrays", 0, 0, 0, show_arrays, "" },
{ "show-battery-info", 1, 0, 1, battery_info, "sg5" },
{ "show-details", 1, 0, 1, show_details, "sda" },
{ "show-hot-spares", 0, 0, 0, show_hot_spares, "" },
{ "show-af-disks", 0, 0, 0, show_af_disks, "" },
{ "show-all-af-disks", 0, 0, 0, show_all_af_disks, "" },
{ "show-jbod-disks", 0, 0, 0, show_jbod_disks, "" },
{ "show-slots", 0, 0, 0, show_slots, "" },
{ "status", 1, 0, 1, print_status, "sda" },
{ "alt-status", 1, 0, 1, print_alt_status, "sda" },
{ "query-raid-create", 1, 0, 1, query_raid_create, "sg5" },
{ "query-raid-delete", 1, 0, 1, query_raid_delete, "sg5" },
{ "query-hot-spare-create", 1, 0, 1, query_hot_spare_create, "sg5" },
{ "query-hot-spare-delete", 1, 0, 1, query_hot_spare_delete, "sg5" },
{ "query-raid-consistency-check", 0, 0, 0, query_raid_consistency_check, "" },
{ "query-format-for-jbod", 0, 0, 0, query_format_for_jbod, "" },
{ "query-reclaim", 0, 0, 0, query_reclaim, "" },
{ "query-arrays-raid-include", 0, 0, 0, query_arrays_include, "" },
{ "query-devices-raid-include", 1, 0, 1, query_devices_include, "sdb" },
{ "query-arrays-raid-migrate", 0, 0, 0, query_arrays_raid_migrate, "" },
{ "query-devices-raid-migrate", 1, 0, 1, query_devices_raid_migrate, "sda" },
{ "query-raid-levels-raid-migrate", 1, 0, 1, query_raid_levels_raid_migrate, "sda" },
{ "query-stripe-sizes-raid-migrate", 2, 0, 2, query_stripe_sizes_raid_migrate, "sg5 10" },
{ "query-devices-min-max-raid-migrate", 2, 0, 2, query_devices_min_max_raid_migrate, "sg5 10" },
{ "query-ioas-asymmetric-access", 0, 0, 0, query_ioas_asym_access, "" },
{ "query-arrays-asymmetric-access", 0, 0, 0, query_arrays_asym_access, "" },
{ "query-ioa-asymmetric-access-mode", 1, 0, 1, query_ioa_asym_access_mode, "sg5" },
{ "query-array-asymmetric-access-mode", 1, 0, 1, query_array_asym_access_mode, "sda" },
{ "query-recovery-format", 0, 0, 0, query_recovery_format, "" },
{ "query-raid-rebuild", 0, 0, 0, query_raid_rebuild, "" },
{ "query-format-for-raid", 0, 0, 0, query_format_for_raid, "" },
{ "query-ucode-level", 1, 0, 1, query_ucode_level, "sda" },
{ "query-format-timeout", 1, 0, 1, query_format_timeout, "sg6" },
{ "query-qdepth", 1, 0, 1, query_qdepth, "sda" },
{ "query-tcq-enable", 1, 0, 1, query_tcq_enable, "sda" },
{ "query-log-level", 1, 0, 1, query_log_level, "sg5" },
{ "query-add-device", 0, 0, 0, query_add_device, "" },
{ "query-remove-device", 0, 0, 0, query_remove_device, "" },
{ "query-initiator-id", 2, 0, 2, query_initiator_id, "sg5 0" },
{ "query-bus-speed", 2, 0, 2, query_bus_speed, "sg5 0" },
{ "query-bus-width", 2, 0, 2, query_bus_width, "sg5 0" },
{ "query-supported-raid-levels", 1, 0, 1, query_raid_levels, "sg5" },
{ "query-include-allowed", 2, 0, 2, query_include_allowed, "sg5 5" },
{ "query-max-devices-in-array", 2, 0, 2, query_max_array_devices, "sg5 5" },
{ "query-min-devices-in-array", 2, 0, 2, query_min_array_devices, "sg5 5" },
{ "query-min-mult-in-array", 2, 0, 2, query_min_mult_in_array, "sg5 5" },
{ "query-supp-stripe-sizes", 2, 0, 2, query_supp_stripe_sizes, "sg5 5" },
{ "query-recommended-stripe-size", 2, 0, 2, query_recommended_stripe_size, "sg5 5" },
{ "query-path-status", 0, 0, 1, query_path_status, "sg5" },
{ "query-path-details", 1, 0, 1, query_path_details, "sda" },
{ "query-ioa-caching", 1, 0, 1, query_ioa_caching, "sg5" },
{ "query-array-label", 1, 0, 1, query_array_label, "mylabel" },
{ "query-array", 1, 0, 1, query_array, "U5886.001.P915059-P1-D1" },
{ "query-device", 1, 0, 1, query_device, "U5886.001.P915059-P1-D1" },
{ "query-location", 1, 0, 1, query_location, "sg5" },
{ "query-array-rebuild-rate", 1, 0, 1, query_array_rebuild_rate, "sg5"},
{ "query-array-rebuild-verify", 1, 0, 1, query_array_rebuild_verify, "sg5" },
{ "set-ioa-caching", 2, 0, 2, set_ioa_caching, "sg5 [Default | Disabled]" },
{ "set-array-rebuild-rate", 2, 0, 2, set_array_rebuild_rate, "sg5 10"},
{ "set-array-rebuild-verify", 2, 0, 2, set_array_rebuild_verify, "sg5 [default | enable | disable]" },
{ "primary", 1, 0, 1, set_primary, "sg5" },
{ "secondary", 1, 0, 1, set_secondary, "sg5" },
{ "set-all-primary", 0, 0, 0, set_all_primary, "" },
{ "set-all-secondary", 0, 0, 0, set_all_secondary, "" },
{ "query-ha-mode", 1, 0, 1, get_ha_mode, "sg5" },
{ "set-ha-mode", 2, 0, 2, __set_ha_mode, "sg5 [Normal | JBOD]" },
{ "set-ioa-asymmetric-access-mode", 2, 0, 2, set_ioa_asymmetric_access, "sg5 [Enabled | Disabled]" },
{ "set-array-asymmetric-access-mode", 2, 0, 2, set_array_asymmetric_access, "sda [Optimized | Non-Optimized]" },
{ "raid-create", 1, 1, 0, raid_create, "-r 5 -s 64 sda sdb sg6 sg7" },
{ "raid-delete", 1, 0, 1, raid_delete, "sdb" },
{ "raid-include", 2, 0, 17, raid_include_cmd, "sda sg6 sg7" },
{ "format-for-raid", 1, 1, 0, format_for_raid, "sda sdb sdc" },
{ "format-for-jbod", 1, 1, 0, format_for_jbod, "sg6 sg7 sg8" },
{ "recovery-format", 1, 1, 0, recovery_format, "sda sg7" },
{ "hot-spare-create", 1, 0, 1, hot_spare_create, "sg6" },
{ "hot-spare-delete", 1, 0, 1, hot_spare_delete, "sg6" },
{ "reclaim-cache", 1, 0, 1, reclaim, "sg5" },
{ "reclaim-unknown-cache", 1, 0, 1, reclaim_unknown, "sg5" },
{ "force-cache-battery-error", 1, 0, 1, force_cache_battery_error, "sg5" },
{ "start-ioa-cache", 1, 0, 1, start_ioa_cache, "sg5" },
{ "raid-consistency-check", 1, 0, 1, raid_consistency_check, "sg5" },
{ "raid-rebuild", 1, 0, 1, raid_rebuild_cmd, "sg6" },
{ "disrupt-device", 1, 0, 1, disrupt_device_cmd, "sg6" },
{ "update-ucode", 2, 0, 2, update_ucode_cmd, "sg5 /root/ucode.bin" },
{ "show-ucode-levels", 0, 0, 0, show_ucode_levels, "" },
{ "update-all-ucodes", 0, 0, 0, update_all_ucodes, "" },
{ "set-format-timeout", 2, 0, 2, set_format_timeout, "sg6 4" },
{ "set-qdepth", 2, 0, 2, set_qdepth, "sda 16" },
{ "set-tcq-enable", 2, 0, 2, set_tcq_enable, "sda 0" },
{ "set-log-level", 2, 0, 2, set_log_level_cmd, "sg5 2" },
{ "set-write-cache-policy", 2, 0, 2, set_device_write_cache_policy, "sg5 [writeback|writethrough]" },
{ "query-write-cache-policy", 1, 0, 1, query_device_write_cache_policy, "sg5" },
{ "ssd-report", 1, 0, 1, ssd_report, "sg5" },
{ "identify-disk", 2, 0, 2, identify_disk, "sda 1" },
{ "identify-slot", 2, 0, 2, identify_slot, "U5886.001.P915059-P1-D1 1" },
{ "remove-disk", 2, 0, 2, remove_disk, "sda 1" },
{ "remove-slot", 2, 0, 2, remove_slot, "U5886.001.P915059-P1-D1 1" },
{ "add-slot", 2, 0, 2, add_slot, "U58886.001.P915059-P1-D1 1" },
{ "set-initiator-id", 3, 0, 3, set_initiator_id, "sg5 0 7" },
{ "set-bus-speed", 3, 0, 3, set_bus_speed, "sg5 0 320" },
{ "set-bus-width", 3, 0, 3, set_bus_width, "sg5 0 16" },
{ "raid-migrate", 3, 1, 0, raid_migrate_cmd, "-r 10 [-s 256] sda sg6 sg7" },
{ "get-live-dump", 1, 0, 1, get_live_dump, "sg5" },
{ "query-ses-mode", 1, 0, 1, query_ses_mode, "sg8"},
{ "set-ses-mode", 2, 0, 2, set_ses_mode, "sg8 2"},
{ "query-disk-enclosure-status", 0, 0, 0, query_disk_enclosure_status},
{ "suspend-disk-enclosure", 1, 0, 1, suspend_disk_enclosure, "sg8"},
{ "resume-disk-enclosure", 1, 0, 1, resume_disk_enclosure, "sg8 "},
{ "show-perf", 1, 0, 1, show_perf, "sg8"},
{ "dump", 0, 0, 0, dump, "" },
};
/**
* non_intenactive_cmd - process a command line command
* @cmd: command string
* @args: argument vector
* @num_args: number of arguments
*
* Returns:
* 0 if success / non-zero on failure
**/
static int non_intenactive_cmd(char *cmd, char **args, int num_args)
{
int rc, i;
int show_details = 0;
exit_func = cmdline_exit_func;
closelog();
openlog("iprconfig", LOG_PERROR | LOG_PID | LOG_CONS, LOG_USER);
if (!strcmp("show-details", cmd))
show_details = 1;
__check_current_config(false, show_details);
for (i = 0; i < ARRAY_SIZE(command); i++) {
if (strcmp(cmd, command[i].cmd) != 0)
continue;
if (num_args < command[i].min_args) {
fprintf(stderr, "Not enough arguments specified.\n");
fprintf(stderr, "Usage: iprconfig -c %s %s\n",
cmd, command[i].usage);
return -EINVAL;
}
if (!command[i].unlimited_max && num_args > command[i].max_args) {
fprintf(stderr, "Too many arguments specified.\n");
fprintf(stderr, "Usage: iprconfig -c %s %s\n",
cmd, command[i].usage);
return -EINVAL;
}
rc = command[i].func(args, num_args);
exit_func();
return rc;
}
exit_func();
usage();
return -EINVAL;
}
void list_options()
{
int i;
for (i = 0; i < ARRAY_SIZE(command); i++)
printf ("%s\n", command[i].cmd);
}
/**
* main - program entry point
* @argc: number of arguments
* @argv: argument vector
*
* Returns:
* 0 if success / non-zero on failure
**/
int main(int argc, char *argv[])
{
int next_editor, next_dir, next_cmd, next_args, i, rc = 0;
char parm_editor[200], parm_dir[200], cmd[200];
int non_intenactive = 0;
tool_init_retry = 0;
strcpy(parm_dir, DEFAULT_LOG_DIR);
strcpy(parm_editor, DEFAULT_EDITOR);
openlog("iprconfig",
LOG_PID | /* Include the PID with each error */
LOG_CONS, /* Write to system console if there is an error
sending to system logger */
LOG_USER);
if (argc > 1) {
next_editor = 0;
next_dir = 0;
next_cmd = 0;
next_args = 0;
for (i = 1; i < argc; i++) {
if (parse_option(argv[i]))
continue;
else if (next_editor) {
strcpy(parm_editor, argv[i]);
next_editor = 0;
} else if (next_dir) {
strcpy(parm_dir, argv[i]);
next_dir = 0;
} else if (next_cmd) {
strcpy(cmd, argv[i]);
non_intenactive = 1;
next_cmd = 0;
next_args = 1;
} else if (next_args) {
add_args = realloc(add_args, sizeof(*add_args) * (num_add_args + 1));
add_args[num_add_args] = malloc(strlen(argv[i]) + 1);
strcpy(add_args[num_add_args], argv[i]);
num_add_args++;
} else if (strcmp(argv[i], "-e") == 0) {
next_editor = 1;
} else if (strcmp(argv[i], "-k") == 0) {
next_dir = 1;
} else if (strcmp(argv[i], "-c") == 0) {
next_cmd = 1;
} else if (strcmp(argv[i], "-l") == 0) {
list_options();
exit(1);
}
else {
usage();
exit(1);
}
}
}
strcpy(log_root_dir, parm_dir);
strcpy(editor, parm_editor);
if (check_sg_module() == -1)
system("modprobe sg");
exit_func = tool_exit_func;
tool_init(0);
if (non_intenactive)
return non_intenactive_cmd(cmd, add_args, num_add_args);
use_curses = 1;
curses_init();
cbreak(); /* take input chars one at a time, no wait for \n */
keypad(stdscr,TRUE);
noecho();
s_status.index = 0;
main_menu(NULL);
if (head_zdev){
check_current_config(false);
ipr_cleanup_zeroed_devs();
}
while (head_zdev) {
struct screen_output *s_out;
i_container *i_con;
struct ipr_ioa *ioa;
struct ipr_dev *dev;
int num_zeroed = 0;
for_each_ioa(ioa) {
for_each_af_dasd(ioa, dev) {
if (ipr_device_is_zeroed(dev) &&
!ipr_known_zeroed_is_saved(dev)) {
num_zeroed++;
}
}
}
if (!num_zeroed)
break;
n_exit_confirm.body = body_init(n_exit_confirm.header, NULL);
for (i = 0; i < n_exit_confirm.num_opts; i++) {
n_exit_confirm.body = ipr_list_opts(n_exit_confirm.body,
n_exit_confirm.options[i].key,
n_exit_confirm.options[i].list_str);
}
n_exit_confirm.body = ipr_end_list(n_exit_confirm.body);
s_out = screen_driver(&n_exit_confirm, 0, NULL);
free(n_exit_confirm.body);
n_exit_confirm.body = NULL;
rc = s_out->rc;
i_con = s_out->i_con;
i_con = free_i_con(i_con);
free(s_out);
check_current_config(false);
ipr_cleanup_zeroed_devs();
}
clear();
refresh();
endwin();
exit(0);
return 0;
}
iprutils-2.4.18.1/Makefile.in 0000664 0001750 0001751 00000124400 13474264421 012621 0000000 0000000 # Makefile.in generated by automake 1.13.4 from Makefile.am.
# @configure_input@
# Copyright (C) 1994-2013 Free Software Foundation, Inc.
# This Makefile.in is free software; the Free Software Foundation
# gives unlimited permission to copy and/or distribute it,
# with or without modifications, as long as this notice is preserved.
# This program is distributed in the hope that it will be useful,
# but WITHOUT ANY WARRANTY, to the extent permitted by law; without
# even the implied warranty of MERCHANTABILITY or FITNESS FOR A
# PARTICULAR PURPOSE.
@SET_MAKE@
# IBM IPR adapter configuration utility
#
# (C) Copyright 2015
# International Business Machines Corporation and others.
# All Rights Reserved. This program and the accompanying
# materials are made available under the terms of the
# Common Public License v1.0 which accompanies this distribution.
#
VPATH = @srcdir@
am__is_gnu_make = test -n '$(MAKEFILE_LIST)' && test -n '$(MAKELEVEL)'
am__make_running_with_option = \
case $${target_option-} in \
?) ;; \
*) echo "am__make_running_with_option: internal error: invalid" \
"target option '$${target_option-}' specified" >&2; \
exit 1;; \
esac; \
has_opt=no; \
sane_makeflags=$$MAKEFLAGS; \
if $(am__is_gnu_make); then \
sane_makeflags=$$MFLAGS; \
else \
case $$MAKEFLAGS in \
*\\[\ \ ]*) \
bs=\\; \
sane_makeflags=`printf '%s\n' "$$MAKEFLAGS" \
| sed "s/$$bs$$bs[$$bs $$bs ]*//g"`;; \
esac; \
fi; \
skip_next=no; \
strip_trailopt () \
{ \
flg=`printf '%s\n' "$$flg" | sed "s/$$1.*$$//"`; \
}; \
for flg in $$sane_makeflags; do \
test $$skip_next = yes && { skip_next=no; continue; }; \
case $$flg in \
*=*|--*) continue;; \
-*I) strip_trailopt 'I'; skip_next=yes;; \
-*I?*) strip_trailopt 'I';; \
-*O) strip_trailopt 'O'; skip_next=yes;; \
-*O?*) strip_trailopt 'O';; \
-*l) strip_trailopt 'l'; skip_next=yes;; \
-*l?*) strip_trailopt 'l';; \
-[dEDm]) skip_next=yes;; \
-[JT]) skip_next=yes;; \
esac; \
case $$flg in \
*$$target_option*) has_opt=yes; break;; \
esac; \
done; \
test $$has_opt = yes
am__make_dryrun = (target_option=n; $(am__make_running_with_option))
am__make_keepgoing = (target_option=k; $(am__make_running_with_option))
pkgdatadir = $(datadir)/@PACKAGE@
pkgincludedir = $(includedir)/@PACKAGE@
pkglibdir = $(libdir)/@PACKAGE@
pkglibexecdir = $(libexecdir)/@PACKAGE@
am__cd = CDPATH="$${ZSH_VERSION+.}$(PATH_SEPARATOR)" && cd
install_sh_DATA = $(install_sh) -c -m 644
install_sh_PROGRAM = $(install_sh) -c
install_sh_SCRIPT = $(install_sh) -c
INSTALL_HEADER = $(INSTALL_DATA)
transform = $(program_transform_name)
NORMAL_INSTALL = :
PRE_INSTALL = :
POST_INSTALL = :
NORMAL_UNINSTALL = :
PRE_UNINSTALL = :
POST_UNINSTALL = :
build_triplet = @build@
host_triplet = @host@
sbin_PROGRAMS = iprconfig$(EXEEXT) iprdump$(EXEEXT) iprupdate$(EXEEXT) \
iprinit$(EXEEXT) iprdbg$(EXEEXT) $(am__EXEEXT_1) \
$(am__EXEEXT_2)
@STATIC_BUILD_TRUE@am__append_1 = iprconfig-static
@SYSTEMD_TRUE@am__append_2 = systemd udev
@IPRDUMPFMT_TRUE@am__append_3 = iprdumpfmt
@IPRDUMPFMT_TRUE@am__append_4 = iprdumpfmt.8
subdir = .
DIST_COMMON = $(srcdir)/Makefile.in $(srcdir)/Makefile.am \
$(top_srcdir)/configure $(am__configure_deps) \
$(dist_sbin_SCRIPTS) depcomp $(am__sosreport_PYTHON_DIST) \
py-compile $(dist_man_MANS) $(dist_bashcomp_DATA) \
$(dist_noinst_DATA) README config.guess config.sub install-sh \
missing ltmain.sh
ACLOCAL_M4 = $(top_srcdir)/aclocal.m4
am__aclocal_m4_deps = $(top_srcdir)/build-aux/libtool.m4 \
$(top_srcdir)/build-aux/ltoptions.m4 \
$(top_srcdir)/build-aux/ltsugar.m4 \
$(top_srcdir)/build-aux/ltversion.m4 \
$(top_srcdir)/build-aux/lt~obsolete.m4 \
$(top_srcdir)/configure.ac
am__configure_deps = $(am__aclocal_m4_deps) $(CONFIGURE_DEPENDENCIES) \
$(ACLOCAL_M4)
am__CONFIG_DISTCLEAN_FILES = config.status config.cache config.log \
configure.lineno config.status.lineno
mkinstalldirs = $(install_sh) -d
CONFIG_CLEAN_FILES =
CONFIG_CLEAN_VPATH_FILES =
LTLIBRARIES = $(noinst_LTLIBRARIES)
libipr_la_LIBADD =
am_libipr_la_OBJECTS = iprlib.lo
libipr_la_OBJECTS = $(am_libipr_la_OBJECTS)
AM_V_lt = $(am__v_lt_@AM_V@)
am__v_lt_ = $(am__v_lt_@AM_DEFAULT_V@)
am__v_lt_0 = --silent
am__v_lt_1 =
@STATIC_BUILD_TRUE@am__EXEEXT_1 = iprconfig-static$(EXEEXT)
@IPRDUMPFMT_TRUE@am__EXEEXT_2 = iprdumpfmt$(EXEEXT)
am__installdirs = "$(DESTDIR)$(sbindir)" "$(DESTDIR)$(sbindir)" \
"$(DESTDIR)$(sosreportdir)" "$(DESTDIR)$(man8dir)" \
"$(DESTDIR)$(bashcompdir)"
PROGRAMS = $(sbin_PROGRAMS)
am_iprconfig_OBJECTS = iprconfig.$(OBJEXT)
iprconfig_OBJECTS = $(am_iprconfig_OBJECTS)
am__DEPENDENCIES_1 =
iprconfig_DEPENDENCIES = libipr.la $(am__DEPENDENCIES_1)
am__iprconfig_static_SOURCES_DIST = iprconfig.c iprconfig.h
@STATIC_BUILD_TRUE@am_iprconfig_static_OBJECTS = iprconfig.$(OBJEXT)
iprconfig_static_OBJECTS = $(am_iprconfig_static_OBJECTS)
@STATIC_BUILD_TRUE@iprconfig_static_DEPENDENCIES = libipr.la \
@STATIC_BUILD_TRUE@ $(am__DEPENDENCIES_1)
iprconfig_static_LINK = $(LIBTOOL) $(AM_V_lt) --tag=CC \
$(AM_LIBTOOLFLAGS) $(LIBTOOLFLAGS) --mode=link $(CCLD) \
$(AM_CFLAGS) $(CFLAGS) $(iprconfig_static_LDFLAGS) $(LDFLAGS) \
-o $@
am_iprdbg_OBJECTS = iprdbg.$(OBJEXT)
iprdbg_OBJECTS = $(am_iprdbg_OBJECTS)
iprdbg_DEPENDENCIES = libipr.la
am_iprdump_OBJECTS = iprdump.$(OBJEXT)
iprdump_OBJECTS = $(am_iprdump_OBJECTS)
iprdump_DEPENDENCIES = libipr.la
am__iprdumpfmt_SOURCES_DIST = iprdumpfmt.c
@IPRDUMPFMT_TRUE@am_iprdumpfmt_OBJECTS = iprdumpfmt.$(OBJEXT)
iprdumpfmt_OBJECTS = $(am_iprdumpfmt_OBJECTS)
@IPRDUMPFMT_TRUE@iprdumpfmt_DEPENDENCIES = libipr.la
am_iprinit_OBJECTS = iprinit.$(OBJEXT)
iprinit_OBJECTS = $(am_iprinit_OBJECTS)
iprinit_DEPENDENCIES = libipr.la
am_iprupdate_OBJECTS = iprupdate.$(OBJEXT)
iprupdate_OBJECTS = $(am_iprupdate_OBJECTS)
iprupdate_DEPENDENCIES = libipr.la
am__vpath_adj_setup = srcdirstrip=`echo "$(srcdir)" | sed 's|.|.|g'`;
am__vpath_adj = case $$p in \
$(srcdir)/*) f=`echo "$$p" | sed "s|^$$srcdirstrip/||"`;; \
*) f=$$p;; \
esac;
am__strip_dir = f=`echo $$p | sed -e 's|^.*/||'`;
am__install_max = 40
am__nobase_strip_setup = \
srcdirstrip=`echo "$(srcdir)" | sed 's/[].[^$$\\*|]/\\\\&/g'`
am__nobase_strip = \
for p in $$list; do echo "$$p"; done | sed -e "s|$$srcdirstrip/||"
am__nobase_list = $(am__nobase_strip_setup); \
for p in $$list; do echo "$$p $$p"; done | \
sed "s| $$srcdirstrip/| |;"' / .*\//!s/ .*/ ./; s,\( .*\)/[^/]*$$,\1,' | \
$(AWK) 'BEGIN { files["."] = "" } { files[$$2] = files[$$2] " " $$1; \
if (++n[$$2] == $(am__install_max)) \
{ print $$2, files[$$2]; n[$$2] = 0; files[$$2] = "" } } \
END { for (dir in files) print dir, files[dir] }'
am__base_list = \
sed '$$!N;$$!N;$$!N;$$!N;$$!N;$$!N;$$!N;s/\n/ /g' | \
sed '$$!N;$$!N;$$!N;$$!N;s/\n/ /g'
am__uninstall_files_from_dir = { \
test -z "$$files" \
|| { test ! -d "$$dir" && test ! -f "$$dir" && test ! -r "$$dir"; } \
|| { echo " ( cd '$$dir' && rm -f" $$files ")"; \
$(am__cd) "$$dir" && rm -f $$files; }; \
}
SCRIPTS = $(dist_sbin_SCRIPTS)
AM_V_P = $(am__v_P_@AM_V@)
am__v_P_ = $(am__v_P_@AM_DEFAULT_V@)
am__v_P_0 = false
am__v_P_1 = :
AM_V_GEN = $(am__v_GEN_@AM_V@)
am__v_GEN_ = $(am__v_GEN_@AM_DEFAULT_V@)
am__v_GEN_0 = @echo " GEN " $@;
am__v_GEN_1 =
AM_V_at = $(am__v_at_@AM_V@)
am__v_at_ = $(am__v_at_@AM_DEFAULT_V@)
am__v_at_0 = @
am__v_at_1 =
DEFAULT_INCLUDES = -I.@am__isrc@
depcomp = $(SHELL) $(top_srcdir)/depcomp
am__depfiles_maybe = depfiles
am__mv = mv -f
COMPILE = $(CC) $(DEFS) $(DEFAULT_INCLUDES) $(INCLUDES) $(AM_CPPFLAGS) \
$(CPPFLAGS) $(AM_CFLAGS) $(CFLAGS)
LTCOMPILE = $(LIBTOOL) $(AM_V_lt) --tag=CC $(AM_LIBTOOLFLAGS) \
$(LIBTOOLFLAGS) --mode=compile $(CC) $(DEFS) \
$(DEFAULT_INCLUDES) $(INCLUDES) $(AM_CPPFLAGS) $(CPPFLAGS) \
$(AM_CFLAGS) $(CFLAGS)
AM_V_CC = $(am__v_CC_@AM_V@)
am__v_CC_ = $(am__v_CC_@AM_DEFAULT_V@)
am__v_CC_0 = @echo " CC " $@;
am__v_CC_1 =
CCLD = $(CC)
LINK = $(LIBTOOL) $(AM_V_lt) --tag=CC $(AM_LIBTOOLFLAGS) \
$(LIBTOOLFLAGS) --mode=link $(CCLD) $(AM_CFLAGS) $(CFLAGS) \
$(AM_LDFLAGS) $(LDFLAGS) -o $@
AM_V_CCLD = $(am__v_CCLD_@AM_V@)
am__v_CCLD_ = $(am__v_CCLD_@AM_DEFAULT_V@)
am__v_CCLD_0 = @echo " CCLD " $@;
am__v_CCLD_1 =
SOURCES = $(libipr_la_SOURCES) $(iprconfig_SOURCES) \
$(iprconfig_static_SOURCES) $(iprdbg_SOURCES) \
$(iprdump_SOURCES) $(iprdumpfmt_SOURCES) $(iprinit_SOURCES) \
$(iprupdate_SOURCES)
DIST_SOURCES = $(libipr_la_SOURCES) $(iprconfig_SOURCES) \
$(am__iprconfig_static_SOURCES_DIST) $(iprdbg_SOURCES) \
$(iprdump_SOURCES) $(am__iprdumpfmt_SOURCES_DIST) \
$(iprinit_SOURCES) $(iprupdate_SOURCES)
RECURSIVE_TARGETS = all-recursive check-recursive cscopelist-recursive \
ctags-recursive dvi-recursive html-recursive info-recursive \
install-data-recursive install-dvi-recursive \
install-exec-recursive install-html-recursive \
install-info-recursive install-pdf-recursive \
install-ps-recursive install-recursive installcheck-recursive \
installdirs-recursive pdf-recursive ps-recursive \
tags-recursive uninstall-recursive
am__can_run_installinfo = \
case $$AM_UPDATE_INFO_DIR in \
n|no|NO) false;; \
*) (install-info --version) >/dev/null 2>&1;; \
esac
am__sosreport_PYTHON_DIST = iprutils.py
am__py_compile = PYTHON=$(PYTHON) $(SHELL) $(py_compile)
am__pep3147_tweak = \
sed -e 's|\.py$$||' -e 's|[^/]*$$|__pycache__/&.*.py|'
py_compile = $(top_srcdir)/py-compile
man8dir = $(mandir)/man8
NROFF = nroff
MANS = $(dist_man_MANS)
DATA = $(dist_bashcomp_DATA) $(dist_noinst_DATA)
RECURSIVE_CLEAN_TARGETS = mostlyclean-recursive clean-recursive \
distclean-recursive maintainer-clean-recursive
am__recursive_targets = \
$(RECURSIVE_TARGETS) \
$(RECURSIVE_CLEAN_TARGETS) \
$(am__extra_recursive_targets)
AM_RECURSIVE_TARGETS = $(am__recursive_targets:-recursive=) TAGS CTAGS \
cscope distdir dist dist-all distcheck
am__tagged_files = $(HEADERS) $(SOURCES) $(TAGS_FILES) $(LISP)
# Read a list of newline-separated strings from the standard input,
# and print each of them once, without duplicates. Input order is
# *not* preserved.
am__uniquify_input = $(AWK) '\
BEGIN { nonempty = 0; } \
{ items[$$0] = 1; nonempty = 1; } \
END { if (nonempty) { for (i in items) print i; }; } \
'
# Make sure the list of sources is unique. This is necessary because,
# e.g., the same source file might be shared among _SOURCES variables
# for different programs/libraries.
am__define_uniq_tagged_files = \
list='$(am__tagged_files)'; \
unique=`for i in $$list; do \
if test -f "$$i"; then echo $$i; else echo $(srcdir)/$$i; fi; \
done | $(am__uniquify_input)`
ETAGS = etags
CTAGS = ctags
CSCOPE = cscope
DIST_SUBDIRS = . init.d spec systemd udev
DISTFILES = $(DIST_COMMON) $(DIST_SOURCES) $(TEXINFOS) $(EXTRA_DIST)
distdir = $(PACKAGE)-$(VERSION)
top_distdir = $(distdir)
am__remove_distdir = \
if test -d "$(distdir)"; then \
find "$(distdir)" -type d ! -perm -200 -exec chmod u+w {} ';' \
&& rm -rf "$(distdir)" \
|| { sleep 5 && rm -rf "$(distdir)"; }; \
else :; fi
am__post_remove_distdir = $(am__remove_distdir)
am__relativize = \
dir0=`pwd`; \
sed_first='s,^\([^/]*\)/.*$$,\1,'; \
sed_rest='s,^[^/]*/*,,'; \
sed_last='s,^.*/\([^/]*\)$$,\1,'; \
sed_butlast='s,/*[^/]*$$,,'; \
while test -n "$$dir1"; do \
first=`echo "$$dir1" | sed -e "$$sed_first"`; \
if test "$$first" != "."; then \
if test "$$first" = ".."; then \
dir2=`echo "$$dir0" | sed -e "$$sed_last"`/"$$dir2"; \
dir0=`echo "$$dir0" | sed -e "$$sed_butlast"`; \
else \
first2=`echo "$$dir2" | sed -e "$$sed_first"`; \
if test "$$first2" = "$$first"; then \
dir2=`echo "$$dir2" | sed -e "$$sed_rest"`; \
else \
dir2="../$$dir2"; \
fi; \
dir0="$$dir0"/"$$first"; \
fi; \
fi; \
dir1=`echo "$$dir1" | sed -e "$$sed_rest"`; \
done; \
reldir="$$dir2"
DIST_ARCHIVES = $(distdir).tar.gz
GZIP_ENV = --best
DIST_TARGETS = dist-gzip
distuninstallcheck_listfiles = find . -type f -print
am__distuninstallcheck_listfiles = $(distuninstallcheck_listfiles) \
| sed 's|^\./|$(prefix)/|' | grep -v '$(infodir)/dir$$'
distcleancheck_listfiles = find . -type f -print
ACLOCAL = @ACLOCAL@
AMTAR = @AMTAR@
AM_DEFAULT_VERBOSITY = @AM_DEFAULT_VERBOSITY@
AR = @AR@
AUTOCONF = @AUTOCONF@
AUTOHEADER = @AUTOHEADER@
AUTOMAKE = @AUTOMAKE@
AWK = @AWK@
CC = @CC@
CCDEPMODE = @CCDEPMODE@
CFLAGS = @CFLAGS@
CPP = @CPP@
CPPFLAGS = @CPPFLAGS@
CYGPATH_W = @CYGPATH_W@
DEFS = @DEFS@
DEPDIR = @DEPDIR@
DLLTOOL = @DLLTOOL@
DSYMUTIL = @DSYMUTIL@
DUMPBIN = @DUMPBIN@
ECHO_C = @ECHO_C@
ECHO_N = @ECHO_N@
ECHO_T = @ECHO_T@
EGREP = @EGREP@
EXEEXT = @EXEEXT@
FGREP = @FGREP@
GREP = @GREP@
INSTALL = @INSTALL@
INSTALL_DATA = @INSTALL_DATA@
INSTALL_PROGRAM = @INSTALL_PROGRAM@
INSTALL_SCRIPT = @INSTALL_SCRIPT@
INSTALL_STRIP_PROGRAM = @INSTALL_STRIP_PROGRAM@
IPRCONFIG_LIBS = @IPRCONFIG_LIBS@
LD = @LD@
LDFLAGS = @LDFLAGS@
LIBOBJS = @LIBOBJS@
LIBS = @LIBS@
LIBTOOL = @LIBTOOL@
LIPO = @LIPO@
LN_S = @LN_S@
LTLIBOBJS = @LTLIBOBJS@
MAKEINFO = @MAKEINFO@
MANIFEST_TOOL = @MANIFEST_TOOL@
MKDIR_P = @MKDIR_P@
NM = @NM@
NMEDIT = @NMEDIT@
OBJDUMP = @OBJDUMP@
OBJEXT = @OBJEXT@
OTOOL = @OTOOL@
OTOOL64 = @OTOOL64@
PACKAGE = @PACKAGE@
PACKAGE_BUGREPORT = @PACKAGE_BUGREPORT@
PACKAGE_NAME = @PACKAGE_NAME@
PACKAGE_STRING = @PACKAGE_STRING@
PACKAGE_TARNAME = @PACKAGE_TARNAME@
PACKAGE_URL = @PACKAGE_URL@
PACKAGE_VERSION = @PACKAGE_VERSION@
PATH_SEPARATOR = @PATH_SEPARATOR@
PYTHON = @PYTHON@
PYTHON_EXEC_PREFIX = @PYTHON_EXEC_PREFIX@
PYTHON_PLATFORM = @PYTHON_PLATFORM@
PYTHON_PREFIX = @PYTHON_PREFIX@
PYTHON_VERSION = @PYTHON_VERSION@
RANLIB = @RANLIB@
SED = @SED@
SET_MAKE = @SET_MAKE@
SHELL = @SHELL@
STRIP = @STRIP@
VERSION = @VERSION@
abs_builddir = @abs_builddir@
abs_srcdir = @abs_srcdir@
abs_top_builddir = @abs_top_builddir@
abs_top_srcdir = @abs_top_srcdir@
ac_ct_AR = @ac_ct_AR@
ac_ct_CC = @ac_ct_CC@
ac_ct_DUMPBIN = @ac_ct_DUMPBIN@
am__include = @am__include@
am__leading_dot = @am__leading_dot@
am__quote = @am__quote@
am__tar = @am__tar@
am__untar = @am__untar@
bindir = @bindir@
build = @build@
build_alias = @build_alias@
build_cpu = @build_cpu@
build_os = @build_os@
build_vendor = @build_vendor@
builddir = @builddir@
datadir = @datadir@
datarootdir = @datarootdir@
docdir = @docdir@
dvidir = @dvidir@
exec_prefix = @exec_prefix@
host = @host@
host_alias = @host_alias@
host_cpu = @host_cpu@
host_os = @host_os@
host_vendor = @host_vendor@
htmldir = @htmldir@
includedir = @includedir@
infodir = @infodir@
initddir = @initddir@
install_sh = @install_sh@
libdir = @libdir@
libexecdir = @libexecdir@
localedir = @localedir@
localstatedir = @localstatedir@
mandir = @mandir@
mkdir_p = @mkdir_p@
oldincludedir = @oldincludedir@
pdfdir = @pdfdir@
pkgpyexecdir = @pkgpyexecdir@
pkgpythondir = @pkgpythondir@
prefix = @prefix@
program_transform_name = @program_transform_name@
psdir = @psdir@
pyexecdir = @pyexecdir@
pythondir = @pythondir@
sbindir = @sbindir@
sharedstatedir = @sharedstatedir@
srcdir = @srcdir@
sysconfdir = @sysconfdir@
systemdunitdir = @systemdunitdir@
target_alias = @target_alias@
top_build_prefix = @top_build_prefix@
top_builddir = @top_builddir@
top_srcdir = @top_srcdir@
udevrulesdir = @udevrulesdir@
noinst_LTLIBRARIES = libipr.la
libipr_la_SOURCES = iprlib.c iprlib.h
dist_sbin_SCRIPTS = iprsos
iprconfig_SOURCES = iprconfig.c iprconfig.h
iprconfig_LDADD = libipr.la $(IPRCONFIG_LIBS)
iprdump_SOURCES = iprdump.c
iprdump_LDADD = libipr.la
iprupdate_SOURCES = iprupdate.c
iprupdate_LDADD = libipr.la
iprinit_SOURCES = iprinit.c
iprinit_LDADD = libipr.la
iprdbg_SOURCES = iprdbg.c
iprdbg_LDADD = libipr.la
@STATIC_BUILD_TRUE@iprconfig_static_SOURCES = iprconfig.c iprconfig.h
@STATIC_BUILD_TRUE@iprconfig_static_LDADD = libipr.la $(IPRCONFIG_LIBS)
@STATIC_BUILD_TRUE@iprconfig_static_LDFLAGS = -all-static
dist_man_MANS = iprconfig.8 iprdump.8 iprinit.8 iprupdate.8 iprsos.8 \
$(am__append_4)
dist_noinst_DATA = LICENSE
bashcompdir = ${sysconfdir}/bash_completion.d
dist_bashcomp_DATA = iprconfig-bash-completion.sh
SUBDIRS = . init.d spec $(am__append_2)
@SOSREPORT_TRUE@sosreportdir = @pythondir@/sos/plugins
@SOSREPORT_TRUE@sosreport_PYTHON = iprutils.py
@IPRDUMPFMT_TRUE@iprdumpfmt_SOURCES = iprdumpfmt.c
@IPRDUMPFMT_TRUE@iprdumpfmt_LDADD = libipr.la
all: all-recursive
.SUFFIXES:
.SUFFIXES: .c .lo .o .obj
am--refresh: Makefile
@:
$(srcdir)/Makefile.in: $(srcdir)/Makefile.am $(am__configure_deps)
@for dep in $?; do \
case '$(am__configure_deps)' in \
*$$dep*) \
echo ' cd $(srcdir) && $(AUTOMAKE) --foreign'; \
$(am__cd) $(srcdir) && $(AUTOMAKE) --foreign \
&& exit 0; \
exit 1;; \
esac; \
done; \
echo ' cd $(top_srcdir) && $(AUTOMAKE) --foreign Makefile'; \
$(am__cd) $(top_srcdir) && \
$(AUTOMAKE) --foreign Makefile
.PRECIOUS: Makefile
Makefile: $(srcdir)/Makefile.in $(top_builddir)/config.status
@case '$?' in \
*config.status*) \
echo ' $(SHELL) ./config.status'; \
$(SHELL) ./config.status;; \
*) \
echo ' cd $(top_builddir) && $(SHELL) ./config.status $@ $(am__depfiles_maybe)'; \
cd $(top_builddir) && $(SHELL) ./config.status $@ $(am__depfiles_maybe);; \
esac;
$(top_builddir)/config.status: $(top_srcdir)/configure $(CONFIG_STATUS_DEPENDENCIES)
$(SHELL) ./config.status --recheck
$(top_srcdir)/configure: $(am__configure_deps)
$(am__cd) $(srcdir) && $(AUTOCONF)
$(ACLOCAL_M4): $(am__aclocal_m4_deps)
$(am__cd) $(srcdir) && $(ACLOCAL) $(ACLOCAL_AMFLAGS)
$(am__aclocal_m4_deps):
clean-noinstLTLIBRARIES:
-test -z "$(noinst_LTLIBRARIES)" || rm -f $(noinst_LTLIBRARIES)
@list='$(noinst_LTLIBRARIES)'; \
locs=`for p in $$list; do echo $$p; done | \
sed 's|^[^/]*$$|.|; s|/[^/]*$$||; s|$$|/so_locations|' | \
sort -u`; \
test -z "$$locs" || { \
echo rm -f $${locs}; \
rm -f $${locs}; \
}
libipr.la: $(libipr_la_OBJECTS) $(libipr_la_DEPENDENCIES) $(EXTRA_libipr_la_DEPENDENCIES)
$(AM_V_CCLD)$(LINK) $(libipr_la_OBJECTS) $(libipr_la_LIBADD) $(LIBS)
install-sbinPROGRAMS: $(sbin_PROGRAMS)
@$(NORMAL_INSTALL)
@list='$(sbin_PROGRAMS)'; test -n "$(sbindir)" || list=; \
if test -n "$$list"; then \
echo " $(MKDIR_P) '$(DESTDIR)$(sbindir)'"; \
$(MKDIR_P) "$(DESTDIR)$(sbindir)" || exit 1; \
fi; \
for p in $$list; do echo "$$p $$p"; done | \
sed 's/$(EXEEXT)$$//' | \
while read p p1; do if test -f $$p \
|| test -f $$p1 \
; then echo "$$p"; echo "$$p"; else :; fi; \
done | \
sed -e 'p;s,.*/,,;n;h' \
-e 's|.*|.|' \
-e 'p;x;s,.*/,,;s/$(EXEEXT)$$//;$(transform);s/$$/$(EXEEXT)/' | \
sed 'N;N;N;s,\n, ,g' | \
$(AWK) 'BEGIN { files["."] = ""; dirs["."] = 1 } \
{ d=$$3; if (dirs[d] != 1) { print "d", d; dirs[d] = 1 } \
if ($$2 == $$4) files[d] = files[d] " " $$1; \
else { print "f", $$3 "/" $$4, $$1; } } \
END { for (d in files) print "f", d, files[d] }' | \
while read type dir files; do \
if test "$$dir" = .; then dir=; else dir=/$$dir; fi; \
test -z "$$files" || { \
echo " $(INSTALL_PROGRAM_ENV) $(LIBTOOL) $(AM_LIBTOOLFLAGS) $(LIBTOOLFLAGS) --mode=install $(INSTALL_PROGRAM) $$files '$(DESTDIR)$(sbindir)$$dir'"; \
$(INSTALL_PROGRAM_ENV) $(LIBTOOL) $(AM_LIBTOOLFLAGS) $(LIBTOOLFLAGS) --mode=install $(INSTALL_PROGRAM) $$files "$(DESTDIR)$(sbindir)$$dir" || exit $$?; \
} \
; done
uninstall-sbinPROGRAMS:
@$(NORMAL_UNINSTALL)
@list='$(sbin_PROGRAMS)'; test -n "$(sbindir)" || list=; \
files=`for p in $$list; do echo "$$p"; done | \
sed -e 'h;s,^.*/,,;s/$(EXEEXT)$$//;$(transform)' \
-e 's/$$/$(EXEEXT)/' \
`; \
test -n "$$list" || exit 0; \
echo " ( cd '$(DESTDIR)$(sbindir)' && rm -f" $$files ")"; \
cd "$(DESTDIR)$(sbindir)" && rm -f $$files
clean-sbinPROGRAMS:
@list='$(sbin_PROGRAMS)'; test -n "$$list" || exit 0; \
echo " rm -f" $$list; \
rm -f $$list || exit $$?; \
test -n "$(EXEEXT)" || exit 0; \
list=`for p in $$list; do echo "$$p"; done | sed 's/$(EXEEXT)$$//'`; \
echo " rm -f" $$list; \
rm -f $$list
iprconfig$(EXEEXT): $(iprconfig_OBJECTS) $(iprconfig_DEPENDENCIES) $(EXTRA_iprconfig_DEPENDENCIES)
@rm -f iprconfig$(EXEEXT)
$(AM_V_CCLD)$(LINK) $(iprconfig_OBJECTS) $(iprconfig_LDADD) $(LIBS)
iprconfig-static$(EXEEXT): $(iprconfig_static_OBJECTS) $(iprconfig_static_DEPENDENCIES) $(EXTRA_iprconfig_static_DEPENDENCIES)
@rm -f iprconfig-static$(EXEEXT)
$(AM_V_CCLD)$(iprconfig_static_LINK) $(iprconfig_static_OBJECTS) $(iprconfig_static_LDADD) $(LIBS)
iprdbg$(EXEEXT): $(iprdbg_OBJECTS) $(iprdbg_DEPENDENCIES) $(EXTRA_iprdbg_DEPENDENCIES)
@rm -f iprdbg$(EXEEXT)
$(AM_V_CCLD)$(LINK) $(iprdbg_OBJECTS) $(iprdbg_LDADD) $(LIBS)
iprdump$(EXEEXT): $(iprdump_OBJECTS) $(iprdump_DEPENDENCIES) $(EXTRA_iprdump_DEPENDENCIES)
@rm -f iprdump$(EXEEXT)
$(AM_V_CCLD)$(LINK) $(iprdump_OBJECTS) $(iprdump_LDADD) $(LIBS)
iprdumpfmt$(EXEEXT): $(iprdumpfmt_OBJECTS) $(iprdumpfmt_DEPENDENCIES) $(EXTRA_iprdumpfmt_DEPENDENCIES)
@rm -f iprdumpfmt$(EXEEXT)
$(AM_V_CCLD)$(LINK) $(iprdumpfmt_OBJECTS) $(iprdumpfmt_LDADD) $(LIBS)
iprinit$(EXEEXT): $(iprinit_OBJECTS) $(iprinit_DEPENDENCIES) $(EXTRA_iprinit_DEPENDENCIES)
@rm -f iprinit$(EXEEXT)
$(AM_V_CCLD)$(LINK) $(iprinit_OBJECTS) $(iprinit_LDADD) $(LIBS)
iprupdate$(EXEEXT): $(iprupdate_OBJECTS) $(iprupdate_DEPENDENCIES) $(EXTRA_iprupdate_DEPENDENCIES)
@rm -f iprupdate$(EXEEXT)
$(AM_V_CCLD)$(LINK) $(iprupdate_OBJECTS) $(iprupdate_LDADD) $(LIBS)
install-dist_sbinSCRIPTS: $(dist_sbin_SCRIPTS)
@$(NORMAL_INSTALL)
@list='$(dist_sbin_SCRIPTS)'; test -n "$(sbindir)" || list=; \
if test -n "$$list"; then \
echo " $(MKDIR_P) '$(DESTDIR)$(sbindir)'"; \
$(MKDIR_P) "$(DESTDIR)$(sbindir)" || exit 1; \
fi; \
for p in $$list; do \
if test -f "$$p"; then d=; else d="$(srcdir)/"; fi; \
if test -f "$$d$$p"; then echo "$$d$$p"; echo "$$p"; else :; fi; \
done | \
sed -e 'p;s,.*/,,;n' \
-e 'h;s|.*|.|' \
-e 'p;x;s,.*/,,;$(transform)' | sed 'N;N;N;s,\n, ,g' | \
$(AWK) 'BEGIN { files["."] = ""; dirs["."] = 1; } \
{ d=$$3; if (dirs[d] != 1) { print "d", d; dirs[d] = 1 } \
if ($$2 == $$4) { files[d] = files[d] " " $$1; \
if (++n[d] == $(am__install_max)) { \
print "f", d, files[d]; n[d] = 0; files[d] = "" } } \
else { print "f", d "/" $$4, $$1 } } \
END { for (d in files) print "f", d, files[d] }' | \
while read type dir files; do \
if test "$$dir" = .; then dir=; else dir=/$$dir; fi; \
test -z "$$files" || { \
echo " $(INSTALL_SCRIPT) $$files '$(DESTDIR)$(sbindir)$$dir'"; \
$(INSTALL_SCRIPT) $$files "$(DESTDIR)$(sbindir)$$dir" || exit $$?; \
} \
; done
uninstall-dist_sbinSCRIPTS:
@$(NORMAL_UNINSTALL)
@list='$(dist_sbin_SCRIPTS)'; test -n "$(sbindir)" || exit 0; \
files=`for p in $$list; do echo "$$p"; done | \
sed -e 's,.*/,,;$(transform)'`; \
dir='$(DESTDIR)$(sbindir)'; $(am__uninstall_files_from_dir)
mostlyclean-compile:
-rm -f *.$(OBJEXT)
distclean-compile:
-rm -f *.tab.c
@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/iprconfig.Po@am__quote@
@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/iprdbg.Po@am__quote@
@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/iprdump.Po@am__quote@
@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/iprdumpfmt.Po@am__quote@
@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/iprinit.Po@am__quote@
@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/iprlib.Plo@am__quote@
@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/iprupdate.Po@am__quote@
.c.o:
@am__fastdepCC_TRUE@ $(AM_V_CC)$(COMPILE) -MT $@ -MD -MP -MF $(DEPDIR)/$*.Tpo -c -o $@ $<
@am__fastdepCC_TRUE@ $(AM_V_at)$(am__mv) $(DEPDIR)/$*.Tpo $(DEPDIR)/$*.Po
@AMDEP_TRUE@@am__fastdepCC_FALSE@ $(AM_V_CC)source='$<' object='$@' libtool=no @AMDEPBACKSLASH@
@AMDEP_TRUE@@am__fastdepCC_FALSE@ DEPDIR=$(DEPDIR) $(CCDEPMODE) $(depcomp) @AMDEPBACKSLASH@
@am__fastdepCC_FALSE@ $(AM_V_CC@am__nodep@)$(COMPILE) -c $<
.c.obj:
@am__fastdepCC_TRUE@ $(AM_V_CC)$(COMPILE) -MT $@ -MD -MP -MF $(DEPDIR)/$*.Tpo -c -o $@ `$(CYGPATH_W) '$<'`
@am__fastdepCC_TRUE@ $(AM_V_at)$(am__mv) $(DEPDIR)/$*.Tpo $(DEPDIR)/$*.Po
@AMDEP_TRUE@@am__fastdepCC_FALSE@ $(AM_V_CC)source='$<' object='$@' libtool=no @AMDEPBACKSLASH@
@AMDEP_TRUE@@am__fastdepCC_FALSE@ DEPDIR=$(DEPDIR) $(CCDEPMODE) $(depcomp) @AMDEPBACKSLASH@
@am__fastdepCC_FALSE@ $(AM_V_CC@am__nodep@)$(COMPILE) -c `$(CYGPATH_W) '$<'`
.c.lo:
@am__fastdepCC_TRUE@ $(AM_V_CC)$(LTCOMPILE) -MT $@ -MD -MP -MF $(DEPDIR)/$*.Tpo -c -o $@ $<
@am__fastdepCC_TRUE@ $(AM_V_at)$(am__mv) $(DEPDIR)/$*.Tpo $(DEPDIR)/$*.Plo
@AMDEP_TRUE@@am__fastdepCC_FALSE@ $(AM_V_CC)source='$<' object='$@' libtool=yes @AMDEPBACKSLASH@
@AMDEP_TRUE@@am__fastdepCC_FALSE@ DEPDIR=$(DEPDIR) $(CCDEPMODE) $(depcomp) @AMDEPBACKSLASH@
@am__fastdepCC_FALSE@ $(AM_V_CC@am__nodep@)$(LTCOMPILE) -c -o $@ $<
mostlyclean-libtool:
-rm -f *.lo
clean-libtool:
-rm -rf .libs _libs
distclean-libtool:
-rm -f libtool config.lt
install-sosreportPYTHON: $(sosreport_PYTHON)
@$(NORMAL_INSTALL)
@list='$(sosreport_PYTHON)'; dlist=; list2=; test -n "$(sosreportdir)" || list=; \
if test -n "$$list"; then \
echo " $(MKDIR_P) '$(DESTDIR)$(sosreportdir)'"; \
$(MKDIR_P) "$(DESTDIR)$(sosreportdir)" || exit 1; \
fi; \
for p in $$list; do \
if test -f "$$p"; then b=; else b="$(srcdir)/"; fi; \
if test -f $$b$$p; then \
$(am__strip_dir) \
dlist="$$dlist $$f"; \
list2="$$list2 $$b$$p"; \
else :; fi; \
done; \
for file in $$list2; do echo $$file; done | $(am__base_list) | \
while read files; do \
echo " $(INSTALL_DATA) $$files '$(DESTDIR)$(sosreportdir)'"; \
$(INSTALL_DATA) $$files "$(DESTDIR)$(sosreportdir)" || exit $$?; \
done || exit $$?; \
if test -n "$$dlist"; then \
$(am__py_compile) --destdir "$(DESTDIR)" \
--basedir "$(sosreportdir)" $$dlist; \
else :; fi
uninstall-sosreportPYTHON:
@$(NORMAL_UNINSTALL)
@list='$(sosreport_PYTHON)'; test -n "$(sosreportdir)" || list=; \
py_files=`for p in $$list; do echo $$p; done | sed -e 's|^.*/||'`; \
test -n "$$py_files" || exit 0; \
dir='$(DESTDIR)$(sosreportdir)'; \
pyc_files=`echo "$$py_files" | sed 's|$$|c|'`; \
pyo_files=`echo "$$py_files" | sed 's|$$|o|'`; \
py_files_pep3147=`echo "$$py_files" | $(am__pep3147_tweak)`; \
echo "$$py_files_pep3147";\
pyc_files_pep3147=`echo "$$py_files_pep3147" | sed 's|$$|c|'`; \
pyo_files_pep3147=`echo "$$py_files_pep3147" | sed 's|$$|o|'`; \
st=0; \
for files in \
"$$py_files" \
"$$pyc_files" \
"$$pyo_files" \
"$$pyc_files_pep3147" \
"$$pyo_files_pep3147" \
; do \
$(am__uninstall_files_from_dir) || st=$$?; \
done; \
exit $$st
install-man8: $(dist_man_MANS)
@$(NORMAL_INSTALL)
@list1=''; \
list2='$(dist_man_MANS)'; \
test -n "$(man8dir)" \
&& test -n "`echo $$list1$$list2`" \
|| exit 0; \
echo " $(MKDIR_P) '$(DESTDIR)$(man8dir)'"; \
$(MKDIR_P) "$(DESTDIR)$(man8dir)" || exit 1; \
{ for i in $$list1; do echo "$$i"; done; \
if test -n "$$list2"; then \
for i in $$list2; do echo "$$i"; done \
| sed -n '/\.8[a-z]*$$/p'; \
fi; \
} | while read p; do \
if test -f $$p; then d=; else d="$(srcdir)/"; fi; \
echo "$$d$$p"; echo "$$p"; \
done | \
sed -e 'n;s,.*/,,;p;h;s,.*\.,,;s,^[^8][0-9a-z]*$$,8,;x' \
-e 's,\.[0-9a-z]*$$,,;$(transform);G;s,\n,.,' | \
sed 'N;N;s,\n, ,g' | { \
list=; while read file base inst; do \
if test "$$base" = "$$inst"; then list="$$list $$file"; else \
echo " $(INSTALL_DATA) '$$file' '$(DESTDIR)$(man8dir)/$$inst'"; \
$(INSTALL_DATA) "$$file" "$(DESTDIR)$(man8dir)/$$inst" || exit $$?; \
fi; \
done; \
for i in $$list; do echo "$$i"; done | $(am__base_list) | \
while read files; do \
test -z "$$files" || { \
echo " $(INSTALL_DATA) $$files '$(DESTDIR)$(man8dir)'"; \
$(INSTALL_DATA) $$files "$(DESTDIR)$(man8dir)" || exit $$?; }; \
done; }
uninstall-man8:
@$(NORMAL_UNINSTALL)
@list=''; test -n "$(man8dir)" || exit 0; \
files=`{ for i in $$list; do echo "$$i"; done; \
l2='$(dist_man_MANS)'; for i in $$l2; do echo "$$i"; done | \
sed -n '/\.8[a-z]*$$/p'; \
} | sed -e 's,.*/,,;h;s,.*\.,,;s,^[^8][0-9a-z]*$$,8,;x' \
-e 's,\.[0-9a-z]*$$,,;$(transform);G;s,\n,.,'`; \
dir='$(DESTDIR)$(man8dir)'; $(am__uninstall_files_from_dir)
install-dist_bashcompDATA: $(dist_bashcomp_DATA)
@$(NORMAL_INSTALL)
@list='$(dist_bashcomp_DATA)'; test -n "$(bashcompdir)" || list=; \
if test -n "$$list"; then \
echo " $(MKDIR_P) '$(DESTDIR)$(bashcompdir)'"; \
$(MKDIR_P) "$(DESTDIR)$(bashcompdir)" || exit 1; \
fi; \
for p in $$list; do \
if test -f "$$p"; then d=; else d="$(srcdir)/"; fi; \
echo "$$d$$p"; \
done | $(am__base_list) | \
while read files; do \
echo " $(INSTALL_DATA) $$files '$(DESTDIR)$(bashcompdir)'"; \
$(INSTALL_DATA) $$files "$(DESTDIR)$(bashcompdir)" || exit $$?; \
done
uninstall-dist_bashcompDATA:
@$(NORMAL_UNINSTALL)
@list='$(dist_bashcomp_DATA)'; test -n "$(bashcompdir)" || list=; \
files=`for p in $$list; do echo $$p; done | sed -e 's|^.*/||'`; \
dir='$(DESTDIR)$(bashcompdir)'; $(am__uninstall_files_from_dir)
# This directory's subdirectories are mostly independent; you can cd
# into them and run 'make' without going through this Makefile.
# To change the values of 'make' variables: instead of editing Makefiles,
# (1) if the variable is set in 'config.status', edit 'config.status'
# (which will cause the Makefiles to be regenerated when you run 'make');
# (2) otherwise, pass the desired values on the 'make' command line.
$(am__recursive_targets):
@fail=; \
if $(am__make_keepgoing); then \
failcom='fail=yes'; \
else \
failcom='exit 1'; \
fi; \
dot_seen=no; \
target=`echo $@ | sed s/-recursive//`; \
case "$@" in \
distclean-* | maintainer-clean-*) list='$(DIST_SUBDIRS)' ;; \
*) list='$(SUBDIRS)' ;; \
esac; \
for subdir in $$list; do \
echo "Making $$target in $$subdir"; \
if test "$$subdir" = "."; then \
dot_seen=yes; \
local_target="$$target-am"; \
else \
local_target="$$target"; \
fi; \
($(am__cd) $$subdir && $(MAKE) $(AM_MAKEFLAGS) $$local_target) \
|| eval $$failcom; \
done; \
if test "$$dot_seen" = "no"; then \
$(MAKE) $(AM_MAKEFLAGS) "$$target-am" || exit 1; \
fi; test -z "$$fail"
ID: $(am__tagged_files)
$(am__define_uniq_tagged_files); mkid -fID $$unique
tags: tags-recursive
TAGS: tags
tags-am: $(TAGS_DEPENDENCIES) $(am__tagged_files)
set x; \
here=`pwd`; \
if ($(ETAGS) --etags-include --version) >/dev/null 2>&1; then \
include_option=--etags-include; \
empty_fix=.; \
else \
include_option=--include; \
empty_fix=; \
fi; \
list='$(SUBDIRS)'; for subdir in $$list; do \
if test "$$subdir" = .; then :; else \
test ! -f $$subdir/TAGS || \
set "$$@" "$$include_option=$$here/$$subdir/TAGS"; \
fi; \
done; \
$(am__define_uniq_tagged_files); \
shift; \
if test -z "$(ETAGS_ARGS)$$*$$unique"; then :; else \
test -n "$$unique" || unique=$$empty_fix; \
if test $$# -gt 0; then \
$(ETAGS) $(ETAGSFLAGS) $(AM_ETAGSFLAGS) $(ETAGS_ARGS) \
"$$@" $$unique; \
else \
$(ETAGS) $(ETAGSFLAGS) $(AM_ETAGSFLAGS) $(ETAGS_ARGS) \
$$unique; \
fi; \
fi
ctags: ctags-recursive
CTAGS: ctags
ctags-am: $(TAGS_DEPENDENCIES) $(am__tagged_files)
$(am__define_uniq_tagged_files); \
test -z "$(CTAGS_ARGS)$$unique" \
|| $(CTAGS) $(CTAGSFLAGS) $(AM_CTAGSFLAGS) $(CTAGS_ARGS) \
$$unique
GTAGS:
here=`$(am__cd) $(top_builddir) && pwd` \
&& $(am__cd) $(top_srcdir) \
&& gtags -i $(GTAGS_ARGS) "$$here"
cscope: cscope.files
test ! -s cscope.files \
|| $(CSCOPE) -b -q $(AM_CSCOPEFLAGS) $(CSCOPEFLAGS) -i cscope.files $(CSCOPE_ARGS)
clean-cscope:
-rm -f cscope.files
cscope.files: clean-cscope cscopelist
cscopelist: cscopelist-recursive
cscopelist-am: $(am__tagged_files)
list='$(am__tagged_files)'; \
case "$(srcdir)" in \
[\\/]* | ?:[\\/]*) sdir="$(srcdir)" ;; \
*) sdir=$(subdir)/$(srcdir) ;; \
esac; \
for i in $$list; do \
if test -f "$$i"; then \
echo "$(subdir)/$$i"; \
else \
echo "$$sdir/$$i"; \
fi; \
done >> $(top_builddir)/cscope.files
distclean-tags:
-rm -f TAGS ID GTAGS GRTAGS GSYMS GPATH tags
-rm -f cscope.out cscope.in.out cscope.po.out cscope.files
distdir: $(DISTFILES)
$(am__remove_distdir)
test -d "$(distdir)" || mkdir "$(distdir)"
@srcdirstrip=`echo "$(srcdir)" | sed 's/[].[^$$\\*]/\\\\&/g'`; \
topsrcdirstrip=`echo "$(top_srcdir)" | sed 's/[].[^$$\\*]/\\\\&/g'`; \
list='$(DISTFILES)'; \
dist_files=`for file in $$list; do echo $$file; done | \
sed -e "s|^$$srcdirstrip/||;t" \
-e "s|^$$topsrcdirstrip/|$(top_builddir)/|;t"`; \
case $$dist_files in \
*/*) $(MKDIR_P) `echo "$$dist_files" | \
sed '/\//!d;s|^|$(distdir)/|;s,/[^/]*$$,,' | \
sort -u` ;; \
esac; \
for file in $$dist_files; do \
if test -f $$file || test -d $$file; then d=.; else d=$(srcdir); fi; \
if test -d $$d/$$file; then \
dir=`echo "/$$file" | sed -e 's,/[^/]*$$,,'`; \
if test -d "$(distdir)/$$file"; then \
find "$(distdir)/$$file" -type d ! -perm -700 -exec chmod u+rwx {} \;; \
fi; \
if test -d $(srcdir)/$$file && test $$d != $(srcdir); then \
cp -fpR $(srcdir)/$$file "$(distdir)$$dir" || exit 1; \
find "$(distdir)/$$file" -type d ! -perm -700 -exec chmod u+rwx {} \;; \
fi; \
cp -fpR $$d/$$file "$(distdir)$$dir" || exit 1; \
else \
test -f "$(distdir)/$$file" \
|| cp -p $$d/$$file "$(distdir)/$$file" \
|| exit 1; \
fi; \
done
@list='$(DIST_SUBDIRS)'; for subdir in $$list; do \
if test "$$subdir" = .; then :; else \
$(am__make_dryrun) \
|| test -d "$(distdir)/$$subdir" \
|| $(MKDIR_P) "$(distdir)/$$subdir" \
|| exit 1; \
dir1=$$subdir; dir2="$(distdir)/$$subdir"; \
$(am__relativize); \
new_distdir=$$reldir; \
dir1=$$subdir; dir2="$(top_distdir)"; \
$(am__relativize); \
new_top_distdir=$$reldir; \
echo " (cd $$subdir && $(MAKE) $(AM_MAKEFLAGS) top_distdir="$$new_top_distdir" distdir="$$new_distdir" \\"; \
echo " am__remove_distdir=: am__skip_length_check=: am__skip_mode_fix=: distdir)"; \
($(am__cd) $$subdir && \
$(MAKE) $(AM_MAKEFLAGS) \
top_distdir="$$new_top_distdir" \
distdir="$$new_distdir" \
am__remove_distdir=: \
am__skip_length_check=: \
am__skip_mode_fix=: \
distdir) \
|| exit 1; \
fi; \
done
-test -n "$(am__skip_mode_fix)" \
|| find "$(distdir)" -type d ! -perm -755 \
-exec chmod u+rwx,go+rx {} \; -o \
! -type d ! -perm -444 -links 1 -exec chmod a+r {} \; -o \
! -type d ! -perm -400 -exec chmod a+r {} \; -o \
! -type d ! -perm -444 -exec $(install_sh) -c -m a+r {} {} \; \
|| chmod -R a+r "$(distdir)"
dist-gzip: distdir
tardir=$(distdir) && $(am__tar) | GZIP=$(GZIP_ENV) gzip -c >$(distdir).tar.gz
$(am__post_remove_distdir)
dist-bzip2: distdir
tardir=$(distdir) && $(am__tar) | BZIP2=$${BZIP2--9} bzip2 -c >$(distdir).tar.bz2
$(am__post_remove_distdir)
dist-lzip: distdir
tardir=$(distdir) && $(am__tar) | lzip -c $${LZIP_OPT--9} >$(distdir).tar.lz
$(am__post_remove_distdir)
dist-xz: distdir
tardir=$(distdir) && $(am__tar) | XZ_OPT=$${XZ_OPT--e} xz -c >$(distdir).tar.xz
$(am__post_remove_distdir)
dist-tarZ: distdir
tardir=$(distdir) && $(am__tar) | compress -c >$(distdir).tar.Z
$(am__post_remove_distdir)
dist-shar: distdir
shar $(distdir) | GZIP=$(GZIP_ENV) gzip -c >$(distdir).shar.gz
$(am__post_remove_distdir)
dist-zip: distdir
-rm -f $(distdir).zip
zip -rq $(distdir).zip $(distdir)
$(am__post_remove_distdir)
dist dist-all:
$(MAKE) $(AM_MAKEFLAGS) $(DIST_TARGETS) am__post_remove_distdir='@:'
$(am__post_remove_distdir)
# This target untars the dist file and tries a VPATH configuration. Then
# it guarantees that the distribution is self-contained by making another
# tarfile.
distcheck: dist
case '$(DIST_ARCHIVES)' in \
*.tar.gz*) \
GZIP=$(GZIP_ENV) gzip -dc $(distdir).tar.gz | $(am__untar) ;;\
*.tar.bz2*) \
bzip2 -dc $(distdir).tar.bz2 | $(am__untar) ;;\
*.tar.lz*) \
lzip -dc $(distdir).tar.lz | $(am__untar) ;;\
*.tar.xz*) \
xz -dc $(distdir).tar.xz | $(am__untar) ;;\
*.tar.Z*) \
uncompress -c $(distdir).tar.Z | $(am__untar) ;;\
*.shar.gz*) \
GZIP=$(GZIP_ENV) gzip -dc $(distdir).shar.gz | unshar ;;\
*.zip*) \
unzip $(distdir).zip ;;\
esac
chmod -R a-w $(distdir)
chmod u+w $(distdir)
mkdir $(distdir)/_build $(distdir)/_inst
chmod a-w $(distdir)
test -d $(distdir)/_build || exit 0; \
dc_install_base=`$(am__cd) $(distdir)/_inst && pwd | sed -e 's,^[^:\\/]:[\\/],/,'` \
&& dc_destdir="$${TMPDIR-/tmp}/am-dc-$$$$/" \
&& am__cwd=`pwd` \
&& $(am__cd) $(distdir)/_build \
&& ../configure --srcdir=.. --prefix="$$dc_install_base" \
$(AM_DISTCHECK_CONFIGURE_FLAGS) \
$(DISTCHECK_CONFIGURE_FLAGS) \
&& $(MAKE) $(AM_MAKEFLAGS) \
&& $(MAKE) $(AM_MAKEFLAGS) dvi \
&& $(MAKE) $(AM_MAKEFLAGS) check \
&& $(MAKE) $(AM_MAKEFLAGS) install \
&& $(MAKE) $(AM_MAKEFLAGS) installcheck \
&& $(MAKE) $(AM_MAKEFLAGS) uninstall \
&& $(MAKE) $(AM_MAKEFLAGS) distuninstallcheck_dir="$$dc_install_base" \
distuninstallcheck \
&& chmod -R a-w "$$dc_install_base" \
&& ({ \
(cd ../.. && umask 077 && mkdir "$$dc_destdir") \
&& $(MAKE) $(AM_MAKEFLAGS) DESTDIR="$$dc_destdir" install \
&& $(MAKE) $(AM_MAKEFLAGS) DESTDIR="$$dc_destdir" uninstall \
&& $(MAKE) $(AM_MAKEFLAGS) DESTDIR="$$dc_destdir" \
distuninstallcheck_dir="$$dc_destdir" distuninstallcheck; \
} || { rm -rf "$$dc_destdir"; exit 1; }) \
&& rm -rf "$$dc_destdir" \
&& $(MAKE) $(AM_MAKEFLAGS) dist \
&& rm -rf $(DIST_ARCHIVES) \
&& $(MAKE) $(AM_MAKEFLAGS) distcleancheck \
&& cd "$$am__cwd" \
|| exit 1
$(am__post_remove_distdir)
@(echo "$(distdir) archives ready for distribution: "; \
list='$(DIST_ARCHIVES)'; for i in $$list; do echo $$i; done) | \
sed -e 1h -e 1s/./=/g -e 1p -e 1x -e '$$p' -e '$$x'
distuninstallcheck:
@test -n '$(distuninstallcheck_dir)' || { \
echo 'ERROR: trying to run $@ with an empty' \
'$$(distuninstallcheck_dir)' >&2; \
exit 1; \
}; \
$(am__cd) '$(distuninstallcheck_dir)' || { \
echo 'ERROR: cannot chdir into $(distuninstallcheck_dir)' >&2; \
exit 1; \
}; \
test `$(am__distuninstallcheck_listfiles) | wc -l` -eq 0 \
|| { echo "ERROR: files left after uninstall:" ; \
if test -n "$(DESTDIR)"; then \
echo " (check DESTDIR support)"; \
fi ; \
$(distuninstallcheck_listfiles) ; \
exit 1; } >&2
distcleancheck: distclean
@if test '$(srcdir)' = . ; then \
echo "ERROR: distcleancheck can only run from a VPATH build" ; \
exit 1 ; \
fi
@test `$(distcleancheck_listfiles) | wc -l` -eq 0 \
|| { echo "ERROR: files left in build directory after distclean:" ; \
$(distcleancheck_listfiles) ; \
exit 1; } >&2
check-am: all-am
check: check-recursive
all-am: Makefile $(LTLIBRARIES) $(PROGRAMS) $(SCRIPTS) $(MANS) $(DATA)
installdirs: installdirs-recursive
installdirs-am:
for dir in "$(DESTDIR)$(sbindir)" "$(DESTDIR)$(sbindir)" "$(DESTDIR)$(sosreportdir)" "$(DESTDIR)$(man8dir)" "$(DESTDIR)$(bashcompdir)"; do \
test -z "$$dir" || $(MKDIR_P) "$$dir"; \
done
install: install-recursive
install-exec: install-exec-recursive
install-data: install-data-recursive
uninstall: uninstall-recursive
install-am: all-am
@$(MAKE) $(AM_MAKEFLAGS) install-exec-am install-data-am
installcheck: installcheck-recursive
install-strip:
if test -z '$(STRIP)'; then \
$(MAKE) $(AM_MAKEFLAGS) INSTALL_PROGRAM="$(INSTALL_STRIP_PROGRAM)" \
install_sh_PROGRAM="$(INSTALL_STRIP_PROGRAM)" INSTALL_STRIP_FLAG=-s \
install; \
else \
$(MAKE) $(AM_MAKEFLAGS) INSTALL_PROGRAM="$(INSTALL_STRIP_PROGRAM)" \
install_sh_PROGRAM="$(INSTALL_STRIP_PROGRAM)" INSTALL_STRIP_FLAG=-s \
"INSTALL_PROGRAM_ENV=STRIPPROG='$(STRIP)'" install; \
fi
mostlyclean-generic:
clean-generic:
distclean-generic:
-test -z "$(CONFIG_CLEAN_FILES)" || rm -f $(CONFIG_CLEAN_FILES)
-test . = "$(srcdir)" || test -z "$(CONFIG_CLEAN_VPATH_FILES)" || rm -f $(CONFIG_CLEAN_VPATH_FILES)
maintainer-clean-generic:
@echo "This command is intended for maintainers to use"
@echo "it deletes files that may require special tools to rebuild."
clean: clean-recursive
clean-am: clean-generic clean-libtool clean-noinstLTLIBRARIES \
clean-sbinPROGRAMS mostlyclean-am
distclean: distclean-recursive
-rm -f $(am__CONFIG_DISTCLEAN_FILES)
-rm -rf ./$(DEPDIR)
-rm -f Makefile
distclean-am: clean-am distclean-compile distclean-generic \
distclean-libtool distclean-tags
dvi: dvi-recursive
dvi-am:
html: html-recursive
html-am:
info: info-recursive
info-am:
install-data-am: install-dist_bashcompDATA install-man \
install-sosreportPYTHON
install-dvi: install-dvi-recursive
install-dvi-am:
install-exec-am: install-dist_sbinSCRIPTS install-sbinPROGRAMS
install-html: install-html-recursive
install-html-am:
install-info: install-info-recursive
install-info-am:
install-man: install-man8
install-pdf: install-pdf-recursive
install-pdf-am:
install-ps: install-ps-recursive
install-ps-am:
installcheck-am:
maintainer-clean: maintainer-clean-recursive
-rm -f $(am__CONFIG_DISTCLEAN_FILES)
-rm -rf $(top_srcdir)/autom4te.cache
-rm -rf ./$(DEPDIR)
-rm -f Makefile
maintainer-clean-am: distclean-am maintainer-clean-generic
mostlyclean: mostlyclean-recursive
mostlyclean-am: mostlyclean-compile mostlyclean-generic \
mostlyclean-libtool
pdf: pdf-recursive
pdf-am:
ps: ps-recursive
ps-am:
uninstall-am: uninstall-dist_bashcompDATA uninstall-dist_sbinSCRIPTS \
uninstall-man uninstall-sbinPROGRAMS uninstall-sosreportPYTHON
uninstall-man: uninstall-man8
.MAKE: $(am__recursive_targets) install-am install-strip
.PHONY: $(am__recursive_targets) CTAGS GTAGS TAGS all all-am \
am--refresh check check-am clean clean-cscope clean-generic \
clean-libtool clean-noinstLTLIBRARIES clean-sbinPROGRAMS \
cscope cscopelist-am ctags ctags-am dist dist-all dist-bzip2 \
dist-gzip dist-lzip dist-shar dist-tarZ dist-xz dist-zip \
distcheck distclean distclean-compile distclean-generic \
distclean-libtool distclean-tags distcleancheck distdir \
distuninstallcheck dvi dvi-am html html-am info info-am \
install install-am install-data install-data-am \
install-dist_bashcompDATA install-dist_sbinSCRIPTS install-dvi \
install-dvi-am install-exec install-exec-am install-html \
install-html-am install-info install-info-am install-man \
install-man8 install-pdf install-pdf-am install-ps \
install-ps-am install-sbinPROGRAMS install-sosreportPYTHON \
install-strip installcheck installcheck-am installdirs \
installdirs-am maintainer-clean maintainer-clean-generic \
mostlyclean mostlyclean-compile mostlyclean-generic \
mostlyclean-libtool pdf pdf-am ps ps-am tags tags-am uninstall \
uninstall-am uninstall-dist_bashcompDATA \
uninstall-dist_sbinSCRIPTS uninstall-man uninstall-man8 \
uninstall-sbinPROGRAMS uninstall-sosreportPYTHON
# Tell versions [3.59,3.63) of GNU make to not export all variables.
# Otherwise a system limit (for SysV at least) may be exceeded.
.NOEXPORT:
iprutils-2.4.18.1/iprinit.c 0000664 0001750 0001751 00000005227 13305527433 012401 0000000 0000000 /**
* IBM IPR adapter initialization utility
*
* (C) Copyright 2004, 2008
* International Business Machines Corporation and others.
* All Rights Reserved. This program and the accompanying
* materials are made available under the terms of the
* Common Public License v1.0 which accompanies this distribution.
*
*/
/*
* $Header: /cvsroot/iprdd/iprutils/iprinit.c,v 1.22 2008/11/20 01:20:20 wboyer Exp $
*/
#include
#include
#include
#include
#include
#ifndef iprlib_h
#include "iprlib.h"
#endif
#include
char *tool_name = "iprinit";
static int init_all()
{
struct ipr_ioa *ioa;
int rc = tool_init(1);
if (rc && rc != -ENXIO) {
if (!daemonize)
syslog(LOG_ERR, "Error initializing adapters. Perhaps run with sudo?\n");
}
check_current_config(false);
for_each_ioa(ioa) {
if (!strlen(ioa->ioa.gen_name))
rc |= -EAGAIN;
ipr_init_ioa(ioa);
}
return rc;
}
static void kevent_handler(char *buf)
{
polling_mode = 0;
if (!strncmp(buf, "change@/class/scsi_host", 23) ||
(!strncmp(buf, "change@/devices/pci", 19) && strstr(buf, "scsi_host")))
scsi_host_kevent(buf, ipr_init_ioa);
else if (!strncmp(buf, "add@/class/scsi_generic", 23) ||
(!strncmp(buf, "add@/devices/pci", 16) && strstr(buf, "scsi_generic")))
scsi_dev_kevent(buf, find_gen_dev, ipr_init_dev);
else if (!strncmp(buf, "add@/block/sd", 13))
scsi_dev_kevent(buf, find_blk_dev, ipr_init_dev);
}
static void poll_ioas()
{
polling_mode = 1;
init_all();
}
int main(int argc, char *argv[])
{
int i, rc, delay_secs, wait;
ipr_sg_required = 1;
openlog("iprinit", LOG_PERROR | LOG_PID | LOG_CONS, LOG_USER);
for (i = 1; i < argc; i++) {
if (parse_option(argv[i]))
continue;
else {
printf("Usage: iprinit [options]\n");
printf(" Options: --version [--daemon] Print iprinit version\n");
return -EINVAL;
}
}
rc = check_sg_module();
if (daemonize) {
ipr_daemonize();
if (!rc)
rc = init_all();
if (rc) {
delay_secs = 2;
sleep(delay_secs);
for (wait = 0; rc && wait < 300; wait += delay_secs) {
rc = check_sg_module();
sleep(delay_secs);
if (!rc)
rc = init_all();
}
if (rc)
syslog(LOG_ERR, "Timeout reached. Ensure the sg module is loaded, then "
"run iprinit manually to ensure all "
"ipr RAID adapters are running optimally\n");
}
return handle_events(poll_ioas, 60, kevent_handler);
} else if (!rc)
rc = init_all();
if (rc)
syslog(LOG_ERR, "iprinit failed. Ensure the sg module is loaded, then "
"run iprinit again to ensure all "
"ipr RAID adapters are running optimally\n");
return rc;
}
iprutils-2.4.18.1/iprlib.c 0000664 0001750 0001751 00000732703 13470570102 012204 0000000 0000000 /**
* IBM IPR adapter utility library
*
* (C) Copyright 2000, 2004
* International Business Machines Corporation and others.
* All Rights Reserved. This program and the accompanying
* materials are made available under the terms of the
* Common Public License v1.0 which accompanies this distribution.
*
*/
/*
* $Header: /cvsroot/iprdd/iprutils/iprlib.c,v 1.127 2009/10/30 18:46:39 klebers Exp $
*/
#ifndef iprlib_h
#include "iprlib.h"
#endif
static void default_exit_func()
{
}
struct ipr_array_query_data *ipr_qac_data = NULL;
int num_ioas = 0;
struct ipr_ioa *ipr_ioa_head = NULL;
struct ipr_ioa *ipr_ioa_tail = NULL;
void (*exit_func) (void) = default_exit_func;
int daemonize = 0;
int ipr_debug = 0;
int ipr_force = 0;
int ipr_sg_required = 0;
int polling_mode = 0;
int ipr_fast = 0;
int format_done = 0;
static int ipr_mode5_write_buffer = 0;
static int first_time_check_zeroed_dev = 0;
int tool_init_retry = 1;
struct sysfs_dev *head_zdev = NULL;
struct sysfs_dev *tail_zdev = NULL;
static int ipr_force_polling = 0;
static int ipr_force_uevents = 0;
static char *hotplug_dir = NULL;
static struct scsi_dev_data *scsi_dev_table = NULL;
/* Current state of this machine. */
enum system_p_mode power_cur_mode = POWER_BAREMETAL;
/* This table includes both unsupported 522 disks and disks that support
being formatted to 522, but require a minimum microcode level. The disks
that require a minimum level of microcode will be marked by the
supported_with_min_ucode_level flag set to true. */
struct unsupported_af_dasd unsupported_af[] =
{
{
/* 00 Mako & Hammerhead */
vendor_id: {"IBM "},
compare_vendor_id_byte: {1, 1, 1, 1, 1, 1, 1, 1},
product_id: {"DRVS "},
compare_product_id_byte: {1, 1, 1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
lid: {" "},
lid_mask: {0, 0, 0, 0},
supported_with_min_ucode_level: false,
min_ucode_level: {" "},
min_ucode_mask: {0, 0, 0, 0}
},
{
/* 01 Swordfish */
vendor_id: {"IBM "},
compare_vendor_id_byte: {1, 1, 1, 1, 1, 1, 1, 1},
product_id: {"DRHS "},
compare_product_id_byte: {1, 1, 1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
lid: {" "},
lid_mask: {0, 0, 0, 0},
supported_with_min_ucode_level: false,
min_ucode_level: {" "},
min_ucode_mask: {0, 0, 0, 0}
},
{
/* 02 Neptune */
vendor_id: {"IBM "},
compare_vendor_id_byte: {1, 1, 1, 1, 1, 1, 1, 1},
product_id: {"DNES "},
compare_product_id_byte: {1, 1, 1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
lid: {" "},
lid_mask: {0, 0, 0, 0},
supported_with_min_ucode_level: false,
min_ucode_level: {" "},
min_ucode_mask: {0, 0, 0, 0}
},
{
/* 03 Thornback, Stingray, & Manta */
vendor_id: {"IBM "},
compare_vendor_id_byte: {1, 1, 1, 1, 1, 1, 1, 1},
product_id: {"DMVS "},
compare_product_id_byte: {1, 1, 1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
lid: {" "},
lid_mask: {0, 0, 0, 0},
supported_with_min_ucode_level: false,
min_ucode_level: {" "},
min_ucode_mask: {0, 0, 0, 0}
},
{
/* 04 Discovery I */
vendor_id: {"IBM "},
compare_vendor_id_byte: {1, 1, 1, 1, 1, 1, 1, 1},
product_id: {"DDYS "},
compare_product_id_byte: {1, 1, 1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
lid: {" "},
lid_mask: {0, 0, 0, 0},
supported_with_min_ucode_level: false,
min_ucode_level: {" "},
min_ucode_mask: {0, 0, 0, 0}
},
{
/* 05 US73 (Discovery II) - fixme - are we supporting this drive? */
vendor_id: {"IBM "},
compare_vendor_id_byte: {1, 1, 1, 1, 1, 1, 1, 1},
product_id: {"IC35L D2 "},
compare_product_id_byte: {1, 1, 1, 1, 1, 0, 0, 0, 0, 0, 1, 1, 0, 0, 0, 0},
lid: {" "},
lid_mask: {0, 0, 0, 0},
supported_with_min_ucode_level: true,
min_ucode_level: {"S5DE"},
min_ucode_mask: {1, 1, 1, 1}
},
{
/* 06 Apollo (Ext. Scallop 9GB) - LID: SC09 */
vendor_id: {"IBM "},
compare_vendor_id_byte: {1, 1, 1, 1, 1, 1, 1, 1},
product_id: {"ST318305L "},
compare_product_id_byte: {1, 1, 1, 1, 1, 1, 1, 1, 1, 0, 0, 0, 0, 0, 0, 0},
lid: {"SC09"},
lid_mask: {1, 1, 1, 1},
supported_with_min_ucode_level: false,
min_ucode_level: {"C749"},
min_ucode_mask: {1, 1, 1, 1}
},
{
/* 07 Apollo (Ext. Scallop 18GB) - LID: SC18 */
vendor_id: {"IBM "},
compare_vendor_id_byte: {1, 1, 1, 1, 1, 1, 1, 1},
product_id: {"ST318305L "},
compare_product_id_byte: {1, 1, 1, 1, 1, 1, 1, 1, 1, 0, 0, 0, 0, 0, 0, 0},
lid: {"SC18"},
lid_mask: {1, 1, 1, 1},
supported_with_min_ucode_level: false,
min_ucode_level: {"C709"},
min_ucode_mask: {1, 1, 1, 1}
},
{
/* 08 Apollo (Ext. Scallop 36GB) - LID: SC36 */
vendor_id: {"IBM "},
compare_vendor_id_byte: {1, 1, 1, 1, 1, 1, 1, 1},
product_id: {"ST336605L "},
compare_product_id_byte: {1, 1, 1, 1, 1, 1, 1, 1, 1, 0, 0, 0, 0, 0, 0, 0},
lid: {"SC36"},
lid_mask: {1, 1, 1, 1},
supported_with_min_ucode_level: false,
min_ucode_level: {"C709"},
min_ucode_mask: {1, 1, 1, 1}
},
{
/* 09 Apollo (Ext. Scallop 73GB) - LID: SC73 */
vendor_id: {"IBM "},
compare_vendor_id_byte: {1, 1, 1, 1, 1, 1, 1, 1},
product_id: {"ST373405L "},
compare_product_id_byte: {1, 1, 1, 1, 1, 1, 1, 1, 1, 0, 0, 0, 0, 0, 0, 0},
lid: {"SC73"},
lid_mask: {1, 1, 1, 1},
supported_with_min_ucode_level: false,
min_ucode_level: {"C709"},
min_ucode_mask: {1, 1, 1, 1}
},
{
/* 10 Apollo (non-external 9GB) - LID: AT1x */
vendor_id: {"IBM "},
compare_vendor_id_byte: {1, 1, 1, 1, 1, 1, 1, 1},
product_id: {"ST318305L "},
compare_product_id_byte: {1, 1, 1, 1, 1, 1, 1, 1, 1, 0, 0, 0, 0, 0, 0, 0},
lid: {"AT1 "},
lid_mask: {1, 1, 1, 0},
supported_with_min_ucode_level: true,
min_ucode_level: {"C54E"},
min_ucode_mask: {1, 1, 1, 1}
},
{
/* 11 Apollo (non-external 18GB) - LID: AT0x */
vendor_id: {"IBM "},
compare_vendor_id_byte: {1, 1, 1, 1, 1, 1, 1, 1},
product_id: {"ST318305L "},
compare_product_id_byte: {1, 1, 1, 1, 1, 1, 1, 1, 1, 0, 0, 0, 0, 0, 0, 0},
lid: {"AT0 "},
lid_mask: {1, 1, 1, 0},
supported_with_min_ucode_level: true,
min_ucode_level: {"C50E"},
min_ucode_mask: {1, 1, 1, 1}
},
{
/* 12 Apollo (non-external 36GB) - LID: AT0x */
vendor_id: {"IBM "},
compare_vendor_id_byte: {1, 1, 1, 1, 1, 1, 1, 1},
product_id: {"ST336605L "},
compare_product_id_byte: {1, 1, 1, 1, 1, 1, 1, 1, 1, 0, 0, 0, 0, 0, 0, 0},
lid: {"AT0 "},
lid_mask: {1, 1, 1, 0},
supported_with_min_ucode_level: true,
min_ucode_level: {"C50E"},
min_ucode_mask: {1, 1, 1, 1}
},
{
/* 13 Apollo (non-external 73GB) - LID: AT0x */
vendor_id: {"IBM "},
compare_vendor_id_byte: {1, 1, 1, 1, 1, 1, 1, 1},
product_id: {"ST373405L "},
compare_product_id_byte: {1, 1, 1, 1, 1, 1, 1, 1, 1, 0, 0, 0, 0, 0, 0, 0},
lid: {"AT0 "},
lid_mask: {1, 1, 1, 0},
supported_with_min_ucode_level: true,
min_ucode_level: {"C50E"},
min_ucode_mask: {1, 1, 1, 1}
},
{
/* 14 Odyssey (18, 36, 73GB) */
vendor_id: {"IBM "},
compare_vendor_id_byte: {1, 1, 1, 1, 1, 1, 1, 1},
product_id: {"ST3 53L "},
compare_product_id_byte: {1, 1, 1, 0, 0, 0, 1, 1, 1, 0, 0, 0, 0, 0, 0, 0},
lid: {" "},
lid_mask: {0, 0, 0, 0},
supported_with_min_ucode_level: true,
min_ucode_level: {"C51A"},
min_ucode_mask: {1, 1, 1, 1}
},
{
/* 15 Odyssey (146+GB) - fixme - not in drive list; remove from table? */
vendor_id: {"IBM "},
compare_vendor_id_byte: {1, 1, 1, 1, 1, 1, 1, 1},
product_id: {"ST3 53L "},
compare_product_id_byte: {1, 1, 1, 0, 0, 0, 0, 1, 1, 1, 0, 0, 0, 0, 0, 0},
lid: {" "},
lid_mask: {0, 0, 0, 0},
supported_with_min_ucode_level: true,
min_ucode_level: {"C51A"},
min_ucode_mask: {1, 1, 1, 1}
},
{
/* 16 Gemini (18, 36, 73GB) */
vendor_id: {"IBM "},
compare_vendor_id_byte: {1, 1, 1, 1, 1, 1, 1, 1},
product_id: {"ST3 07L "},
compare_product_id_byte: {1, 1, 1, 0, 0, 0, 1, 1, 1, 0, 0, 0, 0, 0, 0, 0},
lid: {" "},
lid_mask: {0, 0, 0, 0},
supported_with_min_ucode_level: true,
min_ucode_level: {"C50F"},
min_ucode_mask: {1, 1, 1, 1}
},
{
/* 17 Gemini (146+GB) */
vendor_id: {"IBM "},
compare_vendor_id_byte: {1, 1, 1, 1, 1, 1, 1, 1},
product_id: {"ST3 07L "},
compare_product_id_byte: {1, 1, 1, 0, 0, 0, 0, 1, 1, 1, 0, 0, 0, 0, 0, 0},
lid: {" "},
lid_mask: {0, 0, 0, 0},
supported_with_min_ucode_level: true,
min_ucode_level: {"C50F"},
min_ucode_mask: {1, 1, 1, 1}
},
{
/* 18 Daytona */
vendor_id: {"IBM "},
compare_vendor_id_byte: {1, 1, 1, 1, 1, 1, 1, 1},
product_id: {"IC35L DY "},
compare_product_id_byte: {1, 1, 1, 1, 1, 0, 0, 0, 0, 0, 1, 1, 0, 0, 0, 0},
lid: {" "},
lid_mask: {0, 0, 0, 0},
supported_with_min_ucode_level: true,
min_ucode_level: {"S28C"},
min_ucode_mask: {1, 1, 1, 1}
}
};
struct unsupported_dasd unsupported_dasd [] = {
{ /* Piranha 18 GB, 15k RPM 160 MB/s - UCPR018 - 4322 */
vendor_id: {"IBMAS400"},
compare_vendor_id_byte: {1, 1, 1, 1, 1, 1, 1, 1},
product_id: {"UCPR018 "},
compare_product_id_byte: {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1},
},
{ /* Piranha 18 GB, 15k RPM 320 MB/s - XCPR018 - 4325 */
vendor_id: {"IBMAS400"},
compare_vendor_id_byte: {1, 1, 1, 1, 1, 1, 1, 1},
product_id: {"XCPR018 "},
compare_product_id_byte: {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1},
},
{ /* Piranha 35 GB, 15k RPM 160 MB/s - UCPR036 - 4323 */
vendor_id: {"IBMAS400"},
compare_vendor_id_byte: {1, 1, 1, 1, 1, 1, 1, 1},
product_id: {"UCPR036 "},
compare_product_id_byte: {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1},
},
{ /* Piranha 35 GB, 15k RPM 320 MB/s - XCPR036 - 4326 */
vendor_id: {"IBMAS400"},
compare_vendor_id_byte: {1, 1, 1, 1, 1, 1, 1, 1},
product_id: {"XCPR036 "},
compare_product_id_byte: {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1},
},
{ /* Monza 70 GB, 15k RPM 320 MB/s - XCPR073 - 4327 */
vendor_id: {"IBMAS400"},
compare_vendor_id_byte: {1, 1, 1, 1, 1, 1, 1, 1},
product_id: {"XCPR073 "},
compare_product_id_byte: {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1},
},
{ /* Monza 141 GB, 15k RPM 320 MB/s - XCPR146 - 4328 */
vendor_id: {"IBMAS400"},
compare_vendor_id_byte: {1, 1, 1, 1, 1, 1, 1, 1},
product_id: {"XCPR146 "},
compare_product_id_byte: {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1},
},
{ /* Monaco 282 GB, 15k RPM 320 MB/s - XCPR282 - 4329 */
vendor_id: {"IBMAS400"},
compare_vendor_id_byte: {1, 1, 1, 1, 1, 1, 1, 1},
product_id: {"XCPR282 "},
compare_product_id_byte: {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1},
}
};
struct ses_table_entry {
char product_id[17];
char compare_product_id_byte[17];
u32 max_bus_speed_limit;
int block_15k_devices;
};
static const struct ses_table_entry ses_table[] = {
{"2104-DL1 ", "XXXXXXXXXXXXXXXX", 80, 0},
{"2104-TL1 ", "XXXXXXXXXXXXXXXX", 80, 0},
{"HSBP07M P U2SCSI", "XXXXXXXXXXXXXXXX", 80, 1},
{"HSBP05M P U2SCSI", "XXXXXXXXXXXXXXXX", 80, 1},
{"HSBP05M S U2SCSI", "XXXXXXXXXXXXXXXX", 80, 1},
{"HSBP06E ASU2SCSI", "XXXXXXXXXXXXXXXX", 80, 1},
{"2104-DU3 ", "XXXXXXXXXXXXXXXX", 160, 0},
{"2104-TU3 ", "XXXXXXXXXXXXXXXX", 160, 0},
{"HSBP04C RSU2SCSI", "XXXXXXX*XXXXXXXX", 160, 0},
{"HSBP06E RSU2SCSI", "XXXXXXX*XXXXXXXX", 160, 0},
{"St V1S2 ", "XXXXXXXXXXXXXXXX", 160, 0},
{"HSBPD4M PU3SCSI", "XXXXXXX*XXXXXXXX", 160, 0},
{"VSBPD1H U3SCSI", "XXXXXXX*XXXXXXXX", 160, 0}
};
/*---------- static subroutine/function declearation starts here --------*/
static int sg_ioctl_by_name(char *, u8 *, void *, u32, u32,
struct sense_data_t *, u32);
/*---------- subroutine/function code starts here ---------*/
/**
* ses_table_entry -
* @ioa: ipr ioa struct
* @bus:
*
* Returns:
* ses_table_entry pointer if success / NULL on failure
**/
static const struct ses_table_entry *get_ses_entry(struct ipr_ioa *ioa, int bus)
{
int i, j, matches;
struct ipr_dev *dev = ioa->dev;
const struct ses_table_entry *ste = ses_table;
for (i = 0; i < ioa->num_devices; i++, dev++) {
if (!dev->scsi_dev_data)
continue;
if (dev->scsi_dev_data->channel == bus &&
dev->scsi_dev_data->type == TYPE_ENCLOSURE)
break;
}
if (i == ioa->num_devices)
return NULL;
if (strncmp(dev->scsi_dev_data->vendor_id, "IBM", 3))
return NULL;
for (i = 0; i < ARRAY_SIZE(ses_table); i++, ste++) {
for (j = 0, matches = 0; j < IPR_PROD_ID_LEN; j++) {
if (ste->compare_product_id_byte[j] == 'X') {
if (dev->scsi_dev_data->product_id[j] == ste->product_id[j])
matches++;
else
break;
} else
matches++;
}
if (matches == IPR_PROD_ID_LEN)
return ste;
}
return NULL;
}
/**
* get_cap_entry - Returns a pointer to a capability entry that corresponds to
* the given raid level.
* @supported_arrays: ipr_supported_arrays struct
* @raid_level: character string representation of the raid level
*
* Returns:
* ipr_array_cap_entry pointer if success / NULL on failure
**/
struct ipr_array_cap_entry *
get_cap_entry(struct ipr_supported_arrays *supported_arrays, char *raid_level)
{
struct ipr_array_cap_entry *cap;
for_each_cap_entry(cap, supported_arrays) {
if (!strcmp((char *)cap->prot_level_str, raid_level))
return cap;
}
return NULL;
}
/**
* get_raid_cap_entry - Returns a pointer to a capability entry that corresponds
* to the given protection level.
* @supported_arrays: ipr_supported_arrays struct
* @prot_level: protection level
*
* Returns:
* ipr_array_cap_entry pointer if success / NULL on failure
**/
struct ipr_array_cap_entry *
get_raid_cap_entry(struct ipr_supported_arrays *supported_arrays, u8 prot_level)
{
struct ipr_array_cap_entry *cap;
if (!supported_arrays)
return NULL;
for_each_cap_entry(cap, supported_arrays) {
if (cap->prot_level == prot_level)
return cap;
}
return NULL;
}
/**
* get_prot_level_str - Returns the string representation of the protection
* level the given the numeric protection level.
* @supported_arrays: ipr_supported_arrays struct
* @prot_level: protection level
*
* Returns:
* protection level string if success / NULL on failure
**/
char *get_prot_level_str(struct ipr_supported_arrays *supported_arrays,
int prot_level)
{
struct ipr_array_cap_entry *cap;
cap = get_raid_cap_entry(supported_arrays, prot_level);
if (cap)
return (char *)cap->prot_level_str;
return NULL;
}
/**
* get_vset_from_array - Given an array, return the corresponding
* volume set device.
* @ioa: ipr ioa struct
* @array: ipr dev struct
*
* Returns:
* 0 if success / non-zero on failure
**/
struct ipr_dev *get_vset_from_array(struct ipr_ioa *ioa, struct ipr_dev *array)
{
struct ipr_dev *vset;
for_each_vset(ioa, vset)
if (vset->array_id == array->array_id)
return vset;
return array;
}
/**
* get_array_from_vset - Given a volume set, return the corresponding
* array device.
* @ioa: ipr ioa struct
* @vset: ipr dev struct
*
* Returns:
* 0 if success / non-zero on failure
**/
struct ipr_dev *get_array_from_vset(struct ipr_ioa *ioa, struct ipr_dev *vset)
{
struct ipr_dev *array;
for_each_array(ioa, array)
if (array->array_id == vset->array_id)
return array;
return vset;
}
static ssize_t sysfs_read_attr(const char *devpath, const char *attr,
void *value, size_t len)
{
char attrpath[256];
ssize_t ret;
int fd;
sprintf(attrpath, "%s/%s", devpath, attr);
fd = open(attrpath, O_RDONLY);
if (fd < 0)
return -1;
ret = read(fd, value, len);
close(fd);
if (ret < 0)
return -1;
return ret;
}
static ssize_t sysfs_write_attr(const char *devpath, const char *attr,
void *value, size_t len)
{
char attrpath[256];
ssize_t ret;
int fd;
sprintf(attrpath, "%s/%s", devpath, attr);
fd = open(attrpath, O_WRONLY);
if (fd < 0)
return -1;
ret = write(fd, value, len);
close(fd);
if (ret < 0)
return -1;
return ret;
}
/**
* ipr_find_sysfs_dev -
* @dev: ipr dev struct
* @head: sysfs dev struct
*
* Returns:
* sysfs_dev pointer if success / NULL on failure
**/
struct sysfs_dev * ipr_find_sysfs_dev(struct ipr_dev *dev, struct sysfs_dev *head)
{
struct sysfs_dev *sdev;
if (!dev->scsi_dev_data)
return NULL;
for (sdev = head; sdev; sdev = sdev->next) {
if (sdev->device_id != dev->scsi_dev_data->device_id)
continue;
if (!memcmp(sdev->ioa_pci_addr, dev->ioa->pci_address, sizeof(sdev->ioa_pci_addr)))
break;
}
return sdev;
}
/**
* ipr_sysfs_dev_to_dev -
* @sdev: sysfs dev struct
*
* Returns:
* ipr_dev pointer if success / NULL on failure
**/
struct ipr_dev *ipr_sysfs_dev_to_dev(struct sysfs_dev *sdev)
{
struct ipr_dev *dev;
struct ipr_ioa *ioa;
for_each_ioa(ioa) {
if (memcmp(sdev->ioa_pci_addr, ioa->pci_address, sizeof(sdev->ioa_pci_addr)))
continue;
for_each_dev(ioa, dev) {
if (!dev->scsi_dev_data)
continue;
if (sdev->device_id == dev->scsi_dev_data->device_id)
return dev;
}
}
return NULL;
}
/**
* ipr_find_zeroed_dev -
* @dev: ipr dev struct
*
* Returns:
* results of call to ipr_find_sysfs_dev
**/
struct sysfs_dev * ipr_find_zeroed_dev(struct ipr_dev *dev)
{
return ipr_find_sysfs_dev(dev, head_zdev);
}
/**
* ipr_device_is_zeroed -
* @dev: ipr dev struct
*
* Returns:
* 1 if the given devices is zeroed / 0 if the device is not zeroed
**/
int ipr_device_is_zeroed(struct ipr_dev *dev)
{
if (ipr_find_zeroed_dev(dev))
return 1;
return 0;
}
/**
* ipr_add_sysfs_dev -
* @dev: ipr dev struct
* @head: sysfs dev struct
* @tail: sysfs dev struct
*
* Returns:
* nothing
**/
void ipr_add_sysfs_dev(struct ipr_dev *dev, struct sysfs_dev **head,
struct sysfs_dev **tail)
{
struct sysfs_dev *sdev = ipr_find_sysfs_dev(dev, *head);
if (!dev->scsi_dev_data)
return;
if (!sdev) {
sdev = calloc(1, sizeof(struct sysfs_dev));
sdev->device_id = dev->scsi_dev_data->device_id;
memcpy(sdev->ioa_pci_addr, dev->ioa->pci_address, sizeof(sdev->ioa_pci_addr));
if (!(*head)) {
*tail = *head = sdev;
} else {
(*tail)->next = sdev;
sdev->prev = *tail;
*tail = sdev;
}
}
}
/**
* ipr_add_zeroed_dev -
* @dev: ipr dev struct
*
* Returns:
* nothing
**/
void ipr_add_zeroed_dev(struct ipr_dev *dev)
{
ipr_add_sysfs_dev(dev, &head_zdev, &tail_zdev);
}
/**
* ipr_del_sysfs_dev -
* @dev: ipr dev struct
* @head: sysfs dev struct
* @tail: sysfs dev struct
*
* Returns:
* nothing
**/
void ipr_del_sysfs_dev(struct ipr_dev *dev, struct sysfs_dev **head,
struct sysfs_dev **tail)
{
struct sysfs_dev *sdev = ipr_find_sysfs_dev(dev, *head);
if (!sdev || !dev->scsi_dev_data)
return;
if (sdev == *head) {
*head = (*head)->next;
if (!(*head))
*tail = NULL;
else
(*head)->prev = NULL;
} else if (sdev == *tail) {
*tail = (*tail)->prev;
(*tail)->next = NULL;
} else {
sdev->next->prev = sdev->prev;
sdev->prev->next = sdev->next;
}
}
/**
* ipr_del_zeroed_dev -
* @dev: ipr dev struct
*
* Returns:
* nothing
**/
void ipr_del_zeroed_dev(struct ipr_dev *dev)
{
ipr_del_sysfs_dev(dev, &head_zdev, &tail_zdev);
}
/**
* ipr_update_qac_with_zeroed_devs
* @ioa: ipr ioa struct
*
* Returns:
* nothing
**/
void ipr_update_qac_with_zeroed_devs(struct ipr_ioa *ioa)
{
struct sysfs_dev *zdev;
struct ipr_dev_record *dev_rcd;
struct ipr_mode_pages mode_pages;
struct ipr_ioa_mode_page *page;
int i;
if (!ioa->qac_data)
return;
for (i = 0; i < ioa->num_devices; i++) {
zdev = ipr_find_zeroed_dev(&ioa->dev[i]);
if (!zdev && ipr_is_af_dasd_device(&ioa->dev[i])) {
memset(&mode_pages, 0, sizeof(mode_pages));
ipr_mode_sense(&ioa->dev[i], 0x20, &mode_pages);
page = (struct ipr_ioa_mode_page *) (((u8 *)&mode_pages) +
mode_pages.hdr.block_desc_len +
sizeof(mode_pages.hdr));
if (page->format_completed) {
dev_rcd = (struct ipr_dev_record *)ioa->dev[i].qac_entry;
dev_rcd->known_zeroed = 1;
}
}
else if (zdev && ioa->dev[i].qac_entry) {
dev_rcd = (struct ipr_dev_record *)ioa->dev[i].qac_entry;
dev_rcd->known_zeroed = 1;
}
}
}
void set_devs_format_completed()
{
struct ipr_ioa *ioa;
struct ipr_dev *dev;
if (format_done) {
for_each_ioa(ioa) {
for_each_dev(ioa, dev) {
if (ipr_is_af_dasd_device(dev) && ipr_device_is_zeroed(dev))
ipr_set_format_completed_bit(dev);
}
}
format_done = 0;
}
}
/**
* ipr_cleanup_zeroed_devs -
*
* Returns:
* nothing
**/
void ipr_cleanup_zeroed_devs()
{
struct ipr_ioa *ioa;
struct ipr_dev *dev;
struct sysfs_dev *zdev;
for_each_ioa(ioa) {
for_each_dev(ioa, dev) {
zdev = ipr_find_zeroed_dev(dev);
if (!zdev)
continue;
if (dev->scsi_dev_data && dev->scsi_dev_data->type == TYPE_DISK)
ipr_del_zeroed_dev(dev);
else if (ipr_is_array_member(dev))
ipr_del_zeroed_dev(dev);
else if (ipr_is_hot_spare(dev))
ipr_del_zeroed_dev(dev);
}
}
}
/**
* get_max_bus_speed -
* @ioa: ipr ioa struct
* @bus: bus number
*
* Returns:
* maximum bus speed value
**/
int get_max_bus_speed(struct ipr_ioa *ioa, int bus)
{
const struct ses_table_entry *ste = get_ses_entry(ioa, bus);
u32 fw_version;
int max_xfer_rate = IPR_MAX_XFER_RATE;
char devpath[PATH_MAX];
char value[16];
ssize_t len;
sprintf(devpath, "/sys/class/scsi_host/%s", ioa->host_name);
len = sysfs_read_attr(devpath, "fw_version", value, 16);
if (len < 0)
return -1;
sscanf(value, "%8X", &fw_version);
if (ipr_force)
return IPR_MAX_XFER_RATE;
if (fw_version < ioa->msl)
max_xfer_rate = IPR_SAFE_XFER_RATE;
if (ste && ste->max_bus_speed_limit < max_xfer_rate)
return ste->max_bus_speed_limit;
return max_xfer_rate;
}
struct ioa_parms {
int ccin;
int scsi_id_changeable;
u32 msl;
char *fw_name;
};
static const struct ioa_parms ioa_parms [] = {
{.ccin = 0x5702, .scsi_id_changeable = 1,
.msl = 0x02080029, .fw_name = "44415254" },
{.ccin = 0x1974, .scsi_id_changeable = 1,
.msl = 0x02080037, .fw_name = "44415254" },
{.ccin = 0x5703, .scsi_id_changeable = 1,
.msl = 0x03090059, .fw_name = "5052414D" },
{.ccin = 0x1975, .scsi_id_changeable = 1,
.msl = 0x03090068, .fw_name = "5052414D" },
{.ccin = 0x5709, .scsi_id_changeable = 0,
.msl = 0x030D0047, .fw_name = "5052414E" },
{.ccin = 0x1976, .scsi_id_changeable = 0,
.msl = 0x030D0056, .fw_name = "5052414E" },
{.ccin = 0x570A, .scsi_id_changeable = 0,
.msl = 0x020A004E, .fw_name = "44415255" },
{.ccin = 0x570B, .scsi_id_changeable = 0,
.msl = 0x020A004E, .fw_name = "44415255" },
{.ccin = 0x2780, .scsi_id_changeable = 0,
.msl = 0x030E0040, .fw_name = "5349530E" },
};
struct chip_details {
u16 vendor;
u16 device;
const char *desc;
};
static const struct chip_details chip_details []= {
{ .vendor = 0x1069, .device = 0xB166, "PCI-X" }, /* Gemstone */
{ .vendor = 0x1014, .device = 0x028C, "PCI-X" }, /* Citrine */
{ .vendor = 0x1014, .device = 0x0180, "PCI-X" }, /* Snipe */
{ .vendor = 0x1014, .device = 0x02BD, "PCI-X" }, /* Obsidian */
{ .vendor = 0x1014, .device = 0x0339, "PCI-E" }, /* Obsidian-E */
{ .vendor = 0x9005, .device = 0x0503, "PCI-X" }, /* Scamp */
{ .vendor = 0x1014, .device = 0x033D, "PCI-E" }, /* CRoC-FPGA */
{ .vendor = 0x1014, .device = 0x034A, "PCI-E" }, /* CRoCodile */
};
/**
* get_chip_details -
* @ioa: ipr ioa struct
*
* Returns:
* chip_details struct pointer if success / NULL on failure
**/
static const struct chip_details *get_chip_details(struct ipr_ioa *ioa)
{
int i;
for (i = 0; i < ARRAY_SIZE(chip_details); i++) {
if (ioa->pci_vendor == chip_details[i].vendor &&
ioa->pci_device == chip_details[i].device)
return &chip_details[i];
}
return NULL;
}
struct ioa_details {
u16 subsystem_vendor;
u16 subsystem_device;
const char *ioa_desc;
int is_spi:1;
};
static const struct ioa_details ioa_details [] = {
{.subsystem_vendor = 0x1014,
.subsystem_device = 0x028D,
"PCI-X SAS RAID Adapter", .is_spi = 0}
};
/**
* get_ioa_details -
* @ioa: ipr ioa struct
*
* Returns:
* ioa_details struct pointer if success / NULL on failure
**/
static const struct ioa_details *get_ioa_details(struct ipr_ioa *ioa)
{
int i;
for (i = 0; i < ARRAY_SIZE(ioa_details); i++) {
if (ioa->subsystem_vendor == ioa_details[i].subsystem_vendor &&
ioa->subsystem_device == ioa_details[i].subsystem_device)
return &ioa_details[i];
}
return NULL;
}
bool ipr_is_af_blk_size(struct ipr_ioa *ioa, int blk_sz)
{
if (blk_sz == ioa->af_block_size ||
(ioa->support_4k && blk_sz == IPR_AF_4K_BLOCK_SIZE))
return true;
else
return false;
}
/**
* ipr_improper_device_type -
* @dev: ipr dev struct
*
* Returns:
* 1 if the device is improper / 0 if the device is not improper
**/
int ipr_improper_device_type(struct ipr_dev *dev)
{
if (dev->rescan)
return 1;
if (!dev->scsi_dev_data)
return 0;
if (!dev->ioa->qac_data || !dev->ioa->qac_data->num_records)
return 0;
if (dev->scsi_dev_data->type == IPR_TYPE_AF_DISK && !dev->qac_entry &&
(ipr_get_blk_size(dev) == IPR_JBOD_BLOCK_SIZE ||
(dev->ioa->support_4k && ipr_get_blk_size(dev) == IPR_JBOD_4K_BLOCK_SIZE)))
return 1;
if (dev->scsi_dev_data->type == TYPE_DISK && dev->qac_entry && ipr_is_af_blk_size(dev->ioa, ipr_get_blk_size(dev)))
return 1;
return 0;
}
/**
* mode_sense -
* @dev: ipr dev struct
* @page: page number
* @buff: buffer
* @sense_data sense_data_t struct
*
* Returns:
* 0 if success / non-zero on failure
**/
static int mode_sense(struct ipr_dev *dev, u8 page, void *buff,
struct sense_data_t *sense_data)
{
u8 cdb[IPR_CCB_CDB_LEN];
int fd, rc;
u8 length = IPR_MODE_SENSE_LENGTH; /* xxx FIXME? */
char *name = dev->gen_name;
if (strlen(name) == 0)
return -ENOENT;
fd = open(name, O_RDWR);
if (fd <= 1) {
scsi_dbg(dev, "Could not open %s. %m\n", name);
return errno;
}
memset(cdb, 0, IPR_CCB_CDB_LEN);
cdb[0] = MODE_SENSE;
cdb[2] = page;
cdb[4] = length;
rc = sg_ioctl(fd, cdb, buff,
length, SG_DXFER_FROM_DEV,
sense_data, IPR_INTERNAL_DEV_TIMEOUT);
close(fd);
return rc;
}
/**
* ipr_tcq_mode -
* @ioa: ipr ioa struct
*
* Returns:
* the tcq mode type
**/
static enum ipr_tcq_mode ioa_get_tcq_mode(struct ipr_ioa *ioa)
{
struct ipr_mode_pages mode_pages;
struct sense_data_t sense_data;
int rc;
rc = mode_sense(&ioa->ioa, 0x28, &mode_pages, &sense_data);
if (rc && sense_data.sense_key == ILLEGAL_REQUEST)
return IPR_TCQ_NACA;
if (rc)
return IPR_TCQ_DISABLE;
return IPR_TCQ_FROZEN;
}
/**
* __ioa_is_spi - Determine if the IOA is a SCSI Parallel Interface (SPI)
* adapter.
* @ioa: ipr ioa struct
*
* Returns:
* 1 if the IOA is an SPI adapter / 0 otherwise
**/
int __ioa_is_spi(struct ipr_ioa *ioa)
{
struct ipr_mode_pages mode_pages;
struct sense_data_t sense_data;
int rc;
rc = mode_sense(&ioa->ioa, 0x28, &mode_pages, &sense_data);
if (rc && sense_data.sense_key == ILLEGAL_REQUEST)
return 0;
return 1;
}
/**
* ioa_is_spi - Determine if the IOA is a SCSI Parallel Interface (SPI) adapter.
* @ioa: ipr ioa struct
*
* Returns:
* 1 if the IOA is an SPI adapter / 0 otherwise
**/
int ioa_is_spi(struct ipr_ioa *ioa)
{
const struct ioa_details *details = get_ioa_details(ioa);
if (details)
return details->is_spi;
return __ioa_is_spi(ioa);
}
static const char *raid_desc = "SCSI RAID Adapter";
static const char *jbod_desc = "SCSI Adapter";
static const char *sas_raid_desc = "SAS RAID Adapter";
static const char *sas_jbod_desc = "SAS Adapter";
static const char *aux_cache_desc = "Aux Cache Adapter";
static const char *def_chip_desc = "PCI";
/**
* get_bus_desc -
* @ioa: ipr ioa struct
*
* Returns:
* FIXME
**/
const char *get_bus_desc(struct ipr_ioa *ioa)
{
const struct chip_details *chip = get_chip_details(ioa);
if (!chip)
return def_chip_desc;
return chip->desc;
}
/**
* get_ioa_desc -
* @ioa: ipr ioa struct
*
* Returns:
* FIXME
**/
const char *get_ioa_desc(struct ipr_ioa *ioa)
{
const struct ioa_details *details = get_ioa_details(ioa);
if (details)
return details->ioa_desc;
else if (ioa->is_aux_cache)
return aux_cache_desc;
else if (!ioa_is_spi(ioa)) {
if (ioa->qac_data->num_records)
return sas_raid_desc;
return sas_jbod_desc;
} else if (ioa->qac_data->num_records)
return raid_desc;
return jbod_desc;
}
/**
* get_ioa_fw -
* @ioa: ipr ioa struct
*
* Returns:
* pointer to ioa_parms entry / NULL on failure
**/
static const struct ioa_parms *get_ioa_fw(struct ipr_ioa *ioa)
{
int i;
for (i = 0; i < ARRAY_SIZE(ioa_parms); i++) {
if (ioa->ccin == ioa_parms[i].ccin)
return &ioa_parms[i];
}
return NULL;
}
/**
* setup_ioa_parms
* @ioa: ipr ioa struct
*
* Returns:
* nothing
**/
static void setup_ioa_parms(struct ipr_ioa *ioa)
{
const struct ioa_parms *ioa_parms = get_ioa_fw(ioa);
ioa->scsi_id_changeable = 1;
if (ioa_parms) {
ioa->scsi_id_changeable = ioa_parms->scsi_id_changeable;
ioa->msl = ioa_parms->msl;
}
}
/**
* find_ioa -
* @host_no: host number int
*
* Returns:
* pointer to ipr_ioa / NULL on failure
**/
struct ipr_ioa *find_ioa(int host_no)
{
struct ipr_ioa *ioa;
for_each_ioa(ioa)
if (ioa->host_num == host_no)
return ioa;
return NULL;
}
/**
* _find_dev -
* @blk: ipr ioa struct
* @compare: pointer to a comparison function
*
* Returns:
* ipr_dev pointer if success / NULL on failure
**/
static struct ipr_dev *_find_dev(char *blk, int (*compare) (struct ipr_dev *, char *))
{
struct ipr_ioa *ioa;
struct ipr_dev *dev;
char *name = malloc(strlen(_PATH_DEV) + strlen(blk) + 1);
if (!name)
return NULL;
if (strncmp(blk, _PATH_DEV, strlen(_PATH_DEV)))
sprintf(name, _PATH_DEV"%s", blk);
else
sprintf(name, "%s", blk);
for_each_ioa(ioa) {
if (!compare(&ioa->ioa, name)) {
free(name);
return &ioa->ioa;
}
for_each_dev(ioa, dev) {
if (!compare(dev, name)) {
free(name);
return dev;
}
}
}
free(name);
return NULL;
}
/**
* blk_compare -
* @dev: ipr ioa struct
* @name: character string to compare
*
* Returns:
* integer result of the strcmp()
**/
static int blk_compare(struct ipr_dev *dev, char *name)
{
return strcmp(dev->dev_name, name);
}
/**
* find_blk_dev -
* @blk: block device name
*
* Returns:
* result of _find_dev()
**/
struct ipr_dev *find_blk_dev(char *blk)
{
return _find_dev(blk, blk_compare);
}
/**
* gen_compare -
* @dev: ipr dev struct
* @name: character string to compare
*
* Returns:
* integer result of the strcmp()
**/
static int gen_compare(struct ipr_dev *dev, char *name)
{
return strcmp(dev->gen_name, name);
}
/**
* find_gen_dev -
* @gen: generic device name
*
* Returns:
* result of _find_dev()
**/
struct ipr_dev *find_gen_dev(char *gen)
{
return _find_dev(gen, gen_compare);
}
/**
* find_dev -
* @name: device name to find
*
* Returns:
* ipr_dev pointer
**/
struct ipr_dev *find_dev(char *name)
{
struct ipr_dev *dev = find_blk_dev(name);
if (!dev)
dev = find_gen_dev(name);
return dev;
}
/**
* ipr_uevents_supported - indicate if uevents are supported
*
* Returns:
* 1 if success / 0 on failure
**/
static int ipr_uevents_supported()
{
struct ipr_ioa *ioa = ipr_ioa_head;
char devpath[PATH_MAX];
char value[16];
ssize_t len;
if (!ioa)
return 0;
sprintf(devpath, "/sys/class/scsi_host/%s", ioa->host_name);
len = sysfs_read_attr(devpath, "uevent", value, 16);
return len > 0;
}
#define NETLINK_KOBJECT_UEVENT 15
/**
* poll_forever -
* @poll_func: pointer to polling function
* @poll_delay: integer sleep delay value
*
* Returns:
* nothing
**/
static void poll_forever(void (*poll_func) (void), int poll_delay)
{
while (1) {
sleep(poll_delay);
poll_func();
}
}
/**
* handle_events -
* @poll_func: pointer to polling function
* @poll_delay: integer sleep delay value
* @prot_level: pointer to event handler function
*
* Returns:
* 0 if poll_forever() ever returns
**/
int handle_events(void (*poll_func) (void), int poll_delay,
void (*kevent_handler) (char *))
{
struct sockaddr_nl snl;
int sock, rc, len, flags;
int uevent_rcvd = ipr_force_uevents;
char buf[1024];
if (ipr_force_polling) {
poll_forever(poll_func, poll_delay);
return 0;
}
memset(&snl, 0, sizeof(snl));
snl.nl_family = AF_NETLINK;
snl.nl_pid = getpid();
snl.nl_groups = 1;
sock = socket(PF_NETLINK, SOCK_DGRAM, NETLINK_KOBJECT_UEVENT);
if (sock == -1) {
syslog_dbg("Failed to get socket\n");
poll_forever(poll_func, poll_delay);
return 0;
}
rc = bind(sock, (struct sockaddr *)&snl, sizeof(snl));
if (rc < 0) {
syslog_dbg("Failed to bind to socket\n");
close(sock);
poll_forever(poll_func, poll_delay);
return 0;
}
if (!ipr_force_uevents && !ipr_uevents_supported()) {
if (fcntl(sock, F_SETFL, O_NONBLOCK) == -1) {
syslog(LOG_ERR, "Failed to fcntl socket\n");
close(sock);
poll_forever(poll_func, poll_delay);
return 0;
}
}
while (1) {
struct sockaddr_nl src_addr;
socklen_t addrlen = sizeof(struct sockaddr_nl);
len = recvfrom(sock, &buf, sizeof(buf), 0,
(struct sockaddr *) &src_addr, &addrlen);
if (!uevent_rcvd && len < 0) {
poll_func();
sleep(poll_delay);
continue;
}
if (len < 0) {
syslog_dbg("kevent recv failed.\n");
poll_func();
sleep(poll_delay);
continue;
}
if (src_addr.nl_pid != 0) {
syslog_dbg("received packet from unknown pid %d.\n",
src_addr.nl_pid);
poll_func();
sleep(poll_delay);
continue;
}
if (!uevent_rcvd) {
flags = fcntl(sock, F_GETFL);
if (flags == -1) {
syslog_dbg("F_GETFL Failed\n");
poll_func();
sleep(poll_delay);
continue;
}
if (flags & O_NONBLOCK) {
if (fcntl(sock, F_SETFL, (flags & ~O_NONBLOCK)) == -1) {
syslog_dbg("F_SETFL Failed\n");
poll_func();
sleep(poll_delay);
continue;
}
}
uevent_rcvd = 1;
}
kevent_handler(buf);
}
close(sock);
return 0;
}
/**
* parse_option - parse options from the command line
* @opt: character string option value
*
* Returns:
* 1 if success / 0 if the option isn't recognized
**/
int parse_option(char *opt)
{
if (strcmp(opt, "--version") == 0) {
printf("%s: %s\n", tool_name, PACKAGE_VERSION);
exit(0);
}
if (strcmp(opt, "--daemon") == 0)
daemonize = 1;
else if (strcmp(opt, "--debug") == 0)
ipr_debug = 1;
else if (strcmp(opt, "--force") == 0)
ipr_force = 1;
else if (strcmp(opt, "--use-polling") == 0)
ipr_force_polling = 1;
else if (strcmp(opt, "--use-uevents") == 0)
ipr_force_uevents = 1;
else if (strcmp(opt, "--fast") == 0)
ipr_fast = 1;
else if (strcmp(opt, "--deferred-write-buffer") == 0)
ipr_mode5_write_buffer = 0;
else if (strcmp(opt, "--mode5-write-buffer") == 0)
ipr_mode5_write_buffer = 1;
else
return 0;
return 1;
}
/**
* get_pci_attr -
* @sysfs_pci_device: sysfs_device struct
* @attr: attribute string
*
* Returns:
* pci attribute value if success / 0 on failure
**/
static int get_pci_attr(char *devpath, char *attr)
{
int temp, fd, len;
char path[PATH_MAX];
char data[200];
sprintf(path, "%s/%s", devpath, attr);
if ((fd = open(path, O_RDONLY)) < 0) {
syslog_dbg("Failed to open %s\n", path);
return 0;
}
len = read(fd, data, 200);
if (len < 0) {
syslog_dbg("Failed to read %s\n", path);
close(fd);
return 0;
}
sscanf(data, "0x%4X", &temp);
close(fd);
return temp;
}
/**
* get_pci_attrs - sets vendor and device information
* @ioa: ipr ioa struct
* @sysfs_pci_device: sysfs_device struct
*
* Returns:
* nothing
**/
static void get_pci_attrs(struct ipr_ioa *ioa, char *pci_path)
{
ioa->subsystem_vendor = get_pci_attr(pci_path, "subsystem_vendor");
ioa->subsystem_device = get_pci_attr(pci_path, "subsystem_device");
ioa->pci_vendor = get_pci_attr(pci_path, "vendor");
ioa->pci_device = get_pci_attr(pci_path, "device");
}
static struct ipr_ioa *old_ioa_head;
static struct ipr_ioa *old_ioa_tail;
static int old_num_ioas;
static struct scsi_dev_data *old_scsi_dev_table;
struct ipr_array_query_data *old_qac_data;
/**
* free_current_config - frees current configuration data structures
*
* Returns:
* nothing
**/
static void free_current_config()
{
struct ipr_ioa *ioa;
for (ioa = ipr_ioa_head; ioa;) {
ioa = ioa->next;
free(ipr_ioa_head);
ipr_ioa_head = ioa;
}
free(ipr_qac_data);
free(scsi_dev_table);
ipr_ioa_head = NULL;
ipr_ioa_tail = NULL;
num_ioas = 0;
scsi_dev_table = NULL;
ipr_qac_data = NULL;
}
/**
* save_old_config - saves current configuration data structures
*
* Returns:
* nothing
**/
static void save_old_config()
{
if (old_ioa_head) {
free_current_config();
return;
}
old_ioa_head = ipr_ioa_head;
old_ioa_tail = ipr_ioa_tail;
old_num_ioas = num_ioas;
old_scsi_dev_table = scsi_dev_table;
old_qac_data = ipr_qac_data;
ipr_qac_data = NULL;
scsi_dev_table = NULL;
ipr_ioa_head = NULL;
ipr_ioa_tail = NULL;
num_ioas = 0;
}
/**
* free_old_config - frees old configuration data structures
*
* Returns:
* nothing
**/
static void free_old_config()
{
struct ipr_ioa *ioa;
/* Free up all the old memory */
for (ioa = old_ioa_head; ioa;) {
ioa = ioa->next;
free(old_ioa_head);
old_ioa_head = ioa;
}
free(old_qac_data);
free(old_scsi_dev_table);
old_ioa_head = NULL;
old_ioa_tail = NULL;
old_num_ioas = 0;
old_scsi_dev_table = NULL;
old_qac_data = NULL;
}
/**
* same_ioa - compares two ioas to determine if they are the same
* @first: ipr ioa struct
* @second: ipr ioa struct
*
* Returns:
* 0 if ioas are not the same / 1 if ioas are the same
**/
static int same_ioa(struct ipr_ioa *first, struct ipr_ioa *second)
{
if (strcmp(first->pci_address, second->pci_address))
return 0;
if (strcmp(first->host_name, second->host_name))
return 0;
if (first->ccin != second->ccin)
return 0;
if (first->host_num != second->host_num)
return 0;
if (first->pci_vendor != second->pci_vendor)
return 0;
if (first->pci_device != second->pci_device)
return 0;
if (first->subsystem_vendor != second->subsystem_vendor)
return 0;
if (first->subsystem_device != second->subsystem_device)
return 0;
return 1;
}
/**
* same_scsi_dev - compares two scsi devices to determin if they are the same
* @first: scsi_dev_data struct
* @second: scsi_dev_data struct
*
* Returns:
* 0 if scsi devs are not the same / 1 if scsi devs are the same
**/
static int same_scsi_dev(struct scsi_dev_data *first, struct scsi_dev_data *second)
{
if (!first || !second)
return 0;
if (first->host != second->host)
return 0;
if (first->channel != second->channel)
return 0;
if (first->id != second->id)
return 0;
if (first->lun != second->lun)
return 0;
if (first->type != second->type)
return 0;
if (first->online != second->online)
return 0;
if (strcmp(first->vendor_id, second->vendor_id))
return 0;
if (strcmp(first->product_id, second->product_id))
return 0;
if (strcmp(first->sysfs_device_name, second->sysfs_device_name))
return 0;
if (strcmp(first->dev_name, second->dev_name))
return 0;
if (strcmp(first->gen_name, second->gen_name))
return 0;
return 1;
}
/**
* same_dev_rcd - compares two device records to determine if they are the same
* @first: ipr_dev struct
* @second: ipr_dev struct
*
* Returns:
* 0 if devices are not the same / 1 if devices are the same
**/
static int same_dev_rcd(struct ipr_dev *first, struct ipr_dev *second)
{
if (memcmp(&first->res_addr, &second->res_addr,
sizeof(first->res_addr)))
return 0;
if (memcmp(first->vendor_id, second->vendor_id, IPR_VENDOR_ID_LEN))
return 0;
if (memcmp(first->product_id, second->product_id, IPR_PROD_ID_LEN))
return 0;
if (memcmp(first->serial_number, second->serial_number, IPR_SERIAL_NUM_LEN))
return 0;
return 1;
}
/**
* same_dev - compares two devices to determine if they are the same
* @first: ipr_dev struct
* @second: ipr_dev struct
*
* Returns:
* 0 if devices are not the same / 1 if devices are the same
**/
static int same_dev(struct ipr_dev *first, struct ipr_dev *second)
{
if (strcmp(first->dev_name, second->dev_name))
return 0;
if (strcmp(first->gen_name, second->gen_name))
return 0;
if (!first->scsi_dev_data && !second->scsi_dev_data) {
if (!ipr_is_af_dasd_device(first) || !ipr_is_af_dasd_device(second))
return 0;
if (!same_dev_rcd(first, second))
return 0;
} else if (!same_scsi_dev(first->scsi_dev_data, second->scsi_dev_data))
return 0;
return 1;
}
/**
* dev_init_allowed -
* @dev: ipr dev struct
*
* Returns:
* 1 if initialization is allowed / 0 if initialization is not allowed
**/
static int dev_init_allowed(struct ipr_dev *dev)
{
struct ipr_query_res_state res_state;
if (!ipr_is_af_dasd_device(dev))
return 1;
if (!ipr_query_resource_state(dev, &res_state)) {
if (!res_state.read_write_prot && !res_state.prot_dev_failed)
return 1;
}
return 0;
}
/**
* resolve_dev -
* @new: ipr dev struct
* @old: ipr dev struct
*
* Returns:
* nothing
**/
static void resolve_dev(struct ipr_dev *new, struct ipr_dev *old)
{
new->init_not_allowed = !dev_init_allowed(new);
if (!old->init_not_allowed || new->init_not_allowed)
new->should_init = 0;
if (!new->ioa->sis64 && new->ioa->is_secondary &&
!old->ioa->is_secondary && ipr_is_af_dasd_device(new) &&
new->scsi_dev_data)
new->rescan = 1;
if (!new->ioa->sis64 && !new->ioa->is_secondary &&
old->ioa->is_secondary && ipr_is_af_dasd_device(new) &&
!new->scsi_dev_data)
new->rescan = 1;
}
/**
* resolve_ioa -
* @ioa: ipr ioa struct
* @old_ioa: ipr ioa struct
*
* Returns:
* nothing
**/
static void resolve_ioa(struct ipr_ioa *ioa, struct ipr_ioa *old_ioa)
{
struct ipr_dev *dev, *old_dev;
ioa->should_init = 0;
for_each_dev(ioa, dev) {
for_each_dev(old_ioa, old_dev) {
if (!same_dev(dev, old_dev))
continue;
memcpy(&dev->attr, &old_dev->attr, sizeof(dev->attr));
dev->rescan = old_dev->rescan;
resolve_dev(dev, old_dev);
break;
}
}
}
/**
* resolve_old_config -
*
* Returns:
* nothing
**/
static void resolve_old_config()
{
struct ipr_ioa *ioa, *old_ioa;
struct ipr_dev *dev;
for_each_ioa(ioa) {
ioa->should_init = 1;
for_each_dev(ioa, dev)
dev->should_init = 1;
}
for_each_ioa(ioa) {
__for_each_ioa(old_ioa, old_ioa_head) {
if (!same_ioa(ioa, old_ioa))
continue;
resolve_ioa(ioa, old_ioa);
break;
}
}
free_old_config();
}
struct ipr_pci_slot {
char slot_name[PATH_MAX];
char physical_name[PATH_MAX];
char pci_device[PATH_MAX];
};
static struct ipr_pci_slot *pci_slot;
static unsigned int num_pci_slots;
/**
* ipr_select_phy_location -
* @dirent: dirent struct
*
* Returns:
* 1 if d_name == "phy_location"/ 0 otherwise
**/
static int ipr_select_phy_location(const struct dirent *dirent)
{
if (strstr(dirent->d_name, "phy_location"))
return 1;
return 0;
}
static int ipr_select_pci_address(const struct dirent *dirent)
{
if (strstr(dirent->d_name, "address"))
return 1;
return 0;
}
/**
* read_attr_file -
* @path: path name of device/file to open
* @out: character array
*
* Returns:
* 0 if success / non-zero on failure
**/
static int read_attr_file(char *path, char *out, int size)
{
int fd, len;
if ((fd = open(path, O_RDONLY)) < 0) {
syslog_dbg("Failed to open %s\n", path);
return -EIO;
}
len = read(fd, out, size);
if (len < 0) {
syslog_dbg("Failed to read %s\n", path);
close(fd);
return -EIO;
}
if (out[strlen(out) - 1] == '\n')
out[strlen(out) - 1] = '\0';
close(fd);
return 0;
}
/**
* ipr_add_slot_location -
* @path: path of device/file to open
* @name: name of device/file to open
*
* Returns:
* 0 if success / non-zero on failure
**/
static int ipr_add_slot_location(char *path, char *name)
{
struct ipr_pci_slot *slot;
char fpath[PATH_MAX];
int rc;
sprintf(fpath, "%s%s/phy_location", path, name);
pci_slot = realloc(pci_slot, sizeof(*pci_slot) * (num_pci_slots + 1));
slot = &pci_slot[num_pci_slots];
memset(slot, 0, sizeof(*slot));
strcpy(slot->slot_name, name);
rc = read_attr_file(fpath, slot->physical_name,
sizeof(slot->physical_name));
if (rc) {
pci_slot = realloc(pci_slot, sizeof(*pci_slot) * num_pci_slots);
return rc;
}
num_pci_slots++;
return 0;
}
/**
* ipr_add_slot_address -
* @path: path of device/file to open
* @name: name of device/file to open
*
* Returns:
* 0 if success / non-zero on failure
**/
static int ipr_add_slot_address(char *path, char *name)
{
struct ipr_pci_slot *slot;
char fpath[PATH_MAX];
int rc;
sprintf(fpath, "%s%s/address", path, name);
pci_slot = realloc(pci_slot, sizeof(*pci_slot) * (num_pci_slots + 1));
slot = &pci_slot[num_pci_slots];
memset(slot, 0, sizeof(*slot));
strcpy(slot->slot_name, name);
strcpy(slot->physical_name, name);
rc = read_attr_file(fpath, slot->pci_device,
sizeof(slot->pci_device));
if (rc) {
pci_slot = realloc(pci_slot, sizeof(*pci_slot) * num_pci_slots);
return rc;
}
strcat(slot->pci_device, ".0");
num_pci_slots++;
return 0;
}
/**
* ipr_get_pci_slots -
*
* Returns:
* nothing
**/
static void ipr_get_pci_slots()
{
char rootslot[PATH_MAX], slot[PATH_MAX];
char slotpath[PATH_MAX], attr[PATH_MAX];
char devspec[PATH_MAX], locpath[PATH_MAX];
char loc_code[1024], *last_hyphen, *prev_hyphen;
int num_slots, i, j, rc, num_attrs;
int loc_code_not_found = 0;
struct dirent **slotdir, **dirent;
struct stat statbuf;
struct ipr_ioa *ioa;
for_each_ioa(ioa)
ioa->physical_location[0] = '\0';
for_each_ioa(ioa) {
memset(devspec, 0, sizeof(devspec));
sprintf(attr, "/sys/bus/pci/devices/%s/devspec",
ioa->pci_address);
rc = read_attr_file(attr, devspec, PATH_MAX);
if (rc)
continue;
memset(loc_code, 0, sizeof(loc_code));
sprintf(locpath, "/proc/device-tree%s/ibm,loc-code",
devspec);
rc = read_attr_file(locpath, loc_code,
sizeof(loc_code));
if (rc) {
loc_code_not_found = 1;
continue;
}
last_hyphen = strrchr(loc_code, '-');
if (last_hyphen && last_hyphen[1] == 'T') {
*last_hyphen = '\0';
prev_hyphen = strrchr(loc_code, '-');
if (prev_hyphen && prev_hyphen[1] != 'C')
*last_hyphen = '-';
}
strcpy(ioa->physical_location, loc_code);
}
if (loc_code_not_found == 0)
return;
sprintf(rootslot, "/sys/bus/pci/slots/");
num_slots = scandir(rootslot, &slotdir, NULL, alphasort);
if (num_slots <= 0) {
return;
}
for (i = 0; i < num_slots; i++) {
sprintf(slot, "%s%s", rootslot, slotdir[i]->d_name);
rc = scandir(slot, &dirent, ipr_select_phy_location, alphasort);
if (rc > 0) {
ipr_add_slot_location(rootslot, slotdir[i]->d_name);
while (rc--)
free(dirent[rc]);
free(dirent);
} else {
rc = scandir(slot, &dirent, ipr_select_pci_address,
alphasort);
if (rc <= 0)
continue;
ipr_add_slot_address(rootslot, slotdir[i]->d_name);
while (rc--)
free(dirent[rc]);
free(dirent);
}
}
while (num_slots--)
free(slotdir[num_slots]);
free(slotdir);
for (i = 0; i < num_pci_slots; i++) {
if (!pci_slot[i].pci_device)
continue;
sprintf(slotpath, "/sys/bus/pci/devices/%s/",
pci_slot[i].slot_name);
num_attrs = scandir(slotpath, &slotdir, NULL, alphasort);
if (num_attrs <= 0)
continue;
for (j = 0; j < num_attrs; j++) {
sprintf(attr, "%s/%s", slotpath, slotdir[j]->d_name);
rc = stat(attr, &statbuf);
if (rc || !S_ISDIR(statbuf.st_mode))
continue;
if (!strcmp(slotdir[j]->d_name, "."))
continue;
if (!strcmp(slotdir[j]->d_name, ".."))
continue;
strcpy(pci_slot[i].pci_device, slotdir[j]->d_name);
break;
}
while (num_attrs--)
free(slotdir[num_attrs]);
free(slotdir);
}
for_each_ioa(ioa) {
if (strlen(ioa->physical_location) == 0) {
for (i = 0; i < num_pci_slots; i++) {
if (strcmp(pci_slot[i].pci_device, ioa->pci_address) &&
strcmp(pci_slot[i].slot_name, ioa->pci_address))
continue;
strcpy(ioa->physical_location,
pci_slot[i].physical_name);
break;
}
}
}
free(pci_slot);
pci_slot = NULL;
num_pci_slots = 0;
}
/**
* load_system_p_oper_mode
*
* Discover and load current operating mode.
**/
void load_system_p_oper_mode()
{
struct stat st;
if (stat("/proc/ppc64/lparcfg", &st) == 0)
power_cur_mode = POWER_VM;
else if (stat("/etc/ibm_powerkvm-release", &st) == 0)
power_cur_mode = POWER_KVM;
else
power_cur_mode = POWER_BAREMETAL;
}
/**
* tool_init -
* @save_state: integer flag - whether or not to save the old config
*
* Returns:
* nothing
**/
static int __tool_init(int save_state)
{
int temp, fw_type;
struct ipr_ioa *ipr_ioa;
DIR *dirfd, *host_dirfd;
struct dirent *dent, *host_dent;
ssize_t len;
char queue_str[256];
save_old_config();
dirfd = opendir("/sys/bus/pci/drivers/ipr");
if (!dirfd) {
syslog_dbg("Failed to open ipr driver bus. %m\n");
dirfd = opendir("/sys/bus/pci/drivers/ipr");
if (!dirfd) {
syslog_dbg("Failed to open ipr driver bus on second attempt. %m\n");
return -ENXIO;
}
}
while ((dent = readdir(dirfd)) != NULL) {
int channel, bus, device, function;
char devpath[PATH_MAX];
char buff[256];
if (sscanf(dent->d_name, "%x:%x:%x.%x",
&channel, &bus, &device, &function) != 4)
continue;
ipr_ioa = (struct ipr_ioa*)malloc(sizeof(struct ipr_ioa));
memset(ipr_ioa,0,sizeof(struct ipr_ioa));
/* PCI address */
strcpy(ipr_ioa->pci_address, dent->d_name);
ipr_ioa->host_num = -1;
sprintf(devpath, "/sys/bus/pci/drivers/ipr/%s",
dent->d_name);
host_dirfd = opendir(devpath);
if (!host_dirfd) {
syslog_dbg("Failed to open scsi_host class.\n");
return -EAGAIN;
}
while ((host_dent = readdir(host_dirfd)) != NULL) {
char scsipath[PATH_MAX];
char fw_str[256];
if (strncmp(host_dent->d_name, "host", 4))
continue;
if (sscanf(host_dent->d_name, "host%d",
&ipr_ioa->host_num) != 1)
continue;
strcpy(ipr_ioa->host_name, host_dent->d_name);
get_pci_attrs(ipr_ioa, devpath);
sprintf(scsipath, "%s/%s/scsi_host/%s", devpath,
ipr_ioa->host_name, ipr_ioa->host_name);
len = sysfs_read_attr(scsipath, "fw_type", fw_str, 256);
if (len < 0)
fw_type = 0;
else
sscanf(fw_str, "%d", &fw_type);
if (ipr_debug)
syslog(LOG_INFO, "tool_init: fw_type attr = %d.\n", fw_type);
len = sysfs_read_attr(scsipath, "can_queue", queue_str, 256);
if (len < 0)
ioa_dbg(ipr_ioa, "Failed to read can_queue attribute");
sscanf(queue_str, "%d", &ipr_ioa->can_queue);
break;
}
closedir(host_dirfd);
if (ipr_ioa->host_num < 0) {
syslog_dbg("No SCSI Host found on IPR device %s\n",
ipr_ioa->pci_address);
free(ipr_ioa);
continue;
}
if (fw_type == IPR_SIS64) {
sprintf(devpath, "/sys/bus/scsi/devices/%d:%d:0:0",
ipr_ioa->host_num, IPR_IOAFP_VIRTUAL_BUS);
ipr_ioa->sis64 = 1;
} else
sprintf(devpath, "/sys/bus/scsi/devices/%d:255:255:255",
ipr_ioa->host_num);
len = sysfs_read_attr(devpath, "model", buff, 16);
if (len < 0 || (sscanf(buff, "%4X", &temp) != 1)) {
syslog_dbg("Cannot read SCSI device model.\n");
return -EAGAIN;
}
ipr_ioa->ccin = temp;
setup_ioa_parms(ipr_ioa);
ipr_ioa->next = NULL;
ipr_ioa->num_raid_cmds = 0;
if (ipr_ioa_tail) {
ipr_ioa_tail->next = ipr_ioa;
ipr_ioa_tail = ipr_ioa;
} else
ipr_ioa_tail = ipr_ioa_head = ipr_ioa;
num_ioas++;
}
closedir(dirfd);
load_system_p_oper_mode();
if (!save_state)
free_old_config();
ipr_get_pci_slots();
return 0;
}
int tool_init(int save_state)
{
int i, rc_err = -EAGAIN;
for (i = 0; i < 4 && rc_err == -EAGAIN; i++) {
rc_err = __tool_init(save_state);
if (rc_err == -EAGAIN && tool_init_retry)
sleep(2);
}
if (rc_err) {
syslog_dbg("Failed to initialize adapters. Timeout reached");
return rc_err;
}
return 0;
}
/**
* ipr_reset_adapter -
* @ioa: ipr ioa struct
*
* Returns:
* nothing
**/
void ipr_reset_adapter(struct ipr_ioa *ioa)
{
char devpath[PATH_MAX];
sprintf(devpath, "/sys/class/scsi_host/%s", ioa->host_name);
sysfs_write_attr(devpath, "reset_host", "1", 1);
}
/**
* ipr_read_host_attr -
* @ioa: ipr ioa struct
* @name: attribute name
* @value: value to be set
* @value_len: length of value string
*
* Returns:
* >= 0 if success / < 0 on failure
**/
int ipr_read_host_attr(struct ipr_ioa *ioa, char *name,
void *value, size_t value_len)
{
ssize_t len;
char path[PATH_MAX];
sprintf(path, "/sys/class/scsi_host/%s", ioa->host_name);
len = sysfs_read_attr(path, name, value, value_len);
if (len < 0) {
ioa_dbg(ioa, "Failed to read %s attribute. %m\n", name);
return -EIO;
}
return len;
}
/**
* ipr_write_host_attr -
* @ioa: ipr ioa struct
* @name: attribute to be written
* @value: new value
* @value_len: length of value string
*
* Returns:
* >= 0 if success / < 0 on failure
**/
int ipr_write_host_attr(struct ipr_ioa *ioa, char *name,
void *value, size_t value_len)
{
ssize_t len;
char path[PATH_MAX];
sprintf(path, "/sys/class/scsi_host/%s", ioa->host_name);
len = sysfs_write_attr(path, name, value, value_len);
if (len < 0) {
ioa_dbg(ioa, "Failed to write %s attribute. %m\n", name);
return -EIO;
}
return len;
}
/**
* ipr_cmds_per_lun -
* @ioa: ipr ioa struct
*
* Returns:
* number of commands per lun if success / 6 on failure
**/
int ipr_cmds_per_lun(struct ipr_ioa *ioa)
{
char value[100];
int rc;
rc = ipr_read_host_attr(ioa, "cmd_per_lun", value, 100);
if (rc)
return 6;
return strtoul(value, NULL, 10);
}
/**
* ipr_scan -
* @ioa: ipr ioa struct
* @bus: bus number
* @id: id number
* @lun: lun number (RAID) level for new array
*
* Returns:
* nothing
**/
void ipr_scan(struct ipr_ioa *ioa, int bus, int id, int lun)
{
char buf[100];
char devpath[PATH_MAX];
if (lun < 0) {
if (id < 0)
sprintf(buf, "%d - -", bus);
else
sprintf(buf, "%d %d -", bus, id);
} else {
if (id < 0)
sprintf(buf, "%d - %d", bus, lun);
else
sprintf(buf, "%d %d %d", bus, id, lun);
}
sprintf(devpath, "/sys/class/scsi_host/%s", ioa->host_name);
sysfs_write_attr(devpath, "scan", buf, 100);
}
/**
* __ipr_query_array_config - perform a query array configuration ioctl
* @ioa: ipr ioa struct
* @fd: file descriptor
* @allow_rebuld_refresh: allow rebuild refresh flag
* @set_array_id: set array id flag
* @array_id: array id number
* @buff: data buffer
*
* Returns:
* 0 if success / non-zero on failure
**/
int __ipr_query_array_config(struct ipr_ioa *ioa, int fd,
bool allow_rebuild_refresh, bool set_array_id,
bool vset_migrate_query, int array_id,
struct ipr_array_query_data *buff)
{
int length = IPR_QAC_BUFFER_SIZE;
u8 cdb[IPR_CCB_CDB_LEN];
struct sense_data_t sense_data;
int rc;
if (!ioa->sis64)
length = IPR_SIS32_QAC_BUFFER_SIZE;
ioa->nr_ioa_microcode = 0;
memset(cdb, 0, IPR_CCB_CDB_LEN);
cdb[0] = IPR_QUERY_ARRAY_CONFIG;
if (vset_migrate_query) {
cdb[1] = 0x08;
cdb[2] = array_id;
if (ioa->sis64)
cdb[3] = 0x80;
} else if (set_array_id) {
cdb[1] = 0x01;
cdb[2] = array_id;
if (ioa->sis64)
cdb[3] = 0x80;
} else if (allow_rebuild_refresh)
cdb[1] = 0;
else
cdb[1] = 0x80; /* Prohibit Rebuild Candidate Refresh */
cdb[7] = (length & 0xff00) >> 8;
cdb[8] = length & 0xff;
if (ioa->sis64) {
cdb[10] = (length & 0xff000000) >> 24;
cdb[11] = (length & 0xff0000) >> 16;
}
rc = sg_ioctl(fd, cdb, buff->u.buf,
length, SG_DXFER_FROM_DEV,
&sense_data, IPR_ARRAY_CMD_TIMEOUT);
if (rc != 0) {
if (sense_data.sense_key != ILLEGAL_REQUEST || ipr_debug)
ioa_cmd_err(ioa, &sense_data, "Query Array Config", rc);
else if (sense_data.sense_key == NOT_READY &&
sense_data.add_sense_code == 0x40 &&
sense_data.add_sense_code_qual == 0x85)
ioa->nr_ioa_microcode = 1;
}
if (ioa->sis64) {
buff->resp_len = ntohl(buff->u.buf64.resp_len);
buff->num_records = ntohl(buff->u.buf64.num_records);
buff->data = buff->u.buf64.data;
buff->hdr_len = 8;
} else {
buff->resp_len = ntohs(buff->u.buf32.resp_len);
buff->num_records = ntohs(buff->u.buf32.num_records);
buff->data = buff->u.buf32.data;
buff->hdr_len = 4;
}
return rc;
}
/**
* ipr_query_array_config - entry point to query array configuration ioctl call
* @ioa: ipr ioa struct
* @allow_rebuld_refresh: allow rebuild refresh flag
* @set_array_id: set array id flag
* @array_id: array id number
* @buff: data buffer
*
* Returns:
* 0 if success / non-zero on failure
**/
int ipr_query_array_config(struct ipr_ioa *ioa,
bool allow_rebuild_refresh, bool set_array_id,
bool vset_migrate_query, int array_id,
struct ipr_array_query_data *buff)
{
int fd, rc;
ioa->nr_ioa_microcode = 0;
if (strlen(ioa->ioa.gen_name) == 0) {
scsi_err((&ioa->ioa), "Adapter sg device does not exist\n");
return -ENOENT;
}
fd = open(ioa->ioa.gen_name, O_RDWR);
if (fd <= 1) {
if (!strcmp(tool_name, "iprconfig") || ipr_debug)
syslog(LOG_ERR, "Could not open %s. %m\n", ioa->ioa.gen_name);
return errno;
}
rc = flock(fd, LOCK_EX);
if (rc) {
if (!strcmp(tool_name, "iprconfig") || ipr_debug)
syslog(LOG_ERR, "Could not lock %s. %m\n", ioa->ioa.gen_name);
close(fd);
return errno;
}
rc = __ipr_query_array_config(ioa, fd, allow_rebuild_refresh,
set_array_id, vset_migrate_query,
array_id, buff);
close(fd);
return rc;
}
/**
* ipr_query_multi_ioa_status -
* @ioa: ipr ioa struct
* @buff: data buffer
* @len: length
*
* Returns:
* 0 if success / non-zero on failure
**/
int ipr_query_multi_ioa_status(struct ipr_ioa *ioa, void *buff, u32 len)
{
int fd, rc;
u8 cdb[IPR_CCB_CDB_LEN];
struct sense_data_t sense_data;
if (strlen(ioa->ioa.gen_name) == 0)
return -ENOENT;
fd = open(ioa->ioa.gen_name, O_RDWR);
if (fd <= 1) {
if (!strcmp(tool_name, "iprconfig") || ipr_debug)
syslog(LOG_ERR, "Could not open %s. %m\n", ioa->ioa.gen_name);
return errno;
}
memset(cdb, 0, IPR_CCB_CDB_LEN);
cdb[0] = IPR_MAINTENANCE_IN;
cdb[1] = IPR_QUERY_MULTI_ADAPTER_STATUS;
cdb[6] = len >> 24;
cdb[7] = (len >> 16) & 0xff;
cdb[8] = (len >> 8) & 0xff;
cdb[9] = len & 0xff;
rc = sg_ioctl(fd, cdb, buff, len, SG_DXFER_FROM_DEV,
&sense_data, IPR_ARRAY_CMD_TIMEOUT);
if (rc != 0) {
if (sense_data.sense_key != ILLEGAL_REQUEST)
ioa_cmd_err(ioa, &sense_data, "Query Multi Adapter Status", rc);
else if (sense_data.sense_key == NOT_READY &&
sense_data.add_sense_code == 0x40 &&
sense_data.add_sense_code_qual == 0x85)
ioa->nr_ioa_microcode = 1;
}
close(fd);
return rc;
}
/**
* ipr_start_array - Start array protection for an array
* @ioa: ipr ioa struct
* @cmd: char pointer
* @stripe_size: stripe size for new array
* @prot_level: protection (RAID) level for new array
* @hot_spare: flag to indicate hot spare usage
*
* Returns:
* 0 if success / non-zero on failure
**/
static int ipr_start_array(struct ipr_ioa *ioa, char *cmd,
int stripe_size, int prot_level, int hot_spare)
{
int fd;
u8 cdb[IPR_CCB_CDB_LEN];
struct sense_data_t sense_data;
int rc;
int length = ioa->qac_data->resp_len;
if (strlen(ioa->ioa.gen_name) == 0)
return -ENOENT;
fd = open(ioa->ioa.gen_name, O_RDWR);
if (fd <= 1) {
if (!strcmp(tool_name, "iprconfig") || ipr_debug)
syslog(LOG_ERR, "Could not open %s. %m\n", ioa->ioa.gen_name);
return errno;
}
ipr_update_qac_with_zeroed_devs(ioa);
memset(cdb, 0, IPR_CCB_CDB_LEN);
cdb[0] = IPR_START_ARRAY_PROTECTION;
if (hot_spare)
cdb[1] = 0x01;
cdb[4] = (u8)(stripe_size >> 8);
cdb[5] = (u8)(stripe_size & 0xff);
cdb[6] = prot_level;
cdb[7] = (length & 0xff00) >> 8;
cdb[8] = length & 0xff;
if (ioa->sis64) {
cdb[10] = (length & 0xff000000) >> 24;
cdb[11] = (length & 0xff0000) >> 16;
}
rc = sg_ioctl(fd, cdb, ioa->qac_data->u.buf,
length, SG_DXFER_TO_DEV,
&sense_data, IPR_ARRAY_CMD_TIMEOUT);
if (rc != 0)
ioa_cmd_err(ioa, &sense_data, "Start Array Protection", rc);
close(fd);
return rc;
}
/**
* ipr_start_array_protection - Start array protection for an array
* @ioa: ipr ioa struct
* @stripe_size: stripe size for new array
* @prot_level: protection (RAID) level for new array
*
* Returns:
* 0 if success / non-zero on failure
**/
int ipr_start_array_protection(struct ipr_ioa *ioa,
int stripe_size, int prot_level)
{
return ipr_start_array(ioa, "Start Array Protection",
stripe_size, prot_level, 0);
}
/**
* ipr_migrate_array_protection - Migrate array protection for an array
* @ioa: ipr ioa struct
* @qac_data: struct ipr_array_query_data
* @fd: file descriptor
* @stripe_size: new or existing stripe size for array
* @prot_level: new protection (RAID) level for array
*
* Returns:
* 0 if success / non-zero on failure
**/
int ipr_migrate_array_protection(struct ipr_ioa *ioa,
struct ipr_array_query_data *qac_data,
int fd, int stripe_size, int prot_level)
{
u8 cdb[IPR_CCB_CDB_LEN];
char *cmd = "migrate array protection";
struct sense_data_t sense_data;
int rc;
int length = qac_data->resp_len;
memset(cdb, 0, IPR_CCB_CDB_LEN);
cdb[0] = IPR_MIGRATE_ARRAY_PROTECTION;
cdb[4] = (u8)(stripe_size >> 8);
cdb[5] = (u8)(stripe_size & 0xff);
cdb[6] = prot_level;
cdb[7] = (length & 0xff00) >> 8;
cdb[8] = length & 0xff;
if (ioa->sis64) {
cdb[10] = (length & 0xff000000) >> 24;
cdb[11] = (length & 0xff0000) >> 16;
}
rc = sg_ioctl(fd, cdb, qac_data->u.buf,
length, SG_DXFER_TO_DEV,
&sense_data, IPR_ARRAY_CMD_TIMEOUT);
if (rc != 0)
ioa_cmd_err(ioa, &sense_data, cmd, rc);
return rc;
}
/**
* ipr_add_hot_spare - Adds a hot spare to an array
* @ioa: ipr ioa struct
*
* Returns:
* 0 if success / non-zero on failure
**/
int ipr_add_hot_spare(struct ipr_ioa *ioa)
{
return ipr_start_array(ioa, "Create hot spare", 0, 0, 1);
}
/**
* ipr_stop_array - Stop array protection for an array
* @ioa: ipr ioa struct
* @cmd: command string
* @hot_spare: flag to indicate hot spare usage
*
* Returns:
* 0 if success / non-zero on failure
**/
static int ipr_stop_array(struct ipr_ioa *ioa, char *cmd, int hot_spare)
{
int fd;
u8 cdb[IPR_CCB_CDB_LEN];
struct sense_data_t sense_data;
int rc;
int length = ioa->qac_data->resp_len;
if (strlen(ioa->ioa.gen_name) == 0)
return -ENOENT;
fd = open(ioa->ioa.gen_name, O_RDWR);
if (fd <= 1) {
if (!strcmp(tool_name, "iprconfig") || ipr_debug)
syslog(LOG_ERR, "Could not open %s. %m\n", ioa->ioa.gen_name);
return errno;
}
memset(cdb, 0, IPR_CCB_CDB_LEN);
cdb[0] = IPR_STOP_ARRAY_PROTECTION;
if (hot_spare)
cdb[1] = 0x01;
cdb[7] = (length & 0xff00) >> 8;
cdb[8] = length & 0xff;
if (ioa->sis64) {
cdb[10] = (length & 0xff000000) >> 24;
cdb[11] = (length & 0xff0000) >> 16;
}
rc = sg_ioctl(fd, cdb, ioa->qac_data->u.buf,
length, SG_DXFER_TO_DEV,
&sense_data, IPR_ARRAY_CMD_TIMEOUT);
if (rc != 0)
ioa_cmd_err(ioa, &sense_data, cmd, rc);
close(fd);
return rc;
}
static void ipr_mpath_flush()
{
int pid, status;
/* flush unused multipath device maps */
pid = fork();
if (pid == 0) {
execlp("multipath", "-F", NULL);
_exit(errno);
} else
waitpid(pid, &status, 0);
}
/**
* ipr_stop_array_protection - Stop array protection for an array
* @ioa: ipr ioa struct
*
* Returns:
* 0 if success / non-zero on failure
**/
int ipr_stop_array_protection(struct ipr_ioa *ioa)
{
ipr_mpath_flush();
return ipr_stop_array(ioa, "Stop Array Protection", 0);
}
/**
* ipr_remove_hot_spare - remove a hot spare from an array
* @ioa: ipr ioa struct
*
* Returns:
* 0 if success / non-zero on failure
**/
int ipr_remove_hot_spare(struct ipr_ioa *ioa)
{
return ipr_stop_array(ioa, "Delete hot spare", 1);
}
/**
* ipr_rebuild_device_data -
* @ioa: ipr ioa struct
*
* Returns:
* 0 if success / non-zero on failure
**/
int ipr_rebuild_device_data(struct ipr_ioa *ioa)
{
int fd;
u8 cdb[IPR_CCB_CDB_LEN];
struct sense_data_t sense_data;
int rc;
int length = ioa->qac_data->resp_len;
if (strlen(ioa->ioa.gen_name) == 0)
return -ENOENT;
fd = open(ioa->ioa.gen_name, O_RDWR);
if (fd <= 1) {
if (!strcmp(tool_name, "iprconfig") || ipr_debug)
syslog(LOG_ERR, "Could not open %s. %m\n", ioa->ioa.gen_name);
return errno;
}
memset(cdb, 0, IPR_CCB_CDB_LEN);
cdb[0] = IPR_REBUILD_DEVICE_DATA;
cdb[7] = (length & 0xff00) >> 8;
cdb[8] = length & 0xff;
if (ioa->sis64) {
cdb[10] = (length & 0xff000000) >> 24;
cdb[11] = (length & 0xff0000) >> 16;
}
rc = sg_ioctl(fd, cdb, ioa->qac_data->u.buf, length,
SG_DXFER_TO_DEV, &sense_data, IPR_ARRAY_CMD_TIMEOUT);
if (rc != 0)
ioa_cmd_err(ioa, &sense_data, "Rebuild Device Data", rc);
close(fd);
return rc;
}
/**
* ipr_resync_array -
* @ioa: ipr ioa struct
*
* Returns:
* 0 if success / non-zero on failure
**/
int ipr_resync_array(struct ipr_ioa *ioa)
{
int fd;
u8 cdb[IPR_CCB_CDB_LEN];
struct sense_data_t sense_data;
int rc;
int length = ioa->qac_data->resp_len;
if (strlen(ioa->ioa.gen_name) == 0)
return -ENOENT;
fd = open(ioa->ioa.gen_name, O_RDWR);
if (fd <= 1) {
if (!strcmp(tool_name, "iprconfig") || ipr_debug)
syslog(LOG_ERR, "Could not open %s. %m\n", ioa->ioa.gen_name);
return errno;
}
memset(cdb, 0, IPR_CCB_CDB_LEN);
cdb[0] = IPR_RESYNC_ARRAY_PROTECTION;
cdb[7] = (length & 0xff00) >> 8;
cdb[8] = length & 0xff;
if (ioa->sis64) {
cdb[10] = (length & 0xff000000) >> 24;
cdb[11] = (length & 0xff0000) >> 16;
}
rc = sg_ioctl(fd, cdb, ioa->qac_data->u.buf, length,
SG_DXFER_TO_DEV, &sense_data, IPR_ARRAY_CMD_TIMEOUT);
if (rc != 0)
ioa_cmd_err(ioa, &sense_data, "Resync Array", rc);
close(fd);
return rc;
}
/**
* ipr_add_array_device -
* @ioa: ipr ioa struct
* @fd: device/file descriptor
* @qac_data: query array configuration info
*
* Returns:
* 0 if success / non-zero on failure
**/
int ipr_add_array_device(struct ipr_ioa *ioa, int fd,
struct ipr_array_query_data *qac_data)
{
u8 cdb[IPR_CCB_CDB_LEN];
struct sense_data_t sense_data;
int rc;
int length = qac_data->resp_len;
ipr_update_qac_with_zeroed_devs(ioa);
memset(cdb, 0, IPR_CCB_CDB_LEN);
cdb[0] = IPR_ADD_ARRAY_DEVICE;
cdb[7] = (length & 0xff00) >> 8;
cdb[8] = length & 0xff;
if (ioa->sis64) {
cdb[10] = (length & 0xff000000) >> 24;
cdb[11] = (length & 0xff0000) >> 16;
}
rc = sg_ioctl(fd, cdb, qac_data->u.buf,
length, SG_DXFER_TO_DEV,
&sense_data, IPR_ARRAY_CMD_TIMEOUT);
if (rc != 0)
ioa_cmd_err(ioa, &sense_data, "Add Array Device", rc);
return rc;
}
/**
* ipr_query_command_status -
* @dev: ipr dev struct
* @buff: data buffer
*
* Returns:
* 0 if success / non-zero on failure
**/
int ipr_query_command_status(struct ipr_dev *dev, void *buff)
{
int fd, rc;
u8 cdb[IPR_CCB_CDB_LEN];
struct sense_data_t sense_data;
int length = sizeof(struct ipr_cmd_status);
char *name = dev->gen_name;
if (strlen(name) == 0)
return -ENOENT;
fd = open(name, O_RDWR);
if (fd <= 1) {
if (!strcmp(tool_name, "iprconfig") || ipr_debug)
syslog(LOG_ERR, "Could not open %s. %m\n", name);
return errno;
}
memset(cdb, 0, IPR_CCB_CDB_LEN);
cdb[0] = IPR_QUERY_COMMAND_STATUS;
cdb[7] = (length & 0xff00) >> 8;
cdb[8] = length & 0xff;
rc = sg_ioctl(fd, cdb, buff,
length, SG_DXFER_FROM_DEV,
&sense_data, IPR_ARRAY_CMD_TIMEOUT);
if ((rc != 0) && (errno != EINVAL || ipr_debug))
scsi_cmd_err(dev, &sense_data, "Query Command Status", rc);
close(fd);
return rc;
}
/**
* ipr_query_resource_state
* @dev: ipr dev struct
* @buff: data buffer
*
* Returns:
* 0 if success / non-zero on failure
**/
int ipr_query_resource_state(struct ipr_dev *dev, void *buff)
{
int fd, rc;
u8 cdb[IPR_CCB_CDB_LEN];
struct sense_data_t sense_data;
int length = sizeof(struct ipr_query_res_state);
char *name = dev->gen_name;
if (strlen(name) == 0)
return -ENOENT;
fd = open(name, O_RDWR);
if (fd <= 1) {
if (!strcmp(tool_name, "iprconfig") || ipr_debug)
syslog(LOG_ERR, "Could not open %s. %m\n", name);
return errno;
}
memset(cdb, 0, IPR_CCB_CDB_LEN);
cdb[0] = IPR_QUERY_RESOURCE_STATE;
cdb[7] = (length & 0xff00) >> 8;
cdb[8] = length & 0xff;
rc = sg_ioctl(fd, cdb, buff,
length, SG_DXFER_FROM_DEV,
&sense_data, IPR_ARRAY_CMD_TIMEOUT);
if (rc != 0)
scsi_cmd_err(dev, &sense_data, "Query Resource State", rc);
close(fd);
return rc;
}
/**
* ipr_mod_sense - issue a mode sense command
* @dev: ipr dev struct
* @page: mode page
* @buff: data buffer
*
* Returns:
* 0 if success / non-zero on failure
**/
int ipr_mode_sense(struct ipr_dev *dev, u8 page, void *buff)
{
struct sense_data_t sense_data;
int rc;
memset(&sense_data, 0, sizeof(sense_data));
rc = mode_sense(dev, page, buff, &sense_data);
/* post log if error unless error is device format in progress */
if ((rc != 0) && (rc != ENOENT) &&
(((sense_data.error_code & 0x7F) != 0x70) ||
((sense_data.sense_key & 0x0F) != 0x02) || /* NOT READY */
(sense_data.add_sense_code != 0x04) || /* LOGICAL UNIT NOT READY */
(sense_data.add_sense_code_qual != 0x04))) /* FORMAT IN PROGRESS */
scsi_cmd_err(dev, &sense_data, "Mode Sense", rc);
return rc;
}
/**
* ipr_log_sense - issue a log sense command
* @dev: ipr dev struct
* @page: mode page
* @buff: data buffer
* @length: buffer length
*
* Returns:
* 0 if success / non-zero on failure
**/
int ipr_log_sense(struct ipr_dev *dev, u8 page, void *buff, u16 length)
{
struct sense_data_t sense_data;
u8 cdb[IPR_CCB_CDB_LEN];
int fd, rc;
char *name = dev->gen_name;
memset(&sense_data, 0, sizeof(sense_data));
if (strlen(name) == 0)
return -ENOENT;
fd = open(name, O_RDWR);
if (fd <= 1) {
scsi_dbg(dev, "Could not open %s. %m\n", name);
return errno;
}
memset(cdb, 0, IPR_CCB_CDB_LEN);
cdb[0] = LOG_SENSE;
cdb[2] = 0x40 | page;
cdb[7] = (length >> 8) & 0xff;
cdb[8] = length & 0xff;
rc = sg_ioctl(fd, cdb, buff,
length, SG_DXFER_FROM_DEV,
&sense_data, IPR_INTERNAL_DEV_TIMEOUT);
scsi_cmd_dbg(dev, &sense_data, cdb, rc);
close(fd);
return rc;
}
/**
* ipr_is_log_page_supported - is the give page supported?
* @dev: ipr dev struct
* @page: mode page
*
* Returns:
* 1 if supported / 0 if not supported
**/
int ipr_is_log_page_supported(struct ipr_dev *dev, u8 page)
{
struct ipr_supp_log_pages pages;
int rc, i;
memset(&pages, 0, sizeof(pages));
rc = ipr_log_sense(dev, 0, &pages, sizeof(pages));
if (rc)
return -EIO;
for (i = 0; i < ntohs(pages.length); i++) {
if (pages.page[i] == page)
return 1;
}
return 0;
}
/** ipr_sas_log_get_param - Fetch parameter from log page.
*
* Iterate over an already fetched log page pointed by page and return a
* pointer to the beginning of the parameter.
*
* @page: An already fetched log page.
* @param: to be fetched
*
* Returns: @dst: A pointer to the original page area starting at the
* parameter. NULL if parameter was not found.
* @entries_cnt: output parameter, the number of entries found in the
* page.
**/
void *ipr_sas_log_get_param(const struct ipr_sas_log_page *page,
u32 param_code, int *entries_cntr)
{
int page_length;
int i;
const u8 *raw_data = page->raw_data;
u32 cur_code;
struct log_parameter_hdr *hdr;
void *ret = NULL;
if (entries_cntr)
*entries_cntr = 0;
page_length = (page->page_length[0] << 8) | page->page_length[1];
for(i = 0; i < page_length && i < IPR_SAS_LOG_MAX_ENTRIES;
i += hdr->length + sizeof(*hdr)) {
hdr = (struct log_parameter_hdr *) &raw_data[i];
cur_code = (hdr->parameter_code[0] << 8) | hdr->parameter_code[1];
if (cur_code == param_code) {
ret = hdr;
if (!entries_cntr)
break;
}
if (entries_cntr)
*entries_cntr += 1;
}
return ret;
}
/**
* ipr_get_blk_size - return the block size for the given device
* @dev: ipr dev struct
*
* Returns:
* block size if success / non-zero on failure
**/
int ipr_get_blk_size(struct ipr_dev *dev)
{
struct ipr_mode_pages mode_pages;
struct ipr_block_desc *block_desc;
int rc;
rc = ipr_mode_sense(dev, 0, &mode_pages);
if (rc)
return rc;
if (mode_pages.hdr.block_desc_len > 0) {
block_desc = (struct ipr_block_desc *)mode_pages.data;
return ((block_desc->block_length[1] << 8) | block_desc->block_length[2]);
}
return 0;
}
/**
* ipr_mode_select - issue a mode select command
* @dev: ipr dev struct
* @buff: data buffer
* @length: length of buffer
*
* Returns:
* 0 if success / non-zero on failure
**/
int ipr_mode_select(struct ipr_dev *dev, void *buff, int length)
{
int fd;
u8 cdb[IPR_CCB_CDB_LEN];
struct sense_data_t sense_data;
int rc;
char *name = dev->gen_name;
if (strlen(name) == 0)
return -ENOENT;
fd = open(name, O_RDWR);
if (fd <= 1) {
if (!strcmp(tool_name, "iprconfig") || ipr_debug)
syslog(LOG_ERR, "Could not open %s. %m\n", name);
return errno;
}
memset(cdb, 0, IPR_CCB_CDB_LEN);
cdb[0] = MODE_SELECT;
cdb[1] = 0x10; /* PF = 1, SP = 0 */
cdb[4] = length;
rc = sg_ioctl(fd, cdb, buff,
length, SG_DXFER_TO_DEV,
&sense_data, IPR_INTERNAL_TIMEOUT);
if (rc != 0)
scsi_cmd_err(dev, &sense_data, "Mode Select", rc);
close(fd);
return rc;
}
/**
* page0x0a_setup - Start array protection for an array
* @dev: ipr dev struct
*
* Returns:
* 1 if success / 0 on failure
**/
int page0x0a_setup(struct ipr_dev *dev)
{
struct ipr_mode_pages mode_pages;
struct ipr_control_mode_page *page;
memset(&mode_pages, 0, sizeof(mode_pages));
if (ipr_mode_sense(dev, 0x0A, &mode_pages))
return -EIO;
page = (struct ipr_control_mode_page *)(((u8 *)&mode_pages) +
mode_pages.hdr.block_desc_len +
sizeof(mode_pages.hdr));
if (page->queue_algorithm_modifier != 1)
return 0;
if (page->tst == 1 && page->qerr != 3)
return 0;
if (page->qerr != 1)
return 0;
if (page->dque != 0)
return 0;
return 1;
}
/**
* ipr_setup_af_qdepth -
* @dev: ipr dev struct
* @qdepth: queue depth
*
* Returns:
* 0 if success / non-zero on failure
**/
static int ipr_setup_af_qdepth(struct ipr_dev *dev, int qdepth)
{
struct ipr_mode_pages mode_pages;
struct ipr_ioa_mode_page *page;
int len;
memset(&mode_pages, 0, sizeof(mode_pages));
if (ipr_mode_sense(dev, 0x20, &mode_pages))
return -EIO;
page = (struct ipr_ioa_mode_page *) (((u8 *)&mode_pages) +
mode_pages.hdr.block_desc_len +
sizeof(mode_pages.hdr));
page->max_tcq_depth = qdepth;
len = mode_pages.hdr.length + 1;
mode_pages.hdr.length = 0;
mode_pages.hdr.medium_type = 0;
mode_pages.hdr.device_spec_parms = 0;
page->hdr.parms_saveable = 0;
if (ipr_mode_select(dev, &mode_pages, len))
return -EIO;
return 0;
}
/**
* ipr_reset_device - issue a SG_SCSI_RESET to a device
* @dev: ipr dev struct
*
* Returns:
* 0 if success / non-zero on failure
**/
int ipr_reset_device(struct ipr_dev *dev)
{
int fd, rc, arg;
if (strlen(dev->gen_name) == 0)
return -ENOENT;
fd = open(dev->gen_name, O_RDWR);
if (fd <= 1) {
if (!strcmp(tool_name, "iprconfig") || ipr_debug)
syslog(LOG_ERR, "Could not open %s. %m\n", dev->gen_name);
return errno;
}
arg = SG_SCSI_RESET_DEVICE;
rc = ioctl(fd, SG_SCSI_RESET, &arg);
if (rc != 0)
scsi_err(dev, "Reset Device failed. %m\n");
close(fd);
return rc;
}
/**
* ipr_re_read_partition -
* @dev: ipr dev struct
*
* Returns:
* 0 if success / non-zero on failure
**/
int ipr_re_read_partition(struct ipr_dev *dev)
{
int fd, rc;
if (strlen(dev->dev_name) == 0)
return -ENOENT;
fd = open(dev->dev_name, O_RDWR);
if (fd <= 1) {
if (!strcmp(tool_name, "iprconfig") || ipr_debug)
syslog(LOG_ERR, "Could not open %s. %m\n", dev->gen_name);
return errno;
}
rc = ioctl(fd, BLKRRPART, NULL);
if (rc != 0)
scsi_err(dev, "Re-read partition table failed. %m\n");
close(fd);
return rc;
}
/**
* ipr_read_capacity - issue a read capacity command to a device
* @dev: ipr dev struct
* @buff: data buffer
*
* Returns:
* 0 if success / non-zero on failure
**/
int ipr_read_capacity(struct ipr_dev *dev, void *buff)
{
int fd;
u8 cdb[IPR_CCB_CDB_LEN];
struct sense_data_t sense_data;
int rc;
int length = sizeof(struct ipr_read_cap);
char *name = dev->gen_name;
if (strlen(name) == 0)
return -ENOENT;
fd = open(name, O_RDWR);
if (fd <= 1) {
if (!strcmp(tool_name, "iprconfig") || ipr_debug)
syslog(LOG_ERR, "Could not open %s. %m\n", name);
return errno;
}
memset(cdb, 0, IPR_CCB_CDB_LEN);
cdb[0] = READ_CAPACITY;
rc = sg_ioctl(fd, cdb, buff,
length, SG_DXFER_FROM_DEV,
&sense_data, IPR_INTERNAL_DEV_TIMEOUT);
if (rc != 0)
scsi_cmd_err(dev, &sense_data, "Read Capacity", rc);
close(fd);
return rc;
}
/**
* ipr_read_capacity_16 - issue a read capacity 16 to a device
* @dev: ipr dev struct
* @buff: data buffer
*
* Returns:
* 0 if success / non-zero on failure
**/
int ipr_read_capacity_16(struct ipr_dev *dev, void *buff)
{
int fd, rc;
u8 cdb[IPR_CCB_CDB_LEN];
struct sense_data_t sense_data;
int length = sizeof(struct ipr_read_cap16);
char *name = dev->gen_name;
if (strlen(name) == 0)
return -ENOENT;
fd = open(name, O_RDWR);
if (fd <= 1) {
if (!strcmp(tool_name, "iprconfig") || ipr_debug)
syslog(LOG_ERR, "Could not open %s. %m\n", name);
return errno;
}
memset(cdb, 0, IPR_CCB_CDB_LEN);
cdb[0] = IPR_SERVICE_ACTION_IN;
cdb[1] = IPR_READ_CAPACITY_16;
cdb[10] = length >> 24;
cdb[11] = length>> 16 & 0xff;
cdb[12] = length >> 8 & 0xff;
cdb[13] = length & 0xff;
rc = sg_ioctl(fd, cdb, buff,
length, SG_DXFER_FROM_DEV,
&sense_data, IPR_INTERNAL_DEV_TIMEOUT);
if (rc != 0)
scsi_cmd_err(dev, &sense_data, "Read Capacity", rc);
close(fd);
return rc;
}
/**
* ipr_reclaim_cache_store -
* @ioa: ipr ioa struct
* @action: action value
* @buff: data buffer
*
* Returns:
* 0 if success / non-zero on failure
**/
int ipr_reclaim_cache_store(struct ipr_ioa *ioa, int action, void *buff)
{
char *file = ioa->ioa.gen_name;
int fd;
u8 cdb[IPR_CCB_CDB_LEN];
struct sense_data_t sense_data;
int timeout, rc;
int length = sizeof(struct ipr_reclaim_query_data);
if (strlen(file) == 0)
return -ENOENT;
fd = open(file, O_RDWR);
if (fd <= 1) {
if (!strcmp(tool_name, "iprconfig") || ipr_debug)
syslog(LOG_ERR, "Could not open %s. %m\n",file);
return errno;
}
memset(cdb, 0, IPR_CCB_CDB_LEN);
cdb[0] = IPR_RECLAIM_CACHE_STORE;
cdb[1] = (u8)action;
cdb[7] = (length & 0xff00) >> 8;
cdb[8] = length & 0xff;
if ((action & IPR_RECLAIM_ACTION) == IPR_RECLAIM_PERFORM)
timeout = IPR_CACHE_RECLAIM_TIMEOUT;
else
timeout = IPR_INTERNAL_DEV_TIMEOUT;
rc = sg_ioctl(fd, cdb, buff,
length, SG_DXFER_FROM_DEV,
&sense_data, timeout);
if (rc != 0) {
if (sense_data.sense_key != ILLEGAL_REQUEST)
ioa_cmd_err(ioa, &sense_data, "Reclaim Cache", rc);
}
else if ((action & IPR_RECLAIM_ACTION) == IPR_RECLAIM_PERFORM)
ipr_reset_adapter(ioa);
close(fd);
return rc;
}
/**
* ipr_start_stop -
* @dev: ipr dev struct
* @start: start or stop flag
* @cmd: command buffer
*
* Returns:
* 0 if success / non-zero on failure
**/
static int ipr_start_stop(struct ipr_dev *dev, u8 start, char *cmd)
{
int fd, rc;
u8 cdb[IPR_CCB_CDB_LEN];
struct sense_data_t sense_data;
char *name = dev->gen_name;
if (strlen(name) == 0)
return -ENOENT;
fd = open(name, O_RDWR);
if (fd <= 1) {
if (!strcmp(tool_name, "iprconfig") || ipr_debug)
syslog(LOG_ERR, "Could not open %s. %m\n", name);
return errno;
}
memset(cdb, 0, IPR_CCB_CDB_LEN);
cdb[0] = START_STOP;
cdb[4] = start;
rc = sg_ioctl(fd, cdb, NULL,
0, SG_DXFER_NONE,
&sense_data, IPR_INTERNAL_DEV_TIMEOUT);
if (rc != 0)
scsi_cmd_err(dev, &sense_data, cmd, rc);
close(fd);
return rc;
}
/**
* ipr_start_stop_start -
* @dev: ipr dev struct
*
* Returns:
* 0 if success / non-zero on failure
**/
int ipr_start_stop_start(struct ipr_dev *dev)
{
return ipr_start_stop(dev, IPR_START_STOP_START, "Start Unit");
}
/**
* ipr_check_allow_restart - check the allow_restart flag for a device
* @dev: ipr dev struct
*
* Return value:
* none
**/
int ipr_check_allow_restart(struct ipr_dev *dev)
{
char path[PATH_MAX];
char value[8];
ssize_t len;
sprintf(path,"/sys/class/scsi_disk/%s",
dev->scsi_dev_data->sysfs_device_name);
len = sysfs_read_attr(path, "allow_restart", value, 8);
if (len < 1) {
syslog_dbg("Failed to open allow_restart parameter.\n");
return -1;
}
return atoi(value);
}
/**
* ipr_allow_restart - set or clear the allow_restart flag for a device
* @dev: ipr dev struct
* @allow: value to set
*
* Return value:
* none
**/
void ipr_allow_restart(struct ipr_dev *dev, int allow)
{
char path[PATH_MAX];
char value_str[8];
ssize_t len;
sprintf(path,"/sys/class/scsi_disk/%s",
dev->scsi_dev_data->sysfs_device_name);
len = sysfs_read_attr(path, "allow_restart", value_str, 8);
if (len < 1) {
syslog_dbg("Failed to open allow_restart parameter.\n");
return;
}
if (atoi(value_str) == allow) {
return;
}
snprintf(value_str, 8, "%d", allow);
if (sysfs_write_attr(path, "allow_restart", value_str, 1) < 0)
syslog_dbg("Failed to write allow_restart parameter.\n");
}
/**
* ipr_start_stop_stop -
* @dev: ipr dev struct
*
* Returns:
* 0 if success / non-zero on failure
**/
int ipr_start_stop_stop(struct ipr_dev *dev)
{
return ipr_start_stop(dev, IPR_START_STOP_STOP, "Stop Unit");
}
/**
* ipr_set_dev_cache_policy
*
* Set the default cache policy for a device.
*
* @ipr_dev: Device to change policy.
* @policy: New policy
*
* Returns:
* 0 if success / non-zero on failure
**/
static int ipr_set_dev_wcache_policy (const struct ipr_dev *dev, int policy)
{
char path[PATH_MAX];
char *cache_type;
char current_type[100];
memset(current_type, 0, sizeof(current_type));
sprintf(path, "/sys/class/scsi_disk/%s",
dev->scsi_dev_data->sysfs_device_name);
switch (policy) {
case IPR_DEV_CACHE_WRITE_THROUGH:
cache_type = "write through\n";
break;
case IPR_DEV_CACHE_WRITE_BACK:
cache_type = "write back\n";
break;
default:
return -EINVAL;
}
if (sysfs_write_attr(path, "cache_type", cache_type,
strlen(cache_type)) < 0) {
syslog_dbg("Failed to write cache_type parameter of %s",
dev->dev_name);
return -EINVAL;
}
if (sysfs_read_attr(path, "cache_type", current_type, 100) < 0) {
syslog_dbg("Failed to read cache_type parameter of %s",
dev->dev_name);
return -EINVAL;
}
if (strncmp (current_type, cache_type, 100) != 0) {
syslog_dbg("Failed to set cache_type parameter of %s",
dev->dev_name);
return -EINVAL;
}
return 0;
}
/**
* ipr_dev_wcache_policy
*
* Check the default cache policy of a device.
*
* @ipr_dev: Device to change policy.
* @policy: Returned value. New policy.
*
* Returns:
* policy = [0, 1] / < 0 if failure.
**/
static int ipr_dev_wcache_policy (const struct ipr_dev *dev)
{
char path[PATH_MAX];
char cache_type[100];
sprintf(path, "/sys/class/scsi_disk/%s",
dev->scsi_dev_data->sysfs_device_name);
memset(cache_type, '\0', ARRAY_SIZE(cache_type));
if (sysfs_read_attr(path, "cache_type", cache_type, 100) < 0) {
syslog_dbg("Failed to read cache_type parameter of %s",
dev->dev_name);
return -EINVAL;
}
if (strncmp (cache_type, "write through\n", 100) == 0)
return IPR_DEV_CACHE_WRITE_THROUGH;
else if (strncmp (cache_type, "write back\n", 100) == 0)
return IPR_DEV_CACHE_WRITE_BACK;
return -EINVAL;
}
/**
* __ipr_test_unit_ready - issue a test unit ready command
* @dev: ipr dev struct
* @sense_data: sense data struct
*
* Returns:
* 0 if success / non-zero on failure
**/
int __ipr_test_unit_ready(struct ipr_dev *dev,
struct sense_data_t *sense_data)
{
int fd, rc;
u8 cdb[IPR_CCB_CDB_LEN];
int allow_restart = 0;
char *name = dev->gen_name;
if (strlen(name) == 0)
return -ENOENT;
fd = open(name, O_RDWR);
if (fd <= 1) {
if (!strcmp(tool_name, "iprconfig") || ipr_debug)
syslog(LOG_ERR, "Could not open %s. %m\n", name);
return errno;
}
memset(cdb, 0, IPR_CCB_CDB_LEN);
cdb[0] = TEST_UNIT_READY;
rc = sg_ioctl(fd, cdb, NULL,
0, SG_DXFER_NONE,
sense_data, IPR_INTERNAL_DEV_TIMEOUT);
close(fd);
if (rc && sense_data->sense_key == NOT_READY &&
sense_data->add_sense_code == 0x4 &&
sense_data->add_sense_code_qual == 0x2) {
allow_restart = ipr_check_allow_restart(dev);
if (allow_restart)
ipr_start_stop(dev, IPR_START_STOP_START, "Start Unit");
}
return rc;
}
/**
* ipr_test_unit_ready - issue a test unit ready command
* @dev: ipr dev struct
* @sense_data: sense data struct
*
* Returns:
* 0 if success / non-zero on failure
**/
int ipr_test_unit_ready(struct ipr_dev *dev,
struct sense_data_t *sense_data)
{
int rc = __ipr_test_unit_ready(dev, sense_data);
if (rc != 0 && sense_data->sense_key != NOT_READY &&
sense_data->sense_key != UNIT_ATTENTION &&
(!strcmp(tool_name, "iprconfig") || ipr_debug))
scsi_cmd_err(dev, sense_data, "Test Unit Ready", rc);
return rc;
}
static struct ipr_dev *find_multipath_jbod(struct ipr_dev *dev)
{
struct ipr_ioa *ioa;
struct ipr_dev *multipath_dev;
u64 id = dev->scsi_dev_data->device_id;
for_each_sas_ioa(ioa) {
if (ioa == dev->ioa)
continue;
for_each_dev(ioa, multipath_dev) {
if (multipath_dev == dev)
continue;
if (multipath_dev->scsi_dev_data &&
id == multipath_dev->scsi_dev_data->device_id)
return multipath_dev;
}
}
return NULL;
}
int ipr_device_lock(struct ipr_dev *dev)
{
int fd, rc;
char *name = dev->gen_name;
if (strlen(name) == 0)
return -ENOENT;
if (dev->locked) {
scsi_dbg(dev, "Device already locked\n");
return -EINVAL;
}
fd = open(name, O_RDWR);
if (fd <= 1) {
if (!strcmp(tool_name, "iprconfig") || ipr_debug)
syslog(LOG_ERR, "Could not open %s. %m\n", name);
return errno;
}
rc = flock(fd, LOCK_EX | LOCK_NB);
if (rc) {
if (!strcmp(tool_name, "iprconfig") || ipr_debug)
syslog(LOG_ERR, "Could not lock %s. %m\n", name);
close(fd);
return errno;
}
/* Do not close the file descriptor here as we want to hold onto the lock */
dev->locked = 1;
dev->lock_fd = fd;
return rc;
}
void ipr_device_unlock(struct ipr_dev *dev)
{
if (dev->locked) {
close(dev->lock_fd);
dev->locked = 0;
dev->lock_fd = 0;
}
}
/**
* ipr_format_unit -
* @dev: ipr dev struct
*
* Returns:
* 0 if success / non-zero on failure
**/
int ipr_format_unit(struct ipr_dev *dev)
{
int fd, rc;
u8 cdb[IPR_CCB_CDB_LEN];
struct sense_data_t sense_data;
u8 *defect_list_hdr;
int length = IPR_DEFECT_LIST_HDR_LEN;
char *name = dev->gen_name;
if (strlen(dev->dev_name) && dev->scsi_dev_data->device_id)
ipr_mpath_flush();
if (strlen(name) == 0)
return -ENOENT;
fd = open(name, O_RDWR);
if (fd <= 1) {
if (!strcmp(tool_name, "iprconfig") || ipr_debug)
syslog(LOG_ERR, "Could not open %s. %m\n", name);
return errno;
}
memset(cdb, 0, IPR_CCB_CDB_LEN);
defect_list_hdr = calloc(1, IPR_DEFECT_LIST_HDR_LEN);
cdb[0] = FORMAT_UNIT;
cdb[1] = IPR_FORMAT_DATA; /* lun = 0, fmtdata = 1, cmplst = 0, defect list format = 0 */
defect_list_hdr[1] = IPR_FORMAT_IMMED; /* FOV = 0, DPRY = 0, DCRT = 0, STPF = 0, IP = 0, DSP = 0, Immed = 1, VS = 0 */
rc = sg_ioctl(fd, cdb, defect_list_hdr,
length, SG_DXFER_TO_DEV,
&sense_data, IPR_INTERNAL_DEV_TIMEOUT);
free(defect_list_hdr);
if (rc != 0)
scsi_cmd_err(dev, &sense_data, "Format Unit", rc);
close(fd);
return rc;
}
/**
* ipr_evaluate_device -
* @dev: ipr dev struct
* @res_handle: resource handle
*
* Returns:
* 0 if success / non-zero on failure
**/
int ipr_evaluate_device(struct ipr_dev *dev, u32 res_handle)
{
int fd, rc;
u8 cdb[IPR_CCB_CDB_LEN];
struct sense_data_t sense_data;
u32 resource_handle;
int length = 0;
char *name = dev->gen_name;
if (strlen(name) == 0)
return -ENOENT;
fd = open(name, O_RDWR);
if (fd <= 1) {
if (!strcmp(tool_name, "iprconfig") || ipr_debug)
syslog(LOG_ERR, "Could not open %s. %m\n", name);
return errno;
}
memset(cdb, 0, IPR_CCB_CDB_LEN);
resource_handle = ntohl(res_handle);
cdb[0] = IPR_EVALUATE_DEVICE;
cdb[2] = (u8)(resource_handle >> 24);
cdb[3] = (u8)(resource_handle >> 16);
cdb[4] = (u8)(resource_handle >> 8);
cdb[5] = (u8)(resource_handle);
rc = sg_ioctl(fd, cdb, NULL,
length, SG_DXFER_FROM_DEV,
&sense_data, IPR_EVALUATE_DEVICE_TIMEOUT);
if (rc != 0 && sense_data.sense_key != ILLEGAL_REQUEST)
scsi_cmd_err(dev, &sense_data, "Evaluate Device Capabilities", rc);
close(fd);
return rc;
}
/**
* ipr_disrupt_device -
* @dev: ipr dev struct
*
* Returns:
* 0 if success / non-zero on failure
**/
int ipr_disrupt_device(struct ipr_dev *dev)
{
int fd, rc;
u8 cdb[IPR_CCB_CDB_LEN];
struct sense_data_t sense_data;
u32 res_handle;
char *name = dev->ioa->ioa.gen_name;
if (strlen(name) == 0)
return -ENOENT;
if (!dev->dev_rcd)
return -EINVAL;
fd = open(name, O_RDWR);
if (fd <= 1) {
if (!strcmp(tool_name, "iprconfig") || ipr_debug)
syslog(LOG_ERR, "Could not open %s. %m\n", name);
return errno;
}
memset(cdb, 0, IPR_CCB_CDB_LEN);
res_handle = ntohl(dev->resource_handle);
cdb[0] = IPR_IOA_SERVICE_ACTION;
cdb[1] = IPR_DISRUPT_DEVICE;
if (!ipr_force)
cdb[2] = 0x40;
cdb[6] = (u8)(res_handle >> 24);
cdb[7] = (u8)(res_handle >> 16);
cdb[8] = (u8)(res_handle >> 8);
cdb[9] = (u8)(res_handle);
scsi_info(dev, "Attempting to force device failure "
"with disrupt device command\n");
rc = sg_ioctl(fd, cdb, NULL,
0, SG_DXFER_NONE,
&sense_data, IPR_INTERNAL_DEV_TIMEOUT);
if (rc != 0 && sense_data.sense_key != ILLEGAL_REQUEST)
scsi_cmd_err(dev, &sense_data, "Disrupt Device", rc);
close(fd);
return rc;
}
/**
* ipr_inquiry - issue an inquiry command
* @dev: ipr dev struct
* @page: mode page
* @buff: data buffer
* @length buffer length
*
* Returns:
* 0 if success / non-zero on failure
**/
int ipr_inquiry(struct ipr_dev *dev, u8 page, void *buff, u8 length)
{
int fd, rc;
u8 cdb[IPR_CCB_CDB_LEN];
struct sense_data_t sense_data;
char *name = dev->gen_name;
if (strlen(name) == 0)
return -ENOENT;
fd = open(name, O_RDWR);
if (fd <= 1) {
if (!strcmp(tool_name, "iprconfig") || ipr_debug)
syslog(LOG_ERR, "Could not open %s. %m\n", name);
return errno;
}
memset(cdb, 0, IPR_CCB_CDB_LEN);
cdb[0] = INQUIRY;
if (page != IPR_STD_INQUIRY) {
cdb[1] = 0x01;
cdb[2] = page;
}
cdb[4] = length;
rc = sg_ioctl(fd, cdb, buff,
length, SG_DXFER_FROM_DEV,
&sense_data, IPR_INTERNAL_DEV_TIMEOUT);
if (rc != 0 && (ipr_debug || sense_data.sense_key != ILLEGAL_REQUEST))
scsi_cmd_err(dev, &sense_data, "Inquiry", rc);
close(fd);
return rc;
}
/**
* __ipr_get_fw_version - get the firmware version
* @dev: ipr dev struct
* @pag3_ing: page 3 inquiry data
* @release_level: location to copy version info into
*
* Returns:
* nothing
**/
static void __ipr_get_fw_version(struct ipr_dev *dev,
struct ipr_dasd_inquiry_page3 *page3_inq, u8 release_level[4])
{
if (ipr_is_ses(dev) && !__ioa_is_spi(dev->ioa))
memcpy(release_level, page3_inq->load_id, 4);
else
memcpy(release_level, page3_inq->release_level, 4);
}
/**
* ipr_get_fw_version - get the firmware version entry point
* @dev: ipr dev struct
* @release_level: location to copy version info into
*
* Returns:
* 0 if success / non-zero on failure
**/
int ipr_get_fw_version(struct ipr_dev *dev, u8 release_level[4])
{
struct ipr_dasd_inquiry_page3 page3_inq;
int rc;
memset(&page3_inq, 0, sizeof(page3_inq));
rc = ipr_inquiry(dev, 3, &page3_inq, sizeof(page3_inq));
if (rc)
return rc;
__ipr_get_fw_version(dev, &page3_inq, release_level);
return 0;
}
/**
* ipr_init_res_addr_aliases -
* @aliases: ipr_res_addr_aliases struct
* @res_addr: ipr_res_addr struct
*
* Returns:
* nothing
**/
static void ipr_init_res_addr_aliases(struct ipr_res_addr_aliases *aliases,
struct ipr_res_addr *res_addr)
{
struct ipr_res_addr *ra;
aliases->length = htonl(sizeof(*res_addr) * IPR_DEV_MAX_PATHS);
for_each_ra_alias(ra, aliases)
memcpy(ra, res_addr, sizeof(*ra));
}
/**
* ipr_query_res_addr_aliases -
* @ioa: ipr ioa struct
* @res_addr: ipr_res_addr struct
* @aliases: ipr_res_addr_aliases struct
*
* Returns:
* 0 if success / non-zero on failure
**/
int ipr_query_res_addr_aliases(struct ipr_ioa *ioa, struct ipr_res_addr *res_addr,
struct ipr_res_addr_aliases *aliases)
{
int fd, rc;
u8 cdb[IPR_CCB_CDB_LEN];
struct sense_data_t sense_data;
char *name = ioa->ioa.gen_name;
struct ipr_res_addr *ra;
ipr_init_res_addr_aliases(aliases, res_addr);
for_each_ra_alias(ra, aliases)
ra->host = ioa->host_num;
if (strlen(name) == 0)
return -ENOENT;
fd = open(name, O_RDWR);
if (fd <= 1) {
if (!strcmp(tool_name, "iprconfig") || ipr_debug)
syslog(LOG_ERR, "Could not open %s. %m\n", name);
return errno;
}
memset(cdb, 0, IPR_CCB_CDB_LEN);
cdb[0] = IPR_IOA_SERVICE_ACTION;
cdb[1] = IPR_QUERY_RES_ADDR_ALIASES;
cdb[3] = res_addr->bus;
cdb[4] = res_addr->target;
cdb[5] = res_addr->lun;
cdb[10] = sizeof(*aliases) >> 24;
cdb[11] = (sizeof(*aliases) >> 16) & 0xff;
cdb[12] = (sizeof(*aliases) >> 8) & 0xff;
cdb[13] = sizeof(*aliases) & 0xff;
rc = sg_ioctl(fd, cdb, aliases,
sizeof(*aliases), SG_DXFER_FROM_DEV,
&sense_data, IPR_INTERNAL_DEV_TIMEOUT);
if (rc || (ntohl(aliases->length) <= 4))
ipr_init_res_addr_aliases(aliases, res_addr);
if (rc != 0 && sense_data.sense_key != ILLEGAL_REQUEST)
ioa_cmd_err(ioa, &sense_data, "Query Resource Address Aliases", rc);
if (rc && sense_data.sense_key != ILLEGAL_REQUEST)
rc = 0;
for_each_ra_alias(ra, aliases)
ra->host = ioa->host_num;
close(fd);
return rc;
}
/**
* ipr_init_res_path_aliases -
* @aliases: ipr_res_path_aliases struct
* @res_addr: ipr_res_path
*
* Returns:
* nothing
**/
static void ipr_init_res_path_aliases(struct ipr_res_path_aliases *aliases,
struct ipr_res_path *res_path)
{
struct ipr_res_path *rp;
aliases->length = htonl(sizeof(*res_path) * IPR_DEV_MAX_PATHS);
for_each_rp_alias(rp, aliases) {
memcpy(rp, res_path, sizeof(*rp));
}
}
/**
* ipr_query_res_path_aliases -
* @ioa: ipr ioa struct
* @res_addr: ipr_res_path struct
* @aliases: ipr_res_ipr_aliases struct
*
* Returns:
* 0 if success / non-zero on failure
**/
int ipr_query_res_path_aliases(struct ipr_ioa *ioa, struct ipr_res_path *res_path,
struct ipr_res_path_aliases *aliases)
{
int fd, rc;
u8 cdb[IPR_CCB_CDB_LEN];
struct sense_data_t sense_data;
char *name = ioa->ioa.gen_name;
ipr_init_res_path_aliases(aliases, res_path);
if (strlen(name) == 0)
return -ENOENT;
fd = open(name, O_RDWR);
if (fd <= 1) {
if (!strcmp(tool_name, "iprconfig") || ipr_debug)
return errno;
}
memset(cdb, 0, IPR_CCB_CDB_LEN);
cdb[0] = IPR_IOA_SERVICE_ACTION;
cdb[1] = IPR_QUERY_RES_PATH_ALIASES;
memcpy(&cdb[2], res_path->res_path_bytes, sizeof(struct ipr_res_path));
cdb[10] = sizeof(*aliases) >> 24;
cdb[11] = (sizeof(*aliases) >> 16) & 0xff;
cdb[12] = (sizeof(*aliases) >> 8) & 0xff;
cdb[13] = sizeof(*aliases) & 0xff;
rc = sg_ioctl(fd, cdb, aliases,
sizeof(*aliases), SG_DXFER_FROM_DEV,
&sense_data, IPR_INTERNAL_DEV_TIMEOUT);
if (rc || (ntohl(aliases->length) <= 8))
ipr_init_res_path_aliases(aliases, res_path);
if (rc != 0 && sense_data.sense_key != ILLEGAL_REQUEST)
ioa_cmd_err(ioa, &sense_data, "Query Resource Path Aliases", rc);
if (rc && sense_data.sense_key != ILLEGAL_REQUEST)
rc = 0;
close(fd);
return rc;
}
/**
* ipr_query_sas_expander_info -
* @ioa: ipr ioa struct
* @info: ipr_query_sas_expander_info struct
*
* Returns:
* 0 if success / non-zero on failure
**/
int ipr_query_sas_expander_info(struct ipr_ioa *ioa,
struct ipr_query_sas_expander_info *info)
{
char *name = ioa->ioa.gen_name;
struct sense_data_t sense_data;
u8 cdb[IPR_CCB_CDB_LEN];
int fd, rc;
if (strlen(name) == 0)
return -ENOENT;
fd = open(name, O_RDWR);
if (fd <= 1) {
if (!strcmp(tool_name, "iprconfig") || ipr_debug)
syslog(LOG_ERR, "Could not open %s. %m\n", name);
return errno;
}
memset(cdb, 0, IPR_CCB_CDB_LEN);
cdb[0] = IPR_IOA_SERVICE_ACTION;
cdb[1] = IPR_QUERY_SAS_EXPANDER_INFO;
cdb[10] = sizeof(*info) >> 24;
cdb[11] = (sizeof(*info) >> 16) & 0xff;
cdb[12] = (sizeof(*info) >> 8) & 0xff;
cdb[13] = sizeof(*info) & 0xff;
rc = sg_ioctl(fd, cdb, info, sizeof(*info), SG_DXFER_FROM_DEV,
&sense_data, IPR_INTERNAL_DEV_TIMEOUT);
if (rc != 0 && sense_data.sense_key != ILLEGAL_REQUEST)
ioa_cmd_err(ioa, &sense_data, "Query SAS Expander Info", rc);
close(fd);
return rc;
}
/**
* ipr_change_cache_parameters
* @ioa: ipr ioa struct
* @mode: caching mode to set
*
* Returns:
* 0 if success / non-zero on failure
**/
int ipr_change_cache_parameters(struct ipr_ioa *ioa, int mode)
{
char *name = ioa->ioa.gen_name;
struct sense_data_t sense_data;
u8 cdb[IPR_CCB_CDB_LEN];
int fd, rc;
if (strlen(name) == 0)
return -ENOENT;
fd = open(name, O_RDWR);
if (fd <= 1) {
if (!strcmp(tool_name, "iprconfig") || ipr_debug)
syslog(LOG_ERR, "Could not open %s. %m\n", name);
return errno;
}
memset(cdb, 0, IPR_CCB_CDB_LEN);
cdb[0] = IPR_IOA_SERVICE_ACTION;
cdb[1] = IPR_CHANGE_CACHE_PARAMETERS;
cdb[2] = mode;
rc = sg_ioctl(fd, cdb, NULL, 0, SG_DXFER_NONE,
&sense_data, IPR_INTERNAL_DEV_TIMEOUT);
if (rc != 0 && (sense_data.sense_key != ILLEGAL_REQUEST || ipr_debug))
ioa_cmd_err(ioa, &sense_data, "change cache params failed", rc);
close(fd);
return rc;
}
/**
* ipr_query_cache_parameters -
* @ioa: ipr ioa struct
* @buf: buffer for returned cache data
* @len: length of buffer
*
* Returns:
* 0 if success / non-zero on failure
**/
int ipr_query_cache_parameters(struct ipr_ioa *ioa, void *buf, int len)
{
char *name = ioa->ioa.gen_name;
struct sense_data_t sense_data;
u8 cdb[IPR_CCB_CDB_LEN];
int fd, rc;
if (strlen(name) == 0)
return -ENOENT;
fd = open(name, O_RDWR);
if (fd <= 1) {
if (!strcmp(tool_name, "iprconfig") || ipr_debug)
syslog(LOG_ERR, "Could not open %s. %m\n", name);
return errno;
}
memset(cdb, 0, IPR_CCB_CDB_LEN);
cdb[0] = IPR_IOA_SERVICE_ACTION;
cdb[1] = IPR_QUERY_CACHE_PARAMETERS;
cdb[10] = len >> 24;
cdb[11] = len >> 16 & 0xff;
cdb[12] = len >> 8 & 0xff;
cdb[13] = len & 0xff;
rc = sg_ioctl(fd, cdb, buf, len, SG_DXFER_FROM_DEV,
&sense_data, IPR_INTERNAL_DEV_TIMEOUT);
if (rc != 0 && (sense_data.sense_key != ILLEGAL_REQUEST || ipr_debug))
ioa_cmd_err(ioa, &sense_data, "Query Cache Parameters", rc);
close(fd);
return rc;
}
/**
* ipr_query_res_redundancy_info -
* @dev: ipr dev struct
* @info: ipr_res_redundancy_info struct
*
* Returns:
* 0 if success / non-zero on failure
**/
int ipr_query_res_redundancy_info(struct ipr_dev *dev,
struct ipr_res_redundancy_info *info)
{
struct scsi_dev_data *scsi_dev_data = dev->scsi_dev_data;
char *name = dev->ioa->ioa.gen_name;
struct ipr_dev_record *dev_record;
struct sense_data_t sense_data;
u8 cdb[IPR_CCB_CDB_LEN];
u32 res_handle;
int fd, rc;
if (scsi_dev_data)
res_handle = ntohl(scsi_dev_data->handle);
else if (ipr_is_af_dasd_device(dev)) {
dev_record = dev->dev_rcd;
if (dev_record->no_cfgte_dev)
return -EINVAL;
res_handle = ntohl(dev->resource_handle);
} else
return -EINVAL;
if (strlen(name) == 0)
return -ENOENT;
fd = open(name, O_RDWR);
if (fd <= 1) {
if (!strcmp(tool_name, "iprconfig") || ipr_debug)
syslog(LOG_ERR, "Could not open %s. %m\n", name);
return errno;
}
memset(cdb, 0, IPR_CCB_CDB_LEN);
cdb[0] = IPR_IOA_SERVICE_ACTION;
if (dev->ioa->sis64)
cdb[1] = IPR_QUERY_RES_REDUNDANCY_INFO64;
else
cdb[1] = IPR_QUERY_RES_REDUNDANCY_INFO;
cdb[2] = (u8)(res_handle >> 24);
cdb[3] = (u8)(res_handle >> 16);
cdb[4] = (u8)(res_handle >> 8);
cdb[5] = (u8)(res_handle);
cdb[10] = sizeof(*info) >> 24;
cdb[11] = (sizeof(*info) >> 16) & 0xff;
cdb[12] = (sizeof(*info) >> 8) & 0xff;
cdb[13] = sizeof(*info) & 0xff;
rc = sg_ioctl(fd, cdb, info, sizeof(*info), SG_DXFER_FROM_DEV,
&sense_data, IPR_INTERNAL_DEV_TIMEOUT);
if (rc != 0 && sense_data.sense_key != ILLEGAL_REQUEST)
ioa_cmd_err(dev->ioa, &sense_data, "Query Resource Redundancy Info", rc);
close(fd);
return rc;
}
/**
* get_livedump_fname -
* @ioa: ipr_ioa struct
* @fname: string to return the filename
* @max: max size of fname
*
* Returns:
* negative on failure / otherwise length of the file name
*
**/
static int get_livedump_fname(struct ipr_ioa *ioa, char *fname, int max)
{
time_t cur_time, rc;
struct tm *cur_tm;
char time_str[100];
int len;
fname[0] = '\0';
rc = time(&cur_time);
if (rc == ((time_t)-1))
return -EIO;
cur_tm = localtime(&cur_time);
if (!cur_tm)
return -EIO;
strftime(time_str, sizeof(time_str), "%Y%m%d.%H%M", cur_tm);
len = snprintf(fname, max, "ipr-%04X-%s-dump-%s", ioa->ccin,
ioa->pci_address, time_str);
return len;
}
#define IPR_MAX_LIVE_DUMP_SIZE (16 * 1024 * 1024)
/**
* get_scsi_max_xfer_len -
* @fd: IOA sg file descriptor
*
* Returns:
* -1 on failure / otherwise max scatter-gather transfer length
*
**/
static int get_scsi_max_xfer_len(int fd)
{
int rc, max_tablesize, max_scsi_len;
char elem_str[64];
ssize_t len;
len = sysfs_read_attr("/sys/module/sg/parameters", "scatter_elem_sz",
elem_str, 64);
if (len < 0) {
syslog_dbg("Failed to read scatter_elem_sz parameter from sg module. %m\n");
return -1;
}
rc = ioctl(fd, SG_GET_SG_TABLESIZE, &max_tablesize);
if (rc) {
syslog_dbg("Unable to get device scatter-gather table size. %m\n");
return -1;
}
max_scsi_len = max_tablesize * atoi(elem_str);
if (max_scsi_len < IPR_MAX_LIVE_DUMP_SIZE)
return max_scsi_len;
else
return IPR_MAX_LIVE_DUMP_SIZE;
}
/**
* ipr_get_live_dump -
* @dev: ipr dev struct
* @info: ipr_res_redundancy_info struct
*
* Returns:
* 0 if success / non-zero on failure
*
**/
int ipr_get_live_dump(struct ipr_ioa *ioa)
{
char *name = ioa->ioa.gen_name;
struct sense_data_t sense_data;
u8 cdb[IPR_CCB_CDB_LEN], *buf;
char dump_file[100], dump_path[100];
int rc, fd, fd_dump, buff_len;
if (strlen(name) == 0)
return -ENOENT;
fd = open(name, O_RDWR);
if (fd <= 1) {
if (!strcmp(tool_name, "iprconfig") || ipr_debug)
syslog(LOG_ERR, "Could not open %s. %m\n", name);
return errno;
}
buff_len = get_scsi_max_xfer_len(fd);
if (buff_len <= 0) {
rc = -EPERM;
goto out;
}
memset(cdb, 0, IPR_CCB_CDB_LEN);
cdb[0] = IPR_IOA_SERVICE_ACTION;
cdb[1] = IPR_LIVE_DUMP;
cdb[10] = buff_len >> 24;
cdb[11] = (buff_len >> 16) & 0xff;
cdb[12] = (buff_len >> 8) & 0xff;
cdb[13] = buff_len & 0xff;
buf = (u8*) malloc(buff_len);
rc = sg_ioctl(fd, cdb, buf, buff_len, SG_DXFER_FROM_DEV,
&sense_data, IPR_INTERNAL_DEV_TIMEOUT);
if (rc) {
ioa_cmd_err(ioa, &sense_data, "Live Dump", rc);
goto out_free;
}
rc = get_livedump_fname(ioa, dump_file, sizeof(dump_file));
if (rc < 0) {
syslog_dbg("Failed to create a live dump file name.\n");
goto out_free;
}
snprintf(dump_path, sizeof(dump_path), "%s%s", IPRDUMP_DIR, dump_file);
fd_dump = creat(dump_path, S_IRUSR);
if (fd_dump < 0) {
syslog(LOG_ERR, "Could not open %s. %m\n", dump_path);
rc = fd_dump;
goto out_free;
}
rc = write(fd_dump, buf, buff_len);
if (rc != buff_len)
syslog(LOG_ERR, "Could not write dump on file %s. %m\n", dump_path);
close(fd_dump);
out_free:
free(buf);
out:
close(fd);
return rc;
}
/**
* ipr_set_array_asym_access -
* @dev: ipr_dev struct
* @qac: ipr_array_query_data struct
*
* Returns:
* 0 if success / non-zero on failure
**/
int ipr_set_array_asym_access(struct ipr_ioa *ioa)
{
char *name = ioa->ioa.gen_name;
struct sense_data_t sense_data;
u8 cdb[IPR_CCB_CDB_LEN];
int fd, rc;
int length = ioa->qac_data->resp_len;
if (strlen(name) == 0)
return -ENOENT;
fd = open(name, O_RDWR);
if (fd <= 1) {
if (!strcmp(tool_name, "iprconfig") || ipr_debug)
syslog(LOG_ERR, "Could not open %s. %m\n", name);
return errno;
}
memset(cdb, 0, IPR_CCB_CDB_LEN);
cdb[0] = IPR_SET_ARRAY_ASYMMETRIC_ACCESS;
cdb[7] = (length >> 8) & 0xff;
cdb[8] = length & 0xff;
if (ioa->sis64) {
cdb[10] = (length & 0xff000000) >> 24;
cdb[11] = (length & 0xff0000) >> 16;
}
rc = sg_ioctl(fd, cdb, ioa->qac_data->u.buf, length, SG_DXFER_TO_DEV,
&sense_data, IPR_ARRAY_CMD_TIMEOUT);
if (rc != 0 && (sense_data.sense_key != ILLEGAL_REQUEST || ipr_debug))
ioa_cmd_err(ioa, &sense_data, "Set Array Asymmetric Access", rc);
close(fd);
return rc;
}
/**
* get_write_buffer_dev - FIXME - probably need to remove this routine.
* @dev: ipr dev struct
*
* Returns:
* device generic name for now - see FIXME below
**/
#if 0
static char *get_write_buffer_dev(struct ipr_dev *dev)
{
struct sysfs_class_device *class_device;
struct sysfs_attribute *dev_attr;
int rc, val;
char path[SYSFS_PATH_MAX];
/* xxx FIXME */
return dev->gen_name;
if (!strlen(dev->dev_name) || !dev->scsi_dev_data)
return dev->gen_name;
class_device = sysfs_open_class_device("block",
&dev->dev_name[5]);
if (!class_device) {
scsi_dbg(dev, "Failed to open block class device for %s. %m\n",
dev->dev_name);
return dev->gen_name;
}
sprintf(path, "%s/queue/max_sectors_kb", class_device->path);
dev_attr = sysfs_open_attribute(path);
if (!dev_attr) {
scsi_dbg(dev, "Failed to get max_sectors_kb attribute. %m\n");
goto fail;
}
rc = sysfs_read_attribute(dev_attr);
if (rc) {
sysfs_close_attribute(dev_attr);
scsi_dbg(dev, "Failed to read max_sectors_kb attribute. %m\n");
goto fail;
}
sscanf(dev_attr->value, "%d", &val);
sysfs_close_attribute(dev_attr);
sysfs_close_class_device(class_device);
if (val > 256)
return dev->dev_name;
return dev->gen_name;
fail:
sysfs_close_class_device(class_device);
return dev->gen_name;
}
#endif
/**
* ipr_resume_device_bus -
* @ioa: ipr ioa struct
* @res_addr: ipr_res_addr struct
*
* Returns:
* 0 if success / non-zero on failure
**/
int ipr_resume_device_bus(struct ipr_dev *dev,
struct ipr_res_addr *res_addr)
{
int fd, rc, cdb_num;
u8 cdb[IPR_CCB_CDB_LEN];
struct sense_data_t sense_data;
int length = 0;
struct ipr_ioa *ioa = dev->ioa;
char *rp, *endptr;
if (strlen(ioa->ioa.gen_name) == 0)
return -ENOENT;
fd = open(ioa->ioa.gen_name, O_RDWR);
if (fd <= 1) {
if (!strcmp(tool_name, "iprconfig") || ipr_debug)
syslog(LOG_ERR, "Could not open %s. %m\n", ioa->ioa.gen_name);
return errno;
}
memset(cdb, 0, IPR_CCB_CDB_LEN);
cdb[0] = IPR_RESUME_DEV_BUS;
cdb[1] = IPR_RDB_UNQUIESCE_AND_REBALANCE;
if (ioa->sis64) {
/* convert res path string to bytes */
cdb_num = 2;
rp = dev->res_path_name;
do {
cdb[cdb_num++] = (u8)strtol(rp, &endptr, 16);
rp = endptr+1;
} while (*endptr != '\0' && cdb_num < 10);
while (cdb_num < 10) cdb[cdb_num++] = 0xff;
} else {
cdb[3] = res_addr->bus;
cdb[4] = res_addr->target;
cdb[5] = res_addr->lun;
}
rc = sg_ioctl(fd, cdb, NULL,
length, SG_DXFER_FROM_DEV,
&sense_data, IPR_SUSPEND_DEV_BUS_TIMEOUT);
close(fd);
return rc;
}
/**
* __ipr_write_buffer - Issue WRITE_BUFFER command.
* In older kernels, max_sectors_kb is not big enough and
* would return -EIO when using dev_name to issue
* SG_IO ioctl(). In that case, we have to use gen_name.
* Also, in case dev_name does not exist, we need to use
* gen_name. Hence, we try dev_name first and switch to
* gen_name if we get -ENOENT or -EIO.
* @dev: ipr dev struct
* @mode: mode value
* @buff: data buffer
* @length: buffer length
* @sense_data: sense data struct
*
* Returns:
* 0 if success / non-zero on failure
**/
static int __ipr_write_buffer(struct ipr_dev *dev, u8 mode, void *buff,
int offset, int length, struct sense_data_t *sense_data)
{
u32 direction = length ? SG_DXFER_TO_DEV : SG_DXFER_NONE;
u8 cdb[IPR_CCB_CDB_LEN];
int rc;
ENTER;
if ((strlen(dev->dev_name) == 0) && (strlen(dev->gen_name) == 0))
return -ENOENT;
memset(cdb, 0, IPR_CCB_CDB_LEN);
cdb[0] = WRITE_BUFFER;
cdb[1] = mode;
cdb[3] = (offset & 0xff0000) >> 16;
cdb[4] = (offset & 0x00ff00) >> 8;
cdb[5] = (offset & 0x0000ff);
cdb[6] = (length & 0xff0000) >> 16;
cdb[7] = (length & 0x00ff00) >> 8;
cdb[8] = length & 0x0000ff;
rc = sg_ioctl_by_name(dev->dev_name, cdb, buff,
length, direction,
sense_data, IPR_WRITE_BUFFER_TIMEOUT);
if (rc != 0) {
if ((rc == -ENOENT) || (rc == -EIO) || (rc == -EINVAL)) {
syslog_dbg("Write buffer failed on sd device %s. %m\n", dev->dev_name);
rc = sg_ioctl_by_name(dev->gen_name, cdb, buff,
length, direction,
sense_data, IPR_WRITE_BUFFER_TIMEOUT);
if (rc != 0) {
scsi_cmd_err(dev, sense_data,
"Write buffer using sg device", rc);
if (rc == -ENOMEM)
syslog(LOG_ERR,
"Cannot get enough memory to "
"perform microcode download "
"through %s. Reduce system "
"memory usage and try again.\n",
dev->gen_name);
}
} else
scsi_cmd_err(dev, sense_data,
"Write buffer using sd device", rc);
}
return rc;
}
/**
* ipr_write_buffer -
* @dev: ipr dev struct
* @buff: data buffer
* @length: buffer length
*
* Returns:
* 0 if success / non-zero on failure
**/
int ipr_write_buffer(struct ipr_dev *dev, void *buff, int length)
{
int rc, i;
struct sense_data_t sense_data;
struct ipr_disk_attr attr;
int old_qdepth;
int sas_ses = 0;
int sas_ses_retries = 5;
int mode5 = 1;
u32 write_len = 0;
u32 offset;
u32 write_buffer_chunk_sz = length;
ENTER;
if ((rc = ipr_get_dev_attr(dev, &attr))) {
scsi_dbg(dev, "Failed to get device attributes. rc=%d\n", rc);
return rc;
}
if (ipr_is_ses(dev) && !__ioa_is_spi(dev->ioa))
sas_ses = 1;
if (sas_ses && !ipr_mode5_write_buffer)
mode5 = 0;
/*
* Set the queue depth to 1 for the duration of the code download.
* This prevents us from getting I/O errors during the code update
*/
old_qdepth = attr.queue_depth;
attr.queue_depth = 1;
if ((rc = ipr_set_dev_attr(dev, &attr, 0))) {
scsi_dbg(dev, "Failed to set queue depth to 1. rc=%d\n", rc);
return rc;
}
if (sas_ses) {
for (offset = 0; offset < length && !mode5; offset += write_len) {
write_len = write_buffer_chunk_sz;
if (offset + write_len > length)
write_len = length - offset;
for (i = 0; i < (sas_ses_retries + 1); i++) {
rc = __ipr_write_buffer(dev, 0x0e, buff + offset, offset,
write_len, &sense_data);
if (!rc) {
break;
} else if (rc && sense_data.sense_key == UNIT_ATTENTION &&
sense_data.add_sense_code == 0x29 &&
sense_data.add_sense_code_qual == 0x00) {
continue;
} else if (rc && sense_data.sense_key == ILLEGAL_REQUEST) {
if (write_buffer_chunk_sz == 4096) {
mode5 = 1;
} else {
/* Attempt 4k write */
write_buffer_chunk_sz = 4096;
write_len = 0;
}
break;
} else if (rc) {
goto out;
}
}
}
rc = ipr_suspend_device_bus(dev, &dev->res_addr[0],
IPR_SDB_CHECK_AND_QUIESCE_ENC);
if (rc) {
scsi_dbg(dev, "Failed to quiesce the SAS port.\n");
goto out;
}
for (i = 0; i < (sas_ses_retries + 1); i++) {
if (mode5)
rc = __ipr_write_buffer(dev, 5, buff, 0, length, &sense_data);
else
rc = __ipr_write_buffer(dev, 0x0f, NULL, 0, 0, &sense_data);
if (rc && sense_data.sense_key == UNIT_ATTENTION &&
sense_data.add_sense_code == 0x29 &&
sense_data.add_sense_code_qual == 0x00) {
continue;
} else {
break;
}
}
if (rc) {
scsi_dbg(dev, "Write buffer %sfailed.\n", mode5 ? "" : "activate ");
goto out_resume;
}
} else {
if ((rc = __ipr_write_buffer(dev, 5, buff, 0, length, &sense_data)))
goto out;
}
scsi_dbg(dev, "Waiting for device to come ready after download.\n");
sleep(sas_ses ? 120 : 5);
for (i = 0, rc = -1; rc && (i < 60); i++, sleep(1))
rc = __ipr_test_unit_ready(dev, &sense_data);
out_resume:
if (sas_ses)
ipr_resume_device_bus(dev, &dev->res_addr[0]);
out:
attr.queue_depth = old_qdepth;
ipr_set_dev_attr(dev, &attr, 0);
LEAVE;
return rc;
}
/**
* ipr_suspend_device_bus -
* @ioa: ipr ioa struct
* @res_addr: ipr_res_addr struct
* @option: option value
*
* Returns:
* 0 if success / non-zero on failure
**/
int ipr_suspend_device_bus(struct ipr_dev *dev,
struct ipr_res_addr *res_addr, u8 option)
{
int fd, rc, cdb_num;
u8 cdb[IPR_CCB_CDB_LEN];
struct sense_data_t sense_data;
int length = 0;
struct ipr_ioa *ioa = dev->ioa;
char *rp, *endptr;
ENTER;
if (strlen(ioa->ioa.gen_name) == 0)
return -ENOENT;
fd = open(ioa->ioa.gen_name, O_RDWR);
if (fd <= 1) {
if (!strcmp(tool_name, "iprconfig") || ipr_debug)
syslog(LOG_ERR, "Could not open %s. %m\n", ioa->ioa.gen_name);
return errno;
}
memset(cdb, 0, IPR_CCB_CDB_LEN);
cdb[0] = IPR_SUSPEND_DEV_BUS;
cdb[1] = option;
if (ioa->sis64) {
/* convert res path string to bytes */
cdb_num = 2;
rp = dev->res_path_name;
do {
cdb[cdb_num++] = (u8)strtol(rp, &endptr, 16);
rp = endptr+1;
} while (*endptr != '\0' && cdb_num < 10);
while (cdb_num < 10) cdb[cdb_num++] = 0xff;
} else {
cdb[3] = res_addr->bus;
cdb[4] = res_addr->target;
cdb[5] = res_addr->lun;
}
rc = sg_ioctl(fd, cdb, NULL,
length, SG_DXFER_FROM_DEV,
&sense_data, IPR_SUSPEND_DEV_BUS_TIMEOUT);
close(fd);
LEAVE;
return rc;
}
/**
* ipr_can_remove_device - indicate whether or not a device can be removed
* @dev: ipr dev struct
*
* Returns:
* 1 if device can be removed / 0 if device can not be removed
**/
int ipr_can_remove_device(struct ipr_dev *dev)
{
struct ipr_res_addr *ra;
for_each_ra(ra, dev) {
if (ipr_suspend_device_bus(dev, ra, IPR_SDB_CHECK_ONLY))
return 0;
}
return 1;
}
/**
* ipr_receive_diagnostics -
* @dev: ipr dev struct
* @page: page number
* @buff: data buffer
* @length: buffer length
*
* Returns:
* 0 if success / non-zero on failure
**/
int ipr_receive_diagnostics(struct ipr_dev *dev,
u8 page, void *buff, int length)
{
int fd;
u8 cdb[IPR_CCB_CDB_LEN];
struct sense_data_t sense_data;
int rc;
char *name = dev->gen_name;
if (strlen(name) == 0)
return -ENOENT;
fd = open(name, O_RDWR);
if (fd <= 1) {
if (!strcmp(tool_name, "iprconfig") || ipr_debug)
syslog(LOG_ERR, "Could not open %s. %m\n", name);
return errno;
}
memset(cdb, 0, IPR_CCB_CDB_LEN);
cdb[0] = RECEIVE_DIAGNOSTIC;
cdb[1] = 0x01;
cdb[2] = page;
cdb[3] = (length >> 8) & 0xff;
cdb[4] = length & 0xff;
rc = sg_ioctl(fd, cdb, buff,
length, SG_DXFER_FROM_DEV,
&sense_data, IPR_INTERNAL_DEV_TIMEOUT);
if (rc != 0)
scsi_cmd_err(dev, &sense_data, "Receive diagnostics", rc);
close(fd);
return rc;
}
/**
* ipr_send_diagnostics -
* @dev: ipr dev struct
* @buff: data buffer
* @length: buffer length
*
* Returns:
* 0 if success / non-zero on failure
**/
int ipr_send_diagnostics(struct ipr_dev *dev, void *buff, int length)
{
int fd;
u8 cdb[IPR_CCB_CDB_LEN];
struct sense_data_t sense_data;
int rc;
char *name = dev->gen_name;
if (strlen(name) == 0)
return -ENOENT;
fd = open(name, O_RDWR);
if (fd <= 1) {
if (!strcmp(tool_name, "iprconfig") || ipr_debug)
syslog(LOG_ERR, "Could not open %s. %m\n", name);
return errno;
}
memset(cdb, 0, IPR_CCB_CDB_LEN);
cdb[0] = SEND_DIAGNOSTIC;
cdb[1] = 0x10;
cdb[3] = (length >> 8) & 0xff;
cdb[4] = length & 0xff;
rc = sg_ioctl(fd, cdb, buff,
length, SG_DXFER_TO_DEV,
&sense_data, IPR_INTERNAL_DEV_TIMEOUT);
if (rc != 0)
scsi_cmd_err(dev, &sense_data, "Send diagnostics", rc);
close(fd);
return rc;
}
/**
* set_supported_devs -
* @dev: ipr dev struct
* @std_inq: ipr_std_inq_data struct
*
* Returns:
* 0 if success / non-zero on failure
**/
static int set_supported_devs(struct ipr_dev *dev,
struct ipr_std_inq_data *std_inq)
{
int fd, rc;
u8 cdb[IPR_CCB_CDB_LEN];
struct sense_data_t sense_data;
struct ipr_supported_device supported_dev;
fd = open(dev->ioa->ioa.gen_name, O_RDWR);
if (fd <= 1) {
if (!strcmp(tool_name, "iprconfig") || ipr_debug)
syslog(LOG_ERR, "Could not open %s. %m\n",
dev->ioa->ioa.gen_name);
return errno;
}
memset(&supported_dev, 0, sizeof(struct ipr_supported_device));
memcpy(&supported_dev.vpids, &std_inq->vpids, sizeof(std_inq->vpids));
supported_dev.num_records = 1;
supported_dev.data_length = htons(sizeof(supported_dev));
supported_dev.reserved = 0;
memset(cdb, 0, IPR_CCB_CDB_LEN);
cdb[0] = SET_SUPPORTED_DEVICES;
cdb[7] = (sizeof(supported_dev) >> 8) & 0xff;
cdb[8] = sizeof(supported_dev) & 0xff;
rc = sg_ioctl(fd, cdb, &supported_dev,
sizeof(supported_dev), SG_DXFER_TO_DEV,
&sense_data, IPR_INTERNAL_DEV_TIMEOUT);
if (rc != 0)
ioa_cmd_err(dev->ioa, &sense_data, "Set supported devices", rc);
close(fd);
return rc;
}
/**
* __device_supported -
* @dev: ipr dev struct
* @inq: ipr_std_inq_data
*
* Returns:
* 0 if device is supported / 1 if device is not supported
**/
static int __device_supported(struct ipr_dev *dev, struct ipr_std_inq_data *inq)
{
int i, j;
const struct ses_table_entry *ste;
if (!dev->scsi_dev_data)
return 1;
ste = get_ses_entry(dev->ioa, dev->scsi_dev_data->channel);
if (!ste)
return 1;
if (!ste->block_15k_devices)
return 1;
for (i = 0; i < ARRAY_SIZE(unsupported_dasd); i++) {
for (j = 0; j < IPR_VENDOR_ID_LEN; j++) {
if (unsupported_dasd[i].compare_vendor_id_byte[j] &&
unsupported_dasd[i].vendor_id[j] != inq->vpids.vendor_id[j])
break;
}
if (j != IPR_VENDOR_ID_LEN)
continue;
for (j = 0; j < IPR_PROD_ID_LEN; j++) {
if (unsupported_dasd[i].compare_product_id_byte[j] &&
unsupported_dasd[i].product_id[j] != inq->vpids.product_id[j])
break;
}
if (j != IPR_PROD_ID_LEN)
continue;
return 0;
}
return 1;
}
/**
* device_supported -
* @dev: ipr dev struct
*
* Returns:
* 0 if device is supported / 1 if device is not supported
**/
int device_supported(struct ipr_dev *dev)
{
struct ipr_std_inq_data std_inq;
if (ipr_inquiry(dev, IPR_STD_INQUIRY, &std_inq, sizeof(std_inq)))
return -EIO;
return __device_supported(dev, &std_inq);
}
/**
* enable_af -
* @dev: ipr dev struct
*
* Returns:
* 0 if success / non-zero on failure
**/
int enable_af(struct ipr_dev *dev)
{
struct ipr_std_inq_data std_inq;
if (ipr_inquiry(dev, IPR_STD_INQUIRY, &std_inq, sizeof(std_inq)))
return -EIO;
if (!__device_supported(dev, &std_inq)) {
scsi_dbg(dev, "Unsupported device attached\n");
return -EIO;
}
if (set_supported_devs(dev, &std_inq))
return -EIO;
return 0;
}
/**
* get_blk_size - return the block size of the device
* @dev: ipr dev struct
*
* Returns:
* block size / non-zero on failure
**/
static int get_blk_size(struct ipr_dev *dev)
{
struct ipr_mode_pages modes;
struct ipr_block_desc *block_desc;
int rc;
memset(&modes, 0, sizeof(modes));
rc = ipr_mode_sense(dev, 0x0a, &modes);
if (!rc) {
if (modes.hdr.block_desc_len > 0) {
block_desc = (struct ipr_block_desc *)(modes.data);
return ((block_desc->block_length[1] << 8) | block_desc->block_length[2]);
}
}
return -EIO;
}
/**
* format_req -
* @dev: ipr dev struct
*
* Returns:
* 0 if success / non-zero on failure
**/
int format_req(struct ipr_dev *dev)
{
struct sense_data_t sense_data;
int rc;
rc = ipr_test_unit_ready(dev, &sense_data);
if (rc == CHECK_CONDITION &&
sense_data.add_sense_code == 0x31 &&
sense_data.add_sense_code_qual == 0x00)
return 1;
rc = get_blk_size(dev);
if (rc < 0)
return 0;
if (ipr_is_gscsi(dev) && (rc != 512 || rc != 4096))
return 1;
return 0;
}
/*
* Scatter/gather list buffers are checked against the value returned
* by queue_dma_alignment(), which defaults to 511 in Linux 2.6,
* for alignment if a SG_IO ioctl request is sent through a /dev/sdX device.
*/
#define IPR_S_G_BUFF_ALIGNMENT 512
#define IPR_MAX_XFER 0x8000
const int cdb_size[] ={6, 10, 10, 0, 16, 12, 16, 16};
/**
* _sg_ioctl -
* @fd: file descriptor
* @cdb: cdb
* @data: data pointer
* @xfer_len transfer length
* @data_direction transfer to dev or from dev
* @sense_data sense data pointer
* @timeout_in_sec timeout value
* @retries number of retries
*
* Returns:
* 0 if success / non-zero on failure
**/
static int _sg_ioctl(int fd, u8 cdb[IPR_CCB_CDB_LEN],
void *data, u32 xfer_len, u32 data_direction,
struct sense_data_t *sense_data,
u32 timeout_in_sec, int retries)
{
int rc = 0;
sg_io_hdr_t io_hdr_t;
sg_iovec_t *iovec = NULL;
int iovec_count = 0;
int i;
int buff_len, segment_size;
void *dxferp;
u8 *buf;
/* check if scatter gather should be used */
if (xfer_len > IPR_MAX_XFER) {
iovec_count = (xfer_len/IPR_MAX_XFER) + 1;
iovec = malloc(iovec_count * sizeof(sg_iovec_t));
buff_len = xfer_len;
segment_size = IPR_MAX_XFER;
for (i = 0; (i < iovec_count) && (buff_len != 0); i++) {
posix_memalign(&(iovec[i].iov_base), IPR_S_G_BUFF_ALIGNMENT, segment_size);
if (data_direction == SG_DXFER_TO_DEV)
memcpy(iovec[i].iov_base, data + (IPR_MAX_XFER * i), segment_size);
iovec[i].iov_len = segment_size;
buff_len -= segment_size;
if (buff_len < segment_size)
segment_size = buff_len;
}
iovec_count = i;
dxferp = (void *)iovec;
} else {
iovec_count = 0;
dxferp = data;
}
for (i = 0; i < (retries + 1); i++) {
memset(&io_hdr_t, 0, sizeof(io_hdr_t));
memset(sense_data, 0, sizeof(struct sense_data_t));
io_hdr_t.interface_id = 'S';
io_hdr_t.cmd_len = cdb_size[(cdb[0] >> 5) & 0x7];
io_hdr_t.iovec_count = iovec_count;
io_hdr_t.flags = 0;
io_hdr_t.pack_id = 0;
io_hdr_t.usr_ptr = 0;
io_hdr_t.sbp = (unsigned char *)sense_data;
io_hdr_t.mx_sb_len = sizeof(struct sense_data_t);
io_hdr_t.timeout = timeout_in_sec * 1000;
io_hdr_t.cmdp = cdb;
io_hdr_t.dxfer_direction = data_direction;
io_hdr_t.dxfer_len = xfer_len;
io_hdr_t.dxferp = dxferp;
rc = ioctl(fd, SG_IO, &io_hdr_t);
if (rc == -1 && errno == EINVAL) {
rc = -EINVAL;
goto out;
}
if (rc == 0 && io_hdr_t.masked_status == CHECK_CONDITION)
rc = CHECK_CONDITION;
else if (rc == 0 && (io_hdr_t.host_status || io_hdr_t.driver_status))
rc = -EIO;
if (rc == 0 || io_hdr_t.host_status == 1)
break;
}
out:
if (iovec_count) {
for (i = 0, buf = (u8 *)data; i < iovec_count; i++) {
if (data_direction == SG_DXFER_FROM_DEV)
memcpy(buf, iovec[i].iov_base, iovec[i].iov_len);
buf += iovec[i].iov_len;
free(iovec[i].iov_base);
}
free(iovec);
}
return rc;
};
/**
* sg_ioctl -
* @fd: file descriptor
* @cdb: cdb
* @data: data pointer
* @xfer_len transfer length
* @data_direction transfer to dev or from dev
* @sense_data sense data pointer
* @timeout_in_sec timeout value
*
* Returns:
* 0 if success / non-zero on failure
**/
int sg_ioctl(int fd, u8 cdb[IPR_CCB_CDB_LEN],
void *data, u32 xfer_len, u32 data_direction,
struct sense_data_t *sense_data,
u32 timeout_in_sec)
{
return _sg_ioctl(fd, cdb,
data, xfer_len, data_direction,
sense_data, timeout_in_sec, 1);
};
/**
* sg_ioctl_noretry -
* @fd: file descriptor
* @cdb: cdb
* @data: data pointer
* @xfer_len transfer length
* @data_direction transfer to dev or from dev
* @sense_data sense data pointer
* @timeout_in_sec timeout value
*
* Returns:
* 0 if success / non-zero on failure
**/
int sg_ioctl_noretry(int fd, u8 cdb[IPR_CCB_CDB_LEN],
void *data, u32 xfer_len, u32 data_direction,
struct sense_data_t *sense_data,
u32 timeout_in_sec)
{
return _sg_ioctl(fd, cdb,
data, xfer_len, data_direction,
sense_data, timeout_in_sec, 0);
};
/**
* sg_ioctl_by_name -
* @name: file name
* @cdb: cdb
* @data: data pointer
* @xfer_len transfer length
* @data_direction transfer to dev or from dev
* @sense_data sense data pointer
* @timeout_in_sec timeout value
*
* Returns:
* 0 if success / non-zero on failure
**/
static int sg_ioctl_by_name(char *name, u8 cdb[IPR_CCB_CDB_LEN],
void *data, u32 xfer_len, u32 data_direction,
struct sense_data_t *sense_data,
u32 timeout_in_sec)
{
int fd, rc;
if (strlen(name) <= 0)
return -ENOENT;
fd = open(name, O_RDWR);
if (fd <= 1) {
if (!strcmp(tool_name, "iprconfig") || ipr_debug)
syslog(LOG_ERR, "Could not open %s.\n", name);
return errno;
}
rc = sg_ioctl(fd, cdb, data,
xfer_len, data_direction,
sense_data, timeout_in_sec);
close(fd);
return rc;
}
/**
* ipr_set_ha_mode -
* @ioa: ipr ioa struct
* @gscsi_only_ha: process gscsi only flag
*
* Returns:
* 0 if success / non-zero on failure
**/
int ipr_set_ha_mode(struct ipr_ioa *ioa, int gscsi_only_ha)
{
int rc, len;
struct sense_data_t sense_data;
struct ipr_config_term_hdr *hdr;
struct ipr_subsys_config_term *term;
struct ipr_mode_pages pages;
struct ipr_mode_page25 *page;
memset(&sense_data, 0, sizeof(sense_data));
rc = mode_sense(&ioa->ioa, 0x25, &pages, &sense_data);
if (!rc) {
page = (struct ipr_mode_page25 *)(pages.data + pages.hdr.block_desc_len);
for_each_page25_term(hdr, page) {
if (hdr->term_id != IPR_SUBSYS_CONFIG_TERM_ID)
continue;
term = (struct ipr_subsys_config_term *)hdr;
if (gscsi_only_ha)
term->config = IPR_GSCSI_ONLY_HA_SUBSYS;
else
term->config = IPR_AFDASD_SUBSYS;
len = pages.hdr.length + 1;
pages.hdr.length = 0;
return ipr_mode_select(&ioa->ioa, &pages, len);
}
}
return rc;
}
/**
* ipr_change_multi_adapter_assignment - set the preferred primary state and/or
* the asymmetric access state
* @ioa: ipr ioa struct
* @preferred_primary: set preferred primary flag
*
* Returns:
* 0 if success / non-zero on failure
**/
int ipr_change_multi_adapter_assignment(struct ipr_ioa *ioa, int preferred_primary,
int asym_access)
{
int fd, rc;
u8 cdb[IPR_CCB_CDB_LEN];
struct sense_data_t sense_data;
struct ipr_dev *dev = &ioa->ioa;
if (strlen(dev->gen_name) == 0)
return -ENOENT;
fd = open(dev->gen_name, O_RDWR);
if (fd <= 1) {
if (!strcmp(tool_name, "iprconfig") || ipr_debug)
syslog(LOG_ERR, "Could not open %s. %m\n", dev->gen_name);
return errno;
}
memset(cdb, 0, IPR_CCB_CDB_LEN);
cdb[0] = IPR_MAINTENANCE_OUT;
cdb[1] = IPR_CHANGE_MULTI_ADAPTER_ASSIGNMENT;
if (asym_access)
cdb[2] = IPR_PRESERVE_ASYMMETRIC_STATE;
if (preferred_primary)
cdb[3] = IPR_IOA_STATE_PRIMARY;
else
cdb[3] = IPR_IOA_STATE_NO_PREFERENCE;
rc = sg_ioctl(fd, cdb, NULL, 0, SG_DXFER_NONE,
&sense_data, IPR_INTERNAL_DEV_TIMEOUT);
if (rc != 0 && (sense_data.sense_key != ILLEGAL_REQUEST || ipr_debug))
scsi_cmd_err(dev, &sense_data, "Change Multi Adapter Assignment", rc);
close(fd);
return rc;
}
static void ipr_save_ioa_attr(struct ipr_ioa *ioa, char *field,
char *value, int update);
/**
* set_preferred_primary - set the preferred primary state
* @ioa: ipr ioa struct
* @preferred_primary: set preferred primary flag
*
* Returns:
* 0 if success / non-zero on failure
**/
int set_preferred_primary(struct ipr_ioa *ioa, int preferred_primary)
{
char temp[100];
sprintf(temp, "%d", preferred_primary);
if (ipr_change_multi_adapter_assignment(ioa, preferred_primary, IPR_PRESERVE_ASYMMETRIC_STATE))
return -EIO;
return 0;
}
/**
* set_ha_mode -
* @ioa: ipr ioa struct
* @gscsi_only: gscsi only flag
*
* Returns:
* 0 if success / non-zero on failure
**/
int set_ha_mode(struct ipr_ioa *ioa, int gscsi_only)
{
char temp[100];
int reset_needed = (gscsi_only != ioa->in_gscsi_only_ha);
sprintf(temp, "%d", gscsi_only);
if (ipr_set_ha_mode(ioa, gscsi_only))
return -EIO;
ipr_save_ioa_attr(ioa, IPR_GSCSI_HA_ONLY, temp, 1);
if (reset_needed)
ipr_reset_adapter(ioa);
return 0;
}
/**
* ipr_set_array_rebuild_verify
* @ioa: ipr ioa struct
* @disable_verify: Whether to disable Verify Rebuild (1, 0).
*
* Returns:
* 0 if success / non-zero on failure
**/
int ipr_set_array_rebuild_verify(struct ipr_ioa *ioa, u8 disable_verify)
{
int len, rc;
struct ipr_mode_pages mode_pages;
struct ipr_mode_page24 *page24;
memset(&mode_pages, 0, sizeof(mode_pages));
rc = ipr_mode_sense(&ioa->ioa, 0x24, &mode_pages);
if (rc)
return rc;
page24 = ((struct ipr_mode_page24 *)
(((u8 *)&mode_pages)
+ mode_pages.hdr.block_desc_len
+ sizeof(mode_pages.hdr)));
if (page24->rebuild_without_verify == disable_verify)
return 0;
len = mode_pages.hdr.length + 1;
mode_pages.hdr.length = 0;
page24->rebuild_without_verify = disable_verify;
rc = ipr_mode_select(&ioa->ioa, &mode_pages, len);
if (rc)
return rc;
/* Check if rebuild rate value was correctly set */
memset(&mode_pages, 0, sizeof(mode_pages));
rc = ipr_mode_sense(&ioa->ioa, 0x24, &mode_pages);
if (rc)
return rc;
if (page24->rebuild_without_verify != disable_verify)
return -EINVAL;
return 0;
}
/**
* ipr_set_array_rebuild_rate
* @ioa: ipr ioa struct
* @check_rate checkrate policy
*
* Returns:
* 0 if success / non-zero on failure
**/
int ipr_set_array_rebuild_rate(struct ipr_ioa *ioa, u8 rebuild_rate)
{
int len, rc;
struct ipr_mode_pages mode_pages;
struct ipr_mode_page24 *page24;
memset(&mode_pages, 0, sizeof(mode_pages));
rc = ipr_mode_sense(&ioa->ioa, 0x24, &mode_pages);
if (rc)
return rc;
page24 = (struct ipr_mode_page24 *) (((u8 *)&mode_pages) +
mode_pages.hdr.block_desc_len +
sizeof(mode_pages.hdr));
len = mode_pages.hdr.length + 1;
mode_pages.hdr.length = 0;
page24->rebuild_rate = rebuild_rate;
rc = ipr_mode_select(&ioa->ioa, &mode_pages, len);
if (rc)
return rc;
/* Verify if rebuild rate value was correctly set */
memset(&mode_pages, 0, sizeof(mode_pages));
rc = ipr_mode_sense(&ioa->ioa, 0x24, &mode_pages);
if (rc)
return rc;
if (rebuild_rate != page24->rebuild_rate &&
(rebuild_rate || page24->rebuild_rate != MIN_ARRAY_REBUILD_RATE))
return -EINVAL;
return 0;
}
/**
* ipr_set_active_active_mode -
* @ioa: ipr ioa struct
* @mode: enable or disable
*
* Returns:
* 0 if success / non-zero on failure
**/
int ipr_set_active_active_mode(struct ipr_ioa *ioa)
{
int len, rc;
struct ipr_mode_pages mode_pages;
struct ipr_mode_page24 *page24;
memset(&mode_pages, 0, sizeof(mode_pages));
rc = ipr_mode_sense(&ioa->ioa, 0x24, &mode_pages);
if (!rc) {
page24 = (struct ipr_mode_page24 *) (((u8 *)&mode_pages) +
mode_pages.hdr.block_desc_len +
sizeof(mode_pages.hdr));
len = mode_pages.hdr.length +1;
mode_pages.hdr.length = 0;
page24->dual_adapter_af = ENABLE_DUAL_IOA_ACTIVE_ACTIVE;
return ipr_mode_select(&ioa->ioa, &mode_pages, len);
}
return rc;
}
/**
* set_active_active_mode -
* @ioa: ipr ioa struct
* @mode: enable or disable
*
* Returns:
* 0 if success / non-zero on failure
**/
int set_active_active_mode(struct ipr_ioa *ioa, int mode)
{
struct ipr_ioa_attr attr;
int rc;
/* Get the current ioa attributes. */
rc = ipr_get_ioa_attr(ioa, &attr);
if (rc)
return rc;
/* Get the saved ioa attributes from the config file. */
rc = ipr_modify_ioa_attr(ioa, &attr);
if (rc)
return rc;
if (attr.active_active == mode) {
/* We should never get here. */
ioa_dbg(ioa, "Saved and current asymmetric access mode are not the same.\n");
}
attr.active_active = mode;
return ipr_set_ioa_attr(ioa, &attr, 1);
}
int ipr_set_ses_mode(struct ipr_dev *dev, int mode) {
int rc;
struct sense_data_t sense_data;
u8 buff = (u8)mode;
rc = __ipr_write_buffer(dev, 0x1f, &buff, 0, sizeof(buff), &sense_data);
return rc;
}
/**
* get_scsi_dev_data - get scsi device data
* @scsi_dev_ref: scsi_dev_data struct
*
* Returns:
* number of devices if success / 0 or -1 on failure
**/
int get_scsi_dev_data(struct scsi_dev_data **scsi_dev_ref)
{
int num_devs = 0;
DIR *dirfd;
struct dirent *dent;
struct scsi_dev_data *scsi_dev_data;
struct scsi_dev_data *scsi_dev_base = *scsi_dev_ref;
dirfd = opendir("/sys/class/scsi_device");
if (!dirfd) {
syslog_dbg("Failed to open scsi_device class. %m\n");
return 0;
}
while ((dent = readdir(dirfd)) != NULL) {
int host, channel, lun;
signed char id;
char devpath[PATH_MAX];
char buff[256];
ssize_t len;
if (sscanf(dent->d_name,"%d:%d:%hhd:%d",
&host, &channel, &id, &lun) != 4)
continue;
scsi_dev_base = realloc(scsi_dev_base,
sizeof(struct scsi_dev_data) * (num_devs + 1));
scsi_dev_data = &scsi_dev_base[num_devs];
scsi_dev_data->host = host;
scsi_dev_data->channel = channel;
scsi_dev_data->id = id;
scsi_dev_data->lun = lun;
strcpy(scsi_dev_data->sysfs_device_name, dent->d_name);
sprintf(devpath, "/sys/class/scsi_device/%s/device",
dent->d_name);
len = sysfs_read_attr(devpath, "type", buff, 256);
if (len > 0)
sscanf(buff, "%d", &scsi_dev_data->type);
//FIXME WHERE TO GET OPENS!!!
/*
sysfs_attr = sysfs_get_device_attr(sysfs_device_device, "opens");
sscanf(sysfs_attr->value "%d", &scsi_dev_data->opens);
*/ scsi_dev_data->opens = 0;
len = sysfs_read_attr(devpath, "state", buff, 256);
if (len > 0 && strstr(buff, "offline"))
scsi_dev_data->online = 0;
else
scsi_dev_data->online = 1;
len = sysfs_read_attr(devpath, "queue_depth", buff, 256);
if (len > 0)
sscanf(buff, "%d", &scsi_dev_data->qdepth);
len = sysfs_read_attr(devpath, "adapter_handle", buff, 256);
if (len > 0)
sscanf(buff, "%X", &scsi_dev_data->handle);
len = sysfs_read_attr(devpath, "vendor", buff, 256);
if (len > 0)
ipr_strncpy_0n(scsi_dev_data->vendor_id,
buff, IPR_VENDOR_ID_LEN);
len = sysfs_read_attr(devpath, "model", buff, 256);
if (len > 0)
ipr_strncpy_0n(scsi_dev_data->product_id,
buff, IPR_PROD_ID_LEN);
len = sysfs_read_attr(devpath, "resource_path", buff, 256);
if (len > 0)
ipr_strncpy_0n(scsi_dev_data->res_path,
buff, IPR_MAX_RES_PATH_LEN);
len = sysfs_read_attr(devpath, "device_id", buff, 256);
if (len > 0)
sscanf(buff, "%llX", &scsi_dev_data->device_id);
strcpy(scsi_dev_data->dev_name,"");
strcpy(scsi_dev_data->gen_name,"");
num_devs++;
}
closedir(dirfd);
*scsi_dev_ref = scsi_dev_base;
return num_devs;
}
/**
* wait_for_dev - wait 20 seconds for the device to become available
* @name: device name
*
* Returns:
* -ETIMEDOUT
**/
static int wait_for_dev(char *name)
{
int fd, delay;
for (delay = 20, fd = 0; delay; delay--) {
fd = open(name, O_RDWR);
if (fd != -1) {
close(fd);
break;
}
syslog_dbg("Waiting for %s to show up\n", name);
sleep(1);
}
if (fd == -1)
syslog_dbg("Failed to open %s.\n", name);
return -ETIMEDOUT;
}
int get_sg_name(struct scsi_dev_data *scsi_dev)
{
int i, rc = -ENXIO;
DIR *dirfd;
struct dirent *dent;
char devpath[PATH_MAX];
sprintf(devpath, "/sys/class/scsi_device/%s/device/scsi_generic",
scsi_dev->sysfs_device_name);
dirfd = opendir(devpath);
if (!dirfd)
return -ENXIO;
while((dent = readdir(dirfd)) != NULL) {
if (dent->d_name[0] == '.')
continue;
if (strncmp(dent->d_name, "sg", 2))
continue;
sprintf(scsi_dev->gen_name, "/dev/%s",
dent->d_name);
rc = 0;
break;
}
closedir(dirfd);
return rc;
}
/**
* get_sg_names - waits for sg devices to become available
* @num_devs: number of devices
*
* Returns:
* nothing
**/
static void get_sg_names(int num_devs)
{
int i;
for (i = 0; i < num_devs; i++)
get_sg_name(&scsi_dev_table[i]);
}
/**
* get_sd_names - populate the scsi_dev_table dev_name entries
* @num_devs: number of devices
*
* Returns:
* nothing
**/
static void get_sd_names(int num_devs)
{
int i;
DIR *dirfd;
struct dirent *dent;
char devpath[PATH_MAX];
for (i = 0; i < num_devs; i++) {
sprintf(devpath, "/sys/class/scsi_device/%s/device/block",
scsi_dev_table[i].sysfs_device_name);
dirfd = opendir(devpath);
if (!dirfd)
continue;
while((dent = readdir(dirfd)) != NULL) {
if (dent->d_name[0] == '.')
continue;
if (strncmp(dent->d_name, "sd", 2) && strncmp(dent->d_name, "sr", 2))
continue;
sprintf(scsi_dev_table[i].dev_name, "/dev/%s",
dent->d_name);
break;
}
closedir(dirfd);
}
}
/**
* get_ioa_name - populate adapter information in the scsi_dev_table
* @ioa: ipr ioa struct
* @num_sg_devices: number of sg devices
*
* Returns:
* nothing
**/
static void get_ioa_name(struct ipr_ioa *ioa,
int num_sg_devices)
{
int i;
int host_no;
int channel = IPR_IOAFP_VIRTUAL_BUS;
int id = 0;
int lun = 0;
sscanf(ioa->host_name, "host%d", &host_no);
if (!ioa->sis64)
channel = id = lun = 255;
for (i = 0; i < num_sg_devices; i++) {
if (scsi_dev_table[i].host == host_no &&
scsi_dev_table[i].channel == channel &&
scsi_dev_table[i].id == id &&
scsi_dev_table[i].lun == lun &&
scsi_dev_table[i].type == IPR_TYPE_ADAPTER) {
strcpy(ioa->ioa.dev_name, scsi_dev_table[i].dev_name);
strcpy(ioa->ioa.gen_name, scsi_dev_table[i].gen_name);
ioa->ioa.scsi_dev_data = &scsi_dev_table[i];
ioa->ioa.ioa = ioa;
}
}
}
struct ipr_dual_ioa_state {
u8 state;
char *desc;
};
static struct ipr_dual_ioa_state dual_ioa_states [] = {
{IPR_IOA_STATE_PRIMARY, "Primary"},
{IPR_IOA_STATE_SECONDARY, "Secondary"},
{IPR_IOA_STATE_NO_PREFERENCE, "No Preference"}
};
/**
* print_ioa_state - copy the ioa state into buf
* @buf: data buffer
* @state: state
*
* Returns:
* nothing
**/
static void print_ioa_state(char *buf, u8 state)
{
int i;
for (i = 0; i < ARRAY_SIZE(dual_ioa_states); i++) {
if (dual_ioa_states[i].state == state) {
strcpy(buf, dual_ioa_states[i].desc);
return;
}
}
sprintf(buf, "Unknown (%d)", state);
}
/**
* get_subsys_config -
* @ioa: ipr ioa struct
*
* Returns:
* nothing
**/
static void get_subsys_config(struct ipr_ioa *ioa)
{
int rc;
struct ipr_mode_pages pages;
struct ipr_mode_page25 *page;
struct ipr_config_term_hdr *hdr;
struct ipr_subsys_config_term *term;
struct sense_data_t sense_data;
ioa->in_gscsi_only_ha = 0;
if (!ioa->gscsi_only_ha)
return;
memset(&sense_data, 0, sizeof(sense_data));
rc = mode_sense(&ioa->ioa, 0x25, &pages, &sense_data);
if (!rc) {
page = (struct ipr_mode_page25 *)(pages.data + pages.hdr.block_desc_len);
for_each_page25_term(hdr, page) {
if (hdr->term_id != IPR_SUBSYS_CONFIG_TERM_ID)
continue;
term = (struct ipr_subsys_config_term *)hdr;
if (term->config == IPR_GSCSI_ONLY_HA_SUBSYS)
ioa->in_gscsi_only_ha = 1;
return;
}
}
}
/**
* get_dual_ioa_state - set ioa->is_secondary to indicate the dual ioa state
* @ioa: ipr ioa struct
*
* Returns:
* nothing
**/
static void get_dual_ioa_state(struct ipr_ioa *ioa)
{
int rc;
struct ipr_dual_ioa_entry *ioa_entry;
sprintf(ioa->dual_state, "Primary");
sprintf(ioa->preferred_dual_state, "No Preference");
ioa->is_secondary = 0;
if (!ioa->dual_raid_support)
return;
rc = ipr_query_multi_ioa_status(ioa, &ioa->ioa_status, sizeof(ioa->ioa_status));
if (rc)
return;
print_ioa_state(ioa->preferred_dual_state, ioa->ioa_status.cap.preferred_role);
if (ntohl(ioa->ioa_status.num_entries)) {
ioa_entry = (struct ipr_dual_ioa_entry *)
(((unsigned long)&ioa->ioa_status.cap) + ntohl(ioa->ioa_status.cap.length));
print_ioa_state(ioa->dual_state, ioa_entry->cur_state);
if (ioa_entry->cur_state == IPR_IOA_STATE_SECONDARY)
ioa->is_secondary = 1;
}
}
/**
* get_af_block_size - return the af block size
* @ioa_cap: ipr_inquiry_ioa_cap struct
*
* Returns:
* the actual af_block_size or IPR_DEFAULT_AF_BLOCK_SIZE
**/
static u16 get_af_block_size(struct ipr_inquiry_ioa_cap *ioa_cap)
{
int sz_off = offsetof(struct ipr_inquiry_ioa_cap, af_block_size);
int len_off = offsetof(struct ipr_inquiry_ioa_cap, page_length);
if (ioa_cap->page_length > (sz_off - len_off))
return ntohs(ioa_cap->af_block_size);
return IPR_DEFAULT_AF_BLOCK_SIZE;
}
/**
* get_ioa_cap - get the capability information for the ioa (inquiry page D0)
* Also, if page 01 is supported, then there is cache on the card.
* @ioa: ipr ioa struct
*
* Returns:
* nothing
**/
static void get_ioa_cap(struct ipr_ioa *ioa)
{
int rc, j;
struct ipr_inquiry_page0 page0_inq;
struct ipr_inquiry_ioa_cap ioa_cap;
struct ipr_mode_page24 *page24;
struct ipr_mode_pages mode_pages;
struct ipr_cache_cap_vpd cc_vpd;
memset(&mode_pages, 0, sizeof(mode_pages));
ioa->af_block_size = IPR_DEFAULT_AF_BLOCK_SIZE;
ioa->tcq_mode = ioa_get_tcq_mode(ioa);
rc = ipr_inquiry(&ioa->ioa, 0, &page0_inq, sizeof(page0_inq));
if (rc) {
ioa->ioa_dead = 1;
return;
}
for (j = 0; j < page0_inq.page_length; j++) {
if (page0_inq.supported_page_codes[j] == 0x01) {
ioa->has_cache = 1;
continue;
}
if (page0_inq.supported_page_codes[j] == 0xC4) {
ioa->has_cache = 1;
memset(&cc_vpd, 0, sizeof(cc_vpd));
ipr_inquiry(&ioa->ioa, 0xC4, &cc_vpd, sizeof(cc_vpd));
if (htonl(cc_vpd.cache_cap) &
IPR_CACHE_CAP_VSET_WRITE_CACHE)
ioa->has_vset_write_cache = 1;
continue;
}
if (page0_inq.supported_page_codes[j] != 0xD0)
continue;
rc = ipr_inquiry(&ioa->ioa, 0xD0, &ioa_cap, sizeof(ioa_cap));
if (rc)
break;
ioa->af_block_size = get_af_block_size(&ioa_cap);
ioa->support_4k = ioa_cap.af_4k_support;
if (ioa_cap.is_aux_cache)
ioa->is_aux_cache = 1;
if (ioa_cap.can_attach_to_aux_cache && ioa_cap.is_dual_wide)
ioa->protect_last_bus = 1;
if (ioa_cap.gscsi_only_ha)
ioa->gscsi_only_ha = 1;
if (ioa_cap.sis_format == IPR_SIS64)
ioa->sis64 = 1;
else {
if (ioa_cap.ra_id_encoding == IPR_2BIT_HOP)
ioa->hop_count = IPR_2BIT_HOP;
else
ioa->hop_count = IPR_3BIT_HOP;
}
rc = ipr_mode_sense(&ioa->ioa, 0x24, &mode_pages);
if (rc)
break;
page24 = (struct ipr_mode_page24 *) (((u8 *)&mode_pages)
+ mode_pages.hdr.block_desc_len +
sizeof(mode_pages.hdr));
ioa->rebuild_rate = page24->rebuild_rate;
if (ioa_cap.disable_array_rebuild_verify) {
ioa->configure_rebuild_verify = 1;
ioa->disable_rebuild_verify =
page24->rebuild_without_verify;
}
if (ioa_cap.dual_ioa_raid || ioa_cap.dual_ioa_asymmetric_access) {
if (ioa_cap.dual_ioa_raid && page24->dual_adapter_af == ENABLE_DUAL_IOA_AF)
ioa->dual_raid_support = 1;
if (ioa_cap.dual_ioa_asymmetric_access) {
ioa->asymmetric_access = 1;
if (page24->dual_adapter_af == ENABLE_DUAL_IOA_ACTIVE_ACTIVE) {
ioa->dual_raid_support = 1;
ioa->asymmetric_access_enabled = 1;
} else {
ioa->asymmetric_access_enabled = 0;
}
}
}
}
}
/**
* get_prot_levels - populate the prot_level_str field for each array, for each
* vset and each device in the vset
* @ioa: ipr ioa struct
*
* Returns:
* nothing
**/
static void get_prot_levels(struct ipr_ioa *ioa)
{
struct ipr_dev *array, *vset, *dev;
char *prot_level_str;
for_each_array(ioa, array) {
prot_level_str = get_prot_level_str(ioa->supported_arrays,
array->raid_level);
strncpy(array->prot_level_str, prot_level_str, 8);
}
for_each_vset(ioa, vset) {
prot_level_str = get_prot_level_str(ioa->supported_arrays,
vset->raid_level);
strncpy(vset->prot_level_str, prot_level_str, 8);
for_each_dev_in_vset(vset, dev)
strncpy(dev->prot_level_str, prot_level_str, 8);
}
}
void ipr_convert_res_path_to_bytes(struct ipr_dev *dev)
{
struct scsi_dev_data *scsi_dev_data = dev->scsi_dev_data;
int i;
char *startptr, *endptr;
if (scsi_dev_data) {
startptr = dev->res_path_name;
i = 0;
do {
dev->res_path[0].res_path_bytes[i++] = (u8)strtol(startptr, &endptr, 16);
startptr = endptr + 1;
} while (*endptr != '\0' && i < 8);
while ( i < 8 ) dev->res_path[0].res_path_bytes[i++] = 0xff;
}
}
/**
* get_res_addr -
* @dev: ipr dev struct
* @res_addr: ipr_res_addr struct
*
* Returns:
* 0 if success / -1 on failure
**/
static int get_res_addr(struct ipr_dev *dev, struct ipr_res_addr *res_addr)
{
struct ipr_dev_record *dev_record = dev->dev_rcd;
struct ipr_array_record *array_record = dev->array_rcd;
if (dev->scsi_dev_data) {
res_addr->host = dev->scsi_dev_data->host;
res_addr->bus = dev->scsi_dev_data->channel;
res_addr->target = dev->scsi_dev_data->id;
res_addr->lun = dev->scsi_dev_data->lun;
if (dev->ioa->sis64) {
strncpy(dev->res_path_name, dev->scsi_dev_data->res_path, strlen(dev->scsi_dev_data->res_path));
ipr_convert_res_path_to_bytes(dev);
}
} else if (ipr_is_af_dasd_device(dev)) {
if (dev_record && dev_record->no_cfgte_dev) {
res_addr->host = dev->ioa->host_num;
res_addr->bus = dev_record->type2.last_resource_addr.bus;
res_addr->target = dev_record->type2.last_resource_addr.target;
res_addr->lun = dev_record->type2.last_resource_addr.lun;
} else if (dev_record) {
res_addr->host = dev->ioa->host_num;
res_addr->bus = dev_record->type2.resource_addr.bus;
res_addr->target = dev_record->type2.resource_addr.target;
res_addr->lun = dev_record->type2.resource_addr.lun;
if (dev->ioa->sis64) {
ipr_format_res_path(dev_record->type3.res_path, dev->res_path_name, IPR_MAX_RES_PATH_LEN);
ipr_convert_res_path_to_bytes(dev);
}
} else
return -1;
} else if (ipr_is_volume_set(dev)) {
if (array_record && array_record->no_config_entry) {
res_addr->host = dev->ioa->host_num;
res_addr->bus = array_record->type2.last_resource_addr.bus;
res_addr->target = array_record->type2.last_resource_addr.target;
res_addr->lun = array_record->type2.last_resource_addr.lun;
} else if (array_record) {
res_addr->host = dev->ioa->host_num;
res_addr->bus = array_record->type2.resource_addr.bus;
res_addr->target = array_record->type2.resource_addr.target;
res_addr->lun = array_record->type2.resource_addr.lun;
} else
return -1;
} else
return -1;
return 0;
}
/**
* find_multipath_vset - return the other vset of a given multipath vset
* @vset1: ipr dev struct
*
* Returns:
* ipr_dev if success / NULL on failure
**/
static struct ipr_dev *find_multipath_vset(struct ipr_dev *vset1)
{
struct ipr_ioa *ioa;
struct ipr_dev *vset2;
for_each_ioa(ioa) {
if (ioa == vset1->ioa)
continue;
for_each_vset(ioa, vset2) {
if (memcmp(vset1->vendor_id,
vset2->vendor_id,
IPR_VENDOR_ID_LEN))
continue;
if (memcmp(vset1->product_id,
vset2->product_id,
IPR_PROD_ID_LEN))
continue;
if (memcmp(vset1->serial_number,
vset2->serial_number,
IPR_SERIAL_NUM_LEN))
continue;
return vset2;
}
}
return NULL;
}
/**
* link_multipath_vsets - set the alt_path entries for multipath vsets
*
* Returns:
* nothing
**/
static void link_multipath_vsets()
{
struct ipr_ioa *ioa;
struct ipr_dev *vset1, *vset2;
for_each_ioa(ioa) {
for_each_vset(ioa, vset1) {
vset2 = find_multipath_vset(vset1);
if (!vset2)
continue;
vset1->alt_path = vset2;
vset2->alt_path = vset1;
}
}
}
/**
* ipr_format_res_path - Format the resource path into a string.
* @res_path: resource path
* @buf: buffer
* @len: buffer length
*
* Return value:
* none
**/
void ipr_format_res_path(u8 *res_path, char *buffer, int len)
{
int i;
char *p = buffer;
*p = '\0';
p += snprintf(p, buffer + len - p, "%02X", res_path[0]);
for (i = 1; res_path[i] != 0xff && ((i * 3) < len); i++)
p += snprintf(p, buffer + len - p, "-%02X", res_path[i]);
}
/**
* ipr_format_res_path_wo_hyphen - Format the resource path into a string.
* @res_path: resource path
* @buf: buffer
* @len: buffer length
*
* Return value:
* none
**/
void ipr_format_res_path_wo_hyphen(u8 *res_path, char *buffer, int len)
{
int i;
char *p = buffer;
*p = '\0';
p += snprintf(p, buffer + len - p, "%02X", res_path[0]);
for (i = 1; res_path[i] != 0xff && ((i * 3) < len); i++)
p += snprintf(p, buffer + len - p, "%02X", res_path[i]);
}
/**
* ipr_res_path_cmp - compare two resource paths
* @dev_res_path
* @scsi_res_path
*
* Returns:
* 1 if the paths are the same, 0 otherwise
**/
int ipr_res_path_cmp(u8 *dev_res_path, char *scsi_res_path)
{
char buffer[IPR_MAX_RES_PATH_LEN];
ipr_format_res_path(dev_res_path, buffer, IPR_MAX_RES_PATH_LEN);
return !strncmp(buffer, scsi_res_path, IPR_MAX_RES_PATH_LEN);
}
/**
* ipr_debug_dump_rcd - dump out a device record
* @rcd: record structure
*
* Returns:
* nothing
*/
void ipr_debug_dump_rcd(struct ipr_common_record *rcd)
{
int i;
u8 *rcd_ptr = (u8 *)rcd;
dprintf("===========\n");
dprintf("Record ID = %d, Length = %d\n", rcd->record_id, rcd->record_len);
for (i=0; irecord_len; i++) {
dprintf("%02x", rcd_ptr[i]);
if ((i+1)%8 == 0)
dprintf(" ");
if ((i+1)%32 == 0)
dprintf("\n");
}
dprintf("\n");
}
/**
* ipr_get_logical_block_size - check the logical block size
* @dev: ipr dev struct
*
* Return value:
* none
**/
int ipr_get_logical_block_size(struct ipr_dev *dev)
{
char path[PATH_MAX], *first_hyphen;
char buff[16];
ssize_t len;
int rc;
first_hyphen = strchr(dev->dev_name, 's');
sprintf(path, "/sys/block/%s/queue", first_hyphen);
len = sysfs_read_attr(path, "logical_block_size", buff, 16);
if (len < 0) {
syslog_dbg("Failed to open logical_block_size parameter.\n");
return -1;
}
rc = atoi(buff);
return rc;
}
/**
* init_inquiry_c7 - Page 0xC7 Inquiry to disks
* @dev: ipr dev struct
*
* Setup IBM vendor unique settings
*
* Returns:
* 0 if success / other on failure
**/
static int init_inquiry_c7(struct ipr_dev *dev)
{
struct ipr_sas_inquiry_pageC7 inq;
int rc;
if (dev->read_c7)
return 0;
if (!dev->scsi_dev_data || strncmp(dev->scsi_dev_data->vendor_id, "IBM", 3)) {
if (ipr_is_gscsi(dev)) {
if (ipr_get_logical_block_size(dev) == IPR_JBOD_4K_BLOCK_SIZE) {
dev->block_dev_class |= IPR_BLK_DEV_CLASS_4K;
dev->supports_4k = 1;
} else {
dev->block_dev_class &= ~IPR_BLK_DEV_CLASS_4K;
dev->supports_5xx = 1;
}
}
dev->format_timeout = IPR_FORMAT_UNIT_TIMEOUT;
scsi_dbg(dev, "Skipping IBM vendor settings for non IBM device.\n");
return -EINVAL;
}
memset(&inq, 0, sizeof(inq));
rc = ipr_inquiry(dev, 0xC7, &inq, sizeof(inq));
if (rc) {
scsi_dbg(dev, "Inquiry 0xC7 failed. rc=%d\n", rc);
return rc;
}
switch (inq.support_4k_modes) {
case ONLY_5XX_SUPPORTED:
dev->supports_5xx = 1;
dev->supports_4k = 0;
dev->block_dev_class &= ~IPR_BLK_DEV_CLASS_4K;
scsi_dbg(dev, "Only 5xx supported.\n");
break;
case ONLY_4K_SUPPORTED:
dev->supports_4k = 1;
dev->block_dev_class |= IPR_BLK_DEV_CLASS_4K;
scsi_dbg(dev, "Only 4k supported.\n");
break;
case BOTH_5XXe_OR_4K_SUPPORTED:
default:
dev->supports_5xx = 1;
dev->supports_4k = 1;
dev->block_dev_class |= IPR_BLK_DEV_CLASS_4K;
scsi_dbg(dev, "Both 4k and 5xx supported.\n");
break;
};
dev->read_c7 = 1;
dev->format_timeout = ((inq.format_timeout_hi << 8) | inq.format_timeout_lo) * 60;
return 0;
}
/**
* __check_current_config - populates the ioa configuration data
* @allow_rebuild_refresh: allow_rebuild_refresh flag
* @device_details_only: Skip commands not needed for show-details
*
* Returns:
* nothing
**/
void __check_current_config(bool allow_rebuild_refresh, bool device_details_only)
{
struct scsi_dev_data *scsi_dev_data;
int num_sg_devices, rc, device_count, j, k;
struct ipr_ioa *ioa;
struct ipr_array_query_data *qac_data;
struct ipr_common_record *common_record;
struct ipr_dev_record *device_record;
struct ipr_array_record *array_record;
struct ipr_std_inq_data std_inq_data;
struct sense_data_t sense_data;
struct ipr_res_addr res_addr, *ra;
struct ipr_dev *dev;
int *qac_entry_ref;
struct ipr_dev_identify_vpd di_vpd;
char *pchr;
struct ipr_mode_pages mode_pages;
struct ipr_ioa_mode_page *page;
if (ipr_qac_data == NULL) {
ipr_qac_data =
(struct ipr_array_query_data *)
calloc(num_ioas, sizeof(struct ipr_array_query_data));
}
/* Get sg data via sysfs */
num_sg_devices = get_scsi_dev_data(&scsi_dev_table);
get_sg_names(num_sg_devices);
get_sd_names(num_sg_devices);
for(ioa = ipr_ioa_head, qac_data = ipr_qac_data;
ioa; ioa = ioa->next, qac_data++) {
get_ioa_name(ioa, num_sg_devices);
ioa->num_devices = 0;
rc = ipr_inquiry(&ioa->ioa, IPR_STD_INQUIRY,
&std_inq_data, sizeof(std_inq_data));
if (rc)
ioa->ioa_dead = 1;
get_ioa_cap(ioa);
get_dual_ioa_state(ioa);
get_subsys_config(ioa);
if (ioa->has_vset_write_cache == 1 &&
get_ioa_caching(ioa) == IPR_IOA_VSET_CACHE_ENABLED)
ioa->vset_write_cache = 1;
/* Get Query Array Config Data */
rc = ipr_query_array_config(ioa, allow_rebuild_refresh, 0, 0, 0, qac_data);
if (rc != 0) {
qac_data->num_records = 0;
qac_data->resp_len = qac_data->hdr_len;
}
ioa->qac_data = qac_data;
ioa->start_array_qac_entry = NULL;
device_count = 0;
memset(ioa->dev, 0, IPR_MAX_IOA_DEVICES * sizeof(struct ipr_dev));
qac_entry_ref = calloc(1, sizeof(int) * qac_data->num_records);
/* now assemble data pertaining to each individual device */
for (j = 0, scsi_dev_data = scsi_dev_table;
j < num_sg_devices; j++, scsi_dev_data++) {
if (scsi_dev_data->host != ioa->host_num)
continue;
if (ioa->ioa.scsi_dev_data == scsi_dev_data)
continue;
if (scsi_dev_data->type == TYPE_DISK ||
scsi_dev_data->type == IPR_TYPE_AF_DISK ||
scsi_dev_data->type == IPR_TYPE_ARRAY ||
scsi_dev_data->type == TYPE_ENCLOSURE ||
scsi_dev_data->type == TYPE_ROM ||
scsi_dev_data->type == TYPE_TAPE ||
scsi_dev_data->type == TYPE_PROCESSOR) {
ioa->dev[device_count].ioa = ioa;
ioa->dev[device_count].scsi_dev_data = scsi_dev_data;
ioa->dev[device_count].qac_entry = NULL;
strcpy(ioa->dev[device_count].dev_name,
scsi_dev_data->dev_name);
strcpy(ioa->dev[device_count].gen_name,
scsi_dev_data->gen_name);
/* find array config data matching resource entry */
k = 0;
for_each_qac_entry(common_record, qac_data) {
if (common_record->record_id == IPR_RECORD_ID_DEVICE_RECORD) {
device_record = (struct ipr_dev_record *)common_record;
if (device_record->type2.resource_addr.bus == scsi_dev_data->channel &&
device_record->type2.resource_addr.target == scsi_dev_data->id &&
device_record->type2.resource_addr.lun == scsi_dev_data->lun) {
ioa->dev[device_count].qac_entry = common_record;
qac_entry_ref[k]++;
break;
}
} else if (common_record->record_id == IPR_RECORD_ID_ARRAY_RECORD) {
array_record = (struct ipr_array_record *)common_record;
if (array_record->type2.resource_addr.bus == scsi_dev_data->channel &&
array_record->type2.resource_addr.target == scsi_dev_data->id &&
array_record->type2.resource_addr.lun == scsi_dev_data->lun) {
ioa->dev[device_count].qac_entry = common_record;
qac_entry_ref[k]++;
break;
}
} else if (common_record->record_id == IPR_RECORD_ID_DEVICE_RECORD_3) {
device_record = (struct ipr_dev_record *)common_record;
if (ipr_res_path_cmp(device_record->type3.res_path, scsi_dev_data->res_path)) {
ioa->dev[device_count].qac_entry = common_record;
qac_entry_ref[k]++;
break;
}
} else if (common_record->record_id == IPR_RECORD_ID_VSET_RECORD_3) {
array_record = (struct ipr_array_record *)common_record;
if (ipr_res_path_cmp(array_record->type3.res_path, scsi_dev_data->res_path)) {
ioa->dev[device_count].qac_entry = common_record;
qac_entry_ref[k]++;
break;
}
} else if (common_record->record_id == IPR_RECORD_ID_ARRAY_RECORD_3) {
array_record = (struct ipr_array_record *)common_record;
if (ipr_res_path_cmp(array_record->type3.res_path, scsi_dev_data->res_path)) {
ioa->dev[device_count].qac_entry = common_record;
qac_entry_ref[k]++;
break;
}
}
k++;
}
/* Send Test Unit Ready to start device if its a volume set */
/* xxx TODO try to remove this */
if (!ipr_fast && ipr_is_volume_set(&ioa->dev[device_count]) && !device_details_only)
__ipr_test_unit_ready(&ioa->dev[device_count], &sense_data);
device_count++;
}
}
/* now scan qac device and array entries to see which ones have
not been referenced */
k = 0;
for_each_qac_entry(common_record, qac_data) {
if (qac_entry_ref[k] > 1)
syslog(LOG_ERR,
"Query Array Config entry referenced more than once\n");
if (common_record->record_id == IPR_RECORD_ID_SUPPORTED_ARRAYS) {
ioa->supported_arrays = (struct ipr_supported_arrays *)common_record;
} else if (!qac_entry_ref[k] &&
(ipr_is_device_record(common_record->record_id) ||
ipr_is_vset_record(common_record->record_id))) {
// TODO - type 3 array records????
array_record = (struct ipr_array_record *)common_record;
if (ipr_is_vset_record(common_record->record_id) &&
array_record->start_cand) {
ioa->start_array_qac_entry = array_record;
} else {
/* add phantom qac entry to ioa device list */
ioa->dev[device_count].scsi_dev_data = NULL;
ioa->dev[device_count].qac_entry = common_record;
ioa->dev[device_count].ioa = ioa;
strcpy(ioa->dev[device_count].dev_name, "");
strcpy(ioa->dev[device_count].gen_name, "");
device_count++;
}
}
k++;
}
ioa->num_devices = device_count;
free(qac_entry_ref);
}
for_each_ioa(ioa) {
for_each_dev(ioa, dev) {
get_res_addr(dev, &res_addr);
for_each_ra(ra, dev)
memcpy(ra, &res_addr, sizeof(*ra));
if (ipr_is_gscsi(dev) || ipr_is_af_dasd_device(dev) && !device_details_only)
init_inquiry_c7(dev);
if (!dev->qac_entry)
continue;
if (dev->qac_entry->record_id == IPR_RECORD_ID_DEVICE_RECORD) {
dev->vendor_id = dev->dev_rcd->type2.vendor_id;
dev->product_id = dev->dev_rcd->type2.product_id;
dev->serial_number = dev->dev_rcd->type2.serial_number;
dev->array_id = dev->dev_rcd->type2.array_id;
dev->resource_handle = dev->dev_rcd->type2.resource_handle;
dev->block_dev_class = dev->dev_rcd->type2.block_dev_class;
if (dev->block_dev_class & IPR_SSD)
dev->read_intensive = dev->dev_rcd->type2.read_intensive;
} else if (dev->qac_entry->record_id == IPR_RECORD_ID_DEVICE_RECORD_3) {
dev->vendor_id = dev->dev_rcd->type3.vendor_id;
dev->product_id = dev->dev_rcd->type3.product_id;
dev->serial_number = dev->dev_rcd->type3.serial_number;
dev->array_id = dev->dev_rcd->type3.array_id;
dev->resource_handle = dev->dev_rcd->type3.resource_handle;
dev->block_dev_class = dev->dev_rcd->type3.block_dev_class;
if (dev->block_dev_class & IPR_SSD)
dev->read_intensive = dev->dev_rcd->type3.read_intensive;
} else if (dev->qac_entry->record_id == IPR_RECORD_ID_ARRAY_RECORD) {
dev->vendor_id = dev->array_rcd->type2.vendor_id;
dev->product_id = dev->array_rcd->type2.product_id;
dev->serial_number = dev->array_rcd->type2.serial_number;
dev->array_id = dev->array_rcd->type2.array_id;
dev->raid_level = dev->array_rcd->type2.raid_level;
dev->stripe_size = dev->array_rcd->type2.stripe_size;
dev->resource_handle = dev->array_rcd->type2.resource_handle;
dev->block_dev_class = dev->array_rcd->type2.block_dev_class;
if (dev->block_dev_class & IPR_SSD)
dev->read_intensive = dev->dev_rcd->type2.read_intensive;
} else if (dev->qac_entry->record_id == IPR_RECORD_ID_VSET_RECORD_3) {
dev->vendor_id = dev->array_rcd->type3.vendor_id;
dev->product_id = dev->array_rcd->type3.product_id;
dev->serial_number = dev->array_rcd->type3.serial_number;
dev->array_id = dev->array_rcd->type3.array_id;
dev->raid_level = dev->array_rcd->type3.raid_level;
dev->stripe_size = dev->array_rcd->type3.stripe_size;
dev->resource_handle = dev->array_rcd->type3.resource_handle;
dev->block_dev_class = dev->array_rcd->type3.block_dev_class;
if (dev->block_dev_class & IPR_SSD)
dev->read_intensive = dev->dev_rcd->type3.read_intensive;
} else if (dev->qac_entry->record_id == IPR_RECORD_ID_ARRAY_RECORD_3) {
dev->vendor_id = dev->array_rcd->type3.vendor_id;
dev->product_id = dev->array_rcd->type3.product_id;
dev->serial_number = dev->array_rcd->type3.serial_number;
dev->array_id = dev->array_rcd->type3.array_id;
dev->raid_level = dev->array_rcd->type3.raid_level;
dev->stripe_size = dev->array_rcd->type3.stripe_size;
dev->resource_handle = dev->array_rcd->type3.resource_handle;
dev->block_dev_class = dev->array_rcd->type3.block_dev_class;
if (dev->block_dev_class & IPR_SSD)
dev->read_intensive = dev->dev_rcd->type3.read_intensive;
}
}
get_prot_levels(ioa);
}
for_each_ioa(ioa) {
if (strlen((char *)ioa->yl_serial_num) == 0) {
memset(&di_vpd, 0, sizeof(di_vpd));
rc = ipr_inquiry(&ioa->ioa, 0x83, &di_vpd, sizeof(di_vpd));
if (!rc && ntohs(di_vpd.add_page_len) > 120) {
pchr = strstr((char *)&di_vpd.dev_identify_contxt[0],"SN");
if (pchr)
strncpy((char *)ioa->yl_serial_num, (pchr + 3), YL_SERIAL_NUM_LEN);
}
}
}
set_devs_format_completed();
link_multipath_vsets();
ipr_cleanup_zeroed_devs();
resolve_old_config();
if (!first_time_check_zeroed_dev) {
for_each_ioa(ioa) {
for_each_dev(ioa, dev) {
if (ipr_is_af_dasd_device(dev)) {
memset(&mode_pages, 0, sizeof(mode_pages));
ipr_mode_sense(dev, 0x20, &mode_pages);
page = (struct ipr_ioa_mode_page *) (((u8 *)&mode_pages) +
mode_pages.hdr.block_desc_len +
sizeof(mode_pages.hdr));
if (page->format_completed)
ipr_add_zeroed_dev(dev);
}
}
}
first_time_check_zeroed_dev = 1;
}
}
void check_current_config(bool allow_rebuild_refresh)
{
__check_current_config(allow_rebuild_refresh, 0);
}
/**
* num_devices_opens - return usage count (number of opens) for a given device
* @host_num: host number
* @channel: channel number
* @id: id number
* @lun: lun number
*
* Returns:
* usage count (number of opens) for a given device
**/
/* xxx TODO delete */
int num_device_opens(int host_num, int channel, int id, int lun)
{
struct scsi_dev_data *scsi_dev_base = NULL;
int opens = 0;
int k, num_sg_devices;
/* Get sg data via sg proc file system */
num_sg_devices = get_scsi_dev_data(&scsi_dev_base);
/* find usage counts in scsi_dev_data */
for (k = 0; k < num_sg_devices; k++)
{
if ((host_num == scsi_dev_base[k].host) &&
(channel == scsi_dev_base[k].channel) &&
(id == scsi_dev_base[k].id) &&
(lun == scsi_dev_base[k].lun))
{
opens = scsi_dev_base[k].opens;
break;
}
}
free(scsi_dev_base);
return opens;
}
/**
* open_and_lock - Open and device file and lock it.
* @file_name: the name of the device to open
*
* Returns:
* file descriptor if success / -1 on failure
**/
int open_and_lock(char *file_name)
{
int fd;
int rc;
fd = open(file_name, O_RDWR);
if (fd <= 1) {
if (!strcmp(tool_name, "iprconfig") || ipr_debug)
syslog(LOG_ERR, "Could not open %s. %m\n", file_name);
return fd;
}
rc = flock(fd, LOCK_EX);
if (rc) {
if (!strcmp(tool_name, "iprconfig") || ipr_debug)
syslog(LOG_ERR, "Could not lock %s. %m\n", file_name);
close(fd);
return rc;
}
return fd;
}
/**
* exit_on_error - exits program or error after cleaning up
* @s: string
* @...: arguments
*
* Returns:
* nothing - exits program on error
**/
void exit_on_error(char *s, ...)
{
va_list args;
char usr_str[256];
exit_func();
va_start(args, s);
vsprintf(usr_str, s, args);
va_end(args);
closelog();
openlog(tool_name, LOG_PERROR | LOG_PID | LOG_CONS, LOG_USER);
syslog(LOG_ERR,"%s",usr_str);
closelog();
exit(1);
}
/**
* ipr_config_file_hdr - prints the header to the ipr config file
* @file_name: file name
*
* Returns:
* nothing
**/
static void ipr_config_file_hdr(char *file_name)
{
FILE *fd;
char cmd_str[64];
if (strlen(file_name) == 0)
return;
/* check if file currently exists */
fd = fopen(file_name, "r");
if (fd) {
fclose(fd);
return;
}
/* be sure directory is present */
sprintf(cmd_str,"install -d %s",IPR_CONFIG_DIR);
system(cmd_str);
/* otherwise, create new file */
fd = fopen(file_name, "w");
if (fd == NULL) {
syslog(LOG_ERR, "Could not open %s. %m\n", file_name);
return;
}
fprintf(fd,"# DO NOT EDIT! Software generated configuration file for\n");
fprintf(fd,"# ipr SCSI device subsystem\n\n");
fprintf(fd,"# Use iprconfig to configure\n");
fprintf(fd,"# See \"man iprconfig\" for more information\n\n");
fclose(fd);
}
/**
* ipr_save_attr -
* @ioa: ipr ioa struct
* @category:
* @field:
* @value:
* @update:
*
* Returns:
* nothing
**/
static void ipr_save_attr(struct ipr_ioa *ioa, char *category,
char *field, char *value, int update)
{
char fname[64];
FILE *fd, *temp_fd;
char temp_fname[64], line[64];
int bus_found = 0;
int field_found = 0;
sprintf(fname, "%s%x_%s", IPR_CONFIG_DIR, ioa->ccin, ioa->pci_address);
ipr_config_file_hdr(fname);
fd = fopen(fname, "r");
if (fd == NULL)
return;
sprintf(temp_fname, "%s.1", fname);
temp_fd = fopen(temp_fname, "w");
if (temp_fd == NULL) {
syslog(LOG_ERR, "Could not open %s. %m\n", temp_fname);
return;
}
while (fgets(line, 64, fd)) {
if (strstr(line, category) && line[0] != '#') {
bus_found = 1;
} else {
if (bus_found) {
if (line[0] == '[') {
bus_found = 0;
if (!field_found) {
if (!update)
fprintf(temp_fd, "# ");
fprintf(temp_fd,"%s %s\n",field,value);
}
}
if (strstr(line, field)) {
if (update)
sprintf(line,"%s %s\n",field,value);
field_found = 1;
}
}
}
fputs(line, temp_fd);
}
if (!field_found) {
if (!bus_found)
fprintf(temp_fd,"\n%s\n", category);
if (!update)
fprintf(temp_fd, "# ");
fprintf(temp_fd,"%s %s\n", field, value);
}
if (rename(temp_fname, fname))
syslog(LOG_ERR, "Could not save %s.\n", fname);
fclose(fd);
fclose(temp_fd);
}
/**
* ipr_save_bus_attr -
* @ioa: ipr ioa struct
* @bus: bus
* @field:
* @value:
* @update:
*
* Returns:
* nothing
**/
static void ipr_save_bus_attr(struct ipr_ioa *ioa, int bus,
char *field, char *value, int update)
{
char category[16];
sprintf(category,"[%s %d]", IPR_CATEGORY_BUS, bus);
ipr_save_attr(ioa, category, field, value, update);
}
/**
* ipr_save_dev_attr -
* @dev: ipr dev struct
* @field:
* @value:
* @update:
*
* Returns:
* nothing
**/
static void ipr_save_dev_attr(struct ipr_dev *dev, char *field,
char *value, int update)
{
char category[100];
struct ipr_dev *alt_dev = dev->alt_path;
if (dev->scsi_dev_data->device_id)
sprintf(category,"[%s %lx]", IPR_CATEGORY_DEVICE,
dev->scsi_dev_data->device_id);
else
sprintf(category,"[%s %d:%d:%d]", IPR_CATEGORY_DISK,
dev->scsi_dev_data->channel, dev->scsi_dev_data->id,
dev->scsi_dev_data->lun);
ipr_save_attr(dev->ioa, category, field, value, update);
if (alt_dev)
ipr_save_attr(alt_dev->ioa, category, field, value, update);
}
/**
* ipr_save_ioa_attr -
* @ioa: ipr ioa struct
* @field:
* @value:
* @update:
*
* Returns:
* nothing
**/
static void ipr_save_ioa_attr(struct ipr_ioa *ioa, char *field,
char *value, int update)
{
char category[16];
sprintf(category,"[%s]", IPR_CATEGORY_IOA);
ipr_save_attr(ioa, category, field, value, update);
}
/**
* ipr_get_saved_attr -
* @ioa: ipr ioa struct
* @category:
* @field:
* @value:
*
* Returns:
* 0 if success / RC_FAILED on failure
**/
static int ipr_get_saved_attr(struct ipr_ioa *ioa, char *category,
char *field, char *value)
{
FILE *fd;
char fname[100], line[100], *str_ptr;
int bus_found = 0;
sprintf(fname, "%s%x_%s", IPR_CONFIG_DIR, ioa->ccin, ioa->pci_address);
fd = fopen(fname, "r");
if (fd == NULL)
return RC_FAILED;
while (NULL != fgets(line, 100, fd)) {
if (line[0] != '#') {
if (strstr(line, category))
bus_found = 1;
else if (bus_found) {
if (line[0] == '[')
bus_found = 0;
if ((str_ptr = strstr(line, field))) {
str_ptr += strlen(field);
while (str_ptr[0] == ' ')
str_ptr++;
sscanf(str_ptr, "%s\n", value);
fclose(fd);
return RC_SUCCESS;
}
}
}
}
fclose(fd);
return RC_FAILED;
}
/**
* ipr_get_saved_bus_attr -
* @ioa: ipr ioa struct
* @bus:
* @field:
* @value:
*
* Returns:
* 0 if success / RC_FAILED on failure
**/
static int ipr_get_saved_bus_attr(struct ipr_ioa *ioa, int bus,
char *field, char *value)
{
char category[16];
sprintf(category,"[%s %d]", IPR_CATEGORY_BUS, bus);
return ipr_get_saved_attr(ioa, category, field, value);
}
/**
* ipr_get_saved_dev_attr -
* @dev: ipr dev struct
* @field:
* @value:
*
* Returns:
* 0 if success / RC_FAILED on failure
**/
static int ipr_get_saved_dev_attr(struct ipr_dev *dev,
char *field, char *value)
{
char category[100];
int rc = RC_FAILED;
if (!dev->scsi_dev_data)
return -ENXIO;
if (dev->scsi_dev_data->device_id) {
sprintf(category,"[%s %lx]", IPR_CATEGORY_DEVICE,
dev->scsi_dev_data->device_id);
rc = ipr_get_saved_attr(dev->ioa, category, field, value);
if (rc) {
/* Older kernels reported a byte swapped device_id, which has since
been changed. Check both for compatibility reasons */
sprintf(category,"[%s %lx]", IPR_CATEGORY_DEVICE,
htobe64(dev->scsi_dev_data->device_id));
rc = ipr_get_saved_attr(dev->ioa, category, field, value);
}
}
if (rc) {
sprintf(category,"[%s %d:%d:%d]", IPR_CATEGORY_DISK,
dev->scsi_dev_data->channel, dev->scsi_dev_data->id,
dev->scsi_dev_data->lun);
rc = ipr_get_saved_attr(dev->ioa, category, field, value);
}
return rc;
}
/**
* ipr_get_saved_ioa_attr -
* @ioa: ipr ioa struct
* @field:
* @value:
*
* Returns:
* 0 if success / RC_FAILED on failure
**/
static int ipr_get_saved_ioa_attr(struct ipr_ioa *ioa,
char *field, char *value)
{
char category[16];
sprintf(category,"[%s]", IPR_CATEGORY_IOA);
return ipr_get_saved_attr(ioa, category, field, value);
}
#define GSCSI_TCQ_DEPTH 3
#define GSCSI_SAS_TCQ_DEPTH 16
#define AS400_TCQ_DEPTH 16
#define DEFAULT_TCQ_DEPTH 64
/**
* get_tcq_depth - return the proper queue depth for the given device
* @dev: ipr dev struct
*
* Returns:
* GSCSI_TCQ_DEPTH, GSCSI_SAS_TCQ_DEPTH, AS400_TCQ_DEPTH or DEFAULT_TCQ_DEPTH
**/
static int get_tcq_depth(struct ipr_dev *dev)
{
if (ipr_is_gscsi(dev)) {
if (ioa_is_spi(dev->ioa))
return GSCSI_TCQ_DEPTH;
else
return GSCSI_SAS_TCQ_DEPTH;
}
if (!dev->scsi_dev_data)
return AS400_TCQ_DEPTH;
if (!strncmp(dev->scsi_dev_data->vendor_id, "IBMAS400", 8))
return AS400_TCQ_DEPTH;
return DEFAULT_TCQ_DEPTH;
}
/**
* is_tagged -
* @dev: ipr dev struct
*
* Returns:
*
**/
static int is_tagged(struct ipr_dev *dev)
{
char temp[100];
if (!ipr_read_dev_attr(dev, "tcq_enable", temp, 100))
return strtoul(temp, NULL, 10);
else if (!ipr_read_dev_attr(dev, "queue_type", temp, 100))
return (strstr(temp, "none") ? 0 : 1);
return 0;
}
/**
* set_tagged -
* @dev: ipr dev struct
* @tcq_enabled:
*
* Returns:
* 0 if success / non-zero on failure
**/
static int set_tagged(struct ipr_dev *dev, int tcq_enabled)
{
char temp[100];
if (!ipr_read_dev_attr(dev, "tcq_enable", temp, 100)) {
sprintf(temp, "%d", tcq_enabled);
return ipr_write_dev_attr(dev, "tcq_enable", temp);
}
if (!ipr_read_dev_attr(dev, "queue_type", temp, 100)) {
if (!tcq_enabled)
return ipr_write_dev_attr(dev, "queue_type", "none");
if (page0x0a_setup(dev))
return ipr_write_dev_attr(dev, "queue_type", "ordered");
else
return ipr_write_dev_attr(dev, "queue_type", "simple");
}
return -EIO;
}
/**
* get_format_timeout -
* @dev: ipr dev struct
*
* Returns:
* timeout value
**/
static int get_format_timeout(struct ipr_dev *dev)
{
struct ipr_query_dasd_timeouts tos;
int rc, i, records, timeout;
char temp[100];
rc = init_inquiry_c7(dev);
if (rc && ipr_is_af_dasd_device(dev)) {
rc = ipr_query_dasd_timeouts(dev, &tos);
if (!rc) {
records = (ntohl(tos.length) - sizeof(tos.length)) / sizeof(tos.record[0]);
for (i = 0; i < records; i++) {
if (tos.record[i].op_code != FORMAT_UNIT)
continue;
if (IPR_TIMEOUT_RADIX_IS_MINUTE(ntohs(tos.record[i].timeout)))
return ((ntohs(tos.record[i].timeout) & IPR_TIMEOUT_MASK) * 60);
if (IPR_TIMEOUT_RADIX_IS_SECONDS(ntohs(tos.record[i].timeout)))
return ntohs(tos.record[i].timeout) & IPR_TIMEOUT_MASK;
scsi_dbg(dev, "Unknown timeout radix: %X\n",
(ntohs(tos.record[i].timeout) & IPR_TIMEOUT_RADIX_MASK));
break;
}
}
}
timeout = dev->format_timeout;
rc = ipr_get_saved_dev_attr(dev, IPR_FORMAT_TIMEOUT, temp);
if (rc == RC_SUCCESS)
sscanf(temp, "%d", &timeout);
return timeout;
}
static const struct ipr_dasd_timeout_record ipr_dasd_timeouts[] = {
{READ_10, 0, __constant_cpu_to_be16(30)},
{WRITE_10, 0, __constant_cpu_to_be16(30)},
{WRITE_VERIFY, 0, __constant_cpu_to_be16(30)},
{SKIP_READ, 0, __constant_cpu_to_be16(30)},
{SKIP_WRITE, 0, __constant_cpu_to_be16(30)}
};
struct ipr_dasd_timeouts {
u32 length;
struct ipr_dasd_timeout_record record[ARRAY_SIZE(ipr_dasd_timeouts) + 1];
};
/**
* ipr_set_dasd_timeouts -
* @dev: ipr dev struct
* @format_timeout:
*
* Returns:
* 0 if success / non-zero on failure
**/
static int ipr_set_dasd_timeouts(struct ipr_dev *dev, int format_timeout)
{
int fd, rc, len;
u8 cdb[IPR_CCB_CDB_LEN];
struct sense_data_t sense_data;
struct ipr_dasd_timeouts timeouts;
struct ipr_disk_attr attr;
char *name = dev->gen_name;
fd = open(name, O_RDWR);
if (fd <= 1) {
if (!strcmp(tool_name, "iprconfig") || ipr_debug)
syslog(LOG_ERR, "Could not open %s. %m\n", name);
return errno;
}
memcpy(timeouts.record, ipr_dasd_timeouts, sizeof(ipr_dasd_timeouts));
len = sizeof(timeouts) - sizeof(timeouts.record[0]);
if (!ipr_get_dev_attr(dev, &attr)) {
len = sizeof(timeouts);
if (!format_timeout)
format_timeout = attr.format_timeout;
timeouts.record[ARRAY_SIZE(ipr_dasd_timeouts)].op_code = FORMAT_UNIT;
if (format_timeout >= IPR_TIMEOUT_MASK) {
timeouts.record[ARRAY_SIZE(ipr_dasd_timeouts)].timeout =
htons((format_timeout / 60) | IPR_TIMEOUT_MINUTE_RADIX);
} else {
timeouts.record[ARRAY_SIZE(ipr_dasd_timeouts)].timeout =
htons(format_timeout);
}
}
timeouts.length = htonl(len);
memset(cdb, 0, IPR_CCB_CDB_LEN);
cdb[0] = SET_DASD_TIMEOUTS;
cdb[7] = (len >> 8) & 0xff;
cdb[8] = len & 0xff;
rc = sg_ioctl(fd, cdb, &timeouts,
len, SG_DXFER_TO_DEV,
&sense_data, SET_DASD_TIMEOUTS_TIMEOUT);
if (rc != 0)
scsi_cmd_err(dev, &sense_data, "Set DASD timeouts", rc);
close(fd);
return rc;
}
/**
* ipr_get_dev_attr -
* @ioa: ipr ioa struct
* @attr: ipr_disk_attr struct
*
* Returns:
* 0 if success / non-zero on failure
**/
int ipr_get_dev_attr(struct ipr_dev *dev, struct ipr_disk_attr *attr)
{
char temp[100];
struct ipr_mode_pages mode_pages;
struct ipr_ioa_mode_page *page;
if (ipr_read_dev_attr(dev, "queue_depth", temp, 100))
return -EIO;
if (ipr_is_af_dasd_device(dev)) {
memset(&mode_pages, 0, sizeof(mode_pages));
if (ipr_mode_sense(dev, 0x20, &mode_pages))
return -EIO;
page = (struct ipr_ioa_mode_page *) (((u8 *)&mode_pages) +
mode_pages.hdr.block_desc_len +
sizeof(mode_pages.hdr));
attr->queue_depth = page->max_tcq_depth;
} else
attr->queue_depth = strtoul(temp, NULL, 10);
if (ipr_is_af_dasd_device(dev)) {
if (attr->queue_depth < 2)
attr->tcq_enabled = 0;
else
attr->tcq_enabled = 1;
} else
attr->tcq_enabled = is_tagged(dev);
attr->format_timeout = get_format_timeout(dev);
if (ipr_is_gscsi(dev) || ipr_is_volume_set(dev)) {
if (ipr_dev_wcache_policy(dev) == IPR_DEV_CACHE_WRITE_BACK)
attr->write_cache_policy = IPR_DEV_CACHE_WRITE_BACK;
else
attr->write_cache_policy = IPR_DEV_CACHE_WRITE_THROUGH;
}
return 0;
}
int ipr_known_zeroed_is_saved(struct ipr_dev *dev)
{
int len;
struct ipr_mode_pages mode_pages;
struct ipr_ioa_mode_page *page;
memset(&mode_pages, 0, sizeof(mode_pages));
if (!ipr_mode_sense(dev, 0x20, &mode_pages)) {
page = (struct ipr_ioa_mode_page *) (((u8 *)&mode_pages) +
mode_pages.hdr.block_desc_len +
sizeof(mode_pages.hdr));
if (page->format_completed)
return 1;
}
return 0;
}
int ipr_set_format_completed_bit(struct ipr_dev *dev)
{
int len, retries = 5;
struct ipr_mode_pages mode_pages;
struct ipr_ioa_mode_page *page;
scsi_dbg(dev, "Setting device formatted bit. Device ID=%lx\n", dev->scsi_dev_data->device_id);
memset(&mode_pages, 0, sizeof(mode_pages));
do {
if (!ipr_mode_sense(dev, 0x20, &mode_pages))
break;
sleep(1);
} while (retries--);
if (!retries) {
scsi_info(dev, "Page 20 mode sense failed. Device ID=%lx\n", dev->scsi_dev_data->device_id);
return -EIO;
}
page = (struct ipr_ioa_mode_page *) (((u8 *)&mode_pages) +
mode_pages.hdr.block_desc_len +
sizeof(mode_pages.hdr));
page->format_completed = 1;
len = mode_pages.hdr.length + 1;
mode_pages.hdr.length = 0;
mode_pages.hdr.medium_type = 0;
mode_pages.hdr.device_spec_parms = 0;
page->hdr.parms_saveable = 0;
do {
if (!ipr_mode_select(dev, &mode_pages, len))
break;
sleep(1);
} while (retries--);
if (!retries) {
scsi_info(dev, "Page 20 mode select failed. Device ID=%lx\n", dev->scsi_dev_data->device_id);
return -EIO;
}
return 0;
}
/**
* get_ioa_caching -
* @ioa: ipr ioa struct
*
* Returns:
* 0
**/
int get_ioa_caching(struct ipr_ioa *ioa)
{
int rc;
int found = 0;
struct ipr_query_ioa_caching_info info;
struct ipr_global_cache_params_term *term;
int term_size = sizeof(struct ipr_query_ioa_caching_info);
memset(&info, 0, term_size);
rc = ipr_query_cache_parameters(ioa, &info, term_size);
if (rc)
return IPR_IOA_REQUESTED_CACHING_DEFAULT;
for_each_cache_term(term, &info)
if (term && term->term_id == IPR_CACHE_PARAM_TERM_ID) {
found = 1;
break;
}
if (found == 1)
if (term->enable_caching_dual_ioa_failure == IPR_IOA_CACHING_DUAL_FAILURE_ENABLED)
if (term->disable_caching_requested == IPR_IOA_REQUESTED_CACHING_DISABLED)
return IPR_IOA_CACHING_DISABLED_DUAL_ENABLED;
else
return IPR_IOA_CACHING_DEFAULT_DUAL_ENABLED;
else if (term->vset_write_cache_enabled)
return IPR_IOA_VSET_CACHE_ENABLED;
else
if (term->disable_caching_requested == IPR_IOA_REQUESTED_CACHING_DISABLED)
return IPR_IOA_REQUESTED_CACHING_DISABLED;
else
return IPR_IOA_REQUESTED_CACHING_DEFAULT;
else
return IPR_IOA_REQUESTED_CACHING_DEFAULT;
}
/**
* ipr_get_ioa_attr -
* @ioa: ipr ioa struct
* @attr: ipr_ioa_attr struct
*
* Returns:
* 0
**/
int ipr_get_ioa_attr(struct ipr_ioa *ioa, struct ipr_ioa_attr *attr)
{
attr->preferred_primary = 0;
attr->gscsi_only_ha = ioa->in_gscsi_only_ha;
attr->active_active = ioa->asymmetric_access_enabled;
attr->caching = get_ioa_caching(ioa);
attr->rebuild_rate = ioa->rebuild_rate;
attr->disable_rebuild_verify = ioa->disable_rebuild_verify;
if (!ioa->dual_raid_support)
return 0;
if (ioa->ioa_status.cap.preferred_role == IPR_IOA_STATE_PRIMARY)
attr->preferred_primary = 1;
return 0;
}
/**
* ipr_modify_dev_attr -
* @dev: ipr dev struct
* @attr: ipr_disk_attr struct
*
* Returns:
* 0
**/
int ipr_modify_dev_attr(struct ipr_dev *dev, struct ipr_disk_attr *attr)
{
char temp[100];
int rc;
rc = ipr_get_saved_dev_attr(dev, IPR_QUEUE_DEPTH, temp);
if (rc == RC_SUCCESS)
sscanf(temp, "%d", &attr->queue_depth);
rc = ipr_get_saved_dev_attr(dev, IPR_TCQ_ENABLED, temp);
if (rc == RC_SUCCESS)
sscanf(temp, "%d", &attr->tcq_enabled);
rc = ipr_get_saved_dev_attr(dev, IPR_FORMAT_TIMEOUT, temp);
if (rc == RC_SUCCESS)
sscanf(temp, "%d", &attr->format_timeout);
rc = ipr_get_saved_dev_attr(dev, IPR_WRITE_CACHE_POLICY, temp);
if (rc == RC_SUCCESS)
sscanf(temp, "%d", &attr->write_cache_policy);
else
attr->write_cache_policy = IPR_DEV_CACHE_WRITE_BACK;
return 0;
}
/**
* ipr_modify_ioa_attr -
* @ioa: ipr ioa struct
* @attr: ipr_ioa_attr struct
*
* Returns:
* 0
**/
int ipr_modify_ioa_attr(struct ipr_ioa *ioa, struct ipr_ioa_attr *attr)
{
char temp[100];
int rc;
rc = ipr_get_saved_ioa_attr(ioa, IPR_GSCSI_HA_ONLY, temp);
if (rc == RC_SUCCESS)
sscanf(temp, "%d", &attr->gscsi_only_ha);
rc = ipr_get_saved_ioa_attr(ioa, IPR_DUAL_ADAPTER_ACTIVE_ACTIVE, temp);
if (rc == RC_SUCCESS)
sscanf(temp, "%d", &attr->active_active);
return 0;
}
/**
* ipr_set_dev_attr -
* @dev: ipr dev struct
* @attr: ipr_disk_attr struct
* @save: save flag
*
* Returns:
* 0 if success / non-zero on failure
**/
int ipr_set_dev_attr(struct ipr_dev *dev, struct ipr_disk_attr *attr, int save)
{
struct ipr_disk_attr old_attr;
char temp[100];
if (ipr_get_dev_attr(dev, &old_attr))
return -EIO;
if (attr->queue_depth != old_attr.queue_depth) {
sprintf(temp, "%d", attr->queue_depth);
if (ipr_is_af_dasd_device(dev)) {
if (ipr_setup_af_qdepth(dev, attr->queue_depth))
return -EIO;
} else {
if (ipr_write_dev_attr(dev, "queue_depth", temp))
return -EIO;
if (dev->alt_path && ipr_write_dev_attr(dev->alt_path,
"queue_depth",
temp))
return -EIO;
}
if (save)
ipr_save_dev_attr(dev, IPR_QUEUE_DEPTH, temp, 1);
}
if (attr->format_timeout != old_attr.format_timeout) {
if (ipr_is_af_dasd_device(dev)) {
sprintf(temp, "%d", attr->format_timeout);
if (ipr_set_dasd_timeouts(dev, attr->format_timeout))
return -EIO;
if (save)
ipr_save_dev_attr(dev, IPR_FORMAT_TIMEOUT, temp, 1);
}
}
if (attr->tcq_enabled != old_attr.tcq_enabled) {
if (!ipr_is_af_dasd_device(dev)) {
if (set_tagged(dev, attr->tcq_enabled))
return -EIO;
sprintf(temp, "%d", attr->tcq_enabled);
if (save)
ipr_save_dev_attr(dev, IPR_TCQ_ENABLED, temp, 1);
}
}
if (ipr_is_gscsi(dev) || ipr_is_volume_set(dev)) {
if (attr->write_cache_policy != old_attr.write_cache_policy
|| !attr->write_cache_policy) {
ipr_set_dev_wcache_policy(dev, attr->write_cache_policy);
if (save) {
sprintf(temp, "%d", attr->write_cache_policy);
ipr_save_dev_attr(dev, IPR_WRITE_CACHE_POLICY, temp, 1);
}
}
}
return 0;
}
/**
* ipr_set_ioa_attr -
* @ioa: ipr ioa struct
* @attr: ipr_ioa_attr struct
* @save: save flag
*
* Returns:
* 0 if success / non-zero on failure
**/
int ipr_set_ioa_attr(struct ipr_ioa *ioa, struct ipr_ioa_attr *attr, int save)
{
struct ipr_ioa_attr old_attr;
char temp[100];
int mode;
int rc;
if (ipr_get_ioa_attr(ioa, &old_attr))
return -EIO;
if (ioa->has_vset_write_cache && attr->vset_write_cache) {
/* vset cache should not be disabled adapter-wide
for any reason. So we don't save the parameter here. */
ipr_change_cache_parameters(ioa,
IPR_IOA_SET_VSET_CACHE_ENABLED);
}
/* FIXME - preferred_primary and active_active may change at the same
* time. This code may need to change.
*/
if (attr->preferred_primary != old_attr.preferred_primary)
if (ipr_change_multi_adapter_assignment(ioa, attr->preferred_primary, IPR_PRESERVE_ASYMMETRIC_STATE))
return -EIO;
if (attr->gscsi_only_ha != old_attr.gscsi_only_ha) {
sprintf(temp, "%d", attr->gscsi_only_ha);
if (ipr_set_ha_mode(ioa, attr->gscsi_only_ha))
return -EIO;
if (save)
ipr_save_ioa_attr(ioa, IPR_GSCSI_HA_ONLY, temp, 1);
ipr_reset_adapter(ioa);
}
if (attr->active_active != old_attr.active_active && ioa->asymmetric_access) {
sprintf(temp, "%d", attr->active_active);
/* If setting active/active, use mode page 24.
* If clearing, reset the adapter and then use
* Change Multi Adapter Assignment. */
if (attr->active_active) {
if (ipr_set_active_active_mode(ioa))
return -EIO;
if (save)
ipr_save_ioa_attr(ioa, IPR_DUAL_ADAPTER_ACTIVE_ACTIVE, temp, 1);
} else {
if (save)
ipr_save_ioa_attr(ioa, IPR_DUAL_ADAPTER_ACTIVE_ACTIVE, temp, 1);
ipr_reset_adapter(ioa);
if (ipr_change_multi_adapter_assignment(ioa,
attr->preferred_primary,
attr->active_active))
return -EIO;
}
}
if (attr->caching != old_attr.caching) {
if (attr->caching == IPR_IOA_REQUESTED_CACHING_DEFAULT)
mode = IPR_IOA_SET_CACHING_DEFAULT;
else
mode = IPR_IOA_SET_CACHING_DISABLED;
ipr_change_cache_parameters(ioa, mode);
}
if (attr->rebuild_rate != old_attr.rebuild_rate) {
rc = ipr_set_array_rebuild_rate(ioa, attr->rebuild_rate);
if (rc)
return rc;
if (save) {
sprintf(temp, "%d", attr->rebuild_rate);
ipr_save_ioa_attr(ioa, IPR_ARRAY_REBUILD_RATE, temp, 1);
}
}
if (attr->disable_rebuild_verify != old_attr.disable_rebuild_verify) {
rc = ipr_set_array_rebuild_verify(ioa,
attr->disable_rebuild_verify);
if (rc)
return rc;
if (save) {
sprintf(temp, "%d", attr->disable_rebuild_verify);
ipr_save_ioa_attr(ioa, IPR_ARRAY_DISABLE_REBUILD_VERIFY,
temp, 1);
}
}
get_dual_ioa_state(ioa); /* for preferred_primary */
get_subsys_config(ioa); /* for gscsi_only_ha */
return 0;
}
/**
* ipr_query_dasd_timeouts -
* @dev: ipr dev struct
* @timeouts: ipr_query_dasd_timesouts struct
*
* Returns:
* 0 if success / non-zero on failure
**/
int ipr_query_dasd_timeouts(struct ipr_dev *dev,
struct ipr_query_dasd_timeouts *timeouts)
{
int fd, rc;
u8 cdb[IPR_CCB_CDB_LEN];
struct sense_data_t sense_data;
char *name = dev->gen_name;
fd = open(name, O_RDWR);
if (fd <= 1) {
if (!strcmp(tool_name, "iprconfig") || ipr_debug)
syslog(LOG_ERR, "Could not open %s. %m\n", name);
return errno;
}
memset(timeouts, 0, sizeof(*timeouts));
memset(cdb, 0, IPR_CCB_CDB_LEN);
cdb[0] = QUERY_DASD_TIMEOUTS;
cdb[7] = (sizeof(*timeouts) >> 8) & 0xff;
cdb[8] = sizeof(*timeouts) & 0xff;
rc = sg_ioctl(fd, cdb, timeouts,
sizeof(*timeouts), SG_DXFER_FROM_DEV,
&sense_data, SET_DASD_TIMEOUTS_TIMEOUT);
if (rc != 0)
scsi_cmd_err(dev, &sense_data, "Query DASD timeouts", rc);
close(fd);
return rc;
}
/**
* ipr_get_bus_attr -
* @ioa: ipr ioa struct
* @sbus: ipr_scsi_buses struct
*
* Returns:
* 0 if success / non-zero on failure
**/
int ipr_get_bus_attr(struct ipr_ioa *ioa, struct ipr_scsi_buses *sbus)
{
struct ipr_mode_pages mode_pages;
struct ipr_mode_page_28 *page_28;
struct ipr_mode_page_28_scsi_dev_bus_attr *bus;
int rc, i, busno;
memset(&mode_pages, 0, sizeof(mode_pages));
memset(sbus, 0, sizeof(*sbus));
rc = ipr_mode_sense(&ioa->ioa, 0x28, &mode_pages);
if (rc)
return rc;
page_28 = (struct ipr_mode_page_28 *)(mode_pages.data + mode_pages.hdr.block_desc_len);
for_each_bus_attr(bus, page_28, i) {
busno = bus->res_addr.bus;
sbus->bus[busno].max_xfer_rate = ntohl(bus->max_xfer_rate);
sbus->bus[busno].qas_capability = bus->qas_capability;
sbus->bus[busno].scsi_id = bus->scsi_id;
sbus->bus[busno].bus_width = bus->bus_width;
sbus->bus[busno].extended_reset_delay = bus->extended_reset_delay;
sbus->bus[busno].min_time_delay = bus->min_time_delay;
sbus->num_buses++;
}
return 0;
}
/**
* ipr_set_bus_attr -
* @ioa: ipr ioa struct
* @sbus: ipr_scsi_buses struct
* @save: save flag
*
* Returns:
* 0 if success / non-zero on failure
**/
int ipr_set_bus_attr(struct ipr_ioa *ioa, struct ipr_scsi_buses *sbus, int save)
{
struct ipr_mode_pages mode_pages;
struct ipr_mode_page_28 *page_28;
struct ipr_mode_page_28_scsi_dev_bus_attr *bus;
struct ipr_scsi_buses old_settings;
int rc, i, busno, len;
int reset_needed = 0;
char value_str[64];
memset(&mode_pages, 0, sizeof(mode_pages));
rc = ipr_mode_sense(&ioa->ioa, 0x28, &mode_pages);
if (rc)
return rc;
rc = ipr_get_bus_attr(ioa, &old_settings);
if (rc)
return rc;
page_28 = (struct ipr_mode_page_28 *)
(mode_pages.data + mode_pages.hdr.block_desc_len);
for_each_bus_attr(bus, page_28, i) {
busno = bus->res_addr.bus;
bus->bus_width = sbus->bus[busno].bus_width;
if (save && bus->bus_width != old_settings.bus[busno].bus_width) {
sprintf(value_str, "%d", bus->bus_width);
ipr_save_bus_attr(ioa, i, IPR_BUS_WIDTH, value_str, 1);
}
bus->max_xfer_rate = htonl(sbus->bus[busno].max_xfer_rate);
if (save && bus->max_xfer_rate != old_settings.bus[busno].max_xfer_rate) {
sprintf(value_str, "%d",
IPR_BUS_XFER_RATE_TO_THRUPUT(sbus->bus[busno].max_xfer_rate,
bus->bus_width));
ipr_save_bus_attr(ioa, i, IPR_MAX_XFER_RATE_STR, value_str, 1);
}
bus->qas_capability = sbus->bus[busno].qas_capability;
if (save && bus->qas_capability != old_settings.bus[busno].qas_capability) {
sprintf(value_str, "%d", bus->qas_capability);
ipr_save_bus_attr(ioa, i, IPR_QAS_CAPABILITY, value_str, 1);
}
if (bus->scsi_id != sbus->bus[busno].scsi_id)
reset_needed = 1;
bus->scsi_id = sbus->bus[busno].scsi_id;
if (save && bus->scsi_id != old_settings.bus[busno].scsi_id) {
sprintf(value_str, "%d", bus->scsi_id);
ipr_save_bus_attr(ioa, i, IPR_HOST_SCSI_ID, value_str, 1);
}
bus->min_time_delay = sbus->bus[busno].min_time_delay;
if (save && bus->min_time_delay != old_settings.bus[busno].min_time_delay) {
sprintf(value_str, "%d", bus->min_time_delay);
ipr_save_bus_attr(ioa, i, IPR_MIN_TIME_DELAY, value_str, 1);
}
bus->extended_reset_delay = sbus->bus[busno].extended_reset_delay;
}
len = mode_pages.hdr.length + 1;
mode_pages.hdr.length = 0;
rc = ipr_mode_select(&ioa->ioa, &mode_pages, len);
if (reset_needed)
ipr_reset_adapter(ioa);
return rc;
}
/**
* ipr_modify_bus_attr -
* @ioa: ipr ioa struct
* @sbus: ipr_scsi_buses struct
*
* Returns:
* nothing
**/
void ipr_modify_bus_attr(struct ipr_ioa *ioa, struct ipr_scsi_buses *sbus)
{
int i, rc, saved_value, max_xfer_rate;
char value_str[64];
for (i = 0; i < sbus->num_buses; i++) {
rc = ipr_get_saved_bus_attr(ioa, i, IPR_QAS_CAPABILITY, value_str);
if (rc == RC_SUCCESS) {
sscanf(value_str, "%d", &saved_value);
sbus->bus[i].qas_capability = saved_value;
}
if (ioa->scsi_id_changeable) {
rc = ipr_get_saved_bus_attr(ioa, i, IPR_HOST_SCSI_ID, value_str);
if (rc == RC_SUCCESS) {
sscanf(value_str, "%d", &saved_value);
sbus->bus[i].scsi_id = saved_value;
}
}
rc = ipr_get_saved_bus_attr(ioa, i, IPR_BUS_WIDTH, value_str);
if (rc == RC_SUCCESS) {
sscanf(value_str, "%d", &saved_value);
sbus->bus[i].bus_width = saved_value;
}
max_xfer_rate = get_max_bus_speed(ioa, i);
rc = ipr_get_saved_bus_attr(ioa, i, IPR_MAX_XFER_RATE_STR, value_str);
if (rc == RC_SUCCESS) {
sscanf(value_str, "%d", &saved_value);
if (saved_value <= max_xfer_rate) {
sbus->bus[i].max_xfer_rate =
IPR_BUS_THRUPUT_TO_XFER_RATE(saved_value, sbus->bus[i].bus_width);
} else {
sbus->bus[i].max_xfer_rate =
IPR_BUS_THRUPUT_TO_XFER_RATE(max_xfer_rate, sbus->bus[i].bus_width);
sprintf(value_str, "%d", max_xfer_rate);
ipr_save_bus_attr(ioa, i, IPR_MAX_XFER_RATE_STR, value_str, 1);
}
} else {
sbus->bus[i].max_xfer_rate =
IPR_BUS_THRUPUT_TO_XFER_RATE(max_xfer_rate, sbus->bus[i].bus_width);
}
rc = ipr_get_saved_bus_attr(ioa, i, IPR_MIN_TIME_DELAY, value_str);
if (rc == RC_SUCCESS) {
sscanf(value_str,"%d", &saved_value);
sbus->bus[i].min_time_delay = saved_value;
} else {
sbus->bus[i].min_time_delay = IPR_INIT_SPINUP_DELAY;
}
}
}
/**
* get_unsupp_af -
* @ing: ipr_std_ing_data struct
* @page3: ipr_dasd_inquiry_page3 struct
*
* Returns:
* unsupported_af_dasd struct
**/
struct unsupported_af_dasd *
get_unsupp_af(struct ipr_std_inq_data *inq,
struct ipr_dasd_inquiry_page3 *page3)
{
int i, j;
for (i = 0; i < ARRAY_SIZE(unsupported_af); i++) {
for (j = 0; j < IPR_VENDOR_ID_LEN; j++) {
if (unsupported_af[i].compare_vendor_id_byte[j] &&
unsupported_af[i].vendor_id[j] != inq->vpids.vendor_id[j])
break;
}
if (j != IPR_VENDOR_ID_LEN)
continue;
for (j = 0; j < IPR_PROD_ID_LEN; j++) {
if (unsupported_af[i].compare_product_id_byte[j] &&
unsupported_af[i].product_id[j] != inq->vpids.product_id[j])
break;
}
if (j != IPR_PROD_ID_LEN)
continue;
for (j = 0; j < 4; j++) {
if (unsupported_af[i].lid_mask[j] &&
unsupported_af[i].lid[j] != page3->load_id[j])
break;
}
if (j != 4)
continue;
return &unsupported_af[i];
}
return NULL;
}
/**
* disk_needs_msl -
* @unsupp_af: unsupported_af_dasd struct
* @inq: ipr_std_inq_data struct
*
* Returns:
* true if needs msl / false otherwise
**/
bool disk_needs_msl(struct unsupported_af_dasd *unsupp_af,
struct ipr_std_inq_data *inq)
{
u32 ros_rcv_ram_rsvd, min_ucode_level;
int j;
if (unsupp_af->supported_with_min_ucode_level) {
min_ucode_level = 0;
ros_rcv_ram_rsvd = 0;
for (j = 0; j < 4; j++) {
if (unsupp_af->min_ucode_mask[j]) {
min_ucode_level = (min_ucode_level << 8) |
unsupp_af->min_ucode_level[j];
ros_rcv_ram_rsvd = (ros_rcv_ram_rsvd << 8) |
inq->ros_rsvd_ram_rsvd[j];
}
}
if (min_ucode_level > ros_rcv_ram_rsvd)
return true;
}
return false;
}
/**
* is_af_blocked -
* @dev: ipr dev struct
* @silent:
*
* Returns:
* true if blocked / false otherwise
**/
bool is_af_blocked(struct ipr_dev *dev, int silent)
{
int rc;
struct ipr_std_inq_data std_inq_data;
struct ipr_dasd_inquiry_page3 dasd_page3_inq;
struct unsupported_af_dasd *unsupp_af;
/* Zero out inquiry data */
memset(&std_inq_data, 0, sizeof(std_inq_data));
rc = ipr_inquiry(dev, IPR_STD_INQUIRY,
&std_inq_data, sizeof(std_inq_data));
if (rc != 0)
return false;
/* Issue page 3 inquiry */
memset(&dasd_page3_inq, 0, sizeof(dasd_page3_inq));
rc = ipr_inquiry(dev, 0x03,
&dasd_page3_inq, sizeof(dasd_page3_inq));
if (rc != 0)
return false;
unsupp_af = get_unsupp_af(&std_inq_data, &dasd_page3_inq);
if (!unsupp_af)
return false;
/* If we make it this far, we have a match into the table. Now,
determine if we need a certain level of microcode or if this
disk is not supported all together. */
if (unsupp_af->supported_with_min_ucode_level) {
if (disk_needs_msl(unsupp_af, &std_inq_data)) {
if (ipr_force) {
if (!silent)
scsi_err(dev, "Disk %s needs updated microcode "
"before transitioning to 522 bytes/sector "
"format. IGNORING SINCE --force USED!",
dev->gen_name);
return false;
} else {
if (!silent)
scsi_err(dev, "Disk %s needs updated microcode "
"before transitioning to 522 bytes/sector "
"format.", dev->gen_name);
return true;
}
}
} else {/* disk is not supported at all */
if (!silent)
syslog(LOG_ERR,"Disk %s canot be formatted to "
"522 bytes/sector.", dev->gen_name);
return true;
}
return false;
}
/**
* ipr_read_dev_attr -
* @dev: ipr dev struct
* @attr:
* @value:
*
* Returns:
* 0 if success / non-zero on failure
**/
int ipr_read_dev_attr(struct ipr_dev *dev, char *attr,
char *value, size_t value_len)
{
char *sysfs_dev_name;
char devpath[PATH_MAX];
ssize_t len;
if (!dev->scsi_dev_data) {
scsi_dbg(dev, "Cannot read dev attr %s. NULL scsi data\n", attr);
return -ENOENT;
}
sysfs_dev_name = dev->scsi_dev_data->sysfs_device_name;
sprintf(devpath, "/sys/class/scsi_device/%s/device", sysfs_dev_name);
len = sysfs_read_attr(devpath, attr, value, value_len);
if (len < 0) {
scsi_dbg(dev, "Failed to read %s attribute. %m\n", attr);
return -EIO;
}
return 0;
}
/**
* ipr_write_dev_attr -
* @dev: ipr dev struct
* @attr:
* @value:
*
* Returns:
* 0 if success / non-zero on failure
**/
int ipr_write_dev_attr(struct ipr_dev *dev, char *attr, char *value)
{
char *sysfs_dev_name;
char devpath[PATH_MAX];
if (!dev->scsi_dev_data)
return -ENOENT;
sysfs_dev_name = dev->scsi_dev_data->sysfs_device_name;
sprintf(devpath, "/sys/class/scsi_device/%s/device", sysfs_dev_name);
if (sysfs_write_attr(devpath, attr, value, strlen(value)) < 0) {
scsi_dbg(dev, "Failed to write attribute: %s\n", attr);
return -EIO;
}
return 0;
}
/**
* get_ucode_date -
* @ucode_file: microcode file name
* @ucode_date: microcode date string pointer
* @max_size: max size for the date field
*
* Returns:
* nothing
**/
void get_ucode_date(char *ucode_file, char *ucode_date, int max_size)
{
struct stat st;
struct tm *file_tm;
ucode_date[0] = '\0';
if (stat(ucode_file, &st))
return;
file_tm = localtime(&st.st_mtime);
if (!file_tm)
return;
strftime(ucode_date, max_size, "%D", file_tm);
}
/**
* get_ioa_ucode_version -
* @ucode_file: microcode file name
*
* Returns:
* 0 if success / non-zero on failure
**/
u32 get_ioa_ucode_version(char *ucode_file)
{
int fd, rc;
struct stat ucode_stats;
struct ipr_ioa_ucode_header *image_hdr;
fd = open(ucode_file, O_RDONLY);
if (fd == -1)
return 0;
rc = fstat(fd, &ucode_stats);
if (rc != 0) {
close(fd);
return 0;
}
image_hdr = mmap(NULL, ucode_stats.st_size,
PROT_READ, MAP_SHARED, fd, 0);
if (image_hdr == MAP_FAILED) {
close(fd);
return 0;
}
rc = ntohl(image_hdr->rev_level);
munmap(image_hdr, ucode_stats.st_size);
close(fd);
return rc;
}
/**
* fw_compare - compare two firmware images
* @parm1: pointer to firmware image
* @parm2: pointer to firmware image
*
* Returns:
* 0 if the images are the same / non-zero otherwise
**/
/* Sort in decending order */
static int fw_compare(const void *parm1,
const void *parm2)
{
struct ipr_fw_images *first = (struct ipr_fw_images *)parm1;
struct ipr_fw_images *second = (struct ipr_fw_images *)parm2;
if (first->version < second->version)
return 1;
if (second->version > first->version)
return -1;
return 0;
}
/**
* ipr_get_hotplug_dir -
*
* Returns:
* 0 if success / non-zero on failure
**/
static int ipr_get_hotplug_dir()
{
FILE *file;
char buf[100];
char *loc, *end;
file = fopen(FIRMWARE_HOTPLUG_CONFIG_FILE, "r");
if (!file) {
hotplug_dir = realloc(hotplug_dir, strlen(FIRMWARE_HOTPLUG_DEFAULT_DIR) + 1);
if (!hotplug_dir)
return -ENOMEM;
strcpy(hotplug_dir, FIRMWARE_HOTPLUG_DEFAULT_DIR);
return 0;
}
clearerr(file);
do {
if (feof(file)) {
syslog(LOG_ERR, "Failed parsing %s. Reached end of file.\n",
FIRMWARE_HOTPLUG_CONFIG_FILE);
return -EIO;
}
fgets(buf, 100, file);
loc = strstr(buf, FIRMWARE_HOTPLUG_DIR_TAG);
} while(!loc || buf[0] == '#');
loc = strchr(buf, '/');
fclose(file);
if (!loc) {
syslog(LOG_ERR, "Failed parsing %s.\n", FIRMWARE_HOTPLUG_CONFIG_FILE);
return -EIO;
}
end = strchr(loc, ' ');
if (!end)
end = strchr(loc, '"');
if (end)
*end = '\0';
hotplug_dir = realloc(hotplug_dir, strlen(loc) + 1);
if (!hotplug_dir)
return -ENOMEM;
strcpy(hotplug_dir, loc);
end = strchr(hotplug_dir, '\n');
if (end)
*end = '\0';
return 0;
}
/**
* get_dasd_ucode_version -
* @ucode_file: file name of microcode file
* @has_hdr: has header flag
*
* Returns:
* 0 if success / non-zero on failure
**/
u32 get_dasd_ucode_version(char *ucode_file, int has_hdr)
{
int fd;
unsigned int len;
struct stat ucode_stats;
struct ipr_dasd_ucode_header *hdr;
char *tmp;
u32 rc;
if (has_hdr) {
fd = open(ucode_file, O_RDONLY);
if (fd == -1)
return 0;
rc = fstat(fd, &ucode_stats);
if (rc != 0) {
fprintf(stderr, "Failed to stat %s\n", ucode_file);
close(fd);
return 0;
}
hdr = mmap(NULL, ucode_stats.st_size, PROT_READ,
MAP_SHARED, fd, 0);
if (hdr == MAP_FAILED) {
fprintf(stderr, "mmap of %s failed\n", ucode_file);
close(fd);
return 0;
}
len = (hdr->length[0] << 16) | (hdr->length[1] << 8) | hdr->length[2];
if (len == ucode_stats.st_size) {
rc = (hdr->modification_level[0] << 24) |
(hdr->modification_level[1] << 16) |
(hdr->modification_level[2] << 8) |
hdr->modification_level[3];
munmap(hdr, ucode_stats.st_size);
close(fd);
return rc;
} else {
munmap(hdr, ucode_stats.st_size);
close(fd);
}
}
tmp = strrchr(ucode_file, '.');
if (!tmp)
return 0;
rc = strtoul(tmp+1, NULL, 16);
return rc;
}
/**
* get_ses_ucode_version -
* @ucode_file:
*
* Returns:
* ses microcode version / 0 if failure
**/
u32 get_ses_ucode_version(char *ucode_file)
{
char *tmp = strrchr(ucode_file, '.');
if (!tmp)
return 0;
if (strlen(tmp+1) < 4)
return 0;
return (tmp[1] << 24) | (tmp[2] << 16) | (tmp[3] << 8) | tmp[4];
}
/**
* get_dev_fw_version -
* @dev: ipr dev struct
*
* Returns:
* device firmware version / 0 if failure
**/
u32 get_dev_fw_version(struct ipr_dev *dev)
{
u8 release_level[4];
int rc;
rc = ipr_get_fw_version(dev, release_level);
if (rc != 0) {
scsi_dbg(dev, "Inquiry failed\n");
return 0;
}
rc = release_level[0] << 24 | release_level[1] << 16 |
release_level[2] << 8 | release_level[3];
return rc;
}
/**
* get_ioa_fw_version -
* @ioa: ipr ioa struct
*
* Returns:
* ioa firmware version
**/
static u32 get_ioa_fw_version(struct ipr_ioa *ioa)
{
char devpath[PATH_MAX];
char value[16];
ssize_t len;
u32 fw_version;
sprintf(devpath, "/sys/class/scsi_host/%s", ioa->host_name);
len = sysfs_read_attr(devpath, "fw_version", value, 16);
if (len < 0)
return -1;
sscanf(value, "%8X", &fw_version);
return fw_version;
}
/**
* get_fw_version - Get microcode version of device.
*
* @dev: Device
*
* Returns:
* ucode version if success / 0 on failure
**/
u32 get_fw_version(struct ipr_dev *dev)
{
if (!dev) {
/* FIXME: We should return -ENODEV here but old API
returns 0 on failure and any uint > 0 can be a firmware
level. A viable option would be writting the fw level to
a pointer received as argument, but lets hold to the
current API for now. */
return 0;
}
if (ipr_is_ioa(dev))
return get_ioa_fw_version(dev->ioa);
return get_dev_fw_version(dev);
}
/**
* get_ioa_image_type -
* @ioa: ipr ioa struct
*
* Returns:
* ioa image type
**/
static u8 get_ioa_image_type(struct ipr_ioa *ioa)
{
u32 fw_version = get_ioa_fw_version(ioa);
return ((fw_version & 0x00ff0000) >> 16);
}
/**
* get_ioa_fw_name -
* @ioa: ipr ioa struct
* @buf: data buffer
*
* Returns:
* nothing
**/
static void get_ioa_fw_name(struct ipr_ioa *ioa, char *buf)
{
const struct ioa_parms *ioa_parms = get_ioa_fw(ioa);
if (ioa_parms)
strcpy(buf, ioa_parms->fw_name);
else
sprintf(buf, "534953%02X", get_ioa_image_type(ioa));
}
/**
* get_linux_ioa_fw_name -
* @ioa: ipr ioa struct
* @buf: data buffer
*
* Returns:
* nothing
**/
static void get_linux_ioa_fw_name(struct ipr_ioa *ioa, char *buf)
{
sprintf(buf, "pci.%04x%04x.%02x", ioa->pci_vendor, ioa->pci_device,
get_ioa_image_type(ioa));
}
/**
* get_linux_ioa_fw_name_capital -
* @ioa: ipr ioa struct
* @buf: data buffer
*
* Returns:
* nothing
**/
static void get_linux_ioa_fw_name_capital(struct ipr_ioa *ioa, char *buf)
{
sprintf(buf, "pci.%04X%04X.%02X", ioa->pci_vendor, ioa->pci_device,
get_ioa_image_type(ioa));
}
/**
* init_ioa_ucode_entry -
* @img: ipr_fw_images struct
*
* Returns:
* nothing
**/
static void init_ioa_ucode_entry(struct ipr_fw_images *img)
{
img->version = get_ioa_ucode_version(img->file);
img->has_header = 0;
get_ucode_date(img->file, img->date, sizeof(img->date));
}
/**
* init_disk_ucode_entry -
* @img: ipr_fw_images
*
* Returns:
* nothing
**/
static void init_disk_ucode_entry(struct ipr_fw_images *img)
{
img->version = get_dasd_ucode_version(img->file, 1);
img->has_header = 1;
get_ucode_date(img->file, img->date, sizeof(img->date));
}
/**
* init_disk_ucode_entry_nohdr -
* @img: ipr_fw_images struct
*
* Returns:
* nothing
**/
static void init_disk_ucode_entry_nohdr(struct ipr_fw_images *img)
{
img->version = get_dasd_ucode_version(img->file, 0);
img->has_header = 0;
get_ucode_date(img->file, img->date, sizeof(img->date));
}
/**
* init_ses_ucode_entry_nohdr -
* @img: ipr_fw_images struct
*
* Returns:
* nothing
**/
static void init_ses_ucode_entry_nohdr(struct ipr_fw_images *img)
{
img->version = get_ses_ucode_version(img->file);
img->has_header = 0;
get_ucode_date(img->file, img->date, sizeof(img->date));
}
/**
* scan_fw_dir -
* @path:
* @name:
* @list:
* @len:
* @init function pointer to initialization function
*
* Returns:
* int len
**/
static int scan_fw_dir(char *path, char *name, struct ipr_fw_images **list, int len,
void (*init)(struct ipr_fw_images *))
{
struct dirent **dirent;
int rc, i;
struct ipr_fw_images *ret = *list;
rc = scandir(path, &dirent, NULL, alphasort);
for (i = 0; i < rc && rc > 0; i++) {
if (strstr(dirent[i]->d_name, name) == dirent[i]->d_name) {
ret = realloc(ret, sizeof(*ret) * (len + 1));
sprintf(ret[len].file, "%s/%s", path, dirent[i]->d_name);
init(&ret[len]);
len++;
}
}
for (i = 0; i < rc; i++)
free(dirent[i]);
if (rc > 0)
free(dirent);
*list = ret;
return len;
}
/**
* get_ioa_firmware_image_list -
* @ioa: ipr ioa struct
* @list: ipr_fw_images struct
*
* Returns:
* length of list
**/
int get_ioa_firmware_image_list(struct ipr_ioa *ioa,
struct ipr_fw_images **list)
{
char buf[100];
struct ipr_fw_images *ret = NULL;
int len = 0;
*list = NULL;
get_ioa_fw_name(ioa, buf);
len = scan_fw_dir(UCODE_BASE_DIR, buf, &ret, len, init_ioa_ucode_entry);
get_linux_ioa_fw_name(ioa, buf);
len = scan_fw_dir(LINUX_UCODE_BASE_DIR, buf, &ret, len, init_ioa_ucode_entry);
get_linux_ioa_fw_name_capital(ioa, buf);
len = scan_fw_dir(LINUX_UCODE_BASE_DIR, buf, &ret, len, init_ioa_ucode_entry);
sprintf(buf, "ibmsis%X.img", ioa->ccin);
len = scan_fw_dir("/etc/microcode", buf, &ret, len, init_ioa_ucode_entry);
sprintf(buf, "ibmsis%X.img", get_ioa_image_type(ioa));
len = scan_fw_dir("/etc/microcode", buf, &ret, len, init_ioa_ucode_entry);
if (ret)
qsort(ret, len, sizeof(*ret), fw_compare);
*list = ret;
return len;
}
/**
* get_dasd_firmware_image_list-
* @dev: ipr dev struct
* @list: irp_fw_images struct
*
* Returns:
* length value if success / non-zero on failure
**/
int get_dasd_firmware_image_list(struct ipr_dev *dev,
struct ipr_fw_images **list)
{
char buf[100];
struct ipr_fw_images *ret = NULL;
struct ipr_dasd_inquiry_page3 page3_inq;
int rc;
int len = 0;
*list = NULL;
memset(&page3_inq, 0, sizeof(page3_inq));
rc = ipr_inquiry(dev, 3, &page3_inq, sizeof(page3_inq));
if (rc != 0) {
scsi_dbg(dev, "Inquiry failed\n");
return -EIO;
}
sprintf(buf, "%.7s.%02X%02X%02X%02X",
dev->scsi_dev_data->product_id,
page3_inq.load_id[0], page3_inq.load_id[1],
page3_inq.load_id[2], page3_inq.load_id[3]);
len = scan_fw_dir(UCODE_BASE_DIR, buf, &ret, len,
init_disk_ucode_entry_nohdr);
if (memcmp(dev->scsi_dev_data->vendor_id, "IBMAS400", 8) == 0)
sprintf(buf, "ibmsis%02X%02X%02X%02X.img",
page3_inq.load_id[0], page3_inq.load_id[1],
page3_inq.load_id[2], page3_inq.load_id[3]);
len = scan_fw_dir("/etc/microcode/device", buf, &ret, len,
init_disk_ucode_entry);
sprintf(buf, "IBM-%.7s.%02X%02X%02X%02X",
dev->scsi_dev_data->product_id,
page3_inq.load_id[0], page3_inq.load_id[1],
page3_inq.load_id[2], page3_inq.load_id[3]);
len = scan_fw_dir(LINUX_UCODE_BASE_DIR, buf, &ret, len,
init_disk_ucode_entry_nohdr);
if (len)
qsort(ret, len, sizeof(*ret), fw_compare);
else
scsi_dbg(dev, "Could not find device firmware file\n");
*list = ret;
return len;
}
/**
* get_ses_load_id-
* @dev: ipr dev struct
* @load_id:
*
* Returns:
* 0 if success / non-zero on failure
**/
static int get_ses_load_id(struct ipr_dev *dev, u8 load_id[4])
{
struct ipr_dasd_inquiry_page3 page3_inq;
int rc;
memset(&page3_inq, 0, sizeof(page3_inq));
rc = ipr_inquiry(dev, 3, &page3_inq, sizeof(page3_inq));
if (rc)
return rc;
if (ipr_is_ses(dev) && !__ioa_is_spi(dev->ioa))
memcpy(load_id, page3_inq.release_level, 4);
else
memcpy(load_id, page3_inq.load_id, 4);
return 0;
}
/**
* get_ses_firmware_image_list-
* @dev: ipr dev struct
* @list:
*
* Returns:
* length value if success / non-zero on failure
**/
int get_ses_firmware_image_list(struct ipr_dev *dev,
struct ipr_fw_images **list)
{
char buf[100];
struct ipr_fw_images *ret = NULL;
u8 load_id[4];
int rc;
int len = 0;
*list = NULL;
rc = get_ses_load_id(dev, load_id);
if (rc != 0) {
scsi_dbg(dev, "Inquiry failed\n");
return -EIO;
}
sprintf(buf, "%02X%02X%02X%02X", load_id[0], load_id[1],
load_id[2], load_id[3]);
len = scan_fw_dir(UCODE_BASE_DIR, buf, &ret, len,
init_ses_ucode_entry_nohdr);
sprintf(buf, "IBM-%02X%02X%02X%02X", load_id[0], load_id[1],
load_id[2], load_id[3]);
len = scan_fw_dir(LINUX_UCODE_BASE_DIR, buf, &ret, len,
init_ses_ucode_entry_nohdr);
if (len)
qsort(ret, len, sizeof(*ret), fw_compare);
else
scsi_dbg(dev, "Could not find device firmware file\n");
*list = ret;
return len;
}
/**
* get_fw_image - Common interface to find version of the latest
* microcode image found in the filesystem.
*
* @dev: Device
*
* Returns:
* 0 if success / non-zero on failure
**/
struct ipr_fw_images *get_latest_fw_image(struct ipr_dev *dev)
{
struct ipr_fw_images *fw = NULL;
if (!dev)
return NULL;
if (ipr_is_ioa(dev))
get_ioa_firmware_image_list(dev->ioa, &fw);
else if (ipr_is_ses(dev))
get_ses_firmware_image_list(dev, &fw);
else if (ipr_is_gscsi(dev) || ipr_is_af_dasd_device(dev))
get_dasd_firmware_image_list(dev, &fw);
if (!fw)
return NULL;
return fw;
}
/**
* get_firmware_image_list - Common interface to find version of the
* latest microcode image found in the filesystem.
*
* @dev: Device
*
* Returns:
* 0 if success / non-zero on failure
**/
int get_latest_fw_image_version(struct ipr_dev *dev)
{
struct ipr_fw_images *fw = NULL;
u32 version = 0;
if (!dev)
return -ENODEV;
if (ipr_is_ioa(dev))
get_ioa_firmware_image_list(dev->ioa, &fw);
else if (ipr_is_ses(dev))
get_ses_firmware_image_list(dev, &fw);
else if (ipr_is_gscsi(dev) || ipr_is_af_dasd_device(dev))
get_dasd_firmware_image_list(dev, &fw);
if (!fw)
return -EINVAL;
version = fw->version;
free(fw);
return version;
}
struct ipr_ioa_desc {
u16 type;
const char *desc;
};
struct ipr_ioa_desc ioa_desc [] = {
{0x5702, "PCI-X Dual Channel Ultra320 SCSI Adapter [5702]"},
{0x1974, "PCI-X Dual Channel Ultra320 SCSI Adapter [1974]"},
{0x5703, "PCI-X Dual Channel Ultra320 SCSI RAID Adapter [5703]"},
{0x1975, "PCI-X Dual Channel Ultra320 SCSI RAID Adapter [1975]"},
{0x2780, "PCI-X Quad Channel Ultra320 SCSI RAID Adapter [2780]"},
{0x5709, "SCSI RAID Enablement Card for PCI-X Dual Channel Ultra320 SCSI Integrated Controller [5709]"},
{0x1976, "SCSI RAID Enablement Card for PCI-X Dual Channel Ultra320 SCSI Integrated Controller [1976]"},
{0x570A, "PCI-X Dual Channel SCSI Integrated Controller (Adapter bus) [570A]"},
{0x570B, "PCI-X Dual Channel SCSI Integrated Controller (Adapter bus) [570B]"}
};
/**
* get_long_ioa_desc-
* @type:
*
* Returns:
* IOA description if success / NULL on failure
**/
static const char *get_long_ioa_desc(u16 type)
{
int i;
for (i = 0; i < sizeof(ioa_desc)/sizeof(ioa_desc[0]); i++) {
if (type == ioa_desc[i].type)
return ioa_desc[i].desc;
}
return NULL;
}
/**
* ipr_log_ucode_error - log a microcode error
* @ioa: ipr ioa struct
*
* Returns:
* nothing
**/
void ipr_log_ucode_error(struct ipr_ioa *ioa)
{
const char *desc = get_long_ioa_desc(ioa->ccin);
if (desc) {
syslog(LOG_ERR, "Could not find required level of microcode for IBM '%s'. "
"Please download the latest microcode from "
"http://techsupport.services.ibm.com/server/mdownload/download.html. "
"SCSI speeds will be limited to %d MB/s until updated microcode is downloaded.\n",
desc, IPR_SAFE_XFER_RATE);
} else {
syslog(LOG_ERR, "Could not find required level of microcode for IBM %04X. "
"Please download the latest microcode from "
"http://techsupport.services.ibm.com/server/mdownload/download.html. "
"SCSI speeds will be limited to %d MB/s until updated microcode is downloaded.\n",
ioa->ccin, IPR_SAFE_XFER_RATE);
}
}
/**
* ipr_update_ioa_fw -
* @ioa: ipr ioa struct
* @image: pointer to fw image
* @force: force flag
*
* Returns:
* 0 if success / non-zero on failure
**/
int ipr_update_ioa_fw(struct ipr_ioa *ioa,
struct ipr_fw_images *image, int force)
{
struct ipr_ioa_ucode_header *image_hdr;
struct ipr_ioa_ucode_ext_header *ext_hdr;
struct ipr_ioa_ucode_img_desc *img_desc;
struct stat ucode_stats;
u32 fw_version;
int fd, rc;
int ioafw = 1;
int host_num = ioa->host_num;
char *tmp;
char ucode_file[200];
DIR *dir;
char *img_file;
char cwd[200];
char devpath[PATH_MAX];
ssize_t len;
fw_version = get_ioa_fw_version(ioa);
if (fw_version >= ioa->msl && !force)
return 0;
if (ipr_get_hotplug_dir())
return 0;
fd = open(image->file, O_RDONLY);
if (fd < 0) {
syslog(LOG_ERR, "Could not open firmware file %s.\n", image->file);
return fd;
}
rc = fstat(fd, &ucode_stats);
if (rc != 0) {
syslog(LOG_ERR, "Failed to stat IOA firmware file: %s.\n", image->file);
close(fd);
return rc;
}
image_hdr = mmap(NULL, ucode_stats.st_size, PROT_READ, MAP_SHARED, fd, 0);
if (image_hdr == MAP_FAILED) {
syslog(LOG_ERR, "Error mapping IOA firmware file: %s.\n", image->file);
close(fd);
return -EIO;
}
ext_hdr = (void *)image_hdr + ntohl(image_hdr->header_length);
img_desc = (void *)ext_hdr + ntohl(ext_hdr->img_desc_offset);
if (strncmp(img_desc->fw_type, IPR_IOAF_STR, 4))
ioafw = 0;
if (ntohl(image_hdr->rev_level) > fw_version || force) {
if (ioafw)
ioa_info(ioa, "Updating microcode from %08X to %08X.\n",
fw_version, ntohl(image_hdr->rev_level));
else
ioa_info(ioa, "Updating microcode to %08X.\n",
ntohl(image_hdr->rev_level));
/* Give the file name an absolute path if needed. */
if (image->file[0] != '/') {
getcwd(cwd, sizeof(cwd));
strcat(cwd, "/");
img_file = strcat(cwd, image->file);
} else
img_file = image->file;
tmp = strrchr(img_file, '/');
if (tmp)
tmp++;
else {
syslog(LOG_ERR, "Failed to find image name in %s\n",
img_file);
return -EIO;
}
dir = opendir(hotplug_dir);
if (!dir)
mkdir(hotplug_dir, S_IRWXU | S_IRGRP | S_IXGRP | S_IROTH | S_IXOTH);
dir = opendir(hotplug_dir);
if (!dir) {
syslog(LOG_ERR, "Failed to open %s. %m\n", hotplug_dir);
munmap(image_hdr, ucode_stats.st_size);
close(fd);
return -EIO;
}
closedir(dir);
sprintf(ucode_file, "%s/.%s", hotplug_dir, tmp);
symlink(img_file, ucode_file);
sprintf(ucode_file, ".%s\n", tmp);
sprintf(devpath, "/sys/class/scsi_host/%s", ioa->host_name);
len = sysfs_write_attr(devpath, "update_fw",
ucode_file, strlen(ucode_file));
sprintf(ucode_file, "%s/.%s", hotplug_dir, tmp);
unlink(ucode_file);
if (len < 0)
ioa_err(ioa, "Microcode update failed. rc=%d\n",
(int)len);
check_current_config(false);
for_each_ioa(ioa) {
if (ioa->host_num != host_num)
continue;
ipr_init_ioa(ioa);
break;
}
} else
ipr_log_ucode_error(ioa);
munmap(image_hdr, ucode_stats.st_size);
close(fd);
return rc;
}
/**
* ipr_update_disk_fw - update disk fw
* @dev: ipr dev struct
* @image: pointer to fw image
* @force: force flag
*
* Returns:
* 0 if success / non-zero on failure
**/
/* xxx TODO make a general routine to do write buffer that takes a
struct ipr_fw_images as input */
int ipr_update_disk_fw(struct ipr_dev *dev,
struct ipr_fw_images *image, int force)
{
int rc = 0;
struct stat ucode_stats;
int fd;
struct ipr_dasd_ucode_header *img_hdr;
struct ipr_dasd_inquiry_page3 page3_inq;
struct ipr_std_inq_data std_inq_data;
struct unsupported_af_dasd *unsupp_af;
u32 level;
u8 release_level[4];
memset(&std_inq_data, 0, sizeof(std_inq_data));
rc = ipr_inquiry(dev, IPR_STD_INQUIRY,
&std_inq_data, sizeof(std_inq_data));
if (rc != 0)
return rc;
rc = ipr_inquiry(dev, 3, &page3_inq, sizeof(page3_inq));
if (rc != 0) {
scsi_dbg(dev, "Inquiry failed\n");
return rc;
}
if (!force) {
unsupp_af = get_unsupp_af(&std_inq_data, &page3_inq);
if (!unsupp_af)
return 0;
if (!disk_needs_msl(unsupp_af, &std_inq_data))
return 0;
}
fd = open(image->file, O_RDONLY);
if (fd < 0) {
syslog_dbg("Could not open firmware file %s.\n", image->file);
return fd;
}
rc = fstat(fd, &ucode_stats);
if (rc != 0) {
syslog(LOG_ERR, "Failed to stat firmware file: %s.\n", image->file);
close(fd);
return rc;
}
img_hdr = mmap(NULL, ucode_stats.st_size,
PROT_READ, MAP_SHARED, fd, 0);
if (img_hdr == MAP_FAILED) {
syslog(LOG_ERR, "Error reading firmware file: %s.\n", image->file);
close(fd);
return -EIO;
}
level = htonl(image->version);
__ipr_get_fw_version(dev, &page3_inq, release_level);
if (memcmp(&level, page3_inq.release_level, 4) > 0 || force) {
scsi_info(dev, "Updating device microcode using %s "
"from %02X%02X%02X%02X (%c%c%c%c) to %08X (%c%c%c%c)\n", image->file,
release_level[0], release_level[1], release_level[2], release_level[3],
release_level[0], release_level[1], release_level[2], release_level[3],
image->version, image->version >> 24, (image->version >> 16) & 0xff,
(image->version >> 8) & 0xff, image->version & 0xff);
rc = ipr_write_buffer(dev, img_hdr, ucode_stats.st_size);
ipr_init_dev(dev);
}
if (munmap(img_hdr, ucode_stats.st_size))
syslog(LOG_ERR, "munmap failed.\n");
close(fd);
return rc;
}
/**
* mode_select - issue a mode select command
* @dev: ipr dev struct
* @buff: data buffer
* @length:
*
* Returns:
* 0 if success / non-zero on failure
**/
static int mode_select(struct ipr_dev *dev, void *buff, int length)
{
int fd;
u8 cdb[IPR_CCB_CDB_LEN];
struct sense_data_t sense_data;
int rc;
char *name = dev->gen_name;
fd = open(name, O_RDWR);
if (fd <= 1) {
if (!strcmp(tool_name, "iprconfig") || ipr_debug)
syslog(LOG_ERR, "Could not open %s. %m\n", name);
return errno;
}
memset(cdb, 0, IPR_CCB_CDB_LEN);
cdb[0] = MODE_SELECT;
cdb[1] = 0x11;
cdb[4] = length;
rc = sg_ioctl(fd, cdb, buff,
length, SG_DXFER_TO_DEV,
&sense_data, IPR_INTERNAL_TIMEOUT);
if (rc)
scsi_cmd_err(dev, &sense_data, "Mode Select", rc);
close(fd);
return rc;
}
int ipr_ses_get_time(struct ipr_dev *dev, u64* timestamp, int *origin)
{
struct ipr_ses_diag_page12 get_time;
int err;
err = ipr_receive_diagnostics(dev, 0x12, &get_time, sizeof(get_time));
if (err)
return -EIO;
*origin = !!get_time.timestamp_origin;
*timestamp = be64toh(*((u64*) get_time.timestamp)) >> 16;
return 0;
}
int ipr_ses_set_time(struct ipr_dev *dev, u64 timestamp)
{
struct ipr_ses_diag_ctrl_page13 set_time;
memset(&set_time, '\0', sizeof(set_time));
set_time.page_code = 0x13;
set_time.page_length[1] = 8;
timestamp = htobe64(timestamp << 16);
memcpy(set_time.timestamp, (char*) &
timestamp, 6);
return ipr_send_diagnostics(dev, &set_time, sizeof(set_time));
}
/**
* setup_page0x00 -
* @dev: ipr dev struct
*
* Returns:
* 0 if success / non-zero on failure
**/
static int setup_page0x00(struct ipr_dev *dev)
{
struct ipr_mode_pages mode_pages, ch_mode_pages;
struct ipr_vendor_mode_page *page, *ch_page;
int len;
if (strncmp(dev->scsi_dev_data->vendor_id, "IBM", 3)) {
scsi_dbg(dev, "Not setting up mode page 0x00 for unknown device.\n");
return 0;
}
memset(&mode_pages, 0, sizeof(mode_pages));
memset(&ch_mode_pages, 0, sizeof(ch_mode_pages));
if (ipr_mode_sense(dev, 0x00, &mode_pages))
return -EIO;
if (ipr_mode_sense(dev, 0x40, &ch_mode_pages))
return -EIO;
page = (struct ipr_vendor_mode_page *)(((u8 *)&mode_pages) +
mode_pages.hdr.block_desc_len +
sizeof(mode_pages.hdr));
ch_page = (struct ipr_vendor_mode_page *)(((u8 *)&ch_mode_pages) +
ch_mode_pages.hdr.block_desc_len +
sizeof(ch_mode_pages.hdr));
IPR_SET_MODE(ch_page->arhes, page->arhes, 1);
IPR_SET_MODE(ch_page->cmdac, page->cmdac, 1);
IPR_SET_MODE(ch_page->caen, page->caen, 1);
/* Use a 3 second command aging timer - units are 50 ms */
IPR_SET_MODE(ch_page->cmd_aging_limit_hi, page->cmd_aging_limit_hi, 0);
IPR_SET_MODE(ch_page->cmd_aging_limit_lo, page->cmd_aging_limit_lo, 60);
len = mode_pages.hdr.length + 1;
mode_pages.hdr.length = 0;
mode_pages.hdr.medium_type = 0;
mode_pages.hdr.device_spec_parms = 0;
page->hdr.parms_saveable = 0;
if (mode_select(dev, &mode_pages, len)) {
scsi_dbg(dev, "Failed to setup mode page 0x00\n");
return -EIO;
}
return 0;
}
/**
* setup_page0x01 -
* @dev: ipr dev struct
*
* Returns:
* 0 if success / non-zero on failure
**/
static int setup_page0x01(struct ipr_dev *dev)
{
struct ipr_mode_pages mode_pages, ch_mode_pages;
struct ipr_rw_err_mode_page *page, *ch_page;
int len;
memset(&mode_pages, 0, sizeof(mode_pages));
memset(&ch_mode_pages, 0, sizeof(ch_mode_pages));
if (ipr_mode_sense(dev, 0x01, &mode_pages))
return -EIO;
if (ipr_mode_sense(dev, 0x41, &ch_mode_pages))
return -EIO;
page = (struct ipr_rw_err_mode_page *)(((u8 *)&mode_pages) +
mode_pages.hdr.block_desc_len +
sizeof(mode_pages.hdr));
ch_page = (struct ipr_rw_err_mode_page *)(((u8 *)&ch_mode_pages) +
ch_mode_pages.hdr.block_desc_len +
sizeof(ch_mode_pages.hdr));
IPR_SET_MODE(ch_page->awre, page->awre, 1);
IPR_SET_MODE(ch_page->arre, page->arre, 1);
if (page->awre != 1)
goto error;
if (page->arre != 1)
goto error;
len = mode_pages.hdr.length + 1;
mode_pages.hdr.length = 0;
mode_pages.hdr.medium_type = 0;
mode_pages.hdr.device_spec_parms = 0;
page->hdr.parms_saveable = 0;
if (mode_select(dev, &mode_pages, len)) {
error:
scsi_err(dev, "Failed to setup mode page 0x01\n");
return -EIO;
}
return 0;
}
/**
* setup_page0x08 - Perform initial configuration for mode page 0x8 of
* vset devices.
*
* This disables the Write Cache for vsets.
*
* @dev: ipr dev struct
*
* Returns:
* 0 if success / non-zero on failure
**/
static int setup_page0x08(struct ipr_dev *dev)
{
struct ipr_mode_pages mode_pages;
struct ipr_caching_parameters_page *page;
int len;
memset(&mode_pages, 0, sizeof(mode_pages));
if (ipr_mode_sense(dev, 0x08, &mode_pages))
return -EIO;
page = ((struct ipr_caching_parameters_page *)
(((u8 *)&mode_pages)
+ mode_pages.hdr.block_desc_len
+ sizeof(mode_pages.hdr)));
if (page->wce == 0) {
/* Write cache is already disabled */
return 0;
}
page->wce = 0;
len = mode_pages.hdr.length + 1;
mode_pages.hdr.length = 0;
mode_pages.hdr.medium_type = 0;
mode_pages.hdr.device_spec_parms = 0;
page->hdr.parms_saveable = 0;
if (mode_select(dev, &mode_pages, len)) {
scsi_err(dev, "Failed to disable write cache.\n");
return -EIO;
}
if (ipr_mode_sense(dev, 0x08, &mode_pages))
return -EIO;
page = ((struct ipr_caching_parameters_page *)
(((u8 *)&mode_pages)
+ mode_pages.hdr.block_desc_len
+ sizeof(mode_pages.hdr)));
if (page->wce != 0) {
scsi_err(dev, "Failed to disable write cache.\n");
return -EIO;
}
return 0;
}
/**
* setup_page0x0a -
* @dev: ipr dev struct
*
* Returns:
* 0 if success / non-zero on failure
**/
static int setup_page0x0a(struct ipr_dev *dev)
{
struct ipr_mode_pages mode_pages, ch_mode_pages;
struct ipr_control_mode_page *page, *ch_page;
int len;
int rc = 0;
memset(&mode_pages, 0, sizeof(mode_pages));
memset(&ch_mode_pages, 0, sizeof(ch_mode_pages));
if (ipr_mode_sense(dev, 0x0A, &mode_pages))
return -EIO;
if (ipr_mode_sense(dev, 0x4A, &ch_mode_pages))
return -EIO;
page = (struct ipr_control_mode_page *)(((u8 *)&mode_pages) +
mode_pages.hdr.block_desc_len +
sizeof(mode_pages.hdr));
ch_page = (struct ipr_control_mode_page *)(((u8 *)&ch_mode_pages) +
ch_mode_pages.hdr.block_desc_len +
sizeof(ch_mode_pages.hdr));
IPR_SET_MODE(ch_page->queue_algorithm_modifier,
page->queue_algorithm_modifier, 1);
IPR_SET_MODE(ch_page->tst, page->tst, 1);
IPR_SET_MODE(ch_page->tas, page->tas, 1);
switch(dev->ioa->tcq_mode) {
case IPR_TCQ_FROZEN:
IPR_SET_MODE(ch_page->qerr, page->qerr, 3);
if (page->qerr != 3) {
IPR_SET_MODE(ch_page->qerr, page->qerr, 1);
if (page->tst != 1)
IPR_SET_MODE(ch_page->tst, page->tst, 0);
}
scsi_dbg(dev, "Using control mode settings: "
"TST=%d, QERR=%d, TAS=%d\n", page->tst, page->qerr, page->tas);
break;
case IPR_TCQ_NACA:
IPR_SET_MODE(ch_page->qerr, page->qerr, 0);
break;
case IPR_TCQ_DISABLE:
default:
rc = -EIO;
break;
};
IPR_SET_MODE(ch_page->dque, page->dque, 0);
if (page->dque != 0) {
scsi_dbg(dev, "Cannot set dque=0\n");
return -EIO;
}
if (page->queue_algorithm_modifier != 1)
scsi_dbg(dev, "Cannot set QAM=1\n");
len = mode_pages.hdr.length + 1;
mode_pages.hdr.length = 0;
mode_pages.hdr.medium_type = 0;
mode_pages.hdr.device_spec_parms = 0;
page->hdr.parms_saveable = 0;
if (mode_select(dev, &mode_pages, len)) {
scsi_err(dev, "Failed to setup mode page 0x0A\n");
return -EIO;
}
return rc;
}
void ipr_count_devices_in_vset(struct ipr_dev *dev, int *num_devs,
int *ssd_num_devs)
{
struct ipr_dev *vset, *temp;
int devs_cnt = 0, ssd_devs_cnt = 0;
if (ipr_is_volume_set(dev)) {
for_each_dev_in_vset(dev, temp) {
devs_cnt++;
if (temp->block_dev_class & IPR_SSD)
ssd_devs_cnt++;
}
} else {
devs_cnt++;
if (dev->block_dev_class & IPR_SSD)
ssd_devs_cnt++;
}
*num_devs = devs_cnt;
*ssd_num_devs = ssd_devs_cnt;
}
int ipr_max_queue_depth(struct ipr_ioa *ioa, int num_devs, int num_ssd_devs)
{
int max_qdepth;
if (num_ssd_devs == num_devs)
max_qdepth = MIN(num_devs * 64, ioa->can_queue);
else if (num_ssd_devs)
max_qdepth = MIN(num_devs * 32, ioa->can_queue);
else
max_qdepth = MIN(num_devs * 16, ioa->can_queue);
return MAX(max_qdepth, 128);
}
/**
* init_vset_dev -
* @dev: ipr dev struct
*
* Returns:
* nothing
**/
/*
* VSETs:
* 1. Adjust queue depth based on number of devices
*
*/
static void init_vset_dev(struct ipr_dev *dev)
{
struct ipr_query_res_state res_state;
char q_depth[100];
char cur_depth[100], saved_depth[100];
int depth, rc, num_devs, ssd_num_devs;
char saved_cache[100];
memset(&res_state, 0, sizeof(res_state));
if (polling_mode && !dev->should_init)
return;
if (dev->ioa->has_vset_write_cache) {
int pol;
rc = ipr_get_saved_dev_attr(dev, IPR_WRITE_CACHE_POLICY,
saved_cache);
pol = (rc || strtoul (saved_cache, NULL, 10)) ?
IPR_DEV_CACHE_WRITE_BACK : IPR_DEV_CACHE_WRITE_THROUGH;
ipr_set_dev_wcache_policy(dev, pol);
}
if (!ipr_query_resource_state(dev, &res_state)) {
ipr_count_devices_in_vset(dev, &num_devs, &ssd_num_devs);
depth = ipr_max_queue_depth(dev->ioa, num_devs, ssd_num_devs);
snprintf(q_depth, sizeof(q_depth), "%d", depth);
if (ipr_read_dev_attr(dev, "queue_depth", cur_depth, 100))
return;
rc = ipr_get_saved_dev_attr(dev, IPR_QUEUE_DEPTH, saved_depth);
if (rc == RC_SUCCESS) {
depth = strtoul(saved_depth, NULL, 10);
if (depth && depth <= 255)
strcpy(q_depth, saved_depth);
}
if (!strcmp(cur_depth, q_depth))
return;
if (ipr_write_dev_attr(dev, "queue_depth", q_depth))
return;
}
}
/**
* init_gpdd_dev -
* @dev: ipr dev struct
*
* Returns:
* nothing
**/
/*
* GPDD DASD:
* 1. Setup Mode Page 0x0A for TCQing.
* 2. Enable TCQing
* 3. Adjust queue depth
*
*/
static void init_gpdd_dev(struct ipr_dev *dev)
{
struct ipr_disk_attr attr;
struct sense_data_t sense_data;
int rc;
if (polling_mode && !dev->should_init)
return;
if (__ipr_test_unit_ready(dev, &sense_data)) {
if ((sense_data.sense_key != UNIT_ATTENTION) ||
__ipr_test_unit_ready(dev, &sense_data))
return;
}
if (enable_af(dev))
return;
if (ipr_get_dev_attr(dev, &attr))
return;
if (setup_page0x00(dev))
return;
if ((rc = setup_page0x0a(dev))) {
if (rc != -EINVAL) {
scsi_dbg(dev, "Failed to enable TCQing.\n");
return;
}
} else {
attr.queue_depth = get_tcq_depth(dev);
attr.tcq_enabled = 1;
}
if (ipr_modify_dev_attr(dev, &attr))
return;
if (ipr_set_dev_attr(dev, &attr, 0))
return;
}
/**
* init_af_dev -
* @dev: ipr dev struct
*
* Returns:
* nothing
**/
/*
* AF DASD:
* 1. Setup mode pages (pages 0x01, 0x0A, 0x20)
* 2. Send set supported devices
* 3. Set DASD timeouts
*/
static void init_af_dev(struct ipr_dev *dev)
{
struct ipr_disk_attr attr;
int rc;
if (ipr_set_dasd_timeouts(dev, 0))
return;
if (polling_mode && (!dev->should_init && !memcmp(&attr, &dev->attr, sizeof(attr))))
return;
if (polling_mode && !dev_init_allowed(dev))
return;
if (setup_page0x00(dev))
return;
if (setup_page0x01(dev))
return;
if (setup_page0x08(dev))
return;
if (enable_af(dev))
return;
if (ipr_get_dev_attr(dev, &attr))
return;
if ((rc = setup_page0x0a(dev))) {
if (rc != -EINVAL) {
scsi_dbg(dev, "Failed to enable TCQing.\n");
return;
}
} else
attr.queue_depth = get_tcq_depth(dev);
if (ipr_modify_dev_attr(dev, &attr))
return;
memcpy(&dev->attr, &attr, sizeof(attr));
if (ipr_set_dev_attr(dev, &attr, 0))
return;
}
/**
* init_ioa_dev -
* @dev: ipr dev struct
*
* Returns:
* nothing
**/
/*
* IOA:
* 1. Load saved adapter configuration
*/
static void init_ioa_dev(struct ipr_dev *dev)
{
struct ipr_scsi_buses buses;
struct ipr_ioa_attr attr;
if (!dev->ioa)
return;
if (polling_mode && !dev->ioa->should_init)
return;
if (ipr_get_ioa_attr(dev->ioa, &attr))
return;
if (dev->ioa->asymmetric_access && dev->ioa->sis64)
attr.active_active = 1;
if (dev->ioa->configure_rebuild_verify)
attr.disable_rebuild_verify = 1;
if (dev->ioa->has_vset_write_cache)
attr.vset_write_cache = 1;
ipr_modify_ioa_attr(dev->ioa, &attr);
if (ipr_set_ioa_attr(dev->ioa, &attr, 0))
return;
if (ipr_get_bus_attr(dev->ioa, &buses))
return;
ipr_modify_bus_attr(dev->ioa, &buses);
if (ipr_set_bus_attr(dev->ioa, &buses, 0))
return;
}
static void init_ses_dev(struct ipr_dev *dev)
{
time_t t = time(NULL);
if (t != ((time_t) -1)) {
t *= 1000;
ipr_ses_set_time(dev, t);
}
}
/**
* ipr_init_dev -
* @dev: ipr dev struct
*
* Returns:
* 0
**/
int ipr_init_dev(struct ipr_dev *dev)
{
if (!dev->scsi_dev_data)
return 0;
switch (dev->scsi_dev_data->type) {
case TYPE_DISK:
if (ipr_is_volume_set(dev))
init_vset_dev(dev);
else
init_gpdd_dev(dev);
break;
case IPR_TYPE_AF_DISK:
init_af_dev(dev);
break;
case IPR_TYPE_ADAPTER:
if (ipr_is_ioa(dev))
init_ioa_dev(dev);
break;
case TYPE_ENCLOSURE:
init_ses_dev(dev);
break;
default:
break;
};
return 0;
}
/**
* ipr_init_new_dev -
* @dev: ipr dev struct
*
* Returns:
* nothing
**/
int ipr_init_new_dev(struct ipr_dev *dev)
{
if (!dev->scsi_dev_data)
return 0;
switch (dev->scsi_dev_data->type) {
case TYPE_DISK:
if (!strlen(dev->dev_name))
return 1;
wait_for_dev(dev->dev_name);
break;
case IPR_TYPE_ADAPTER:
if (!ipr_is_ioa(dev))
break;
case IPR_TYPE_AF_DISK:
wait_for_dev(dev->gen_name);
break;
default:
break;
};
ipr_init_dev(dev);
return 0;
}
/**
* ipr_scan_ra -
* @ioa: ipr ioa struct
* @ra: ipr_res_addr struct
*
* Returns:
* nothing
**/
static void ipr_scan_ra(struct ipr_ioa *ioa, struct ipr_res_addr *ra)
{
ra_dbg(ra, "Scanning for new device\n");
ipr_scan(ioa, ra->bus, ra->target, ra->lun);
}
/**
* ipr_for_each_unique_ra -
* @dev: ipr dev struct
* @func: function pointer
*
* Returns:
* nothing
**/
static void ipr_for_each_unique_ra(struct ipr_dev *dev,
void (*func) (struct ipr_ioa *, struct ipr_res_addr *))
{
signed int i, j;
int dup;
for (i = 0; i < ARRAY_SIZE(dev->res_addr); i++) {
dup = 0;
for (j = i - 1; j >= 0; j--) {
if (!memcmp(&dev->res_addr[i], &dev->res_addr[j],
sizeof(struct ipr_res_addr))) {
dup = 1;
break;
}
}
if (!dup)
func(dev->ioa, &dev->res_addr[i]);
}
}
/**
* fixup_improper_devs -
* @ioa: ipr ioa struct
*
* Returns:
* 0 if no improper devs / number of improper devs otherwise
**/
static int fixup_improper_devs(struct ipr_ioa *ioa)
{
struct ipr_dev *dev;
int improper = 0;
for_each_dev(ioa, dev) {
dev->local_flag = 0;
if (ipr_improper_device_type(dev) && !ipr_device_lock(dev)) {
improper++;
dev->local_flag = 1;
scsi_dbg(dev, "Deleting improper device\n");
ipr_write_dev_attr(dev, "delete", "1");
ipr_device_unlock(dev);
}
}
if (!improper)
return 0;
sleep(5);
for_each_dev(ioa, dev) {
if (!dev->local_flag)
continue;
dev->local_flag = 0;
dev->rescan = 0;
ipr_for_each_unique_ra(dev, ipr_scan_ra);
}
return improper;
}
/**
* ipr_init_ioa -
* @ioa: ipr ioa struct
*
* Returns:
* 0 if success / non-zero on failure
**/
int ipr_init_ioa(struct ipr_ioa *ioa)
{
struct ipr_dev *dev;
if (ioa->ioa_dead)
return 0;
if (fixup_improper_devs(ioa))
return -EAGAIN;
init_ioa_dev(&ioa->ioa);
for_each_dev(ioa, dev)
ipr_init_dev(dev);
return 0;
}
/**
* scsi_dev_kevent -
* @buf: data buffer
* @find_device: function pointer
* @func: function pointer
*
* Returns:
* nothing
**/
void scsi_dev_kevent(char *buf, struct ipr_dev *(*find_device)(char *),
int (*func)(struct ipr_dev *))
{
struct ipr_dev *dev;
char *name;
int i, j, rc = -EAGAIN;
name = strrchr(buf, '/');
if (!name) {
syslog_dbg("Failed to handle %s kevent\n", buf);
return;
}
name++;
for (i = 0; i < 2 && rc == -EAGAIN; i++) {
for (j = 0; j < 10; j++) {
tool_init(1);
check_current_config(false);
dev = find_device(name);
if (dev)
break;
sleep(2);
}
if (!dev) {
syslog_dbg("Failed to find ipr dev %s\n", name);
return;
}
rc = func(dev);
}
}
/**
* scsi_host_kevent -
* @buf: data buffer
* @func: funtion pointer
*
* Returns:
* nothing
**/
void scsi_host_kevent(char *buf, int (*func)(struct ipr_ioa *))
{
struct ipr_ioa *ioa;
char *c;
int host;
int i, j, rc = -EAGAIN;
c = strrchr(buf, '/');
if (!c) {
syslog_dbg("Failed to handle %s kevent\n", buf);
return;
}
c += strlen("/host");
host = strtoul(c, NULL, 10);
for (i = 0; i < 2 && rc == -EAGAIN; i++) {
for (j = 0; j < 10; j++) {
tool_init(1);
check_current_config(false);
ioa = find_ioa(host);
if (ioa)
break;
sleep(2);
}
if (!ioa) {
syslog_dbg("Failed to find ipr ioa %d\n", host);
return;
}
rc = func(ioa);
}
}
/**
* get_dev_from_addr -
* @res_addr: ipr_res_addr struct
*
* Returns:
* ipr_dev struct if success / NULL otherwise
**/
struct ipr_dev *get_dev_from_addr(struct ipr_res_addr *res_addr)
{
struct ipr_ioa *ioa;
int j;
struct scsi_dev_data *scsi_dev_data;
for_each_ioa(ioa) {
for (j = 0; j < ioa->num_devices; j++) {
scsi_dev_data = ioa->dev[j].scsi_dev_data;
if (!scsi_dev_data)
continue;
if (scsi_dev_data->host == res_addr->host &&
scsi_dev_data->channel == res_addr->bus &&
scsi_dev_data->id == res_addr->target &&
scsi_dev_data->lun == res_addr->lun)
return &ioa->dev[j];
}
}
return NULL;
}
/**
* get_dev_from_handle -
* @res_handle:
* @ioa: struct ipr_ioa
*
* Returns:
* ipr_dev struct if success / NULL otherwise
**/
struct ipr_dev *get_dev_from_handle(struct ipr_ioa *ioa, u32 res_handle)
{
int j;
for (j = 0; j < ioa->num_devices; j++) {
if (!ioa->dev[j].qac_entry)
continue;
if (ipr_is_device_record(ioa->dev[j].qac_entry->record_id) &&
ioa->dev[j].resource_handle == res_handle)
return &ioa->dev[j];
if (ipr_is_array_record(ioa->dev[j].qac_entry->record_id) &&
ioa->dev[j].resource_handle == res_handle)
return &ioa->dev[j];
if (ipr_is_vset_record(ioa->dev[j].qac_entry->record_id) &&
ioa->dev[j].resource_handle == res_handle)
return &ioa->dev[j];
}
return NULL;
}
/**
* ipr_daemonize -
*
* Returns:
* nothing
**/
void ipr_daemonize()
{
int rc = fork();
if (rc < 0) {
syslog(LOG_ERR, "Failed to daemonize\n");
exit(1);
} else if (rc) {
exit(0);
}
close(STDIN_FILENO);
close(STDOUT_FILENO);
close(STDERR_FILENO);
open(_PATH_DEVNULL,O_RDONLY);
open(_PATH_DEVNULL,O_WRONLY);
open(_PATH_DEVNULL,O_WRONLY);
setsid();
}
/**
* ipr_disable_qerr -
* @dev: ipr dev struct
*
* Returns:
* 0 if success / non-zero on failure
**/
int ipr_disable_qerr(struct ipr_dev *dev)
{
u8 ioctl_buffer[IOCTL_BUFFER_SIZE];
u8 ioctl_buffer2[IOCTL_BUFFER_SIZE];
struct ipr_control_mode_page *control_mode_page;
struct ipr_control_mode_page *control_mode_page_changeable;
struct ipr_mode_parm_hdr *mode_parm_hdr;
int status;
u8 length;
/* Issue mode sense to get the control mode page */
status = ipr_mode_sense(dev, 0x0a, &ioctl_buffer);
if (status)
return -EIO;
/* Issue mode sense to get the control mode page */
status = ipr_mode_sense(dev, 0x4a, &ioctl_buffer2);
if (status)
return -EIO;
mode_parm_hdr = (struct ipr_mode_parm_hdr *)ioctl_buffer2;
control_mode_page_changeable = (struct ipr_control_mode_page *)
(((u8 *)(mode_parm_hdr+1)) + mode_parm_hdr->block_desc_len);
mode_parm_hdr = (struct ipr_mode_parm_hdr *)ioctl_buffer;
control_mode_page = (struct ipr_control_mode_page *)
(((u8 *)(mode_parm_hdr+1)) + mode_parm_hdr->block_desc_len);
/* Turn off QERR since some drives do not like QERR
and IMMED bit at the same time. */
IPR_SET_MODE(control_mode_page_changeable->qerr,
control_mode_page->qerr, 0);
/* Issue mode select to set page x0A */
length = mode_parm_hdr->length + 1;
mode_parm_hdr->length = 0;
control_mode_page->hdr.parms_saveable = 0;
mode_parm_hdr->medium_type = 0;
mode_parm_hdr->device_spec_parms = 0;
status = ipr_mode_select(dev, &ioctl_buffer, length);
if (status)
return -EIO;
return 0;
}
void ipr_set_manage_start_stop(struct ipr_dev *dev)
{
char path[PATH_MAX];
ssize_t len;
char value_str[2];
int value;
sprintf(path, "/sys/class/scsi_disk/%s",
dev->scsi_dev_data->sysfs_device_name);
len = sysfs_read_attr(path, "manage_start_stop", value_str, 2);
if (len < 0) {
syslog_dbg("Failed to open manage_start_stop parameter.\n");
return;
}
value = atoi(value_str);
snprintf(value_str, 2, "%d", 1);
if (sysfs_write_attr(path, "manage_start_stop", value_str, 1) < 0)
syslog_dbg("Failed to write manage_start_stop parameter.\n");
len = sysfs_read_attr(path, "manage_start_stop", value_str, 2);
value = atoi(value_str);
}
/**
* ipr_query_ioa_device_port -
* @ioa: ipr ioa struct
* @res_addr: ipr_res_addr struct
* @option: option value
*
* Returns:
* 0 if success / non-zero on failure
**/
int ipr_query_io_dev_port(struct ipr_dev *dev, struct ipr_query_io_port *io_port)
{
int fd, rc, cdb_num;
u8 cdb[IPR_CCB_CDB_LEN];
struct ipr_ioa *ioa = dev->ioa;
struct sense_data_t sense_data;
char *rp, *endptr;
if (strlen(ioa->ioa.gen_name) == 0)
return -ENOENT;
fd = open(ioa->ioa.gen_name, O_RDWR);
if (fd <= 1) {
if (!strcmp(tool_name, "iprconfig") || ipr_debug)
syslog(LOG_ERR, "Could not open %s. %m\n", ioa->ioa.gen_name);
return errno;
}
memset(cdb, 0, IPR_CCB_CDB_LEN);
cdb[0] = IPR_IOA_SERVICE_ACTION;
cdb[1] = IPR_QUERY_IOA_DEV_PORT;
if (ioa->sis64) {
/* convert res path string to bytes */
cdb_num = 2;
rp = dev->res_path_name;
do {
cdb[cdb_num++] = (u8)strtol(rp, &endptr, 16);
rp = endptr+1;
} while (*endptr != '\0' && cdb_num < 10);
while (cdb_num < 10)
cdb[cdb_num++] = 0xff;
cdb[10] = sizeof(*io_port) >> 24;
cdb[11] = (sizeof(*io_port) >> 16) & 0xff;
cdb[12] = (sizeof(*io_port) >> 8) & 0xff;
cdb[13] = sizeof(*io_port) & 0xff;
}
else {
close(fd);
return -1;
}
rc = sg_ioctl(fd, cdb, io_port,
sizeof(*io_port), SG_DXFER_FROM_DEV,
&sense_data, IPR_INTERNAL_TIMEOUT);
if (rc != 0)
scsi_cmd_err(dev, &sense_data, "Query IO port status", rc);
close(fd);
return rc;
}
/**
* ipr_jbod_sysfs_bind -
* @dev: ipr dev struct
* @op: sysfs operation
*
* Returns:
* 0 if success / non-zero on failure
**/
int ipr_jbod_sysfs_bind(struct ipr_dev *dev, u8 op)
{
struct ipr_dev *mp_dev;
int rc, fd, size;
char *sysfs_device_name;
sysfs_device_name = dev->scsi_dev_data->sysfs_device_name;
size = strnlen(sysfs_device_name,
sizeof(dev->scsi_dev_data->sysfs_device_name));
if (op == IPR_JBOD_SYSFS_BIND) {
fd = open("/sys/bus/scsi/drivers/sd/bind", O_WRONLY);
} else if (op == IPR_JBOD_SYSFS_UNBIND) {
fd = open("/sys/bus/scsi/drivers/sd/unbind", O_WRONLY);
} else {
fd = -1;
errno = ENOTSUP;
}
if (fd < 0)
return errno;
rc = write(fd, sysfs_device_name, size);
if (rc < 0) {
close(fd);
return errno;
}
mp_dev = find_multipath_jbod(dev);
if (mp_dev) {
sysfs_device_name = mp_dev->scsi_dev_data->sysfs_device_name;
size = strnlen(sysfs_device_name,
sizeof(mp_dev->scsi_dev_data->sysfs_device_name));
rc = write(fd, sysfs_device_name, size);
if (rc < 0) {
close(fd);
return errno;
}
}
close(fd);
return 0;
}
int check_sg_module()
{
DIR *sg_dirfd;
char devpath[PATH_MAX];
sprintf(devpath, "%s", "/sys/module/sg");
sg_dirfd = opendir(devpath);
if (!sg_dirfd) {
syslog_dbg("Failed to open sg parameter.\n");
return -1;
}
closedir(sg_dirfd);
return 0;
}
iprutils-2.4.18.1/missing 0000755 0001750 0001751 00000015331 12257332274 012153 0000000 0000000 #! /bin/sh
# Common wrapper for a few potentially missing GNU programs.
scriptversion=2012-06-26.16; # UTC
# Copyright (C) 1996-2013 Free Software Foundation, Inc.
# Originally written by Fran,cois Pinard , 1996.
# This program is free software; you can redistribute it and/or modify
# it under the terms of the GNU General Public License as published by
# the Free Software Foundation; either version 2, or (at your option)
# any later version.
# This program is distributed in the hope that it will be useful,
# but WITHOUT ANY WARRANTY; without even the implied warranty of
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
# GNU General Public License for more details.
# You should have received a copy of the GNU General Public License
# along with this program. If not, see .
# As a special exception to the GNU General Public License, if you
# distribute this file as part of a program that contains a
# configuration script generated by Autoconf, you may include it under
# the same distribution terms that you use for the rest of that program.
if test $# -eq 0; then
echo 1>&2 "Try '$0 --help' for more information"
exit 1
fi
case $1 in
--is-lightweight)
# Used by our autoconf macros to check whether the available missing
# script is modern enough.
exit 0
;;
--run)
# Back-compat with the calling convention used by older automake.
shift
;;
-h|--h|--he|--hel|--help)
echo "\
$0 [OPTION]... PROGRAM [ARGUMENT]...
Run 'PROGRAM [ARGUMENT]...', returning a proper advice when this fails due
to PROGRAM being missing or too old.
Options:
-h, --help display this help and exit
-v, --version output version information and exit
Supported PROGRAM values:
aclocal autoconf autoheader autom4te automake makeinfo
bison yacc flex lex help2man
Version suffixes to PROGRAM as well as the prefixes 'gnu-', 'gnu', and
'g' are ignored when checking the name.
Send bug reports to ."
exit $?
;;
-v|--v|--ve|--ver|--vers|--versi|--versio|--version)
echo "missing $scriptversion (GNU Automake)"
exit $?
;;
-*)
echo 1>&2 "$0: unknown '$1' option"
echo 1>&2 "Try '$0 --help' for more information"
exit 1
;;
esac
# Run the given program, remember its exit status.
"$@"; st=$?
# If it succeeded, we are done.
test $st -eq 0 && exit 0
# Also exit now if we it failed (or wasn't found), and '--version' was
# passed; such an option is passed most likely to detect whether the
# program is present and works.
case $2 in --version|--help) exit $st;; esac
# Exit code 63 means version mismatch. This often happens when the user
# tries to use an ancient version of a tool on a file that requires a
# minimum version.
if test $st -eq 63; then
msg="probably too old"
elif test $st -eq 127; then
# Program was missing.
msg="missing on your system"
else
# Program was found and executed, but failed. Give up.
exit $st
fi
perl_URL=http://www.perl.org/
flex_URL=http://flex.sourceforge.net/
gnu_software_URL=http://www.gnu.org/software
program_details ()
{
case $1 in
aclocal|automake)
echo "The '$1' program is part of the GNU Automake package:"
echo "<$gnu_software_URL/automake>"
echo "It also requires GNU Autoconf, GNU m4 and Perl in order to run:"
echo "<$gnu_software_URL/autoconf>"
echo "<$gnu_software_URL/m4/>"
echo "<$perl_URL>"
;;
autoconf|autom4te|autoheader)
echo "The '$1' program is part of the GNU Autoconf package:"
echo "<$gnu_software_URL/autoconf/>"
echo "It also requires GNU m4 and Perl in order to run:"
echo "<$gnu_software_URL/m4/>"
echo "<$perl_URL>"
;;
esac
}
give_advice ()
{
# Normalize program name to check for.
normalized_program=`echo "$1" | sed '
s/^gnu-//; t
s/^gnu//; t
s/^g//; t'`
printf '%s\n' "'$1' is $msg."
configure_deps="'configure.ac' or m4 files included by 'configure.ac'"
case $normalized_program in
autoconf*)
echo "You should only need it if you modified 'configure.ac',"
echo "or m4 files included by it."
program_details 'autoconf'
;;
autoheader*)
echo "You should only need it if you modified 'acconfig.h' or"
echo "$configure_deps."
program_details 'autoheader'
;;
automake*)
echo "You should only need it if you modified 'Makefile.am' or"
echo "$configure_deps."
program_details 'automake'
;;
aclocal*)
echo "You should only need it if you modified 'acinclude.m4' or"
echo "$configure_deps."
program_details 'aclocal'
;;
autom4te*)
echo "You might have modified some maintainer files that require"
echo "the 'automa4te' program to be rebuilt."
program_details 'autom4te'
;;
bison*|yacc*)
echo "You should only need it if you modified a '.y' file."
echo "You may want to install the GNU Bison package:"
echo "<$gnu_software_URL/bison/>"
;;
lex*|flex*)
echo "You should only need it if you modified a '.l' file."
echo "You may want to install the Fast Lexical Analyzer package:"
echo "<$flex_URL>"
;;
help2man*)
echo "You should only need it if you modified a dependency" \
"of a man page."
echo "You may want to install the GNU Help2man package:"
echo "<$gnu_software_URL/help2man/>"
;;
makeinfo*)
echo "You should only need it if you modified a '.texi' file, or"
echo "any other file indirectly affecting the aspect of the manual."
echo "You might want to install the Texinfo package:"
echo "<$gnu_software_URL/texinfo/>"
echo "The spurious makeinfo call might also be the consequence of"
echo "using a buggy 'make' (AIX, DU, IRIX), in which case you might"
echo "want to install GNU make:"
echo "<$gnu_software_URL/make/>"
;;
*)
echo "You might have modified some files without having the proper"
echo "tools for further handling them. Check the 'README' file, it"
echo "often tells you about the needed prerequisites for installing"
echo "this package. You may also peek at any GNU archive site, in"
echo "case some other package contains this missing '$1' program."
;;
esac
}
give_advice "$1" | sed -e '1s/^/WARNING: /' \
-e '2,$s/^/ /' >&2
# Propagate the correct exit status (expected to be 127 for a program
# not found, 63 for a program that failed due to version mismatch).
exit $st
# Local variables:
# eval: (add-hook 'write-file-hooks 'time-stamp)
# time-stamp-start: "scriptversion="
# time-stamp-format: "%:y-%02m-%02d.%02H"
# time-stamp-time-zone: "UTC"
# time-stamp-end: "; # UTC"
# End:
iprutils-2.4.18.1/iprdump.c 0000664 0001750 0001751 00000015357 13366063006 012406 0000000 0000000 /**
* IBM IPR adapter dump daemon
*
* (C) Copyright 2000, 2004
* International Business Machines Corporation and others.
* All Rights Reserved. This program and the accompanying
* materials are made available under the terms of the
* Common Public License v1.0 which accompanies this distribution.
*
*/
/*
* $Header: /cvsroot/iprdd/iprutils/iprdump.c,v 1.19 2008/11/20 01:20:20 wboyer Exp $
*/
#ifndef iprlib_h
#include "iprlib.h"
#endif
#include
#define IPRDUMP_SIZE (80 * 1024 * 1024)
#define MAX_DUMP_FILES 4
#define TOOL_NAME "iprdump"
#define DUMP_PREFIX TOOL_NAME"."
char *tool_name = TOOL_NAME;
struct dump_header {
u32 eye_catcher;
#define IPR_DUMP_EYE_CATCHER 0xC5D4E3F2
u32 total_length;
u32 num_elems;
u32 first_entry_offset;
u32 status;
} *dump_header;
struct dump_entry_header {
u32 length;
u32 id;
#define IPR_DUMP_TEXT_ID 3
char data[0];
};
struct dump {
struct dump_header hdr;
u8 data[IPRDUMP_SIZE-sizeof(struct dump_header)];
};
static struct dump dump;
static char usr_dir[100];
static char *enable = "1\n";
static char *disable = "0\n";
/**
* enable_dump -
* @ioa: ipr_ioa struct
*
* Returns:
* nothing
**/
static void enable_dump(struct ipr_ioa *ioa)
{
int rc;
rc = ipr_write_host_attr(ioa, "dump", enable, strlen(enable));
if (rc != strlen(enable)) {
ioa_err(ioa, "Failed to enable dump. rc=%d. %m\n", rc);
return;
}
}
/**
* disable_dump -
* @ioa: ipr_ioa struct
*
* Returns:
* nothing
**/
static void disable_dump(struct ipr_ioa *ioa)
{
int rc;
rc = ipr_write_host_attr(ioa, "dump", disable, strlen(disable));
if (rc != strlen(disable)) {
ioa_err(ioa, "Failed to disable dump. rc=%d. %m\n", rc);
return;
}
}
/**
* read_dump -
* @ioa: ipr_ioa struct
*
* Returns:
* number of items read
**/
static int read_dump(struct ipr_ioa *ioa)
{
int count = 0;
char path[PATH_MAX];
FILE *file;
sprintf(path, "/sys/class/scsi_host/%s/%s", ioa->host_name, "dump");
file = fopen(path, "r");
count = fread(&dump, 1 , sizeof(dump), file);
fclose(file);
return (count < 0) ? 0: count;
}
/**
* select_dump_file -
* @dirent: dirent struct
*
* Returns:
* 1 if the string is found, else 0
**/
static int select_dump_file(const struct dirent *dirent)
{
if (strstr(dirent->d_name, DUMP_PREFIX))
return 1;
return 0;
}
/**
* dump_sort -
* @a: void buffer
* @b: void buffer
*
* Returns:
*
**/
static int dump_sort(const struct dirent **dumpa, const struct dirent **dumpb)
{
int numa, numb;
sscanf((*dumpa)->d_name, DUMP_PREFIX"%d", &numa);
sscanf((*dumpb)->d_name, DUMP_PREFIX"%d", &numb);
if (numa < MAX_DUMP_FILES && numb >= (100 - MAX_DUMP_FILES))
return 1;
if (numb < MAX_DUMP_FILES && numa >= (100 - MAX_DUMP_FILES))
return -1;
return alphasort(dumpa, dumpb);
}
/**
* cleanup_old_dumps -
*
* Returns:
* Nothing
**/
static void cleanup_old_dumps()
{
struct dirent **dirent;
char fname[100];
int rc, i;
rc = scandir(usr_dir, &dirent, select_dump_file, dump_sort);
if (rc > 0) {
for (i = 0 ; i < (rc - MAX_DUMP_FILES); i++) {
sprintf(fname, "%s%s", usr_dir, dirent[i]->d_name);
if (remove(fname)) {
syslog(LOG_ERR, "Delete of %s%s failed. %m\n",
usr_dir, dirent[i]->d_name);
}
}
free(*dirent);
}
}
/**
* get_dump_fname -
* @fname: file name
*
* Returns:
* -EIO on error, else 0
**/
static int get_dump_fname(char *fname)
{
struct dirent **dirent;
int rc;
char *tmp;
int dump_id = 0;
cleanup_old_dumps();
rc = scandir(usr_dir, &dirent, select_dump_file, dump_sort);
if (rc > 0) {
rc--;
tmp = strstr(dirent[rc]->d_name, DUMP_PREFIX);
if (tmp) {
tmp += strlen(DUMP_PREFIX);
dump_id = strtoul(tmp, NULL, 10) + 1;
if (dump_id > 99)
dump_id = 0;
} else {
free(*dirent);
fname[0] = '\0';
return -EIO;
}
free(*dirent);
}
sprintf(fname, "%s%02d", DUMP_PREFIX, dump_id);
return 0;
}
/**
* write_dump -
* @ioa: ipr_ioa struct
* @count: size to write
*
* Returns:
* Nothing
**/
static void write_dump(struct ipr_ioa *ioa, int count)
{
int f_dump;
char dump_file[100], dump_path[100];
if (get_dump_fname(dump_file))
return;
sprintf(dump_path, "%s%s", usr_dir, dump_file);
f_dump = creat(dump_path, S_IRUSR);
if (f_dump < 0) {
syslog(LOG_ERR, "Cannot open %s. %m\n", dump_path);
return;
}
write(f_dump, &dump, count);
close(f_dump);
ioa_err(ioa, "Dump of ipr IOA has completed to file: %s\n", dump_path);
}
/**
* handle_signal -
* @signal: signal value
*
* Returns:
* Nothing
**/
static void handle_signal(int signal)
{
struct ipr_ioa *ioa;
tool_init(0);
for_each_ioa(ioa)
disable_dump(ioa);
exit(0);
}
/**
* select_dump_file -
* @ioa: ipr_ioa struct
*
* Returns:
* Nothing
**/
static void dump_ioa(struct ipr_ioa *ioa)
{
int count;
count = read_dump(ioa);
if (count <= 0)
return;
write_dump(ioa, count);
disable_dump(ioa);
enable_dump(ioa);
}
/**
* poll_for_dump -
*
* Returns:
* Nothing
**/
static void poll_for_dump()
{
struct ipr_ioa *ioa;
tool_init(0);
for_each_ioa(ioa)
enable_dump(ioa);
for_each_ioa(ioa)
dump_ioa(ioa);
}
/**
* kevent_handler -
* @buf: character buffer
*
* Returns:
* Nothing
**/
static void kevent_handler(char *buf)
{
struct ipr_ioa *ioa;
int host, i;
char *index;
if (!strncmp(buf, "change@/class/scsi_host", 23)) {
host = strtoul(&buf[28], NULL, 10);
} else if (!strncmp(buf, "change@/devices/pci", 19) && strstr(buf, "scsi_host")) {
index = strrchr(buf, '/');
host = strtoul(index + 5, NULL, 10);
} else
return;
tool_init(0);
ioa = find_ioa(host);
if (!ioa) {
syslog(LOG_ERR, "Failed to find ipr ioa %d for iprdump\n", host);
return;
}
enable_dump(ioa);
dump_ioa(ioa);
}
/**
* main -
* @argc: argument count
* @argv: argument string
*
* Returns:
* return value of handle_events() call
**/
int main(int argc, char *argv[])
{
struct ipr_ioa *ioa;
int len, i;
openlog(TOOL_NAME, LOG_PERROR | LOG_PID | LOG_CONS, LOG_USER);
strcpy(usr_dir, IPRDUMP_DIR);
for (i = 1; i < argc; i++) {
if (parse_option(argv[i]))
continue;
if (strcmp(argv[i], "-d") == 0) {
strcpy(usr_dir,argv[++i]);
len = strlen(usr_dir);
if (len < sizeof(usr_dir) && usr_dir[len] != '/') {
usr_dir[len + 1] = '/';
usr_dir[len + 2] = '\0';
}
} else {
printf("Usage: "TOOL_NAME" [options]\n");
printf(" Options: --version Print iprdump version\n");
printf(" --daemon Run as a daemon\n");
printf(" --debug Print extra debugging information\n");
printf(" -d \n");
exit(1);
}
}
if (daemonize)
ipr_daemonize();
signal(SIGINT, handle_signal);
signal(SIGQUIT, handle_signal);
signal(SIGTERM, handle_signal);
tool_init(0);
for_each_ioa(ioa)
enable_dump(ioa);
return handle_events(poll_for_dump, 60, kevent_handler);
}
iprutils-2.4.18.1/iprsos.8 0000664 0001750 0001751 00000002104 13270167731 012160 0000000 0000000 .\" (C) Copyright 2015
.\" International Business Machines Corporation and others.
.\" All Rights Reserved. This program and the accompanying
.\" materials are made available under the terms of the
.\" Common Public License v1.0 which accompanies this distribution.
.TH IPRSOS 8 "December 2014"
.SH NAME
iprsos \- IBM Power RAID report generator
.SH SYNOPSIS
.BI "iprsos"
.sp
.SH DESCRIPTION
.B iprsos
is used to generate an sosreport-like report by collecting hardware
information from the system, along with other system calls such
as lspci, lscsi, and others. The information is collected from 'iprconfig'
commands and printed on stdin by default. User can specify the log file
by -o /path/to/report/file of his/her choice.
.br
.SH FILES
.br
A detailed report file is printed both at stdin and the /path/to/report/file
specified by the user, with the information collected from the hardware and
system information. If no files are used, the information will be only displayed
at stdin.
.br
.SH AUTHORS
Daniel B. Kreling
.br
Brian King
iprutils-2.4.18.1/aclocal.m4 0000664 0001750 0001751 00000134641 13474264417 012431 0000000 0000000 # generated automatically by aclocal 1.13.4 -*- Autoconf -*-
# Copyright (C) 1996-2013 Free Software Foundation, Inc.
# This file is free software; the Free Software Foundation
# gives unlimited permission to copy and/or distribute it,
# with or without modifications, as long as this notice is preserved.
# This program is distributed in the hope that it will be useful,
# but WITHOUT ANY WARRANTY, to the extent permitted by law; without
# even the implied warranty of MERCHANTABILITY or FITNESS FOR A
# PARTICULAR PURPOSE.
m4_ifndef([AC_CONFIG_MACRO_DIRS], [m4_defun([_AM_CONFIG_MACRO_DIRS], [])m4_defun([AC_CONFIG_MACRO_DIRS], [_AM_CONFIG_MACRO_DIRS($@)])])
m4_ifndef([AC_AUTOCONF_VERSION],
[m4_copy([m4_PACKAGE_VERSION], [AC_AUTOCONF_VERSION])])dnl
m4_if(m4_defn([AC_AUTOCONF_VERSION]), [2.69],,
[m4_warning([this file was generated for autoconf 2.69.
You have another version of autoconf. It may work, but is not guaranteed to.
If you have problems, you may need to regenerate the build system entirely.
To do so, use the procedure documented by the package, typically 'autoreconf'.])])
# Copyright (C) 2002-2013 Free Software Foundation, Inc.
#
# This file is free software; the Free Software Foundation
# gives unlimited permission to copy and/or distribute it,
# with or without modifications, as long as this notice is preserved.
# AM_AUTOMAKE_VERSION(VERSION)
# ----------------------------
# Automake X.Y traces this macro to ensure aclocal.m4 has been
# generated from the m4 files accompanying Automake X.Y.
# (This private macro should not be called outside this file.)
AC_DEFUN([AM_AUTOMAKE_VERSION],
[am__api_version='1.13'
dnl Some users find AM_AUTOMAKE_VERSION and mistake it for a way to
dnl require some minimum version. Point them to the right macro.
m4_if([$1], [1.13.4], [],
[AC_FATAL([Do not call $0, use AM_INIT_AUTOMAKE([$1]).])])dnl
])
# _AM_AUTOCONF_VERSION(VERSION)
# -----------------------------
# aclocal traces this macro to find the Autoconf version.
# This is a private macro too. Using m4_define simplifies
# the logic in aclocal, which can simply ignore this definition.
m4_define([_AM_AUTOCONF_VERSION], [])
# AM_SET_CURRENT_AUTOMAKE_VERSION
# -------------------------------
# Call AM_AUTOMAKE_VERSION and AM_AUTOMAKE_VERSION so they can be traced.
# This function is AC_REQUIREd by AM_INIT_AUTOMAKE.
AC_DEFUN([AM_SET_CURRENT_AUTOMAKE_VERSION],
[AM_AUTOMAKE_VERSION([1.13.4])dnl
m4_ifndef([AC_AUTOCONF_VERSION],
[m4_copy([m4_PACKAGE_VERSION], [AC_AUTOCONF_VERSION])])dnl
_AM_AUTOCONF_VERSION(m4_defn([AC_AUTOCONF_VERSION]))])
# AM_AUX_DIR_EXPAND -*- Autoconf -*-
# Copyright (C) 2001-2013 Free Software Foundation, Inc.
#
# This file is free software; the Free Software Foundation
# gives unlimited permission to copy and/or distribute it,
# with or without modifications, as long as this notice is preserved.
# For projects using AC_CONFIG_AUX_DIR([foo]), Autoconf sets
# $ac_aux_dir to '$srcdir/foo'. In other projects, it is set to
# '$srcdir', '$srcdir/..', or '$srcdir/../..'.
#
# Of course, Automake must honor this variable whenever it calls a
# tool from the auxiliary directory. The problem is that $srcdir (and
# therefore $ac_aux_dir as well) can be either absolute or relative,
# depending on how configure is run. This is pretty annoying, since
# it makes $ac_aux_dir quite unusable in subdirectories: in the top
# source directory, any form will work fine, but in subdirectories a
# relative path needs to be adjusted first.
#
# $ac_aux_dir/missing
# fails when called from a subdirectory if $ac_aux_dir is relative
# $top_srcdir/$ac_aux_dir/missing
# fails if $ac_aux_dir is absolute,
# fails when called from a subdirectory in a VPATH build with
# a relative $ac_aux_dir
#
# The reason of the latter failure is that $top_srcdir and $ac_aux_dir
# are both prefixed by $srcdir. In an in-source build this is usually
# harmless because $srcdir is '.', but things will broke when you
# start a VPATH build or use an absolute $srcdir.
#
# So we could use something similar to $top_srcdir/$ac_aux_dir/missing,
# iff we strip the leading $srcdir from $ac_aux_dir. That would be:
# am_aux_dir='\$(top_srcdir)/'`expr "$ac_aux_dir" : "$srcdir//*\(.*\)"`
# and then we would define $MISSING as
# MISSING="\${SHELL} $am_aux_dir/missing"
# This will work as long as MISSING is not called from configure, because
# unfortunately $(top_srcdir) has no meaning in configure.
# However there are other variables, like CC, which are often used in
# configure, and could therefore not use this "fixed" $ac_aux_dir.
#
# Another solution, used here, is to always expand $ac_aux_dir to an
# absolute PATH. The drawback is that using absolute paths prevent a
# configured tree to be moved without reconfiguration.
AC_DEFUN([AM_AUX_DIR_EXPAND],
[dnl Rely on autoconf to set up CDPATH properly.
AC_PREREQ([2.50])dnl
# expand $ac_aux_dir to an absolute path
am_aux_dir=`cd $ac_aux_dir && pwd`
])
# AM_CONDITIONAL -*- Autoconf -*-
# Copyright (C) 1997-2013 Free Software Foundation, Inc.
#
# This file is free software; the Free Software Foundation
# gives unlimited permission to copy and/or distribute it,
# with or without modifications, as long as this notice is preserved.
# AM_CONDITIONAL(NAME, SHELL-CONDITION)
# -------------------------------------
# Define a conditional.
AC_DEFUN([AM_CONDITIONAL],
[AC_PREREQ([2.52])dnl
m4_if([$1], [TRUE], [AC_FATAL([$0: invalid condition: $1])],
[$1], [FALSE], [AC_FATAL([$0: invalid condition: $1])])dnl
AC_SUBST([$1_TRUE])dnl
AC_SUBST([$1_FALSE])dnl
_AM_SUBST_NOTMAKE([$1_TRUE])dnl
_AM_SUBST_NOTMAKE([$1_FALSE])dnl
m4_define([_AM_COND_VALUE_$1], [$2])dnl
if $2; then
$1_TRUE=
$1_FALSE='#'
else
$1_TRUE='#'
$1_FALSE=
fi
AC_CONFIG_COMMANDS_PRE(
[if test -z "${$1_TRUE}" && test -z "${$1_FALSE}"; then
AC_MSG_ERROR([[conditional "$1" was never defined.
Usually this means the macro was only invoked conditionally.]])
fi])])
# Copyright (C) 1999-2013 Free Software Foundation, Inc.
#
# This file is free software; the Free Software Foundation
# gives unlimited permission to copy and/or distribute it,
# with or without modifications, as long as this notice is preserved.
# There are a few dirty hacks below to avoid letting 'AC_PROG_CC' be
# written in clear, in which case automake, when reading aclocal.m4,
# will think it sees a *use*, and therefore will trigger all it's
# C support machinery. Also note that it means that autoscan, seeing
# CC etc. in the Makefile, will ask for an AC_PROG_CC use...
# _AM_DEPENDENCIES(NAME)
# ----------------------
# See how the compiler implements dependency checking.
# NAME is "CC", "CXX", "OBJC", "OBJCXX", "UPC", or "GJC".
# We try a few techniques and use that to set a single cache variable.
#
# We don't AC_REQUIRE the corresponding AC_PROG_CC since the latter was
# modified to invoke _AM_DEPENDENCIES(CC); we would have a circular
# dependency, and given that the user is not expected to run this macro,
# just rely on AC_PROG_CC.
AC_DEFUN([_AM_DEPENDENCIES],
[AC_REQUIRE([AM_SET_DEPDIR])dnl
AC_REQUIRE([AM_OUTPUT_DEPENDENCY_COMMANDS])dnl
AC_REQUIRE([AM_MAKE_INCLUDE])dnl
AC_REQUIRE([AM_DEP_TRACK])dnl
m4_if([$1], [CC], [depcc="$CC" am_compiler_list=],
[$1], [CXX], [depcc="$CXX" am_compiler_list=],
[$1], [OBJC], [depcc="$OBJC" am_compiler_list='gcc3 gcc'],
[$1], [OBJCXX], [depcc="$OBJCXX" am_compiler_list='gcc3 gcc'],
[$1], [UPC], [depcc="$UPC" am_compiler_list=],
[$1], [GCJ], [depcc="$GCJ" am_compiler_list='gcc3 gcc'],
[depcc="$$1" am_compiler_list=])
AC_CACHE_CHECK([dependency style of $depcc],
[am_cv_$1_dependencies_compiler_type],
[if test -z "$AMDEP_TRUE" && test -f "$am_depcomp"; then
# We make a subdir and do the tests there. Otherwise we can end up
# making bogus files that we don't know about and never remove. For
# instance it was reported that on HP-UX the gcc test will end up
# making a dummy file named 'D' -- because '-MD' means "put the output
# in D".
rm -rf conftest.dir
mkdir conftest.dir
# Copy depcomp to subdir because otherwise we won't find it if we're
# using a relative directory.
cp "$am_depcomp" conftest.dir
cd conftest.dir
# We will build objects and dependencies in a subdirectory because
# it helps to detect inapplicable dependency modes. For instance
# both Tru64's cc and ICC support -MD to output dependencies as a
# side effect of compilation, but ICC will put the dependencies in
# the current directory while Tru64 will put them in the object
# directory.
mkdir sub
am_cv_$1_dependencies_compiler_type=none
if test "$am_compiler_list" = ""; then
am_compiler_list=`sed -n ['s/^#*\([a-zA-Z0-9]*\))$/\1/p'] < ./depcomp`
fi
am__universal=false
m4_case([$1], [CC],
[case " $depcc " in #(
*\ -arch\ *\ -arch\ *) am__universal=true ;;
esac],
[CXX],
[case " $depcc " in #(
*\ -arch\ *\ -arch\ *) am__universal=true ;;
esac])
for depmode in $am_compiler_list; do
# Setup a source with many dependencies, because some compilers
# like to wrap large dependency lists on column 80 (with \), and
# we should not choose a depcomp mode which is confused by this.
#
# We need to recreate these files for each test, as the compiler may
# overwrite some of them when testing with obscure command lines.
# This happens at least with the AIX C compiler.
: > sub/conftest.c
for i in 1 2 3 4 5 6; do
echo '#include "conftst'$i'.h"' >> sub/conftest.c
# Using ": > sub/conftst$i.h" creates only sub/conftst1.h with
# Solaris 10 /bin/sh.
echo '/* dummy */' > sub/conftst$i.h
done
echo "${am__include} ${am__quote}sub/conftest.Po${am__quote}" > confmf
# We check with '-c' and '-o' for the sake of the "dashmstdout"
# mode. It turns out that the SunPro C++ compiler does not properly
# handle '-M -o', and we need to detect this. Also, some Intel
# versions had trouble with output in subdirs.
am__obj=sub/conftest.${OBJEXT-o}
am__minus_obj="-o $am__obj"
case $depmode in
gcc)
# This depmode causes a compiler race in universal mode.
test "$am__universal" = false || continue
;;
nosideeffect)
# After this tag, mechanisms are not by side-effect, so they'll
# only be used when explicitly requested.
if test "x$enable_dependency_tracking" = xyes; then
continue
else
break
fi
;;
msvc7 | msvc7msys | msvisualcpp | msvcmsys)
# This compiler won't grok '-c -o', but also, the minuso test has
# not run yet. These depmodes are late enough in the game, and
# so weak that their functioning should not be impacted.
am__obj=conftest.${OBJEXT-o}
am__minus_obj=
;;
none) break ;;
esac
if depmode=$depmode \
source=sub/conftest.c object=$am__obj \
depfile=sub/conftest.Po tmpdepfile=sub/conftest.TPo \
$SHELL ./depcomp $depcc -c $am__minus_obj sub/conftest.c \
>/dev/null 2>conftest.err &&
grep sub/conftst1.h sub/conftest.Po > /dev/null 2>&1 &&
grep sub/conftst6.h sub/conftest.Po > /dev/null 2>&1 &&
grep $am__obj sub/conftest.Po > /dev/null 2>&1 &&
${MAKE-make} -s -f confmf > /dev/null 2>&1; then
# icc doesn't choke on unknown options, it will just issue warnings
# or remarks (even with -Werror). So we grep stderr for any message
# that says an option was ignored or not supported.
# When given -MP, icc 7.0 and 7.1 complain thusly:
# icc: Command line warning: ignoring option '-M'; no argument required
# The diagnosis changed in icc 8.0:
# icc: Command line remark: option '-MP' not supported
if (grep 'ignoring option' conftest.err ||
grep 'not supported' conftest.err) >/dev/null 2>&1; then :; else
am_cv_$1_dependencies_compiler_type=$depmode
break
fi
fi
done
cd ..
rm -rf conftest.dir
else
am_cv_$1_dependencies_compiler_type=none
fi
])
AC_SUBST([$1DEPMODE], [depmode=$am_cv_$1_dependencies_compiler_type])
AM_CONDITIONAL([am__fastdep$1], [
test "x$enable_dependency_tracking" != xno \
&& test "$am_cv_$1_dependencies_compiler_type" = gcc3])
])
# AM_SET_DEPDIR
# -------------
# Choose a directory name for dependency files.
# This macro is AC_REQUIREd in _AM_DEPENDENCIES.
AC_DEFUN([AM_SET_DEPDIR],
[AC_REQUIRE([AM_SET_LEADING_DOT])dnl
AC_SUBST([DEPDIR], ["${am__leading_dot}deps"])dnl
])
# AM_DEP_TRACK
# ------------
AC_DEFUN([AM_DEP_TRACK],
[AC_ARG_ENABLE([dependency-tracking], [dnl
AS_HELP_STRING(
[--enable-dependency-tracking],
[do not reject slow dependency extractors])
AS_HELP_STRING(
[--disable-dependency-tracking],
[speeds up one-time build])])
if test "x$enable_dependency_tracking" != xno; then
am_depcomp="$ac_aux_dir/depcomp"
AMDEPBACKSLASH='\'
am__nodep='_no'
fi
AM_CONDITIONAL([AMDEP], [test "x$enable_dependency_tracking" != xno])
AC_SUBST([AMDEPBACKSLASH])dnl
_AM_SUBST_NOTMAKE([AMDEPBACKSLASH])dnl
AC_SUBST([am__nodep])dnl
_AM_SUBST_NOTMAKE([am__nodep])dnl
])
# Generate code to set up dependency tracking. -*- Autoconf -*-
# Copyright (C) 1999-2013 Free Software Foundation, Inc.
#
# This file is free software; the Free Software Foundation
# gives unlimited permission to copy and/or distribute it,
# with or without modifications, as long as this notice is preserved.
# _AM_OUTPUT_DEPENDENCY_COMMANDS
# ------------------------------
AC_DEFUN([_AM_OUTPUT_DEPENDENCY_COMMANDS],
[{
# Older Autoconf quotes --file arguments for eval, but not when files
# are listed without --file. Let's play safe and only enable the eval
# if we detect the quoting.
case $CONFIG_FILES in
*\'*) eval set x "$CONFIG_FILES" ;;
*) set x $CONFIG_FILES ;;
esac
shift
for mf
do
# Strip MF so we end up with the name of the file.
mf=`echo "$mf" | sed -e 's/:.*$//'`
# Check whether this is an Automake generated Makefile or not.
# We used to match only the files named 'Makefile.in', but
# some people rename them; so instead we look at the file content.
# Grep'ing the first line is not enough: some people post-process
# each Makefile.in and add a new line on top of each file to say so.
# Grep'ing the whole file is not good either: AIX grep has a line
# limit of 2048, but all sed's we know have understand at least 4000.
if sed -n 's,^#.*generated by automake.*,X,p' "$mf" | grep X >/dev/null 2>&1; then
dirpart=`AS_DIRNAME("$mf")`
else
continue
fi
# Extract the definition of DEPDIR, am__include, and am__quote
# from the Makefile without running 'make'.
DEPDIR=`sed -n 's/^DEPDIR = //p' < "$mf"`
test -z "$DEPDIR" && continue
am__include=`sed -n 's/^am__include = //p' < "$mf"`
test -z "$am__include" && continue
am__quote=`sed -n 's/^am__quote = //p' < "$mf"`
# Find all dependency output files, they are included files with
# $(DEPDIR) in their names. We invoke sed twice because it is the
# simplest approach to changing $(DEPDIR) to its actual value in the
# expansion.
for file in `sed -n "
s/^$am__include $am__quote\(.*(DEPDIR).*\)$am__quote"'$/\1/p' <"$mf" | \
sed -e 's/\$(DEPDIR)/'"$DEPDIR"'/g'`; do
# Make sure the directory exists.
test -f "$dirpart/$file" && continue
fdir=`AS_DIRNAME(["$file"])`
AS_MKDIR_P([$dirpart/$fdir])
# echo "creating $dirpart/$file"
echo '# dummy' > "$dirpart/$file"
done
done
}
])# _AM_OUTPUT_DEPENDENCY_COMMANDS
# AM_OUTPUT_DEPENDENCY_COMMANDS
# -----------------------------
# This macro should only be invoked once -- use via AC_REQUIRE.
#
# This code is only required when automatic dependency tracking
# is enabled. FIXME. This creates each '.P' file that we will
# need in order to bootstrap the dependency handling code.
AC_DEFUN([AM_OUTPUT_DEPENDENCY_COMMANDS],
[AC_CONFIG_COMMANDS([depfiles],
[test x"$AMDEP_TRUE" != x"" || _AM_OUTPUT_DEPENDENCY_COMMANDS],
[AMDEP_TRUE="$AMDEP_TRUE" ac_aux_dir="$ac_aux_dir"])
])
# Do all the work for Automake. -*- Autoconf -*-
# Copyright (C) 1996-2013 Free Software Foundation, Inc.
#
# This file is free software; the Free Software Foundation
# gives unlimited permission to copy and/or distribute it,
# with or without modifications, as long as this notice is preserved.
# This macro actually does too much. Some checks are only needed if
# your package does certain things. But this isn't really a big deal.
# AM_INIT_AUTOMAKE(PACKAGE, VERSION, [NO-DEFINE])
# AM_INIT_AUTOMAKE([OPTIONS])
# -----------------------------------------------
# The call with PACKAGE and VERSION arguments is the old style
# call (pre autoconf-2.50), which is being phased out. PACKAGE
# and VERSION should now be passed to AC_INIT and removed from
# the call to AM_INIT_AUTOMAKE.
# We support both call styles for the transition. After
# the next Automake release, Autoconf can make the AC_INIT
# arguments mandatory, and then we can depend on a new Autoconf
# release and drop the old call support.
AC_DEFUN([AM_INIT_AUTOMAKE],
[AC_PREREQ([2.65])dnl
dnl Autoconf wants to disallow AM_ names. We explicitly allow
dnl the ones we care about.
m4_pattern_allow([^AM_[A-Z]+FLAGS$])dnl
AC_REQUIRE([AM_SET_CURRENT_AUTOMAKE_VERSION])dnl
AC_REQUIRE([AC_PROG_INSTALL])dnl
if test "`cd $srcdir && pwd`" != "`pwd`"; then
# Use -I$(srcdir) only when $(srcdir) != ., so that make's output
# is not polluted with repeated "-I."
AC_SUBST([am__isrc], [' -I$(srcdir)'])_AM_SUBST_NOTMAKE([am__isrc])dnl
# test to see if srcdir already configured
if test -f $srcdir/config.status; then
AC_MSG_ERROR([source directory already configured; run "make distclean" there first])
fi
fi
# test whether we have cygpath
if test -z "$CYGPATH_W"; then
if (cygpath --version) >/dev/null 2>/dev/null; then
CYGPATH_W='cygpath -w'
else
CYGPATH_W=echo
fi
fi
AC_SUBST([CYGPATH_W])
# Define the identity of the package.
dnl Distinguish between old-style and new-style calls.
m4_ifval([$2],
[AC_DIAGNOSE([obsolete],
[$0: two- and three-arguments forms are deprecated.])
m4_ifval([$3], [_AM_SET_OPTION([no-define])])dnl
AC_SUBST([PACKAGE], [$1])dnl
AC_SUBST([VERSION], [$2])],
[_AM_SET_OPTIONS([$1])dnl
dnl Diagnose old-style AC_INIT with new-style AM_AUTOMAKE_INIT.
m4_if(
m4_ifdef([AC_PACKAGE_NAME], [ok]):m4_ifdef([AC_PACKAGE_VERSION], [ok]),
[ok:ok],,
[m4_fatal([AC_INIT should be called with package and version arguments])])dnl
AC_SUBST([PACKAGE], ['AC_PACKAGE_TARNAME'])dnl
AC_SUBST([VERSION], ['AC_PACKAGE_VERSION'])])dnl
_AM_IF_OPTION([no-define],,
[AC_DEFINE_UNQUOTED([PACKAGE], ["$PACKAGE"], [Name of package])
AC_DEFINE_UNQUOTED([VERSION], ["$VERSION"], [Version number of package])])dnl
# Some tools Automake needs.
AC_REQUIRE([AM_SANITY_CHECK])dnl
AC_REQUIRE([AC_ARG_PROGRAM])dnl
AM_MISSING_PROG([ACLOCAL], [aclocal-${am__api_version}])
AM_MISSING_PROG([AUTOCONF], [autoconf])
AM_MISSING_PROG([AUTOMAKE], [automake-${am__api_version}])
AM_MISSING_PROG([AUTOHEADER], [autoheader])
AM_MISSING_PROG([MAKEINFO], [makeinfo])
AC_REQUIRE([AM_PROG_INSTALL_SH])dnl
AC_REQUIRE([AM_PROG_INSTALL_STRIP])dnl
AC_REQUIRE([AC_PROG_MKDIR_P])dnl
# For better backward compatibility. To be removed once Automake 1.9.x
# dies out for good. For more background, see:
#
#
AC_SUBST([mkdir_p], ['$(MKDIR_P)'])
# We need awk for the "check" target. The system "awk" is bad on
# some platforms.
AC_REQUIRE([AC_PROG_AWK])dnl
AC_REQUIRE([AC_PROG_MAKE_SET])dnl
AC_REQUIRE([AM_SET_LEADING_DOT])dnl
_AM_IF_OPTION([tar-ustar], [_AM_PROG_TAR([ustar])],
[_AM_IF_OPTION([tar-pax], [_AM_PROG_TAR([pax])],
[_AM_PROG_TAR([v7])])])
_AM_IF_OPTION([no-dependencies],,
[AC_PROVIDE_IFELSE([AC_PROG_CC],
[_AM_DEPENDENCIES([CC])],
[m4_define([AC_PROG_CC],
m4_defn([AC_PROG_CC])[_AM_DEPENDENCIES([CC])])])dnl
AC_PROVIDE_IFELSE([AC_PROG_CXX],
[_AM_DEPENDENCIES([CXX])],
[m4_define([AC_PROG_CXX],
m4_defn([AC_PROG_CXX])[_AM_DEPENDENCIES([CXX])])])dnl
AC_PROVIDE_IFELSE([AC_PROG_OBJC],
[_AM_DEPENDENCIES([OBJC])],
[m4_define([AC_PROG_OBJC],
m4_defn([AC_PROG_OBJC])[_AM_DEPENDENCIES([OBJC])])])dnl
AC_PROVIDE_IFELSE([AC_PROG_OBJCXX],
[_AM_DEPENDENCIES([OBJCXX])],
[m4_define([AC_PROG_OBJCXX],
m4_defn([AC_PROG_OBJCXX])[_AM_DEPENDENCIES([OBJCXX])])])dnl
])
AC_REQUIRE([AM_SILENT_RULES])dnl
dnl The testsuite driver may need to know about EXEEXT, so add the
dnl 'am__EXEEXT' conditional if _AM_COMPILER_EXEEXT was seen. This
dnl macro is hooked onto _AC_COMPILER_EXEEXT early, see below.
AC_CONFIG_COMMANDS_PRE(dnl
[m4_provide_if([_AM_COMPILER_EXEEXT],
[AM_CONDITIONAL([am__EXEEXT], [test -n "$EXEEXT"])])])dnl
])
dnl Hook into '_AC_COMPILER_EXEEXT' early to learn its expansion. Do not
dnl add the conditional right here, as _AC_COMPILER_EXEEXT may be further
dnl mangled by Autoconf and run in a shell conditional statement.
m4_define([_AC_COMPILER_EXEEXT],
m4_defn([_AC_COMPILER_EXEEXT])[m4_provide([_AM_COMPILER_EXEEXT])])
# When config.status generates a header, we must update the stamp-h file.
# This file resides in the same directory as the config header
# that is generated. The stamp files are numbered to have different names.
# Autoconf calls _AC_AM_CONFIG_HEADER_HOOK (when defined) in the
# loop where config.status creates the headers, so we can generate
# our stamp files there.
AC_DEFUN([_AC_AM_CONFIG_HEADER_HOOK],
[# Compute $1's index in $config_headers.
_am_arg=$1
_am_stamp_count=1
for _am_header in $config_headers :; do
case $_am_header in
$_am_arg | $_am_arg:* )
break ;;
* )
_am_stamp_count=`expr $_am_stamp_count + 1` ;;
esac
done
echo "timestamp for $_am_arg" >`AS_DIRNAME(["$_am_arg"])`/stamp-h[]$_am_stamp_count])
# Copyright (C) 2001-2013 Free Software Foundation, Inc.
#
# This file is free software; the Free Software Foundation
# gives unlimited permission to copy and/or distribute it,
# with or without modifications, as long as this notice is preserved.
# AM_PROG_INSTALL_SH
# ------------------
# Define $install_sh.
AC_DEFUN([AM_PROG_INSTALL_SH],
[AC_REQUIRE([AM_AUX_DIR_EXPAND])dnl
if test x"${install_sh}" != xset; then
case $am_aux_dir in
*\ * | *\ *)
install_sh="\${SHELL} '$am_aux_dir/install-sh'" ;;
*)
install_sh="\${SHELL} $am_aux_dir/install-sh"
esac
fi
AC_SUBST([install_sh])])
# Copyright (C) 2003-2013 Free Software Foundation, Inc.
#
# This file is free software; the Free Software Foundation
# gives unlimited permission to copy and/or distribute it,
# with or without modifications, as long as this notice is preserved.
# Check whether the underlying file-system supports filenames
# with a leading dot. For instance MS-DOS doesn't.
AC_DEFUN([AM_SET_LEADING_DOT],
[rm -rf .tst 2>/dev/null
mkdir .tst 2>/dev/null
if test -d .tst; then
am__leading_dot=.
else
am__leading_dot=_
fi
rmdir .tst 2>/dev/null
AC_SUBST([am__leading_dot])])
# Check to see how 'make' treats includes. -*- Autoconf -*-
# Copyright (C) 2001-2013 Free Software Foundation, Inc.
#
# This file is free software; the Free Software Foundation
# gives unlimited permission to copy and/or distribute it,
# with or without modifications, as long as this notice is preserved.
# AM_MAKE_INCLUDE()
# -----------------
# Check to see how make treats includes.
AC_DEFUN([AM_MAKE_INCLUDE],
[am_make=${MAKE-make}
cat > confinc << 'END'
am__doit:
@echo this is the am__doit target
.PHONY: am__doit
END
# If we don't find an include directive, just comment out the code.
AC_MSG_CHECKING([for style of include used by $am_make])
am__include="#"
am__quote=
_am_result=none
# First try GNU make style include.
echo "include confinc" > confmf
# Ignore all kinds of additional output from 'make'.
case `$am_make -s -f confmf 2> /dev/null` in #(
*the\ am__doit\ target*)
am__include=include
am__quote=
_am_result=GNU
;;
esac
# Now try BSD make style include.
if test "$am__include" = "#"; then
echo '.include "confinc"' > confmf
case `$am_make -s -f confmf 2> /dev/null` in #(
*the\ am__doit\ target*)
am__include=.include
am__quote="\""
_am_result=BSD
;;
esac
fi
AC_SUBST([am__include])
AC_SUBST([am__quote])
AC_MSG_RESULT([$_am_result])
rm -f confinc confmf
])
# Fake the existence of programs that GNU maintainers use. -*- Autoconf -*-
# Copyright (C) 1997-2013 Free Software Foundation, Inc.
#
# This file is free software; the Free Software Foundation
# gives unlimited permission to copy and/or distribute it,
# with or without modifications, as long as this notice is preserved.
# AM_MISSING_PROG(NAME, PROGRAM)
# ------------------------------
AC_DEFUN([AM_MISSING_PROG],
[AC_REQUIRE([AM_MISSING_HAS_RUN])
$1=${$1-"${am_missing_run}$2"}
AC_SUBST($1)])
# AM_MISSING_HAS_RUN
# ------------------
# Define MISSING if not defined so far and test if it is modern enough.
# If it is, set am_missing_run to use it, otherwise, to nothing.
AC_DEFUN([AM_MISSING_HAS_RUN],
[AC_REQUIRE([AM_AUX_DIR_EXPAND])dnl
AC_REQUIRE_AUX_FILE([missing])dnl
if test x"${MISSING+set}" != xset; then
case $am_aux_dir in
*\ * | *\ *)
MISSING="\${SHELL} \"$am_aux_dir/missing\"" ;;
*)
MISSING="\${SHELL} $am_aux_dir/missing" ;;
esac
fi
# Use eval to expand $SHELL
if eval "$MISSING --is-lightweight"; then
am_missing_run="$MISSING "
else
am_missing_run=
AC_MSG_WARN(['missing' script is too old or missing])
fi
])
# Helper functions for option handling. -*- Autoconf -*-
# Copyright (C) 2001-2013 Free Software Foundation, Inc.
#
# This file is free software; the Free Software Foundation
# gives unlimited permission to copy and/or distribute it,
# with or without modifications, as long as this notice is preserved.
# _AM_MANGLE_OPTION(NAME)
# -----------------------
AC_DEFUN([_AM_MANGLE_OPTION],
[[_AM_OPTION_]m4_bpatsubst($1, [[^a-zA-Z0-9_]], [_])])
# _AM_SET_OPTION(NAME)
# --------------------
# Set option NAME. Presently that only means defining a flag for this option.
AC_DEFUN([_AM_SET_OPTION],
[m4_define(_AM_MANGLE_OPTION([$1]), [1])])
# _AM_SET_OPTIONS(OPTIONS)
# ------------------------
# OPTIONS is a space-separated list of Automake options.
AC_DEFUN([_AM_SET_OPTIONS],
[m4_foreach_w([_AM_Option], [$1], [_AM_SET_OPTION(_AM_Option)])])
# _AM_IF_OPTION(OPTION, IF-SET, [IF-NOT-SET])
# -------------------------------------------
# Execute IF-SET if OPTION is set, IF-NOT-SET otherwise.
AC_DEFUN([_AM_IF_OPTION],
[m4_ifset(_AM_MANGLE_OPTION([$1]), [$2], [$3])])
# Copyright (C) 1999-2013 Free Software Foundation, Inc.
#
# This file is free software; the Free Software Foundation
# gives unlimited permission to copy and/or distribute it,
# with or without modifications, as long as this notice is preserved.
# AM_PATH_PYTHON([MINIMUM-VERSION], [ACTION-IF-FOUND], [ACTION-IF-NOT-FOUND])
# ---------------------------------------------------------------------------
# Adds support for distributing Python modules and packages. To
# install modules, copy them to $(pythondir), using the python_PYTHON
# automake variable. To install a package with the same name as the
# automake package, install to $(pkgpythondir), or use the
# pkgpython_PYTHON automake variable.
#
# The variables $(pyexecdir) and $(pkgpyexecdir) are provided as
# locations to install python extension modules (shared libraries).
# Another macro is required to find the appropriate flags to compile
# extension modules.
#
# If your package is configured with a different prefix to python,
# users will have to add the install directory to the PYTHONPATH
# environment variable, or create a .pth file (see the python
# documentation for details).
#
# If the MINIMUM-VERSION argument is passed, AM_PATH_PYTHON will
# cause an error if the version of python installed on the system
# doesn't meet the requirement. MINIMUM-VERSION should consist of
# numbers and dots only.
AC_DEFUN([AM_PATH_PYTHON],
[
dnl Find a Python interpreter. Python versions prior to 2.0 are not
dnl supported. (2.0 was released on October 16, 2000).
m4_define_default([_AM_PYTHON_INTERPRETER_LIST],
[python python2 python3 python3.3 python3.2 python3.1 python3.0 python2.7 dnl
python2.6 python2.5 python2.4 python2.3 python2.2 python2.1 python2.0])
AC_ARG_VAR([PYTHON], [the Python interpreter])
m4_if([$1],[],[
dnl No version check is needed.
# Find any Python interpreter.
if test -z "$PYTHON"; then
AC_PATH_PROGS([PYTHON], _AM_PYTHON_INTERPRETER_LIST, :)
fi
am_display_PYTHON=python
], [
dnl A version check is needed.
if test -n "$PYTHON"; then
# If the user set $PYTHON, use it and don't search something else.
AC_MSG_CHECKING([whether $PYTHON version is >= $1])
AM_PYTHON_CHECK_VERSION([$PYTHON], [$1],
[AC_MSG_RESULT([yes])],
[AC_MSG_RESULT([no])
AC_MSG_ERROR([Python interpreter is too old])])
am_display_PYTHON=$PYTHON
else
# Otherwise, try each interpreter until we find one that satisfies
# VERSION.
AC_CACHE_CHECK([for a Python interpreter with version >= $1],
[am_cv_pathless_PYTHON],[
for am_cv_pathless_PYTHON in _AM_PYTHON_INTERPRETER_LIST none; do
test "$am_cv_pathless_PYTHON" = none && break
AM_PYTHON_CHECK_VERSION([$am_cv_pathless_PYTHON], [$1], [break])
done])
# Set $PYTHON to the absolute path of $am_cv_pathless_PYTHON.
if test "$am_cv_pathless_PYTHON" = none; then
PYTHON=:
else
AC_PATH_PROG([PYTHON], [$am_cv_pathless_PYTHON])
fi
am_display_PYTHON=$am_cv_pathless_PYTHON
fi
])
if test "$PYTHON" = :; then
dnl Run any user-specified action, or abort.
m4_default([$3], [AC_MSG_ERROR([no suitable Python interpreter found])])
else
dnl Query Python for its version number. Getting [:3] seems to be
dnl the best way to do this; it's what "site.py" does in the standard
dnl library.
AC_CACHE_CHECK([for $am_display_PYTHON version], [am_cv_python_version],
[am_cv_python_version=`$PYTHON -c "import sys; sys.stdout.write(sys.version[[:3]])"`])
AC_SUBST([PYTHON_VERSION], [$am_cv_python_version])
dnl Use the values of $prefix and $exec_prefix for the corresponding
dnl values of PYTHON_PREFIX and PYTHON_EXEC_PREFIX. These are made
dnl distinct variables so they can be overridden if need be. However,
dnl general consensus is that you shouldn't need this ability.
AC_SUBST([PYTHON_PREFIX], ['${prefix}'])
AC_SUBST([PYTHON_EXEC_PREFIX], ['${exec_prefix}'])
dnl At times (like when building shared libraries) you may want
dnl to know which OS platform Python thinks this is.
AC_CACHE_CHECK([for $am_display_PYTHON platform], [am_cv_python_platform],
[am_cv_python_platform=`$PYTHON -c "import sys; sys.stdout.write(sys.platform)"`])
AC_SUBST([PYTHON_PLATFORM], [$am_cv_python_platform])
# Just factor out some code duplication.
am_python_setup_sysconfig="\
import sys
# Prefer sysconfig over distutils.sysconfig, for better compatibility
# with python 3.x. See automake bug#10227.
try:
import sysconfig
except ImportError:
can_use_sysconfig = 0
else:
can_use_sysconfig = 1
# Can't use sysconfig in CPython 2.7, since it's broken in virtualenvs:
#
try:
from platform import python_implementation
if python_implementation() == 'CPython' and sys.version[[:3]] == '2.7':
can_use_sysconfig = 0
except ImportError:
pass"
dnl Set up 4 directories:
dnl pythondir -- where to install python scripts. This is the
dnl site-packages directory, not the python standard library
dnl directory like in previous automake betas. This behavior
dnl is more consistent with lispdir.m4 for example.
dnl Query distutils for this directory.
AC_CACHE_CHECK([for $am_display_PYTHON script directory],
[am_cv_python_pythondir],
[if test "x$prefix" = xNONE
then
am_py_prefix=$ac_default_prefix
else
am_py_prefix=$prefix
fi
am_cv_python_pythondir=`$PYTHON -c "
$am_python_setup_sysconfig
if can_use_sysconfig:
sitedir = sysconfig.get_path('purelib', vars={'base':'$am_py_prefix'})
else:
from distutils import sysconfig
sitedir = sysconfig.get_python_lib(0, 0, prefix='$am_py_prefix')
sys.stdout.write(sitedir)"`
case $am_cv_python_pythondir in
$am_py_prefix*)
am__strip_prefix=`echo "$am_py_prefix" | sed 's|.|.|g'`
am_cv_python_pythondir=`echo "$am_cv_python_pythondir" | sed "s,^$am__strip_prefix,$PYTHON_PREFIX,"`
;;
*)
case $am_py_prefix in
/usr|/System*) ;;
*)
am_cv_python_pythondir=$PYTHON_PREFIX/lib/python$PYTHON_VERSION/site-packages
;;
esac
;;
esac
])
AC_SUBST([pythondir], [$am_cv_python_pythondir])
dnl pkgpythondir -- $PACKAGE directory under pythondir. Was
dnl PYTHON_SITE_PACKAGE in previous betas, but this naming is
dnl more consistent with the rest of automake.
AC_SUBST([pkgpythondir], [\${pythondir}/$PACKAGE])
dnl pyexecdir -- directory for installing python extension modules
dnl (shared libraries)
dnl Query distutils for this directory.
AC_CACHE_CHECK([for $am_display_PYTHON extension module directory],
[am_cv_python_pyexecdir],
[if test "x$exec_prefix" = xNONE
then
am_py_exec_prefix=$am_py_prefix
else
am_py_exec_prefix=$exec_prefix
fi
am_cv_python_pyexecdir=`$PYTHON -c "
$am_python_setup_sysconfig
if can_use_sysconfig:
sitedir = sysconfig.get_path('platlib', vars={'platbase':'$am_py_prefix'})
else:
from distutils import sysconfig
sitedir = sysconfig.get_python_lib(1, 0, prefix='$am_py_prefix')
sys.stdout.write(sitedir)"`
case $am_cv_python_pyexecdir in
$am_py_exec_prefix*)
am__strip_prefix=`echo "$am_py_exec_prefix" | sed 's|.|.|g'`
am_cv_python_pyexecdir=`echo "$am_cv_python_pyexecdir" | sed "s,^$am__strip_prefix,$PYTHON_EXEC_PREFIX,"`
;;
*)
case $am_py_exec_prefix in
/usr|/System*) ;;
*)
am_cv_python_pyexecdir=$PYTHON_EXEC_PREFIX/lib/python$PYTHON_VERSION/site-packages
;;
esac
;;
esac
])
AC_SUBST([pyexecdir], [$am_cv_python_pyexecdir])
dnl pkgpyexecdir -- $(pyexecdir)/$(PACKAGE)
AC_SUBST([pkgpyexecdir], [\${pyexecdir}/$PACKAGE])
dnl Run any user-specified action.
$2
fi
])
# AM_PYTHON_CHECK_VERSION(PROG, VERSION, [ACTION-IF-TRUE], [ACTION-IF-FALSE])
# ---------------------------------------------------------------------------
# Run ACTION-IF-TRUE if the Python interpreter PROG has version >= VERSION.
# Run ACTION-IF-FALSE otherwise.
# This test uses sys.hexversion instead of the string equivalent (first
# word of sys.version), in order to cope with versions such as 2.2c1.
# This supports Python 2.0 or higher. (2.0 was released on October 16, 2000).
AC_DEFUN([AM_PYTHON_CHECK_VERSION],
[prog="import sys
# split strings by '.' and convert to numeric. Append some zeros
# because we need at least 4 digits for the hex conversion.
# map returns an iterator in Python 3.0 and a list in 2.x
minver = list(map(int, '$2'.split('.'))) + [[0, 0, 0]]
minverhex = 0
# xrange is not present in Python 3.0 and range returns an iterator
for i in list(range(0, 4)): minverhex = (minverhex << 8) + minver[[i]]
sys.exit(sys.hexversion < minverhex)"
AS_IF([AM_RUN_LOG([$1 -c "$prog"])], [$3], [$4])])
# Copyright (C) 2001-2013 Free Software Foundation, Inc.
#
# This file is free software; the Free Software Foundation
# gives unlimited permission to copy and/or distribute it,
# with or without modifications, as long as this notice is preserved.
# AM_RUN_LOG(COMMAND)
# -------------------
# Run COMMAND, save the exit status in ac_status, and log it.
# (This has been adapted from Autoconf's _AC_RUN_LOG macro.)
AC_DEFUN([AM_RUN_LOG],
[{ echo "$as_me:$LINENO: $1" >&AS_MESSAGE_LOG_FD
($1) >&AS_MESSAGE_LOG_FD 2>&AS_MESSAGE_LOG_FD
ac_status=$?
echo "$as_me:$LINENO: \$? = $ac_status" >&AS_MESSAGE_LOG_FD
(exit $ac_status); }])
# Check to make sure that the build environment is sane. -*- Autoconf -*-
# Copyright (C) 1996-2013 Free Software Foundation, Inc.
#
# This file is free software; the Free Software Foundation
# gives unlimited permission to copy and/or distribute it,
# with or without modifications, as long as this notice is preserved.
# AM_SANITY_CHECK
# ---------------
AC_DEFUN([AM_SANITY_CHECK],
[AC_MSG_CHECKING([whether build environment is sane])
# Reject unsafe characters in $srcdir or the absolute working directory
# name. Accept space and tab only in the latter.
am_lf='
'
case `pwd` in
*[[\\\"\#\$\&\'\`$am_lf]]*)
AC_MSG_ERROR([unsafe absolute working directory name]);;
esac
case $srcdir in
*[[\\\"\#\$\&\'\`$am_lf\ \ ]]*)
AC_MSG_ERROR([unsafe srcdir value: '$srcdir']);;
esac
# Do 'set' in a subshell so we don't clobber the current shell's
# arguments. Must try -L first in case configure is actually a
# symlink; some systems play weird games with the mod time of symlinks
# (eg FreeBSD returns the mod time of the symlink's containing
# directory).
if (
am_has_slept=no
for am_try in 1 2; do
echo "timestamp, slept: $am_has_slept" > conftest.file
set X `ls -Lt "$srcdir/configure" conftest.file 2> /dev/null`
if test "$[*]" = "X"; then
# -L didn't work.
set X `ls -t "$srcdir/configure" conftest.file`
fi
if test "$[*]" != "X $srcdir/configure conftest.file" \
&& test "$[*]" != "X conftest.file $srcdir/configure"; then
# If neither matched, then we have a broken ls. This can happen
# if, for instance, CONFIG_SHELL is bash and it inherits a
# broken ls alias from the environment. This has actually
# happened. Such a system could not be considered "sane".
AC_MSG_ERROR([ls -t appears to fail. Make sure there is not a broken
alias in your environment])
fi
if test "$[2]" = conftest.file || test $am_try -eq 2; then
break
fi
# Just in case.
sleep 1
am_has_slept=yes
done
test "$[2]" = conftest.file
)
then
# Ok.
:
else
AC_MSG_ERROR([newly created file is older than distributed files!
Check your system clock])
fi
AC_MSG_RESULT([yes])
# If we didn't sleep, we still need to ensure time stamps of config.status and
# generated files are strictly newer.
am_sleep_pid=
if grep 'slept: no' conftest.file >/dev/null 2>&1; then
( sleep 1 ) &
am_sleep_pid=$!
fi
AC_CONFIG_COMMANDS_PRE(
[AC_MSG_CHECKING([that generated files are newer than configure])
if test -n "$am_sleep_pid"; then
# Hide warnings about reused PIDs.
wait $am_sleep_pid 2>/dev/null
fi
AC_MSG_RESULT([done])])
rm -f conftest.file
])
# Copyright (C) 2009-2013 Free Software Foundation, Inc.
#
# This file is free software; the Free Software Foundation
# gives unlimited permission to copy and/or distribute it,
# with or without modifications, as long as this notice is preserved.
# AM_SILENT_RULES([DEFAULT])
# --------------------------
# Enable less verbose build rules; with the default set to DEFAULT
# ("yes" being less verbose, "no" or empty being verbose).
AC_DEFUN([AM_SILENT_RULES],
[AC_ARG_ENABLE([silent-rules], [dnl
AS_HELP_STRING(
[--enable-silent-rules],
[less verbose build output (undo: "make V=1")])
AS_HELP_STRING(
[--disable-silent-rules],
[verbose build output (undo: "make V=0")])dnl
])
case $enable_silent_rules in @%:@ (((
yes) AM_DEFAULT_VERBOSITY=0;;
no) AM_DEFAULT_VERBOSITY=1;;
*) AM_DEFAULT_VERBOSITY=m4_if([$1], [yes], [0], [1]);;
esac
dnl
dnl A few 'make' implementations (e.g., NonStop OS and NextStep)
dnl do not support nested variable expansions.
dnl See automake bug#9928 and bug#10237.
am_make=${MAKE-make}
AC_CACHE_CHECK([whether $am_make supports nested variables],
[am_cv_make_support_nested_variables],
[if AS_ECHO([['TRUE=$(BAR$(V))
BAR0=false
BAR1=true
V=1
am__doit:
@$(TRUE)
.PHONY: am__doit']]) | $am_make -f - >/dev/null 2>&1; then
am_cv_make_support_nested_variables=yes
else
am_cv_make_support_nested_variables=no
fi])
if test $am_cv_make_support_nested_variables = yes; then
dnl Using '$V' instead of '$(V)' breaks IRIX make.
AM_V='$(V)'
AM_DEFAULT_V='$(AM_DEFAULT_VERBOSITY)'
else
AM_V=$AM_DEFAULT_VERBOSITY
AM_DEFAULT_V=$AM_DEFAULT_VERBOSITY
fi
AC_SUBST([AM_V])dnl
AM_SUBST_NOTMAKE([AM_V])dnl
AC_SUBST([AM_DEFAULT_V])dnl
AM_SUBST_NOTMAKE([AM_DEFAULT_V])dnl
AC_SUBST([AM_DEFAULT_VERBOSITY])dnl
AM_BACKSLASH='\'
AC_SUBST([AM_BACKSLASH])dnl
_AM_SUBST_NOTMAKE([AM_BACKSLASH])dnl
])
# Copyright (C) 2001-2013 Free Software Foundation, Inc.
#
# This file is free software; the Free Software Foundation
# gives unlimited permission to copy and/or distribute it,
# with or without modifications, as long as this notice is preserved.
# AM_PROG_INSTALL_STRIP
# ---------------------
# One issue with vendor 'install' (even GNU) is that you can't
# specify the program used to strip binaries. This is especially
# annoying in cross-compiling environments, where the build's strip
# is unlikely to handle the host's binaries.
# Fortunately install-sh will honor a STRIPPROG variable, so we
# always use install-sh in "make install-strip", and initialize
# STRIPPROG with the value of the STRIP variable (set by the user).
AC_DEFUN([AM_PROG_INSTALL_STRIP],
[AC_REQUIRE([AM_PROG_INSTALL_SH])dnl
# Installed binaries are usually stripped using 'strip' when the user
# run "make install-strip". However 'strip' might not be the right
# tool to use in cross-compilation environments, therefore Automake
# will honor the 'STRIP' environment variable to overrule this program.
dnl Don't test for $cross_compiling = yes, because it might be 'maybe'.
if test "$cross_compiling" != no; then
AC_CHECK_TOOL([STRIP], [strip], :)
fi
INSTALL_STRIP_PROGRAM="\$(install_sh) -c -s"
AC_SUBST([INSTALL_STRIP_PROGRAM])])
# Copyright (C) 2006-2013 Free Software Foundation, Inc.
#
# This file is free software; the Free Software Foundation
# gives unlimited permission to copy and/or distribute it,
# with or without modifications, as long as this notice is preserved.
# _AM_SUBST_NOTMAKE(VARIABLE)
# ---------------------------
# Prevent Automake from outputting VARIABLE = @VARIABLE@ in Makefile.in.
# This macro is traced by Automake.
AC_DEFUN([_AM_SUBST_NOTMAKE])
# AM_SUBST_NOTMAKE(VARIABLE)
# --------------------------
# Public sister of _AM_SUBST_NOTMAKE.
AC_DEFUN([AM_SUBST_NOTMAKE], [_AM_SUBST_NOTMAKE($@)])
# Check how to create a tarball. -*- Autoconf -*-
# Copyright (C) 2004-2013 Free Software Foundation, Inc.
#
# This file is free software; the Free Software Foundation
# gives unlimited permission to copy and/or distribute it,
# with or without modifications, as long as this notice is preserved.
# _AM_PROG_TAR(FORMAT)
# --------------------
# Check how to create a tarball in format FORMAT.
# FORMAT should be one of 'v7', 'ustar', or 'pax'.
#
# Substitute a variable $(am__tar) that is a command
# writing to stdout a FORMAT-tarball containing the directory
# $tardir.
# tardir=directory && $(am__tar) > result.tar
#
# Substitute a variable $(am__untar) that extract such
# a tarball read from stdin.
# $(am__untar) < result.tar
#
AC_DEFUN([_AM_PROG_TAR],
[# Always define AMTAR for backward compatibility. Yes, it's still used
# in the wild :-( We should find a proper way to deprecate it ...
AC_SUBST([AMTAR], ['$${TAR-tar}'])
# We'll loop over all known methods to create a tar archive until one works.
_am_tools='gnutar m4_if([$1], [ustar], [plaintar]) pax cpio none'
m4_if([$1], [v7],
[am__tar='$${TAR-tar} chof - "$$tardir"' am__untar='$${TAR-tar} xf -'],
[m4_case([$1],
[ustar],
[# The POSIX 1988 'ustar' format is defined with fixed-size fields.
# There is notably a 21 bits limit for the UID and the GID. In fact,
# the 'pax' utility can hang on bigger UID/GID (see automake bug#8343
# and bug#13588).
am_max_uid=2097151 # 2^21 - 1
am_max_gid=$am_max_uid
# The $UID and $GID variables are not portable, so we need to resort
# to the POSIX-mandated id(1) utility. Errors in the 'id' calls
# below are definitely unexpected, so allow the users to see them
# (that is, avoid stderr redirection).
am_uid=`id -u || echo unknown`
am_gid=`id -g || echo unknown`
AC_MSG_CHECKING([whether UID '$am_uid' is supported by ustar format])
if test $am_uid -le $am_max_uid; then
AC_MSG_RESULT([yes])
else
AC_MSG_RESULT([no])
_am_tools=none
fi
AC_MSG_CHECKING([whether GID '$am_gid' is supported by ustar format])
if test $am_gid -le $am_max_gid; then
AC_MSG_RESULT([yes])
else
AC_MSG_RESULT([no])
_am_tools=none
fi],
[pax],
[],
[m4_fatal([Unknown tar format])])
AC_MSG_CHECKING([how to create a $1 tar archive])
# Go ahead even if we have the value already cached. We do so because we
# need to set the values for the 'am__tar' and 'am__untar' variables.
_am_tools=${am_cv_prog_tar_$1-$_am_tools}
for _am_tool in $_am_tools; do
case $_am_tool in
gnutar)
for _am_tar in tar gnutar gtar; do
AM_RUN_LOG([$_am_tar --version]) && break
done
am__tar="$_am_tar --format=m4_if([$1], [pax], [posix], [$1]) -chf - "'"$$tardir"'
am__tar_="$_am_tar --format=m4_if([$1], [pax], [posix], [$1]) -chf - "'"$tardir"'
am__untar="$_am_tar -xf -"
;;
plaintar)
# Must skip GNU tar: if it does not support --format= it doesn't create
# ustar tarball either.
(tar --version) >/dev/null 2>&1 && continue
am__tar='tar chf - "$$tardir"'
am__tar_='tar chf - "$tardir"'
am__untar='tar xf -'
;;
pax)
am__tar='pax -L -x $1 -w "$$tardir"'
am__tar_='pax -L -x $1 -w "$tardir"'
am__untar='pax -r'
;;
cpio)
am__tar='find "$$tardir" -print | cpio -o -H $1 -L'
am__tar_='find "$tardir" -print | cpio -o -H $1 -L'
am__untar='cpio -i -H $1 -d'
;;
none)
am__tar=false
am__tar_=false
am__untar=false
;;
esac
# If the value was cached, stop now. We just wanted to have am__tar
# and am__untar set.
test -n "${am_cv_prog_tar_$1}" && break
# tar/untar a dummy directory, and stop if the command works.
rm -rf conftest.dir
mkdir conftest.dir
echo GrepMe > conftest.dir/file
AM_RUN_LOG([tardir=conftest.dir && eval $am__tar_ >conftest.tar])
rm -rf conftest.dir
if test -s conftest.tar; then
AM_RUN_LOG([$am__untar /dev/null 2>&1 && break
fi
done
rm -rf conftest.dir
AC_CACHE_VAL([am_cv_prog_tar_$1], [am_cv_prog_tar_$1=$_am_tool])
AC_MSG_RESULT([$am_cv_prog_tar_$1])])
AC_SUBST([am__tar])
AC_SUBST([am__untar])
]) # _AM_PROG_TAR
m4_include([build-aux/libtool.m4])
m4_include([build-aux/ltoptions.m4])
m4_include([build-aux/ltsugar.m4])
m4_include([build-aux/ltversion.m4])
m4_include([build-aux/lt~obsolete.m4])
iprutils-2.4.18.1/config.sub 0000755 0001750 0001751 00000105315 12257332274 012541 0000000 0000000 #! /bin/sh
# Configuration validation subroutine script.
# Copyright 1992-2013 Free Software Foundation, Inc.
timestamp='2013-04-24'
# This file is free software; you can redistribute it and/or modify it
# under the terms of the GNU General Public License as published by
# the Free Software Foundation; either version 3 of the License, or
# (at your option) any later version.
#
# This program is distributed in the hope that it will be useful, but
# WITHOUT ANY WARRANTY; without even the implied warranty of
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
# General Public License for more details.
#
# You should have received a copy of the GNU General Public License
# along with this program; if not, see .
#
# As a special exception to the GNU General Public License, if you
# distribute this file as part of a program that contains a
# configuration script generated by Autoconf, you may include it under
# the same distribution terms that you use for the rest of that
# program. This Exception is an additional permission under section 7
# of the GNU General Public License, version 3 ("GPLv3").
# Please send patches with a ChangeLog entry to config-patches@gnu.org.
#
# Configuration subroutine to validate and canonicalize a configuration type.
# Supply the specified configuration type as an argument.
# If it is invalid, we print an error message on stderr and exit with code 1.
# Otherwise, we print the canonical config type on stdout and succeed.
# You can get the latest version of this script from:
# http://git.savannah.gnu.org/gitweb/?p=config.git;a=blob_plain;f=config.sub;hb=HEAD
# This file is supposed to be the same for all GNU packages
# and recognize all the CPU types, system types and aliases
# that are meaningful with *any* GNU software.
# Each package is responsible for reporting which valid configurations
# it does not support. The user should be able to distinguish
# a failure to support a valid configuration from a meaningless
# configuration.
# The goal of this file is to map all the various variations of a given
# machine specification into a single specification in the form:
# CPU_TYPE-MANUFACTURER-OPERATING_SYSTEM
# or in some cases, the newer four-part form:
# CPU_TYPE-MANUFACTURER-KERNEL-OPERATING_SYSTEM
# It is wrong to echo any other type of specification.
me=`echo "$0" | sed -e 's,.*/,,'`
usage="\
Usage: $0 [OPTION] CPU-MFR-OPSYS
$0 [OPTION] ALIAS
Canonicalize a configuration name.
Operation modes:
-h, --help print this help, then exit
-t, --time-stamp print date of last modification, then exit
-v, --version print version number, then exit
Report bugs and patches to ."
version="\
GNU config.sub ($timestamp)
Copyright 1992-2013 Free Software Foundation, Inc.
This is free software; see the source for copying conditions. There is NO
warranty; not even for MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE."
help="
Try \`$me --help' for more information."
# Parse command line
while test $# -gt 0 ; do
case $1 in
--time-stamp | --time* | -t )
echo "$timestamp" ; exit ;;
--version | -v )
echo "$version" ; exit ;;
--help | --h* | -h )
echo "$usage"; exit ;;
-- ) # Stop option processing
shift; break ;;
- ) # Use stdin as input.
break ;;
-* )
echo "$me: invalid option $1$help"
exit 1 ;;
*local*)
# First pass through any local machine types.
echo $1
exit ;;
* )
break ;;
esac
done
case $# in
0) echo "$me: missing argument$help" >&2
exit 1;;
1) ;;
*) echo "$me: too many arguments$help" >&2
exit 1;;
esac
# Separate what the user gave into CPU-COMPANY and OS or KERNEL-OS (if any).
# Here we must recognize all the valid KERNEL-OS combinations.
maybe_os=`echo $1 | sed 's/^\(.*\)-\([^-]*-[^-]*\)$/\2/'`
case $maybe_os in
nto-qnx* | linux-gnu* | linux-android* | linux-dietlibc | linux-newlib* | \
linux-musl* | linux-uclibc* | uclinux-uclibc* | uclinux-gnu* | kfreebsd*-gnu* | \
knetbsd*-gnu* | netbsd*-gnu* | \
kopensolaris*-gnu* | \
storm-chaos* | os2-emx* | rtmk-nova*)
os=-$maybe_os
basic_machine=`echo $1 | sed 's/^\(.*\)-\([^-]*-[^-]*\)$/\1/'`
;;
android-linux)
os=-linux-android
basic_machine=`echo $1 | sed 's/^\(.*\)-\([^-]*-[^-]*\)$/\1/'`-unknown
;;
*)
basic_machine=`echo $1 | sed 's/-[^-]*$//'`
if [ $basic_machine != $1 ]
then os=`echo $1 | sed 's/.*-/-/'`
else os=; fi
;;
esac
### Let's recognize common machines as not being operating systems so
### that things like config.sub decstation-3100 work. We also
### recognize some manufacturers as not being operating systems, so we
### can provide default operating systems below.
case $os in
-sun*os*)
# Prevent following clause from handling this invalid input.
;;
-dec* | -mips* | -sequent* | -encore* | -pc532* | -sgi* | -sony* | \
-att* | -7300* | -3300* | -delta* | -motorola* | -sun[234]* | \
-unicom* | -ibm* | -next | -hp | -isi* | -apollo | -altos* | \
-convergent* | -ncr* | -news | -32* | -3600* | -3100* | -hitachi* |\
-c[123]* | -convex* | -sun | -crds | -omron* | -dg | -ultra | -tti* | \
-harris | -dolphin | -highlevel | -gould | -cbm | -ns | -masscomp | \
-apple | -axis | -knuth | -cray | -microblaze*)
os=
basic_machine=$1
;;
-bluegene*)
os=-cnk
;;
-sim | -cisco | -oki | -wec | -winbond)
os=
basic_machine=$1
;;
-scout)
;;
-wrs)
os=-vxworks
basic_machine=$1
;;
-chorusos*)
os=-chorusos
basic_machine=$1
;;
-chorusrdb)
os=-chorusrdb
basic_machine=$1
;;
-hiux*)
os=-hiuxwe2
;;
-sco6)
os=-sco5v6
basic_machine=`echo $1 | sed -e 's/86-.*/86-pc/'`
;;
-sco5)
os=-sco3.2v5
basic_machine=`echo $1 | sed -e 's/86-.*/86-pc/'`
;;
-sco4)
os=-sco3.2v4
basic_machine=`echo $1 | sed -e 's/86-.*/86-pc/'`
;;
-sco3.2.[4-9]*)
os=`echo $os | sed -e 's/sco3.2./sco3.2v/'`
basic_machine=`echo $1 | sed -e 's/86-.*/86-pc/'`
;;
-sco3.2v[4-9]*)
# Don't forget version if it is 3.2v4 or newer.
basic_machine=`echo $1 | sed -e 's/86-.*/86-pc/'`
;;
-sco5v6*)
# Don't forget version if it is 3.2v4 or newer.
basic_machine=`echo $1 | sed -e 's/86-.*/86-pc/'`
;;
-sco*)
os=-sco3.2v2
basic_machine=`echo $1 | sed -e 's/86-.*/86-pc/'`
;;
-udk*)
basic_machine=`echo $1 | sed -e 's/86-.*/86-pc/'`
;;
-isc)
os=-isc2.2
basic_machine=`echo $1 | sed -e 's/86-.*/86-pc/'`
;;
-clix*)
basic_machine=clipper-intergraph
;;
-isc*)
basic_machine=`echo $1 | sed -e 's/86-.*/86-pc/'`
;;
-lynx*178)
os=-lynxos178
;;
-lynx*5)
os=-lynxos5
;;
-lynx*)
os=-lynxos
;;
-ptx*)
basic_machine=`echo $1 | sed -e 's/86-.*/86-sequent/'`
;;
-windowsnt*)
os=`echo $os | sed -e 's/windowsnt/winnt/'`
;;
-psos*)
os=-psos
;;
-mint | -mint[0-9]*)
basic_machine=m68k-atari
os=-mint
;;
esac
# Decode aliases for certain CPU-COMPANY combinations.
case $basic_machine in
# Recognize the basic CPU types without company name.
# Some are omitted here because they have special meanings below.
1750a | 580 \
| a29k \
| aarch64 | aarch64_be \
| alpha | alphaev[4-8] | alphaev56 | alphaev6[78] | alphapca5[67] \
| alpha64 | alpha64ev[4-8] | alpha64ev56 | alpha64ev6[78] | alpha64pca5[67] \
| am33_2.0 \
| arc | arceb \
| arm | arm[bl]e | arme[lb] | armv[2-8] | armv[3-8][lb] | armv7[arm] \
| avr | avr32 \
| be32 | be64 \
| bfin \
| c4x | clipper \
| d10v | d30v | dlx | dsp16xx \
| epiphany \
| fido | fr30 | frv \
| h8300 | h8500 | hppa | hppa1.[01] | hppa2.0 | hppa2.0[nw] | hppa64 \
| hexagon \
| i370 | i860 | i960 | ia64 \
| ip2k | iq2000 \
| le32 | le64 \
| lm32 \
| m32c | m32r | m32rle | m68000 | m68k | m88k \
| maxq | mb | microblaze | microblazeel | mcore | mep | metag \
| mips | mipsbe | mipseb | mipsel | mipsle \
| mips16 \
| mips64 | mips64el \
| mips64octeon | mips64octeonel \
| mips64orion | mips64orionel \
| mips64r5900 | mips64r5900el \
| mips64vr | mips64vrel \
| mips64vr4100 | mips64vr4100el \
| mips64vr4300 | mips64vr4300el \
| mips64vr5000 | mips64vr5000el \
| mips64vr5900 | mips64vr5900el \
| mipsisa32 | mipsisa32el \
| mipsisa32r2 | mipsisa32r2el \
| mipsisa64 | mipsisa64el \
| mipsisa64r2 | mipsisa64r2el \
| mipsisa64sb1 | mipsisa64sb1el \
| mipsisa64sr71k | mipsisa64sr71kel \
| mipsr5900 | mipsr5900el \
| mipstx39 | mipstx39el \
| mn10200 | mn10300 \
| moxie \
| mt \
| msp430 \
| nds32 | nds32le | nds32be \
| nios | nios2 | nios2eb | nios2el \
| ns16k | ns32k \
| open8 \
| or1k | or32 \
| pdp10 | pdp11 | pj | pjl \
| powerpc | powerpc64 | powerpc64le | powerpcle \
| pyramid \
| rl78 | rx \
| score \
| sh | sh[1234] | sh[24]a | sh[24]aeb | sh[23]e | sh[34]eb | sheb | shbe | shle | sh[1234]le | sh3ele \
| sh64 | sh64le \
| sparc | sparc64 | sparc64b | sparc64v | sparc86x | sparclet | sparclite \
| sparcv8 | sparcv9 | sparcv9b | sparcv9v \
| spu \
| tahoe | tic4x | tic54x | tic55x | tic6x | tic80 | tron \
| ubicom32 \
| v850 | v850e | v850e1 | v850e2 | v850es | v850e2v3 \
| we32k \
| x86 | xc16x | xstormy16 | xtensa \
| z8k | z80)
basic_machine=$basic_machine-unknown
;;
c54x)
basic_machine=tic54x-unknown
;;
c55x)
basic_machine=tic55x-unknown
;;
c6x)
basic_machine=tic6x-unknown
;;
m6811 | m68hc11 | m6812 | m68hc12 | m68hcs12x | picochip)
basic_machine=$basic_machine-unknown
os=-none
;;
m88110 | m680[12346]0 | m683?2 | m68360 | m5200 | v70 | w65 | z8k)
;;
ms1)
basic_machine=mt-unknown
;;
strongarm | thumb | xscale)
basic_machine=arm-unknown
;;
xgate)
basic_machine=$basic_machine-unknown
os=-none
;;
xscaleeb)
basic_machine=armeb-unknown
;;
xscaleel)
basic_machine=armel-unknown
;;
# We use `pc' rather than `unknown'
# because (1) that's what they normally are, and
# (2) the word "unknown" tends to confuse beginning users.
i*86 | x86_64)
basic_machine=$basic_machine-pc
;;
# Object if more than one company name word.
*-*-*)
echo Invalid configuration \`$1\': machine \`$basic_machine\' not recognized 1>&2
exit 1
;;
# Recognize the basic CPU types with company name.
580-* \
| a29k-* \
| aarch64-* | aarch64_be-* \
| alpha-* | alphaev[4-8]-* | alphaev56-* | alphaev6[78]-* \
| alpha64-* | alpha64ev[4-8]-* | alpha64ev56-* | alpha64ev6[78]-* \
| alphapca5[67]-* | alpha64pca5[67]-* | arc-* | arceb-* \
| arm-* | armbe-* | armle-* | armeb-* | armv*-* \
| avr-* | avr32-* \
| be32-* | be64-* \
| bfin-* | bs2000-* \
| c[123]* | c30-* | [cjt]90-* | c4x-* \
| clipper-* | craynv-* | cydra-* \
| d10v-* | d30v-* | dlx-* \
| elxsi-* \
| f30[01]-* | f700-* | fido-* | fr30-* | frv-* | fx80-* \
| h8300-* | h8500-* \
| hppa-* | hppa1.[01]-* | hppa2.0-* | hppa2.0[nw]-* | hppa64-* \
| hexagon-* \
| i*86-* | i860-* | i960-* | ia64-* \
| ip2k-* | iq2000-* \
| le32-* | le64-* \
| lm32-* \
| m32c-* | m32r-* | m32rle-* \
| m68000-* | m680[012346]0-* | m68360-* | m683?2-* | m68k-* \
| m88110-* | m88k-* | maxq-* | mcore-* | metag-* \
| microblaze-* | microblazeel-* \
| mips-* | mipsbe-* | mipseb-* | mipsel-* | mipsle-* \
| mips16-* \
| mips64-* | mips64el-* \
| mips64octeon-* | mips64octeonel-* \
| mips64orion-* | mips64orionel-* \
| mips64r5900-* | mips64r5900el-* \
| mips64vr-* | mips64vrel-* \
| mips64vr4100-* | mips64vr4100el-* \
| mips64vr4300-* | mips64vr4300el-* \
| mips64vr5000-* | mips64vr5000el-* \
| mips64vr5900-* | mips64vr5900el-* \
| mipsisa32-* | mipsisa32el-* \
| mipsisa32r2-* | mipsisa32r2el-* \
| mipsisa64-* | mipsisa64el-* \
| mipsisa64r2-* | mipsisa64r2el-* \
| mipsisa64sb1-* | mipsisa64sb1el-* \
| mipsisa64sr71k-* | mipsisa64sr71kel-* \
| mipsr5900-* | mipsr5900el-* \
| mipstx39-* | mipstx39el-* \
| mmix-* \
| mt-* \
| msp430-* \
| nds32-* | nds32le-* | nds32be-* \
| nios-* | nios2-* | nios2eb-* | nios2el-* \
| none-* | np1-* | ns16k-* | ns32k-* \
| open8-* \
| orion-* \
| pdp10-* | pdp11-* | pj-* | pjl-* | pn-* | power-* \
| powerpc-* | powerpc64-* | powerpc64le-* | powerpcle-* \
| pyramid-* \
| rl78-* | romp-* | rs6000-* | rx-* \
| sh-* | sh[1234]-* | sh[24]a-* | sh[24]aeb-* | sh[23]e-* | sh[34]eb-* | sheb-* | shbe-* \
| shle-* | sh[1234]le-* | sh3ele-* | sh64-* | sh64le-* \
| sparc-* | sparc64-* | sparc64b-* | sparc64v-* | sparc86x-* | sparclet-* \
| sparclite-* \
| sparcv8-* | sparcv9-* | sparcv9b-* | sparcv9v-* | sv1-* | sx?-* \
| tahoe-* \
| tic30-* | tic4x-* | tic54x-* | tic55x-* | tic6x-* | tic80-* \
| tile*-* \
| tron-* \
| ubicom32-* \
| v850-* | v850e-* | v850e1-* | v850es-* | v850e2-* | v850e2v3-* \
| vax-* \
| we32k-* \
| x86-* | x86_64-* | xc16x-* | xps100-* \
| xstormy16-* | xtensa*-* \
| ymp-* \
| z8k-* | z80-*)
;;
# Recognize the basic CPU types without company name, with glob match.
xtensa*)
basic_machine=$basic_machine-unknown
;;
# Recognize the various machine names and aliases which stand
# for a CPU type and a company and sometimes even an OS.
386bsd)
basic_machine=i386-unknown
os=-bsd
;;
3b1 | 7300 | 7300-att | att-7300 | pc7300 | safari | unixpc)
basic_machine=m68000-att
;;
3b*)
basic_machine=we32k-att
;;
a29khif)
basic_machine=a29k-amd
os=-udi
;;
abacus)
basic_machine=abacus-unknown
;;
adobe68k)
basic_machine=m68010-adobe
os=-scout
;;
alliant | fx80)
basic_machine=fx80-alliant
;;
altos | altos3068)
basic_machine=m68k-altos
;;
am29k)
basic_machine=a29k-none
os=-bsd
;;
amd64)
basic_machine=x86_64-pc
;;
amd64-*)
basic_machine=x86_64-`echo $basic_machine | sed 's/^[^-]*-//'`
;;
amdahl)
basic_machine=580-amdahl
os=-sysv
;;
amiga | amiga-*)
basic_machine=m68k-unknown
;;
amigaos | amigados)
basic_machine=m68k-unknown
os=-amigaos
;;
amigaunix | amix)
basic_machine=m68k-unknown
os=-sysv4
;;
apollo68)
basic_machine=m68k-apollo
os=-sysv
;;
apollo68bsd)
basic_machine=m68k-apollo
os=-bsd
;;
aros)
basic_machine=i386-pc
os=-aros
;;
aux)
basic_machine=m68k-apple
os=-aux
;;
balance)
basic_machine=ns32k-sequent
os=-dynix
;;
blackfin)
basic_machine=bfin-unknown
os=-linux
;;
blackfin-*)
basic_machine=bfin-`echo $basic_machine | sed 's/^[^-]*-//'`
os=-linux
;;
bluegene*)
basic_machine=powerpc-ibm
os=-cnk
;;
c54x-*)
basic_machine=tic54x-`echo $basic_machine | sed 's/^[^-]*-//'`
;;
c55x-*)
basic_machine=tic55x-`echo $basic_machine | sed 's/^[^-]*-//'`
;;
c6x-*)
basic_machine=tic6x-`echo $basic_machine | sed 's/^[^-]*-//'`
;;
c90)
basic_machine=c90-cray
os=-unicos
;;
cegcc)
basic_machine=arm-unknown
os=-cegcc
;;
convex-c1)
basic_machine=c1-convex
os=-bsd
;;
convex-c2)
basic_machine=c2-convex
os=-bsd
;;
convex-c32)
basic_machine=c32-convex
os=-bsd
;;
convex-c34)
basic_machine=c34-convex
os=-bsd
;;
convex-c38)
basic_machine=c38-convex
os=-bsd
;;
cray | j90)
basic_machine=j90-cray
os=-unicos
;;
craynv)
basic_machine=craynv-cray
os=-unicosmp
;;
cr16 | cr16-*)
basic_machine=cr16-unknown
os=-elf
;;
crds | unos)
basic_machine=m68k-crds
;;
crisv32 | crisv32-* | etraxfs*)
basic_machine=crisv32-axis
;;
cris | cris-* | etrax*)
basic_machine=cris-axis
;;
crx)
basic_machine=crx-unknown
os=-elf
;;
da30 | da30-*)
basic_machine=m68k-da30
;;
decstation | decstation-3100 | pmax | pmax-* | pmin | dec3100 | decstatn)
basic_machine=mips-dec
;;
decsystem10* | dec10*)
basic_machine=pdp10-dec
os=-tops10
;;
decsystem20* | dec20*)
basic_machine=pdp10-dec
os=-tops20
;;
delta | 3300 | motorola-3300 | motorola-delta \
| 3300-motorola | delta-motorola)
basic_machine=m68k-motorola
;;
delta88)
basic_machine=m88k-motorola
os=-sysv3
;;
dicos)
basic_machine=i686-pc
os=-dicos
;;
djgpp)
basic_machine=i586-pc
os=-msdosdjgpp
;;
dpx20 | dpx20-*)
basic_machine=rs6000-bull
os=-bosx
;;
dpx2* | dpx2*-bull)
basic_machine=m68k-bull
os=-sysv3
;;
ebmon29k)
basic_machine=a29k-amd
os=-ebmon
;;
elxsi)
basic_machine=elxsi-elxsi
os=-bsd
;;
encore | umax | mmax)
basic_machine=ns32k-encore
;;
es1800 | OSE68k | ose68k | ose | OSE)
basic_machine=m68k-ericsson
os=-ose
;;
fx2800)
basic_machine=i860-alliant
;;
genix)
basic_machine=ns32k-ns
;;
gmicro)
basic_machine=tron-gmicro
os=-sysv
;;
go32)
basic_machine=i386-pc
os=-go32
;;
h3050r* | hiux*)
basic_machine=hppa1.1-hitachi
os=-hiuxwe2
;;
h8300hms)
basic_machine=h8300-hitachi
os=-hms
;;
h8300xray)
basic_machine=h8300-hitachi
os=-xray
;;
h8500hms)
basic_machine=h8500-hitachi
os=-hms
;;
harris)
basic_machine=m88k-harris
os=-sysv3
;;
hp300-*)
basic_machine=m68k-hp
;;
hp300bsd)
basic_machine=m68k-hp
os=-bsd
;;
hp300hpux)
basic_machine=m68k-hp
os=-hpux
;;
hp3k9[0-9][0-9] | hp9[0-9][0-9])
basic_machine=hppa1.0-hp
;;
hp9k2[0-9][0-9] | hp9k31[0-9])
basic_machine=m68000-hp
;;
hp9k3[2-9][0-9])
basic_machine=m68k-hp
;;
hp9k6[0-9][0-9] | hp6[0-9][0-9])
basic_machine=hppa1.0-hp
;;
hp9k7[0-79][0-9] | hp7[0-79][0-9])
basic_machine=hppa1.1-hp
;;
hp9k78[0-9] | hp78[0-9])
# FIXME: really hppa2.0-hp
basic_machine=hppa1.1-hp
;;
hp9k8[67]1 | hp8[67]1 | hp9k80[24] | hp80[24] | hp9k8[78]9 | hp8[78]9 | hp9k893 | hp893)
# FIXME: really hppa2.0-hp
basic_machine=hppa1.1-hp
;;
hp9k8[0-9][13679] | hp8[0-9][13679])
basic_machine=hppa1.1-hp
;;
hp9k8[0-9][0-9] | hp8[0-9][0-9])
basic_machine=hppa1.0-hp
;;
hppa-next)
os=-nextstep3
;;
hppaosf)
basic_machine=hppa1.1-hp
os=-osf
;;
hppro)
basic_machine=hppa1.1-hp
os=-proelf
;;
i370-ibm* | ibm*)
basic_machine=i370-ibm
;;
i*86v32)
basic_machine=`echo $1 | sed -e 's/86.*/86-pc/'`
os=-sysv32
;;
i*86v4*)
basic_machine=`echo $1 | sed -e 's/86.*/86-pc/'`
os=-sysv4
;;
i*86v)
basic_machine=`echo $1 | sed -e 's/86.*/86-pc/'`
os=-sysv
;;
i*86sol2)
basic_machine=`echo $1 | sed -e 's/86.*/86-pc/'`
os=-solaris2
;;
i386mach)
basic_machine=i386-mach
os=-mach
;;
i386-vsta | vsta)
basic_machine=i386-unknown
os=-vsta
;;
iris | iris4d)
basic_machine=mips-sgi
case $os in
-irix*)
;;
*)
os=-irix4
;;
esac
;;
isi68 | isi)
basic_machine=m68k-isi
os=-sysv
;;
m68knommu)
basic_machine=m68k-unknown
os=-linux
;;
m68knommu-*)
basic_machine=m68k-`echo $basic_machine | sed 's/^[^-]*-//'`
os=-linux
;;
m88k-omron*)
basic_machine=m88k-omron
;;
magnum | m3230)
basic_machine=mips-mips
os=-sysv
;;
merlin)
basic_machine=ns32k-utek
os=-sysv
;;
microblaze*)
basic_machine=microblaze-xilinx
;;
mingw64)
basic_machine=x86_64-pc
os=-mingw64
;;
mingw32)
basic_machine=i386-pc
os=-mingw32
;;
mingw32ce)
basic_machine=arm-unknown
os=-mingw32ce
;;
miniframe)
basic_machine=m68000-convergent
;;
*mint | -mint[0-9]* | *MiNT | *MiNT[0-9]*)
basic_machine=m68k-atari
os=-mint
;;
mips3*-*)
basic_machine=`echo $basic_machine | sed -e 's/mips3/mips64/'`
;;
mips3*)
basic_machine=`echo $basic_machine | sed -e 's/mips3/mips64/'`-unknown
;;
monitor)
basic_machine=m68k-rom68k
os=-coff
;;
morphos)
basic_machine=powerpc-unknown
os=-morphos
;;
msdos)
basic_machine=i386-pc
os=-msdos
;;
ms1-*)
basic_machine=`echo $basic_machine | sed -e 's/ms1-/mt-/'`
;;
msys)
basic_machine=i386-pc
os=-msys
;;
mvs)
basic_machine=i370-ibm
os=-mvs
;;
nacl)
basic_machine=le32-unknown
os=-nacl
;;
ncr3000)
basic_machine=i486-ncr
os=-sysv4
;;
netbsd386)
basic_machine=i386-unknown
os=-netbsd
;;
netwinder)
basic_machine=armv4l-rebel
os=-linux
;;
news | news700 | news800 | news900)
basic_machine=m68k-sony
os=-newsos
;;
news1000)
basic_machine=m68030-sony
os=-newsos
;;
news-3600 | risc-news)
basic_machine=mips-sony
os=-newsos
;;
necv70)
basic_machine=v70-nec
os=-sysv
;;
next | m*-next )
basic_machine=m68k-next
case $os in
-nextstep* )
;;
-ns2*)
os=-nextstep2
;;
*)
os=-nextstep3
;;
esac
;;
nh3000)
basic_machine=m68k-harris
os=-cxux
;;
nh[45]000)
basic_machine=m88k-harris
os=-cxux
;;
nindy960)
basic_machine=i960-intel
os=-nindy
;;
mon960)
basic_machine=i960-intel
os=-mon960
;;
nonstopux)
basic_machine=mips-compaq
os=-nonstopux
;;
np1)
basic_machine=np1-gould
;;
neo-tandem)
basic_machine=neo-tandem
;;
nse-tandem)
basic_machine=nse-tandem
;;
nsr-tandem)
basic_machine=nsr-tandem
;;
op50n-* | op60c-*)
basic_machine=hppa1.1-oki
os=-proelf
;;
openrisc | openrisc-*)
basic_machine=or32-unknown
;;
os400)
basic_machine=powerpc-ibm
os=-os400
;;
OSE68000 | ose68000)
basic_machine=m68000-ericsson
os=-ose
;;
os68k)
basic_machine=m68k-none
os=-os68k
;;
pa-hitachi)
basic_machine=hppa1.1-hitachi
os=-hiuxwe2
;;
paragon)
basic_machine=i860-intel
os=-osf
;;
parisc)
basic_machine=hppa-unknown
os=-linux
;;
parisc-*)
basic_machine=hppa-`echo $basic_machine | sed 's/^[^-]*-//'`
os=-linux
;;
pbd)
basic_machine=sparc-tti
;;
pbb)
basic_machine=m68k-tti
;;
pc532 | pc532-*)
basic_machine=ns32k-pc532
;;
pc98)
basic_machine=i386-pc
;;
pc98-*)
basic_machine=i386-`echo $basic_machine | sed 's/^[^-]*-//'`
;;
pentium | p5 | k5 | k6 | nexgen | viac3)
basic_machine=i586-pc
;;
pentiumpro | p6 | 6x86 | athlon | athlon_*)
basic_machine=i686-pc
;;
pentiumii | pentium2 | pentiumiii | pentium3)
basic_machine=i686-pc
;;
pentium4)
basic_machine=i786-pc
;;
pentium-* | p5-* | k5-* | k6-* | nexgen-* | viac3-*)
basic_machine=i586-`echo $basic_machine | sed 's/^[^-]*-//'`
;;
pentiumpro-* | p6-* | 6x86-* | athlon-*)
basic_machine=i686-`echo $basic_machine | sed 's/^[^-]*-//'`
;;
pentiumii-* | pentium2-* | pentiumiii-* | pentium3-*)
basic_machine=i686-`echo $basic_machine | sed 's/^[^-]*-//'`
;;
pentium4-*)
basic_machine=i786-`echo $basic_machine | sed 's/^[^-]*-//'`
;;
pn)
basic_machine=pn-gould
;;
power) basic_machine=power-ibm
;;
ppc | ppcbe) basic_machine=powerpc-unknown
;;
ppc-* | ppcbe-*)
basic_machine=powerpc-`echo $basic_machine | sed 's/^[^-]*-//'`
;;
ppcle | powerpclittle | ppc-le | powerpc-little)
basic_machine=powerpcle-unknown
;;
ppcle-* | powerpclittle-*)
basic_machine=powerpcle-`echo $basic_machine | sed 's/^[^-]*-//'`
;;
ppc64) basic_machine=powerpc64-unknown
;;
ppc64-* | ppc64p7-*) basic_machine=powerpc64-`echo $basic_machine | sed 's/^[^-]*-//'`
;;
ppc64le | powerpc64little | ppc64-le | powerpc64-little)
basic_machine=powerpc64le-unknown
;;
ppc64le-* | powerpc64little-*)
basic_machine=powerpc64le-`echo $basic_machine | sed 's/^[^-]*-//'`
;;
ps2)
basic_machine=i386-ibm
;;
pw32)
basic_machine=i586-unknown
os=-pw32
;;
rdos | rdos64)
basic_machine=x86_64-pc
os=-rdos
;;
rdos32)
basic_machine=i386-pc
os=-rdos
;;
rom68k)
basic_machine=m68k-rom68k
os=-coff
;;
rm[46]00)
basic_machine=mips-siemens
;;
rtpc | rtpc-*)
basic_machine=romp-ibm
;;
s390 | s390-*)
basic_machine=s390-ibm
;;
s390x | s390x-*)
basic_machine=s390x-ibm
;;
sa29200)
basic_machine=a29k-amd
os=-udi
;;
sb1)
basic_machine=mipsisa64sb1-unknown
;;
sb1el)
basic_machine=mipsisa64sb1el-unknown
;;
sde)
basic_machine=mipsisa32-sde
os=-elf
;;
sei)
basic_machine=mips-sei
os=-seiux
;;
sequent)
basic_machine=i386-sequent
;;
sh)
basic_machine=sh-hitachi
os=-hms
;;
sh5el)
basic_machine=sh5le-unknown
;;
sh64)
basic_machine=sh64-unknown
;;
sparclite-wrs | simso-wrs)
basic_machine=sparclite-wrs
os=-vxworks
;;
sps7)
basic_machine=m68k-bull
os=-sysv2
;;
spur)
basic_machine=spur-unknown
;;
st2000)
basic_machine=m68k-tandem
;;
stratus)
basic_machine=i860-stratus
os=-sysv4
;;
strongarm-* | thumb-*)
basic_machine=arm-`echo $basic_machine | sed 's/^[^-]*-//'`
;;
sun2)
basic_machine=m68000-sun
;;
sun2os3)
basic_machine=m68000-sun
os=-sunos3
;;
sun2os4)
basic_machine=m68000-sun
os=-sunos4
;;
sun3os3)
basic_machine=m68k-sun
os=-sunos3
;;
sun3os4)
basic_machine=m68k-sun
os=-sunos4
;;
sun4os3)
basic_machine=sparc-sun
os=-sunos3
;;
sun4os4)
basic_machine=sparc-sun
os=-sunos4
;;
sun4sol2)
basic_machine=sparc-sun
os=-solaris2
;;
sun3 | sun3-*)
basic_machine=m68k-sun
;;
sun4)
basic_machine=sparc-sun
;;
sun386 | sun386i | roadrunner)
basic_machine=i386-sun
;;
sv1)
basic_machine=sv1-cray
os=-unicos
;;
symmetry)
basic_machine=i386-sequent
os=-dynix
;;
t3e)
basic_machine=alphaev5-cray
os=-unicos
;;
t90)
basic_machine=t90-cray
os=-unicos
;;
tile*)
basic_machine=$basic_machine-unknown
os=-linux-gnu
;;
tx39)
basic_machine=mipstx39-unknown
;;
tx39el)
basic_machine=mipstx39el-unknown
;;
toad1)
basic_machine=pdp10-xkl
os=-tops20
;;
tower | tower-32)
basic_machine=m68k-ncr
;;
tpf)
basic_machine=s390x-ibm
os=-tpf
;;
udi29k)
basic_machine=a29k-amd
os=-udi
;;
ultra3)
basic_machine=a29k-nyu
os=-sym1
;;
v810 | necv810)
basic_machine=v810-nec
os=-none
;;
vaxv)
basic_machine=vax-dec
os=-sysv
;;
vms)
basic_machine=vax-dec
os=-vms
;;
vpp*|vx|vx-*)
basic_machine=f301-fujitsu
;;
vxworks960)
basic_machine=i960-wrs
os=-vxworks
;;
vxworks68)
basic_machine=m68k-wrs
os=-vxworks
;;
vxworks29k)
basic_machine=a29k-wrs
os=-vxworks
;;
w65*)
basic_machine=w65-wdc
os=-none
;;
w89k-*)
basic_machine=hppa1.1-winbond
os=-proelf
;;
xbox)
basic_machine=i686-pc
os=-mingw32
;;
xps | xps100)
basic_machine=xps100-honeywell
;;
xscale-* | xscalee[bl]-*)
basic_machine=`echo $basic_machine | sed 's/^xscale/arm/'`
;;
ymp)
basic_machine=ymp-cray
os=-unicos
;;
z8k-*-coff)
basic_machine=z8k-unknown
os=-sim
;;
z80-*-coff)
basic_machine=z80-unknown
os=-sim
;;
none)
basic_machine=none-none
os=-none
;;
# Here we handle the default manufacturer of certain CPU types. It is in
# some cases the only manufacturer, in others, it is the most popular.
w89k)
basic_machine=hppa1.1-winbond
;;
op50n)
basic_machine=hppa1.1-oki
;;
op60c)
basic_machine=hppa1.1-oki
;;
romp)
basic_machine=romp-ibm
;;
mmix)
basic_machine=mmix-knuth
;;
rs6000)
basic_machine=rs6000-ibm
;;
vax)
basic_machine=vax-dec
;;
pdp10)
# there are many clones, so DEC is not a safe bet
basic_machine=pdp10-unknown
;;
pdp11)
basic_machine=pdp11-dec
;;
we32k)
basic_machine=we32k-att
;;
sh[1234] | sh[24]a | sh[24]aeb | sh[34]eb | sh[1234]le | sh[23]ele)
basic_machine=sh-unknown
;;
sparc | sparcv8 | sparcv9 | sparcv9b | sparcv9v)
basic_machine=sparc-sun
;;
cydra)
basic_machine=cydra-cydrome
;;
orion)
basic_machine=orion-highlevel
;;
orion105)
basic_machine=clipper-highlevel
;;
mac | mpw | mac-mpw)
basic_machine=m68k-apple
;;
pmac | pmac-mpw)
basic_machine=powerpc-apple
;;
*-unknown)
# Make sure to match an already-canonicalized machine name.
;;
*)
echo Invalid configuration \`$1\': machine \`$basic_machine\' not recognized 1>&2
exit 1
;;
esac
# Here we canonicalize certain aliases for manufacturers.
case $basic_machine in
*-digital*)
basic_machine=`echo $basic_machine | sed 's/digital.*/dec/'`
;;
*-commodore*)
basic_machine=`echo $basic_machine | sed 's/commodore.*/cbm/'`
;;
*)
;;
esac
# Decode manufacturer-specific aliases for certain operating systems.
if [ x"$os" != x"" ]
then
case $os in
# First match some system type aliases
# that might get confused with valid system types.
# -solaris* is a basic system type, with this one exception.
-auroraux)
os=-auroraux
;;
-solaris1 | -solaris1.*)
os=`echo $os | sed -e 's|solaris1|sunos4|'`
;;
-solaris)
os=-solaris2
;;
-svr4*)
os=-sysv4
;;
-unixware*)
os=-sysv4.2uw
;;
-gnu/linux*)
os=`echo $os | sed -e 's|gnu/linux|linux-gnu|'`
;;
# First accept the basic system types.
# The portable systems comes first.
# Each alternative MUST END IN A *, to match a version number.
# -sysv* is not here because it comes later, after sysvr4.
-gnu* | -bsd* | -mach* | -minix* | -genix* | -ultrix* | -irix* \
| -*vms* | -sco* | -esix* | -isc* | -aix* | -cnk* | -sunos | -sunos[34]*\
| -hpux* | -unos* | -osf* | -luna* | -dgux* | -auroraux* | -solaris* \
| -sym* | -kopensolaris* | -plan9* \
| -amigaos* | -amigados* | -msdos* | -newsos* | -unicos* | -aof* \
| -aos* | -aros* \
| -nindy* | -vxsim* | -vxworks* | -ebmon* | -hms* | -mvs* \
| -clix* | -riscos* | -uniplus* | -iris* | -rtu* | -xenix* \
| -hiux* | -386bsd* | -knetbsd* | -mirbsd* | -netbsd* \
| -bitrig* | -openbsd* | -solidbsd* \
| -ekkobsd* | -kfreebsd* | -freebsd* | -riscix* | -lynxos* \
| -bosx* | -nextstep* | -cxux* | -aout* | -elf* | -oabi* \
| -ptx* | -coff* | -ecoff* | -winnt* | -domain* | -vsta* \
| -udi* | -eabi* | -lites* | -ieee* | -go32* | -aux* \
| -chorusos* | -chorusrdb* | -cegcc* \
| -cygwin* | -msys* | -pe* | -psos* | -moss* | -proelf* | -rtems* \
| -mingw32* | -mingw64* | -linux-gnu* | -linux-android* \
| -linux-newlib* | -linux-musl* | -linux-uclibc* \
| -uxpv* | -beos* | -mpeix* | -udk* \
| -interix* | -uwin* | -mks* | -rhapsody* | -darwin* | -opened* \
| -openstep* | -oskit* | -conix* | -pw32* | -nonstopux* \
| -storm-chaos* | -tops10* | -tenex* | -tops20* | -its* \
| -os2* | -vos* | -palmos* | -uclinux* | -nucleus* \
| -morphos* | -superux* | -rtmk* | -rtmk-nova* | -windiss* \
| -powermax* | -dnix* | -nx6 | -nx7 | -sei* | -dragonfly* \
| -skyos* | -haiku* | -rdos* | -toppers* | -drops* | -es*)
# Remember, each alternative MUST END IN *, to match a version number.
;;
-qnx*)
case $basic_machine in
x86-* | i*86-*)
;;
*)
os=-nto$os
;;
esac
;;
-nto-qnx*)
;;
-nto*)
os=`echo $os | sed -e 's|nto|nto-qnx|'`
;;
-sim | -es1800* | -hms* | -xray | -os68k* | -none* | -v88r* \
| -windows* | -osx | -abug | -netware* | -os9* | -beos* | -haiku* \
| -macos* | -mpw* | -magic* | -mmixware* | -mon960* | -lnews*)
;;
-mac*)
os=`echo $os | sed -e 's|mac|macos|'`
;;
-linux-dietlibc)
os=-linux-dietlibc
;;
-linux*)
os=`echo $os | sed -e 's|linux|linux-gnu|'`
;;
-sunos5*)
os=`echo $os | sed -e 's|sunos5|solaris2|'`
;;
-sunos6*)
os=`echo $os | sed -e 's|sunos6|solaris3|'`
;;
-opened*)
os=-openedition
;;
-os400*)
os=-os400
;;
-wince*)
os=-wince
;;
-osfrose*)
os=-osfrose
;;
-osf*)
os=-osf
;;
-utek*)
os=-bsd
;;
-dynix*)
os=-bsd
;;
-acis*)
os=-aos
;;
-atheos*)
os=-atheos
;;
-syllable*)
os=-syllable
;;
-386bsd)
os=-bsd
;;
-ctix* | -uts*)
os=-sysv
;;
-nova*)
os=-rtmk-nova
;;
-ns2 )
os=-nextstep2
;;
-nsk*)
os=-nsk
;;
# Preserve the version number of sinix5.
-sinix5.*)
os=`echo $os | sed -e 's|sinix|sysv|'`
;;
-sinix*)
os=-sysv4
;;
-tpf*)
os=-tpf
;;
-triton*)
os=-sysv3
;;
-oss*)
os=-sysv3
;;
-svr4)
os=-sysv4
;;
-svr3)
os=-sysv3
;;
-sysvr4)
os=-sysv4
;;
# This must come after -sysvr4.
-sysv*)
;;
-ose*)
os=-ose
;;
-es1800*)
os=-ose
;;
-xenix)
os=-xenix
;;
-*mint | -mint[0-9]* | -*MiNT | -MiNT[0-9]*)
os=-mint
;;
-aros*)
os=-aros
;;
-zvmoe)
os=-zvmoe
;;
-dicos*)
os=-dicos
;;
-nacl*)
;;
-none)
;;
*)
# Get rid of the `-' at the beginning of $os.
os=`echo $os | sed 's/[^-]*-//'`
echo Invalid configuration \`$1\': system \`$os\' not recognized 1>&2
exit 1
;;
esac
else
# Here we handle the default operating systems that come with various machines.
# The value should be what the vendor currently ships out the door with their
# machine or put another way, the most popular os provided with the machine.
# Note that if you're going to try to match "-MANUFACTURER" here (say,
# "-sun"), then you have to tell the case statement up towards the top
# that MANUFACTURER isn't an operating system. Otherwise, code above
# will signal an error saying that MANUFACTURER isn't an operating
# system, and we'll never get to this point.
case $basic_machine in
score-*)
os=-elf
;;
spu-*)
os=-elf
;;
*-acorn)
os=-riscix1.2
;;
arm*-rebel)
os=-linux
;;
arm*-semi)
os=-aout
;;
c4x-* | tic4x-*)
os=-coff
;;
hexagon-*)
os=-elf
;;
tic54x-*)
os=-coff
;;
tic55x-*)
os=-coff
;;
tic6x-*)
os=-coff
;;
# This must come before the *-dec entry.
pdp10-*)
os=-tops20
;;
pdp11-*)
os=-none
;;
*-dec | vax-*)
os=-ultrix4.2
;;
m68*-apollo)
os=-domain
;;
i386-sun)
os=-sunos4.0.2
;;
m68000-sun)
os=-sunos3
;;
m68*-cisco)
os=-aout
;;
mep-*)
os=-elf
;;
mips*-cisco)
os=-elf
;;
mips*-*)
os=-elf
;;
or1k-*)
os=-elf
;;
or32-*)
os=-coff
;;
*-tti) # must be before sparc entry or we get the wrong os.
os=-sysv3
;;
sparc-* | *-sun)
os=-sunos4.1.1
;;
*-be)
os=-beos
;;
*-haiku)
os=-haiku
;;
*-ibm)
os=-aix
;;
*-knuth)
os=-mmixware
;;
*-wec)
os=-proelf
;;
*-winbond)
os=-proelf
;;
*-oki)
os=-proelf
;;
*-hp)
os=-hpux
;;
*-hitachi)
os=-hiux
;;
i860-* | *-att | *-ncr | *-altos | *-motorola | *-convergent)
os=-sysv
;;
*-cbm)
os=-amigaos
;;
*-dg)
os=-dgux
;;
*-dolphin)
os=-sysv3
;;
m68k-ccur)
os=-rtu
;;
m88k-omron*)
os=-luna
;;
*-next )
os=-nextstep
;;
*-sequent)
os=-ptx
;;
*-crds)
os=-unos
;;
*-ns)
os=-genix
;;
i370-*)
os=-mvs
;;
*-next)
os=-nextstep3
;;
*-gould)
os=-sysv
;;
*-highlevel)
os=-bsd
;;
*-encore)
os=-bsd
;;
*-sgi)
os=-irix
;;
*-siemens)
os=-sysv4
;;
*-masscomp)
os=-rtu
;;
f30[01]-fujitsu | f700-fujitsu)
os=-uxpv
;;
*-rom68k)
os=-coff
;;
*-*bug)
os=-coff
;;
*-apple)
os=-macos
;;
*-atari*)
os=-mint
;;
*)
os=-none
;;
esac
fi
# Here we handle the case where we know the os, and the CPU type, but not the
# manufacturer. We pick the logical manufacturer.
vendor=unknown
case $basic_machine in
*-unknown)
case $os in
-riscix*)
vendor=acorn
;;
-sunos*)
vendor=sun
;;
-cnk*|-aix*)
vendor=ibm
;;
-beos*)
vendor=be
;;
-hpux*)
vendor=hp
;;
-mpeix*)
vendor=hp
;;
-hiux*)
vendor=hitachi
;;
-unos*)
vendor=crds
;;
-dgux*)
vendor=dg
;;
-luna*)
vendor=omron
;;
-genix*)
vendor=ns
;;
-mvs* | -opened*)
vendor=ibm
;;
-os400*)
vendor=ibm
;;
-ptx*)
vendor=sequent
;;
-tpf*)
vendor=ibm
;;
-vxsim* | -vxworks* | -windiss*)
vendor=wrs
;;
-aux*)
vendor=apple
;;
-hms*)
vendor=hitachi
;;
-mpw* | -macos*)
vendor=apple
;;
-*mint | -mint[0-9]* | -*MiNT | -MiNT[0-9]*)
vendor=atari
;;
-vos*)
vendor=stratus
;;
esac
basic_machine=`echo $basic_machine | sed "s/unknown/$vendor/"`
;;
esac
echo $basic_machine$os
exit
# Local variables:
# eval: (add-hook 'write-file-hooks 'time-stamp)
# time-stamp-start: "timestamp='"
# time-stamp-format: "%:y-%02m-%02d"
# time-stamp-end: "'"
# End:
iprutils-2.4.18.1/spec/ 0000775 0001750 0001751 00000000000 13474264453 011572 5 0000000 0000000 iprutils-2.4.18.1/spec/Makefile.in 0000664 0001750 0001751 00000030117 13474264421 013554 0000000 0000000 # Makefile.in generated by automake 1.13.4 from Makefile.am.
# @configure_input@
# Copyright (C) 1994-2013 Free Software Foundation, Inc.
# This Makefile.in is free software; the Free Software Foundation
# gives unlimited permission to copy and/or distribute it,
# with or without modifications, as long as this notice is preserved.
# This program is distributed in the hope that it will be useful,
# but WITHOUT ANY WARRANTY, to the extent permitted by law; without
# even the implied warranty of MERCHANTABILITY or FITNESS FOR A
# PARTICULAR PURPOSE.
@SET_MAKE@
# IBM IPR adapter configuration utility
#
# (C) Copyright 2015
# International Business Machines Corporation and others.
# All Rights Reserved. This program and the accompanying
# materials are made available under the terms of the
# Common Public License v1.0 which accompanies this distribution.
#
#
VPATH = @srcdir@
am__is_gnu_make = test -n '$(MAKEFILE_LIST)' && test -n '$(MAKELEVEL)'
am__make_running_with_option = \
case $${target_option-} in \
?) ;; \
*) echo "am__make_running_with_option: internal error: invalid" \
"target option '$${target_option-}' specified" >&2; \
exit 1;; \
esac; \
has_opt=no; \
sane_makeflags=$$MAKEFLAGS; \
if $(am__is_gnu_make); then \
sane_makeflags=$$MFLAGS; \
else \
case $$MAKEFLAGS in \
*\\[\ \ ]*) \
bs=\\; \
sane_makeflags=`printf '%s\n' "$$MAKEFLAGS" \
| sed "s/$$bs$$bs[$$bs $$bs ]*//g"`;; \
esac; \
fi; \
skip_next=no; \
strip_trailopt () \
{ \
flg=`printf '%s\n' "$$flg" | sed "s/$$1.*$$//"`; \
}; \
for flg in $$sane_makeflags; do \
test $$skip_next = yes && { skip_next=no; continue; }; \
case $$flg in \
*=*|--*) continue;; \
-*I) strip_trailopt 'I'; skip_next=yes;; \
-*I?*) strip_trailopt 'I';; \
-*O) strip_trailopt 'O'; skip_next=yes;; \
-*O?*) strip_trailopt 'O';; \
-*l) strip_trailopt 'l'; skip_next=yes;; \
-*l?*) strip_trailopt 'l';; \
-[dEDm]) skip_next=yes;; \
-[JT]) skip_next=yes;; \
esac; \
case $$flg in \
*$$target_option*) has_opt=yes; break;; \
esac; \
done; \
test $$has_opt = yes
am__make_dryrun = (target_option=n; $(am__make_running_with_option))
am__make_keepgoing = (target_option=k; $(am__make_running_with_option))
pkgdatadir = $(datadir)/@PACKAGE@
pkgincludedir = $(includedir)/@PACKAGE@
pkglibdir = $(libdir)/@PACKAGE@
pkglibexecdir = $(libexecdir)/@PACKAGE@
am__cd = CDPATH="$${ZSH_VERSION+.}$(PATH_SEPARATOR)" && cd
install_sh_DATA = $(install_sh) -c -m 644
install_sh_PROGRAM = $(install_sh) -c
install_sh_SCRIPT = $(install_sh) -c
INSTALL_HEADER = $(INSTALL_DATA)
transform = $(program_transform_name)
NORMAL_INSTALL = :
PRE_INSTALL = :
POST_INSTALL = :
NORMAL_UNINSTALL = :
PRE_UNINSTALL = :
POST_UNINSTALL = :
build_triplet = @build@
host_triplet = @host@
subdir = spec
DIST_COMMON = $(srcdir)/Makefile.in $(srcdir)/Makefile.am
ACLOCAL_M4 = $(top_srcdir)/aclocal.m4
am__aclocal_m4_deps = $(top_srcdir)/build-aux/libtool.m4 \
$(top_srcdir)/build-aux/ltoptions.m4 \
$(top_srcdir)/build-aux/ltsugar.m4 \
$(top_srcdir)/build-aux/ltversion.m4 \
$(top_srcdir)/build-aux/lt~obsolete.m4 \
$(top_srcdir)/configure.ac
am__configure_deps = $(am__aclocal_m4_deps) $(CONFIGURE_DEPENDENCIES) \
$(ACLOCAL_M4)
mkinstalldirs = $(install_sh) -d
CONFIG_CLEAN_FILES =
CONFIG_CLEAN_VPATH_FILES =
AM_V_P = $(am__v_P_@AM_V@)
am__v_P_ = $(am__v_P_@AM_DEFAULT_V@)
am__v_P_0 = false
am__v_P_1 = :
AM_V_GEN = $(am__v_GEN_@AM_V@)
am__v_GEN_ = $(am__v_GEN_@AM_DEFAULT_V@)
am__v_GEN_0 = @echo " GEN " $@;
am__v_GEN_1 =
AM_V_at = $(am__v_at_@AM_V@)
am__v_at_ = $(am__v_at_@AM_DEFAULT_V@)
am__v_at_0 = @
am__v_at_1 =
SOURCES =
DIST_SOURCES =
am__can_run_installinfo = \
case $$AM_UPDATE_INFO_DIR in \
n|no|NO) false;; \
*) (install-info --version) >/dev/null 2>&1;; \
esac
am__tagged_files = $(HEADERS) $(SOURCES) $(TAGS_FILES) $(LISP)
DISTFILES = $(DIST_COMMON) $(DIST_SOURCES) $(TEXINFOS) $(EXTRA_DIST)
ACLOCAL = @ACLOCAL@
AMTAR = @AMTAR@
AM_DEFAULT_VERBOSITY = @AM_DEFAULT_VERBOSITY@
AR = @AR@
AUTOCONF = @AUTOCONF@
AUTOHEADER = @AUTOHEADER@
AUTOMAKE = @AUTOMAKE@
AWK = @AWK@
CC = @CC@
CCDEPMODE = @CCDEPMODE@
CFLAGS = @CFLAGS@
CPP = @CPP@
CPPFLAGS = @CPPFLAGS@
CYGPATH_W = @CYGPATH_W@
DEFS = @DEFS@
DEPDIR = @DEPDIR@
DLLTOOL = @DLLTOOL@
DSYMUTIL = @DSYMUTIL@
DUMPBIN = @DUMPBIN@
ECHO_C = @ECHO_C@
ECHO_N = @ECHO_N@
ECHO_T = @ECHO_T@
EGREP = @EGREP@
EXEEXT = @EXEEXT@
FGREP = @FGREP@
GREP = @GREP@
INSTALL = @INSTALL@
INSTALL_DATA = @INSTALL_DATA@
INSTALL_PROGRAM = @INSTALL_PROGRAM@
INSTALL_SCRIPT = @INSTALL_SCRIPT@
INSTALL_STRIP_PROGRAM = @INSTALL_STRIP_PROGRAM@
IPRCONFIG_LIBS = @IPRCONFIG_LIBS@
LD = @LD@
LDFLAGS = @LDFLAGS@
LIBOBJS = @LIBOBJS@
LIBS = @LIBS@
LIBTOOL = @LIBTOOL@
LIPO = @LIPO@
LN_S = @LN_S@
LTLIBOBJS = @LTLIBOBJS@
MAKEINFO = @MAKEINFO@
MANIFEST_TOOL = @MANIFEST_TOOL@
MKDIR_P = @MKDIR_P@
NM = @NM@
NMEDIT = @NMEDIT@
OBJDUMP = @OBJDUMP@
OBJEXT = @OBJEXT@
OTOOL = @OTOOL@
OTOOL64 = @OTOOL64@
PACKAGE = @PACKAGE@
PACKAGE_BUGREPORT = @PACKAGE_BUGREPORT@
PACKAGE_NAME = @PACKAGE_NAME@
PACKAGE_STRING = @PACKAGE_STRING@
PACKAGE_TARNAME = @PACKAGE_TARNAME@
PACKAGE_URL = @PACKAGE_URL@
PACKAGE_VERSION = @PACKAGE_VERSION@
PATH_SEPARATOR = @PATH_SEPARATOR@
PYTHON = @PYTHON@
PYTHON_EXEC_PREFIX = @PYTHON_EXEC_PREFIX@
PYTHON_PLATFORM = @PYTHON_PLATFORM@
PYTHON_PREFIX = @PYTHON_PREFIX@
PYTHON_VERSION = @PYTHON_VERSION@
RANLIB = @RANLIB@
SED = @SED@
SET_MAKE = @SET_MAKE@
SHELL = @SHELL@
STRIP = @STRIP@
VERSION = @VERSION@
abs_builddir = @abs_builddir@
abs_srcdir = @abs_srcdir@
abs_top_builddir = @abs_top_builddir@
abs_top_srcdir = @abs_top_srcdir@
ac_ct_AR = @ac_ct_AR@
ac_ct_CC = @ac_ct_CC@
ac_ct_DUMPBIN = @ac_ct_DUMPBIN@
am__include = @am__include@
am__leading_dot = @am__leading_dot@
am__quote = @am__quote@
am__tar = @am__tar@
am__untar = @am__untar@
bindir = @bindir@
build = @build@
build_alias = @build_alias@
build_cpu = @build_cpu@
build_os = @build_os@
build_vendor = @build_vendor@
builddir = @builddir@
datadir = @datadir@
datarootdir = @datarootdir@
docdir = @docdir@
dvidir = @dvidir@
exec_prefix = @exec_prefix@
host = @host@
host_alias = @host_alias@
host_cpu = @host_cpu@
host_os = @host_os@
host_vendor = @host_vendor@
htmldir = @htmldir@
includedir = @includedir@
infodir = @infodir@
initddir = @initddir@
install_sh = @install_sh@
libdir = @libdir@
libexecdir = @libexecdir@
localedir = @localedir@
localstatedir = @localstatedir@
mandir = @mandir@
mkdir_p = @mkdir_p@
oldincludedir = @oldincludedir@
pdfdir = @pdfdir@
pkgpyexecdir = @pkgpyexecdir@
pkgpythondir = @pkgpythondir@
prefix = @prefix@
program_transform_name = @program_transform_name@
psdir = @psdir@
pyexecdir = @pyexecdir@
pythondir = @pythondir@
sbindir = @sbindir@
sharedstatedir = @sharedstatedir@
srcdir = @srcdir@
sysconfdir = @sysconfdir@
systemdunitdir = @systemdunitdir@
target_alias = @target_alias@
top_build_prefix = @top_build_prefix@
top_builddir = @top_builddir@
top_srcdir = @top_srcdir@
udevrulesdir = @udevrulesdir@
EXTRA_DIST = iprutils.spec
all: all-am
.SUFFIXES:
$(srcdir)/Makefile.in: $(srcdir)/Makefile.am $(am__configure_deps)
@for dep in $?; do \
case '$(am__configure_deps)' in \
*$$dep*) \
( cd $(top_builddir) && $(MAKE) $(AM_MAKEFLAGS) am--refresh ) \
&& { if test -f $@; then exit 0; else break; fi; }; \
exit 1;; \
esac; \
done; \
echo ' cd $(top_srcdir) && $(AUTOMAKE) --foreign spec/Makefile'; \
$(am__cd) $(top_srcdir) && \
$(AUTOMAKE) --foreign spec/Makefile
.PRECIOUS: Makefile
Makefile: $(srcdir)/Makefile.in $(top_builddir)/config.status
@case '$?' in \
*config.status*) \
cd $(top_builddir) && $(MAKE) $(AM_MAKEFLAGS) am--refresh;; \
*) \
echo ' cd $(top_builddir) && $(SHELL) ./config.status $(subdir)/$@ $(am__depfiles_maybe)'; \
cd $(top_builddir) && $(SHELL) ./config.status $(subdir)/$@ $(am__depfiles_maybe);; \
esac;
$(top_builddir)/config.status: $(top_srcdir)/configure $(CONFIG_STATUS_DEPENDENCIES)
cd $(top_builddir) && $(MAKE) $(AM_MAKEFLAGS) am--refresh
$(top_srcdir)/configure: $(am__configure_deps)
cd $(top_builddir) && $(MAKE) $(AM_MAKEFLAGS) am--refresh
$(ACLOCAL_M4): $(am__aclocal_m4_deps)
cd $(top_builddir) && $(MAKE) $(AM_MAKEFLAGS) am--refresh
$(am__aclocal_m4_deps):
mostlyclean-libtool:
-rm -f *.lo
clean-libtool:
-rm -rf .libs _libs
tags TAGS:
ctags CTAGS:
cscope cscopelist:
distdir: $(DISTFILES)
@srcdirstrip=`echo "$(srcdir)" | sed 's/[].[^$$\\*]/\\\\&/g'`; \
topsrcdirstrip=`echo "$(top_srcdir)" | sed 's/[].[^$$\\*]/\\\\&/g'`; \
list='$(DISTFILES)'; \
dist_files=`for file in $$list; do echo $$file; done | \
sed -e "s|^$$srcdirstrip/||;t" \
-e "s|^$$topsrcdirstrip/|$(top_builddir)/|;t"`; \
case $$dist_files in \
*/*) $(MKDIR_P) `echo "$$dist_files" | \
sed '/\//!d;s|^|$(distdir)/|;s,/[^/]*$$,,' | \
sort -u` ;; \
esac; \
for file in $$dist_files; do \
if test -f $$file || test -d $$file; then d=.; else d=$(srcdir); fi; \
if test -d $$d/$$file; then \
dir=`echo "/$$file" | sed -e 's,/[^/]*$$,,'`; \
if test -d "$(distdir)/$$file"; then \
find "$(distdir)/$$file" -type d ! -perm -700 -exec chmod u+rwx {} \;; \
fi; \
if test -d $(srcdir)/$$file && test $$d != $(srcdir); then \
cp -fpR $(srcdir)/$$file "$(distdir)$$dir" || exit 1; \
find "$(distdir)/$$file" -type d ! -perm -700 -exec chmod u+rwx {} \;; \
fi; \
cp -fpR $$d/$$file "$(distdir)$$dir" || exit 1; \
else \
test -f "$(distdir)/$$file" \
|| cp -p $$d/$$file "$(distdir)/$$file" \
|| exit 1; \
fi; \
done
check-am: all-am
check: check-am
all-am: Makefile
installdirs:
install: install-am
install-exec: install-exec-am
install-data: install-data-am
uninstall: uninstall-am
install-am: all-am
@$(MAKE) $(AM_MAKEFLAGS) install-exec-am install-data-am
installcheck: installcheck-am
install-strip:
if test -z '$(STRIP)'; then \
$(MAKE) $(AM_MAKEFLAGS) INSTALL_PROGRAM="$(INSTALL_STRIP_PROGRAM)" \
install_sh_PROGRAM="$(INSTALL_STRIP_PROGRAM)" INSTALL_STRIP_FLAG=-s \
install; \
else \
$(MAKE) $(AM_MAKEFLAGS) INSTALL_PROGRAM="$(INSTALL_STRIP_PROGRAM)" \
install_sh_PROGRAM="$(INSTALL_STRIP_PROGRAM)" INSTALL_STRIP_FLAG=-s \
"INSTALL_PROGRAM_ENV=STRIPPROG='$(STRIP)'" install; \
fi
mostlyclean-generic:
clean-generic:
distclean-generic:
-test -z "$(CONFIG_CLEAN_FILES)" || rm -f $(CONFIG_CLEAN_FILES)
-test . = "$(srcdir)" || test -z "$(CONFIG_CLEAN_VPATH_FILES)" || rm -f $(CONFIG_CLEAN_VPATH_FILES)
maintainer-clean-generic:
@echo "This command is intended for maintainers to use"
@echo "it deletes files that may require special tools to rebuild."
clean: clean-am
clean-am: clean-generic clean-libtool mostlyclean-am
distclean: distclean-am
-rm -f Makefile
distclean-am: clean-am distclean-generic
dvi: dvi-am
dvi-am:
html: html-am
html-am:
info: info-am
info-am:
install-data-am:
install-dvi: install-dvi-am
install-dvi-am:
install-exec-am:
install-html: install-html-am
install-html-am:
install-info: install-info-am
install-info-am:
install-man:
install-pdf: install-pdf-am
install-pdf-am:
install-ps: install-ps-am
install-ps-am:
installcheck-am:
maintainer-clean: maintainer-clean-am
-rm -f Makefile
maintainer-clean-am: distclean-am maintainer-clean-generic
mostlyclean: mostlyclean-am
mostlyclean-am: mostlyclean-generic mostlyclean-libtool
pdf: pdf-am
pdf-am:
ps: ps-am
ps-am:
uninstall-am:
.MAKE: install-am install-strip
.PHONY: all all-am check check-am clean clean-generic clean-libtool \
cscopelist-am ctags-am distclean distclean-generic \
distclean-libtool distdir dvi dvi-am html html-am info info-am \
install install-am install-data install-data-am install-dvi \
install-dvi-am install-exec install-exec-am install-html \
install-html-am install-info install-info-am install-man \
install-pdf install-pdf-am install-ps install-ps-am \
install-strip installcheck installcheck-am installdirs \
maintainer-clean maintainer-clean-generic mostlyclean \
mostlyclean-generic mostlyclean-libtool pdf pdf-am ps ps-am \
tags-am uninstall uninstall-am
# Tell versions [3.59,3.63) of GNU make to not export all variables.
# Otherwise a system limit (for SysV at least) may be exceeded.
.NOEXPORT:
iprutils-2.4.18.1/spec/iprutils.spec 0000664 0001750 0001751 00000105056 13474264325 014246 0000000 0000000 Summary: Utilities for the IBM Power Linux RAID adapters
Name: iprutils
Version: 2.4.18
# For RC releases, release_prefix should be set to 0.rc1, 0.rc2, etc.
# For GA releases, release_prefix should be set to 1, 2, 3, etc.
%define release_prefix 1
Release: %{release_prefix}
License: CPL
Group: System Environment/Base
Vendor: IBM
URL: http://sourceforge.net/projects/iprdd/
Source0: iprutils-%{version}.%{release_prefix}.tar.gz
BuildRoot: %{_tmppath}/%{name}-root
BuildRequires: ncurses-devel zlib-devel
# Predicate whether we want to build -static package.
%bcond_with static
##
## Distro specific dependencies.
##
## SUSE
%if 0%{?suse_version}
%if 0%{?suse_version} >= 1210
BuildRequires: systemd-rpm-macros systemd
%{?systemd_requires}
%endif
%if %{?suse_version:1} < 1210
Requires(pre): %insserv_prereq %fillup_prereq
%endif
%endif #SUSE
##RHEL
%if 0%{?rhel}
%if 0%{rhel} >= 7
BuildRequires: systemd
%endif
%if 0%{?rhel} <= 6
Requires(post): /lib/lsb/init-functions, chkconfig, initscripts
Requires(preun): /lib/lsb/init-functions, chkconfig, initscripts
Requires(postun): /lib/lsb/init-functions, chkconfig, initscripts
%endif
# Rhel uses sosreport plugin.
BuildRequires: python python-devel
Requires: python
%endif # RHEL
%if "%{?dist}" == "pkvm3_1"
BuildRequires: systemd
%endif
#
# Compilation parameters.
%{?rhel:%define WITH_SOSREPORT 1}
%{?_unitdir:%define WITH_SYSTEMD 1}
%{!?_unitdir:%define WITH_INITD 1}
%{?with static:%define WITH_STATIC 1}
%description
Provides a suite of utilities to manage and configure SCSI devices
supported by the ipr SCSI storage device driver.
##
## -static package
##
%if 0%{?WITH_STATIC:1}
%package static
Summary: Static version of iprutils.
Group: System Environment/Base
%if 0%{?suse_version:1}
BuildRequires: glibc-static zlib-static
%else
BuildRequires: glibc-static ncurses-static zlib-static
%endif
%description static
Static version of some tools of iprutils.
%endif # with_static
##
## prep
##
%prep
%setup -q -n %{name}-%{version}.%{release_prefix}
##
## build
##
%build
%configure --sbindir=%{_sbindir} --libdir=%{_libdir} \
--enable-sosreport=%{?WITH_SOSREPORT:yes}%{!?WITH_SOSREPORT:no} \
--enable-build-static=%{?WITH_STATIC:yes}%{!?WITH_STATIC:no} \
--with-initscripts=%{?WITH_INITD:%{_initrddir}}%{!?WITH_INITD:no} \
--with-systemd=%{?WITH_SYSTEMD:%{_unitdir}}%{!?WITH_SYSTEMD:no}
%{__make} %{?_smp_mflags}
##
## install
##
%install
%{__make} DESTDIR=%{buildroot} install
%if 0%{?suse_version}
%{__mkdir} -p %{buildroot}/usr/lib/supportconfig/plugins
%{__cp} %{buildroot}/%{_sbindir}/iprsos %{buildroot}/usr/lib/supportconfig/plugins
%endif
##
## post
##
%post
%if 0%{?suse_version}
# SLES > 12
%if 0%{?suse_version} >= 1210
%service_add_post iprinit.service
%service_add_post iprupdate.service
%service_add_post iprdump.service
%endif
# SLES <= 11
%if 0%{!?_unitdir:1}
%fillup_and_insserv -f -Y iprinit
%fillup_and_insserv -f -Y iprupdate
%fillup_and_insserv -f -Y iprdump
%endif
%endif #SUSE
%if 0%{?rhel}
%if 0%{!?_unitdir:1} && 0%{?rhel}
/sbin/chkconfig --add iprinit
/sbin/chkconfig --add iprupdate
/sbin/chkconfig --add iprdump
%endif
%endif #RHEL
# Start daemons.
%if 0%{?_unitdir:1}%{!?_unitdir:0}
if [ -d /sys/module/ipr ] ; then
/usr/bin/systemctl start iprutils.target || :
fi
%else
service iprinit start || :
service iprupdate start || :
service iprdump start || :
%endif
##
## preun
##
%preun
%if 0%{?suse_version}
# SLES > 12
%if 0%{?suse_version} >= 1210
%service_del_preun iprinit.service
%service_del_preun iprupdate.service
%service_del_preun iprdump.service
%endif
# SLES <= 11
%if 0%{!?_unitdir:1}
%stop_on_removal iprinit
%stop_on_removal iprupdate
%stop_on_removal iprdump
%endif
%endif #SUSE
# RHEL
%if 0%{?rhel}
%if 0%{?rhel} >= 7
%systemd_preun iprinit.service
%systemd_preun iprupdate.service
%systemd_preun iprdump.service
%endif
# RHEL <= 6
%if 0%{!?_unitdir:1}
if [ $1 -eq 0 ] ; then
/sbin/service iprinit stop >/dev/null 2>&1
/sbin/service iprupdate stop >/dev/null 2>&1
/sbin/service iprdump stop >/dev/null 2>&1
/sbin/chkconfig --del iprinit
/sbin/chkconfig --del iprupdate
/sbin/chkconfig --del iprdump
fi
%endif
%endif # RHEL
%if "%{?dist}" == "pkvm3_1"
%systemd_preun iprinit.service
%systemd_preun iprupdate.service
%systemd_preun iprdump.service
%endif
##
## postun
##
%postun
# SLES > 12
%if 0%{?suse_version} >= 1210
%service_del_postun iprinit.service
%service_del_postun iprupdate.service
%service_del_postun iprdump.service
%endif
# SLES <= 11
%if 0%{?suse_version}
%if 0%{!?_unitdir:1}
%restart_on_update iprinit
%restart_on_update iprupdate
%restart_on_update iprdump
%insserv_cleanup
%endif
%endif # SUSE
# RHEL
%if 0%{?rhel}
%if 0%{?rhel} >= 7
%systemd_postun_with_restart iprinit.service
%systemd_postun_with_restart iprupdate.service
%systemd_postun_with_restart iprdump.service
%endif
# RHEL <= 6
%if 0%{!?_unitdir:1}
if [ "$1" -ge "1" ] ; then
/sbin/service iprinit condrestart >/dev/null 2>&1 || :
/sbin/service iprupdate condrestart >/dev/null 2>&1 || :
/sbin/service iprdump condrestart >/dev/null 2>&1 || :
fi
%endif
%endif #RHEL
%if "%{?dist}" == "pkvm3_1"
%systemd_postun iprinit.service
%systemd_postun iprupdate.service
%systemd_postun iprdump.service
%endif
##
## files
##
%files
%defattr(-,root,root)
%{_sbindir}/iprconfig
%{_sbindir}/iprdump
%{_sbindir}/iprupdate
%{_sbindir}/iprinit
%{_sbindir}/iprdbg
%{_sbindir}/iprsos
%if 0%{?rhel}
%{python_sitelib}/sos/plugins/*
%endif
%if 0%{?suse_version}
/usr/lib/supportconfig
/usr/lib/supportconfig/plugins
/usr/lib/supportconfig/plugins/iprsos
%endif
%{_mandir}/man8/*
%{_sysconfdir}/ha.d
%{_sysconfdir}/ha.d/resource.d
%{_sysconfdir}/ha.d/resource.d/iprha
%{_sysconfdir}/bash_completion.d/*
%if 0%{?_unitdir:1}%{!?_unitdir:0}
%{_unitdir}/iprinit.service
%{_unitdir}/iprupdate.service
%{_unitdir}/iprdump.service
%{_unitdir}/iprutils.target
%{_usr}/lib/udev/rules.d/90-iprutils.rules
%else
%{_initrddir}/iprinit
%{_initrddir}/iprupdate
%{_initrddir}/iprdump
%endif # WITH_SYSTEMD
%if 0%{?WITH_STATIC}
%files static
%defattr(-,root,root)
%{_sbindir}/iprconfig-static
%endif #WITH_STATIC
%changelog
* Fri May 31 2019 Brian King 2.4.18
- Fix format for RAID hang
- Fix driver unbind on format
* Fri Oct 26 2018 Brian King 2.4.17
- Additional speedup for show-details
- Utilize udev rules for systemd daemon activation
- Miscellaneous build fixes
* Tue May 1 2018 Brian King 2.4.16
- Speedup for show-details
- Improve error messages when creating the arrays with RI and non-RI disks
- Fix download microcode to all devices
- Fix microcode image sorting on little endian systems
* Mon Jun 19 2017 Brian King 2.4.15
- Released iprutils 2.4.15
- Enable write cache policy for JBODs
- Fix data direction for some SG_IO ioctls
- improve README documentation
- Display RAID migration status
- Add reserved bits in page 2 of ses device
* Tue Oct 25 2016 Brian King 2.4.14
- Released iprutils 2.4.14
* Wed Oct 19 2016 Brian King
- Remove sleeps from iprconfig initialization
- Filter out JBOD HDDs from the device statistics menu
* Wed Oct 05 2016 Brian King
- Allow VSET write cache in bare metal mode
* Tue Oct 04 2016 Brian King
- Fix raid-create on dual adapter setups
- Wait for sg module
- Disable rebuild verify by default for single adapter configurations
- Remove stale debug printf
- Vset cache enable fixes
- Backwards compatibility for endian swapped device_id
- Fix iprconfig dump option to log full IOA details
* Tue Aug 16 2016 Brian King 2.4.13
- Additional fixes for tracking known zeroed state
* Thu Aug 04 2016 Brian King 2.4.12
- Display higher link rates in path details
- Flush unused multipaths prior to array delete
- Collect additional logs with iprsos
- Display sr device name
- Fix format timeout issue on little endian systems
- Format timeout and format block size fixes
- Remove unnecessary iprconfig prompt on exit
- Save known zeroed state for command line format
- Fix find_multipath_jbod to never return itself
- Ensure device known zeroed state gets saved after format
- Fix for hotplug disk with Slider drawers
* Wed Apr 06 2016 Brian King 2.4.11
- Miscellaneous fixes, code cleanups, build infrastructure cleanup
- Support for new disk enclosures
- Add maximum queue depth in GUI when creating an array
- Remove system calls from log viewing commands
- Show RAID initialization state during T10-DIF initialization
* Tue Jan 19 2016 Brian King 2.4.10
- Released iprutils 2.4.10
* Wed Jan 13 2016 Gabriel Krisman Bertazi
- Add Device Statistics menu to ncurses interface
* Mon Jan 11 2016 Gabriel Krisman Bertazi
- Fix RAID Migration failure on Little Endian systems
* Wed Dec 02 2015 Gabriel Krisman Bertazi
- Implement ssd_report command to display SSD usage statistics
* Wed Dec 02 2015 Heitor Ricardo Alves de Siqueira
- Implement ipr dump formatting tool
* Wed Nov 04 2015 Gabriel Krisman Bertazi
- Add a command to update all devices to the latst microcode levels.
* Mon Oct 26 2015 Brian King 2.4.9
* Mon Oct 26 2015 Gabriel Krisman Bertazi
- Add support for sync cache managed array write cache on supported adapters
* Tue Sep 1 2015 Daniel Kreling
- Add supportconfig plugin
* Fri Aug 21 2015 Gabriel Krisman Bertazi
- Misc build cleanups and fixes
- Microcode download UI enhancements
- Add new show-ucode-levels to list all microcode levels for all ipr devices
* Mon Jul 6 2015 Guilherme G. Piccoli
- Add support to change rebuild rate from ncurses
* Fri Jun 19 2015 Brian King 2.4.8
- Add RAID creation warnings when creating arrays with non zeroed disks
- Add bash smart completion
- Misc build fixes
- Add support for optional static linking of iprconfig
- Add device write cache attribute in iprconfig for JBOD disks
* Wed May 6 2015 Brian King 2.4.7
- Add iprutils plugin for sosreport
- Fix to ensure daemons are enabled by default
- Add new set-write-cache-policy and query-write-cache-policy
CLI commands for JBOD devices to enable drive write cache
- Add CLI support for configurable rebuild rate
- Add support to speed up array rebuilds
- Misc fixes
* Fri Mar 13 2015 Brian King 2.4.6
- Build with autotools
- Fix bug causing iprutils daemons to die
- Add easy tier prerequisite checking
- Fixup FRU and PN swap in iprconfig
- Add dump iprconfig CLI command, including a sosreport plugin
- Improve device attribute binding algorithm for new adapters
- Misc fixes
* Fri Nov 7 2014 Wen Xiong 2.4.5
- Raid migration fails on LE systems
- Set known zeroed after format
* Mon Sep 8 2014 Wen Xiong 2.4.4
- Add support to catch cache hit
- Change the filesnameof firmware to be case insentive.
* Tue Sep 2 2014 Wen Xiong 2.4.3
- On PowerNV, some of IOAs showed the wrong physical location
- Read Intensive SDs are not showed up in iprconifg
- Capacity is not reported for JBOD disk greater than 2TB
- Add code for supporting DVD/Tape hotplug
- allow systemd dameons to be activated laster during boot
- add DVD/Tape support in dispaly hardware staut menu
* Tue Jun 10 2014 Wen Xiong 2.4.2
- Creation of systemd files for the ipr daemons and proper changes on the spec
file
- Adds three new CLI APIs: query-array/device/location
- Doesn't show "Redusant Paths" in dual config
- Couldn't create iprudmp file
- allow iprconfig to load sg module
- Segmentation fault when rebuild an array
- Fix blan space on array member strings
* Tue Apr 08 2014 Wen Xiong 2.4.1
- Release 2.4.1
- Avoid bashisms
- remove libpci dependency
- Failed to write attribute: delte when hot removing disks
- segment fault when trying to show details of missing devices
* Fri Feb 07 2014 Wen Xiong 2.4.0
- Release 2.4.0
- Eliminate libsysfs dependency
* Fri Feb 07 2014 Wen Xiong 2.3.18
- Release 2.3.18
- array start enhancement patch
- compliation fails on ununtu
* Sat Feb 01 2014 Wen Xiong 2.3.17
- Release 2.3.17
- creating an array fails for T2 disks.
- Several fixes for LE system.
- Enable actie/active by default
* Tue Nov 05 2013 Wen Xiong 2.3.16
- Release 2.3.16
- Fixes a bug for 4K bytes/sector disks in iprutils
- Fixes a bug for disk hot swap in VSES on P8
- Release 2.3.15
- Add support for 4K bytes/sector disks in iprutils
- Release 2.3.14
- Fixes stale information after hot plug a disk into an array
- Segmentation fault when removing a disk with hot spare disk
- Fxied sysfs error when updating microcode
- Fixes the platform location issue for Tres drawer
- Fix hop count defines
- Release 2.3.13
- Fixes Platform Location for 32bit adapter.
- Adds support for optical devices.
- Fixes platform location for disks.
- Changes %post and %preun sections of spec file.
- Fixes release date on the spec file.
* Wed Sep 05 2012 Wen Xiong 2.3.12
- Release 2.3.12
- Addes supporting suspend/resume utility for BlueHawk.
- Fixes raid array delete error.
* Tue Jun 12 2012 Kleber Sacilotto de Souza 2.3.11
- Release 2.3.11
- Fixes deleting an array logs I/O errors.
- Fixes buffer overflow in disk details.
- Fixes wrong status on an array for the secondary controller.
- Fixes add_string_to_body() for non-interactive interface.
- Fixes IOA asymmetric access mode change.
- Gets location code when SES page 4 is unavailable.
- Fixes physical location error if disk is vses disk.
* Mon Apr 02 2012 Kleber Sacilotto de Souza 2.3.10
- Release 2.3.10
- Displays Hardware Location Code for disk/expander.
- Changes concurrent maintenance GUI to 3 ways toggle.
- Changes README for concurrent maintenance command line.
- Adds structures and functions for query resource paths aliases.
- Fixes a bug in suspend/resume device bus.
- Supports concurrent maintenance for 64bit adapter.
- Supports not physical remove disk.
- Fixes header problem when query-remove/add-device.
- Sometimes receive diag failed at first time after update adapter firmware.
- If the disk in a RAID, iprutils itself has to delete sysfs name for secondary
adapter.
- Old drawers don't support query page 4 for physical location.
- Adds display sas path detail for 64bit adapter.
- Fixes GUI version of raid consistency check.
- Adds new chip details entries.
- Fixes SES microcode update failures.
- Fixes SES microcode image version on CLI.
- Adds a flag to raid create command for known zeroed drives.
* Fri Dec 16 2011 Kleber Sacilotto de Souza 2.3.9
- Release 2.3.9
- Fixes disks and arrays status.
- Uses C4 inquiry page for DRAM size.
- Sets allow_restart to zero before raid delete.
- Fixes raid consistency check for 64 bit adapters.
- Fixes compile warning.
- Updates queue depth values.
* Thu Nov 24 2011 Kleber Sacilotto de Souza 2.3.8
- Release 2.3.8
- Adds support for FPGA updates.
- Bumps up number of command status records.
- Only uses primary adapter for initialize and format disk task.
- Fixes check for hotspare devices.
- Removes unnecessary call to find_dev().
* Thu Aug 18 2011 Kleber Sacilotto de Souza 2.3.7
- Release 2.3.7
- Adds support for vset device asymmetric config.
- Fixes display details for array devices.
- Increases buffer size for new adapter config data.
- Fixes query command status functionality.
* Thu Jul 14 2011 Kleber Sacilotto de Souza 2.3.6
- Release 2.3.6
- Fixes segmentation fault when qac is not available.
- Fixes serial number comparison.
* Thu Jun 16 2011 Kleber Sacilotto de Souza 2.3.5
- Release 2.3.5
- Fixes suspend and resume device bus commands.
* Wed Apr 27 2011 Kleber Sacilotto de Souza 2.3.4
- Release 2.3.4
- Fixes data types for C4 page definition.
- Fixes setting qac cdb[3] and rename ipr_is_array_record.
- Fixes array migration funcionality.
- Increases maximum dump size.
* Mon Mar 07 2011 Wayne Boyer 2.3.3
- Release 2.3.3
- Adds initial support for sis64 asymmetric access changes.
- Fixes segmentation faults when trying to display certain information.
- Fixes some file permissions and a compilation warning.
* Thu Nov 18 2010 Kleber Sacilotto de Souza 2.3.2
- Release 2.3.2
- Fixes code incompatibility with libsysfs version 1.
- Changes get_scsi_max_xfer_len return value.
* Fri Nov 12 2010 Kleber Sacilotto de Souza 2.3.1
- Release 2.3.1
- Fixes display of empty slots.
- Fixes IOA description indentation.
- Adds Resource Path display for SIS64 devices.
- Adds support for the new live dump functionality.
- Fixes mode sense page24 for little endian architectures.
- Fixes battery info for little endian architectures.
* Thu Aug 12 2010 Kleber Sacilotto de Souza 2.3.0
- Release 2.3.0
- Fixes type of pointers provided to scandir.
- Fixes buffer overflow when the SCSI Host ID is equal or greater than 1000.
- Fixes function names on comments in iprlib.c.
- Fixes memory leak when ioctl() returns EINVAL.
- Adds support to identify sis64 capability.
- Adds support for new sysfs attributes.
- Adds support for type 3 QAC command.
- Adds support for type 3 records.
* Mon May 10 2010 Kleber Sacilotto de Souza 2.2.21
- Release 2.2.21
- Fixes firmware image files left open after getting firmware level.
- Changes IOA DRAM size display from hex to decimal base.
- Handles SG_IO ioctl error with older distros which caused disk microcode
download to fail with JBOD's.
* Wed Apr 07 2010 Kleber Sacilotto de Souza 2.2.20
- Release 2.2.20
- Adds resource address parsing based on encoding format flag.
* Fri Mar 19 2010 Kleber Sacilotto de Souza 2.2.19
- Release 2.2.19
- Fixes platform location display on blades.
* Fri Oct 30 2009 Kleber Sacilotto de Souza 2.2.18
- Release 2.2.18
- Changes the default write buffer mode for writing to SES devices.
- Fixes the CLI show-details command for SES devices.
- Comments out the get_write_buffer_dev() routine to suppress compilation
warnings as it is not being used at the moment.
- Fixes the Platform Location Information display for hotplug adapters and
displays the information for non-hotplug adapters.
- Fixes the indentation problem when IOA host number is equal to or greater
than 10.
* Wed Sep 16 2009 Wayne Boyer 2.2.17
- Release 2.2.17
- Fixes a NULL pointer dereference which caused the daemons to silently fail.
* Fri Aug 14 2009 Wayne Boyer 2.2.16
- Release 2.2.16
- Fixes a bug where CLI raid create is broken.
- Fixes several potential memory leak problems.
- Adds man page entries for the disable cache query and command.
* Tue Jun 30 2009 Wayne Boyer 2.2.15
- Release 2.2.15
- Fixes a bug where cache reclaim can time out too soon.
- Fixes some problems with the disable caching support.
* Tue Apr 07 2009 Wayne Boyer 2.2.14
- Release 2.2.14
- Add support for disabling IOA caching.
- Remove #include of as it is not used.
- Allow giving a relative path for a microcode image file when doing an upgrade
from the command line.
- Add support for SSD drives.
* Mon Nov 17 2008 Wayne Boyer 2.2.13
- Release 2.2.13
- Additional fixes for the active-active functionality.
- Fixes for iprdump to recognize a /sys/devices path.
* Thu Oct 23 2008 Wayne Boyer 2.2.12
- Release 2.2.12
- Additional GUI support and fixes for the active-active functionality.
- Fixes for CLI RAID create and delete.
* Fri Sep 26 2008 Wayne Boyer 2.2.11
- Release 2.2.11
- Add support for the active-active functionality.
* Wed Aug 20 2008 Wayne Boyer
- Fixed a compilation failure on small endian systems.
* Wed Aug 13 2008 Wayne Boyer 2.2.10
- Release 2.2.10
- Add support for the array migration functionality.
* Wed May 14 2008 Tseng-Hui Lin
- Under heavy traffic, download microcode to a disk through /dev/sgX
may get -ENOMEM SG_IO ioctl. Change to use /dev/sdX. Fall back
to /dev/sgX if: (1) /dev/sdX does not exist or (2) max_sectors_kb
is not set large enough for microcode download.
* Wed Apr 09 2008 Tseng-Hui Lin 2.2.9
- Release 2.2.9
- Do not save preferred primary attribute to fix an infinite failover
problem in HA two system RAID configuration.
* Thu Sep 20 2007 Brian King 2.2.8
- Release 2.2.8
* Mon Aug 27 2007 Brian King
- Add support for setting dual adapter HA mode.
* Thu Jun 21 2007 Brian King 2.2.7
- Fixes for init.d scripts to fix problems installing them on
some systems.
* Wed Jun 13 2007 Brian King
- rpm spec file updates
* Tue May 1 2007 Brian King 2.2.6
- Fix iprinit dual initiator failover device rescanning code.
* Wed Apr 25 2007 Brian King
- Add iprha init.d script to enable/disable primary adapter mode
for dual initiator configs.
* Fri Apr 13 2007 Brian King
- Add adapter config option in iprconfig for setting primary/secondary
adapter in dual adapter environment.
* Mon Mar 19 2007 Brian King
- Add iprconfig option to display SAS dual pathing information.
* Mon Mar 12 2007 Brian King
- Increase time waiting for new devices to show up in
iprconfig when doing concurrent add.
* Fri Feb 9 2007 Brian King
- Add filename date to microcode download screen. (Ryan Hong)
- Fix to prevent unnecessarily writing sysfs attributes. (Ryan Hong)
* Tue Feb 6 2007 Brian King
- Return standard error code according to send_dev_init() return code.
* Mon Feb 5 2007 Brian King
- Fix incorrect memory free in analyze log menus.
* Wed Jan 10 2007 Brian King
- Fix send diagnostics buffer transfer length to be only what was
received in the receive diagnostics. Fixes disk hotplug on
some SAS disk enclosures.
* Thu Jan 4 2007 Brian King
- Sourceforge patch 1627673: iprutils fix to buffer overflow
- Add checking to iprconfig command "set-qdepth" input queue
depth value. If the given value is larger than 255, fail the command.
- Fix a bug in which the iprconfig command "raid-create"
may create an illegal queue depth value to the ipr
config file.
* Thu Jan 4 2007 Brian King
- Sourceforge patch 1627672: iprutils fix to buffer overflow
- Fix a bug in which the iprconfig command "raid-create"
may create an illegal queue depth value to the ipr
config file.
* Wed Nov 29 2006 Brian King
- Fixes for SES microcode download on SAS.
* Mon Nov 20 2006 Brian King
- Change to handle UA responses in the JBOD iprinit sequence.
* Thu Nov 16 2006 Brian King
- Fix segfault in iprconfig if /var/log does not exist.
- Allow IOA microcode download to a secondary IOA.
- Fix to prevent errors during SAS SES microcode download.
* Tue Oct 10 2006 Brian King
- Add a couple utility functions for SAS
ipr_query_sas_expander_info
ipr_query_res_redundancy_info
* Wed Sep 27 2006 Brian King 2.2.3
- Fix SAS disk hotplug dual path bug.
* Tue Sep 12 2006 Brian King
- Change default QERR setting for SAS to 0.
* Tue Sep 12 2006 Brian King 2.2.2
- Fix iprconfig set-format-timeout.
* Mon Sep 11 2006 Brian King 2.2.1
* Fri Sep 8 2006 Brian King
- Reduce default JBOD queue depth to 3.
- Fix iprconfig -c set-bus-speed.
* Wed Aug 23 2006 Brian King
- Fix a race condition with hotplug events which could
cause the ipr daemons to run before newly added devices
are completed added to the system.
* Wed Aug 9 2006 Brian King
- Fix a segfault in iprdbg when using the macro function
* Tue Jul 25 2006 Brian King 2.2.0
- Fix for command line SES microcode update.
* Mon May 8 2006 Brian King
- Use IOA's default format timeout for AF DASD instead
of using a hard coded default.
- Remove RAID support for some older drives that should never
have been supported.
* Mon May 1 2006 Brian King
- Add support to iprinit for it to handle disks going
from JBOD <-> AF format across an adapter reset. When this
is detected, iprinit will now attempt to delete the disk
and then rescan that slot.
- Fixed an ncurses screen drawing bug which resulted in the
screen getting paged down if the cursor was on the last item
on the screen and 't' was pressed to toggle the display.
- Added disk concurrent maintenance support for handling
dual pathed SAS disks.
* Fri Mar 17 2006 Brian King
- Improve iprdbg's logging
* Thu Mar 16 2006 Brian King
- Print better status for devices when IOA is offline/dead.
* Tue Mar 14 2006 Brian King
- Fix to allow for compiling with libsysfs 2.0.0
* Tue Mar 14 2006 Brian King 2.1.4
- Concurrent maintenance fix for certain iSeries
enclosures which would result in non existent
drive slots being displayed in iprconfig.
* Wed Mar 8 2006 Brian King
- Remove some redundant code in disk hotplug path
* Thu Mar 2 2006 Brian King
- Fixup status of RAID 10 arrays to print a better status
under multiple failure scenarios.
* Fri Feb 24 2006 Brian King 2.1.3
- Prevent duplicate mode sense commands from being issued.
- More uevent handling improvements.
- Automatically create hotplug directory if it doesn't
already exist so adapter microcode update works.
* Thu Feb 9 2006 Brian King
- Improve robustness of uevents failure handling. Fall
back to polling method if needed.
* Fri Feb 3 2006 Brian King
- Auxiliary cache adapter fixes.
* Fri Jan 27 2006 Brian King
- Fix iprconfig -c update-ucode to properly report an
error if the wrong microcode level is specified.
* Mon Jan 23 2006 Brian King
- Fixed a compiler issue.
* Fri Jan 20 2006 Brian King
- Fixed a bug in iprconfig query-raid-create that prevented
JBOD candidates from being displayed if there were no
AF candidates as well.
* Thu Jan 5 2006 Brian King 2.1.2
- Make iprupdate return success/failure indication
when invoked with --force.
* Tue Jan 3 2006 Brian King
- Concurrent maintenance fix for 7031-D24/T24.
* Tue Dec 20 2005 Brian King 2.1.1
- Fix compile error in iprconfig
* Sun Dec 18 2005 Brian King 2.1.0
- Updates for aux cache IOAs
- Updates for SAS adapters
- Misc fixes for new iprconfig command line options
* Wed Dec 7 2005 Brian King
- Add command line options to iprconfig to perform virtually
every iprconfig function available in the ncurses interface.
* Tue Nov 15 2005 Brian King 2.0.15.6
- Fix concurrent maintenance with disk drawers reporting
multiple SES devices on the same SCSI bus.
* Fri Oct 7 2005 Anton Blanchard
- Fix string length calculation in ipr_get_hotplug_dir
* Wed Aug 17 2005 Brian King 2.0.15.4
- Fix a couple of uninitialized variable compile errors
* Wed Jul 27 2005 Brian King 2.0.15.3
- Fix: iprconfig: IOA microcode update would leave AF DASD
(disks that are in disk arrays) in a state where they were
no longer tagged queueing. Fix iprconfig to run iprinit on the
adapter after a microcode download to ensure all attached devices
are properly setup after a microcode download.
- Fix iprinit: If an IOA was reset for some reason at runtime,
this would cause AF DASD devices to get tagged queueing turned
off and it would never get turned back on. Change iprinit to
detect this and turn tagged queueing back on if this happens.
- Changing the queue depth for a disk array was broken. Fix iprinit
to properly restore the queue depth from the ipr configuration file.
- Fix iprconfig to handle disk format failures better
- Fix potential iprutils segfaults when iterating over disk arrays
* Wed Jun 1 2005 Brian King 2.0.15.1
- Fix iprconfig Analyze Log options
* Wed May 18 2005 Brian King 2.0.15
- Clarify format options
- Setup mode page 0 for IBM drives to ensure command aging is
enabled. This ensures commands are not starved on some drives.
- Fix so that iprdump properly names dump files once 100 dumps
have been made.
- Make iprconfig handle failures of scsi disk formats better
- Fix iprconfig Set root kernel message log directory menu
- Properly display RAID level on all iprconfig screens
- Don't disable init.d daemons on an rpm -U
* Tue Apr 12 2005 Brian King 2.0.14.2
- Fixed bug preventing disk microcode update from working.
* Mon Apr 4 2005 Brian King
- Add ability to force RAID consistency check
* Fri Mar 25 2005 Brian King 2.0.14.1
- Removed mention of primary/secondary adapters in some error
screens since multi-initiator RAID is not supported and the
messages will just cause confusion.
* Thu Mar 24 2005 Brian King
- iprconfig: During disk hotplug, wait for sd devices to show
up. Fixes errors getting logged by iprconfig during hotplug.
* Wed Mar 23 2005 Brian King
- iprconfig: Fix cancel path on concurrent add/remove of disks
- Don't display current bus width and speed for SAS disks
* Mon Mar 21 2005 Brian King
- Fix scoping bug caught by gcc 4.0.
* Fri Mar 18 2005 Brian King
- Stop iprupdate from continually logging errors for adapters with
backlevel adapter firmware.
* Mon Mar 7 2005 Brian King 2.0.14
- Add support for non-interactive array creation and deletion through
iprconfig.
- Use kobject_uevent notifications instead of polling if the kernel
supports it.
- Fix iprconfig to set the actual queue depth for advanced function disks
- Allow user to force tagged queuing on to drives that do not support
QERR=1.
- Fix handling of medium format corrupt drives for drives
- iprconfig: Download microcode. Fix blank screen when displaying
lots of microcode images.
- Fix iprinit to wait for scsi generic devices to show up in case we are
racing with hotplug. Fixes the following error:
0:255:0:0: Mode Sense failed. rc=1, SK: 5 ASC: 24 ASCQ: 0
- Add "known to be zeroed" tracking to iprconfig to drastically reduce the
time required to create a RAID array when starting with 512 formatted disks
- Add ability to query multi-adapter status for dual initiator RAID configs
- Add ability to set "preferred primary" adapter when running dual initiator RAID configs
- Add iprconfig screen to display dual adapter status for dual initiator RAID configs
- Prevent RAID configuration from occurring on "secondary" adapter in dual initiator RAID configs
- Use /dev/sd for SG_IO instead of /dev/sg when possible
- Set QERR=3 rather than 1 for multi-initiator configurations
- Set TST=1 for multi-initiator configurations
- Allow Format device for JBOD function to work for JBOD adapters
- Fix handling of dead adapters in all of iprutils.
- Fix iprconfig RAID start bug for systems with multiple RAID adapters.
- Fix iprconfig RAID include bug for systems with multiple RAID adapters.
- Fix failing array add device due to race condition with iprinit.
* Tue Oct 5 2004 Brian King 2.0.13
- Improve iprupdate error logs to indicate where to download microcode from.
- Set default tcq queue depth for AS400 disks to 16.
- Don't log errors in iprdump if CONFIG_IPR_DUMP not enabled in the kernel
- Fix sysfs parsing to handle new sdev target kernel change
- Rescan JBOD devices following recovery format to make the device usable if
it was originally in an unsupported sector size.
- Display correct adapter serial number in iprconfig.
- Support for microcode download to new adapters.
- Support for iSeries disk microcode update using microcode images from
the pSeries microcode website.
* Fri Jun 11 2004 Brian King 2.0.12
- Fix bug preventing ucode download to iSeries disks from working
* Thu Jun 10 2004 Brian King 2.0.11
- Fix segmentation fault in _sg_ioctl that was causing a silent
failure of microcode update to disks. The microcode update would
fail, but no error would be logged. The seg fault was in a child
process, so the parent process kept running.
* Sun May 23 2004 Brian King 2.0.10
- Don't let iprdbg sg ioctls be retried.
- Add --force flag to iprconfig to allow user to workaround buggy
drive firmware.
- Don't initialize read/write protected disks
- Fix some reclaim cache bugs
- Don't setup Mode Page 0x0A if test unit ready fails
* Sun May 2 2004 Brian King 2.0.9
- Add --debug option to all utilities
- Make utilities behave better when ipr is not loaded
- Fix dependencies in init.d scripts
- Only enable init.d scripts on ppc
- Don't log an error if ipr is not loaded
* Wed Apr 28 2004 Brian King 2.0.8
- Fix to properly enable init.d scripts when the rpm is installed
- Fix memory leak in code download path
- Increase size of page 0 inquiry buffer so that extended vpd is displayed
- Decrease write buffer timeout to 2 minutes
* Fri Apr 16 2004 Brian King 2.0.7
- Load sg module in init.d scripts if not loaded
- Load sg module in iprconfig if not loaded
* Wed Apr 14 2004 Brian King 2.0.6
- Battery maintenance fixes.
- Fix to properly display failed status for pulled physical disks.
* Tue Apr 6 2004 Brian King 2.0.5
- Battery maintenance fixes.
- Fix init.d scripts to work properly with yast runlevel editor.
- Fix device details screen in iprconfig for Failed array members
- Allow formatting devices even if qerr cannot be disabled
* Mon Mar 29 2004 Brian King 2.0.4
- Fixed some sysfs calls that changed their calling interfaces
* Wed Mar 17 2004 Brian King 2.0.2-3
- Fixed
iprutils-2.4.18.1/spec/Makefile.am 0000664 0001750 0001751 00000000512 13270167731 013537 0000000 0000000 # IBM IPR adapter configuration utility
#
# (C) Copyright 2015
# International Business Machines Corporation and others.
# All Rights Reserved. This program and the accompanying
# materials are made available under the terms of the
# Common Public License v1.0 which accompanies this distribution.
#
#
EXTRA_DIST = iprutils.spec
iprutils-2.4.18.1/ltmain.sh 0000644 0001750 0001751 00001051522 13050350140 012357 0000000 0000000
# libtool (GNU libtool) 2.4.2
# Written by Gordon Matzigkeit , 1996
# Copyright (C) 1996, 1997, 1998, 1999, 2000, 2001, 2003, 2004, 2005, 2006,
# 2007, 2008, 2009, 2010, 2011 Free Software Foundation, Inc.
# This is free software; see the source for copying conditions. There is NO
# warranty; not even for MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
# GNU Libtool is free software; you can redistribute it and/or modify
# it under the terms of the GNU General Public License as published by
# the Free Software Foundation; either version 2 of the License, or
# (at your option) any later version.
#
# As a special exception to the GNU General Public License,
# if you distribute this file as part of a program or library that
# is built using GNU Libtool, you may include this file under the
# same distribution terms that you use for the rest of that program.
#
# GNU Libtool is distributed in the hope that it will be useful, but
# WITHOUT ANY WARRANTY; without even the implied warranty of
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
# General Public License for more details.
#
# You should have received a copy of the GNU General Public License
# along with GNU Libtool; see the file COPYING. If not, a copy
# can be downloaded from http://www.gnu.org/licenses/gpl.html,
# or obtained by writing to the Free Software Foundation, Inc.,
# 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.
# Usage: $progname [OPTION]... [MODE-ARG]...
#
# Provide generalized library-building support services.
#
# --config show all configuration variables
# --debug enable verbose shell tracing
# -n, --dry-run display commands without modifying any files
# --features display basic configuration information and exit
# --mode=MODE use operation mode MODE
# --preserve-dup-deps don't remove duplicate dependency libraries
# --quiet, --silent don't print informational messages
# --no-quiet, --no-silent
# print informational messages (default)
# --no-warn don't display warning messages
# --tag=TAG use configuration variables from tag TAG
# -v, --verbose print more informational messages than default
# --no-verbose don't print the extra informational messages
# --version print version information
# -h, --help, --help-all print short, long, or detailed help message
#
# MODE must be one of the following:
#
# clean remove files from the build directory
# compile compile a source file into a libtool object
# execute automatically set library path, then run a program
# finish complete the installation of libtool libraries
# install install libraries or executables
# link create a library or an executable
# uninstall remove libraries from an installed directory
#
# MODE-ARGS vary depending on the MODE. When passed as first option,
# `--mode=MODE' may be abbreviated as `MODE' or a unique abbreviation of that.
# Try `$progname --help --mode=MODE' for a more detailed description of MODE.
#
# When reporting a bug, please describe a test case to reproduce it and
# include the following information:
#
# host-triplet: $host
# shell: $SHELL
# compiler: $LTCC
# compiler flags: $LTCFLAGS
# linker: $LD (gnu? $with_gnu_ld)
# $progname: (GNU libtool) 2.4.2
# automake: $automake_version
# autoconf: $autoconf_version
#
# Report bugs to .
# GNU libtool home page: .
# General help using GNU software: .
PROGRAM=libtool
PACKAGE=libtool
VERSION=2.4.2
TIMESTAMP=""
package_revision=1.3337
# Be Bourne compatible
if test -n "${ZSH_VERSION+set}" && (emulate sh) >/dev/null 2>&1; then
emulate sh
NULLCMD=:
# Zsh 3.x and 4.x performs word splitting on ${1+"$@"}, which
# is contrary to our usage. Disable this feature.
alias -g '${1+"$@"}'='"$@"'
setopt NO_GLOB_SUBST
else
case `(set -o) 2>/dev/null` in *posix*) set -o posix;; esac
fi
BIN_SH=xpg4; export BIN_SH # for Tru64
DUALCASE=1; export DUALCASE # for MKS sh
# A function that is used when there is no print builtin or printf.
func_fallback_echo ()
{
eval 'cat <<_LTECHO_EOF
$1
_LTECHO_EOF'
}
# NLS nuisances: We save the old values to restore during execute mode.
lt_user_locale=
lt_safe_locale=
for lt_var in LANG LANGUAGE LC_ALL LC_CTYPE LC_COLLATE LC_MESSAGES
do
eval "if test \"\${$lt_var+set}\" = set; then
save_$lt_var=\$$lt_var
$lt_var=C
export $lt_var
lt_user_locale=\"$lt_var=\\\$save_\$lt_var; \$lt_user_locale\"
lt_safe_locale=\"$lt_var=C; \$lt_safe_locale\"
fi"
done
LC_ALL=C
LANGUAGE=C
export LANGUAGE LC_ALL
$lt_unset CDPATH
# Work around backward compatibility issue on IRIX 6.5. On IRIX 6.4+, sh
# is ksh but when the shell is invoked as "sh" and the current value of
# the _XPG environment variable is not equal to 1 (one), the special
# positional parameter $0, within a function call, is the name of the
# function.
progpath="$0"
: ${CP="cp -f"}
test "${ECHO+set}" = set || ECHO=${as_echo-'printf %s\n'}
: ${MAKE="make"}
: ${MKDIR="mkdir"}
: ${MV="mv -f"}
: ${RM="rm -f"}
: ${SHELL="${CONFIG_SHELL-/bin/sh}"}
: ${Xsed="$SED -e 1s/^X//"}
# Global variables:
EXIT_SUCCESS=0
EXIT_FAILURE=1
EXIT_MISMATCH=63 # $? = 63 is used to indicate version mismatch to missing.
EXIT_SKIP=77 # $? = 77 is used to indicate a skipped test to automake.
exit_status=$EXIT_SUCCESS
# Make sure IFS has a sensible default
lt_nl='
'
IFS=" $lt_nl"
dirname="s,/[^/]*$,,"
basename="s,^.*/,,"
# func_dirname file append nondir_replacement
# Compute the dirname of FILE. If nonempty, add APPEND to the result,
# otherwise set result to NONDIR_REPLACEMENT.
func_dirname ()
{
func_dirname_result=`$ECHO "${1}" | $SED "$dirname"`
if test "X$func_dirname_result" = "X${1}"; then
func_dirname_result="${3}"
else
func_dirname_result="$func_dirname_result${2}"
fi
} # func_dirname may be replaced by extended shell implementation
# func_basename file
func_basename ()
{
func_basename_result=`$ECHO "${1}" | $SED "$basename"`
} # func_basename may be replaced by extended shell implementation
# func_dirname_and_basename file append nondir_replacement
# perform func_basename and func_dirname in a single function
# call:
# dirname: Compute the dirname of FILE. If nonempty,
# add APPEND to the result, otherwise set result
# to NONDIR_REPLACEMENT.
# value returned in "$func_dirname_result"
# basename: Compute filename of FILE.
# value retuned in "$func_basename_result"
# Implementation must be kept synchronized with func_dirname
# and func_basename. For efficiency, we do not delegate to
# those functions but instead duplicate the functionality here.
func_dirname_and_basename ()
{
# Extract subdirectory from the argument.
func_dirname_result=`$ECHO "${1}" | $SED -e "$dirname"`
if test "X$func_dirname_result" = "X${1}"; then
func_dirname_result="${3}"
else
func_dirname_result="$func_dirname_result${2}"
fi
func_basename_result=`$ECHO "${1}" | $SED -e "$basename"`
} # func_dirname_and_basename may be replaced by extended shell implementation
# func_stripname prefix suffix name
# strip PREFIX and SUFFIX off of NAME.
# PREFIX and SUFFIX must not contain globbing or regex special
# characters, hashes, percent signs, but SUFFIX may contain a leading
# dot (in which case that matches only a dot).
# func_strip_suffix prefix name
func_stripname ()
{
case ${2} in
.*) func_stripname_result=`$ECHO "${3}" | $SED "s%^${1}%%; s%\\\\${2}\$%%"`;;
*) func_stripname_result=`$ECHO "${3}" | $SED "s%^${1}%%; s%${2}\$%%"`;;
esac
} # func_stripname may be replaced by extended shell implementation
# These SED scripts presuppose an absolute path with a trailing slash.
pathcar='s,^/\([^/]*\).*$,\1,'
pathcdr='s,^/[^/]*,,'
removedotparts=':dotsl
s@/\./@/@g
t dotsl
s,/\.$,/,'
collapseslashes='s@/\{1,\}@/@g'
finalslash='s,/*$,/,'
# func_normal_abspath PATH
# Remove doubled-up and trailing slashes, "." path components,
# and cancel out any ".." path components in PATH after making
# it an absolute path.
# value returned in "$func_normal_abspath_result"
func_normal_abspath ()
{
# Start from root dir and reassemble the path.
func_normal_abspath_result=
func_normal_abspath_tpath=$1
func_normal_abspath_altnamespace=
case $func_normal_abspath_tpath in
"")
# Empty path, that just means $cwd.
func_stripname '' '/' "`pwd`"
func_normal_abspath_result=$func_stripname_result
return
;;
# The next three entries are used to spot a run of precisely
# two leading slashes without using negated character classes;
# we take advantage of case's first-match behaviour.
///*)
# Unusual form of absolute path, do nothing.
;;
//*)
# Not necessarily an ordinary path; POSIX reserves leading '//'
# and for example Cygwin uses it to access remote file shares
# over CIFS/SMB, so we conserve a leading double slash if found.
func_normal_abspath_altnamespace=/
;;
/*)
# Absolute path, do nothing.
;;
*)
# Relative path, prepend $cwd.
func_normal_abspath_tpath=`pwd`/$func_normal_abspath_tpath
;;
esac
# Cancel out all the simple stuff to save iterations. We also want
# the path to end with a slash for ease of parsing, so make sure
# there is one (and only one) here.
func_normal_abspath_tpath=`$ECHO "$func_normal_abspath_tpath" | $SED \
-e "$removedotparts" -e "$collapseslashes" -e "$finalslash"`
while :; do
# Processed it all yet?
if test "$func_normal_abspath_tpath" = / ; then
# If we ascended to the root using ".." the result may be empty now.
if test -z "$func_normal_abspath_result" ; then
func_normal_abspath_result=/
fi
break
fi
func_normal_abspath_tcomponent=`$ECHO "$func_normal_abspath_tpath" | $SED \
-e "$pathcar"`
func_normal_abspath_tpath=`$ECHO "$func_normal_abspath_tpath" | $SED \
-e "$pathcdr"`
# Figure out what to do with it
case $func_normal_abspath_tcomponent in
"")
# Trailing empty path component, ignore it.
;;
..)
# Parent dir; strip last assembled component from result.
func_dirname "$func_normal_abspath_result"
func_normal_abspath_result=$func_dirname_result
;;
*)
# Actual path component, append it.
func_normal_abspath_result=$func_normal_abspath_result/$func_normal_abspath_tcomponent
;;
esac
done
# Restore leading double-slash if one was found on entry.
func_normal_abspath_result=$func_normal_abspath_altnamespace$func_normal_abspath_result
}
# func_relative_path SRCDIR DSTDIR
# generates a relative path from SRCDIR to DSTDIR, with a trailing
# slash if non-empty, suitable for immediately appending a filename
# without needing to append a separator.
# value returned in "$func_relative_path_result"
func_relative_path ()
{
func_relative_path_result=
func_normal_abspath "$1"
func_relative_path_tlibdir=$func_normal_abspath_result
func_normal_abspath "$2"
func_relative_path_tbindir=$func_normal_abspath_result
# Ascend the tree starting from libdir
while :; do
# check if we have found a prefix of bindir
case $func_relative_path_tbindir in
$func_relative_path_tlibdir)
# found an exact match
func_relative_path_tcancelled=
break
;;
$func_relative_path_tlibdir*)
# found a matching prefix
func_stripname "$func_relative_path_tlibdir" '' "$func_relative_path_tbindir"
func_relative_path_tcancelled=$func_stripname_result
if test -z "$func_relative_path_result"; then
func_relative_path_result=.
fi
break
;;
*)
func_dirname $func_relative_path_tlibdir
func_relative_path_tlibdir=${func_dirname_result}
if test "x$func_relative_path_tlibdir" = x ; then
# Have to descend all the way to the root!
func_relative_path_result=../$func_relative_path_result
func_relative_path_tcancelled=$func_relative_path_tbindir
break
fi
func_relative_path_result=../$func_relative_path_result
;;
esac
done
# Now calculate path; take care to avoid doubling-up slashes.
func_stripname '' '/' "$func_relative_path_result"
func_relative_path_result=$func_stripname_result
func_stripname '/' '/' "$func_relative_path_tcancelled"
if test "x$func_stripname_result" != x ; then
func_relative_path_result=${func_relative_path_result}/${func_stripname_result}
fi
# Normalisation. If bindir is libdir, return empty string,
# else relative path ending with a slash; either way, target
# file name can be directly appended.
if test ! -z "$func_relative_path_result"; then
func_stripname './' '' "$func_relative_path_result/"
func_relative_path_result=$func_stripname_result
fi
}
# The name of this program:
func_dirname_and_basename "$progpath"
progname=$func_basename_result
# Make sure we have an absolute path for reexecution:
case $progpath in
[\\/]*|[A-Za-z]:\\*) ;;
*[\\/]*)
progdir=$func_dirname_result
progdir=`cd "$progdir" && pwd`
progpath="$progdir/$progname"
;;
*)
save_IFS="$IFS"
IFS=${PATH_SEPARATOR-:}
for progdir in $PATH; do
IFS="$save_IFS"
test -x "$progdir/$progname" && break
done
IFS="$save_IFS"
test -n "$progdir" || progdir=`pwd`
progpath="$progdir/$progname"
;;
esac
# Sed substitution that helps us do robust quoting. It backslashifies
# metacharacters that are still active within double-quoted strings.
Xsed="${SED}"' -e 1s/^X//'
sed_quote_subst='s/\([`"$\\]\)/\\\1/g'
# Same as above, but do not quote variable references.
double_quote_subst='s/\(["`\\]\)/\\\1/g'
# Sed substitution that turns a string into a regex matching for the
# string literally.
sed_make_literal_regex='s,[].[^$\\*\/],\\&,g'
# Sed substitution that converts a w32 file name or path
# which contains forward slashes, into one that contains
# (escaped) backslashes. A very naive implementation.
lt_sed_naive_backslashify='s|\\\\*|\\|g;s|/|\\|g;s|\\|\\\\|g'
# Re-`\' parameter expansions in output of double_quote_subst that were
# `\'-ed in input to the same. If an odd number of `\' preceded a '$'
# in input to double_quote_subst, that '$' was protected from expansion.
# Since each input `\' is now two `\'s, look for any number of runs of
# four `\'s followed by two `\'s and then a '$'. `\' that '$'.
bs='\\'
bs2='\\\\'
bs4='\\\\\\\\'
dollar='\$'
sed_double_backslash="\
s/$bs4/&\\
/g
s/^$bs2$dollar/$bs&/
s/\\([^$bs]\\)$bs2$dollar/\\1$bs2$bs$dollar/g
s/\n//g"
# Standard options:
opt_dry_run=false
opt_help=false
opt_quiet=false
opt_verbose=false
opt_warning=:
# func_echo arg...
# Echo program name prefixed message, along with the current mode
# name if it has been set yet.
func_echo ()
{
$ECHO "$progname: ${opt_mode+$opt_mode: }$*"
}
# func_verbose arg...
# Echo program name prefixed message in verbose mode only.
func_verbose ()
{
$opt_verbose && func_echo ${1+"$@"}
# A bug in bash halts the script if the last line of a function
# fails when set -e is in force, so we need another command to
# work around that:
:
}
# func_echo_all arg...
# Invoke $ECHO with all args, space-separated.
func_echo_all ()
{
$ECHO "$*"
}
# func_error arg...
# Echo program name prefixed message to standard error.
func_error ()
{
$ECHO "$progname: ${opt_mode+$opt_mode: }"${1+"$@"} 1>&2
}
# func_warning arg...
# Echo program name prefixed warning message to standard error.
func_warning ()
{
$opt_warning && $ECHO "$progname: ${opt_mode+$opt_mode: }warning: "${1+"$@"} 1>&2
# bash bug again:
:
}
# func_fatal_error arg...
# Echo program name prefixed message to standard error, and exit.
func_fatal_error ()
{
func_error ${1+"$@"}
exit $EXIT_FAILURE
}
# func_fatal_help arg...
# Echo program name prefixed message to standard error, followed by
# a help hint, and exit.
func_fatal_help ()
{
func_error ${1+"$@"}
func_fatal_error "$help"
}
help="Try \`$progname --help' for more information." ## default
# func_grep expression filename
# Check whether EXPRESSION matches any line of FILENAME, without output.
func_grep ()
{
$GREP "$1" "$2" >/dev/null 2>&1
}
# func_mkdir_p directory-path
# Make sure the entire path to DIRECTORY-PATH is available.
func_mkdir_p ()
{
my_directory_path="$1"
my_dir_list=
if test -n "$my_directory_path" && test "$opt_dry_run" != ":"; then
# Protect directory names starting with `-'
case $my_directory_path in
-*) my_directory_path="./$my_directory_path" ;;
esac
# While some portion of DIR does not yet exist...
while test ! -d "$my_directory_path"; do
# ...make a list in topmost first order. Use a colon delimited
# list incase some portion of path contains whitespace.
my_dir_list="$my_directory_path:$my_dir_list"
# If the last portion added has no slash in it, the list is done
case $my_directory_path in */*) ;; *) break ;; esac
# ...otherwise throw away the child directory and loop
my_directory_path=`$ECHO "$my_directory_path" | $SED -e "$dirname"`
done
my_dir_list=`$ECHO "$my_dir_list" | $SED 's,:*$,,'`
save_mkdir_p_IFS="$IFS"; IFS=':'
for my_dir in $my_dir_list; do
IFS="$save_mkdir_p_IFS"
# mkdir can fail with a `File exist' error if two processes
# try to create one of the directories concurrently. Don't
# stop in that case!
$MKDIR "$my_dir" 2>/dev/null || :
done
IFS="$save_mkdir_p_IFS"
# Bail out if we (or some other process) failed to create a directory.
test -d "$my_directory_path" || \
func_fatal_error "Failed to create \`$1'"
fi
}
# func_mktempdir [string]
# Make a temporary directory that won't clash with other running
# libtool processes, and avoids race conditions if possible. If
# given, STRING is the basename for that directory.
func_mktempdir ()
{
my_template="${TMPDIR-/tmp}/${1-$progname}"
if test "$opt_dry_run" = ":"; then
# Return a directory name, but don't create it in dry-run mode
my_tmpdir="${my_template}-$$"
else
# If mktemp works, use that first and foremost
my_tmpdir=`mktemp -d "${my_template}-XXXXXXXX" 2>/dev/null`
if test ! -d "$my_tmpdir"; then
# Failing that, at least try and use $RANDOM to avoid a race
my_tmpdir="${my_template}-${RANDOM-0}$$"
save_mktempdir_umask=`umask`
umask 0077
$MKDIR "$my_tmpdir"
umask $save_mktempdir_umask
fi
# If we're not in dry-run mode, bomb out on failure
test -d "$my_tmpdir" || \
func_fatal_error "cannot create temporary directory \`$my_tmpdir'"
fi
$ECHO "$my_tmpdir"
}
# func_quote_for_eval arg
# Aesthetically quote ARG to be evaled later.
# This function returns two values: FUNC_QUOTE_FOR_EVAL_RESULT
# is double-quoted, suitable for a subsequent eval, whereas
# FUNC_QUOTE_FOR_EVAL_UNQUOTED_RESULT has merely all characters
# which are still active within double quotes backslashified.
func_quote_for_eval ()
{
case $1 in
*[\\\`\"\$]*)
func_quote_for_eval_unquoted_result=`$ECHO "$1" | $SED "$sed_quote_subst"` ;;
*)
func_quote_for_eval_unquoted_result="$1" ;;
esac
case $func_quote_for_eval_unquoted_result in
# Double-quote args containing shell metacharacters to delay
# word splitting, command substitution and and variable
# expansion for a subsequent eval.
# Many Bourne shells cannot handle close brackets correctly
# in scan sets, so we specify it separately.
*[\[\~\#\^\&\*\(\)\{\}\|\;\<\>\?\'\ \ ]*|*]*|"")
func_quote_for_eval_result="\"$func_quote_for_eval_unquoted_result\""
;;
*)
func_quote_for_eval_result="$func_quote_for_eval_unquoted_result"
esac
}
# func_quote_for_expand arg
# Aesthetically quote ARG to be evaled later; same as above,
# but do not quote variable references.
func_quote_for_expand ()
{
case $1 in
*[\\\`\"]*)
my_arg=`$ECHO "$1" | $SED \
-e "$double_quote_subst" -e "$sed_double_backslash"` ;;
*)
my_arg="$1" ;;
esac
case $my_arg in
# Double-quote args containing shell metacharacters to delay
# word splitting and command substitution for a subsequent eval.
# Many Bourne shells cannot handle close brackets correctly
# in scan sets, so we specify it separately.
*[\[\~\#\^\&\*\(\)\{\}\|\;\<\>\?\'\ \ ]*|*]*|"")
my_arg="\"$my_arg\""
;;
esac
func_quote_for_expand_result="$my_arg"
}
# func_show_eval cmd [fail_exp]
# Unless opt_silent is true, then output CMD. Then, if opt_dryrun is
# not true, evaluate CMD. If the evaluation of CMD fails, and FAIL_EXP
# is given, then evaluate it.
func_show_eval ()
{
my_cmd="$1"
my_fail_exp="${2-:}"
${opt_silent-false} || {
func_quote_for_expand "$my_cmd"
eval "func_echo $func_quote_for_expand_result"
}
if ${opt_dry_run-false}; then :; else
eval "$my_cmd"
my_status=$?
if test "$my_status" -eq 0; then :; else
eval "(exit $my_status); $my_fail_exp"
fi
fi
}
# func_show_eval_locale cmd [fail_exp]
# Unless opt_silent is true, then output CMD. Then, if opt_dryrun is
# not true, evaluate CMD. If the evaluation of CMD fails, and FAIL_EXP
# is given, then evaluate it. Use the saved locale for evaluation.
func_show_eval_locale ()
{
my_cmd="$1"
my_fail_exp="${2-:}"
${opt_silent-false} || {
func_quote_for_expand "$my_cmd"
eval "func_echo $func_quote_for_expand_result"
}
if ${opt_dry_run-false}; then :; else
eval "$lt_user_locale
$my_cmd"
my_status=$?
eval "$lt_safe_locale"
if test "$my_status" -eq 0; then :; else
eval "(exit $my_status); $my_fail_exp"
fi
fi
}
# func_tr_sh
# Turn $1 into a string suitable for a shell variable name.
# Result is stored in $func_tr_sh_result. All characters
# not in the set a-zA-Z0-9_ are replaced with '_'. Further,
# if $1 begins with a digit, a '_' is prepended as well.
func_tr_sh ()
{
case $1 in
[0-9]* | *[!a-zA-Z0-9_]*)
func_tr_sh_result=`$ECHO "$1" | $SED 's/^\([0-9]\)/_\1/; s/[^a-zA-Z0-9_]/_/g'`
;;
* )
func_tr_sh_result=$1
;;
esac
}
# func_version
# Echo version message to standard output and exit.
func_version ()
{
$opt_debug
$SED -n '/(C)/!b go
:more
/\./!{
N
s/\n# / /
b more
}
:go
/^# '$PROGRAM' (GNU /,/# warranty; / {
s/^# //
s/^# *$//
s/\((C)\)[ 0-9,-]*\( [1-9][0-9]*\)/\1\2/
p
}' < "$progpath"
exit $?
}
# func_usage
# Echo short help message to standard output and exit.
func_usage ()
{
$opt_debug
$SED -n '/^# Usage:/,/^# *.*--help/ {
s/^# //
s/^# *$//
s/\$progname/'$progname'/
p
}' < "$progpath"
echo
$ECHO "run \`$progname --help | more' for full usage"
exit $?
}
# func_help [NOEXIT]
# Echo long help message to standard output and exit,
# unless 'noexit' is passed as argument.
func_help ()
{
$opt_debug
$SED -n '/^# Usage:/,/# Report bugs to/ {
:print
s/^# //
s/^# *$//
s*\$progname*'$progname'*
s*\$host*'"$host"'*
s*\$SHELL*'"$SHELL"'*
s*\$LTCC*'"$LTCC"'*
s*\$LTCFLAGS*'"$LTCFLAGS"'*
s*\$LD*'"$LD"'*
s/\$with_gnu_ld/'"$with_gnu_ld"'/
s/\$automake_version/'"`(${AUTOMAKE-automake} --version) 2>/dev/null |$SED 1q`"'/
s/\$autoconf_version/'"`(${AUTOCONF-autoconf} --version) 2>/dev/null |$SED 1q`"'/
p
d
}
/^# .* home page:/b print
/^# General help using/b print
' < "$progpath"
ret=$?
if test -z "$1"; then
exit $ret
fi
}
# func_missing_arg argname
# Echo program name prefixed message to standard error and set global
# exit_cmd.
func_missing_arg ()
{
$opt_debug
func_error "missing argument for $1."
exit_cmd=exit
}
# func_split_short_opt shortopt
# Set func_split_short_opt_name and func_split_short_opt_arg shell
# variables after splitting SHORTOPT after the 2nd character.
func_split_short_opt ()
{
my_sed_short_opt='1s/^\(..\).*$/\1/;q'
my_sed_short_rest='1s/^..\(.*\)$/\1/;q'
func_split_short_opt_name=`$ECHO "$1" | $SED "$my_sed_short_opt"`
func_split_short_opt_arg=`$ECHO "$1" | $SED "$my_sed_short_rest"`
} # func_split_short_opt may be replaced by extended shell implementation
# func_split_long_opt longopt
# Set func_split_long_opt_name and func_split_long_opt_arg shell
# variables after splitting LONGOPT at the `=' sign.
func_split_long_opt ()
{
my_sed_long_opt='1s/^\(--[^=]*\)=.*/\1/;q'
my_sed_long_arg='1s/^--[^=]*=//'
func_split_long_opt_name=`$ECHO "$1" | $SED "$my_sed_long_opt"`
func_split_long_opt_arg=`$ECHO "$1" | $SED "$my_sed_long_arg"`
} # func_split_long_opt may be replaced by extended shell implementation
exit_cmd=:
magic="%%%MAGIC variable%%%"
magic_exe="%%%MAGIC EXE variable%%%"
# Global variables.
nonopt=
preserve_args=
lo2o="s/\\.lo\$/.${objext}/"
o2lo="s/\\.${objext}\$/.lo/"
extracted_archives=
extracted_serial=0
# If this variable is set in any of the actions, the command in it
# will be execed at the end. This prevents here-documents from being
# left over by shells.
exec_cmd=
# func_append var value
# Append VALUE to the end of shell variable VAR.
func_append ()
{
eval "${1}=\$${1}\${2}"
} # func_append may be replaced by extended shell implementation
# func_append_quoted var value
# Quote VALUE and append to the end of shell variable VAR, separated
# by a space.
func_append_quoted ()
{
func_quote_for_eval "${2}"
eval "${1}=\$${1}\\ \$func_quote_for_eval_result"
} # func_append_quoted may be replaced by extended shell implementation
# func_arith arithmetic-term...
func_arith ()
{
func_arith_result=`expr "${@}"`
} # func_arith may be replaced by extended shell implementation
# func_len string
# STRING may not start with a hyphen.
func_len ()
{
func_len_result=`expr "${1}" : ".*" 2>/dev/null || echo $max_cmd_len`
} # func_len may be replaced by extended shell implementation
# func_lo2o object
func_lo2o ()
{
func_lo2o_result=`$ECHO "${1}" | $SED "$lo2o"`
} # func_lo2o may be replaced by extended shell implementation
# func_xform libobj-or-source
func_xform ()
{
func_xform_result=`$ECHO "${1}" | $SED 's/\.[^.]*$/.lo/'`
} # func_xform may be replaced by extended shell implementation
# func_fatal_configuration arg...
# Echo program name prefixed message to standard error, followed by
# a configuration failure hint, and exit.
func_fatal_configuration ()
{
func_error ${1+"$@"}
func_error "See the $PACKAGE documentation for more information."
func_fatal_error "Fatal configuration error."
}
# func_config
# Display the configuration for all the tags in this script.
func_config ()
{
re_begincf='^# ### BEGIN LIBTOOL'
re_endcf='^# ### END LIBTOOL'
# Default configuration.
$SED "1,/$re_begincf CONFIG/d;/$re_endcf CONFIG/,\$d" < "$progpath"
# Now print the configurations for the tags.
for tagname in $taglist; do
$SED -n "/$re_begincf TAG CONFIG: $tagname\$/,/$re_endcf TAG CONFIG: $tagname\$/p" < "$progpath"
done
exit $?
}
# func_features
# Display the features supported by this script.
func_features ()
{
echo "host: $host"
if test "$build_libtool_libs" = yes; then
echo "enable shared libraries"
else
echo "disable shared libraries"
fi
if test "$build_old_libs" = yes; then
echo "enable static libraries"
else
echo "disable static libraries"
fi
exit $?
}
# func_enable_tag tagname
# Verify that TAGNAME is valid, and either flag an error and exit, or
# enable the TAGNAME tag. We also add TAGNAME to the global $taglist
# variable here.
func_enable_tag ()
{
# Global variable:
tagname="$1"
re_begincf="^# ### BEGIN LIBTOOL TAG CONFIG: $tagname\$"
re_endcf="^# ### END LIBTOOL TAG CONFIG: $tagname\$"
sed_extractcf="/$re_begincf/,/$re_endcf/p"
# Validate tagname.
case $tagname in
*[!-_A-Za-z0-9,/]*)
func_fatal_error "invalid tag name: $tagname"
;;
esac
# Don't test for the "default" C tag, as we know it's
# there but not specially marked.
case $tagname in
CC) ;;
*)
if $GREP "$re_begincf" "$progpath" >/dev/null 2>&1; then
taglist="$taglist $tagname"
# Evaluate the configuration. Be careful to quote the path
# and the sed script, to avoid splitting on whitespace, but
# also don't use non-portable quotes within backquotes within
# quotes we have to do it in 2 steps:
extractedcf=`$SED -n -e "$sed_extractcf" < "$progpath"`
eval "$extractedcf"
else
func_error "ignoring unknown tag $tagname"
fi
;;
esac
}
# func_check_version_match
# Ensure that we are using m4 macros, and libtool script from the same
# release of libtool.
func_check_version_match ()
{
if test "$package_revision" != "$macro_revision"; then
if test "$VERSION" != "$macro_version"; then
if test -z "$macro_version"; then
cat >&2 <<_LT_EOF
$progname: Version mismatch error. This is $PACKAGE $VERSION, but the
$progname: definition of this LT_INIT comes from an older release.
$progname: You should recreate aclocal.m4 with macros from $PACKAGE $VERSION
$progname: and run autoconf again.
_LT_EOF
else
cat >&2 <<_LT_EOF
$progname: Version mismatch error. This is $PACKAGE $VERSION, but the
$progname: definition of this LT_INIT comes from $PACKAGE $macro_version.
$progname: You should recreate aclocal.m4 with macros from $PACKAGE $VERSION
$progname: and run autoconf again.
_LT_EOF
fi
else
cat >&2 <<_LT_EOF
$progname: Version mismatch error. This is $PACKAGE $VERSION, revision $package_revision,
$progname: but the definition of this LT_INIT comes from revision $macro_revision.
$progname: You should recreate aclocal.m4 with macros from revision $package_revision
$progname: of $PACKAGE $VERSION and run autoconf again.
_LT_EOF
fi
exit $EXIT_MISMATCH
fi
}
# Shorthand for --mode=foo, only valid as the first argument
case $1 in
clean|clea|cle|cl)
shift; set dummy --mode clean ${1+"$@"}; shift
;;
compile|compil|compi|comp|com|co|c)
shift; set dummy --mode compile ${1+"$@"}; shift
;;
execute|execut|execu|exec|exe|ex|e)
shift; set dummy --mode execute ${1+"$@"}; shift
;;
finish|finis|fini|fin|fi|f)
shift; set dummy --mode finish ${1+"$@"}; shift
;;
install|instal|insta|inst|ins|in|i)
shift; set dummy --mode install ${1+"$@"}; shift
;;
link|lin|li|l)
shift; set dummy --mode link ${1+"$@"}; shift
;;
uninstall|uninstal|uninsta|uninst|unins|unin|uni|un|u)
shift; set dummy --mode uninstall ${1+"$@"}; shift
;;
esac
# Option defaults:
opt_debug=:
opt_dry_run=false
opt_config=false
opt_preserve_dup_deps=false
opt_features=false
opt_finish=false
opt_help=false
opt_help_all=false
opt_silent=:
opt_warning=:
opt_verbose=:
opt_silent=false
opt_verbose=false
# Parse options once, thoroughly. This comes as soon as possible in the
# script to make things like `--version' happen as quickly as we can.
{
# this just eases exit handling
while test $# -gt 0; do
opt="$1"
shift
case $opt in
--debug|-x) opt_debug='set -x'
func_echo "enabling shell trace mode"
$opt_debug
;;
--dry-run|--dryrun|-n)
opt_dry_run=:
;;
--config)
opt_config=:
func_config
;;
--dlopen|-dlopen)
optarg="$1"
opt_dlopen="${opt_dlopen+$opt_dlopen
}$optarg"
shift
;;
--preserve-dup-deps)
opt_preserve_dup_deps=:
;;
--features)
opt_features=:
func_features
;;
--finish)
opt_finish=:
set dummy --mode finish ${1+"$@"}; shift
;;
--help)
opt_help=:
;;
--help-all)
opt_help_all=:
opt_help=': help-all'
;;
--mode)
test $# = 0 && func_missing_arg $opt && break
optarg="$1"
opt_mode="$optarg"
case $optarg in
# Valid mode arguments:
clean|compile|execute|finish|install|link|relink|uninstall) ;;
# Catch anything else as an error
*) func_error "invalid argument for $opt"
exit_cmd=exit
break
;;
esac
shift
;;
--no-silent|--no-quiet)
opt_silent=false
func_append preserve_args " $opt"
;;
--no-warning|--no-warn)
opt_warning=false
func_append preserve_args " $opt"
;;
--no-verbose)
opt_verbose=false
func_append preserve_args " $opt"
;;
--silent|--quiet)
opt_silent=:
func_append preserve_args " $opt"
opt_verbose=false
;;
--verbose|-v)
opt_verbose=:
func_append preserve_args " $opt"
opt_silent=false
;;
--tag)
test $# = 0 && func_missing_arg $opt && break
optarg="$1"
opt_tag="$optarg"
func_append preserve_args " $opt $optarg"
func_enable_tag "$optarg"
shift
;;
-\?|-h) func_usage ;;
--help) func_help ;;
--version) func_version ;;
# Separate optargs to long options:
--*=*)
func_split_long_opt "$opt"
set dummy "$func_split_long_opt_name" "$func_split_long_opt_arg" ${1+"$@"}
shift
;;
# Separate non-argument short options:
-\?*|-h*|-n*|-v*)
func_split_short_opt "$opt"
set dummy "$func_split_short_opt_name" "-$func_split_short_opt_arg" ${1+"$@"}
shift
;;
--) break ;;
-*) func_fatal_help "unrecognized option \`$opt'" ;;
*) set dummy "$opt" ${1+"$@"}; shift; break ;;
esac
done
# Validate options:
# save first non-option argument
if test "$#" -gt 0; then
nonopt="$opt"
shift
fi
# preserve --debug
test "$opt_debug" = : || func_append preserve_args " --debug"
case $host in
*cygwin* | *mingw* | *pw32* | *cegcc*)
# don't eliminate duplications in $postdeps and $predeps
opt_duplicate_compiler_generated_deps=:
;;
*)
opt_duplicate_compiler_generated_deps=$opt_preserve_dup_deps
;;
esac
$opt_help || {
# Sanity checks first:
func_check_version_match
if test "$build_libtool_libs" != yes && test "$build_old_libs" != yes; then
func_fatal_configuration "not configured to build any kind of library"
fi
# Darwin sucks
eval std_shrext=\"$shrext_cmds\"
# Only execute mode is allowed to have -dlopen flags.
if test -n "$opt_dlopen" && test "$opt_mode" != execute; then
func_error "unrecognized option \`-dlopen'"
$ECHO "$help" 1>&2
exit $EXIT_FAILURE
fi
# Change the help message to a mode-specific one.
generic_help="$help"
help="Try \`$progname --help --mode=$opt_mode' for more information."
}
# Bail if the options were screwed
$exit_cmd $EXIT_FAILURE
}
## ----------- ##
## Main. ##
## ----------- ##
# func_lalib_p file
# True iff FILE is a libtool `.la' library or `.lo' object file.
# This function is only a basic sanity check; it will hardly flush out
# determined imposters.
func_lalib_p ()
{
test -f "$1" &&
$SED -e 4q "$1" 2>/dev/null \
| $GREP "^# Generated by .*$PACKAGE" > /dev/null 2>&1
}
# func_lalib_unsafe_p file
# True iff FILE is a libtool `.la' library or `.lo' object file.
# This function implements the same check as func_lalib_p without
# resorting to external programs. To this end, it redirects stdin and
# closes it afterwards, without saving the original file descriptor.
# As a safety measure, use it only where a negative result would be
# fatal anyway. Works if `file' does not exist.
func_lalib_unsafe_p ()
{
lalib_p=no
if test -f "$1" && test -r "$1" && exec 5<&0 <"$1"; then
for lalib_p_l in 1 2 3 4
do
read lalib_p_line
case "$lalib_p_line" in
\#\ Generated\ by\ *$PACKAGE* ) lalib_p=yes; break;;
esac
done
exec 0<&5 5<&-
fi
test "$lalib_p" = yes
}
# func_ltwrapper_script_p file
# True iff FILE is a libtool wrapper script
# This function is only a basic sanity check; it will hardly flush out
# determined imposters.
func_ltwrapper_script_p ()
{
func_lalib_p "$1"
}
# func_ltwrapper_executable_p file
# True iff FILE is a libtool wrapper executable
# This function is only a basic sanity check; it will hardly flush out
# determined imposters.
func_ltwrapper_executable_p ()
{
func_ltwrapper_exec_suffix=
case $1 in
*.exe) ;;
*) func_ltwrapper_exec_suffix=.exe ;;
esac
$GREP "$magic_exe" "$1$func_ltwrapper_exec_suffix" >/dev/null 2>&1
}
# func_ltwrapper_scriptname file
# Assumes file is an ltwrapper_executable
# uses $file to determine the appropriate filename for a
# temporary ltwrapper_script.
func_ltwrapper_scriptname ()
{
func_dirname_and_basename "$1" "" "."
func_stripname '' '.exe' "$func_basename_result"
func_ltwrapper_scriptname_result="$func_dirname_result/$objdir/${func_stripname_result}_ltshwrapper"
}
# func_ltwrapper_p file
# True iff FILE is a libtool wrapper script or wrapper executable
# This function is only a basic sanity check; it will hardly flush out
# determined imposters.
func_ltwrapper_p ()
{
func_ltwrapper_script_p "$1" || func_ltwrapper_executable_p "$1"
}
# func_execute_cmds commands fail_cmd
# Execute tilde-delimited COMMANDS.
# If FAIL_CMD is given, eval that upon failure.
# FAIL_CMD may read-access the current command in variable CMD!
func_execute_cmds ()
{
$opt_debug
save_ifs=$IFS; IFS='~'
for cmd in $1; do
IFS=$save_ifs
eval cmd=\"$cmd\"
func_show_eval "$cmd" "${2-:}"
done
IFS=$save_ifs
}
# func_source file
# Source FILE, adding directory component if necessary.
# Note that it is not necessary on cygwin/mingw to append a dot to
# FILE even if both FILE and FILE.exe exist: automatic-append-.exe
# behavior happens only for exec(3), not for open(2)! Also, sourcing
# `FILE.' does not work on cygwin managed mounts.
func_source ()
{
$opt_debug
case $1 in
*/* | *\\*) . "$1" ;;
*) . "./$1" ;;
esac
}
# func_resolve_sysroot PATH
# Replace a leading = in PATH with a sysroot. Store the result into
# func_resolve_sysroot_result
func_resolve_sysroot ()
{
func_resolve_sysroot_result=$1
case $func_resolve_sysroot_result in
=*)
func_stripname '=' '' "$func_resolve_sysroot_result"
func_resolve_sysroot_result=$lt_sysroot$func_stripname_result
;;
esac
}
# func_replace_sysroot PATH
# If PATH begins with the sysroot, replace it with = and
# store the result into func_replace_sysroot_result.
func_replace_sysroot ()
{
case "$lt_sysroot:$1" in
?*:"$lt_sysroot"*)
func_stripname "$lt_sysroot" '' "$1"
func_replace_sysroot_result="=$func_stripname_result"
;;
*)
# Including no sysroot.
func_replace_sysroot_result=$1
;;
esac
}
# func_infer_tag arg
# Infer tagged configuration to use if any are available and
# if one wasn't chosen via the "--tag" command line option.
# Only attempt this if the compiler in the base compile
# command doesn't match the default compiler.
# arg is usually of the form 'gcc ...'
func_infer_tag ()
{
$opt_debug
if test -n "$available_tags" && test -z "$tagname"; then
CC_quoted=
for arg in $CC; do
func_append_quoted CC_quoted "$arg"
done
CC_expanded=`func_echo_all $CC`
CC_quoted_expanded=`func_echo_all $CC_quoted`
case $@ in
# Blanks in the command may have been stripped by the calling shell,
# but not from the CC environment variable when configure was run.
" $CC "* | "$CC "* | " $CC_expanded "* | "$CC_expanded "* | \
" $CC_quoted"* | "$CC_quoted "* | " $CC_quoted_expanded "* | "$CC_quoted_expanded "*) ;;
# Blanks at the start of $base_compile will cause this to fail
# if we don't check for them as well.
*)
for z in $available_tags; do
if $GREP "^# ### BEGIN LIBTOOL TAG CONFIG: $z$" < "$progpath" > /dev/null; then
# Evaluate the configuration.
eval "`${SED} -n -e '/^# ### BEGIN LIBTOOL TAG CONFIG: '$z'$/,/^# ### END LIBTOOL TAG CONFIG: '$z'$/p' < $progpath`"
CC_quoted=
for arg in $CC; do
# Double-quote args containing other shell metacharacters.
func_append_quoted CC_quoted "$arg"
done
CC_expanded=`func_echo_all $CC`
CC_quoted_expanded=`func_echo_all $CC_quoted`
case "$@ " in
" $CC "* | "$CC "* | " $CC_expanded "* | "$CC_expanded "* | \
" $CC_quoted"* | "$CC_quoted "* | " $CC_quoted_expanded "* | "$CC_quoted_expanded "*)
# The compiler in the base compile command matches
# the one in the tagged configuration.
# Assume this is the tagged configuration we want.
tagname=$z
break
;;
esac
fi
done
# If $tagname still isn't set, then no tagged configuration
# was found and let the user know that the "--tag" command
# line option must be used.
if test -z "$tagname"; then
func_echo "unable to infer tagged configuration"
func_fatal_error "specify a tag with \`--tag'"
# else
# func_verbose "using $tagname tagged configuration"
fi
;;
esac
fi
}
# func_write_libtool_object output_name pic_name nonpic_name
# Create a libtool object file (analogous to a ".la" file),
# but don't create it if we're doing a dry run.
func_write_libtool_object ()
{
write_libobj=${1}
if test "$build_libtool_libs" = yes; then
write_lobj=\'${2}\'
else
write_lobj=none
fi
if test "$build_old_libs" = yes; then
write_oldobj=\'${3}\'
else
write_oldobj=none
fi
$opt_dry_run || {
cat >${write_libobj}T </dev/null`
if test "$?" -eq 0 && test -n "${func_convert_core_file_wine_to_w32_tmp}"; then
func_convert_core_file_wine_to_w32_result=`$ECHO "$func_convert_core_file_wine_to_w32_tmp" |
$SED -e "$lt_sed_naive_backslashify"`
else
func_convert_core_file_wine_to_w32_result=
fi
fi
}
# end: func_convert_core_file_wine_to_w32
# func_convert_core_path_wine_to_w32 ARG
# Helper function used by path conversion functions when $build is *nix, and
# $host is mingw, cygwin, or some other w32 environment. Relies on a correctly
# configured wine environment available, with the winepath program in $build's
# $PATH. Assumes ARG has no leading or trailing path separator characters.
#
# ARG is path to be converted from $build format to win32.
# Result is available in $func_convert_core_path_wine_to_w32_result.
# Unconvertible file (directory) names in ARG are skipped; if no directory names
# are convertible, then the result may be empty.
func_convert_core_path_wine_to_w32 ()
{
$opt_debug
# unfortunately, winepath doesn't convert paths, only file names
func_convert_core_path_wine_to_w32_result=""
if test -n "$1"; then
oldIFS=$IFS
IFS=:
for func_convert_core_path_wine_to_w32_f in $1; do
IFS=$oldIFS
func_convert_core_file_wine_to_w32 "$func_convert_core_path_wine_to_w32_f"
if test -n "$func_convert_core_file_wine_to_w32_result" ; then
if test -z "$func_convert_core_path_wine_to_w32_result"; then
func_convert_core_path_wine_to_w32_result="$func_convert_core_file_wine_to_w32_result"
else
func_append func_convert_core_path_wine_to_w32_result ";$func_convert_core_file_wine_to_w32_result"
fi
fi
done
IFS=$oldIFS
fi
}
# end: func_convert_core_path_wine_to_w32
# func_cygpath ARGS...
# Wrapper around calling the cygpath program via LT_CYGPATH. This is used when
# when (1) $build is *nix and Cygwin is hosted via a wine environment; or (2)
# $build is MSYS and $host is Cygwin, or (3) $build is Cygwin. In case (1) or
# (2), returns the Cygwin file name or path in func_cygpath_result (input
# file name or path is assumed to be in w32 format, as previously converted
# from $build's *nix or MSYS format). In case (3), returns the w32 file name
# or path in func_cygpath_result (input file name or path is assumed to be in
# Cygwin format). Returns an empty string on error.
#
# ARGS are passed to cygpath, with the last one being the file name or path to
# be converted.
#
# Specify the absolute *nix (or w32) name to cygpath in the LT_CYGPATH
# environment variable; do not put it in $PATH.
func_cygpath ()
{
$opt_debug
if test -n "$LT_CYGPATH" && test -f "$LT_CYGPATH"; then
func_cygpath_result=`$LT_CYGPATH "$@" 2>/dev/null`
if test "$?" -ne 0; then
# on failure, ensure result is empty
func_cygpath_result=
fi
else
func_cygpath_result=
func_error "LT_CYGPATH is empty or specifies non-existent file: \`$LT_CYGPATH'"
fi
}
#end: func_cygpath
# func_convert_core_msys_to_w32 ARG
# Convert file name or path ARG from MSYS format to w32 format. Return
# result in func_convert_core_msys_to_w32_result.
func_convert_core_msys_to_w32 ()
{
$opt_debug
# awkward: cmd appends spaces to result
func_convert_core_msys_to_w32_result=`( cmd //c echo "$1" ) 2>/dev/null |
$SED -e 's/[ ]*$//' -e "$lt_sed_naive_backslashify"`
}
#end: func_convert_core_msys_to_w32
# func_convert_file_check ARG1 ARG2
# Verify that ARG1 (a file name in $build format) was converted to $host
# format in ARG2. Otherwise, emit an error message, but continue (resetting
# func_to_host_file_result to ARG1).
func_convert_file_check ()
{
$opt_debug
if test -z "$2" && test -n "$1" ; then
func_error "Could not determine host file name corresponding to"
func_error " \`$1'"
func_error "Continuing, but uninstalled executables may not work."
# Fallback:
func_to_host_file_result="$1"
fi
}
# end func_convert_file_check
# func_convert_path_check FROM_PATHSEP TO_PATHSEP FROM_PATH TO_PATH
# Verify that FROM_PATH (a path in $build format) was converted to $host
# format in TO_PATH. Otherwise, emit an error message, but continue, resetting
# func_to_host_file_result to a simplistic fallback value (see below).
func_convert_path_check ()
{
$opt_debug
if test -z "$4" && test -n "$3"; then
func_error "Could not determine the host path corresponding to"
func_error " \`$3'"
func_error "Continuing, but uninstalled executables may not work."
# Fallback. This is a deliberately simplistic "conversion" and
# should not be "improved". See libtool.info.
if test "x$1" != "x$2"; then
lt_replace_pathsep_chars="s|$1|$2|g"
func_to_host_path_result=`echo "$3" |
$SED -e "$lt_replace_pathsep_chars"`
else
func_to_host_path_result="$3"
fi
fi
}
# end func_convert_path_check
# func_convert_path_front_back_pathsep FRONTPAT BACKPAT REPL ORIG
# Modifies func_to_host_path_result by prepending REPL if ORIG matches FRONTPAT
# and appending REPL if ORIG matches BACKPAT.
func_convert_path_front_back_pathsep ()
{
$opt_debug
case $4 in
$1 ) func_to_host_path_result="$3$func_to_host_path_result"
;;
esac
case $4 in
$2 ) func_append func_to_host_path_result "$3"
;;
esac
}
# end func_convert_path_front_back_pathsep
##################################################
# $build to $host FILE NAME CONVERSION FUNCTIONS #
##################################################
# invoked via `$to_host_file_cmd ARG'
#
# In each case, ARG is the path to be converted from $build to $host format.
# Result will be available in $func_to_host_file_result.
# func_to_host_file ARG
# Converts the file name ARG from $build format to $host format. Return result
# in func_to_host_file_result.
func_to_host_file ()
{
$opt_debug
$to_host_file_cmd "$1"
}
# end func_to_host_file
# func_to_tool_file ARG LAZY
# converts the file name ARG from $build format to toolchain format. Return
# result in func_to_tool_file_result. If the conversion in use is listed
# in (the comma separated) LAZY, no conversion takes place.
func_to_tool_file ()
{
$opt_debug
case ,$2, in
*,"$to_tool_file_cmd",*)
func_to_tool_file_result=$1
;;
*)
$to_tool_file_cmd "$1"
func_to_tool_file_result=$func_to_host_file_result
;;
esac
}
# end func_to_tool_file
# func_convert_file_noop ARG
# Copy ARG to func_to_host_file_result.
func_convert_file_noop ()
{
func_to_host_file_result="$1"
}
# end func_convert_file_noop
# func_convert_file_msys_to_w32 ARG
# Convert file name ARG from (mingw) MSYS to (mingw) w32 format; automatic
# conversion to w32 is not available inside the cwrapper. Returns result in
# func_to_host_file_result.
func_convert_file_msys_to_w32 ()
{
$opt_debug
func_to_host_file_result="$1"
if test -n "$1"; then
func_convert_core_msys_to_w32 "$1"
func_to_host_file_result="$func_convert_core_msys_to_w32_result"
fi
func_convert_file_check "$1" "$func_to_host_file_result"
}
# end func_convert_file_msys_to_w32
# func_convert_file_cygwin_to_w32 ARG
# Convert file name ARG from Cygwin to w32 format. Returns result in
# func_to_host_file_result.
func_convert_file_cygwin_to_w32 ()
{
$opt_debug
func_to_host_file_result="$1"
if test -n "$1"; then
# because $build is cygwin, we call "the" cygpath in $PATH; no need to use
# LT_CYGPATH in this case.
func_to_host_file_result=`cygpath -m "$1"`
fi
func_convert_file_check "$1" "$func_to_host_file_result"
}
# end func_convert_file_cygwin_to_w32
# func_convert_file_nix_to_w32 ARG
# Convert file name ARG from *nix to w32 format. Requires a wine environment
# and a working winepath. Returns result in func_to_host_file_result.
func_convert_file_nix_to_w32 ()
{
$opt_debug
func_to_host_file_result="$1"
if test -n "$1"; then
func_convert_core_file_wine_to_w32 "$1"
func_to_host_file_result="$func_convert_core_file_wine_to_w32_result"
fi
func_convert_file_check "$1" "$func_to_host_file_result"
}
# end func_convert_file_nix_to_w32
# func_convert_file_msys_to_cygwin ARG
# Convert file name ARG from MSYS to Cygwin format. Requires LT_CYGPATH set.
# Returns result in func_to_host_file_result.
func_convert_file_msys_to_cygwin ()
{
$opt_debug
func_to_host_file_result="$1"
if test -n "$1"; then
func_convert_core_msys_to_w32 "$1"
func_cygpath -u "$func_convert_core_msys_to_w32_result"
func_to_host_file_result="$func_cygpath_result"
fi
func_convert_file_check "$1" "$func_to_host_file_result"
}
# end func_convert_file_msys_to_cygwin
# func_convert_file_nix_to_cygwin ARG
# Convert file name ARG from *nix to Cygwin format. Requires Cygwin installed
# in a wine environment, working winepath, and LT_CYGPATH set. Returns result
# in func_to_host_file_result.
func_convert_file_nix_to_cygwin ()
{
$opt_debug
func_to_host_file_result="$1"
if test -n "$1"; then
# convert from *nix to w32, then use cygpath to convert from w32 to cygwin.
func_convert_core_file_wine_to_w32 "$1"
func_cygpath -u "$func_convert_core_file_wine_to_w32_result"
func_to_host_file_result="$func_cygpath_result"
fi
func_convert_file_check "$1" "$func_to_host_file_result"
}
# end func_convert_file_nix_to_cygwin
#############################################
# $build to $host PATH CONVERSION FUNCTIONS #
#############################################
# invoked via `$to_host_path_cmd ARG'
#
# In each case, ARG is the path to be converted from $build to $host format.
# The result will be available in $func_to_host_path_result.
#
# Path separators are also converted from $build format to $host format. If
# ARG begins or ends with a path separator character, it is preserved (but
# converted to $host format) on output.
#
# All path conversion functions are named using the following convention:
# file name conversion function : func_convert_file_X_to_Y ()
# path conversion function : func_convert_path_X_to_Y ()
# where, for any given $build/$host combination the 'X_to_Y' value is the
# same. If conversion functions are added for new $build/$host combinations,
# the two new functions must follow this pattern, or func_init_to_host_path_cmd
# will break.
# func_init_to_host_path_cmd
# Ensures that function "pointer" variable $to_host_path_cmd is set to the
# appropriate value, based on the value of $to_host_file_cmd.
to_host_path_cmd=
func_init_to_host_path_cmd ()
{
$opt_debug
if test -z "$to_host_path_cmd"; then
func_stripname 'func_convert_file_' '' "$to_host_file_cmd"
to_host_path_cmd="func_convert_path_${func_stripname_result}"
fi
}
# func_to_host_path ARG
# Converts the path ARG from $build format to $host format. Return result
# in func_to_host_path_result.
func_to_host_path ()
{
$opt_debug
func_init_to_host_path_cmd
$to_host_path_cmd "$1"
}
# end func_to_host_path
# func_convert_path_noop ARG
# Copy ARG to func_to_host_path_result.
func_convert_path_noop ()
{
func_to_host_path_result="$1"
}
# end func_convert_path_noop
# func_convert_path_msys_to_w32 ARG
# Convert path ARG from (mingw) MSYS to (mingw) w32 format; automatic
# conversion to w32 is not available inside the cwrapper. Returns result in
# func_to_host_path_result.
func_convert_path_msys_to_w32 ()
{
$opt_debug
func_to_host_path_result="$1"
if test -n "$1"; then
# Remove leading and trailing path separator characters from ARG. MSYS
# behavior is inconsistent here; cygpath turns them into '.;' and ';.';
# and winepath ignores them completely.
func_stripname : : "$1"
func_to_host_path_tmp1=$func_stripname_result
func_convert_core_msys_to_w32 "$func_to_host_path_tmp1"
func_to_host_path_result="$func_convert_core_msys_to_w32_result"
func_convert_path_check : ";" \
"$func_to_host_path_tmp1" "$func_to_host_path_result"
func_convert_path_front_back_pathsep ":*" "*:" ";" "$1"
fi
}
# end func_convert_path_msys_to_w32
# func_convert_path_cygwin_to_w32 ARG
# Convert path ARG from Cygwin to w32 format. Returns result in
# func_to_host_file_result.
func_convert_path_cygwin_to_w32 ()
{
$opt_debug
func_to_host_path_result="$1"
if test -n "$1"; then
# See func_convert_path_msys_to_w32:
func_stripname : : "$1"
func_to_host_path_tmp1=$func_stripname_result
func_to_host_path_result=`cygpath -m -p "$func_to_host_path_tmp1"`
func_convert_path_check : ";" \
"$func_to_host_path_tmp1" "$func_to_host_path_result"
func_convert_path_front_back_pathsep ":*" "*:" ";" "$1"
fi
}
# end func_convert_path_cygwin_to_w32
# func_convert_path_nix_to_w32 ARG
# Convert path ARG from *nix to w32 format. Requires a wine environment and
# a working winepath. Returns result in func_to_host_file_result.
func_convert_path_nix_to_w32 ()
{
$opt_debug
func_to_host_path_result="$1"
if test -n "$1"; then
# See func_convert_path_msys_to_w32:
func_stripname : : "$1"
func_to_host_path_tmp1=$func_stripname_result
func_convert_core_path_wine_to_w32 "$func_to_host_path_tmp1"
func_to_host_path_result="$func_convert_core_path_wine_to_w32_result"
func_convert_path_check : ";" \
"$func_to_host_path_tmp1" "$func_to_host_path_result"
func_convert_path_front_back_pathsep ":*" "*:" ";" "$1"
fi
}
# end func_convert_path_nix_to_w32
# func_convert_path_msys_to_cygwin ARG
# Convert path ARG from MSYS to Cygwin format. Requires LT_CYGPATH set.
# Returns result in func_to_host_file_result.
func_convert_path_msys_to_cygwin ()
{
$opt_debug
func_to_host_path_result="$1"
if test -n "$1"; then
# See func_convert_path_msys_to_w32:
func_stripname : : "$1"
func_to_host_path_tmp1=$func_stripname_result
func_convert_core_msys_to_w32 "$func_to_host_path_tmp1"
func_cygpath -u -p "$func_convert_core_msys_to_w32_result"
func_to_host_path_result="$func_cygpath_result"
func_convert_path_check : : \
"$func_to_host_path_tmp1" "$func_to_host_path_result"
func_convert_path_front_back_pathsep ":*" "*:" : "$1"
fi
}
# end func_convert_path_msys_to_cygwin
# func_convert_path_nix_to_cygwin ARG
# Convert path ARG from *nix to Cygwin format. Requires Cygwin installed in a
# a wine environment, working winepath, and LT_CYGPATH set. Returns result in
# func_to_host_file_result.
func_convert_path_nix_to_cygwin ()
{
$opt_debug
func_to_host_path_result="$1"
if test -n "$1"; then
# Remove leading and trailing path separator characters from
# ARG. msys behavior is inconsistent here, cygpath turns them
# into '.;' and ';.', and winepath ignores them completely.
func_stripname : : "$1"
func_to_host_path_tmp1=$func_stripname_result
func_convert_core_path_wine_to_w32 "$func_to_host_path_tmp1"
func_cygpath -u -p "$func_convert_core_path_wine_to_w32_result"
func_to_host_path_result="$func_cygpath_result"
func_convert_path_check : : \
"$func_to_host_path_tmp1" "$func_to_host_path_result"
func_convert_path_front_back_pathsep ":*" "*:" : "$1"
fi
}
# end func_convert_path_nix_to_cygwin
# func_mode_compile arg...
func_mode_compile ()
{
$opt_debug
# Get the compilation command and the source file.
base_compile=
srcfile="$nonopt" # always keep a non-empty value in "srcfile"
suppress_opt=yes
suppress_output=
arg_mode=normal
libobj=
later=
pie_flag=
for arg
do
case $arg_mode in
arg )
# do not "continue". Instead, add this to base_compile
lastarg="$arg"
arg_mode=normal
;;
target )
libobj="$arg"
arg_mode=normal
continue
;;
normal )
# Accept any command-line options.
case $arg in
-o)
test -n "$libobj" && \
func_fatal_error "you cannot specify \`-o' more than once"
arg_mode=target
continue
;;
-pie | -fpie | -fPIE)
func_append pie_flag " $arg"
continue
;;
-shared | -static | -prefer-pic | -prefer-non-pic)
func_append later " $arg"
continue
;;
-no-suppress)
suppress_opt=no
continue
;;
-Xcompiler)
arg_mode=arg # the next one goes into the "base_compile" arg list
continue # The current "srcfile" will either be retained or
;; # replaced later. I would guess that would be a bug.
-Wc,*)
func_stripname '-Wc,' '' "$arg"
args=$func_stripname_result
lastarg=
save_ifs="$IFS"; IFS=','
for arg in $args; do
IFS="$save_ifs"
func_append_quoted lastarg "$arg"
done
IFS="$save_ifs"
func_stripname ' ' '' "$lastarg"
lastarg=$func_stripname_result
# Add the arguments to base_compile.
func_append base_compile " $lastarg"
continue
;;
*)
# Accept the current argument as the source file.
# The previous "srcfile" becomes the current argument.
#
lastarg="$srcfile"
srcfile="$arg"
;;
esac # case $arg
;;
esac # case $arg_mode
# Aesthetically quote the previous argument.
func_append_quoted base_compile "$lastarg"
done # for arg
case $arg_mode in
arg)
func_fatal_error "you must specify an argument for -Xcompile"
;;
target)
func_fatal_error "you must specify a target with \`-o'"
;;
*)
# Get the name of the library object.
test -z "$libobj" && {
func_basename "$srcfile"
libobj="$func_basename_result"
}
;;
esac
# Recognize several different file suffixes.
# If the user specifies -o file.o, it is replaced with file.lo
case $libobj in
*.[cCFSifmso] | \
*.ada | *.adb | *.ads | *.asm | \
*.c++ | *.cc | *.ii | *.class | *.cpp | *.cxx | \
*.[fF][09]? | *.for | *.java | *.go | *.obj | *.sx | *.cu | *.cup)
func_xform "$libobj"
libobj=$func_xform_result
;;
esac
case $libobj in
*.lo) func_lo2o "$libobj"; obj=$func_lo2o_result ;;
*)
func_fatal_error "cannot determine name of library object from \`$libobj'"
;;
esac
func_infer_tag $base_compile
for arg in $later; do
case $arg in
-shared)
test "$build_libtool_libs" != yes && \
func_fatal_configuration "can not build a shared library"
build_old_libs=no
continue
;;
-static)
build_libtool_libs=no
build_old_libs=yes
continue
;;
-prefer-pic)
pic_mode=yes
continue
;;
-prefer-non-pic)
pic_mode=no
continue
;;
esac
done
func_quote_for_eval "$libobj"
test "X$libobj" != "X$func_quote_for_eval_result" \
&& $ECHO "X$libobj" | $GREP '[]~#^*{};<>?"'"'"' &()|`$[]' \
&& func_warning "libobj name \`$libobj' may not contain shell special characters."
func_dirname_and_basename "$obj" "/" ""
objname="$func_basename_result"
xdir="$func_dirname_result"
lobj=${xdir}$objdir/$objname
test -z "$base_compile" && \
func_fatal_help "you must specify a compilation command"
# Delete any leftover library objects.
if test "$build_old_libs" = yes; then
removelist="$obj $lobj $libobj ${libobj}T"
else
removelist="$lobj $libobj ${libobj}T"
fi
# On Cygwin there's no "real" PIC flag so we must build both object types
case $host_os in
cygwin* | mingw* | pw32* | os2* | cegcc*)
pic_mode=default
;;
esac
if test "$pic_mode" = no && test "$deplibs_check_method" != pass_all; then
# non-PIC code in shared libraries is not supported
pic_mode=default
fi
# Calculate the filename of the output object if compiler does
# not support -o with -c
if test "$compiler_c_o" = no; then
output_obj=`$ECHO "$srcfile" | $SED 's%^.*/%%; s%\.[^.]*$%%'`.${objext}
lockfile="$output_obj.lock"
else
output_obj=
need_locks=no
lockfile=
fi
# Lock this critical section if it is needed
# We use this script file to make the link, it avoids creating a new file
if test "$need_locks" = yes; then
until $opt_dry_run || ln "$progpath" "$lockfile" 2>/dev/null; do
func_echo "Waiting for $lockfile to be removed"
sleep 2
done
elif test "$need_locks" = warn; then
if test -f "$lockfile"; then
$ECHO "\
*** ERROR, $lockfile exists and contains:
`cat $lockfile 2>/dev/null`
This indicates that another process is trying to use the same
temporary object file, and libtool could not work around it because
your compiler does not support \`-c' and \`-o' together. If you
repeat this compilation, it may succeed, by chance, but you had better
avoid parallel builds (make -j) in this platform, or get a better
compiler."
$opt_dry_run || $RM $removelist
exit $EXIT_FAILURE
fi
func_append removelist " $output_obj"
$ECHO "$srcfile" > "$lockfile"
fi
$opt_dry_run || $RM $removelist
func_append removelist " $lockfile"
trap '$opt_dry_run || $RM $removelist; exit $EXIT_FAILURE' 1 2 15
func_to_tool_file "$srcfile" func_convert_file_msys_to_w32
srcfile=$func_to_tool_file_result
func_quote_for_eval "$srcfile"
qsrcfile=$func_quote_for_eval_result
# Only build a PIC object if we are building libtool libraries.
if test "$build_libtool_libs" = yes; then
# Without this assignment, base_compile gets emptied.
fbsd_hideous_sh_bug=$base_compile
if test "$pic_mode" != no; then
command="$base_compile $qsrcfile $pic_flag"
else
# Don't build PIC code
command="$base_compile $qsrcfile"
fi
func_mkdir_p "$xdir$objdir"
if test -z "$output_obj"; then
# Place PIC objects in $objdir
func_append command " -o $lobj"
fi
func_show_eval_locale "$command" \
'test -n "$output_obj" && $RM $removelist; exit $EXIT_FAILURE'
if test "$need_locks" = warn &&
test "X`cat $lockfile 2>/dev/null`" != "X$srcfile"; then
$ECHO "\
*** ERROR, $lockfile contains:
`cat $lockfile 2>/dev/null`
but it should contain:
$srcfile
This indicates that another process is trying to use the same
temporary object file, and libtool could not work around it because
your compiler does not support \`-c' and \`-o' together. If you
repeat this compilation, it may succeed, by chance, but you had better
avoid parallel builds (make -j) in this platform, or get a better
compiler."
$opt_dry_run || $RM $removelist
exit $EXIT_FAILURE
fi
# Just move the object if needed, then go on to compile the next one
if test -n "$output_obj" && test "X$output_obj" != "X$lobj"; then
func_show_eval '$MV "$output_obj" "$lobj"' \
'error=$?; $opt_dry_run || $RM $removelist; exit $error'
fi
# Allow error messages only from the first compilation.
if test "$suppress_opt" = yes; then
suppress_output=' >/dev/null 2>&1'
fi
fi
# Only build a position-dependent object if we build old libraries.
if test "$build_old_libs" = yes; then
if test "$pic_mode" != yes; then
# Don't build PIC code
command="$base_compile $qsrcfile$pie_flag"
else
command="$base_compile $qsrcfile $pic_flag"
fi
if test "$compiler_c_o" = yes; then
func_append command " -o $obj"
fi
# Suppress compiler output if we already did a PIC compilation.
func_append command "$suppress_output"
func_show_eval_locale "$command" \
'$opt_dry_run || $RM $removelist; exit $EXIT_FAILURE'
if test "$need_locks" = warn &&
test "X`cat $lockfile 2>/dev/null`" != "X$srcfile"; then
$ECHO "\
*** ERROR, $lockfile contains:
`cat $lockfile 2>/dev/null`
but it should contain:
$srcfile
This indicates that another process is trying to use the same
temporary object file, and libtool could not work around it because
your compiler does not support \`-c' and \`-o' together. If you
repeat this compilation, it may succeed, by chance, but you had better
avoid parallel builds (make -j) in this platform, or get a better
compiler."
$opt_dry_run || $RM $removelist
exit $EXIT_FAILURE
fi
# Just move the object if needed
if test -n "$output_obj" && test "X$output_obj" != "X$obj"; then
func_show_eval '$MV "$output_obj" "$obj"' \
'error=$?; $opt_dry_run || $RM $removelist; exit $error'
fi
fi
$opt_dry_run || {
func_write_libtool_object "$libobj" "$objdir/$objname" "$objname"
# Unlock the critical section if it was locked
if test "$need_locks" != no; then
removelist=$lockfile
$RM "$lockfile"
fi
}
exit $EXIT_SUCCESS
}
$opt_help || {
test "$opt_mode" = compile && func_mode_compile ${1+"$@"}
}
func_mode_help ()
{
# We need to display help for each of the modes.
case $opt_mode in
"")
# Generic help is extracted from the usage comments
# at the start of this file.
func_help
;;
clean)
$ECHO \
"Usage: $progname [OPTION]... --mode=clean RM [RM-OPTION]... FILE...
Remove files from the build directory.
RM is the name of the program to use to delete files associated with each FILE
(typically \`/bin/rm'). RM-OPTIONS are options (such as \`-f') to be passed
to RM.
If FILE is a libtool library, object or program, all the files associated
with it are deleted. Otherwise, only FILE itself is deleted using RM."
;;
compile)
$ECHO \
"Usage: $progname [OPTION]... --mode=compile COMPILE-COMMAND... SOURCEFILE
Compile a source file into a libtool library object.
This mode accepts the following additional options:
-o OUTPUT-FILE set the output file name to OUTPUT-FILE
-no-suppress do not suppress compiler output for multiple passes
-prefer-pic try to build PIC objects only
-prefer-non-pic try to build non-PIC objects only
-shared do not build a \`.o' file suitable for static linking
-static only build a \`.o' file suitable for static linking
-Wc,FLAG pass FLAG directly to the compiler
COMPILE-COMMAND is a command to be used in creating a \`standard' object file
from the given SOURCEFILE.
The output file name is determined by removing the directory component from
SOURCEFILE, then substituting the C source code suffix \`.c' with the
library object suffix, \`.lo'."
;;
execute)
$ECHO \
"Usage: $progname [OPTION]... --mode=execute COMMAND [ARGS]...
Automatically set library path, then run a program.
This mode accepts the following additional options:
-dlopen FILE add the directory containing FILE to the library path
This mode sets the library path environment variable according to \`-dlopen'
flags.
If any of the ARGS are libtool executable wrappers, then they are translated
into their corresponding uninstalled binary, and any of their required library
directories are added to the library path.
Then, COMMAND is executed, with ARGS as arguments."
;;
finish)
$ECHO \
"Usage: $progname [OPTION]... --mode=finish [LIBDIR]...
Complete the installation of libtool libraries.
Each LIBDIR is a directory that contains libtool libraries.
The commands that this mode executes may require superuser privileges. Use
the \`--dry-run' option if you just want to see what would be executed."
;;
install)
$ECHO \
"Usage: $progname [OPTION]... --mode=install INSTALL-COMMAND...
Install executables or libraries.
INSTALL-COMMAND is the installation command. The first component should be
either the \`install' or \`cp' program.
The following components of INSTALL-COMMAND are treated specially:
-inst-prefix-dir PREFIX-DIR Use PREFIX-DIR as a staging area for installation
The rest of the components are interpreted as arguments to that command (only
BSD-compatible install options are recognized)."
;;
link)
$ECHO \
"Usage: $progname [OPTION]... --mode=link LINK-COMMAND...
Link object files or libraries together to form another library, or to
create an executable program.
LINK-COMMAND is a command using the C compiler that you would use to create
a program from several object files.
The following components of LINK-COMMAND are treated specially:
-all-static do not do any dynamic linking at all
-avoid-version do not add a version suffix if possible
-bindir BINDIR specify path to binaries directory (for systems where
libraries must be found in the PATH setting at runtime)
-dlopen FILE \`-dlpreopen' FILE if it cannot be dlopened at runtime
-dlpreopen FILE link in FILE and add its symbols to lt_preloaded_symbols
-export-dynamic allow symbols from OUTPUT-FILE to be resolved with dlsym(3)
-export-symbols SYMFILE
try to export only the symbols listed in SYMFILE
-export-symbols-regex REGEX
try to export only the symbols matching REGEX
-LLIBDIR search LIBDIR for required installed libraries
-lNAME OUTPUT-FILE requires the installed library libNAME
-module build a library that can dlopened
-no-fast-install disable the fast-install mode
-no-install link a not-installable executable
-no-undefined declare that a library does not refer to external symbols
-o OUTPUT-FILE create OUTPUT-FILE from the specified objects
-objectlist FILE Use a list of object files found in FILE to specify objects
-precious-files-regex REGEX
don't remove output files matching REGEX
-release RELEASE specify package release information
-rpath LIBDIR the created library will eventually be installed in LIBDIR
-R[ ]LIBDIR add LIBDIR to the runtime path of programs and libraries
-shared only do dynamic linking of libtool libraries
-shrext SUFFIX override the standard shared library file extension
-static do not do any dynamic linking of uninstalled libtool libraries
-static-libtool-libs
do not do any dynamic linking of libtool libraries
-version-info CURRENT[:REVISION[:AGE]]
specify library version info [each variable defaults to 0]
-weak LIBNAME declare that the target provides the LIBNAME interface
-Wc,FLAG
-Xcompiler FLAG pass linker-specific FLAG directly to the compiler
-Wl,FLAG
-Xlinker FLAG pass linker-specific FLAG directly to the linker
-XCClinker FLAG pass link-specific FLAG to the compiler driver (CC)
All other options (arguments beginning with \`-') are ignored.
Every other argument is treated as a filename. Files ending in \`.la' are
treated as uninstalled libtool libraries, other files are standard or library
object files.
If the OUTPUT-FILE ends in \`.la', then a libtool library is created,
only library objects (\`.lo' files) may be specified, and \`-rpath' is
required, except when creating a convenience library.
If OUTPUT-FILE ends in \`.a' or \`.lib', then a standard library is created
using \`ar' and \`ranlib', or on Windows using \`lib'.
If OUTPUT-FILE ends in \`.lo' or \`.${objext}', then a reloadable object file
is created, otherwise an executable program is created."
;;
uninstall)
$ECHO \
"Usage: $progname [OPTION]... --mode=uninstall RM [RM-OPTION]... FILE...
Remove libraries from an installation directory.
RM is the name of the program to use to delete files associated with each FILE
(typically \`/bin/rm'). RM-OPTIONS are options (such as \`-f') to be passed
to RM.
If FILE is a libtool library, all the files associated with it are deleted.
Otherwise, only FILE itself is deleted using RM."
;;
*)
func_fatal_help "invalid operation mode \`$opt_mode'"
;;
esac
echo
$ECHO "Try \`$progname --help' for more information about other modes."
}
# Now that we've collected a possible --mode arg, show help if necessary
if $opt_help; then
if test "$opt_help" = :; then
func_mode_help
else
{
func_help noexit
for opt_mode in compile link execute install finish uninstall clean; do
func_mode_help
done
} | sed -n '1p; 2,$s/^Usage:/ or: /p'
{
func_help noexit
for opt_mode in compile link execute install finish uninstall clean; do
echo
func_mode_help
done
} |
sed '1d
/^When reporting/,/^Report/{
H
d
}
$x
/information about other modes/d
/more detailed .*MODE/d
s/^Usage:.*--mode=\([^ ]*\) .*/Description of \1 mode:/'
fi
exit $?
fi
# func_mode_execute arg...
func_mode_execute ()
{
$opt_debug
# The first argument is the command name.
cmd="$nonopt"
test -z "$cmd" && \
func_fatal_help "you must specify a COMMAND"
# Handle -dlopen flags immediately.
for file in $opt_dlopen; do
test -f "$file" \
|| func_fatal_help "\`$file' is not a file"
dir=
case $file in
*.la)
func_resolve_sysroot "$file"
file=$func_resolve_sysroot_result
# Check to see that this really is a libtool archive.
func_lalib_unsafe_p "$file" \
|| func_fatal_help "\`$lib' is not a valid libtool archive"
# Read the libtool library.
dlname=
library_names=
func_source "$file"
# Skip this library if it cannot be dlopened.
if test -z "$dlname"; then
# Warn if it was a shared library.
test -n "$library_names" && \
func_warning "\`$file' was not linked with \`-export-dynamic'"
continue
fi
func_dirname "$file" "" "."
dir="$func_dirname_result"
if test -f "$dir/$objdir/$dlname"; then
func_append dir "/$objdir"
else
if test ! -f "$dir/$dlname"; then
func_fatal_error "cannot find \`$dlname' in \`$dir' or \`$dir/$objdir'"
fi
fi
;;
*.lo)
# Just add the directory containing the .lo file.
func_dirname "$file" "" "."
dir="$func_dirname_result"
;;
*)
func_warning "\`-dlopen' is ignored for non-libtool libraries and objects"
continue
;;
esac
# Get the absolute pathname.
absdir=`cd "$dir" && pwd`
test -n "$absdir" && dir="$absdir"
# Now add the directory to shlibpath_var.
if eval "test -z \"\$$shlibpath_var\""; then
eval "$shlibpath_var=\"\$dir\""
else
eval "$shlibpath_var=\"\$dir:\$$shlibpath_var\""
fi
done
# This variable tells wrapper scripts just to set shlibpath_var
# rather than running their programs.
libtool_execute_magic="$magic"
# Check if any of the arguments is a wrapper script.
args=
for file
do
case $file in
-* | *.la | *.lo ) ;;
*)
# Do a test to see if this is really a libtool program.
if func_ltwrapper_script_p "$file"; then
func_source "$file"
# Transform arg to wrapped name.
file="$progdir/$program"
elif func_ltwrapper_executable_p "$file"; then
func_ltwrapper_scriptname "$file"
func_source "$func_ltwrapper_scriptname_result"
# Transform arg to wrapped name.
file="$progdir/$program"
fi
;;
esac
# Quote arguments (to preserve shell metacharacters).
func_append_quoted args "$file"
done
if test "X$opt_dry_run" = Xfalse; then
if test -n "$shlibpath_var"; then
# Export the shlibpath_var.
eval "export $shlibpath_var"
fi
# Restore saved environment variables
for lt_var in LANG LANGUAGE LC_ALL LC_CTYPE LC_COLLATE LC_MESSAGES
do
eval "if test \"\${save_$lt_var+set}\" = set; then
$lt_var=\$save_$lt_var; export $lt_var
else
$lt_unset $lt_var
fi"
done
# Now prepare to actually exec the command.
exec_cmd="\$cmd$args"
else
# Display what would be done.
if test -n "$shlibpath_var"; then
eval "\$ECHO \"\$shlibpath_var=\$$shlibpath_var\""
echo "export $shlibpath_var"
fi
$ECHO "$cmd$args"
exit $EXIT_SUCCESS
fi
}
test "$opt_mode" = execute && func_mode_execute ${1+"$@"}
# func_mode_finish arg...
func_mode_finish ()
{
$opt_debug
libs=
libdirs=
admincmds=
for opt in "$nonopt" ${1+"$@"}
do
if test -d "$opt"; then
func_append libdirs " $opt"
elif test -f "$opt"; then
if func_lalib_unsafe_p "$opt"; then
func_append libs " $opt"
else
func_warning "\`$opt' is not a valid libtool archive"
fi
else
func_fatal_error "invalid argument \`$opt'"
fi
done
if test -n "$libs"; then
if test -n "$lt_sysroot"; then
sysroot_regex=`$ECHO "$lt_sysroot" | $SED "$sed_make_literal_regex"`
sysroot_cmd="s/\([ ']\)$sysroot_regex/\1/g;"
else
sysroot_cmd=
fi
# Remove sysroot references
if $opt_dry_run; then
for lib in $libs; do
echo "removing references to $lt_sysroot and \`=' prefixes from $lib"
done
else
tmpdir=`func_mktempdir`
for lib in $libs; do
sed -e "${sysroot_cmd} s/\([ ']-[LR]\)=/\1/g; s/\([ ']\)=/\1/g" $lib \
> $tmpdir/tmp-la
mv -f $tmpdir/tmp-la $lib
done
${RM}r "$tmpdir"
fi
fi
if test -n "$finish_cmds$finish_eval" && test -n "$libdirs"; then
for libdir in $libdirs; do
if test -n "$finish_cmds"; then
# Do each command in the finish commands.
func_execute_cmds "$finish_cmds" 'admincmds="$admincmds
'"$cmd"'"'
fi
if test -n "$finish_eval"; then
# Do the single finish_eval.
eval cmds=\"$finish_eval\"
$opt_dry_run || eval "$cmds" || func_append admincmds "
$cmds"
fi
done
fi
# Exit here if they wanted silent mode.
$opt_silent && exit $EXIT_SUCCESS
if test -n "$finish_cmds$finish_eval" && test -n "$libdirs"; then
echo "----------------------------------------------------------------------"
echo "Libraries have been installed in:"
for libdir in $libdirs; do
$ECHO " $libdir"
done
echo
echo "If you ever happen to want to link against installed libraries"
echo "in a given directory, LIBDIR, you must either use libtool, and"
echo "specify the full pathname of the library, or use the \`-LLIBDIR'"
echo "flag during linking and do at least one of the following:"
if test -n "$shlibpath_var"; then
echo " - add LIBDIR to the \`$shlibpath_var' environment variable"
echo " during execution"
fi
if test -n "$runpath_var"; then
echo " - add LIBDIR to the \`$runpath_var' environment variable"
echo " during linking"
fi
if test -n "$hardcode_libdir_flag_spec"; then
libdir=LIBDIR
eval flag=\"$hardcode_libdir_flag_spec\"
$ECHO " - use the \`$flag' linker flag"
fi
if test -n "$admincmds"; then
$ECHO " - have your system administrator run these commands:$admincmds"
fi
if test -f /etc/ld.so.conf; then
echo " - have your system administrator add LIBDIR to \`/etc/ld.so.conf'"
fi
echo
echo "See any operating system documentation about shared libraries for"
case $host in
solaris2.[6789]|solaris2.1[0-9])
echo "more information, such as the ld(1), crle(1) and ld.so(8) manual"
echo "pages."
;;
*)
echo "more information, such as the ld(1) and ld.so(8) manual pages."
;;
esac
echo "----------------------------------------------------------------------"
fi
exit $EXIT_SUCCESS
}
test "$opt_mode" = finish && func_mode_finish ${1+"$@"}
# func_mode_install arg...
func_mode_install ()
{
$opt_debug
# There may be an optional sh(1) argument at the beginning of
# install_prog (especially on Windows NT).
if test "$nonopt" = "$SHELL" || test "$nonopt" = /bin/sh ||
# Allow the use of GNU shtool's install command.
case $nonopt in *shtool*) :;; *) false;; esac; then
# Aesthetically quote it.
func_quote_for_eval "$nonopt"
install_prog="$func_quote_for_eval_result "
arg=$1
shift
else
install_prog=
arg=$nonopt
fi
# The real first argument should be the name of the installation program.
# Aesthetically quote it.
func_quote_for_eval "$arg"
func_append install_prog "$func_quote_for_eval_result"
install_shared_prog=$install_prog
case " $install_prog " in
*[\\\ /]cp\ *) install_cp=: ;;
*) install_cp=false ;;
esac
# We need to accept at least all the BSD install flags.
dest=
files=
opts=
prev=
install_type=
isdir=no
stripme=
no_mode=:
for arg
do
arg2=
if test -n "$dest"; then
func_append files " $dest"
dest=$arg
continue
fi
case $arg in
-d) isdir=yes ;;
-f)
if $install_cp; then :; else
prev=$arg
fi
;;
-g | -m | -o)
prev=$arg
;;
-s)
stripme=" -s"
continue
;;
-*)
;;
*)
# If the previous option needed an argument, then skip it.
if test -n "$prev"; then
if test "x$prev" = x-m && test -n "$install_override_mode"; then
arg2=$install_override_mode
no_mode=false
fi
prev=
else
dest=$arg
continue
fi
;;
esac
# Aesthetically quote the argument.
func_quote_for_eval "$arg"
func_append install_prog " $func_quote_for_eval_result"
if test -n "$arg2"; then
func_quote_for_eval "$arg2"
fi
func_append install_shared_prog " $func_quote_for_eval_result"
done
test -z "$install_prog" && \
func_fatal_help "you must specify an install program"
test -n "$prev" && \
func_fatal_help "the \`$prev' option requires an argument"
if test -n "$install_override_mode" && $no_mode; then
if $install_cp; then :; else
func_quote_for_eval "$install_override_mode"
func_append install_shared_prog " -m $func_quote_for_eval_result"
fi
fi
if test -z "$files"; then
if test -z "$dest"; then
func_fatal_help "no file or destination specified"
else
func_fatal_help "you must specify a destination"
fi
fi
# Strip any trailing slash from the destination.
func_stripname '' '/' "$dest"
dest=$func_stripname_result
# Check to see that the destination is a directory.
test -d "$dest" && isdir=yes
if test "$isdir" = yes; then
destdir="$dest"
destname=
else
func_dirname_and_basename "$dest" "" "."
destdir="$func_dirname_result"
destname="$func_basename_result"
# Not a directory, so check to see that there is only one file specified.
set dummy $files; shift
test "$#" -gt 1 && \
func_fatal_help "\`$dest' is not a directory"
fi
case $destdir in
[\\/]* | [A-Za-z]:[\\/]*) ;;
*)
for file in $files; do
case $file in
*.lo) ;;
*)
func_fatal_help "\`$destdir' must be an absolute directory name"
;;
esac
done
;;
esac
# This variable tells wrapper scripts just to set variables rather
# than running their programs.
libtool_install_magic="$magic"
staticlibs=
future_libdirs=
current_libdirs=
for file in $files; do
# Do each installation.
case $file in
*.$libext)
# Do the static libraries later.
func_append staticlibs " $file"
;;
*.la)
func_resolve_sysroot "$file"
file=$func_resolve_sysroot_result
# Check to see that this really is a libtool archive.
func_lalib_unsafe_p "$file" \
|| func_fatal_help "\`$file' is not a valid libtool archive"
library_names=
old_library=
relink_command=
func_source "$file"
# Add the libdir to current_libdirs if it is the destination.
if test "X$destdir" = "X$libdir"; then
case "$current_libdirs " in
*" $libdir "*) ;;
*) func_append current_libdirs " $libdir" ;;
esac
else
# Note the libdir as a future libdir.
case "$future_libdirs " in
*" $libdir "*) ;;
*) func_append future_libdirs " $libdir" ;;
esac
fi
func_dirname "$file" "/" ""
dir="$func_dirname_result"
func_append dir "$objdir"
if test -n "$relink_command"; then
# Determine the prefix the user has applied to our future dir.
inst_prefix_dir=`$ECHO "$destdir" | $SED -e "s%$libdir\$%%"`
# Don't allow the user to place us outside of our expected
# location b/c this prevents finding dependent libraries that
# are installed to the same prefix.
# At present, this check doesn't affect windows .dll's that
# are installed into $libdir/../bin (currently, that works fine)
# but it's something to keep an eye on.
test "$inst_prefix_dir" = "$destdir" && \
func_fatal_error "error: cannot install \`$file' to a directory not ending in $libdir"
if test -n "$inst_prefix_dir"; then
# Stick the inst_prefix_dir data into the link command.
relink_command=`$ECHO "$relink_command" | $SED "s%@inst_prefix_dir@%-inst-prefix-dir $inst_prefix_dir%"`
else
relink_command=`$ECHO "$relink_command" | $SED "s%@inst_prefix_dir@%%"`
fi
func_warning "relinking \`$file'"
func_show_eval "$relink_command" \
'func_fatal_error "error: relink \`$file'\'' with the above command before installing it"'
fi
# See the names of the shared library.
set dummy $library_names; shift
if test -n "$1"; then
realname="$1"
shift
srcname="$realname"
test -n "$relink_command" && srcname="$realname"T
# Install the shared library and build the symlinks.
func_show_eval "$install_shared_prog $dir/$srcname $destdir/$realname" \
'exit $?'
tstripme="$stripme"
case $host_os in
cygwin* | mingw* | pw32* | cegcc*)
case $realname in
*.dll.a)
tstripme=""
;;
esac
;;
esac
if test -n "$tstripme" && test -n "$striplib"; then
func_show_eval "$striplib $destdir/$realname" 'exit $?'
fi
if test "$#" -gt 0; then
# Delete the old symlinks, and create new ones.
# Try `ln -sf' first, because the `ln' binary might depend on
# the symlink we replace! Solaris /bin/ln does not understand -f,
# so we also need to try rm && ln -s.
for linkname
do
test "$linkname" != "$realname" \
&& func_show_eval "(cd $destdir && { $LN_S -f $realname $linkname || { $RM $linkname && $LN_S $realname $linkname; }; })"
done
fi
# Do each command in the postinstall commands.
lib="$destdir/$realname"
func_execute_cmds "$postinstall_cmds" 'exit $?'
fi
# Install the pseudo-library for information purposes.
func_basename "$file"
name="$func_basename_result"
instname="$dir/$name"i
func_show_eval "$install_prog $instname $destdir/$name" 'exit $?'
# Maybe install the static library, too.
test -n "$old_library" && func_append staticlibs " $dir/$old_library"
;;
*.lo)
# Install (i.e. copy) a libtool object.
# Figure out destination file name, if it wasn't already specified.
if test -n "$destname"; then
destfile="$destdir/$destname"
else
func_basename "$file"
destfile="$func_basename_result"
destfile="$destdir/$destfile"
fi
# Deduce the name of the destination old-style object file.
case $destfile in
*.lo)
func_lo2o "$destfile"
staticdest=$func_lo2o_result
;;
*.$objext)
staticdest="$destfile"
destfile=
;;
*)
func_fatal_help "cannot copy a libtool object to \`$destfile'"
;;
esac
# Install the libtool object if requested.
test -n "$destfile" && \
func_show_eval "$install_prog $file $destfile" 'exit $?'
# Install the old object if enabled.
if test "$build_old_libs" = yes; then
# Deduce the name of the old-style object file.
func_lo2o "$file"
staticobj=$func_lo2o_result
func_show_eval "$install_prog \$staticobj \$staticdest" 'exit $?'
fi
exit $EXIT_SUCCESS
;;
*)
# Figure out destination file name, if it wasn't already specified.
if test -n "$destname"; then
destfile="$destdir/$destname"
else
func_basename "$file"
destfile="$func_basename_result"
destfile="$destdir/$destfile"
fi
# If the file is missing, and there is a .exe on the end, strip it
# because it is most likely a libtool script we actually want to
# install
stripped_ext=""
case $file in
*.exe)
if test ! -f "$file"; then
func_stripname '' '.exe' "$file"
file=$func_stripname_result
stripped_ext=".exe"
fi
;;
esac
# Do a test to see if this is really a libtool program.
case $host in
*cygwin* | *mingw*)
if func_ltwrapper_executable_p "$file"; then
func_ltwrapper_scriptname "$file"
wrapper=$func_ltwrapper_scriptname_result
else
func_stripname '' '.exe' "$file"
wrapper=$func_stripname_result
fi
;;
*)
wrapper=$file
;;
esac
if func_ltwrapper_script_p "$wrapper"; then
notinst_deplibs=
relink_command=
func_source "$wrapper"
# Check the variables that should have been set.
test -z "$generated_by_libtool_version" && \
func_fatal_error "invalid libtool wrapper script \`$wrapper'"
finalize=yes
for lib in $notinst_deplibs; do
# Check to see that each library is installed.
libdir=
if test -f "$lib"; then
func_source "$lib"
fi
libfile="$libdir/"`$ECHO "$lib" | $SED 's%^.*/%%g'` ### testsuite: skip nested quoting test
if test -n "$libdir" && test ! -f "$libfile"; then
func_warning "\`$lib' has not been installed in \`$libdir'"
finalize=no
fi
done
relink_command=
func_source "$wrapper"
outputname=
if test "$fast_install" = no && test -n "$relink_command"; then
$opt_dry_run || {
if test "$finalize" = yes; then
tmpdir=`func_mktempdir`
func_basename "$file$stripped_ext"
file="$func_basename_result"
outputname="$tmpdir/$file"
# Replace the output file specification.
relink_command=`$ECHO "$relink_command" | $SED 's%@OUTPUT@%'"$outputname"'%g'`
$opt_silent || {
func_quote_for_expand "$relink_command"
eval "func_echo $func_quote_for_expand_result"
}
if eval "$relink_command"; then :
else
func_error "error: relink \`$file' with the above command before installing it"
$opt_dry_run || ${RM}r "$tmpdir"
continue
fi
file="$outputname"
else
func_warning "cannot relink \`$file'"
fi
}
else
# Install the binary that we compiled earlier.
file=`$ECHO "$file$stripped_ext" | $SED "s%\([^/]*\)$%$objdir/\1%"`
fi
fi
# remove .exe since cygwin /usr/bin/install will append another
# one anyway
case $install_prog,$host in
*/usr/bin/install*,*cygwin*)
case $file:$destfile in
*.exe:*.exe)
# this is ok
;;
*.exe:*)
destfile=$destfile.exe
;;
*:*.exe)
func_stripname '' '.exe' "$destfile"
destfile=$func_stripname_result
;;
esac
;;
esac
func_show_eval "$install_prog\$stripme \$file \$destfile" 'exit $?'
$opt_dry_run || if test -n "$outputname"; then
${RM}r "$tmpdir"
fi
;;
esac
done
for file in $staticlibs; do
func_basename "$file"
name="$func_basename_result"
# Set up the ranlib parameters.
oldlib="$destdir/$name"
func_to_tool_file "$oldlib" func_convert_file_msys_to_w32
tool_oldlib=$func_to_tool_file_result
func_show_eval "$install_prog \$file \$oldlib" 'exit $?'
if test -n "$stripme" && test -n "$old_striplib"; then
func_show_eval "$old_striplib $tool_oldlib" 'exit $?'
fi
# Do each command in the postinstall commands.
func_execute_cmds "$old_postinstall_cmds" 'exit $?'
done
test -n "$future_libdirs" && \
func_warning "remember to run \`$progname --finish$future_libdirs'"
if test -n "$current_libdirs"; then
# Maybe just do a dry run.
$opt_dry_run && current_libdirs=" -n$current_libdirs"
exec_cmd='$SHELL $progpath $preserve_args --finish$current_libdirs'
else
exit $EXIT_SUCCESS
fi
}
test "$opt_mode" = install && func_mode_install ${1+"$@"}
# func_generate_dlsyms outputname originator pic_p
# Extract symbols from dlprefiles and create ${outputname}S.o with
# a dlpreopen symbol table.
func_generate_dlsyms ()
{
$opt_debug
my_outputname="$1"
my_originator="$2"
my_pic_p="${3-no}"
my_prefix=`$ECHO "$my_originator" | sed 's%[^a-zA-Z0-9]%_%g'`
my_dlsyms=
if test -n "$dlfiles$dlprefiles" || test "$dlself" != no; then
if test -n "$NM" && test -n "$global_symbol_pipe"; then
my_dlsyms="${my_outputname}S.c"
else
func_error "not configured to extract global symbols from dlpreopened files"
fi
fi
if test -n "$my_dlsyms"; then
case $my_dlsyms in
"") ;;
*.c)
# Discover the nlist of each of the dlfiles.
nlist="$output_objdir/${my_outputname}.nm"
func_show_eval "$RM $nlist ${nlist}S ${nlist}T"
# Parse the name list into a source file.
func_verbose "creating $output_objdir/$my_dlsyms"
$opt_dry_run || $ECHO > "$output_objdir/$my_dlsyms" "\
/* $my_dlsyms - symbol resolution table for \`$my_outputname' dlsym emulation. */
/* Generated by $PROGRAM (GNU $PACKAGE$TIMESTAMP) $VERSION */
#ifdef __cplusplus
extern \"C\" {
#endif
#if defined(__GNUC__) && (((__GNUC__ == 4) && (__GNUC_MINOR__ >= 4)) || (__GNUC__ > 4))
#pragma GCC diagnostic ignored \"-Wstrict-prototypes\"
#endif
/* Keep this code in sync between libtool.m4, ltmain, lt_system.h, and tests. */
#if defined(_WIN32) || defined(__CYGWIN__) || defined(_WIN32_WCE)
/* DATA imports from DLLs on WIN32 con't be const, because runtime
relocations are performed -- see ld's documentation on pseudo-relocs. */
# define LT_DLSYM_CONST
#elif defined(__osf__)
/* This system does not cope well with relocations in const data. */
# define LT_DLSYM_CONST
#else
# define LT_DLSYM_CONST const
#endif
/* External symbol declarations for the compiler. */\
"
if test "$dlself" = yes; then
func_verbose "generating symbol list for \`$output'"
$opt_dry_run || echo ': @PROGRAM@ ' > "$nlist"
# Add our own program objects to the symbol list.
progfiles=`$ECHO "$objs$old_deplibs" | $SP2NL | $SED "$lo2o" | $NL2SP`
for progfile in $progfiles; do
func_to_tool_file "$progfile" func_convert_file_msys_to_w32
func_verbose "extracting global C symbols from \`$func_to_tool_file_result'"
$opt_dry_run || eval "$NM $func_to_tool_file_result | $global_symbol_pipe >> '$nlist'"
done
if test -n "$exclude_expsyms"; then
$opt_dry_run || {
eval '$EGREP -v " ($exclude_expsyms)$" "$nlist" > "$nlist"T'
eval '$MV "$nlist"T "$nlist"'
}
fi
if test -n "$export_symbols_regex"; then
$opt_dry_run || {
eval '$EGREP -e "$export_symbols_regex" "$nlist" > "$nlist"T'
eval '$MV "$nlist"T "$nlist"'
}
fi
# Prepare the list of exported symbols
if test -z "$export_symbols"; then
export_symbols="$output_objdir/$outputname.exp"
$opt_dry_run || {
$RM $export_symbols
eval "${SED} -n -e '/^: @PROGRAM@ $/d' -e 's/^.* \(.*\)$/\1/p' "'< "$nlist" > "$export_symbols"'
case $host in
*cygwin* | *mingw* | *cegcc* )
eval "echo EXPORTS "'> "$output_objdir/$outputname.def"'
eval 'cat "$export_symbols" >> "$output_objdir/$outputname.def"'
;;
esac
}
else
$opt_dry_run || {
eval "${SED} -e 's/\([].[*^$]\)/\\\\\1/g' -e 's/^/ /' -e 's/$/$/'"' < "$export_symbols" > "$output_objdir/$outputname.exp"'
eval '$GREP -f "$output_objdir/$outputname.exp" < "$nlist" > "$nlist"T'
eval '$MV "$nlist"T "$nlist"'
case $host in
*cygwin* | *mingw* | *cegcc* )
eval "echo EXPORTS "'> "$output_objdir/$outputname.def"'
eval 'cat "$nlist" >> "$output_objdir/$outputname.def"'
;;
esac
}
fi
fi
for dlprefile in $dlprefiles; do
func_verbose "extracting global C symbols from \`$dlprefile'"
func_basename "$dlprefile"
name="$func_basename_result"
case $host in
*cygwin* | *mingw* | *cegcc* )
# if an import library, we need to obtain dlname
if func_win32_import_lib_p "$dlprefile"; then
func_tr_sh "$dlprefile"
eval "curr_lafile=\$libfile_$func_tr_sh_result"
dlprefile_dlbasename=""
if test -n "$curr_lafile" && func_lalib_p "$curr_lafile"; then
# Use subshell, to avoid clobbering current variable values
dlprefile_dlname=`source "$curr_lafile" && echo "$dlname"`
if test -n "$dlprefile_dlname" ; then
func_basename "$dlprefile_dlname"
dlprefile_dlbasename="$func_basename_result"
else
# no lafile. user explicitly requested -dlpreopen .
$sharedlib_from_linklib_cmd "$dlprefile"
dlprefile_dlbasename=$sharedlib_from_linklib_result
fi
fi
$opt_dry_run || {
if test -n "$dlprefile_dlbasename" ; then
eval '$ECHO ": $dlprefile_dlbasename" >> "$nlist"'
else
func_warning "Could not compute DLL name from $name"
eval '$ECHO ": $name " >> "$nlist"'
fi
func_to_tool_file "$dlprefile" func_convert_file_msys_to_w32
eval "$NM \"$func_to_tool_file_result\" 2>/dev/null | $global_symbol_pipe |
$SED -e '/I __imp/d' -e 's/I __nm_/D /;s/_nm__//' >> '$nlist'"
}
else # not an import lib
$opt_dry_run || {
eval '$ECHO ": $name " >> "$nlist"'
func_to_tool_file "$dlprefile" func_convert_file_msys_to_w32
eval "$NM \"$func_to_tool_file_result\" 2>/dev/null | $global_symbol_pipe >> '$nlist'"
}
fi
;;
*)
$opt_dry_run || {
eval '$ECHO ": $name " >> "$nlist"'
func_to_tool_file "$dlprefile" func_convert_file_msys_to_w32
eval "$NM \"$func_to_tool_file_result\" 2>/dev/null | $global_symbol_pipe >> '$nlist'"
}
;;
esac
done
$opt_dry_run || {
# Make sure we have at least an empty file.
test -f "$nlist" || : > "$nlist"
if test -n "$exclude_expsyms"; then
$EGREP -v " ($exclude_expsyms)$" "$nlist" > "$nlist"T
$MV "$nlist"T "$nlist"
fi
# Try sorting and uniquifying the output.
if $GREP -v "^: " < "$nlist" |
if sort -k 3 /dev/null 2>&1; then
sort -k 3
else
sort +2
fi |
uniq > "$nlist"S; then
:
else
$GREP -v "^: " < "$nlist" > "$nlist"S
fi
if test -f "$nlist"S; then
eval "$global_symbol_to_cdecl"' < "$nlist"S >> "$output_objdir/$my_dlsyms"'
else
echo '/* NONE */' >> "$output_objdir/$my_dlsyms"
fi
echo >> "$output_objdir/$my_dlsyms" "\
/* The mapping between symbol names and symbols. */
typedef struct {
const char *name;
void *address;
} lt_dlsymlist;
extern LT_DLSYM_CONST lt_dlsymlist
lt_${my_prefix}_LTX_preloaded_symbols[];
LT_DLSYM_CONST lt_dlsymlist
lt_${my_prefix}_LTX_preloaded_symbols[] =
{\
{ \"$my_originator\", (void *) 0 },"
case $need_lib_prefix in
no)
eval "$global_symbol_to_c_name_address" < "$nlist" >> "$output_objdir/$my_dlsyms"
;;
*)
eval "$global_symbol_to_c_name_address_lib_prefix" < "$nlist" >> "$output_objdir/$my_dlsyms"
;;
esac
echo >> "$output_objdir/$my_dlsyms" "\
{0, (void *) 0}
};
/* This works around a problem in FreeBSD linker */
#ifdef FREEBSD_WORKAROUND
static const void *lt_preloaded_setup() {
return lt_${my_prefix}_LTX_preloaded_symbols;
}
#endif
#ifdef __cplusplus
}
#endif\
"
} # !$opt_dry_run
pic_flag_for_symtable=
case "$compile_command " in
*" -static "*) ;;
*)
case $host in
# compiling the symbol table file with pic_flag works around
# a FreeBSD bug that causes programs to crash when -lm is
# linked before any other PIC object. But we must not use
# pic_flag when linking with -static. The problem exists in
# FreeBSD 2.2.6 and is fixed in FreeBSD 3.1.
*-*-freebsd2.*|*-*-freebsd3.0*|*-*-freebsdelf3.0*)
pic_flag_for_symtable=" $pic_flag -DFREEBSD_WORKAROUND" ;;
*-*-hpux*)
pic_flag_for_symtable=" $pic_flag" ;;
*)
if test "X$my_pic_p" != Xno; then
pic_flag_for_symtable=" $pic_flag"
fi
;;
esac
;;
esac
symtab_cflags=
for arg in $LTCFLAGS; do
case $arg in
-pie | -fpie | -fPIE) ;;
*) func_append symtab_cflags " $arg" ;;
esac
done
# Now compile the dynamic symbol file.
func_show_eval '(cd $output_objdir && $LTCC$symtab_cflags -c$no_builtin_flag$pic_flag_for_symtable "$my_dlsyms")' 'exit $?'
# Clean up the generated files.
func_show_eval '$RM "$output_objdir/$my_dlsyms" "$nlist" "${nlist}S" "${nlist}T"'
# Transform the symbol file into the correct name.
symfileobj="$output_objdir/${my_outputname}S.$objext"
case $host in
*cygwin* | *mingw* | *cegcc* )
if test -f "$output_objdir/$my_outputname.def"; then
compile_command=`$ECHO "$compile_command" | $SED "s%@SYMFILE@%$output_objdir/$my_outputname.def $symfileobj%"`
finalize_command=`$ECHO "$finalize_command" | $SED "s%@SYMFILE@%$output_objdir/$my_outputname.def $symfileobj%"`
else
compile_command=`$ECHO "$compile_command" | $SED "s%@SYMFILE@%$symfileobj%"`
finalize_command=`$ECHO "$finalize_command" | $SED "s%@SYMFILE@%$symfileobj%"`
fi
;;
*)
compile_command=`$ECHO "$compile_command" | $SED "s%@SYMFILE@%$symfileobj%"`
finalize_command=`$ECHO "$finalize_command" | $SED "s%@SYMFILE@%$symfileobj%"`
;;
esac
;;
*)
func_fatal_error "unknown suffix for \`$my_dlsyms'"
;;
esac
else
# We keep going just in case the user didn't refer to
# lt_preloaded_symbols. The linker will fail if global_symbol_pipe
# really was required.
# Nullify the symbol file.
compile_command=`$ECHO "$compile_command" | $SED "s% @SYMFILE@%%"`
finalize_command=`$ECHO "$finalize_command" | $SED "s% @SYMFILE@%%"`
fi
}
# func_win32_libid arg
# return the library type of file 'arg'
#
# Need a lot of goo to handle *both* DLLs and import libs
# Has to be a shell function in order to 'eat' the argument
# that is supplied when $file_magic_command is called.
# Despite the name, also deal with 64 bit binaries.
func_win32_libid ()
{
$opt_debug
win32_libid_type="unknown"
win32_fileres=`file -L $1 2>/dev/null`
case $win32_fileres in
*ar\ archive\ import\ library*) # definitely import
win32_libid_type="x86 archive import"
;;
*ar\ archive*) # could be an import, or static
# Keep the egrep pattern in sync with the one in _LT_CHECK_MAGIC_METHOD.
if eval $OBJDUMP -f $1 | $SED -e '10q' 2>/dev/null |
$EGREP 'file format (pei*-i386(.*architecture: i386)?|pe-arm-wince|pe-x86-64)' >/dev/null; then
func_to_tool_file "$1" func_convert_file_msys_to_w32
win32_nmres=`eval $NM -f posix -A \"$func_to_tool_file_result\" |
$SED -n -e '
1,100{
/ I /{
s,.*,import,
p
q
}
}'`
case $win32_nmres in
import*) win32_libid_type="x86 archive import";;
*) win32_libid_type="x86 archive static";;
esac
fi
;;
*DLL*)
win32_libid_type="x86 DLL"
;;
*executable*) # but shell scripts are "executable" too...
case $win32_fileres in
*MS\ Windows\ PE\ Intel*)
win32_libid_type="x86 DLL"
;;
esac
;;
esac
$ECHO "$win32_libid_type"
}
# func_cygming_dll_for_implib ARG
#
# Platform-specific function to extract the
# name of the DLL associated with the specified
# import library ARG.
# Invoked by eval'ing the libtool variable
# $sharedlib_from_linklib_cmd
# Result is available in the variable
# $sharedlib_from_linklib_result
func_cygming_dll_for_implib ()
{
$opt_debug
sharedlib_from_linklib_result=`$DLLTOOL --identify-strict --identify "$1"`
}
# func_cygming_dll_for_implib_fallback_core SECTION_NAME LIBNAMEs
#
# The is the core of a fallback implementation of a
# platform-specific function to extract the name of the
# DLL associated with the specified import library LIBNAME.
#
# SECTION_NAME is either .idata$6 or .idata$7, depending
# on the platform and compiler that created the implib.
#
# Echos the name of the DLL associated with the
# specified import library.
func_cygming_dll_for_implib_fallback_core ()
{
$opt_debug
match_literal=`$ECHO "$1" | $SED "$sed_make_literal_regex"`
$OBJDUMP -s --section "$1" "$2" 2>/dev/null |
$SED '/^Contents of section '"$match_literal"':/{
# Place marker at beginning of archive member dllname section
s/.*/====MARK====/
p
d
}
# These lines can sometimes be longer than 43 characters, but
# are always uninteresting
/:[ ]*file format pe[i]\{,1\}-/d
/^In archive [^:]*:/d
# Ensure marker is printed
/^====MARK====/p
# Remove all lines with less than 43 characters
/^.\{43\}/!d
# From remaining lines, remove first 43 characters
s/^.\{43\}//' |
$SED -n '
# Join marker and all lines until next marker into a single line
/^====MARK====/ b para
H
$ b para
b
:para
x
s/\n//g
# Remove the marker
s/^====MARK====//
# Remove trailing dots and whitespace
s/[\. \t]*$//
# Print
/./p' |
# we now have a list, one entry per line, of the stringified
# contents of the appropriate section of all members of the
# archive which possess that section. Heuristic: eliminate
# all those which have a first or second character that is
# a '.' (that is, objdump's representation of an unprintable
# character.) This should work for all archives with less than
# 0x302f exports -- but will fail for DLLs whose name actually
# begins with a literal '.' or a single character followed by
# a '.'.
#
# Of those that remain, print the first one.
$SED -e '/^\./d;/^.\./d;q'
}
# func_cygming_gnu_implib_p ARG
# This predicate returns with zero status (TRUE) if
# ARG is a GNU/binutils-style import library. Returns
# with nonzero status (FALSE) otherwise.
func_cygming_gnu_implib_p ()
{
$opt_debug
func_to_tool_file "$1" func_convert_file_msys_to_w32
func_cygming_gnu_implib_tmp=`$NM "$func_to_tool_file_result" | eval "$global_symbol_pipe" | $EGREP ' (_head_[A-Za-z0-9_]+_[ad]l*|[A-Za-z0-9_]+_[ad]l*_iname)$'`
test -n "$func_cygming_gnu_implib_tmp"
}
# func_cygming_ms_implib_p ARG
# This predicate returns with zero status (TRUE) if
# ARG is an MS-style import library. Returns
# with nonzero status (FALSE) otherwise.
func_cygming_ms_implib_p ()
{
$opt_debug
func_to_tool_file "$1" func_convert_file_msys_to_w32
func_cygming_ms_implib_tmp=`$NM "$func_to_tool_file_result" | eval "$global_symbol_pipe" | $GREP '_NULL_IMPORT_DESCRIPTOR'`
test -n "$func_cygming_ms_implib_tmp"
}
# func_cygming_dll_for_implib_fallback ARG
# Platform-specific function to extract the
# name of the DLL associated with the specified
# import library ARG.
#
# This fallback implementation is for use when $DLLTOOL
# does not support the --identify-strict option.
# Invoked by eval'ing the libtool variable
# $sharedlib_from_linklib_cmd
# Result is available in the variable
# $sharedlib_from_linklib_result
func_cygming_dll_for_implib_fallback ()
{
$opt_debug
if func_cygming_gnu_implib_p "$1" ; then
# binutils import library
sharedlib_from_linklib_result=`func_cygming_dll_for_implib_fallback_core '.idata$7' "$1"`
elif func_cygming_ms_implib_p "$1" ; then
# ms-generated import library
sharedlib_from_linklib_result=`func_cygming_dll_for_implib_fallback_core '.idata$6' "$1"`
else
# unknown
sharedlib_from_linklib_result=""
fi
}
# func_extract_an_archive dir oldlib
func_extract_an_archive ()
{
$opt_debug
f_ex_an_ar_dir="$1"; shift
f_ex_an_ar_oldlib="$1"
if test "$lock_old_archive_extraction" = yes; then
lockfile=$f_ex_an_ar_oldlib.lock
until $opt_dry_run || ln "$progpath" "$lockfile" 2>/dev/null; do
func_echo "Waiting for $lockfile to be removed"
sleep 2
done
fi
func_show_eval "(cd \$f_ex_an_ar_dir && $AR x \"\$f_ex_an_ar_oldlib\")" \
'stat=$?; rm -f "$lockfile"; exit $stat'
if test "$lock_old_archive_extraction" = yes; then
$opt_dry_run || rm -f "$lockfile"
fi
if ($AR t "$f_ex_an_ar_oldlib" | sort | sort -uc >/dev/null 2>&1); then
:
else
func_fatal_error "object name conflicts in archive: $f_ex_an_ar_dir/$f_ex_an_ar_oldlib"
fi
}
# func_extract_archives gentop oldlib ...
func_extract_archives ()
{
$opt_debug
my_gentop="$1"; shift
my_oldlibs=${1+"$@"}
my_oldobjs=""
my_xlib=""
my_xabs=""
my_xdir=""
for my_xlib in $my_oldlibs; do
# Extract the objects.
case $my_xlib in
[\\/]* | [A-Za-z]:[\\/]*) my_xabs="$my_xlib" ;;
*) my_xabs=`pwd`"/$my_xlib" ;;
esac
func_basename "$my_xlib"
my_xlib="$func_basename_result"
my_xlib_u=$my_xlib
while :; do
case " $extracted_archives " in
*" $my_xlib_u "*)
func_arith $extracted_serial + 1
extracted_serial=$func_arith_result
my_xlib_u=lt$extracted_serial-$my_xlib ;;
*) break ;;
esac
done
extracted_archives="$extracted_archives $my_xlib_u"
my_xdir="$my_gentop/$my_xlib_u"
func_mkdir_p "$my_xdir"
case $host in
*-darwin*)
func_verbose "Extracting $my_xabs"
# Do not bother doing anything if just a dry run
$opt_dry_run || {
darwin_orig_dir=`pwd`
cd $my_xdir || exit $?
darwin_archive=$my_xabs
darwin_curdir=`pwd`
darwin_base_archive=`basename "$darwin_archive"`
darwin_arches=`$LIPO -info "$darwin_archive" 2>/dev/null | $GREP Architectures 2>/dev/null || true`
if test -n "$darwin_arches"; then
darwin_arches=`$ECHO "$darwin_arches" | $SED -e 's/.*are://'`
darwin_arch=
func_verbose "$darwin_base_archive has multiple architectures $darwin_arches"
for darwin_arch in $darwin_arches ; do
func_mkdir_p "unfat-$$/${darwin_base_archive}-${darwin_arch}"
$LIPO -thin $darwin_arch -output "unfat-$$/${darwin_base_archive}-${darwin_arch}/${darwin_base_archive}" "${darwin_archive}"
cd "unfat-$$/${darwin_base_archive}-${darwin_arch}"
func_extract_an_archive "`pwd`" "${darwin_base_archive}"
cd "$darwin_curdir"
$RM "unfat-$$/${darwin_base_archive}-${darwin_arch}/${darwin_base_archive}"
done # $darwin_arches
## Okay now we've a bunch of thin objects, gotta fatten them up :)
darwin_filelist=`find unfat-$$ -type f -name \*.o -print -o -name \*.lo -print | $SED -e "$basename" | sort -u`
darwin_file=
darwin_files=
for darwin_file in $darwin_filelist; do
darwin_files=`find unfat-$$ -name $darwin_file -print | sort | $NL2SP`
$LIPO -create -output "$darwin_file" $darwin_files
done # $darwin_filelist
$RM -rf unfat-$$
cd "$darwin_orig_dir"
else
cd $darwin_orig_dir
func_extract_an_archive "$my_xdir" "$my_xabs"
fi # $darwin_arches
} # !$opt_dry_run
;;
*)
func_extract_an_archive "$my_xdir" "$my_xabs"
;;
esac
my_oldobjs="$my_oldobjs "`find $my_xdir -name \*.$objext -print -o -name \*.lo -print | sort | $NL2SP`
done
func_extract_archives_result="$my_oldobjs"
}
# func_emit_wrapper [arg=no]
#
# Emit a libtool wrapper script on stdout.
# Don't directly open a file because we may want to
# incorporate the script contents within a cygwin/mingw
# wrapper executable. Must ONLY be called from within
# func_mode_link because it depends on a number of variables
# set therein.
#
# ARG is the value that the WRAPPER_SCRIPT_BELONGS_IN_OBJDIR
# variable will take. If 'yes', then the emitted script
# will assume that the directory in which it is stored is
# the $objdir directory. This is a cygwin/mingw-specific
# behavior.
func_emit_wrapper ()
{
func_emit_wrapper_arg1=${1-no}
$ECHO "\
#! $SHELL
# $output - temporary wrapper script for $objdir/$outputname
# Generated by $PROGRAM (GNU $PACKAGE$TIMESTAMP) $VERSION
#
# The $output program cannot be directly executed until all the libtool
# libraries that it depends on are installed.
#
# This wrapper script should never be moved out of the build directory.
# If it is, it will not operate correctly.
# Sed substitution that helps us do robust quoting. It backslashifies
# metacharacters that are still active within double-quoted strings.
sed_quote_subst='$sed_quote_subst'
# Be Bourne compatible
if test -n \"\${ZSH_VERSION+set}\" && (emulate sh) >/dev/null 2>&1; then
emulate sh
NULLCMD=:
# Zsh 3.x and 4.x performs word splitting on \${1+\"\$@\"}, which
# is contrary to our usage. Disable this feature.
alias -g '\${1+\"\$@\"}'='\"\$@\"'
setopt NO_GLOB_SUBST
else
case \`(set -o) 2>/dev/null\` in *posix*) set -o posix;; esac
fi
BIN_SH=xpg4; export BIN_SH # for Tru64
DUALCASE=1; export DUALCASE # for MKS sh
# The HP-UX ksh and POSIX shell print the target directory to stdout
# if CDPATH is set.
(unset CDPATH) >/dev/null 2>&1 && unset CDPATH
relink_command=\"$relink_command\"
# This environment variable determines our operation mode.
if test \"\$libtool_install_magic\" = \"$magic\"; then
# install mode needs the following variables:
generated_by_libtool_version='$macro_version'
notinst_deplibs='$notinst_deplibs'
else
# When we are sourced in execute mode, \$file and \$ECHO are already set.
if test \"\$libtool_execute_magic\" != \"$magic\"; then
file=\"\$0\""
qECHO=`$ECHO "$ECHO" | $SED "$sed_quote_subst"`
$ECHO "\
# A function that is used when there is no print builtin or printf.
func_fallback_echo ()
{
eval 'cat <<_LTECHO_EOF
\$1
_LTECHO_EOF'
}
ECHO=\"$qECHO\"
fi
# Very basic option parsing. These options are (a) specific to
# the libtool wrapper, (b) are identical between the wrapper
# /script/ and the wrapper /executable/ which is used only on
# windows platforms, and (c) all begin with the string "--lt-"
# (application programs are unlikely to have options which match
# this pattern).
#
# There are only two supported options: --lt-debug and
# --lt-dump-script. There is, deliberately, no --lt-help.
#
# The first argument to this parsing function should be the
# script's $0 value, followed by "$@".
lt_option_debug=
func_parse_lt_options ()
{
lt_script_arg0=\$0
shift
for lt_opt
do
case \"\$lt_opt\" in
--lt-debug) lt_option_debug=1 ;;
--lt-dump-script)
lt_dump_D=\`\$ECHO \"X\$lt_script_arg0\" | $SED -e 's/^X//' -e 's%/[^/]*$%%'\`
test \"X\$lt_dump_D\" = \"X\$lt_script_arg0\" && lt_dump_D=.
lt_dump_F=\`\$ECHO \"X\$lt_script_arg0\" | $SED -e 's/^X//' -e 's%^.*/%%'\`
cat \"\$lt_dump_D/\$lt_dump_F\"
exit 0
;;
--lt-*)
\$ECHO \"Unrecognized --lt- option: '\$lt_opt'\" 1>&2
exit 1
;;
esac
done
# Print the debug banner immediately:
if test -n \"\$lt_option_debug\"; then
echo \"${outputname}:${output}:\${LINENO}: libtool wrapper (GNU $PACKAGE$TIMESTAMP) $VERSION\" 1>&2
fi
}
# Used when --lt-debug. Prints its arguments to stdout
# (redirection is the responsibility of the caller)
func_lt_dump_args ()
{
lt_dump_args_N=1;
for lt_arg
do
\$ECHO \"${outputname}:${output}:\${LINENO}: newargv[\$lt_dump_args_N]: \$lt_arg\"
lt_dump_args_N=\`expr \$lt_dump_args_N + 1\`
done
}
# Core function for launching the target application
func_exec_program_core ()
{
"
case $host in
# Backslashes separate directories on plain windows
*-*-mingw | *-*-os2* | *-cegcc*)
$ECHO "\
if test -n \"\$lt_option_debug\"; then
\$ECHO \"${outputname}:${output}:\${LINENO}: newargv[0]: \$progdir\\\\\$program\" 1>&2
func_lt_dump_args \${1+\"\$@\"} 1>&2
fi
exec \"\$progdir\\\\\$program\" \${1+\"\$@\"}
"
;;
*)
$ECHO "\
if test -n \"\$lt_option_debug\"; then
\$ECHO \"${outputname}:${output}:\${LINENO}: newargv[0]: \$progdir/\$program\" 1>&2
func_lt_dump_args \${1+\"\$@\"} 1>&2
fi
exec \"\$progdir/\$program\" \${1+\"\$@\"}
"
;;
esac
$ECHO "\
\$ECHO \"\$0: cannot exec \$program \$*\" 1>&2
exit 1
}
# A function to encapsulate launching the target application
# Strips options in the --lt-* namespace from \$@ and
# launches target application with the remaining arguments.
func_exec_program ()
{
case \" \$* \" in
*\\ --lt-*)
for lt_wr_arg
do
case \$lt_wr_arg in
--lt-*) ;;
*) set x \"\$@\" \"\$lt_wr_arg\"; shift;;
esac
shift
done ;;
esac
func_exec_program_core \${1+\"\$@\"}
}
# Parse options
func_parse_lt_options \"\$0\" \${1+\"\$@\"}
# Find the directory that this script lives in.
thisdir=\`\$ECHO \"\$file\" | $SED 's%/[^/]*$%%'\`
test \"x\$thisdir\" = \"x\$file\" && thisdir=.
# Follow symbolic links until we get to the real thisdir.
file=\`ls -ld \"\$file\" | $SED -n 's/.*-> //p'\`
while test -n \"\$file\"; do
destdir=\`\$ECHO \"\$file\" | $SED 's%/[^/]*\$%%'\`
# If there was a directory component, then change thisdir.
if test \"x\$destdir\" != \"x\$file\"; then
case \"\$destdir\" in
[\\\\/]* | [A-Za-z]:[\\\\/]*) thisdir=\"\$destdir\" ;;
*) thisdir=\"\$thisdir/\$destdir\" ;;
esac
fi
file=\`\$ECHO \"\$file\" | $SED 's%^.*/%%'\`
file=\`ls -ld \"\$thisdir/\$file\" | $SED -n 's/.*-> //p'\`
done
# Usually 'no', except on cygwin/mingw when embedded into
# the cwrapper.
WRAPPER_SCRIPT_BELONGS_IN_OBJDIR=$func_emit_wrapper_arg1
if test \"\$WRAPPER_SCRIPT_BELONGS_IN_OBJDIR\" = \"yes\"; then
# special case for '.'
if test \"\$thisdir\" = \".\"; then
thisdir=\`pwd\`
fi
# remove .libs from thisdir
case \"\$thisdir\" in
*[\\\\/]$objdir ) thisdir=\`\$ECHO \"\$thisdir\" | $SED 's%[\\\\/][^\\\\/]*$%%'\` ;;
$objdir ) thisdir=. ;;
esac
fi
# Try to get the absolute directory name.
absdir=\`cd \"\$thisdir\" && pwd\`
test -n \"\$absdir\" && thisdir=\"\$absdir\"
"
if test "$fast_install" = yes; then
$ECHO "\
program=lt-'$outputname'$exeext
progdir=\"\$thisdir/$objdir\"
if test ! -f \"\$progdir/\$program\" ||
{ file=\`ls -1dt \"\$progdir/\$program\" \"\$progdir/../\$program\" 2>/dev/null | ${SED} 1q\`; \\
test \"X\$file\" != \"X\$progdir/\$program\"; }; then
file=\"\$\$-\$program\"
if test ! -d \"\$progdir\"; then
$MKDIR \"\$progdir\"
else
$RM \"\$progdir/\$file\"
fi"
$ECHO "\
# relink executable if necessary
if test -n \"\$relink_command\"; then
if relink_command_output=\`eval \$relink_command 2>&1\`; then :
else
$ECHO \"\$relink_command_output\" >&2
$RM \"\$progdir/\$file\"
exit 1
fi
fi
$MV \"\$progdir/\$file\" \"\$progdir/\$program\" 2>/dev/null ||
{ $RM \"\$progdir/\$program\";
$MV \"\$progdir/\$file\" \"\$progdir/\$program\"; }
$RM \"\$progdir/\$file\"
fi"
else
$ECHO "\
program='$outputname'
progdir=\"\$thisdir/$objdir\"
"
fi
$ECHO "\
if test -f \"\$progdir/\$program\"; then"
# fixup the dll searchpath if we need to.
#
# Fix the DLL searchpath if we need to. Do this before prepending
# to shlibpath, because on Windows, both are PATH and uninstalled
# libraries must come first.
if test -n "$dllsearchpath"; then
$ECHO "\
# Add the dll search path components to the executable PATH
PATH=$dllsearchpath:\$PATH
"
fi
# Export our shlibpath_var if we have one.
if test "$shlibpath_overrides_runpath" = yes && test -n "$shlibpath_var" && test -n "$temp_rpath"; then
$ECHO "\
# Add our own library path to $shlibpath_var
$shlibpath_var=\"$temp_rpath\$$shlibpath_var\"
# Some systems cannot cope with colon-terminated $shlibpath_var
# The second colon is a workaround for a bug in BeOS R4 sed
$shlibpath_var=\`\$ECHO \"\$$shlibpath_var\" | $SED 's/::*\$//'\`
export $shlibpath_var
"
fi
$ECHO "\
if test \"\$libtool_execute_magic\" != \"$magic\"; then
# Run the actual program with our arguments.
func_exec_program \${1+\"\$@\"}
fi
else
# The program doesn't exist.
\$ECHO \"\$0: error: \\\`\$progdir/\$program' does not exist\" 1>&2
\$ECHO \"This script is just a wrapper for \$program.\" 1>&2
\$ECHO \"See the $PACKAGE documentation for more information.\" 1>&2
exit 1
fi
fi\
"
}
# func_emit_cwrapperexe_src
# emit the source code for a wrapper executable on stdout
# Must ONLY be called from within func_mode_link because
# it depends on a number of variable set therein.
func_emit_cwrapperexe_src ()
{
cat <
#include
#ifdef _MSC_VER
# include
# include
# include
#else
# include
# include
# ifdef __CYGWIN__
# include
# endif
#endif
#include
#include
#include
#include
#include
#include
#include
#include
/* declarations of non-ANSI functions */
#if defined(__MINGW32__)
# ifdef __STRICT_ANSI__
int _putenv (const char *);
# endif
#elif defined(__CYGWIN__)
# ifdef __STRICT_ANSI__
char *realpath (const char *, char *);
int putenv (char *);
int setenv (const char *, const char *, int);
# endif
/* #elif defined (other platforms) ... */
#endif
/* portability defines, excluding path handling macros */
#if defined(_MSC_VER)
# define setmode _setmode
# define stat _stat
# define chmod _chmod
# define getcwd _getcwd
# define putenv _putenv
# define S_IXUSR _S_IEXEC
# ifndef _INTPTR_T_DEFINED
# define _INTPTR_T_DEFINED
# define intptr_t int
# endif
#elif defined(__MINGW32__)
# define setmode _setmode
# define stat _stat
# define chmod _chmod
# define getcwd _getcwd
# define putenv _putenv
#elif defined(__CYGWIN__)
# define HAVE_SETENV
# define FOPEN_WB "wb"
/* #elif defined (other platforms) ... */
#endif
#if defined(PATH_MAX)
# define LT_PATHMAX PATH_MAX
#elif defined(MAXPATHLEN)
# define LT_PATHMAX MAXPATHLEN
#else
# define LT_PATHMAX 1024
#endif
#ifndef S_IXOTH
# define S_IXOTH 0
#endif
#ifndef S_IXGRP
# define S_IXGRP 0
#endif
/* path handling portability macros */
#ifndef DIR_SEPARATOR
# define DIR_SEPARATOR '/'
# define PATH_SEPARATOR ':'
#endif
#if defined (_WIN32) || defined (__MSDOS__) || defined (__DJGPP__) || \
defined (__OS2__)
# define HAVE_DOS_BASED_FILE_SYSTEM
# define FOPEN_WB "wb"
# ifndef DIR_SEPARATOR_2
# define DIR_SEPARATOR_2 '\\'
# endif
# ifndef PATH_SEPARATOR_2
# define PATH_SEPARATOR_2 ';'
# endif
#endif
#ifndef DIR_SEPARATOR_2
# define IS_DIR_SEPARATOR(ch) ((ch) == DIR_SEPARATOR)
#else /* DIR_SEPARATOR_2 */
# define IS_DIR_SEPARATOR(ch) \
(((ch) == DIR_SEPARATOR) || ((ch) == DIR_SEPARATOR_2))
#endif /* DIR_SEPARATOR_2 */
#ifndef PATH_SEPARATOR_2
# define IS_PATH_SEPARATOR(ch) ((ch) == PATH_SEPARATOR)
#else /* PATH_SEPARATOR_2 */
# define IS_PATH_SEPARATOR(ch) ((ch) == PATH_SEPARATOR_2)
#endif /* PATH_SEPARATOR_2 */
#ifndef FOPEN_WB
# define FOPEN_WB "w"
#endif
#ifndef _O_BINARY
# define _O_BINARY 0
#endif
#define XMALLOC(type, num) ((type *) xmalloc ((num) * sizeof(type)))
#define XFREE(stale) do { \
if (stale) { free ((void *) stale); stale = 0; } \
} while (0)
#if defined(LT_DEBUGWRAPPER)
static int lt_debug = 1;
#else
static int lt_debug = 0;
#endif
const char *program_name = "libtool-wrapper"; /* in case xstrdup fails */
void *xmalloc (size_t num);
char *xstrdup (const char *string);
const char *base_name (const char *name);
char *find_executable (const char *wrapper);
char *chase_symlinks (const char *pathspec);
int make_executable (const char *path);
int check_executable (const char *path);
char *strendzap (char *str, const char *pat);
void lt_debugprintf (const char *file, int line, const char *fmt, ...);
void lt_fatal (const char *file, int line, const char *message, ...);
static const char *nonnull (const char *s);
static const char *nonempty (const char *s);
void lt_setenv (const char *name, const char *value);
char *lt_extend_str (const char *orig_value, const char *add, int to_end);
void lt_update_exe_path (const char *name, const char *value);
void lt_update_lib_path (const char *name, const char *value);
char **prepare_spawn (char **argv);
void lt_dump_script (FILE *f);
EOF
cat <= 0)
&& (st.st_mode & (S_IXUSR | S_IXGRP | S_IXOTH)))
return 1;
else
return 0;
}
int
make_executable (const char *path)
{
int rval = 0;
struct stat st;
lt_debugprintf (__FILE__, __LINE__, "(make_executable): %s\n",
nonempty (path));
if ((!path) || (!*path))
return 0;
if (stat (path, &st) >= 0)
{
rval = chmod (path, st.st_mode | S_IXOTH | S_IXGRP | S_IXUSR);
}
return rval;
}
/* Searches for the full path of the wrapper. Returns
newly allocated full path name if found, NULL otherwise
Does not chase symlinks, even on platforms that support them.
*/
char *
find_executable (const char *wrapper)
{
int has_slash = 0;
const char *p;
const char *p_next;
/* static buffer for getcwd */
char tmp[LT_PATHMAX + 1];
int tmp_len;
char *concat_name;
lt_debugprintf (__FILE__, __LINE__, "(find_executable): %s\n",
nonempty (wrapper));
if ((wrapper == NULL) || (*wrapper == '\0'))
return NULL;
/* Absolute path? */
#if defined (HAVE_DOS_BASED_FILE_SYSTEM)
if (isalpha ((unsigned char) wrapper[0]) && wrapper[1] == ':')
{
concat_name = xstrdup (wrapper);
if (check_executable (concat_name))
return concat_name;
XFREE (concat_name);
}
else
{
#endif
if (IS_DIR_SEPARATOR (wrapper[0]))
{
concat_name = xstrdup (wrapper);
if (check_executable (concat_name))
return concat_name;
XFREE (concat_name);
}
#if defined (HAVE_DOS_BASED_FILE_SYSTEM)
}
#endif
for (p = wrapper; *p; p++)
if (*p == '/')
{
has_slash = 1;
break;
}
if (!has_slash)
{
/* no slashes; search PATH */
const char *path = getenv ("PATH");
if (path != NULL)
{
for (p = path; *p; p = p_next)
{
const char *q;
size_t p_len;
for (q = p; *q; q++)
if (IS_PATH_SEPARATOR (*q))
break;
p_len = q - p;
p_next = (*q == '\0' ? q : q + 1);
if (p_len == 0)
{
/* empty path: current directory */
if (getcwd (tmp, LT_PATHMAX) == NULL)
lt_fatal (__FILE__, __LINE__, "getcwd failed: %s",
nonnull (strerror (errno)));
tmp_len = strlen (tmp);
concat_name =
XMALLOC (char, tmp_len + 1 + strlen (wrapper) + 1);
memcpy (concat_name, tmp, tmp_len);
concat_name[tmp_len] = '/';
strcpy (concat_name + tmp_len + 1, wrapper);
}
else
{
concat_name =
XMALLOC (char, p_len + 1 + strlen (wrapper) + 1);
memcpy (concat_name, p, p_len);
concat_name[p_len] = '/';
strcpy (concat_name + p_len + 1, wrapper);
}
if (check_executable (concat_name))
return concat_name;
XFREE (concat_name);
}
}
/* not found in PATH; assume curdir */
}
/* Relative path | not found in path: prepend cwd */
if (getcwd (tmp, LT_PATHMAX) == NULL)
lt_fatal (__FILE__, __LINE__, "getcwd failed: %s",
nonnull (strerror (errno)));
tmp_len = strlen (tmp);
concat_name = XMALLOC (char, tmp_len + 1 + strlen (wrapper) + 1);
memcpy (concat_name, tmp, tmp_len);
concat_name[tmp_len] = '/';
strcpy (concat_name + tmp_len + 1, wrapper);
if (check_executable (concat_name))
return concat_name;
XFREE (concat_name);
return NULL;
}
char *
chase_symlinks (const char *pathspec)
{
#ifndef S_ISLNK
return xstrdup (pathspec);
#else
char buf[LT_PATHMAX];
struct stat s;
char *tmp_pathspec = xstrdup (pathspec);
char *p;
int has_symlinks = 0;
while (strlen (tmp_pathspec) && !has_symlinks)
{
lt_debugprintf (__FILE__, __LINE__,
"checking path component for symlinks: %s\n",
tmp_pathspec);
if (lstat (tmp_pathspec, &s) == 0)
{
if (S_ISLNK (s.st_mode) != 0)
{
has_symlinks = 1;
break;
}
/* search backwards for last DIR_SEPARATOR */
p = tmp_pathspec + strlen (tmp_pathspec) - 1;
while ((p > tmp_pathspec) && (!IS_DIR_SEPARATOR (*p)))
p--;
if ((p == tmp_pathspec) && (!IS_DIR_SEPARATOR (*p)))
{
/* no more DIR_SEPARATORS left */
break;
}
*p = '\0';
}
else
{
lt_fatal (__FILE__, __LINE__,
"error accessing file \"%s\": %s",
tmp_pathspec, nonnull (strerror (errno)));
}
}
XFREE (tmp_pathspec);
if (!has_symlinks)
{
return xstrdup (pathspec);
}
tmp_pathspec = realpath (pathspec, buf);
if (tmp_pathspec == 0)
{
lt_fatal (__FILE__, __LINE__,
"could not follow symlinks for %s", pathspec);
}
return xstrdup (tmp_pathspec);
#endif
}
char *
strendzap (char *str, const char *pat)
{
size_t len, patlen;
assert (str != NULL);
assert (pat != NULL);
len = strlen (str);
patlen = strlen (pat);
if (patlen <= len)
{
str += len - patlen;
if (strcmp (str, pat) == 0)
*str = '\0';
}
return str;
}
void
lt_debugprintf (const char *file, int line, const char *fmt, ...)
{
va_list args;
if (lt_debug)
{
(void) fprintf (stderr, "%s:%s:%d: ", program_name, file, line);
va_start (args, fmt);
(void) vfprintf (stderr, fmt, args);
va_end (args);
}
}
static void
lt_error_core (int exit_status, const char *file,
int line, const char *mode,
const char *message, va_list ap)
{
fprintf (stderr, "%s:%s:%d: %s: ", program_name, file, line, mode);
vfprintf (stderr, message, ap);
fprintf (stderr, ".\n");
if (exit_status >= 0)
exit (exit_status);
}
void
lt_fatal (const char *file, int line, const char *message, ...)
{
va_list ap;
va_start (ap, message);
lt_error_core (EXIT_FAILURE, file, line, "FATAL", message, ap);
va_end (ap);
}
static const char *
nonnull (const char *s)
{
return s ? s : "(null)";
}
static const char *
nonempty (const char *s)
{
return (s && !*s) ? "(empty)" : nonnull (s);
}
void
lt_setenv (const char *name, const char *value)
{
lt_debugprintf (__FILE__, __LINE__,
"(lt_setenv) setting '%s' to '%s'\n",
nonnull (name), nonnull (value));
{
#ifdef HAVE_SETENV
/* always make a copy, for consistency with !HAVE_SETENV */
char *str = xstrdup (value);
setenv (name, str, 1);
#else
int len = strlen (name) + 1 + strlen (value) + 1;
char *str = XMALLOC (char, len);
sprintf (str, "%s=%s", name, value);
if (putenv (str) != EXIT_SUCCESS)
{
XFREE (str);
}
#endif
}
}
char *
lt_extend_str (const char *orig_value, const char *add, int to_end)
{
char *new_value;
if (orig_value && *orig_value)
{
int orig_value_len = strlen (orig_value);
int add_len = strlen (add);
new_value = XMALLOC (char, add_len + orig_value_len + 1);
if (to_end)
{
strcpy (new_value, orig_value);
strcpy (new_value + orig_value_len, add);
}
else
{
strcpy (new_value, add);
strcpy (new_value + add_len, orig_value);
}
}
else
{
new_value = xstrdup (add);
}
return new_value;
}
void
lt_update_exe_path (const char *name, const char *value)
{
lt_debugprintf (__FILE__, __LINE__,
"(lt_update_exe_path) modifying '%s' by prepending '%s'\n",
nonnull (name), nonnull (value));
if (name && *name && value && *value)
{
char *new_value = lt_extend_str (getenv (name), value, 0);
/* some systems can't cope with a ':'-terminated path #' */
int len = strlen (new_value);
while (((len = strlen (new_value)) > 0) && IS_PATH_SEPARATOR (new_value[len-1]))
{
new_value[len-1] = '\0';
}
lt_setenv (name, new_value);
XFREE (new_value);
}
}
void
lt_update_lib_path (const char *name, const char *value)
{
lt_debugprintf (__FILE__, __LINE__,
"(lt_update_lib_path) modifying '%s' by prepending '%s'\n",
nonnull (name), nonnull (value));
if (name && *name && value && *value)
{
char *new_value = lt_extend_str (getenv (name), value, 0);
lt_setenv (name, new_value);
XFREE (new_value);
}
}
EOF
case $host_os in
mingw*)
cat <<"EOF"
/* Prepares an argument vector before calling spawn().
Note that spawn() does not by itself call the command interpreter
(getenv ("COMSPEC") != NULL ? getenv ("COMSPEC") :
({ OSVERSIONINFO v; v.dwOSVersionInfoSize = sizeof(OSVERSIONINFO);
GetVersionEx(&v);
v.dwPlatformId == VER_PLATFORM_WIN32_NT;
}) ? "cmd.exe" : "command.com").
Instead it simply concatenates the arguments, separated by ' ', and calls
CreateProcess(). We must quote the arguments since Win32 CreateProcess()
interprets characters like ' ', '\t', '\\', '"' (but not '<' and '>') in a
special way:
- Space and tab are interpreted as delimiters. They are not treated as
delimiters if they are surrounded by double quotes: "...".
- Unescaped double quotes are removed from the input. Their only effect is
that within double quotes, space and tab are treated like normal
characters.
- Backslashes not followed by double quotes are not special.
- But 2*n+1 backslashes followed by a double quote become
n backslashes followed by a double quote (n >= 0):
\" -> "
\\\" -> \"
\\\\\" -> \\"
*/
#define SHELL_SPECIAL_CHARS "\"\\ \001\002\003\004\005\006\007\010\011\012\013\014\015\016\017\020\021\022\023\024\025\026\027\030\031\032\033\034\035\036\037"
#define SHELL_SPACE_CHARS " \001\002\003\004\005\006\007\010\011\012\013\014\015\016\017\020\021\022\023\024\025\026\027\030\031\032\033\034\035\036\037"
char **
prepare_spawn (char **argv)
{
size_t argc;
char **new_argv;
size_t i;
/* Count number of arguments. */
for (argc = 0; argv[argc] != NULL; argc++)
;
/* Allocate new argument vector. */
new_argv = XMALLOC (char *, argc + 1);
/* Put quoted arguments into the new argument vector. */
for (i = 0; i < argc; i++)
{
const char *string = argv[i];
if (string[0] == '\0')
new_argv[i] = xstrdup ("\"\"");
else if (strpbrk (string, SHELL_SPECIAL_CHARS) != NULL)
{
int quote_around = (strpbrk (string, SHELL_SPACE_CHARS) != NULL);
size_t length;
unsigned int backslashes;
const char *s;
char *quoted_string;
char *p;
length = 0;
backslashes = 0;
if (quote_around)
length++;
for (s = string; *s != '\0'; s++)
{
char c = *s;
if (c == '"')
length += backslashes + 1;
length++;
if (c == '\\')
backslashes++;
else
backslashes = 0;
}
if (quote_around)
length += backslashes + 1;
quoted_string = XMALLOC (char, length + 1);
p = quoted_string;
backslashes = 0;
if (quote_around)
*p++ = '"';
for (s = string; *s != '\0'; s++)
{
char c = *s;
if (c == '"')
{
unsigned int j;
for (j = backslashes + 1; j > 0; j--)
*p++ = '\\';
}
*p++ = c;
if (c == '\\')
backslashes++;
else
backslashes = 0;
}
if (quote_around)
{
unsigned int j;
for (j = backslashes; j > 0; j--)
*p++ = '\\';
*p++ = '"';
}
*p = '\0';
new_argv[i] = quoted_string;
}
else
new_argv[i] = (char *) string;
}
new_argv[argc] = NULL;
return new_argv;
}
EOF
;;
esac
cat <<"EOF"
void lt_dump_script (FILE* f)
{
EOF
func_emit_wrapper yes |
$SED -n -e '
s/^\(.\{79\}\)\(..*\)/\1\
\2/
h
s/\([\\"]\)/\\\1/g
s/$/\\n/
s/\([^\n]*\).*/ fputs ("\1", f);/p
g
D'
cat <<"EOF"
}
EOF
}
# end: func_emit_cwrapperexe_src
# func_win32_import_lib_p ARG
# True if ARG is an import lib, as indicated by $file_magic_cmd
func_win32_import_lib_p ()
{
$opt_debug
case `eval $file_magic_cmd \"\$1\" 2>/dev/null | $SED -e 10q` in
*import*) : ;;
*) false ;;
esac
}
# func_mode_link arg...
func_mode_link ()
{
$opt_debug
case $host in
*-*-cygwin* | *-*-mingw* | *-*-pw32* | *-*-os2* | *-cegcc*)
# It is impossible to link a dll without this setting, and
# we shouldn't force the makefile maintainer to figure out
# which system we are compiling for in order to pass an extra
# flag for every libtool invocation.
# allow_undefined=no
# FIXME: Unfortunately, there are problems with the above when trying
# to make a dll which has undefined symbols, in which case not
# even a static library is built. For now, we need to specify
# -no-undefined on the libtool link line when we can be certain
# that all symbols are satisfied, otherwise we get a static library.
allow_undefined=yes
;;
*)
allow_undefined=yes
;;
esac
libtool_args=$nonopt
base_compile="$nonopt $@"
compile_command=$nonopt
finalize_command=$nonopt
compile_rpath=
finalize_rpath=
compile_shlibpath=
finalize_shlibpath=
convenience=
old_convenience=
deplibs=
old_deplibs=
compiler_flags=
linker_flags=
dllsearchpath=
lib_search_path=`pwd`
inst_prefix_dir=
new_inherited_linker_flags=
avoid_version=no
bindir=
dlfiles=
dlprefiles=
dlself=no
export_dynamic=no
export_symbols=
export_symbols_regex=
generated=
libobjs=
ltlibs=
module=no
no_install=no
objs=
non_pic_objects=
precious_files_regex=
prefer_static_libs=no
preload=no
prev=
prevarg=
release=
rpath=
xrpath=
perm_rpath=
temp_rpath=
thread_safe=no
vinfo=
vinfo_number=no
weak_libs=
single_module="${wl}-single_module"
func_infer_tag $base_compile
# We need to know -static, to get the right output filenames.
for arg
do
case $arg in
-shared)
test "$build_libtool_libs" != yes && \
func_fatal_configuration "can not build a shared library"
build_old_libs=no
break
;;
-all-static | -static | -static-libtool-libs)
case $arg in
-all-static)
if test "$build_libtool_libs" = yes && test -z "$link_static_flag"; then
func_warning "complete static linking is impossible in this configuration"
fi
if test -n "$link_static_flag"; then
dlopen_self=$dlopen_self_static
fi
prefer_static_libs=yes
;;
-static)
if test -z "$pic_flag" && test -n "$link_static_flag"; then
dlopen_self=$dlopen_self_static
fi
prefer_static_libs=built
;;
-static-libtool-libs)
if test -z "$pic_flag" && test -n "$link_static_flag"; then
dlopen_self=$dlopen_self_static
fi
prefer_static_libs=yes
;;
esac
build_libtool_libs=no
build_old_libs=yes
break
;;
esac
done
# See if our shared archives depend on static archives.
test -n "$old_archive_from_new_cmds" && build_old_libs=yes
# Go through the arguments, transforming them on the way.
while test "$#" -gt 0; do
arg="$1"
shift
func_quote_for_eval "$arg"
qarg=$func_quote_for_eval_unquoted_result
func_append libtool_args " $func_quote_for_eval_result"
# If the previous option needs an argument, assign it.
if test -n "$prev"; then
case $prev in
output)
func_append compile_command " @OUTPUT@"
func_append finalize_command " @OUTPUT@"
;;
esac
case $prev in
bindir)
bindir="$arg"
prev=
continue
;;
dlfiles|dlprefiles)
if test "$preload" = no; then
# Add the symbol object into the linking commands.
func_append compile_command " @SYMFILE@"
func_append finalize_command " @SYMFILE@"
preload=yes
fi
case $arg in
*.la | *.lo) ;; # We handle these cases below.
force)
if test "$dlself" = no; then
dlself=needless
export_dynamic=yes
fi
prev=
continue
;;
self)
if test "$prev" = dlprefiles; then
dlself=yes
elif test "$prev" = dlfiles && test "$dlopen_self" != yes; then
dlself=yes
else
dlself=needless
export_dynamic=yes
fi
prev=
continue
;;
*)
if test "$prev" = dlfiles; then
func_append dlfiles " $arg"
else
func_append dlprefiles " $arg"
fi
prev=
continue
;;
esac
;;
expsyms)
export_symbols="$arg"
test -f "$arg" \
|| func_fatal_error "symbol file \`$arg' does not exist"
prev=
continue
;;
expsyms_regex)
export_symbols_regex="$arg"
prev=
continue
;;
framework)
case $host in
*-*-darwin*)
case "$deplibs " in
*" $qarg.ltframework "*) ;;
*) func_append deplibs " $qarg.ltframework" # this is fixed later
;;
esac
;;
esac
prev=
continue
;;
inst_prefix)
inst_prefix_dir="$arg"
prev=
continue
;;
objectlist)
if test -f "$arg"; then
save_arg=$arg
moreargs=
for fil in `cat "$save_arg"`
do
# func_append moreargs " $fil"
arg=$fil
# A libtool-controlled object.
# Check to see that this really is a libtool object.
if func_lalib_unsafe_p "$arg"; then
pic_object=
non_pic_object=
# Read the .lo file
func_source "$arg"
if test -z "$pic_object" ||
test -z "$non_pic_object" ||
test "$pic_object" = none &&
test "$non_pic_object" = none; then
func_fatal_error "cannot find name of object for \`$arg'"
fi
# Extract subdirectory from the argument.
func_dirname "$arg" "/" ""
xdir="$func_dirname_result"
if test "$pic_object" != none; then
# Prepend the subdirectory the object is found in.
pic_object="$xdir$pic_object"
if test "$prev" = dlfiles; then
if test "$build_libtool_libs" = yes && test "$dlopen_support" = yes; then
func_append dlfiles " $pic_object"
prev=
continue
else
# If libtool objects are unsupported, then we need to preload.
prev=dlprefiles
fi
fi
# CHECK ME: I think I busted this. -Ossama
if test "$prev" = dlprefiles; then
# Preload the old-style object.
func_append dlprefiles " $pic_object"
prev=
fi
# A PIC object.
func_append libobjs " $pic_object"
arg="$pic_object"
fi
# Non-PIC object.
if test "$non_pic_object" != none; then
# Prepend the subdirectory the object is found in.
non_pic_object="$xdir$non_pic_object"
# A standard non-PIC object
func_append non_pic_objects " $non_pic_object"
if test -z "$pic_object" || test "$pic_object" = none ; then
arg="$non_pic_object"
fi
else
# If the PIC object exists, use it instead.
# $xdir was prepended to $pic_object above.
non_pic_object="$pic_object"
func_append non_pic_objects " $non_pic_object"
fi
else
# Only an error if not doing a dry-run.
if $opt_dry_run; then
# Extract subdirectory from the argument.
func_dirname "$arg" "/" ""
xdir="$func_dirname_result"
func_lo2o "$arg"
pic_object=$xdir$objdir/$func_lo2o_result
non_pic_object=$xdir$func_lo2o_result
func_append libobjs " $pic_object"
func_append non_pic_objects " $non_pic_object"
else
func_fatal_error "\`$arg' is not a valid libtool object"
fi
fi
done
else
func_fatal_error "link input file \`$arg' does not exist"
fi
arg=$save_arg
prev=
continue
;;
precious_regex)
precious_files_regex="$arg"
prev=
continue
;;
release)
release="-$arg"
prev=
continue
;;
rpath | xrpath)
# We need an absolute path.
case $arg in
[\\/]* | [A-Za-z]:[\\/]*) ;;
*)
func_fatal_error "only absolute run-paths are allowed"
;;
esac
if test "$prev" = rpath; then
case "$rpath " in
*" $arg "*) ;;
*) func_append rpath " $arg" ;;
esac
else
case "$xrpath " in
*" $arg "*) ;;
*) func_append xrpath " $arg" ;;
esac
fi
prev=
continue
;;
shrext)
shrext_cmds="$arg"
prev=
continue
;;
weak)
func_append weak_libs " $arg"
prev=
continue
;;
xcclinker)
func_append linker_flags " $qarg"
func_append compiler_flags " $qarg"
prev=
func_append compile_command " $qarg"
func_append finalize_command " $qarg"
continue
;;
xcompiler)
func_append compiler_flags " $qarg"
prev=
func_append compile_command " $qarg"
func_append finalize_command " $qarg"
continue
;;
xlinker)
func_append linker_flags " $qarg"
func_append compiler_flags " $wl$qarg"
prev=
func_append compile_command " $wl$qarg"
func_append finalize_command " $wl$qarg"
continue
;;
*)
eval "$prev=\"\$arg\""
prev=
continue
;;
esac
fi # test -n "$prev"
prevarg="$arg"
case $arg in
-all-static)
if test -n "$link_static_flag"; then
# See comment for -static flag below, for more details.
func_append compile_command " $link_static_flag"
func_append finalize_command " $link_static_flag"
fi
continue
;;
-allow-undefined)
# FIXME: remove this flag sometime in the future.
func_fatal_error "\`-allow-undefined' must not be used because it is the default"
;;
-avoid-version)
avoid_version=yes
continue
;;
-bindir)
prev=bindir
continue
;;
-dlopen)
prev=dlfiles
continue
;;
-dlpreopen)
prev=dlprefiles
continue
;;
-export-dynamic)
export_dynamic=yes
continue
;;
-export-symbols | -export-symbols-regex)
if test -n "$export_symbols" || test -n "$export_symbols_regex"; then
func_fatal_error "more than one -exported-symbols argument is not allowed"
fi
if test "X$arg" = "X-export-symbols"; then
prev=expsyms
else
prev=expsyms_regex
fi
continue
;;
-framework)
prev=framework
continue
;;
-inst-prefix-dir)
prev=inst_prefix
continue
;;
# The native IRIX linker understands -LANG:*, -LIST:* and -LNO:*
# so, if we see these flags be careful not to treat them like -L
-L[A-Z][A-Z]*:*)
case $with_gcc/$host in
no/*-*-irix* | /*-*-irix*)
func_append compile_command " $arg"
func_append finalize_command " $arg"
;;
esac
continue
;;
-L*)
func_stripname "-L" '' "$arg"
if test -z "$func_stripname_result"; then
if test "$#" -gt 0; then
func_fatal_error "require no space between \`-L' and \`$1'"
else
func_fatal_error "need path for \`-L' option"
fi
fi
func_resolve_sysroot "$func_stripname_result"
dir=$func_resolve_sysroot_result
# We need an absolute path.
case $dir in
[\\/]* | [A-Za-z]:[\\/]*) ;;
*)
absdir=`cd "$dir" && pwd`
test -z "$absdir" && \
func_fatal_error "cannot determine absolute directory name of \`$dir'"
dir="$absdir"
;;
esac
case "$deplibs " in
*" -L$dir "* | *" $arg "*)
# Will only happen for absolute or sysroot arguments
;;
*)
# Preserve sysroot, but never include relative directories
case $dir in
[\\/]* | [A-Za-z]:[\\/]* | =*) func_append deplibs " $arg" ;;
*) func_append deplibs " -L$dir" ;;
esac
func_append lib_search_path " $dir"
;;
esac
case $host in
*-*-cygwin* | *-*-mingw* | *-*-pw32* | *-*-os2* | *-cegcc*)
testbindir=`$ECHO "$dir" | $SED 's*/lib$*/bin*'`
case :$dllsearchpath: in
*":$dir:"*) ;;
::) dllsearchpath=$dir;;
*) func_append dllsearchpath ":$dir";;
esac
case :$dllsearchpath: in
*":$testbindir:"*) ;;
::) dllsearchpath=$testbindir;;
*) func_append dllsearchpath ":$testbindir";;
esac
;;
esac
continue
;;
-l*)
if test "X$arg" = "X-lc" || test "X$arg" = "X-lm"; then
case $host in
*-*-cygwin* | *-*-mingw* | *-*-pw32* | *-*-beos* | *-cegcc* | *-*-haiku*)
# These systems don't actually have a C or math library (as such)
continue
;;
*-*-os2*)
# These systems don't actually have a C library (as such)
test "X$arg" = "X-lc" && continue
;;
*-*-openbsd* | *-*-freebsd* | *-*-dragonfly*)
# Do not include libc due to us having libc/libc_r.
test "X$arg" = "X-lc" && continue
;;
*-*-rhapsody* | *-*-darwin1.[012])
# Rhapsody C and math libraries are in the System framework
func_append deplibs " System.ltframework"
continue
;;
*-*-sco3.2v5* | *-*-sco5v6*)
# Causes problems with __ctype
test "X$arg" = "X-lc" && continue
;;
*-*-sysv4.2uw2* | *-*-sysv5* | *-*-unixware* | *-*-OpenUNIX*)
# Compiler inserts libc in the correct place for threads to work
test "X$arg" = "X-lc" && continue
;;
esac
elif test "X$arg" = "X-lc_r"; then
case $host in
*-*-openbsd* | *-*-freebsd* | *-*-dragonfly*)
# Do not include libc_r directly, use -pthread flag.
continue
;;
esac
fi
func_append deplibs " $arg"
continue
;;
-module)
module=yes
continue
;;
# Tru64 UNIX uses -model [arg] to determine the layout of C++
# classes, name mangling, and exception handling.
# Darwin uses the -arch flag to determine output architecture.
-model|-arch|-isysroot|--sysroot)
func_append compiler_flags " $arg"
func_append compile_command " $arg"
func_append finalize_command " $arg"
prev=xcompiler
continue
;;
-mt|-mthreads|-kthread|-Kthread|-pthread|-pthreads|--thread-safe \
|-threads|-fopenmp|-openmp|-mp|-xopenmp|-omp|-qsmp=*)
func_append compiler_flags " $arg"
func_append compile_command " $arg"
func_append finalize_command " $arg"
case "$new_inherited_linker_flags " in
*" $arg "*) ;;
* ) func_append new_inherited_linker_flags " $arg" ;;
esac
continue
;;
-multi_module)
single_module="${wl}-multi_module"
continue
;;
-no-fast-install)
fast_install=no
continue
;;
-no-install)
case $host in
*-*-cygwin* | *-*-mingw* | *-*-pw32* | *-*-os2* | *-*-darwin* | *-cegcc*)
# The PATH hackery in wrapper scripts is required on Windows
# and Darwin in order for the loader to find any dlls it needs.
func_warning "\`-no-install' is ignored for $host"
func_warning "assuming \`-no-fast-install' instead"
fast_install=no
;;
*) no_install=yes ;;
esac
continue
;;
-no-undefined)
allow_undefined=no
continue
;;
-objectlist)
prev=objectlist
continue
;;
-o) prev=output ;;
-precious-files-regex)
prev=precious_regex
continue
;;
-release)
prev=release
continue
;;
-rpath)
prev=rpath
continue
;;
-R)
prev=xrpath
continue
;;
-R*)
func_stripname '-R' '' "$arg"
dir=$func_stripname_result
# We need an absolute path.
case $dir in
[\\/]* | [A-Za-z]:[\\/]*) ;;
=*)
func_stripname '=' '' "$dir"
dir=$lt_sysroot$func_stripname_result
;;
*)
func_fatal_error "only absolute run-paths are allowed"
;;
esac
case "$xrpath " in
*" $dir "*) ;;
*) func_append xrpath " $dir" ;;
esac
continue
;;
-shared)
# The effects of -shared are defined in a previous loop.
continue
;;
-shrext)
prev=shrext
continue
;;
-static | -static-libtool-libs)
# The effects of -static are defined in a previous loop.
# We used to do the same as -all-static on platforms that
# didn't have a PIC flag, but the assumption that the effects
# would be equivalent was wrong. It would break on at least
# Digital Unix and AIX.
continue
;;
-thread-safe)
thread_safe=yes
continue
;;
-version-info)
prev=vinfo
continue
;;
-version-number)
prev=vinfo
vinfo_number=yes
continue
;;
-weak)
prev=weak
continue
;;
-Wc,*)
func_stripname '-Wc,' '' "$arg"
args=$func_stripname_result
arg=
save_ifs="$IFS"; IFS=','
for flag in $args; do
IFS="$save_ifs"
func_quote_for_eval "$flag"
func_append arg " $func_quote_for_eval_result"
func_append compiler_flags " $func_quote_for_eval_result"
done
IFS="$save_ifs"
func_stripname ' ' '' "$arg"
arg=$func_stripname_result
;;
-Wl,*)
func_stripname '-Wl,' '' "$arg"
args=$func_stripname_result
arg=
save_ifs="$IFS"; IFS=','
for flag in $args; do
IFS="$save_ifs"
func_quote_for_eval "$flag"
func_append arg " $wl$func_quote_for_eval_result"
func_append compiler_flags " $wl$func_quote_for_eval_result"
func_append linker_flags " $func_quote_for_eval_result"
done
IFS="$save_ifs"
func_stripname ' ' '' "$arg"
arg=$func_stripname_result
;;
-Xcompiler)
prev=xcompiler
continue
;;
-Xlinker)
prev=xlinker
continue
;;
-XCClinker)
prev=xcclinker
continue
;;
# -msg_* for osf cc
-msg_*)
func_quote_for_eval "$arg"
arg="$func_quote_for_eval_result"
;;
# Flags to be passed through unchanged, with rationale:
# -64, -mips[0-9] enable 64-bit mode for the SGI compiler
# -r[0-9][0-9]* specify processor for the SGI compiler
# -xarch=*, -xtarget=* enable 64-bit mode for the Sun compiler
# +DA*, +DD* enable 64-bit mode for the HP compiler
# -q* compiler args for the IBM compiler
# -m*, -t[45]*, -txscale* architecture-specific flags for GCC
# -F/path path to uninstalled frameworks, gcc on darwin
# -p, -pg, --coverage, -fprofile-* profiling flags for GCC
# @file GCC response files
# -tp=* Portland pgcc target processor selection
# --sysroot=* for sysroot support
# -O*, -flto*, -fwhopr*, -fuse-linker-plugin GCC link-time optimization
-64|-mips[0-9]|-r[0-9][0-9]*|-xarch=*|-xtarget=*|+DA*|+DD*|-q*|-m*| \
-t[45]*|-txscale*|-p|-pg|--coverage|-fprofile-*|-F*|@*|-tp=*|--sysroot=*| \
-O*|-flto*|-fwhopr*|-fuse-linker-plugin)
func_quote_for_eval "$arg"
arg="$func_quote_for_eval_result"
func_append compile_command " $arg"
func_append finalize_command " $arg"
func_append compiler_flags " $arg"
continue
;;
# Some other compiler flag.
-* | +*)
func_quote_for_eval "$arg"
arg="$func_quote_for_eval_result"
;;
*.$objext)
# A standard object.
func_append objs " $arg"
;;
*.lo)
# A libtool-controlled object.
# Check to see that this really is a libtool object.
if func_lalib_unsafe_p "$arg"; then
pic_object=
non_pic_object=
# Read the .lo file
func_source "$arg"
if test -z "$pic_object" ||
test -z "$non_pic_object" ||
test "$pic_object" = none &&
test "$non_pic_object" = none; then
func_fatal_error "cannot find name of object for \`$arg'"
fi
# Extract subdirectory from the argument.
func_dirname "$arg" "/" ""
xdir="$func_dirname_result"
if test "$pic_object" != none; then
# Prepend the subdirectory the object is found in.
pic_object="$xdir$pic_object"
if test "$prev" = dlfiles; then
if test "$build_libtool_libs" = yes && test "$dlopen_support" = yes; then
func_append dlfiles " $pic_object"
prev=
continue
else
# If libtool objects are unsupported, then we need to preload.
prev=dlprefiles
fi
fi
# CHECK ME: I think I busted this. -Ossama
if test "$prev" = dlprefiles; then
# Preload the old-style object.
func_append dlprefiles " $pic_object"
prev=
fi
# A PIC object.
func_append libobjs " $pic_object"
arg="$pic_object"
fi
# Non-PIC object.
if test "$non_pic_object" != none; then
# Prepend the subdirectory the object is found in.
non_pic_object="$xdir$non_pic_object"
# A standard non-PIC object
func_append non_pic_objects " $non_pic_object"
if test -z "$pic_object" || test "$pic_object" = none ; then
arg="$non_pic_object"
fi
else
# If the PIC object exists, use it instead.
# $xdir was prepended to $pic_object above.
non_pic_object="$pic_object"
func_append non_pic_objects " $non_pic_object"
fi
else
# Only an error if not doing a dry-run.
if $opt_dry_run; then
# Extract subdirectory from the argument.
func_dirname "$arg" "/" ""
xdir="$func_dirname_result"
func_lo2o "$arg"
pic_object=$xdir$objdir/$func_lo2o_result
non_pic_object=$xdir$func_lo2o_result
func_append libobjs " $pic_object"
func_append non_pic_objects " $non_pic_object"
else
func_fatal_error "\`$arg' is not a valid libtool object"
fi
fi
;;
*.$libext)
# An archive.
func_append deplibs " $arg"
func_append old_deplibs " $arg"
continue
;;
*.la)
# A libtool-controlled library.
func_resolve_sysroot "$arg"
if test "$prev" = dlfiles; then
# This library was specified with -dlopen.
func_append dlfiles " $func_resolve_sysroot_result"
prev=
elif test "$prev" = dlprefiles; then
# The library was specified with -dlpreopen.
func_append dlprefiles " $func_resolve_sysroot_result"
prev=
else
func_append deplibs " $func_resolve_sysroot_result"
fi
continue
;;
# Some other compiler argument.
*)
# Unknown arguments in both finalize_command and compile_command need
# to be aesthetically quoted because they are evaled later.
func_quote_for_eval "$arg"
arg="$func_quote_for_eval_result"
;;
esac # arg
# Now actually substitute the argument into the commands.
if test -n "$arg"; then
func_append compile_command " $arg"
func_append finalize_command " $arg"
fi
done # argument parsing loop
test -n "$prev" && \
func_fatal_help "the \`$prevarg' option requires an argument"
if test "$export_dynamic" = yes && test -n "$export_dynamic_flag_spec"; then
eval arg=\"$export_dynamic_flag_spec\"
func_append compile_command " $arg"
func_append finalize_command " $arg"
fi
oldlibs=
# calculate the name of the file, without its directory
func_basename "$output"
outputname="$func_basename_result"
libobjs_save="$libobjs"
if test -n "$shlibpath_var"; then
# get the directories listed in $shlibpath_var
eval shlib_search_path=\`\$ECHO \"\${$shlibpath_var}\" \| \$SED \'s/:/ /g\'\`
else
shlib_search_path=
fi
eval sys_lib_search_path=\"$sys_lib_search_path_spec\"
eval sys_lib_dlsearch_path=\"$sys_lib_dlsearch_path_spec\"
func_dirname "$output" "/" ""
output_objdir="$func_dirname_result$objdir"
func_to_tool_file "$output_objdir/"
tool_output_objdir=$func_to_tool_file_result
# Create the object directory.
func_mkdir_p "$output_objdir"
# Determine the type of output
case $output in
"")
func_fatal_help "you must specify an output file"
;;
*.$libext) linkmode=oldlib ;;
*.lo | *.$objext) linkmode=obj ;;
*.la) linkmode=lib ;;
*) linkmode=prog ;; # Anything else should be a program.
esac
specialdeplibs=
libs=
# Find all interdependent deplibs by searching for libraries
# that are linked more than once (e.g. -la -lb -la)
for deplib in $deplibs; do
if $opt_preserve_dup_deps ; then
case "$libs " in
*" $deplib "*) func_append specialdeplibs " $deplib" ;;
esac
fi
func_append libs " $deplib"
done
if test "$linkmode" = lib; then
libs="$predeps $libs $compiler_lib_search_path $postdeps"
# Compute libraries that are listed more than once in $predeps
# $postdeps and mark them as special (i.e., whose duplicates are
# not to be eliminated).
pre_post_deps=
if $opt_duplicate_compiler_generated_deps; then
for pre_post_dep in $predeps $postdeps; do
case "$pre_post_deps " in
*" $pre_post_dep "*) func_append specialdeplibs " $pre_post_deps" ;;
esac
func_append pre_post_deps " $pre_post_dep"
done
fi
pre_post_deps=
fi
deplibs=
newdependency_libs=
newlib_search_path=
need_relink=no # whether we're linking any uninstalled libtool libraries
notinst_deplibs= # not-installed libtool libraries
notinst_path= # paths that contain not-installed libtool libraries
case $linkmode in
lib)
passes="conv dlpreopen link"
for file in $dlfiles $dlprefiles; do
case $file in
*.la) ;;
*)
func_fatal_help "libraries can \`-dlopen' only libtool libraries: $file"
;;
esac
done
;;
prog)
compile_deplibs=
finalize_deplibs=
alldeplibs=no
newdlfiles=
newdlprefiles=
passes="conv scan dlopen dlpreopen link"
;;
*) passes="conv"
;;
esac
for pass in $passes; do
# The preopen pass in lib mode reverses $deplibs; put it back here
# so that -L comes before libs that need it for instance...
if test "$linkmode,$pass" = "lib,link"; then
## FIXME: Find the place where the list is rebuilt in the wrong
## order, and fix it there properly
tmp_deplibs=
for deplib in $deplibs; do
tmp_deplibs="$deplib $tmp_deplibs"
done
deplibs="$tmp_deplibs"
fi
if test "$linkmode,$pass" = "lib,link" ||
test "$linkmode,$pass" = "prog,scan"; then
libs="$deplibs"
deplibs=
fi
if test "$linkmode" = prog; then
case $pass in
dlopen) libs="$dlfiles" ;;
dlpreopen) libs="$dlprefiles" ;;
link) libs="$deplibs %DEPLIBS% $dependency_libs" ;;
esac
fi
if test "$linkmode,$pass" = "lib,dlpreopen"; then
# Collect and forward deplibs of preopened libtool libs
for lib in $dlprefiles; do
# Ignore non-libtool-libs
dependency_libs=
func_resolve_sysroot "$lib"
case $lib in
*.la) func_source "$func_resolve_sysroot_result" ;;
esac
# Collect preopened libtool deplibs, except any this library
# has declared as weak libs
for deplib in $dependency_libs; do
func_basename "$deplib"
deplib_base=$func_basename_result
case " $weak_libs " in
*" $deplib_base "*) ;;
*) func_append deplibs " $deplib" ;;
esac
done
done
libs="$dlprefiles"
fi
if test "$pass" = dlopen; then
# Collect dlpreopened libraries
save_deplibs="$deplibs"
deplibs=
fi
for deplib in $libs; do
lib=
found=no
case $deplib in
-mt|-mthreads|-kthread|-Kthread|-pthread|-pthreads|--thread-safe \
|-threads|-fopenmp|-openmp|-mp|-xopenmp|-omp|-qsmp=*)
if test "$linkmode,$pass" = "prog,link"; then
compile_deplibs="$deplib $compile_deplibs"
finalize_deplibs="$deplib $finalize_deplibs"
else
func_append compiler_flags " $deplib"
if test "$linkmode" = lib ; then
case "$new_inherited_linker_flags " in
*" $deplib "*) ;;
* ) func_append new_inherited_linker_flags " $deplib" ;;
esac
fi
fi
continue
;;
-l*)
if test "$linkmode" != lib && test "$linkmode" != prog; then
func_warning "\`-l' is ignored for archives/objects"
continue
fi
func_stripname '-l' '' "$deplib"
name=$func_stripname_result
if test "$linkmode" = lib; then
searchdirs="$newlib_search_path $lib_search_path $compiler_lib_search_dirs $sys_lib_search_path $shlib_search_path"
else
searchdirs="$newlib_search_path $lib_search_path $sys_lib_search_path $shlib_search_path"
fi
for searchdir in $searchdirs; do
for search_ext in .la $std_shrext .so .a; do
# Search the libtool library
lib="$searchdir/lib${name}${search_ext}"
if test -f "$lib"; then
if test "$search_ext" = ".la"; then
found=yes
else
found=no
fi
break 2
fi
done
done
if test "$found" != yes; then
# deplib doesn't seem to be a libtool library
if test "$linkmode,$pass" = "prog,link"; then
compile_deplibs="$deplib $compile_deplibs"
finalize_deplibs="$deplib $finalize_deplibs"
else
deplibs="$deplib $deplibs"
test "$linkmode" = lib && newdependency_libs="$deplib $newdependency_libs"
fi
continue
else # deplib is a libtool library
# If $allow_libtool_libs_with_static_runtimes && $deplib is a stdlib,
# We need to do some special things here, and not later.
if test "X$allow_libtool_libs_with_static_runtimes" = "Xyes" ; then
case " $predeps $postdeps " in
*" $deplib "*)
if func_lalib_p "$lib"; then
library_names=
old_library=
func_source "$lib"
for l in $old_library $library_names; do
ll="$l"
done
if test "X$ll" = "X$old_library" ; then # only static version available
found=no
func_dirname "$lib" "" "."
ladir="$func_dirname_result"
lib=$ladir/$old_library
if test "$linkmode,$pass" = "prog,link"; then
compile_deplibs="$deplib $compile_deplibs"
finalize_deplibs="$deplib $finalize_deplibs"
else
deplibs="$deplib $deplibs"
test "$linkmode" = lib && newdependency_libs="$deplib $newdependency_libs"
fi
continue
fi
fi
;;
*) ;;
esac
fi
fi
;; # -l
*.ltframework)
if test "$linkmode,$pass" = "prog,link"; then
compile_deplibs="$deplib $compile_deplibs"
finalize_deplibs="$deplib $finalize_deplibs"
else
deplibs="$deplib $deplibs"
if test "$linkmode" = lib ; then
case "$new_inherited_linker_flags " in
*" $deplib "*) ;;
* ) func_append new_inherited_linker_flags " $deplib" ;;
esac
fi
fi
continue
;;
-L*)
case $linkmode in
lib)
deplibs="$deplib $deplibs"
test "$pass" = conv && continue
newdependency_libs="$deplib $newdependency_libs"
func_stripname '-L' '' "$deplib"
func_resolve_sysroot "$func_stripname_result"
func_append newlib_search_path " $func_resolve_sysroot_result"
;;
prog)
if test "$pass" = conv; then
deplibs="$deplib $deplibs"
continue
fi
if test "$pass" = scan; then
deplibs="$deplib $deplibs"
else
compile_deplibs="$deplib $compile_deplibs"
finalize_deplibs="$deplib $finalize_deplibs"
fi
func_stripname '-L' '' "$deplib"
func_resolve_sysroot "$func_stripname_result"
func_append newlib_search_path " $func_resolve_sysroot_result"
;;
*)
func_warning "\`-L' is ignored for archives/objects"
;;
esac # linkmode
continue
;; # -L
-R*)
if test "$pass" = link; then
func_stripname '-R' '' "$deplib"
func_resolve_sysroot "$func_stripname_result"
dir=$func_resolve_sysroot_result
# Make sure the xrpath contains only unique directories.
case "$xrpath " in
*" $dir "*) ;;
*) func_append xrpath " $dir" ;;
esac
fi
deplibs="$deplib $deplibs"
continue
;;
*.la)
func_resolve_sysroot "$deplib"
lib=$func_resolve_sysroot_result
;;
*.$libext)
if test "$pass" = conv; then
deplibs="$deplib $deplibs"
continue
fi
case $linkmode in
lib)
# Linking convenience modules into shared libraries is allowed,
# but linking other static libraries is non-portable.
case " $dlpreconveniencelibs " in
*" $deplib "*) ;;
*)
valid_a_lib=no
case $deplibs_check_method in
match_pattern*)
set dummy $deplibs_check_method; shift
match_pattern_regex=`expr "$deplibs_check_method" : "$1 \(.*\)"`
if eval "\$ECHO \"$deplib\"" 2>/dev/null | $SED 10q \
| $EGREP "$match_pattern_regex" > /dev/null; then
valid_a_lib=yes
fi
;;
pass_all)
valid_a_lib=yes
;;
esac
if test "$valid_a_lib" != yes; then
echo
$ECHO "*** Warning: Trying to link with static lib archive $deplib."
echo "*** I have the capability to make that library automatically link in when"
echo "*** you link to this library. But I can only do this if you have a"
echo "*** shared version of the library, which you do not appear to have"
echo "*** because the file extensions .$libext of this argument makes me believe"
echo "*** that it is just a static archive that I should not use here."
else
echo
$ECHO "*** Warning: Linking the shared library $output against the"
$ECHO "*** static library $deplib is not portable!"
deplibs="$deplib $deplibs"
fi
;;
esac
continue
;;
prog)
if test "$pass" != link; then
deplibs="$deplib $deplibs"
else
compile_deplibs="$deplib $compile_deplibs"
finalize_deplibs="$deplib $finalize_deplibs"
fi
continue
;;
esac # linkmode
;; # *.$libext
*.lo | *.$objext)
if test "$pass" = conv; then
deplibs="$deplib $deplibs"
elif test "$linkmode" = prog; then
if test "$pass" = dlpreopen || test "$dlopen_support" != yes || test "$build_libtool_libs" = no; then
# If there is no dlopen support or we're linking statically,
# we need to preload.
func_append newdlprefiles " $deplib"
compile_deplibs="$deplib $compile_deplibs"
finalize_deplibs="$deplib $finalize_deplibs"
else
func_append newdlfiles " $deplib"
fi
fi
continue
;;
%DEPLIBS%)
alldeplibs=yes
continue
;;
esac # case $deplib
if test "$found" = yes || test -f "$lib"; then :
else
func_fatal_error "cannot find the library \`$lib' or unhandled argument \`$deplib'"
fi
# Check to see that this really is a libtool archive.
func_lalib_unsafe_p "$lib" \
|| func_fatal_error "\`$lib' is not a valid libtool archive"
func_dirname "$lib" "" "."
ladir="$func_dirname_result"
dlname=
dlopen=
dlpreopen=
libdir=
library_names=
old_library=
inherited_linker_flags=
# If the library was installed with an old release of libtool,
# it will not redefine variables installed, or shouldnotlink
installed=yes
shouldnotlink=no
avoidtemprpath=
# Read the .la file
func_source "$lib"
# Convert "-framework foo" to "foo.ltframework"
if test -n "$inherited_linker_flags"; then
tmp_inherited_linker_flags=`$ECHO "$inherited_linker_flags" | $SED 's/-framework \([^ $]*\)/\1.ltframework/g'`
for tmp_inherited_linker_flag in $tmp_inherited_linker_flags; do
case " $new_inherited_linker_flags " in
*" $tmp_inherited_linker_flag "*) ;;
*) func_append new_inherited_linker_flags " $tmp_inherited_linker_flag";;
esac
done
fi
dependency_libs=`$ECHO " $dependency_libs" | $SED 's% \([^ $]*\).ltframework% -framework \1%g'`
if test "$linkmode,$pass" = "lib,link" ||
test "$linkmode,$pass" = "prog,scan" ||
{ test "$linkmode" != prog && test "$linkmode" != lib; }; then
test -n "$dlopen" && func_append dlfiles " $dlopen"
test -n "$dlpreopen" && func_append dlprefiles " $dlpreopen"
fi
if test "$pass" = conv; then
# Only check for convenience libraries
deplibs="$lib $deplibs"
if test -z "$libdir"; then
if test -z "$old_library"; then
func_fatal_error "cannot find name of link library for \`$lib'"
fi
# It is a libtool convenience library, so add in its objects.
func_append convenience " $ladir/$objdir/$old_library"
func_append old_convenience " $ladir/$objdir/$old_library"
elif test "$linkmode" != prog && test "$linkmode" != lib; then
func_fatal_error "\`$lib' is not a convenience library"
fi
tmp_libs=
for deplib in $dependency_libs; do
deplibs="$deplib $deplibs"
if $opt_preserve_dup_deps ; then
case "$tmp_libs " in
*" $deplib "*) func_append specialdeplibs " $deplib" ;;
esac
fi
func_append tmp_libs " $deplib"
done
continue
fi # $pass = conv
# Get the name of the library we link against.
linklib=
if test -n "$old_library" &&
{ test "$prefer_static_libs" = yes ||
test "$prefer_static_libs,$installed" = "built,no"; }; then
linklib=$old_library
else
for l in $old_library $library_names; do
linklib="$l"
done
fi
if test -z "$linklib"; then
func_fatal_error "cannot find name of link library for \`$lib'"
fi
# This library was specified with -dlopen.
if test "$pass" = dlopen; then
if test -z "$libdir"; then
func_fatal_error "cannot -dlopen a convenience library: \`$lib'"
fi
if test -z "$dlname" ||
test "$dlopen_support" != yes ||
test "$build_libtool_libs" = no; then
# If there is no dlname, no dlopen support or we're linking
# statically, we need to preload. We also need to preload any
# dependent libraries so libltdl's deplib preloader doesn't
# bomb out in the load deplibs phase.
func_append dlprefiles " $lib $dependency_libs"
else
func_append newdlfiles " $lib"
fi
continue
fi # $pass = dlopen
# We need an absolute path.
case $ladir in
[\\/]* | [A-Za-z]:[\\/]*) abs_ladir="$ladir" ;;
*)
abs_ladir=`cd "$ladir" && pwd`
if test -z "$abs_ladir"; then
func_warning "cannot determine absolute directory name of \`$ladir'"
func_warning "passing it literally to the linker, although it might fail"
abs_ladir="$ladir"
fi
;;
esac
func_basename "$lib"
laname="$func_basename_result"
# Find the relevant object directory and library name.
if test "X$installed" = Xyes; then
if test ! -f "$lt_sysroot$libdir/$linklib" && test -f "$abs_ladir/$linklib"; then
func_warning "library \`$lib' was moved."
dir="$ladir"
absdir="$abs_ladir"
libdir="$abs_ladir"
else
dir="$lt_sysroot$libdir"
absdir="$lt_sysroot$libdir"
fi
test "X$hardcode_automatic" = Xyes && avoidtemprpath=yes
else
if test ! -f "$ladir/$objdir/$linklib" && test -f "$abs_ladir/$linklib"; then
dir="$ladir"
absdir="$abs_ladir"
# Remove this search path later
func_append notinst_path " $abs_ladir"
else
dir="$ladir/$objdir"
absdir="$abs_ladir/$objdir"
# Remove this search path later
func_append notinst_path " $abs_ladir"
fi
fi # $installed = yes
func_stripname 'lib' '.la' "$laname"
name=$func_stripname_result
# This library was specified with -dlpreopen.
if test "$pass" = dlpreopen; then
if test -z "$libdir" && test "$linkmode" = prog; then
func_fatal_error "only libraries may -dlpreopen a convenience library: \`$lib'"
fi
case "$host" in
# special handling for platforms with PE-DLLs.
*cygwin* | *mingw* | *cegcc* )
# Linker will automatically link against shared library if both
# static and shared are present. Therefore, ensure we extract
# symbols from the import library if a shared library is present
# (otherwise, the dlopen module name will be incorrect). We do
# this by putting the import library name into $newdlprefiles.
# We recover the dlopen module name by 'saving' the la file
# name in a special purpose variable, and (later) extracting the
# dlname from the la file.
if test -n "$dlname"; then
func_tr_sh "$dir/$linklib"
eval "libfile_$func_tr_sh_result=\$abs_ladir/\$laname"
func_append newdlprefiles " $dir/$linklib"
else
func_append newdlprefiles " $dir/$old_library"
# Keep a list of preopened convenience libraries to check
# that they are being used correctly in the link pass.
test -z "$libdir" && \
func_append dlpreconveniencelibs " $dir/$old_library"
fi
;;
* )
# Prefer using a static library (so that no silly _DYNAMIC symbols
# are required to link).
if test -n "$old_library"; then
func_append newdlprefiles " $dir/$old_library"
# Keep a list of preopened convenience libraries to check
# that they are being used correctly in the link pass.
test -z "$libdir" && \
func_append dlpreconveniencelibs " $dir/$old_library"
# Otherwise, use the dlname, so that lt_dlopen finds it.
elif test -n "$dlname"; then
func_append newdlprefiles " $dir/$dlname"
else
func_append newdlprefiles " $dir/$linklib"
fi
;;
esac
fi # $pass = dlpreopen
if test -z "$libdir"; then
# Link the convenience library
if test "$linkmode" = lib; then
deplibs="$dir/$old_library $deplibs"
elif test "$linkmode,$pass" = "prog,link"; then
compile_deplibs="$dir/$old_library $compile_deplibs"
finalize_deplibs="$dir/$old_library $finalize_deplibs"
else
deplibs="$lib $deplibs" # used for prog,scan pass
fi
continue
fi
if test "$linkmode" = prog && test "$pass" != link; then
func_append newlib_search_path " $ladir"
deplibs="$lib $deplibs"
linkalldeplibs=no
if test "$link_all_deplibs" != no || test -z "$library_names" ||
test "$build_libtool_libs" = no; then
linkalldeplibs=yes
fi
tmp_libs=
for deplib in $dependency_libs; do
case $deplib in
-L*) func_stripname '-L' '' "$deplib"
func_resolve_sysroot "$func_stripname_result"
func_append newlib_search_path " $func_resolve_sysroot_result"
;;
esac
# Need to link against all dependency_libs?
if test "$linkalldeplibs" = yes; then
deplibs="$deplib $deplibs"
else
# Need to hardcode shared library paths
# or/and link against static libraries
newdependency_libs="$deplib $newdependency_libs"
fi
if $opt_preserve_dup_deps ; then
case "$tmp_libs " in
*" $deplib "*) func_append specialdeplibs " $deplib" ;;
esac
fi
func_append tmp_libs " $deplib"
done # for deplib
continue
fi # $linkmode = prog...
if test "$linkmode,$pass" = "prog,link"; then
if test -n "$library_names" &&
{ { test "$prefer_static_libs" = no ||
test "$prefer_static_libs,$installed" = "built,yes"; } ||
test -z "$old_library"; }; then
# We need to hardcode the library path
if test -n "$shlibpath_var" && test -z "$avoidtemprpath" ; then
# Make sure the rpath contains only unique directories.
case "$temp_rpath:" in
*"$absdir:"*) ;;
*) func_append temp_rpath "$absdir:" ;;
esac
fi
# Hardcode the library path.
# Skip directories that are in the system default run-time
# search path.
case " $sys_lib_dlsearch_path " in
*" $absdir "*) ;;
*)
case "$compile_rpath " in
*" $absdir "*) ;;
*) func_append compile_rpath " $absdir" ;;
esac
;;
esac
case " $sys_lib_dlsearch_path " in
*" $libdir "*) ;;
*)
case "$finalize_rpath " in
*" $libdir "*) ;;
*) func_append finalize_rpath " $libdir" ;;
esac
;;
esac
fi # $linkmode,$pass = prog,link...
if test "$alldeplibs" = yes &&
{ test "$deplibs_check_method" = pass_all ||
{ test "$build_libtool_libs" = yes &&
test -n "$library_names"; }; }; then
# We only need to search for static libraries
continue
fi
fi
link_static=no # Whether the deplib will be linked statically
use_static_libs=$prefer_static_libs
if test "$use_static_libs" = built && test "$installed" = yes; then
use_static_libs=no
fi
if test -n "$library_names" &&
{ test "$use_static_libs" = no || test -z "$old_library"; }; then
case $host in
*cygwin* | *mingw* | *cegcc*)
# No point in relinking DLLs because paths are not encoded
func_append notinst_deplibs " $lib"
need_relink=no
;;
*)
if test "$installed" = no; then
func_append notinst_deplibs " $lib"
need_relink=yes
fi
;;
esac
# This is a shared library
# Warn about portability, can't link against -module's on some
# systems (darwin). Don't bleat about dlopened modules though!
dlopenmodule=""
for dlpremoduletest in $dlprefiles; do
if test "X$dlpremoduletest" = "X$lib"; then
dlopenmodule="$dlpremoduletest"
break
fi
done
if test -z "$dlopenmodule" && test "$shouldnotlink" = yes && test "$pass" = link; then
echo
if test "$linkmode" = prog; then
$ECHO "*** Warning: Linking the executable $output against the loadable module"
else
$ECHO "*** Warning: Linking the shared library $output against the loadable module"
fi
$ECHO "*** $linklib is not portable!"
fi
if test "$linkmode" = lib &&
test "$hardcode_into_libs" = yes; then
# Hardcode the library path.
# Skip directories that are in the system default run-time
# search path.
case " $sys_lib_dlsearch_path " in
*" $absdir "*) ;;
*)
case "$compile_rpath " in
*" $absdir "*) ;;
*) func_append compile_rpath " $absdir" ;;
esac
;;
esac
case " $sys_lib_dlsearch_path " in
*" $libdir "*) ;;
*)
case "$finalize_rpath " in
*" $libdir "*) ;;
*) func_append finalize_rpath " $libdir" ;;
esac
;;
esac
fi
if test -n "$old_archive_from_expsyms_cmds"; then
# figure out the soname
set dummy $library_names
shift
realname="$1"
shift
libname=`eval "\\$ECHO \"$libname_spec\""`
# use dlname if we got it. it's perfectly good, no?
if test -n "$dlname"; then
soname="$dlname"
elif test -n "$soname_spec"; then
# bleh windows
case $host in
*cygwin* | mingw* | *cegcc*)
func_arith $current - $age
major=$func_arith_result
versuffix="-$major"
;;
esac
eval soname=\"$soname_spec\"
else
soname="$realname"
fi
# Make a new name for the extract_expsyms_cmds to use
soroot="$soname"
func_basename "$soroot"
soname="$func_basename_result"
func_stripname 'lib' '.dll' "$soname"
newlib=libimp-$func_stripname_result.a
# If the library has no export list, then create one now
if test -f "$output_objdir/$soname-def"; then :
else
func_verbose "extracting exported symbol list from \`$soname'"
func_execute_cmds "$extract_expsyms_cmds" 'exit $?'
fi
# Create $newlib
if test -f "$output_objdir/$newlib"; then :; else
func_verbose "generating import library for \`$soname'"
func_execute_cmds "$old_archive_from_expsyms_cmds" 'exit $?'
fi
# make sure the library variables are pointing to the new library
dir=$output_objdir
linklib=$newlib
fi # test -n "$old_archive_from_expsyms_cmds"
if test "$linkmode" = prog || test "$opt_mode" != relink; then
add_shlibpath=
add_dir=
add=
lib_linked=yes
case $hardcode_action in
immediate | unsupported)
if test "$hardcode_direct" = no; then
add="$dir/$linklib"
case $host in
*-*-sco3.2v5.0.[024]*) add_dir="-L$dir" ;;
*-*-sysv4*uw2*) add_dir="-L$dir" ;;
*-*-sysv5OpenUNIX* | *-*-sysv5UnixWare7.[01].[10]* | \
*-*-unixware7*) add_dir="-L$dir" ;;
*-*-darwin* )
# if the lib is a (non-dlopened) module then we can not
# link against it, someone is ignoring the earlier warnings
if /usr/bin/file -L $add 2> /dev/null |
$GREP ": [^:]* bundle" >/dev/null ; then
if test "X$dlopenmodule" != "X$lib"; then
$ECHO "*** Warning: lib $linklib is a module, not a shared library"
if test -z "$old_library" ; then
echo
echo "*** And there doesn't seem to be a static archive available"
echo "*** The link will probably fail, sorry"
else
add="$dir/$old_library"
fi
elif test -n "$old_library"; then
add="$dir/$old_library"
fi
fi
esac
elif test "$hardcode_minus_L" = no; then
case $host in
*-*-sunos*) add_shlibpath="$dir" ;;
esac
add_dir="-L$dir"
add="-l$name"
elif test "$hardcode_shlibpath_var" = no; then
add_shlibpath="$dir"
add="-l$name"
else
lib_linked=no
fi
;;
relink)
if test "$hardcode_direct" = yes &&
test "$hardcode_direct_absolute" = no; then
add="$dir/$linklib"
elif test "$hardcode_minus_L" = yes; then
add_dir="-L$absdir"
# Try looking first in the location we're being installed to.
if test -n "$inst_prefix_dir"; then
case $libdir in
[\\/]*)
func_append add_dir " -L$inst_prefix_dir$libdir"
;;
esac
fi
add="-l$name"
elif test "$hardcode_shlibpath_var" = yes; then
add_shlibpath="$dir"
add="-l$name"
else
lib_linked=no
fi
;;
*) lib_linked=no ;;
esac
if test "$lib_linked" != yes; then
func_fatal_configuration "unsupported hardcode properties"
fi
if test -n "$add_shlibpath"; then
case :$compile_shlibpath: in
*":$add_shlibpath:"*) ;;
*) func_append compile_shlibpath "$add_shlibpath:" ;;
esac
fi
if test "$linkmode" = prog; then
test -n "$add_dir" && compile_deplibs="$add_dir $compile_deplibs"
test -n "$add" && compile_deplibs="$add $compile_deplibs"
else
test -n "$add_dir" && deplibs="$add_dir $deplibs"
test -n "$add" && deplibs="$add $deplibs"
if test "$hardcode_direct" != yes &&
test "$hardcode_minus_L" != yes &&
test "$hardcode_shlibpath_var" = yes; then
case :$finalize_shlibpath: in
*":$libdir:"*) ;;
*) func_append finalize_shlibpath "$libdir:" ;;
esac
fi
fi
fi
if test "$linkmode" = prog || test "$opt_mode" = relink; then
add_shlibpath=
add_dir=
add=
# Finalize command for both is simple: just hardcode it.
if test "$hardcode_direct" = yes &&
test "$hardcode_direct_absolute" = no; then
add="$libdir/$linklib"
elif test "$hardcode_minus_L" = yes; then
add_dir="-L$libdir"
add="-l$name"
elif test "$hardcode_shlibpath_var" = yes; then
case :$finalize_shlibpath: in
*":$libdir:"*) ;;
*) func_append finalize_shlibpath "$libdir:" ;;
esac
add="-l$name"
elif test "$hardcode_automatic" = yes; then
if test -n "$inst_prefix_dir" &&
test -f "$inst_prefix_dir$libdir/$linklib" ; then
add="$inst_prefix_dir$libdir/$linklib"
else
add="$libdir/$linklib"
fi
else
# We cannot seem to hardcode it, guess we'll fake it.
add_dir="-L$libdir"
# Try looking first in the location we're being installed to.
if test -n "$inst_prefix_dir"; then
case $libdir in
[\\/]*)
func_append add_dir " -L$inst_prefix_dir$libdir"
;;
esac
fi
add="-l$name"
fi
if test "$linkmode" = prog; then
test -n "$add_dir" && finalize_deplibs="$add_dir $finalize_deplibs"
test -n "$add" && finalize_deplibs="$add $finalize_deplibs"
else
test -n "$add_dir" && deplibs="$add_dir $deplibs"
test -n "$add" && deplibs="$add $deplibs"
fi
fi
elif test "$linkmode" = prog; then
# Here we assume that one of hardcode_direct or hardcode_minus_L
# is not unsupported. This is valid on all known static and
# shared platforms.
if test "$hardcode_direct" != unsupported; then
test -n "$old_library" && linklib="$old_library"
compile_deplibs="$dir/$linklib $compile_deplibs"
finalize_deplibs="$dir/$linklib $finalize_deplibs"
else
compile_deplibs="-l$name -L$dir $compile_deplibs"
finalize_deplibs="-l$name -L$dir $finalize_deplibs"
fi
elif test "$build_libtool_libs" = yes; then
# Not a shared library
if test "$deplibs_check_method" != pass_all; then
# We're trying link a shared library against a static one
# but the system doesn't support it.
# Just print a warning and add the library to dependency_libs so
# that the program can be linked against the static library.
echo
$ECHO "*** Warning: This system can not link to static lib archive $lib."
echo "*** I have the capability to make that library automatically link in when"
echo "*** you link to this library. But I can only do this if you have a"
echo "*** shared version of the library, which you do not appear to have."
if test "$module" = yes; then
echo "*** But as you try to build a module library, libtool will still create "
echo "*** a static module, that should work as long as the dlopening application"
echo "*** is linked with the -dlopen flag to resolve symbols at runtime."
if test -z "$global_symbol_pipe"; then
echo
echo "*** However, this would only work if libtool was able to extract symbol"
echo "*** lists from a program, using \`nm' or equivalent, but libtool could"
echo "*** not find such a program. So, this module is probably useless."
echo "*** \`nm' from GNU binutils and a full rebuild may help."
fi
if test "$build_old_libs" = no; then
build_libtool_libs=module
build_old_libs=yes
else
build_libtool_libs=no
fi
fi
else
deplibs="$dir/$old_library $deplibs"
link_static=yes
fi
fi # link shared/static library?
if test "$linkmode" = lib; then
if test -n "$dependency_libs" &&
{ test "$hardcode_into_libs" != yes ||
test "$build_old_libs" = yes ||
test "$link_static" = yes; }; then
# Extract -R from dependency_libs
temp_deplibs=
for libdir in $dependency_libs; do
case $libdir in
-R*) func_stripname '-R' '' "$libdir"
temp_xrpath=$func_stripname_result
case " $xrpath " in
*" $temp_xrpath "*) ;;
*) func_append xrpath " $temp_xrpath";;
esac;;
*) func_append temp_deplibs " $libdir";;
esac
done
dependency_libs="$temp_deplibs"
fi
func_append newlib_search_path " $absdir"
# Link against this library
test "$link_static" = no && newdependency_libs="$abs_ladir/$laname $newdependency_libs"
# ... and its dependency_libs
tmp_libs=
for deplib in $dependency_libs; do
newdependency_libs="$deplib $newdependency_libs"
case $deplib in
-L*) func_stripname '-L' '' "$deplib"
func_resolve_sysroot "$func_stripname_result";;
*) func_resolve_sysroot "$deplib" ;;
esac
if $opt_preserve_dup_deps ; then
case "$tmp_libs " in
*" $func_resolve_sysroot_result "*)
func_append specialdeplibs " $func_resolve_sysroot_result" ;;
esac
fi
func_append tmp_libs " $func_resolve_sysroot_result"
done
if test "$link_all_deplibs" != no; then
# Add the search paths of all dependency libraries
for deplib in $dependency_libs; do
path=
case $deplib in
-L*) path="$deplib" ;;
*.la)
func_resolve_sysroot "$deplib"
deplib=$func_resolve_sysroot_result
func_dirname "$deplib" "" "."
dir=$func_dirname_result
# We need an absolute path.
case $dir in
[\\/]* | [A-Za-z]:[\\/]*) absdir="$dir" ;;
*)
absdir=`cd "$dir" && pwd`
if test -z "$absdir"; then
func_warning "cannot determine absolute directory name of \`$dir'"
absdir="$dir"
fi
;;
esac
if $GREP "^installed=no" $deplib > /dev/null; then
case $host in
*-*-darwin*)
depdepl=
eval deplibrary_names=`${SED} -n -e 's/^library_names=\(.*\)$/\1/p' $deplib`
if test -n "$deplibrary_names" ; then
for tmp in $deplibrary_names ; do
depdepl=$tmp
done
if test -f "$absdir/$objdir/$depdepl" ; then
depdepl="$absdir/$objdir/$depdepl"
darwin_install_name=`${OTOOL} -L $depdepl | awk '{if (NR == 2) {print $1;exit}}'`
if test -z "$darwin_install_name"; then
darwin_install_name=`${OTOOL64} -L $depdepl | awk '{if (NR == 2) {print $1;exit}}'`
fi
func_append compiler_flags " ${wl}-dylib_file ${wl}${darwin_install_name}:${depdepl}"
func_append linker_flags " -dylib_file ${darwin_install_name}:${depdepl}"
path=
fi
fi
;;
*)
path="-L$absdir/$objdir"
;;
esac
else
eval libdir=`${SED} -n -e 's/^libdir=\(.*\)$/\1/p' $deplib`
test -z "$libdir" && \
func_fatal_error "\`$deplib' is not a valid libtool archive"
test "$absdir" != "$libdir" && \
func_warning "\`$deplib' seems to be moved"
path="-L$absdir"
fi
;;
esac
case " $deplibs " in
*" $path "*) ;;
*) deplibs="$path $deplibs" ;;
esac
done
fi # link_all_deplibs != no
fi # linkmode = lib
done # for deplib in $libs
if test "$pass" = link; then
if test "$linkmode" = "prog"; then
compile_deplibs="$new_inherited_linker_flags $compile_deplibs"
finalize_deplibs="$new_inherited_linker_flags $finalize_deplibs"
else
compiler_flags="$compiler_flags "`$ECHO " $new_inherited_linker_flags" | $SED 's% \([^ $]*\).ltframework% -framework \1%g'`
fi
fi
dependency_libs="$newdependency_libs"
if test "$pass" = dlpreopen; then
# Link the dlpreopened libraries before other libraries
for deplib in $save_deplibs; do
deplibs="$deplib $deplibs"
done
fi
if test "$pass" != dlopen; then
if test "$pass" != conv; then
# Make sure lib_search_path contains only unique directories.
lib_search_path=
for dir in $newlib_search_path; do
case "$lib_search_path " in
*" $dir "*) ;;
*) func_append lib_search_path " $dir" ;;
esac
done
newlib_search_path=
fi
if test "$linkmode,$pass" != "prog,link"; then
vars="deplibs"
else
vars="compile_deplibs finalize_deplibs"
fi
for var in $vars dependency_libs; do
# Add libraries to $var in reverse order
eval tmp_libs=\"\$$var\"
new_libs=
for deplib in $tmp_libs; do
# FIXME: Pedantically, this is the right thing to do, so
# that some nasty dependency loop isn't accidentally
# broken:
#new_libs="$deplib $new_libs"
# Pragmatically, this seems to cause very few problems in
# practice:
case $deplib in
-L*) new_libs="$deplib $new_libs" ;;
-R*) ;;
*)
# And here is the reason: when a library appears more
# than once as an explicit dependence of a library, or
# is implicitly linked in more than once by the
# compiler, it is considered special, and multiple
# occurrences thereof are not removed. Compare this
# with having the same library being listed as a
# dependency of multiple other libraries: in this case,
# we know (pedantically, we assume) the library does not
# need to be listed more than once, so we keep only the
# last copy. This is not always right, but it is rare
# enough that we require users that really mean to play
# such unportable linking tricks to link the library
# using -Wl,-lname, so that libtool does not consider it
# for duplicate removal.
case " $specialdeplibs " in
*" $deplib "*) new_libs="$deplib $new_libs" ;;
*)
case " $new_libs " in
*" $deplib "*) ;;
*) new_libs="$deplib $new_libs" ;;
esac
;;
esac
;;
esac
done
tmp_libs=
for deplib in $new_libs; do
case $deplib in
-L*)
case " $tmp_libs " in
*" $deplib "*) ;;
*) func_append tmp_libs " $deplib" ;;
esac
;;
*) func_append tmp_libs " $deplib" ;;
esac
done
eval $var=\"$tmp_libs\"
done # for var
fi
# Last step: remove runtime libs from dependency_libs
# (they stay in deplibs)
tmp_libs=
for i in $dependency_libs ; do
case " $predeps $postdeps $compiler_lib_search_path " in
*" $i "*)
i=""
;;
esac
if test -n "$i" ; then
func_append tmp_libs " $i"
fi
done
dependency_libs=$tmp_libs
done # for pass
if test "$linkmode" = prog; then
dlfiles="$newdlfiles"
fi
if test "$linkmode" = prog || test "$linkmode" = lib; then
dlprefiles="$newdlprefiles"
fi
case $linkmode in
oldlib)
if test -n "$dlfiles$dlprefiles" || test "$dlself" != no; then
func_warning "\`-dlopen' is ignored for archives"
fi
case " $deplibs" in
*\ -l* | *\ -L*)
func_warning "\`-l' and \`-L' are ignored for archives" ;;
esac
test -n "$rpath" && \
func_warning "\`-rpath' is ignored for archives"
test -n "$xrpath" && \
func_warning "\`-R' is ignored for archives"
test -n "$vinfo" && \
func_warning "\`-version-info/-version-number' is ignored for archives"
test -n "$release" && \
func_warning "\`-release' is ignored for archives"
test -n "$export_symbols$export_symbols_regex" && \
func_warning "\`-export-symbols' is ignored for archives"
# Now set the variables for building old libraries.
build_libtool_libs=no
oldlibs="$output"
func_append objs "$old_deplibs"
;;
lib)
# Make sure we only generate libraries of the form `libNAME.la'.
case $outputname in
lib*)
func_stripname 'lib' '.la' "$outputname"
name=$func_stripname_result
eval shared_ext=\"$shrext_cmds\"
eval libname=\"$libname_spec\"
;;
*)
test "$module" = no && \
func_fatal_help "libtool library \`$output' must begin with \`lib'"
if test "$need_lib_prefix" != no; then
# Add the "lib" prefix for modules if required
func_stripname '' '.la' "$outputname"
name=$func_stripname_result
eval shared_ext=\"$shrext_cmds\"
eval libname=\"$libname_spec\"
else
func_stripname '' '.la' "$outputname"
libname=$func_stripname_result
fi
;;
esac
if test -n "$objs"; then
if test "$deplibs_check_method" != pass_all; then
func_fatal_error "cannot build libtool library \`$output' from non-libtool objects on this host:$objs"
else
echo
$ECHO "*** Warning: Linking the shared library $output against the non-libtool"
$ECHO "*** objects $objs is not portable!"
func_append libobjs " $objs"
fi
fi
test "$dlself" != no && \
func_warning "\`-dlopen self' is ignored for libtool libraries"
set dummy $rpath
shift
test "$#" -gt 1 && \
func_warning "ignoring multiple \`-rpath's for a libtool library"
install_libdir="$1"
oldlibs=
if test -z "$rpath"; then
if test "$build_libtool_libs" = yes; then
# Building a libtool convenience library.
# Some compilers have problems with a `.al' extension so
# convenience libraries should have the same extension an
# archive normally would.
oldlibs="$output_objdir/$libname.$libext $oldlibs"
build_libtool_libs=convenience
build_old_libs=yes
fi
test -n "$vinfo" && \
func_warning "\`-version-info/-version-number' is ignored for convenience libraries"
test -n "$release" && \
func_warning "\`-release' is ignored for convenience libraries"
else
# Parse the version information argument.
save_ifs="$IFS"; IFS=':'
set dummy $vinfo 0 0 0
shift
IFS="$save_ifs"
test -n "$7" && \
func_fatal_help "too many parameters to \`-version-info'"
# convert absolute version numbers to libtool ages
# this retains compatibility with .la files and attempts
# to make the code below a bit more comprehensible
case $vinfo_number in
yes)
number_major="$1"
number_minor="$2"
number_revision="$3"
#
# There are really only two kinds -- those that
# use the current revision as the major version
# and those that subtract age and use age as
# a minor version. But, then there is irix
# which has an extra 1 added just for fun
#
case $version_type in
# correct linux to gnu/linux during the next big refactor
darwin|linux|osf|windows|none)
func_arith $number_major + $number_minor
current=$func_arith_result
age="$number_minor"
revision="$number_revision"
;;
freebsd-aout|freebsd-elf|qnx|sunos)
current="$number_major"
revision="$number_minor"
age="0"
;;
irix|nonstopux)
func_arith $number_major + $number_minor
current=$func_arith_result
age="$number_minor"
revision="$number_minor"
lt_irix_increment=no
;;
esac
;;
no)
current="$1"
revision="$2"
age="$3"
;;
esac
# Check that each of the things are valid numbers.
case $current in
0|[1-9]|[1-9][0-9]|[1-9][0-9][0-9]|[1-9][0-9][0-9][0-9]|[1-9][0-9][0-9][0-9][0-9]) ;;
*)
func_error "CURRENT \`$current' must be a nonnegative integer"
func_fatal_error "\`$vinfo' is not valid version information"
;;
esac
case $revision in
0|[1-9]|[1-9][0-9]|[1-9][0-9][0-9]|[1-9][0-9][0-9][0-9]|[1-9][0-9][0-9][0-9][0-9]) ;;
*)
func_error "REVISION \`$revision' must be a nonnegative integer"
func_fatal_error "\`$vinfo' is not valid version information"
;;
esac
case $age in
0|[1-9]|[1-9][0-9]|[1-9][0-9][0-9]|[1-9][0-9][0-9][0-9]|[1-9][0-9][0-9][0-9][0-9]) ;;
*)
func_error "AGE \`$age' must be a nonnegative integer"
func_fatal_error "\`$vinfo' is not valid version information"
;;
esac
if test "$age" -gt "$current"; then
func_error "AGE \`$age' is greater than the current interface number \`$current'"
func_fatal_error "\`$vinfo' is not valid version information"
fi
# Calculate the version variables.
major=
versuffix=
verstring=
case $version_type in
none) ;;
darwin)
# Like Linux, but with the current version available in
# verstring for coding it into the library header
func_arith $current - $age
major=.$func_arith_result
versuffix="$major.$age.$revision"
# Darwin ld doesn't like 0 for these options...
func_arith $current + 1
minor_current=$func_arith_result
xlcverstring="${wl}-compatibility_version ${wl}$minor_current ${wl}-current_version ${wl}$minor_current.$revision"
verstring="-compatibility_version $minor_current -current_version $minor_current.$revision"
;;
freebsd-aout)
major=".$current"
versuffix=".$current.$revision";
;;
freebsd-elf)
major=".$current"
versuffix=".$current"
;;
irix | nonstopux)
if test "X$lt_irix_increment" = "Xno"; then
func_arith $current - $age
else
func_arith $current - $age + 1
fi
major=$func_arith_result
case $version_type in
nonstopux) verstring_prefix=nonstopux ;;
*) verstring_prefix=sgi ;;
esac
verstring="$verstring_prefix$major.$revision"
# Add in all the interfaces that we are compatible with.
loop=$revision
while test "$loop" -ne 0; do
func_arith $revision - $loop
iface=$func_arith_result
func_arith $loop - 1
loop=$func_arith_result
verstring="$verstring_prefix$major.$iface:$verstring"
done
# Before this point, $major must not contain `.'.
major=.$major
versuffix="$major.$revision"
;;
linux) # correct to gnu/linux during the next big refactor
func_arith $current - $age
major=.$func_arith_result
versuffix="$major.$age.$revision"
;;
osf)
func_arith $current - $age
major=.$func_arith_result
versuffix=".$current.$age.$revision"
verstring="$current.$age.$revision"
# Add in all the interfaces that we are compatible with.
loop=$age
while test "$loop" -ne 0; do
func_arith $current - $loop
iface=$func_arith_result
func_arith $loop - 1
loop=$func_arith_result
verstring="$verstring:${iface}.0"
done
# Make executables depend on our current version.
func_append verstring ":${current}.0"
;;
qnx)
major=".$current"
versuffix=".$current"
;;
sunos)
major=".$current"
versuffix=".$current.$revision"
;;
windows)
# Use '-' rather than '.', since we only want one
# extension on DOS 8.3 filesystems.
func_arith $current - $age
major=$func_arith_result
versuffix="-$major"
;;
*)
func_fatal_configuration "unknown library version type \`$version_type'"
;;
esac
# Clear the version info if we defaulted, and they specified a release.
if test -z "$vinfo" && test -n "$release"; then
major=
case $version_type in
darwin)
# we can't check for "0.0" in archive_cmds due to quoting
# problems, so we reset it completely
verstring=
;;
*)
verstring="0.0"
;;
esac
if test "$need_version" = no; then
versuffix=
else
versuffix=".0.0"
fi
fi
# Remove version info from name if versioning should be avoided
if test "$avoid_version" = yes && test "$need_version" = no; then
major=
versuffix=
verstring=""
fi
# Check to see if the archive will have undefined symbols.
if test "$allow_undefined" = yes; then
if test "$allow_undefined_flag" = unsupported; then
func_warning "undefined symbols not allowed in $host shared libraries"
build_libtool_libs=no
build_old_libs=yes
fi
else
# Don't allow undefined symbols.
allow_undefined_flag="$no_undefined_flag"
fi
fi
func_generate_dlsyms "$libname" "$libname" "yes"
func_append libobjs " $symfileobj"
test "X$libobjs" = "X " && libobjs=
if test "$opt_mode" != relink; then
# Remove our outputs, but don't remove object files since they
# may have been created when compiling PIC objects.
removelist=
tempremovelist=`$ECHO "$output_objdir/*"`
for p in $tempremovelist; do
case $p in
*.$objext | *.gcno)
;;
$output_objdir/$outputname | $output_objdir/$libname.* | $output_objdir/${libname}${release}.*)
if test "X$precious_files_regex" != "X"; then
if $ECHO "$p" | $EGREP -e "$precious_files_regex" >/dev/null 2>&1
then
continue
fi
fi
func_append removelist " $p"
;;
*) ;;
esac
done
test -n "$removelist" && \
func_show_eval "${RM}r \$removelist"
fi
# Now set the variables for building old libraries.
if test "$build_old_libs" = yes && test "$build_libtool_libs" != convenience ; then
func_append oldlibs " $output_objdir/$libname.$libext"
# Transform .lo files to .o files.
oldobjs="$objs "`$ECHO "$libobjs" | $SP2NL | $SED "/\.${libext}$/d; $lo2o" | $NL2SP`
fi
# Eliminate all temporary directories.
#for path in $notinst_path; do
# lib_search_path=`$ECHO "$lib_search_path " | $SED "s% $path % %g"`
# deplibs=`$ECHO "$deplibs " | $SED "s% -L$path % %g"`
# dependency_libs=`$ECHO "$dependency_libs " | $SED "s% -L$path % %g"`
#done
if test -n "$xrpath"; then
# If the user specified any rpath flags, then add them.
temp_xrpath=
for libdir in $xrpath; do
func_replace_sysroot "$libdir"
func_append temp_xrpath " -R$func_replace_sysroot_result"
case "$finalize_rpath " in
*" $libdir "*) ;;
*) func_append finalize_rpath " $libdir" ;;
esac
done
if test "$hardcode_into_libs" != yes || test "$build_old_libs" = yes; then
dependency_libs="$temp_xrpath $dependency_libs"
fi
fi
# Make sure dlfiles contains only unique files that won't be dlpreopened
old_dlfiles="$dlfiles"
dlfiles=
for lib in $old_dlfiles; do
case " $dlprefiles $dlfiles " in
*" $lib "*) ;;
*) func_append dlfiles " $lib" ;;
esac
done
# Make sure dlprefiles contains only unique files
old_dlprefiles="$dlprefiles"
dlprefiles=
for lib in $old_dlprefiles; do
case "$dlprefiles " in
*" $lib "*) ;;
*) func_append dlprefiles " $lib" ;;
esac
done
if test "$build_libtool_libs" = yes; then
if test -n "$rpath"; then
case $host in
*-*-cygwin* | *-*-mingw* | *-*-pw32* | *-*-os2* | *-*-beos* | *-cegcc* | *-*-haiku*)
# these systems don't actually have a c library (as such)!
;;
*-*-rhapsody* | *-*-darwin1.[012])
# Rhapsody C library is in the System framework
func_append deplibs " System.ltframework"
;;
*-*-netbsd*)
# Don't link with libc until the a.out ld.so is fixed.
;;
*-*-openbsd* | *-*-freebsd* | *-*-dragonfly*)
# Do not include libc due to us having libc/libc_r.
;;
*-*-sco3.2v5* | *-*-sco5v6*)
# Causes problems with __ctype
;;
*-*-sysv4.2uw2* | *-*-sysv5* | *-*-unixware* | *-*-OpenUNIX*)
# Compiler inserts libc in the correct place for threads to work
;;
*)
# Add libc to deplibs on all other systems if necessary.
if test "$build_libtool_need_lc" = "yes"; then
func_append deplibs " -lc"
fi
;;
esac
fi
# Transform deplibs into only deplibs that can be linked in shared.
name_save=$name
libname_save=$libname
release_save=$release
versuffix_save=$versuffix
major_save=$major
# I'm not sure if I'm treating the release correctly. I think
# release should show up in the -l (ie -lgmp5) so we don't want to
# add it in twice. Is that correct?
release=""
versuffix=""
major=""
newdeplibs=
droppeddeps=no
case $deplibs_check_method in
pass_all)
# Don't check for shared/static. Everything works.
# This might be a little naive. We might want to check
# whether the library exists or not. But this is on
# osf3 & osf4 and I'm not really sure... Just
# implementing what was already the behavior.
newdeplibs=$deplibs
;;
test_compile)
# This code stresses the "libraries are programs" paradigm to its
# limits. Maybe even breaks it. We compile a program, linking it
# against the deplibs as a proxy for the library. Then we can check
# whether they linked in statically or dynamically with ldd.
$opt_dry_run || $RM conftest.c
cat > conftest.c </dev/null`
$nocaseglob
else
potential_libs=`ls $i/$libnameglob[.-]* 2>/dev/null`
fi
for potent_lib in $potential_libs; do
# Follow soft links.
if ls -lLd "$potent_lib" 2>/dev/null |
$GREP " -> " >/dev/null; then
continue
fi
# The statement above tries to avoid entering an
# endless loop below, in case of cyclic links.
# We might still enter an endless loop, since a link
# loop can be closed while we follow links,
# but so what?
potlib="$potent_lib"
while test -h "$potlib" 2>/dev/null; do
potliblink=`ls -ld $potlib | ${SED} 's/.* -> //'`
case $potliblink in
[\\/]* | [A-Za-z]:[\\/]*) potlib="$potliblink";;
*) potlib=`$ECHO "$potlib" | $SED 's,[^/]*$,,'`"$potliblink";;
esac
done
if eval $file_magic_cmd \"\$potlib\" 2>/dev/null |
$SED -e 10q |
$EGREP "$file_magic_regex" > /dev/null; then
func_append newdeplibs " $a_deplib"
a_deplib=""
break 2
fi
done
done
fi
if test -n "$a_deplib" ; then
droppeddeps=yes
echo
$ECHO "*** Warning: linker path does not have real file for library $a_deplib."
echo "*** I have the capability to make that library automatically link in when"
echo "*** you link to this library. But I can only do this if you have a"
echo "*** shared version of the library, which you do not appear to have"
echo "*** because I did check the linker path looking for a file starting"
if test -z "$potlib" ; then
$ECHO "*** with $libname but no candidates were found. (...for file magic test)"
else
$ECHO "*** with $libname and none of the candidates passed a file format test"
$ECHO "*** using a file magic. Last file checked: $potlib"
fi
fi
;;
*)
# Add a -L argument.
func_append newdeplibs " $a_deplib"
;;
esac
done # Gone through all deplibs.
;;
match_pattern*)
set dummy $deplibs_check_method; shift
match_pattern_regex=`expr "$deplibs_check_method" : "$1 \(.*\)"`
for a_deplib in $deplibs; do
case $a_deplib in
-l*)
func_stripname -l '' "$a_deplib"
name=$func_stripname_result
if test "X$allow_libtool_libs_with_static_runtimes" = "Xyes" ; then
case " $predeps $postdeps " in
*" $a_deplib "*)
func_append newdeplibs " $a_deplib"
a_deplib=""
;;
esac
fi
if test -n "$a_deplib" ; then
libname=`eval "\\$ECHO \"$libname_spec\""`
for i in $lib_search_path $sys_lib_search_path $shlib_search_path; do
potential_libs=`ls $i/$libname[.-]* 2>/dev/null`
for potent_lib in $potential_libs; do
potlib="$potent_lib" # see symlink-check above in file_magic test
if eval "\$ECHO \"$potent_lib\"" 2>/dev/null | $SED 10q | \
$EGREP "$match_pattern_regex" > /dev/null; then
func_append newdeplibs " $a_deplib"
a_deplib=""
break 2
fi
done
done
fi
if test -n "$a_deplib" ; then
droppeddeps=yes
echo
$ECHO "*** Warning: linker path does not have real file for library $a_deplib."
echo "*** I have the capability to make that library automatically link in when"
echo "*** you link to this library. But I can only do this if you have a"
echo "*** shared version of the library, which you do not appear to have"
echo "*** because I did check the linker path looking for a file starting"
if test -z "$potlib" ; then
$ECHO "*** with $libname but no candidates were found. (...for regex pattern test)"
else
$ECHO "*** with $libname and none of the candidates passed a file format test"
$ECHO "*** using a regex pattern. Last file checked: $potlib"
fi
fi
;;
*)
# Add a -L argument.
func_append newdeplibs " $a_deplib"
;;
esac
done # Gone through all deplibs.
;;
none | unknown | *)
newdeplibs=""
tmp_deplibs=`$ECHO " $deplibs" | $SED 's/ -lc$//; s/ -[LR][^ ]*//g'`
if test "X$allow_libtool_libs_with_static_runtimes" = "Xyes" ; then
for i in $predeps $postdeps ; do
# can't use Xsed below, because $i might contain '/'
tmp_deplibs=`$ECHO " $tmp_deplibs" | $SED "s,$i,,"`
done
fi
case $tmp_deplibs in
*[!\ \ ]*)
echo
if test "X$deplibs_check_method" = "Xnone"; then
echo "*** Warning: inter-library dependencies are not supported in this platform."
else
echo "*** Warning: inter-library dependencies are not known to be supported."
fi
echo "*** All declared inter-library dependencies are being dropped."
droppeddeps=yes
;;
esac
;;
esac
versuffix=$versuffix_save
major=$major_save
release=$release_save
libname=$libname_save
name=$name_save
case $host in
*-*-rhapsody* | *-*-darwin1.[012])
# On Rhapsody replace the C library with the System framework
newdeplibs=`$ECHO " $newdeplibs" | $SED 's/ -lc / System.ltframework /'`
;;
esac
if test "$droppeddeps" = yes; then
if test "$module" = yes; then
echo
echo "*** Warning: libtool could not satisfy all declared inter-library"
$ECHO "*** dependencies of module $libname. Therefore, libtool will create"
echo "*** a static module, that should work as long as the dlopening"
echo "*** application is linked with the -dlopen flag."
if test -z "$global_symbol_pipe"; then
echo
echo "*** However, this would only work if libtool was able to extract symbol"
echo "*** lists from a program, using \`nm' or equivalent, but libtool could"
echo "*** not find such a program. So, this module is probably useless."
echo "*** \`nm' from GNU binutils and a full rebuild may help."
fi
if test "$build_old_libs" = no; then
oldlibs="$output_objdir/$libname.$libext"
build_libtool_libs=module
build_old_libs=yes
else
build_libtool_libs=no
fi
else
echo "*** The inter-library dependencies that have been dropped here will be"
echo "*** automatically added whenever a program is linked with this library"
echo "*** or is declared to -dlopen it."
if test "$allow_undefined" = no; then
echo
echo "*** Since this library must not contain undefined symbols,"
echo "*** because either the platform does not support them or"
echo "*** it was explicitly requested with -no-undefined,"
echo "*** libtool will only create a static version of it."
if test "$build_old_libs" = no; then
oldlibs="$output_objdir/$libname.$libext"
build_libtool_libs=module
build_old_libs=yes
else
build_libtool_libs=no
fi
fi
fi
fi
# Done checking deplibs!
deplibs=$newdeplibs
fi
# Time to change all our "foo.ltframework" stuff back to "-framework foo"
case $host in
*-*-darwin*)
newdeplibs=`$ECHO " $newdeplibs" | $SED 's% \([^ $]*\).ltframework% -framework \1%g'`
new_inherited_linker_flags=`$ECHO " $new_inherited_linker_flags" | $SED 's% \([^ $]*\).ltframework% -framework \1%g'`
deplibs=`$ECHO " $deplibs" | $SED 's% \([^ $]*\).ltframework% -framework \1%g'`
;;
esac
# move library search paths that coincide with paths to not yet
# installed libraries to the beginning of the library search list
new_libs=
for path in $notinst_path; do
case " $new_libs " in
*" -L$path/$objdir "*) ;;
*)
case " $deplibs " in
*" -L$path/$objdir "*)
func_append new_libs " -L$path/$objdir" ;;
esac
;;
esac
done
for deplib in $deplibs; do
case $deplib in
-L*)
case " $new_libs " in
*" $deplib "*) ;;
*) func_append new_libs " $deplib" ;;
esac
;;
*) func_append new_libs " $deplib" ;;
esac
done
deplibs="$new_libs"
# All the library-specific variables (install_libdir is set above).
library_names=
old_library=
dlname=
# Test again, we may have decided not to build it any more
if test "$build_libtool_libs" = yes; then
# Remove ${wl} instances when linking with ld.
# FIXME: should test the right _cmds variable.
case $archive_cmds in
*\$LD\ *) wl= ;;
esac
if test "$hardcode_into_libs" = yes; then
# Hardcode the library paths
hardcode_libdirs=
dep_rpath=
rpath="$finalize_rpath"
test "$opt_mode" != relink && rpath="$compile_rpath$rpath"
for libdir in $rpath; do
if test -n "$hardcode_libdir_flag_spec"; then
if test -n "$hardcode_libdir_separator"; then
func_replace_sysroot "$libdir"
libdir=$func_replace_sysroot_result
if test -z "$hardcode_libdirs"; then
hardcode_libdirs="$libdir"
else
# Just accumulate the unique libdirs.
case $hardcode_libdir_separator$hardcode_libdirs$hardcode_libdir_separator in
*"$hardcode_libdir_separator$libdir$hardcode_libdir_separator"*)
;;
*)
func_append hardcode_libdirs "$hardcode_libdir_separator$libdir"
;;
esac
fi
else
eval flag=\"$hardcode_libdir_flag_spec\"
func_append dep_rpath " $flag"
fi
elif test -n "$runpath_var"; then
case "$perm_rpath " in
*" $libdir "*) ;;
*) func_append perm_rpath " $libdir" ;;
esac
fi
done
# Substitute the hardcoded libdirs into the rpath.
if test -n "$hardcode_libdir_separator" &&
test -n "$hardcode_libdirs"; then
libdir="$hardcode_libdirs"
eval "dep_rpath=\"$hardcode_libdir_flag_spec\""
fi
if test -n "$runpath_var" && test -n "$perm_rpath"; then
# We should set the runpath_var.
rpath=
for dir in $perm_rpath; do
func_append rpath "$dir:"
done
eval "$runpath_var='$rpath\$$runpath_var'; export $runpath_var"
fi
test -n "$dep_rpath" && deplibs="$dep_rpath $deplibs"
fi
shlibpath="$finalize_shlibpath"
test "$opt_mode" != relink && shlibpath="$compile_shlibpath$shlibpath"
if test -n "$shlibpath"; then
eval "$shlibpath_var='$shlibpath\$$shlibpath_var'; export $shlibpath_var"
fi
# Get the real and link names of the library.
eval shared_ext=\"$shrext_cmds\"
eval library_names=\"$library_names_spec\"
set dummy $library_names
shift
realname="$1"
shift
if test -n "$soname_spec"; then
eval soname=\"$soname_spec\"
else
soname="$realname"
fi
if test -z "$dlname"; then
dlname=$soname
fi
lib="$output_objdir/$realname"
linknames=
for link
do
func_append linknames " $link"
done
# Use standard objects if they are pic
test -z "$pic_flag" && libobjs=`$ECHO "$libobjs" | $SP2NL | $SED "$lo2o" | $NL2SP`
test "X$libobjs" = "X " && libobjs=
delfiles=
if test -n "$export_symbols" && test -n "$include_expsyms"; then
$opt_dry_run || cp "$export_symbols" "$output_objdir/$libname.uexp"
export_symbols="$output_objdir/$libname.uexp"
func_append delfiles " $export_symbols"
fi
orig_export_symbols=
case $host_os in
cygwin* | mingw* | cegcc*)
if test -n "$export_symbols" && test -z "$export_symbols_regex"; then
# exporting using user supplied symfile
if test "x`$SED 1q $export_symbols`" != xEXPORTS; then
# and it's NOT already a .def file. Must figure out
# which of the given symbols are data symbols and tag
# them as such. So, trigger use of export_symbols_cmds.
# export_symbols gets reassigned inside the "prepare
# the list of exported symbols" if statement, so the
# include_expsyms logic still works.
orig_export_symbols="$export_symbols"
export_symbols=
always_export_symbols=yes
fi
fi
;;
esac
# Prepare the list of exported symbols
if test -z "$export_symbols"; then
if test "$always_export_symbols" = yes || test -n "$export_symbols_regex"; then
func_verbose "generating symbol list for \`$libname.la'"
export_symbols="$output_objdir/$libname.exp"
$opt_dry_run || $RM $export_symbols
cmds=$export_symbols_cmds
save_ifs="$IFS"; IFS='~'
for cmd1 in $cmds; do
IFS="$save_ifs"
# Take the normal branch if the nm_file_list_spec branch
# doesn't work or if tool conversion is not needed.
case $nm_file_list_spec~$to_tool_file_cmd in
*~func_convert_file_noop | *~func_convert_file_msys_to_w32 | ~*)
try_normal_branch=yes
eval cmd=\"$cmd1\"
func_len " $cmd"
len=$func_len_result
;;
*)
try_normal_branch=no
;;
esac
if test "$try_normal_branch" = yes \
&& { test "$len" -lt "$max_cmd_len" \
|| test "$max_cmd_len" -le -1; }
then
func_show_eval "$cmd" 'exit $?'
skipped_export=false
elif test -n "$nm_file_list_spec"; then
func_basename "$output"
output_la=$func_basename_result
save_libobjs=$libobjs
save_output=$output
output=${output_objdir}/${output_la}.nm
func_to_tool_file "$output"
libobjs=$nm_file_list_spec$func_to_tool_file_result
func_append delfiles " $output"
func_verbose "creating $NM input file list: $output"
for obj in $save_libobjs; do
func_to_tool_file "$obj"
$ECHO "$func_to_tool_file_result"
done > "$output"
eval cmd=\"$cmd1\"
func_show_eval "$cmd" 'exit $?'
output=$save_output
libobjs=$save_libobjs
skipped_export=false
else
# The command line is too long to execute in one step.
func_verbose "using reloadable object file for export list..."
skipped_export=:
# Break out early, otherwise skipped_export may be
# set to false by a later but shorter cmd.
break
fi
done
IFS="$save_ifs"
if test -n "$export_symbols_regex" && test "X$skipped_export" != "X:"; then
func_show_eval '$EGREP -e "$export_symbols_regex" "$export_symbols" > "${export_symbols}T"'
func_show_eval '$MV "${export_symbols}T" "$export_symbols"'
fi
fi
fi
if test -n "$export_symbols" && test -n "$include_expsyms"; then
tmp_export_symbols="$export_symbols"
test -n "$orig_export_symbols" && tmp_export_symbols="$orig_export_symbols"
$opt_dry_run || eval '$ECHO "$include_expsyms" | $SP2NL >> "$tmp_export_symbols"'
fi
if test "X$skipped_export" != "X:" && test -n "$orig_export_symbols"; then
# The given exports_symbols file has to be filtered, so filter it.
func_verbose "filter symbol list for \`$libname.la' to tag DATA exports"
# FIXME: $output_objdir/$libname.filter potentially contains lots of
# 's' commands which not all seds can handle. GNU sed should be fine
# though. Also, the filter scales superlinearly with the number of
# global variables. join(1) would be nice here, but unfortunately
# isn't a blessed tool.
$opt_dry_run || $SED -e '/[ ,]DATA/!d;s,\(.*\)\([ \,].*\),s|^\1$|\1\2|,' < $export_symbols > $output_objdir/$libname.filter
func_append delfiles " $export_symbols $output_objdir/$libname.filter"
export_symbols=$output_objdir/$libname.def
$opt_dry_run || $SED -f $output_objdir/$libname.filter < $orig_export_symbols > $export_symbols
fi
tmp_deplibs=
for test_deplib in $deplibs; do
case " $convenience " in
*" $test_deplib "*) ;;
*)
func_append tmp_deplibs " $test_deplib"
;;
esac
done
deplibs="$tmp_deplibs"
if test -n "$convenience"; then
if test -n "$whole_archive_flag_spec" &&
test "$compiler_needs_object" = yes &&
test -z "$libobjs"; then
# extract the archives, so we have objects to list.
# TODO: could optimize this to just extract one archive.
whole_archive_flag_spec=
fi
if test -n "$whole_archive_flag_spec"; then
save_libobjs=$libobjs
eval libobjs=\"\$libobjs $whole_archive_flag_spec\"
test "X$libobjs" = "X " && libobjs=
else
gentop="$output_objdir/${outputname}x"
func_append generated " $gentop"
func_extract_archives $gentop $convenience
func_append libobjs " $func_extract_archives_result"
test "X$libobjs" = "X " && libobjs=
fi
fi
if test "$thread_safe" = yes && test -n "$thread_safe_flag_spec"; then
eval flag=\"$thread_safe_flag_spec\"
func_append linker_flags " $flag"
fi
# Make a backup of the uninstalled library when relinking
if test "$opt_mode" = relink; then
$opt_dry_run || eval '(cd $output_objdir && $RM ${realname}U && $MV $realname ${realname}U)' || exit $?
fi
# Do each of the archive commands.
if test "$module" = yes && test -n "$module_cmds" ; then
if test -n "$export_symbols" && test -n "$module_expsym_cmds"; then
eval test_cmds=\"$module_expsym_cmds\"
cmds=$module_expsym_cmds
else
eval test_cmds=\"$module_cmds\"
cmds=$module_cmds
fi
else
if test -n "$export_symbols" && test -n "$archive_expsym_cmds"; then
eval test_cmds=\"$archive_expsym_cmds\"
cmds=$archive_expsym_cmds
else
eval test_cmds=\"$archive_cmds\"
cmds=$archive_cmds
fi
fi
if test "X$skipped_export" != "X:" &&
func_len " $test_cmds" &&
len=$func_len_result &&
test "$len" -lt "$max_cmd_len" || test "$max_cmd_len" -le -1; then
:
else
# The command line is too long to link in one step, link piecewise
# or, if using GNU ld and skipped_export is not :, use a linker
# script.
# Save the value of $output and $libobjs because we want to
# use them later. If we have whole_archive_flag_spec, we
# want to use save_libobjs as it was before
# whole_archive_flag_spec was expanded, because we can't
# assume the linker understands whole_archive_flag_spec.
# This may have to be revisited, in case too many
# convenience libraries get linked in and end up exceeding
# the spec.
if test -z "$convenience" || test -z "$whole_archive_flag_spec"; then
save_libobjs=$libobjs
fi
save_output=$output
func_basename "$output"
output_la=$func_basename_result
# Clear the reloadable object creation command queue and
# initialize k to one.
test_cmds=
concat_cmds=
objlist=
last_robj=
k=1
if test -n "$save_libobjs" && test "X$skipped_export" != "X:" && test "$with_gnu_ld" = yes; then
output=${output_objdir}/${output_la}.lnkscript
func_verbose "creating GNU ld script: $output"
echo 'INPUT (' > $output
for obj in $save_libobjs
do
func_to_tool_file "$obj"
$ECHO "$func_to_tool_file_result" >> $output
done
echo ')' >> $output
func_append delfiles " $output"
func_to_tool_file "$output"
output=$func_to_tool_file_result
elif test -n "$save_libobjs" && test "X$skipped_export" != "X:" && test "X$file_list_spec" != X; then
output=${output_objdir}/${output_la}.lnk
func_verbose "creating linker input file list: $output"
: > $output
set x $save_libobjs
shift
firstobj=
if test "$compiler_needs_object" = yes; then
firstobj="$1 "
shift
fi
for obj
do
func_to_tool_file "$obj"
$ECHO "$func_to_tool_file_result" >> $output
done
func_append delfiles " $output"
func_to_tool_file "$output"
output=$firstobj\"$file_list_spec$func_to_tool_file_result\"
else
if test -n "$save_libobjs"; then
func_verbose "creating reloadable object files..."
output=$output_objdir/$output_la-${k}.$objext
eval test_cmds=\"$reload_cmds\"
func_len " $test_cmds"
len0=$func_len_result
len=$len0
# Loop over the list of objects to be linked.
for obj in $save_libobjs
do
func_len " $obj"
func_arith $len + $func_len_result
len=$func_arith_result
if test "X$objlist" = X ||
test "$len" -lt "$max_cmd_len"; then
func_append objlist " $obj"
else
# The command $test_cmds is almost too long, add a
# command to the queue.
if test "$k" -eq 1 ; then
# The first file doesn't have a previous command to add.
reload_objs=$objlist
eval concat_cmds=\"$reload_cmds\"
else
# All subsequent reloadable object files will link in
# the last one created.
reload_objs="$objlist $last_robj"
eval concat_cmds=\"\$concat_cmds~$reload_cmds~\$RM $last_robj\"
fi
last_robj=$output_objdir/$output_la-${k}.$objext
func_arith $k + 1
k=$func_arith_result
output=$output_objdir/$output_la-${k}.$objext
objlist=" $obj"
func_len " $last_robj"
func_arith $len0 + $func_len_result
len=$func_arith_result
fi
done
# Handle the remaining objects by creating one last
# reloadable object file. All subsequent reloadable object
# files will link in the last one created.
test -z "$concat_cmds" || concat_cmds=$concat_cmds~
reload_objs="$objlist $last_robj"
eval concat_cmds=\"\${concat_cmds}$reload_cmds\"
if test -n "$last_robj"; then
eval concat_cmds=\"\${concat_cmds}~\$RM $last_robj\"
fi
func_append delfiles " $output"
else
output=
fi
if ${skipped_export-false}; then
func_verbose "generating symbol list for \`$libname.la'"
export_symbols="$output_objdir/$libname.exp"
$opt_dry_run || $RM $export_symbols
libobjs=$output
# Append the command to create the export file.
test -z "$concat_cmds" || concat_cmds=$concat_cmds~
eval concat_cmds=\"\$concat_cmds$export_symbols_cmds\"
if test -n "$last_robj"; then
eval concat_cmds=\"\$concat_cmds~\$RM $last_robj\"
fi
fi
test -n "$save_libobjs" &&
func_verbose "creating a temporary reloadable object file: $output"
# Loop through the commands generated above and execute them.
save_ifs="$IFS"; IFS='~'
for cmd in $concat_cmds; do
IFS="$save_ifs"
$opt_silent || {
func_quote_for_expand "$cmd"
eval "func_echo $func_quote_for_expand_result"
}
$opt_dry_run || eval "$cmd" || {
lt_exit=$?
# Restore the uninstalled library and exit
if test "$opt_mode" = relink; then
( cd "$output_objdir" && \
$RM "${realname}T" && \
$MV "${realname}U" "$realname" )
fi
exit $lt_exit
}
done
IFS="$save_ifs"
if test -n "$export_symbols_regex" && ${skipped_export-false}; then
func_show_eval '$EGREP -e "$export_symbols_regex" "$export_symbols" > "${export_symbols}T"'
func_show_eval '$MV "${export_symbols}T" "$export_symbols"'
fi
fi
if ${skipped_export-false}; then
if test -n "$export_symbols" && test -n "$include_expsyms"; then
tmp_export_symbols="$export_symbols"
test -n "$orig_export_symbols" && tmp_export_symbols="$orig_export_symbols"
$opt_dry_run || eval '$ECHO "$include_expsyms" | $SP2NL >> "$tmp_export_symbols"'
fi
if test -n "$orig_export_symbols"; then
# The given exports_symbols file has to be filtered, so filter it.
func_verbose "filter symbol list for \`$libname.la' to tag DATA exports"
# FIXME: $output_objdir/$libname.filter potentially contains lots of
# 's' commands which not all seds can handle. GNU sed should be fine
# though. Also, the filter scales superlinearly with the number of
# global variables. join(1) would be nice here, but unfortunately
# isn't a blessed tool.
$opt_dry_run || $SED -e '/[ ,]DATA/!d;s,\(.*\)\([ \,].*\),s|^\1$|\1\2|,' < $export_symbols > $output_objdir/$libname.filter
func_append delfiles " $export_symbols $output_objdir/$libname.filter"
export_symbols=$output_objdir/$libname.def
$opt_dry_run || $SED -f $output_objdir/$libname.filter < $orig_export_symbols > $export_symbols
fi
fi
libobjs=$output
# Restore the value of output.
output=$save_output
if test -n "$convenience" && test -n "$whole_archive_flag_spec"; then
eval libobjs=\"\$libobjs $whole_archive_flag_spec\"
test "X$libobjs" = "X " && libobjs=
fi
# Expand the library linking commands again to reset the
# value of $libobjs for piecewise linking.
# Do each of the archive commands.
if test "$module" = yes && test -n "$module_cmds" ; then
if test -n "$export_symbols" && test -n "$module_expsym_cmds"; then
cmds=$module_expsym_cmds
else
cmds=$module_cmds
fi
else
if test -n "$export_symbols" && test -n "$archive_expsym_cmds"; then
cmds=$archive_expsym_cmds
else
cmds=$archive_cmds
fi
fi
fi
if test -n "$delfiles"; then
# Append the command to remove temporary files to $cmds.
eval cmds=\"\$cmds~\$RM $delfiles\"
fi
# Add any objects from preloaded convenience libraries
if test -n "$dlprefiles"; then
gentop="$output_objdir/${outputname}x"
func_append generated " $gentop"
func_extract_archives $gentop $dlprefiles
func_append libobjs " $func_extract_archives_result"
test "X$libobjs" = "X " && libobjs=
fi
save_ifs="$IFS"; IFS='~'
for cmd in $cmds; do
IFS="$save_ifs"
eval cmd=\"$cmd\"
$opt_silent || {
func_quote_for_expand "$cmd"
eval "func_echo $func_quote_for_expand_result"
}
$opt_dry_run || eval "$cmd" || {
lt_exit=$?
# Restore the uninstalled library and exit
if test "$opt_mode" = relink; then
( cd "$output_objdir" && \
$RM "${realname}T" && \
$MV "${realname}U" "$realname" )
fi
exit $lt_exit
}
done
IFS="$save_ifs"
# Restore the uninstalled library and exit
if test "$opt_mode" = relink; then
$opt_dry_run || eval '(cd $output_objdir && $RM ${realname}T && $MV $realname ${realname}T && $MV ${realname}U $realname)' || exit $?
if test -n "$convenience"; then
if test -z "$whole_archive_flag_spec"; then
func_show_eval '${RM}r "$gentop"'
fi
fi
exit $EXIT_SUCCESS
fi
# Create links to the real library.
for linkname in $linknames; do
if test "$realname" != "$linkname"; then
func_show_eval '(cd "$output_objdir" && $RM "$linkname" && $LN_S "$realname" "$linkname")' 'exit $?'
fi
done
# If -module or -export-dynamic was specified, set the dlname.
if test "$module" = yes || test "$export_dynamic" = yes; then
# On all known operating systems, these are identical.
dlname="$soname"
fi
fi
;;
obj)
if test -n "$dlfiles$dlprefiles" || test "$dlself" != no; then
func_warning "\`-dlopen' is ignored for objects"
fi
case " $deplibs" in
*\ -l* | *\ -L*)
func_warning "\`-l' and \`-L' are ignored for objects" ;;
esac
test -n "$rpath" && \
func_warning "\`-rpath' is ignored for objects"
test -n "$xrpath" && \
func_warning "\`-R' is ignored for objects"
test -n "$vinfo" && \
func_warning "\`-version-info' is ignored for objects"
test -n "$release" && \
func_warning "\`-release' is ignored for objects"
case $output in
*.lo)
test -n "$objs$old_deplibs" && \
func_fatal_error "cannot build library object \`$output' from non-libtool objects"
libobj=$output
func_lo2o "$libobj"
obj=$func_lo2o_result
;;
*)
libobj=
obj="$output"
;;
esac
# Delete the old objects.
$opt_dry_run || $RM $obj $libobj
# Objects from convenience libraries. This assumes
# single-version convenience libraries. Whenever we create
# different ones for PIC/non-PIC, this we'll have to duplicate
# the extraction.
reload_conv_objs=
gentop=
# reload_cmds runs $LD directly, so let us get rid of
# -Wl from whole_archive_flag_spec and hope we can get by with
# turning comma into space..
wl=
if test -n "$convenience"; then
if test -n "$whole_archive_flag_spec"; then
eval tmp_whole_archive_flags=\"$whole_archive_flag_spec\"
reload_conv_objs=$reload_objs\ `$ECHO "$tmp_whole_archive_flags" | $SED 's|,| |g'`
else
gentop="$output_objdir/${obj}x"
func_append generated " $gentop"
func_extract_archives $gentop $convenience
reload_conv_objs="$reload_objs $func_extract_archives_result"
fi
fi
# If we're not building shared, we need to use non_pic_objs
test "$build_libtool_libs" != yes && libobjs="$non_pic_objects"
# Create the old-style object.
reload_objs="$objs$old_deplibs "`$ECHO "$libobjs" | $SP2NL | $SED "/\.${libext}$/d; /\.lib$/d; $lo2o" | $NL2SP`" $reload_conv_objs" ### testsuite: skip nested quoting test
output="$obj"
func_execute_cmds "$reload_cmds" 'exit $?'
# Exit if we aren't doing a library object file.
if test -z "$libobj"; then
if test -n "$gentop"; then
func_show_eval '${RM}r "$gentop"'
fi
exit $EXIT_SUCCESS
fi
if test "$build_libtool_libs" != yes; then
if test -n "$gentop"; then
func_show_eval '${RM}r "$gentop"'
fi
# Create an invalid libtool object if no PIC, so that we don't
# accidentally link it into a program.
# $show "echo timestamp > $libobj"
# $opt_dry_run || eval "echo timestamp > $libobj" || exit $?
exit $EXIT_SUCCESS
fi
if test -n "$pic_flag" || test "$pic_mode" != default; then
# Only do commands if we really have different PIC objects.
reload_objs="$libobjs $reload_conv_objs"
output="$libobj"
func_execute_cmds "$reload_cmds" 'exit $?'
fi
if test -n "$gentop"; then
func_show_eval '${RM}r "$gentop"'
fi
exit $EXIT_SUCCESS
;;
prog)
case $host in
*cygwin*) func_stripname '' '.exe' "$output"
output=$func_stripname_result.exe;;
esac
test -n "$vinfo" && \
func_warning "\`-version-info' is ignored for programs"
test -n "$release" && \
func_warning "\`-release' is ignored for programs"
test "$preload" = yes \
&& test "$dlopen_support" = unknown \
&& test "$dlopen_self" = unknown \
&& test "$dlopen_self_static" = unknown && \
func_warning "\`LT_INIT([dlopen])' not used. Assuming no dlopen support."
case $host in
*-*-rhapsody* | *-*-darwin1.[012])
# On Rhapsody replace the C library is the System framework
compile_deplibs=`$ECHO " $compile_deplibs" | $SED 's/ -lc / System.ltframework /'`
finalize_deplibs=`$ECHO " $finalize_deplibs" | $SED 's/ -lc / System.ltframework /'`
;;
esac
case $host in
*-*-darwin*)
# Don't allow lazy linking, it breaks C++ global constructors
# But is supposedly fixed on 10.4 or later (yay!).
if test "$tagname" = CXX ; then
case ${MACOSX_DEPLOYMENT_TARGET-10.0} in
10.[0123])
func_append compile_command " ${wl}-bind_at_load"
func_append finalize_command " ${wl}-bind_at_load"
;;
esac
fi
# Time to change all our "foo.ltframework" stuff back to "-framework foo"
compile_deplibs=`$ECHO " $compile_deplibs" | $SED 's% \([^ $]*\).ltframework% -framework \1%g'`
finalize_deplibs=`$ECHO " $finalize_deplibs" | $SED 's% \([^ $]*\).ltframework% -framework \1%g'`
;;
esac
# move library search paths that coincide with paths to not yet
# installed libraries to the beginning of the library search list
new_libs=
for path in $notinst_path; do
case " $new_libs " in
*" -L$path/$objdir "*) ;;
*)
case " $compile_deplibs " in
*" -L$path/$objdir "*)
func_append new_libs " -L$path/$objdir" ;;
esac
;;
esac
done
for deplib in $compile_deplibs; do
case $deplib in
-L*)
case " $new_libs " in
*" $deplib "*) ;;
*) func_append new_libs " $deplib" ;;
esac
;;
*) func_append new_libs " $deplib" ;;
esac
done
compile_deplibs="$new_libs"
func_append compile_command " $compile_deplibs"
func_append finalize_command " $finalize_deplibs"
if test -n "$rpath$xrpath"; then
# If the user specified any rpath flags, then add them.
for libdir in $rpath $xrpath; do
# This is the magic to use -rpath.
case "$finalize_rpath " in
*" $libdir "*) ;;
*) func_append finalize_rpath " $libdir" ;;
esac
done
fi
# Now hardcode the library paths
rpath=
hardcode_libdirs=
for libdir in $compile_rpath $finalize_rpath; do
if test -n "$hardcode_libdir_flag_spec"; then
if test -n "$hardcode_libdir_separator"; then
if test -z "$hardcode_libdirs"; then
hardcode_libdirs="$libdir"
else
# Just accumulate the unique libdirs.
case $hardcode_libdir_separator$hardcode_libdirs$hardcode_libdir_separator in
*"$hardcode_libdir_separator$libdir$hardcode_libdir_separator"*)
;;
*)
func_append hardcode_libdirs "$hardcode_libdir_separator$libdir"
;;
esac
fi
else
eval flag=\"$hardcode_libdir_flag_spec\"
func_append rpath " $flag"
fi
elif test -n "$runpath_var"; then
case "$perm_rpath " in
*" $libdir "*) ;;
*) func_append perm_rpath " $libdir" ;;
esac
fi
case $host in
*-*-cygwin* | *-*-mingw* | *-*-pw32* | *-*-os2* | *-cegcc*)
testbindir=`${ECHO} "$libdir" | ${SED} -e 's*/lib$*/bin*'`
case :$dllsearchpath: in
*":$libdir:"*) ;;
::) dllsearchpath=$libdir;;
*) func_append dllsearchpath ":$libdir";;
esac
case :$dllsearchpath: in
*":$testbindir:"*) ;;
::) dllsearchpath=$testbindir;;
*) func_append dllsearchpath ":$testbindir";;
esac
;;
esac
done
# Substitute the hardcoded libdirs into the rpath.
if test -n "$hardcode_libdir_separator" &&
test -n "$hardcode_libdirs"; then
libdir="$hardcode_libdirs"
eval rpath=\" $hardcode_libdir_flag_spec\"
fi
compile_rpath="$rpath"
rpath=
hardcode_libdirs=
for libdir in $finalize_rpath; do
if test -n "$hardcode_libdir_flag_spec"; then
if test -n "$hardcode_libdir_separator"; then
if test -z "$hardcode_libdirs"; then
hardcode_libdirs="$libdir"
else
# Just accumulate the unique libdirs.
case $hardcode_libdir_separator$hardcode_libdirs$hardcode_libdir_separator in
*"$hardcode_libdir_separator$libdir$hardcode_libdir_separator"*)
;;
*)
func_append hardcode_libdirs "$hardcode_libdir_separator$libdir"
;;
esac
fi
else
eval flag=\"$hardcode_libdir_flag_spec\"
func_append rpath " $flag"
fi
elif test -n "$runpath_var"; then
case "$finalize_perm_rpath " in
*" $libdir "*) ;;
*) func_append finalize_perm_rpath " $libdir" ;;
esac
fi
done
# Substitute the hardcoded libdirs into the rpath.
if test -n "$hardcode_libdir_separator" &&
test -n "$hardcode_libdirs"; then
libdir="$hardcode_libdirs"
eval rpath=\" $hardcode_libdir_flag_spec\"
fi
finalize_rpath="$rpath"
if test -n "$libobjs" && test "$build_old_libs" = yes; then
# Transform all the library objects into standard objects.
compile_command=`$ECHO "$compile_command" | $SP2NL | $SED "$lo2o" | $NL2SP`
finalize_command=`$ECHO "$finalize_command" | $SP2NL | $SED "$lo2o" | $NL2SP`
fi
func_generate_dlsyms "$outputname" "@PROGRAM@" "no"
# template prelinking step
if test -n "$prelink_cmds"; then
func_execute_cmds "$prelink_cmds" 'exit $?'
fi
wrappers_required=yes
case $host in
*cegcc* | *mingw32ce*)
# Disable wrappers for cegcc and mingw32ce hosts, we are cross compiling anyway.
wrappers_required=no
;;
*cygwin* | *mingw* )
if test "$build_libtool_libs" != yes; then
wrappers_required=no
fi
;;
*)
if test "$need_relink" = no || test "$build_libtool_libs" != yes; then
wrappers_required=no
fi
;;
esac
if test "$wrappers_required" = no; then
# Replace the output file specification.
compile_command=`$ECHO "$compile_command" | $SED 's%@OUTPUT@%'"$output"'%g'`
link_command="$compile_command$compile_rpath"
# We have no uninstalled library dependencies, so finalize right now.
exit_status=0
func_show_eval "$link_command" 'exit_status=$?'
if test -n "$postlink_cmds"; then
func_to_tool_file "$output"
postlink_cmds=`func_echo_all "$postlink_cmds" | $SED -e 's%@OUTPUT@%'"$output"'%g' -e 's%@TOOL_OUTPUT@%'"$func_to_tool_file_result"'%g'`
func_execute_cmds "$postlink_cmds" 'exit $?'
fi
# Delete the generated files.
if test -f "$output_objdir/${outputname}S.${objext}"; then
func_show_eval '$RM "$output_objdir/${outputname}S.${objext}"'
fi
exit $exit_status
fi
if test -n "$compile_shlibpath$finalize_shlibpath"; then
compile_command="$shlibpath_var=\"$compile_shlibpath$finalize_shlibpath\$$shlibpath_var\" $compile_command"
fi
if test -n "$finalize_shlibpath"; then
finalize_command="$shlibpath_var=\"$finalize_shlibpath\$$shlibpath_var\" $finalize_command"
fi
compile_var=
finalize_var=
if test -n "$runpath_var"; then
if test -n "$perm_rpath"; then
# We should set the runpath_var.
rpath=
for dir in $perm_rpath; do
func_append rpath "$dir:"
done
compile_var="$runpath_var=\"$rpath\$$runpath_var\" "
fi
if test -n "$finalize_perm_rpath"; then
# We should set the runpath_var.
rpath=
for dir in $finalize_perm_rpath; do
func_append rpath "$dir:"
done
finalize_var="$runpath_var=\"$rpath\$$runpath_var\" "
fi
fi
if test "$no_install" = yes; then
# We don't need to create a wrapper script.
link_command="$compile_var$compile_command$compile_rpath"
# Replace the output file specification.
link_command=`$ECHO "$link_command" | $SED 's%@OUTPUT@%'"$output"'%g'`
# Delete the old output file.
$opt_dry_run || $RM $output
# Link the executable and exit
func_show_eval "$link_command" 'exit $?'
if test -n "$postlink_cmds"; then
func_to_tool_file "$output"
postlink_cmds=`func_echo_all "$postlink_cmds" | $SED -e 's%@OUTPUT@%'"$output"'%g' -e 's%@TOOL_OUTPUT@%'"$func_to_tool_file_result"'%g'`
func_execute_cmds "$postlink_cmds" 'exit $?'
fi
exit $EXIT_SUCCESS
fi
if test "$hardcode_action" = relink; then
# Fast installation is not supported
link_command="$compile_var$compile_command$compile_rpath"
relink_command="$finalize_var$finalize_command$finalize_rpath"
func_warning "this platform does not like uninstalled shared libraries"
func_warning "\`$output' will be relinked during installation"
else
if test "$fast_install" != no; then
link_command="$finalize_var$compile_command$finalize_rpath"
if test "$fast_install" = yes; then
relink_command=`$ECHO "$compile_var$compile_command$compile_rpath" | $SED 's%@OUTPUT@%\$progdir/\$file%g'`
else
# fast_install is set to needless
relink_command=
fi
else
link_command="$compile_var$compile_command$compile_rpath"
relink_command="$finalize_var$finalize_command$finalize_rpath"
fi
fi
# Replace the output file specification.
link_command=`$ECHO "$link_command" | $SED 's%@OUTPUT@%'"$output_objdir/$outputname"'%g'`
# Delete the old output files.
$opt_dry_run || $RM $output $output_objdir/$outputname $output_objdir/lt-$outputname
func_show_eval "$link_command" 'exit $?'
if test -n "$postlink_cmds"; then
func_to_tool_file "$output_objdir/$outputname"
postlink_cmds=`func_echo_all "$postlink_cmds" | $SED -e 's%@OUTPUT@%'"$output_objdir/$outputname"'%g' -e 's%@TOOL_OUTPUT@%'"$func_to_tool_file_result"'%g'`
func_execute_cmds "$postlink_cmds" 'exit $?'
fi
# Now create the wrapper script.
func_verbose "creating $output"
# Quote the relink command for shipping.
if test -n "$relink_command"; then
# Preserve any variables that may affect compiler behavior
for var in $variables_saved_for_relink; do
if eval test -z \"\${$var+set}\"; then
relink_command="{ test -z \"\${$var+set}\" || $lt_unset $var || { $var=; export $var; }; }; $relink_command"
elif eval var_value=\$$var; test -z "$var_value"; then
relink_command="$var=; export $var; $relink_command"
else
func_quote_for_eval "$var_value"
relink_command="$var=$func_quote_for_eval_result; export $var; $relink_command"
fi
done
relink_command="(cd `pwd`; $relink_command)"
relink_command=`$ECHO "$relink_command" | $SED "$sed_quote_subst"`
fi
# Only actually do things if not in dry run mode.
$opt_dry_run || {
# win32 will think the script is a binary if it has
# a .exe suffix, so we strip it off here.
case $output in
*.exe) func_stripname '' '.exe' "$output"
output=$func_stripname_result ;;
esac
# test for cygwin because mv fails w/o .exe extensions
case $host in
*cygwin*)
exeext=.exe
func_stripname '' '.exe' "$outputname"
outputname=$func_stripname_result ;;
*) exeext= ;;
esac
case $host in
*cygwin* | *mingw* )
func_dirname_and_basename "$output" "" "."
output_name=$func_basename_result
output_path=$func_dirname_result
cwrappersource="$output_path/$objdir/lt-$output_name.c"
cwrapper="$output_path/$output_name.exe"
$RM $cwrappersource $cwrapper
trap "$RM $cwrappersource $cwrapper; exit $EXIT_FAILURE" 1 2 15
func_emit_cwrapperexe_src > $cwrappersource
# The wrapper executable is built using the $host compiler,
# because it contains $host paths and files. If cross-
# compiling, it, like the target executable, must be
# executed on the $host or under an emulation environment.
$opt_dry_run || {
$LTCC $LTCFLAGS -o $cwrapper $cwrappersource
$STRIP $cwrapper
}
# Now, create the wrapper script for func_source use:
func_ltwrapper_scriptname $cwrapper
$RM $func_ltwrapper_scriptname_result
trap "$RM $func_ltwrapper_scriptname_result; exit $EXIT_FAILURE" 1 2 15
$opt_dry_run || {
# note: this script will not be executed, so do not chmod.
if test "x$build" = "x$host" ; then
$cwrapper --lt-dump-script > $func_ltwrapper_scriptname_result
else
func_emit_wrapper no > $func_ltwrapper_scriptname_result
fi
}
;;
* )
$RM $output
trap "$RM $output; exit $EXIT_FAILURE" 1 2 15
func_emit_wrapper no > $output
chmod +x $output
;;
esac
}
exit $EXIT_SUCCESS
;;
esac
# See if we need to build an old-fashioned archive.
for oldlib in $oldlibs; do
if test "$build_libtool_libs" = convenience; then
oldobjs="$libobjs_save $symfileobj"
addlibs="$convenience"
build_libtool_libs=no
else
if test "$build_libtool_libs" = module; then
oldobjs="$libobjs_save"
build_libtool_libs=no
else
oldobjs="$old_deplibs $non_pic_objects"
if test "$preload" = yes && test -f "$symfileobj"; then
func_append oldobjs " $symfileobj"
fi
fi
addlibs="$old_convenience"
fi
if test -n "$addlibs"; then
gentop="$output_objdir/${outputname}x"
func_append generated " $gentop"
func_extract_archives $gentop $addlibs
func_append oldobjs " $func_extract_archives_result"
fi
# Do each command in the archive commands.
if test -n "$old_archive_from_new_cmds" && test "$build_libtool_libs" = yes; then
cmds=$old_archive_from_new_cmds
else
# Add any objects from preloaded convenience libraries
if test -n "$dlprefiles"; then
gentop="$output_objdir/${outputname}x"
func_append generated " $gentop"
func_extract_archives $gentop $dlprefiles
func_append oldobjs " $func_extract_archives_result"
fi
# POSIX demands no paths to be encoded in archives. We have
# to avoid creating archives with duplicate basenames if we
# might have to extract them afterwards, e.g., when creating a
# static archive out of a convenience library, or when linking
# the entirety of a libtool archive into another (currently
# not supported by libtool).
if (for obj in $oldobjs
do
func_basename "$obj"
$ECHO "$func_basename_result"
done | sort | sort -uc >/dev/null 2>&1); then
:
else
echo "copying selected object files to avoid basename conflicts..."
gentop="$output_objdir/${outputname}x"
func_append generated " $gentop"
func_mkdir_p "$gentop"
save_oldobjs=$oldobjs
oldobjs=
counter=1
for obj in $save_oldobjs
do
func_basename "$obj"
objbase="$func_basename_result"
case " $oldobjs " in
" ") oldobjs=$obj ;;
*[\ /]"$objbase "*)
while :; do
# Make sure we don't pick an alternate name that also
# overlaps.
newobj=lt$counter-$objbase
func_arith $counter + 1
counter=$func_arith_result
case " $oldobjs " in
*[\ /]"$newobj "*) ;;
*) if test ! -f "$gentop/$newobj"; then break; fi ;;
esac
done
func_show_eval "ln $obj $gentop/$newobj || cp $obj $gentop/$newobj"
func_append oldobjs " $gentop/$newobj"
;;
*) func_append oldobjs " $obj" ;;
esac
done
fi
func_to_tool_file "$oldlib" func_convert_file_msys_to_w32
tool_oldlib=$func_to_tool_file_result
eval cmds=\"$old_archive_cmds\"
func_len " $cmds"
len=$func_len_result
if test "$len" -lt "$max_cmd_len" || test "$max_cmd_len" -le -1; then
cmds=$old_archive_cmds
elif test -n "$archiver_list_spec"; then
func_verbose "using command file archive linking..."
for obj in $oldobjs
do
func_to_tool_file "$obj"
$ECHO "$func_to_tool_file_result"
done > $output_objdir/$libname.libcmd
func_to_tool_file "$output_objdir/$libname.libcmd"
oldobjs=" $archiver_list_spec$func_to_tool_file_result"
cmds=$old_archive_cmds
else
# the command line is too long to link in one step, link in parts
func_verbose "using piecewise archive linking..."
save_RANLIB=$RANLIB
RANLIB=:
objlist=
concat_cmds=
save_oldobjs=$oldobjs
oldobjs=
# Is there a better way of finding the last object in the list?
for obj in $save_oldobjs
do
last_oldobj=$obj
done
eval test_cmds=\"$old_archive_cmds\"
func_len " $test_cmds"
len0=$func_len_result
len=$len0
for obj in $save_oldobjs
do
func_len " $obj"
func_arith $len + $func_len_result
len=$func_arith_result
func_append objlist " $obj"
if test "$len" -lt "$max_cmd_len"; then
:
else
# the above command should be used before it gets too long
oldobjs=$objlist
if test "$obj" = "$last_oldobj" ; then
RANLIB=$save_RANLIB
fi
test -z "$concat_cmds" || concat_cmds=$concat_cmds~
eval concat_cmds=\"\${concat_cmds}$old_archive_cmds\"
objlist=
len=$len0
fi
done
RANLIB=$save_RANLIB
oldobjs=$objlist
if test "X$oldobjs" = "X" ; then
eval cmds=\"\$concat_cmds\"
else
eval cmds=\"\$concat_cmds~\$old_archive_cmds\"
fi
fi
fi
func_execute_cmds "$cmds" 'exit $?'
done
test -n "$generated" && \
func_show_eval "${RM}r$generated"
# Now create the libtool archive.
case $output in
*.la)
old_library=
test "$build_old_libs" = yes && old_library="$libname.$libext"
func_verbose "creating $output"
# Preserve any variables that may affect compiler behavior
for var in $variables_saved_for_relink; do
if eval test -z \"\${$var+set}\"; then
relink_command="{ test -z \"\${$var+set}\" || $lt_unset $var || { $var=; export $var; }; }; $relink_command"
elif eval var_value=\$$var; test -z "$var_value"; then
relink_command="$var=; export $var; $relink_command"
else
func_quote_for_eval "$var_value"
relink_command="$var=$func_quote_for_eval_result; export $var; $relink_command"
fi
done
# Quote the link command for shipping.
relink_command="(cd `pwd`; $SHELL $progpath $preserve_args --mode=relink $libtool_args @inst_prefix_dir@)"
relink_command=`$ECHO "$relink_command" | $SED "$sed_quote_subst"`
if test "$hardcode_automatic" = yes ; then
relink_command=
fi
# Only create the output if not a dry run.
$opt_dry_run || {
for installed in no yes; do
if test "$installed" = yes; then
if test -z "$install_libdir"; then
break
fi
output="$output_objdir/$outputname"i
# Replace all uninstalled libtool libraries with the installed ones
newdependency_libs=
for deplib in $dependency_libs; do
case $deplib in
*.la)
func_basename "$deplib"
name="$func_basename_result"
func_resolve_sysroot "$deplib"
eval libdir=`${SED} -n -e 's/^libdir=\(.*\)$/\1/p' $func_resolve_sysroot_result`
test -z "$libdir" && \
func_fatal_error "\`$deplib' is not a valid libtool archive"
func_append newdependency_libs " ${lt_sysroot:+=}$libdir/$name"
;;
-L*)
func_stripname -L '' "$deplib"
func_replace_sysroot "$func_stripname_result"
func_append newdependency_libs " -L$func_replace_sysroot_result"
;;
-R*)
func_stripname -R '' "$deplib"
func_replace_sysroot "$func_stripname_result"
func_append newdependency_libs " -R$func_replace_sysroot_result"
;;
*) func_append newdependency_libs " $deplib" ;;
esac
done
dependency_libs="$newdependency_libs"
newdlfiles=
for lib in $dlfiles; do
case $lib in
*.la)
func_basename "$lib"
name="$func_basename_result"
eval libdir=`${SED} -n -e 's/^libdir=\(.*\)$/\1/p' $lib`
test -z "$libdir" && \
func_fatal_error "\`$lib' is not a valid libtool archive"
func_append newdlfiles " ${lt_sysroot:+=}$libdir/$name"
;;
*) func_append newdlfiles " $lib" ;;
esac
done
dlfiles="$newdlfiles"
newdlprefiles=
for lib in $dlprefiles; do
case $lib in
*.la)
# Only pass preopened files to the pseudo-archive (for
# eventual linking with the app. that links it) if we
# didn't already link the preopened objects directly into
# the library:
func_basename "$lib"
name="$func_basename_result"
eval libdir=`${SED} -n -e 's/^libdir=\(.*\)$/\1/p' $lib`
test -z "$libdir" && \
func_fatal_error "\`$lib' is not a valid libtool archive"
func_append newdlprefiles " ${lt_sysroot:+=}$libdir/$name"
;;
esac
done
dlprefiles="$newdlprefiles"
else
newdlfiles=
for lib in $dlfiles; do
case $lib in
[\\/]* | [A-Za-z]:[\\/]*) abs="$lib" ;;
*) abs=`pwd`"/$lib" ;;
esac
func_append newdlfiles " $abs"
done
dlfiles="$newdlfiles"
newdlprefiles=
for lib in $dlprefiles; do
case $lib in
[\\/]* | [A-Za-z]:[\\/]*) abs="$lib" ;;
*) abs=`pwd`"/$lib" ;;
esac
func_append newdlprefiles " $abs"
done
dlprefiles="$newdlprefiles"
fi
$RM $output
# place dlname in correct position for cygwin
# In fact, it would be nice if we could use this code for all target
# systems that can't hard-code library paths into their executables
# and that have no shared library path variable independent of PATH,
# but it turns out we can't easily determine that from inspecting
# libtool variables, so we have to hard-code the OSs to which it
# applies here; at the moment, that means platforms that use the PE
# object format with DLL files. See the long comment at the top of
# tests/bindir.at for full details.
tdlname=$dlname
case $host,$output,$installed,$module,$dlname in
*cygwin*,*lai,yes,no,*.dll | *mingw*,*lai,yes,no,*.dll | *cegcc*,*lai,yes,no,*.dll)
# If a -bindir argument was supplied, place the dll there.
if test "x$bindir" != x ;
then
func_relative_path "$install_libdir" "$bindir"
tdlname=$func_relative_path_result$dlname
else
# Otherwise fall back on heuristic.
tdlname=../bin/$dlname
fi
;;
esac
$ECHO > $output "\
# $outputname - a libtool library file
# Generated by $PROGRAM (GNU $PACKAGE$TIMESTAMP) $VERSION
#
# Please DO NOT delete this file!
# It is necessary for linking the library.
# The name that we can dlopen(3).
dlname='$tdlname'
# Names of this library.
library_names='$library_names'
# The name of the static archive.
old_library='$old_library'
# Linker flags that can not go in dependency_libs.
inherited_linker_flags='$new_inherited_linker_flags'
# Libraries that this one depends upon.
dependency_libs='$dependency_libs'
# Names of additional weak libraries provided by this library
weak_library_names='$weak_libs'
# Version information for $libname.
current=$current
age=$age
revision=$revision
# Is this an already installed library?
installed=$installed
# Should we warn about portability when linking against -modules?
shouldnotlink=$module
# Files to dlopen/dlpreopen
dlopen='$dlfiles'
dlpreopen='$dlprefiles'
# Directory that this library needs to be installed in:
libdir='$install_libdir'"
if test "$installed" = no && test "$need_relink" = yes; then
$ECHO >> $output "\
relink_command=\"$relink_command\""
fi
done
}
# Do a symbolic link so that the libtool archive can be found in
# LD_LIBRARY_PATH before the program is installed.
func_show_eval '( cd "$output_objdir" && $RM "$outputname" && $LN_S "../$outputname" "$outputname" )' 'exit $?'
;;
esac
exit $EXIT_SUCCESS
}
{ test "$opt_mode" = link || test "$opt_mode" = relink; } &&
func_mode_link ${1+"$@"}
# func_mode_uninstall arg...
func_mode_uninstall ()
{
$opt_debug
RM="$nonopt"
files=
rmforce=
exit_status=0
# This variable tells wrapper scripts just to set variables rather
# than running their programs.
libtool_install_magic="$magic"
for arg
do
case $arg in
-f) func_append RM " $arg"; rmforce=yes ;;
-*) func_append RM " $arg" ;;
*) func_append files " $arg" ;;
esac
done
test -z "$RM" && \
func_fatal_help "you must specify an RM program"
rmdirs=
for file in $files; do
func_dirname "$file" "" "."
dir="$func_dirname_result"
if test "X$dir" = X.; then
odir="$objdir"
else
odir="$dir/$objdir"
fi
func_basename "$file"
name="$func_basename_result"
test "$opt_mode" = uninstall && odir="$dir"
# Remember odir for removal later, being careful to avoid duplicates
if test "$opt_mode" = clean; then
case " $rmdirs " in
*" $odir "*) ;;
*) func_append rmdirs " $odir" ;;
esac
fi
# Don't error if the file doesn't exist and rm -f was used.
if { test -L "$file"; } >/dev/null 2>&1 ||
{ test -h "$file"; } >/dev/null 2>&1 ||
test -f "$file"; then
:
elif test -d "$file"; then
exit_status=1
continue
elif test "$rmforce" = yes; then
continue
fi
rmfiles="$file"
case $name in
*.la)
# Possibly a libtool archive, so verify it.
if func_lalib_p "$file"; then
func_source $dir/$name
# Delete the libtool libraries and symlinks.
for n in $library_names; do
func_append rmfiles " $odir/$n"
done
test -n "$old_library" && func_append rmfiles " $odir/$old_library"
case "$opt_mode" in
clean)
case " $library_names " in
*" $dlname "*) ;;
*) test -n "$dlname" && func_append rmfiles " $odir/$dlname" ;;
esac
test -n "$libdir" && func_append rmfiles " $odir/$name $odir/${name}i"
;;
uninstall)
if test -n "$library_names"; then
# Do each command in the postuninstall commands.
func_execute_cmds "$postuninstall_cmds" 'test "$rmforce" = yes || exit_status=1'
fi
if test -n "$old_library"; then
# Do each command in the old_postuninstall commands.
func_execute_cmds "$old_postuninstall_cmds" 'test "$rmforce" = yes || exit_status=1'
fi
# FIXME: should reinstall the best remaining shared library.
;;
esac
fi
;;
*.lo)
# Possibly a libtool object, so verify it.
if func_lalib_p "$file"; then
# Read the .lo file
func_source $dir/$name
# Add PIC object to the list of files to remove.
if test -n "$pic_object" &&
test "$pic_object" != none; then
func_append rmfiles " $dir/$pic_object"
fi
# Add non-PIC object to the list of files to remove.
if test -n "$non_pic_object" &&
test "$non_pic_object" != none; then
func_append rmfiles " $dir/$non_pic_object"
fi
fi
;;
*)
if test "$opt_mode" = clean ; then
noexename=$name
case $file in
*.exe)
func_stripname '' '.exe' "$file"
file=$func_stripname_result
func_stripname '' '.exe' "$name"
noexename=$func_stripname_result
# $file with .exe has already been added to rmfiles,
# add $file without .exe
func_append rmfiles " $file"
;;
esac
# Do a test to see if this is a libtool program.
if func_ltwrapper_p "$file"; then
if func_ltwrapper_executable_p "$file"; then
func_ltwrapper_scriptname "$file"
relink_command=
func_source $func_ltwrapper_scriptname_result
func_append rmfiles " $func_ltwrapper_scriptname_result"
else
relink_command=
func_source $dir/$noexename
fi
# note $name still contains .exe if it was in $file originally
# as does the version of $file that was added into $rmfiles
func_append rmfiles " $odir/$name $odir/${name}S.${objext}"
if test "$fast_install" = yes && test -n "$relink_command"; then
func_append rmfiles " $odir/lt-$name"
fi
if test "X$noexename" != "X$name" ; then
func_append rmfiles " $odir/lt-${noexename}.c"
fi
fi
fi
;;
esac
func_show_eval "$RM $rmfiles" 'exit_status=1'
done
# Try to remove the ${objdir}s in the directories where we deleted files
for dir in $rmdirs; do
if test -d "$dir"; then
func_show_eval "rmdir $dir >/dev/null 2>&1"
fi
done
exit $exit_status
}
{ test "$opt_mode" = uninstall || test "$opt_mode" = clean; } &&
func_mode_uninstall ${1+"$@"}
test -z "$opt_mode" && {
help="$generic_help"
func_fatal_help "you must specify a MODE"
}
test -z "$exec_cmd" && \
func_fatal_help "invalid operation mode \`$opt_mode'"
if test -n "$exec_cmd"; then
eval exec "$exec_cmd"
exit $EXIT_FAILURE
fi
exit $exit_status
# The TAGs below are defined such that we never get into a situation
# in which we disable both kinds of libraries. Given conflicting
# choices, we go for a static library, that is the most portable,
# since we can't tell whether shared libraries were disabled because
# the user asked for that or because the platform doesn't support
# them. This is particularly important on AIX, because we don't
# support having both static and shared libraries enabled at the same
# time on that platform, so we default to a shared-only configuration.
# If a disable-shared tag is given, we'll fallback to a static-only
# configuration. But we'll never go from static-only to shared-only.
# ### BEGIN LIBTOOL TAG CONFIG: disable-shared
build_libtool_libs=no
build_old_libs=yes
# ### END LIBTOOL TAG CONFIG: disable-shared
# ### BEGIN LIBTOOL TAG CONFIG: disable-static
build_old_libs=`case $build_libtool_libs in yes) echo no;; *) echo yes;; esac`
# ### END LIBTOOL TAG CONFIG: disable-static
# Local Variables:
# mode:shell-script
# sh-indentation:2
# End:
# vi:sw=2
iprutils-2.4.18.1/iprconfig-bash-completion.sh 0000664 0001750 0001751 00000001475 13270167731 016160 0000000 0000000 # IBM IPR adapter configuration utility
#
# (C) Copyright 2000, 2015
# International Business Machines Corporation and others.
# All Rights Reserved. This program and the accompanying
# materials are made available under the terms of the
# Common Public License v1.0 which accompanies this distribution.
_comp_iprconfig () {
iprconfig="${COMP_WORDS[0]}"
cur="${COMP_WORDS[COMP_CWORD]}"
prev="${COMP_WORDS[COMP_CWORD-1]}"
case "${prev}" in
"-c")
opts=$(${iprconfig} -l 2>/dev/null)
COMPREPLY=( $(compgen -W "${opts}" -- ${cur}) )
;;
"-k")
COMPREPLY=( $(compgen -o dirnames -- ${cur}) )
;;
*)
opts=$(find /dev -printf "%f\n" | grep -G "^\(sd\|sg\)")
COMPREPLY=( $(compgen -W "${opts}" -- ${cur}) )
;;
esac
return 0;
}
complete -F _comp_iprconfig iprconfig
iprutils-2.4.18.1/configure 0000775 0001750 0001751 00001517515 13474264421 012501 0000000 0000000 #! /bin/sh
# Guess values for system-dependent variables and create Makefiles.
# Generated by GNU Autoconf 2.69 for iprutils 2.4.18.1.
#
# Report bugs to .
#
#
# Copyright (C) 1992-1996, 1998-2012 Free Software Foundation, Inc.
#
#
# This configure script is free software; the Free Software Foundation
# gives unlimited permission to copy, distribute and modify it.
## -------------------- ##
## M4sh Initialization. ##
## -------------------- ##
# Be more Bourne compatible
DUALCASE=1; export DUALCASE # for MKS sh
if test -n "${ZSH_VERSION+set}" && (emulate sh) >/dev/null 2>&1; then :
emulate sh
NULLCMD=:
# Pre-4.2 versions of Zsh do word splitting on ${1+"$@"}, which
# is contrary to our usage. Disable this feature.
alias -g '${1+"$@"}'='"$@"'
setopt NO_GLOB_SUBST
else
case `(set -o) 2>/dev/null` in #(
*posix*) :
set -o posix ;; #(
*) :
;;
esac
fi
as_nl='
'
export as_nl
# Printing a long string crashes Solaris 7 /usr/bin/printf.
as_echo='\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\'
as_echo=$as_echo$as_echo$as_echo$as_echo$as_echo
as_echo=$as_echo$as_echo$as_echo$as_echo$as_echo$as_echo
# Prefer a ksh shell builtin over an external printf program on Solaris,
# but without wasting forks for bash or zsh.
if test -z "$BASH_VERSION$ZSH_VERSION" \
&& (test "X`print -r -- $as_echo`" = "X$as_echo") 2>/dev/null; then
as_echo='print -r --'
as_echo_n='print -rn --'
elif (test "X`printf %s $as_echo`" = "X$as_echo") 2>/dev/null; then
as_echo='printf %s\n'
as_echo_n='printf %s'
else
if test "X`(/usr/ucb/echo -n -n $as_echo) 2>/dev/null`" = "X-n $as_echo"; then
as_echo_body='eval /usr/ucb/echo -n "$1$as_nl"'
as_echo_n='/usr/ucb/echo -n'
else
as_echo_body='eval expr "X$1" : "X\\(.*\\)"'
as_echo_n_body='eval
arg=$1;
case $arg in #(
*"$as_nl"*)
expr "X$arg" : "X\\(.*\\)$as_nl";
arg=`expr "X$arg" : ".*$as_nl\\(.*\\)"`;;
esac;
expr "X$arg" : "X\\(.*\\)" | tr -d "$as_nl"
'
export as_echo_n_body
as_echo_n='sh -c $as_echo_n_body as_echo'
fi
export as_echo_body
as_echo='sh -c $as_echo_body as_echo'
fi
# The user is always right.
if test "${PATH_SEPARATOR+set}" != set; then
PATH_SEPARATOR=:
(PATH='/bin;/bin'; FPATH=$PATH; sh -c :) >/dev/null 2>&1 && {
(PATH='/bin:/bin'; FPATH=$PATH; sh -c :) >/dev/null 2>&1 ||
PATH_SEPARATOR=';'
}
fi
# IFS
# We need space, tab and new line, in precisely that order. Quoting is
# there to prevent editors from complaining about space-tab.
# (If _AS_PATH_WALK were called with IFS unset, it would disable word
# splitting by setting IFS to empty value.)
IFS=" "" $as_nl"
# Find who we are. Look in the path if we contain no directory separator.
as_myself=
case $0 in #((
*[\\/]* ) as_myself=$0 ;;
*) as_save_IFS=$IFS; IFS=$PATH_SEPARATOR
for as_dir in $PATH
do
IFS=$as_save_IFS
test -z "$as_dir" && as_dir=.
test -r "$as_dir/$0" && as_myself=$as_dir/$0 && break
done
IFS=$as_save_IFS
;;
esac
# We did not find ourselves, most probably we were run as `sh COMMAND'
# in which case we are not to be found in the path.
if test "x$as_myself" = x; then
as_myself=$0
fi
if test ! -f "$as_myself"; then
$as_echo "$as_myself: error: cannot find myself; rerun with an absolute file name" >&2
exit 1
fi
# Unset variables that we do not need and which cause bugs (e.g. in
# pre-3.0 UWIN ksh). But do not cause bugs in bash 2.01; the "|| exit 1"
# suppresses any "Segmentation fault" message there. '((' could
# trigger a bug in pdksh 5.2.14.
for as_var in BASH_ENV ENV MAIL MAILPATH
do eval test x\${$as_var+set} = xset \
&& ( (unset $as_var) || exit 1) >/dev/null 2>&1 && unset $as_var || :
done
PS1='$ '
PS2='> '
PS4='+ '
# NLS nuisances.
LC_ALL=C
export LC_ALL
LANGUAGE=C
export LANGUAGE
# CDPATH.
(unset CDPATH) >/dev/null 2>&1 && unset CDPATH
# Use a proper internal environment variable to ensure we don't fall
# into an infinite loop, continuously re-executing ourselves.
if test x"${_as_can_reexec}" != xno && test "x$CONFIG_SHELL" != x; then
_as_can_reexec=no; export _as_can_reexec;
# We cannot yet assume a decent shell, so we have to provide a
# neutralization value for shells without unset; and this also
# works around shells that cannot unset nonexistent variables.
# Preserve -v and -x to the replacement shell.
BASH_ENV=/dev/null
ENV=/dev/null
(unset BASH_ENV) >/dev/null 2>&1 && unset BASH_ENV ENV
case $- in # ((((
*v*x* | *x*v* ) as_opts=-vx ;;
*v* ) as_opts=-v ;;
*x* ) as_opts=-x ;;
* ) as_opts= ;;
esac
exec $CONFIG_SHELL $as_opts "$as_myself" ${1+"$@"}
# Admittedly, this is quite paranoid, since all the known shells bail
# out after a failed `exec'.
$as_echo "$0: could not re-execute with $CONFIG_SHELL" >&2
as_fn_exit 255
fi
# We don't want this to propagate to other subprocesses.
{ _as_can_reexec=; unset _as_can_reexec;}
if test "x$CONFIG_SHELL" = x; then
as_bourne_compatible="if test -n \"\${ZSH_VERSION+set}\" && (emulate sh) >/dev/null 2>&1; then :
emulate sh
NULLCMD=:
# Pre-4.2 versions of Zsh do word splitting on \${1+\"\$@\"}, which
# is contrary to our usage. Disable this feature.
alias -g '\${1+\"\$@\"}'='\"\$@\"'
setopt NO_GLOB_SUBST
else
case \`(set -o) 2>/dev/null\` in #(
*posix*) :
set -o posix ;; #(
*) :
;;
esac
fi
"
as_required="as_fn_return () { (exit \$1); }
as_fn_success () { as_fn_return 0; }
as_fn_failure () { as_fn_return 1; }
as_fn_ret_success () { return 0; }
as_fn_ret_failure () { return 1; }
exitcode=0
as_fn_success || { exitcode=1; echo as_fn_success failed.; }
as_fn_failure && { exitcode=1; echo as_fn_failure succeeded.; }
as_fn_ret_success || { exitcode=1; echo as_fn_ret_success failed.; }
as_fn_ret_failure && { exitcode=1; echo as_fn_ret_failure succeeded.; }
if ( set x; as_fn_ret_success y && test x = \"\$1\" ); then :
else
exitcode=1; echo positional parameters were not saved.
fi
test x\$exitcode = x0 || exit 1
test -x / || exit 1"
as_suggested=" as_lineno_1=";as_suggested=$as_suggested$LINENO;as_suggested=$as_suggested" as_lineno_1a=\$LINENO
as_lineno_2=";as_suggested=$as_suggested$LINENO;as_suggested=$as_suggested" as_lineno_2a=\$LINENO
eval 'test \"x\$as_lineno_1'\$as_run'\" != \"x\$as_lineno_2'\$as_run'\" &&
test \"x\`expr \$as_lineno_1'\$as_run' + 1\`\" = \"x\$as_lineno_2'\$as_run'\"' || exit 1
test -n \"\${ZSH_VERSION+set}\${BASH_VERSION+set}\" || (
ECHO='\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\'
ECHO=\$ECHO\$ECHO\$ECHO\$ECHO\$ECHO
ECHO=\$ECHO\$ECHO\$ECHO\$ECHO\$ECHO\$ECHO
PATH=/empty FPATH=/empty; export PATH FPATH
test \"X\`printf %s \$ECHO\`\" = \"X\$ECHO\" \\
|| test \"X\`print -r -- \$ECHO\`\" = \"X\$ECHO\" ) || exit 1
test \$(( 1 + 1 )) = 2 || exit 1"
if (eval "$as_required") 2>/dev/null; then :
as_have_required=yes
else
as_have_required=no
fi
if test x$as_have_required = xyes && (eval "$as_suggested") 2>/dev/null; then :
else
as_save_IFS=$IFS; IFS=$PATH_SEPARATOR
as_found=false
for as_dir in /bin$PATH_SEPARATOR/usr/bin$PATH_SEPARATOR$PATH
do
IFS=$as_save_IFS
test -z "$as_dir" && as_dir=.
as_found=:
case $as_dir in #(
/*)
for as_base in sh bash ksh sh5; do
# Try only shells that exist, to save several forks.
as_shell=$as_dir/$as_base
if { test -f "$as_shell" || test -f "$as_shell.exe"; } &&
{ $as_echo "$as_bourne_compatible""$as_required" | as_run=a "$as_shell"; } 2>/dev/null; then :
CONFIG_SHELL=$as_shell as_have_required=yes
if { $as_echo "$as_bourne_compatible""$as_suggested" | as_run=a "$as_shell"; } 2>/dev/null; then :
break 2
fi
fi
done;;
esac
as_found=false
done
$as_found || { if { test -f "$SHELL" || test -f "$SHELL.exe"; } &&
{ $as_echo "$as_bourne_compatible""$as_required" | as_run=a "$SHELL"; } 2>/dev/null; then :
CONFIG_SHELL=$SHELL as_have_required=yes
fi; }
IFS=$as_save_IFS
if test "x$CONFIG_SHELL" != x; then :
export CONFIG_SHELL
# We cannot yet assume a decent shell, so we have to provide a
# neutralization value for shells without unset; and this also
# works around shells that cannot unset nonexistent variables.
# Preserve -v and -x to the replacement shell.
BASH_ENV=/dev/null
ENV=/dev/null
(unset BASH_ENV) >/dev/null 2>&1 && unset BASH_ENV ENV
case $- in # ((((
*v*x* | *x*v* ) as_opts=-vx ;;
*v* ) as_opts=-v ;;
*x* ) as_opts=-x ;;
* ) as_opts= ;;
esac
exec $CONFIG_SHELL $as_opts "$as_myself" ${1+"$@"}
# Admittedly, this is quite paranoid, since all the known shells bail
# out after a failed `exec'.
$as_echo "$0: could not re-execute with $CONFIG_SHELL" >&2
exit 255
fi
if test x$as_have_required = xno; then :
$as_echo "$0: This script requires a shell more modern than all"
$as_echo "$0: the shells that I found on your system."
if test x${ZSH_VERSION+set} = xset ; then
$as_echo "$0: In particular, zsh $ZSH_VERSION has bugs and should"
$as_echo "$0: be upgraded to zsh 4.3.4 or later."
else
$as_echo "$0: Please tell bug-autoconf@gnu.org and
$0: iprdd-devel@lists.sourceforge.net about your system,
$0: including any error possibly output before this
$0: message. Then install a modern shell, or manually run
$0: the script under such a shell if you do have one."
fi
exit 1
fi
fi
fi
SHELL=${CONFIG_SHELL-/bin/sh}
export SHELL
# Unset more variables known to interfere with behavior of common tools.
CLICOLOR_FORCE= GREP_OPTIONS=
unset CLICOLOR_FORCE GREP_OPTIONS
## --------------------- ##
## M4sh Shell Functions. ##
## --------------------- ##
# as_fn_unset VAR
# ---------------
# Portably unset VAR.
as_fn_unset ()
{
{ eval $1=; unset $1;}
}
as_unset=as_fn_unset
# as_fn_set_status STATUS
# -----------------------
# Set $? to STATUS, without forking.
as_fn_set_status ()
{
return $1
} # as_fn_set_status
# as_fn_exit STATUS
# -----------------
# Exit the shell with STATUS, even in a "trap 0" or "set -e" context.
as_fn_exit ()
{
set +e
as_fn_set_status $1
exit $1
} # as_fn_exit
# as_fn_mkdir_p
# -------------
# Create "$as_dir" as a directory, including parents if necessary.
as_fn_mkdir_p ()
{
case $as_dir in #(
-*) as_dir=./$as_dir;;
esac
test -d "$as_dir" || eval $as_mkdir_p || {
as_dirs=
while :; do
case $as_dir in #(
*\'*) as_qdir=`$as_echo "$as_dir" | sed "s/'/'\\\\\\\\''/g"`;; #'(
*) as_qdir=$as_dir;;
esac
as_dirs="'$as_qdir' $as_dirs"
as_dir=`$as_dirname -- "$as_dir" ||
$as_expr X"$as_dir" : 'X\(.*[^/]\)//*[^/][^/]*/*$' \| \
X"$as_dir" : 'X\(//\)[^/]' \| \
X"$as_dir" : 'X\(//\)$' \| \
X"$as_dir" : 'X\(/\)' \| . 2>/dev/null ||
$as_echo X"$as_dir" |
sed '/^X\(.*[^/]\)\/\/*[^/][^/]*\/*$/{
s//\1/
q
}
/^X\(\/\/\)[^/].*/{
s//\1/
q
}
/^X\(\/\/\)$/{
s//\1/
q
}
/^X\(\/\).*/{
s//\1/
q
}
s/.*/./; q'`
test -d "$as_dir" && break
done
test -z "$as_dirs" || eval "mkdir $as_dirs"
} || test -d "$as_dir" || as_fn_error $? "cannot create directory $as_dir"
} # as_fn_mkdir_p
# as_fn_executable_p FILE
# -----------------------
# Test if FILE is an executable regular file.
as_fn_executable_p ()
{
test -f "$1" && test -x "$1"
} # as_fn_executable_p
# as_fn_append VAR VALUE
# ----------------------
# Append the text in VALUE to the end of the definition contained in VAR. Take
# advantage of any shell optimizations that allow amortized linear growth over
# repeated appends, instead of the typical quadratic growth present in naive
# implementations.
if (eval "as_var=1; as_var+=2; test x\$as_var = x12") 2>/dev/null; then :
eval 'as_fn_append ()
{
eval $1+=\$2
}'
else
as_fn_append ()
{
eval $1=\$$1\$2
}
fi # as_fn_append
# as_fn_arith ARG...
# ------------------
# Perform arithmetic evaluation on the ARGs, and store the result in the
# global $as_val. Take advantage of shells that can avoid forks. The arguments
# must be portable across $(()) and expr.
if (eval "test \$(( 1 + 1 )) = 2") 2>/dev/null; then :
eval 'as_fn_arith ()
{
as_val=$(( $* ))
}'
else
as_fn_arith ()
{
as_val=`expr "$@" || test $? -eq 1`
}
fi # as_fn_arith
# as_fn_error STATUS ERROR [LINENO LOG_FD]
# ----------------------------------------
# Output "`basename $0`: error: ERROR" to stderr. If LINENO and LOG_FD are
# provided, also output the error to LOG_FD, referencing LINENO. Then exit the
# script with STATUS, using 1 if that was 0.
as_fn_error ()
{
as_status=$1; test $as_status -eq 0 && as_status=1
if test "$4"; then
as_lineno=${as_lineno-"$3"} as_lineno_stack=as_lineno_stack=$as_lineno_stack
$as_echo "$as_me:${as_lineno-$LINENO}: error: $2" >&$4
fi
$as_echo "$as_me: error: $2" >&2
as_fn_exit $as_status
} # as_fn_error
if expr a : '\(a\)' >/dev/null 2>&1 &&
test "X`expr 00001 : '.*\(...\)'`" = X001; then
as_expr=expr
else
as_expr=false
fi
if (basename -- /) >/dev/null 2>&1 && test "X`basename -- / 2>&1`" = "X/"; then
as_basename=basename
else
as_basename=false
fi
if (as_dir=`dirname -- /` && test "X$as_dir" = X/) >/dev/null 2>&1; then
as_dirname=dirname
else
as_dirname=false
fi
as_me=`$as_basename -- "$0" ||
$as_expr X/"$0" : '.*/\([^/][^/]*\)/*$' \| \
X"$0" : 'X\(//\)$' \| \
X"$0" : 'X\(/\)' \| . 2>/dev/null ||
$as_echo X/"$0" |
sed '/^.*\/\([^/][^/]*\)\/*$/{
s//\1/
q
}
/^X\/\(\/\/\)$/{
s//\1/
q
}
/^X\/\(\/\).*/{
s//\1/
q
}
s/.*/./; q'`
# Avoid depending upon Character Ranges.
as_cr_letters='abcdefghijklmnopqrstuvwxyz'
as_cr_LETTERS='ABCDEFGHIJKLMNOPQRSTUVWXYZ'
as_cr_Letters=$as_cr_letters$as_cr_LETTERS
as_cr_digits='0123456789'
as_cr_alnum=$as_cr_Letters$as_cr_digits
as_lineno_1=$LINENO as_lineno_1a=$LINENO
as_lineno_2=$LINENO as_lineno_2a=$LINENO
eval 'test "x$as_lineno_1'$as_run'" != "x$as_lineno_2'$as_run'" &&
test "x`expr $as_lineno_1'$as_run' + 1`" = "x$as_lineno_2'$as_run'"' || {
# Blame Lee E. McMahon (1931-1989) for sed's syntax. :-)
sed -n '
p
/[$]LINENO/=
' <$as_myself |
sed '
s/[$]LINENO.*/&-/
t lineno
b
:lineno
N
:loop
s/[$]LINENO\([^'$as_cr_alnum'_].*\n\)\(.*\)/\2\1\2/
t loop
s/-\n.*//
' >$as_me.lineno &&
chmod +x "$as_me.lineno" ||
{ $as_echo "$as_me: error: cannot create $as_me.lineno; rerun with a POSIX shell" >&2; as_fn_exit 1; }
# If we had to re-execute with $CONFIG_SHELL, we're ensured to have
# already done that, so ensure we don't try to do so again and fall
# in an infinite loop. This has already happened in practice.
_as_can_reexec=no; export _as_can_reexec
# Don't try to exec as it changes $[0], causing all sort of problems
# (the dirname of $[0] is not the place where we might find the
# original and so on. Autoconf is especially sensitive to this).
. "./$as_me.lineno"
# Exit status is that of the last command.
exit
}
ECHO_C= ECHO_N= ECHO_T=
case `echo -n x` in #(((((
-n*)
case `echo 'xy\c'` in
*c*) ECHO_T=' ';; # ECHO_T is single tab character.
xy) ECHO_C='\c';;
*) echo `echo ksh88 bug on AIX 6.1` > /dev/null
ECHO_T=' ';;
esac;;
*)
ECHO_N='-n';;
esac
rm -f conf$$ conf$$.exe conf$$.file
if test -d conf$$.dir; then
rm -f conf$$.dir/conf$$.file
else
rm -f conf$$.dir
mkdir conf$$.dir 2>/dev/null
fi
if (echo >conf$$.file) 2>/dev/null; then
if ln -s conf$$.file conf$$ 2>/dev/null; then
as_ln_s='ln -s'
# ... but there are two gotchas:
# 1) On MSYS, both `ln -s file dir' and `ln file dir' fail.
# 2) DJGPP < 2.04 has no symlinks; `ln -s' creates a wrapper executable.
# In both cases, we have to default to `cp -pR'.
ln -s conf$$.file conf$$.dir 2>/dev/null && test ! -f conf$$.exe ||
as_ln_s='cp -pR'
elif ln conf$$.file conf$$ 2>/dev/null; then
as_ln_s=ln
else
as_ln_s='cp -pR'
fi
else
as_ln_s='cp -pR'
fi
rm -f conf$$ conf$$.exe conf$$.dir/conf$$.file conf$$.file
rmdir conf$$.dir 2>/dev/null
if mkdir -p . 2>/dev/null; then
as_mkdir_p='mkdir -p "$as_dir"'
else
test -d ./-p && rmdir ./-p
as_mkdir_p=false
fi
as_test_x='test -x'
as_executable_p=as_fn_executable_p
# Sed expression to map a string onto a valid CPP name.
as_tr_cpp="eval sed 'y%*$as_cr_letters%P$as_cr_LETTERS%;s%[^_$as_cr_alnum]%_%g'"
# Sed expression to map a string onto a valid variable name.
as_tr_sh="eval sed 'y%*+%pp%;s%[^_$as_cr_alnum]%_%g'"
SHELL=${CONFIG_SHELL-/bin/sh}
test -n "$DJDIR" || exec 7<&0 &1
# Name of the host.
# hostname on some systems (SVR3.2, old GNU/Linux) returns a bogus exit status,
# so uname gets run too.
ac_hostname=`(hostname || uname -n) 2>/dev/null | sed 1q`
#
# Initializations.
#
ac_default_prefix=/usr/local
ac_clean_files=
ac_config_libobj_dir=.
LIBOBJS=
cross_compiling=no
subdirs=
MFLAGS=
MAKEFLAGS=
# Identity of this package.
PACKAGE_NAME='iprutils'
PACKAGE_TARNAME='iprutils'
PACKAGE_VERSION='2.4.18.1'
PACKAGE_STRING='iprutils 2.4.18.1'
PACKAGE_BUGREPORT='iprdd-devel@lists.sourceforge.net'
PACKAGE_URL=''
# Factoring default headers for most tests.
ac_includes_default="\
#include
#ifdef HAVE_SYS_TYPES_H
# include
#endif
#ifdef HAVE_SYS_STAT_H
# include
#endif
#ifdef STDC_HEADERS
# include
# include
#else
# ifdef HAVE_STDLIB_H
# include
# endif
#endif
#ifdef HAVE_STRING_H
# if !defined STDC_HEADERS && defined HAVE_MEMORY_H
# include
# endif
# include
#endif
#ifdef HAVE_STRINGS_H
# include
#endif
#ifdef HAVE_INTTYPES_H
# include
#endif
#ifdef HAVE_STDINT_H
# include
#endif
#ifdef HAVE_UNISTD_H
# include
#endif"
ac_subst_vars='am__EXEEXT_FALSE
am__EXEEXT_TRUE
LTLIBOBJS
LIBOBJS
IPRCONFIG_LIBS
pkgpyexecdir
pyexecdir
pkgpythondir
pythondir
PYTHON_PLATFORM
PYTHON_EXEC_PREFIX
PYTHON_PREFIX
PYTHON_VERSION
PYTHON
initddir
INITD_FALSE
INITD_TRUE
udevrulesdir
systemdunitdir
SYSTEMD_FALSE
SYSTEMD_TRUE
IPRDUMPFMT_FALSE
IPRDUMPFMT_TRUE
SOSREPORT_FALSE
SOSREPORT_TRUE
STATIC_BUILD_FALSE
STATIC_BUILD_TRUE
CPP
OTOOL64
OTOOL
LIPO
NMEDIT
DSYMUTIL
MANIFEST_TOOL
RANLIB
ac_ct_AR
AR
DLLTOOL
OBJDUMP
LN_S
NM
ac_ct_DUMPBIN
DUMPBIN
LD
FGREP
EGREP
GREP
SED
host_os
host_vendor
host_cpu
host
build_os
build_vendor
build_cpu
build
LIBTOOL
am__fastdepCC_FALSE
am__fastdepCC_TRUE
CCDEPMODE
am__nodep
AMDEPBACKSLASH
AMDEP_FALSE
AMDEP_TRUE
am__quote
am__include
DEPDIR
OBJEXT
EXEEXT
ac_ct_CC
CPPFLAGS
LDFLAGS
CFLAGS
CC
AM_BACKSLASH
AM_DEFAULT_VERBOSITY
AM_DEFAULT_V
AM_V
am__untar
am__tar
AMTAR
am__leading_dot
SET_MAKE
AWK
mkdir_p
MKDIR_P
INSTALL_STRIP_PROGRAM
STRIP
install_sh
MAKEINFO
AUTOHEADER
AUTOMAKE
AUTOCONF
ACLOCAL
VERSION
PACKAGE
CYGPATH_W
am__isrc
INSTALL_DATA
INSTALL_SCRIPT
INSTALL_PROGRAM
target_alias
host_alias
build_alias
LIBS
ECHO_T
ECHO_N
ECHO_C
DEFS
mandir
localedir
libdir
psdir
pdfdir
dvidir
htmldir
infodir
docdir
oldincludedir
includedir
localstatedir
sharedstatedir
sysconfdir
datadir
datarootdir
libexecdir
sbindir
bindir
program_transform_name
prefix
exec_prefix
PACKAGE_URL
PACKAGE_BUGREPORT
PACKAGE_STRING
PACKAGE_VERSION
PACKAGE_TARNAME
PACKAGE_NAME
PATH_SEPARATOR
SHELL'
ac_subst_files=''
ac_user_opts='
enable_option_checking
enable_silent_rules
enable_dependency_tracking
enable_shared
enable_static
with_pic
enable_fast_install
with_gnu_ld
with_sysroot
enable_libtool_lock
enable_build_static
enable_sosreport
enable_iprdumpfmt
with_systemd
with_initscripts
'
ac_precious_vars='build_alias
host_alias
target_alias
CC
CFLAGS
LDFLAGS
LIBS
CPPFLAGS
CPP
PYTHON'
# Initialize some variables set by options.
ac_init_help=
ac_init_version=false
ac_unrecognized_opts=
ac_unrecognized_sep=
# The variables have the same names as the options, with
# dashes changed to underlines.
cache_file=/dev/null
exec_prefix=NONE
no_create=
no_recursion=
prefix=NONE
program_prefix=NONE
program_suffix=NONE
program_transform_name=s,x,x,
silent=
site=
srcdir=
verbose=
x_includes=NONE
x_libraries=NONE
# Installation directory options.
# These are left unexpanded so users can "make install exec_prefix=/foo"
# and all the variables that are supposed to be based on exec_prefix
# by default will actually change.
# Use braces instead of parens because sh, perl, etc. also accept them.
# (The list follows the same order as the GNU Coding Standards.)
bindir='${exec_prefix}/bin'
sbindir='${exec_prefix}/sbin'
libexecdir='${exec_prefix}/libexec'
datarootdir='${prefix}/share'
datadir='${datarootdir}'
sysconfdir='${prefix}/etc'
sharedstatedir='${prefix}/com'
localstatedir='${prefix}/var'
includedir='${prefix}/include'
oldincludedir='/usr/include'
docdir='${datarootdir}/doc/${PACKAGE_TARNAME}'
infodir='${datarootdir}/info'
htmldir='${docdir}'
dvidir='${docdir}'
pdfdir='${docdir}'
psdir='${docdir}'
libdir='${exec_prefix}/lib'
localedir='${datarootdir}/locale'
mandir='${datarootdir}/man'
ac_prev=
ac_dashdash=
for ac_option
do
# If the previous option needs an argument, assign it.
if test -n "$ac_prev"; then
eval $ac_prev=\$ac_option
ac_prev=
continue
fi
case $ac_option in
*=?*) ac_optarg=`expr "X$ac_option" : '[^=]*=\(.*\)'` ;;
*=) ac_optarg= ;;
*) ac_optarg=yes ;;
esac
# Accept the important Cygnus configure options, so we can diagnose typos.
case $ac_dashdash$ac_option in
--)
ac_dashdash=yes ;;
-bindir | --bindir | --bindi | --bind | --bin | --bi)
ac_prev=bindir ;;
-bindir=* | --bindir=* | --bindi=* | --bind=* | --bin=* | --bi=*)
bindir=$ac_optarg ;;
-build | --build | --buil | --bui | --bu)
ac_prev=build_alias ;;
-build=* | --build=* | --buil=* | --bui=* | --bu=*)
build_alias=$ac_optarg ;;
-cache-file | --cache-file | --cache-fil | --cache-fi \
| --cache-f | --cache- | --cache | --cach | --cac | --ca | --c)
ac_prev=cache_file ;;
-cache-file=* | --cache-file=* | --cache-fil=* | --cache-fi=* \
| --cache-f=* | --cache-=* | --cache=* | --cach=* | --cac=* | --ca=* | --c=*)
cache_file=$ac_optarg ;;
--config-cache | -C)
cache_file=config.cache ;;
-datadir | --datadir | --datadi | --datad)
ac_prev=datadir ;;
-datadir=* | --datadir=* | --datadi=* | --datad=*)
datadir=$ac_optarg ;;
-datarootdir | --datarootdir | --datarootdi | --datarootd | --dataroot \
| --dataroo | --dataro | --datar)
ac_prev=datarootdir ;;
-datarootdir=* | --datarootdir=* | --datarootdi=* | --datarootd=* \
| --dataroot=* | --dataroo=* | --dataro=* | --datar=*)
datarootdir=$ac_optarg ;;
-disable-* | --disable-*)
ac_useropt=`expr "x$ac_option" : 'x-*disable-\(.*\)'`
# Reject names that are not valid shell variable names.
expr "x$ac_useropt" : ".*[^-+._$as_cr_alnum]" >/dev/null &&
as_fn_error $? "invalid feature name: $ac_useropt"
ac_useropt_orig=$ac_useropt
ac_useropt=`$as_echo "$ac_useropt" | sed 's/[-+.]/_/g'`
case $ac_user_opts in
*"
"enable_$ac_useropt"
"*) ;;
*) ac_unrecognized_opts="$ac_unrecognized_opts$ac_unrecognized_sep--disable-$ac_useropt_orig"
ac_unrecognized_sep=', ';;
esac
eval enable_$ac_useropt=no ;;
-docdir | --docdir | --docdi | --doc | --do)
ac_prev=docdir ;;
-docdir=* | --docdir=* | --docdi=* | --doc=* | --do=*)
docdir=$ac_optarg ;;
-dvidir | --dvidir | --dvidi | --dvid | --dvi | --dv)
ac_prev=dvidir ;;
-dvidir=* | --dvidir=* | --dvidi=* | --dvid=* | --dvi=* | --dv=*)
dvidir=$ac_optarg ;;
-enable-* | --enable-*)
ac_useropt=`expr "x$ac_option" : 'x-*enable-\([^=]*\)'`
# Reject names that are not valid shell variable names.
expr "x$ac_useropt" : ".*[^-+._$as_cr_alnum]" >/dev/null &&
as_fn_error $? "invalid feature name: $ac_useropt"
ac_useropt_orig=$ac_useropt
ac_useropt=`$as_echo "$ac_useropt" | sed 's/[-+.]/_/g'`
case $ac_user_opts in
*"
"enable_$ac_useropt"
"*) ;;
*) ac_unrecognized_opts="$ac_unrecognized_opts$ac_unrecognized_sep--enable-$ac_useropt_orig"
ac_unrecognized_sep=', ';;
esac
eval enable_$ac_useropt=\$ac_optarg ;;
-exec-prefix | --exec_prefix | --exec-prefix | --exec-prefi \
| --exec-pref | --exec-pre | --exec-pr | --exec-p | --exec- \
| --exec | --exe | --ex)
ac_prev=exec_prefix ;;
-exec-prefix=* | --exec_prefix=* | --exec-prefix=* | --exec-prefi=* \
| --exec-pref=* | --exec-pre=* | --exec-pr=* | --exec-p=* | --exec-=* \
| --exec=* | --exe=* | --ex=*)
exec_prefix=$ac_optarg ;;
-gas | --gas | --ga | --g)
# Obsolete; use --with-gas.
with_gas=yes ;;
-help | --help | --hel | --he | -h)
ac_init_help=long ;;
-help=r* | --help=r* | --hel=r* | --he=r* | -hr*)
ac_init_help=recursive ;;
-help=s* | --help=s* | --hel=s* | --he=s* | -hs*)
ac_init_help=short ;;
-host | --host | --hos | --ho)
ac_prev=host_alias ;;
-host=* | --host=* | --hos=* | --ho=*)
host_alias=$ac_optarg ;;
-htmldir | --htmldir | --htmldi | --htmld | --html | --htm | --ht)
ac_prev=htmldir ;;
-htmldir=* | --htmldir=* | --htmldi=* | --htmld=* | --html=* | --htm=* \
| --ht=*)
htmldir=$ac_optarg ;;
-includedir | --includedir | --includedi | --included | --include \
| --includ | --inclu | --incl | --inc)
ac_prev=includedir ;;
-includedir=* | --includedir=* | --includedi=* | --included=* | --include=* \
| --includ=* | --inclu=* | --incl=* | --inc=*)
includedir=$ac_optarg ;;
-infodir | --infodir | --infodi | --infod | --info | --inf)
ac_prev=infodir ;;
-infodir=* | --infodir=* | --infodi=* | --infod=* | --info=* | --inf=*)
infodir=$ac_optarg ;;
-libdir | --libdir | --libdi | --libd)
ac_prev=libdir ;;
-libdir=* | --libdir=* | --libdi=* | --libd=*)
libdir=$ac_optarg ;;
-libexecdir | --libexecdir | --libexecdi | --libexecd | --libexec \
| --libexe | --libex | --libe)
ac_prev=libexecdir ;;
-libexecdir=* | --libexecdir=* | --libexecdi=* | --libexecd=* | --libexec=* \
| --libexe=* | --libex=* | --libe=*)
libexecdir=$ac_optarg ;;
-localedir | --localedir | --localedi | --localed | --locale)
ac_prev=localedir ;;
-localedir=* | --localedir=* | --localedi=* | --localed=* | --locale=*)
localedir=$ac_optarg ;;
-localstatedir | --localstatedir | --localstatedi | --localstated \
| --localstate | --localstat | --localsta | --localst | --locals)
ac_prev=localstatedir ;;
-localstatedir=* | --localstatedir=* | --localstatedi=* | --localstated=* \
| --localstate=* | --localstat=* | --localsta=* | --localst=* | --locals=*)
localstatedir=$ac_optarg ;;
-mandir | --mandir | --mandi | --mand | --man | --ma | --m)
ac_prev=mandir ;;
-mandir=* | --mandir=* | --mandi=* | --mand=* | --man=* | --ma=* | --m=*)
mandir=$ac_optarg ;;
-nfp | --nfp | --nf)
# Obsolete; use --without-fp.
with_fp=no ;;
-no-create | --no-create | --no-creat | --no-crea | --no-cre \
| --no-cr | --no-c | -n)
no_create=yes ;;
-no-recursion | --no-recursion | --no-recursio | --no-recursi \
| --no-recurs | --no-recur | --no-recu | --no-rec | --no-re | --no-r)
no_recursion=yes ;;
-oldincludedir | --oldincludedir | --oldincludedi | --oldincluded \
| --oldinclude | --oldinclud | --oldinclu | --oldincl | --oldinc \
| --oldin | --oldi | --old | --ol | --o)
ac_prev=oldincludedir ;;
-oldincludedir=* | --oldincludedir=* | --oldincludedi=* | --oldincluded=* \
| --oldinclude=* | --oldinclud=* | --oldinclu=* | --oldincl=* | --oldinc=* \
| --oldin=* | --oldi=* | --old=* | --ol=* | --o=*)
oldincludedir=$ac_optarg ;;
-prefix | --prefix | --prefi | --pref | --pre | --pr | --p)
ac_prev=prefix ;;
-prefix=* | --prefix=* | --prefi=* | --pref=* | --pre=* | --pr=* | --p=*)
prefix=$ac_optarg ;;
-program-prefix | --program-prefix | --program-prefi | --program-pref \
| --program-pre | --program-pr | --program-p)
ac_prev=program_prefix ;;
-program-prefix=* | --program-prefix=* | --program-prefi=* \
| --program-pref=* | --program-pre=* | --program-pr=* | --program-p=*)
program_prefix=$ac_optarg ;;
-program-suffix | --program-suffix | --program-suffi | --program-suff \
| --program-suf | --program-su | --program-s)
ac_prev=program_suffix ;;
-program-suffix=* | --program-suffix=* | --program-suffi=* \
| --program-suff=* | --program-suf=* | --program-su=* | --program-s=*)
program_suffix=$ac_optarg ;;
-program-transform-name | --program-transform-name \
| --program-transform-nam | --program-transform-na \
| --program-transform-n | --program-transform- \
| --program-transform | --program-transfor \
| --program-transfo | --program-transf \
| --program-trans | --program-tran \
| --progr-tra | --program-tr | --program-t)
ac_prev=program_transform_name ;;
-program-transform-name=* | --program-transform-name=* \
| --program-transform-nam=* | --program-transform-na=* \
| --program-transform-n=* | --program-transform-=* \
| --program-transform=* | --program-transfor=* \
| --program-transfo=* | --program-transf=* \
| --program-trans=* | --program-tran=* \
| --progr-tra=* | --program-tr=* | --program-t=*)
program_transform_name=$ac_optarg ;;
-pdfdir | --pdfdir | --pdfdi | --pdfd | --pdf | --pd)
ac_prev=pdfdir ;;
-pdfdir=* | --pdfdir=* | --pdfdi=* | --pdfd=* | --pdf=* | --pd=*)
pdfdir=$ac_optarg ;;
-psdir | --psdir | --psdi | --psd | --ps)
ac_prev=psdir ;;
-psdir=* | --psdir=* | --psdi=* | --psd=* | --ps=*)
psdir=$ac_optarg ;;
-q | -quiet | --quiet | --quie | --qui | --qu | --q \
| -silent | --silent | --silen | --sile | --sil)
silent=yes ;;
-sbindir | --sbindir | --sbindi | --sbind | --sbin | --sbi | --sb)
ac_prev=sbindir ;;
-sbindir=* | --sbindir=* | --sbindi=* | --sbind=* | --sbin=* \
| --sbi=* | --sb=*)
sbindir=$ac_optarg ;;
-sharedstatedir | --sharedstatedir | --sharedstatedi \
| --sharedstated | --sharedstate | --sharedstat | --sharedsta \
| --sharedst | --shareds | --shared | --share | --shar \
| --sha | --sh)
ac_prev=sharedstatedir ;;
-sharedstatedir=* | --sharedstatedir=* | --sharedstatedi=* \
| --sharedstated=* | --sharedstate=* | --sharedstat=* | --sharedsta=* \
| --sharedst=* | --shareds=* | --shared=* | --share=* | --shar=* \
| --sha=* | --sh=*)
sharedstatedir=$ac_optarg ;;
-site | --site | --sit)
ac_prev=site ;;
-site=* | --site=* | --sit=*)
site=$ac_optarg ;;
-srcdir | --srcdir | --srcdi | --srcd | --src | --sr)
ac_prev=srcdir ;;
-srcdir=* | --srcdir=* | --srcdi=* | --srcd=* | --src=* | --sr=*)
srcdir=$ac_optarg ;;
-sysconfdir | --sysconfdir | --sysconfdi | --sysconfd | --sysconf \
| --syscon | --sysco | --sysc | --sys | --sy)
ac_prev=sysconfdir ;;
-sysconfdir=* | --sysconfdir=* | --sysconfdi=* | --sysconfd=* | --sysconf=* \
| --syscon=* | --sysco=* | --sysc=* | --sys=* | --sy=*)
sysconfdir=$ac_optarg ;;
-target | --target | --targe | --targ | --tar | --ta | --t)
ac_prev=target_alias ;;
-target=* | --target=* | --targe=* | --targ=* | --tar=* | --ta=* | --t=*)
target_alias=$ac_optarg ;;
-v | -verbose | --verbose | --verbos | --verbo | --verb)
verbose=yes ;;
-version | --version | --versio | --versi | --vers | -V)
ac_init_version=: ;;
-with-* | --with-*)
ac_useropt=`expr "x$ac_option" : 'x-*with-\([^=]*\)'`
# Reject names that are not valid shell variable names.
expr "x$ac_useropt" : ".*[^-+._$as_cr_alnum]" >/dev/null &&
as_fn_error $? "invalid package name: $ac_useropt"
ac_useropt_orig=$ac_useropt
ac_useropt=`$as_echo "$ac_useropt" | sed 's/[-+.]/_/g'`
case $ac_user_opts in
*"
"with_$ac_useropt"
"*) ;;
*) ac_unrecognized_opts="$ac_unrecognized_opts$ac_unrecognized_sep--with-$ac_useropt_orig"
ac_unrecognized_sep=', ';;
esac
eval with_$ac_useropt=\$ac_optarg ;;
-without-* | --without-*)
ac_useropt=`expr "x$ac_option" : 'x-*without-\(.*\)'`
# Reject names that are not valid shell variable names.
expr "x$ac_useropt" : ".*[^-+._$as_cr_alnum]" >/dev/null &&
as_fn_error $? "invalid package name: $ac_useropt"
ac_useropt_orig=$ac_useropt
ac_useropt=`$as_echo "$ac_useropt" | sed 's/[-+.]/_/g'`
case $ac_user_opts in
*"
"with_$ac_useropt"
"*) ;;
*) ac_unrecognized_opts="$ac_unrecognized_opts$ac_unrecognized_sep--without-$ac_useropt_orig"
ac_unrecognized_sep=', ';;
esac
eval with_$ac_useropt=no ;;
--x)
# Obsolete; use --with-x.
with_x=yes ;;
-x-includes | --x-includes | --x-include | --x-includ | --x-inclu \
| --x-incl | --x-inc | --x-in | --x-i)
ac_prev=x_includes ;;
-x-includes=* | --x-includes=* | --x-include=* | --x-includ=* | --x-inclu=* \
| --x-incl=* | --x-inc=* | --x-in=* | --x-i=*)
x_includes=$ac_optarg ;;
-x-libraries | --x-libraries | --x-librarie | --x-librari \
| --x-librar | --x-libra | --x-libr | --x-lib | --x-li | --x-l)
ac_prev=x_libraries ;;
-x-libraries=* | --x-libraries=* | --x-librarie=* | --x-librari=* \
| --x-librar=* | --x-libra=* | --x-libr=* | --x-lib=* | --x-li=* | --x-l=*)
x_libraries=$ac_optarg ;;
-*) as_fn_error $? "unrecognized option: \`$ac_option'
Try \`$0 --help' for more information"
;;
*=*)
ac_envvar=`expr "x$ac_option" : 'x\([^=]*\)='`
# Reject names that are not valid shell variable names.
case $ac_envvar in #(
'' | [0-9]* | *[!_$as_cr_alnum]* )
as_fn_error $? "invalid variable name: \`$ac_envvar'" ;;
esac
eval $ac_envvar=\$ac_optarg
export $ac_envvar ;;
*)
# FIXME: should be removed in autoconf 3.0.
$as_echo "$as_me: WARNING: you should use --build, --host, --target" >&2
expr "x$ac_option" : ".*[^-._$as_cr_alnum]" >/dev/null &&
$as_echo "$as_me: WARNING: invalid host type: $ac_option" >&2
: "${build_alias=$ac_option} ${host_alias=$ac_option} ${target_alias=$ac_option}"
;;
esac
done
if test -n "$ac_prev"; then
ac_option=--`echo $ac_prev | sed 's/_/-/g'`
as_fn_error $? "missing argument to $ac_option"
fi
if test -n "$ac_unrecognized_opts"; then
case $enable_option_checking in
no) ;;
fatal) as_fn_error $? "unrecognized options: $ac_unrecognized_opts" ;;
*) $as_echo "$as_me: WARNING: unrecognized options: $ac_unrecognized_opts" >&2 ;;
esac
fi
# Check all directory arguments for consistency.
for ac_var in exec_prefix prefix bindir sbindir libexecdir datarootdir \
datadir sysconfdir sharedstatedir localstatedir includedir \
oldincludedir docdir infodir htmldir dvidir pdfdir psdir \
libdir localedir mandir
do
eval ac_val=\$$ac_var
# Remove trailing slashes.
case $ac_val in
*/ )
ac_val=`expr "X$ac_val" : 'X\(.*[^/]\)' \| "X$ac_val" : 'X\(.*\)'`
eval $ac_var=\$ac_val;;
esac
# Be sure to have absolute directory names.
case $ac_val in
[\\/$]* | ?:[\\/]* ) continue;;
NONE | '' ) case $ac_var in *prefix ) continue;; esac;;
esac
as_fn_error $? "expected an absolute directory name for --$ac_var: $ac_val"
done
# There might be people who depend on the old broken behavior: `$host'
# used to hold the argument of --host etc.
# FIXME: To remove some day.
build=$build_alias
host=$host_alias
target=$target_alias
# FIXME: To remove some day.
if test "x$host_alias" != x; then
if test "x$build_alias" = x; then
cross_compiling=maybe
elif test "x$build_alias" != "x$host_alias"; then
cross_compiling=yes
fi
fi
ac_tool_prefix=
test -n "$host_alias" && ac_tool_prefix=$host_alias-
test "$silent" = yes && exec 6>/dev/null
ac_pwd=`pwd` && test -n "$ac_pwd" &&
ac_ls_di=`ls -di .` &&
ac_pwd_ls_di=`cd "$ac_pwd" && ls -di .` ||
as_fn_error $? "working directory cannot be determined"
test "X$ac_ls_di" = "X$ac_pwd_ls_di" ||
as_fn_error $? "pwd does not report name of working directory"
# Find the source files, if location was not specified.
if test -z "$srcdir"; then
ac_srcdir_defaulted=yes
# Try the directory containing this script, then the parent directory.
ac_confdir=`$as_dirname -- "$as_myself" ||
$as_expr X"$as_myself" : 'X\(.*[^/]\)//*[^/][^/]*/*$' \| \
X"$as_myself" : 'X\(//\)[^/]' \| \
X"$as_myself" : 'X\(//\)$' \| \
X"$as_myself" : 'X\(/\)' \| . 2>/dev/null ||
$as_echo X"$as_myself" |
sed '/^X\(.*[^/]\)\/\/*[^/][^/]*\/*$/{
s//\1/
q
}
/^X\(\/\/\)[^/].*/{
s//\1/
q
}
/^X\(\/\/\)$/{
s//\1/
q
}
/^X\(\/\).*/{
s//\1/
q
}
s/.*/./; q'`
srcdir=$ac_confdir
if test ! -r "$srcdir/$ac_unique_file"; then
srcdir=..
fi
else
ac_srcdir_defaulted=no
fi
if test ! -r "$srcdir/$ac_unique_file"; then
test "$ac_srcdir_defaulted" = yes && srcdir="$ac_confdir or .."
as_fn_error $? "cannot find sources ($ac_unique_file) in $srcdir"
fi
ac_msg="sources are in $srcdir, but \`cd $srcdir' does not work"
ac_abs_confdir=`(
cd "$srcdir" && test -r "./$ac_unique_file" || as_fn_error $? "$ac_msg"
pwd)`
# When building in place, set srcdir=.
if test "$ac_abs_confdir" = "$ac_pwd"; then
srcdir=.
fi
# Remove unnecessary trailing slashes from srcdir.
# Double slashes in file names in object file debugging info
# mess up M-x gdb in Emacs.
case $srcdir in
*/) srcdir=`expr "X$srcdir" : 'X\(.*[^/]\)' \| "X$srcdir" : 'X\(.*\)'`;;
esac
for ac_var in $ac_precious_vars; do
eval ac_env_${ac_var}_set=\${${ac_var}+set}
eval ac_env_${ac_var}_value=\$${ac_var}
eval ac_cv_env_${ac_var}_set=\${${ac_var}+set}
eval ac_cv_env_${ac_var}_value=\$${ac_var}
done
#
# Report the --help message.
#
if test "$ac_init_help" = "long"; then
# Omit some internal or obsolete options to make the list less imposing.
# This message is too long to be a string in the A/UX 3.1 sh.
cat <<_ACEOF
\`configure' configures iprutils 2.4.18.1 to adapt to many kinds of systems.
Usage: $0 [OPTION]... [VAR=VALUE]...
To assign environment variables (e.g., CC, CFLAGS...), specify them as
VAR=VALUE. See below for descriptions of some of the useful variables.
Defaults for the options are specified in brackets.
Configuration:
-h, --help display this help and exit
--help=short display options specific to this package
--help=recursive display the short help of all the included packages
-V, --version display version information and exit
-q, --quiet, --silent do not print \`checking ...' messages
--cache-file=FILE cache test results in FILE [disabled]
-C, --config-cache alias for \`--cache-file=config.cache'
-n, --no-create do not create output files
--srcdir=DIR find the sources in DIR [configure dir or \`..']
Installation directories:
--prefix=PREFIX install architecture-independent files in PREFIX
[$ac_default_prefix]
--exec-prefix=EPREFIX install architecture-dependent files in EPREFIX
[PREFIX]
By default, \`make install' will install all the files in
\`$ac_default_prefix/bin', \`$ac_default_prefix/lib' etc. You can specify
an installation prefix other than \`$ac_default_prefix' using \`--prefix',
for instance \`--prefix=\$HOME'.
For better control, use the options below.
Fine tuning of the installation directories:
--bindir=DIR user executables [EPREFIX/bin]
--sbindir=DIR system admin executables [EPREFIX/sbin]
--libexecdir=DIR program executables [EPREFIX/libexec]
--sysconfdir=DIR read-only single-machine data [PREFIX/etc]
--sharedstatedir=DIR modifiable architecture-independent data [PREFIX/com]
--localstatedir=DIR modifiable single-machine data [PREFIX/var]
--libdir=DIR object code libraries [EPREFIX/lib]
--includedir=DIR C header files [PREFIX/include]
--oldincludedir=DIR C header files for non-gcc [/usr/include]
--datarootdir=DIR read-only arch.-independent data root [PREFIX/share]
--datadir=DIR read-only architecture-independent data [DATAROOTDIR]
--infodir=DIR info documentation [DATAROOTDIR/info]
--localedir=DIR locale-dependent data [DATAROOTDIR/locale]
--mandir=DIR man documentation [DATAROOTDIR/man]
--docdir=DIR documentation root [DATAROOTDIR/doc/iprutils]
--htmldir=DIR html documentation [DOCDIR]
--dvidir=DIR dvi documentation [DOCDIR]
--pdfdir=DIR pdf documentation [DOCDIR]
--psdir=DIR ps documentation [DOCDIR]
_ACEOF
cat <<\_ACEOF
Program names:
--program-prefix=PREFIX prepend PREFIX to installed program names
--program-suffix=SUFFIX append SUFFIX to installed program names
--program-transform-name=PROGRAM run sed PROGRAM on installed program names
System types:
--build=BUILD configure for building on BUILD [guessed]
--host=HOST cross-compile to build programs to run on HOST [BUILD]
_ACEOF
fi
if test -n "$ac_init_help"; then
case $ac_init_help in
short | recursive ) echo "Configuration of iprutils 2.4.18.1:";;
esac
cat <<\_ACEOF
Optional Features:
--disable-option-checking ignore unrecognized --enable/--with options
--disable-FEATURE do not include FEATURE (same as --enable-FEATURE=no)
--enable-FEATURE[=ARG] include FEATURE [ARG=yes]
--enable-silent-rules less verbose build output (undo: "make V=1")
--disable-silent-rules verbose build output (undo: "make V=0")
--enable-dependency-tracking
do not reject slow dependency extractors
--disable-dependency-tracking
speeds up one-time build
--enable-shared[=PKGS] build shared libraries [default=yes]
--enable-static[=PKGS] build static libraries [default=yes]
--enable-fast-install[=PKGS]
optimize for fast installation [default=yes]
--disable-libtool-lock avoid locking (might break parallel builds)
--enable-build-static Generate statically linked binaries
--enable-sosreport Install sosreport plugin
--enable-iprdumpfmt Install iprdumpfmt tool
Optional Packages:
--with-PACKAGE[=ARG] use PACKAGE [ARG=yes]
--without-PACKAGE do not use PACKAGE (same as --with-PACKAGE=no)
--with-pic[=PKGS] try to use only PIC/non-PIC objects [default=use
both]
--with-gnu-ld assume the C compiler uses GNU ld [default=no]
--with-sysroot=DIR Search for dependent libraries within DIR
(or the compiler's sysroot if not specified).
--without-systemd Disable systemd service files.
--with-initscripts Enable initd files.
Some influential environment variables:
CC C compiler command
CFLAGS C compiler flags
LDFLAGS linker flags, e.g. -L if you have libraries in a
nonstandard directory
LIBS libraries to pass to the linker, e.g. -l
CPPFLAGS (Objective) C/C++ preprocessor flags, e.g. -I if
you have headers in a nonstandard directory
CPP C preprocessor
PYTHON the Python interpreter
Use these variables to override the choices made by `configure' or to help
it to find libraries and programs with nonstandard names/locations.
Report bugs to .
_ACEOF
ac_status=$?
fi
if test "$ac_init_help" = "recursive"; then
# If there are subdirs, report their specific --help.
for ac_dir in : $ac_subdirs_all; do test "x$ac_dir" = x: && continue
test -d "$ac_dir" ||
{ cd "$srcdir" && ac_pwd=`pwd` && srcdir=. && test -d "$ac_dir"; } ||
continue
ac_builddir=.
case "$ac_dir" in
.) ac_dir_suffix= ac_top_builddir_sub=. ac_top_build_prefix= ;;
*)
ac_dir_suffix=/`$as_echo "$ac_dir" | sed 's|^\.[\\/]||'`
# A ".." for each directory in $ac_dir_suffix.
ac_top_builddir_sub=`$as_echo "$ac_dir_suffix" | sed 's|/[^\\/]*|/..|g;s|/||'`
case $ac_top_builddir_sub in
"") ac_top_builddir_sub=. ac_top_build_prefix= ;;
*) ac_top_build_prefix=$ac_top_builddir_sub/ ;;
esac ;;
esac
ac_abs_top_builddir=$ac_pwd
ac_abs_builddir=$ac_pwd$ac_dir_suffix
# for backward compatibility:
ac_top_builddir=$ac_top_build_prefix
case $srcdir in
.) # We are building in place.
ac_srcdir=.
ac_top_srcdir=$ac_top_builddir_sub
ac_abs_top_srcdir=$ac_pwd ;;
[\\/]* | ?:[\\/]* ) # Absolute name.
ac_srcdir=$srcdir$ac_dir_suffix;
ac_top_srcdir=$srcdir
ac_abs_top_srcdir=$srcdir ;;
*) # Relative name.
ac_srcdir=$ac_top_build_prefix$srcdir$ac_dir_suffix
ac_top_srcdir=$ac_top_build_prefix$srcdir
ac_abs_top_srcdir=$ac_pwd/$srcdir ;;
esac
ac_abs_srcdir=$ac_abs_top_srcdir$ac_dir_suffix
cd "$ac_dir" || { ac_status=$?; continue; }
# Check for guested configure.
if test -f "$ac_srcdir/configure.gnu"; then
echo &&
$SHELL "$ac_srcdir/configure.gnu" --help=recursive
elif test -f "$ac_srcdir/configure"; then
echo &&
$SHELL "$ac_srcdir/configure" --help=recursive
else
$as_echo "$as_me: WARNING: no configuration information is in $ac_dir" >&2
fi || ac_status=$?
cd "$ac_pwd" || { ac_status=$?; break; }
done
fi
test -n "$ac_init_help" && exit $ac_status
if $ac_init_version; then
cat <<\_ACEOF
iprutils configure 2.4.18.1
generated by GNU Autoconf 2.69
Copyright (C) 2012 Free Software Foundation, Inc.
This configure script is free software; the Free Software Foundation
gives unlimited permission to copy, distribute and modify it.
_ACEOF
exit
fi
## ------------------------ ##
## Autoconf initialization. ##
## ------------------------ ##
# ac_fn_c_try_compile LINENO
# --------------------------
# Try to compile conftest.$ac_ext, and return whether this succeeded.
ac_fn_c_try_compile ()
{
as_lineno=${as_lineno-"$1"} as_lineno_stack=as_lineno_stack=$as_lineno_stack
rm -f conftest.$ac_objext
if { { ac_try="$ac_compile"
case "(($ac_try" in
*\"* | *\`* | *\\*) ac_try_echo=\$ac_try;;
*) ac_try_echo=$ac_try;;
esac
eval ac_try_echo="\"\$as_me:${as_lineno-$LINENO}: $ac_try_echo\""
$as_echo "$ac_try_echo"; } >&5
(eval "$ac_compile") 2>conftest.err
ac_status=$?
if test -s conftest.err; then
grep -v '^ *+' conftest.err >conftest.er1
cat conftest.er1 >&5
mv -f conftest.er1 conftest.err
fi
$as_echo "$as_me:${as_lineno-$LINENO}: \$? = $ac_status" >&5
test $ac_status = 0; } && {
test -z "$ac_c_werror_flag" ||
test ! -s conftest.err
} && test -s conftest.$ac_objext; then :
ac_retval=0
else
$as_echo "$as_me: failed program was:" >&5
sed 's/^/| /' conftest.$ac_ext >&5
ac_retval=1
fi
eval $as_lineno_stack; ${as_lineno_stack:+:} unset as_lineno
as_fn_set_status $ac_retval
} # ac_fn_c_try_compile
# ac_fn_c_try_link LINENO
# -----------------------
# Try to link conftest.$ac_ext, and return whether this succeeded.
ac_fn_c_try_link ()
{
as_lineno=${as_lineno-"$1"} as_lineno_stack=as_lineno_stack=$as_lineno_stack
rm -f conftest.$ac_objext conftest$ac_exeext
if { { ac_try="$ac_link"
case "(($ac_try" in
*\"* | *\`* | *\\*) ac_try_echo=\$ac_try;;
*) ac_try_echo=$ac_try;;
esac
eval ac_try_echo="\"\$as_me:${as_lineno-$LINENO}: $ac_try_echo\""
$as_echo "$ac_try_echo"; } >&5
(eval "$ac_link") 2>conftest.err
ac_status=$?
if test -s conftest.err; then
grep -v '^ *+' conftest.err >conftest.er1
cat conftest.er1 >&5
mv -f conftest.er1 conftest.err
fi
$as_echo "$as_me:${as_lineno-$LINENO}: \$? = $ac_status" >&5
test $ac_status = 0; } && {
test -z "$ac_c_werror_flag" ||
test ! -s conftest.err
} && test -s conftest$ac_exeext && {
test "$cross_compiling" = yes ||
test -x conftest$ac_exeext
}; then :
ac_retval=0
else
$as_echo "$as_me: failed program was:" >&5
sed 's/^/| /' conftest.$ac_ext >&5
ac_retval=1
fi
# Delete the IPA/IPO (Inter Procedural Analysis/Optimization) information
# created by the PGI compiler (conftest_ipa8_conftest.oo), as it would
# interfere with the next link command; also delete a directory that is
# left behind by Apple's compiler. We do this before executing the actions.
rm -rf conftest.dSYM conftest_ipa8_conftest.oo
eval $as_lineno_stack; ${as_lineno_stack:+:} unset as_lineno
as_fn_set_status $ac_retval
} # ac_fn_c_try_link
# ac_fn_c_check_header_compile LINENO HEADER VAR INCLUDES
# -------------------------------------------------------
# Tests whether HEADER exists and can be compiled using the include files in
# INCLUDES, setting the cache variable VAR accordingly.
ac_fn_c_check_header_compile ()
{
as_lineno=${as_lineno-"$1"} as_lineno_stack=as_lineno_stack=$as_lineno_stack
{ $as_echo "$as_me:${as_lineno-$LINENO}: checking for $2" >&5
$as_echo_n "checking for $2... " >&6; }
if eval \${$3+:} false; then :
$as_echo_n "(cached) " >&6
else
cat confdefs.h - <<_ACEOF >conftest.$ac_ext
/* end confdefs.h. */
$4
#include <$2>
_ACEOF
if ac_fn_c_try_compile "$LINENO"; then :
eval "$3=yes"
else
eval "$3=no"
fi
rm -f core conftest.err conftest.$ac_objext conftest.$ac_ext
fi
eval ac_res=\$$3
{ $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_res" >&5
$as_echo "$ac_res" >&6; }
eval $as_lineno_stack; ${as_lineno_stack:+:} unset as_lineno
} # ac_fn_c_check_header_compile
# ac_fn_c_try_cpp LINENO
# ----------------------
# Try to preprocess conftest.$ac_ext, and return whether this succeeded.
ac_fn_c_try_cpp ()
{
as_lineno=${as_lineno-"$1"} as_lineno_stack=as_lineno_stack=$as_lineno_stack
if { { ac_try="$ac_cpp conftest.$ac_ext"
case "(($ac_try" in
*\"* | *\`* | *\\*) ac_try_echo=\$ac_try;;
*) ac_try_echo=$ac_try;;
esac
eval ac_try_echo="\"\$as_me:${as_lineno-$LINENO}: $ac_try_echo\""
$as_echo "$ac_try_echo"; } >&5
(eval "$ac_cpp conftest.$ac_ext") 2>conftest.err
ac_status=$?
if test -s conftest.err; then
grep -v '^ *+' conftest.err >conftest.er1
cat conftest.er1 >&5
mv -f conftest.er1 conftest.err
fi
$as_echo "$as_me:${as_lineno-$LINENO}: \$? = $ac_status" >&5
test $ac_status = 0; } > conftest.i && {
test -z "$ac_c_preproc_warn_flag$ac_c_werror_flag" ||
test ! -s conftest.err
}; then :
ac_retval=0
else
$as_echo "$as_me: failed program was:" >&5
sed 's/^/| /' conftest.$ac_ext >&5
ac_retval=1
fi
eval $as_lineno_stack; ${as_lineno_stack:+:} unset as_lineno
as_fn_set_status $ac_retval
} # ac_fn_c_try_cpp
# ac_fn_c_try_run LINENO
# ----------------------
# Try to link conftest.$ac_ext, and return whether this succeeded. Assumes
# that executables *can* be run.
ac_fn_c_try_run ()
{
as_lineno=${as_lineno-"$1"} as_lineno_stack=as_lineno_stack=$as_lineno_stack
if { { ac_try="$ac_link"
case "(($ac_try" in
*\"* | *\`* | *\\*) ac_try_echo=\$ac_try;;
*) ac_try_echo=$ac_try;;
esac
eval ac_try_echo="\"\$as_me:${as_lineno-$LINENO}: $ac_try_echo\""
$as_echo "$ac_try_echo"; } >&5
(eval "$ac_link") 2>&5
ac_status=$?
$as_echo "$as_me:${as_lineno-$LINENO}: \$? = $ac_status" >&5
test $ac_status = 0; } && { ac_try='./conftest$ac_exeext'
{ { case "(($ac_try" in
*\"* | *\`* | *\\*) ac_try_echo=\$ac_try;;
*) ac_try_echo=$ac_try;;
esac
eval ac_try_echo="\"\$as_me:${as_lineno-$LINENO}: $ac_try_echo\""
$as_echo "$ac_try_echo"; } >&5
(eval "$ac_try") 2>&5
ac_status=$?
$as_echo "$as_me:${as_lineno-$LINENO}: \$? = $ac_status" >&5
test $ac_status = 0; }; }; then :
ac_retval=0
else
$as_echo "$as_me: program exited with status $ac_status" >&5
$as_echo "$as_me: failed program was:" >&5
sed 's/^/| /' conftest.$ac_ext >&5
ac_retval=$ac_status
fi
rm -rf conftest.dSYM conftest_ipa8_conftest.oo
eval $as_lineno_stack; ${as_lineno_stack:+:} unset as_lineno
as_fn_set_status $ac_retval
} # ac_fn_c_try_run
# ac_fn_c_check_func LINENO FUNC VAR
# ----------------------------------
# Tests whether FUNC exists, setting the cache variable VAR accordingly
ac_fn_c_check_func ()
{
as_lineno=${as_lineno-"$1"} as_lineno_stack=as_lineno_stack=$as_lineno_stack
{ $as_echo "$as_me:${as_lineno-$LINENO}: checking for $2" >&5
$as_echo_n "checking for $2... " >&6; }
if eval \${$3+:} false; then :
$as_echo_n "(cached) " >&6
else
cat confdefs.h - <<_ACEOF >conftest.$ac_ext
/* end confdefs.h. */
/* Define $2 to an innocuous variant, in case