diff options
| author | Jörg Frings-Fürst <debian@jff-webhosting.net> | 2014-07-06 18:04:32 +0200 |
|---|---|---|
| committer | Jörg Frings-Fürst <debian@jff-webhosting.net> | 2014-07-06 18:04:32 +0200 |
| commit | a7f89980e5b3f4b9a74c70dbc5ffe8aabd28be28 (patch) | |
| tree | 41c4deec1fdfbafd7821b4ca7a9772ac0abd92f5 /util/iconfig.c | |
Imported Upstream version 2.9.3upstream/2.9.3
Diffstat (limited to 'util/iconfig.c')
| -rw-r--r-- | util/iconfig.c | 2680 |
1 files changed, 2680 insertions, 0 deletions
diff --git a/util/iconfig.c b/util/iconfig.c new file mode 100644 index 0000000..0bb54e9 --- /dev/null +++ b/util/iconfig.c @@ -0,0 +1,2680 @@ +/*--------------------------------------------------------------------------- + * Filename: iconfig.c (was bmcconfig.c) + * + * Author: arcress at users.sourceforge.net + * Copyright (c) 2009 Kontron America, Inc. + * + * Abstract: + * This tool saves and restores the BMC Configuration parameters. + * This includes BMC PEF, LAN, Serial, User, Channel, and SOL parameters. + * + * ----------- Change History ----------------------------------------------- + * 08/18/08 Andy Cress - created from pefconfig.c + */ +/*M* + *--------------------------------------------------------------------------- +Copyright (c) 2009 Kontron America, Inc. +All rights reserved. + +Redistribution and use in source and binary forms, with or without +modification, are permitted provided that the following conditions are met: + + a.. Redistributions of source code must retain the above copyright notice, + this list of conditions and the following disclaimer. + b.. Redistributions in binary form must reproduce the above copyright notice, + this list of conditions and the following disclaimer in the documentation + and/or other materials provided with the distribution. + c.. Neither the name of Kontron nor the names of its contributors + may be used to endorse or promote products derived from this software + without specific prior written permission. + +THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS" AND +ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED +WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE +DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE LIABLE FOR +ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES +(INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; +LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 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 OF THIS +SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. + *--------------------------------------------------------------------------- + *M*/ +#ifdef WIN32 +#include <winsock2.h> +#include <iphlpapi.h> +#include <windows.h> +#include <stdio.h> +#include <string.h> +#include <stdlib.h> +#include "getopt.h" +#elif defined(DOS) +#include <dos.h> +#include <stdio.h> +#include <stdlib.h> +#include <string.h> +#include "getopt.h" +#else +#include <stdio.h> +#include <stdlib.h> +#include <unistd.h> +#include <sys/types.h> +#include <sys/stat.h> +#include <fcntl.h> +#if defined(HPUX) +/* getopt is defined in stdio.h */ +#elif defined(MACOS) +/* getopt is defined in unistd.h */ +#include <unistd.h> +#else +#include <getopt.h> +#endif +#include <string.h> +#include <sys/socket.h> +#include <sys/ioctl.h> +#include <net/if.h> +#include <errno.h> +#endif +#ifdef SOLARIS +#include <sys/sockio.h> +#define SIOCGIFHWADDR SIOCGENADDR +#define ifr_netmask ifr_ifru.ifru_addr +#elif defined(BSD) +#include <sys/sockio.h> +#define SIOCGIFHWADDR SIOCGIFMAC +#define ifr_netmask ifr_ifru.ifru_addr +#elif defined(MACOS) +#include <sys/sockio.h> +// #define SIOCGIFHWADDR SIOCGIFMAC +#define ifr_netmask ifr_ifru.ifru_addr +#endif +#include "ipmicmd.h" +#include "oem_intel.h" + +extern int find_ifname(char *ifname); /*see idiscover.c*/ +/* atoip was moved to subs.c, defined in ipmicmd.h */ + +#define SELprintf printf +#define RTF_UP 0x0001 /* route usable */ + +#define SOL_ENABLE_FLAG 0x01 +#define SOL_DISABLE_FLAG 0x00 +#define SOL_PRIVILEGE_LEVEL_USER 0x02 +#define SOL_PREFERRED_BAUD_RATE 0x07 /*19.2k*/ +/* For IPMI 1.5, use Intel SOL commands & subfunctions */ +#define SOL_ENABLE_PARAM 0x01 +#define SOL_AUTHENTICATION_PARAM 0x02 +#define SOL_ACC_INTERVAL_PARAM 0x03 +#define SOL_RETRY_PARAM 0x04 +#define SOL_BAUD_RATE_PARAM 0x05 /*non-volatile*/ +#define SOL_VOL_BAUD_RATE_PARAM 0x06 /*volatile*/ +/* For IPMI 2.0, use IPMI SOL commands & subfunctions */ +#define SOL_ENABLE_PARAM2 0x08 +#define SOL_AUTHENTICATION_PARAM2 0x09 +#define SOL_BAUD_RATE_PARAM2 0x11 + +/* IPMI 2.0 SOL PAYLOAD commands */ +#define SET_PAYLOAD_ACCESS 0x4C +#define GET_PAYLOAD_ACCESS 0x4D +#define GET_PAYLOAD_SUPPORT 0x4E + +/* Channel Access values */ +#define CHAN_ACC_DISABLE 0x20 /* PEF off, disabled*/ +#define CHAN_ACC_PEFON 0x02 /* PEF on, always avail */ +#define CHAN_ACC_PEFOFF 0x22 /* PEF off, always avail*/ +/* special channel access values for ia64 */ +#define CHAN_ACC_PEFON64 0x0A /* PEF on, always avail, UserLevelAuth=off */ +#define CHAN_ACC_PEFOFF64 0x2A /* PEF off, always avail, UserLevelAuth=off */ + + /* TSRLT2/TIGPR2U Channels: 0=IPMB, 1=Serial/EMP, 6=LAN2, 7=LAN1 */ + /* S5000/other Channels: 1=LAN1, 2=LAN2, 3=LAN3, 4=Serial, 6=pci, 7=sys */ +#define LAN_CH 1 +#define SER_CH 4 +#define MAXCHAN 12 /*was 16, reduced for gnu ipmi_lan*/ +#define NUM_DEVICES_TO_CHECK 32 /*for GetBmcEthDevice()*/ +#define MAC_LEN 6 /*length of MAC Address*/ +#define PSW_LEN 16 /*see also PSW_MAX=20 in ipmicmd.h*/ +#define MAXPEF 41 /* max pefnum offset = 40 (41 entries) */ + + /* IP address source values */ +#define SRC_STATIC 0x01 +#define SRC_DHCP 0x02 /* BMC running DHCP */ +#define SRC_BIOS 0x03 /* BIOS, sometimes DHCP */ +#define SRC_OTHER 0x04 + +/* PEF event severities */ +#define PEF_SEV_UNSPEC 0x00 +#define PEF_SEV_MON 0x01 +#define PEF_SEV_INFO 0x02 +#define PEF_SEV_OK 0x04 +#define PEF_SEV_WARN 0x08 +#define PEF_SEV_CRIT 0x10 +#define PEF_SEV_NORECOV 0x20 + +typedef struct +{ /* See IPMI Table 15-2 */ + uchar rec_id; + uchar fconfig; + uchar action; + uchar policy; + uchar severity; + uchar genid1; + uchar genid2; + uchar sensor_type; + uchar sensor_no; + uchar event_trigger; + uchar data1; + uchar mask1; + uchar res[9]; +} PEF_RECORD; + +/* + * Global variables + */ +static char * progver = "2.93"; +static char * progname = "iconfig"; +static char fdebug = 0; +static char fipmilan = 0; +static FILE * fd_bmc = NULL; +static char fIPMI10 = 0; /* =1 if IPMI v1.0 or less */ +static char fIPMI20 = 0; /* =1 if IPMI v2.0 or greater */ +static char fSOL20 = 1; /* =1 if SOL v2.0 is ok */ +static char freadonly = 1; /* =1 to only read LAN & PEF parameters */ +static char func = 'd'; /* function: display, save, restore */ +static char fdomac = 0; /* =1 to restore MAC also */ +static char fpassword = 0; /* =1 user-specified a password, so set it. */ +static uchar fmBMC = 0; +static uchar fiBMC = 0; +static uchar fRomley = 0; +static char fipv6 = 0; +static char fcanonical = 0; +static char fchan2wart = 0; /* =1 if need wart to skip channel 2 */ +static char bdelim = BCOLON; /*':' as default*/ +static char bcomment = BCOMMENT; /* '#' */ +static char pefmax = MAXPEF; /* 20 for Sahalee, 30 for miniBMC */ +static int nerrs = 0; +static int ngood = 0; +static int lasterr = 0; +static uchar nusers = 5; +static uchar max_users = 5; +static uchar enabled_users = 0; +static uchar last_user_enable = 0; /* last user enabled */ +static uchar passwordData[16]; +static uchar fsetifn = 0; +static ushort setsolcmd; +static ushort getsolcmd; +static uchar sol_bchan = 0; +static uchar authmask = 0; +static uchar lan_access = 0x04; /* see SetPassword*/ + +static uchar pefnum = 12; +static uchar fsharedMAC = 0; +//static uchar alertnum = 1; +//static uchar rgdestip[4]; +static uchar rgdestmac[6]; +static uchar rggwymac[6]; +#ifdef WIN32 +static uchar rggwyip[4] = {0,0,0,0}; +static uchar rgmyip [4] = {0,0,0,0}; /*WIN32*/ +static uchar rgmymac[6] = {0xFF,0,0,0,0,0}; /*WIN32*/ +static uchar rgsubnet[4] = {0,0,0,0}; /*WIN32*/ +static uchar osmyip[4] = {0,0,0,0}; +static uchar osmymac[6] = {0xff,0,0,0,0,0}; +#endif +static uchar bmcmyip[4] = {0,0,0,0}; +static uchar bmcdestip[4] = {0,0,0,0}; +static uchar bmcmymac[6] = {0xFF,0,0,0,0,0}; +static char ifname[16] = "eth0"; /* interface name */ +static char ifname0[16] = "eth0"; /* first interface name */ +static char ifpattn[14] = "eth"; /* default, discovered via find_ifname */ +static int vend_id; +static int prod_id; +static uchar ser_ch = 0; /*was SER_CH==4*/ +static uchar lan_ch = LAN_CH; +static uchar lan_ch_parm = 0xff; +static uchar lan_ch_sav = 0xff; +static uchar gcm_ch = 0; +static uchar SessInfo[16]; +static uchar chan_type[MAXCHAN]; +static int nlans = 0; +#define MAX_PEFPARAMS 14 /* max pef params = 14 */ +static char **pefdesc; +static char *pefdesc1[MAXPEF] = { /* for Sahalee BMC */ +/* 0 0x00 */ "", +/* 1 0x01 */ "Temperature Sensor", +/* 2 0x02 */ "Voltage Sensor", +/* 3 0x04 */ "Fan Failure", +/* 4 0x05 */ "Chassis Intrusion", +/* 5 0x08 */ "Power Supply Fault", +/* 6 0x0c */ "Memory ECC Error", +/* 7 0x0f */ "FRB Failure", +/* 8 0x07 */ "BIOS POST Error", +/* 9 0x13 */ "Fatal NMI", +/*10 0x23 */ "Watchdog Timer Reset", +/*11 0x12 */ "System Restart", +/*12 0x20 */ "OS Critical Stop", +/*13 0x09 */ "Power Redundancy Lost", +/*14 0x00 */ "reserved", +/*15 0x00 */ "reserved", +/*16 0x00 */ "reserved", +/*17 */ "reserved", +/*18 */ "reserved", +/*19 */ "reserved", +/*20 */ "reserved", +/*21 */ "reserved", +/*22 */ "reserved", +/*23 */ "reserved", +/*24 */ "reserved", +/*25 */ "reserved", +/*26 */ "reserved", +/*27 */ "reserved", +/*28 */ "reserved", +/*29 */ "unused", +/*30 */ "unused" }; + +static char *pefdesc2[MAXPEF] = { /* for NSC miniBMC */ +/* 0 */ "", +/* 1 0x02*/ "Voltage Sensor Assert", +/* 2 0x23*/ "Watchdog FRB Timeout", /* was "Proc FRB Thermal", */ +/* 3 0x02*/ "Voltage Sensor Deassert", +/* 4 0x07*/ "Proc1 IERR", +/* 5 0xff*/ "Digital Sensor OK", +/* 6 0x14*/ "Chassis Identify", +/* 7 0x13*/ "NMI Button", +/* 8 0x14*/ "Clear CMOS via Panel", +/* 9 0x0f*/ "OS Load POST Code", +/*10 0x20*/ "OS Critical Stop", +/*11 0x09 */ "Power Redundancy Lost", +/*12 0x00*/ "reserved", +/*13 */ "reserved", +/*14 */ "reserved", +/*15 */ "reserved", +/*16 */ "reserved", +/*17 */ "reserved", +/*18 */ "reserved", +/*19 */ "reserved", +/*20 */ "reserved", +/*21 */ "reserved", +/*22 */ "reserved", +/*23 */ "reserved", +/*24 */ "reserved", +/*25 */ "reserved", +/*26 0x05*/ "Chassis Intrusion", +/*27 0x0f*/ "POST Code Error", +/*28 0x02*/ "Voltage Failure", +/*29 0x04*/ "Fan Failure", +/*30 0x01*/ "Temperature Failure"}; + +#define NLAN 39 +static struct { + int cmd; + int sz; + char desc[28]; +} lanparams[NLAN] = { /* see IPMI Table 19-4 */ + /* 0 */ { 0, 1, "Set in progress"}, + /* 1 */ { 1, 1, "Auth type support"}, + /* 2 */ { 2, 5, "Auth type enables"}, + /* 3 */ { 3, 4, "IP address"}, + /* 4 */ { 4, 1, "IP addr src"}, /* (DHCP/Static) */ + /* 5 */ { 5, 6, "MAC addr"}, + /* 6 */ { 6, 4, "Subnet mask"}, + /* 7 */ { 7, 3, "IPv4 header"}, + /* 8 */ { 8, 2, "Prim RMCP port"}, + /* 9 */ { 9, 2, "Sec RMCP port"}, + /* 10 */ {10, 1, "BMC grat ARP"}, + /* 11 */ {11, 1, "grat ARP interval"}, + /* 12 */ {12, 4, "Def gateway IP"}, + /* 13 */ {13, 6, "Def gateway MAC"}, + /* 14 */ {14, 4, "Sec gateway IP"}, + /* 15 */ {15, 6, "Sec gateway MAC"}, + /* 16 */ {16,18, "Community string"}, + /* 17 */ {17, 1, "Num dest"}, + /* 18 */ {18, 5, "Dest type"}, + /* 19 */ {19, 13, "Dest address"}, + /* 20 */ {20, 2, "VLAN ID"}, + /* 21 */ {21, 1, "VLAN Priority"}, + /* 22 */ {22, 1, "Cipher Suite Support"}, + /* 23 */ {23,17, "Cipher Suites"}, + /* 24 */ {24, 9, "Cipher Suite Privilege"}, + /* 25 */ {25, 4, "VLAN Dest Tag"}, + /* 26 */ {96, 28, "OEM Alert String"}, + /* 27 */ {97, 1, "Alert Retry Algorithm"}, + /* 28 */ {98, 3, "UTC Offset"}, + /* 29 */ {102, 1, "IPv6 Enable"}, + /* 30 */ {103, 1, "IPv6 Addr Source"}, + /* 31 */ {104,16, "IPv6 Address"}, + /* 32 */ {105, 1, "IPv6 Prefix Len"}, + /* 33 */ {106,16, "IPv6 Default Gateway"}, + /* 34 */ {108,17, "IPv6 Dest address"}, + /* 35 */ {192, 4, "DHCP Server IP"}, + /* 36 */ {193, 6, "DHCP MAC Address"}, + /* 37 */ {194, 1, "DHCP Enable"}, + /* 38 */ {201, 2, "Channel Access Mode(Lan)"} +}; + +#define NSER 22 /* max=32 */ +static struct { + int cmd; + int sz; + char desc[28]; +} serparams[NSER] = { /* see IPMI Table 20-4 */ + /* 0 */ { 0, 1, "Set in progress"}, + /* 1 */ { 1, 1, "Auth type support"}, + /* 2 */ { 2, 5, "Auth type enables"}, + /* 3 */ { 3, 1, "Connection Mode"}, + /* 4 */ { 4, 1, "Sess Inactiv Timeout"}, + /* 5 */ { 5, 5, "Channel Callback"}, + /* 6 */ { 6, 1, "Session Termination"}, + /* 7 */ { 7, 2, "IPMI Msg Comm"}, + /* 8 */ { 8, 2, "Mux Switch"}, + /* 9 */ { 9, 2, "Modem Ring Time"}, + /* 10 */ {10,17, "Modem Init String"}, + /* 11 */ {11, 5, "Modem Escape Seq"}, + /* 12 */ {12, 8, "Modem Hangup Seq"}, + /* 13 */ {13, 8, "Modem Dial Command"}, + /* 14 */ {14, 1, "Page Blackout Interval"}, + /* 15 */ {15,18, "Community String"}, + /* 16 */ {16, 1, "Num of Alert Dest"}, + /* 17 */ {17, 5, "Destination Info"}, + /* 18 */ {18, 1, "Call Retry Interval"}, + /* 19 */ {19, 3, "Destination Comm Settings"}, + /* 20 */ {29, 2, "Terminal Mode Config"}, + /* 21 */ {201, 2,"Channel Access Mode (Ser)"} +}; + +#define NSYS 6 /* num SystemParam */ +#define CHAS_RESTORE 0x00 /*chassis power restore policy*/ +#define SYS_INFO 0x01 /*System Info (1,2,3,4) */ +#define LAN_FAILOVER 0x02 /*Intel LAN Failover*/ +/* TODO: Future DCMI 1.5 params */ +#define DCMI_POWER 0x03 /*DCMI Power limit*/ +#define DCMI_THERMAL 0x04 /*DCMI Thermal params*/ +#define DCMI_CONFIG 0x05 /*DCMI Config params*/ + +static int GetDeviceID(uchar *pLanRecord) +{ + uchar responseData[MAX_BUFFER_SIZE]; + int responseLength = MAX_BUFFER_SIZE; + int status; + uchar inputData[24]; + uchar completionCode; + + if (pLanRecord == NULL) return(-1); + + status = ipmi_cmd(GET_DEVICE_ID, inputData, 0, responseData, + &responseLength, &completionCode, fdebug); + + if (status == ACCESS_OK) { + if( completionCode ) { + SELprintf("GetDeviceID: completion code=%x\n", + completionCode); + status = completionCode; + } else { + memcpy(pLanRecord,&responseData[0],responseLength); + set_mfgid(&responseData[0],responseLength); + return(0); // successful, done + } + } /* endif */ + /* if get here, error */ + return(status); +} /*end GetDeviceID() */ + +static int GetChanAcc(uchar chan, uchar parm, uchar *pLanRecord) +{ + uchar responseData[MAX_BUFFER_SIZE]; + int responseLength = MAX_BUFFER_SIZE; + int status; + uchar inputData[24]; + uchar completionCode; + + if (pLanRecord == NULL) return(-1); + responseLength = 3; + inputData[0] = chan; + inputData[1] = parm; /* 0x80 = active, 0x40 = non-volatile */ + responseLength = sizeof(responseData); + status = ipmi_cmd(GET_CHANNEL_ACC, inputData, 2, responseData, + &responseLength, &completionCode, fdebug); + + if (status == ACCESS_OK) { + if( completionCode ) { + SELprintf("%c GetChanAcc: completion code=%x\n", + bcomment,completionCode); + status = completionCode; + } else { + // dont copy first byte (Parameter revision, usu 0x11) + memcpy(pLanRecord,&responseData[0],responseLength); + return(0); // successful, done + } + } /* endif */ + /* if get here, error */ + return(status); +} /*GetChanAcc()*/ + +static int SetChanAcc(uchar chan, uchar parm, uchar val, uchar access) +{ + uchar responseData[MAX_BUFFER_SIZE]; + int responseLength = MAX_BUFFER_SIZE; + int status; + uchar inputData[24]; + uchar completionCode; + + if (fmBMC) return(0); /* mBMC doesn't support this */ + /* parm: 0x80 = active, 0x40 = set non-vol*/ + responseLength = 1; + inputData[0] = chan; /* channel */ + inputData[1] = (parm & 0xc0) | (val & 0x3F); + inputData[2] = (parm & 0xc0) | access; /* set priv level */ + + responseLength = sizeof(responseData); + status = ipmi_cmd(SET_CHANNEL_ACC, inputData, 3, responseData, + &responseLength, &completionCode, fdebug); + + if (status == ACCESS_OK) { + if( completionCode ) { + SELprintf("SetChanAcc: completion code=%x\n", + completionCode); + status = completionCode; + } else { + return(0); // successful, done + } + } /* endif */ + /* if get here, error */ + return(status); +} /*SetChanAcc()*/ + +static int GetUser(int user_num) +{ + uchar responseData[MAX_BUFFER_SIZE]; + int responseLength = MAX_BUFFER_SIZE; + int status, i; + uchar completionCode; + char inputData[24]; + + inputData[0] = lan_ch; + inputData[1] = (uchar)user_num; /* usually = 1 for BMC LAN */ + responseLength = sizeof(responseData); + status = ipmi_cmd(GET_USER_ACCESS, inputData, 2, responseData, + &responseLength, &completionCode, fdebug); + if (status == 0 && completionCode == 0) { + uchar c; + if (user_num == 1) { + max_users = responseData[0] & 0x3f; + enabled_users = responseData[1] & 0x3f; + if (enabled_users > nusers) nusers = enabled_users; + } + fprintf(fd_bmc,"UserAccess %d,%d%c %02x %02x %02x %02x \n", + lan_ch,user_num,bdelim,responseData[0],responseData[1], + responseData[2], responseData[3]); + c = responseData[3]; + inputData[0] = (uchar)user_num; /* usually = 1 for BMC LAN */ + responseLength = sizeof(responseData); + status = ipmi_cmd(GET_USER_NAME, inputData, 1, responseData, + &responseLength, &completionCode, fdebug); + if (status != 0 || completionCode != 0) + responseData[0] = 0; + else { + fprintf(fd_bmc,"UserName %d%c",user_num,bdelim); + for (i=0; i< responseLength; i++) + fprintf(fd_bmc," %02x",responseData[i]); + fprintf(fd_bmc,"\n"); + fprintf(fd_bmc,"%c UserPassword %d%c",bcomment,user_num,bdelim); + for (i=0; i< PSW_LEN; i++) + fprintf(fd_bmc," 00"); + fprintf(fd_bmc,"\n"); + } + } else + printf("%c GetUserAccess(%d,%d), status=%x, ccode=%x\n", + bcomment,lan_ch,user_num, status, completionCode); + return(status); +} /*end GetUser()*/ + +static int GetSerEntry(uchar subfunc, uchar bset, uchar *pLanRecord) +{ + uchar responseData[MAX_BUFFER_SIZE]; + int responseLength = MAX_BUFFER_SIZE; + uchar inputData[24]; + int status; + uchar completionCode; + uchar chan; + + if (pLanRecord == NULL) + { + if (fdebug) + printf("GetSerEntry(%d): error, output buffer is NULL\n",subfunc); + return (-1); + } + + chan = ser_ch; /* 1=EMP, 0=IPMB, 6=LAN2, 7=LAN1 */ + + inputData[0] = chan; // flags, channel 3:0 (1=EMP) + inputData[1] = subfunc; // Param selector + inputData[2] = bset; // Set selector + inputData[3] = 0; // Block selector + if (subfunc == 10) { + inputData[2] = 0; + inputData[3] = 1; + } + + status = ipmi_cmd(GET_SER_CONFIG, inputData, 4, responseData, + &responseLength, &completionCode, fdebug); + if (status == ACCESS_OK) { + if( completionCode ) { + if (fdebug) + SELprintf("GetSerEntry(%d,%d): completion code=%x\n", + chan,subfunc,completionCode); + status = completionCode; + } else { + // dont copy first byte (Parameter revision, usu 0x11) + memcpy(pLanRecord,&responseData[1],responseLength-1); + pLanRecord[responseLength-1] = 0; + //successful, done + return(0); + } + } + + // we are here because completionCode is not COMPLETION_CODE_OK + if (fdebug) + SELprintf("GetSerEntry(%d,%d): ipmi_cmd status=%x ccode=%x\n", + chan,subfunc,status,completionCode); + return status; +} + +static int SetSerEntry(uchar subfunc, uchar *pSerRecord, int reqlen) +{ + uchar responseData[MAX_BUFFER_SIZE]; + int responseLength = MAX_BUFFER_SIZE; + uchar inputData[24]; + int status; + uchar completionCode; + + if (pSerRecord == NULL) { + if (fdebug) + printf("SetSerEntry(%d): error, input buffer is NULL\n", + subfunc); + return (-1); + } + inputData[0] = ser_ch; // flags, channel 3:0 (EMP) + inputData[1] = subfunc; // Param selector + memcpy(&inputData[2],pSerRecord,reqlen); + status = ipmi_cmd(SET_SER_CONFIG, inputData, (uchar)(reqlen+2), + responseData, &responseLength, &completionCode, fdebug); + + if (fdebug) + printf("SetSerEntry: ipmi_cmd status=%d, completion code=%d\n", + status,completionCode); + if (status == ACCESS_OK) { + if( completionCode ) { + status = completionCode; + if (completionCode == 0x80) + printf("SetSerEntry(%d): Parameter not supported\n", + subfunc); + else + printf("SetSerEntry(%d): completion code=%x\n", + subfunc, completionCode); + } + // else successful, done + } + return status; +} /* end SetSerEntry() */ + +static int GetLanEntry(uchar subfunc, uchar bset, uchar *pLanRecord) +{ + uchar responseData[MAX_BUFFER_SIZE]; + int responseLength = MAX_BUFFER_SIZE; + uchar inputData[24]; + int status, n; + uchar completionCode; + uchar chan; + + if (pLanRecord == NULL) { + if (fdebug) printf("GetLanEntry: error, output buffer is NULL\n"); + return (-1); + } + + chan = lan_ch; /* LAN 1 = 7 */ + + inputData[0] = chan; // flags, channel 3:0 (LAN 1) + inputData[1] = subfunc; // Param selector (3 = ip addr) + inputData[2] = bset; // Set selector + inputData[3] = 0; // Block selector + + status = ipmi_cmd(GET_LAN_CONFIG, inputData, 4, responseData, + &responseLength, &completionCode, fdebug); + + if (status == ACCESS_OK) { + if( completionCode ) { + if (fdebug) + SELprintf("GetLanEntry(%d,%d): completion code=%x\n", + chan,subfunc,completionCode); + status = completionCode; + } else { + // dont copy first byte (Parameter revision, usu 0x11) + if (responseLength > 0) { + n = responseLength-1; + memcpy(pLanRecord,&responseData[1],n); + } else n = 0; + pLanRecord[n] = 0; + //successful, done + return(0); + } + } + + // we are here because completionCode is not COMPLETION_CODE_OK + if (fdebug) + SELprintf("GetLanEntry(%d,%d): status=%d completionCode=%x\n", + chan,subfunc,status,completionCode); + return (status); +} /* end GetLanEntry() */ + +static int SetLanEntry(uchar subfunc, uchar *pLanRecord, int reqlen) +{ + uchar responseData[MAX_BUFFER_SIZE]; + int responseLength = MAX_BUFFER_SIZE; + uchar inputData[24]; + int status; + uchar completionCode; + + if (pLanRecord == NULL) + { + if (fdebug) + printf("SetLanEntry(%d): error, input buffer is NULL\n",subfunc); + return (-1); + } + + if ((vend_id == VENDOR_SUPERMICROX) || + (vend_id == VENDOR_SUPERMICRO)) { + /* SUPERMICRO cannot set grat arp or grat arp interval */ + if (subfunc == 10 || subfunc == 11) return(0); + } + inputData[0] = lan_ch; // flags, channel 3:0 (LAN 1) + inputData[1] = subfunc; // Param selector (3 = ip addr) + memcpy(&inputData[2],pLanRecord,reqlen); + + status = ipmi_cmd(SET_LAN_CONFIG, inputData, (uchar)(reqlen+2), + responseData, &responseLength,&completionCode,fdebug); + + if (status == ACCESS_OK) { + if( completionCode ) { + if (fdebug) + SELprintf("SetLanEntry(%d,%d): completion code=%x\n", + lan_ch,subfunc,completionCode); + return(completionCode); + } else { + //successful, done + return(0); + } + } + + // we are here because completionCode is not COMPLETION_CODE_OK + if (fdebug) + SELprintf("SetLanEntry(%d,%d): ipmi_cmd status=%d ccode=%x\n", + lan_ch,subfunc,status,completionCode); + return (status); +} /* end SetLanEntry() */ + +static int GetPefEntry(uchar subfunc, ushort rec_id, PEF_RECORD *pPefRecord) +{ + uchar responseData[MAX_BUFFER_SIZE]; + int responseLength = MAX_BUFFER_SIZE; + uchar inputData[24]; + int status, n; + uchar completionCode; + + if (pPefRecord == NULL) + { + if (fdebug) + printf("GetPefEntry(%d): error, output buffer is NULL\n",subfunc); + return (-1); + } + + inputData[0] = subfunc; // Parameter = Evt Filter Table + inputData[1] = (uchar)rec_id; + inputData[2] = 0; + + status = ipmi_cmd(GET_PEF_CONFIG, inputData, 3, responseData, + &responseLength, &completionCode, fdebug); + + if (status == ACCESS_OK) { + if( completionCode ) { + if (fdebug) + SELprintf("GetPefEntry(%d/%d): completion code=%x\n", + subfunc,rec_id,completionCode); + status = completionCode; + } else { + /* expect PEF record to be >=21 bytes */ + if (responseLength > 1) n = responseLength-1; + else n = 0; + if (n > 21) n = 21; + // dont copy first byte (Parameter revision, usu 0x11) + if (n == 0) memset(pPefRecord,0,21); + else memcpy(pPefRecord,&responseData[1],n); + //successful, done + return(0); + } + } + + // we are here because completionCode is not COMPLETION_CODE_OK + if (fdebug) + SELprintf("GetPefEntry: ipmi_cmd status=%x completionCode=%x\n", + status, completionCode); + return status; +} /* end GetPefEntry() */ + +static int SetPefEntry(PEF_RECORD *pPefRecord) +{ + uchar responseData[MAX_BUFFER_SIZE]; + int responseLength = MAX_BUFFER_SIZE; + uchar inputData[24]; /* sizeof(PEF_RECORD) = 21 +1=22 */ + int status; + uchar completionCode; + uchar subfunc; + + subfunc = 0x06; // Parameter = Evt Filter Table + + if (pPefRecord == NULL) { + if (fdebug) + printf("SetPefEntry: error, output buffer is NULL\n"); + return (-1); + } + + // 0 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 + // 06 0c 80 01 01 00 ff ff 20 ff 6f ff 00 00 00 00 00 00 00 00 00 00 + // memset(&inputData[0],0,requestData.dataLength); + inputData[0] = subfunc; + memcpy(&inputData[1],pPefRecord,sizeof(PEF_RECORD)); + + status = ipmi_cmd(SET_PEF_CONFIG, inputData, sizeof(PEF_RECORD)+1, + responseData, &responseLength, &completionCode, fdebug); + + if (status == ACCESS_OK) { + if( completionCode ) { + if (fdebug) + SELprintf("SetPefEntry: completion code=%x\n", + completionCode); // responseData[0]); + status = completionCode; + } else { + //successful, done + return(0); + } + + } + + // we are here because completionCode is not COMPLETION_CODE_OK + if (fdebug) + SELprintf("SetPefEntry: ipmi_cmd status=%d ccode=%x\n", + status,completionCode); + return(status); + +} /* end SetPefEntry() */ + +static int MacIsValid(uchar *mac) +{ + int fvalid = 0; + int i; + /* check for initial invalid value of FF:00:... */ + if (mac[0] == 0xFF && mac[1] == 0x00) /* marked as invalid */ + return(fvalid); + /* check for all zeros */ + for (i = 0; i < MAC_LEN; i++) + if (mac[i] != 0) { /* not all zeros */ + fvalid = 1; + break; + } + return(fvalid); +} + +static int IpIsValid(uchar *ipadr) +{ + int fvalid = 1; + if (ipadr[0] == 0) fvalid = 0; + return(fvalid); +} + +static int SubnetIsValid(uchar *subnet) +{ + int fvalid = 0; + /* if masking off at least one bit, say valid */ + if ((subnet[0] & 0x80) == 0x80) fvalid = 1; + return(fvalid); +} + +#ifdef WIN32 +/* + * Obtain network adapter information (Windows). + */ +static PIP_ADAPTER_ADDRESSES GetAdapters() { + PIP_ADAPTER_ADDRESSES AdapterAddresses = NULL; + ULONG OutBufferLength = 0; + ULONG RetVal = 0, i; + + // The size of the buffer can be different + // between consecutive API calls. + // In most cases, i < 2 is sufficient; + // One call to get the size and one call to get the actual parameters. + // But if one more interface is added or addresses are added, + // the call again fails with BUFFER_OVERFLOW. + // So the number is picked slightly greater than 2. + // We use i <5 in the example + for (i = 0; i < 5; i++) { + RetVal = GetAdaptersAddresses( + AF_INET, 0, NULL, + AdapterAddresses, + &OutBufferLength); + + if (RetVal != ERROR_BUFFER_OVERFLOW) { + break; + } + + if (AdapterAddresses != NULL) { + free(AdapterAddresses); + } + + AdapterAddresses = (PIP_ADAPTER_ADDRESSES) malloc(OutBufferLength); + if (AdapterAddresses == NULL) { + RetVal = GetLastError(); + break; + } + } + if (RetVal == NO_ERROR) { + // If successful, return pointer to structure + return AdapterAddresses; + } + else { + LPVOID MsgBuf; + + printf("Call to GetAdaptersAddresses failed.\n"); + if (FormatMessage( + FORMAT_MESSAGE_ALLOCATE_BUFFER | + FORMAT_MESSAGE_FROM_SYSTEM | + FORMAT_MESSAGE_IGNORE_INSERTS, + NULL, + RetVal, + MAKELANGID(LANG_NEUTRAL, SUBLANG_DEFAULT), // Default language + (LPTSTR) &MsgBuf, + 0, + NULL )) { + printf("\tError: %s", MsgBuf); + } + LocalFree(MsgBuf); + } + return NULL; +} + +/* + * Set BMC MAC corresponding to current BMC IP address (Windows). + */ +static int GetLocalMACByIP() { + PIP_ADAPTER_ADDRESSES AdapterAddresses = NULL; + PIP_ADAPTER_ADDRESSES AdapterList; + int result = 0; + + struct sockaddr_in *si; + + AdapterAddresses = GetAdapters(); + AdapterList = AdapterAddresses; + + while (AdapterList) { + PIP_ADAPTER_UNICAST_ADDRESS addr; + addr = AdapterList->FirstUnicastAddress; + if (addr == NULL) si = NULL; + else si = (struct sockaddr_in*)addr->Address.lpSockaddr; + if (si != NULL) { + if(memcmp(&si->sin_addr.s_addr, rgmyip, 4) == 0) { + memcpy(rgmymac, AdapterList->PhysicalAddress, MAC_LEN); + result = 1; + break; + } + } + AdapterList = AdapterList->Next; + } + + if (AdapterAddresses != NULL) { + free(AdapterAddresses); + } + return result; +} + +/* + * Set BMC MAC corresponding to current BMC IP address (Windows). + */ +static int GetLocalIPByMAC(uchar *macadr) { + PIP_ADAPTER_ADDRESSES AdapterAddresses = NULL; + PIP_ADAPTER_ADDRESSES AdapterList; + int result = 0; + + struct sockaddr_in *si; + + AdapterAddresses = GetAdapters(); + AdapterList = AdapterAddresses; + + while (AdapterList) { + PIP_ADAPTER_UNICAST_ADDRESS addr; + if(memcmp(AdapterList->PhysicalAddress, macadr, MAC_LEN) == 0) { + addr = AdapterList->FirstUnicastAddress; + + si = (struct sockaddr_in*)addr->Address.lpSockaddr; + if (fdebug) { + uchar *psaddr; + psaddr = (uchar *)&si->sin_addr.s_addr; + printf("mac match: rgmyip=%d.%d.%d.%d s_addr=%d.%d.%d.%d\n", + rgmyip[0], rgmyip[1], rgmyip[2], rgmyip[3], + psaddr[0], psaddr[1], psaddr[2], psaddr[3]); + } + if (!IpIsValid(rgmyip) && (fsharedMAC==1)) /*not specified, shared*/ + memcpy(rgmyip, &si->sin_addr.s_addr, 4); + memcpy(osmyip, &si->sin_addr.s_addr, 4); + memcpy(osmymac, AdapterList->PhysicalAddress, MAC_LEN); + wcstombs(ifname,AdapterList->FriendlyName, sizeof(ifname)); + result = 1; + break; + } + AdapterList = AdapterList->Next; + } + + if (AdapterAddresses != NULL) { + free(AdapterAddresses); + } + return result; +} + +/* + * Set MAC and IP address from given interface name (Windows). + */ +static int GetLocalDataByIface() { + PIP_ADAPTER_ADDRESSES AdapterAddresses = NULL; + PIP_ADAPTER_ADDRESSES AdapterList; + int result = 0; + + size_t origsize, newsize, convertedChars; + wchar_t* wcstring; + struct sockaddr_in *si; + + AdapterAddresses = GetAdapters(); + AdapterList = AdapterAddresses; + + origsize = strlen(ifname) + 1; + newsize = origsize; + convertedChars = 0; + wcstring = (wchar_t*) malloc(sizeof(wchar_t) * newsize) ; + if (wcstring == NULL) AdapterList = NULL; /*skip loop, do free*/ + else mbstowcs(wcstring, ifname, origsize ); + + while (AdapterList) { + PIP_ADAPTER_UNICAST_ADDRESS addr; + if(wcsstr(AdapterList->FriendlyName, wcstring)) { + printf("Using interface: %S\n", AdapterList->FriendlyName); + printf("\t%S\n", AdapterList->Description); + addr = AdapterList->FirstUnicastAddress; + + si = (struct sockaddr_in*)addr->Address.lpSockaddr; + memcpy(rgmyip, &si->sin_addr.s_addr, 4); + memcpy(rgmymac, AdapterList->PhysicalAddress, MAC_LEN); + + result = 1; + break; + } + AdapterList = AdapterList->Next; + } + + if (AdapterAddresses != NULL) { + free(AdapterAddresses); + } + return result; +} + +static int FindEthNum(uchar *macadrin) +{ + int i; + uchar macadr[MAC_LEN]; + memcpy(macadr,macadrin,MAC_LEN); + if (fsharedMAC == 0 && vend_id == VENDOR_INTEL) { + /* Intel factory assigns them this way, so use that to compare */ + macadr[MAC_LEN-1] -= 2; /*OS MAC = BMC MAC - 2*/ + } + i = GetLocalIPByMAC(macadr); + if (fdebug) /* show the local OS eth if and MAC */ + printf("FindEth: OS %s IP=%d.%d.%d.%d MAC=%02x:%02x:%02x:%02x:%02x:%02x\n", + ifname, rgmyip[0], rgmyip[1], rgmyip[2], rgmyip[3], + rgmymac[0], rgmymac[1], rgmymac[2], rgmymac[3], + rgmymac[4], rgmymac[5]); + /* The actual Windows ethernet interface is determined + * in Get_IPMac_Addr using ipconfig, so + * init eth interface number as eth0 for Windows. */ + return(i); +} +#elif defined(HPUX) +static int FindEthNum(uchar *macadrin) +{ + return(0); +} +#else +/* Linux, BSD, Solaris */ +static char *get_ifreq_mac(struct ifreq *ifrq) +{ + char *ptr; +#ifdef SOLARIS + ptr = (char *)&ifrq->ifr_ifru.ifru_enaddr[0]; +#elif BSD + ptr = (char *)&ifrq->ifr_ifru.ifru_addr.sa_data[0]; +#elif MACOS + static uchar mactmp[MAC_LEN]; + ptr = &mactmp[0]; + MacSetInvalid(ptr); +#else + ptr = (char *)&ifrq->ifr_hwaddr.sa_data[0]; +#endif + return (ptr); +} + + +static int FindEthNum(uchar *macadrin) +{ /*only used for Linux*/ + struct ifreq ifr; + int skfd; + int nCurDevice; + uchar macadr[MAC_LEN]; + char szDeviceName[ 16 ]; /* sizeof(ifpattn), MAX_DEVICE_NAME_LENGTH + 1 */ + int devnum = -1; + int n; + + memcpy(macadr,macadrin,MAC_LEN); + if (fsharedMAC == 0 && vend_id == VENDOR_INTEL) { + /* Intel factory assigns them this way, so use that to compare */ + macadr[MAC_LEN-1] -= 2; /*OS MAC = BMC MAC - 2*/ + } + n = find_ifname(szDeviceName); + if (n >= 0) { + n = strlen_(szDeviceName); + if (n < sizeof(ifpattn)) { + strcpy(ifname0,szDeviceName); + strcpy(ifpattn,szDeviceName); + ifpattn[n - 1] = 0; /*truncate last digit*/ + } + if (fdebug) + printf("found ifname %s, pattern %s\n",szDeviceName,ifpattn); + } + + if ( ( skfd = socket(AF_INET, SOCK_DGRAM, 0 ) ) < 0) { + if ( fdebug ) { + perror("socket"); + return devnum; + } + } + + for( nCurDevice = 0 ; + (nCurDevice < NUM_DEVICES_TO_CHECK) && (devnum == -1); + nCurDevice++ ) + { + sprintf( szDeviceName, "%s%d", ifpattn, nCurDevice ); + strcpy(ifr.ifr_name, szDeviceName ); +#ifdef SIOCGIFHWADDR + if (ioctl(skfd, SIOCGIFHWADDR, &ifr) > 0) { + if ( fdebug ) + printf("FindEthNum: Could not get MAC address for %s\n", + szDeviceName); + } else +#endif + { + if (memcmp(get_ifreq_mac(&ifr), macadr, MAC_LEN) == 0) { + devnum = nCurDevice; + break; + } + } + } + close(skfd); + return(devnum); +} +#endif + +/* + * GetBmcEthDevice + * Attempt to auto-detect the BMC LAN channel and matching OS eth port. + * INPUT: lan_parm = lan channel from user -L option, 0xFF if not specified + * OUTPUT: lan_ch is set to BMC LAN channel number + * if success, returns index of OS eth port (0, 1, ...). + * if no lan channels found, returns -2. + * if other error, returns -1. + */ +static int GetBmcEthDevice(uchar lan_parm) +{ + uchar LanRecord[30]; + int devnum = -1; + int ret; + uchar bmcMacAddress[ MAC_LEN ]; /*MAC_LEN = 6*/ + int rlen; + uchar iData[2]; + uchar rData[10]; + uchar cc; + int i = 0; + int j, jstart, jend, jlan; + uchar mtype; + uchar *pb; + int fchgmac; + + /* Find the LAN channel(s) via Channel Info */ + if (lan_parm < MAXCHAN) { /* try user-specified channel only */ + lan_ch = lan_parm; + jstart = lan_parm; + jend = lan_parm+1; + } else { + jstart = 1; + jend = MAXCHAN; + for (j = 0; j < MAXCHAN; j++) chan_type[j] = 0; + } + memset(bmcMacAddress,0xff,sizeof(bmcMacAddress)); /*initialize to invalid*/ + for (j = jstart; j < jend; j++) { + rlen = sizeof(rData); + iData[0] = (uchar)j; /*channel #*/ + memset(rData,0,9); /*initialize recv data*/ + ret = ipmi_cmd(GET_CHANNEL_INFO, iData, 1, rData, &rlen, &cc, fdebug); + if (ret == 0xcc || cc == 0xcc) /* special case for ipmi_lan */ + continue; + if (ret != 0) { + if (fdebug) printf("get_chan_info rc = %x\n",ret); + break; + } + mtype = rData[1]; /* channel medium type */ + chan_type[j] = mtype; + if (mtype == 4) { /* 802.3 LAN type*/ + if (fdebug) printf("chan[%d] = lan\n",j); + jlan = lan_ch; /*save prev lan chan */ + /* Get BMC MAC for this LAN channel. */ + /* Note: BMC MAC may not be valid yet. */ + lan_ch = (uchar)j; /*set lan channel for GetLanEntry()*/ + ret = GetLanEntry( 5 /*MAC_ADDRESS_LAN_PARAM*/,0, LanRecord); + if ( ret < 0 ) { + lan_ch = (uchar)jlan; /*restore lan_ch*/ + printf( "GetBmcEthDevice: GetLanEntry failed\n" ); + return devnum; + } + pb = &LanRecord[0]; + if (fdebug) printf("chan[%d] BMC MAC %x:%x:%x:%x:%x:%x\n",j, + pb[0], pb[1], pb[2], pb[3], pb[4], pb[5] ); + fchgmac = 0; + if (!MacIsValid(bmcMacAddress)) /* old MAC not valid */ + fchgmac = 1; + else if (MacIsValid(pb) && /* new MAC is valid and */ + (memcmp(bmcMacAddress,pb, sizeof(bmcMacAddress)) > 0)) + fchgmac = 1; /* new MAC lower */ + if (fchgmac) { /* use lowest valid MAC */ + memcpy(bmcMacAddress,pb,sizeof(bmcMacAddress)); + lan_ch = (uchar)j; + } else lan_ch = (uchar)jlan; /* restore prev lan chan */ + i++; /* i = num lan channels found */ + } else if (mtype == 5) { /* serial type*/ + if (fdebug) printf("chan[%d] = serial\n",j); + ser_ch = (uchar)j; /* set to last serial channel */ + } else if (mtype == 7) { /* PCI SMBus */ + if (fdebug) printf("chan[%d] = pci_smbus\n",j); + } else if (mtype == 12) { /* system interface */ + if (fdebug) printf("chan[%d] = system_interface\n",j); + } else /* other channel medium types, see IPMI 1.5 Table 6-3 */ + if (fdebug) printf("chan[%d] = %d\n",j,mtype); + } + nlans = i; + if (i == 0) return(-2); /* no lan channels found */ + if (fdebug) printf("lan_ch detected = %d\n",lan_ch); + + devnum = FindEthNum(bmcMacAddress); + if ( fdebug ) + printf("GetBmcEthDevice: channel %d, %s%d\n",lan_ch,ifpattn,devnum); + return devnum; +} + +/* + * atomac - converts ASCII string to binary MAC address (array). + * Accepts input formatted as 11:22:33:44:55:66 or 11-22-33-44-55-66. + */ +static void atomac(uchar *array, char *instr) +{ + int i,j,n; + char *pi; + j = 0; + pi = instr; + n = strlen_(instr); + for (i = 0; i <= n; i++) { + if (instr[i] == ':') { + array[j++] = htoi(pi); + pi = &instr[i+1]; + } else if (instr[i] == '-') { + array[j++] = htoi(pi); + pi = &instr[i+1]; + } else if (instr[i] == 0) { + array[j++] = htoi(pi); + } + if (j >= MAC_LEN) break; /*safety valve*/ + } + if (fdebug) + printf("atomac: %02x %02x %02x %02x %02x %02x\n", + array[0],array[1],array[2],array[3], array[4],array[5]); +} /*end atomac()*/ + +/* file_grep/findmatch no longer used here, see ievents.c */ + +/* + * Get_Mac + * This routine finds a MAC address from a given IP address. + * Usually for the Alert destination. + * It uses ARP cache to do this. + */ +#ifdef WIN32 +static int Get_Mac(uchar *ipadr,uchar *macadr) +{ + DWORD dwRetVal; + IPAddr DestIp = 0; + IPAddr SrcIp = 0; /* default for src ip */ + ULONG MacAddr[2]; /* for 6-byte hardware addresses */ + ULONG PhysAddrLen = MAC_LEN; /* default to length of six bytes */ + BYTE *bPhysAddr; + + + memcpy(&DestIp, ipadr, 4); + + /* invoke system ARP query */ + dwRetVal = SendARP(DestIp, SrcIp, MacAddr, &PhysAddrLen); + + if (dwRetVal == NO_ERROR) + { /* no error - get the MAC */ + bPhysAddr = (BYTE *) & MacAddr; + if (PhysAddrLen) { + memcpy(macadr, bPhysAddr, MAC_LEN); + } else + printf("Warning: SendArp completed successfully, but returned length=0\n"); + } else if (dwRetVal == ERROR_GEN_FAILURE) + { /* MAC not available in this netowork - get gateway MAC */ + memcpy(macadr, rggwymac, MAC_LEN); + } else + { /* other errors */ + printf("Error: SendArp failed with error: %d", dwRetVal); + switch (dwRetVal) { + case ERROR_INVALID_PARAMETER: + printf(" (ERROR_INVALID_PARAMETER)\n"); + break; + case ERROR_INVALID_USER_BUFFER: + printf(" (ERROR_INVALID_USER_BUFFER)\n"); + break; + case ERROR_BAD_NET_NAME: + printf(" (ERROR_GEN_FAILURE)\n"); + break; + case ERROR_BUFFER_OVERFLOW: + printf(" (ERROR_BUFFER_OVERFLOW)\n"); + break; + case ERROR_NOT_FOUND: + printf(" (ERROR_NOT_FOUND)\n"); + break; + default: + printf("\n"); + break; + } + return 1; + } + return 0; +} /* end Get_Mac()*/ +/*endif WIN32 */ +#else +/*else Linux */ +static int Get_Mac(uchar *ipadr,uchar *macadr) +{ + FILE *fparp; + char buff[1024]; + /* char arpfile[] = "/proc/net/arp"; */ + char alertfile[] = "/tmp/dest.arping"; + char arping_cmd[128]; + char *pb, *pm, *px; + int num, i; + int foundit = 0; + int ret = 0; + char *_ifname; + + if (strcmp(ifname,"gcm") == 0) _ifname = ifname0; + else _ifname = ifname; + + /* Get a MAC address for a given IP address */ + if (ipadr[0] != 0) { /* if valid IP address */ + + /* make sure the destination is in the arp cache */ + sprintf(arping_cmd, + "arping -I %s -c 2 %d.%d.%d.%d |grep reply |tail -n1 >%s\n", + _ifname,ipadr[0],ipadr[1],ipadr[2],ipadr[3],alertfile); + if (fdebug) printf("%s", arping_cmd); + system(arping_cmd); + + fparp = fopen(alertfile,"r"); + if (fparp == NULL) { + fprintf(stdout,"Get_Mac: Cannot open %s, errno = %d\n", + alertfile,get_errno()); + ret = -1; + } else { + while (fgets(buff, 1023, fparp)) { + /* should only run through loop once */ + num = strcspn(buff," \t"); /* skip 1st word ("Unicast") */ + i = strspn(&buff[num]," \t"); + pb = &buff[num+i]; + if (strncmp(pb,"reply",5) == 0) { /* valid output */ + /* Find the ip address */ + pb += 6 + 5; /* skip "reply from " */ + num = strcspn(pb," \t"); + pb[num] = 0; + if (fdebug) printf("Alert ip=%s\n",pb); + /* IP address should already match input param */ + /* if (rgdestip[0] == 0) atoip(rgdestip,pb); */ + /* Now find the mac address */ + pm = strchr(&pb[num+1],'['); + if (pm == NULL) pm = &pb[num+2]; /* just in case */ + pm++; + px = strchr(pm,']'); + if (px == NULL) px = pm + 17; /* just in case */ + px[0] = 0; + if (fdebug) printf("Alert mac=%s\n",pm); + foundit = 1; + if (!MacIsValid(macadr)) atomac(macadr,pm); + break; + } + } /*end while*/ + fclose(fparp); + } /*end else file opened*/ + } /*endif valid IP */ + else ret = -1; + + if (ret == -1 || foundit == 0) { /* couldn't get it */ + if (MacIsValid(rggwymac) && !MacIsValid(rgdestmac)) + memcpy(rgdestmac,rggwymac,6); /* get to it from the default gateway */ + } + return(ret); +} /* end Get_Mac()*/ +/*end else Linux*/ +#endif + +#ifdef WIN32 + +/* + * Set subnet mask based on current IP address (Windows). + */ +static int SetSubnetMask() { + PMIB_IPADDRTABLE pIPAddrTable; + unsigned int i; + DWORD dwSize = 0, dwRetVal; + LPVOID lpMsgBuf; + + pIPAddrTable = (MIB_IPADDRTABLE*) malloc( sizeof( MIB_IPADDRTABLE) ); + + if ( pIPAddrTable ) { + // Make an initial call to GetIpAddrTable to get the + // necessary size into the dwSize variable + if (GetIpAddrTable(pIPAddrTable, &dwSize, 0) == ERROR_INSUFFICIENT_BUFFER) { + free( pIPAddrTable ); + pIPAddrTable = (MIB_IPADDRTABLE *) malloc ( dwSize ); + } + } else + printf("Memory allocation failed.\n"); + + if ( pIPAddrTable ) { + // Make a second call to GetIpAddrTable to get the + // actual data we want + if ( (dwRetVal = GetIpAddrTable( pIPAddrTable, &dwSize, 0 )) == NO_ERROR ) { + for(i = 0; i < pIPAddrTable->dwNumEntries; ++i) { + if(memcmp(&(pIPAddrTable->table[i].dwAddr), rgmyip, 4) == 0) { + memcpy(rgsubnet, &(pIPAddrTable->table[i].dwMask), 4); + free( pIPAddrTable ); + return 1; + } + } + } else { + if (FormatMessage( + FORMAT_MESSAGE_ALLOCATE_BUFFER | + FORMAT_MESSAGE_FROM_SYSTEM | + FORMAT_MESSAGE_IGNORE_INSERTS, + NULL, + dwRetVal, + MAKELANGID(LANG_NEUTRAL, SUBLANG_DEFAULT), // Default language + (LPTSTR) &lpMsgBuf, + 0, + NULL )) { + printf("\tError: %s", lpMsgBuf); + } + + printf("Call to GetIpAddrTable failed.\n"); + } + } + + if ( pIPAddrTable ) + free( pIPAddrTable ); + + return 0; +} + +/* + * Extract gateway address from routing table (Windows). + */ +static int SetDefaultGateway() { + PMIB_IPFORWARDTABLE pIpForwardTable; + DWORD dwRetVal, dwSize; + + unsigned int nord_mask; + unsigned int nord_ip; + unsigned int nord_net; + + unsigned int i; + + nord_mask = *((unsigned int *)rgsubnet); + nord_ip = *((unsigned int *)rgmyip); + + nord_net = nord_ip & nord_mask; + + pIpForwardTable = (MIB_IPFORWARDTABLE*) malloc(sizeof(MIB_IPFORWARDTABLE)); + if (pIpForwardTable == NULL) { + printf("Error allocating memory\n"); + return 0; + } + + dwSize = 0; + if (GetIpForwardTable(pIpForwardTable, &dwSize, 0) == ERROR_INSUFFICIENT_BUFFER) { + free(pIpForwardTable); + pIpForwardTable = (MIB_IPFORWARDTABLE*) malloc(dwSize); + if (pIpForwardTable == NULL) { + printf("Error allocating memory\n"); + return 0; + } + } + + /* + * Note that the IPv4 addresses returned in + * GetIpForwardTable entries are in network byte order + */ + if ((dwRetVal = GetIpForwardTable(pIpForwardTable, &dwSize, 0)) == NO_ERROR) { + for (i = 0; i < (int) pIpForwardTable->dwNumEntries; i++) { + unsigned int gwaddr = pIpForwardTable->table[i].dwForwardNextHop; + if(nord_net == (gwaddr & nord_mask) && nord_ip != gwaddr) + { /* searching for gateways from our network with different address than ours */ + memcpy(rggwyip, &gwaddr, 4); + return 0; + } + } + free(pIpForwardTable); + return 1; + } + else { + printf("\tGetIpForwardTable failed.\n"); + free(pIpForwardTable); + return 0; + } + +} +/*endif WIN32*/ +#endif + +static int ShowChanAcc(uchar bchan) +{ + uchar LanRecord[30]; + int ret = 0; + + ret = GetChanAcc(bchan, 0x40, LanRecord); + if (fdebug) + printf(" GetChanAcc(%d) ret = %d, data = %02x %02x\n", + bchan,ret, LanRecord[0], LanRecord[1]); + if (ret == 0) + fprintf(fd_bmc,"ChannelAccess %d%c %02x %02x \n", + bchan,bdelim,LanRecord[0],LanRecord[1]); + return(ret); +} + +static int GetSerialOverLan( uchar chan, uchar bset, uchar block ) +{ + uchar requestData[24]; + uchar rData[MAX_BUFFER_SIZE]; + int rlen; + int status, i; + uchar ccode; + uchar enable_parm, auth_parm, baud_parm; + uchar user; + + if (fIPMI20 && fSOL20) { + getsolcmd = GET_SOL_CONFIG2; + enable_parm = SOL_ENABLE_PARAM; + auth_parm = SOL_AUTHENTICATION_PARAM; + baud_parm = SOL_BAUD_RATE_PARAM; + } else { + getsolcmd = GET_SOL_CONFIG; + enable_parm = SOL_ENABLE_PARAM; + auth_parm = SOL_AUTHENTICATION_PARAM; + baud_parm = SOL_BAUD_RATE_PARAM; + chan = 0; /*override chan for IPMI 1.5*/ + } + printf("%c## %s, GetSOL for channel %d ...\n",bcomment,progname,chan); + + requestData[0] = chan; /*channel*/ + requestData[1] = enable_parm; + requestData[2] = bset; /*set*/ + requestData[3] = block; /*block*/ + rlen = sizeof(rData); + status = ipmi_cmd(getsolcmd, requestData,4, rData, &rlen,&ccode,fdebug); + if (status != 0) return(status); + if (ccode) { + if (ccode == 0xC1) { /* unsupported command */ + printf("%c Serial-Over-Lan not available on this platform\n", + bcomment); + return(status); + } else { + printf("%c SOL Enable ccode = %x\n",bcomment,ccode); + status = ccode; + } + } else { /*success*/ + fprintf(fd_bmc,"SOLParam %d,%d,%d%c",chan,enable_parm,bset,bdelim); + for (i = 1; i < rlen; i++) fprintf(fd_bmc," %02x",rData[i]); + fprintf(fd_bmc,"\n"); + } + + requestData[0] = chan; + requestData[1] = auth_parm; + requestData[2] = bset; // selector + requestData[3] = block; // block + rlen = sizeof(rData); + status = ipmi_cmd(getsolcmd, requestData,4,rData, &rlen,&ccode,fdebug); + if (status != 0) return(status); + if (ccode) { + printf("%c SOL Auth ccode = %x\n",bcomment,ccode); + status = ccode; + } else { /*success*/ + fprintf(fd_bmc,"SOLParam %d,%d,%d%c",chan,auth_parm,bset,bdelim); + for (i = 1; i < rlen; i++) fprintf(fd_bmc," %02x",rData[i]); + fprintf(fd_bmc,"\n"); + } + + requestData[0] = chan; + requestData[1] = SOL_ACC_INTERVAL_PARAM; + requestData[2] = bset; + requestData[3] = block; + rlen = sizeof(rData); + status = ipmi_cmd(getsolcmd, requestData,4,rData, &rlen,&ccode,fdebug); + if (status != 0) return(status); + if (ccode) { + printf("%c SOL Accum Interval ccode = %x\n",bcomment,ccode); + status = ccode; + } else { /*success*/ + fprintf(fd_bmc,"SOLParam %d,%d,%d%c",chan,SOL_ACC_INTERVAL_PARAM,bset,bdelim); + for (i = 1; i < rlen; i++) fprintf(fd_bmc," %02x",rData[i]); + fprintf(fd_bmc,"\n"); + } + + requestData[0] = chan; + requestData[1] = SOL_RETRY_PARAM; + requestData[2] = bset; + requestData[3] = block; + rlen = sizeof(rData); + status = ipmi_cmd(getsolcmd, requestData,4,rData, &rlen,&ccode,fdebug); + if (status != 0) return(status); + if (ccode) { + printf("%c SOL Retry ccode = %x\n",bcomment,ccode); + status = ccode; + } else { /*success*/ + fprintf(fd_bmc,"SOLParam %d,%d,%d%c",chan,SOL_RETRY_PARAM,bset,bdelim); + for (i = 1; i < rlen; i++) fprintf(fd_bmc," %02x",rData[i]); + fprintf(fd_bmc,"\n"); + } + + if (!fRomley) { + requestData[0] = chan; + requestData[1] = baud_parm; + requestData[2] = bset; + requestData[3] = block; + rlen = sizeof(rData); + status = ipmi_cmd(getsolcmd,requestData,4,rData,&rlen,&ccode,fdebug); + if (status != 0) return(status); + if (ccode) { + printf("%c SOL nvol Baud ccode = %x\n",bcomment,ccode); + status = ccode; + } else { /*success*/ + fprintf(fd_bmc,"SOLParam %d,%d,%d%c",chan,baud_parm,bset,bdelim); + for (i = 1; i < rlen; i++) fprintf(fd_bmc," %02x",rData[i]); + fprintf(fd_bmc,"\n"); + } + + requestData[0] = chan; + requestData[1] = SOL_VOL_BAUD_RATE_PARAM; /*0x06*/ + requestData[2] = bset; + requestData[3] = block; + rlen = sizeof(rData); + status = ipmi_cmd(getsolcmd,requestData,4,rData,&rlen,&ccode,fdebug); + if (status != 0) return(status); + if (ccode) { + printf("%c SOL vol Baud ccode = %x\n",bcomment,ccode); + status = ccode; + } else { /*success*/ + fprintf(fd_bmc,"SOLParam %d,%d,%d%c",chan,SOL_VOL_BAUD_RATE_PARAM,bset,bdelim); + for (i = 1; i < rlen; i++) fprintf(fd_bmc," %02x",rData[i]); + fprintf(fd_bmc,"\n"); + } + } + + if (fIPMI20) { + requestData[0] = chan; + rlen = sizeof(rData); + status = ipmi_cmdraw(GET_PAYLOAD_SUPPORT, NETFN_APP, + BMC_SA,PUBLIC_BUS,BMC_LUN, + requestData,1,rData, &rlen, &ccode, fdebug); + if ((status != 0) || (ccode != 0)) { + printf("%c SOL Payload Support(%d) error %d, ccode = %x\n", + bcomment,chan,status,ccode); + if (status == 0) status = ccode; + } else { /*success*/ + fprintf(fd_bmc,"SOLPayloadSupport %d%c",chan,bdelim); + for (i = 1; i < rlen; i++) fprintf(fd_bmc," %02x",rData[i]); + fprintf(fd_bmc,"\n"); + } + /* get Payload Access for nusers, not just lan_user */ + for (user = 1; user <= nusers; user++) + { + /* IPMI 2.0 nusers >= 4 users */ + requestData[0] = chan; + requestData[1] = user; + rlen = sizeof(rData); + status = ipmi_cmdraw(GET_PAYLOAD_ACCESS, NETFN_APP, + BMC_SA,PUBLIC_BUS,BMC_LUN, + requestData,2,rData, &rlen, &ccode, fdebug); + if ((status != 0) || (ccode != 0)) { + printf("%c SOL Payload Access(%d,%d) error %d, ccode = %x\n", + bcomment,chan,user,status,ccode); + if (status == 0) status = ccode; + } else { /*success*/ + fprintf(fd_bmc,"SOLPayloadAccess %d,%d%c",chan,user,bdelim); + for (i = 0; i < rlen; i++) fprintf(fd_bmc," %02x",rData[i]); + fprintf(fd_bmc,"\n"); + } + } /*end user loop*/ + } + + return(status); +} /*end GetSerialOverLan */ + +static char *PefDesc(int idx, uchar stype) +{ + char *pdesc; + if (pefdesc == NULL) pdesc = "reserved"; + else pdesc = pefdesc[idx]; + if ((stype != 0) && (strcmp(pdesc,"reserved") == 0)) { + /* pefdesc may not match on some non-Intel systems. */ + /* so use sensor type */ + switch(stype) { + case 0x01: pdesc = "Temperature"; break; + case 0x02: pdesc = "Voltage"; break; + case 0x04: pdesc = "Fan"; break; + case 0x05: pdesc = "Chassis"; break; + case 0x07: pdesc = "BIOS"; break; + case 0x08: pdesc = "Power Supply"; break; + case 0x09: pdesc = "Power Unit"; break; + case 0x0c: pdesc = "Memory"; break; + case 0x0f: pdesc = "Boot"; break; + case 0x12: pdesc = "System Restart"; break; + case 0x13: pdesc = "NMI"; break; + case 0x23: pdesc = "Watchdog"; break; + case 0x20: pdesc = "OS Critical Stop"; break; + default: pdesc = "Other"; break; + } + } + return(pdesc); +} + +static int GetSessionInfo(uchar *rData, int sz) +{ + int rv, rlen; + uchar ccode; + uchar iData[5]; + + iData[0] = 0x00; /*get data for this session*/ + rlen = sz; + rv = ipmi_cmdraw(CMD_GET_SESSION_INFO,NETFN_APP, BMC_SA,PUBLIC_BUS,BMC_LUN, + iData,1,rData, &rlen, &ccode, fdebug); + if ((rv == 0) && (ccode != 0)) rv = ccode; + return(rv); +} + +static int GetPefCapabilities(uchar *bmax) +{ + int rv, rlen; + uchar ccode; + uchar rData[MAX_BUFFER_SIZE]; + + rlen = sizeof(rData); + rv = ipmi_cmdraw(0x10, NETFN_SEVT, BMC_SA,PUBLIC_BUS,BMC_LUN, + NULL,0,rData, &rlen, &ccode, fdebug); + if ((rv == 0) && (ccode != 0)) rv = ccode; + if ((rv == 0) && (bmax != NULL)) + *bmax = rData[2]; /*max num PEF table entries*/ + return(rv); +} + +int WaitForSetComplete(int limit) +{ + int rv = 0; + int i; + uchar bdata[4]; + + for (i = 0; i < limit; i++) { + rv = GetLanEntry(0, 0, bdata); + if (fdebug) printf("WaitForSetComplete(%d): i=%d rv=%d val=%x\n", + limit,i,rv,bdata[1]); + if ((rv == 0) && (bdata[1] == 0)) break; + else os_usleep(0,100); + } + return(rv); +} + +int SerialIsOptional(int bparam) +{ + /* These Serial Parameters are for optional Modem/Callback functions. */ + int optvals[9] = { 5, 9, 10, 11, 12, 13, 14, 20, 21 }; + int rv = 0; + int i; + for (i = 0; i < sizeof(optvals); i++) { + if (optvals[i] == bparam) { rv = 1; break; } + } + return(rv); +} + +static int parse_line(char *line, char *keyret, char *value) +{ + char *eol; + char *key; + char *val; + int i, n; + + key = &line[0]; + eol = &line[strlen(line)]; + while( *key < 0x21 && key < eol ) + key++; /*remove leading whitespace */ + if( key[0] == bcomment ) return 2; /*skip comments */ + /* + * find the value set, delimited by bdelim (':' or '|') + */ + val = strchr( line, bdelim ); + if( val == NULL ) return 1; /* skip if empty or no delimeter */ + val[0] = 0; /*stringify the key*/ + val++; + while( val[0] < 0x21 && val < eol ) + val++; /*remove leading whitespace */ + /* + * truncate trailing newline/whitespace after last word + */ + n = strlen_( val ); + for( i = n; i >= 0; i-- ) /*decrease from end*/ + if( val[i] >= 0x21 ) break; /*found last valid char */ + if (i < n) val[i + 1] = 0; + + strcpy(keyret, key); /*has keyword and params*/ + strcpy(value, val); /*has list of hex values*/ + return 0; +} + +#ifdef METACOMMAND +int i_config(int argc, char **argv) +#else +#ifdef WIN32 +int __cdecl +#else +int +#endif +main(int argc, char **argv) +#endif +{ + int ret; + PEF_RECORD *pPefRecord; + PEF_RECORD PefRecord; + uchar LanRecord[64]; + uchar bParams[5]; + char filename[80] = ""; + int i, j, c, n; + uchar idx; + // char *pstr; + uchar bset = 0; + int ndest = 4; + int idest; + // char mystr[80]; + uchar * pc; int sz; + char line[240]; /* hdr(18) + data(192 = 64 * 3) + '\0' = 211 */ + char key[40]; + char value[100]; + uchar rData[50]; + int rlen; + uchar cc; + uchar chan; + char *pk; + char fpefok = 1; + char fignore_err; + + // progname = argv[0]; + printf("%s ver %s \n",progname,progver); + func = 'l'; freadonly = 1; /*list is default*/ + + while ((c = getopt(argc, argv,"cdmlr:s:xL:T:V:J:EYF:P:N:R:U:Z:?")) != EOF) + switch(c) { + case 'c': fcanonical = 1; bdelim = BDELIM; break; + case 'd': func = 'd'; freadonly = 0; break; /*set Defaults*/ + case 'l': func = 'l'; freadonly = 1; break; /*list*/ + case 'm': fdomac = 1; break; /*restore mac*/ + case 'r': func = 'r'; freadonly = 0; /*restore*/ + sz = strlen_(optarg); + if (sz > sizeof(filename)) sz = sizeof(filename); + strncpy(filename,optarg,sz); + break; + case 's': func = 's'; freadonly = 1; /*save*/ + sz = strlen_(optarg); + if (sz > sizeof(filename)) sz = sizeof(filename); + strncpy(filename,optarg,sz); + break; + case 'x': fdebug = 1; break; + case 'p': /* password to set */ + fpassword = 1; + if (strlen_(optarg) > 16) optarg[16] = 0; + strcpy(passwordData,optarg); + if (fdebug) printf("Password = %s\n",passwordData); + /* Hide password from 'ps' */ + memset(optarg, ' ', strlen_(optarg)); + break; + case 'L': + lan_ch_parm = atob(optarg); + if (lan_ch_parm >= MAXCHAN) lan_ch_parm = 0xff; /*invalid*/ + break; + case 'N': /* nodename */ + case 'U': /* remote username */ + case 'P': /* remote password */ + case 'R': /* remote password */ + case 'E': /* get password from IPMI_PASSWORD environment var */ + case 'F': /* force driver type */ + case 'T': /* auth type */ + case 'J': /* cipher suite */ + case 'V': /* priv level */ + case 'Y': /* prompt for remote password */ + case 'Z': /* set local MC address */ + parse_lan_options(c,optarg,fdebug); + break; + default: + printf("Usage: %s [-clmpxLNUPREFTJVY -r <file> -s <file>]\n", + progname); + printf("where -l Lists BMC configuration parameters\n"); + printf(" -r Restores BMC configuration from <file>\n"); + printf(" -s Saves BMC configuration to <file>\n"); + printf(" -c canonical output with delimiter '%c'\n",BDELIM); + printf(" -m Set BMC MAC during restore\n"); + printf(" -x show eXtra debug messages\n"); + printf(" -p <psw> specify a user password to set\n"); + printf(" -L 3 specify lan channel number 3\n"); + print_lan_opt_usage(); + ret = ERR_USAGE; + goto do_exit; + } + + switch(func) { + case 'l': fd_bmc = stdout; break; + case 'r': fd_bmc = fopen(filename,"r"); break; + case 's': fd_bmc = fopen(filename,"w"); break; + default: break; + } + if (fd_bmc == NULL) { + printf("Error: cannot open %s\n",filename); + ret = ERR_FILE_OPEN; + fd_bmc = stdout; + goto do_exit; + } + fipmilan = is_remote(); + + if (fipmilan) parse_lan_options('V',"4",0); + + ret = GetDeviceID( LanRecord); + if (ret != 0) { + goto do_exit; + } else { /* success */ + uchar ipmi_maj, ipmi_min; + ipmi_maj = LanRecord[4] & 0x0f; + ipmi_min = LanRecord[4] >> 4; + show_devid( LanRecord[2], LanRecord[3], ipmi_maj, ipmi_min); + if (ipmi_maj == 0) fIPMI10 = 1; + else if (ipmi_maj == 1 && ipmi_min < 5) fIPMI10 = 1; + else fIPMI10 = 0; /* >= IPMI 1.5 is ok */ + if (ipmi_maj >= 2) fIPMI20 = 1; + /* nusers can be up to 15 max */ + if (fIPMI20) nusers = 5; + else nusers = 3; + if (fIPMI10) { + printf("%c This IPMI v%d.%d system does not support PEF records.\n", + bcomment,ipmi_maj,ipmi_min); + /* Wont handle PEF, but continue and look for BMC LAN anyway */ + // fIPMI10 = 1; + // ipmi_close_(); + // exit(1); + } + prod_id = LanRecord[9] + (LanRecord[10] << 8); + vend_id = LanRecord[6] + (LanRecord[7] << 8) + + (LanRecord[8] << 16); + /* check Device ID response for Manufacturer ID = 0x0322 (NSC) */ + if (vend_id == VENDOR_NSC) { /* NSC = 0x000322 */ + fmBMC = 1; /*NSC miniBMC*/ + if (pefnum == 12) pefnum = 10; /* change CritStop pefnum to 0x0a */ + pefdesc = &pefdesc2[0]; + pefmax = 30; + fsharedMAC = 1; /*LAN1 shares MAC with OS*/ + } else if (vend_id == VENDOR_LMC) { /* LMC (on SuperMicro) = 0x000878 */ + fmBMC = 0; + pefdesc = NULL; /* unknown, see PefDesc() */ + if (pefnum == 12) pefnum = 15; /* change CritStop pefnum */ + pefmax = 16; + fsharedMAC = 0; /* not-shared BMC LAN port */ + } else if (vend_id == VENDOR_INTEL) { /* Intel = 0x000157 */ + pefdesc = &pefdesc1[0]; /*Intel defaults*/ + pefmax = 20; /*Intel default pefmax = 20*/ + switch(prod_id) { + case 0x4311: /* Intel NSI2U*/ + fmBMC = 1; /* Intel miniBMC*/ + if (pefnum == 12) pefnum = 14; /* change CritStop pefnum */ + pefdesc = &pefdesc2[0]; + pefmax = 30; + fsharedMAC = 1; /*LAN1 shares MAC with OS*/ + break; + case 0x0026: + case 0x0028: + case 0x0811: /* Alcolu & TIGW1U */ + fmBMC = 0; /* Intel Sahalee BMC*/ + fsharedMAC = 0; /* not-shared BMC LAN port, separate MAC */ + gcm_ch = 3; + break; + case 0x003E: /*NSN2U or CG2100 Urbanna*/ + fiBMC = 1; /* Intel iBMC */ + fsharedMAC = 0; /* not-shared BMC LAN port, separate MAC */ + set_max_kcs_loops(URNLOOPS); /*longer for SetLan cmds (default 300)*/ + break; + case 0x0107: /* Intel Caneland*/ + fsharedMAC = 0; /* not-shared BMC LAN port, separate MAC */ + gcm_ch = 3; + break; + case 0x0022: /* Intel TIGI2U*/ + fsharedMAC = 1; /*LAN1 shares MAC with OS*/ + gcm_ch = 3; + nusers = 4; + break; + default: /* else other Intel */ + if (fIPMI20) fsharedMAC = 0; /* recent, not-shared BMC MAC */ + else fsharedMAC = 1; /* usu IPMI 1.x has shared BMC MAC */ +#ifdef TEST + /* also check for ia64, and set chan_pefon, chan_pefoff accordingly*/ + if (prod_id == 0x0100) { /* Intel Tiger2, Itanium2 */ + chan_pefon = CHAN_ACC_PEFON64; + chan_pefoff = CHAN_ACC_PEFOFF64; + } +#endif + break; + } /*end switch*/ + if (is_romley(vend_id,prod_id)) { + fRomley = 1; + fiBMC = 1; /* Intel iBMC */ + fsharedMAC = 0; /* not-shared BMC LAN port, separate MAC */ + set_max_kcs_loops(URNLOOPS); /*longer for SetLan cmds */ + fipv6 = 1; + } + } else if (vend_id == VENDOR_KONTRON) { + //if (prod_id == 0x1590) fchan2wart = 1; /* KTC5520 chan2 wart */ + fsharedMAC = 0; /* not-shared BMC MAC */ + pefdesc = NULL; /* unknown, see PefDesc() */ + if (pefnum == 12) pefnum = 15; /* change CritStop pefnum to 15 */ + } else { /* else other vendors */ + if (fIPMI20) fsharedMAC = 0; /* recent, not-shared BMC MAC */ + else fsharedMAC = 1; /* usu IPMI 1.x has shared BMC MAC */ + fmBMC = 0; + pefdesc = NULL; /* unknown, see PefDesc() */ + if (pefnum == 12) pefnum = 15; /* change CritStop pefnum to 15? */ + pefmax = 20; + } + if (fmBMC) nusers = 1; + } + + ret = GetPefCapabilities(&bset); + if ((ret == 0) && (bset <= MAXPEF)) pefmax = bset; + + /* Get the BMC LAN channel & match it to an OS eth if. */ + i = GetBmcEthDevice(lan_ch_parm); + if (i == -2) { /* no lan channels */ + printf("This system does not support BMC LAN channels.\n"); + ret = ERR_NOT_ALLOWED; + goto do_exit; + } else if (i < 0) { /* mac not found, use platform defaults */ + i = 0; /* default to eth0, lan_ch set already. */ + if (vend_id == VENDOR_INTEL) { + if ((prod_id == 0x001B) || (prod_id == 0x000c)) { + /* Intel TIGPR2U or TSRLT2 defaults are special */ + if (lan_ch_parm == 6) + { i = 0; lan_ch = 6; } + else { i = 1; lan_ch = 7; } + ser_ch = 1; + } + } + } + if ((gcm_ch != 0) && (lan_ch_parm == 0xff)) { + /* Has a GCM, and user didn't specify -L */ + /* Need this to avoid picking channel 3, the IMM GCM channel. */ + lan_ch = 1; /*default BMC LAN channel*/ + // i = 1; /*default eth1*/ + } + if (fsetifn == 0) { + if (lan_ch == gcm_ch) strcpy(ifname,"gcm"); + else sprintf(ifname,"%s%d",ifpattn,i); + } + if (fdebug) printf("lan_ch = %d, ifname = %s\n",lan_ch,ifname); + + /* initialize the correct SOL command values */ + if (fIPMI20 && fSOL20) { + setsolcmd = SET_SOL_CONFIG2; + getsolcmd = GET_SOL_CONFIG2; + sol_bchan = lan_ch; + } else { + setsolcmd = SET_SOL_CONFIG; + getsolcmd = GET_SOL_CONFIG; + sol_bchan = 0x00; /*override chan for IPMI 1.5*/ + } + + memset(SessInfo,0,sizeof(SessInfo)); + ret = GetSessionInfo(SessInfo,sizeof(SessInfo)); + // rlen = sizeof(SessInfo)); ret = get_session_info(0,0,SessInfo,&rlen); + if (fdebug) printf("GetSessionInfo ret=%d, data: %02x %02x %02x %02x \n", + ret,SessInfo[0],SessInfo[1],SessInfo[2],SessInfo[3]); + if (!freadonly && fipmilan) { /* setting LAN params, and using IPMI LAN */ + if (SessInfo[2] > 1) { /* another session is active also */ + printf("Another session is also active, cannot change IPMI LAN settings now.\n"); + ret = ERR_NOT_ALLOWED; + goto do_exit; + } + } + + /* set the lan_user appropriately */ + if (freadonly) + { + if (!fIPMI10) { + printf("%c## %s, GetPefEntry ...\n",bcomment,progname); + for (idx = 1; idx <= pefmax; idx++) + { + ret = GetPefEntry( 0x06, (ushort)idx, &PefRecord); + if (ret == 0) { // Show the PEF record + pc = (uchar *)&PefRecord; + sz = 21; // sizeof(PEF_RECORD) = 21 + printf("%c PefParam(%d): %s\n",bcomment,idx,PefDesc(idx,pc[7])); + fprintf(fd_bmc,"PEFParam %d,%02d%c",6,idx,bdelim); + for (i = 0; i < sz; i++) fprintf(fd_bmc," %02x",pc[i]); + fprintf(fd_bmc,"\n"); + } else { + char *pstr; + if (ret > 0) pstr = decode_cc(0,(uchar)ret); + else pstr = ""; + printf("%c GetPefEntry(%d): ret = %d %s\n",bcomment,idx,ret,pstr); + if (ret == 0xC1) { + fpefok = 0; + ndest = 0; + break; + } + } + } + if (fpefok) { + ret = GetPefEntry(0x01, 0,(PEF_RECORD *)&LanRecord); + if (ret == 0) { + fprintf(fd_bmc,"PEFParam %d%c %02x\n",1,bdelim,LanRecord[0]); + } + ret = GetPefEntry(0x02, 0,(PEF_RECORD *)&LanRecord); + if (ret == 0) { + fprintf(fd_bmc,"PEFParam %d%c %02x\n",2,bdelim,LanRecord[0]); + } + ret = GetPefEntry(0x03, 0,(PEF_RECORD *)&LanRecord); + if (ret == 0) + fprintf(fd_bmc,"PEFParam %d%c %02x\n", 3,bdelim,LanRecord[0]); + if (!fmBMC) { + ret = GetPefEntry(0x04, 0,(PEF_RECORD *)&LanRecord); + if (ret == 0) + fprintf(fd_bmc,"PEFParam %d%c %02x\n",4,bdelim,LanRecord[0]); + /* fmBMC gets cc=0x80 here */ + } + /* note that ndest should be read from lan param 17 below. */ + for (i = 1; i <= ndest; i++) + { + ret = GetPefEntry(0x09, (ushort)i,(PEF_RECORD *)&LanRecord); + if (ret == 0) { + fprintf(fd_bmc,"PEFParam %d,%d%c %02x %02x %02x %02x \n",9,i,bdelim, + LanRecord[0], LanRecord[1],LanRecord[2], LanRecord[3]); + } + } /*endfor ndest*/ + } /*endif fpefok*/ + } /*endif not fIPMI10*/ + + for (chan = lan_ch; chan < MAXCHAN; chan++ ) + { + if (chan_type[chan] != 4) continue; /*chan != LAN, skip it*/ + lan_ch = chan; + printf("%c## %s, GetLanEntry for channel %d ...\n",bcomment,progname,lan_ch); + idest = 1; + for (idx = 0; idx < NLAN; idx++) + { + int ival; + if (idx == 8 || idx == 9) continue; /* not implemented */ + ival = lanparams[idx].cmd; + if (ival >= 96 && ival <= 98) continue; /* not implemented */ + if (ival >= 102 && ival <= 108) { /*custom IPv6 parameters*/ + if (fipv6 == 0) continue; /*skip these*/ + } + if (ival == 194 && vend_id == VENDOR_KONTRON) { /*oem hostname parm*/ + lanparams[idx].sz = 36; + strcpy(lanparams[idx].desc,"IPMI Hostname"); + } else if (ival >= 192 && ival <= 194) { /*custom DHCP parameters*/ + if (vend_id != VENDOR_INTEL) continue; + if (fmBMC || fiBMC || fRomley || fcanonical) continue; /*skip*/ + } + /* VLAN params 20-25, fIPMI20 only*/ + if (ival >= 20 && ival <= 25) { if (!fIPMI20) continue; } + if (ival == 11) { /*grat arp interval*/ + if (vend_id == VENDOR_SUPERMICROX) continue; + if (vend_id == VENDOR_SUPERMICRO) continue; + } + if (ival == 14 || ival == 15) { /*secondary gateway is optional*/ + if (vend_id == VENDOR_KONTRON) continue; + } + if (ival == 201) { /*Get Channel Access*/ + ret = ShowChanAcc(lan_ch); + } else { + if (ival == 18 || ival == 19) { /*dest params*/ + if (ndest == 0) continue; /*skip if none*/ + bset = (uchar)idest; /* dest id = 1 thru n */ + } else bset = 0; + ret = GetLanEntry((uchar)ival, bset, LanRecord); + } + if (ret == 0) { // Show the LAN record + pc = (uchar *)&LanRecord; + sz = lanparams[idx].sz; + if (ival == 201) ; /* ShowChanAcc(lan_ch) above */ + else { + fprintf(fd_bmc,"LanParam %d,%d,%d%c ",lan_ch,ival,bset,bdelim); + for (i = 0; i < sz; i++) fprintf(fd_bmc," %02x",pc[i]); + fprintf(fd_bmc,"\n"); + if (ival == 3) + printf("%c LanParam(%d,%d,%d) IP address: %d.%d.%d.%d\n", + bcomment, lan_ch,ival,bset, + pc[0], pc[1], pc[2], pc[3]); + } + + if (ival == 1) { + authmask = pc[0]; /* auth type support mask */ + /* if (fmBMC) authmask is usually 0x15, else 0x14 */ + } else if (ival == 3) { + if (IpIsValid(pc)) memcpy(bmcmyip,pc,4); + } else if (ival == 5) { + if (MacIsValid(pc)) memcpy(bmcmymac,pc,MAC_LEN); + } else if (ival == 17) { /* num dest */ + ndest = pc[0]; /* save the number of destinations */ + } else if (ival == 19) { /* dest addr */ + if (IpIsValid(&pc[3])) memcpy(bmcdestip,&pc[3],4); + } + + if (ival == 18 || ival == 19) { + if (idest < ndest) { + idest++; + idx--; /* repeat this param*/ + } else idest = 1; + } + } else { /* ret != 0 */ + if (ival >= 20 && ival <= 25) ; + else + printf("%c GetLanEntry(%d,%d,%d), ret = %d\n",bcomment,lan_ch,ival,bset,ret); + if (ival == 17) ndest = 0; /*error getting num dest*/ + } + } /*end for NLAN*/ + if (!fIPMI10) { /* Get SOL params */ + ret = GetSerialOverLan(lan_ch,0,0); + if (ret != 0) printf("%c GetSOL error %d\n",bcomment,ret); + } + for (idx = 1; idx <= nusers; idx++) + GetUser(idx); + if (lan_ch_parm != 0xff) chan = MAXCHAN; + } /*end-for chan*/ + + printf("%c## %s, GetSerEntry for channel %d ...\n",bcomment,progname,ser_ch); + if (fmBMC || (ser_ch == 0)) { /* mBMC doesn't support serial */ + printf("%cNo serial channel support on this platform\n", + bcomment); + } else { + idest = 1; + for (idx = 0; idx < NSER; idx++) { + int ival; + // if (idx == 9) continue; /* not implemented */ + ival = serparams[idx].cmd; + if (vend_id == VENDOR_SUPERMICRO && ival == 8) continue; + if (ival == 201) { + j = ShowChanAcc(ser_ch); + } else { + if (ival == 17 || ival == 19 || ival == 21 || ival == 23) + bset = (uchar)idest; + else bset = 0; /*default*/ + ret = GetSerEntry((uchar)ival, bset, LanRecord); + if (ret == 0) { // Show the SER record + pc = (uchar *)&LanRecord; + sz = serparams[idx].sz; + fprintf(fd_bmc,"SerialParam %d,%d,%d%c", + ser_ch,ival,bset,bdelim); + for (i = 0; i < sz; i++) + fprintf(fd_bmc," %02x",pc[i]); /* show in hex */ + fprintf(fd_bmc,"\n"); + if (ival == 16) ndest = pc[0]; + } else { /*ret != 0, error*/ + char *pstr; + char *tag; + if (SerialIsOptional(ival)) tag = "Optional"; + else tag = ""; + if (ret > 0) pstr = decode_cc(0,ret); + else pstr = ""; + printf("%c GetSerEntry(%d,%d): %s ret = %d %s\n", + bcomment,ser_ch,ival,tag,ret,pstr); + if (ival == 16) ndest = 0; + if (ret == 0xC1) { + ret = 0; + break; /*not supported, exit for loop*/ + } + } + } + if (ival == 17 || ival == 19 || ival == 21 || ival == 23) { + if (idest < ndest) { + idest++; + idx--; /* repeat this param*/ + } else idest = 1; + } + } /*end for NSER*/ + lan_ch_sav = lan_ch; + lan_ch = ser_ch; /* use ser_ch for User functions now */ + for (idx = 1; idx <= nusers; idx++) + GetUser(idx); + lan_ch = lan_ch_sav; + } /*endif serial*/ + + printf("%c## %s, GetSystemParams ...\n",bcomment,progname); + for (idx = 0; idx < NSYS; idx++) { /*Get System Params*/ + switch(idx) { + case 0: j = CHAS_RESTORE; bset = 0; break; + case 1: j = SYS_INFO; bset = 1; break; + case 2: j = SYS_INFO; bset = 2; break; + case 3: j = SYS_INFO; bset = 3; break; + case 4: j = SYS_INFO; bset = 4; break; + case 5: + default: j = LAN_FAILOVER; bset = 0; break; + } + fignore_err = 0; + pc = (uchar *)&LanRecord; + switch(j) { + case CHAS_RESTORE: /* Chassis Status, Power Restore Policy */ + sz = 0; + rlen = sizeof(rData); + ret = ipmi_cmdraw(CHASSIS_STATUS, NETFN_CHAS, + BMC_SA,PUBLIC_BUS,BMC_LUN, + pc,0,rData,&rlen,&cc,fdebug); + if (ret == 0 && cc != 0) ret = cc; + if (ret == 0) { + sz = rlen; + memcpy(pc,&rData,sz); /*should be 3 bytes*/ + } + break; + case SYS_INFO: /* System Info */ + if (! fIPMI20) continue; /*skip if not IPMI 2.0*/ + rlen = sizeof(LanRecord); /* param from read */ + ret = get_system_info(bset,LanRecord,&rlen); + /* find actual string size (ends at first 0x00) */ + for (i=0; i<rlen; i++) if (LanRecord[i] == 0) break; + if (i < rlen) rlen = i; + sz = rlen; + fignore_err = 1; + break; + case LAN_FAILOVER: /* Intel LAN Failover */ + if (is_romley(vend_id,prod_id)) + ret = lan_failover_intel(0xFF,&LanRecord[0]); + else continue; /*skip if not Intel Romley */ + sz = 1; + fignore_err = 1; + break; + default: /*do nothing*/ + sz = 0; + ret = LAN_ERR_NOTSUPPORT; + break; + } /*end switch*/ + if (ret == 0) { + fprintf(fd_bmc,"SystemParam %d,%d%c ",j,bset,bdelim); + for (i = 0; i < sz; i++) fprintf(fd_bmc," %02x",pc[i]); + fprintf(fd_bmc,"\n"); + } else { + char *pstr; + if (ret > 0) pstr = decode_cc(0,ret); + else pstr = ""; + if (fdebug || !fignore_err) + printf("%c GetSystemParam(%d,%d): ret = %d %s\n", + bcomment,j,bset,ret,pstr); + if (fignore_err) ret = 0; + } + } /*end-for System Params*/ + + } /*endif readonly*/ + + if (!freadonly) /* Set parameters via Restore */ + { + if (fipmilan) { /* Sets not valid via ipmi_lan if same channel. */ + printf("\nWarning: Setting LAN %d params while using a LAN channel.\n", lan_ch); + } + GetUser(1); /*sets num enabled_users */ + + /* Set BMC parameters. (restore) */ + /* read each record from the file */ + while ( fgets( line, sizeof(line), fd_bmc) != NULL ) + { + ret = parse_line(line, key, value); + if (ret != 0) { + if (ret == 2) ret = 0; /*just skip comment*/ + else if (fdebug) printf("parse error on line: %s\n",line); + continue; + } + + /* get parameters from key */ + sz = sizeof(bParams); + memset(bParams,0,sz); + pk = strchr(key,' '); /*skip keyword, to first param*/ + if (pk == NULL) { + pk = &key[0]; + } + for (n=0; n<sz; n++) + { + pc = strchr(pk,','); + if (pc != NULL) { + *pc = 0; + bParams[n] = atob(pk); + pk = (char *)++pc; + } else { + bParams[n] = atob(pk); + break; + } + } + /* n == number of params, usually 3 */ + chan = bParams[0]; + idx = bParams[1]; + bset = bParams[2]; + /* get data from value */ + pc = value; + sz = strlen_(value); + for (j=0,i=0; i<sz; i+=3) + LanRecord[j++] = htoi(&pc[i]); + if (fdebug) { + printf("Record(%d,%d,%d):",chan,idx,bset); + for (i=0; i<j; i++) printf(" %02x",LanRecord[i]); + printf("\n"); + } + + if (strncasecmp(key,"LanParam",8) == 0) { + if (idx == 0) continue; /*skip Set in progress*/ + if (idx == 1 || idx == 17) continue; /*read-only params*/ + if (idx == 5 && fIPMI20) /*BMC MAC address & IPMI 2.0(not shared)*/ + if (fdomac == 0) continue; /*skip BMC MAC unless -m */ + if ((idx == 10) && (chan == gcm_ch)) continue; /*skip Lan3 arp*/ + if ((vend_id == VENDOR_PEPPERCON) && (idx == 7)) continue; + if ((idx == 18 || idx == 19) && (ndest == 0)) continue; + if (idx >= 22 && idx <= 24) continue; /*read-only Cipher*/ + else if (idx >= 20 && idx <= 25) { /*VLAN*/ + if (!fIPMI20) continue; + } + if (idx == 18) j--; /*one less byte for Set than from Get*/ + lan_ch = chan; + if (idx == 3) { /* 3 = IP address */ + uchar bdata[2]; + bdata[0] = 0x00; /*disable grat arp while setting IP*/ + ret = SetLanEntry(10, &bdata[0], 1); + if (fdebug) printf("SetLanEntry(%d,10,0), ret = %d\n",chan,ret); + WaitForSetComplete(4); /*wait if it is a slow MC */ + bdata[0] = SRC_STATIC; /*set src to static before setting IP*/ + ret = SetLanEntry(4, &bdata[0], 1); + if (fdebug) printf("SetLanEntry(%d,4,0), ret = %d\n",chan,ret); + WaitForSetComplete(4); /*wait if it is a slow MC */ + } + else if ((idx == 6) || (idx == 12)) WaitForSetComplete(4); + ret = SetLanEntry(idx, LanRecord, j); + if ((ret != 0) && (idx >= 20 && idx <= 25)) ; /*VLAN optional*/ + else { + printf("SetLanEntry(%d,%d), ret = %d\n",chan,idx,ret); + if (ret != 0) { nerrs++; lasterr = ret; } + else ngood++; + } + + } else if (strncasecmp(key,"PEFParam",8) == 0) { + if (fpefok == 0) continue; + idx = bParams[0]; + bset = bParams[1]; + if (idx == 6) { /*PEF table rules*/ + pPefRecord = (PEF_RECORD *)&LanRecord[0]; + if (pPefRecord->fconfig == 0xC0) { + pPefRecord->fconfig = 0x80; /* enabled, software */ + ret = SetPefEntry(pPefRecord); + if (fdebug) + printf("SetPefEntry(%d,%d/80) ret = %d\n",idx,bset,ret); + pPefRecord->fconfig = 0xC0; + } + ret = SetPefEntry(pPefRecord); + printf("SetPefEntry(%d,%d) ret = %d\n",idx,bset,ret); + if (ret != 0) { nerrs++; lasterr = ret; } + else ngood++; + } else { + pc = (uchar *)&PefRecord; + pc[0] = idx; + for (i=0; i<j; i++) + pc[i+1] = LanRecord[i]; + rlen = sizeof(rData); + ret = ipmi_cmd(SET_PEF_CONFIG, pc,j+1, rData,&rlen, &cc,fdebug); + if ((ret == 0) && (cc != 0)) ret = cc; + if ((idx == 9) && (bset > 1) && (ret != 0)); /*9=PEF Policy*/ + else { + printf("SetPefEntry(%d,%d) ret = %d\n",idx,bset,ret); + if (ret != 0) { nerrs++; lasterr = ret; } + else ngood++; + } + } + if (ret == 0xC1) { fpefok = 0; ndest = 0; } + + } else if (strncasecmp(key,"SerialParam",11) == 0) { + if (idx == 0) continue; /*skip Set in progress*/ + if (idx == 1 || idx == 16) continue; /*read-only param*/ + if (vend_id == VENDOR_PEPPERCON) { + if ((idx >= 3) && (idx <= 6)) continue; + } + if ((vend_id == VENDOR_SUPERMICROX) || + (vend_id == VENDOR_SUPERMICRO)) { + if (idx == 3) continue; + if ((idx >= 6) && (idx <= 8)) continue; + if (idx == 29) continue; + } + if (fmBMC || (ser_ch == 0)) continue; /*doesn't support serial*/ + ser_ch = chan; + ret = SetSerEntry(idx, LanRecord, j); + if ((ret != 0) && SerialIsOptional(idx)) ; /*ignore errors if opt*/ + else { + printf("SetSerEntry(%d,%d,%d), ret = %d\n",chan,idx,bset,ret); + if (ret != 0) { nerrs++; lasterr = ret; } + else ngood++; + } + } else if (strncasecmp(key,"ChannelAccess",13) == 0) { + if (((vend_id == VENDOR_SUPERMICROX) || + (vend_id == VENDOR_SUPERMICRO)) && chan == 3) ; /*skip serial*/ + else { + ret = SetChanAcc(chan, 0x80, LanRecord[0], LanRecord[1]); + if (fdebug) printf("SetChanAcc(%d/active), ret = %d\n",chan,ret); + ret = SetChanAcc(chan, 0x40, LanRecord[0], LanRecord[1]); + printf("SetChanAcc(%d), ret = %d\n",chan,ret); + if (ret != 0) { nerrs++; lasterr = ret; } + else ngood++; + } + + } else if (strncasecmp(key,"UserName",8) == 0) { + if (fchan2wart && (lan_ch == 2)) continue; + idx = bParams[0]; + if (idx <= 1) ; /*skip if anonymous user 1*/ + else if (idx == 2 && vend_id == VENDOR_SUPERMICROX) ; /*skip user2*/ + else if (idx == 2 && vend_id == VENDOR_SUPERMICRO) ; /*skip user2*/ + else { + pc = (uchar *)&PefRecord; + pc[0] = idx; /*user num*/ + memcpy(&pc[1],&LanRecord[0],16); + rlen = sizeof(rData); + ret = ipmi_cmd(SET_USER_NAME,pc,17, rData,&rlen, &cc,fdebug); + if (ret == 0 && cc != 0) ret = cc; + if (ret == 0xCC) ; /*SetUserName matching previous gives this*/ + else { + printf("SetUserName(%d) ret = %d\n",idx,ret); + if (ret != 0) { nerrs++; lasterr = ret; } + else ngood++; + } + } + if (fpassword) { + pc = (uchar *)&PefRecord; + pc[0] = idx; /*user num*/ + pc[1] = 0x02; /*set password*/ + memset(&pc[2],0, PSW_LEN); + strcpy(&pc[2],passwordData); + rlen = sizeof(rData); + ret = ipmi_cmd(SET_USER_PASSWORD,pc,2+PSW_LEN,rData,&rlen, + &cc,fdebug); + printf("SetUserPassword(%d) ret = %d\n",idx,ret); + if (ret != 0) { nerrs++; lasterr = ret; } + else ngood++; + } + } else if (strncasecmp(key,"UserPassword",12) == 0) { + if (fchan2wart && (lan_ch == 2)) continue; + idx = bParams[0]; + pc = (uchar *)&PefRecord; + pc[0] = idx; /*user num*/ + pc[1] = 0x02; /*set password*/ + memset(&pc[2],0,PSW_LEN); + strcpy(&pc[2],passwordData); + rlen = sizeof(rData); + ret = ipmi_cmd(SET_USER_PASSWORD,pc,2+PSW_LEN,rData,&rlen, + &cc,fdebug); + printf("SetUserPassword(%d) ret = %d\n",idx,ret); + if (ret != 0) { nerrs++; lasterr = ret; } + else ngood++; + } else if (strncasecmp(key,"UserAccess",10) == 0) { + if ((idx > enabled_users) && ((LanRecord[3] & 0x10) == 0)) continue; + if (vend_id == VENDOR_KONTRON) { + if (idx == 1) continue; + if (idx > enabled_users) continue; + } + if (ipmi_reserved_user(vend_id,idx) == 1) continue; + if (fchan2wart && (lan_ch == 2)) continue; + pc = (uchar *)&PefRecord;; + pc[0] = 0x80 | (LanRecord[3] & 0x70) | chan; /*User Channel Access*/ + pc[1] = idx; /*user id*/ + pc[2] = (LanRecord[3] & 0x0F); /*User Privilege (Admin,User,Oper)*/ + pc[3] = 0x00; /* User Session Limit, 0=not limited*/ + rlen = sizeof(rData); + ret = ipmi_cmd(SET_USER_ACCESS,pc,4, rData,&rlen, &cc,fdebug); + if (ret == 0 && cc != 0) ret = cc; + if (ret != 0xCC) { /*if invalid user, ignore errors*/ + printf("SetUserAccess (%x %x %x %x) ret = %d\n", + pc[0],pc[1],pc[2],pc[3],ret); + if (ret != 0) { nerrs++; lasterr = ret; } + else ngood++; + } + if ((LanRecord[3] & 0x0f) != 0x0F) { /*not NoAccess, enable user*/ + if (idx > last_user_enable) last_user_enable = idx; + pc[0] = idx; /*user number, 1=null_user */ + pc[1] = 0x01; /*enable user*/ + rlen = sizeof(rData); + ret = ipmi_cmd(SET_USER_PASSWORD,pc,2, rData,&rlen, &cc,fdebug); + if (ret == 0 && cc != 0) ret = cc; + printf("SetUserEnable (%x %x) ret = %d\n",pc[0],pc[1],ret); + if (ret != 0) { nerrs++; lasterr = ret; } + else ngood++; + } + } else if (strncasecmp(key,"SOLParam",8) == 0) { + if (fchan2wart && (chan == 2)) continue; + pc = (uchar *)&PefRecord;; + pc[0] = chan; + pc[1] = idx; /*sol parameter number*/ + memcpy(&pc[2],&LanRecord,j); + rlen = sizeof(rData); + ret = ipmi_cmd(setsolcmd, pc, j+2, rData,&rlen, &cc,fdebug); + if (ret == 0 && cc != 0) ret = cc; + printf("SetSOLParam (%d,%d) ret = %d\n",chan,idx,ret); + if (ret != 0) { nerrs++; lasterr = ret; } + else ngood++; + + } else if (strncasecmp(key,"SOLPayloadSupport",17) == 0) { + ; /* Nothing to do, this is a read-only parameter */ + + } else if (strncasecmp(key,"SOLPayloadAccess",16) == 0) { + if (fIPMI20) { + if (ipmi_reserved_user(vend_id,idx) == 1) continue; + pc = (uchar *)&PefRecord;; + pc[0] = chan; + pc[1] = idx; // lan_user + memcpy(&pc[2],&LanRecord,j); + rlen = sizeof(rData); + ret = ipmi_cmdraw(SET_PAYLOAD_ACCESS,NETFN_APP, + BMC_SA,PUBLIC_BUS,BMC_LUN, + pc,j+2,rData,&rlen,&cc,fdebug); + if (ret == 0 && cc != 0) ret = cc; + printf("SetSOLPayloadAccess (%d,%d) ret = %d\n", + chan,idx,ret); + if (ret != 0) { nerrs++; lasterr = ret; } + else ngood++; + } + } else if (strncasecmp(key,"SystemParam",11) == 0) { + idx = bParams[0]; + bset = bParams[1]; + switch(idx) { + case CHAS_RESTORE: /* Chassis Power Restore Policy*/ + if (vend_id == VENDOR_KONTRON) continue; /*N/A, cannot set it*/ + pc = (uchar *)&PefRecord;; + i = (LanRecord[0] & 0x60); /*restore policy bits*/ + if (i & 0x20) pc[0] = 0x01; /*last_state*/ + else if (i & 0x40) pc[0] = 0x02; /*turn_on*/ + else pc[0] = 0x00; /*stay_off*/ + rlen = sizeof(rData); + ret = ipmi_cmdraw(0x06 , NETFN_CHAS, + BMC_SA,PUBLIC_BUS,BMC_LUN, + pc,1,rData,&rlen,&cc,fdebug); + if (ret == 0 && cc != 0) ret = cc; + break; + case SYS_INFO: /* System Info */ + if (! fIPMI20) continue; /*skip if not IPMI 2.0*/ + /* j = #bytes read into LanRecord */ + ret = set_system_info(bset,LanRecord,j); + break; + case LAN_FAILOVER: /* Intel LAN Failover */ + if (is_romley(vend_id,prod_id)) + ret = lan_failover_intel(LanRecord[0],(uchar *)&i); + else continue; /*skip if not Intel Romley*/ + break; + default: + ret = LAN_ERR_NOTSUPPORT; + } + printf("SetSystemParam(%d,%d) ret = %d\n",idx,bset,ret); + if (ret != 0) { nerrs++; lasterr = ret; } + else ngood++; + } /*end-else*/ + + } /*end-while*/ + + /* Disable any users not enabled above */ + for (i = last_user_enable+1; i < max_users; i++) { + pc[0] = (uchar)i; /*user number, 1=null_user */ + pc[1] = 0x00; /*disable user*/ + rlen = sizeof(rData); + ret = ipmi_cmd(SET_USER_PASSWORD,pc,2, rData,&rlen, &cc,fdebug); + if (ret == 0 && cc != 0) ret = cc; + printf("SetUserEnable (%x %x) ret = %d\n",pc[0],pc[1],ret); + if (ret != 0) { nerrs++; lasterr = ret; } + else ngood++; + } + } /*endif not readonly*/ + +do_exit: + if (fd_bmc != stdout) fclose(fd_bmc); + ipmi_close_(); + if (nerrs > 0) { + printf("Warning: %d ok, %d errors occurred, last error = %d\n",ngood,nerrs,lasterr); + ret = lasterr; + } + // show_outcome(progname,ret); + return(ret); +} /* end main()*/ + +/* end iconfig.c */ |