M68KInstructionTblGen.c File Reference

#include <stdio.h>
#include <stdlib.h>
#include <string.h>

Go to the source code of this file.

Classes
struct	opcode_struct

Macros
#define	DECL_SPEC

Functions
static int	valid_ea (unsigned int opcode, unsigned int mask)
static int DECL_SPEC	compare_nof_true_bits (const void *aptr, const void *bptr)
static void	build_opcode_table (void)
int	main ()

Variables
static opcode_struct	g_opcode_info []

Macro Definition Documentation

DECL_SPEC

#define DECL_SPEC

Definition at line 387 of file M68KInstructionTblGen.c.

Function Documentation

build_opcode_table()

static void build_opcode_table ( void  )

static

Definition at line 411 of file M68KInstructionTblGen.c.

{
    unsigned int i;
    unsigned int opcode;
    opcode_struct* ostruct;
    unsigned int opcode_info_length = 0;
    const unsigned int total_count = 0x10000;
 
    for(ostruct = g_opcode_info;ostruct->name != 0;ostruct++)
        opcode_info_length++;
 
    qsort((void *)g_opcode_info, opcode_info_length, sizeof(g_opcode_info[0]), compare_nof_true_bits);
 
    printf("/* This table is auto-generated. DO NOT MANUALLY EDIT! Look in M68KInstructionTblGen.c for more info */\n");
    printf("static instruction_struct g_instruction_table[] = {\n");
 
    for(i=0;i<0x10000;i++) {
        const char *name = "d68000_invalid";
        uint16_t word2_mask = 0;
        uint16_t word2_match = 0;
        opcode = i;
        /* search through opcode info for a match */
        for(ostruct = g_opcode_info;ostruct->name != 0;ostruct++) {
            /* match opcode mask and allowed ea modes */
            if ((opcode & ostruct->mask) == ostruct->match) {
                /* Handle destination ea for move instructions */
                if ((!strcmp(ostruct->name, "d68000_move_8") ||
                     !strcmp(ostruct->name, "d68000_move_16") ||
                     !strcmp(ostruct->name, "d68000_move_32")) &&
                        !valid_ea(((opcode>>9)&7) | ((opcode>>3)&0x38), 0xbf8))
                    continue;
                if (valid_ea(opcode, ostruct->ea_mask)) {
                    name = ostruct->name;
                    word2_mask = ostruct->mask2;
                    word2_match = ostruct->match2;
                    break;
                }
            }
        }
 
        // Handle so the last entry won't have a , at the end
        if (i != total_count - 1) {
            printf("\t{ %s, 0x%x, 0x%x },\n", name, word2_mask, word2_match);
        } else {
            printf("\t{ %s, 0x%x, 0x%x }\n", name, word2_mask, word2_match);
        }
    }
 
    printf("};\n\n");
}

References compare_nof_true_bits(), opcode_struct::ea_mask, g_opcode_info, i, opcode_struct::mask, opcode_struct::mask2, opcode_struct::match, opcode_struct::match2, opcode_struct::name, printf(), qsort(), and valid_ea().

Referenced by main().

compare_nof_true_bits()

static int DECL_SPEC compare_nof_true_bits ( const void *  aptr, const void *  bptr  )

static

Definition at line 392 of file M68KInstructionTblGen.c.

{
    unsigned int a = ((const opcode_struct*)aptr)->mask;
    unsigned int b = ((const opcode_struct*)bptr)->mask;
 
    a = ((a & 0xAAAA) >> 1) + (a & 0x5555);
    a = ((a & 0xCCCC) >> 2) + (a & 0x3333);
    a = ((a & 0xF0F0) >> 4) + (a & 0x0F0F);
    a = ((a & 0xFF00) >> 8) + (a & 0x00FF);
 
    b = ((b & 0xAAAA) >> 1) + (b & 0x5555);
    b = ((b & 0xCCCC) >> 2) + (b & 0x3333);
    b = ((b & 0xF0F0) >> 4) + (b & 0x0F0F);
    b = ((b & 0xFF00) >> 8) + (b & 0x00FF);
 
    return b - a; /* reversed to get greatest to least sorting */
}

References a, and b.

Referenced by build_opcode_table().

main()

int main

(

void

)

Definition at line 462 of file M68KInstructionTblGen.c.

           {
    build_opcode_table();
    return 0;
}

References build_opcode_table().

valid_ea()

static int valid_ea ( unsigned int  opcode, unsigned int  mask  )

static

Definition at line 341 of file M68KInstructionTblGen.c.

{
    if (mask == 0)
        return 1;
 
    switch(opcode & 0x3f) {
        case 0x00: case 0x01: case 0x02: case 0x03:
        case 0x04: case 0x05: case 0x06: case 0x07:
            return (mask & 0x800) != 0;
        case 0x08: case 0x09: case 0x0a: case 0x0b:
        case 0x0c: case 0x0d: case 0x0e: case 0x0f:
            return (mask & 0x400) != 0;
        case 0x10: case 0x11: case 0x12: case 0x13:
        case 0x14: case 0x15: case 0x16: case 0x17:
            return (mask & 0x200) != 0;
        case 0x18: case 0x19: case 0x1a: case 0x1b:
        case 0x1c: case 0x1d: case 0x1e: case 0x1f:
            return (mask & 0x100) != 0;
        case 0x20: case 0x21: case 0x22: case 0x23:
        case 0x24: case 0x25: case 0x26: case 0x27:
            return (mask & 0x080) != 0;
        case 0x28: case 0x29: case 0x2a: case 0x2b:
        case 0x2c: case 0x2d: case 0x2e: case 0x2f:
            return (mask & 0x040) != 0;
        case 0x30: case 0x31: case 0x32: case 0x33:
        case 0x34: case 0x35: case 0x36: case 0x37:
            return (mask & 0x020) != 0;
        case 0x38:
            return (mask & 0x010) != 0;
        case 0x39:
            return (mask & 0x008) != 0;
        case 0x3a:
            return (mask & 0x002) != 0;
        case 0x3b:
            return (mask & 0x001) != 0;
        case 0x3c:
            return (mask & 0x004) != 0;
    }
    return 0;
 
}

References mask.

Referenced by build_opcode_table().

Variable Documentation

g_opcode_info

opcode_struct g_opcode_info[]

static

Definition at line 37 of file M68KInstructionTblGen.c.

Referenced by build_opcode_table().