Merge branch 'master' into squeeze
[debian/amanda] / ndmp-src / smc_pp.c
diff --git a/ndmp-src/smc_pp.c b/ndmp-src/smc_pp.c
new file mode 100644 (file)
index 0000000..8be0101
--- /dev/null
@@ -0,0 +1,188 @@
+/*
+ * 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;
+}
+