libretro-puzzlescript/data/PuzzleScriptPlus/goToken/accessToken.go

package main

import (
	"bytes"
	"crypto/tls"
	"encoding/json"
	"io/ioutil"
	"net/http"
	"os"

	"golang.org/x/crypto/acme/autocert"
)

const (
	domain = "50.25.89.34.bc.googleusercontent.com"

	oauthURI    = "https://github.com/login/oauth/access_token"
	oauthClient = "5fe44fa4c9d29308052b"
)

var (
	oauthSecret string
)

type request struct {
	ClientID     string `json:"client_id"`
	ClientSecret string `json:"client_secret"`
	Code         string `json:"code"`
	State        string `json:"state"`
}

func handleAccessTokenRequest(w http.ResponseWriter, r *http.Request) {
	r.ParseForm()

	code := r.Form.Get("code")
	state := r.Form.Get("state")
	if len(code) == 0 || len(state) == 0 {
		w.WriteHeader(http.StatusBadRequest)
		return
	}

	origin := r.Header.Get("origin")
	if origin != "https://dario-zubovic.github.io" {
		w.WriteHeader(http.StatusBadGateway)
		return
	}

	req := request{
		ClientID:     oauthClient,
		ClientSecret: oauthSecret,
		Code:         code,
		State:        state,
	}

	buf := &bytes.Buffer{}
	err := json.NewEncoder(buf).Encode(&req)
	if err != nil {
		w.WriteHeader(http.StatusInternalServerError)
		return
	}

	request, err := http.NewRequest("POST", oauthURI, buf)
	if err != nil {
		w.WriteHeader(http.StatusInternalServerError)
		return
	}

	request.Header.Add("Accept", "application/json")

	response, err := http.DefaultClient.Do(request)
	if err != nil {
		w.WriteHeader(http.StatusInternalServerError)
		return
	}

	bytes, err := ioutil.ReadAll(response.Body)
	if err != nil {
		w.WriteHeader(http.StatusInternalServerError)
		return
	}

	w.Write(bytes)
	w.WriteHeader(http.StatusOK)
}

func main() {
	oauthSecret = os.Args[1]

	certManager := autocert.Manager{
		Prompt: autocert.AcceptTOS,
		Cache:  autocert.DirCache("certs"),
		// HostPolicy: autocert.HostWhitelist(domain),
	}

	go http.ListenAndServe(":http", certManager.HTTPHandler(nil))

	mux := http.NewServeMux()

	mux.HandleFunc("/", func(w http.ResponseWriter, r *http.Request) {
		w.WriteHeader(http.StatusOK)
	})

	mux.HandleFunc("/access_token", handleAccessTokenRequest)

	server := &http.Server{
		Addr:    ":https",
		Handler: mux,
		TLSConfig: &tls.Config{
			GetCertificate: certManager.GetCertificate,
		},
	}

	err := server.ListenAndServeTLS("", "")
	panic(err)
}