AE blobserver working locally with dev-camput

Change-Id: I3dde1bf7fe3cb15e49f2b0ec4a99f85a24497f32

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";

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
 

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/": {