diff options
Diffstat (limited to 'option.cc')
-rw-r--r-- | option.cc | 543 |
1 files changed, 0 insertions, 543 deletions
@@ -210,546 +210,3 @@ void process_arguments(int, char ** argv, const bool anywhere, } } // namespace ledger - -#if 0 -////////////////////////////////////////////////////////////////////// -// -// Basic options - -OPT_BEGIN(full_help, "H") { - option_full_help(std::cout); - throw 0; -} OPT_END(full_help); - -OPT_BEGIN(help, "h") { - option_help(std::cout); - throw 0; -} OPT_END(help); - -OPT_BEGIN(help_calc, "") { - option_calc_help(std::cout); - throw 0; -} OPT_END(help_calc); - -OPT_BEGIN(help_disp, "") { - option_disp_help(std::cout); - throw 0; -} OPT_END(help_disp); - -OPT_BEGIN(help_comm, "") { - option_comm_help(std::cout); - throw 0; -} OPT_END(help_comm); - -OPT_BEGIN(version, "v") { - show_version(std::cout); - throw 0; -} OPT_END(version); - -OPT_BEGIN(init_file, "i:") { - std::string path = resolve_path(optarg); - if (access(path.c_str(), R_OK) != -1) - config->init_file = path; - else - throw_(std::invalid_argument, - "The init file '" << path << "' does not exist or is not readable"); -} OPT_END(init_file); - -OPT_BEGIN(file, "f:") { - if (std::string(optarg) == "-") { - config->data_file = optarg; - } else { - std::string path = resolve_path(optarg); - if (access(path.c_str(), R_OK) != -1) - config->data_file = path; - else - throw_(std::invalid_argument, - "The ledger file '" << path << "' does not exist or is not readable"); - } -} OPT_END(file); - -OPT_BEGIN(cache, ":") { - config->cache_file = resolve_path(optarg); -} OPT_END(cache); - -OPT_BEGIN(no_cache, "") { - config->cache_file = "<none>"; -} OPT_END(no_cache); - -OPT_BEGIN(output, "o:") { - if (std::string(optarg) != "-") { - std::string path = resolve_path(optarg); - report->output_file = path; - } -} OPT_END(output); - -OPT_BEGIN(account, "a:") { - config->account = optarg; -} OPT_END(account); - -OPT_BEGIN(debug, ":") { - config->debug_mode = true; - ::setenv("DEBUG_CLASS", optarg, 1); -} OPT_END(debug); - -OPT_BEGIN(verbose, "") { - config->verbose_mode = true; -} OPT_END(verbose); - -OPT_BEGIN(trace, "") { - config->trace_mode = true; -} OPT_END(trace); - -////////////////////////////////////////////////////////////////////// -// -// Report filtering - -OPT_BEGIN(effective, "") { - xact_t::use_effective_date = true; -} OPT_END(effective); - -OPT_BEGIN(begin, "b:") { - char buf[128]; - interval_t interval(optarg); - if (! interval.begin) - throw_(std::invalid_argument, - "Could not determine beginning of period '" << optarg << "'"); - - if (! report->predicate.empty()) - report->predicate += "&"; - report->predicate += "d>=["; - report->predicate += interval.begin.to_string(); - report->predicate += "]"; -} OPT_END(begin); - -OPT_BEGIN(end, "e:") { - char buf[128]; - interval_t interval(optarg); - if (! interval.begin) - throw_(std::invalid_argument, - "Could not determine end of period '" << optarg << "'"); - - if (! report->predicate.empty()) - report->predicate += "&"; - report->predicate += "d<["; - report->predicate += interval.begin.to_string(); - report->predicate += "]"; - - terminus = interval.begin; -} OPT_END(end); - -OPT_BEGIN(current, "c") { - if (! report->predicate.empty()) - report->predicate += "&"; - report->predicate += "d<=m"; -} OPT_END(current); - -OPT_BEGIN(cleared, "C") { - if (! report->predicate.empty()) - report->predicate += "&"; - report->predicate += "X"; -} OPT_END(cleared); - -OPT_BEGIN(uncleared, "U") { - if (! report->predicate.empty()) - report->predicate += "&"; - report->predicate += "!X"; -} OPT_END(uncleared); - -OPT_BEGIN(real, "R") { - if (! report->predicate.empty()) - report->predicate += "&"; - report->predicate += "R"; -} OPT_END(real); - -OPT_BEGIN(actual, "L") { - if (! report->predicate.empty()) - report->predicate += "&"; - report->predicate += "L"; -} OPT_END(actual); - -OPT_BEGIN(lots, "") { - report->keep_price = - report->keep_date = - report->keep_tag = true; -} OPT_END(lots); - -OPT_BEGIN(lot_prices, "") { - report->keep_price = true; -} OPT_END(lots_prices); - -OPT_BEGIN(lot_dates, "") { - report->keep_date = true; -} OPT_END(lots_dates); - -OPT_BEGIN(lot_tags, "") { - report->keep_tag = true; -} OPT_END(lots_tags); - -////////////////////////////////////////////////////////////////////// -// -// Output customization - -OPT_BEGIN(format, "F:") { - report->format_string = optarg; -} OPT_END(format); - -OPT_BEGIN(date_format, "y:") { - report->date_output_format = optarg; -} OPT_END(date_format); - -OPT_BEGIN(input_date_format, ":") { - config->date_input_format = optarg; -} OPT_END(input_date_format); - -OPT_BEGIN(balance_format, ":") { - config->balance_format = optarg; -} OPT_END(balance_format); - -OPT_BEGIN(register_format, ":") { - config->register_format = optarg; -} OPT_END(register_format); - -OPT_BEGIN(wide_register_format, ":") { - config->wide_register_format = optarg; -} OPT_END(wide_register_format); - -OPT_BEGIN(plot_amount_format, ":") { - config->plot_amount_format = optarg; -} OPT_END(plot_amount_format); - -OPT_BEGIN(plot_total_format, ":") { - config->plot_total_format = optarg; -} OPT_END(plot_total_format); - -OPT_BEGIN(print_format, ":") { - config->print_format = optarg; -} OPT_END(print_format); - -OPT_BEGIN(write_hdr_format, ":") { - config->write_hdr_format = optarg; -} OPT_END(write_hdr_format); - -OPT_BEGIN(write_xact_format, ":") { - config->write_xact_format = optarg; -} OPT_END(write_xact_format); - -OPT_BEGIN(equity_format, ":") { - config->equity_format = optarg; -} OPT_END(equity_format); - -OPT_BEGIN(prices_format, ":") { - config->prices_format = optarg; -} OPT_END(prices_format); - -OPT_BEGIN(wide, "w") { - config->register_format = config->wide_register_format; -} OPT_END(wide); - -OPT_BEGIN(head, ":") { - report->head_entries = std::atoi(optarg); -} OPT_END(head); - -OPT_BEGIN(tail, ":") { - report->tail_entries = std::atoi(optarg); -} OPT_END(tail); - -OPT_BEGIN(pager, ":") { - config->pager = optarg; -} OPT_END(pager); - -OPT_BEGIN(truncate, ":") { - std::string style(optarg); - if (style == "leading") - format_t::elision_style = format_t::TRUNCATE_LEADING; - else if (style == "middle") - format_t::elision_style = format_t::TRUNCATE_MIDDLE; - else if (style == "trailing") - format_t::elision_style = format_t::TRUNCATE_TRAILING; - else if (style == "abbrev") - format_t::elision_style = format_t::ABBREVIATE; -} OPT_END(truncate); - -OPT_BEGIN(abbrev_len, ":") { - format_t::abbrev_length = std::atoi(optarg); -} OPT_END(abbrev_len); - -OPT_BEGIN(empty, "E") { - report->show_empty = true; -} OPT_END(empty); - -OPT_BEGIN(collapse, "n") { - report->show_collapsed = true; -} OPT_END(collapse); - -OPT_BEGIN(subtotal, "s") { - report->show_subtotal = true; -} OPT_END(subtotal); - -OPT_BEGIN(totals, "") { - report->show_totals = true; -} OPT_END(totals); - -OPT_BEGIN(sort, "S:") { - report->sort_string = optarg; -} OPT_END(sort); - -OPT_BEGIN(sort_entries, "") { - report->sort_string = optarg; - report->entry_sort = true; -} OPT_END(sort_entries); - -OPT_BEGIN(sort_all, "") { - report->sort_string = optarg; - report->entry_sort = false; - report->sort_all = true; -} OPT_END(sort_all); - -OPT_BEGIN(period_sort, ":") { - report->sort_string = optarg; - report->entry_sort = true; -} OPT_END(period_sort); - -OPT_BEGIN(related, "r") { - report->show_related = true; -} OPT_END(related); - -OPT_BEGIN(descend, "") { - std::string arg(optarg); - std::string::size_type beg = 0; - report->descend_expr = ""; - for (std::string::size_type pos = arg.find(';'); - pos != std::string::npos; - beg = pos + 1, pos = arg.find(';', beg)) - report->descend_expr += (std::string("t=={") + - std::string(arg, beg, pos - beg) + "};"); - report->descend_expr += (std::string("t=={") + - std::string(arg, beg) + "}"); -} OPT_END(descend); - -OPT_BEGIN(descend_if, "") { - report->descend_expr = optarg; -} OPT_END(descend_if); - -OPT_BEGIN(period, "p:") { - if (report->report_period.empty()) { - report->report_period = optarg; - } else { - report->report_period += " "; - report->report_period += optarg; - } - - // If the period gives a beginning and/or ending date, make sure to - // modify the calculation predicate (via the --begin and --end - // options) to take this into account. - - interval_t interval(report->report_period); - - if (interval.begin) { - if (! report->predicate.empty()) - report->predicate += "&"; - report->predicate += "d>=["; - report->predicate += interval.begin.to_string(); - report->predicate += "]"; - } - - if (interval.end) { - if (! report->predicate.empty()) - report->predicate += "&"; - report->predicate += "d<["; - report->predicate += interval.end.to_string(); - report->predicate += "]"; - - terminus = interval.end; - } -} OPT_END(period); - -OPT_BEGIN(daily, "") { - if (report->report_period.empty()) - report->report_period = "daily"; - else - report->report_period = std::string("daily ") + report->report_period; -} OPT_END(daily); - -OPT_BEGIN(weekly, "W") { - if (report->report_period.empty()) - report->report_period = "weekly"; - else - report->report_period = std::string("weekly ") + report->report_period; -} OPT_END(weekly); - -OPT_BEGIN(monthly, "M") { - if (report->report_period.empty()) - report->report_period = "monthly"; - else - report->report_period = std::string("monthly ") + report->report_period; -} OPT_END(monthly); - -OPT_BEGIN(quarterly, "") { - if (report->report_period.empty()) - report->report_period = "quarterly"; - else - report->report_period = std::string("quarterly ") + report->report_period; -} OPT_END(quarterly); - -OPT_BEGIN(yearly, "Y") { - if (report->report_period.empty()) - report->report_period = "yearly"; - else - report->report_period = std::string("yearly ") + report->report_period; -} OPT_END(yearly); - -OPT_BEGIN(dow, "") { - report->days_of_the_week = true; -} OPT_END(dow); - -OPT_BEGIN(by_payee, "P") { - report->by_payee = true; -} OPT_END(by_payee); - -OPT_BEGIN(comm_as_payee, "x") { - report->comm_as_payee = true; -} OPT_END(comm_as_payee); - -OPT_BEGIN(code_as_payee, "") { - report->code_as_payee = true; -} OPT_END(code_as_payee); - -OPT_BEGIN(budget, "") { - report->budget_flags = BUDGET_BUDGETED; -} OPT_END(budget); - -OPT_BEGIN(add_budget, "") { - report->budget_flags = BUDGET_BUDGETED | BUDGET_UNBUDGETED; -} OPT_END(add_budget); - -OPT_BEGIN(unbudgeted, "") { - report->budget_flags = BUDGET_UNBUDGETED; -} OPT_END(unbudgeted); - -OPT_BEGIN(forecast, ":") { - report->forecast_limit = optarg; -} OPT_END(forecast); - -OPT_BEGIN(reconcile, ":") { - report->reconcile_balance = optarg; -} OPT_END(reconcile); - -OPT_BEGIN(reconcile_date, ":") { - report->reconcile_date = optarg; -} OPT_END(reconcile_date); - -OPT_BEGIN(limit, "l:") { - if (! report->predicate.empty()) - report->predicate += "&"; - report->predicate += "("; - report->predicate += optarg; - report->predicate += ")"; -} OPT_END(limit); - -OPT_BEGIN(only, ":") { - if (! report->secondary_predicate.empty()) - report->secondary_predicate += "&"; - report->secondary_predicate += "("; - report->secondary_predicate += optarg; - report->secondary_predicate += ")"; -} OPT_END(only); - -OPT_BEGIN(display, "d:") { - if (! report->display_predicate.empty()) - report->display_predicate += "&"; - report->display_predicate += "("; - report->display_predicate += optarg; - report->display_predicate += ")"; -} OPT_END(display); - -OPT_BEGIN(amount, "t:") { - ledger::amount_expr = optarg; -} OPT_END(amount); - -OPT_BEGIN(total, "T:") { - ledger::total_expr = optarg; -} OPT_END(total); - -OPT_BEGIN(amount_data, "j") { - report->format_string = config->plot_amount_format; -} OPT_END(amount_data); - -OPT_BEGIN(total_data, "J") { - report->format_string = config->plot_total_format; -} OPT_END(total_data); - -OPT_BEGIN(ansi, "") { - format_t::ansi_codes = true; - format_t::ansi_invert = false; -} OPT_END(ansi); - -OPT_BEGIN(ansi_invert, "") { - format_t::ansi_codes = - format_t::ansi_invert = true; -} OPT_END(ansi); - -////////////////////////////////////////////////////////////////////// -// -// Commodity reporting - -OPT_BEGIN(base, ":") { - amount_t::keep_base = true; -} OPT_END(base); - -OPT_BEGIN(price_db, ":") { - config->price_db = optarg; -} OPT_END(price_db); - -OPT_BEGIN(price_exp, "Z:") { - config->pricing_leeway = std::atol(optarg) * 60; -} OPT_END(price_exp); - -OPT_BEGIN(download, "Q") { - config->download_quotes = true; -} OPT_END(download); - -OPT_BEGIN(quantity, "O") { - ledger::amount_expr = "a"; - ledger::total_expr = "O"; -} OPT_END(quantity); - -OPT_BEGIN(basis, "B") { - ledger::amount_expr = "b"; - ledger::total_expr = "B"; -} OPT_END(basis); - -OPT_BEGIN(price, "I") { - ledger::amount_expr = "i"; - ledger::total_expr = "I"; -} OPT_END(price); - -OPT_BEGIN(market, "V") { - report->show_revalued = true; - - ledger::amount_expr = "v"; - ledger::total_expr = "V"; -} OPT_END(market); - -namespace { - void parse_price_setting(const char * optarg) - { - char * equals = std::strchr(optarg, '='); - if (! equals) - return; - - while (std::isspace(*optarg)) - optarg++; - while (equals > optarg && std::isspace(*(equals - 1))) - equals--; - - std::string symbol(optarg, 0, equals - optarg); - amount_t price(equals + 1); - - if (commodity_t * commodity = commodity_t::find_or_create(symbol)) { - commodity->add_price(datetime_t::now, price); - commodity->history()->bogus_time = datetime_t::now; - } - } -} -#endif |