repos/DecentralizedMedia/DecentralizedMedia.cpp

// Decentralized Media
//
// Douglas Thrift
//
// $Id$

#include <menes/standard.hh>

#include <menes-api/pcre/regex.hpp>
#include <menes-api/realpath.hpp>
#include <menes-app/simple.hpp>
#include <menes-dbi/driver.hpp>
#include <menes-dbi/resultset.hpp>
#include <menes-etl/fnbind.hpp>
#include <menes-ios/helpers.hpp>
#include <menes-net/http/request.hpp>
#include <menes-net/http/response.hpp>
#include <menes-xml/document.hpp>
#include <menes-xml/parse.hpp>

#include "DecentralizedMedia.hpp"

int Main(const app::Options& options)
{
        ext::RedBlackSet<ext::String> extensions, locals;
        api::Pcre::RegEx extension(_B("^-extension=(.+)$")), local(_B("^-local=(.+)$"));

        _foreach (const app::ArgumentList, arg, app::GetArguments())
        {
                api::Pcre::RegEx::Match match;

                if (match = extension(*arg))
                        extensions.Insert(match[1]);
                else if (match = local(*arg))
                        locals.Insert(api::RealPath(match[1]));
        }

        if (extensions.IsEmpty())
                extensions.Insert(_B("mp3"));

        if (!api::Path(_B("Media")).Exists())
                api::Posix::CheckError(::mkdir("Media", 0755));

        locals.Insert(api::RealPath(_B("Media")));

        _S<DecentralizedMedia> media(extensions, locals);

        media.Block();

        return 0;
}

DecentralizedMedia::DecentralizedMedia(const ext::RedBlackSet<ext::String>& extensions, const ext::RedBlackSet<ext::String>& locals) : waf::Server(_B("Web")), process(bmp.IsRunning() ? NULL : new api::Process(_B("/usr/X11R6/bin/beep-media-player"))), connection(dbi::GetDriver("pgsql")->Connect("", "douglas", "", "media")), extensions(extensions)
{
        connection->Execute(_B("UPDATE files SET live = FALSE"));

        {
                _L<ext::String> args;

                _foreach (const ext::RedBlackSet<ext::String>, extension, extensions)
                        args.InsertLast(_S<ios::String>() << "-extension=" << *extension);

                _foreach (const ext::RedBlackSet<ext::String>, local, locals)
                        args.InsertLast(_S<ios::String>() << "-local=" << *local);

                _H<api::Process> media(new api::Process(api::RealPath(_B("Util/media")), args));

                Media(*media->GetReader());

                media->Join();
        }

        AddPort(6996);
}

DecentralizedMedia::~DecentralizedMedia()
{
        if (!process.IsEmpty())
        {
                _H<api::Thread> thread(new api::Thread(etl::BindAll(&DecentralizedMedia::Destroy, this)));

                bmp.Quit();

                thread->Join();
        }
}

_L<ext::String> DecentralizedMedia::GetArtists() const
{
        _H<dbi::ResultSet> artists_(connection->Execute(_B("SELECT DISTINCT artist FROM files WHERE live = TRUE")));
        _L<ext::String> artists;

        while (artists_->MoveNext())
                artists.InsertLast(artists_->GetString(_B("artist")));

        return artists;
}

_L<ext::String> DecentralizedMedia::GetTitles() const
{
        _H<dbi::ResultSet> titles_(connection->Execute(_B("SELECT DISTINCT title FROM files WHERE live = TRUE")));
        _L<ext::String> titles;

        while (titles_->MoveNext())
                titles.InsertLast(titles_->GetString(_B("title")));

        return titles;
}

_L<ext::String> DecentralizedMedia::GetAlbums() const
{
        _H<dbi::ResultSet> albums_(connection->Execute(_B("SELECT DISTINCT album FROM files WHERE live = TRUE")));
        _L<ext::String> albums;

        while (albums_->MoveNext())
                albums.InsertLast(albums_->GetString(_B("album")));

        return albums;
}

_L<ext::String> DecentralizedMedia::GetGenres() const
{
        _H<dbi::ResultSet> genres_(connection->Execute(_B("SELECT DISTINCT album FROM files WHERE live = TRUE")));
        _L<ext::String> genres;

        while (genres_->MoveNext())
                genres.InsertLast(genres_->GetString(_B("genre")));

        return genres;
}

_L<MediaFolder> DecentralizedMedia::GetFolders() const
{
        _H<dbi::ResultSet> paths(connection->Execute(_B("SELECT DISTINCT root FROM files WHERE live = TRUE")));
        _L<MediaFolder> folders;

        while (paths->MoveNext())
                folders.InsertLast(MediaFolder(connection, paths->GetString(_B("path"))));

        return folders;
}

void DecentralizedMedia::Process(const net::Http::Request& request, net::Http::Response& response)
{
        if (request.method_ == _B("EXTENSIONS") || request.method_ == _B("GET") && request.uri_.GetUri() == ext::EmptyString)
        {
                api::Cout << "EXTENSIONS" << ios::NewLine;

                response.SetStatus(200);

                _foreach (const ext::RedBlackSet<ext::String>, extension, extensions)
                        response << *extension << ios::NewLineNoFlush;
        }
        else if (request.method_ == _B("MEDIA") || request.method_ == _B("POST") && request.uri_.GetUri() == ext::EmptyString)
        {
                api::Cout << "MEDIA" << ios::NewLine;

                if (!request.content_.IsEmpty())
                        ios::ReadToWrite(*request.content_, api::Cout);

                // XXX: implement
        }
        else
                waf::Server::Process(request, response);
}

void DecentralizedMedia::Media(ios::Reader& media)
{
        _H<xml::Document> document(xml::Parse(media));
        api::Pcre::RegEx share("^//(.+)/(.+)$");
        
        _foreach (const xml::NodeSet, folder, *document/"media"/"folder")
        {
                api::Pcre::RegEx::Match match;
                ext::String path(**folder/"path");
                // XXX: do something useful
                api::Path root((match = share(path)) ? throw : path);

                Media(*folder, root, root);
        }
}

void DecentralizedMedia::Media(const _H<xml::Node>& folder, const api::Path& path, const api::Path& root)
{
        MediaFolder(connection, path, root);

        _foreach (const xml::NodeSet, file, *folder/"file")
                MediaFile(connection, path.GetChild(**file/"path"), **file/"artist", **file/"title", **file/"album", **file/"genre", root);

        _foreach (const xml::NodeSet, folder_, *folder/"folder")
                Media(*folder_, path.GetChild(**folder_/"path"), root);
}
Revision:	508
Committed:	2005-06-19T02:33:52-07:00 (20 years ago) by douglas
File size:	5355 byte(s)
Log Message:	Hmm, wonderful!
#	User	Rev	Content
1	douglas	464	// Decentralized Media
2			//
3			// Douglas Thrift
4			//
5			// $Id$
6
7	douglas	470	#include <menes/standard.hh>
8	douglas	464
9	douglas	474	#include <menes-api/pcre/regex.hpp>
10	douglas	497	#include <menes-api/realpath.hpp>
11	douglas	471	#include <menes-app/simple.hpp>
12	douglas	484	#include <menes-dbi/driver.hpp>
13			#include <menes-dbi/resultset.hpp>
14	douglas	471	#include <menes-etl/fnbind.hpp>
15	douglas	474	#include <menes-ios/helpers.hpp>
16	douglas	471	#include <menes-net/http/request.hpp>
17			#include <menes-net/http/response.hpp>
18	douglas	507	#include <menes-xml/document.hpp>
19			#include <menes-xml/parse.hpp>
20	douglas	470
21	douglas	471	#include "DecentralizedMedia.hpp"
22	douglas	464
23	douglas	471	int Main(const app::Options& options)
24	douglas	464	{
25	douglas	491	ext::RedBlackSet<ext::String> extensions, locals;
26	douglas	474	api::Pcre::RegEx extension(_B("^-extension=(.+)$")), local(_B("^-local=(.+)$"));
27	douglas	464
28	douglas	474	_foreach (const app::ArgumentList, arg, app::GetArguments())
29			{
30			api::Pcre::RegEx::Match match;
31
32			if (match = extension(*arg))
33	douglas	491	extensions.Insert(match[1]);
34	douglas	474	else if (match = local(*arg))
35	douglas	497	locals.Insert(api::RealPath(match[1]));
36	douglas	474	}
37
38			if (extensions.IsEmpty())
39	douglas	491	extensions.Insert(_B("mp3"));
40	douglas	474
41	douglas	493	if (!api::Path(_B("Media")).Exists())
42			api::Posix::CheckError(::mkdir("Media", 0755));
43	douglas	491
44	douglas	497	locals.Insert(api::RealPath(_B("Media")));
45	douglas	493
46	douglas	481	_S<DecentralizedMedia> media(extensions, locals);
47	douglas	474
48	douglas	472	media.Block();
49
50	douglas	471	return 0;
51			}
52	douglas	469
53	douglas	491	DecentralizedMedia::DecentralizedMedia(const ext::RedBlackSet<ext::String>& extensions, const ext::RedBlackSet<ext::String>& locals) : waf::Server(_B("Web")), process(bmp.IsRunning() ? NULL : new api::Process(_B("/usr/X11R6/bin/beep-media-player"))), connection(dbi::GetDriver("pgsql")->Connect("", "douglas", "", "media")), extensions(extensions)
54	douglas	471	{
55	douglas	503	connection->Execute(_B("UPDATE files SET live = FALSE"));
56
57	douglas	474	{
58	douglas	507	_L<ext::String> args;
59	douglas	474
60	douglas	491	_foreach (const ext::RedBlackSet<ext::String>, extension, extensions)
61	douglas	507	args.InsertLast(_S<ios::String>() << "-extension=" << *extension);
62	douglas	474
63	douglas	507	_foreach (const ext::RedBlackSet<ext::String>, local, locals)
64			args.InsertLast(_S<ios::String>() << "-local=" << *local);
65	douglas	474
66	douglas	507	_H<api::Process> media(new api::Process(api::RealPath(_B("Util/media")), args));
67	douglas	474
68	douglas	507	Media(*media->GetReader());
69	douglas	503
70	douglas	507	media->Join();
71	douglas	474	}
72
73	douglas	471	AddPort(6996);
74			}
75	douglas	469
76	douglas	471	DecentralizedMedia::~DecentralizedMedia()
77	douglas	469	{
78	douglas	471	if (!process.IsEmpty())
79			{
80			_H<api::Thread> thread(new api::Thread(etl::BindAll(&DecentralizedMedia::Destroy, this)));
81	douglas	470
82	douglas	471	bmp.Quit();
83	douglas	469
84	douglas	471	thread->Join();
85			}
86	douglas	464	}
87	douglas	471
88	douglas	491	_L<ext::String> DecentralizedMedia::GetArtists() const
89			{
90			_H<dbi::ResultSet> artists_(connection->Execute(_B("SELECT DISTINCT artist FROM files WHERE live = TRUE")));
91			_L<ext::String> artists;
92
93			while (artists_->MoveNext())
94			artists.InsertLast(artists_->GetString(_B("artist")));
95
96			return artists;
97			}
98
99			_L<ext::String> DecentralizedMedia::GetTitles() const
100			{
101			_H<dbi::ResultSet> titles_(connection->Execute(_B("SELECT DISTINCT title FROM files WHERE live = TRUE")));
102			_L<ext::String> titles;
103
104			while (titles_->MoveNext())
105			titles.InsertLast(titles_->GetString(_B("title")));
106
107			return titles;
108			}
109
110			_L<ext::String> DecentralizedMedia::GetAlbums() const
111			{
112			_H<dbi::ResultSet> albums_(connection->Execute(_B("SELECT DISTINCT album FROM files WHERE live = TRUE")));
113			_L<ext::String> albums;
114
115			while (albums_->MoveNext())
116			albums.InsertLast(albums_->GetString(_B("album")));
117
118			return albums;
119			}
120
121			_L<ext::String> DecentralizedMedia::GetGenres() const
122			{
123			_H<dbi::ResultSet> genres_(connection->Execute(_B("SELECT DISTINCT album FROM files WHERE live = TRUE")));
124			_L<ext::String> genres;
125
126			while (genres_->MoveNext())
127			genres.InsertLast(genres_->GetString(_B("genre")));
128
129			return genres;
130			}
131
132			_L<MediaFolder> DecentralizedMedia::GetFolders() const
133			{
134			_H<dbi::ResultSet> paths(connection->Execute(_B("SELECT DISTINCT root FROM files WHERE live = TRUE")));
135			_L<MediaFolder> folders;
136
137			while (paths->MoveNext())
138			folders.InsertLast(MediaFolder(connection, paths->GetString(_B("path"))));
139
140			return folders;
141			}
142
143	douglas	471	void DecentralizedMedia::Process(const net::Http::Request& request, net::Http::Response& response)
144			{
145	douglas	507	if (request.method_ == _B("EXTENSIONS") \|\| request.method_ == _B("GET") && request.uri_.GetUri() == ext::EmptyString)
146	douglas	474	{
147	douglas	507	api::Cout << "EXTENSIONS" << ios::NewLine;
148
149	douglas	474	response.SetStatus(200);
150
151	douglas	492	_foreach (const ext::RedBlackSet<ext::String>, extension, extensions)
152	douglas	476	response << *extension << ios::NewLineNoFlush;
153	douglas	474	}
154	douglas	507	else if (request.method_ == _B("MEDIA") \|\| request.method_ == _B("POST") && request.uri_.GetUri() == ext::EmptyString)
155	douglas	474	{
156	douglas	507	api::Cout << "MEDIA" << ios::NewLine;
157
158	douglas	508	if (!request.content_.IsEmpty())
159			ios::ReadToWrite(*request.content_, api::Cout);
160
161	douglas	474	// XXX: implement
162			}
163	douglas	471	else
164			waf::Server::Process(request, response);
165			}
166	douglas	507
167			void DecentralizedMedia::Media(ios::Reader& media)
168			{
169			_H<xml::Document> document(xml::Parse(media));
170			api::Pcre::RegEx share("^//(.+)/(.+)$");
171
172			_foreach (const xml::NodeSet, folder, *document/"media"/"folder")
173			{
174			api::Pcre::RegEx::Match match;
175			ext::String path(**folder/"path");
176			// XXX: do something useful
177			api::Path root((match = share(path)) ? throw : path);
178
179			Media(*folder, root, root);
180			}
181			}
182
183			void DecentralizedMedia::Media(const _H<xml::Node>& folder, const api::Path& path, const api::Path& root)
184			{
185			MediaFolder(connection, path, root);
186
187			_foreach (const xml::NodeSet, file, *folder/"file")
188			MediaFile(connection, path.GetChild(file/"path"), file/"artist", file/"title", file/"album", **file/"genre", root);
189
190			_foreach (const xml::NodeSet, folder_, *folder/"folder")
191			Media(folder_, path.GetChild(*folder_/"path"), root);
192			}