diff --git a/dev-appengine b/dev-appengine index 7d84d1b77..6e955701e 100755 --- a/dev-appengine +++ b/dev-appengine @@ -5,13 +5,15 @@ use FindBin qw($Bin); use Getopt::Long; sub usage { - die "Usage: dev-appengine [--wipe] [-a] -- [other_dev_appserver_opts]"; + die "Usage: dev-appengine [--wipe] [-a] [-p port] -- [other_dev_appserver_opts]"; } my $opt_wipe; +my $opt_port; my $opt_all; # listen on all interfaces GetOptions("wipe" => \$opt_wipe, "all" => \$opt_all, + "p=i" => \$opt_port, ) or usage(); my $sdk = readlink("$Bin/appengine-sdk") @@ -29,6 +31,11 @@ if ($opt_all) { if ($opt_wipe) { push @args, "--clear_datastore"; } +if ($opt_port) { + push @args, "-p $opt_port"; +} else { + push @args, "-p 3179"; +} push @args, @ARGV; push @args, "$Bin/server/go/appengine"; diff --git a/server/go/appengine/camli/appengine/main.go b/server/go/appengine/camli/appengine/main.go index 341164004..1aaa9a8bd 100644 --- a/server/go/appengine/camli/appengine/main.go +++ b/server/go/appengine/camli/appengine/main.go @@ -82,8 +82,12 @@ func realInit(w http.ResponseWriter, r *http.Request) bool { // Update the config to use the URL path derived from the first App Engine request. // TODO(bslatkin): Support hostnames that aren't x.appspot.com - // TODO(bslatkin): Support the HTTPS scheme - baseURL := fmt.Sprintf("http://%s/", r.Header.Get("X-Appengine-Default-Version-Hostname")) + scheme := "http" + if r.TLS != nil { + scheme = "https" + } + + baseURL := fmt.Sprintf("%s://%s/", scheme, appengine.DefaultVersionHostname(ctx)) ctx.Infof("baseurl = %q", baseURL) config.Obj["baseURL"] = baseURL diff --git a/server/go/appengine/config.json b/server/go/appengine/config.json index 3dcd7c874..d407a3723 100644 --- a/server/go/appengine/config.json +++ b/server/go/appengine/config.json @@ -1,6 +1,6 @@ { "_for-emacs": "-*- mode: js2;-*-", "baseURL": "*** Populated by runtime. Ignore this.", - "auth": "userpass:foo:bar", + "auth": "userpass:camlistore:pass3179", "prefixes": { "/ui/": {