/* BFD support for the Axis CRIS architecture.

   Copyright (C) 2000-2025 Free Software Foundation, Inc.

   Contributed by Axis Communications AB.

   Written by Hans-Peter Nilsson.

   This file is part of BFD, the Binary File Descriptor library.

   This program is free software; you can redistribute it and/or modify

   it under the terms of the GNU General Public License as published by

   the Free Software Foundation; either version 3 of the License, or

   (at your option) any later version.

   This program is distributed in the hope that it will be useful,

   but WITHOUT ANY WARRANTY; without even the implied warranty of

   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the

   GNU General Public License for more details.

   You should have received a copy of the GNU General Public License

   along with this program; if not, write to the Free Software

   Foundation, Inc., 51 Franklin Street - Fifth Floor, Boston,

   MA 02110-1301, USA.  */

#include "sysdep.h"

#include "bfd.h"

#include "libbfd.h"

/* This routine is provided two arch_infos and returns the lowest common

   denominator.  CRIS v0..v10 vs. v32 are not compatible in general, but

   there's a compatible subset for which we provide an arch_info.  */

static const bfd_arch_info_type * get_compatible

  (const bfd_arch_info_type *, const bfd_arch_info_type *);

static const bfd_arch_info_type *

get_compatible (const bfd_arch_info_type *a,

    const bfd_arch_info_type *b)

{

  /* Arches must match.  */

  if (a->arch != b->arch)

   return NULL;

  /* If either is the compatible mach, return the other.  */

  if (a->mach == bfd_mach_cris_v10_v32)

    return b;

  if (b->mach == bfd_mach_cris_v10_v32)

    return a;

#if 0

  /* The code below is disabled but kept as a warning.

     See ldlang.c:lang_check.  Quite illogically, incompatible arches

     (as signalled by this function) are only *warned* about, while with

     this function signalling compatible ones, we can have the

     cris_elf_merge_private_bfd_data function return an error.  This is

     undoubtedly a FIXME: in general.  Also, the

     command_line.warn_mismatch flag and the --no-warn-mismatch option

     are misnamed for the multitude of ports that signal compatibility:

     it is there an error, not a warning.  We work around it by

     pretending matching machs here.  */

  /* Except for the compatible mach, machs must match.  */

  if (a->mach != b->mach)

    return NULL;

#endif

  return a;

}

#define N(NUMBER, PRINT, NEXT)  \

 { 32, 32, 8, bfd_arch_cris, NUMBER, "cris", PRINT, 1, false, \

     get_compatible, bfd_default_scan, bfd_arch_default_fill, NEXT, 0 }

static const bfd_arch_info_type bfd_cris_arch_compat_v10_v32 =

 N (bfd_mach_cris_v10_v32, "cris:common_v10_v32", NULL);

static const bfd_arch_info_type bfd_cris_arch_v32 =

 N (bfd_mach_cris_v32, "crisv32", &bfd_cris_arch_compat_v10_v32);

const bfd_arch_info_type bfd_cris_arch =

{

  32,       /* There's 32 bits_per_word.  */

  32,       /* There's 32 bits_per_address.  */

  8,        /* There's 8 bits_per_byte.  */

  bfd_arch_cris,    /* One of enum bfd_architecture, defined

           in archures.c and provided in

           generated header files.  */

  bfd_mach_cris_v0_v10,   /* Random BFD-internal number for this

           machine, similarly listed in

           archures.c.  Not emitted in output.  */

  "cris",     /* The arch_name.  */

  "cris",     /* The printable name is the same.  */

  1,        /* Section alignment power; each section

           is aligned to (only) 2^1 bytes.  */

  true,       /* This is the default "machine".  */

  get_compatible,   /* A function for testing

           "machine" compatibility of two

           bfd_arch_info_type.  */

  bfd_default_scan,   /* Check if a bfd_arch_info_type is a

           match.  */

  bfd_arch_default_fill,  /* Default fill.  */

  &bfd_cris_arch_v32,   /* Pointer to next bfd_arch_info_type in

           the same family.  */

  0 /* Maximum offset of a reloc from the start of an insn.  */

};

/*

 * Local variables:

 * eval: (c-set-style "gnu")

 * indent-tabs-mode: t

 * End:

 */