#!/usr/bin/env escript %% -*- erlang -*- %%! -sname ex1 -pz ebin %%%------------------------------------------------------------------- %%% @author Juan Jose Comellas <juanjo@comellas.org> %%% @copyright (C) 2009 Juan Jose Comellas %%% @doc Example file for the getopt module. %%% @end %%% %%% This source file is subject to the New BSD License. You should have received %%% a copy of the New BSD license with this software. If not, it can be %%% retrieved from: http://www.opensource.org/licenses/bsd-license.php %%%------------------------------------------------------------------- -module(rebar_test). -author('juanjo@comellas.org'). main([]) -> usage(); main(Args) -> OptSpecList = option_spec_list(), io:format("For command line: ~p~n" "getopt:parse/2 returns:~n~n", [Args]), case getopt:parse(OptSpecList, Args) of {ok, {Options, NonOptArgs}} -> io:format("Options:~n ~p~n~nNon-option arguments:~n ~p~n", [Options, NonOptArgs]); {error, {Reason, Data}} -> io:format("Error: ~s ~p~n~n", [Reason, Data]), usage(OptSpecList) end. usage() -> usage(option_spec_list()). usage(OptSpecList) -> getopt:usage(OptSpecList, escript:script_name(), "[var1=val1 ...] [command1 ...]", [{"var=value", "Variables that will affect the compilation (e.g. debug=1)"}, {"command", "Commands that will be executed by rebar (e.g. compile)"}]). option_spec_list() -> CpuCount = erlang:system_info(logical_processors), [ %% {Name, ShortOpt, LongOpt, ArgSpec, HelpMsg} {help, $h, "help", undefined, "Show the program options"}, {jobs, $j, "jobs", {integer, CpuCount}, "Number of concurrent jobs"}, {verbose, $v, "verbose", {boolean, false}, "Be verbose about what gets done"}, {force, $f, "force", {boolean, false}, "Force"} ].