added sysprog entities

This commit is contained in:
Infineon\StieberD
2024-03-25 15:17:34 -07:00
parent 600a8e1f61
commit 3a6a2b6b5b
1028 changed files with 171660 additions and 0 deletions

View File

@ -0,0 +1,33 @@
compile insert INET_HEADERS
COMMON /INET_HEADERS/ Inet_Header_Names%, Inet_Header_Values%
Equ Inet_Header_Content_type$ To "Content-Type"
Equ Inet_Header_Cookie$ To "Set-Cookie"
Equ Inet_Header_Location$ To "Location"
Equ Inet_Header_Server$ To "Server"
Equ Inet_Header_Date$ To "Date"
Equ Inet_Header_Pragma$ To "Pragma"
Equ Inet_Header_Cache_Control$ To "Cache-Control"
Equ Inet_Header_Expires$ To "Expires"
Equ Inet_Header_Status$ To "Status"
Equ Inet_Header_Content_Encoding$ To "Content-Encoding"
Equ inet_default_content_type$ To "text/html; charset=utf-8"
Equ inet_default_server$ To "OpenInsight"
Equ inet_default_status$ To "200"
Equ inet_content_type_html$ To "text/html"
Equ inet_content_type_xml$ To "text/xml"
Equ inet_content_type_json$ To "application/json"
Equ inet_content_type_plain$ To "text/plain"
Equ inet_content_type_csv$ To "text/csv"
Equ inet_content_type_zip$ To "application/x-zip"
Equ inet_content_type_pdf$ To "application/pdf"
Equ inet_content_type_gif$ To "image/gif"
Equ inet_content_type_binary$ To "application/octet-stream"
Equ inet_content_encoding_none$ to "identity"
Equ inet_content_encoding_gzip$ To "gzip"
Equ inet_content_encoding_deflate$ To "deflate"
Declare Subroutine inetAPI_setContentType, inetAPI_setCookie, inetAPI_setRedirect, inetAPI_setStatus, inetAPI_setNoCache