20 files changed, 124 insertions, 10 deletions

diff --git a/po/en.po b/po/en.po
index 96026528..76045819 100644
--- a/po/en.po
+++ b/po/en.po
@@ -927,6 +927,15 @@ msgstr "Upload Page with Titan…"
 msgid "heading.upload"
 msgstr "UPLOAD WITH TITAN"
 
+msgid "upload.id"
+msgstr "Identity:"
+
+msgid "dlg.upload.id.none"
+msgstr "None"
+
+msgid "dlg.upload.id.default"
+msgstr "Default"
+
 msgid "heading.upload.text"
 msgstr "Text"
 
@@ -949,7 +958,7 @@ msgid "upload.mime"
 msgstr "MIME type:"
 
 msgid "upload.token"
-msgstr "Upload token:"
+msgstr "Token:"
 
 msgid "hint.upload.token"
 msgstr "see server's instructions"
diff --git a/res/lang/de.bin b/res/lang/de.bin
index f5a6b07e..e03b96b5 100644
--- a/res/lang/de.bin
+++ b/res/lang/de.bin
diff --git a/res/lang/en.bin b/res/lang/en.bin
index df3c4025..8d6d5e2e 100644
--- a/res/lang/en.bin
+++ b/res/lang/en.bin
diff --git a/res/lang/es.bin b/res/lang/es.bin
index 9f5a169f..2ed64493 100644
--- a/res/lang/es.bin
+++ b/res/lang/es.bin
diff --git a/res/lang/fi.bin b/res/lang/fi.bin
index ac3b99ef..0ec7cb1c 100644
--- a/res/lang/fi.bin
+++ b/res/lang/fi.bin
diff --git a/res/lang/fr.bin b/res/lang/fr.bin
index 7d40e32c..9b96418a 100644
--- a/res/lang/fr.bin
+++ b/res/lang/fr.bin
diff --git a/res/lang/ia.bin b/res/lang/ia.bin
index d10ab85e..c916a78a 100644
--- a/res/lang/ia.bin
+++ b/res/lang/ia.bin
diff --git a/res/lang/ie.bin b/res/lang/ie.bin
index 14349637..202c26a2 100644
--- a/res/lang/ie.bin
+++ b/res/lang/ie.bin
diff --git a/res/lang/pl.bin b/res/lang/pl.bin
index 9ddd137f..e009d285 100644
--- a/res/lang/pl.bin
+++ b/res/lang/pl.bin
diff --git a/res/lang/ru.bin b/res/lang/ru.bin
index 366c6ee5..b4393e88 100644
--- a/res/lang/ru.bin
+++ b/res/lang/ru.bin
diff --git a/res/lang/sr.bin b/res/lang/sr.bin
index 870b0950..1972d923 100644
--- a/res/lang/sr.bin
+++ b/res/lang/sr.bin
diff --git a/res/lang/tok.bin b/res/lang/tok.bin
index dac5fb33..758b0442 100644
--- a/res/lang/tok.bin
+++ b/res/lang/tok.bin
diff --git a/res/lang/zh_Hans.bin b/res/lang/zh_Hans.bin
index 3407c485..9d00b171 100644
--- a/res/lang/zh_Hans.bin
+++ b/res/lang/zh_Hans.bin
diff --git a/res/lang/zh_Hant.bin b/res/lang/zh_Hant.bin
index b9001e2d..5278c7b2 100644
--- a/res/lang/zh_Hant.bin
+++ b/res/lang/zh_Hant.bin
diff --git a/src/defs.h b/src/defs.h
index c3a23596..edaaecde 100644
--- a/src/defs.h
+++ b/src/defs.h
@@ -112,6 +112,7 @@ iLocalDef int acceptKeyMod_ReturnKeyBehavior(int behavior) {
 #define star_Icon           "\u2605"
 #define whiteStar_Icon      "\u2606"
 #define person_Icon         "\U0001f464"
+#define key_Icon            "\U0001f511"
 #define download_Icon       "\u2ba7"
 #define upload_Icon         "\u2ba5"
 #define export_Icon         "\U0001f4e4"
diff --git a/src/gmrequest.c b/src/gmrequest.c
index 00a02983..1a9e83a9 100644
--- a/src/gmrequest.c
+++ b/src/gmrequest.c
@@ -158,6 +158,7 @@ struct Impl_GmRequest {
     uint32_t             id;
     iMutex *             mtx;
     iGmCerts *           certs; /* not owned */
+    const iGmIdentity *  identity;
     enum iGmRequestState state;
     iString              url;
     iTitanData *         titan;
@@ -527,6 +528,7 @@ static void beginGopherConnection_GmRequest_(iGmRequest *d, const iString *host,
 void init_GmRequest(iGmRequest *d, iGmCerts *certs) {
     d->mtx   = new_Mutex();
     d->id    = add_Atomic(&idGen_, 1) + 1;
+    d->identity = NULL;
     d->resp  = new_GmResponse();
     d->isFilterEnabled = iTrue;
     d->isRespLocked    = iFalse;
@@ -582,6 +584,11 @@ void setUrl_GmRequest(iGmRequest *d, const iString *url) {
        the web. */
     urlEncodePath_String(&d->url);
     urlEncodeSpaces_String(&d->url);
+    d->identity = identityForUrl_GmCerts(d->certs, &d->url);
+}
+
+void setIdentity_GmRequest(iGmRequest *d, const iGmIdentity *id) {
+    d->identity = id;
 }
 
 static iBool isTitan_GmRequest_(const iGmRequest *d) {
@@ -902,9 +909,8 @@ void submit_GmRequest(iGmRequest *d) {
     }
     d->state = receivingHeader_GmRequestState;
     d->req = new_TlsRequest();
-    const iGmIdentity *identity = identityForUrl_GmCerts(d->certs, &d->url);
-    if (identity) {
-        setCertificate_TlsRequest(d->req, identity->cert);
+    if (d->identity) {
+        setCertificate_TlsRequest(d->req, d->identity->cert);
     }
     iConnect(TlsRequest, d->req, readyRead, d, readIncoming_GmRequest_);
     iConnect(TlsRequest, d->req, sent, d, bytesSent_GmRequest_);
diff --git a/src/gmrequest.h b/src/gmrequest.h
index 97b23f3c..a377ac91 100644
--- a/src/gmrequest.h
+++ b/src/gmrequest.h
@@ -28,6 +28,7 @@ SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. */
 #include "gmutil.h"
 
 iDeclareType(GmCerts)
+iDeclareType(GmIdentity)
 iDeclareType(GmResponse)
 
 enum iGmCertFlag {
@@ -69,6 +70,7 @@ typedef void (*iGmRequestProgressFunc)(iGmRequest *, size_t current, size_t tota
 
 void                enableFilters_GmRequest     (iGmRequest *, iBool enable);
 void                setUrl_GmRequest            (iGmRequest *, const iString *url);
+void                setIdentity_GmRequest       (iGmRequest *, const iGmIdentity *id);
 void                setTitanData_GmRequest      (iGmRequest *, const iString *mime,
                                                  const iBlock *payload, const iString *token);
 void                setSendProgressFunc_GmRequest(iGmRequest *, iGmRequestProgressFunc func);
diff --git a/src/ui/mobile.c b/src/ui/mobile.c
index 459e9ce7..05e88815 100644
--- a/src/ui/mobile.c
+++ b/src/ui/mobile.c
@@ -156,6 +156,18 @@ static iBool mainDetailSplitHandler_(iWidget *mainDetailSplit, const char *cmd)
     return iFalse;
 }
 
+size_t currentPanelIndex_Mobile(const iWidget *panels) {
+    size_t index = 0;
+    iConstForEach(ObjectList, i, children_Widget(findChild_Widget(panels, "detailstack"))) {
+        const iWidget *child = i.object;
+        if (isVisible_Widget(child)) {
+            return index;
+        }
+        index++;
+    }
+    return iInvalidPos;
+}
+
 static iBool topPanelHandler_(iWidget *topPanel, const char *cmd) {
     const iBool isPortrait = !isSideBySideLayout_();
     if (equal_Command(cmd, "panel.open")) {
diff --git a/src/ui/mobile.h b/src/ui/mobile.h
index e1131953..957c0e42 100644
--- a/src/ui/mobile.h
+++ b/src/ui/mobile.h
@@ -39,6 +39,8 @@ void        initPanels_Mobile           (iWidget *panels, iWidget *parentWidget,
                                          const iMenuItem *itemsNullTerminated,
                                          const iMenuItem *actions, size_t numActions);
 
+size_t      currentPanelIndex_Mobile    (const iWidget *panels);
+
 enum iTransitionFlags {
     incoming_TransitionFlag = iBit(1),
     dirMask_TransitionFlag  = iBit(2) | iBit(3),
diff --git a/src/ui/uploadwidget.c b/src/ui/uploadwidget.c
index c3f71ab9..34cace08 100644
--- a/src/ui/uploadwidget.c
+++ b/src/ui/uploadwidget.c
@@ -30,12 +30,19 @@ SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. */
 #include "gmrequest.h"
 #include "sitespec.h"
 #include "window.h"
+#include "gmcerts.h"
 #include "app.h"
 
 #include <the_Foundation/file.h>
 #include <the_Foundation/fileinfo.h>
 
 iDefineObjectConstruction(UploadWidget)
+    
+enum iUploadIdentity {
+    none_UploadIdentity,
+    defaultForUrl_UploadIdentity,
+    dropdown_UploadIdentity,
+};
 
 struct Impl_UploadWidget {
     iWidget          widget;
@@ -52,6 +59,8 @@ struct Impl_UploadWidget {
     iLabelWidget *   counter;
     iString          filePath;
     size_t           fileSize;
+    enum iUploadIdentity idMode;
+    iBlock           idFingerprint;    
     iAtomicInt       isRequestUpdated;
 };
 
@@ -80,6 +89,26 @@ static void updateInputMaxHeight_UploadWidget_(iUploadWidget *d) {
                                     (avail - inputPos.y) / lineHeight_Text(font_InputWidget(d->input))));
 }
 
+static const iArray *makeIdentityItems_UploadWidget_(const iUploadWidget *d) {
+    iArray *items = collectNew_Array(sizeof(iMenuItem));
+    const iGmIdentity *urlId = identityForUrl_GmCerts(certs_App(), &d->url);        
+    pushBack_Array(items, &(iMenuItem){ format_CStr("${dlg.upload.id.default} (%s)",
+                                                    urlId ? cstr_String(name_GmIdentity(urlId)) : "${dlg.upload.id.none}"),
+                                        0, 0, "upload.setid arg:1" });
+    pushBack_Array(items, &(iMenuItem){ "${dlg.upload.id.none}", 0, 0, "upload.setid arg:0" });
+    pushBack_Array(items, &(iMenuItem){ "---" });
+    iConstForEach(PtrArray, i, listIdentities_GmCerts(certs_App(), NULL, NULL)) {
+        const iGmIdentity *id = i.ptr;
+        pushBack_Array(
+            items,
+            &(iMenuItem){ cstr_String(name_GmIdentity(id)), 0, 0,
+                          format_CStr("upload.setid fp:%s",
+                                      cstrCollect_String(hexEncode_Block(&id->fingerprint))) });
+    }
+    pushBack_Array(items, &(iMenuItem){ NULL });
+    return items;
+}
+
 void init_UploadWidget(iUploadWidget *d) {
     iWidget *w = as_Widget(d);
     init_Widget(w);
@@ -90,6 +119,8 @@ void init_UploadWidget(iUploadWidget *d) {
     d->request = NULL;
     init_String(&d->filePath);
     d->fileSize = 0;
+    d->idMode = defaultForUrl_UploadIdentity;
+    init_Block(&d->idFingerprint, 0);
     const iMenuItem actions[] = {
         { "${upload.port}", 0, 0, "upload.setport" },
         { "---" },
@@ -117,11 +148,11 @@ void init_UploadWidget(iUploadWidget *d) {
         initPanels_Mobile(w, NULL, (iMenuItem[]){
             { "title id:heading.upload" },
             { "label id:upload.info" },
-//            { "padding" },
             { "panel id:dlg.upload.text icon:0x1f5b9", 0, 0, (const void *) textItems },
             { "panel id:dlg.upload.file icon:0x1f4c1", 0, 0, (const void *) fileItems },
             { "padding" },
-            { "input id:upload.token hint:hint.upload.token" },
+            { "dropdown id:upload.id icon:0x1f464", 0, 0, constData_Array(makeIdentityItems_UploadWidget_(d)) },
+            { "input id:upload.token hint:hint.upload.token icon:0x1f511" },
             { NULL }
         }, actions, iElemCount(actions));
         d->info          = findChild_Widget(w, "upload.info");
@@ -205,7 +236,8 @@ void init_UploadWidget(iUploadWidget *d) {
     updateInputMaxHeight_UploadWidget_(d);
 }
 
-void deinit_UploadWidget(iUploadWidget *d) {    
+void deinit_UploadWidget(iUploadWidget *d) {
+    deinit_Block(&d->idFingerprint);
     deinit_String(&d->filePath);
     deinit_String(&d->url);
     deinit_String(&d->originalUrl);
@@ -263,6 +295,15 @@ static void requestFinished_UploadWidget_(iUploadWidget *d, iGmRequest *req) {
     postCommand_Widget(d, "upload.request.finished reqid:%u", id_GmRequest(req));
 }
 
+static void updateIdentityDropdown_UploadWidget_(iUploadWidget *d) {
+    updateDropdownSelection_LabelWidget(
+        findChild_Widget(as_Widget(d), "upload.id"),
+        d->idMode == none_UploadIdentity ? " arg:0"
+        : d->idMode == defaultForUrl_UploadIdentity
+            ? " arg:1"
+            : format_CStr(" fp:%s", cstrCollect_String(hexEncode_Block(&d->idFingerprint))));
+}
+
 static iBool processEvent_UploadWidget_(iUploadWidget *d, const SDL_Event *ev) {
     iWidget *w = as_Widget(d);
     const char *cmd = command_UserEvent(ev);
@@ -290,9 +331,36 @@ static iBool processEvent_UploadWidget_(iUploadWidget *d, const SDL_Event *ev) {
         }
         return iTrue;
     }
+    if (isCommand_Widget(w, ev, "upload.setid")) {
+        if (hasLabel_Command(cmd, "fp")) {
+            set_Block(&d->idFingerprint, collect_Block(hexDecode_Rangecc(range_Command(cmd, "fp"))));
+            d->idMode = dropdown_UploadIdentity;
+        }
+        else if (arg_Command(cmd)) {
+            clear_Block(&d->idFingerprint);
+            d->idMode = defaultForUrl_UploadIdentity;
+        }
+        else {
+            clear_Block(&d->idFingerprint);
+            d->idMode = none_UploadIdentity;
+        }
+        updateIdentityDropdown_UploadWidget_(d);
+        return iTrue;
+    }
     if (isCommand_Widget(w, ev, "upload.accept")) {
-        iWidget * tabs     = findChild_Widget(w, "upload.tabs");
-        const int tabIndex = tabPageIndex_Widget(tabs, currentTabPage_Widget(tabs));
+        iBool isText;
+        iWidget *tabs = findChild_Widget(w, "upload.tabs");
+        if (tabs) {
+            const size_t tabIndex = tabPageIndex_Widget(tabs, currentTabPage_Widget(tabs));
+            isText = (tabIndex == 0);
+        }
+        else {
+            const size_t panelIndex = currentPanelIndex_Mobile(w);
+            if (panelIndex == iInvalidPos) {
+                return iTrue;
+            }
+            isText = (currentPanelIndex_Mobile(w) == 0);
+        }
         /* Make a GmRequest and send the data. */
         iAssert(d->request == NULL);
         iAssert(!isEmpty_String(&d->url));
@@ -300,7 +368,21 @@ static iBool processEvent_UploadWidget_(iUploadWidget *d, const SDL_Event *ev) {
         setSendProgressFunc_GmRequest(d->request, updateProgress_UploadWidget_);
         setUserData_Object(d->request, d);
         setUrl_GmRequest(d->request, &d->url);
-        if (tabIndex == 0) {
+        switch (d->idMode) {
+            case defaultForUrl_UploadIdentity:
+                break; /* GmRequest handles it */
+            case none_UploadIdentity:
+                setIdentity_GmRequest(d->request, NULL);
+                signOut_GmCerts(certs_App(), url_GmRequest(d->request));
+                break;
+            case dropdown_UploadIdentity: {
+                iGmIdentity *ident = findIdentity_GmCerts(certs_App(), &d->idFingerprint);
+                setIdentity_GmRequest(d->request, ident);
+                signIn_GmCerts(certs_App(), ident, url_GmRequest(d->request));
+                break;
+            }
+        }
+        if (isText) {
             /* Uploading text. */
             setTitanData_GmRequest(d->request,
                                    collectNewCStr_String("text/plain"),