/* * Stonith module for IBM pSeries Hardware Management Console (HMC) * * Author: Huang Zhen <zhenh@cn.ibm.com> * * Copyright (c) 2004 International Business Machines * * This library is free software; you can redistribute it and/or * modify it under the terms of the GNU Lesser General Public * License as published by the Free Software Foundation; either * version 2.1 of the License, or (at your option) any later version. *  * This library 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 * Lesser General Public License for more details. *  * You should have received a copy of the GNU Lesser General Public * License along with this library; if not, write to the Free Software * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA * *//* * * This code has been test in following environment * *	p630 7028-6C4 two LPAR partitions *	p650 7038-6M2 one LPAR partition and FullSystemPartition * *	Hardware Management Console (HMC): Release 3, Version 2.4 * *	Both FullSystemPartition and LPAR Partition are tested. * *	Note:  Only SSH access to the HMC devices are supported. * * * This is a nice start on this STONITH plugin, but it's not quite done yet ;-) * * Current deficiencies: * *	- The user has to provide a list of partitions and/or system names *		on the command line, when we should grab this information *		from the HMC ourselves... * *	- The user has to tell us whether the system is partitioned or not * *	- All systems either have to be partitioned or none can be * *	- We don't have a "status" command that will verify that we're *		configured correctly. * *	- I don't think the on/off/reset commands are done quite right yet... * *	- We don't capture the firmware version of the HMC itself. *		We'll probably eventually need that... * * * This command would make a nice status command: * *	lshmc -r -F ssh * * The following command will get the list of systems we control and their mode * *	lssyscfg -r sys -F name:mode --all * *		0 indicates full system partition *	      255 indicates the system is partitioned * * The following command will get the list of partitions for a given * managed system running partitioned: * *	lssyscfg -m managed-system-name -r lpar -F name:boot_mode --all * *b	Note that we should probably only consider partitions whose boot mode is  *	normal (1).  (that's my guess, anyway...) * * * ON/OFF/RESET COMMANDS: * *	FULL SYSTEM: *	  reset:	chsysstate -m managedsystem -r sys -o reset *	  on:	chsysstate -m managedsystem -r sys -o on *	  off:	chsysstate -m managedsystem -r sys -o off * *	Partitioned SYSTEM: *	  on:	chsysstate -m managedsystem -r lpar -p partition-name -o on *				(or maybe reset_partition -t hard) *	  off:	chsysstate -m managedsystem -r lpar -p partition-name -o off *				(or maybe start_partition) *	  reset:	do off action above, followed by "on" action... * * * Of course, to do all this, we need to track which partition name goes with which * managed system's name, and which systems on the HMC are partitioned and which * ones aren't... * * Note that the commands above are just reasonable guesses at the right commands. * */#define DEVICE "IBM HMC Device"#include "stonith_plugin_common.h"#ifndef	SSH_CMD#	define SSH_CMD	"ssh"#endif#ifndef	HMCROOT#	define HMCROOT	"hscroot"#endif#define PIL_PLUGIN              ibmhmc#define PIL_PLUGIN_S            "ibmhmc"#define PIL_PLUGINLICENSE 	LICENSE_LGPL#define PIL_PLUGINLICENSEURL 	URL_LGPL#include <pils/plugin.h>#define MAX_HOST_NAME_LEN	(256*4)#define MAX_CMD_LEN		1024#define FULLSYSTEMPARTITION	"FullSystemPartition"#define MAX_POWERON_RETRY	10#define MAX_SYS_NUM		64#define MAX_LPAR_NUM		256#define MAX_HMC_NAME_LEN	256#define HMCURL	"http://publib-b.boulder.ibm.com/Redbooks.nsf/RedbookAbstracts"\		"/SG247038.html"static StonithPlugin *	ibmhmc_new(void);static void		ibmhmc_destroy(StonithPlugin *);static const char *	ibmhmc_getinfo(StonithPlugin * s, int InfoType);static const char**	ibmhmc_get_confignames(StonithPlugin* p);static int		ibmhmc_status(StonithPlugin * );static int		ibmhmc_reset_req(StonithPlugin * s,int request,const char* host);static char **		ibmhmc_hostlist(StonithPlugin  *);static int		ibmhmc_set_config(StonithPlugin *, StonithNVpair*);static char* do_shell_cmd(const char* cmd, int* status);static int check_hmc_status(const char* hmc);/* static char* do_shell_cmd_fake(const char* cmd, int* status); */static struct stonith_ops ibmhmcOps = {	ibmhmc_new,		/* Create new STONITH object	*/	ibmhmc_destroy,		/* Destroy STONITH object	*/	ibmhmc_getinfo,		/* Return STONITH info string	*/	ibmhmc_get_confignames,	/* Return configuration parameters */	ibmhmc_set_config,      /* Set configuration            */	ibmhmc_status,		/* Return STONITH device status	*/	ibmhmc_reset_req,	/* Request a reset */	ibmhmc_hostlist,	/* Return list of supported hosts */};PIL_PLUGIN_BOILERPLATE2("1.0", Debug)static const PILPluginImports*  PluginImports;static PILPlugin*               OurPlugin;static PILInterface*		OurInterface;static StonithImports*		OurImports;static void*			interfprivate;PIL_rcPIL_PLUGIN_INIT(PILPlugin*us, const PILPluginImports* imports);PIL_rcPIL_PLUGIN_INIT(PILPlugin*us, const PILPluginImports* imports){	/* Force the compiler to do a little type checking */	(void)(PILPluginInitFun)PIL_PLUGIN_INIT;	PluginImports = imports;	OurPlugin = us;	/* Register ourself as a plugin */	imports->register_plugin(us, &OurPIExports);  	/*  Register our interface implementation */ 	return imports->register_interface(us, PIL_PLUGINTYPE_S	,	PIL_PLUGIN_S	,	&ibmhmcOps	,	NULL		/*close */	,	&OurInterface	,	(void*)&OurImports	,	&interfprivate); }struct pluginDevice {		StonithPlugin		sp;	const char *		pluginid;	char *			hmc;	GList*		 	hostlist;};static const char * pluginid = 	"pluginDevice-Stonith";static const char * NOTpluginID = "This has been destroyed (HMC Dev)";static intibmhmc_status(StonithPlugin  *s){	struct pluginDevice* dev = NULL;		if(Debug){		LOG(PIL_DEBUG , "%s : called\n" , __FUNCTION__);	}	ERRIFWRONGDEV(s,S_OOPS);	dev = (struct pluginDevice*) s;		return check_hmc_status(dev->hmc);}/* *	Return the list of hosts configured for this HMC device */static char **ibmhmc_hostlist(StonithPlugin  *s){	int j;	struct pluginDevice* dev;	int numnames = 0;	char** ret = NULL;	GList* node = NULL;	if(Debug){		LOG(PIL_DEBUG, "%s : called\n" , __FUNCTION__);	}	ERRIFWRONGDEV(s,NULL);	dev = (struct pluginDevice*) s;	numnames = g_list_length(dev->hostlist);	if (numnames<0) {		LOG( PIL_CRIT		,	"unconfigured stonith object in ibmhmc_list_hosts");		return(NULL);	}	ret = (char **)MALLOC((numnames+1)*sizeof(char*));	if (ret == NULL) {		LOG( PIL_CRIT, "out of memory");		return ret;	}	memset(ret, 0, (numnames+1)*sizeof(char*));	for (node=g_list_first(dev->hostlist), j=0	;	NULL != node	;	j++, node = g_list_next(node))	{		char* host = (char*)node->data;		ret[j] = STRDUP(host);	}	return ret;}/* *	Parse the config information, and stash it away... */static intibmhmc_parse_config_info(struct pluginDevice* dev, const char* info){	int i, j, status;	char* output = NULL;	char get_syslist[MAX_CMD_LEN];	char host[MAX_HOST_NAME_LEN];	gchar** syslist = NULL;	gchar** name_mode = NULL;	char get_lpar[MAX_CMD_LEN];	gchar** lparlist = NULL;	if(Debug){		LOG(PIL_DEBUG , "%s called,info=%s\n" , __FUNCTION__,info);	}	if ( info == NULL || strlen(info) == 0 ){		return S_BADCONFIG;	}		/*check whether the HMC is enable ssh command */	if (check_hmc_status(info) != S_OK) {		return S_BADCONFIG;	}			/*get the managed system's names of the hmc */	snprintf(get_syslist, MAX_CMD_LEN,		 SSH_CMD " -l " HMCROOT		 " %s lssyscfg -r sys -F name:mode --all", info);	if(Debug){		LOG(PIL_DEBUG , "%s: get_syslist=%s" , __FUNCTION__ , 		    get_syslist);	}	output = do_shell_cmd(get_syslist, &status);	syslist = g_strsplit(output, "\n", MAX_SYS_NUM);	FREE(output);	/* for each managed system */	for (i = 0; i < MAX_SYS_NUM; i++) {		if (syslist[i] == NULL) {			break;		}		name_mode = g_strsplit(syslist[i],":",2);		if(Debug){			LOG(PIL_DEBUG , "%s: name_mode0 = %s,name_mode1=%s\n"			    , __FUNCTION__ , name_mode[0] , name_mode[1]);		}		/* if it is in fullsystempartition */		if (NULL!=name_mode[1] && 0==strncmp(name_mode[1],"0",1)) {			/* add the FullSystemPartition */			snprintf(host,MAX_HOST_NAME_LEN,				 "%s/FullSystemPartition", name_mode[0]);			dev->hostlist = g_list_append(dev->hostlist 						      ,STRDUP(host));		}		else		/* if it is in lpar */		if (NULL!=name_mode[1] && 0==strncmp(name_mode[1],"255",3)) {			/* get its lpars */			snprintf(get_lpar, MAX_CMD_LEN,				 SSH_CMD " -l " HMCROOT				 " %s lssyscfg -m %s -r lpar -F name --all",				 info, name_mode[0]);			if(Debug){				LOG(PIL_DEBUG, "%s: get_lpar = %s\n"				    , __FUNCTION__ , get_lpar);			}			output = do_shell_cmd(get_lpar,&status);			lparlist = g_strsplit(output, "\n",MAX_LPAR_NUM);			FREE(output);			/* for each lpar */			for (j=0; j<MAX_LPAR_NUM; j++) {				if (NULL==lparlist[j]) {					break;				}				/* skip the full system partition */				if (0 == strncmp(lparlist[j],						 FULLSYSTEMPARTITION,						 strlen(FULLSYSTEMPARTITION))) {					continue;				}				/* add the lpar */				snprintf(host,MAX_HOST_NAME_LEN,					 "%s/%s", name_mode[0],lparlist[j]);				dev->hostlist = g_list_append(  dev->hostlist							      , STRDUP(host));			}			g_strfreev(lparlist);		}		g_strfreev(name_mode);	}	g_strfreev(syslist);	dev->hmc = STRDUP(info);		return S_OK;}static const char**     ibmhmc_get_confignames(StonithPlugin* p){	static const char * names[] =  { ST_HOSTLIST, NULL};	if (Debug) {