Auto Generated Haskell Library for Stripe

License: MIT License

Haskell 100.00%

stripe-haskell-library's Introduction

Stripe-Haskell-Library

This code is auto-generated by Haskell-OpenAPI-Client-Code-Generator available on Hackage.

Generation

The files were auto-generated and formatted (with ormolu) with:

openapi3-code-generator-exe stripe-api.yml --force --property-type-suffix="'" --module-name "StripeAPI" --convert-to-camel-case --omit-additional-operation-functions --package-name "stripeapi"
for file in $(find src -name "*.hs"); do LC_ALL=C.UTF-8 ormolu -m inplace $file; done

How to use

See example/src/StripeHandling.hs for an example usage. The example can be run as follows (add your Stripe API key to example/src/StripeHandling.hs):

cd example
stack run --fast

On the package level

From hackage

install cabal
cabal install stripeapi (This may take a while)

From source

See https://github.com/Haskell-OpenAPI-Code-Generator/Haskell-OpenAPI-Client-Code-Generator#example-package for an example project generated with the same code generator.

Hackage

This library is available at https://hackage.haskell.org/package/stripeapi.

stripe-haskell-library's People

Contributors

Stargazers

Watchers

Forkers

thomasbach-dev scarf-sh polimorphic mangoiv geofflangenderfer

stripe-haskell-library's Issues

Feature Request: Support for webhook signature verification

https://stripe.com/docs/webhooks/signatures

postAccounts Breaking Stripe Update

Stripe recently pushed a change that allows Account.settings.bacs_debit_payments.display_name to be a nullable(string).

Stripe Changelog

This appears to have broken postAccounts in some cases with the following error:

Error in $.settings['bacs_debit_payments']['display_name']: parsing Text failed, expected String, but encountered Null

Is it possible to update the code according to the latest Stripe OpenAPI spec?

Direct support for `Stripe-Account` and `Idempotency-Key` headers

Not particularly pressing as configSecurityScheme is a simple enough workaround for inserting arbitrary headers, but it'd be nice to have these formally supported.

Pull newest stripe-api.yml from stripe/openapi

There are a variety of new endpoints and configuration options that are now available. In our case we are specifically most interested in instant bank verification.

Release new hackage version

The current latest hackage version doesn't really support Events.

Currently I will install via GitHub, but it'd be great to be able to use Hackage.

NotificationEventDataObject' is empty

The type NotificationEventDataObject' (https://hackage.haskell.org/package/stripeapi-0.1.0.2/docs/StripeAPI-Types-NotificationEventData.html#t:NotificationEventDataObject-39-) is empty and therefore not usable to extract information from the response. The relevant part from the Stripe specification is the following:

    notification_event_data:
      description: ''
      properties:
        object:
          description: Object containing the API resource relevant to the event. For
            example, an `invoice.created` event will have a full [invoice object](https://stripe.com/docs/api#invoice_object)
            as the value of the object key.
          type: object
        previous_attributes:
          description: Object containing the names of the attributes that have changed,
            and their previous values (sent along only with *.updated events).
          type: object
      required:
      - object
      title: NotificationEventData
      type: object
      x-expandableFields: []

The generated code corresponds to the specification but is not usable nevertheless. One possible solution would be to adjust the generator to use Data.Aeson.Value instead of unit types.

Question: Trying out latest api version

For trying out the the latest api version without pinning the version on my stripe account, this is where I would set it right?
https://stripe.com/docs/api/versioning

instance MonadHTTP Handler where
  httpBS req = HTTP.httpBS (HTTP.addRequestHeader "Stripe-Version" "2022-11-15" req)

I can't seem to make it work. It's still registering as the old api version in the stripe api logs

trouble adding to a project

Hi, thanks for making this package.

I'm having trouble adding it as a dependency. I'm not able to see any logs in the stripe console. I confirmed my stripe is setup correctly because I see logs when using python.

I've made a repo that reproduces the issue here: https://github.com/geofflangenderfer/ihp-stripe-demo/blob/main/Application/Script/CheckoutSessionExample.hs

I would greatly appreciate any advice

Invalid UTF-8 characters found in POST body

I have the following test:

module ThirdParty.StripeAPISpec (spec) where

import qualified Network.HTTP.Client as HTTPClient
import qualified StripeAPI           as Stripe

import Test.Hspec (Spec, describe, expectationFailure, it)

import TestUtils

spec :: Spec
spec = do
  describe "checkout sessions" $ do
    it "should contain a payment intent and a session url" $ do
      let params = (Stripe.mkPostCheckoutSessionsRequestBody "http://localhost:3000/" "http://localhost:3000/")
                   { Stripe.postCheckoutSessionsRequestBodyLineItems = Just [lineItems]
                   , Stripe.postCheckoutSessionsRequestBodyMode = Just Stripe.PostCheckoutSessionsRequestBodyMode'EnumPayment
                   , Stripe.postCheckoutSessionsRequestBodyClientReferenceId = Just "some-booking-id"
                   }
          lineItems = Stripe.mkPostCheckoutSessionsRequestBodyLineItems'
                      { Stripe.postCheckoutSessionsRequestBodyLineItems'PriceData = Just priceData
                      , Stripe.postCheckoutSessionsRequestBodyLineItems'Quantity = Just 3
                      }
          priceData = (Stripe.mkPostCheckoutSessionsRequestBodyLineItems'PriceData' "EUR")
                      { Stripe.postCheckoutSessionsRequestBodyLineItems'PriceData'ProductData = Just productData
                      , Stripe.postCheckoutSessionsRequestBodyLineItems'PriceData'UnitAmount = Just 100
                      }
          productData = Stripe.mkPostCheckoutSessionsRequestBodyLineItems'PriceData'ProductData' "foobar2000-î"
          getCheckout = Stripe.postCheckoutSessions params
          conf = Stripe.defaultConfiguration
                   { Stripe.configSecurityScheme = Stripe.bearerAuthenticationSecurityScheme testStripeAPIKey
                   }
      res <- Stripe.runWithConfiguration conf getCheckout
      case HTTPClient.responseBody res of
        Stripe.PostCheckoutSessionsResponse200 session -> do
          let mPaymentIntentId = Stripe.checkout'sessionPaymentIntent session
              mSessionUrl = Stripe.checkout'sessionUrl session
          case (mSessionUrl, mPaymentIntentId) of
            (Just _, Just (Stripe.Checkout'sessionPaymentIntent'Text _)) ->
              pure ()
            others -> expectationFailure $
              "Did not find sessionPaymentIntent and sessionUrl in " <> show others
        other -> expectationFailure $ "Did not find session response: " <> show other

Nothing special here, but note the î in the ProductData field. This tests fails with the following message:

  1) ThirdParty.StripeAPI, checkout sessions, should contain a payment intent and a session url
       Did not find session response: PostCheckoutSessionsResponseDefault (Error {errorError = ApiErrors {apiErrorsCharge = Nothing, apiErrorsCode = Just "invalid_utf8_in_post_body", apiErrorsDeclineCode = Nothing, apiErrorsDocUrl = Nothing, apiErrorsMessage = Just "Invalid UTF-8 characters found in POST body: \"foobar2000-\\xEE\".  For assistance, please contact [email protected].", apiErrorsParam = Nothing, apiErrorsPaymentIntent = Nothing, apiErrorsPaymentMethod = Nothing, apiErrorsPaymentMethodType = Nothing, apiErrorsSetupIntent = Nothing, apiErrorsSource = Nothing, apiErrorsType = ApiErrorsType'EnumInvalidRequestError}})

Removing said î the test succeeds.

I haven't really looked into this yet, just discovered the issue. Do you have any suggestion what's wrong here? Can you give me pointers?

haskell-openapi-code-generator / stripe-haskell-library Goto Github PK