B4J Library [Web] MinimaList Controller

Version : 1.07
This library is use to create a basic controller class for MinimaList API Server v2.03+ template.

Library:
  • MinimaListController.jar
  • MinimaListController.xml
GitHub:
https://github.com/pyhoon/MinimaListController-B4J

Generated code:
SampleController:
' MinimaList Controller
' Version 1.07
Sub Class_Globals
    Private Request As ServletRequest
    Private Response As ServletResponse
    Private HRM As HttpResponseMessage
    Private Method As String
    Private Version As String
    Private Elements() As String
    Private ApiVersionIndex As Int
    Private ControllerIndex As Int
    Private ElementLastIndex As Int
    Private FirstIndex As Int
    Private FirstElement As String
End Sub

Public Sub Initialize (req As ServletRequest, resp As ServletResponse)
    Request = req
    Response = resp
    HRM.Initialize
End Sub

Private Sub ReturnBadRequest
    WebApiUtils.ReturnBadRequest(Response)
End Sub

Private Sub ReturnApiResponse 'ignore
    HRM.SimpleResponse = Main.SimpleResponse
    WebApiUtils.ReturnHttpResponse(HRM, Response)
End Sub

Private Sub ReturnMethodNotAllow
    WebApiUtils.ReturnMethodNotAllow(Response)
End Sub

Private Sub ReturnErrorUnprocessableEntity
    WebApiUtils.ReturnErrorUnprocessableEntity(Response)
End Sub

' API Router
Public Sub RouteApi
    Method = Request.Method.ToUpperCase
    Elements = WebApiUtils.GetUriElements(Request.RequestURI)
    ElementLastIndex = Elements.Length - 1
    ApiVersionIndex = Main.Element.ApiVersionIndex
    Version = Elements(ApiVersionIndex)
    ControllerIndex = Main.Element.ApiControllerIndex
    If ElementLastIndex > ControllerIndex Then
        FirstIndex = ControllerIndex + 1
        FirstElement = Elements(FirstIndex)
    End If
    
    Select Method
        Case "GET"
            RouteGet
        Case "POST"
            'RoutePost
        Case "PUT"
            'RoutePut
        Case "DELETE"
            'RouteDelete
        Case Else
            Log("Unsupported method: " & Method)
            ReturnMethodNotAllow
    End Select
End Sub

' Snippet: Code_WebApiUtils_03 GET Route
Private Sub RouteGet
    Select Version
        Case "v2"
            Select ElementLastIndex
                Case ControllerIndex
                    ' Snippet: Code_MinimalListUtils_01 Get All Resources
                    'GetPlural
                    Return
                Case FirstIndex
                    If IsNumber(FirstElement) = False Then
                        ReturnErrorUnprocessableEntity
                        Return
                    End If
                    ' Snippet: Code_MinimalListUtils_02 Get Single Resource
                    'GetSingular(FirstElement)
                    Return
            End Select
    End Select
    ReturnBadRequest
End Sub

Tutorial:

Release Logs
  • Version 1.07
    • (add) RouteGet sub
    • (update) ReturnApiResponse sub
  • Version 1.06
    • (add) ReturnBadRequest sub
    • (add) ReturnMethodNotAllow sub
    • (add) ReturnErrorUnprocessableEntity sub

This project has been tested many many times. Please report bugs if you found any
Post your question in a new thread.
 

Attachments

  • MinimaListController.jar
    944 bytes · Views: 15
  • MinimaListController.xml
    326 bytes · Views: 13
Last edited:
Top