--- /dev/null
+/*
+ * Copyright (c) 1998,1999,2000
+ * Traakan, Inc., Los Altos, CA
+ * All rights reserved.
+ *
+ * Redistribution and use in source and binary forms, with or without
+ * modification, are permitted provided that the following conditions
+ * are met:
+ * 1. Redistributions of source code must retain the above copyright
+ * notice unmodified, this list of conditions, and the following
+ * disclaimer.
+ * 2. 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.
+ *
+ * THIS SOFTWARE IS PROVIDED BY THE AUTHOR 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 AUTHOR 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.
+ */
+
+/*
+ * Project: NDMJOB
+ * Ident: $Id: $
+ *
+ * Description:
+ *
+ */
+
+
+#include "smc_priv.h"
+
+static char *strend(char *s);
+
+
+
+char *
+smc_elem_type_code_to_str(int code)
+{
+ switch (code) {
+ case SMC_ELEM_TYPE_ALL: return "ALL";
+ case SMC_ELEM_TYPE_MTE: return "ARM";
+ case SMC_ELEM_TYPE_SE: return "SLOT";
+ case SMC_ELEM_TYPE_IEE: return "IEE";
+ case SMC_ELEM_TYPE_DTE: return "TAPE";
+ default: return "???";
+ }
+}
+
+int
+smc_pp_element_address_assignments (struct smc_element_address_assignment *eaa,
+ int lineno, char *buf)
+{
+ sprintf (buf, "slots %d@%d drive %d@%d arm %d@%d i/e %d@%d",
+ eaa->se_count, eaa->se_addr,
+ eaa->dte_count, eaa->dte_addr,
+ eaa->mte_count, eaa->mte_addr,
+ eaa->iee_count, eaa->iee_addr);
+
+ return 1;
+}
+
+int
+smc_pp_element_descriptor (struct smc_element_descriptor *edp,
+ int lineno, char *ret_buf)
+{
+ int nline = 0;
+ char buf[100];
+
+ *ret_buf = 0;
+ *buf = 0;
+
+ sprintf (buf, "@%-3d %-4s",
+ edp->element_address,
+ smc_elem_type_code_to_str(edp->element_type_code));
+
+ if (edp->Full)
+ strcat (buf, " Full ");
+ else
+ strcat (buf, " Empty");
+
+ if (edp->element_type_code == SMC_ELEM_TYPE_MTE) {
+ if (edp->Access) {
+ /* unusual for MTE */
+ /* actually not defined */
+ strcat (buf, " ?access=granted?");
+ }
+ } else {
+ if (!edp->Access) {
+ /* unusual for all non-MTE elements */
+ strcat (buf, " ?access=denied?");
+ }
+ }
+
+ if (edp->PVolTag && edp->Full) {
+ sprintf (strend(buf), " PVolTag(%s,#%d)",
+ edp->primary_vol_tag.volume_id,
+ edp->primary_vol_tag.volume_seq);
+ }
+
+ if (edp->Except) {
+ sprintf (strend(buf), " Except(asc=%02x,ascq=%02x)",
+ edp->asc, edp->ascq);
+ }
+
+ if (*buf && nline++ == lineno) strcpy (ret_buf, buf);
+ *buf = 0;
+
+#define INDENT_SPACES " " /* 10 spaces */
+
+ if (edp->AVolTag) {
+ sprintf (buf, INDENT_SPACES "AVolTag(%s,#%d)",
+ edp->alternate_vol_tag.volume_id,
+ edp->alternate_vol_tag.volume_seq);
+ }
+
+ if (*buf && nline++ == lineno) strcpy (ret_buf, buf);
+ *buf = 0;
+
+ if (edp->SValid) {
+ sprintf (buf, INDENT_SPACES "SValid(src=%d,%sinvert)",
+ edp->src_se_addr,
+ edp->Invert ? "" : "!");
+ }
+
+ if (*buf && nline++ == lineno) strcpy (ret_buf, buf);
+ *buf = 0;
+
+ if (edp->element_type_code == SMC_ELEM_TYPE_DTE) {
+ strcpy (buf, INDENT_SPACES);
+ if (edp->ID_valid) {
+ sprintf (strend(buf), "ID sid=%d", edp->scsi_sid);
+ } else {
+ strcat (buf, "no-sid-data");
+ }
+ if (edp->LU_valid) {
+ sprintf (strend(buf), " lun=%d", edp->scsi_lun);
+ } else {
+ strcat (buf, " no-lun-data");
+ }
+
+ if (edp->ID_valid && edp->Not_bus) {
+ strcat (buf, " not-same-bus");
+ }
+ }
+
+ if (*buf && nline++ == lineno) strcpy (ret_buf, buf);
+ *buf = 0;
+
+ if (edp->element_type_code == SMC_ELEM_TYPE_IEE) {
+ strcpy (buf, INDENT_SPACES);
+
+ if (edp->InEnab)
+ strcat (buf, " can-import");
+ else
+ strcat (buf, " can-not-import");
+
+ if (edp->ExEnab)
+ strcat (buf, " can-export");
+ else
+ strcat (buf, " can-not-export");
+
+ if (edp->ImpExp)
+ strcat (buf, " by-oper");
+ else
+ strcat (buf, " by-mte");
+ }
+
+ if (*buf && nline++ == lineno) strcpy (ret_buf, buf);
+ *buf = 0;
+
+ return nline;
+}
+
+static char *
+strend (char *s)
+{
+ while (*s) s++;
+ return s;
+}
+