Subversion Repositories tcp_socket

#!/usr/bin/env python

"""Support Library for builtin Functionality"""

__author__ = "Jon Dawson"

__copyright__ = "Copyright (C) 2013, Jonathan P Dawson"

__version__ = "0.1"

builtins="""

unsigned unsigned_modulo_yyyy;

unsigned unsigned_divide_xxxx(unsigned dividend, unsigned divisor){

    unsigned remainder = 0;

    unsigned quotient = 0;

    unsigned i = 0;

    while(1){

        if( dividend & (1 << 15) ){

            remainder |= 1;

        }

        if( remainder >= divisor ){

            quotient |= 1;

            remainder -= divisor;

        }

        if(i==15) break;

        i++;

        quotient <<= 1;

        remainder <<= 1;

        dividend <<= 1;

    }

    unsigned_modulo_yyyy = remainder;

    return quotient;

}

unsigned unsigned_modulo_xxxx(unsigned dividend, unsigned divisor){

    unsigned_divide_xxxx(dividend, divisor);

    return unsigned_modulo_yyyy;

}

int divide_xxxx(int dividend, int divisor){

    unsigned udividend, udivisor, uquotient;

    unsigned dividend_sign, divisor_sign, quotient_sign;

    dividend_sign = dividend & 0x8000u;

    divisor_sign = divisor & 0x8000u;

    quotient_sign = dividend_sign ^ divisor_sign;

    udividend = dividend_sign ? -dividend : dividend;

    udivisor = divisor_sign ? -divisor : divisor;

    uquotient = unsigned_divide_xxxx(udividend, udivisor);

    return quotient_sign ? -uquotient : uquotient;

}

int modulo_xxxx(int dividend, int divisor){

    unsigned udividend, udivisor, uquotient;

    unsigned dividend_sign, divisor_sign;

    int modulo;

    dividend_sign = dividend & 0x8000u;

    divisor_sign = divisor & 0x8000u;

    udividend = dividend_sign ? -dividend : dividend;

    udivisor = divisor_sign ? -divisor : divisor;

    modulo = unsigned_modulo_xxxx(udividend, udivisor);

    modulo = dividend_sign ? -modulo : modulo;

    return modulo;

}

long unsigned long_unsigned_modulo_yyyy;

long unsigned long_unsigned_divide_xxxx(long unsigned dividend, long unsigned divisor){

    long unsigned remainder = 0;

    long unsigned quotient = 0;

    unsigned i = 0;

    while(1){

        if( dividend & (1 << 31) ){

            remainder |= 1;

        }

        if( remainder >= divisor ){

            quotient |= 1;

            remainder -= divisor;

        }

        if(i==31) break;

        i++;

        quotient <<= 1;

        remainder <<= 1;

        dividend <<= 1;

    }

    long_unsigned_modulo_yyyy = remainder;

    return quotient;

}

long int long_divide_xxxx(long int dividend, long int divisor){

    long unsigned udividend, udivisor, uquotient;

    long unsigned dividend_sign, divisor_sign, quotient_sign;

    dividend_sign = dividend & 0x80000000ul;

    divisor_sign = divisor & 0x80000000ul;

    quotient_sign = dividend_sign ^ divisor_sign;

    udividend = dividend_sign ? -dividend : dividend;

    udivisor = divisor_sign ? -divisor : divisor;

    uquotient = long_unsigned_divide_xxxx(udividend, udivisor);

    return quotient_sign ? -uquotient : uquotient;

}

long unsigned long_unsigned_modulo_xxxx(long unsigned dividend, long unsigned divisor){

    long_unsigned_divide_xxxx(dividend, divisor);

    return long_unsigned_modulo_yyyy;

}

long int long_modulo_xxxx(long int dividend, long int divisor){

    long unsigned udividend, udivisor;

    long unsigned dividend_sign, divisor_sign, quotient_sign;

    long int modulo;

    dividend_sign = dividend & 0x80000000ul;

    divisor_sign = divisor & 0x80000000ul;

    udividend = dividend_sign ? -dividend : dividend;

    udivisor = divisor_sign ? -divisor : divisor;

    modulo = long_unsigned_modulo_xxxx(udividend, udivisor);

    modulo = dividend_sign ? -modulo : modulo;

    return modulo;

}

"""