resetting manifest requested domain to floor
[platform/upstream/openconnect.git] / http.c
diff --git a/http.c b/http.c
index 43d4c61..bcc4e98 100644 (file)
--- a/http.c
+++ b/http.c
@@ -388,6 +388,7 @@ static int process_http_response(struct openconnect_info *vpninfo, int *result,
                if (!closeconn) {
                        vpn_progress(vpninfo, PRG_ERR,
                                     _("Cannot receive HTTP 1.0 body without closing connection\n"));
+                       openconnect_close_https(vpninfo, 0);
                        return -EINVAL;
                }
 
@@ -439,6 +440,8 @@ static void add_common_headers(struct openconnect_info *vpninfo, struct oc_text_
                                      opt->value, opt->next ? "; " : "\r\n");
        }
        buf_append(buf, "X-Transcend-Version: 1\r\n");
+       buf_append(buf, "X-Aggregate-Auth: 1\r\n");
+       buf_append(buf, "X-AnyConnect-Platform: %s\r\n", vpninfo->platname);
 }
 
 static int fetch_config(struct openconnect_info *vpninfo, char *fu, char *bu,
@@ -580,28 +583,35 @@ static int run_csd_script(struct openconnect_info *vpninfo, char *buf, int bufle
                csd_argv[i++] = fname;
                csd_argv[i++]= (char *)"-ticket";
                if (asprintf(&csd_argv[i++], "\"%s\"", vpninfo->csd_ticket) == -1)
-                       return -ENOMEM;
+                       goto out;
                csd_argv[i++]= (char *)"-stub";
                csd_argv[i++]= (char *)"\"0\"";
                csd_argv[i++]= (char *)"-group";
                if (asprintf(&csd_argv[i++], "\"%s\"", vpninfo->authgroup?:"") == -1)
-                       return -ENOMEM;
+                       goto out;
 
                openconnect_local_cert_md5(vpninfo, ccertbuf);
                scertbuf[0] = 0;
                get_cert_md5_fingerprint(vpninfo, vpninfo->peer_cert, scertbuf);
                csd_argv[i++]= (char *)"-certhash";
                if (asprintf(&csd_argv[i++], "\"%s:%s\"", scertbuf, ccertbuf) == -1)
-                       return -ENOMEM;
+                       goto out;
 
                csd_argv[i++]= (char *)"-url";
                if (asprintf(&csd_argv[i++], "\"https://%s%s\"", vpninfo->hostname, vpninfo->csd_starturl) == -1)
-                       return -ENOMEM;
+                       goto out;
 
                csd_argv[i++]= (char *)"-langselen";
                csd_argv[i++] = NULL;
 
+               if (setenv("CSD_TOKEN", vpninfo->csd_token, 1))
+                       goto out;
+               if (setenv("CSD_HOSTNAME", vpninfo->hostname, 1))
+                       goto out;
+
                execv(csd_argv[0], csd_argv);
+
+out:
                vpn_progress(vpninfo, PRG_ERR,
                             _("Failed to exec CSD script %s\n"), csd_argv[0]);
                exit(1);
@@ -609,8 +619,10 @@ static int run_csd_script(struct openconnect_info *vpninfo, char *buf, int bufle
 
        free(vpninfo->csd_stuburl);
        vpninfo->csd_stuburl = NULL;
+       free(vpninfo->urlpath);
        vpninfo->urlpath = strdup(vpninfo->csd_waiturl +
                                  (vpninfo->csd_waiturl[0] == '/' ? 1 : 0));
+       free(vpninfo->csd_waiturl);
        vpninfo->csd_waiturl = NULL;
        vpninfo->csd_scriptname = strdup(fname);
 
@@ -704,6 +716,8 @@ static void clear_cookies(struct openconnect_info *vpninfo)
  */
 static int handle_redirect(struct openconnect_info *vpninfo)
 {
+       vpninfo->redirect_type = REDIR_TYPE_LOCAL;
+
        if (!strncmp(vpninfo->redirect_url, "https://", 8)) {
                /* New host. Tear down the existing connection and make a new one */
                char *host;
@@ -733,6 +747,7 @@ static int handle_redirect(struct openconnect_info *vpninfo)
                        vpninfo->peer_addr = NULL;
                        openconnect_close_https(vpninfo, 0);
                        clear_cookies(vpninfo);
+                       vpninfo->redirect_type = REDIR_TYPE_NEWHOST;
                } else
                        free(host);
 
@@ -782,31 +797,32 @@ static int handle_redirect(struct openconnect_info *vpninfo)
        }
 }
 
-/* Return value:
+/* Inputs:
+ *  method:             GET or POST
+ *  vpninfo->hostname:  Host DNS name
+ *  vpninfo->port:      TCP port, typically 443
+ *  vpninfo->urlpath:   Relative path, e.g. /+webvpn+/foo.html
+ *  request_body_type:  Content type for a POST (e.g. text/html).  Can be NULL.
+ *  request_body:       POST content
+ *  form_buf:           Callee-allocated buffer for server content
+ *
+ * Return value:
  *  < 0, on error
- *  > 0, no cookie (user cancel)
- *  = 0, obtained cookie
+ *  >=0, on success, indicating the length of the data in *form_buf
  */
-int openconnect_obtain_cookie(struct openconnect_info *vpninfo)
+static int do_https_request(struct openconnect_info *vpninfo, const char *method,
+                           const char *request_body_type, const char *request_body,
+                           char **form_buf, int fetch_redirect)
 {
-       struct vpn_option *opt;
        struct oc_text_buf *buf;
-       char *form_buf = NULL;
        int result, buflen;
-       char request_body[2048];
-       const char *request_body_type = NULL;
-       const char *method = "GET";
-
-       if (vpninfo->use_stoken) {
-               result = prepare_stoken(vpninfo);
-               if (result)
-                       return result;
-       }
 
  retry:
-       if (form_buf) {
-               free(form_buf);
-               form_buf = NULL;
+       vpninfo->redirect_type = REDIR_TYPE_NONE;
+
+       if (*form_buf) {
+               free(*form_buf);
+               *form_buf = NULL;
        }
        if (openconnect_open_https(vpninfo)) {
                vpn_progress(vpninfo, PRG_ERR,
@@ -854,63 +870,209 @@ int openconnect_obtain_cookie(struct openconnect_info *vpninfo)
        if (result < 0)
                return result;
 
-       buflen = process_http_response(vpninfo, &result, NULL, &form_buf);
+       buflen = process_http_response(vpninfo, &result, NULL, form_buf);
        if (buflen < 0) {
                /* We'll already have complained about whatever offended us */
                return buflen;
        }
 
        if (result != 200 && vpninfo->redirect_url) {
-       redirect:
                result = handle_redirect(vpninfo);
-               if (result == 0)
+               if (result == 0) {
+                       if (!fetch_redirect)
+                               return 0;
                        goto retry;
-               free(form_buf);
-               return result;
+               }
+               goto out;
        }
-       if (!form_buf || result != 200) {
+       if (!*form_buf || result != 200) {
                vpn_progress(vpninfo, PRG_ERR,
                             _("Unexpected %d result from server\n"),
                             result);
-               free(form_buf);
+               result = -EINVAL;
+               goto out;
+       }
+
+       return buflen;
+
+ out:
+       free(*form_buf);
+       *form_buf = NULL;
+       return result;
+}
+
+/* Return value:
+ *  < 0, if the data is unrecognized
+ *  = 0, if the page contains an XML document
+ *  = 1, if the page is a wait/refresh HTML page
+ */
+static int check_response_type(struct openconnect_info *vpninfo, char *form_buf)
+{
+       if (strncmp(form_buf, "<?xml", 5)) {
+               /* Not XML? Perhaps it's HTML with a refresh... */
+               if (strcasestr(form_buf, "http-equiv=\"refresh\""))
+                       return 1;
+               vpn_progress(vpninfo, PRG_ERR,
+                            _("Unknown response from server\n"));
                return -EINVAL;
        }
-       if (vpninfo->csd_stuburl) {
-               /* This is the CSD stub script, which we now need to run */
-               result = run_csd_script(vpninfo, form_buf, buflen);
-               if (result) {
+       return 0;
+}
+
+/* Return value:
+ *  < 0, on error
+ *  > 0, no cookie (user cancel)
+ *  = 0, obtained cookie
+ */
+int openconnect_obtain_cookie(struct openconnect_info *vpninfo)
+{
+       struct vpn_option *opt;
+       char *form_buf = NULL;
+       struct oc_auth_form *form = NULL;
+       int result, buflen, tries;
+       char request_body[2048];
+       const char *request_body_type = "application/x-www-form-urlencoded";
+       const char *method = "POST";
+       int xmlpost = 0;
+
+       /* Step 1: Unlock software token (if applicable) */
+       if (vpninfo->use_stoken) {
+               result = prepare_stoken(vpninfo);
+               if (result)
+                       return result;
+       }
+
+       /*
+        * Step 2: Probe for XML POST compatibility
+        *
+        * This can get stuck in a redirect loop, so give up after any of:
+        *
+        * a) HTTP error (e.g. 400 Bad Request)
+        * b) Same-host redirect (e.g. Location: /foo/bar)
+        * c) Three redirects without seeing a plausible login form
+        */
+       result = xmlpost_initial_req(vpninfo, request_body, sizeof(request_body));
+       if (result < 0)
+               return result;
+
+       for (tries = 0; ; tries++) {
+               if (tries == 3)
+                       break;
+               buflen = do_https_request(vpninfo, method, request_body_type, request_body,
+                                         &form_buf, 0);
+               if (buflen == -EINVAL)
+                       break;
+               if (buflen < 0)
+                       return buflen;
+
+               if (vpninfo->redirect_type == REDIR_TYPE_LOCAL)
+                       break;
+               else if (vpninfo->redirect_type != REDIR_TYPE_NONE)
+                       continue;
+
+               result = parse_xml_response(vpninfo, form_buf, &form);
+               if (result < 0)
+                       break;
+
+               xmlpost = 1;
+               vpn_progress(vpninfo, PRG_INFO, _("XML POST enabled\n"));
+               break;
+       }
+
+       /* Step 3: Fetch and parse the login form, if not using XML POST */
+       if (!xmlpost) {
+               buflen = do_https_request(vpninfo, "GET", NULL, NULL, &form_buf, 0);
+               if (buflen < 0)
+                       return buflen;
+
+               result = parse_xml_response(vpninfo, form_buf, &form);
+               if (result < 0) {
                        free(form_buf);
                        return result;
                }
-
-               /* Now we'll be redirected to the waiturl */
-               goto retry;
+               if (form->action) {
+                       vpninfo->redirect_url = strdup(form->action);
+                       handle_redirect(vpninfo);
+               }
        }
-       if (strncmp(form_buf, "<?xml", 5)) {
-               /* Not XML? Perhaps it's HTML with a refresh... */
-               if (strcasestr(form_buf, "http-equiv=\"refresh\"")) {
+
+       /* Step 4: Run the CSD trojan, if applicable */
+       if (vpninfo->csd_starturl) {
+               char *form_path = NULL;
+
+               if (vpninfo->urlpath) {
+                       form_path = strdup(vpninfo->urlpath);
+                       if (!form_path) {
+                               result = -ENOMEM;
+                               goto out;
+                       }
+               }
+
+               /* fetch the CSD program, if available */
+               if (vpninfo->csd_stuburl) {
+                       buflen = do_https_request(vpninfo, "GET", NULL, NULL, &form_buf, 0);
+                       if (buflen <= 0) {
+                               result = -EINVAL;
+                               goto out;
+                       }
+               }
+
+               /* This is the CSD stub script, which we now need to run */
+               result = run_csd_script(vpninfo, form_buf, buflen);
+               if (result)
+                       goto out;
+
+               /* vpninfo->urlpath now points to the wait page */
+               while (1) {
+                       result = do_https_request(vpninfo, "GET", NULL, NULL, &form_buf, 0);
+                       if (result <= 0)
+                               break;
+
+                       result = check_response_type(vpninfo, form_buf);
+                       if (result <= 0)
+                               break;
+
                        vpn_progress(vpninfo, PRG_INFO,
                                     _("Refreshing %s after 1 second...\n"),
                                     vpninfo->urlpath);
                        sleep(1);
-                       goto retry;
                }
-               vpn_progress(vpninfo, PRG_ERR,
-                            _("Unknown response from server\n"));
-               free(form_buf);
-               return -EINVAL;
+               if (result < 0)
+                       goto out;
+
+               /* refresh the form page, to see if we're authorized now */
+               free(vpninfo->urlpath);
+               vpninfo->urlpath = form_path;
+
+               result = do_https_request(vpninfo, xmlpost ? "POST" : "GET",
+                                         request_body_type, request_body, &form_buf, 1);
+               if (result < 0)
+                       goto out;
+
+               result = parse_xml_response(vpninfo, form_buf, &form);
+               if (result < 0)
+                       goto out;
        }
-       request_body[0] = 0;
-       result = parse_xml_response(vpninfo, form_buf, request_body, sizeof(request_body),
-                                   &method, &request_body_type);
 
-       if (!result)
-               goto redirect;
+       /* Step 5: Ask the user to fill in the auth form; repeat as necessary */
+       while (1) {
+               request_body[0] = 0;
+               result = handle_auth_form(vpninfo, form, request_body, sizeof(request_body),
+                                         &method, &request_body_type, xmlpost);
+               if (result < 0 || result == 1)
+                       goto out;
+               if (result == 2)
+                       break;
 
-       free(form_buf);
+               result = do_https_request(vpninfo, method, request_body_type, request_body,
+                                         &form_buf, 1);
+               if (result < 0)
+                       goto out;
 
-       if (result != 2)
-               return result;
+               result = parse_xml_response(vpninfo, form_buf, &form);
+               if (result < 0)
+                       goto out;
+       }
 
        /* A return value of 2 means the XML form indicated
           success. We _should_ have a cookie... */
@@ -943,12 +1105,19 @@ int openconnect_obtain_cookie(struct openconnect_info *vpninfo)
                                fetch_config(vpninfo, bu, fu, sha);
                }
        }
+       result = 0;
+
+out:
+       free(form_buf);
+       free_auth_form(form);
+
        if (vpninfo->csd_scriptname) {
                unlink(vpninfo->csd_scriptname);
                free(vpninfo->csd_scriptname);
                vpninfo->csd_scriptname = NULL;
        }
-       return 0;
+
+       return result;
 }
 
 char *openconnect_create_useragent(const char *base)