patch-2.4.2 linux/arch/s390x/kernel/cpcmd.c

• Lines: 50
• Date: Tue Feb 13 14:13:44 2001
• Orig file: v2.4.1/linux/arch/s390x/kernel/cpcmd.c
• Orig date: Wed Dec 31 16:00:00 1969

diff -u --recursive --new-file v2.4.1/linux/arch/s390x/kernel/cpcmd.c linux/arch/s390x/kernel/cpcmd.c
@@ -0,0 +1,49 @@
+/*
+ *  arch/s390/kernel/cpcmd.c
+ *
+ *  S390 version
+ *    Copyright (C) 1999,2000 IBM Deutschland Entwicklung GmbH, IBM Corporation
+ *    Author(s): Martin Schwidefsky (schwidefsky@de.ibm.com),
+ */
+
+#include <linux/stddef.h>
+#include <linux/kernel.h>
+#include <linux/string.h>
+#include <asm/ebcdic.h>
+
+void cpcmd(char *cmd, char *response, int rlen)
+{
+        const int mask = 0x40000000L;
+        char obuffer[128];
+        int olen;
+
+        olen = strlen(cmd);
+        strcpy(obuffer, cmd);
+        ASCEBC(obuffer,olen);
+
+        if (response != NULL && rlen > 0) {
+                asm volatile ("   lrag  2,0(%0)\n"
+                              "   lgr   4,%1\n"
+                              "   o     4,%4\n"
+                              "   lrag  3,0(%2)\n"
+                              "   lgr   5,%3\n"
+                              "   sam31\n"
+                              "   .long 0x83240008 # Diagnose 83\n"
+                              "   sam64"
+                              : /* no output */
+                              : "a" (obuffer), "d" (olen),
+                                "a" (response), "d" (rlen), "m" (mask)
+                              : "2", "3", "4", "5" );
+                EBCASC(response, rlen);
+        } else {
+                asm volatile ("   lrag  2,0(%0)\n"
+                              "   lgr   3,%1\n"
+                              "   sam31\n"
+                              "   .long 0x83230008 # Diagnose 83\n"
+                              "   sam64"
+                              : /* no output */
+                              : "a" (obuffer), "d" (olen)
+                              : "2", "3"  );
+        }
+}
+