Move target type and character translation into the common dir

git-svn-id: svn://svn.cc65.org/cc65/trunk@296 b7a2c559-68d2-44c3-8de9-860c34a00d81

diff --git a/src/common/make/gcc.mak b/src/common/make/gcc.mak
index 6da3bd4ac20bb8fcbc8d5944219a0a71ad09f8c6..d6dddbf6d01fa68f0f04ddb630af73e5f716a968 100644 (file)
--- a/src/common/make/gcc.mak
+++ b/src/common/make/gcc.mak
@@ -17,6 +17,8 @@ OBJS =        abend.o         \
        exprdefs.o      \
        fname.o         \
        hashstr.o       \
+       target.o        \
+       tgttrans.o      \
        xmalloc.o       \
        xsprintf.o
 
@@ -55,3 +57,4 @@ depend dep:   $(OBJS:.o=.c)
 
 
 
+

diff --git a/src/common/make/watcom.mak b/src/common/make/watcom.mak
index ce36404897f7c31b1a7c809c5c86033fe6d75718..fa39062f5f67364db2faea05a7a505b838620241 100644 (file)
--- a/src/common/make/watcom.mak
+++ b/src/common/make/watcom.mak
@@ -74,12 +74,14 @@ OBJS =      abend.obj       \
        fname.obj       \
        hashstr.obj     \
        wildargv.obj    \
+       target.obj      \
+       tgttrans.obj    \
        xmalloc.obj     \
        xsprintf.obj
 
 
 .PRECIOUS $(OBJS:.obj=.cc) $(LIB)
-
+                        
 # ------------------------------------------------------------------------------
 # Main targets
 

diff --git a/src/common/target.c b/src/common/target.c
new file mode 100644 (file)
index 0000000..74864d2
--- /dev/null
+++ b/src/common/target.c
@@ -0,0 +1,102 @@
+/*****************************************************************************/
+/*                                                                           */
+/*                                target.c                                  */
+/*                                                                           */
+/*                          Target specification                            */
+/*                                                                           */
+/*                                                                           */
+/*                                                                           */
+/* (C) 2000      Ullrich von Bassewitz                                       */
+/*               Wacholderweg 14                                             */
+/*               D-70597 Stuttgart                                           */
+/* EMail:        uz@musoftware.de                                            */
+/*                                                                           */
+/*                                                                           */
+/* This software is provided 'as-is', without any expressed or implied       */
+/* warranty.  In no event will the authors be held liable for any damages    */
+/* arising from the use of this software.                                    */
+/*                                                                           */
+/* Permission is granted to anyone to use this software for any purpose,     */
+/* including commercial applications, and to alter it and redistribute it    */
+/* freely, subject to the following restrictions:                            */
+/*                                                                           */
+/* 1. The origin of this software must not be misrepresented; you must not   */
+/*    claim that you wrote the original software. If you use this software   */
+/*    in a product, an acknowledgment in the product documentation would be  */
+/*    appreciated but is not required.                                       */
+/* 2. Altered source versions must be plainly marked as such, and must not   */
+/*    be misrepresented as being the original software.                      */
+/* 3. This notice may not be removed or altered from any source              */
+/*    distribution.                                                          */
+/*                                                                           */
+/*****************************************************************************/
+
+
+
+#include <stdlib.h>
+#include <ctype.h>
+
+#include "target.h"
+
+
+
+/*****************************************************************************/
+/*                                          Data                                    */
+/*****************************************************************************/
+
+
+
+/* Target system */
+target_t Target        = TGT_NONE;
+
+/* Table with target names */
+const char* TargetNames [TGT_COUNT] = {
+    "none",
+    "atari",
+    "c64",
+    "c128",
+    "ace",
+    "plus4",
+    "cbm610",
+    "pet",
+    "nes",
+    "apple2",
+    "geos",
+};
+
+
+
+/*****************************************************************************/
+/*                                          Code                                    */
+/*****************************************************************************/
+
+
+
+target_t FindTarget (const char* Name)
+/* Find a target by name and return the target id. TGT_UNKNOWN is returned if
+ * the given name is no valid target.
+ */
+{
+    unsigned I;
+
+    /* Check for a numeric target */
+    if (isdigit (*Name)) {
+               int Target = atoi (Name);
+       if (Target >= 0 && Target < TGT_COUNT) {
+           return (target_t)Target;
+       }
+    }
+
+    /* Check for a target string */
+    for (I = 0; I < TGT_COUNT; ++I) {
+       if (strcmp (TargetNames [I], Name) == 0) {
+           return (target_t)I;
+       }
+    }
+
+    /* Not found */
+    return TGT_UNKNOWN;
+}
+
+
+

diff --git a/src/common/target.h b/src/common/target.h
new file mode 100644 (file)
index 0000000..02080ab
--- /dev/null
+++ b/src/common/target.h
@@ -0,0 +1,90 @@
+/*****************************************************************************/
+/*                                                                           */
+/*                                target.h                                  */
+/*                                                                           */
+/*                          Target specification                            */
+/*                                                                           */
+/*                                                                           */
+/*                                                                           */
+/* (C) 2000      Ullrich von Bassewitz                                       */
+/*               Wacholderweg 14                                             */
+/*               D-70597 Stuttgart                                           */
+/* EMail:        uz@musoftware.de                                            */
+/*                                                                           */
+/*                                                                           */
+/* This software is provided 'as-is', without any expressed or implied       */
+/* warranty.  In no event will the authors be held liable for any damages    */
+/* arising from the use of this software.                                    */
+/*                                                                           */
+/* Permission is granted to anyone to use this software for any purpose,     */
+/* including commercial applications, and to alter it and redistribute it    */
+/* freely, subject to the following restrictions:                            */
+/*                                                                           */
+/* 1. The origin of this software must not be misrepresented; you must not   */
+/*    claim that you wrote the original software. If you use this software   */
+/*    in a product, an acknowledgment in the product documentation would be  */
+/*    appreciated but is not required.                                       */
+/* 2. Altered source versions must be plainly marked as such, and must not   */
+/*    be misrepresented as being the original software.                      */
+/* 3. This notice may not be removed or altered from any source              */
+/*    distribution.                                                          */
+/*                                                                           */
+/*****************************************************************************/
+
+
+
+#ifndef TARGET_H
+#define TARGET_H
+
+
+
+/*****************************************************************************/
+/*                                          Data                                    */
+/*****************************************************************************/
+
+
+
+/* Supported target systems */
+typedef enum {
+    TGT_UNKNOWN = -1,          /* Not specified or invalid target */
+    TGT_NONE,
+    TGT_ATARI,
+    TGT_C64,
+    TGT_C128,
+    TGT_ACE,
+    TGT_PLUS4,
+    TGT_CBM610,
+    TGT_PET,
+    TGT_NES,
+    TGT_APPLE2,
+    TGT_GEOS,
+    TGT_COUNT                  /* Number of target systems */
+} target_t;
+
+/* Target system */
+extern target_t                Target;
+
+/* Table with target names */
+extern const char* TargetNames [TGT_COUNT];
+
+
+
+/*****************************************************************************/
+/*                                          Code                                    */
+/*****************************************************************************/
+
+
+
+target_t FindTarget (const char* Name);
+/* Find a target by name and return the target id. TGT_UNKNOWN is returned if
+ * the given name is no valid target.
+ */
+
+
+
+/* End of target.h */
+
+#endif
+
+
+

diff --git a/src/common/tgttrans.c b/src/common/tgttrans.c
new file mode 100644 (file)
index 0000000..d88f6d2
--- /dev/null
+++ b/src/common/tgttrans.c
@@ -0,0 +1,152 @@
+/*****************************************************************************/
+/*                                                                           */
+/*                               tgttrans.c                                 */
+/*                                                                           */
+/*                        Character set translation                         */
+/*                                                                           */
+/*                                                                           */
+/*                                                                           */
+/* (C) 2000     Ullrich von Bassewitz                                        */
+/*              Wacholderweg 14                                              */
+/*              D-70597 Stuttgart                                            */
+/* EMail:       uz@musoftware.de                                             */
+/*                                                                           */
+/*                                                                           */
+/* This software is provided 'as-is', without any expressed or implied       */
+/* warranty.  In no event will the authors be held liable for any damages    */
+/* arising from the use of this software.                                    */
+/*                                                                           */
+/* Permission is granted to anyone to use this software for any purpose,     */
+/* including commercial applications, and to alter it and redistribute it    */
+/* freely, subject to the following restrictions:                            */
+/*                                                                           */
+/* 1. The origin of this software must not be misrepresented; you must not   */
+/*    claim that you wrote the original software. If you use this software   */
+/*    in a product, an acknowledgment in the product documentation would be  */
+/*    appreciated but is not required.                                       */
+/* 2. Altered source versions must be plainly marked as such, and must not   */
+/*    be misrepresented as being the original software.                      */
+/* 3. This notice may not be removed or altered from any source              */
+/*    distribution.                                                          */
+/*                                                                           */
+/*****************************************************************************/
+
+
+
+#include "abend.h"
+#include "target.h"
+#include "tgttrans.h"
+
+
+
+/*****************************************************************************/
+/*                                  Data                                    */
+/*****************************************************************************/
+
+
+
+/* Translation table ISO-8859-1 -> ATASCII */
+static const unsigned char CTAtari [256] = {
+    0x00,0x01,0x02,0x03,0x04,0x05,0x06,0x7E,0x08,0x7F,0x9B,0x0B,0x7D,0x0D,0x0E,0x0F,
+    0x10,0x11,0x12,0x13,0x14,0x15,0x16,0x17,0x18,0x19,0x1A,0x1B,0x1C,0x1D,0x1E,0x1F,
+    0x20,0x21,0x22,0x23,0x24,0x25,0x26,0x27,0x28,0x29,0x2A,0x2B,0x2C,0x2D,0x2E,0x2F,
+    0x30,0x31,0x32,0x33,0x34,0x35,0x36,0x37,0x38,0x39,0x3A,0x3B,0x3C,0x3D,0x3E,0x3F,
+    0x40,0x41,0x42,0x43,0x44,0x45,0x46,0x47,0x48,0x49,0x4A,0x4B,0x4C,0x4D,0x4E,0x4F,
+    0x50,0x51,0x52,0x53,0x54,0x55,0x56,0x57,0x58,0x59,0x5A,0x5B,0x5C,0x5D,0x5E,0x5F,
+    0x60,0x61,0x62,0x63,0x64,0x65,0x66,0x67,0x68,0x69,0x6A,0x6B,0x6C,0x6D,0x6E,0x6F,
+    0x70,0x71,0x72,0x73,0x74,0x75,0x76,0x77,0x78,0x79,0x7A,0x7B,0x7C,0x7D,0x7E,0x7F,
+    0x80,0x81,0x82,0x83,0x84,0x85,0x86,0x87,0x88,0x89,0x8A,0x8B,0x8C,0x8D,0x8E,0x8F,
+    0x90,0x91,0x92,0x93,0x94,0x95,0x96,0x97,0x98,0x99,0x9A,0x9B,0x9C,0x9D,0x9E,0x9F,
+    0xA0,0xA1,0xA2,0xA3,0xA4,0xA5,0xA6,0xA7,0xA8,0xA9,0xAA,0xAB,0xAC,0xAD,0xAE,0xAF,
+    0xB0,0xB1,0xB2,0xB3,0xB4,0xB5,0xB6,0xB7,0xB8,0xB9,0xBA,0xBB,0xBC,0xBD,0xBE,0xBF,
+    0xC0,0xC1,0xC2,0xC3,0xC4,0xC5,0xC6,0xC7,0xC8,0xC9,0xCA,0xCB,0xCC,0xCD,0xCE,0xCF,
+    0xD0,0xD1,0xD2,0xD3,0xD4,0xD5,0xD6,0xD7,0xD8,0xD9,0xDA,0xDB,0xDC,0xDD,0xDE,0xDF,
+    0xE0,0xE1,0xE2,0xE3,0xE4,0xE5,0xE6,0xE7,0xE8,0xE9,0xEA,0xEB,0xEC,0xED,0xEE,0xEF,
+    0xF0,0xF1,0xF2,0xF3,0xF4,0xF5,0xF6,0xF7,0xF8,0xF9,0xFA,0xFB,0xFC,0xFD,0xFE,0xFF
+};
+
+/* Translation table ISO-8859-1 -> PETSCII */
+static const unsigned char CTPET [256] = {
+    0x00,0x01,0x02,0x03,0x04,0x05,0x06,0x07,0x14,0x09,0x0D,0x11,0x93,0x0A,0x0E,0x0F,
+    0x10,0x0B,0x12,0x13,0x08,0x15,0x16,0x17,0x18,0x19,0x1A,0x1B,0x1C,0x1D,0x1E,0x1F,
+    0x20,0x21,0x22,0x23,0x24,0x25,0x26,0x27,0x28,0x29,0x2A,0x2B,0x2C,0x2D,0x2E,0x2F,
+    0x30,0x31,0x32,0x33,0x34,0x35,0x36,0x37,0x38,0x39,0x3A,0x3B,0x3C,0x3D,0x3E,0x3F,
+    0x40,0xC1,0xC2,0xC3,0xC4,0xC5,0xC6,0xC7,0xC8,0xC9,0xCA,0xCB,0xCC,0xCD,0xCE,0xCF,
+    0xD0,0xD1,0xD2,0xD3,0xD4,0xD5,0xD6,0xD7,0xD8,0xD9,0xDA,0x5B,0x5C,0x5D,0x5E,0x5F,
+    0xC0,0x41,0x42,0x43,0x44,0x45,0x46,0x47,0x48,0x49,0x4A,0x4B,0x4C,0x4D,0x4E,0x4F,
+    0x50,0x51,0x52,0x53,0x54,0x55,0x56,0x57,0x58,0x59,0x5A,0xDB,0xDC,0xDD,0xDE,0xDF,
+    0x80,0x81,0x82,0x83,0x84,0x85,0x86,0x87,0x88,0x89,0x8A,0x8B,0x8C,0x8D,0x8E,0x8F,
+    0x90,0x91,0x92,0x0C,0x94,0x95,0x96,0x97,0x98,0x99,0x9A,0x9B,0x9C,0x9D,0x9E,0x9F,
+    0xA0,0xA1,0xA2,0xA3,0xA4,0xA5,0xA6,0xA7,0xA8,0xA9,0xAA,0xAB,0xAC,0xAD,0xAE,0xAF,
+    0xB0,0xB1,0xB2,0xB3,0xB4,0xB5,0xB6,0xB7,0xB8,0xB9,0xBA,0xBB,0xBC,0xBD,0xBE,0xBF,
+    0x60,0x61,0x62,0x63,0x64,0x65,0x66,0x67,0x68,0x69,0x6A,0x6B,0x6C,0x6D,0x6E,0x6F,
+    0x70,0x71,0x72,0x73,0x74,0x75,0x76,0x77,0x78,0x79,0x7A,0x7B,0x7C,0x7D,0x7E,0x7F,
+    0xE0,0xE1,0xE2,0xE3,0xE4,0xE5,0xE6,0xE7,0xE8,0xE9,0xEA,0xEB,0xEC,0xED,0xEE,0xEF,
+    0xF0,0xF1,0xF2,0xF3,0xF4,0xF5,0xF6,0xF7,0xF8,0xF9,0xFA,0xFB,0xFC,0xFD,0xFE,0xFF
+};
+
+/* Pointer to translation table */
+static const unsigned char* Tab = 0;
+
+
+
+/*****************************************************************************/
+/*                                          Code                                    */
+/*****************************************************************************/
+
+
+
+void InitTarget (void)
+/* Initialize the target and the translation tables */
+{
+    switch (Target) {
+       case TGT_NONE:                          break;
+       case TGT_ATARI:         Tab = CTAtari;  break;
+       case TGT_C64:           Tab = CTPET;    break;
+       case TGT_C128:          Tab = CTPET;    break;
+       case TGT_ACE:           Tab = CTPET;    break;
+       case TGT_PLUS4:         Tab = CTPET;    break;
+       case TGT_CBM610:        Tab = CTAtari;  break;
+       case TGT_PET:           Tab = CTAtari;  break;
+       case TGT_NES:                           break;
+       case TGT_APPLE2:                        break;
+       case TGT_GEOS:                          break;
+       default:
+           AbEnd ("Internal error: Target system unknown (%d)", Target);
+    }
+}
+
+
+
+int TgtTranslateChar (int C)
+/* Translate one character from the source character set into the target
+ * system character set.
+ */
+{
+    /* Translate */
+    C &= 0xFF;
+    return Tab? Tab[C] : C;
+}
+
+
+
+char* TgtTranslateStr (char* S)
+/* Translate a complete string from the source character set into the target
+ * system character set.
+ */
+{
+    /* Translate */
+    if (Tab) {
+               unsigned char* T = (unsigned char*)S;
+       while (*T) {
+           *T = Tab[*T];
+           ++T;
+       }
+    }
+
+    /* Return the argument string */
+    return S;
+}
+
+
+

diff --git a/src/common/tgttrans.h b/src/common/tgttrans.h
new file mode 100644 (file)
index 0000000..b9ede0a
--- /dev/null
+++ b/src/common/tgttrans.h
@@ -0,0 +1,64 @@
+/*****************************************************************************/
+/*                                                                           */
+/*                               tgttrans.h                                 */
+/*                                                                           */
+/*                        Character set translation                         */
+/*                                                                           */
+/*                                                                           */
+/*                                                                           */
+/* (C) 2000     Ullrich von Bassewitz                                        */
+/*              Wacholderweg 14                                              */
+/*              D-70597 Stuttgart                                            */
+/* EMail:       uz@musoftware.de                                             */
+/*                                                                           */
+/*                                                                           */
+/* This software is provided 'as-is', without any expressed or implied       */
+/* warranty.  In no event will the authors be held liable for any damages    */
+/* arising from the use of this software.                                    */
+/*                                                                           */
+/* Permission is granted to anyone to use this software for any purpose,     */
+/* including commercial applications, and to alter it and redistribute it    */
+/* freely, subject to the following restrictions:                            */
+/*                                                                           */
+/* 1. The origin of this software must not be misrepresented; you must not   */
+/*    claim that you wrote the original software. If you use this software   */
+/*    in a product, an acknowledgment in the product documentation would be  */
+/*    appreciated but is not required.                                       */
+/* 2. Altered source versions must be plainly marked as such, and must not   */
+/*    be misrepresented as being the original software.                      */
+/* 3. This notice may not be removed or altered from any source              */
+/*    distribution.                                                          */
+/*                                                                           */
+/*****************************************************************************/
+
+
+
+#ifndef TGTTRANS_H
+#define TGTTRANS_H
+
+
+
+/*****************************************************************************/
+/*                                          Code                                    */
+/*****************************************************************************/
+
+
+
+int TgtTranslateChar (int C);
+/* Translate one character from the source character set into the target
+ * system character set.
+ */
+
+char* TgtTranslateStr (char* S);
+/* Translate a complete string from the source character set into the target
+ * system character set.
+ */
+
+
+
+/* End of tgttrans.h */
+
+#endif
+
+
+