Clean up code using bluesky_string_from_gstring.
[bluesky.git] / bluesky / s3store.c
1 /* Blue Sky: File Systems in the Cloud
2  *
3  * Copyright (C) 2009  The Regents of the University of California
4  * Written by Michael Vrable <mvrable@cs.ucsd.edu>
5  *
6  * TODO: Licensing
7  */
8
9 #include <stdint.h>
10 #include <stdlib.h>
11 #include <glib.h>
12 #include <string.h>
13
14 #include "bluesky-private.h"
15 #include "libs3.h"
16
17 /* Interface to Amazon S3 storage. */
18
19 typedef struct {
20     GThreadPool *thread_pool;
21     S3BucketContext bucket;
22     uint8_t encryption_key[CRYPTO_KEY_SIZE];
23 } S3Store;
24
25 typedef struct {
26     enum { S3_GET, S3_PUT } op;
27     gchar *key;
28     BlueSkyRCStr *data;
29 } S3Op;
30
31 static void s3store_task(gpointer s, gpointer o);
32
33 static gpointer s3store_new()
34 {
35     S3Store *store = g_new(S3Store, 1);
36     store->thread_pool = g_thread_pool_new(s3store_task, store, -1, FALSE,
37                                            NULL);
38     store->bucket.bucketName = "mvrable-bluesky";
39     store->bucket.protocol = S3ProtocolHTTP;
40     store->bucket.uriStyle = S3UriStylePath;
41     store->bucket.accessKeyId = getenv("AWS_ACCESS_KEY_ID");
42     store->bucket.secretAccessKey = getenv("AWS_SECRET_ACCESS_KEY");
43
44     const char *key = getenv("BLUESKY_KEY");
45     if (key == NULL) {
46         g_error("Encryption key not defined; please set BLUESKY_KEY environment variable");
47         exit(1);
48     }
49
50     bluesky_crypt_hash_key(key, store->encryption_key);
51
52     g_print("Initializing S3 with bucket %s, access key %s, encryption key %s\n",
53             store->bucket.bucketName, store->bucket.accessKeyId, key);
54
55     return store;
56 }
57
58 static void s3store_destroy(gpointer store)
59 {
60     g_free(store);
61 }
62
63 struct get_info {
64     GString *buf;
65 };
66
67 static S3Status s3store_get_handler(int bufferSize, const char *buffer,
68                                     void *callbackData)
69 {
70     struct get_info *info = (struct get_info *)callbackData;
71     g_string_append_len(info->buf, buffer, bufferSize);
72     return S3StatusOK;
73 }
74
75 struct put_info {
76     BlueSkyRCStr *val;
77     gint offset;
78 };
79
80 static int s3store_put_handler(int bufferSize, char *buffer,
81                                void *callbackData)
82 {
83     struct put_info *info = (struct put_info *)callbackData;
84     gint bytes = MIN(bufferSize, (int)(info->val->len - info->offset));
85     memcpy(buffer, (char *)info->val->data + info->offset, bytes);
86     info->offset += bytes;
87     return bytes;
88 }
89
90 static S3Status s3store_properties_callback(const S3ResponseProperties *properties,
91                                      void *callbackData)
92 {
93     g_print("(Properties callback)\n");
94     return S3StatusOK;
95 }
96
97 static void s3store_response_callback(S3Status status,
98                                const S3ErrorDetails *errorDetails,
99                                void *callbackData)
100 {
101     g_print("S3 operation complete, status=%s, now=%ld\n",
102             S3_get_status_name(status), bluesky_now_hires());
103     if (errorDetails != NULL) {
104         g_print("  Error message: %s\n", errorDetails->message);
105     }
106 }
107
108 static BlueSkyRCStr *s3store_get(gpointer s, const gchar *key)
109 {
110     S3Store *store = (S3Store *)s;
111
112     struct get_info info;
113     info.buf = g_string_new("");
114
115     struct S3GetObjectHandler handler;
116     handler.responseHandler.propertiesCallback = s3store_properties_callback;
117     handler.responseHandler.completeCallback = s3store_response_callback;
118     handler.getObjectDataCallback = s3store_get_handler;
119
120     g_print("Starting fetch of %s from S3...\n", key);
121     S3_get_object(&store->bucket, key, NULL, 0, 0, NULL,
122                   &handler, &info);
123
124     BlueSkyRCStr *raw, *decrypted;
125     raw = bluesky_string_new_from_gstring(info.buf);
126     decrypted = bluesky_crypt_decrypt(raw, store->encryption_key);
127     bluesky_string_unref(raw);
128     return decrypted;
129 }
130
131 static void s3store_put(gpointer s, const gchar *key, BlueSkyRCStr *val)
132 {
133     S3Store *store = (S3Store *)s;
134
135     S3Op *op = g_new(S3Op, 1);
136     op->op = S3_PUT;
137     op->key = g_strdup(key);
138     bluesky_string_ref(val);
139     op->data = val;
140
141     g_thread_pool_push(store->thread_pool, op, NULL);
142 }
143
144 static void s3store_task(gpointer o, gpointer s)
145 {
146     S3Store *store = (S3Store *)s;
147     S3Op *op = (S3Op *)o;
148
149     g_print("Start task [key=%s]...\n", op->key);
150
151     if (op->op == S3_PUT) {
152         BlueSkyRCStr *encrypted = bluesky_crypt_encrypt(op->data,
153                                                         store->encryption_key);
154
155         struct put_info info;
156         info.val = encrypted;
157         info.offset = 0;
158
159         struct S3PutObjectHandler handler;
160         handler.responseHandler.propertiesCallback
161             = s3store_properties_callback;
162         handler.responseHandler.completeCallback = s3store_response_callback;
163         handler.putObjectDataCallback = s3store_put_handler;
164
165         g_print("Starting store of %s to S3 at %ld...\n",
166                 op->key, bluesky_now_hires());
167         S3_put_object(&store->bucket, op->key, encrypted->len, NULL, NULL,
168                       &handler, &info);
169
170         bluesky_string_unref(encrypted);
171     }
172
173     bluesky_string_unref(op->data);
174     g_free(op->key);
175     g_free(op);
176
177     g_print("Finish task...\n");
178 }
179
180 static BlueSkyStoreImplementation store_impl = {
181     .create = s3store_new,
182     .destroy = s3store_destroy,
183     .get = s3store_get,
184     .put = s3store_put,
185 };
186
187 void bluesky_store_init_s3(void)
188 {
189     S3_initialize(NULL, S3_INIT_ALL);
190     bluesky_store_register(&store_impl, "s3");
191 }