1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
|
// file : bpkg/manifest-utility.cxx -*- C++ -*-
// copyright : Copyright (c) 2014-2017 Code Synthesis Ltd
// license : MIT; see accompanying LICENSE file
#include <bpkg/manifest-utility.hxx>
#include <bpkg/diagnostics.hxx>
using namespace std;
using namespace butl;
namespace bpkg
{
package_scheme
parse_package_scheme (const char*& s)
{
// Ignore the character case for consistency with a case insensitivity of
// URI schemes some of which we may support in the future.
//
if (casecmp (s, "sys:", 4) == 0)
{
s += 4;
return package_scheme::sys;
}
return package_scheme::none;
}
string
parse_package_name (const char* s)
{
using traits = string::traits_type;
size_t n (traits::length (s));
if (const char* p = traits::find (s, n, '/'))
n = static_cast<size_t> (p - s);
if (n == 0)
fail << "empty package name in '" << s << "'";
return string (s, n);
}
version
parse_package_version (const char* s)
{
using traits = string::traits_type;
if (const char* p = traits::find (s, traits::length (s), '/'))
{
if (*++p == '\0')
fail << "empty package version in '" << s << "'";
try
{
return version (p);
}
catch (const invalid_argument& e)
{
fail << "invalid package version '" << p << "': " << e;
}
}
return version ();
}
repository_location
parse_location (const char* s, optional<repository_type> ot)
try
{
repository_url u (s);
if (u.empty ())
fail << "empty repository location";
assert (u.path);
// Make the relative path absolute using the current directory.
//
if (u.scheme == repository_protocol::file && u.path->relative ())
u.path->complete ().normalize ();
// Guess the repository type to construct the repository location:
//
// 1. If type is specified as an option use that (but validate
// incompatible scheme/type e.g., git/bpkg).
//
// 2. See guess_type() function description in libbpkg/manifest.hxx for
// the algorithm details.
//
repository_type t (ot ? *ot : guess_type (u, true));
try
{
// Don't move the URL since it may still be needed for diagnostics.
//
return repository_location (u, t);
}
catch (const invalid_argument& e)
{
diag_record dr;
dr << fail << "invalid " << t << " repository location '" << u << "': "
<< e;
// If the bpkg repository type was guessed, then suggest the user to
// specify the type explicitly.
//
if (!ot && t == repository_type::bpkg)
dr << info << "consider using --type to specify repository type";
dr << endf;
}
}
catch (const invalid_argument& e)
{
fail << "invalid repository location '" << s << "': " << e << endf;
}
catch (const invalid_path& e)
{
fail << "invalid repository path '" << s << "': " << e << endf;
}
catch (const system_error& e)
{
fail << "failed to guess repository type for '" << s << "': " << e << endf;
}
}
|