Skip to content

Commit

Permalink
feat: 3DS netcetra Part B (#383)
Browse files Browse the repository at this point in the history
Co-authored-by: Pritish Budhiraja <pritish.budhiraja@gmail.com>
  • Loading branch information
prafulkoppalkar and PritishBudhiraja committed May 27, 2024
1 parent 66b13f5 commit aa44b98
Show file tree
Hide file tree
Showing 4 changed files with 78 additions and 41 deletions.
13 changes: 6 additions & 7 deletions src/Components/Modal.res
Original file line number Diff line number Diff line change
Expand Up @@ -18,13 +18,12 @@ let make = (
let {themeObj} = Recoil.useRecoilValueFromAtom(RecoilAtoms.configAtom)
let closeModal = () => {
setOpenModal(_ => false)
setTimeout(() => {
switch closeCallback {
| Some(fn) => fn()
| None => ()
}
Utils.handlePostMessage([("fullscreen", false->JSON.Encode.bool)])
}, 450)->ignore
switch closeCallback {
| Some(fn) => fn()
| None => setTimeout(() => {
Utils.handlePostMessage([("fullscreen", false->JSON.Encode.bool)])
}, 450)->ignore
}
}

React.useEffect(() => {
Expand Down
97 changes: 68 additions & 29 deletions src/ThreeDSAuth.res
Original file line number Diff line number Diff line change
Expand Up @@ -5,8 +5,22 @@ let make = () => {
let (openModal, setOpenModal) = React.useState(_ => false)
let (loader, setloader) = React.useState(_ => true)

let threeDsAuthoriseUrl = React.useRef("")
let (expiryTime, setExpiryTime) = React.useState(_ => 600000.0)

let logger = OrcaLogger.make(~source=Elements(Payment), ())

let handleFrictionLess = () => {
let ele = Window.querySelector("#threeDsAuthDiv")
switch ele->Nullable.toOption {
| Some(elem) => {
let form1 = elem->makeForm(threeDsAuthoriseUrl.current, "3dsFrictionLess")
form1.submit()
}
| None => ()
}
}

React.useEffect0(() => {
handlePostMessage([("iframeMountedCallback", true->JSON.Encode.bool)])
let handle = (ev: Window.event) => {
Expand All @@ -24,7 +38,7 @@ let make = () => {
->getJsonObjectFromDict("headers")
->JSON.Decode.object
->Option.getOr(Dict.make())
let threeDsAuthoriseUrl =
threeDsAuthoriseUrl.current =
metaDataDict
->getJsonObjectFromDict("threeDSData")
->JSON.Decode.object
Expand All @@ -48,38 +62,47 @@ let make = () => {
)
->then(json => {
let dict = json->JSON.Decode.object->Option.getOr(Dict.make())
let creq = dict->getString("challenge_request", "")
let transStatus = dict->getString("trans_status", "Y")
let acsUrl = dict->getString("acs_url", "")
if dict->Dict.get("error")->Option.isSome {
let errorObj = PaymentError.itemToObjMapper(dict)
handlePostMessage([("fullscreen", false->JSON.Encode.bool)])
postFailedSubmitResponse(
~errortype=errorObj.error.type_,
~message=errorObj.error.message,
)
JSON.Encode.null->resolve
} else {
let creq = dict->getString("challenge_request", "")
let transStatus = dict->getString("trans_status", "Y")
let acsUrl = dict->getString("acs_url", "")

let ele = Window.querySelector("#threeDsAuthDiv")
let ele = Window.querySelector("#threeDsAuthDiv")

LoggerUtils.handleLogging(
~optLogger=Some(logger),
~eventName=DISPLAY_THREE_DS_SDK,
~value=transStatus,
~paymentMethod="CARD",
(),
)
LoggerUtils.handleLogging(
~optLogger=Some(logger),
~eventName=DISPLAY_THREE_DS_SDK,
~value=transStatus,
~paymentMethod="CARD",
(),
)

switch ele->Nullable.toOption {
| Some(elem) =>
if transStatus === "C" {
setloader(_ => false)
let form = elem->makeForm(acsUrl, "3dsChallenge")
let input = Types.createElement("input")
input.name = "creq"
input.value = creq
form.target = "threeDsAuthFrame"
form.appendChild(input)
form.submit()
} else {
let form1 = elem->makeForm(threeDsAuthoriseUrl, "3dsFrictionLess")
form1.submit()
switch ele->Nullable.toOption {
| Some(elem) =>
if transStatus === "C" {
setloader(_ => false)
let form = elem->makeForm(acsUrl, "3dsChallenge")
let input = Types.createElement("input")
input.name = "creq"
input.value = creq
form.target = "threeDsAuthFrame"
form.appendChild(input)
form.submit()
} else {
handleFrictionLess()
}
| None => ()
}
| None => ()
resolve(json)
}
resolve(json)
})
->catch(err => {
let exceptionMessage = err->formatException
Expand All @@ -91,6 +114,8 @@ let make = () => {
~logType=ERROR,
(),
)
let errorObj = PaymentError.itemToObjMapper(dict)
postFailedSubmitResponse(~errortype=errorObj.error.type_, ~message=errorObj.error.message)
JSON.Encode.null->resolve
})
->ignore
Expand All @@ -100,7 +125,21 @@ let make = () => {
Some(() => {Window.removeEventListener("message", handle)})
})

<Modal loader={loader} showClose=false openModal setOpenModal>
React.useEffect(() => {
if expiryTime < 1000.0 {
handleFrictionLess()
}
let intervalID = setInterval(() => {
setExpiryTime(prev => prev -. 1000.0)
}, 1000)
Some(
() => {
clearInterval(intervalID)
},
)
}, [expiryTime])

<Modal loader={loader} openModal setOpenModal closeCallback={handleFrictionLess}>
<div className="backdrop-blur-xl">
<div id="threeDsAuthDiv" className="hidden" />
<iframe
Expand Down
4 changes: 4 additions & 0 deletions src/Utilities/PaymentHelpers.res
Original file line number Diff line number Diff line change
Expand Up @@ -121,6 +121,10 @@ let threeDsAuth = (~clientSecret, ~optLogger, ~threeDsMethodComp, ~headers) => {
~logCategory=API,
(),
)
let dict = data->getDictFromJson
let errorObj = PaymentError.itemToObjMapper(dict)
closePaymentLoaderIfAny()
postFailedSubmitResponse(~errortype=errorObj.error.type_, ~message=errorObj.error.message)
JSON.Encode.null->resolve
})
} else {
Expand Down
5 changes: 0 additions & 5 deletions src/orca-loader/Elements.res
Original file line number Diff line number Diff line change
Expand Up @@ -604,11 +604,6 @@ let make = (
}
switch eventDataObject->getOptionalJsonFromJson("poll_status") {
| Some(val) => {
handlePostMessage([
("fullscreen", true->JSON.Encode.bool),
("param", "paymentloader"->JSON.Encode.string),
("iframeId", selectorString->JSON.Encode.string),
])
let dict = val->getDictFromJson
let pollId = dict->getString("poll_id", "")
let interval =
Expand Down

0 comments on commit aa44b98

Please sign in to comment.