Project

General

Profile

skeleton.patch

skeleton patch - bazaar format (send) - Marian Edu, 06/05/2020 06:24 AM

Download (130 KB)

View differences:

oo4gl/OpenEdge/Core/SerializationFormatEnum.cls 2020-06-05 10:23:14 +0000
1
enum OpenEdge.Core.SerializationFormatEnum:
2
    define enum JSON = 0
3
                QuotedJSON
4
                
5
                XML
6
                QuotedXML
7
                
8
                Binary
9
                .
10
end enum.
oo4gl/OpenEdge/Core/ServerConnection/IConnectionParameters.cls 2020-06-05 10:23:14 +0000
1
interface OpenEdge.Core.ServerConnection.IConnectionParameters:
2
   
3
    define public property FormatMask as OpenEdge.Core.ServerConnection.FormatMaskEnum no-undo get.
4

  
5
    method public character GetConnectionString().
6

  
7
    method public character GetConnectionString(input pcFormatMask as character).
8

  
9
    method public character GetConnectionString(input poFormatMask as OpenEdge.Core.ServerConnection.FormatMaskEnum).
10
            
11
end interface.
oo4gl/OpenEdge/Core/ServerConnection/IServerConnection.cls 2020-06-05 10:23:14 +0000
1
interface OpenEdge.Core.ServerConnection.IServerConnection:
2

  
3
    define public property Server as Progress.Lang.Object no-undo get.
4

  
5
    define public property ConnectionParameters as OpenEdge.Core.ServerConnection.IConnectionParameters no-undo get.
6

  
7
    define public property Connected as logical no-undo get.
8
    
9
    method public void CreateServer().
10

  
11
    method public void DestroyServer().
12

  
13
    method public void Connect().
14

  
15
    method public void Disconnect().
16
    
17
end interface.
oo4gl/OpenEdge/Logging/Format/ISupportFormatting.cls 2020-06-05 10:23:14 +0000
1
interface OpenEdge.Logging.Format.ISupportFormatting:
2
  define public property Format as character no-undo get. set.
3
end.
oo4gl/OpenEdge/Logging/Logger.cls 2020-06-05 10:23:14 +0000
1
class OpenEdge.Logging.Logger final 
2
implements OpenEdge.Logging.ILogWriter, OpenEdge.Logging.Format.ISupportFormatting:
3
  
4
  define public property Format as character no-undo get. set.
5
  
6
  define public property LogLevel as OpenEdge.Logging.LogLevelEnum no-undo get. private set.
7
  
8
  define public property Name as character no-undo get. private set.
9
  
10
  define protected property ShortName as character no-undo get. private set.
11
  
12
  method public void Debug(input p1 as character):
13
  end.
14
  
15
  method public void Debug(input p1 as character, input p2 as character):
16
  end.
17
  
18
  method public void Debug(input p1 as character, input p2 as character, input p3 as Progress.Lang.Error):
19
  end.
20
  
21
  method public void Debug(input p1 as character, input p2 as Progress.Lang.Error):
22
  end.
23
  
24
  method public void Debug(input p1 as OpenEdge.Logging.LogMessage):
25
  end.
26
  
27
  method public void Debug(input p1 as OpenEdge.Logging.LogMessage, input p2 as Progress.Lang.Error):
28
  end.
29
  
30
  method override public logical Equals( input p1 as Progress.Lang.Object ):
31
  end.
32
  
33
  method public void Error(input p1 as character):
34
  end.
35
  
36
  method public void Error(input p1 as character, input p2 as character):
37
  end.
38
  
39
  method public void Error(input p1 as character, input p2 as character, input p3 as Progress.Lang.Error):
40
  end.
41
  
42
  method public void Error(input p1 as character, input p2 as Progress.Lang.Error):
43
  end.
44
  
45
  method public void Error(input p1 as OpenEdge.Logging.LogMessage):
46
  end.
47
  
48
  method public void Error(input p1 as OpenEdge.Logging.LogMessage, input p2 as Progress.Lang.Error):
49
  end.
50
  
51
  method public void Fatal(input p1 as character):
52
  end.
53
  
54
  method public void Fatal(input p1 as character, input p2 as character):
55
  end.
56
  
57
  method public void Fatal(input p1 as character, input p2 as character, input p3 as Progress.Lang.Error):
58
  end.
59
  
60
  method public void Fatal(input p1 as character, input p2 as Progress.Lang.Error):
61
  end.
62
  
63
  method public void Fatal(input p1 as OpenEdge.Logging.LogMessage):
64
  end.
65
  
66
  method public void Fatal(input p1 as OpenEdge.Logging.LogMessage, input p2 as Progress.Lang.Error):
67
  end.
68
  
69
  method public void Info(input p1 as character):
70
  end.
71
  
72
  method public void Info(input p1 as character, input p2 as character):
73
  end.
74
  
75
  method public void Info(input p1 as character, input p2 as character, input p3 as Progress.Lang.Error):
76
  end.
77
  
78
  method public void Info(input p1 as character, input p2 as Progress.Lang.Error):
79
  end.
80
  
81
  method public void Info(input p1 as OpenEdge.Logging.LogMessage):
82
  end.
83
  
84
  method public void Info(input p1 as OpenEdge.Logging.LogMessage, input p2 as Progress.Lang.Error):
85
  end.
86
  
87
  constructor public Logger(input p1 as character, input p2 as OpenEdge.Logging.LogLevelEnum, input p3 as OpenEdge.Logging.Filter.LoggerFilterList):
88
  end.
89
  
90
  method public void Trace(input p1 as character):
91
  end.
92
  
93
  method public void Trace(input p1 as character, input p2 as character):
94
  end.
95
  
96
  method public void Trace(input p1 as character, input p2 as character, input p3 as Progress.Lang.Error):
97
  end.
98
  
99
  method public void Trace(input p1 as character, input p2 as Progress.Lang.Error):
100
  end.
101
  
102
  method public void Trace(input p1 as OpenEdge.Logging.LogMessage):
103
  end.
104
  
105
  method public void Trace(input p1 as OpenEdge.Logging.LogMessage, input p2 as Progress.Lang.Error):
106
  end.
107
  
108
  method public void Warn(input p1 as character):
109
  end.
110
  
111
  method public void Warn(input p1 as character, input p2 as character):
112
  end.
113
  
114
  method public void Warn(input p1 as character, input p2 as character, input p3 as Progress.Lang.Error):
115
  end.
116
  
117
  method public void Warn(input p1 as character, input p2 as Progress.Lang.Error):
118
  end.
119
  
120
  method public void Warn(input p1 as OpenEdge.Logging.LogMessage):
121
  end.
122
  
123
  method public void Warn(input p1 as OpenEdge.Logging.LogMessage, input p2 as Progress.Lang.Error):
124
  end.
125
  
126
  method private void WriteMessage(input p1 as OpenEdge.Logging.LogLevelEnum, input p2 as OpenEdge.Logging.LogMessage, input p3 as Progress.Lang.Error):
127
  end.
128
  
129
end.
oo4gl/OpenEdge/Net/FileTypeRegistry.cls 2020-06-05 10:23:14 +0000
1
class OpenEdge.Net.FileTypeRegistry: 
2

  
3
    define public property Size as integer no-undo get. 
4

  
5
    constructor private FileTypeRegistry():
6
    end constructor.
7
    
8
    destructor FileTypeRegistry():
9
    end destructor.
10
    
11
    define static public property Registry as OpenEdge.Net.FileTypeRegistry no-undo get.
12

  
13
    method static private void InitializeRegistry(input poRegistry as OpenEdge.Net.FileTypeRegistry):
14
    end method.
15

  
16
    method public logical Put(input pcExtensionKey as character, input pcMimeType as character):                                   
17
    end method.
18

  
19
    method public logical Remove(input pcExtensionKey as character):                                    
20
    end method.    
21

  
22
    method public logical Has(input pcExtensionKey as character):
23
    end method.
24

  
25
    method public character Get(input pcExtensionKey as character):
26
    end method.
27
    
28
    method public void Clear():
29
    end method.
30

  
31
    method public character extent GetKeys(input pMimeType as character):     
32
    end method.
33

  
34
    method public character extent GetKeys():
35
    end method.
36
    
37
end class.
oo4gl/OpenEdge/Net/HTTP/AuthenticatedRequest.cls 2020-06-05 10:23:14 +0000
1
class OpenEdge.Net.HTTP.AuthenticatedRequest 
2
inherits OpenEdge.Net.HTTP.HttpRequestDecorator  
3
implements OpenEdge.Net.HTTP.IAuthenticatedRequest:
4
    
5
    define public property AuthenticationMethod as character no-undo get.
6

  
7
    define public property Credentials as OpenEdge.Net.HTTP.Credentials no-undo get. set.
8

  
9
    define public property AuthenticationChallenge as character no-undo get.
10
    
11
    constructor public AuthenticatedRequest(input poHttpRequest as OpenEdge.Net.HTTP.IHttpRequest):
12
    end constructor.
13

  
14
    method public void AddAuthentication():
15
    end method.
16

  
17
    method public void SetChallenge(input pcAuthMethod as character,
18
                                    input pcChallenge as character):
19
    end method.
20

  
21
    method public void AddAuthenticationCallback(input poListener as OpenEdge.Net.HTTP.Filter.Auth.IAuthFilterEventHandler):
22
    end method.
23
    
24
    method public void RemoveAuthenticationCallback(input poListener as OpenEdge.Net.HTTP.Filter.Auth.IAuthFilterEventHandler):
25
    end method.
26
  
27
    method public integer GetAuthenticationCallbacks(output poListener as OpenEdge.Net.HTTP.Filter.Auth.IAuthFilterEventHandler extent).
28
    end method.
29
    
30
end class.
oo4gl/OpenEdge/Net/HTTP/ContentDispositionHeader.cls 2020-06-05 10:23:14 +0000
1
/************************************************
2
Copyright (c) 2016, 2018 by Progress Software Corporation. All rights reserved.
3
*************************************************/ 
4
/*------------------------------------------------------------------------
5
    File        : ContentDispositionHeader
6
    Purpose     : 
7
    Syntax      : 
8
    Description : 
9
    Author(s)   : pjudge
10
    Created     : 2016-07-01
11
    Notes       : * Header per spec http://tools.ietf.org/html/rfc6266 
12
  ----------------------------------------------------------------------*/
13
block-level on error undo, throw.
14

  
15
using OpenEdge.Core.StringConstant.
16
using OpenEdge.Net.HTTP.HttpHeader.
17

  
18
class OpenEdge.Net.HTTP.ContentDispositionHeader inherits HttpHeader:
19
    /* Constructor
20
    
21
       @param character A non-empty header name */
1
class OpenEdge.Net.HTTP.ContentDispositionHeader 
2
inherits OpenEdge.Net.HTTP.HttpHeader:
3

  
22 4
    constructor public ContentDispositionHeader(input pcName as character):
23
        super (pcName).
24
        assign this-object:ParamDelimiter = ';':u.
25 5
    end constructor.
26
    
27
    /* Constructor
28
    
29
       @param character A non-empty header name
30
       @param character A valid header value    */
6

  
31 7
    constructor public ContentDispositionHeader (input pcName as character, input pcValue as character):
32
        super(pcName, pcValue).
33
        assign this-object:ParamDelimiter = ';':u.
34 8
    end constructor.
35 9
    
36 10
    method override public logical SetParameterValue( input pcParamName as character, input pcParamValue as character ):
37
        case pcParamName:
38
            when 'filename':u or
39
            when 'name':u then
40
               if not OpenEdge.Core.String:IsQuoted(pcParamValue) then
41
                   assign pcParamValue = StringConstant:DOUBLE_QUOTE + pcParamValue + StringConstant:DOUBLE_QUOTE.
42
        end case.
43
        
44
        return super:SetParameterValue(input pcParamName, input pcParamValue).
45 11
    end method.
46 12
    
47 13
end class.
oo4gl/OpenEdge/Net/HTTP/ContentDispositionHeaderBuilder.cls 2020-06-05 10:23:14 +0000
1
/************************************************
2
Copyright (c) 2016 by Progress Software Corporation. All rights reserved.
3
*************************************************/ 
4
/*------------------------------------------------------------------------
5
    File        : ContentDispositionHeaderBuilder
6
    Purpose     : Bulider to create Content-Disposition header objects
7
    Syntax      : 
8
    Description : 
9
    Author(s)   : pjudge
10
    Created     : 2016-07-01
11
    Notes       : 
12
  ----------------------------------------------------------------------*/
13
block-level on error undo, throw.
14

  
15 1
using OpenEdge.Net.HTTP.ContentDispositionHeader.
16 2
using OpenEdge.Net.HTTP.DefaultHeaderBuilder.
17 3
using OpenEdge.Net.HTTP.HttpHeader.
18 4

  
19
class OpenEdge.Net.HTTP.ContentDispositionHeaderBuilder inherits DefaultHeaderBuilder: 
5
class OpenEdge.Net.HTTP.ContentDispositionHeaderBuilder 
6
inherits OpenEdge.Net.HTTP.DefaultHeaderBuilder: 
20 7

  
21
    /* Constructor
22
       
23
       @param character The name of the header to which this builder applies */
24 8
    constructor public ContentDispositionHeaderBuilder ( input pcHeaderName as character ):
25
        super (input pcHeaderName).
26
        
27
        SetOption('paramDelimiter':u, ';':u).
28
        SetOption(get-class(HttpHeader):TypeName, get-class(ContentDispositionHeader)).
29 9
    end constructor.
30 10

  
31 11
end class.
oo4gl/OpenEdge/Net/HTTP/ContentTypeHeader.cls 2020-06-05 10:23:14 +0000
1
class OpenEdge.Net.HTTP.ContentTypeHeader inherits OpenEdge.Net.HTTP.HttpHeader:
1
class OpenEdge.Net.HTTP.ContentTypeHeader 
2
inherits OpenEdge.Net.HTTP.HttpHeader:
2 3
    constructor public ContentTypeHeader(input pcName as character):
3 4
    end constructor.
4 5
    
oo4gl/OpenEdge/Net/HTTP/Cookie.cls 2020-06-05 10:23:14 +0000
26 26
  method public override logical Equals(p1 as Progress.Lang.Object):
27 27
  end.
28 28

  
29
  method public OpenEdge.Net.HTTP.Cookie Parse(p1 as character):
29
  method static public OpenEdge.Net.HTTP.Cookie Parse(p1 as character):
30 30
  end.
31 31

  
32 32
  method public override character ToString():
oo4gl/OpenEdge/Net/HTTP/CookieCollection.cls 2020-06-05 10:23:14 +0000
1
class OpenEdge.Net.HTTP.CookieCollection  
2
inherits OpenEdge.Core.Collections.Collection :
3
    
4
    constructor public CookieCollection():
5
    end constructor.
6
    
7
    constructor public CookieCollection(input poCollection as OpenEdge.Core.Collections.ICollection):
8
    end constructor.
9
   
10
    method public logical Add(input newObject as OpenEdge.Net.HTTP.Cookie):
11
    end method.
12
 
13
    method public logical AddArray(input poArray as OpenEdge.Net.HTTP.Cookie extent):
14
    end method.
15
 
16
    method public logical Remove(input oldObject as OpenEdge.Net.HTTP.Cookie):
17
    end method.
18
   
19
    method public logical Contains(input checkObject as OpenEdge.Net.HTTP.Cookie):
20
    end method.
21

  
22
    method public OpenEdge.Net.HTTP.Cookie extent ToCookieArray ():
23
    end method.
24

  
25
end class.
oo4gl/OpenEdge/Net/HTTP/CookieJar.cls 2020-06-05 10:23:14 +0000
1 1
class OpenEdge.Net.HTTP.CookieJar
2
implements OpenEdge.Net.HTTP.ICookieJar, ISupportInitialize, OpenEdge.Logging.ISupportLogging:
3
    define public property OpenEdge.Logging.Logger as OpenEdge.Logging.ILogWriter no-undo get. set.
2
implements OpenEdge.Net.HTTP.ICookieJar, OpenEdge.Core.ISupportInitialize, OpenEdge.Logging.ISupportLogging:
3
    
4
    define public property Logger as OpenEdge.Logging.ILogWriter no-undo get. set.
4 5

  
5 6
    define public property CookieJarPath as character no-undo get. set.
6 7
    
7 8
    constructor public CookieJar():
8 9
    end constructor.
10
    
11
    destructor CookieJar():
12
    end.
9 13

  
10 14
    method public void Initialize():
11 15
    end.
......
13 17
    method public void Destroy():
14 18
    end .
15 19
    
20
    method public void AddCookie(input pcDomain as character,
21
                                 input pcPath   as character,
22
                                 input poCookie as OpenEdge.Net.HTTP.Cookie):
23
    end.
24
    
25
    method public void AddCookie(input poCookie as OpenEdge.Net.HTTP.Cookie):
26
    end.
27
    
28
    method public void AddCookies(input poCookies as OpenEdge.Net.HTTP.Cookie extent ):
29
    end.
30
    
31
    method public void ClearPersistentCookies():
32
    end.
33
    
34
    method public void ClearSessionCookies():
35
    end.
36
    
37
    constructor static CookieJar():
38
    end.
39
    
40
    method public integer GetCookies(input poUri as OpenEdge.Net.URI, output poCookies as OpenEdge.Net.HTTP.Cookie extent):
41
    end.
42
    
43
    method public logical RemoveCookie(input poCookie as OpenEdge.Net.HTTP.Cookie):
44
    end.                                
45
    
16 46
end.
17 47

  
oo4gl/OpenEdge/Net/HTTP/CookieJarBuilder.cls 2020-06-05 10:23:14 +0000
3 3
abstract:
4 4
  define public static property Registry as OpenEdge.Net.HTTP.BuilderRegistry no-undo get.
5 5

  
6
  define abstract property  OpenEdge.Net.HTTP.CookieJar as OpenEdge.Net.HTTP.ICookieJar no-undo get.
6
  define abstract property CookieJar as OpenEdge.Net.HTTP.ICookieJar no-undo get.
7 7

  
8 8
  method static public OpenEdge.Net.HTTP.CookieJarBuilder Build():
9 9
  end.
oo4gl/OpenEdge/Net/HTTP/CookieJarDecorator.cls 2020-06-05 10:23:14 +0000
1
class OpenEdge.Net.HTTP.CookieJarDecorator 
2
abstract 
3
implements OpenEdge.Net.HTTP.ICookieJar:
4
    
5
    define protected property DecoratedCookieJar as OpenEdge.Net.HTTP.ICookieJar no-undo get.
6

  
7
    define public property CookieJarPath as character no-undo get. set.
8

  
9
	constructor public CookieJarDecorator(input poCookieJar as OpenEdge.Net.HTTP.ICookieJar):
10
    end constructor.
11

  
12
    method public integer GetCookies(input poUri as OpenEdge.Net.URI, output poCookies as OpenEdge.Net.HTTP.Cookie extent).
13
    end method.
14

  
15
    method public void AddCookie(input poCookie as OpenEdge.Net.HTTP.Cookie):
16
    end method.
17

  
18
    method public void AddCookie(input pcDomain as character,
19
                                 input pcPath   as character,
20
                                 input poCookie as OpenEdge.Net.HTTP.Cookie).
21
    end method.
22

  
23
    method public logical RemoveCookie(input poCookie as OpenEdge.Net.HTTP.Cookie):
24
    end method.
25

  
26
    method public void AddCookies(input poCookies as OpenEdge.Net.HTTP.Cookie extent):
27
    end method.
28

  
29
    method public void ClearSessionCookies():
30
    end method.
31

  
32
    method public void ClearPersistentCookies():
33
    end method.
34

  
35
end class.
oo4gl/OpenEdge/Net/HTTP/DefaultHttpClientBuilder.cls 2020-06-05 10:23:14 +0000
1
/************************************************
2
Copyright (c) 2015-2016 by Progress Software Corporation. All rights reserved.
3
*************************************************/
4
/*------------------------------------------------------------------------
5
    File        : DefaultHttpClientBuilder
6
    Purpose     : 
7
    Syntax      : 
8
    Description : 
9
    Author(s)   : pjudge
10
    Created     : Wed Jan 14 14:53:46 EST 2015
11
    Notes       : 
12
  ----------------------------------------------------------------------*/
13
block-level on error undo, throw.
14

  
15
using OpenEdge.Core.Assert.
16
using OpenEdge.Core.ISupportInitialize.
17
using OpenEdge.Logging.ILogWriter.
18
using OpenEdge.Logging.ISupportLogging.
19
using OpenEdge.Net.HTTP.ClientBuilder.
20
using OpenEdge.Net.HTTP.ICookieJar.
21
using OpenEdge.Net.HTTP.IHttpClient.
22
using OpenEdge.Net.HTTP.ISupportCookies.
23
using OpenEdge.Net.HTTP.ISupportProxy.
24
using OpenEdge.Net.URI.
25

  
26
class OpenEdge.Net.HTTP.DefaultHttpClientBuilder inherits ClientBuilder
27
             implements ISupportInitialize:
1
class OpenEdge.Net.HTTP.DefaultHttpClientBuilder 
2
inherits OpenEdge.Net.HTTP.ClientBuilder
3
implements OpenEdge.Core.ISupportInitialize:
28 4
                 
29
    /** Returns a configured client. */
30
    define override public property Client as IHttpClient no-undo
31
        get():
32
            return NewClient().
33
        end get.
5
    define override public property Client as OpenEdge.Net.HTTP.IHttpClient no-undo get.
34 6

  
35 7
    constructor public DefaultHttpClientBuilder():
36
        super().
37 8
    end constructor.
38 9
    
39 10
    destructor public DefaultHttpClientBuilder():
40
        Destroy().
41 11
    end destructor.  
42 12

  
43 13
    method public void Initialize():
44
        Named('OpenEdge-HttpClient':u, '0.4.0':u).
45 14
    end method.
46 15
    
47 16
    method public void Destroy():
48 17
    end method.
49
    /** Returns a useable HttpClient based on the config.
50
        
51
        @return IHttpClient A useable HttpClient instance */
52
    method private IHttpClient NewClient():
53
        define variable oClient as IHttpClient no-undo.
54
        define variable oClientType as Progress.Lang.Class no-undo.
55
        
56
        /* INVOKE */
57
        Assert:IsTrue(HasOption(PROP_CLIENT_NAME)).
58
        Assert:IsTrue(HasOption(PROP_CLIENT_VERSION)).
59
        
60
        assign oClientType = ClientBuilder:Registry:Get(get-class(IHttpClient):TypeName).
61
        
62
        /* We know the signature to the default client's constructor - make sure that the type we
63
           get is of that type */
64
        Assert:IsType(oClientType, get-class(OpenEdge.Net.HTTP.HttpClient)).
65
        
66
        oClient = dynamic-new string(oClientType:TypeName) (GetOptionStringValue(PROP_CLIENT_NAME),
67
                                                            GetOptionStringValue(PROP_CLIENT_VERSION),
68
                                                            BuildLibrary() ).
69
        
70
        /* SET OPTIONS */
71
        if HasOption('numRetries':u) then
72
            oClient:Options:NumRetries = GetOptionNumericValue('numRetries':u).
73
        if HasOption('pauseBetweenRetry':u) then
74
            oClient:Options:PauseBetweenRetry = GetOptionNumericValue('pauseBetweenRetry':u).
75
        if HasOption('requestTimeout':u) then
76
            oClient:Options:RequestTimeout = GetOptionNumericValue('requestTimeout':u).
77
        
78
        // Add logging if it's been passed in 
79
        if HasOption(get-class(ILogWriter):TypeName) 
80
           and type-of(oClient, ISupportLogging) then
81
            assign cast(oClient, ISupportLogging):Logger = cast(GetOptionObjectValue(get-class(ILogWriter):TypeName), ILogWriter).
82
        
83
        /* INIT if needed  */
84
        if type-of(oClient, ISupportInitialize) then
85
            cast(oClient, ISupportInitialize):Initialize().
86
        
87
        /* COOKIES? */
88
        if HasOption(get-class(ICookieJar):TypeName) then
89
            assign oClient = ClientBuilder:DecorateClient(get-class(ISupportCookies), oClient)
90
                   cast(oClient, ISupportCookies):CookieJar = cast(GetOptionObjectValue(get-class(ICookieJar):TypeName), ICookieJar).
91
        
92
        /* PROXY? */
93
        if HasOption(get-class(ISupportProxy):TypeName) then
94
            assign oClient = ClientBuilder:DecorateClient(get-class(ISupportProxy), oClient)
95
                   cast(oClient, ISupportProxy):ProxyURI = cast(GetOptionObjectValue(get-class(ISupportProxy):TypeName), URI).
96
        return oClient.
97
    end method.
98
    
18
   
99 19
end class.
oo4gl/OpenEdge/Net/HTTP/DefaultResponseBuilder.cls 2020-06-05 10:23:14 +0000
1
class OpenEdge.Net.HTTP.DefaultResponseBuilder inherits OpenEdge.Net.HTTP.ResponseBuilder:
2
    /* custom implementation */
1
class OpenEdge.Net.HTTP.DefaultResponseBuilder 
2
inherits OpenEdge.Net.HTTP.ResponseBuilder:
3

  
3 4
    define override public property Response as OpenEdge.Net.HTTP.IHttpResponse no-undo get.
4 5

  
5 6
    constructor public DefaultResponseBuilder():
oo4gl/OpenEdge/Net/HTTP/Filter/Header/SetCookieSetHeaderFilter.cls 2020-06-05 10:23:14 +0000
1
class OpenEdge.Net.HTTP.Filter.Header.SetCookieSetHeaderFilter 
2
implements OpenEdge.Net.HTTP.IHttpMessageWriter: 
3
    
4
	define public property Message as OpenEdge.Net.HTTP.IHttpMessage no-undo get.
5
	
6
    constructor public SetCookieSetHeaderFilter(input poMessage as OpenEdge.Net.HTTP.IHttpMessage):
7
    end constructor.
8

  
9
	method public void Open():	  
10
	end method.
11

  
12
	method public void Write( input poData as Progress.Lang.Object):
13
	end method.
14
	
15
	method public void Write( input-output pcData as longchar ):
16
	end method.
17

  
18
    method public void Write( input-output pcData as character ):
19
    end method.
20

  
21
    method public void Write( input phData as handle ):
22
    end method.
23

  
24
	method public void Write( input pmData as memptr ):
25
	end method.
26

  
27
	method public void Flush():
28
	end method.
29
	
30
	method public void Close(  ):
31
	end method.
32

  
33
end class.
oo4gl/OpenEdge/Net/HTTP/Filter/Header/TransferEncodingSetHeaderFilter.cls 2020-06-05 10:23:14 +0000
1
class OpenEdge.Net.HTTP.Filter.Header.TransferEncodingSetHeaderFilter 
2
implements OpenEdge.Net.HTTP.IHttpMessageWriter: 
3

  
4
	define public property Message as OpenEdge.Net.HTTP.IHttpMessage no-undo get.
5

  
6
    constructor public TransferEncodingSetHeaderFilter(input poMessage as OpenEdge.Net.HTTP.IHttpMessage):
7
    end constructor.
8

  
9
	method public void Open():
10
	end method.
11
	
12
	method public void Write( input poData as Progress.Lang.Object):
13
	end method.
14

  
15
	method public void Write( input-output pcData as longchar ):
16
	end method.
17

  
18
    method public void Write( input-output pcData as character):
19
    end method.
20

  
21
    method public void Write(input phData as handle):    
22
    end method.
23

  
24
	method public void Write( input pmData as memptr ):
25
	end method.
26

  
27
	method public void Flush(  ):
28
	end method.
29

  
30
	method public void Close(  ):
31
	end method.
32

  
33
end class.
oo4gl/OpenEdge/Net/HTTP/Filter/Payload/ClientSocketResponseWriter.cls 2020-06-05 10:23:14 +0000
1
class OpenEdge.Net.HTTP.Filter.Payload.ClientSocketResponseWriter
2
implements OpenEdge.Net.HTTP.IHttpMessageWriter:
3

  
4
    define protected property MessageBody as OpenEdge.Core.ByteBucket no-undo get.
5

  
6
    define protected property Response as OpenEdge.Net.HTTP.IHttpResponse no-undo get.
7

  
8
    define protected property Request as OpenEdge.Net.HTTP.IHttpRequest no-undo get.
9

  
10
    define public property Message as OpenEdge.Net.HTTP.IHttpMessage no-undo get.
11
    
12
    constructor public ClientSocketResponseWriter(input poMessage as OpenEdge.Net.HTTP.IHttpResponse,
13
                                                  input poMessageBody as OpenEdge.Core.ByteBucket):
14
    end method.
15
    
16
    method public void Close():
17
    end method.
18

  
19
    method public void Open():
20
    end method.
21

  
22
    method public void Write(input poData as Progress.Lang.Object):  
23
    end.
24
 
25
    method protected void Write(input poRequest as OpenEdge.Net.HTTP.IHttpRequest):
26
    end method.
27
 
28
    method protected void Write(input poSocketArgs as OpenEdge.Net.ServerConnection.SocketReadEventArgs):
29
    end method.
30

  
31
    method public void Write(input-output pcData as longchar):
32
    end method.
33

  
34
    method public void Write(input phData as handle):    
35
    end method.
36

  
37
    method public void Write(input-output pcData as character):    
38
    end method.    
39

  
40
    method public void Write(input pmData as memptr):              
41
    end method.
42

  
43
    method public void Flush():
44
    end method.
45
    
46
end class.
oo4gl/OpenEdge/Net/HTTP/Filter/Payload/ConnectRequestFilter.cls 2020-06-05 10:23:14 +0000
1
class OpenEdge.Net.HTTP.Filter.Payload.ConnectRequestFilter 
2
inherits OpenEdge.Net.HTTP.Filter.Payload.MessageWriter:
3

  
4
    constructor public ConnectRequestFilter():
5
    end constructor.
6

  
7
    method override public int64 Write(input pData as Progress.Lang.Object):
8
    end method.
9
    
10
end class.
oo4gl/OpenEdge/Net/HTTP/Filter/Payload/DefaultRequestFilter.cls 2020-06-05 10:23:14 +0000
1
class OpenEdge.Net.HTTP.Filter.Payload.DefaultRequestFilter 
2
inherits OpenEdge.Net.HTTP.Filter.Payload.MessageWriter:
3

  
4
    constructor public DefaultRequestFilter():
5
    end constructor.    
6
    
7
    method override public int64 Write(input poData as Progress.Lang.Object):
8
    end method.    
9

  
10
    method protected void WriteMessage(input poRequest as OpenEdge.Net.HTTP.IHttpRequest):
11
    end method.
12

  
13
    method protected OpenEdge.Core.ByteBucket ExtractEntity(input poRequest as OpenEdge.Net.HTTP.IHttpRequest):
14
    end method.
15

  
16
    method protected void WriteRequestLine(input poRequest as OpenEdge.Net.HTTP.IHttpRequest):
17
    end method.
18

  
19
    method protected void WriteHeaders(input poRequest as OpenEdge.Net.HTTP.IHttpRequest):
20
    end method.
21
    
22
end class.
oo4gl/OpenEdge/Net/HTTP/Filter/Payload/JsonBodyWriter.cls 2020-06-05 10:23:14 +0000
17 17
    
18 18
    method override public int64 Write(input phData as handle):        
19 19
    end.
20
    
21
    method public int64 WriteHandle(input phData as handle):
22
    end.
23
    
20 24
end.
oo4gl/OpenEdge/Net/HTTP/Filter/Payload/JsonEntityWriter.cls 2020-06-05 10:23:14 +0000
13 13
    method override public int64 Write(input poData as Progress.Lang.Object):
14 14
    end method.
15 15
    
16
    method override public int64 Write(input phData as handle):
17
    end.
18
    
16 19
    method override public int64 Write(input pcData as longchar):
17 20
    end method.
18 21

  
......
20 23
    end method.
21 24
    
22 25
    method override public int64 Write(input pcData as character):
23
    end method.    
26
    end method.   
27
    
28
    method public int64 WriteHandle(input phData as handle):
29
    end. 
24 30
    
25 31
end class.
oo4gl/OpenEdge/Net/HTTP/Filter/Payload/MultipartBodyWriter.cls 2020-06-05 10:23:14 +0000
13 13
    method override public int64 Write(input pData as Progress.Lang.Object):
14 14
    end.
15 15
    
16
    method protected int64 Write(input pData as OpenEdge.Net.MultipartEntity):
17
    end.
18
    
16 19
end.
oo4gl/OpenEdge/Net/HTTP/Filter/Payload/MultipartEntityWriter.cls 2020-06-05 10:23:14 +0000
13 13
    method override public int64 Write(input pmData as memptr):
14 14
    end.
15 15
    
16
    method protected int64 Write(input pData as OpenEdge.Net.MessagePart):
17
    end.
18
        
16 19
end.
oo4gl/OpenEdge/Net/HTTP/Filter/Payload/MultipartFormBodyWriter.cls 2020-06-05 10:23:14 +0000
1
class OpenEdge.Net.HTTP.Filter.Payload.MultipartFormBodyWriter 
2
inherits OpenEdge.Net.HTTP.Filter.Payload.MessageWriter
3
implements OpenEdge.Net.ISupportMultipartEntity, OpenEdge.Core.ISupportEncoding:
4
    
5
    define public property Boundary as character no-undo get. set. 
6
    
7
    define public property Encoding as character no-undo get. set.
8

  
9
    constructor public MultipartFormBodyWriter():
10
    end constructor.
11
    
12
    method override public void Open():
13
    end method.
14
    
15
    method protected int64 Write(input pData as OpenEdge.Net.MultipartEntity):
16
    end method.
17
    
18
    method override public int64 Write(input pData as Progress.Lang.Object):
19
    end method.
20

  
21
    method protected int64 Write(input pData as OpenEdge.Core.Collections.IMap):
22
    end method.
23

  
24
    method protected void WriteField(input pKey as Progress.Lang.Object,
25
                                     input pValue as Progress.Lang.Object):
26
    end method.
27
    
28
end class.
oo4gl/OpenEdge/Net/HTTP/Filter/Payload/MultipartFormEntityWriter.cls 2020-06-05 10:23:14 +0000
1
class OpenEdge.Net.HTTP.Filter.Payload.MultipartFormEntityWriter
2
inherits OpenEdge.Net.HTTP.Filter.Payload.MultipartEntityWriter:
3

  
4
    constructor public MultipartFormEntityWriter():
5
    end constructor.
6

  
7
    method override public int64 Write(input pData as memptr):
8
    end method.
9
    
10
end class.
oo4gl/OpenEdge/Net/HTTP/Filter/Payload/MultipartFormSimpleEntityWriter.cls 2020-06-05 10:23:14 +0000
1
class OpenEdge.Net.HTTP.Filter.Payload.MultipartFormSimpleEntityWriter 
2
inherits OpenEdge.Net.HTTP.Filter.Payload.MultipartEntityWriter:
3
    
4
    constructor public MultipartFormSimpleEntityWriter():
5
    end constructor.
6

  
7
    method override public int64 Write(input pData as memptr):
8
    end method.
9
    
10
end class.
oo4gl/OpenEdge/Net/HTTP/Filter/Payload/StringEntityWriter.cls 2020-06-05 10:23:14 +0000
15 15

  
16 16
    method override public int64 Write(input poData as Progress.Lang.Object):
17 17
    end.
18
    
19
    method override public int64 Write(input pcData as character):
20
    end.
21
    
18 22
end class.
oo4gl/OpenEdge/Net/HTTP/Filter/Payload/XmlEntityWriter.cls 2020-06-05 10:23:14 +0000
1 1
class OpenEdge.Net.HTTP.Filter.Payload.XmlEntityWriter 
2 2
inherits OpenEdge.Net.HTTP.Filter.Payload.MessageWriter: 
3 3

  
4
constructor public XmlEntityWriter():
5

  
6 4
    constructor public XmlEntityWriter():
7 5
    end.
8 6
    
oo4gl/OpenEdge/Net/HTTP/Filter/Status/AuthorizationStatusFilter.cls 2020-06-05 10:23:14 +0000
1
class OpenEdge.Net.HTTP.Filter.Status.AuthorizationStatusFilter
2
implements OpenEdge.Net.HTTP.IHttpMessageWriter:
3

  
4
    define public property Message as OpenEdge.Net.HTTP.IHttpMessage no-undo get.
5
    
6
    constructor public AuthorizationStatusFilter(input poMessage as OpenEdge.Net.HTTP.IHttpRequest):
7
    end constructor.
8
    
9
    method public void Close():
10
    end method.
11
    
12
    method public void Flush():
13
    end method.
14
    
15
    method public void Open():
16
    end method.
17

  
18
    method public void Write(input-output pcData as longchar):
19
    end method.
20

  
21
    method public void Write(input pmData as memptr):
22
    end method.
23

  
24
    method public void Write(input poData as Progress.Lang.Object):
25
    end method.
26

  
27
    method public void Write(input phData as handle):    
28
    end method.
29
    
30
    method public void Write(input-output pcData as character):    
31
    end method.    
32

  
33
end class.
oo4gl/OpenEdge/Net/HTTP/Filter/Status/RedirectStatusFilter.cls 2020-06-05 10:23:14 +0000
1
class OpenEdge.Net.HTTP.Filter.Status.RedirectStatusFilter 
2
implements OpenEdge.Net.HTTP.IHttpMessageWriter, OpenEdge.Logging.ISupportLogging:
3
     
4
    define public property Logger as OpenEdge.Logging.ILogWriter no-undo get. set.
5

  
6
    define public property Message as OpenEdge.Net.HTTP.IHttpMessage no-undo get.
7
    
8
    constructor public RedirectStatusFilter(input poMessage as OpenEdge.Net.HTTP.IHttpRequest):
9
    end constructor.
10

  
11
    method public void Close():
12
    end method.
13
    
14
    method public void Flush():
15
    end method.
16

  
17
    method public void Open():
18
    end method.
19

  
20
    method public void Write(input phData as handle):    
21
    end method.
22

  
23
    method public void Write(input-output pcData as character):   
24
    end method.    
25

  
26
    method public void Write(input-output pcData as longchar):
27
    end method.
28

  
29
    method public void Write(input pmData as memptr):
30
    end method.
31

  
32
    method public void Write(input poData as Progress.Lang.Object):
33
    end method.
34
    
35
end class.
oo4gl/OpenEdge/Net/HTTP/Filter/Writer/AuthenticationRequestWriterBuilder.cls 2020-06-05 10:23:14 +0000
1 1
class OpenEdge.Net.HTTP.Filter.Writer.AuthenticationRequestWriterBuilder:
2
    define static public property Registry as OpenEdge.Net.HTTP.BuilderRegistry no-undo private set.
2
    define static public property Registry as OpenEdge.Net.HTTP.BuilderRegistry no-undo get.
3 3
    
4 4
    method static private void InitializeRegistry(input poRegistry as OpenEdge.Net.HTTP.BuilderRegistry):    
5 5
    end.
6 6
    
7
    method static public IHttpMessageWriter Build(input poRequest as OpenEdge.Net.HTTP.IAuthenticatedRequest):
7
    method static public OpenEdge.Net.HTTP.IHttpMessageWriter Build(input poRequest as OpenEdge.Net.HTTP.IAuthenticatedRequest):
8 8
    end.
9 9
    
10
    method static public IHttpMessageWriter Build(input poRequest  as OpenEdge.Net.HTTP.IAuthenticatedRequest,
10
    method static public OpenEdge.Net.HTTP.IHttpMessageWriter Build(input poRequest  as OpenEdge.Net.HTTP.IAuthenticatedRequest,
11 11
                                                  input poListener as OpenEdge.Net.HTTP.Filter.Auth.IAuthFilterEventHandler extent):
12 12
    end.
13 13
end.
oo4gl/OpenEdge/Net/HTTP/Filter/Writer/BodyWriterBuilder.cls 2020-06-05 10:23:14 +0000
1 1
class OpenEdge.Net.HTTP.Filter.Writer.BodyWriterBuilder:
2
    method static public OpenEdge.Net.HTTP.Filter.Writer.MessageWriterBuilder Build(input poPart as OpenEdge.Net.HTTP.MessagePart):
2
    method static public OpenEdge.Net.HTTP.Filter.Writer.MessageWriterBuilder Build(input poPart as OpenEdge.Net.MessagePart):
3 3
    end.
4 4
        
5 5
    method static public OpenEdge.Net.HTTP.Filter.Writer.MessageWriterBuilder Build(input poMessage as OpenEdge.Net.HTTP.IHttpMessage):
oo4gl/OpenEdge/Net/HTTP/Filter/Writer/BodyWriterRegistry.cls 2020-06-05 10:23:14 +0000
1 1
class OpenEdge.Net.HTTP.Filter.Writer.BodyWriterRegistry: 
2
    define static public property Registry as OpenEdge.Net.HTTP.BuilderRegistry no-undo private set.
2
    define static public property Registry as OpenEdge.Net.HTTP.BuilderRegistry no-undo get.
3 3

  
4 4
    method static private void InitializeRegistry(input poRegistry as OpenEdge.Net.HTTP.BuilderRegistry):
5 5
    end.
oo4gl/OpenEdge/Net/HTTP/Filter/Writer/DefaultMessageWriterBuilder.cls 2020-06-05 10:23:14 +0000
1
class OpenEdge.Net.HTTP.Filter.Writer.DefaultMessageWriterBuilder 
2
inherits OpenEdge.Net.HTTP.Filter.Writer.MessageWriterBuilder:
3
    
4
    define override public property Writer as OpenEdge.Net.HTTP.Filter.Payload.MessageWriter no-undo get.
5
    
6
    constructor public DefaultMessageWriterBuilder(input pcContentType as character,
7
                                                   input poRegistry as OpenEdge.Net.HTTP.BuilderRegistry):
8
    end constructor.
9
    
10
    method private MessageWriter NewMessageWriter():           
11
    end method.    
12
    
13
end class.
oo4gl/OpenEdge/Net/HTTP/Filter/Writer/EntityWriterRegistry.cls 2020-06-05 10:23:14 +0000
1 1
class OpenEdge.Net.HTTP.Filter.Writer.EntityWriterRegistry inherits OpenEdge.Net.HTTP.BuilderRegistry:
2
    define static public property Registry as OpenEdge.Net.HTTP.BuilderRegistry no-undo private set.
2
    define static public property Registry as OpenEdge.Net.HTTP.BuilderRegistry no-undo get.
3 3
     
4 4
    method static private void InitializeRegistry(input poRegistry as OpenEdge.Net.HTTP.BuilderRegistry):
5 5
    end.
oo4gl/OpenEdge/Net/HTTP/Filter/Writer/MessageWriterBuilder.cls 2020-06-05 10:23:14 +0000
1
class OpenEdge.Net.HTTP.Filter.Writer.MessageWriterBuilder inherits OpenEdge.Net.HTTP.ConfigBuilder:
1
class OpenEdge.Net.HTTP.Filter.Writer.MessageWriterBuilder 
2
inherits OpenEdge.Net.HTTP.ConfigBuilder
3
abstract:
4
    
2 5
    define abstract public property Writer as OpenEdge.Net.HTTP.Filter.Payload.MessageWriter no-undo get. 
3
    define static public property Registry as OpenEdge.Net.HTTP.BuilderRegistry no-undo get. private set.
6
    define static public property Registry as OpenEdge.Net.HTTP.BuilderRegistry no-undo get.
7
    define protected property ContentType as character no-undo get.
8
    define protected property WriterRegistry as OpenEdge.Net.HTTP.BuilderRegistry no-undo get.
4 9
        
5 10
    method static public OpenEdge.Net.HTTP.Filter.Writer.MessageWriterBuilder Build(input poMessage as OpenEdge.Net.HTTP.IHttpMessage,
6 11
                                                    input poRegistry as OpenEdge.Net.HTTP.BuilderRegistry):
7 12
    end.
8 13

  
9 14
    method static public OpenEdge.Net.HTTP.Filter.Writer.MessageWriterBuilder Build(input pcContentType as character,
10
                                                    input poRegistry as BuilderRegistry):
15
                                                    input poRegistry as OpenEdge.Net.HTTP.BuilderRegistry):
11 16
    end.
12 17
    
13
    constructor public OpenEdge.Net.HTTP.Filter.Writer.MessageWriterBuilder(input pcContentType as character, 
14
                                            input poRegistry as BuilderRegistry):
18
    constructor public MessageWriterBuilder(input pcContentType as character, 
19
                                            input poRegistry as OpenEdge.Net.HTTP.BuilderRegistry):
15 20
    end.
16 21
    
17 22
    method public OpenEdge.Net.HTTP.Filter.Writer.MessageWriterBuilder WriteTo(input poEntity as Progress.Lang.Object):
......
23 28

  
24 29
    method public OpenEdge.Net.HTTP.Filter.Writer.MessageWriterBuilder Option(input pcName as character,
25 30
                                                      input poValue as Progress.Lang.Object):
26
        
27 31
    end.                                                     
28 32

  
29 33
    method public OpenEdge.Net.HTTP.Filter.Writer.MessageWriterBuilder Option(input pcName as character,
......
31 35
    end.                                                     
32 36

  
33 37
    method public OpenEdge.Net.HTTP.Filter.Writer.MessageWriterBuilder Option(input pcName as character,
34
                                                      input pdValue as decimal):
35
        
38
                                                      input pdValue as decimal): 
36 39
    end.                                                     
37 40

  
38 41
    method public OpenEdge.Net.HTTP.Filter.Writer.MessageWriterBuilder Option(input pcName as character,
39
                                                      input plValue as logical):
40
        
42
                                                      input plValue as logical):    
41 43
    end.
42 44
    
43 45
    method protected class Progress.Lang.Class GetWriter(input pcContentType as character):
oo4gl/OpenEdge/Net/HTTP/Filter/Writer/RequestWriterBuilder.cls 2020-06-05 10:23:14 +0000
1
class OpenEdge.Net.HTTP.Filter.Writer.RequestWriterBuilder 
2
inherits OpenEdge.Net.HTTP.ConfigBuilder:
3

  
4
    define public property Request as OpenEdge.Net.HTTP.IHttpRequest no-undo get.
5
    
6
    define public property Writer as OpenEdge.Net.HTTP.Filter.Payload.MessageWriter no-undo get.
7
    
8
    define static public property Registry as OpenEdge.Net.HTTP.BuilderRegistry no-undo get.
9

  
10
    method static private void InitializeRegistry(input poRegistry as OpenEdge.Net.HTTP.BuilderRegistry):
11
    end method.
12
    
13
    method static public OpenEdge.Net.HTTP.Filter.Writer.RequestWriterBuilder Build(input pRequest as OpenEdge.Net.HTTP.IHttpRequest):
14
    end method.
15

  
16
    method static public OpenEdge.Net.HTTP.Filter.Writer.RequestWriterBuilder Build():
17
    end method.
18
    
19
    constructor public RequestWriterBuilder ():
20
    end constructor.
21

  
22
    constructor public RequestWriterBuilder (input pRequest as OpenEdge.Net.HTTP.IHttpRequest):
23
    end constructor.
24

  
25
    method public OpenEdge.Net.HTTP.Filter.Writer.RequestWriterBuilder Request(input poMessage as OpenEdge.Net.HTTP.IHttpRequest):
26
    end method.    
27

  
28
    method public OpenEdge.Net.HTTP.Filter.Writer.RequestWriterBuilder WriteTo(input poMessageBody as OpenEdge.Core.ByteBucket):
29
    end method.    
30
    
31
    method protected OpenEdge.Net.HTTP.Filter.Payload.MessageWriter NewRequestWriter():
32
    end method.
33

  
34
    method protected class Progress.Lang.Class GetWriter(input pRequest as OpenEdge.Net.HTTP.IHttpRequest,
35
                                                         input pRegistry as OpenEdge.Net.HTTP.BuilderRegistry):
36
    end method.
37
    
38
end class.
oo4gl/OpenEdge/Net/HTTP/Filter/Writer/SetHeaderMessageWriterBuilder.cls 2020-06-05 10:23:14 +0000
1 1
class OpenEdge.Net.HTTP.Filter.Writer.SetHeaderMessageWriterBuilder:
2
    define static public property Registry as OpenEdge.Net.HTTP.BuilderRegistry no-undo private set.
2
    define static public property Registry as OpenEdge.Net.HTTP.BuilderRegistry no-undo get.
3 3
    
4 4
    method static private void InitializeRegistry(input poRegistry as OpenEdge.Net.HTTP.BuilderRegistry):
5 5
    end.
oo4gl/OpenEdge/Net/HTTP/Filter/Writer/StatusCodeWriterBuilder.cls 2020-06-05 10:23:14 +0000
1 1
class OpenEdge.Net.HTTP.Filter.Writer.StatusCodeWriterBuilder:
2
    define static public property Registry as OpenEdge.Net.HTTP.BuilderRegistry no-undo private set.
2
    define static public property Registry as OpenEdge.Net.HTTP.BuilderRegistry no-undo get.
3 3
    
4 4
    method static private void InitializeRegistry(input poRegistry as OpenEdge.Net.HTTP.BuilderRegistry):
5 5
    end.
oo4gl/OpenEdge/Net/HTTP/Filter/Writer/VoidMessageWriterBuilder.cls 2020-06-05 10:23:14 +0000
1
class OpenEdge.Net.HTTP.Filter.Writer.VoidMessageWriterBuilder 
2
inherits OpenEdge.Net.HTTP.Filter.Writer.MessageWriterBuilder:
3
    
4
    define override public property Writer as OpenEdge.Net.HTTP.Filter.Payload.MessageWriter no-undo get. 
5
    
6
    constructor public VoidMessageWriterBuilder(input pcContentType as character,
7
                                                input poRegistry as OpenEdge.Net.HTTP.BuilderRegistry):
8
    end constructor.
9
    
10
end class.
oo4gl/OpenEdge/Net/HTTP/HttpClient.cls 2020-06-05 10:23:14 +0000
3 3
           OpenEdge.Core.ISupportInitialize, 
4 4
           OpenEdge.Logging.ISupportLogging:
5 5

  
6
  method public void AddUserAgent (input p1 as OpenEdge.Net.HTTP.IHttpRequest).
6
  method protected void AddUserAgent (input p1 as OpenEdge.Net.HTTP.IHttpRequest).
7 7
  end.
8 8
  
9 9
  method public void Destroy ().
......
11 11
  
12 12
  method public OpenEdge.Net.HTTP.IHttpResponse Execute(p1 as OpenEdge.Net.HTTP.IHttpRequest).
13 13
  end.
14
  
15
  method public void Execute(input p1 as OpenEdge.Net.HTTP.IHttpRequest, input p2 as OpenEdge.Net.HTTP.IHttpResponse):
16
  end.                                 
14 17

  
15 18
  method public void Initialize ().
16 19
  end.
......
18 21
  method static public OpenEdge.Net.HTTP.HttpClient Instance ().
19 22
  end.
20 23

  
21
  constructor public HttpClient (input p1 as OpenEdge.Net.HTTP.IHttpClientLibrary).
24
  constructor public HttpClient(input p1 as character,
25
                                  input p2 as character,                                  
26
                                  input p3 as OpenEdge.Net.HTTP.IHttpClientLibrary):
22 27
  end constructor.
28
  
29
  destructor HttpClient():
30
  end.
31
  
32
  method protected logical ProcessStatusAction(input poRequest  as OpenEdge.Net.HTTP.IHttpRequest,
33
                                                 input poResponse as OpenEdge.Net.HTTP.IHttpResponse):
34
  end.
23 35

  
24
  define public property ClientName as character get. set.
25
  define public property ClientVersion as character get. set.
26
  define public property Logger as OpenEdge.Logging.ILogWriter get. set.
27
  define public property Options as OpenEdge.Net.HTTP.ClientOptions get. set.
36
  define public property ClientName as character no-undo get.
37
  define public property ClientVersion as character no-undo get.
38
  define public property Logger as OpenEdge.Logging.ILogWriter no-undo get. set.
39
  define public property Options as OpenEdge.Net.HTTP.ClientOptions no-undo get.
28 40

  
29 41
end.
oo4gl/OpenEdge/Net/HTTP/HttpClientDecorator.cls 2020-06-05 10:23:14 +0000
1
class OpenEdge.Net.HTTP.HttpClientDecorator 
2
abstract 
3
implements OpenEdge.Net.HTTP.IHttpClient:
4

  
5
    define protected property DecoratedHttpClient as OpenEdge.Net.HTTP.IHttpClient no-undo get.
6

  
7
	define public property ClientName as character no-undo get.
8

  
9
	define public property ClientVersion as character no-undo get.
10

  
11
	define public property Options as OpenEdge.Net.HTTP.ClientOptions no-undo get. 
12
	
13
	constructor public HttpClientDecorator(input poHttpClient as OpenEdge.Net.HTTP.IHttpClient):
14
    end constructor.
15

  
16
    method  public OpenEdge.Net.HTTP.IHttpResponse Execute(input poRequest as OpenEdge.Net.HTTP.IHttpRequest):
17
    end method.
18

  
19
	method public void Execute( input poRequest as OpenEdge.Net.HTTP.IHttpRequest, input poResponse as OpenEdge.Net.HTTP.IHttpResponse):
20
	end method.
21
	
22
end class.
oo4gl/OpenEdge/Net/HTTP/HttpHeader.cls 2020-06-05 10:23:14 +0000
1 1
class OpenEdge.Net.HTTP.HttpHeader:
2
  define public property Name as character get.
3

  
4
  define public property NullHeader as OpenEdge.Net.HTTP.HttpHeader get.
5

  
6
  define public property ParamDelimiter as character get.
2
  define public property Name as character get. protected set.
3

  
4
  define static public property NullHeader as OpenEdge.Net.HTTP.HttpHeader get. set.
5

  
6
  define public property ParamDelimiter as character get. set.
7 7

  
8 8
  define public property Value as character get. set.
9

  
10
  constructor public HttpHeader():
9
  
10
  destructor HttpHeader():
11
  end.
12
  
13
  constructor private HttpHeader():
11 14
  end.
12 15

  
13 16
  constructor public HttpHeader(p1 as character):
oo4gl/OpenEdge/Net/HTTP/HttpHeaderBuilder.cls 2020-06-05 10:23:14 +0000
1 1
class OpenEdge.Net.HTTP.HttpHeaderBuilder
2 2
inherits OpenEdge.Net.HTTP.ConfigBuilder abstract:
3
  define public static property Registry as openedge.net.http.builderregistry no-undo get.
3
    
4
  define public static property Registry as OpenEdge.Net.HTTP.BuilderRegistry no-undo get.
4 5

  
5
  define abstract public property Header as openedge.net.http.httpheader get.
6
  define abstract public property Header as OpenEdge.Net.HTTP.HttpHeader get.
6 7

  
7 8
  define protected property HeaderName as character no-undo get.
8 9

  
......
10 11
  constructor protected HttpHeaderBuilder(p1 as character):
11 12
  end.
12 13

  
13
  method public static openedge.net.http.httpheaderbuilder Build(p1 as character):
14
  end.
15

  
16
  method public openedge.net.http.httpheaderbuilder ParametersDelimitedBy(p1 as character):
17
  end.
18

  
19
  method public openedge.net.http.httpheaderbuilder Value(p1 as character):
20
  end.
21

  
22
  method public openedge.net.http.httpheaderbuilder AddParameter(input pName as character,
14
  method public static OpenEdge.Net.HTTP.HttpHeaderBuilder Build(p1 as character):
15
  end.
16

  
17
  method public OpenEdge.Net.HTTP.HttpHeaderBuilder ParametersDelimitedBy(p1 as character):
18
  end.
19

  
20
  method public OpenEdge.Net.HTTP.HttpHeaderBuilder Value(p1 as character):
21
  end.
22

  
23
  method public OpenEdge.Net.HTTP.HttpHeaderBuilder AddParameter(input pName as character,
23 24
                                                 input pValue as character):
24 25
  end.
25 26
end.
oo4gl/OpenEdge/Net/HTTP/HttpHeaderCollection.cls 2020-06-05 10:23:14 +0000
1
class OpenEdge.Net.HTTP.HttpHeaderCollection:
1
class OpenEdge.Net.HTTP.HttpHeaderCollection serializable:
2
    
2 3
  constructor public HttpHeaderCollection():
3 4
  end.
5
  
6
  define public property Size as integer no-undo get.
7
  
8
  destructor HttpHeaderCollection():
9
  end.
4 10

  
5 11
  method public void Clear():
6 12
  end.
7 13

  
8
  method public void DeleteHeaderRecord(p1 as character):
9
  end.
10

  
11
  method public logical FindHeaderRecord(p1 as character):
12
  end.
13

  
14
  method public logical FindHeaderRecord(p1 as handle, p2 as character):
14
  method private void DeleteHeaderRecord(p1 as character):
15
  end.
16

  
17
  method private logical FindHeaderRecord(input-output p1 as handle, p2 as character):
15 18
  end.
16 19

  
17 20
  method public OpenEdge.Net.HTTP.HttpHeader Get(p1 as character):
......
35 38
  method public void Remove(p1 as character):
36 39
  end.
37 40

  
38
  method public void UpdateHeaderRecord(p1 as OpenEdge.Net.HTTP.HttpHeader):
41
  method private void UpdateHeaderRecord(p1 as OpenEdge.Net.HTTP.HttpHeader):
39 42
  end.
40 43

  
41 44
end.
oo4gl/OpenEdge/Net/HTTP/HttpMessage.cls 2020-06-05 10:23:14 +0000
2 2
implements OpenEdge.Net.HTTP.IHttpMessage,
3 3
           OpenEdge.Core.ISupportInitialize,
4 4
           OpenEdge.Core.IAdaptable:
5
  define public property CharacterEncoding as character get. set.
6

  
7
  define public property ContentLength as integer get. set.
8

  
9
  define public property ContentMD5 as raw get. set.
10

  
11
  define public property ContentType as character get. set.
12

  
13
  define public property Cookies as OpenEdge.Core.Collections.IStringKeyedMap get. set.
14

  
15
  define public property Entity as Progress.Lang.Object get. set.
16

  
17
  define public property Headers as OpenEdge.Net.HTTP.HttpHeaderCollection get. set.
18

  
19
  define public property TransferEncoding as character get. set.
20

  
21
  define public property Version as character get. set.
22

  
23
  constructor public HttpMessage():
5
               
... This diff was truncated because it exceeds the maximum size that can be displayed.