]> git.sur5r.net Git - cc65/blob - src/common/target.c
Add #pragma charmap()
[cc65] / src / common / target.c
1 /*****************************************************************************/
2 /*                                                                           */
3 /*                                 target.c                                  */
4 /*                                                                           */
5 /*                           Target specification                            */
6 /*                                                                           */
7 /*                                                                           */
8 /*                                                                           */
9 /* (C) 2000-2001 Ullrich von Bassewitz                                       */
10 /*               Wacholderweg 14                                             */
11 /*               D-70597 Stuttgart                                           */
12 /* EMail:        uz@musoftware.de                                            */
13 /*                                                                           */
14 /*                                                                           */
15 /* This software is provided 'as-is', without any expressed or implied       */
16 /* warranty.  In no event will the authors be held liable for any damages    */
17 /* arising from the use of this software.                                    */
18 /*                                                                           */
19 /* Permission is granted to anyone to use this software for any purpose,     */
20 /* including commercial applications, and to alter it and redistribute it    */
21 /* freely, subject to the following restrictions:                            */
22 /*                                                                           */
23 /* 1. The origin of this software must not be misrepresented; you must not   */
24 /*    claim that you wrote the original software. If you use this software   */
25 /*    in a product, an acknowledgment in the product documentation would be  */
26 /*    appreciated but is not required.                                       */
27 /* 2. Altered source versions must be plainly marked as such, and must not   */
28 /*    be misrepresented as being the original software.                      */
29 /* 3. This notice may not be removed or altered from any source              */
30 /*    distribution.                                                          */
31 /*                                                                           */
32 /*****************************************************************************/
33
34
35
36 #include <stdlib.h>
37 #include <string.h>
38
39 #include "chartype.h"
40 #include "target.h"
41
42
43
44 /*****************************************************************************/
45 /*                                   Data                                    */
46 /*****************************************************************************/
47
48
49
50 /* Target system */
51 target_t Target = TGT_NONE;
52
53 /* Table with target names */
54 const char* TargetNames [TGT_COUNT] = {
55     "none",
56     "atari",
57     "c64",
58     "c128",
59     "ace",
60     "plus4",
61     "cbm510",
62     "cbm610",
63     "pet", 
64     "bbc",
65     "apple2",
66     "geos",
67     "lunix"
68 };
69
70
71
72 /*****************************************************************************/
73 /*                                   Code                                    */
74 /*****************************************************************************/
75
76
77
78 target_t FindTarget (const char* Name)
79 /* Find a target by name and return the target id. TGT_UNKNOWN is returned if
80  * the given name is no valid target.
81  */
82 {
83     unsigned I;
84
85     /* Check for a numeric target */
86     if (IsDigit (*Name)) {
87         int Target = atoi (Name);
88         if (Target >= 0 && Target < TGT_COUNT) {
89             return (target_t)Target;
90         }
91     }
92
93     /* Check for a target string */
94     for (I = 0; I < TGT_COUNT; ++I) {
95         if (strcmp (TargetNames [I], Name) == 0) {
96             return (target_t)I;
97         }
98     }
99
100     /* Not found */
101     return TGT_UNKNOWN;
102 }
103
104
105