aboutsummaryrefslogtreecommitdiff
path: root/src/nix-env/main.cc
diff options
context:
space:
mode:
authorEelco Dolstra <e.dolstra@tudelft.nl>2004-02-06 14:49:41 +0000
committerEelco Dolstra <e.dolstra@tudelft.nl>2004-02-06 14:49:41 +0000
commit7abf9911d997b241f1e6b58805140fbfe1f2771d (patch)
tree79618b0bc9919ff92fd7161f0f68e78e0c7d9ad0 /src/nix-env/main.cc
parent49bafe1faf4eedf0f059740be4f99c700ee93fe7 (diff)
* Refactoring.
Diffstat (limited to 'src/nix-env/main.cc')
-rw-r--r--src/nix-env/main.cc131
1 files changed, 1 insertions, 130 deletions
diff --git a/src/nix-env/main.cc b/src/nix-env/main.cc
index 00b6c7f8d..051236681 100644
--- a/src/nix-env/main.cc
+++ b/src/nix-env/main.cc
@@ -1,5 +1,6 @@
#include <cerrno>
+#include "names.hh"
#include "globals.hh"
#include "normalise.hh"
#include "shared.hh"
@@ -253,136 +254,6 @@ void createUserEnv(EvalState & state, const DrvInfos & drvs,
}
-struct DrvName
-{
- string fullName;
- string name;
- string version;
- unsigned int hits;
-
- /* Parse a derivation name. The `name' part of a derivation name
- is everything up to but not including the first dash *not*
- followed by a letter. The `version' part is the rest
- (excluding the separating dash). E.g., `apache-httpd-2.0.48'
- is parsed to (`apache-httpd', '2.0.48'). */
- DrvName(const string & s) : hits(0)
- {
- name = fullName = s;
- for (unsigned int i = 0; i < s.size(); ++i) {
- /* !!! isalpha/isdigit are affected by the locale. */
- if (s[i] == '-' && i + 1 < s.size() && !isalpha(s[i + 1])) {
- name = string(s, 0, i);
- version = string(s, i + 1);
- break;
- }
- }
- }
-
- bool matches(DrvName & n)
- {
- if (name != "*" && name != n.name) return false;
- if (version != "" && version != n.version) return false;
- return true;
- }
-};
-
-
-string nextComponent(string::const_iterator & p,
- const string::const_iterator end)
-{
- /* Skip any dots and dashes (component separators). */
- while (p != end && (*p == '.' || *p == '-')) ++p;
-
- if (p == end) return "";
-
- /* If the first character is a digit, consume the longest sequence
- of digits. Otherwise, consume the longest sequence of
- non-digit, non-separator characters. */
- string s;
- if (isdigit(*p))
- while (p != end && isdigit(*p)) s += *p++;
- else
- while (p != end && (!isdigit(*p) && *p != '.' && *p != '-'))
- s += *p++;
-
- return s;
-}
-
-
-#include <fstream>
-
-bool parseInt(const string & s, int & n)
-{
- istringstream st(s);
- st >> n;
- return !st.fail();
-}
-
-
-static bool componentsLT(const string & c1, const string & c2)
-{
- int n1, n2;
- bool c1Num = parseInt(c1, n1), c2Num = parseInt(c2, n2);
-
- if (c1Num && c2Num) return n1 < n2;
- else if (c1 == "" && c2Num) return true;
- else if (c1 == "pre" && c2 != "pre") return true;
- else if (c2 == "pre") return false;
- /* Assume that `2.3a' < `2.3.1'. */
- else if (c2Num) return true;
- else if (c1Num) return false;
- else return c1 < c2;
-}
-
-
-static int compareVersions(const string & v1, const string & v2)
-{
- string::const_iterator p1 = v1.begin();
- string::const_iterator p2 = v2.begin();
-
- while (p1 != v1.end() || p2 != v2.end()) {
- string c1 = nextComponent(p1, v1.end());
- string c2 = nextComponent(p2, v2.end());
- if (componentsLT(c1, c2)) return -1;
- else if (componentsLT(c2, c1)) return 1;
- }
-
- return 0;
-}
-
-
-static void testCompareVersions()
-{
-#define TEST(v1, v2, n) assert( \
- compareVersions(v1, v2) == n && compareVersions(v2, v1) == -n)
- TEST("1.0", "2.3", -1);
- TEST("2.1", "2.3", -1);
- TEST("2.3", "2.3", 0);
- TEST("2.5", "2.3", 1);
- TEST("3.1", "2.3", 1);
- TEST("2.3.1", "2.3", 1);
- TEST("2.3.1", "2.3a", 1);
- TEST("2.3pre1", "2.3", -1);
- TEST("2.3pre3", "2.3pre12", -1);
- TEST("2.3a", "2.3c", -1);
- TEST("2.3pre1", "2.3c", -1);
- TEST("2.3pre1", "2.3q", -1);
-}
-
-
-typedef list<DrvName> DrvNames;
-
-
-static DrvNames drvNamesFromArgs(const Strings & opArgs)
-{
- DrvNames result;
- for (Strings::const_iterator i = opArgs.begin();
- i != opArgs.end(); ++i)
- result.push_back(DrvName(*i));
- return result;
-}
-
-
static void installDerivations(EvalState & state,
Path nePath, DrvNames & selectors, const Path & profile)
{