Properly iterate on /put and /get
[blerg.git] / http_blerg.c
index f8513c5..58dd115 100644 (file)
@@ -2,8 +2,11 @@
 #include <stdlib.h>
 #include <string.h>
 #include <microhttpd.h>
+#include <yajl/yajl_gen.h>
 #include "database.h"
 #include "tags.h"
+#include "auth.h"
+#include "config.h"
 
 #define URL_INFO_AUTHOR 0x1
 #define URL_INFO_RECORD 0x2
@@ -15,33 +18,66 @@ struct create_state {
        char password[33];
 };
 
+struct put_state {
+       struct MHD_PostProcessor *pp;
+       char *data;
+       int data_size;
+};
+
+struct get_state {
+       struct blerg *b;
+       yajl_gen g;
+       unsigned int yoff;
+       uint64_t from;
+       uint64_t to;
+       int done;
+};
+
+struct MHD_Response *response_401;
 struct MHD_Response *response_404;
-struct MHD_Response *response_501;
+struct MHD_Response *response_405;
 struct MHD_Response *response_JSON_Success;
+struct MHD_Response *response_JSON_Failure;
 
 void init_responses() {
+#define CONTENT_401 "<html><head><title>401 Unauthorized</title></head><body><h1>401 Unauthorized</h1>DENIED</body></html>"
+       response_401 = MHD_create_response_from_data(strlen (CONTENT_401), CONTENT_401, MHD_NO, MHD_NO);  
+
 #define CONTENT_404 "<html><head><title>404 Not Found</title></head><body><h1>404 Not Found</h1>I couldn't find that.</body></html>"
        response_404 = MHD_create_response_from_data(strlen(CONTENT_404), CONTENT_404, MHD_NO, MHD_NO);
 
-#define CONTENT_501 "<html><head><title>501 Not Implemented</title></head><body><h1>501 Not Implemented</h1>I'm sorry, Dave. I'm afraid I can't do that.</body></html>"
-       response_501 = MHD_create_response_from_data(strlen(CONTENT_501), CONTENT_501, MHD_NO, MHD_NO);
+#define CONTENT_405 "<html><head><title>405 Method Not Allowed</title></head><body><h1>405 Method Not Allowed</h1>I'm sorry, Dave. I'm afraid I can't do that.</body></html>"
+       response_405 = MHD_create_response_from_data(strlen(CONTENT_405), CONTENT_405, MHD_NO, MHD_NO);
 
 #define JSON_SUCCESS "{status: \"success\"}"
        response_JSON_Success = MHD_create_response_from_data(strlen(JSON_SUCCESS), JSON_SUCCESS, MHD_NO, MHD_NO);
+
+#define JSON_FAILURE "{status: \"failure\"}"
+       response_JSON_Failure = MHD_create_response_from_data(strlen(JSON_FAILURE), JSON_FAILURE, MHD_NO, MHD_NO);
+}
+
+#define REALM "Blerg"
+#define OPAQUE "d29fb6db8f21a6e99903651a9f87470e"
+int respond_401(struct MHD_Connection *connection, int signal_stale) {
+       return MHD_queue_auth_fail_response(connection, REALM, OPAQUE, response_401, signal_stale);    
 }
 
 int respond_404(struct MHD_Connection *connection) {
        return MHD_queue_response(connection, MHD_HTTP_NOT_FOUND, response_404);
 }
 
-int respond_501(struct MHD_Connection *connection) {
-       return MHD_queue_response(connection, MHD_HTTP_NOT_IMPLEMENTED, response_501);
+int respond_405(struct MHD_Connection *connection) {
+       return MHD_queue_response(connection, MHD_HTTP_METHOD_NOT_ALLOWED, response_405);
 }
 
 int respond_JSON_Success(struct MHD_Connection *connection) {
        return MHD_queue_response(connection, MHD_HTTP_OK, response_JSON_Success);
 }
 
+int respond_JSON_Failure(struct MHD_Connection *connection) {
+       return MHD_queue_response(connection, MHD_HTTP_OK, response_JSON_Failure);
+}
+
 int parse_url_info(const char *url, char *author, uint64_t *record) {
        const char *c;
        int ret = 0;
@@ -67,18 +103,117 @@ int parse_url_info(const char *url, char *author, uint64_t *record) {
        return ret;
 }
 
+ssize_t GET_generate_list(void *cls, uint64_t pos, char *buf, size_t max) {
+       struct get_state *gs = cls;
+       const unsigned char *ybuf;
+       char *data;
+       unsigned int len;
+
+       if (gs->yoff > 0) {
+               yajl_gen_get_buf(gs->g, &ybuf, &len);
+               size_t bytes_remaining = len - gs->yoff;
+               if (bytes_remaining > max) {
+                       memcpy(buf, ybuf + gs->yoff, max);
+                       gs->yoff += max;
+                       printf("generate list: gave %d bytes\n", max);
+                       return max;
+               } else {
+                       memcpy(buf, ybuf + gs->yoff, bytes_remaining);
+                       gs->yoff = 0;
+                       yajl_gen_clear(gs->g);
+                       printf("generate list: gave %d bytes\n", bytes_remaining);
+                       return bytes_remaining;
+               }
+       }
+
+       if (gs->done)
+               return -1;
+
+       if (pos == 0) { /* Start iterating */
+               gs->yoff = 0;
+               yajl_gen_array_open(gs->g);
+               uint64_t record_count = blerg_get_record_count(gs->b);
+               if (record_count == 0) {
+                       gs->from = 1;
+                       gs->to = 0;
+               } else {
+                       gs->to = record_count - 1;
+                       gs->from = (record_count > 50 ? gs->to - 49 : 0);
+               }
+       }
+
+       if (gs->from > gs->to) { /* Done iterating */
+               yajl_gen_array_close(gs->g);
+               gs->done = 1;
+       } else {
+               /* Snarf one record */
+               blerg_fetch(gs->b, gs->from, &data, &len);
+               yajl_gen_string(gs->g, data, len);
+               free(data);
+               gs->from++;
+       }
+
+
+       yajl_gen_get_buf(gs->g, &ybuf, &len);
+       printf("%d bytes in yajl buffer\n", len);
+       if (len > max) {
+               memcpy(buf, ybuf, max);
+               gs->yoff = max;
+               printf("generate list: gave %d bytes\n", max);
+               return max;
+       } else {
+               memcpy(buf, ybuf, len);
+               yajl_gen_clear(gs->g);
+               printf("generate list: gave %d bytes\n", len);
+               return len;
+       }
+}
+
+void GET_generate_list_free(void *cls) {
+       struct get_state *gs = cls;
+
+       blerg_close(gs->b);
+       yajl_gen_free(gs->g);
+       free(gs);
+}
+
 int POST_create_iterator(void *cls, enum MHD_ValueKind kind, const char *key, const char *filename, const char *content_type, const char *transfer_encoding, const char *data, uint64_t off, size_t size) {
        struct create_state *cs = cls;
 
-       if (strncmp(key, "username", 8) == 0) {
+       if (strncmp(key, "username", 9) == 0) {
                if (size > 32) size = 32;
                memcpy(cs->username, data, size);
                cs->username[size] = 0;
-       } else if (strncmp(key, "password", 8) == 0) {
+       } else if (strncmp(key, "password", 9) == 0) {
                if (size > 32) size = 32;
                memcpy(cs->password, data, size);
                cs->password[size] = 0;
        }
+
+       return MHD_YES;
+}
+
+int POST_put_iterator(void *cls, enum MHD_ValueKind kind, const char *key, const char *filename, const char *content_type, const char *transfer_encoding, const char *data, uint64_t off, size_t size) {
+       struct put_state *ps = cls;
+
+       if (strncmp(key, "data", 5) == 0) {
+               if (ps->data == NULL) {
+                       ps->data_size = size;
+                       ps->data = malloc(size);
+               } else {
+                       if (ps->data_size + size > MAX_RECORD_SIZE) {
+                               size = MAX_RECORD_SIZE - ps->data_size;
+                       }
+                       ps->data_size += size;
+                       ps->data = realloc(ps->data, ps->data_size);
+               }
+               printf("Copying %d bytes, total size %d\n", size, ps->data_size);
+               memcpy(ps->data + off, data, size);
+               if (ps->data_size == MAX_RECORD_SIZE)
+                       return MHD_NO;
+       }
+
+       return MHD_YES;
 }
 
 static int
@@ -91,10 +226,17 @@ ahc_derp (void *cls, struct MHD_Connection *connection, const char *url, const c
        char *data;
 
        if (strncmp(url, "/get", 4) == 0 && strlen(url) > 4) {
-               if (strcmp(method, MHD_HTTP_METHOD_GET) != 0)
-                       return MHD_NO;
+               if (*ptr == NULL) {
+                       if (strcmp(method, MHD_HTTP_METHOD_GET) != 0)
+                               return respond_405(connection);
+
+                       *ptr = (void *) 1;
+                       return MHD_YES;
+               }
+
                if (url[4] != '/')
                        return respond_404(connection);
+
                ret = parse_url_info(url + 5, author, &record);
                if ((ret & URL_INFO_AUTHOR) == 0)
                        return respond_404(connection);
@@ -102,90 +244,102 @@ ahc_derp (void *cls, struct MHD_Connection *connection, const char *url, const c
                if (!blerg_exists(author))
                        return respond_404(connection);
 
+               *ptr == NULL;
+
                if (ret & URL_INFO_RECORD) {
-                       if (*ptr == NULL) {
-                               *ptr = (void *) 1;
-                               return MHD_YES;
-                       } else {
-                               *ptr == NULL;
-
-                               struct blerg *b = blerg_open(author);
-                               ret = blerg_fetch(b, record, &data, &len);
-                               blerg_close(b);
-
-                               if (ret == 0) {
-                                       return respond_404(connection);
-                               } else {
-                                       response = MHD_create_response_from_data(len, data, MHD_YES, MHD_NO);
-                                       ret = MHD_queue_response(connection, MHD_HTTP_OK, response);
-                               }
-                               MHD_destroy_response(response);
-                               return ret;
-                       }
-               } else {
-                       if (*ptr == NULL) {
-                               *ptr = (void*) 1;
-                               return MHD_YES;
+                       struct blerg *b = blerg_open(author);
+                       ret = blerg_fetch(b, record, &data, &len);
+                       blerg_close(b);
+
+                       if (ret == 0) {
+                               return respond_404(connection);
                        } else {
-                               *ptr == NULL;
-                               response = MHD_create_response_from_data(strlen(DERP), DERP, MHD_NO, MHD_NO);
+                               response = MHD_create_response_from_data(len, data, MHD_YES, MHD_NO);
                                ret = MHD_queue_response(connection, MHD_HTTP_OK, response);
-                               MHD_destroy_response(response);
-                               return ret;
                        }
+                       MHD_destroy_response(response);
+                       return ret;
+               } else {
+                       yajl_gen_config c;
+                       c.beautify = 0;
+
+                       struct get_state *gs = malloc(sizeof(struct get_state));
+                       gs->b = blerg_open(author);
+                       gs->g = yajl_gen_alloc(&c, NULL);
+                       gs->yoff = 0;
+                       gs->done = 0;
+
+                       response = MHD_create_response_from_callback(-1, 262144, &GET_generate_list, gs, &GET_generate_list_free);
+                       ret = MHD_queue_response(connection, MHD_HTTP_OK, response);
+                       MHD_destroy_response(response);
+
+                       return ret;
                }
        } else if (strncmp(url, "/put", 4) == 0) {
+               struct put_state *ps = (struct put_state *) *ptr;
                char *username;
-               const char *password = "testpass";
-               const char *realm = "Blerg Post";
-
-#define OPAQUE "d29fb6db8f21a6e99903651a9f87470e"
-#define DENIED "DENIED, MOTHERFUCKER"
-#define PAGE "DERP DERP AUTHENTICATED DERP"
+               char password[33];
 
                if (*ptr == NULL) {
+                       if (strcmp(method, MHD_HTTP_METHOD_POST) != 0)
+                               return respond_405(connection);
+
+                       if (url[4] == '/')
+                               return respond_404(connection);
+
                        *ptr = (void *) 1;
 
                        username = MHD_digest_auth_get_username(connection);
-                       if (username == NULL) {
-                               response = MHD_create_response_from_data(strlen (DENIED), DENIED, MHD_NO, MHD_NO);  
-                               ret = MHD_queue_auth_fail_response(connection, realm, OPAQUE, response, MHD_NO);    
-                               MHD_destroy_response(response);  
-                               return ret;
-                       }
+                       if (username == NULL)
+                               return respond_401(connection, MHD_NO);
+                       auth_get_password(username, password);
 
-                       printf("username: %s\n", username);
-
-                       ret = MHD_digest_auth_check(connection, realm, username, password, 300);
+                       ret = MHD_digest_auth_check(connection, REALM, username, password, 300);
                        free(username);
 
-                       if (ret == MHD_INVALID_NONCE || ret == MHD_NO) {
-                               response = MHD_create_response_from_data(strlen (DENIED), DENIED, MHD_NO, MHD_NO);  
-                               ret = MHD_queue_auth_fail_response(connection, realm, OPAQUE, response,
-                                                                  (ret == MHD_INVALID_NONCE) ? MHD_YES : MHD_NO);       
-                               MHD_destroy_response(response);  
-                               return ret;
-                       }
+                       if (ret == MHD_INVALID_NONCE || ret == MHD_NO)
+                               return respond_401(connection, (ret == MHD_INVALID_NONCE) ? MHD_YES : MHD_NO);
+
+                       struct put_state *ps = malloc(sizeof(struct put_state));
+                       ps->data = NULL;
+                       ps->data_size = 0;
+                       ps->pp = MHD_create_post_processor(connection, 16384, &POST_put_iterator, ps);
+                       *ptr = ps;
+                       return MHD_YES;
                }
 
-               *ptr = NULL;
+               if (*upload_data_size) {
+                       MHD_post_process(ps->pp, upload_data, *upload_data_size);
+                       *upload_data_size = 0;
+                       return MHD_YES;
+               }
 
-               if (url[4] != '/')
-                       return respond_404(connection);
-               ret = parse_url_info(url + 5, author, &record);
-               if ((ret & URL_INFO_AUTHOR) == 0)
-                       return respond_404(connection);
+               if (ps->data == NULL || ps->data_size == 0)
+                       return respond_JSON_Failure(connection);
 
-               response = MHD_create_response_from_data(strlen(PAGE), PAGE, MHD_NO, MHD_NO);
-               ret = MHD_queue_response(connection, MHD_HTTP_OK, response);  
-               MHD_destroy_response(response);
-               return ret;
+               username = MHD_digest_auth_get_username(connection);
+               struct blerg *b = blerg_open(username);
+               if (b == NULL)
+                       return respond_JSON_Failure(connection);
+               if (blerg_store(b, ps->data, ps->data_size) == -1) {
+                       blerg_close(b);
+                       return respond_JSON_Failure(connection);
+               }
+               blerg_close(b);
+
+               MHD_destroy_post_processor(ps->pp);
+               free(username);
+               free(ps->data);
+               free(ps);
+               *ptr = NULL;
+
+               return respond_JSON_Success(connection);
        } else if (strncmp(url, "/create", 8) == 0) {
                struct create_state *cs = (struct create_state *) *ptr;
 
                if (cs == NULL) {
                        if (strcmp(method, MHD_HTTP_METHOD_POST) != 0)
-                               return respond_501(connection);
+                               return respond_405(connection);
 
                        struct create_state *cs = malloc(sizeof(struct create_state));
                        cs->username[0] = cs->password[0] = 0;
@@ -198,20 +352,23 @@ ahc_derp (void *cls, struct MHD_Connection *connection, const char *url, const c
                        MHD_post_process(cs->pp, upload_data, *upload_data_size);
                        *upload_data_size = 0;
                        return MHD_YES;
-               } else {
-                       printf("username: %s, password: %s\n", cs->username, cs->password);
+               }
 
-                       if (cs->username[0] == 0 || cs->password[0] == 0)
-                               return MHD_NO; // TODO: Give a better response
+               if (cs->username[0] == 0 || cs->password[0] == 0)
+                       return respond_JSON_Failure(connection);
 
-                       struct blerg *b = blerg_open(cs->username);
-                       blerg_close(b);
-                       /* auth_set_password(cs->username, cs->password); */
+               if (blerg_exists(cs->username))
+                       return respond_JSON_Failure(connection);
 
-                       MHD_destroy_post_processor(cs->pp);
-                       free(cs);
-                       return respond_JSON_Success(connection);
-               }
+               struct blerg *b = blerg_open(cs->username);
+               blerg_close(b);
+               auth_set_password(cs->username, cs->password);
+
+               MHD_destroy_post_processor(cs->pp);
+               free(cs);
+               *ptr = NULL;
+
+               return respond_JSON_Success(connection);
        } else {
                return respond_404(connection);
        }