sim/rx/misc.c

   1 /* misc.c --- miscellaneous utility functions for RX simulator.
   2
   3 Copyright (C) 2005-2021 Free Software Foundation, Inc.
   4 Contributed by Red Hat, Inc.
   5
   6 This file is part of the GNU simulators.
   7
   8 This program is free software; you can redistribute it and/or modify
   9 it under the terms of the GNU General Public License as published by
  10 the Free Software Foundation; either version 3 of the License, or
  11 (at your option) any later version.
  12
  13 This program is distributed in the hope that it will be useful,
  14 but WITHOUT ANY WARRANTY; without even the implied warranty of
  15 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  16 GNU General Public License for more details.
  17
  18 You should have received a copy of the GNU General Public License
  19 along with this program.  If not, see <http://www.gnu.org/licenses/>.  */
  20
  21
  22 #include "config.h"
  23 #include <stdio.h>
  24
  25 #include "cpu.h"
  26 #include "misc.h"
  27
  28 int
  29 bcd2int (int bcd, int w)
  30 {
  31   int v = 0, m = 1, i;
  32   for (i = 0; i < (w ? 4 : 2); i++)
  33     {
  34       v += (bcd % 16) * m;
  35       m *= 10;
  36       bcd /= 16;
  37     }
  38   return v;
  39 }
  40
  41 int
  42 int2bcd (int v, int w)
  43 {
  44   int bcd = 0, m = 1, i;
  45   for (i = 0; i < (w ? 4 : 2); i++)
  46     {
  47       bcd += (v % 10) * m;
  48       m *= 16;
  49       v /= 10;
  50     }
  51   return bcd;
  52 }
  53
  54 char *
  55 comma (unsigned int u)
  56 {
  57   static char buf[5][20];
  58   static int bi = 0;
  59   int comma = 0;
  60   char *bp;
  61
  62   bi = (bi + 1) % 5;
  63   bp = buf[bi] + 19;
  64   *--bp = 0;
  65   do
  66     {
  67       if (comma == 3)
  68         {
  69           *--bp = ',';
  70           comma = 0;
  71         }
  72       comma++;
  73       *--bp = '0' + (u % 10);
  74       u /= 10;
  75     }
  76   while (u);
  77   return bp;
  78 }