skeleton.patch
| oo4gl/OpenEdge/Core/Collections/AbstractTTCollection.cls 2020-05-20 11:34:22 +0000 | ||
|---|---|---|
| 1 |
class OpenEdge.Core.Collections.AbstractTTCollection abstract serializable |
|
| 2 |
implements OpenEdge.Core.Collections.ICollection: |
|
| 3 |
|
|
| 4 |
define public property Size as integer no-undo get. |
|
| 5 |
|
|
| 6 |
constructor public AbstractTTCollection(): |
|
| 7 |
end constructor. |
|
| 8 |
|
|
| 9 |
constructor protected AbstractTTCollection (p1 as OpenEdge.Core.Collections.ICollection, p2 as handle, p3 as char): |
|
| 10 |
end constructor. |
|
| 11 |
|
|
| 12 |
constructor protected AbstractTTCollection ( p1 as handle, p2 as char ): |
|
| 13 |
end constructor. |
|
| 14 | ||
| 15 |
constructor protected AbstractTTCollection (p1 as handle, p2 as handle ): |
|
| 16 |
end constructor. |
|
| 17 |
|
|
| 18 |
destructor AbstractTTCollection(): |
|
| 19 |
end destructor. |
|
| 20 |
|
|
| 21 |
method public logical Add( p1 as Progress.Lang.Object): |
|
| 22 |
end method. |
|
| 23 |
|
|
| 24 |
method public logical AddArray(p1 as Progress.Lang.Object extent): |
|
| 25 |
end method. |
|
| 26 |
|
|
| 27 |
method public logical AddAll(p1 as OpenEdge.Core.Collections.ICollection): |
|
| 28 |
end method. |
|
| 29 |
|
|
| 30 |
method public void Clear( ): |
|
| 31 |
end method. |
|
| 32 |
|
|
| 33 |
method public logical Contains( p1 as Progress.Lang.Object ): |
|
| 34 |
end method. |
|
| 35 |
|
|
| 36 |
method public logical ContainsAll(input p1 as OpenEdge.Core.Collections.ICollection): |
|
| 37 |
end method. |
|
| 38 |
|
|
| 39 |
method public OpenEdge.Core.Collections.IIterator Iterator( ): |
|
| 40 |
end method. |
|
| 41 |
|
|
| 42 |
method public logical IsEmpty( ): |
|
| 43 |
end method. |
|
| 44 | ||
| 45 |
method public void ToTable( output table-handle p1 ): |
|
| 46 |
end method. |
|
| 47 |
|
|
| 48 |
method public logical Remove( p1 as Progress.Lang.Object ): |
|
| 49 |
end method. |
|
| 50 |
|
|
| 51 |
method public logical RemoveAll(p1 as OpenEdge.Core.Collections.ICollection): |
|
| 52 |
end method. |
|
| 53 |
|
|
| 54 |
method public logical RetainAll(p1 as OpenEdge.Core.Collections.ICollection): |
|
| 55 |
end method. |
|
| 56 |
|
|
| 57 |
method public Progress.Lang.Object extent ToArray(): |
|
| 58 |
end method. |
|
| 59 |
|
|
| 60 |
method abstract protected void FindBufferUseObject (p1 as Progress.Lang.Object). |
|
| 61 |
|
|
| 62 |
method override public Progress.Lang.Object Clone(): |
|
| 63 |
end method. |
|
| 64 |
|
|
| 65 |
method protected void CloneElements(input p1 as OpenEdge.Core.Collections.ICollection): |
|
| 66 |
end method. |
|
| 67 |
|
|
| 68 |
method protected void Resize(): |
|
| 69 |
end method. |
|
| 70 |
|
|
| 71 |
end class. |
|
| oo4gl/OpenEdge/Core/Collections/Array.cls 2020-05-04 11:21:05 +0000 | ||
|---|---|---|
| 32 | 32 |
method public void Clear(): |
| 33 | 33 |
end. |
| 34 | 34 | |
| 35 |
method public Progress.Lang.Object Clone(): |
|
| 35 |
method override public Progress.Lang.Object Clone():
|
|
| 36 | 36 |
end. |
| 37 | 37 | |
| 38 | 38 |
method protected void CloneElements(p1 as OpenEdge.Core.Collections.ICollection): |
| ... | ... | |
| 73 | 73 | |
| 74 | 74 |
method public void ToTable(output table-handle p1): |
| 75 | 75 |
end. |
| 76 |
end interface.
|
|
| 76 |
end class.
|
|
| oo4gl/OpenEdge/Core/Collections/ArrayIterator.cls 2020-05-20 11:34:22 +0000 | ||
|---|---|---|
| 1 |
class OpenEdge.Core.Collections.ArrayIterator implements OpenEdge.Core.Collections.IIterator: |
|
| 2 |
define protected property CurrentExtent as integer no-undo get. set. |
|
| 3 |
define protected property IteratedArray as OpenEdge.Core.Collections.Array no-undo get. set . |
|
| 4 |
|
|
| 5 |
constructor public ArrayIterator(input poIteratedArray as OpenEdge.Core.Collections.Array): |
|
| 6 |
end method. |
|
| 7 |
|
|
| 8 |
method public logical HasNext(): |
|
| 9 |
end method. |
|
| 10 |
|
|
| 11 |
method public Progress.Lang.Object Next(): |
|
| 12 |
end method. |
|
| 13 |
|
|
| 14 |
method public logical Remove(): |
|
| 15 |
end method. |
|
| 16 |
|
|
| 17 |
end class. |
|
| oo4gl/OpenEdge/Core/Collections/Collection.cls 2020-05-20 11:34:22 +0000 | ||
|---|---|---|
| 1 | ||
| 2 |
class OpenEdge.Core.Collections.Collection serializable inherits OpenEdge.Core.Collections.AbstractTTCollection: |
|
| 3 |
constructor public Collection(): |
|
| 4 |
end constructor. |
|
| 5 |
|
|
| 6 |
constructor public Collection (c as OpenEdge.Core.Collections.ICollection): |
|
| 7 |
end constructor. |
|
| 8 | ||
| 9 |
method public override logical Contains( checkObject as Progress.Lang.Object): |
|
| 10 |
end method. |
|
| 11 |
|
|
| 12 |
method protected override void FindBufferUseObject (obj as Progress.Lang.Object): |
|
| 13 |
end method. |
|
| 14 |
|
|
| 15 |
/* |
|
| 16 |
method protected void FindBufferUseObject(obj as Object, |
|
| 17 |
buffer pbCollection for ttCollection): |
|
| 18 |
end. |
|
| 19 |
*/ |
|
| 20 |
|
|
| 21 |
method public override logical Equals(o as Progress.Lang.Object): |
|
| 22 |
end method. |
|
| 23 |
|
|
| 24 |
end class. |
|
| oo4gl/OpenEdge/Core/Collections/EntrySet.cls 2020-05-20 11:34:22 +0000 | ||
|---|---|---|
| 1 |
class OpenEdge.Core.Collections.EntrySet serializable |
|
| 2 |
inherits OpenEdge.Core.Collections.MapBackedCollection |
|
| 3 |
implements OpenEdge.Core.Collections.ISet: |
|
| 4 | ||
| 5 |
constructor public EntrySet (p1 as OpenEdge.Core.Collections.IMap, p2 as handle, p3 as char): |
|
| 6 |
end constructor. |
|
| 7 |
|
|
| 8 |
method public override OpenEdge.Core.Collections.IIterator Iterator(): |
|
| 9 |
end method. |
|
| 10 |
|
|
| 11 |
method override public logical Contains( p1 as Progress.Lang.Object): |
|
| 12 |
end method. |
|
| 13 |
|
|
| 14 |
method override public logical ContainsAll(input p1 as OpenEdge.Core.Collections.ICollection): |
|
| 15 |
end method. |
|
| 16 |
|
|
| 17 |
method override public logical Remove(p1 as Progress.Lang.Object): |
|
| 18 |
end method. |
|
| 19 |
|
|
| 20 |
method override public logical RemoveAll(p1 as OpenEdge.Core.Collections.ICollection): |
|
| 21 |
end method. |
|
| 22 |
|
|
| 23 |
method override public logical RetainAll(input p1 as OpenEdge.Core.Collections.ICollection). |
|
| 24 |
end method. |
|
| 25 |
|
|
| 26 |
end class. |
|
| oo4gl/OpenEdge/Core/Collections/EntrySetIterator.cls 2020-05-20 11:34:22 +0000 | ||
|---|---|---|
| 1 |
class OpenEdge.Core.Collections.EntrySetIterator |
|
| 2 |
inherits OpenEdge.Core.Collections.Iterator: |
|
| 3 |
|
|
| 4 |
define protected property OwningMap as OpenEdge.Core.Collections.IMap no-undo get. set. |
|
| 5 |
|
|
| 6 |
constructor public EntrySetIterator (p1 as OpenEdge.Core.Collections.IMap, p2 as OpenEdge.Core.Collections.ICollection, p3 as handle, p4 as char): |
|
| 7 |
end constructor. |
|
| 8 |
|
|
| 9 |
method public override Progress.Lang.Object Next(): |
|
| 10 |
end method. |
|
| 11 |
|
|
| 12 |
end class. |
|
| oo4gl/OpenEdge/Core/Collections/ICollection.cls 2020-05-04 11:21:05 +0000 | ||
|---|---|---|
| 6 | 6 |
|
| 7 | 7 |
method public logical Add(input obj as Progress.Lang.Object). |
| 8 | 8 |
|
| 9 |
method public logical AddAll(input col as OpenEdge.Core.Collections.ICollection).
|
|
| 9 |
method public logical AddAll(input oCol as OpenEdge.Core.Collections.ICollection).
|
|
| 10 | 10 |
|
| 11 | 11 |
method public logical AddArray(input obj as Progress.Lang.Object extent). |
| 12 | 12 |
|
| ... | ... | |
| 14 | 14 |
|
| 15 | 15 |
method public logical Contains(input obj as Progress.Lang.Object). |
| 16 | 16 |
|
| 17 |
method public logical ContainsAll(input col as OpenEdge.Core.Collections.ICollection).
|
|
| 17 |
method public logical ContainsAll(input oCol as OpenEdge.Core.Collections.ICollection).
|
|
| 18 | 18 |
|
| 19 | 19 |
method public logical IsEmpty(). |
| 20 | 20 |
|
| 21 | 21 |
method public logical Remove(input obj as Progress.Lang.Object). |
| 22 | 22 |
|
| 23 |
method public logical RemoveAll(input col as OpenEdge.Core.Collections.ICollection).
|
|
| 23 |
method public logical RemoveAll(input oCol as OpenEdge.Core.Collections.ICollection).
|
|
| 24 | 24 |
|
| 25 |
method public logical RetainAll(input col as OpenEdge.Core.Collections.ICollection).
|
|
| 25 |
method public logical RetainAll(input oCol as OpenEdge.Core.Collections.ICollection).
|
|
| 26 | 26 |
|
| 27 | 27 |
method public Progress.Lang.Object extent ToArray(). |
| 28 | 28 |
|
| oo4gl/OpenEdge/Core/Collections/IMap.cls 2020-05-04 11:21:05 +0000 | ||
|---|---|---|
| 15 | 15 | |
| 16 | 16 |
method public void Clear(). |
| 17 | 17 |
|
| 18 |
method public logical ContainsAllKeys(input col as OpenEdge.Core.Collections.ICollection).
|
|
| 18 |
method public logical ContainsAllKeys(input oCol as OpenEdge.Core.Collections.ICollection).
|
|
| 19 | 19 |
|
| 20 |
method public logical ContainsAllValues(input col as OpenEdge.Core.Collections.ICollection).
|
|
| 20 |
method public logical ContainsAllValues(input oCol as OpenEdge.Core.Collections.ICollection).
|
|
| 21 | 21 |
|
| 22 | 22 |
method public logical ContainsKey(input obj as Progress.Lang.Object). |
| 23 | 23 |
|
| ... | ... | |
| 33 | 33 |
|
| 34 | 34 |
method public Progress.Lang.Object Remove(input obj as Progress.Lang.Object). |
| 35 | 35 |
|
| 36 |
method public void RemoveAll(input col as OpenEdge.Core.Collections.ICollection).
|
|
| 36 |
method public void RemoveAll(input oCol as OpenEdge.Core.Collections.ICollection).
|
|
| 37 | 37 |
|
| 38 | 38 |
end interface. |
| oo4gl/OpenEdge/Core/Collections/IMapEntry.cls 2020-05-04 11:21:05 +0000 | ||
|---|---|---|
| 1 |
|
|
| 2 |
interface OpenEdge.Core.Collections.IMapEntry: |
|
| 3 |
define property Key as Progress.Lang.Object no-undo get. |
|
| 4 |
define property Value as Progress.Lang.Object no-undo get. set. |
|
| 5 |
end interface. |
|
| oo4gl/OpenEdge/Core/Collections/Iterator.cls 2020-05-20 11:34:22 +0000 | ||
|---|---|---|
| 1 |
class OpenEdge.Core.Collections.Iterator use-widget-pool implements OpenEdge.Core.Collections.IIterator : |
|
| 2 | ||
| 3 |
define protected property OwnerCollection as OpenEdge.Core.Collections.ICollection no-undo get. set . |
|
| 4 |
define protected property QueryHandle as handle no-undo get. set . |
|
| 5 |
define protected property BufferHandle as handle no-undo get. set . |
|
| 6 |
define protected property ObjectFieldHandle as handle no-undo get. set . |
|
| 7 |
|
|
| 8 |
constructor public Iterator (p1 as OpenEdge.Core.Collections.ICollection, p2 as handle, p3 as char): |
|
| 9 |
end constructor. |
|
| 10 |
|
|
| 11 |
constructor public Iterator (p1 as OpenEdge.Core.Collections.ICollection, p2 as handle, p3 as char, p4 as char): |
|
| 12 |
end. |
|
| 13 |
|
|
| 14 |
constructor public Iterator (p1 as OpenEdge.Core.Collections.ICollection, p2 as handle, p3 as char, p4 as char, p5 as char): |
|
| 15 |
end constructor. |
|
| 16 |
|
|
| 17 |
method public logical HasNext( ): |
|
| 18 |
end method. |
|
| 19 | ||
| 20 |
method public Progress.Lang.Object Next( ): |
|
| 21 |
end method. |
|
| 22 |
|
|
| 23 |
method public logical Remove( ): |
|
| 24 |
end method. |
|
| 25 | ||
| 26 |
destructor public Iterator ( ): |
|
| 27 |
end destructor. |
|
| 28 | ||
| 29 |
end class. |
|
| oo4gl/OpenEdge/Core/Collections/KeySet.cls 2020-05-20 11:34:22 +0000 | ||
|---|---|---|
| 1 |
class OpenEdge.Core.Collections.KeySet serializable inherits OpenEdge.Core.Collections.MapBackedCollection |
|
| 2 |
implements OpenEdge.Core.Collections.ISet: |
|
| 3 |
|
|
| 4 |
constructor public KeySet (p1 as OpenEdge.Core.Collections.IMap, p2 as handle, p3 as char): |
|
| 5 |
end constructor. |
|
| 6 |
|
|
| 7 |
method public override logical Contains(p1 as Progress.Lang.Object): |
|
| 8 |
end method. |
|
| 9 |
|
|
| 10 |
method override public logical ContainsAll(p1 as OpenEdge.Core.Collections.ICollection): |
|
| 11 |
end method. |
|
| 12 |
|
|
| 13 |
method public override logical Equals(p1 as Progress.Lang.Object): |
|
| 14 |
end method. |
|
| 15 |
|
|
| 16 |
method public override logical Remove(p1 as Progress.Lang.Object ): |
|
| 17 |
end method. |
|
| 18 |
|
|
| 19 |
method public override logical RemoveAll(p1 as OpenEdge.Core.Collections.ICollection): |
|
| 20 |
end method. |
|
| 21 |
|
|
| 22 |
method public override logical RetainAll(p1 as OpenEdge.Core.Collections.ICollection): |
|
| 23 |
end method. |
|
| 24 |
|
|
| 25 |
end class. |
|
| oo4gl/OpenEdge/Core/Collections/Map.cls 2020-05-04 11:21:05 +0000 | ||
|---|---|---|
| 1 |
class OpenEdge.Core.Collections.Map serializable |
|
| 2 |
implements OpenEdge.Core.Collections.IMap: |
|
| 3 |
|
|
| 4 |
define public property Size as integer no-undo get. |
|
| 5 |
|
|
| 6 |
define public property Values as OpenEdge.Core.Collections.ICollection no-undo get. |
|
| 7 |
|
|
| 8 |
define public property KeySet as OpenEdge.Core.Collections.ISet no-undo get. |
|
| 9 |
|
|
| 10 |
define public property EntrySet as OpenEdge.Core.Collections.ISet no-undo get. |
|
| 11 |
|
|
| 12 |
method public void Clear(): |
|
| 13 |
end method. |
|
| 14 | ||
| 15 |
method public override logical Equals(o as Progress.Lang.Object): |
|
| 16 |
end method. |
|
| 17 |
|
|
| 18 |
method public logical IsEmpty( ): |
|
| 19 |
end method. |
|
| 20 | ||
| 21 |
method public logical ContainsKey(input poKey as Progress.Lang.Object): |
|
| 22 |
end method. |
|
| 23 |
|
|
| 24 |
method public logical ContainsAllKeys(input poKeys as OpenEdge.Core.Collections.ICollection): |
|
| 25 |
end method. |
|
| 26 |
|
|
| 27 |
method public logical ContainsAllValues(input poValues as OpenEdge.Core.Collections.ICollection): |
|
| 28 |
end method. |
|
| 29 |
|
|
| 30 |
method public logical ContainsValue(poValue as class Progress.Lang.Object): |
|
| 31 |
end method. |
|
| 32 |
|
|
| 33 |
method public Progress.Lang.Object Get(poKey as Progress.Lang.Object): |
|
| 34 |
end method. |
|
| 35 |
|
|
| 36 |
method public Progress.Lang.Object Put(poKey as Progress.Lang.Object, poValue as class Progress.Lang.Object): |
|
| 37 |
end method. |
|
| 38 |
|
|
| 39 |
method public void PutAll(poMap as OpenEdge.Core.Collections.IMap): |
|
| 40 |
end method. |
|
| 41 |
|
|
| 42 |
method public Progress.Lang.Object Remove(input poKey as Progress.Lang.Object): |
|
| 43 |
end method. |
|
| 44 | ||
| 45 |
method public void RemoveAll(input poKeys as OpenEdge.Core.Collections.ICollection). |
|
| 46 |
end method. |
|
| 47 |
|
|
| 48 |
constructor public Map (input poMap as OpenEdge.Core.Collections.IMap): |
|
| 49 |
end constructor. |
|
| 50 |
|
|
| 51 |
constructor public Map ( ): |
|
| 52 |
end constructor. |
|
| 53 | ||
| 54 |
destructor public Map ( ): |
|
| 55 |
end destructor. |
|
| 56 | ||
| 57 |
end class. |
|
| oo4gl/OpenEdge/Core/Collections/MapBackedCollection.cls 2020-05-20 11:34:22 +0000 | ||
|---|---|---|
| 1 |
class OpenEdge.Core.Collections.MapBackedCollection abstract serializable |
|
| 2 |
implements OpenEdge.Core.Collections.ICollection: |
|
| 3 |
|
|
| 4 |
define protected property OwningMap as OpenEdge.Core.Collections.IMap no-undo get. |
|
| 5 |
define protected property OwningBuffer as handle no-undo get. |
|
| 6 |
define protected property KeyField as handle no-undo get. |
|
| 7 |
|
|
| 8 |
define public property Size as integer no-undo get. |
|
| 9 |
|
|
| 10 |
constructor public MapBackedCollection(poMap as OpenEdge.Core.Collections.IMap, phTT as handle, pcValuefield as char): |
|
| 11 |
end constructor. |
|
| 12 |
|
|
| 13 |
method public logical Add(p1 as Progress.Lang.Object): |
|
| 14 |
end method. |
|
| 15 | ||
| 16 |
method public logical AddAll( p1 as OpenEdge.Core.Collections.ICollection ): |
|
| 17 |
end method. |
|
| 18 |
|
|
| 19 |
method public logical AddArray(p1 as Progress.Lang.Object extent ): |
|
| 20 |
end method. |
|
| 21 | ||
| 22 |
method public void Clear(): |
|
| 23 |
end method. |
|
| 24 |
|
|
| 25 |
method public logical IsEmpty(): |
|
| 26 |
end method. |
|
| 27 |
|
|
| 28 |
method abstract public logical Contains( p1 as Progress.Lang.Object). |
|
| 29 |
|
|
| 30 |
method abstract public logical ContainsAll(input p1 as OpenEdge.Core.Collections.ICollection). |
|
| 31 |
|
|
| 32 |
method abstract public logical Remove( p1 as Progress.Lang.Object). |
|
| 33 |
|
|
| 34 |
method abstract public logical RemoveAll(p1 as OpenEdge.Core.Collections.ICollection). |
|
| 35 |
|
|
| 36 |
method abstract public logical RetainAll(input p1 as OpenEdge.Core.Collections.ICollection). |
|
| 37 |
|
|
| 38 |
method public OpenEdge.Core.Collections.IIterator Iterator( ): |
|
| 39 |
end method. |
|
| 40 |
|
|
| 41 |
method public Progress.Lang.Object extent ToArray(): |
|
| 42 |
end method. |
|
| 43 |
|
|
| 44 |
method public void ToTable( output table-handle p1): |
|
| 45 |
end method. |
|
| 46 |
|
|
| 47 |
end class. |
|
| oo4gl/OpenEdge/Core/Collections/MapEntry.cls 2020-05-20 11:34:22 +0000 | ||
|---|---|---|
| 1 |
class OpenEdge.Core.Collections.MapEntry serializable |
|
| 2 |
implements OpenEdge.Core.Collections.IMapEntry: |
|
| 3 |
|
|
| 4 |
define protected property OwningMap as OpenEdge.Core.Collections.IMap no-undo get. set. |
|
| 5 |
|
|
| 6 |
define public property Key as Progress.Lang.Object no-undo get. |
|
| 7 | ||
| 8 |
|
|
| 9 |
define public property Value as Progress.Lang.Object no-undo get. set. |
|
| 10 |
|
|
| 11 |
constructor public MapEntry (p1 as OpenEdge.Core.Collections.IMap, p2 as Progress.Lang.Object): |
|
| 12 |
end constructor. |
|
| 13 |
|
|
| 14 |
method public override logical Equals(p1 as Progress.Lang.Object): |
|
| 15 |
end method. |
|
| 16 |
|
|
| 17 | ||
| 18 |
end class. |
|
| oo4gl/OpenEdge/Core/Collections/Set.cls 2020-05-20 11:34:22 +0000 | ||
|---|---|---|
| 1 |
class OpenEdge.Core.Collections.Set |
|
| 2 |
inherits OpenEdge.Core.Collections.AbstractTTCollection |
|
| 3 |
implements OpenEdge.Core.Collections.ISet : |
|
| 4 |
|
|
| 5 |
constructor public Set ( ): |
|
| 6 |
end constructor. |
|
| 7 |
|
|
| 8 |
constructor public Set (p1 as OpenEdge.Core.Collections.ISet): |
|
| 9 |
end constructor. |
|
| 10 |
|
|
| 11 |
method public override logical Contains( p1 as Progress.Lang.Object): |
|
| 12 |
end method. |
|
| 13 |
|
|
| 14 |
method protected override void FindBufferUseObject (p1 as Progress.Lang.Object): |
|
| 15 |
end method. |
|
| 16 |
|
|
| 17 |
/* |
|
| 18 |
method protected void FindBufferUseObject(obj as Object, |
|
| 19 |
buffer pbSet for ttSet): |
|
| 20 |
|
|
| 21 |
end. |
|
| 22 |
*/ |
|
| 23 |
|
|
| 24 |
method public override logical Add(p1 as Progress.Lang.Object): |
|
| 25 |
end method. |
|
| 26 |
|
|
| 27 |
method public override logical AddAll(p1 as OpenEdge.Core.Collections.ICollection): |
|
| 28 |
end method. |
|
| 29 |
|
|
| 30 |
method public override logical Equals(p1 as Progress.Lang.Object): |
|
| 31 |
end method. |
|
| 32 |
|
|
| 33 |
method public override logical RemoveAll(p1 as OpenEdge.Core.Collections.ICollection): |
|
| 34 |
end method. |
|
| 35 |
|
|
| 36 |
end class. |
|
| oo4gl/OpenEdge/Core/Collections/StringKeyedMap.cls 2020-05-20 11:34:22 +0000 | ||
|---|---|---|
| 1 |
class OpenEdge.Core.Collections.StringKeyedMap |
|
| 2 |
inherits OpenEdge.Core.Collections.Map |
|
| 3 |
implements OpenEdge.Core.Collections.IStringKeyedMap: |
|
| 4 | ||
| 5 |
constructor public StringKeyedMap(input poMap as OpenEdge.Core.Collections.IStringKeyedMap): |
|
| 6 |
end constructor. |
|
| 7 |
|
|
| 8 |
constructor public StringKeyedMap(): |
|
| 9 |
end constructor. |
|
| 10 |
|
|
| 11 |
method public Progress.Lang.Object Put(input poKey as OpenEdge.Core.String, input poValue as Progress.Lang.Object): |
|
| 12 |
end method. |
|
| 13 |
|
|
| 14 |
method override public Progress.Lang.Object Put(input poKey as Progress.Lang.Object, input poValue as Progress.Lang.Object): |
|
| 15 |
end method. |
|
| 16 |
|
|
| 17 |
method public Progress.Lang.Object Remove(input poKey as OpenEdge.Core.String): |
|
| 18 |
end method. |
|
| 19 | ||
| 20 |
method override public Progress.Lang.Object Remove(input poKey as Progress.Lang.Object): |
|
| 21 |
end method. |
|
| 22 |
|
|
| 23 |
|
|
| 24 |
method override public logical ContainsKey(input poKey as Progress.Lang.Object): |
|
| 25 |
end method. |
|
| 26 |
|
|
| 27 |
method public logical ContainsKey(input poKey as OpenEdge.Core.String): |
|
| 28 |
end method. |
|
| 29 |
|
|
| 30 |
method override public Progress.Lang.Object Get(input poKey as Progress.Lang.Object): |
|
| 31 |
end method. |
|
| 32 |
|
|
| 33 |
method public Progress.Lang.Object Get(input poKey as OpenEdge.Core.String): |
|
| 34 |
end method. |
|
| 35 |
|
|
| 36 |
method public void PutAll(input poMap as OpenEdge.Core.Collections.IStringKeyedMap): |
|
| 37 |
end method. |
|
| 38 |
|
|
| 39 |
method override public void PutAll(input poMap as OpenEdge.Core.Collections.IMap): |
|
| 40 |
end method. |
|
| 41 | ||
| 42 |
method public Progress.Lang.Object Put(input pcKey as character, input poValue as Progress.Lang.Object): |
|
| 43 |
end method. |
|
| 44 |
|
|
| 45 |
method public Progress.Lang.Object Get(input pcKey as character): |
|
| 46 |
end method. |
|
| 47 |
|
|
| 48 |
method public Progress.Lang.Object Remove(input pcKey as character): |
|
| 49 |
end method. |
|
| 50 |
|
|
| 51 |
method public logical ContainsKey(input pcKey as character): |
|
| 52 |
end method. |
|
| 53 | ||
| 54 |
end class. |
|
| oo4gl/OpenEdge/Core/Collections/StringStringMap.cls 2020-05-04 11:21:05 +0000 | ||
|---|---|---|
| 1 |
class OpenEdge.Core.Collections.StringStringMap |
|
| 2 |
inherits OpenEdge.Core.Collections.Map |
|
| 3 |
implements OpenEdge.Core.Collections.IStringStringMap: |
|
| 4 |
|
|
| 5 |
constructor public StringStringMap(input poMap as OpenEdge.Core.Collections.IStringStringMap): |
|
| 6 |
end constructor. |
|
| 7 |
|
|
| 8 |
constructor public StringStringMap(): |
|
| 9 |
end constructor. |
|
| 10 |
|
|
| 11 |
method public OpenEdge.Core.String Put(input poKey as OpenEdge.Core.String, input poValue as OpenEdge.Core.String): |
|
| 12 |
end method. |
|
| 13 |
|
|
| 14 |
method override public Progress.Lang.Object Put(input poKey as Progress.Lang.Object, input poValue as Progress.Lang.Object): |
|
| 15 |
end method. |
|
| 16 |
|
|
| 17 |
method public OpenEdge.Core.String Remove(input poKey as OpenEdge.Core.String): |
|
| 18 |
end method. |
|
| 19 |
|
|
| 20 |
method override public Progress.Lang.Object Remove(input poKey as Progress.Lang.Object): |
|
| 21 |
end method. |
|
| 22 |
|
|
| 23 |
method override public logical ContainsKey(input poKey as Progress.Lang.Object): |
|
| 24 |
end method. |
|
| 25 |
|
|
| 26 |
method public logical ContainsKey(input poKey as OpenEdge.Core.String): |
|
| 27 |
end method. |
|
| 28 |
|
|
| 29 |
method override public logical ContainsValue(input poValue as Progress.Lang.Object): |
|
| 30 |
end method. |
|
| 31 |
|
|
| 32 |
method public logical ContainsValue(input poValue as OpenEdge.Core.String): |
|
| 33 |
end method. |
|
| 34 |
|
|
| 35 |
method override public Progress.Lang.Object Get(input poKey as Progress.Lang.Object): |
|
| 36 |
end method. |
|
| 37 |
|
|
| 38 |
method public OpenEdge.Core.String Get(input poKey as OpenEdge.Core.String): |
|
| 39 |
end method. |
|
| 40 |
|
|
| 41 |
method public void PutAll(input poMap as OpenEdge.Core.Collections.IStringStringMap): |
|
| 42 |
end method. |
|
| 43 |
|
|
| 44 |
method override public void PutAll(input poMap as OpenEdge.Core.Collections.IMap): |
|
| 45 |
end method. |
|
| 46 |
|
|
| 47 |
method public longchar Put(input pcKey as character, input pcValue as longchar): |
|
| 48 |
end method. |
|
| 49 |
|
|
| 50 |
method public longchar Get(input pcKey as character): |
|
| 51 |
end method. |
|
| 52 |
|
|
| 53 |
method public longchar Remove(input pcKey as character): |
|
| 54 |
end method. |
|
| 55 |
|
|
| 56 |
method public logical ContainsKey(input pcKey as character): |
|
| 57 |
end method. |
|
| 58 |
|
|
| 59 |
method public logical ContainsValue(input pcValue as character): |
|
| 60 |
end method. |
|
| 61 |
|
|
| 62 |
end class. |
|
| oo4gl/OpenEdge/Core/Collections/ValueCollection.cls 2020-05-20 11:34:22 +0000 | ||
|---|---|---|
| 1 |
class OpenEdge.Core.Collections.ValueCollection serializable inherits OpenEdge.Core.Collections.MapBackedCollection: |
|
| 2 |
|
|
| 3 |
constructor public ValueCollection(p1 as OpenEdge.Core.Collections.IMap, p2 as handle, p3 as char): |
|
| 4 |
end constructor. |
|
| 5 |
|
|
| 6 |
method override public logical Contains( p1 as Progress.Lang.Object): |
|
| 7 |
end method. |
|
| 8 |
|
|
| 9 |
method override public logical ContainsAll(input p1 as OpenEdge.Core.Collections.ICollection): |
|
| 10 |
end method. |
|
| 11 |
|
|
| 12 |
method override public logical Remove(p1 as Progress.Lang.Object): |
|
| 13 |
end method. |
|
| 14 |
|
|
| 15 |
method override public logical RemoveAll(p1 as OpenEdge.Core.Collections.ICollection): |
|
| 16 |
end method. |
|
| 17 |
|
|
| 18 |
method override public logical RetainAll(p2 as OpenEdge.Core.Collections.ICollection): |
|
| 19 |
end method. |
|
| 20 |
end class. |
|
| oo4gl/OpenEdge/Core/ISupportEncoding.cls 2020-05-04 11:21:05 +0000 | ||
|---|---|---|
| 2 | 2 | |
| 3 | 3 |
define public property Encoding as character get. |
| 4 | 4 | |
| 5 |
end class.
|
|
| 5 |
end interface.
|
|
| oo4gl/OpenEdge/Core/String.cls 2020-05-04 11:21:05 +0000 | ||
|---|---|---|
| 26 | 26 |
method public static OpenEdge.Core.String Empty(): |
| 27 | 27 |
end. |
| 28 | 28 | |
| 29 |
method public logical Equals(p1 as Progress.Lang.Object): |
|
| 29 |
method override public logical Equals(p1 as Progress.Lang.Object):
|
|
| 30 | 30 |
end. |
| 31 | 31 | |
| 32 | 32 |
method public logical IsNullOrEmpty(): |
| ... | ... | |
| 74 | 74 |
method public static OpenEdge.Core.Collections.Array Split(p1 as OpenEdge.Core.String, p2 as character): |
| 75 | 75 |
end. |
| 76 | 76 | |
| 77 |
method public character ToString(): |
|
| 77 |
method override public character ToString():
|
|
| 78 | 78 |
end. |
| 79 | 79 | |
| 80 | 80 |
method public void Trim(): |
| oo4gl/OpenEdge/Core/System/UnsupportedOperationError.cls 2020-05-20 11:34:22 +0000 | ||
|---|---|---|
| 1 |
class OpenEdge.Core.System.UnsupportedOperationError inherits OpenEdge.Core.System.ApplicationError: |
|
| 2 |
constructor static UnsupportedOperationError(): |
|
| 3 |
end constructor. |
|
| 4 |
|
|
| 5 |
constructor public UnsupportedOperationError (p1 as char, p2 as char): |
|
| 6 |
end constructor. |
|
| 7 | ||
| 8 |
constructor public UnsupportedOperationError (p1 as Error, p2 as char, p3 as char): |
|
| 9 |
end constructor. |
|
| 10 |
|
|
| 11 |
end class. |
|
| oo4gl/OpenEdge/Net/HTTP/AuthenticationMethodEnum.cls 2020-05-20 11:34:22 +0000 | ||
|---|---|---|
| 1 |
enum OpenEdge.Net.HTTP.AuthenticationMethodEnum: |
|
| 2 |
define enum None = 0 |
|
| 3 |
Basic |
|
| 4 |
Digest |
|
| 5 |
Form |
|
| 6 |
Other |
|
| 7 |
Bearer |
|
| 8 |
. |
|
| 9 |
end enum. |
|
| oo4gl/OpenEdge/Net/HTTP/AuthenticationRequestEventArgs.cls 2020-05-20 11:34:22 +0000 | ||
|---|---|---|
| 1 |
class OpenEdge.Net.HTTP.AuthenticationRequestEventArgs: |
|
| 2 |
define public property Request as OpenEdge.Net.HTTP.IHttpRequest no-undo get. |
|
| 3 |
|
|
| 4 |
define public property Realm as character no-undo get. private set. |
|
| 5 |
|
|
| 6 |
define public property Credentials as OpenEdge.Net.HTTP.Credentials no-undo get. set. |
|
| 7 |
|
|
| 8 |
define public property Cancel as logical no-undo get. set. |
|
| 9 |
|
|
| 10 |
constructor public AuthenticationRequestEventArgs(input poRequest as OpenEdge.Net.HTTP.IHttpRequest, |
|
| 11 |
input pcRealm as character): |
|
| 12 |
end method. |
|
| 13 |
|
|
| 14 |
end class. |
|
| oo4gl/OpenEdge/Net/HTTP/AuthorizationHeader.cls 2020-05-20 11:34:22 +0000 | ||
|---|---|---|
| 1 |
class OpenEdge.Net.HTTP.AuthorizationHeader inherits OpenEdge.Net.HTTP.HttpHeader: |
|
| 2 |
constructor public AuthorizationHeader(input pName as character): |
|
| 3 |
end constructor. |
|
| 4 |
|
|
| 5 |
constructor public AuthorizationHeader (input pName as character, input pValue as character): |
|
| 6 |
end constructor. |
|
| 7 | ||
| 8 |
method override protected void Validate(input pValue as character): |
|
| 9 |
end method. |
|
| 10 |
|
|
| 11 |
end class. |
|
| oo4gl/OpenEdge/Net/HTTP/AuthorizationHeaderBuilder.cls 2020-05-20 11:34:22 +0000 | ||
|---|---|---|
| 1 | ||
| 2 |
class OpenEdge.Net.HTTP.AuthorizationHeaderBuilder inherits OpenEdge.Net.HTTP.DefaultHeaderBuilder: |
|
| 3 |
constructor public AuthorizationHeaderBuilder (input pHeaderName as character): |
|
| 4 |
end constructor. |
|
| 5 |
end class. |
|
| oo4gl/OpenEdge/Net/HTTP/ClientBuilder.cls 2020-05-04 11:21:05 +0000 | ||
|---|---|---|
| 1 | 1 |
class OpenEdge.Net.HTTP.ClientBuilder |
| 2 | 2 |
inherits OpenEdge.Net.HTTP.ConfigBuilder |
| 3 |
implements OpenEdge.Core.ISupportInitialize |
|
| 4 | 3 |
abstract: |
| 5 | 4 |
define public static property Registry as OpenEdge.Net.HTTP.BuilderRegistry get. |
| 6 |
define public property Client as OpenEdge.Net.HTTP.IHttpClient get. |
|
| 7 |
define public property PROP_CLIENT_NAME as character get.
|
|
| 8 |
define public property PROP_CLIENT_VERSION as character get.
|
|
| 5 |
define public abstract property Client as OpenEdge.Net.HTTP.IHttpClient get.
|
|
| 6 |
define protected property PROP_CLIENT_NAME as character get.
|
|
| 7 |
define protected property PROP_CLIENT_VERSION as character get.
|
|
| 9 | 8 | |
| 10 | 9 |
method public static OpenEdge.Net.HTTP.ClientBuilder Build(): |
| 11 | 10 |
end. |
| 12 | 11 | |
| 13 |
method public OpenEdge.Net.HTTP.IHttpClientLibrary BuildLibrary():
|
|
| 12 |
method protected OpenEdge.Net.HTTP.IHttpClientLibrary BuildLibrary():
|
|
| 14 | 13 |
end. |
| 15 | 14 | |
| 16 | 15 |
method public static OpenEdge.Net.HTTP.IHttpClient DecorateClient(p1 as Progress.Lang.Class, p2 as OpenEdge.Net.HTTP.ihttpclient): |
| 17 | 16 |
end. |
| 18 | 17 | |
| 19 |
method public static void InitializeRegistry(p1 as OpenEdge.Net.HTTP.BuilderRegistry): |
|
| 20 |
end. |
|
| 21 | ||
| 22 | 18 |
method public OpenEdge.Net.HTTP.ClientBuilder KeepCookies(): |
| 23 | 19 |
end. |
| 24 | 20 | |
| oo4gl/OpenEdge/Net/HTTP/ContentDispositionHeader.cls 2020-05-20 11:34:22 +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 */ |
|
| 22 |
constructor public ContentDispositionHeader(input pcName as character): |
|
| 23 |
super (pcName). |
|
| 24 |
assign this-object:ParamDelimiter = ';':u. |
|
| 25 |
end constructor. |
|
| 26 |
|
|
| 27 |
/* Constructor |
|
| 28 |
|
|
| 29 |
@param character A non-empty header name |
|
| 30 |
@param character A valid header value */ |
|
| 31 |
constructor public ContentDispositionHeader (input pcName as character, input pcValue as character): |
|
| 32 |
super(pcName, pcValue). |
|
| 33 |
assign this-object:ParamDelimiter = ';':u. |
|
| 34 |
end constructor. |
|
| 35 |
|
|
| 36 |
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 |
end method. |
|
| 46 |
|
|
| 47 |
end class. |
|
| oo4gl/OpenEdge/Net/HTTP/ContentDispositionHeaderBuilder.cls 2020-05-20 11:34:22 +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 |
using OpenEdge.Net.HTTP.ContentDispositionHeader. |
|
| 16 |
using OpenEdge.Net.HTTP.DefaultHeaderBuilder. |
|
| 17 |
using OpenEdge.Net.HTTP.HttpHeader. |
|
| 18 | ||
| 19 |
class OpenEdge.Net.HTTP.ContentDispositionHeaderBuilder inherits DefaultHeaderBuilder: |
|
| 20 | ||
| 21 |
/* Constructor |
|
| 22 |
|
|
| 23 |
@param character The name of the header to which this builder applies */ |
|
| 24 |
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 |
end constructor. |
|
| 30 | ||
| 31 |
end class. |
|
| oo4gl/OpenEdge/Net/HTTP/ContentTypeHeader.cls 2020-05-20 11:34:22 +0000 | ||
|---|---|---|
| 1 |
class OpenEdge.Net.HTTP.ContentTypeHeader inherits OpenEdge.Net.HTTP.HttpHeader: |
|
| 2 |
constructor public ContentTypeHeader(input pcName as character): |
|
| 3 |
end constructor. |
|
| 4 |
|
|
| 5 |
constructor public ContentTypeHeader (input pcName as character, input pcValue as character): |
|
| 6 |
end constructor. |
|
| 7 |
|
|
| 8 |
method override protected void Validate( input pcValue as character ): |
|
| 9 |
end method. |
|
| 10 |
|
|
| 11 |
method override public logical SetParameterValue(input pcParamName as character, |
|
| 12 |
input pcParamValue as character ): |
|
| 13 |
end method. |
|
| 14 |
|
|
| 15 |
end class. |
|
| oo4gl/OpenEdge/Net/HTTP/ContentTypeHeaderBuilder.cls 2020-05-20 11:34:22 +0000 | ||
|---|---|---|
| 1 |
class OpenEdge.Net.HTTP.ContentTypeHeaderBuilder inherits OpenEdge.Net.HTTP.DefaultHeaderBuilder: |
|
| 2 | ||
| 3 |
constructor public ContentTypeHeaderBuilder ( input pcHeaderName as character ): |
|
| 4 |
end constructor. |
|
| 5 | ||
| 6 |
end class. |
|
| oo4gl/OpenEdge/Net/HTTP/DefaultCookieJarBuilder.cls 2020-05-04 11:21:05 +0000 | ||
|---|---|---|
| 1 |
class OpenEdge.Net.HTTP.DefaultCookieJarBuilder inherits OpenEdge.Net.HTTP.CookieJarBuilder: |
|
| 2 |
|
|
| 3 |
define override public property CookieJar as OpenEdge.Net.HTTP.ICookieJar no-undo get. |
|
| 4 | ||
| 5 |
constructor public DefaultCookieJarBuilder(): |
|
| 6 |
end method. |
|
| 7 |
|
|
| 8 |
end class. |
|
| oo4gl/OpenEdge/Net/HTTP/DefaultHeaderBuilder.cls 2020-05-04 11:21:05 +0000 | ||
|---|---|---|
| 1 |
class OpenEdge.Net.HTTP.DefaultHeaderBuilder inherits OpenEdge.Net.HTTP.HttpHeaderBuilder: |
|
| 2 | ||
| 3 |
define override public property Header as OpenEdge.Net.HTTP.HttpHeader no-undo get. |
|
| 4 |
|
|
| 5 |
constructor public DefaultHeaderBuilder(input p1 as character): |
|
| 6 |
end. |
|
| 7 |
|
|
| 8 |
method protected OpenEdge.Net.HTTP.HttpHeader NewHeader(): |
|
| 9 |
end. |
|
| 10 |
|
|
| 11 |
end class. |
|
| oo4gl/OpenEdge/Net/HTTP/DefaultHttpClientBuilder.cls 2020-05-04 11:21:05 +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: |
|
| 28 |
|
|
| 29 |
/** Returns a configured client. */ |
|
| 30 |
define override public property Client as IHttpClient no-undo |
|
| 31 |
get(): |
|
| 32 |
return NewClient(). |
|
| 33 |
end get. |
|
| 34 | ||
| 35 |
constructor public DefaultHttpClientBuilder(): |
|
| 36 |
super(). |
|
| 37 |
end constructor. |
|
| 38 |
|
|
| 39 |
destructor public DefaultHttpClientBuilder(): |
|
| 40 |
Destroy(). |
|
| 41 |
end destructor. |
|
| 42 | ||
| 43 |
method public void Initialize(): |
|
| 44 |
Named('OpenEdge-HttpClient':u, '0.4.0':u).
|
|
| 45 |
end method. |
|
| 46 |
|
|
| 47 |
method public void Destroy(): |
|
| 48 |
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 |
|
|
| 99 |
end class. |
|
| oo4gl/OpenEdge/Net/HTTP/DefaultRequestBuilder.cls 2020-05-04 11:21:05 +0000 | ||
|---|---|---|
| 1 |
class OpenEdge.Net.HTTP.DefaultRequestBuilder inherits OpenEdge.Net.HTTP.RequestBuilder: |
|
| 2 |
define override public property Request as OpenEdge.Net.HTTP.IHttpRequest no-undo get. |
|
| 3 |
|
|
| 4 |
constructor public DefaultRequestBuilder (input p1 as character, |
|
| 5 |
input p2 as OpenEdge.Net.URI): |
|
| 6 |
end. |
|
| 7 |
|
|
| 8 |
end class. |
|
| oo4gl/OpenEdge/Net/HTTP/DefaultResponseBuilder.cls 2020-05-04 11:21:05 +0000 | ||
|---|---|---|
| 1 |
class OpenEdge.Net.HTTP.DefaultResponseBuilder inherits OpenEdge.Net.HTTP.ResponseBuilder: |
|
| 2 |
/* custom implementation */ |
|
| 3 |
define override public property Response as OpenEdge.Net.HTTP.IHttpResponse no-undo get. |
|
| 4 | ||
| 5 |
constructor public DefaultResponseBuilder(): |
|
| 6 |
end. |
|
| 7 |
|
|
| 8 |
end class. |
|
| oo4gl/OpenEdge/Net/HTTP/Filter/Auth/AuthFilterEventHandlerWrapper.cls 2020-05-20 11:34:22 +0000 | ||
|---|---|---|
| 1 |
class OpenEdge.Net.HTTP.Filter.Auth.AuthFilterEventHandlerWrapper implements OpenEdge.Net.HTTP.Filter.Auth.IAuthFilterEventHandler: |
|
| 2 |
define public property Callback as handle no-undo get. |
|
| 3 |
|
|
| 4 |
constructor public AuthFilterEventHandlerWrapper(input phCallbackProcedure as handle): |
|
| 5 |
end constructor. |
|
| 6 |
|
|
| 7 |
method public void AuthFilter_HttpCredentialRequestHandler( |
|
| 8 |
input poSender as Progress.Lang.Object, |
|
| 9 |
input poEventArgs as OpenEdge.Net.HTTP.AuthenticationRequestEventArgs ): |
|
| 10 |
end method. |
|
| 11 |
|
|
| 12 |
end class. |
|
| oo4gl/OpenEdge/Net/HTTP/Filter/Auth/AuthenticationRequestFilter.cls 2020-05-20 11:34:22 +0000 | ||
|---|---|---|
| 1 |
class OpenEdge.Net.HTTP.Filter.Auth.AuthenticationRequestFilter |
|
| 2 |
implements OpenEdge.Net.HTTP.IHttpMessageWriter, OpenEdge.Net.HTTP.Filter.IFilterEvents, OpenEdge.Core.ISupportInitialize |
|
| 3 |
abstract: |
|
| 4 |
|
|
| 5 |
define public event HttpCredentialRequest signature void ( |
|
| 6 |
input poSender as Progress.Lang.Object, |
|
| 7 |
input poEventArgs as OpenEdge.Net.HTTP.AuthenticationRequestEventArgs). |
|
| 8 | ||
| 9 |
define public property FilterEventListenerType as class Progress.Lang.Class no-undo get. |
|
| 10 |
|
|
| 11 |
define public property Message as OpenEdge.Net.HTTP.IHttpMessage no-undo get. private set. |
|
| 12 |
|
|
| 13 |
define protected property AuthenticatedRequest as OpenEdge.Net.HTTP.IAuthenticatedRequest no-undo get. private set. |
|
| 14 |
|
|
| 15 |
constructor public AuthenticationRequestFilter(input poRequest as OpenEdge.Net.HTTP.IAuthenticatedRequest): |
|
| 16 |
end. |
|
| 17 |
|
|
| 18 |
destructor AuthenticationRequestFilter(): |
|
| 19 |
end destructor. |
|
| 20 |
|
|
| 21 |
method public void Close(): |
|
| 22 |
end method. |
|
| 23 | ||
| 24 |
method public void Flush(): |
|
| 25 |
end method. |
|
| 26 |
|
|
| 27 |
method abstract protected void AddAuthentication(). |
|
| 28 |
|
|
| 29 |
method public void Open(): |
|
| 30 |
end method. |
|
| 31 |
|
|
| 32 |
method public void Write(input-output pcData as longchar): |
|
| 33 |
end method. |
|
| 34 | ||
| 35 |
method public void Write(input pmData as memptr): |
|
| 36 |
end method. |
|
| 37 | ||
| 38 |
method public void Write(input poData as Progress.Lang.Object): |
|
| 39 |
end method. |
|
| 40 |
|
|
| 41 |
method public void Write(input phData as handle): |
|
| 42 |
end method. |
|
| 43 | ||
| 44 |
method public void Write(input-output pcData as character): |
|
| 45 |
end method. |
|
| 46 |
|
|
| 47 |
method protected void OnHttpCredentialRequest(input poAuthRequestArgs as OpenEdge.Net.HTTP.AuthenticationRequestEventArgs): |
|
| 48 |
end method. |
|
| 49 |
|
|
| 50 |
method protected OpenEdge.Net.HTTP.Credentials GetCredentials(input pcRealm as character): |
|
| 51 |
end method. |
|
| 52 |
|
|
| 53 |
method public void SubscribeListener(input poListener as Progress.Lang.Object): |
|
| 54 |
end method. |
|
| 55 |
|
|
| 56 |
method public void UnsubscribeListener(input poListener as Progress.Lang.Object): |
|
| 57 |
end method. |
|
| 58 |
|
|
| 59 |
method public void Initialize(): |
|
| 60 |
end method. |
|
| 61 |
|
|
| 62 |
method public void Destroy( ): |
|
| 63 |
end method. |
|
| 64 |
|
|
| 65 |
end class. |
|
| oo4gl/OpenEdge/Net/HTTP/Filter/Auth/BasicAuthenticationFilter.cls 2020-05-20 11:34:22 +0000 | ||
|---|---|---|
| 1 |
class OpenEdge.Net.HTTP.Filter.Auth.BasicAuthenticationFilter |
|
| 2 |
inherits OpenEdge.Net.HTTP.Filter.Auth.AuthenticationRequestFilter: |
|
| 3 |
|
|
| 4 |
constructor public BasicAuthenticationFilter (input poRequest as OpenEdge.Net.HTTP.IAuthenticatedRequest ): |
|
| 5 |
super(poRequest). |
|
| 6 |
end constructor. |
|
| 7 | ||
| 8 |
method override protected void AddAuthentication(): |
|
| 9 |
end method. |
|
| 10 |
|
|
| 11 |
end class. |
|
| oo4gl/OpenEdge/Net/HTTP/Filter/Auth/DigestAuthenticationFilter.cls 2020-05-20 11:34:22 +0000 | ||
|---|---|---|
| 1 |
class OpenEdge.Net.HTTP.Filter.Auth.DigestAuthenticationFilter |
|
| 2 |
inherits OpenEdge.Net.HTTP.Filter.Auth.AuthenticationRequestFilter: |
|
| 3 |
|
|
| 4 |
constructor public DigestAuthenticationFilter ( input poRequest as OpenEdge.Net.HTTP.IAuthenticatedRequest ): |
|
| 5 |
super(poRequest). |
|
| 6 |
end constructor. |
|
| 7 |
|
|
| 8 |
destructor DigestAuthenticationFilter(): |
|
| 9 |
end destructor. |
|
| 10 | ||
| 11 |
method override protected void AddAuthentication(): |
|
| 12 |
end method. |
|
| 13 |
|
|
| 14 |
end class. |
|
| oo4gl/OpenEdge/Net/HTTP/Filter/Auth/IAuthFilterEventHandler.cls 2020-05-20 11:34:22 +0000 | ||
|---|---|---|
| 1 |
interface OpenEdge.Net.HTTP.Filter.Auth.IAuthFilterEventHandler: |
|
| 2 |
method public void AuthFilter_HttpCredentialRequestHandler( |
|
| 3 |
input poSender as Progress.Lang.Object, |
|
| 4 |
input poEventArgs as OpenEdge.Net.HTTP.AuthenticationRequestEventArgs). |
|
| 5 |
|
|
| 6 |
end interface. |
|
| oo4gl/OpenEdge/Net/HTTP/Filter/Auth/NoAuthenticationFilter.cls 2020-05-20 11:34:22 +0000 | ||
|---|---|---|
| 1 |
class OpenEdge.Net.HTTP.Filter.Auth.NoAuthenticationFilter |
|
| 2 |
inherits OpenEdge.Net.HTTP.Filter.Auth.AuthenticationRequestFilter: |
|
| 3 |
|
|
| 4 |
constructor public NoAuthenticationFilter ( input poRequest as OpenEdge.Net.HTTP.IAuthenticatedRequest ): |
|
| 5 |
super(poRequest). |
|
| 6 |
end constructor. |
|
| 7 | ||
| 8 |
method override protected void AddAuthentication(): |
|
| 9 |
end method. |
|
| 10 |
|
|
| 11 |
end class. |
|
| oo4gl/OpenEdge/Net/HTTP/Filter/IFilterEvents.cls 2020-05-20 11:34:22 +0000 | ||
|---|---|---|
| 1 |
interface OpenEdge.Net.HTTP.Filter.IFilterEvents: |
|
| 2 |
define public property FilterEventListenerType as class Progress.Lang.Class no-undo get. |
|
| 3 |
|
|
| 4 |
method public void SubscribeListener(input poListener as Progress.Lang.Object). |
|
| 5 |
|
|
| 6 |
method public void UnsubscribeListener(input poListener as Progress.Lang.Object). |
|
| 7 |
|
|
| 8 |
end interface. |
|
| oo4gl/OpenEdge/Net/HTTP/Filter/Payload/MessageWriter.cls 2020-05-04 11:21:05 +0000 | ||
|---|---|---|
| 26 | 26 |
input poLogLevel as OpenEdge.Logging.LogLevelEnum): |
| 27 | 27 |
end. |
| 28 | 28 |
|
| 29 |
method override public void Open():
|
|
| 29 |
method public void Open(): |
|
| 30 | 30 |
end. |
| 31 | 31 |
|
| 32 | 32 |
method override public int64 Write(input p0 as character): |
| ... | ... | |
| 45 | 45 |
end. |
| 46 | 46 |
|
| 47 | 47 |
method abstract public int64 Write(input poData as Progress.Lang.Object). |
| 48 |
end. |
|
| 49 | 48 | |
| 50 | 49 |
method protected int64 WriteFileStream(input pStream as Progress.IO.FileInputStream): |
| 51 | 50 |
end. |
| oo4gl/OpenEdge/Net/HTTP/HttpHeaderBuilder.cls 2020-05-20 11:34:22 +0000 | ||
|---|---|---|
| 1 | 1 |
class OpenEdge.Net.HTTP.HttpHeaderBuilder |
| 2 |
inherits OpenEdge.Net.HTTP.ConfigBuilder.
|
|
| 3 |
define public static property Registry as openedge.net.http.builderregistry no-undo get. private set.
|
|
| 2 |
inherits OpenEdge.Net.HTTP.ConfigBuilder abstract:
|
|
| 3 |
define public static property Registry as openedge.net.http.builderregistry no-undo get. |
|
| 4 | 4 | |
| 5 | 5 |
define abstract public property Header as openedge.net.http.httpheader get. |
| 6 | 6 | |
| 7 |
define protected property HeaderName as character no-undo get. private set.
|
|
| 8 | ||
| 9 | ||
| 10 |
constructor public HttpHeaderBuilder(p1 as character):
|
|
| 7 |
define protected property HeaderName as character no-undo get. |
|
| 8 | ||
| 9 | ||
| 10 |
constructor protected HttpHeaderBuilder(p1 as character):
|
|
| 11 | 11 |
end. |
| 12 | 12 | |
| 13 | 13 |
method public static openedge.net.http.httpheaderbuilder Build(p1 as character): |
| 14 | 14 |
end. |
| 15 | 15 | |
| 16 |
method public static void InitializeRegistry(p1 as OpenEdge.Net.HTTP.builderregistry): |
|
| 17 |
end. |
|
| 18 | ||
| 19 | 16 |
method public openedge.net.http.httpheaderbuilder ParametersDelimitedBy(p1 as character): |
| 20 | 17 |
end. |
| 21 | 18 | |
| 22 | 19 |
method public openedge.net.http.httpheaderbuilder Value(p1 as character): |
| 23 | 20 |
end. |
| 24 | 21 | |
| 22 |
method public openedge.net.http.httpheaderbuilder AddParameter(input pName as character, |
|
| 23 |
input pValue as character): |
|
| 24 |
end. |
|
| 25 | 25 |
end. |
| oo4gl/OpenEdge/Net/HTTP/HttpRequestDecorator.cls 2020-05-20 11:34:22 +0000 | ||
|---|---|---|
| 1 |
class OpenEdge.Net.HTTP.HttpRequestDecorator |
|
| 2 |
implements OpenEdge.Net.HTTP.IHttpRequest, OpenEdge.Core.IAdaptable: |
|
| 3 |
|
|
| 4 |
define protected property DecoratedHttpRequest as OpenEdge.Net.HTTP.IHttpRequest no-undo get. |
|
| 5 |
|
|
| 6 |
define public property Method as character no-undo get. set. |
|
| 7 | ||
| 8 |
define public property URI as OpenEdge.Net.URI no-undo get. set. |
|
| 9 | ||
| 10 |
define public property Version as character no-undo get. set. |
|
| 11 | ||
| 12 |
define public property ContentType as character no-undo get. set. |
|
| 13 | ||
| 14 |
define public property CharacterEncoding as character no-undo get. set. |
|
| 15 | ||
| 16 |
define public property ContentMD5 as raw no-undo get. set. |
|
| 17 | ||
| 18 |
define public property Entity as Progress.Lang.Object no-undo get. set. |
|
| 19 |
|
|
| 20 |
define public property ContentLength as integer no-undo get. set. |
|
| 21 | ||
| 22 |
define public property TransferEncoding as character no-undo get. set. |
|
| 23 |
|
|
| 24 |
constructor public HttpRequestDecorator(input poHttpRequest as OpenEdge.Net.HTTP.IHttpRequest): |
|
| 25 |
end constructor. |
|
| 26 |
|
|
| 27 |
method public void SetHeader( input poHeader as OpenEdge.Net.HTTP.HttpHeader ): |
|
| 28 |
end method. |
|
| 29 |
|
|
| 30 |
method public void SetHeaders(input poHeader as OpenEdge.Net.HTTP.HttpHeader extent): |
|
| 31 |
end method. |
|
| 32 |
|
|
| 33 |
method public OpenEdge.Net.HTTP.HttpHeader GetHeader( input pcName as character ): |
|
| 34 |
end method. |
|
| 35 | ||
| 36 |
method public integer GetHeaders(output poHeader as OpenEdge.Net.HTTP.HttpHeader extent ): |
|
| 37 |
end method. |
|
| 38 | ||
| 39 |
method public void RemoveHeader( input pcName as character ): |
|
| 40 |
end method. |
|
| 41 | ||
| 42 |
method public logical HasHeader( input pcName as character ): |
|
| 43 |
end method. |
|
| 44 | ||
| 45 |
method public void ClearHeaders(): |
|
| 46 |
end method. |
|
| 47 | ||
| 48 |
method public void SetCookie( input poCookie as OpenEdge.Net.HTTP.Cookie ): |
|
| 49 |
end method. |
|
| 50 |
|
|
| 51 |
method public void SetCookies(input poCookies as OpenEdge.Net.HTTP.Cookie extent): |
|
| 52 |
end method. |
|
| 53 |
|
|
| 54 |
method public integer GetCookies( output poCookies as OpenEdge.Net.HTTP.Cookie extent): |
|
| 55 |
end method. |
|
| 56 | ||
| 57 |
method public void RemoveCookie( input poCookie as OpenEdge.Net.HTTP.Cookie): |
|
| 58 |
end method. |
|
| 59 | ||
| 60 |
method public logical HasCookie( input poCookie as OpenEdge.Net.HTTP.Cookie): |
|
| 61 |
end method. |
|
| 62 | ||
| 63 |
method public void ClearCookies(): |
|
| 64 |
end method. |
|
| 65 | ||
| 66 |
method public void RemoveCookie( input pcName as character ): |
|
| 67 |
end method. |
|
| 68 | ||
| 69 |
method public logical HasCookie( input pcName as character ): |
|
| 70 |
end method. |
|
| 71 | ||
| 72 |
method public OpenEdge.Net.HTTP.Cookie GetCookie( input pcName as character ): |
|
| 73 |
end method. |
|
| 74 |
|
|
| 75 |
method public Progress.Lang.Object GetAdapter(input poAdaptTo as class Progress.Lang.Class): |
|
| 76 |
end method. |
|
| 77 |
|
|
| 78 |
end class. |
|
| oo4gl/OpenEdge/Net/HTTP/HttpResponseDecorator.cls 2020-05-20 11:34:22 +0000 | ||
|---|---|---|
| 1 |
class OpenEdge.Net.HTTP.HttpResponseDecorator implements OpenEdge.Net.HTTP.IHttpResponse, OpenEdge.Core.IAdaptable: |
|
| 2 |
|
|
| 3 |
define protected property DecoratedHttpResponse as OpenEdge.Net.HTTP.IHttpResponse no-undo get. |
|
| 4 |
|
|
| 5 |
define public property StatusCode as integer no-undo get. set. |
|
| 6 | ||
| 7 |
define public property StatusReason as character no-undo get. set. |
|
| 8 |
|
|
| 9 |
define public property Version as character no-undo get. set. |
|
| 10 | ||
| 11 |
define public property ContentType as character no-undo get. set. |
|
| 12 | ||
| 13 |
define public property CharacterEncoding as character no-undo get. set. |
|
| 14 | ||
| 15 |
define public property ContentMD5 as raw no-undo get. set. |
|
| 16 | ||
| 17 |
define public property Entity as Progress.Lang.Object no-undo get. set. |
|
| 18 |
|
|
| 19 |
define public property ContentLength as integer no-undo get. set. |
|
| 20 | ||
| 21 |
define public property TransferEncoding as character no-undo get. set. |
|
| 22 |
|
|
| 23 |
constructor public HttpResponseDecorator(input poHttpResponse as OpenEdge.Net.HTTP.IHttpResponse): |
|
| 24 |
end constructor. |
|
| 25 | ||
| 26 |
method public void SetHeader( input poHeader as OpenEdge.Net.HTTP.HttpHeader): |
|
| 27 |
end method. |
|
| 28 |
|
|
| 29 |
method public void SetHeaders(input poHeader as OpenEdge.Net.HTTP.HttpHeader extent): |
|
| 30 |
end method. |
|
| 31 | ||
| 32 |
method public OpenEdge.Net.HTTP.HttpHeader GetHeader( input pcName as character ): |
|
| 33 |
end method. |
|
| 34 | ||
| 35 |
method public integer GetHeaders( output poHeader as OpenEdge.Net.HTTP.HttpHeader extent ): |
|
| 36 |
end method. |
|
| 37 | ||
| 38 |
method public void RemoveHeader( input pcName as character ): |
|
| 39 |
end method. |
|
| 40 | ||
| 41 |
method public logical HasHeader( input pcName as character ): |
|
| 42 |
end method. |
|
| 43 | ||
| 44 |
method public void ClearHeaders(): |
|
| 45 |
end method. |
|
| 46 | ||
| 47 |
method public void SetCookie( input poCookie as OpenEdge.Net.HTTP.Cookie ): |
|
| 48 |
end method. |
|
| 49 |
|
|
| 50 |
method public void SetCookies(input poCookies as OpenEdge.Net.HTTP.Cookie extent): |
|
| 51 |
end method. |
|
| 52 | ||
| 53 |
method public integer GetCookies( output poCookies as OpenEdge.Net.HTTP.Cookie extent): |
|
| 54 |
end method. |
|
| 55 | ||
| 56 |
method public void RemoveCookie( input poCookie as OpenEdge.Net.HTTP.Cookie): |
|
| 57 |
end method. |
|
| 58 | ||
| 59 |
method public logical HasCookie( input poCookie as OpenEdge.Net.HTTP.Cookie): |
|
| 60 |
end method. |
|
| 61 | ||
| 62 |
method public void ClearCookies(): |
|
| 63 |
end method. |
|
| 64 | ||
| 65 |
method public void RemoveCookie( input pcName as character ): |
|
| 66 |
end method. |
|
| 67 | ||
| 68 |
method public logical HasCookie( input pcName as character ): |
|
| 69 |
end method. |
|
| 70 | ||
| 71 |
method public OpenEdge.Net.HTTP.Cookie GetCookie( input pcName as character ): |
|
| 72 |
end method. |
|
| 73 |
|
|
| 74 |
method public Progress.Lang.Object GetAdapter(input poAdaptTo as class Progress.Lang.Class): |
|
| 75 |
end method. |
|
| 76 |
end class. |
|
| oo4gl/OpenEdge/Net/HTTP/IAuthenticatedRequest.cls 2020-05-20 11:34:22 +0000 | ||
|---|---|---|
| 1 |
interface OpenEdge.Net.HTTP.IAuthenticatedRequest: |
|
| 2 |
|
|
| 3 |
define public property AuthenticationMethod as character no-undo get. |
|
| 4 |
|
|
| 5 |
define public property Credentials as OpenEdge.Net.HTTP.Credentials no-undo get. set. |
|