Check-in [9a2a491ee9]

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: 9a2a491ee967f17a07ac48c989fb50e74bc39e8a
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
Hide Diffs Side-by-Side Diffs Ignore Whitespace Patch

Changes to compile.sh.

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
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 \
  core/request.bas \
  core/dates.bas \
  core/system.bas \
  core/http.bas \
  core/pages.bas \
  core/templates.bas \
  core/modules.bas \
  core/sendmail.bas \
  index.bas"
libsfiles="\
  libs/cgi.bas \
  libs/sha256.bas \
  libs/base64.bas \
  libs/json-parser.bas \
  libs/json-generator.bas \
  libs/sha256.bas"
  libs/mailer.bas"
modulefiles="\
  modules/admin.bas \
  modules/blog.bas \
  modules/publisher.bas \
  modules/profile.bas \
  modules/contact.bas \
  modules/users.bas"

fbc -prefix ${FB_PREFIX} -m index -x index -static ${corefiles} ${libsfiles} \
${modulefiles} && echo 'Finished'

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