Many hyperlinks are disabled.
Use anonymous login
to enable hyperlinks.
Overview
Comment: | [MAIN][LIBS] - Update linux compiler script, also insert conditionals for windows-specific code. This should allow to compile in linux, dedicated to FreeBasic forum. |
---|---|
Downloads: | Tarball | ZIP archive | SQL archive |
Timelines: | family | ancestors | descendants | both | trunk |
Files: | files | file ages | folders |
SHA1: |
9a2a491ee967f17a07ac48c989fb50e7 |
User & Date: | julcar 2021-05-16 18:26:22 |
Context
2021-05-22
| ||
08:21 | [LIBS] - Remove failed attempt to link against a deprecated API. check-in: 2521b322b4 user: julcar tags: trunk | |
2021-05-16
| ||
18:26 | [MAIN][LIBS] - Update linux compiler script, also insert conditionals for windows-specific code. This should allow to compile in linux, dedicated to FreeBasic forum. check-in: 9a2a491ee9 user: julcar tags: trunk | |
03:13 | [DATA][CORE] - Allow to use localized strings in menu titles. check-in: 2b6060bf8d user: julcar tags: trunk | |
Changes
Changes to compile.sh.
1 2 3 4 5 6 7 8 9 | 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 | - - + + + + - + - + + | echo 'IguanaCMS Build Script' #Set the prefix path FB_PREFIX='/usr/local/' #List of core src files corefiles="\ core/files.bas \ core/strings.bas \ |
Changes to libs/libs.bi.
1 2 3 4 5 6 7 8 | 1 2 3 4 5 6 7 8 9 10 | + + | #INCLUDE "cgi.bi" #INCLUDE "json.bi" #IFDEF __FB_WIN32__ #INCLUDE "wsa.bi" #ENDIF #INCLUDE "mailer.bi" DECLARE FUNCTION SHA256(BYVAL Message AS STRING, BYVAL RawOutput AS BYTE = 0) AS STRING DECLARE FUNCTION Base64Encode(RawData AS STRING) AS STRING DECLARE FUNCTION Base64Decode(EncodedStr AS STRING) AS STRING |
Changes to libs/mailer.bas.
1 2 3 4 5 6 7 8 9 10 11 | 1 2 3 4 5 6 7 8 9 10 11 12 | + | #INCLUDE "libs.bi" SUB Mailer(Headers() AS STRING, Server() AS STRING) DIM Connection AS LONG, Response AS STRING #IFDEF __FB_WIN32__ IF WSA_Init() THEN Connection = WSA_Connect(Server(SMTP_IP_ADDR), VALINT(Server(SMTP_PORT))) IF Connection > 0 THEN IF WSA_Write(Connection, "EHLO " + Server(SMTP_HOST_NAME) + CHR(13, 10)) THEN Response = WSA_Read(Connection) END IF IF LEFT(Response, 3) <> "250" THEN |
︙ | |||
39 40 41 42 43 44 45 46 | 40 41 42 43 44 45 46 47 48 | + | WSA_Disconnect(Connection) END IF WSA_Terminate() END IF ELSE 'WSAGetLastError() END IF #ENDIF END SUB |