RethinkDB native connector work, minor fixes.

1 files changed, 308 insertions, 0 deletions

diff --git a/controller/RethinkDB.cpp b/controller/RethinkDB.cpp
new file mode 100644
index 00000000..5d93bf72
--- /dev/null
+++ b/controller/RethinkDB.cpp
@@ -0,0 +1,308 @@
+#include "RethinkDB.hpp"
+
+#include <chrono>
+#include <algorithm>
+#include <stdexcept>
+
+#include "../ext/librethinkdbxx/build/include/rethinkdb.h"
+
+namespace R = RethinkDB;
+using nlohmann::json;
+
+namespace ZeroTier {
+
+RethinkDB::RethinkDB(const Address &myAddress,const char *host,const int port,const char *db,const char *auth) :
+	_myAddress(myAddress),
+	_host(host ? host : "127.0.0.1"),
+	_db(db),
+	_auth(auth ? auth : ""),
+	_port((port > 0) ? port : 28015),
+	_ready(2), // two tables need to be synchronized before we're ready
+	_run(1)
+{
+	_readyLock.lock();
+
+	{
+		char tmp[32];
+		_myAddress.toString(tmp);
+		_myAddressStr = tmp;
+	}
+
+	_membersDbWatcher = std::thread([this]() {
+		while (_run == 1) {
+			try {
+				auto rdb = R::connect(this->_host,this->_port,this->_auth);
+				if (rdb) {
+					_membersDbWatcherConnection = (void *)rdb.get();
+					auto cur = R::db(this->_db).table("Member").get_all(this->_myAddressStr,R::optargs("index","controllerId")).changes(R::optargs("squash",0.1,"include_initial",true,"include_types",true,"include_states",true)).run(*rdb);
+					while (cur.has_next()) {
+						if (_run != 1) break;
+						json tmp(json::parse(cur.next().as_json()));
+						if ((tmp["type"] == "state")&&(tmp["state"] == "ready")) {
+							if (--this->_ready == 0)
+								this->_readyLock.unlock();
+						} else {
+							try {
+								this->_memberChanged(tmp["old_val"],tmp["new_val"]);
+							} catch ( ... ) {} // ignore bad records
+						}
+					}
+				}
+			} catch (std::exception &e) {
+				fprintf(stderr,"ERROR: controller RethinkDB: %s" ZT_EOL_S,e.what());
+			} catch (R::Error &e) {
+				fprintf(stderr,"ERROR: controller RethinkDB: %s" ZT_EOL_S,e.message.c_str());
+			} catch ( ... ) {
+				fprintf(stderr,"ERROR: controller RethinkDB: unknown exception" ZT_EOL_S);
+			}
+			std::this_thread::sleep_for(std::chrono::milliseconds(250));
+		}
+	});
+
+	_networksDbWatcher = std::thread([this]() {
+		while (_run == 1) {
+			try {
+				auto rdb = R::connect(this->_host,this->_port,this->_auth);
+				if (rdb) {
+					_membersDbWatcherConnection = (void *)rdb.get();
+					auto cur = R::db(this->_db).table("Network").get_all(this->_myAddressStr,R::optargs("index","controllerId")).changes(R::optargs("squash",0.1,"include_initial",true,"include_types",true,"include_states",true)).run(*rdb);
+					while (cur.has_next()) {
+						if (_run != 1) break;
+						json tmp(json::parse(cur.next().as_json()));
+						if ((tmp["type"] == "state")&&(tmp["state"] == "ready")) {
+							if (--this->_ready == 0)
+								this->_readyLock.unlock();
+						} else {
+							try {
+								this->_networkChanged(tmp["old_val"],tmp["new_val"]);
+							} catch ( ... ) {} // ignore bad records
+						}
+					}
+				}
+			} catch (std::exception &e) {
+				fprintf(stderr,"ERROR: controller RethinkDB: %s" ZT_EOL_S,e.what());
+			} catch (R::Error &e) {
+				fprintf(stderr,"ERROR: controller RethinkDB: %s" ZT_EOL_S,e.message.c_str());
+			} catch ( ... ) {
+				fprintf(stderr,"ERROR: controller RethinkDB: unknown exception" ZT_EOL_S);
+			}
+			std::this_thread::sleep_for(std::chrono::milliseconds(250));
+		}
+	});
+}
+
+RethinkDB::~RethinkDB()
+{
+	// FIXME: not totally safe but will generally work, and only happens on shutdown anyway
+	_run = 0;
+	std::this_thread::sleep_for(std::chrono::milliseconds(10));
+	if (_membersDbWatcherConnection)
+		((R::Connection *)_membersDbWatcherConnection)->close();
+	if (_networksDbWatcherConnection)
+		((R::Connection *)_networksDbWatcherConnection)->close();
+	_membersDbWatcher.join();
+	_networksDbWatcher.join();
+}
+
+inline bool RethinkDB::get(const uint64_t networkId,nlohmann::json &network)
+{
+	std::shared_ptr<_Network> nw;
+	{
+		std::lock_guard<std::mutex> l(_networks_l);
+		auto nwi = _networks.find(networkId);
+		if (nwi == _networks.end())
+			return false;
+		nw = nwi->second;
+	}
+
+	std::lock_guard<std::mutex> l2(nw->lock);
+	network = nw->config;
+
+	return true;
+}
+
+inline bool RethinkDB::get(const uint64_t networkId,nlohmann::json &network,const uint64_t memberId,nlohmann::json &member,NetworkSummaryInfo &info)
+{
+	std::shared_ptr<_Network> nw;
+	{
+		std::lock_guard<std::mutex> l(_networks_l);
+		auto nwi = _networks.find(networkId);
+		if (nwi == _networks.end())
+			return false;
+		nw = nwi->second;
+	}
+
+	std::lock_guard<std::mutex> l2(nw->lock);
+		auto m = nw->members.find(memberId);
+	if (m == nw->members.end())
+		return false;
+	network = nw->config;
+	member = m->second;
+	_fillSummaryInfo(nw,info);
+
+	return true;
+}
+
+inline bool RethinkDB::get(const uint64_t networkId,nlohmann::json &network,std::vector<nlohmann::json> &members)
+{
+	std::shared_ptr<_Network> nw;
+	{
+		std::lock_guard<std::mutex> l(_networks_l);
+		auto nwi = _networks.find(networkId);
+		if (nwi == _networks.end())
+			return false;
+		nw = nwi->second;
+	}
+
+	std::lock_guard<std::mutex> l2(nw->lock);
+	network = nw->config;
+	for(auto m=nw->members.begin();m!=nw->members.end();++m)
+		members.push_back(m->second);
+
+	return true;
+}
+
+inline bool RethinkDB::summary(const uint64_t networkId,NetworkSummaryInfo &info)
+{
+	std::shared_ptr<_Network> nw;
+	{
+		std::lock_guard<std::mutex> l(_networks_l);
+		auto nwi = _networks.find(networkId);
+		if (nwi == _networks.end())
+			return false;
+		nw = nwi->second;
+	}
+
+	std::lock_guard<std::mutex> l2(nw->lock);
+	_fillSummaryInfo(nw,info);
+
+	return true;
+}
+
+void RethinkDB::_memberChanged(nlohmann::json &old,nlohmann::json &member)
+{
+	uint64_t memberId = 0;
+	uint64_t networkId = 0;
+	std::shared_ptr<_Network> nw;
+
+	if (old.is_object()) {
+		json &config = old["config"];
+		if (config.is_object()) {
+			memberId = OSUtils::jsonIntHex(config["id"],0ULL);
+			networkId = OSUtils::jsonIntHex(config["nwid"],0ULL);
+			if ((memberId)&&(networkId)) {
+				{
+					std::lock_guard<std::mutex> l(_networks_l);
+					auto nw2 = _networks.find(networkId);
+					if (nw2 != _networks.end())
+						nw = nw2->second;
+				}
+				if (nw) {
+					std::lock_guard<std::mutex> l(nw->lock);
+					if (OSUtils::jsonBool(config["activeBridge"],false))
+						nw->activeBridgeMembers.erase(memberId);
+					if (OSUtils::jsonBool(config["authorized"],false))
+						nw->authorizedMembers.erase(memberId);
+					json &ips = config["ipAssignments"];
+					if (ips.is_array()) {
+						for(unsigned long i=0;i<ips.size();++i) {
+							json &ipj = ips[i];
+							if (ipj.is_string()) {
+								const std::string ips = ipj;
+								InetAddress ipa(ips.c_str());
+								ipa.setPort(0);
+								nw->allocatedIps.erase(ipa);
+							}
+						}
+					}
+				}
+			}
+		}
+	}
+
+	if (member.is_object()) {
+		json &config = member["config"];
+		if (config.is_object()) {
+			if (!nw) {
+				memberId = OSUtils::jsonIntHex(config["id"],0ULL);
+				networkId = OSUtils::jsonIntHex(config["nwid"],0ULL);
+				if ((!memberId)||(!networkId))
+					return;
+				std::lock_guard<std::mutex> l(_networks_l);
+				std::shared_ptr<_Network> &nw2 = _networks[networkId];
+				if (!nw2)
+					nw2.reset(new _Network);
+				nw = nw2;
+			}
+			std::lock_guard<std::mutex> l(nw->lock);
+
+			nw->members[memberId] = config;
+
+			if (OSUtils::jsonBool(config["activeBridge"],false))
+				nw->activeBridgeMembers.insert(memberId);
+			const bool isAuth = OSUtils::jsonBool(config["authorized"],false);
+			if (isAuth)
+				nw->authorizedMembers.insert(memberId);
+			json &ips = config["ipAssignments"];
+			if (ips.is_array()) {
+				for(unsigned long i=0;i<ips.size();++i) {
+					json &ipj = ips[i];
+					if (ipj.is_string()) {
+						const std::string ips = ipj;
+						InetAddress ipa(ips.c_str());
+						ipa.setPort(0);
+						nw->allocatedIps.insert(ipa);
+					}
+				}
+			}
+
+			if (!isAuth) {
+				const int64_t ldt = (int64_t)OSUtils::jsonInt(config["lastDeauthorizedTime"],0ULL);
+				if (ldt > nw->mostRecentDeauthTime)
+					nw->mostRecentDeauthTime = ldt;
+			}
+		}
+	}
+}
+
+void RethinkDB::_networkChanged(nlohmann::json &old,nlohmann::json &network)
+{
+	if (network.is_object()) {
+		json &config = network["config"];
+		if (config.is_object()) {
+			const std::string ids = config["id"];
+			const uint64_t id = Utils::hexStrToU64(ids.c_str());
+			if (id) {
+				std::shared_ptr<_Network> nw;
+				{
+					std::lock_guard<std::mutex> l(_networks_l);
+					std::shared_ptr<_Network> &nw2 = _networks[id];
+					if (!nw2)
+						nw2.reset(new _Network);
+					nw = nw2;
+				}
+				std::lock_guard<std::mutex> l2(nw->lock);
+				nw->config = config;
+			}
+		}
+	} else if (old.is_object()) {
+		const std::string ids = old["id"];
+		const uint64_t id = Utils::hexStrToU64(ids.c_str());
+		if (id) {
+			std::lock_guard<std::mutex> l(_networks_l);
+			_networks.erase(id);
+		}
+	}
+}
+
+} // namespace ZeroTier
+
+/*
+int main(int argc,char **argv)
+{
+	ZeroTier::RethinkDB db(ZeroTier::Address(0x8056c2e21cULL),"10.6.6.188",28015,"ztc","");
+	db.waitForReady();
+	printf("ready.\n");
+	pause();
+}
+*/