/*****************************************************************************/
/*                                                                           */
/*				   feature.c				     */
/*                                                                           */
/*		    Subroutines for the emulation features		     */
/*                                                                           */
/*                                                                           */
/*                                                                           */
/* (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 <string.h>

/* ca65 */
#include "global.h"
#include "feature.h"



/*****************************************************************************/
/*     	       	    		     Data			   	     */
/*****************************************************************************/



/* Names of the features */
static const char* FeatureKeys[FEAT_COUNT] = {
    "dollar_is_pc",
    "labels_without_colons",
    "loose_string_term",
    "at_in_identifiers",
    "dollar_in_identifiers",
    "pc_assignment",
};



/*****************************************************************************/
/*     	       	    		     Code			   	     */
/*****************************************************************************/



feature_t FindFeature (const char* Key)
/* Find the feature in a table and return the corresponding enum value. If the
 * feature is invalid, return FEAT_UNKNOWN.
 */
{
    feature_t F;

    /* This is not time critical, so do a linear search */
    for (F = (feature_t) 0; F < FEAT_COUNT; ++F) {
	if (strcmp (Key, FeatureKeys[F]) == 0) {
	    /* Found, index is enum value */
	    return F;
	}
    }

    /* Not found */
    return FEAT_UNKNOWN;
}



feature_t SetFeature (const char* Key)
/* Find the feature and set the corresponding flag if the feature is known.
 * In any case, return the feature found. An invalid Key will return
 * FEAT_UNKNOWN.
 */
{
    /* Map the string to an enum value */
    feature_t Feature = FindFeature (Key);

    /* Set the flags */
    switch (Feature) {
     	case FEAT_DOLLAR_IS_PC:		 DollarIsPC	= 1;	break;
     	case FEAT_LABELS_WITHOUT_COLONS: NoColonLabels	= 1;	break;
     	case FEAT_LOOSE_STRING_TERM:	 LooseStringTerm= 1;	break;
     	case FEAT_AT_IN_IDENTIFIERS:	 AtInIdents	= 1;	break;
     	case FEAT_DOLLAR_IN_IDENTIFIERS: DollarInIdents	= 1;	break;
     	case FEAT_PC_ASSIGNMENT:	 PCAssignment	= 1;	break;
       	default:     			 /* Keep gcc silent */	break;
    }

    /* Return the value found */
    return Feature;
}