448 lines
23 KiB
Erlang
448 lines
23 KiB
Erlang
|
%%% @copyright 2024 Erlware, LLC.
|
||
|
|
-module(ec_semver_tests).
|
||
|
|
|
||
|
|
-include_lib("eunit/include/eunit.hrl").
|
||
|
|
|
||
|
|
eql_test() ->
|
||
|
|
?assertMatch(true, ec_semver:eql("1.0.0-alpha",
|
||
|
|
"1.0.0-alpha")),
|
||
|
|
?assertMatch(true, ec_semver:eql("v1.0.0-alpha",
|
||
|
|
"1.0.0-alpha")),
|
||
|
|
?assertMatch(true, ec_semver:eql("1",
|
||
|
|
"1.0.0")),
|
||
|
|
?assertMatch(true, ec_semver:eql("v1",
|
||
|
|
"v1.0.0")),
|
||
|
|
?assertMatch(true, ec_semver:eql("1.0",
|
||
|
|
"1.0.0")),
|
||
|
|
?assertMatch(true, ec_semver:eql("1.0.0",
|
||
|
|
"1")),
|
||
|
|
?assertMatch(true, ec_semver:eql("1.0.0.0",
|
||
|
|
"1")),
|
||
|
|
?assertMatch(true, ec_semver:eql("1.0+alpha.1",
|
||
|
|
"1.0.0+alpha.1")),
|
||
|
|
?assertMatch(true, ec_semver:eql("1.0-alpha.1+build.1",
|
||
|
|
"1.0.0-alpha.1+build.1")),
|
||
|
|
?assertMatch(true, ec_semver:eql("1.0-alpha.1+build.1",
|
||
|
|
"1.0.0.0-alpha.1+build.1")),
|
||
|
|
?assertMatch(true, ec_semver:eql("1.0-alpha.1+build.1",
|
||
|
|
"v1.0.0.0-alpha.1+build.1")),
|
||
|
|
?assertMatch(true, ec_semver:eql("1.0-pre-alpha.1",
|
||
|
|
"1.0.0-pre-alpha.1")),
|
||
|
|
?assertMatch(true, ec_semver:eql("aa", "aa")),
|
||
|
|
?assertMatch(true, ec_semver:eql("AA.BB", "AA.BB")),
|
||
|
|
?assertMatch(true, ec_semver:eql("BBB-super", "BBB-super")),
|
||
|
|
?assertMatch(true, not ec_semver:eql("1.0.0",
|
||
|
|
"1.0.1")),
|
||
|
|
?assertMatch(true, not ec_semver:eql("1.0.0-alpha",
|
||
|
|
"1.0.1+alpha")),
|
||
|
|
?assertMatch(true, not ec_semver:eql("1.0.0+build.1",
|
||
|
|
"1.0.1+build.2")),
|
||
|
|
?assertMatch(true, not ec_semver:eql("1.0.0.0+build.1",
|
||
|
|
"1.0.0.1+build.2")),
|
||
|
|
?assertMatch(true, not ec_semver:eql("FFF", "BBB")),
|
||
|
|
?assertMatch(true, not ec_semver:eql("1", "1BBBB")).
|
||
|
|
|
||
|
|
gt_test() ->
|
||
|
|
?assertMatch(true, ec_semver:gt("1.0.0-alpha.1",
|
||
|
|
"1.0.0-alpha")),
|
||
|
|
?assertMatch(true, ec_semver:gt("1.0.0.1-alpha.1",
|
||
|
|
"1.0.0.1-alpha")),
|
||
|
|
?assertMatch(true, ec_semver:gt("1.0.0.4-alpha.1",
|
||
|
|
"1.0.0.2-alpha")),
|
||
|
|
?assertMatch(true, ec_semver:gt("1.0.0.0-alpha.1",
|
||
|
|
"1.0.0-alpha")),
|
||
|
|
?assertMatch(true, ec_semver:gt("1.0.0-beta.2",
|
||
|
|
"1.0.0-alpha.1")),
|
||
|
|
?assertMatch(true, ec_semver:gt("1.0.0-beta.11",
|
||
|
|
"1.0.0-beta.2")),
|
||
|
|
?assertMatch(true, ec_semver:gt("1.0.0-pre-alpha.14",
|
||
|
|
"1.0.0-pre-alpha.3")),
|
||
|
|
?assertMatch(true, ec_semver:gt("1.0.0-beta.11",
|
||
|
|
"1.0.0.0-beta.2")),
|
||
|
|
?assertMatch(true, ec_semver:gt("1.0.0-rc.1", "1.0.0-beta.11")),
|
||
|
|
?assertMatch(true, ec_semver:gt("1.0.0-rc.1+build.1", "1.0.0-rc.1")),
|
||
|
|
?assertMatch(true, ec_semver:gt("1.0.0", "1.0.0-rc.1+build.1")),
|
||
|
|
?assertMatch(true, ec_semver:gt("1.0.0+0.3.7", "1.0.0")),
|
||
|
|
?assertMatch(true, ec_semver:gt("1.3.7+build", "1.0.0+0.3.7")),
|
||
|
|
?assertMatch(true, ec_semver:gt("1.3.7+build.2.b8f12d7",
|
||
|
|
"1.3.7+build")),
|
||
|
|
?assertMatch(true, ec_semver:gt("1.3.7+build.2.b8f12d7",
|
||
|
|
"1.3.7.0+build")),
|
||
|
|
?assertMatch(true, ec_semver:gt("1.3.7+build.11.e0f985a",
|
||
|
|
"1.3.7+build.2.b8f12d7")),
|
||
|
|
?assertMatch(true, ec_semver:gt("aa.cc",
|
||
|
|
"aa.bb")),
|
||
|
|
?assertMatch(true, not ec_semver:gt("1.0.0-alpha",
|
||
|
|
"1.0.0-alpha.1")),
|
||
|
|
?assertMatch(true, not ec_semver:gt("1.0.0-alpha",
|
||
|
|
"1.0.0.0-alpha.1")),
|
||
|
|
?assertMatch(true, not ec_semver:gt("1.0.0-alpha.1",
|
||
|
|
"1.0.0-beta.2")),
|
||
|
|
?assertMatch(true, not ec_semver:gt("1.0.0-beta.2",
|
||
|
|
"1.0.0-beta.11")),
|
||
|
|
?assertMatch(true, not ec_semver:gt("1.0.0-beta.11",
|
||
|
|
"1.0.0-rc.1")),
|
||
|
|
?assertMatch(true, not ec_semver:gt("1.0.0-pre-alpha.3",
|
||
|
|
"1.0.0-pre-alpha.14")),
|
||
|
|
?assertMatch(true, not ec_semver:gt("1.0.0-rc.1",
|
||
|
|
"1.0.0-rc.1+build.1")),
|
||
|
|
?assertMatch(true, not ec_semver:gt("1.0.0-rc.1+build.1",
|
||
|
|
"1.0.0")),
|
||
|
|
?assertMatch(true, not ec_semver:gt("1.0.0",
|
||
|
|
"1.0.0+0.3.7")),
|
||
|
|
?assertMatch(true, not ec_semver:gt("1.0.0+0.3.7",
|
||
|
|
"1.3.7+build")),
|
||
|
|
?assertMatch(true, not ec_semver:gt("1.3.7+build",
|
||
|
|
"1.3.7+build.2.b8f12d7")),
|
||
|
|
?assertMatch(true, not ec_semver:gt("1.3.7+build.2.b8f12d7",
|
||
|
|
"1.3.7+build.11.e0f985a")),
|
||
|
|
?assertMatch(true, not ec_semver:gt("1.0.0-alpha",
|
||
|
|
"1.0.0-alpha")),
|
||
|
|
?assertMatch(true, not ec_semver:gt("1",
|
||
|
|
"1.0.0")),
|
||
|
|
?assertMatch(true, not ec_semver:gt("aa.bb",
|
||
|
|
"aa.bb")),
|
||
|
|
?assertMatch(true, not ec_semver:gt("aa.cc",
|
||
|
|
"aa.dd")),
|
||
|
|
?assertMatch(true, not ec_semver:gt("1.0",
|
||
|
|
"1.0.0")),
|
||
|
|
?assertMatch(true, not ec_semver:gt("1.0.0",
|
||
|
|
"1")),
|
||
|
|
?assertMatch(true, not ec_semver:gt("1.0+alpha.1",
|
||
|
|
"1.0.0+alpha.1")),
|
||
|
|
?assertMatch(true, not ec_semver:gt("1.0-alpha.1+build.1",
|
||
|
|
"1.0.0-alpha.1+build.1")).
|
||
|
|
|
||
|
|
lt_test() ->
|
||
|
|
?assertMatch(true, ec_semver:lt("1.0.0-alpha",
|
||
|
|
"1.0.0-alpha.1")),
|
||
|
|
?assertMatch(true, ec_semver:lt("1.0.0-alpha",
|
||
|
|
"1.0.0.0-alpha.1")),
|
||
|
|
?assertMatch(true, ec_semver:lt("1.0.0-alpha.1",
|
||
|
|
"1.0.0-beta.2")),
|
||
|
|
?assertMatch(true, ec_semver:lt("1.0.0-beta.2",
|
||
|
|
"1.0.0-beta.11")),
|
||
|
|
?assertMatch(true, ec_semver:lt("1.0.0-pre-alpha.3",
|
||
|
|
"1.0.0-pre-alpha.14")),
|
||
|
|
?assertMatch(true, ec_semver:lt("1.0.0-beta.11",
|
||
|
|
"1.0.0-rc.1")),
|
||
|
|
?assertMatch(true, ec_semver:lt("1.0.0.1-beta.11",
|
||
|
|
"1.0.0.1-rc.1")),
|
||
|
|
?assertMatch(true, ec_semver:lt("1.0.0-rc.1",
|
||
|
|
"1.0.0-rc.1+build.1")),
|
||
|
|
?assertMatch(true, ec_semver:lt("1.0.0-rc.1+build.1",
|
||
|
|
"1.0.0")),
|
||
|
|
?assertMatch(true, ec_semver:lt("1.0.0",
|
||
|
|
"1.0.0+0.3.7")),
|
||
|
|
?assertMatch(true, ec_semver:lt("1.0.0+0.3.7",
|
||
|
|
"1.3.7+build")),
|
||
|
|
?assertMatch(true, ec_semver:lt("1.3.7+build",
|
||
|
|
"1.3.7+build.2.b8f12d7")),
|
||
|
|
?assertMatch(true, ec_semver:lt("1.3.7+build.2.b8f12d7",
|
||
|
|
"1.3.7+build.11.e0f985a")),
|
||
|
|
?assertMatch(true, not ec_semver:lt("1.0.0-alpha",
|
||
|
|
"1.0.0-alpha")),
|
||
|
|
?assertMatch(true, not ec_semver:lt("1",
|
||
|
|
"1.0.0")),
|
||
|
|
?assertMatch(true, ec_semver:lt("1",
|
||
|
|
"1.0.0.1")),
|
||
|
|
?assertMatch(true, ec_semver:lt("AA.DD",
|
||
|
|
"AA.EE")),
|
||
|
|
?assertMatch(true, not ec_semver:lt("1.0",
|
||
|
|
"1.0.0")),
|
||
|
|
?assertMatch(true, not ec_semver:lt("1.0.0.0",
|
||
|
|
"1")),
|
||
|
|
?assertMatch(true, not ec_semver:lt("1.0+alpha.1",
|
||
|
|
"1.0.0+alpha.1")),
|
||
|
|
?assertMatch(true, not ec_semver:lt("AA.DD", "AA.CC")),
|
||
|
|
?assertMatch(true, not ec_semver:lt("1.0-alpha.1+build.1",
|
||
|
|
"1.0.0-alpha.1+build.1")),
|
||
|
|
?assertMatch(true, not ec_semver:lt("1.0.0-alpha.1",
|
||
|
|
"1.0.0-alpha")),
|
||
|
|
?assertMatch(true, not ec_semver:lt("1.0.0-beta.2",
|
||
|
|
"1.0.0-alpha.1")),
|
||
|
|
?assertMatch(true, not ec_semver:lt("1.0.0-beta.11",
|
||
|
|
"1.0.0-beta.2")),
|
||
|
|
?assertMatch(true, not ec_semver:lt("1.0.0-pre-alpha.14",
|
||
|
|
"1.0.0-pre-alpha.3")),
|
||
|
|
?assertMatch(true, not ec_semver:lt("1.0.0-rc.1", "1.0.0-beta.11")),
|
||
|
|
?assertMatch(true, not ec_semver:lt("1.0.0-rc.1+build.1", "1.0.0-rc.1")),
|
||
|
|
?assertMatch(true, not ec_semver:lt("1.0.0", "1.0.0-rc.1+build.1")),
|
||
|
|
?assertMatch(true, not ec_semver:lt("1.0.0+0.3.7", "1.0.0")),
|
||
|
|
?assertMatch(true, not ec_semver:lt("1.3.7+build", "1.0.0+0.3.7")),
|
||
|
|
?assertMatch(true, not ec_semver:lt("1.3.7+build.2.b8f12d7",
|
||
|
|
"1.3.7+build")),
|
||
|
|
?assertMatch(true, not ec_semver:lt("1.3.7+build.11.e0f985a",
|
||
|
|
"1.3.7+build.2.b8f12d7")).
|
||
|
|
|
||
|
|
gte_test() ->
|
||
|
|
?assertMatch(true, ec_semver:gte("1.0.0-alpha",
|
||
|
|
"1.0.0-alpha")),
|
||
|
|
|
||
|
|
?assertMatch(true, ec_semver:gte("1",
|
||
|
|
"1.0.0")),
|
||
|
|
|
||
|
|
?assertMatch(true, ec_semver:gte("1.0",
|
||
|
|
"1.0.0")),
|
||
|
|
|
||
|
|
?assertMatch(true, ec_semver:gte("1.0.0",
|
||
|
|
"1")),
|
||
|
|
|
||
|
|
?assertMatch(true, ec_semver:gte("1.0.0.0",
|
||
|
|
"1")),
|
||
|
|
|
||
|
|
?assertMatch(true, ec_semver:gte("1.0+alpha.1",
|
||
|
|
"1.0.0+alpha.1")),
|
||
|
|
|
||
|
|
?assertMatch(true, ec_semver:gte("1.0-alpha.1+build.1",
|
||
|
|
"1.0.0-alpha.1+build.1")),
|
||
|
|
|
||
|
|
?assertMatch(true, ec_semver:gte("1.0.0-alpha.1+build.1",
|
||
|
|
"1.0.0.0-alpha.1+build.1")),
|
||
|
|
?assertMatch(true, ec_semver:gte("1.0.0-alpha.1",
|
||
|
|
"1.0.0-alpha")),
|
||
|
|
?assertMatch(true, ec_semver:gte("1.0.0-pre-alpha.2",
|
||
|
|
"1.0.0-pre-alpha")),
|
||
|
|
?assertMatch(true, ec_semver:gte("1.0.0-beta.2",
|
||
|
|
"1.0.0-alpha.1")),
|
||
|
|
?assertMatch(true, ec_semver:gte("1.0.0-beta.11",
|
||
|
|
"1.0.0-beta.2")),
|
||
|
|
?assertMatch(true, ec_semver:gte("aa.bb", "aa.bb")),
|
||
|
|
?assertMatch(true, ec_semver:gte("dd", "aa")),
|
||
|
|
?assertMatch(true, ec_semver:gte("1.0.0-rc.1", "1.0.0-beta.11")),
|
||
|
|
?assertMatch(true, ec_semver:gte("1.0.0-rc.1+build.1", "1.0.0-rc.1")),
|
||
|
|
?assertMatch(true, ec_semver:gte("1.0.0", "1.0.0-rc.1+build.1")),
|
||
|
|
?assertMatch(true, ec_semver:gte("1.0.0+0.3.7", "1.0.0")),
|
||
|
|
?assertMatch(true, ec_semver:gte("1.3.7+build", "1.0.0+0.3.7")),
|
||
|
|
?assertMatch(true, ec_semver:gte("1.3.7+build.2.b8f12d7",
|
||
|
|
"1.3.7+build")),
|
||
|
|
?assertMatch(true, ec_semver:gte("1.3.7+build.11.e0f985a",
|
||
|
|
"1.3.7+build.2.b8f12d7")),
|
||
|
|
?assertMatch(true, not ec_semver:gte("1.0.0-alpha",
|
||
|
|
"1.0.0-alpha.1")),
|
||
|
|
?assertMatch(true, not ec_semver:gte("1.0.0-pre-alpha",
|
||
|
|
"1.0.0-pre-alpha.1")),
|
||
|
|
?assertMatch(true, not ec_semver:gte("CC", "DD")),
|
||
|
|
?assertMatch(true, not ec_semver:gte("1.0.0-alpha.1",
|
||
|
|
"1.0.0-beta.2")),
|
||
|
|
?assertMatch(true, not ec_semver:gte("1.0.0-beta.2",
|
||
|
|
"1.0.0-beta.11")),
|
||
|
|
?assertMatch(true, not ec_semver:gte("1.0.0-beta.11",
|
||
|
|
"1.0.0-rc.1")),
|
||
|
|
?assertMatch(true, not ec_semver:gte("1.0.0-rc.1",
|
||
|
|
"1.0.0-rc.1+build.1")),
|
||
|
|
?assertMatch(true, not ec_semver:gte("1.0.0-rc.1+build.1",
|
||
|
|
"1.0.0")),
|
||
|
|
?assertMatch(true, not ec_semver:gte("1.0.0",
|
||
|
|
"1.0.0+0.3.7")),
|
||
|
|
?assertMatch(true, not ec_semver:gte("1.0.0+0.3.7",
|
||
|
|
"1.3.7+build")),
|
||
|
|
?assertMatch(true, not ec_semver:gte("1.0.0",
|
||
|
|
"1.0.0+build.1")),
|
||
|
|
?assertMatch(true, not ec_semver:gte("1.3.7+build",
|
||
|
|
"1.3.7+build.2.b8f12d7")),
|
||
|
|
?assertMatch(true, not ec_semver:gte("1.3.7+build.2.b8f12d7",
|
||
|
|
"1.3.7+build.11.e0f985a")).
|
||
|
|
lte_test() ->
|
||
|
|
?assertMatch(true, ec_semver:lte("1.0.0-alpha",
|
||
|
|
"1.0.0-alpha.1")),
|
||
|
|
?assertMatch(true, ec_semver:lte("1.0.0-alpha.1",
|
||
|
|
"1.0.0-beta.2")),
|
||
|
|
?assertMatch(true, ec_semver:lte("1.0.0-beta.2",
|
||
|
|
"1.0.0-beta.11")),
|
||
|
|
?assertMatch(true, ec_semver:lte("1.0.0-pre-alpha.2",
|
||
|
|
"1.0.0-pre-alpha.11")),
|
||
|
|
?assertMatch(true, ec_semver:lte("1.0.0-beta.11",
|
||
|
|
"1.0.0-rc.1")),
|
||
|
|
?assertMatch(true, ec_semver:lte("1.0.0-rc.1",
|
||
|
|
"1.0.0-rc.1+build.1")),
|
||
|
|
?assertMatch(true, ec_semver:lte("1.0.0-rc.1+build.1",
|
||
|
|
"1.0.0")),
|
||
|
|
?assertMatch(true, ec_semver:lte("1.0.0",
|
||
|
|
"1.0.0+0.3.7")),
|
||
|
|
?assertMatch(true, ec_semver:lte("1.0.0+0.3.7",
|
||
|
|
"1.3.7+build")),
|
||
|
|
?assertMatch(true, ec_semver:lte("1.3.7+build",
|
||
|
|
"1.3.7+build.2.b8f12d7")),
|
||
|
|
?assertMatch(true, ec_semver:lte("1.3.7+build.2.b8f12d7",
|
||
|
|
"1.3.7+build.11.e0f985a")),
|
||
|
|
?assertMatch(true, ec_semver:lte("1.0.0-alpha",
|
||
|
|
"1.0.0-alpha")),
|
||
|
|
?assertMatch(true, ec_semver:lte("1",
|
||
|
|
"1.0.0")),
|
||
|
|
?assertMatch(true, ec_semver:lte("1.0",
|
||
|
|
"1.0.0")),
|
||
|
|
?assertMatch(true, ec_semver:lte("1.0.0",
|
||
|
|
"1")),
|
||
|
|
?assertMatch(true, ec_semver:lte("1.0+alpha.1",
|
||
|
|
"1.0.0+alpha.1")),
|
||
|
|
?assertMatch(true, ec_semver:lte("1.0.0.0+alpha.1",
|
||
|
|
"1.0.0+alpha.1")),
|
||
|
|
?assertMatch(true, ec_semver:lte("1.0-alpha.1+build.1",
|
||
|
|
"1.0.0-alpha.1+build.1")),
|
||
|
|
?assertMatch(true, ec_semver:lte("aa","cc")),
|
||
|
|
?assertMatch(true, ec_semver:lte("cc","cc")),
|
||
|
|
?assertMatch(true, not ec_semver:lte("1.0.0-alpha.1",
|
||
|
|
"1.0.0-alpha")),
|
||
|
|
?assertMatch(true, not ec_semver:lte("1.0.0-pre-alpha.2",
|
||
|
|
"1.0.0-pre-alpha")),
|
||
|
|
?assertMatch(true, not ec_semver:lte("cc", "aa")),
|
||
|
|
?assertMatch(true, not ec_semver:lte("1.0.0-beta.2",
|
||
|
|
"1.0.0-alpha.1")),
|
||
|
|
?assertMatch(true, not ec_semver:lte("1.0.0-beta.11",
|
||
|
|
"1.0.0-beta.2")),
|
||
|
|
?assertMatch(true, not ec_semver:lte("1.0.0-rc.1", "1.0.0-beta.11")),
|
||
|
|
?assertMatch(true, not ec_semver:lte("1.0.0-rc.1+build.1", "1.0.0-rc.1")),
|
||
|
|
?assertMatch(true, not ec_semver:lte("1.0.0", "1.0.0-rc.1+build.1")),
|
||
|
|
?assertMatch(true, not ec_semver:lte("1.0.0+0.3.7", "1.0.0")),
|
||
|
|
?assertMatch(true, not ec_semver:lte("1.3.7+build", "1.0.0+0.3.7")),
|
||
|
|
?assertMatch(true, not ec_semver:lte("1.3.7+build.2.b8f12d7",
|
||
|
|
"1.3.7+build")),
|
||
|
|
?assertMatch(true, not ec_semver:lte("1.3.7+build.11.e0f985a",
|
||
|
|
"1.3.7+build.2.b8f12d7")).
|
||
|
|
|
||
|
|
between_test() ->
|
||
|
|
?assertMatch(true, ec_semver:between("1.0.0-alpha",
|
||
|
|
"1.0.0-alpha.3",
|
||
|
|
"1.0.0-alpha.2")),
|
||
|
|
?assertMatch(true, ec_semver:between("1.0.0-alpha.1",
|
||
|
|
"1.0.0-beta.2",
|
||
|
|
"1.0.0-alpha.25")),
|
||
|
|
?assertMatch(true, ec_semver:between("1.0.0-beta.2",
|
||
|
|
"1.0.0-beta.11",
|
||
|
|
"1.0.0-beta.7")),
|
||
|
|
?assertMatch(true, ec_semver:between("1.0.0-pre-alpha.2",
|
||
|
|
"1.0.0-pre-alpha.11",
|
||
|
|
"1.0.0-pre-alpha.7")),
|
||
|
|
?assertMatch(true, ec_semver:between("1.0.0-beta.11",
|
||
|
|
"1.0.0-rc.3",
|
||
|
|
"1.0.0-rc.1")),
|
||
|
|
?assertMatch(true, ec_semver:between("1.0.0-rc.1",
|
||
|
|
"1.0.0-rc.1+build.3",
|
||
|
|
"1.0.0-rc.1+build.1")),
|
||
|
|
|
||
|
|
?assertMatch(true, ec_semver:between("1.0.0.0-rc.1",
|
||
|
|
"1.0.0-rc.1+build.3",
|
||
|
|
"1.0.0-rc.1+build.1")),
|
||
|
|
?assertMatch(true, ec_semver:between("1.0.0-rc.1+build.1",
|
||
|
|
"1.0.0",
|
||
|
|
"1.0.0-rc.33")),
|
||
|
|
?assertMatch(true, ec_semver:between("1.0.0",
|
||
|
|
"1.0.0+0.3.7",
|
||
|
|
"1.0.0+0.2")),
|
||
|
|
?assertMatch(true, ec_semver:between("1.0.0+0.3.7",
|
||
|
|
"1.3.7+build",
|
||
|
|
"1.2")),
|
||
|
|
?assertMatch(true, ec_semver:between("1.3.7+build",
|
||
|
|
"1.3.7+build.2.b8f12d7",
|
||
|
|
"1.3.7+build.1")),
|
||
|
|
?assertMatch(true, ec_semver:between("1.3.7+build.2.b8f12d7",
|
||
|
|
"1.3.7+build.11.e0f985a",
|
||
|
|
"1.3.7+build.10.a36faa")),
|
||
|
|
?assertMatch(true, ec_semver:between("1.0.0-alpha",
|
||
|
|
"1.0.0-alpha",
|
||
|
|
"1.0.0-alpha")),
|
||
|
|
?assertMatch(true, ec_semver:between("1",
|
||
|
|
"1.0.0",
|
||
|
|
"1.0.0")),
|
||
|
|
?assertMatch(true, ec_semver:between("1.0",
|
||
|
|
"1.0.0",
|
||
|
|
"1.0.0")),
|
||
|
|
|
||
|
|
?assertMatch(true, ec_semver:between("1.0",
|
||
|
|
"1.0.0.0",
|
||
|
|
"1.0.0.0")),
|
||
|
|
?assertMatch(true, ec_semver:between("1.0.0",
|
||
|
|
"1",
|
||
|
|
"1")),
|
||
|
|
?assertMatch(true, ec_semver:between("1.0+alpha.1",
|
||
|
|
"1.0.0+alpha.1",
|
||
|
|
"1.0.0+alpha.1")),
|
||
|
|
?assertMatch(true, ec_semver:between("1.0-alpha.1+build.1",
|
||
|
|
"1.0.0-alpha.1+build.1",
|
||
|
|
"1.0.0-alpha.1+build.1")),
|
||
|
|
?assertMatch(true, ec_semver:between("aaa",
|
||
|
|
"ddd",
|
||
|
|
"cc")),
|
||
|
|
?assertMatch(true, not ec_semver:between("1.0.0-alpha.1",
|
||
|
|
"1.0.0-alpha.22",
|
||
|
|
"1.0.0")),
|
||
|
|
?assertMatch(true, not ec_semver:between("1.0.0-pre-alpha.1",
|
||
|
|
"1.0.0-pre-alpha.22",
|
||
|
|
"1.0.0")),
|
||
|
|
?assertMatch(true, not ec_semver:between("1.0.0",
|
||
|
|
"1.0.0-alpha.1",
|
||
|
|
"2.0")),
|
||
|
|
?assertMatch(true, not ec_semver:between("1.0.0-beta.1",
|
||
|
|
"1.0.0-beta.11",
|
||
|
|
"1.0.0-alpha")),
|
||
|
|
?assertMatch(true, not ec_semver:between("1.0.0-beta.11", "1.0.0-rc.1",
|
||
|
|
"1.0.0-rc.22")),
|
||
|
|
?assertMatch(true, not ec_semver:between("aaa", "ddd", "zzz")).
|
||
|
|
|
||
|
|
pes_test() ->
|
||
|
|
?assertMatch(true, ec_semver:pes("1.0.0-rc.0", "1.0.0-rc.0")),
|
||
|
|
?assertMatch(true, ec_semver:pes("1.0.0-rc.1", "1.0.0-rc.0")),
|
||
|
|
?assertMatch(true, ec_semver:pes("1.0.0", "1.0.0-rc.0")),
|
||
|
|
?assertMatch(false, ec_semver:pes("1.0.0-rc.0", "1.0.0-rc.1")),
|
||
|
|
?assertMatch(true, ec_semver:pes("2.6.0", "2.6")),
|
||
|
|
?assertMatch(true, ec_semver:pes("2.7", "2.6")),
|
||
|
|
?assertMatch(true, ec_semver:pes("2.8", "2.6")),
|
||
|
|
?assertMatch(true, ec_semver:pes("2.9", "2.6")),
|
||
|
|
?assertMatch(true, ec_semver:pes("A.B", "A.A")),
|
||
|
|
?assertMatch(true, not ec_semver:pes("3.0.0", "2.6")),
|
||
|
|
?assertMatch(true, not ec_semver:pes("2.5", "2.6")),
|
||
|
|
?assertMatch(true, ec_semver:pes("2.6.5", "2.6.5")),
|
||
|
|
?assertMatch(true, ec_semver:pes("2.6.6", "2.6.5")),
|
||
|
|
?assertMatch(true, ec_semver:pes("2.6.7", "2.6.5")),
|
||
|
|
?assertMatch(true, ec_semver:pes("2.6.8", "2.6.5")),
|
||
|
|
?assertMatch(true, ec_semver:pes("2.6.9", "2.6.5")),
|
||
|
|
?assertMatch(true, ec_semver:pes("2.6.0.9", "2.6.0.5")),
|
||
|
|
?assertMatch(true, not ec_semver:pes("2.7", "2.6.5")),
|
||
|
|
?assertMatch(true, not ec_semver:pes("2.1.7", "2.1.6.5")),
|
||
|
|
?assertMatch(true, not ec_semver:pes("A.A", "A.B")),
|
||
|
|
?assertMatch(true, not ec_semver:pes("2.5", "2.6.5")).
|
||
|
|
|
||
|
|
parse_test() ->
|
||
|
|
?assertEqual({1, {[],[]}}, ec_semver:parse(<<"1">>)),
|
||
|
|
?assertEqual({{1,2,34},{[],[]}}, ec_semver:parse(<<"1.2.34">>)),
|
||
|
|
?assertEqual({<<"a">>, {[],[]}}, ec_semver:parse(<<"a">>)),
|
||
|
|
?assertEqual({{<<"a">>,<<"b">>}, {[],[]}}, ec_semver:parse(<<"a.b">>)),
|
||
|
|
?assertEqual({1, {[],[]}}, ec_semver:parse(<<"1">>)),
|
||
|
|
?assertEqual({{1,2}, {[],[]}}, ec_semver:parse(<<"1.2">>)),
|
||
|
|
?assertEqual({{1,2,2}, {[],[]}}, ec_semver:parse(<<"1.2.2">>)),
|
||
|
|
?assertEqual({{1,99,2}, {[],[]}}, ec_semver:parse(<<"1.99.2">>)),
|
||
|
|
?assertEqual({{1,99,2}, {[<<"alpha">>],[]}}, ec_semver:parse(<<"1.99.2-alpha">>)),
|
||
|
|
?assertEqual({{1,99,2}, {[<<"alpha">>,1], []}}, ec_semver:parse(<<"1.99.2-alpha.1">>)),
|
||
|
|
?assertEqual({{1,99,2}, {[<<"pre-alpha">>,1], []}}, ec_semver:parse(<<"1.99.2-pre-alpha.1">>)),
|
||
|
|
?assertEqual({{1,99,2}, {[], [<<"build">>, 1, <<"a36">>]}},
|
||
|
|
ec_semver:parse(<<"1.99.2+build.1.a36">>)),
|
||
|
|
?assertEqual({{1,99,2,44}, {[], [<<"build">>, 1, <<"a36">>]}},
|
||
|
|
ec_semver:parse(<<"1.99.2.44+build.1.a36">>)),
|
||
|
|
?assertEqual({{1,99,2}, {[<<"alpha">>, 1], [<<"build">>, 1, <<"a36">>]}},
|
||
|
|
ec_semver:parse("1.99.2-alpha.1+build.1.a36")),
|
||
|
|
?assertEqual({{1,99,2}, {[<<"pre-alpha">>, 1], [<<"build">>, 1, <<"a36">>]}},
|
||
|
|
ec_semver:parse("1.99.2-pre-alpha.1+build.1.a36")).
|
||
|
|
|
||
|
|
version_format_test() ->
|
||
|
|
?assertEqual(["1", [], []], ec_semver:format({1, {[],[]}})),
|
||
|
|
?assertEqual(["1", ".", "2", ".", "34", [], []], ec_semver:format({{1,2,34},{[],[]}})),
|
||
|
|
?assertEqual(<<"a">>, erlang:iolist_to_binary(ec_semver:format({<<"a">>, {[],[]}}))),
|
||
|
|
?assertEqual(<<"a.b">>, erlang:iolist_to_binary(ec_semver:format({{<<"a">>,<<"b">>}, {[],[]}}))),
|
||
|
|
?assertEqual(<<"1">>, erlang:iolist_to_binary(ec_semver:format({1, {[],[]}}))),
|
||
|
|
?assertEqual(<<"1.2">>, erlang:iolist_to_binary(ec_semver:format({{1,2}, {[],[]}}))),
|
||
|
|
?assertEqual(<<"1.2.2">>, erlang:iolist_to_binary(ec_semver:format({{1,2,2}, {[],[]}}))),
|
||
|
|
?assertEqual(<<"1.99.2">>, erlang:iolist_to_binary(ec_semver:format({{1,99,2}, {[],[]}}))),
|
||
|
|
?assertEqual(<<"1.99.2-alpha">>, erlang:iolist_to_binary(ec_semver:format({{1,99,2}, {[<<"alpha">>],[]}}))),
|
||
|
|
?assertEqual(<<"1.99.2-alpha.1">>, erlang:iolist_to_binary(ec_semver:format({{1,99,2}, {[<<"alpha">>,1], []}}))),
|
||
|
|
?assertEqual(<<"1.99.2-pre-alpha.1">>, erlang:iolist_to_binary(ec_semver:format({{1,99,2}, {[<<"pre-alpha">>,1], []}}))),
|
||
|
|
?assertEqual(<<"1.99.2+build.1.a36">>,
|
||
|
|
erlang:iolist_to_binary(ec_semver:format({{1,99,2}, {[], [<<"build">>, 1, <<"a36">>]}}))),
|
||
|
|
?assertEqual(<<"1.99.2.44+build.1.a36">>,
|
||
|
|
erlang:iolist_to_binary(ec_semver:format({{1,99,2,44}, {[], [<<"build">>, 1, <<"a36">>]}}))),
|
||
|
|
?assertEqual(<<"1.99.2-alpha.1+build.1.a36">>,
|
||
|
|
erlang:iolist_to_binary(ec_semver:format({{1,99,2}, {[<<"alpha">>, 1], [<<"build">>, 1, <<"a36">>]}}))),
|
||
|
|
?assertEqual(<<"1.99.2-pre-alpha.1+build.1.a36">>,
|
||
|
|
erlang:iolist_to_binary(ec_semver:format({{1,99,2}, {[<<"pre-alpha">>, 1], [<<"build">>, 1, <<"a36">>]}}))),
|
||
|
|
?assertEqual(<<"1">>, erlang:iolist_to_binary(ec_semver:format({1, {[],[]}}))).
|