#encoding: utf-8
'''
中文互联网上写的最漂亮效率最高的大写人民币金额转换代码
作者：李维 <oldrev@gmail.com>
版权所有 (c) 2013 李维。保留所有权利。
本代码基于 BSD License 授权。
'''

from cStringIO import StringIO
import math

_RMB_DIGITS = ['零', '壹', '贰', '叁', '肆', '伍', '陆', '柒', '捌', '玖' ]
_SECTION_CHARS = ['', '拾', '佰', '仟', '万' ]

def to_rmb_upper(price):
    price = round(price, 2)
    integer_part = int(price)
    wanyi_part = integer_part / 1000000000000
    yi_part = integer_part % 1000000000000 / 100000000
    wan_part = integer_part % 100000000 / 10000
    qian_part = integer_part % 10000
    dec_part = int(price * 100 % 100)

    strio = StringIO()

    #处理万亿以上的部分
    if integer_part >= 1000000000000:
        _parse_integer(strio, wanyi_part)
        strio.write('万')

    #处理亿到千亿的部分
    if integer_part >= 100000000:
        if integer_part >= 1000000000000 and yi_part > 0 and yi_part <= 999:
            strio.write('零')
        _parse_integer(strio, yi_part)
        strio.write('亿')

    #处理万的部分
    if integer_part >= 10000:
        if integer_part >= 100000000 and wan_part > 0 and wan_part <= 999:
            strio.write('零')
        _parse_integer(strio, wan_part)
        strio.write('万')

    #处理千及以后的部分
    if integer_part >= 10000 and qian_part > 0 and qian_part <= 999:
        strio.write('零');
    if qian_part > 0:
        _parse_integer(strio, qian_part)
    if integer_part > 0:
        strio.write('元')

    #处理小数
    if dec_part > 0: 
        _parse_decimal(strio, integer_part, dec_part)
    elif dec_part == 0 and integer_part > 0:
        strio.write('整')
    else:
        strio.write('零元整')

    return strio.getvalue()

def _parse_integer(strio, value):
    assert value > 0 and value <= 9999
    ndigits = int(math.floor(math.log10(value))) + 1
    zero_count = 0
    for i in xrange(0, ndigits):
        factor = int(pow(10, ndigits - 1 - i))
        digit = int(value / factor)

        if digit != 0:
            if zero_count > 0:
                strio.write('零')
            strio.write(_RMB_DIGITS[digit])
            strio.write(_SECTION_CHARS[ndigits - i - 1])
            zero_count = 0
        else:
            if i < ndigits:
                zero_count += 1
        value -= value / factor * factor

def _parse_decimal(strio, integer_part, value):
    assert value > 0 and value <= 99
    jiao = value / 10
    fen = value % 10
    if jiao > 0:
        strio.write(_RMB_DIGITS[jiao])
        strio.write('角')
    if jiao == 0 and fen > 0 and integer_part > 0:
        strio.write('零')
    if fen > 0:
        strio.write(_RMB_DIGITS[fen])
        strio.write('分')
    else:
        strio.write('整')