7 #include <sys/socket.h>
17 #define STREAM_ID "stream"
18 #define STREAM_URL "http://gruessi.zrh.sesse.net:4013/"
19 #define BACKLOG_SIZE 1048576
24 // Locks a pthread mutex, RAII-style.
27 MutexLock(pthread_mutex_t *mutex);
31 pthread_mutex_t *mutex;
34 MutexLock::MutexLock(pthread_mutex_t *mutex)
37 pthread_mutex_lock(mutex);
40 MutexLock::~MutexLock()
42 pthread_mutex_unlock(mutex);
46 enum State { READING_REQUEST, SENDING_HEADER, SENDING_DATA };
49 // The HTTP request, as sent by the client. If we are in READING_REQUEST,
50 // this might not be finished.
51 string client_request;
54 // What stream we're connecting to; parsed from client_request.
55 // Not relevant for READING_REQUEST.
59 // Number of bytes we've sent of the header. Only relevant for SENDING_HEADER.
60 size_t header_bytes_sent;
62 // Number of bytes we've sent of data. Only relevant for SENDING_DATA.
67 // The HTTP response header, plus the video stream header (if any).
70 // The stream data itself, stored in a circular buffer.
71 char data[BACKLOG_SIZE];
73 // How many bytes <data> contains. Can very well be larger than BACKLOG_SIZE,
74 // since the buffer wraps.
80 void add_socket(int server_sock);
81 void add_stream(const string &stream_id);
82 void set_header(const string &stream_id, const string &header);
83 void add_data(const string &stream_id, const char *data, size_t bytes);
86 map<string, Stream> streams;
92 void curl_callback(char *ptr, size_t bytes);
95 void process_block(const char *data, uint32_t size, uint32_t flags);
96 void drop_pending_data(size_t num_bytes);
98 // Data we have received but not fully processed yet.
99 vector<char> pending_data;
101 // If <pending_data> starts with a Metacube header,
103 bool has_metacube_header;
107 : has_metacube_header(false)
111 void Input::curl_callback(char *ptr, size_t bytes)
113 pending_data.insert(pending_data.end(), ptr, ptr + bytes);
116 // If we don't have enough data (yet) for even the Metacube header, just return.
117 if (pending_data.size() < sizeof(metacube_block_header)) {
121 // Make sure we have the Metacube sync header at the start.
122 // We may need to skip over junk data (it _should_ not happen, though).
123 if (!has_metacube_header) {
124 char *ptr = static_cast<char *>(
125 memmem(pending_data.data(), pending_data.size(),
126 METACUBE_SYNC, strlen(METACUBE_SYNC)));
128 // OK, so we didn't find the sync marker. We know then that
129 // we do not have the _full_ marker in the buffer, but we
130 // could have N-1 bytes. Drop everything before that,
132 drop_pending_data(pending_data.size() - (strlen(METACUBE_SYNC) - 1));
135 // Yay, we found the header. Drop everything (if anything) before it.
136 drop_pending_data(ptr - pending_data.data());
137 has_metacube_header = true;
139 // Re-check that we have the entire header; we could have dropped data.
140 if (pending_data.size() < sizeof(metacube_block_header)) {
146 // Now it's safe to read the header.
147 metacube_block_header *hdr = reinterpret_cast<metacube_block_header *>(pending_data.data());
148 assert(memcmp(hdr->sync, METACUBE_SYNC, sizeof(hdr->sync)) == 0);
149 uint32_t size = ntohl(hdr->size);
150 uint32_t flags = ntohl(hdr->flags);
152 // See if we have the entire block. If not, wait for more data.
153 if (pending_data.size() < sizeof(metacube_block_header) + size) {
157 process_block(pending_data.data(), size, flags);
159 // Consume this block. This isn't the most efficient way of dealing with things
160 // should we have many blocks, but these routines don't need to be too efficient
162 pending_data.erase(pending_data.begin(), pending_data.begin() + sizeof(metacube_block_header) + size);
166 void Input::process_block(const char *data, uint32_t size, uint32_t flags)
168 // TODO: treat it right here
169 printf("Block: %d bytes, flags=0x%x\n", size, flags);
172 void Input::drop_pending_data(size_t num_bytes)
174 if (num_bytes == 0) {
177 fprintf(stderr, "Warning: Dropping %lld junk bytes from stream, maybe it is not a Metacube stream?\n",
178 (long long)num_bytes);
179 pending_data.erase(pending_data.begin(), pending_data.begin() + num_bytes);
182 size_t curl_callback(char *ptr, size_t size, size_t nmemb, void *userdata)
184 Input *input = static_cast<Input *>(userdata);
185 size_t bytes = size * nmemb;
186 input->curl_callback(ptr, bytes);
190 int create_server_socket(int port)
192 int server_sock = socket(PF_INET6, SOCK_STREAM, IPPROTO_TCP);
193 if (server_sock == -1) {
198 // We want dual-stack sockets. (Sorry, OpenBSD and Windows XP...)
200 if (setsockopt(server_sock, IPPROTO_IPV6, IPV6_V6ONLY, &zero, sizeof(zero)) == -1) {
201 perror("setsockopt(IPV6_V6ONLY)");
206 memset(&addr, 0, sizeof(addr));
207 addr.sin6_family = AF_INET6;
208 addr.sin6_port = htons(port);
210 if (bind(server_sock, reinterpret_cast<sockaddr *>(&addr), sizeof(addr)) == -1) {
215 if (listen(server_sock, 128) == -1) {
223 void *acceptor_thread_run(void *arg)
225 int server_sock = int(intptr_t(arg));
228 socklen_t addrlen = sizeof(addr);
230 int sock = accept(server_sock, reinterpret_cast<sockaddr *>(&addr), &addrlen);
231 if (sock == -1 && errno == EINTR) {
239 printf("got a socket yaaaay\n");
243 int main(int argc, char **argv)
245 for (int i = 0; i < NUM_SERVERS; ++i) {
246 Server *s = new Server;
250 int server_sock = create_server_socket(PORT);
252 pthread_t acceptor_thread;
253 pthread_create(&acceptor_thread, NULL, acceptor_thread_run, reinterpret_cast<void *>(server_sock));
256 CURL *curl = curl_easy_init();
257 curl_easy_setopt(curl, CURLOPT_URL, STREAM_URL);
258 curl_easy_setopt(curl, CURLOPT_WRITEFUNCTION, curl_callback);
259 curl_easy_setopt(curl, CURLOPT_WRITEDATA, &input);
260 curl_easy_perform(curl);