B4J Question FreeIPA and json-rpc

[orynkanov]

Hello!
There is a need to give requests and receive responses from the server using freeipa json-rpc protocol. Authorization server freeipa should be using login and password. I made using curl (https://vda.li/en/posts/2015/05/28/talking-to-freeipa-api-with-sessions/), but the implementation is very slow work. Please help with a simple example.

 

[Erel]

Try this:

  Dim j As HttpJob
   j.Initialize("j", Me)
   j.PostString(URL, "user=$s_username&password=$s_password")
   j.GetRequest.SetContentType("application/x-www-form-urlencoded")
   j.GetRequest.SetHeader("rererer", "https://ipa-master.example.com/ipa")

Sub JobDone(j As HttpJob)
   Log(j)
   j.Release
End Sub

 

[orynkanov]

Unfortunately, your code will not help request the server to freeipa. There was no answer, no errors.
The code shall consist of the following steps:
1 - download ca.crt certificate from the server at https://ipa-server/ipa/config/ca.crt.
2 - getting and keeping a cookie. Request cookie occurs by login and password.
3 - request json-rpc using previously saved ca.crt and cookie.
4 - obtaining and analyzing json response from freeipa.
I'm willing to pay for this code. All the steps I have already implemented using bash and jShell, but it is slow.