Перевод чисел в определённую систему

#include <stdio.h>
#include <stdlib.h>
 
#define MAX_BASE
 
int base_arr[]= {
    2, 6, 8, 10, 16
};
 
#define MAX_BASE_INDEX  (sizeof(base_arr)/sizeof(base_arr[0]))
 
 
int main( int argc, char *argv[] ) {
 
int i;
int base;
long val;
char *endptr;
char buf[80];
 
 
argc--; argv++;
 
if ( argc != 2 ) {
    fprintf( stderr, "Usage: XtoX base number\n" );
    exit( 2 );
}
base= atoi( argv[0] );
if ( base<2 || base>36 ) {
    fprintf( stderr, "Invalid base: |%s|\n", argv[0] );
    exit( 1 );
}
val= strtol( argv[1], &endptr, base );
if ( *endptr != '\0' ) {
    fprintf( stderr, "Invalid number: |%s|\n", argv[1] );
    exit( 1 );
}
 
printf( "Input\n" "base=%-2d value=%s\n" "\n", base, itoa( val, buf, base ) );
for ( i= 0; i<MAX_BASE_INDEX; i++ ) {
    printf( "base=%-2d value=%s\n", base_arr[i], itoa( val, buf, base_arr[i] ) );
}
 
return 0;
 
} /* main() */

#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <limits.h>
 
/* перевод чисел в разные системы счисления */
 
/* int2bin - представление числа в виде строки */
char *long2bin(unsigned long int d, char *s){
    int first, last;
    char c;
    char *p = s;
    while ( d > 0 ){
        *p++ = d % 2 + '0';
        d /=  2;
    }
    *p = 0;
    for ( first = 0, last = (strlen(s) - 1); first < last; first++, last--){
        c = s[first];
        s[first] = s[last];
        s[last] = c;
    }
    return(s);
}
 
 
int main(){
    char buf[BUFSIZ];
    char strval[sizeof(long)*CHAR_BIT + 1]; /* максимальная длинна long в двоичном виде с завершающим нулём */
    char bas;
    long int d;
    
    while ( 1 ){
        printf("Enter some number followed by space separated basis (b o d x), or q to quit:\n");
        fgets(buf, BUFSIZ, stdin);
        if ( *buf == 'q' )
            break;
        if ( sscanf(buf, "%s %c", &strval, &bas) != 2 )
            continue;
        switch ( bas ){
            case 'b' :
                d = strtol(strval, NULL, 2);
                break;
            case 'o' :
                d = strtol(strval, NULL, 8);
                break;
            case 'd' :
                d = strtol(strval, NULL, 10);
                break;
            case 'x' :
                d = strtol(strval, NULL, 16);
                break;
            default :
                printf("Invalid basis value!\n");
                exit(1);
                break;
        }
        printf("Bin: %s\nOct: %#lo\nDec: %ld\nHex: %#lx\n", long2bin(d, buf), d, d, d);
    }
    
    return(0);
}

char *long2six(unsigned long int d, char *s){
    int first, last;
    char c;
    char *p = s;
    while ( d > 0 ){
        *p++ = d % 6 + '0';
        d /=  6;
    }
    *p = 0;
    for ( first = 0, last = (strlen(s) - 1); first < last; first++, last--){
        c = s[first];
        s[first] = s[last];
        s[last] = c;
    }
    return(s);
}

#include <stdio.h>
#include <stdlib.h>
 
/**
 * Ansi C "itoa" based on Kernighan & Ritchie's "Ansi C"
 * with slight modification to optimize for specific architecture:
 */
void strreverse(char* begin, char* end) {
    char aux;
    while(end>begin)
        aux=*end, *end--=*begin, *begin++=aux;
}
    
void my_itoa(int value, char* str, int base) {
    static char num[] = "0123456789abcdefghijklmnopqrstuvwxyz";
    char* wstr=str;
    int sign;
    div_t res;
 
    // Validate base
    if (base<2 || base>35){ *wstr='\0'; return; }
 
    // Take care of sign
    if ((sign=value) < 0) value = -value;
 
    // Conversion. Number is reversed.
    do {
        res = div(value,base);
        *wstr++ = num[res.rem];
    }while( (value=res.quot) != 0);
    
    if(sign<0) *wstr++='-';
    *wstr='\0';
 
    // Reverse string
    strreverse(str,wstr-1);
}

#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <limits.h>
 
/* revstr - строка наоборот */
char *revstr(char *s){
    char *h = s; /* head */
    char *t = h + strlen(s) - 1; /* tail */
    char c;
    
    while ( h < t ){
        c = *h;
        *h = *t;
        *t = c;
        h++;
        t--;
    }
    
    return(s);
}
 
/* возвращает в buf строку не длиннее len - 1 символов, представляющую число val в CC с основанием base, или NULL при неудаче */
char *itoan(char *buf, int len, unsigned int val, int base){
    static char num[] = "0123456789abcdefghijklmnopqrstuvwxyz";
    char *str = buf;
 
    if ( (base < 2) || (base > 35) )
        return(NULL);
    
    while ( val ){
        if ( --len < 1 )
            return(NULL);
        *buf++ = num[val % base];
        val /= base;
    }
    *buf = '\0';
    return(revstr(str));
}
        
    
    
 
int main(){
        char buf[BUFSIZ];
        char binval[sizeof(long)*CHAR_BIT + 1]; /* максимальная длинна long в двоичном виде с завершающим нулём */
        char octval[sizeof(long)*CHAR_BIT + 1];
        char decval[sizeof(long)*CHAR_BIT + 1];
        char hexval[sizeof(long)*CHAR_BIT + 1];
        char strval[sizeof(long)*CHAR_BIT + 1];
        char bas;
        long int d;
        
        while ( 1 ){
                printf("Enter some number followed by space separated basis (b o d x), or q to quit:\n");
                fgets(buf, BUFSIZ, stdin);
                if ( *buf == 'q' )
                        break;
                if ( sscanf(buf, "%s %c", &strval, &bas) != 2 )
                        continue;
                switch ( bas ){
                        case 'b' :
                                d = strtol(strval, NULL, 2);
                                break;
                        case 'o' :
                                d = strtol(strval, NULL, 8);
                                break;
                        case 'd' :
                                d = strtol(strval, NULL, 10);
                                break;
                        case 'x' :
                                d = strtol(strval, NULL, 16);
                                break;
                        default :
                                printf("Invalid basis value!\n");
                                exit(1);
                                break;
                }
                printf("Bin: %s\nOct: 0%s\nDec: %s\nHex: 0x%s\n", itoan(binval, sizeof(binval), (int)d, 2),
                                                                itoan(octval, sizeof(octval), (int)d, 8),
                                                                itoan(decval, sizeof(decval), (int)d, 10),
                                                                itoan(hexval, sizeof(hexval), (int)d, 16) );
        }
        
        return(0);
}