Add qemu 2.4.0
[kvmfornfv.git] / qemu / roms / ipxe / src / usr / fcmgmt.c
diff --git a/qemu/roms/ipxe/src/usr/fcmgmt.c b/qemu/roms/ipxe/src/usr/fcmgmt.c
new file mode 100644 (file)
index 0000000..a30f37a
--- /dev/null
@@ -0,0 +1,116 @@
+/*
+ * Copyright (C) 2010 Michael Brown <mbrown@fensystems.co.uk>.
+ *
+ * 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 of the
+ * License, or 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, write to the Free Software
+ * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA
+ * 02110-1301, USA.
+ */
+
+FILE_LICENCE ( GPL2_OR_LATER );
+
+#include <string.h>
+#include <stdio.h>
+#include <errno.h>
+#include <ipxe/fc.h>
+#include <ipxe/fcels.h>
+#include <ipxe/monojob.h>
+#include <usr/fcmgmt.h>
+
+/** @file
+ *
+ * Fibre Channel management
+ *
+ */
+
+/**
+ * Print status of Fibre Channel port
+ *
+ * @v port             Fibre Channel port
+ */
+void fcportstat ( struct fc_port *port ) {
+       printf ( "%s: %s id %s", port->name, fc_ntoa ( &port->port_wwn ),
+                fc_id_ntoa ( &port->port_id ) );
+       printf ( " node %s\n  [Link:", fc_ntoa ( &port->node_wwn ) );
+       if ( fc_link_ok ( &port->link ) ) {
+               printf ( " up, %s", fc_ntoa ( &port->link_port_wwn ) );
+               if ( ( port->flags & FC_PORT_HAS_FABRIC ) ) {
+                       printf ( " fabric" );
+               } else {
+                       printf ( " id %s",
+                                fc_id_ntoa ( &port->ptp_link_port_id ) );
+               }
+               printf ( " node %s]\n", fc_ntoa ( &port->link_node_wwn ) );
+       } else {
+               printf ( " down: %s]\n", strerror ( port->link.rc ) );
+       }
+}
+
+/**
+ * Print status of Fibre Channel peer
+ *
+ * @v peer             Fibre Channel peer
+ */
+void fcpeerstat ( struct fc_peer *peer ) {
+       struct fc_ulp *ulp;
+       uint8_t *param;
+       unsigned int i;
+
+       printf ( "%s:\n  [Link:", fc_ntoa ( &peer->port_wwn ) );
+       if ( fc_link_ok ( &peer->link ) ) {
+               printf ( " up, port %s id %s]\n", peer->port->name,
+                        fc_id_ntoa ( &peer->port_id ) );
+       } else {
+               printf ( " down: %s]\n", strerror ( peer->link.rc ) );
+       }
+
+       list_for_each_entry ( ulp, &peer->ulps, list ) {
+               printf ( "  [Type %02x link:", ulp->type );
+               if ( fc_link_ok ( &ulp->link ) ) {
+                       printf ( " up, params" );
+                       param = ulp->param;
+                       for ( i = 0 ; i < ulp->param_len ; i++ ) {
+                               printf ( "%c%02x", ( ( i == 0 ) ? ' ' : ':' ),
+                                        param[i] );
+                       }
+               } else {
+                       printf ( " down: %s", strerror ( ulp->link.rc ) );
+               }
+               printf ( "]\n" );
+       }
+}
+
+/**
+ * Issue Fibre Channel ELS
+ *
+ * @v port             Fibre Channel port
+ * @v peer_port_id     Peer port ID
+ * @v handler          ELS handler
+ * @ret rc             Return status code
+ */
+int fcels ( struct fc_port *port, struct fc_port_id *peer_port_id,
+           struct fc_els_handler *handler ) {
+       int rc;
+
+       /* Initiate ELS */
+       printf ( "%s %s to %s...",
+                port->name, handler->name, fc_id_ntoa ( peer_port_id ) );
+       if ( ( rc = fc_els_request ( &monojob, port, peer_port_id,
+                                    handler ) ) != 0 ) {
+               printf ( "%s\n", strerror ( rc ) );
+               return rc;
+       }
+
+       /* Wait for ELS to complete */
+       return monojob_wait ( "", 0 );
+}