https://github.com/junker/recaptcha-enterprise

reCAPTCHA Enterprise system for Common Lisp
https://github.com/junker/recaptcha-enterprise

common-lisp recaptcha recaptcha-enterprise

Last synced: about 1 month ago
JSON representation

reCAPTCHA Enterprise system for Common Lisp

• Host: GitHub
• URL: https://github.com/junker/recaptcha-enterprise
• Owner: Junker
• License: mit
• Created: 2024-02-26T13:21:54.000Z (10 months ago)
• Default Branch: master
• Last Pushed: 2024-05-16T08:56:22.000Z (7 months ago)
• Last Synced: 2024-05-16T09:54:06.208Z (7 months ago)
• Topics: common-lisp, recaptcha, recaptcha-enterprise
• Language: Common Lisp
• Homepage:
• Size: 3.91 KB
• Stars: 1
• Watchers: 3
• Forks: 0
• Open Issues: 0
• Metadata Files:
  • Readme: README.md
  • License: LICENSE

Awesome Lists containing this project

README

        
# reCAPTCHA Enterprise

reCAPTCHA Enterprise system for Common Lisp

## Installation

This system can be installed from [UltraLisp](https://ultralisp.org/) like this:

```common-lisp

(ql-dist:install-dist "http://dist.ultralisp.org/"

                      :prompt nil)

(ql:quickload "recaptcha-enterprise")

```

## Usage

```common-lisp

(defpackage foo

  (:use :cl)

  (:local-nicknames (:re :recaptcha-enterprise)))

(setf re:*api-key* "API key associated with the current project")

(setf re:*project-id* "your Google Cloud project ID")

(let ((response (re:verify "Key ID from project" "token")))

  (if (re:validp response)

      (format t "Recaptcha score: ~A" (re:score response))

      (format t "Recaptcha invalid, reason: ~A" (re:invalid-reason response))))

```

## Documentation

- [Google Cloud: reCAPTCHA Enterprise documentation](https://cloud.google.com/recaptcha-enterprise/docs)

- [Google Cloud: Create assessments for websites](https://cloud.google.com/recaptcha-enterprise/docs/create-assessment-website)