TLS1.2 and command execution

imap.routines

@@ -0,0 +1,77 @@
+// vim: set ft=c:
+
+#define IMAP_ROUTINE(name) \
+name: { \
+    return imap_routine_##name(cmd, node, ssl, state); \
+}
+
+#define IMAP_ROUTINE_END imap_flush(node, ssl);
+#define IMAP_ROUTINE_OK(routine) \
+    imap_write(node, ssl, "%s OK " #routine " completed\n", cmd.tag);
+#define IMAP_ROUTINE_BAD_TAG \
+    imap_write(node, ssl, "%s BAD", cmd.tag);
+#define IMAP_ROUTINE_BAD \
+    imap_write(node, ssl, "* BAD");
+#define IMAP_STRING(fmt, ...) \
+    imap_write(node, ssl, fmt, ##__VA_ARGS__);
+#define IMAP_NLINE imap_write(node, ssl, "\n");
+#define IMAP_CHECK_STATE(s) \
+    if (state != IMAP_STATE_##s) { \
+        IMAP_ROUTINE_BAD \
+        return IMAP_FAIL; \
+    }
+
+static inline uint8_t imap_routine_capability(imap_cmd cmd, client_list *node, uint8_t ssl, uint8_t state)
+{
+    char *cap;
+    IMAP_STRING("* CAPABILITY")
+    if (!ssl) {
+        for (int i=0; (cap = imap_capabilities[i]); i++) {
+            IMAP_STRING(" %s", cap)
+        }
+    } else {
+        for (int i=0; (cap = imaps_capabilities[i]); i++) {
+            IMAP_STRING(" %s", cap)
+        }
+    }
+    IMAP_NLINE;
+    IMAP_ROUTINE_OK(CAPABILITY)
+    IMAP_ROUTINE_END
+
+    return IMAP_SUCCESS;
+}
+
+static inline uint8_t imap_routine_noop(imap_cmd cmd, client_list *node, uint8_t ssl, uint8_t state)
+{
+    IMAP_ROUTINE_OK(NOOP)
+    IMAP_ROUTINE_END
+    
+    return IMAP_SUCCESS;
+}
+
+static inline uint8_t imap_routine_logout(imap_cmd cmd, client_list *node, uint8_t ssl, uint8_t state)
+{
+    IMAP_STRING("* BYE IMAP4rev1 Server logging out\n")
+    IMAP_ROUTINE_OK(LOGOUT)
+    IMAP_ROUTINE_END
+    return IMAP_LOGOUT;
+}
+
+static inline uint8_t imap_routine_starttls(imap_cmd cmd, client_list *node, uint8_t ssl, uint8_t state)
+{
+    IMAP_CHECK_STATE(NO_AUTH)
+
+    IMAP_STRING("%s OK Begin TLS negotiation now\n", cmd.tag)
+    IMAP_ROUTINE_END
+    return IMAP_STARTTLS;
+}
+
+static inline uint8_t imap_routine_auth(imap_cmd cmd, client_list *node, uint8_t ssl, uint8_t state)
+{
+    return IMAP_SUCCESS;
+}
+
+static inline uint8_t imap_routine_login(imap_cmd cmd, client_list *node, uint8_t ssl, uint8_t state)
+{
+    return IMAP_SUCCESS;
+}