import sys
import csv

g_img_w = 2500
g_img_h = 800
g_graph_x_end  = 64 + 31 + 19

g_current_year = 64 + 31 + 6

g_coin_1_a = ['アルミニウム貨','Aluminum coin']
g_coin_5_a = ['無孔黄銅貨','No-holed Brass coin']
g_coin_5_b = ['楷書体黄銅貨','Square type Brass coin']
g_coin_5_c = ['ゴシック体黄銅貨','Gothic type Brass coin']
g_coin_10_a = ['ギザ付青銅貨', 'Milled Bronze coin']
g_coin_10_b = ['ギザ無青銅貨', 'Plain Bronze coin']
g_coin_50_a = ['無孔ニッケル貨','No-holed Nickel coin']
g_coin_50_b = ['有孔ニッケル貨','Holed Nickel coin']
g_coin_50_c = ['白銅貨','Cupronickel coin']
g_coin_100_a = ['鳳凰銀貨','Chinese Phoenix Silver coin']
g_coin_100_b = ['稲穂銀貨','Rice Plant Silver coin']
g_coin_100_c = ['白銅貨', 'Cupronickel coin']
g_coin_500_a = ['白銅貨', 'Cupronickel coin']
g_coin_500_b = ['ニッケル白銅貨', 'Nickel-brass coin']
g_coin_500_c = ['バイカラー・クラッド貨','Bicolor Clad coin']


def getWidth(s,e,x):
    return ((g_img_w - 100) - 150 ) / (e - s) * x + 150

def writeHeader(f,title):
    f.write('<?xml version="1.0" encoding="UTF-8" standalone="no"?>\n')
    f.write('<!DOCTYPE svg PUBLIC "-//W3C//DTD SVG 1.1//EN" "http://www.w3.org/Graphics/SVG/1.1/DTD/svg11.dtd">\n')
    f.write('<svg xml:space="default" width="'+str(g_img_w)+'" height="'+str(g_img_h)+'" viewBox="0 0 '+str(g_img_w)+' '+str(g_img_h)+'" xmlns="http://www.w3.org/2000/svg">\n')
    f.write('\t<title>'+title+'</title>\n')
    f.write('\t<defs>\n')
    #Color Universal Design (RGB)
    #Red = 255,75,0
    f.write('\t\t<g>\n')
    f.write('\t\t\t<linearGradient id="fill0" gradientTransform="rotate(90)">\n')
    f.write('\t\t\t\t<stop offset="0" stop-color="rgb(255,75,0)" stop-opacity="0.9" />\n')
    f.write('\t\t\t\t<stop offset="0.075" stop-color="rgb(255,75,0)" stop-opacity="0.2" />\n')
    f.write('\t\t\t</linearGradient>\n')
     
    #Green = 3,175,122
    f.write('\t\t\t<linearGradient id="fill1" gradientTransform="rotate(90)">\n')
    f.write('\t\t\t\t<stop offset="0" stop-color="rgb(3,175,122)" stop-opacity="0.9" />\n')
    f.write('\t\t\t\t<stop offset="0.075" stop-color="rgb(3,175,122)" stop-opacity="0.2" />\n')
    f.write('\t\t\t</linearGradient>\n')
 
    #Sky = 77,196,255
    f.write('\t\t\t<linearGradient id="fill2" gradientTransform="rotate(90)">\n')
    f.write('\t\t\t\t<stop offset="0" stop-color="rgb(77,196,255)" stop-opacity="0.9" />\n')
    f.write('\t\t\t\t<stop offset="0.075" stop-color="rgb(77,196,255)" stop-opacity="0.2" />\n')
    f.write('\t\t\t</linearGradient>\n')
 
    #Blue = 0,90,255
    f.write('\t\t\t<linearGradient id="fill3" gradientTransform="rotate(90)">\n')
    f.write('\t\t\t\t<stop offset="0" stop-color="rgb(0,90,255)" stop-opacity="0.9" />\n')
    f.write('\t\t\t\t<stop offset="0.075" stop-color="rgb(0,90,255)" stop-opacity="0.2" />\n')
    f.write('\t\t\t</linearGradient>\n')
 
    #Yellow = 255,241,0
    f.write('\t\t\t<linearGradient id="fill4" gradientTransform="rotate(90)">\n')
    f.write('\t\t\t\t<stop offset="0" stop-color="rgb(255,241,0)" stop-opacity="0.9" />\n')
    f.write('\t\t\t\t<stop offset="0.075" stop-color="rgb(255,241,0)" stop-opacity="0.2" />\n')
    f.write('\t\t\t</linearGradient>\n')

    f.write('\t\t</g>\n')

    #f.write('\t\t\t<rect x="80" y="420" width="6.8" height="480" id="bar0" fill="url(#fill0)" />\n')

    #Clipping
    f.write('\t\t<clipPath id="clip1">\n')
    f.write('\t\t\t<rect x="150" y="0" width="' + str(g_img_w - 250) + '" height="' + str(g_img_h - 200) + '" />\n')
    f.write('\t\t</clipPath>\n')

    f.write('\t</defs>\n')

def writeBackground(f):
    #Background
    f.write('\t<!-- Background -->\n')
    f.write('\t<rect fill="white" x="0" y="0" width="'+str(g_img_w)+'" height="'+str(g_img_h)+'" />\n')
    
def writeFrame(f,s_year,e_year,y_range):
    #Initialize Nengo
    ar_nengo_ja = []
    ar_nengo_en = []
    ar_y_scale = []
    
    for i in range(1,65):
        ar_nengo_ja.append('昭和'+str(i)+'年')
        ar_nengo_en.append('Showa '+str(i))
    ar_nengo_ja.append('平成元年')
    ar_nengo_en.append('Heisei 1')   
    for i in range(2,32):
        ar_nengo_ja.append('平成'+str(i)+'年')
        ar_nengo_en.append('Heisei '+str(i))
    ar_nengo_ja.append('令和元年')
    ar_nengo_en.append('Reiwa 1')
    for i in range(2,100):
        ar_nengo_ja.append('令和'+str(i)+'年')
        ar_nengo_en.append('Reiwa '+str(i))

    #Axis
    f.write('\t<!-- Frame -->\n')
    f.write('\t<g>\n')
    f.write('\t\t<path fill="none" stroke-width="2px" stroke="black" d="M 150 50 V '+str(g_img_h-200)+' H '+str(g_img_w-100)+'" />\n')
    f.write('\t</g>\n')

    #Y-axis
    f.write('\t<!-- Y-Axis scale -->\n')
    f.write('\t<g fill="black" font-size="24" font-family="sans-serif" text-anchor="end" dominant-baseline="central">\n')
    if y_range == 0:
        ar_y_scale = [ '0', '100', '200', '300', '400', '500' ]
    elif y_range == 1:
        ar_y_scale = [ '0', '200', '400', '600', '800', '1,000' ]
    elif y_range == 2:
        ar_y_scale = [ '0', '500', '1,000', '1,500', '2,000' , '2,500' ]
    else:
        ar_y_scale = [ '0', 'ERROR', 'ERROR', 'ERROR', 'ERROR' ]

    for i in range(len(ar_y_scale)):
        f.write('\t\t<text x="140" y="'+ str(g_img_h - 200 - 100 * i) +'">' + str(ar_y_scale[i]) + '</text>\n')
    f.write('\t</g>\n')
    
    f.write('\t<g>\n')
    for i in range(1,len(ar_y_scale)):
        f.write('\t\t<path fill="none" stroke-width="1px" stroke="gray" stroke-dasharray="3" d="M 150 '+ str(g_img_h - 200 - 100 * i) +' H '+str(g_img_w-100)+'" />\n')
    f.write('\t</g>\n')
 
    f.write('\t<g transform="translate(40,350)">\n')
    f.write('\t\t<switch>\n')
    
    f.write('\t\t\t<text x="0" y="0" font-size="24" text-anchor="middle" dominant-baseline="central" systemLanguage="en" font-family="sans-serif" fill="black" transform="rotate(270)">Number of coin production (x1,000,000)</text>\n')
    f.write('\t\t\t<text x="0" y="0" font-size="24" text-anchor="middle" dominant-baseline="central" systemLanguage="ja" font-family="TakaoGothic" fill="black" transform="rotate(270)">製造枚数 [百万枚]</text>\n')
    f.write('\t\t\t<text x="0" y="0" font-size="24" text-anchor="middle" dominant-baseline="central" font-family="sans-serif" fill="black" transform="rotate(270)">Number of coin production (x1,000,000)</text>\n')
    
    f.write('\t\t</switch>\n')
    f.write('\t</g>\n')


    #X-Axis
    f.write('\t<!-- X-Axis scale -->\n')
    y_width = (g_img_w - 250.0) / (e_year - s_year + 1.0)
    cnt = 0
    for i in range(s_year, e_year+1):
        if i > g_current_year:
            f.write('\t<!--\n')
        f.write('\t<g transform="translate('+format((y_width * cnt + 150.0 + 24),'.2f')+',615)">\n')
        f.write('\t\t<switch>\n')
        f.write('\t\t\t<text x="0" y="0" font-size="24" text-anchor="end" dominant-baseline="text-bottom" systemLanguage="en" font-family="sans-serif" fill="black" transform="rotate(270)">'+ar_nengo_en[i]+'</text>\n')
        f.write('\t\t\t<text x="0" y="0" font-size="24" text-anchor="end" dominant-baseline="text-bottom" systemLanguage="ja" font-family="TakaoGothic" fill="black" transform="rotate(270)">'+ar_nengo_ja[i]+'</text>\n')
        f.write('\t\t\t<text x="0" y="0" font-size="24" text-anchor="end" dominant-baseline="text-bottom" font-family="sans-serif" fill="black" transform="rotate(270)">'+ar_nengo_en[i]+'</text>\n')
        f.write('\t\t</switch>\n')
        f.write('\t</g>\n')
        if i > g_current_year:
            f.write('\t -->\n')
        cnt+=1
def writeLegend(f, index, data):
    l_color = [ 'rgb(255,75,0', 'rgb(3,175,122)', 'rgb(77,196,255)', 'rgb(0,90,255)', 'rgb(255,241,0)' ]
    y = index * 30    
    f.write('\t<g transform="translate('+str(g_img_w - 350)+','+str(110+y)+')">\n')
    f.write('\t\t<rect fill="'+l_color[index]+'" stroke-width="1px" stroke="gray" x="0" y="0" width="20" height="20" />\n')
    f.write('\t\t<switch>\n')
    f.write('\t\t\t<text x="30" y="18" font-size="24" text-anchor="start" dominant-baseline="text-bottom" systemLanguage="en" font-family="sans-serif" fill="black">'+data[1]+'</text>\n')
    f.write('\t\t\t<text x="30" y="18" font-size="24" text-anchor="start" dominant-baseline="text-bottom" systemLanguage="ja" font-family="TakaoGothic" fill="black">'+data[0]+'</text>\n')
    f.write('\t\t\t<text x="30" y="18" font-size="24" text-anchor="start" dominant-baseline="text-bottom" font-family="sans-serif" fill="black">'+data[1]+'</text>\n')
    f.write('\t\t</switch>\n')
    f.write('\t</g>\n')

def writeData(f, s_year, e_year, n_data, y_range, data1, data2, data3, data4, data5):
    bar_x_size = (g_img_w - 250.0) / (e_year - s_year)
    bar_y_scale = 1
    y_width = (g_img_w - 250.0) / (e_year - s_year + 1.0)

    #Range 0 - 500M
    if y_range == 0:
        bar_y_scale = (g_img_h - 300.0) / 500000.0
    #Range 500M - 1G
    elif y_range == 1:
        bar_y_scale = (g_img_h - 300.0) / 1000000.0
    #Range 1G - 5G
    elif y_range == 2:
        bar_y_scale = (g_img_h - 300.0) / 2500000.0
        
    #Draw Bar
    f.write('\t<!-- Data -->\n')
    f.write('\t<g clip-path="url(#clip1)">\n')
    cnt = 0
    for i in range((2 + s_year - 22), len(data1)):
        if data1[i] == '-':
            num1 = 0
        else:
            num1 = float(data1[i])
        x1 = y_width * cnt + 150.0
        y1 = g_img_h - num1 * bar_y_scale - 200.0

        if data2 == None:
            num2 = 0
        elif data2[i] == '-':
            num2 = 0
        else:
            num2 = float(data2[i])
        x2 = y_width * cnt + 150.0
        y2 = g_img_h - num2 * bar_y_scale - 200.0

        if data3 == None:
            num3 = 0
        elif data3[i] == '-':
            num3 = 0
        else:
            num3 = float(data3[i])
        x3 = y_width * cnt + 150.0
        y3 = g_img_h - num3 * bar_y_scale - 200.0

        if data4 == None:
            num4 = 0
        elif data4[i] == '-':
            num4 = 0
        else:
            num4 = float(data4[i])
        x4 = y_width * cnt + 150.0
        y4 = g_img_h - num4 * bar_y_scale - 200.0

        if data5 == None:
            num5 = 0
        elif(data5[i] == '-'):
            num5 = 0
        else:
            num5 = float(data5[i])
        x5 = y_width * cnt + 150.0
        y5 = g_img_h - num5 * bar_y_scale - 200.0

        if (num1 != 0 and num2 != 0) or (num2 != 0 and num3 != 0) or (num3 != 0 and num4 != 0) or (num4 != 0 and num5 != 0):
            if num1 != 0 and num2 != 0:
                f.write('\t\t<rect x="'+ format(x1, '.2f') +'" y="'+ format(y1, '.2f') +'" width="' + format(bar_x_size / 2.0,'.2f') + '" height="' + str(g_img_h) + '" fill="url(#fill0)" />\n')
                f.write('\t\t<rect x="'+ format(x2 + bar_x_size / 2.0, '.2f') +'" y="'+ format(y2, '.2f') +'" width="' + format(bar_x_size / 2.0,'.2f') + '" height="' + str(g_img_h) + '" fill="url(#fill1)" />\n')
            elif num2 != 0 and num3 != 0:
                f.write('\t\t<rect x="'+ format(x2, '.2f') +'" y="'+ format(y2, '.2f') +'" width="' + format(bar_x_size / 2.0,'.2f') + '" height="' + str(g_img_h) + '" fill="url(#fill1)" />\n')
                f.write('\t\t<rect x="'+ format(x3 + bar_x_size / 2.0, '.2f') +'" y="'+ format(y3, '.2f') +'" width="' + format(bar_x_size / 2.0,'.2f') + '" height="' + str(g_img_h) + '" fill="url(#fill2)" />\n')
            elif num3 != 0 and num4 != 0:
                f.write('\t\t<rect x="'+ format(x3, '.2f') +'" y="'+ format(y3, '.2f') +'" width="' + format(bar_x_size / 2.0,'.2f') + '" height="' + str(g_img_h) + '" fill="url(#fill2)" />\n')
                f.write('\t\t<rect x="'+ format(x4 + bar_x_size / 2.0, '.2f') +'" y="'+ format(y4, '.2f') +'" width="' + format(bar_x_size / 2.0,'.2f') + '" height="' + str(g_img_h) + '" fill="url(#fill3)" />\n')
            elif num4 != 0 and num5 != 0:
                f.write('\t\t<rect x="'+ format(x4, '.2f') +'" y="'+ format(y4, '.2f') +'" width="' + format(bar_x_size / 2.0,'.2f') + '" height="' + str(g_img_h) + '" fill="url(#fill3)" />\n')
                f.write('\t\t<rect x="'+ format(x5 + bar_x_size / 2.0, '.2f') +'" y="'+ format(y5, '.2f') +'" width="' + format(bar_x_size / 2.0,'.2f') + '" height="' + str(g_img_h) + '" fill="url(#fill4)" />\n')
        else:
            if num1 != 0:
                f.write('\t\t<rect x="'+ format(x1, '.2f') +'" y="'+ format(y1, '.2f') +'" width="' + format(bar_x_size,'.2f') + '" height="' + str(g_img_h) + '" fill="url(#fill0)" />\n')
            if num2 != 0:
                f.write('\t\t<rect x="'+ format(x2, '.2f') +'" y="'+ format(y2, '.2f') +'" width="' + format(bar_x_size,'.2f') + '" height="' + str(g_img_h) + '" fill="url(#fill1)" />\n')
            if num3 != 0:
                f.write('\t\t<rect x="'+ format(x3, '.2f') +'" y="'+ format(y3, '.2f') +'" width="' + format(bar_x_size,'.2f') + '" height="' + str(g_img_h) + '" fill="url(#fill2)" />\n')
            if num4 != 0:
                f.write('\t\t<rect x="'+ format(x4, '.2f') +'" y="'+ format(y4, '.2f') +'" width="' + format(bar_x_size,'.2f') + '" height="' + str(g_img_h) + '" fill="url(#fill3)" />\n')
            if num5 != 0:
                f.write('\t\t<rect x="'+ format(x5, '.2f') +'" y="'+ format(y5, '.2f') +'" width="' + format(bar_x_size,'.2f') + '" height="' + str(g_img_h) + '" fill="url(#fill4)" />\n')

        
        cnt+=1
    f.write('\t</g>\n')
        
def writeFooter(f):
    f.write('</svg>')

def loadCoinCSV(f):
    reader = csv.reader(f)
    cnt = 0
    for row in reader:
        if cnt != 0:
            #1 Yen
            g_coin_1_a.append(row[1])
            #5 Yen (No-holed)
            g_coin_5_a.append(row[2])
            #5 Yen (Square type)
            g_coin_5_b.append(row[3])
            #5 Yen (Gothic type)
            g_coin_5_c.append(row[4])
            #10 Yen (Milled)
            g_coin_10_a.append(row[5])
            #10 Yen (Plain)
            g_coin_10_b.append(row[6])
            #50 Yen (No-holed Nickel)
            g_coin_50_a.append(row[7])
            #50 Yen (Holed Nickel)
            g_coin_50_b.append(row[8])
            #50 Yen (Cupronickel)
            g_coin_50_c.append(row[9])
            #100 Yen (Phoneix)
            g_coin_100_a.append(row[10])
            #100 Yen (Rice Plant)
            g_coin_100_b.append(row[11])
            #100 Yen (Cupronickel)
            g_coin_100_c.append(row[12])
            #500 Yen (Cupronickel)
            g_coin_500_a.append(row[13])
            #500 Yen (Nickel-brass)
            g_coin_500_b.append(row[14])
            #500 Yen (Bicolor Clad)
            g_coin_500_c.append(row[15])
        cnt+=1
    
     
if __name__ == '__main__':
    args = sys.argv

    #Load CSV File
    print('Loading CSV file...', end='')
    f_data = open('./num_coin_product.csv', mode='r', encoding='utf-8')
    loadCoinCSV(f_data)
    f_data.close()
    print('OK')

    #Make 1 Yen (Since 1955)
    print('Make Number_of_1_yen_coin_production.svg...', end='')   
    f = open('./Number_of_1_yen_coin_production.svg', 'w')
    writeHeader(f,'一円硬貨製造枚数 - Number of 1 yen coin production -')
    writeBackground(f)
    writeData(f,29,g_graph_x_end,1,2,g_coin_1_a,None,None,None,None)
    writeFrame(f,29,g_graph_x_end,2)
    writeLegend(f,0,g_coin_1_a)
    writeFooter(f)
    f.close()
    print('OK')

    #Make 5 Yen (Since 1948)
    print('Make Number_of_5_yen_coin_production.svg...', end='')
    f = open('./Number_of_5_yen_coin_production.svg', 'w')
    writeHeader(f,'五円硬貨製造枚数 - Number of 5 yen coin production -')
    writeBackground(f)
    writeData(f,22,g_graph_x_end,3,1,g_coin_5_a,g_coin_5_b,g_coin_5_c,None,None)
    writeFrame(f,22,g_graph_x_end,1)
    writeLegend(f,0,g_coin_5_a)
    writeLegend(f,1,g_coin_5_b)
    writeLegend(f,2,g_coin_5_c)
    writeFooter(f)
    f.close()
    print('OK')

    #Make 10 Yen (Since 1951)
    print('Make Number_of_10_yen_coin_production.svg...', end='')
    f = open('./Number_of_10_yen_coin_production.svg', 'w')
    writeHeader(f,'十円硬貨製造枚数 - Number of 10 yen coin production -')
    writeBackground(f)
    writeData(f,25,g_graph_x_end,3,2,g_coin_10_a,g_coin_10_b,None,None,None)
    writeFrame(f,25,g_graph_x_end,2)
    writeLegend(f,0,g_coin_10_a)
    writeLegend(f,1,g_coin_10_b)
    writeFooter(f)
    f.close()
    print('OK')

    #Make 50 Yen (Since 1955)
    print('Make Number_of_50_yen_coin_production.svg...', end='')
    f = open('./Number_of_50_yen_coin_production.svg', 'w')
    writeHeader(f,'五十円硬貨製造枚数 - Number of 50 yen coin production -')
    writeBackground(f)
    writeData(f,29,g_graph_x_end,3,0,g_coin_50_a,g_coin_50_b,g_coin_50_c,None,None)
    writeFrame(f,29,g_graph_x_end,0)
    writeLegend(f,0,g_coin_50_a)
    writeLegend(f,1,g_coin_50_b)
    writeLegend(f,2,g_coin_50_c)
    writeFooter(f)
    f.close()
    print('OK')

    #Make 100 Yen (Since 1957)
    print('Make Number_of_100_yen_coin_production.svg...', end='')
    f = open('./Number_of_100_yen_coin_production.svg', 'w')
    writeHeader(f,'百円硬貨製造枚数 - Number of 100 yen coin production -')
    writeBackground(f)
    writeData(f,31,g_graph_x_end,3,1,g_coin_100_a,g_coin_100_b,g_coin_100_c,None,None)
    writeFrame(f,31,g_graph_x_end,1)
    writeLegend(f,0,g_coin_100_a)
    writeLegend(f,1,g_coin_100_b)
    writeLegend(f,2,g_coin_100_c)
    writeFooter(f)
    f.close()
    print('OK')

    #Make 500 Yen (Since 1982)
    print('Make Number_of_500_yen_coin_production.svg...', end='')
    f = open('./Number_of_500_yen_coin_production.svg', 'w')
    writeHeader(f,'五百円硬貨製造枚数 - Number of 500 yen coin production -')
    writeBackground(f)
    writeData(f,56,g_graph_x_end,3,1,g_coin_500_a,g_coin_500_b,g_coin_500_c,None,None)
    writeFrame(f,56,g_graph_x_end,1)
    writeLegend(f,0,g_coin_500_a)
    writeLegend(f,1,g_coin_500_b)
    writeLegend(f,2,g_coin_500_c)
    writeFooter(f)
    f.close()
    print('OK')