// 本程序可以實(shí)現(xiàn)實(shí)數(shù)的加減程序四則運(yùn)算煌寇，支持括號運(yùn)算符返劲，不支持正負(fù)符號！另外Calculator類本身進(jìn)行了加減乘數(shù)輸入輸出的重載约巷！
//

#include "stdafx.h"
#include<iostream>
#include<functional>  //plus等標(biāo)準(zhǔn)庫函數(shù)對象
#include<map>
#include<string>
#include<vector>
#include<algorithm>

using namespace std;

class Calculator
{
public:
    //Calculator(const map<char,function<double(double,double)>> &c):calu(c){}
    Calculator() = default;
    Calculator(const string &s) :str(s),sum(get_sum(s)) {}
    
    string get_string()const { return str; }

    double get_sum(const string &s)
    { 
        if (sum_str(s))
        {
            str = s;
            return get_sum();
        }
            
        else
        {
            throw exception("NO sum!");
        }
    }
    double get_sum()
    {
        return sum;
    }

    void operator()()
    { 
        cout << get_sum();
    }

    friend Calculator operator+(const Calculator &lh, const Calculator &rh);
    friend Calculator operator-(const Calculator &lh, const Calculator &rh);
    friend Calculator operator*(const Calculator &lh, const Calculator &rh);
    friend Calculator operator/(const Calculator &lh, const Calculator &rh);
    friend istream& operator>>(istream &in, Calculator &rh);
    friend ostream& operator<<(ostream &os, const Calculator &rh);
    friend bool operator<(const Calculator &lh, const Calculator &rh);
    friend bool operator==(const Calculator &lh, const Calculator &rh);

    Calculator operator+=(const Calculator &rh)
    {
        str = str+"+"+rh.str;
        sum = rh.sum + sum;
        return  *this;
    }


private:
    double sum = 0;
    string str;
    map<string, function<double(double, double)>> calu={ { "+", plus<double>() },{ "-",minus<double>() },{ "*",multiplies<double>() },{ "/",divides<double>() } };// /轉(zhuǎn)義字符如何解決啊？為什么不能設(shè)置為static成員毅厚！
    double sum_str(string s);
};

Calculator operator+(const Calculator &lh, const Calculator &rh)
{
    Calculator sum = lh;
    sum += rh;
    return sum;
}
Calculator operator-(const Calculator &lh, const Calculator &rh)
{
    Calculator ret;
    ret.str = lh.str + "-(" + rh.str + ")";
    ret.sum = lh.sum - rh.sum;
    return ret;
}
Calculator operator*(const Calculator &lh, const Calculator &rh)
{
    Calculator ret;
    ret.str = string("(")+lh.str + ")" + "*(" + rh.str + ")";
    ret.sum = lh.sum * rh.sum;
    return ret;
}
Calculator operator/(const Calculator &lh, const Calculator &rh)
{
    Calculator ret;
    if (rh.sum != 0)
    {
        ret.str = string("(") + lh.str + ")" + "/(" + rh.str + ")";
        ret.sum = lh.sum / rh.sum;
        return ret;
    }
    else
        throw invalid_argument(to_string(rh.sum));

}
bool operator<(const Calculator &lh, const Calculator &rh)
{
    if (lh.sum < rh.sum)
        return true;
    else
        return false;
}
bool operator==(const Calculator &lh, const Calculator &rh)
{
    return lh.sum == rh.sum;
}

istream& operator>>(istream &in, Calculator &rh)
{
    in >> rh.str;
    if (in)
        rh.get_sum(rh.str);
    return in;
}
ostream& operator<<(ostream &os,const Calculator &rh)
{
    os << rh.sum;
    return os;
}

double Calculator::sum_str(string s)
{
    //size_t cc = 0;
    //for (auto r : s)      //for范圍需要引用嗎？可以引用浦箱，可以不引用吸耿。引用的時候可以改變字符！

    for (size_t i = 0; i < s.size(); i++)
    {
        if (s[i] == '(')
        {
            for (size_t j = s.size() - 1; j > i; --j)
            {
                if (s[j] == ')')
                {
                    bool flag = true;                   //判斷（）內(nèi)部是否還有其他括號
                    for (size_t k = i+1; k < j; ++k)
                    {
                        if (s[k] == '(' || s[k] == ')')
                            flag = false;
                    }
                    if (flag)
                    {
                        string tmp1 = s.substr(i + 1, j - i - 1);
                        auto tmp2 = sum_str(tmp1);
                        s = s.substr(0, i) + to_string(tmp2) + s.substr(j + 1);
                        break;
                    }
                }
            }
        }
    }

    const string format = "+-*/.0123456789";
    for (auto r : s)                        //監(jiān)測是否含有非法字符酷窥？
    {
        if (format.find(r) == string::npos)
        {
            throw invalid_argument(s);
        }
    }

    const string format2 = "+-*/";
    size_t pos = 0;                 //分接字符串s咽安。（只做四則運(yùn)算，不包含括號和正負(fù)Ｅ钔啤）
    vector<string> tmp;
    for (size_t i = 0; i < s.size(); ++i)
    {
        if (format2.find(s[i]) != string::npos)
        {
            if (i == pos)                               //如果兩個符號相同位置妆棒，則將數(shù)字置為0.主要應(yīng)用于（-13）計(jì)算！
                tmp.push_back(string(1, '0'));
            else
                tmp.push_back(s.substr(pos, i - pos));
            tmp.push_back(string(1, s[i]));
            pos = i + 1;
        }
    }
    tmp.push_back(s.substr(pos));       //最后一個數(shù)字沸伏！

    size_t length = tmp.size();
    while (length>1)
    {
        for (size_t i = 0; i < length; ++i)
        {
            if (tmp[i] == "*" || tmp[i] == "/")
            {
                auto tmp_0 = stod(tmp[i - 1]);
                auto tmp_1 = stod(tmp[i + 1]);
                if (tmp[i] == "*")
                {
                    tmp_0=calu[tmp[i]](tmp_0, tmp_1);
                    //tmp_0 = tmp_0*tmp_1;
                    tmp[i - 1] = to_string(tmp_0);
                }
                else
                {
                    tmp_0 = calu[tmp[i]](tmp_0, tmp_1);
                    //tmp_0 = tmp_0/tmp_1;
                    tmp[i - 1] = to_string(tmp_0);
                }
                for (size_t j = i; j < (length-3); j=j+2)
                {
                    swap(tmp[j], tmp[j + 2]);
                    swap(tmp[j + 1], tmp[j + 3]);
                }
                tmp.pop_back();
                tmp.pop_back();
                i = i-1;            //移動了vector的元素糕珊，所以實(shí)時位置i要更改！
                length = length - 2;
            }
        }

        for (size_t i = 0; i < length; ++i)
        {
            if (tmp[i] == "+" || tmp[i] == "-")
            {
                auto tmp_0 = stod(tmp[i - 1]);
                auto tmp_1 = stod(tmp[i + 1]);
                if (tmp[i] == "+")
                {
                    tmp_0 = calu[tmp[i]](tmp_0, tmp_1);
                    //tmp_0 = tmp_0+tmp_1;
                    tmp[i - 1] = to_string(tmp_0);
                }
                else
                {
                    tmp_0 = calu[tmp[i]](tmp_0, tmp_1);
                    //tmp_0 = tmp_0 - tmp_1;
                    tmp[i - 1] = to_string(tmp_0);
                }
                for (size_t j = i; j < (length - 3); j = j + 2)
                {
                    swap(tmp[i], tmp[i + 2]);
                    swap(tmp[i + 1], tmp[i + 3]);
                }
                tmp.pop_back();
                tmp.pop_back();
                length = length - 2;
            }
        }
    }
    sum = stod(tmp[0]);
    return sum;
}


double sum(string s)
{
    map<string, function<double(double, double)>> calu = { { "+", plus<double>() },{ "-",minus<double>() },{ "*",multiplies<double>() },{ "/",divides<double>() } };// /轉(zhuǎn)義字符如何解決耙阍恪红选？為什么不能設(shè)置為static成員！
    for (size_t i = 0; i < s.size(); i++)
    {
        if (s[i] == '(')
        {
            for (size_t j = s.size()-1; j > i; --j)
            {
                if (s[j] == ')')
                {
                    string tmp1 = s.substr(i + 1, j - i - 1);
                    auto tmp2 = sum(tmp1);
                    s = s.substr(0, i) + to_string(tmp2)+s.substr(j+1);
                    break;
                }
            }
        }
    }

    const string format = "+-*/.0123456789";
    for (auto r : s)                        //監(jiān)測是否含有非法字符姆另？
    {
        if (format.find(r) == string::npos)
        {
            throw invalid_argument(s);
        }
    }

    const string format2 = "+-*/";
    size_t pos = 0;                 //分接字符串s喇肋。（只做四則運(yùn)算，不包含括號和正負(fù)＜７）
    vector<string> tmp;
    for (size_t i = 0; i < s.size(); ++i)
    {
        if (format2.find(s[i]) != string::npos)
        {
            if(i==pos)                              //如果兩個符號相同位置苟蹈，則將數(shù)字置為0.主要應(yīng)用于（-13）計(jì)算！
                tmp.push_back(string(1,'0'));
            else
                tmp.push_back(s.substr(pos, i - pos));
            tmp.push_back(string(1, s[i]));
            pos = i + 1;
        }
    }
    tmp.push_back(s.substr(pos));       //最后一個數(shù)字右核！

    size_t length = tmp.size();
    while (length>1)
    {
        for (size_t i = 0; i < length; ++i)
        {
            if (tmp[i] == "*" || tmp[i] == "/")
            {
                auto tmp_0 = stod(tmp[i - 1]);
                auto tmp_1 = stod(tmp[i + 1]);
                if (tmp[i] == "*")
                {
                    tmp_0 = calu[tmp[i]](tmp_0, tmp_1);
                    //tmp_0 = tmp_0*tmp_1;
                    tmp[i - 1] = to_string(tmp_0);
                }
                else
                {
                    tmp_0 = calu[tmp[i]](tmp_0, tmp_1);
                    //tmp_0 = tmp_0/tmp_1;
                    tmp[i - 1] = to_string(tmp_0);
                }
                for (size_t j = i; j < (length - 3); j = j + 2)
                {
                    swap(tmp[j], tmp[j + 2]);
                    swap(tmp[j + 1], tmp[j + 3]);
                }
                tmp.pop_back();
                tmp.pop_back();
                i = i - 1;          //移動了vector的元素慧脱，所以實(shí)時位置i要更改！類似于迭代器之于容器贺喝！
                length = length - 2;
            }
        }

        for (size_t i = 0; i < length; ++i)
        {
            if (tmp[i] == "+" || tmp[i] == "-")
            {
                auto tmp_0 = stod(tmp[i - 1]);
                auto tmp_1 = stod(tmp[i + 1]);
                if (tmp[i] == "+")
                {
                    tmp_0 = calu[tmp[i]](tmp_0, tmp_1);
                    //tmp_0 = tmp_0+tmp_1;
                    tmp[i - 1] = to_string(tmp_0);
                }
                else
                {
                    tmp_0 = calu[tmp[i]](tmp_0, tmp_1);
                    //tmp_0 = tmp_0 - tmp_1;
                    tmp[i - 1] = to_string(tmp_0);
                }
                for (size_t j = i; j < (length - 3); j = j + 2)
                {
                    swap(tmp[i], tmp[i + 2]);
                    swap(tmp[i + 1], tmp[i + 3]);
                }
                tmp.pop_back();
                tmp.pop_back();
                length = length - 2;
            }
        }
    }
    auto su = stod(tmp[0]);
    return su;
}

int main()
{
    //map<char, function<double(double, double)>> cal = { {'+', plus<double>()},{'-',minus<double>()},{'*',multiplies<double>()},{'/',divides<double>() } };// /轉(zhuǎn)義字符如何解決傲馀浮宗兼？
    /*
    Calculator cc;
    cout<<cc.get_sum(("1+2*3/3-1*2/2"))<<endl;

    Calculator c1("1+4/2*3-1*2");
    Calculator c2("1+4/2*3+1*2");

    cout << c1.get_sum() << "  " << c2.get_sum() << endl;
    */

    Calculator ca1,ca2;
    cin >> ca1 >> ca2;
    //cout << ca1 << " + " << ca2 <<" = "<<ca1+ca2<< endl;

    auto ca3 = ca1 / ca2;
    cout << ca3.get_string() <<" = "<< ca3.get_sum(ca3.get_string())<<endl;

    auto ca4 = ca1 * ca2;
    cout << ca4.get_string() << " = " << ca4.get_sum(ca4.get_string()) << endl;


    cout << sum("(1-(2*(3+2*2)))") << endl;


    system("pause");
    return 0;
}