如何使 nginx 背后的 Mojolicious 的 url_for()->to_abs() return 正确的方案（http 或 https）

Question

这是我的情况：

1) Nginx 监听 80 和 443 端口并将请求转发给 Mojolicious 应用程序。

upstream ssltest {
    server 127.0.0.1:9000;
}

server {
    listen 80;
    listen 443 ssl;

    server_name ssltest.server.com;

    location / {
        proxy_pass http://ssltest/;
        proxy_set_header Upgrade $http_upgrade;
        proxy_set_header Connection "upgrade";
        proxy_set_header Host $host;
        proxy_set_header X-Forwarded-For $proxy_add_x_forwarded_for;
    }
}

2) 在 Mojolicious 应用程序中，我输入了这段代码：

get '/' => sub {
  my $c = shift;

  warn $c->url_for('/somepath')->to_abs;  # HERE

  $c->render(template => 'index');
};

我想要 url_for('/somepath')->to_abs returns https://ssltest.server.com/somepath 或 http://.../somepath，具体取决于我在浏览器中使用的协议。 但总是returnshttp

（出于某种原因，我必须创建一个绝对路径，而不是相对路径）

所以，我尝试在网络上搜索。

https://groups.google.com/d/msg/mojolicious/zL-c4Tx1vCk/_ihsLRsNAgAJ

这个 link 告诉我可以通过自定义 header X-Forward-Proto 将当前协议（http 或 https）传递给 Mojo 应用程序。但是，url_for() 仍然只返回 http.

然后我尝试了这样的代码：

warn $c->url_for('/somepath')->to_abs->scheme(
  $c->req->headers->header('X-Forwarded-Proto')
);

成功了！但是现在我必须修改代码中出现的每个 url_for->to_abs。

接下来，我找到了这个link：它使用一个钩子来修改 $c->req->url->base 本身。我尝试应用它：

# change 'scheme' of request url
hook 'before_dispatch' => sub {
  my $c = shift;
  $c->req->url->base->scheme( $c->req->headers->header('X-Forwarded-Proto'));
};

get '/' => sub {
  my $c = shift;

  # url_for() seems to refer the request url to determine new url
  warn $c->url_for('/somepath')->to_abs;

  $c->render(template => 'index');
};

效果很好。

现在我想知道这样的做法对不对会不会有什么问题？有没有更好或最好的方法来实现我的目标？

如有任何建议，我们将不胜感激。

Answer 1

是的，这是个好方法，但是我会让它更灵活。

首先，Perl 中从来没有正确的方法。 Mojolicious 也只是 Perl。 There is more than one way to do it。有时一种或多种方法比其他方法更正确。就是这样一个案例。

您的代码很好，可以完成工作。但是，如果您决定以不同的方式部署应用程序，并且 header 消失了，事情就会变得很顺利。所以你至少应该检查它是否存在。

# change 'scheme' of request url
hook 'before_dispatch' => sub {
  my $c = shift;
  $c->req->url->base->scheme( $c->req->headers->header('X-Forwarded-Proto'))
    if $c->req->headers->header('X-Forwarded-Proto');
};

现在，如果您使用 morbo 在本地运行并且您没有 header 设置，事情应该仍然有效（假设它们首先损坏，听起来像是一个合理的假设我没有验证）。

要查看如何为其编写单元测试，请参阅this recent question。它从不同的方面来解决问题，但完全适用。

如何使 nginx 背后的 Mojolicious 的 url_for()->to_abs() return 正确的方案（http 或 https）

how to make Mojolicious's url_for()->to_abs() return correct scheme (http or https) behind nginx

perl

reverse-proxy

nginx

mojolicious