sim/m32c/misc.c

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