File: License.cpp

package info (click to toggle)
storm-lang 0.7.4-1
  • links: PTS, VCS
  • area: main
  • in suites: forky, sid
  • size: 52,004 kB
  • sloc: ansic: 261,462; cpp: 140,405; sh: 14,891; perl: 9,846; python: 2,525; lisp: 2,504; asm: 860; makefile: 678; pascal: 70; java: 52; xml: 37; awk: 12
file content (79 lines) | stat: -rw-r--r-- 1,986 bytes parent folder | download
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
#include "stdafx.h"
#include "License.h"
#include "NameSet.h"
#include "Engine.h"
#include "Package.h"
#include "Core/StrBuf.h"
#include "Core/Io/Text.h"

namespace storm {

	License::License(Str *id, Str *title, Str *author, Str *body)
		: Named(id), title(title), author(author), body(body) {}

	void License::toS(StrBuf *to) const {
		const wchar *line = S("-----------------------------------");
		if (Named *p = as<Named>(parentLookup()))
			*to << p->identifier() << S(": ");
		*to << title << S(" (") << author << S(")\n") << line << S("\n") << body << S("\n") << line;
	}

	MAYBE(Str *) License::canReplace(Named *old, ReplaceContext *ctx) {
		if (!as<License>(old))
			return new (this) Str(S("Unable to replace a non-license with a license."));
		else
			return null;
	}

	static void licenses(Array<License *> *r, Named *root) {
		if (License *l = as<License>(root)) {
			r->push(l);
			return;
		}

		NameSet *search = as<NameSet>(root);
		if (!search)
			return;

		for (NameSet::Iter i = search->begin(), e = search->end(); i != e; ++i) {
			licenses(r, i.v());
		}
	}

	Array<License *> *licenses(Named *root) {
		Array<License *> *r = new (root) Array<License *>();
		licenses(r, root);
		return r;
	}

	Array<License *> *licenses(EnginePtr e) {
		return licenses(e.v.package());
	}


	namespace license {
		PkgReader *reader(Array<Url *> *files, Package *pkg) {
			return new (pkg->engine()) LicenseReader(files, pkg);
		}
	}

	LicenseReader::LicenseReader(Array<Url *> *files, Package *pkg) : PkgReader(files, pkg) {}

	void LicenseReader::readTypes() {
		for (Nat i = 0; i < files->count(); i++) {
			pkg->add(readLicense(files->at(i)));
		}
	}

	License *LicenseReader::readLicense(Url *file) {
		TextInput *text = readText(file);
		Str *title = text->readLine();
		Str *author = text->readLine();
		Str *body = text->readAll();
		text->close();

		License *l = new (this) License(file->title(), title, author, body);
		l->pos = SrcPos(file, 0, 0);
		return l;
	}
}