Back to index

glibc  2.9
l64a.c
Go to the documentation of this file.
00001 /* Copyright (C) 1995, 1996, 2000 Free Software Foundation, Inc.
00002    This file is part of the GNU C Library.
00003    Contributed by Ulrich Drepper <drepper@gnu.ai.mit.edu>, August 1995.
00004 
00005    The GNU C Library is free software; you can redistribute it and/or
00006    modify it under the terms of the GNU Lesser General Public
00007    License as published by the Free Software Foundation; either
00008    version 2.1 of the License, or (at your option) any later version.
00009 
00010    The GNU C Library is distributed in the hope that it will be useful,
00011    but WITHOUT ANY WARRANTY; without even the implied warranty of
00012    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
00013    Lesser General Public License for more details.
00014 
00015    You should have received a copy of the GNU Lesser General Public
00016    License along with the GNU C Library; if not, write to the Free
00017    Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA
00018    02111-1307 USA.  */
00019 
00020 #include <stdlib.h>
00021 
00022 /* Conversion table.  */
00023 static const char conv_table[64] =
00024 {
00025   '.', '/', '0', '1', '2', '3', '4', '5',
00026   '6', '7', '8', '9', 'A', 'B', 'C', 'D',
00027   'E', 'F', 'G', 'H', 'I', 'J', 'K', 'L',
00028   'M', 'N', 'O', 'P', 'Q', 'R', 'S', 'T',
00029   'U', 'V', 'W', 'X', 'Y', 'Z', 'a', 'b',
00030   'c', 'd', 'e', 'f', 'g', 'h', 'i', 'j',
00031   'k', 'l', 'm', 'n', 'o', 'p', 'q', 'r',
00032   's', 't', 'u', 'v', 'w', 'x', 'y', 'z'
00033 };
00034 
00035 char *
00036 l64a (n)
00037      long int n;
00038 {
00039   unsigned long int m = (unsigned long int) n;
00040   static char result[7];
00041   int cnt;
00042 
00043   /* The standard says that only 32 bits are used.  */
00044   m &= 0xffffffff;
00045 
00046   if (m == 0ul)
00047     /* The value for N == 0 is defined to be the empty string. */
00048     return (char *) "";
00049 
00050   for (cnt = 0; m > 0ul; ++cnt)
00051     {
00052       result[cnt] = conv_table[m & 0x3f];
00053       m >>= 6;
00054     }
00055   result[cnt] = '\0';
00056 
00057   return result;
00058 }