Home | History | Annotate | Line # | Download | only in m32c 
      1 /* misc.c --- miscellaneous utility functions for M32C simulator.
      2 
      3 Copyright (C) 2005-2024 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 /* This must come before any other includes.  */
     22 #include "defs.h"
     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 }
     80