Print Page - Apple Swift on Ubuntu

Title: Apple Swift on Ubuntu
Post by: John on December 03, 2015, 08:11:04 PM

(http://www.itrunsonlinux.com/wp-content/uploads/2015/06/Apple_supports_Linux_with_Swift.png)

Introduction to Open Source Swift on Linux (http://www.raywenderlich.com/122189/introduction-to-open-source-swift-on-linux)

Swift Project Site (https://swift.org/) (pre-built binaries for Apple Xcode, Ubuntu 64 bit 14.04 & 15.10)

The Swift Programming Language (Swift 2.1) (https://developer.apple.com/library/prerelease/ios/documentation/Swift/Conceptual/Swift_Programming_Language/TheBasics.html#//apple_ref/doc/uid/TP40014097-CH5-ID309)

swift-corelibs-foundation (https://github.com/apple/swift-corelibs-foundation/search?p=1&q=NSUnimplemented&utf8=%E2%9C%93) Linux version of the foundation import functions created to date on Github

Implementation Status (https://github.com/apple/swift-corelibs-foundation/blob/master/Docs/Status.md) - What works and what doesn't.

Swift Github Repository (https://github.com/apple/swift)

Code: [Select]

Welcome to Swift version 2.2-dev (LLVM 46be9ff861, Clang 4deb154edc, Swift 778f82939c). Type :help for assistance.
  1> :help

The REPL (Read-Eval-Print-Loop) acts like an interpreter.  Valid statements, expressions, and declarations are immediately compiled
and executed.

The complete set of LLDB debugging commands are also available as described below.  Commands must be prefixed with a colon at the
REPL prompt (:quit for example.)  Typing just a colon followed by return will switch to the LLDB prompt.

Debugger commands:

  apropos           -- Find a list of debugger commands related to a particular word/subject.
  breakpoint        -- A set of commands for operating on breakpoints. Also see _regexp-break.
  bugreport         -- Set of commands for creating domain specific bugreports.
  command           -- A set of commands for managing or customizing the debugger commands.
  disassemble       -- Disassemble bytes in the current function, or elsewhere in the executable program as specified by the user.
  expression        -- Evaluate an expression (ObjC++ or Swift) in the current program context, using user defined variables and
                       variables currently in scope.
  frame             -- A set of commands for operating on the current thread's frames.
  gdb-remote        -- Connect to a remote GDB server.  If no hostname is provided, localhost is assumed.
  gui               -- Switch into the curses based GUI mode.
  help              -- Show a list of all debugger commands, or give details about specific commands.
  kdp-remote        -- Connect to a remote KDP server.  udp port 41139 is the default port number.
  language          -- A set of commands for managing language-specific functionality.'.
  log               -- A set of commands for operating on logs.
  memory            -- A set of commands for operating on memory.
  platform          -- A set of commands to manage and create platforms.
  plugin            -- A set of commands for managing or customizing plugin commands.
  process           -- A set of commands for operating on a process.
  quit              -- Quit out of the LLDB debugger.
  register          -- A set of commands to access thread registers.
  script            -- Pass an expression to the script interpreter for evaluation and return the results. Drop into the
                       interactive interpreter if no expression is given.
  settings          -- A set of commands for manipulating internal settable debugger variables.
  source            -- A set of commands for accessing source file information
  target            -- A set of commands for operating on debugger targets.
  thread            -- A set of commands for operating on one or more threads within a running process.
  type              -- A set of commands for operating on the type system
  version           -- Show version of LLDB debugger.
  watchpoint        -- A set of commands for operating on watchpoints.

Current command abbreviations (type ':help command alias' for more info):

  add-dsym  -- ('target symbols add')  Add a debug symbol file to one of the target's current modules by specifying a path to a
               debug symbols file, or using the options to specify a module to download symbols for.
  attach    -- ('_regexp-attach')  Attach to a process id if in decimal, otherwise treat the argument as a process name to attach
               to.
  b         -- ('_regexp-break')  Set a breakpoint using a regular expression to specify the location, where <linenum> is in
               decimal and <address> is in hex.
  bt        -- ('_regexp-bt')  Show a backtrace.  An optional argument is accepted; if that argument is a number, it specifies the
               number of frames to display.  If that argument is 'all', full backtraces of all threads are displayed.
  c         -- ('process continue')  Continue execution of all threads in the current process.
  call      -- ('expression --')  Evaluate an expression (ObjC++ or Swift) in the current program context, using user defined
               variables and variables currently in scope.
  continue  -- ('process continue')  Continue execution of all threads in the current process.
  detach    -- ('process detach')  Detach from the current process being debugged.
  di        -- ('disassemble')  Disassemble bytes in the current function, or elsewhere in the executable program as specified by
               the user.
  dis       -- ('disassemble')  Disassemble bytes in the current function, or elsewhere in the executable program as specified by
               the user.
  display   -- ('_regexp-display')  Add an expression evaluation stop-hook.
  down      -- ('_regexp-down')  Go down "n" frames in the stack (1 frame by default).
  env       -- ('_regexp-env')  Implements a shortcut to viewing and setting environment variables.
  exit      -- ('quit')  Quit out of the LLDB debugger.
  f         -- ('frame select')  Select a frame by index from within the current thread and make it the current frame.
  file      -- ('target create')  Create a target using the argument as the main executable.
  finish    -- ('thread step-out')  Finish executing the function of the currently selected frame and return to its call site in
               specified thread (current thread, if none specified).
  image     -- ('target modules')  A set of commands for accessing information for one or more target modules.
  j         -- ('_regexp-jump')  Sets the program counter to a new address.
  jump      -- ('_regexp-jump')  Sets the program counter to a new address.
  kill      -- ('process kill')  Terminate the current process being debugged.
  l         -- ('_regexp-list')  Implements the GDB 'list' command in all of its forms except FILE:FUNCTION and maps them to the
               appropriate 'source list' commands.
  list      -- ('_regexp-list')  Implements the GDB 'list' command in all of its forms except FILE:FUNCTION and maps them to the
               appropriate 'source list' commands.
  n         -- ('thread step-over')  Source level single step in specified thread (current thread, if none specified), stepping
               over calls.
  next      -- ('thread step-over')  Source level single step in specified thread (current thread, if none specified), stepping
               over calls.
  nexti     -- ('thread step-inst-over')  Single step one instruction in specified thread (current thread, if none specified),
               stepping over calls.
  ni        -- ('thread step-inst-over')  Single step one instruction in specified thread (current thread, if none specified),
               stepping over calls.
  p         -- ('expression --')  Evaluate an expression (ObjC++ or Swift) in the current program context, using user defined
               variables and variables currently in scope.
  po        -- ('expression -O  -- ')  Evaluate an expression (ObjC++ or Swift) in the current program context, using user defined
               variables and variables currently in scope.
  print     -- ('expression --')  Evaluate an expression (ObjC++ or Swift) in the current program context, using user defined
               variables and variables currently in scope.
  q         -- ('quit')  Quit out of the LLDB debugger.
  r         -- ('process launch -X true --')  Launch the executable in the debugger.
  rbreak    -- ('breakpoint set -r %1')  Sets a breakpoint or set of breakpoints in the executable.
  repl      -- ('expression -r  -- ')  Evaluate an expression (ObjC++ or Swift) in the current program context, using user defined
               variables and variables currently in scope.
  run       -- ('process launch -X true --')  Launch the executable in the debugger.
  s         -- ('thread step-in')  Source level single step in specified thread (current thread, if none specified).
  si        -- ('thread step-inst')  Single step one instruction in specified thread (current thread, if none specified).
  step      -- ('thread step-in')  Source level single step in specified thread (current thread, if none specified).
  stepi     -- ('thread step-inst')  Single step one instruction in specified thread (current thread, if none specified).
  t         -- ('thread select')  Select a thread as the currently active thread.
  tbreak    -- ('_regexp-tbreak')  Set a one shot breakpoint using a regular expression to specify the location, where <linenum> is
               in decimal and <address> is in hex.
  undisplay -- ('_regexp-undisplay')  Remove an expression evaluation stop-hook.
  up        -- ('_regexp-up')  Go up "n" frames in the stack (1 frame by default).
  x         -- ('memory read')  Read from the memory of the process being debugged.

For more information on any command, type ':help <command-name>'.
  1> let sb="Script BASIC"
sb: String = "Script BASIC"
  2> print(sb)
Script BASIC
  3> import Glibc
  4> random() % 10
$R0: Int = 3
  5>

jrs@laptop:~/Swift/swift-2.2-SNAPSHOT-2015-12-01-b-ubuntu14.04/usr/bin$ ls -l total 144920 lrwxrwxrwx 1 jrs jrs 10 Dec 2 12:14 lldb -> lldb-3.8.0 -rwxr-xr-x 1 jrs jrs 56975 Dec 2 12:10 lldb-3.8.0 -rwxr-xr-x 1 jrs jrs 86550 Dec 2 12:10 lldb-argdumper lrwxrwxrwx 1 jrs jrs 13 Dec 2 12:14 lldb-mi -> lldb-mi-3.8.0 -rwxr-xr-x 1 jrs jrs 929212 Dec 2 12:10 lldb-mi-3.8.0 lrwxrwxrwx 1 jrs jrs 17 Dec 2 12:14 lldb-server -> lldb-server-3.8.0 -rwxr-xr-x 1 jrs jrs 63360159 Dec 2 12:10 lldb-server-3.8.0 -rwxr-xr-x 1 jrs jrs 9177 Dec 2 12:09 repl_swift -rwxr-xr-x 1 jrs jrs 73628082 Dec 2 12:01 swift lrwxrwxrwx 1 jrs jrs 5 Dec 2 12:14 swift-autolink-extract -> swift -rwxr-xr-x 1 jrs jrs 1742176 Dec 2 12:14 swift-build -rwxr-xr-x 1 jrs jrs 7702803 Dec 2 12:10 swift-build-tool lrwxrwxrwx 1 jrs jrs 5 Dec 2 12:14 swiftc -> swift -rwxr-xr-x 1 jrs jrs 857140 Dec 2 12:00 swift-demangle jrs@laptop:~/Swift/swift-2.2-SNAPSHOT-2015-12-01-b-ubuntu14.04/usr/bin$

Code: Text

jrs@laptop:~/Swift$ swift
Welcome to Swift version 2.2-dev (LLVM 46be9ff861, Clang 4deb154edc, Swift 778f82939c). Type :help for assistance.
  1>  
  2.  
  3.     extension Double { 
  4.         var km: Double { return self * 1_000.0 } 
  5.         var m: Double { return self } 
  6.         var cm: Double { return self / 100.0 } 
  7.         var mm: Double { return self / 1_000.0 } 
  8.         var ft: Double { return self / 3.28084 } 
  9.     } 
 10.     let oneInch = 25.4.mm 
 11.     print("One inch is \(oneInch) meters") 
 12.     // prints "One inch is 0.0254 meters" 
 13.     let threeFeet = 3.ft 
 14.     print("Three feet is \(threeFeet) meters") 
 15.     // prints "Three feet is 0.914399970739201 meters" 
 16.  
One inch is 0.0254 meters
Three feet is 0.914399970739201 meters
oneInch: Double = 0.025399999999999999
threeFeet: Double = 0.91439997073920098
 16>
 17> :platform list
Available platforms:
host: Local Linux user platform plug-in.
remote-freebsd: Remote FreeBSD user platform plug-in.
remote-linux: Remote Linux user platform plug-in.
remote-windows: Remote Windows user platform plug-in.
kalimba: Kalimba user platform plug-in.
remote-android: Remote Android user platform plug-in.
remote-ios: Remote iOS platform plug-in.
remote-macosx: Remote Mac OS X user platform plug-in.
remote-gdb-server: A platform that uses the GDB remote protocol as the communication transport.
 17>  
  
 

A compiled Hello World is 14,457 bytes in size. (release mode)

Title: Re: Apple Swift on Ubuntu
Post by: wangrenxin on December 03, 2015, 10:34:50 PM

Nice! I like the programming paradigm in Swift as a video game developer. It would be attractive if someone would port it to Windows too; or re-create a clone as IronPython, IronRuby do.

Title: Re: Apple Swift on Ubuntu
Post by: John on December 03, 2015, 10:51:46 PM

I'm happy. Swift goals sound like it's talking about Script BASIC. :)

Swift reminds me of CERN ROOT in BASIC scripting clothing.

It seems most of the code examples from the Apple iOS Swift docs seem to work in the Linux version.

Title: Re: Apple Swift on Ubuntu
Post by: John on December 04, 2015, 10:05:35 PM

I have been digging around for info on a GUI IDE like Xcode but nothing exists that I can find. Here (https://precompile.com/2015/07/09/swift-platform.html) is some info on the topic.

The curses GUI debugger is a start.

Title: Re: Apple Swift on Ubuntu
Post by: John on December 05, 2015, 12:34:05 PM

Introducing the IBM Swift Sandbox (https://developer.ibm.com/swift/2015/12/03/introducing-the-ibm-swift-sandbox/)

(http://developer.ibm.com/swift/wp-content/uploads/sites/69/2015/12/Screen-Shot-2015-12-04-at-7.26.25-AM-1024x391.png)

Quote

The IBM Swift Sandbox is an interactive website that lets you write Swift code and execute it in a server environment – on top of Linux! Each sandbox runs on IBM Cloud in a Docker container. In addition, both the latest versions of Swift and its standard library are available for you to use.

Title: Re: Apple Swift on Ubuntu - Fibonacci Benchmark
Post by: John on December 05, 2015, 03:05:21 PM

Here is a comparison between Swift, Script BASIC and C BASIC.

Code: Text

/* Basic fibonacci function in swift.
   Demostrates func calls and recursion.
*/
 
func fibonacci(i: Int) -> Int {
    if i <= 2 {
        return 1
    } else {
        return fibonacci(i - 1) + fibonacci(i - 2)
    }
}
 
print(fibonacci(32))
 

Swift JIT
jrs@laptop:~/Swift/usr/share/examples$ time swift fibonacci.swift 2178309 real 0m0.121s user 0m0.077s sys 0m0.040s jrs@laptop:~/Swift/usr/share/examples$

Swift compiled (13,644 bytes)
jrs@laptop:~/Swift/usr/share/examples$ swiftc fibonacci.swift -o fibonacci jrs@laptop:~/Swift/usr/share/examples$ time ./fibonacci 2178309 real 0m0.039s user 0m0.038s sys 0m0.000s jrs@laptop:~/Swift/usr/share/examples$

Code: ScriptBasic

FUNCTION Fibonacci(n)
  IF n <= 2 THEN
    Fibonacci = 1
  ELSE
    Fibonacci = Fibonacci(n - 1) + Fibonacci(n - 2)
  END IF
END FUNCTION
 
PRINT Fibonacci(32),"\n"
 

jrs@laptop:~/sb/sb22/test$ time scriba fibonacci.sb 2178309 real 0m3.662s user 0m3.656s sys 0m0.004s jrs@laptop:~/sb/sb22/test$

C BASIC (8,597 bytes)

Code: C

#include <stdio.h>
#include "cbasic.h"
 
FUNCTION int Fibonacci(int i)
BEGIN_FUNCTION
  IF (i <= 2) THEN
    RETURN_FUNCTION(1);
  ELSE
    RETURN_FUNCTION(Fibonacci(i - 1) + Fibonacci(i - 2));
  END_IF
END_FUNCTION
 
MAIN
BEGIN_FUNCTION
  PRINT ("%i\n",Fibonacci(32));
END_FUNCTION
 

jrs@laptop:~/c_code$ gcc -O2 fibonacci.c -o fibonacci jrs@laptop:~/c_code$ time ./fibonacci 2178309 real 0m0.018s user 0m0.018s sys 0m0.000s jrs@laptop:~/c_code$

Title: Re: Apple Swift on Ubuntu - Client / Server
Post by: John on December 05, 2015, 10:13:48 PM

Code: Text

/* Creates a server that is bound to a socket to listen for incoming
   connections. Also creates a client which sends a "Hello world"
   message to server. Shows how servers can be made in Swift.
*/
 
#if os(OSX) || os(iOS) || os(watchOS) || os(tvOS)
    import Darwin
#else
    import Glibc
#endif
 
func make_socket (port:UInt16) -> Int32
{
    var name = sockaddr_in()
    
    // Create the socket
    let sock = socket (PF_INET, 1, 0)
    if sock < 0 {
        perror ("socket")
        exit (EXIT_FAILURE)
    }
        
        // Make the address reusable for multiple runs
        var on: Int32 = 1
        setsockopt(sock, SOL_SOCKET, SO_REUSEADDR, &on, socklen_t(sizeof(Int32)))
        
    // Give the socket a name
    name.sin_family = sa_family_t(AF_INET)
    name.sin_port = UInt16(port).bigEndian
        
        // INADDR_ANY which equals 0
    name.sin_addr.s_addr = in_addr_t(0)
 
        var bindAddr = sockaddr()
        memcpy(&bindAddr, &name, Int(sizeof(sockaddr_in)))
        let addrSize: socklen_t = socklen_t(sizeof(sockaddr_in))
        
        // Bind name to socket
        if bind(sock, &bindAddr, addrSize) < 0 {
                perror("bind")
                exit(EXIT_FAILURE)
        }
        
    return sock
}
 
func read_from_client (filedes: Int32) -> Int
{
    let buffer = UnsafeMutablePointer<UInt8>.alloc(255)
    
    let nbytes = read (filedes, buffer, 255)
    if nbytes < 0 {
        // Read error
        perror ("read")
        exit (EXIT_FAILURE)
    }
    else if (nbytes == 0) {
        // End-of-file
        buffer.dealloc(255)
        return -1;
    }
    else {
        // Data read
        var message = ""
        for i in 0..<nbytes {
            message += String(UnicodeScalar((buffer+i).memory))
        }
        print ( "Server: got message: " + message)
        buffer.dealloc(255)
        return 0
    }
}
 
#if os(Linux)
        
        /// Replacement for FD_ZERO macro
        
        func fdZero(inout set: fd_set) {
                set.__fds_bits = (0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0)
        }
        
        
        /// Replacement for FD_SET macro
        
        func fdSet(fd: Int32, inout set: fd_set) {
                let intOffset = Int(fd / 16)
                let bitOffset: Int = Int(fd % 16)
                let mask: Int = 1 << bitOffset
                switch intOffset {
                case 0: set.__fds_bits.0 = set.__fds_bits.0 | mask
                case 1: set.__fds_bits.1 = set.__fds_bits.1 | mask
                case 2: set.__fds_bits.2 = set.__fds_bits.2 | mask
                case 3: set.__fds_bits.3 = set.__fds_bits.3 | mask
                case 4: set.__fds_bits.4 = set.__fds_bits.4 | mask
                case 5: set.__fds_bits.5 = set.__fds_bits.5 | mask
                case 6: set.__fds_bits.6 = set.__fds_bits.6 | mask
                case 7: set.__fds_bits.7 = set.__fds_bits.7 | mask
                case 8: set.__fds_bits.8 = set.__fds_bits.8 | mask
                case 9: set.__fds_bits.9 = set.__fds_bits.9 | mask
                case 10: set.__fds_bits.10 = set.__fds_bits.10 | mask
                case 11: set.__fds_bits.11 = set.__fds_bits.11 | mask
                case 12: set.__fds_bits.12 = set.__fds_bits.12 | mask
                case 13: set.__fds_bits.13 = set.__fds_bits.13 | mask
                case 14: set.__fds_bits.14 = set.__fds_bits.14 | mask
                case 15: set.__fds_bits.15 = set.__fds_bits.15 | mask
                default: break
                }
        }
        
        
        /// Replacement for FD_CLR macro
        
        func fdClr(fd: Int32, inout set: fd_set) {
                let intOffset = Int(fd / 16)
                let bitOffset: Int = Int(fd % 16)
                let mask: Int = ~(1 << bitOffset)
                switch intOffset {
                case 0: set.__fds_bits.0 = set.__fds_bits.0 & mask
                case 1: set.__fds_bits.1 = set.__fds_bits.1 & mask
                case 2: set.__fds_bits.2 = set.__fds_bits.2 & mask
                case 3: set.__fds_bits.3 = set.__fds_bits.3 & mask
                case 4: set.__fds_bits.4 = set.__fds_bits.4 & mask
                case 5: set.__fds_bits.5 = set.__fds_bits.5 & mask
                case 6: set.__fds_bits.6 = set.__fds_bits.6 & mask
                case 7: set.__fds_bits.7 = set.__fds_bits.7 & mask
                case 8: set.__fds_bits.8 = set.__fds_bits.8 & mask
                case 9: set.__fds_bits.9 = set.__fds_bits.9 & mask
                case 10: set.__fds_bits.10 = set.__fds_bits.10 & mask
                case 11: set.__fds_bits.11 = set.__fds_bits.11 & mask
                case 12: set.__fds_bits.12 = set.__fds_bits.12 & mask
                case 13: set.__fds_bits.13 = set.__fds_bits.13 & mask
                case 14: set.__fds_bits.14 = set.__fds_bits.14 & mask
                case 15: set.__fds_bits.15 = set.__fds_bits.15 & mask
                default: break
                }
        }
        
        
        /// Replacement for FD_ISSET macro
        
        func fdIsSet(fd: Int32, inout set: fd_set) -> Bool {
                let intOffset = Int(fd / 16)
                let bitOffset = Int(fd % 16)
                let mask: Int = 1 << bitOffset
                switch intOffset {
                case 0: return set.__fds_bits.0 & mask != 0
                case 1: return set.__fds_bits.1 & mask != 0
                case 2: return set.__fds_bits.2 & mask != 0
                case 3: return set.__fds_bits.3 & mask != 0
                case 4: return set.__fds_bits.4 & mask != 0
                case 5: return set.__fds_bits.5 & mask != 0
                case 6: return set.__fds_bits.6 & mask != 0
                case 7: return set.__fds_bits.7 & mask != 0
                case 8: return set.__fds_bits.8 & mask != 0
                case 9: return set.__fds_bits.9 & mask != 0
                case 10: return set.__fds_bits.10 & mask != 0
                case 11: return set.__fds_bits.11 & mask != 0
                case 12: return set.__fds_bits.12 & mask != 0
                case 13: return set.__fds_bits.13 & mask != 0
                case 14: return set.__fds_bits.14 & mask != 0
                case 15: return set.__fds_bits.15 & mask != 0
                default: return false
                }
                
        }
        
#else
        
        /// Replacement for FD_ZERO macro
        
        func fdZero(inout set: fd_set) {
                set.fds_bits = (0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0)
        }
        
        
        /// Replacement for FD_SET macro
        
        func fdSet(fd: Int32, inout set: fd_set) {
                let intOffset = Int(fd / 32)
                let bitOffset = fd % 32
                let mask = 1 << bitOffset
                switch intOffset {
                case 0: set.fds_bits.0 = set.fds_bits.0 | mask
                case 1: set.fds_bits.1 = set.fds_bits.1 | mask
                case 2: set.fds_bits.2 = set.fds_bits.2 | mask
                case 3: set.fds_bits.3 = set.fds_bits.3 | mask
                case 4: set.fds_bits.4 = set.fds_bits.4 | mask
                case 5: set.fds_bits.5 = set.fds_bits.5 | mask
                case 6: set.fds_bits.6 = set.fds_bits.6 | mask
                case 7: set.fds_bits.7 = set.fds_bits.7 | mask
                case 8: set.fds_bits.8 = set.fds_bits.8 | mask
                case 9: set.fds_bits.9 = set.fds_bits.9 | mask
                case 10: set.fds_bits.10 = set.fds_bits.10 | mask
                case 11: set.fds_bits.11 = set.fds_bits.11 | mask
                case 12: set.fds_bits.12 = set.fds_bits.12 | mask
                case 13: set.fds_bits.13 = set.fds_bits.13 | mask
                case 14: set.fds_bits.14 = set.fds_bits.14 | mask
                case 15: set.fds_bits.15 = set.fds_bits.15 | mask
                case 16: set.fds_bits.16 = set.fds_bits.16 | mask
                case 17: set.fds_bits.17 = set.fds_bits.17 | mask
                case 18: set.fds_bits.18 = set.fds_bits.18 | mask
                case 19: set.fds_bits.19 = set.fds_bits.19 | mask
                case 20: set.fds_bits.20 = set.fds_bits.20 | mask
                case 21: set.fds_bits.21 = set.fds_bits.21 | mask
                case 22: set.fds_bits.22 = set.fds_bits.22 | mask
                case 23: set.fds_bits.23 = set.fds_bits.23 | mask
                case 24: set.fds_bits.24 = set.fds_bits.24 | mask
                case 25: set.fds_bits.25 = set.fds_bits.25 | mask
                case 26: set.fds_bits.26 = set.fds_bits.26 | mask
                case 27: set.fds_bits.27 = set.fds_bits.27 | mask
                case 28: set.fds_bits.28 = set.fds_bits.28 | mask
                case 29: set.fds_bits.29 = set.fds_bits.29 | mask
                case 30: set.fds_bits.30 = set.fds_bits.30 | mask
                case 31: set.fds_bits.31 = set.fds_bits.31 | mask
                default: break
                }
        }
        
        
        /// Replacement for FD_CLR macro
        
        func fdClr(fd: Int32, inout set: fd_set) {
                let intOffset = Int(fd / 32)
                let bitOffset = fd % 32
                let mask = ~(1 << bitOffset)
                switch intOffset {
                case 0: set.fds_bits.0 = set.fds_bits.0 & mask
                case 1: set.fds_bits.1 = set.fds_bits.1 & mask
                case 2: set.fds_bits.2 = set.fds_bits.2 & mask
                case 3: set.fds_bits.3 = set.fds_bits.3 & mask
                case 4: set.fds_bits.4 = set.fds_bits.4 & mask
                case 5: set.fds_bits.5 = set.fds_bits.5 & mask
                case 6: set.fds_bits.6 = set.fds_bits.6 & mask
                case 7: set.fds_bits.7 = set.fds_bits.7 & mask
                case 8: set.fds_bits.8 = set.fds_bits.8 & mask
                case 9: set.fds_bits.9 = set.fds_bits.9 & mask
                case 10: set.fds_bits.10 = set.fds_bits.10 & mask
                case 11: set.fds_bits.11 = set.fds_bits.11 & mask
                case 12: set.fds_bits.12 = set.fds_bits.12 & mask
                case 13: set.fds_bits.13 = set.fds_bits.13 & mask
                case 14: set.fds_bits.14 = set.fds_bits.14 & mask
                case 15: set.fds_bits.15 = set.fds_bits.15 & mask
                case 16: set.fds_bits.16 = set.fds_bits.16 & mask
                case 17: set.fds_bits.17 = set.fds_bits.17 & mask
                case 18: set.fds_bits.18 = set.fds_bits.18 & mask
                case 19: set.fds_bits.19 = set.fds_bits.19 & mask
                case 20: set.fds_bits.20 = set.fds_bits.20 & mask
                case 21: set.fds_bits.21 = set.fds_bits.21 & mask
                case 22: set.fds_bits.22 = set.fds_bits.22 & mask
                case 23: set.fds_bits.23 = set.fds_bits.23 & mask
                case 24: set.fds_bits.24 = set.fds_bits.24 & mask
                case 25: set.fds_bits.25 = set.fds_bits.25 & mask
                case 26: set.fds_bits.26 = set.fds_bits.26 & mask
                case 27: set.fds_bits.27 = set.fds_bits.27 & mask
                case 28: set.fds_bits.28 = set.fds_bits.28 & mask
                case 29: set.fds_bits.29 = set.fds_bits.29 & mask
                case 30: set.fds_bits.30 = set.fds_bits.30 & mask
                case 31: set.fds_bits.31 = set.fds_bits.31 & mask
                default: break
                }
        }
        
        
        /// Replacement for FD_ISSET macro
        
        func fdIsSet(fd: Int32, inout set: fd_set) -> Bool {
                let intOffset = Int(fd / 32)
                let bitOffset = fd % 32
                let mask = 1 << bitOffset
                switch intOffset {
                case 0: return set.fds_bits.0 & mask != 0
                case 1: return set.fds_bits.1 & mask != 0
                case 2: return set.fds_bits.2 & mask != 0
                case 3: return set.fds_bits.3 & mask != 0
                case 4: return set.fds_bits.4 & mask != 0
                case 5: return set.fds_bits.5 & mask != 0
                case 6: return set.fds_bits.6 & mask != 0
                case 7: return set.fds_bits.7 & mask != 0
                case 8: return set.fds_bits.8 & mask != 0
                case 9: return set.fds_bits.9 & mask != 0
                case 10: return set.fds_bits.10 & mask != 0
                case 11: return set.fds_bits.11 & mask != 0
                case 12: return set.fds_bits.12 & mask != 0
                case 13: return set.fds_bits.13 & mask != 0
                case 14: return set.fds_bits.14 & mask != 0
                case 15: return set.fds_bits.15 & mask != 0
                case 16: return set.fds_bits.16 & mask != 0
                case 17: return set.fds_bits.17 & mask != 0
                case 18: return set.fds_bits.18 & mask != 0
                case 19: return set.fds_bits.19 & mask != 0
                case 20: return set.fds_bits.20 & mask != 0
                case 21: return set.fds_bits.21 & mask != 0
                case 22: return set.fds_bits.22 & mask != 0
                case 23: return set.fds_bits.23 & mask != 0
                case 24: return set.fds_bits.24 & mask != 0
                case 25: return set.fds_bits.25 & mask != 0
                case 26: return set.fds_bits.26 & mask != 0
                case 27: return set.fds_bits.27 & mask != 0
                case 28: return set.fds_bits.28 & mask != 0
                case 29: return set.fds_bits.29 & mask != 0
                case 30: return set.fds_bits.30 & mask != 0
                case 31: return set.fds_bits.31 & mask != 0
                default: return false
                }
                
        }
        
#endif
 
// Create server socket
let s = make_socket(10800)
// Listen on socket with queue of 1
listen(s,1)
 
// Create client file
system("touch client.swift")
// Open writer to client file
let stream = fopen("client.swift", "r+")
// Client code: creates socket and sends message to port 10800 (the server)
let program = "#if os(OSX) || os(iOS) || os(watchOS) || os(tvOS)\n import Darwin\n #else\n import Glibc\n#endif\n func make_socket (port:UInt16) -> Int32 { \n" +
    "var name = sockaddr_in() \n let sock = socket (PF_INET, 1, 0) \n" +
    "name.sin_family = sa_family_t(AF_INET) \n name.sin_port = UInt16(port).bigEndian \n" +
    "name.sin_addr.s_addr = in_addr_t(0) \n withUnsafePointer(&name) { unsafePointer in \n" +
    "bind (sock, UnsafePointer.init( unsafePointer), UInt32(Int(sizeof (sockaddr_in)))) \n" +
    "} \n return sock } \n" +
    "let s2 = make_socket(49152) \n var name = sockaddr_in() \n" +
    "name.sin_family = sa_family_t(AF_INET) \n name.sin_port = UInt16(10800).bigEndian \n" +
    "name.sin_addr.s_addr = in_addr_t(0)  \n withUnsafePointer(&name) { unsafePointer in \n" +
    "connect(s2,UnsafePointer.init( unsafePointer),UInt32(Int(sizeof (sockaddr_in)))) \n" +
    "let message = \"Hello World\" \n write(s2,message,message.characters.count) \n" +
"close(s2) \n }"
fwrite(program,1,program.characters.count,stream)
fclose(stream)
 
// starts REPL to run client code
system("swift client.swift")
 
var active_fd_set = fd_set()
 
// Initialize the set of active sockets
fdSet(s, set: &active_fd_set)
 
#if !os(Linux)
let FD_SETSIZE = Int32(1024)    // On OS X, FD_SETSIZE is 1024
#endif
 
var clientname = sockaddr_in ()
var t = 0
while t == 0 {
    
    // Block until input arrives on one or more active sockets
    var read_fd_set = active_fd_set;
    select (FD_SETSIZE, &read_fd_set, nil, nil, nil)
    // Service all the sockets with input pending
    for i in 0..<FD_SETSIZE {
        if fdIsSet(i,set: &read_fd_set) {
            if i == s {
                // Connection request on original socket
                var size = sizeof (sockaddr_in)
                // Accept request and assign socket
                withUnsafeMutablePointers(&clientname,&size) { up1, up2 in
                    var new = accept (s,
                        UnsafeMutablePointer(up1),
                        UnsafeMutablePointer(up2))
                    print("Server: connect from host " + String(inet_ntoa (clientname.sin_addr)) + ", port " + String(UInt16(clientname.sin_port).bigEndian))
                    fdSet (new, set: &active_fd_set)
                }
                
            }
            else {
                // Data arriving on an already-connected socket
                if read_from_client (i) < 0 {
                    // Read complete, close socket
                    close (i)
                    fdClr (i, set: &active_fd_set)
                    t = 1
                }
            }
        }
    }
}
 

jrs@laptop:~/Swift/usr/share/examples$ swift server.swift Server: connect from host 0x00007fa3eae6d718, port 49152 Server: got message: Hello World jrs@laptop:~/Swift/usr/share/examples$

Title: Apple Swift on Ubuntu - Swift IUP
Post by: John on December 07, 2015, 07:25:42 PM

Here is a Hello World with IUP.

(http://files.allbasic.info/Swift/hwdialog.png)

Code: Text

import Foundation
import Glibc
 
IupOpen(nil, nil)
 
IupMessage("Swift IUP", "Hello world from IUP.")
  
IupClose()

jrs@laptop:~/Swift/usr/share/examples$ swiftc iup.swift -import-objc-header /usr/include/iup/iup.h -liup -o swiftiup jrs@laptop:~/Swift/usr/share/examples$ ./swiftiup

PS

Thanks AIR for the nil tip!

Title: Re: Apple Swift on Ubuntu - Callback Functions
Post by: John on December 08, 2015, 12:48:22 AM

I'm investigating how to create IUP callback functions in Swift. I found this article but it assumes I'm doing this on the Apple version. :(

C Callbacks in Swift (http://oleb.net/blog/2015/06/c-callbacks-in-swift/)

Feel free to chime in if you have any ideas.

Title: Re: Apple Swift on Ubuntu
Post by: AIR on December 08, 2015, 04:57:50 PM

Using Leagacy C APIs with Swift (http://www.sitepoint.com/using-legacy-c-apis-swift/)

Title: Re: Apple Swift on Ubuntu
Post by: John on December 08, 2015, 05:16:50 PM

Thanks AIR!

Great info on Swift C pointer declarations and use. I didn't notice anything about defining callback functions though. Any ideas on that topic?

Title: Re: Apple Swift on Ubuntu
Post by: AIR on December 08, 2015, 06:05:51 PM

Just guessing here. Using an IupButton callback as an example:

Code: [Select]

int button_cb(Ihandle* ih)
I think something like this?

Code: [Select]

func button_cb(ih: UnsafeMutablePointer<Ihandle>) -> Int32
As I mentioned, I'm just guessing...

Title: Re: Apple Swift on Ubuntu
Post by: John on December 08, 2015, 06:50:03 PM

Looks good to me and your guesses have always been right on or got me pointed in the right direction.

I need to find out how to get the callback pointer to pass to IUP. From what I have stumbled on, this is available and core Swift syntax.

I hit the wall. I can't even get a UnsafeMutablePointer variable declared let alone a callback function. :-\

Code: Text

import Foundation
import Glibc
 
var dlg:UnsafeMutablePointer<Int32> = nil
var lbl:UnsafeMutablePointer<Int32> = nil
 
IupOpen(nil, nil)
 
lbl =  IupLabel("Hello world from IUP.")
dlg = IupDialog(IupVbox(lbl, nil))
IupSetAttribute(dlg, "TITLE", "Swift Hello World")
 
IupShowXY(dlg, IUP_CENTER, IUP_CENTER)
 
IupMainLoop()
 
IupClose()
 

jrs@laptop:~/Swift/usr/share/examples$ swiftc iuphw2.swift -import-objc-header /usr/include/iup/iup.h -liup -o iuphw2 iuphw2.swift:9:8: error: cannot assign value of type 'COpaquePointer' to type 'UnsafeMutablePointer<Int32>' lbl = IupLabel("Hello world from IUP.") ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ iuphw2.swift:10:25: error: cannot convert value of type 'UnsafeMutablePointer<Int32>' to expected argument type 'COpaquePointer' dlg = IupDialog(IupVbox(lbl, nil)) ^~~ iuphw2.swift:11:17: error: cannot convert value of type 'UnsafeMutablePointer<Int32>' to expected argument type 'COpaquePointer' IupSetAttribute(dlg, "TITLE", "Swift Hello World") ^~~ iuphw2.swift:13:11: error: cannot convert value of type 'UnsafeMutablePointer<Int32>' to expected argument type 'COpaquePointer' IupShowXY(dlg, IUP_CENTER, IUP_CENTER) ^~~ jrs@laptop:~/Swift/usr/share/examples$

Title: Re: Apple Swift on Ubuntu
Post by: AIR on December 09, 2015, 04:30:55 AM

two things you could try.

change the UnsafeMutablePointer to COpaquePointer

or ditch the explicit declaration of the variables and create them inline

var lbl = IupLabel("Hello world from IUP.")

Title: Re: Apple Swift on Ubuntu
Post by: John on December 09, 2015, 10:08:31 AM

Here is the results of your first idea. I'll try the other next. Thanks again for helping out!

AIR #1

Code: Text

import Foundation
import Glibc
 
var dlg: COpaquePointer<Int32> = nil
var lbl: COpaquePointer<Int32> = nil
 
IupOpen(nil, nil)
 
lbl =  IupLabel("Hello world from IUP.")
dlg = IupDialog(IupVbox(lbl, nil))
IupSetAttribute(dlg, "TITLE", "Swift Hello World")
 
IupShowXY(dlg, IUP_CENTER, IUP_CENTER)
 
IupMainLoop()
 
IupClose()
 

jrs@laptop:~/Swift/usr/share/examples$ swiftc iuphw2.swift -import-objc-header /usr/include/iup/iup.h -liup -o iuphw2 iuphw2.swift:4:10: error: cannot specialize non-generic type 'COpaquePointer' var dlg: COpaquePointer<Int32> = nil ^ iuphw2.swift:5:10: error: cannot specialize non-generic type 'COpaquePointer' var lbl: COpaquePointer<Int32> = nil ^ iuphw2.swift:10:30: error: nil is not compatible with expected argument type 'Any' (aka 'protocol<>') dlg = IupDialog(IupVbox(lbl, nil)) ^ jrs@laptop:~/Swift/usr/share/examples$

AIR # 2

I think this is going to work. I just can't use variadic functions. Not supported yet.

Code: Text

import Foundation
import Glibc
 
IupOpen(nil, nil)
 
var lbl =  IupLabel("Hello world from IUP.")
var dlg = IupDialog(IupVbox(lbl, 0))
IupSetAttribute(dlg, "TITLE", "Swift Hello World")
 
IupShowXY(dlg, IUP_CENTER, IUP_CENTER)
 
IupMainLoop()
 
IupClose()
 

jrs@laptop:~/Swift/usr/share/examples$ swiftc iuphw2.swift -import-objc-header /usr/include/iup/iup.h -liup -o iuphw2 iuphw2.swift:7:21: error: 'IupVbox' is unavailable: Variadic function is unavailable var dlg = IupDialog(IupVbox(lbl, 0)) ^~~~~~~ __ObjC.IupVbox:2:13: note: 'IupVbox' has been explicitly marked unavailable here public func IupVbox(child: COpaquePointer, _ varargs: Any...) -> COpaquePointer ^ jrs@laptop:~/Swift/usr/share/examples$

Title: Re: Apple Swift on Ubuntu
Post by: John on December 09, 2015, 10:41:06 AM

I got it to work.

Code: Text

import Foundation
import Glibc
 
IupOpen(nil, nil)
 
var dlg = IupCreate("dialog")
var vbx = IupCreate("vbox")
var lbl = IupCreate("label")
 
IupStoreAttribute(dlg, "TITLE", "Swift IUP")
IupStoreAttribute(lbl, "TITLE", "Hello world from Swift IUP.")
 
IupAppend(vbx, lbl)
IupAppend(dlg, vbx)
 
IupShowXY(dlg, IUP_CENTER, IUP_CENTER)
 
IupMainLoop()
 
IupClose()
 

Compiles, no errors.

Title: Re: Apple Swift on Ubuntu
Post by: John on December 09, 2015, 02:48:28 PM

AIR,

I'm trying to get a callback function pointer but it seems elusive.

Code: Text

import Foundation
import Glibc
 
func btn_exit_cb(ih: Int32) -> Int32 {
  return IUP_CLOSE
}
  
IupOpen(nil, nil)
 
var dlg = IupCreate("dialog")
var vbx = IupCreate("vbox")
var lbl = IupCreate("label")
var but = IupCreate("button")
 
IupStoreAttribute(dlg, "TITLE", "Swift IUP")
IupStoreAttribute(lbl, "TITLE", "Hello world from Swift IUP.")
IupStoreAttribute(but, "TITLE", "Quit")
 
IupAppend(vbx, lbl)
IupAppend(vbx, but)
IupAppend(dlg, vbx)
 
IupSetCallback(but, "ACTION", CUseCallback(btn_exit_cb, 1))
 
IupShowXY(dlg, IUP_CENTER, IUP_CENTER)
 
IupMainLoop()
 
IupClose()
 

jrs@laptop:~/Swift/usr/share/examples$ swiftc iuphw2.swift -import-objc-header /usr/include/iup/iup.h -liup -o iuphw2 iuphw2.swift:23:31: error: use of unresolved identifier 'CUseCallback' IupSetCallback(but, "ACTION", CUseCallback(btn_exit_cb, 1)) ^~~~~~~~~~~~ jrs@laptop:~/Swift/usr/share/examples$

Title: Re: Apple Swift on Ubuntu
Post by: AIR on December 09, 2015, 06:25:48 PM

Code: Text

import Foundation
import Glibc
 
func btn_exit_cb(ih: COpaquePointer) -> Int32 {
  return IUP_CLOSE
}
  
IupOpen(nil, nil)
 
var dlg = IupCreate("dialog")
var vbx = IupCreate("vbox")
var lbl = IupCreate("label")
var but = IupCreate("button")
 
IupStoreAttribute(dlg, "TITLE", "Swift IUP")
IupStoreAttribute(lbl, "TITLE", "Hello world from Swift IUP.")
IupStoreAttribute(but, "TITLE", "Quit")
 
IupAppend(vbx, lbl)
IupAppend(vbx, but)
IupAppend(dlg, vbx)
 
IupSetCallback(but, "ACTION", btn_exit_cb)
 
IupShowXY(dlg, IUP_CENTER, IUP_CENTER)
 
IupMainLoop()
 
IupClose()
 

Title: Re: Apple Swift on Ubuntu
Post by: John on December 09, 2015, 06:38:39 PM

Thanks AIR!

It closes the window when the quit button is clicked. This shows the core IUP functionality works in Swift. I'll try building on this.

Swift sure makes the syntax simple to use.

(http://www.johnspikowski.com/Swift-C/swiftiuphello.png)

Code: Text

/*
Linux Swift IUP Hello World Example
Screen Shot: http://www.johnspikowski.com/Swift-C/swiftiuphello.png
Compile: swiftc iuphw.swift -import-objc-header /usr/include/iup/iup.h -liup -o iuphw
Contributors: John Spikowski, Armando I. Rivera (AIR) 2015-12-09
*/
 
import Foundation
import Glibc
 
func btn_exit_cb(ih: COpaquePointer) -> Int32 {
  return IUP_CLOSE
}
  
IupOpen(nil, nil)
 
var dlg = IupCreate("dialog")
var vbx = IupCreate("vbox")
var lbl = IupCreate("label")
var but = IupCreate("button")
 
IupStoreAttribute(dlg, "TITLE", "Swift IUP")
IupSetAttributes(vbx, "MARGIN=10x10, ALIGNMENT=ACENTER")
IupSetAttributes(lbl, "FONT=\"Arial, 24\", TITLE=\"Hello World\"")
IupStoreAttribute(but, "TITLE", " Quit ")
 
IupAppend(vbx, lbl)
IupAppend(vbx, but)
IupAppend(dlg, vbx)
 
IupSetCallback(but, "ACTION", btn_exit_cb)
 
IupShowXY(dlg, IUP_CENTER, IUP_CENTER)
 
IupMainLoop()
 
IupClose()
 

jrs@laptop:~/Swift/usr/share/examples$ swiftc iuphw.swift -import-objc-header /usr/include/iup/iup.h -liup -o iuphw jrs@laptop:~/Swift/usr/share/examples$ ./iuphw

Attached is a screenshot of editing a Swift programs in UltraEdit and gedit.

Title: Re: Apple Swift on Ubuntu
Post by: John on December 11, 2015, 02:07:54 PM

AIR,

Here is an example of using a IUP LED screen definition to define the UI. The questions I have is will Swift support a multi-line string and how does LED process the defined callback function references? What would be cool is a string array of screen UI definitions and concatenated (assembled) just before the display.

Update

Quote

Unfortunately, swift doesn't appear to allow you to have a single literal over multiple lines but you can add + literals together over multiple lines.

(http://www.johnspikowski.com/Swift-C/iup_sample.png)

Code: ScriptBasic

' Script BASIC IUP/LED
 
IMPORT iup.bas
sample_led = """
 
img1 = IMAGE[0="0 0 0",1="BGCOLOR",2="255 0 0"]
(32,32
,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,1
,1,1,1,1,1,1,1,1,1,1,1,1,1,1,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,1,1
,1,1,1,1,1,1,1,1,1,1,1,1,1,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,1,1,1
,1,1,1,1,1,1,1,1,1,1,1,1,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,1,1,1,1
,1,1,1,1,1,1,1,1,1,1,1,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,1,1,1,1,1
,1,1,1,1,1,1,1,1,1,1,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,1,1,1,1,1,1
,1,1,1,1,1,1,1,1,1,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,1,1,1,1,1,1,1
,1,1,1,1,1,1,1,1,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,1,1,1,1,1,1,1,1
,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2
,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2
,2,2,2,0,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2
,2,2,2,0,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2
,2,2,2,0,2,0,2,0,2,2,0,2,2,2,0,0,0,2,2,2,0,0,2,0,2,2,0,0,0,2,2,2
,2,2,2,0,2,0,0,2,0,0,2,0,2,0,2,2,2,0,2,0,2,2,0,0,2,0,2,2,2,0,2,2
,2,2,2,0,2,0,2,2,0,2,2,0,2,2,2,2,2,0,2,0,2,2,2,0,2,0,2,2,2,0,2,2
,2,2,2,0,2,0,2,2,0,2,2,0,2,2,0,0,0,0,2,0,2,2,2,0,2,0,0,0,0,0,2,2
,2,2,2,0,2,0,2,2,0,2,2,0,2,0,2,2,2,0,2,0,2,2,2,0,2,0,2,2,2,2,2,2
,2,2,2,0,2,0,2,2,0,2,2,0,2,0,2,2,2,0,2,0,2,2,0,0,2,0,2,2,2,0,2,2
,2,2,2,0,2,0,2,2,0,2,2,0,2,2,0,0,0,0,2,2,0,0,2,0,2,2,0,0,0,2,2,2
,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,0,2,2,2,2,2,2,2,2
,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,0,2,2,2,0,2,2,2,2,2,2,2,2
,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,0,0,0,2,2,2,2,2,2,2,2,2
,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2
,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2
,1,1,1,1,1,1,1,2,2,2,2,2,2,2,2,2,2,2,2,2,2,1,1,1,1,1,1,1,1,1,1,1
,1,1,1,1,1,1,2,2,2,2,2,2,2,2,2,2,2,2,2,2,1,1,1,1,1,1,1,1,1,1,1,1
,1,1,1,1,1,2,2,2,2,2,2,2,2,2,2,2,2,2,2,1,1,1,1,1,1,1,1,1,1,1,1,1
,1,1,1,1,2,2,2,2,2,2,2,2,2,2,2,2,2,2,1,1,1,1,1,1,1,1,1,1,1,1,1,1
,1,1,1,2,2,2,2,2,2,2,2,2,2,2,2,2,2,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1
,1,1,2,2,2,2,2,2,2,2,2,2,2,2,2,2,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1
,1,2,2,2,2,2,2,2,2,2,2,2,2,2,2,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1
,2,2,2,2,2,2,2,2,2,2,2,2,2,2,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1
)
 
img2 = IMAGE[0="0 0 0",1="0 255 0",2="BGCOLOR",3="255 0 0"]
(32,32
,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,3,3,3,3,3,3,3,3,3,3,3,3,3,3,3,3,2
,2,2,2,2,2,2,2,2,2,2,2,2,2,2,3,3,3,3,3,3,3,3,3,3,3,3,3,3,3,3,2,2
,2,2,2,2,2,2,2,2,2,2,2,2,2,3,3,3,3,3,3,3,3,3,3,3,3,3,3,3,3,2,2,2
,2,2,2,2,2,2,2,2,2,2,2,2,3,3,3,3,3,3,3,3,3,3,3,3,3,3,3,3,2,2,2,2
,2,2,2,2,2,2,2,2,2,2,2,3,3,3,3,3,3,3,3,3,3,3,3,3,3,3,3,2,2,2,2,2
,2,2,2,2,2,2,2,2,2,2,3,3,3,3,1,1,3,3,3,3,3,3,3,3,3,3,2,2,2,2,2,2
,2,2,2,2,2,2,2,2,2,3,3,3,3,3,1,1,3,3,3,3,3,3,3,3,3,2,2,2,2,2,2,2
,2,2,2,2,2,2,2,2,3,3,3,3,3,3,1,1,3,3,3,3,3,3,3,3,2,2,2,2,2,2,2,2
,3,3,3,3,3,3,3,3,3,3,3,3,3,3,1,1,3,3,3,3,3,3,3,3,3,3,3,3,3,3,3,3
,3,3,3,3,3,3,3,3,3,3,3,3,3,3,1,1,3,3,3,3,3,3,3,3,3,3,3,3,3,3,3,3
,3,3,3,0,3,3,3,3,3,3,3,3,3,3,1,1,3,3,3,3,3,3,3,3,3,3,3,3,3,3,3,3
,3,3,3,0,3,3,3,3,3,3,3,3,3,3,1,1,3,3,3,3,3,3,3,3,3,3,3,3,3,3,3,3
,3,3,3,0,3,0,3,0,3,3,0,3,3,3,1,1,0,3,3,3,0,0,3,0,3,3,0,0,0,3,3,3
,3,3,3,0,3,0,0,3,0,0,3,0,3,0,1,1,3,0,3,0,3,3,0,0,3,0,3,3,3,0,3,3
,3,3,3,0,3,0,3,3,0,3,3,0,3,3,1,1,3,0,3,0,3,3,3,0,3,0,3,3,3,0,3,3
,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1
,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1
,3,3,3,0,3,0,3,3,0,3,3,0,3,0,1,1,3,0,3,0,3,3,0,0,3,0,3,3,3,0,3,3
,3,3,3,0,3,0,3,3,0,3,3,0,3,3,1,1,0,0,3,3,0,0,3,0,3,3,0,0,0,3,3,3
,3,3,3,3,3,3,3,3,3,3,3,3,3,3,1,1,3,3,3,3,3,3,3,0,3,3,3,3,3,3,3,3
,3,3,3,3,3,3,3,3,3,3,3,3,3,3,1,1,3,3,3,0,3,3,3,0,3,3,3,3,3,3,3,3
,3,3,3,3,3,3,3,3,3,3,3,3,3,3,1,1,3,3,3,3,0,0,0,3,3,3,3,3,3,3,3,3
,3,3,3,3,3,3,3,3,3,3,3,3,3,3,1,1,3,3,3,3,3,3,3,3,3,3,3,3,3,3,3,3
,3,3,3,3,3,3,3,3,3,3,3,3,3,3,1,1,3,3,3,3,3,3,3,3,3,3,3,3,3,3,3,3
,2,2,2,2,2,2,2,3,3,3,3,3,3,3,1,1,3,3,3,3,3,2,2,2,2,2,2,2,2,2,2,2
,2,2,2,2,2,2,3,3,3,3,3,3,3,3,1,1,3,3,3,3,2,2,2,2,2,2,2,2,2,2,2,2
,2,2,2,2,2,3,3,3,3,3,3,3,3,3,3,3,3,3,3,2,2,2,2,2,2,2,2,2,2,2,2,2
,2,2,2,2,3,3,3,3,3,3,3,3,3,3,3,3,3,3,2,2,2,2,2,2,2,2,2,2,2,2,2,2
,2,2,2,3,3,3,3,3,3,3,3,3,3,3,3,3,3,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2
,2,2,3,3,3,3,3,3,3,3,3,3,3,3,3,3,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2
,2,3,3,3,3,3,3,3,3,3,3,3,3,3,3,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2
,3,3,3,3,3,3,3,3,3,3,3,3,3,3,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2
)
 
mnu = MENU
(
  SUBMENU("IupSubMenu 1",
    MENU
    (
      ITEM[VALUE=ON]("IupItem 1 Checked",myaction),
      SEPARATOR(),
      ITEM[ACTIVE="NO"]("IupItem 2 Disabled",myaction)
    )
  ),
  ITEM("IupItem 3",myaction),
  ITEM("IupItem 4",myaction)
)
 
dlg = DIALOG[TITLE="IupDialog Title",MENU="mnu"]
(
  VBOX[GAP="5",ALIGNMENT="ARIGHT",MARGIN="5x5"]
  (
    HBOX
    (
      FRAME[TITLE="IupButton"]
      (
        VBOX
        (
          BUTTON("Button Text",myaction),
          BUTTON[IMAGE=img1]("",myaction),
          BUTTON[IMAGE=img1,IMPRESS=img2]("",myaction)
        )
      ),
      FRAME[TITLE="IupLabel"]
      (
        VBOX
        (
          LABEL("Label Text"),
          LABEL[SEPARATOR=HORIZONTAL](""),
          LABEL[IMAGE=img1]("")
        )
      ),
      FRAME[TITLE="IupToggle"]
      (
        VBOX
        (
          TOGGLE[VALUE="ON"]("Toggle Text",myaction),
          TOGGLE[IMAGE=img1,IMPRESS=img2]("",myaction),
          FRAME[TITLE="IupRadio"]
          (
            RADIO
            (
              VBOX
              (
                TOGGLE("Toggle Text",myaction),
                TOGGLE("Toggle Text",myaction)
              )
            )
          )
        )
      ),
      FRAME[TITLE="IupText/IupMultiline"]
      (
        VBOX
        (
          TEXT[SIZE="80x",VALUE="IupText Text"](myaction),
          MULTILINE[SIZE="80x60",EXPAND="YES",VALUE="IupMultiline Text\nSecond Line\nThird Line"](myaction)
        )
      ),
      FRAME[TITLE="IupList"]
      (
        VBOX
        (
          LIST[EXPAND="YES",VALUE="1",1="Item 1 Text",2="Item 2 Text",3="Item 3 Text"](myaction),
          LIST[DROPDOWN="YES",EXPAND="YES",VALUE="2",1="Item 1 Text",2="Item 2 Text",3="Item 3 Text"](myaction),
          LIST[EDITBOX="YES",EXPAND="YES",VALUE="3",1="Item 1 Text",2="Item 2 Text",3="Item 3 Text"](myaction)
        )
      )
    ),
    CANVAS[BGCOLOR="128 255 0"](myaction)
  )
)
"""
 
Iup::Open()
Iup::LoadBuffer(sample_led)
Iup::Show(Iup::GetHandle("dlg"))
Iup::MLoop()
IUP::Close()
 

Title: Re: Apple Swift on Ubuntu
Post by: John on December 11, 2015, 05:24:12 PM

This works. I was able to locate more info on LED. (see attached)

This call associates the LED (expression/callback ID) to the actual function name being used.

Code: [Select]

IupSetFunction("LED_reference", callback_function_name)

(http://www.johnspikowski.com/Swift-C/swift_iupled.png)

Code: Text

import Foundation
import Glibc
 
func btn_exit_cb(ih: COpaquePointer) -> Int32 {
  return IUP_CLOSE
}
 
IupOpen(nil, nil)
 
IupLoad("sample.led")
 
IupSetFunction("exit_dlg", btn_exit_cb)
 
IupShow(IupGetHandle("dlg"))
 
IupMainLoop()
 
IupClose()

sample.led

Code: [Select]

img1 = IMAGE[0="0 0 0",1="BGCOLOR",2="255 0 0"]
(32,32
,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,1
,1,1,1,1,1,1,1,1,1,1,1,1,1,1,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,1,1
,1,1,1,1,1,1,1,1,1,1,1,1,1,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,1,1,1
,1,1,1,1,1,1,1,1,1,1,1,1,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,1,1,1,1
,1,1,1,1,1,1,1,1,1,1,1,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,1,1,1,1,1
,1,1,1,1,1,1,1,1,1,1,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,1,1,1,1,1,1
,1,1,1,1,1,1,1,1,1,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,1,1,1,1,1,1,1
,1,1,1,1,1,1,1,1,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,1,1,1,1,1,1,1,1
,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2
,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2
,2,2,2,0,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2
,2,2,2,0,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2
,2,2,2,0,2,0,2,0,2,2,0,2,2,2,0,0,0,2,2,2,0,0,2,0,2,2,0,0,0,2,2,2
,2,2,2,0,2,0,0,2,0,0,2,0,2,0,2,2,2,0,2,0,2,2,0,0,2,0,2,2,2,0,2,2
,2,2,2,0,2,0,2,2,0,2,2,0,2,2,2,2,2,0,2,0,2,2,2,0,2,0,2,2,2,0,2,2
,2,2,2,0,2,0,2,2,0,2,2,0,2,2,0,0,0,0,2,0,2,2,2,0,2,0,0,0,0,0,2,2
,2,2,2,0,2,0,2,2,0,2,2,0,2,0,2,2,2,0,2,0,2,2,2,0,2,0,2,2,2,2,2,2
,2,2,2,0,2,0,2,2,0,2,2,0,2,0,2,2,2,0,2,0,2,2,0,0,2,0,2,2,2,0,2,2
,2,2,2,0,2,0,2,2,0,2,2,0,2,2,0,0,0,0,2,2,0,0,2,0,2,2,0,0,0,2,2,2
,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,0,2,2,2,2,2,2,2,2
,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,0,2,2,2,0,2,2,2,2,2,2,2,2
,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,0,0,0,2,2,2,2,2,2,2,2,2
,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2
,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2
,1,1,1,1,1,1,1,2,2,2,2,2,2,2,2,2,2,2,2,2,2,1,1,1,1,1,1,1,1,1,1,1
,1,1,1,1,1,1,2,2,2,2,2,2,2,2,2,2,2,2,2,2,1,1,1,1,1,1,1,1,1,1,1,1
,1,1,1,1,1,2,2,2,2,2,2,2,2,2,2,2,2,2,2,1,1,1,1,1,1,1,1,1,1,1,1,1
,1,1,1,1,2,2,2,2,2,2,2,2,2,2,2,2,2,2,1,1,1,1,1,1,1,1,1,1,1,1,1,1
,1,1,1,2,2,2,2,2,2,2,2,2,2,2,2,2,2,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1
,1,1,2,2,2,2,2,2,2,2,2,2,2,2,2,2,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1
,1,2,2,2,2,2,2,2,2,2,2,2,2,2,2,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1
,2,2,2,2,2,2,2,2,2,2,2,2,2,2,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1
)

img2 = IMAGE[0="0 0 0",1="0 255 0",2="BGCOLOR",3="255 0 0"]
(32,32
,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,3,3,3,3,3,3,3,3,3,3,3,3,3,3,3,3,2
,2,2,2,2,2,2,2,2,2,2,2,2,2,2,3,3,3,3,3,3,3,3,3,3,3,3,3,3,3,3,2,2
,2,2,2,2,2,2,2,2,2,2,2,2,2,3,3,3,3,3,3,3,3,3,3,3,3,3,3,3,3,2,2,2
,2,2,2,2,2,2,2,2,2,2,2,2,3,3,3,3,3,3,3,3,3,3,3,3,3,3,3,3,2,2,2,2
,2,2,2,2,2,2,2,2,2,2,2,3,3,3,3,3,3,3,3,3,3,3,3,3,3,3,3,2,2,2,2,2
,2,2,2,2,2,2,2,2,2,2,3,3,3,3,1,1,3,3,3,3,3,3,3,3,3,3,2,2,2,2,2,2
,2,2,2,2,2,2,2,2,2,3,3,3,3,3,1,1,3,3,3,3,3,3,3,3,3,2,2,2,2,2,2,2
,2,2,2,2,2,2,2,2,3,3,3,3,3,3,1,1,3,3,3,3,3,3,3,3,2,2,2,2,2,2,2,2
,3,3,3,3,3,3,3,3,3,3,3,3,3,3,1,1,3,3,3,3,3,3,3,3,3,3,3,3,3,3,3,3
,3,3,3,3,3,3,3,3,3,3,3,3,3,3,1,1,3,3,3,3,3,3,3,3,3,3,3,3,3,3,3,3
,3,3,3,0,3,3,3,3,3,3,3,3,3,3,1,1,3,3,3,3,3,3,3,3,3,3,3,3,3,3,3,3
,3,3,3,0,3,3,3,3,3,3,3,3,3,3,1,1,3,3,3,3,3,3,3,3,3,3,3,3,3,3,3,3
,3,3,3,0,3,0,3,0,3,3,0,3,3,3,1,1,0,3,3,3,0,0,3,0,3,3,0,0,0,3,3,3
,3,3,3,0,3,0,0,3,0,0,3,0,3,0,1,1,3,0,3,0,3,3,0,0,3,0,3,3,3,0,3,3
,3,3,3,0,3,0,3,3,0,3,3,0,3,3,1,1,3,0,3,0,3,3,3,0,3,0,3,3,3,0,3,3
,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1
,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1
,3,3,3,0,3,0,3,3,0,3,3,0,3,0,1,1,3,0,3,0,3,3,0,0,3,0,3,3,3,0,3,3
,3,3,3,0,3,0,3,3,0,3,3,0,3,3,1,1,0,0,3,3,0,0,3,0,3,3,0,0,0,3,3,3
,3,3,3,3,3,3,3,3,3,3,3,3,3,3,1,1,3,3,3,3,3,3,3,0,3,3,3,3,3,3,3,3
,3,3,3,3,3,3,3,3,3,3,3,3,3,3,1,1,3,3,3,0,3,3,3,0,3,3,3,3,3,3,3,3
,3,3,3,3,3,3,3,3,3,3,3,3,3,3,1,1,3,3,3,3,0,0,0,3,3,3,3,3,3,3,3,3
,3,3,3,3,3,3,3,3,3,3,3,3,3,3,1,1,3,3,3,3,3,3,3,3,3,3,3,3,3,3,3,3
,3,3,3,3,3,3,3,3,3,3,3,3,3,3,1,1,3,3,3,3,3,3,3,3,3,3,3,3,3,3,3,3
,2,2,2,2,2,2,2,3,3,3,3,3,3,3,1,1,3,3,3,3,3,2,2,2,2,2,2,2,2,2,2,2
,2,2,2,2,2,2,3,3,3,3,3,3,3,3,1,1,3,3,3,3,2,2,2,2,2,2,2,2,2,2,2,2
,2,2,2,2,2,3,3,3,3,3,3,3,3,3,3,3,3,3,3,2,2,2,2,2,2,2,2,2,2,2,2,2
,2,2,2,2,3,3,3,3,3,3,3,3,3,3,3,3,3,3,2,2,2,2,2,2,2,2,2,2,2,2,2,2
,2,2,2,3,3,3,3,3,3,3,3,3,3,3,3,3,3,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2
,2,2,3,3,3,3,3,3,3,3,3,3,3,3,3,3,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2
,2,3,3,3,3,3,3,3,3,3,3,3,3,3,3,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2
,3,3,3,3,3,3,3,3,3,3,3,3,3,3,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2
)

mnu = MENU
(
  SUBMENU("IupSubMenu 1",
    MENU
    (
      ITEM[VALUE=ON]("IupItem 1 Checked",myaction),
      SEPARATOR(),
      ITEM[ACTIVE="NO"]("IupItem 2 Disabled",myaction)
    )
  ),
  ITEM("IupItem 3",myaction),
  ITEM("IupItem 4",myaction)
)

dlg = DIALOG[TITLE="Swift IUP LED",MENU="mnu"]
(
  VBOX[GAP="5",ALIGNMENT="ARIGHT",MARGIN="5x5"]
  (
    HBOX
    (
      FRAME[TITLE="IupButton"]
      (
        VBOX
        (
          BUTTON("Quit Dialog",exit_dlg),
          BUTTON[IMAGE=img1]("",myaction),
          BUTTON[IMAGE=img1,IMPRESS=img2]("",myaction)
        )
      ),
      FRAME[TITLE="IupLabel"]
      (
        VBOX
        (
          LABEL("Label Text"),
          LABEL[SEPARATOR=HORIZONTAL](""),
          LABEL[IMAGE=img1]("")
        )
      ),
      FRAME[TITLE="IupToggle"]
      (
        VBOX
        (
          TOGGLE[VALUE="ON"]("Toggle Text",myaction),
          TOGGLE[IMAGE=img1,IMPRESS=img2]("",myaction),
          FRAME[TITLE="IupRadio"]
          (
            RADIO
            (
              VBOX
              (
                TOGGLE("Toggle Text",myaction),
                TOGGLE("Toggle Text",myaction)
              )
            )
          )
        )
      ),
      FRAME[TITLE="IupText/IupMultiline"]
      (
        VBOX
        (
          TEXT[SIZE="80x",VALUE="IupText Text"](myaction),
          MULTILINE[SIZE="80x60",EXPAND="YES",VALUE="IupMultiline Text\nSecond Line\nThird Line"](myaction)
        )
      ),
      FRAME[TITLE="IupList"]
      (
        VBOX
        (
          LIST[EXPAND="YES",VALUE="1",1="Item 1 Text",2="Item 2 Text",3="Item 3 Text"](myaction),
          LIST[DROPDOWN="YES",EXPAND="YES",VALUE="2",1="Item 1 Text",2="Item 2 Text",3="Item 3 Text"](myaction),
          LIST[EDITBOX="YES",EXPAND="YES",VALUE="3",1="Item 1 Text",2="Item 2 Text",3="Item 3 Text"](myaction)
        )
      )
    ),
    CANVAS[BGCOLOR="128 255 0"](myaction)
  )
)

jrs@laptop:~/Swift/usr/share/examples$ swiftc iupled.swift -import-objc-header /usr/include/iup/iup.h -liup -o iupled jrs@laptop:~/Swift/usr/share/examples$ ./iupled

Title: Re: Apple Swift on Ubuntu
Post by: John on December 11, 2015, 10:55:15 PM

AIR,

I found a Swift based SQLite3 wrapper for the Apple version. I tried to compile it but had some errors. I think this would be a good SQLite3 library interface if it wouldn't take a lot of work to get running.

SwiftData is a simple and effective wrapper around the SQLite3 C API written completely in Swift (https://github.com/ryanfowler/SwiftData)

Title: Re: Apple Swift on Ubuntu
Post by: AIR on December 12, 2015, 09:09:09 AM

Of course it has errors, it's using Apple-specific API calls.

To do this right, you should make use of the PackageManager support that Swift-Linux has to incorporate the dependencies you'll need.

IOW, you're probably gonna have to roll your own Sqlite3 implementation unless someone else has already done it.

Title: Re: Apple Swift on Ubuntu
Post by: John on December 12, 2015, 10:46:54 AM

Quote

Of course it has errors, it's using Apple-specific API calls.

I was fooled by the claim of being written in 100% Swift. I have never used Object-C or the Swift Package Manager for that matter. If you feel that this package is out of the Swift generic ballpark, then maybe we need to look elsewhere.

We could be traditional and you be the SQLite king as your were for Script BASIC. 8)

I'll leave it in your hands what we should do for a SQLite Swift solution.

Title: Re: Apple Swift on Ubuntu
Post by: John on December 12, 2015, 03:36:44 PM

IUP includes a Dialog Layout tool that lets you interactively modify your live dialog. In this example I modified the background and forground colors of the Quit Dialog button. Changes can be made without changing code and once you decide on your design you can export your new LED screen definition to a file. No recompiling needed. :)

Code: Text

/*
Linux Swift IUP LED Example
Screen Shot: http://www.johnspikowski.com/Swift-C/swift_iupled.png
Compile: swiftc iupled.swift -import-objc-header /usr/include/iup/iup.h -liup -o iupled
Contributors: John Spikowski 2015-12-11
*/
 
 
import Foundation
import Glibc
 
func btn_exit_cb(ih: COpaquePointer) -> Int32 {
  return IUP_CLOSE
}
 
IupOpen(nil, nil)
 
IupLoad("sample.led")
 
IupSetFunction("exit_dlg", btn_exit_cb)
 
IupShow(IupLayoutDialog(IupGetHandle("dlg")))
 
IupMainLoop()
 
IupClose()
 

Dialog Layout Editor
(http://www.johnspikowski.com/Swift-C/iuplayoutdialog.png)

(http://www.johnspikowski.com/Swift-C/iupdialogchange.png)

(http://www.johnspikowski.com/Swift-C/iuppropbgclr.png) (http://www.johnspikowski.com/Swift-C/iuppropcallback.png)

Here is the untouched export of sample.led via the Dialog Layout editor.

Code: Text

#   Generated by IupLayoutDialog export to LED.
 
dlg = DIALOG[
  MENU = mnu,
  USERSIZE = 0x0,
  TITLE = "Swift IUP LED"](
    VBOX[
      USERSIZE = 0x0,
      MARGIN = 5x5,
      GAP = 5,
      ALIGNMENT = ARIGHT](
        HBOX[
          USERSIZE = 0x0](
            FRAME[
              USERSIZE = 0x0,
              TITLE = IupButton](
                VBOX[
                  USERSIZE = 0x0](
                    BUTTON[
                      USERSIZE = 0x0,
                      TITLE = "Quit Dialog",
                      ACTION = exit_dlg]("", exit_dlg),
                    BUTTON[
                      IMAGE = img1,
                      USERSIZE = 0x0]("", do_nothing),
                    BUTTON[
                      IMPRESS = img2,
                      IMAGE = img1,
                      USERSIZE = 0x0]("", do_nothing))),
            FRAME[
              USERSIZE = 0x0,
              TITLE = IupLabel](
                VBOX[
                  USERSIZE = 0x0](
                    LABEL[
                      USERSIZE = 0x0,
                      TITLE = "Label Text"](""),
                    LABEL[
                      SEPARATOR = HORIZONTAL,
                      EXPAND = HORIZONTALFREE,
                      USERSIZE = 0x0](""),
                    LABEL[
                      IMAGE = img1,
                      USERSIZE = 0x0](""))),
            FRAME[
              USERSIZE = 0x0,
              TITLE = IupToggle](
                VBOX[
                  USERSIZE = 0x0](
                    TOGGLE[
                      USERSIZE = 0x0,
                      TITLE = "Toggle Text",
                      VALUE = ON]("", do_nothing),
                    TOGGLE[
                      IMPRESS = img2,
                      IMAGE = img1,
                      USERSIZE = 0x0]("", do_nothing),
                    FRAME[
                      USERSIZE = 0x0,
                      TITLE = IupRadio](
                        RADIO[
                          USERSIZE = 0x0](
                            VBOX[
                              USERSIZE = 0x0](
                                TOGGLE[
                                  USERSIZE = 0x0,
                                  TITLE = "Toggle Text"]("", do_nothing),
                                TOGGLE[
                                  USERSIZE = 0x0,
                                  TITLE = "Toggle Text"]("", do_nothing)))))),
            FRAME[
              USERSIZE = 0x0,
              TITLE = IupText/IupMultiline](
                VBOX[
                  USERSIZE = 0x0](
                    TEXT[
                      SIZE = 80x,
                      USERSIZE = 140x0,
                      VALUE = "IupText Text"](do_nothing),
                    MULTILINE[
                      EXPAND = YES,
                      SIZE = 80x60,
                      USERSIZE = 140x128,
                      VALUE = "IupMultiline Text\nSecond Line\nThird Line",
                      MULTILINE = YES](do_nothing))),
            FRAME[
              USERSIZE = 0x0,
              TITLE = IupList](
                VBOX[
                  USERSIZE = 0x0](
                    LIST[
                      EXPAND = YES,
                      USERSIZE = 0x0,
                      VALUE = 1,
                      1 = "Item 1 Text",
                      2 = "Item 2 Text",
                      3 = "Item 3 Text"](do_nothing),
                    LIST[
                      EXPAND = YES,
                      USERSIZE = 0x0,
                      VALUE = 2,
                      1 = "Item 1 Text",
                      2 = "Item 2 Text",
                      3 = "Item 3 Text",
                      DROPDOWN = YES](do_nothing),
                    LIST[
                      EXPAND = YES,
                      USERSIZE = 0x0,
                      EDITBOX = YES,
                      VALUE = 3,
                      1 = "Item 1 Text",
                      2 = "Item 2 Text",
                      3 = "Item 3 Text"](do_nothing)))),
        CANVAS[
          USERSIZE = 0x0,
          BGCOLOR = "128 255 0"](do_nothing)))
 

Quote

When the application defines the SIZE or RASTERSIZE attributes, it changes the User size in IUP. The initial internal value is "0x0". When set to NULL the User size is internally set to "0x0". If the element is not mapped then the returned value by SIZE or RASTERSIZE is the User size, if the element is mapped then the returned value is the Current size. To obtain the User size after the element is mapped use the USERSIZE attribute (since 3.12).

By default the layout computation uses the Natural size of the element to compose the layout of the dialog, but if the User size is defined then it is used instead of the Natural size. In this case the Natural size is not even computed. But there are two exceptions.

If the element is a container (not including the dialog) the User size will be used instead of the Natural size only if bigger than the Natural size. So for containers the User size will also act as a minimum value for Natural size.

For the dialog, if the User size is defined then it is used instead of the Natural size, but the Natural size of the dialog is always computed. And if the User size is not defined, the Natural size is used only if bigger than the Current size, so in this case the dialog will always increase its size to fit all its contents. In other words, in this case the dialog will not shrink its Current size unless the User size is defined. See the SHRINK attribute guide bellow for an alternative.

When the user is interactively changing the dialog size the Current size is updated. But the dialog contents will always occupy the Natural size available, being smaller or bigger than the dialog Current size.

When SIZE or RASTERSIZE attributes are set for the dialog (changing the User size) the Current size is also reset to "0x0". Allowing the application to force an update of its Window size. To only change the User size in pixels, without resetting the Current size, set the USERSIZE attribute (since 3.12).

After the Natural size is calculated for all the elements in the dialog, the the Current size is set based on the available space in the dialog. So the Current size is set from the outer element (the dialog) to the inner element, in opposite of what it is done for the Natural size.

After all the elements have their Current size updated, the elements positions are calculated, and finally, after the element is mapped, the Window size and position are set for the native elements. The Window size is set exactly to the Current size.

After the element is mapped the returned value for SIZE or RASTERSIZE is the Current size. It actually returns the native Window size of the element. Before mapping, the returned value is the User size.

ALIGNMENT (non inheritable): horizontal and vertical alignment. Possible values: "ALEFT", "ACENTER" and "ARIGHT", combined to "ATOP", "ACENTER" and "ABOTTOM". Default: "ACENTER:ACENTER". Partial values are also accepted, like "ARIGHT" or ":ATOP", the other value will be used from the current alignment.

MARGIN, CMARGIN: Defines a margin in pixels, CMARGIN is in the same units of the SIZE attribute. Its value has the format "widthxheight", where width and height are integer values corresponding to the horizontal and vertical margins, respectively. Default: "0x0" (no margin).

GAP, CGAP: Defines a vertical space in pixels between the children, CGAP is in the same units of the SIZE attribute for the height. Default: "0".

To reduce the size of the dialog and its containers to a size smaller than the Natural size the SHRINK attribute of the dialog can be used. If set to YES all the containers of the dialog will be able to reduce its size. But be aware that elements may overlap and the layout result could be visually bad if the dialog size is smaller than its Natural size.

Another way to increase the size of elements is to use the EXPAND attribute. When there is room in the container to expand an element, the container layout will expand the elements that have the EXPAND attribute set to YES, HORIZONTAL or VERTICAL accordingly, even if they have the User size defined. The default is EXPAND=NO, but for containers is EXPAND=YES.

(http://webserver2.tecgraf.puc-rio.br/iup/en/elem/images/iupvbox_align.png)

(http://www.johnspikowski.com/Swift-C/iupalignment.png)

Title: Re: Apple Swift on Ubuntu
Post by: AIR on December 13, 2015, 12:34:10 PM

Quote from: John on December 12, 2015, 10:46:54 AM

I'll leave it in your hands what we should do for a SQLite Swift solution.

This is the most fucking retarded way of implementing an interface to a C library I've ever encountered. I've stated that I didn't care for Swift before, now I can say that I absolutely HATE it.

It definitely DOES NOT HELP that there is almost NO documentation that's worth anything at this point on the PackageManager under Linux.

I've attached what I managed to create as far as a Sqlite3 interface, but this is as far as I go. After unpacking, cd into the directory and do: swift build. The binary will be in the .build/debug folder

If I ever use Swift again, it will be exclusively on my Mac.

Have fun repeatedly banging your head against a wall.....

Title: Re: Apple Swift on Ubuntu
Post by: John on December 13, 2015, 02:08:53 PM

That is the first time I've been kissed and slapped at the same time. ;D

Didn't I mention that the Swift-C effort here was experimental?

Thanks again AIR for being a good friend and allowing me to continue being optimistic towards Swift's future. I have to laugh hearing you bad mouthing an Apple offering. :-X

Title: Re: Apple Swift on Ubuntu
Post by: AIR on December 13, 2015, 02:58:39 PM

Quote from: John on December 13, 2015, 02:08:53 PM

That is the first time I've been kissed and slapped at the same time. ;D

Didn't I mention that the Swift-C effort here was experimental?

Thanks again AIR for being a good friend and allowing me to continue being optimistic towards Swift's future. I have to laugh hearing you bad mouthing an Apple offering. :-X

Apple's not stupid: They're selling the pipe dream that you'll be able to create apps for their store on non-Apple hardware/OS. It might be possible at some point, but you won't be using the Cocoa and other Frameworks to do it anytime soon, if at all.

People use Swift because a huge (<--cue Donald Trump Accent) company is behind it. Kind of like how Objective C became popular. At least with Objective C, I can drop straight C into it without having to jump through crazy hoops to get shit to work.

I asked myself the question, is Swift worth all the effort to get something as simple as SQlite going? After taking the same program and re doing it in NIM (5min, but it already has sqlite support), the answer is a resounding NO.

I'm really surprised that you dropped NIM, btw. It already has an IUP module that works in Linux and Windows, and already has support for a large amount of 3rd party libraries.

Here's the same simple sqlite program in NIM:

Code: Text

import db_sqlite
 
 
let db = open("test.db", nil, nil, nil) 
 
db.exec(sql("Drop table if exists cars"))
 
db.exec(sql("CREATE TABLE Cars(Id INT, Name TEXT, Price INT)"))
 
for x in items(["1, 'Audi', 52642", 
                "2, 'Mercedes', 57127",
                "3, 'Skoda', 9000",
                "4, 'Volvo', 29000",
                "5, 'Bentley', 350000",
                "6, 'Citroen', 21000",
                "7, 'Hummer', 41400",
                "8, 'Volkswagen', 21600"]):
 
    db.exec(sql("INSERT INTO Cars VALUES(" & x & ")"))
 
for x in db.fastRows(sql("select Name,Price from cars Order by Price DESC")):
  echo x[0], " ", x[1]
 
db.close()
 

Same thing in Swift:

Code: Text

import Foundation
import Glibc
import CSqlite3
 
 
 
func sqlColumnText(statement: COpaquePointer, column: Int32) -> String {
        return String.fromCString(UnsafePointer<CChar>(sqlite3_column_text(statement,column)))!
}
 
func sqlVersion() -> String {
        let s = String.fromCString(sqlite3_libversion())!
        return "Sqlite3 Version: \(s)"
}
 
func sqlOpen(filename: String, database: UnsafeMutablePointer<COpaquePointer>) {
        let rc = sqlite3_open(filename, database)
 
        if (rc != SQLITE_OK) {
                print("Cannot open database " + String.fromCString(sqlite3_errmsg(database.memory))!)
                exit(1)
        }
}
 
func sqlExec(database: COpaquePointer, query: String) {
        var err_msg: UnsafeMutablePointer<CChar> = nil
        let rc = sqlite3_exec(database, query, nil, nil, &err_msg)
 
        if (rc != SQLITE_OK ) {
 
            print("SQL error: " + String.fromCString( err_msg)!)
 
            sqlite3_free(err_msg)
            sqlite3_close(database)
 
            exit(1)
        }
}
 
func sqlPrepare(database: COpaquePointer, query: String, statement: UnsafeMutablePointer<COpaquePointer>) {
        let rc = sqlite3_prepare_v2(database,query,-1,statement,nil)
 
        if (rc != SQLITE_OK ) {
 
            print("Failed to select data")
            print("SQL error: " + String.fromCString( sqlite3_errmsg(database))!)
 
 
            sqlite3_close(database)
 
            exit(1)
        }
}
 
func sqlStep(statement: COpaquePointer) -> Int32 {
        return sqlite3_step(statement)
}
 
func sqlClose(database: COpaquePointer){
        sqlite3_close(database)
}
 
 
 
 
 
var db: COpaquePointer = nil
var stmt: COpaquePointer = nil
 
print(sqlVersion(),"\n")
 
sqlOpen("test.db", database: &db)
 
var sql =       "DROP TABLE IF EXISTS Cars;" +
            "CREATE TABLE Cars(Id INT, Name TEXT, Price INT);" +
            "INSERT INTO Cars VALUES(1, 'Audi', 52642);" +
            "INSERT INTO Cars VALUES(2, 'Mercedes', 57127);" +
            "INSERT INTO Cars VALUES(3, 'Skoda', 9000);" +
            "INSERT INTO Cars VALUES(4, 'Volvo', 29000);" +
            "INSERT INTO Cars VALUES(5, 'Bentley', 350000);" +
            "INSERT INTO Cars VALUES(6, 'Citroen', 21000);" +
            "INSERT INTO Cars VALUES(7, 'Hummer', 41400);" +
            "INSERT INTO Cars VALUES(8, 'Volkswagen', 21600);"
 
sqlExec(db, query: sql)
 
 
sql = "SELECT Name,Price FROM Cars Order By Price DESC"
 
sqlPrepare(db, query: sql, statement: &stmt)
 
while sqlStep(stmt) == SQLITE_ROW {
        var make  = sqlColumnText(stmt, column: 0)
        var price = sqlColumnText(stmt, column: 1)
        print(make,price)
 
}
 
 
sqlClose(db)
 

That's a ridiculous amount of casting just to get Swift to work with SQlite3.

One other thing, and this applies to MacOS as well: If you use Swift, you also need to make the libraries available. On the Mac, they're added to the application bundle, bloating the overall App size. It also won't work on systems running os versions less than 10.9. On Linux, you'll need to distribute the libraries in order for apps to work. Reminds me of Mono on Mac and Linux.

Title: Re: Apple Swift on Ubuntu
Post by: John on December 13, 2015, 03:27:12 PM

I haven't given up on Script BASIC for the same reason. It might be slower than Swift but I can do anything I want with it and on multiple platforms with a common scripting code base. C BASIC for the extension module API even makes it easier to extend the language seamlessly.

To me, your Swift SQLite interface doesn't look bad and is very informative how one must interface with standard C libraries.

Thanks again for this effort and it gives me something to build on. (try to plug in my SDL_gfx generic library I initially did for BaCon)

jrs@laptop:~/Swift/sqldemo$ ls -l total 12 -rw-rw-r-- 1 jrs jrs 151 Dec 13 12:17 Package.swift drwxrwxr-x 2 jrs jrs 4096 Dec 13 15:57 sources drwxrwxr-x 4 jrs jrs 4096 Dec 13 15:57 Sqlite3 jrs@laptop:~/Swift/sqldemo$ swift build Cloning Packages/Sqlite3 Compiling Swift Module 'sqldemo' (1 sources) Linking Executable: .build/debug/sqldemo jrs@laptop:~/Swift/sqldemo$ ls -la total 28 drwxrwxr-x 6 jrs jrs 4096 Dec 13 16:05 . drwxrwxr-x 7 jrs jrs 4096 Dec 13 15:57 .. drwxrwxr-x 3 jrs jrs 4096 Dec 13 16:05 .build drwxrwxr-x 3 jrs jrs 4096 Dec 13 16:05 Packages -rw-rw-r-- 1 jrs jrs 151 Dec 13 12:17 Package.swift drwxrwxr-x 2 jrs jrs 4096 Dec 13 15:57 sources drwxrwxr-x 4 jrs jrs 4096 Dec 13 15:57 Sqlite3 jrs@laptop:~/Swift/sqldemo$ cd .build jrs@laptop:~/Swift/sqldemo/.build$ ls -l total 4 drwxrwxr-x 4 jrs jrs 4096 Dec 13 16:05 debug jrs@laptop:~/Swift/sqldemo/.build$ cd debug jrs@laptop:~/Swift/sqldemo/.build/debug$ ls -l total 80 -rwxrwxr-x 1 jrs jrs 56275 Dec 13 16:05 sqldemo drwxrwxr-x 5 jrs jrs 4096 Dec 13 16:05 sqldemo.o -rw-rw-r-- 1 jrs jrs 540 Dec 13 16:05 sqldemo.swiftdoc -rw-rw-r-- 1 jrs jrs 11148 Dec 13 16:05 sqldemo.swiftmodule drwxrwxr-x 3 jrs jrs 4096 Dec 13 16:05 Sqlite3.o jrs@laptop:~/Swift/sqldemo/.build/debug$ ./sqldemo Sqlite3 Version: 3.8.2 Bentley 350000 Mercedes 57127 Audi 52642 Hummer 41400 Volvo 29000 Volkswagen 21600 Citroen 21000 Skoda 9000 jrs@laptop:~/Swift/sqldemo/.build/debug$

Title: Re: Apple Swift on Ubuntu
Post by: John on December 13, 2015, 04:47:33 PM

This works for me. How can I make your SQLite3 Swift code an include or import?

Code: Text

import Foundation
import Glibc
 
 
func sqlColumnText(statement: COpaquePointer, column: Int32) -> String {
        return String.fromCString(UnsafePointer<CChar>(sqlite3_column_text(statement,column)))!
}
 
func sqlVersion() -> String {
        let s = String.fromCString(sqlite3_libversion())!
        return "Sqlite3 Version: \(s)"
}
 
func sqlOpen(filename: String, database: UnsafeMutablePointer<COpaquePointer>) {
        let rc = sqlite3_open(filename, database)
 
        if (rc != SQLITE_OK) {
                print("Cannot open database " + String.fromCString(sqlite3_errmsg(database.memory))!)
                exit(1)
        }
}
 
func sqlExec(database: COpaquePointer, query: String) {
        var err_msg: UnsafeMutablePointer<CChar> = nil
        let rc = sqlite3_exec(database, query, nil, nil, &err_msg)
 
        if (rc != SQLITE_OK ) {
                
            print("SQL error: " + String.fromCString( err_msg)!)
            
            sqlite3_free(err_msg)      
            sqlite3_close(database)
            
            exit(1)
        } 
}
 
func sqlPrepare(database: COpaquePointer, query: String, statement: UnsafeMutablePointer<COpaquePointer>) {
        let rc = sqlite3_prepare_v2(database,query,-1,statement,nil)
 
        if (rc != SQLITE_OK ) {
            
            print("Failed to select data")
            print("SQL error: " + String.fromCString( sqlite3_errmsg(database))!)
 
 
            sqlite3_close(database)
            
            exit(1)
        } 
}
 
func sqlStep(statement: COpaquePointer) -> Int32 {
        return sqlite3_step(statement)
}
 
func sqlClose(database: COpaquePointer){
        sqlite3_close(database)
}
 
 
var db: COpaquePointer = nil
var stmt: COpaquePointer = nil
 
print(sqlVersion(),"\n")
 
sqlOpen("test.db", database: &db)
 
var sql =       "DROP TABLE IF EXISTS Cars;" +
            "CREATE TABLE Cars(Id INT, Name TEXT, Price INT);" +
            "INSERT INTO Cars VALUES(1, 'Audi', 52642);" +
            "INSERT INTO Cars VALUES(2, 'Mercedes', 57127);" +
            "INSERT INTO Cars VALUES(3, 'Skoda', 9000);" +
            "INSERT INTO Cars VALUES(4, 'Volvo', 29000);" +
            "INSERT INTO Cars VALUES(5, 'Bentley', 350000);" +
            "INSERT INTO Cars VALUES(6, 'Citroen', 21000);" +
            "INSERT INTO Cars VALUES(7, 'Hummer', 41400);" +
            "INSERT INTO Cars VALUES(8, 'Volkswagen', 21600);"
 
sqlExec(db, query: sql)
 
sql = "SELECT Name,Price FROM Cars Order By Price DESC"
 
sqlPrepare(db, query: sql, statement: &stmt)
 
while sqlStep(stmt) == SQLITE_ROW {
        var make  = sqlColumnText(stmt, column: 0)
        var price = sqlColumnText(stmt, column: 1)
        print(make,price)
 
}    
 
sqlClose(db)
 

jrs@laptop:~/Swift/usr/share/examples$ swiftc airlite.swift -import-objc-header /usr/include/sqlite3.h -lsqlite3 -o airlite jrs@laptop:~/Swift/usr/share/examples$ time ./airlite Sqlite3 Version: 3.8.2 Bentley 350000 Mercedes 57127 Audi 52642 Hummer 41400 Volvo 29000 Volkswagen 21600 Citroen 21000 Skoda 9000 real 0m1.226s user 0m0.022s sys 0m0.000s jrs@laptop:~/Swift/usr/share/examples$

Title: Re: Apple Swift on Ubuntu
Post by: AIR on December 13, 2015, 05:37:41 PM

Quote from: John on December 13, 2015, 04:47:33 PM

How can I make your SQLite3 Swift code an include or import?

By building on the CSQlite3 module I created.

Title: Re: Apple Swift on Ubuntu
Post by: John on December 13, 2015, 06:01:12 PM

AIR,

Here is your Swift example in Script BASIC clothing.

Code: ScriptBasic

IMPORT sqlite.bas
 
db = sqlite::OPEN("test.db")
 
PRINT sqlite::VERSION(),"\n"
 
sql = """
DROP TABLE IF EXISTS Cars;
CREATE TABLE Cars(Id INT, Name TEXT, Price INT);
INSERT INTO Cars VALUES(1, 'Audi', 52642);
INSERT INTO Cars VALUES(2, 'Mercedes', 57127);
INSERT INTO Cars VALUES(3, 'Skoda', 9000);
INSERT INTO Cars VALUES(4, 'Volvo', 29000);
INSERT INTO Cars VALUES(5, 'Bentley', 350000);
INSERT INTO Cars VALUES(6, 'Citroen', 21000);
INSERT INTO Cars VALUES(7, 'Hummer', 41400);
INSERT INTO Cars VALUES(8, 'Volkswagen', 21600);
"""
 
sqlite::EXECUTE(db, sql)
 
stmt = sqlite::QUERY(db, "SELECT Name,Price FROM Cars Order By Price DESC")
 
PRINTNL 
WHILE (sqlite::ROW(stmt) = sqlite::SQLITE3_ROW)
  IF sqlite::FETCHHASH(stmt,column) THEN
    PRINT column{"Name"}," ",column{"Price"},"\n"
  END IF
WEND
 
sqlite::CLOSE(db)
 

jrs@laptop:~/sb/sb22/test$ time scriba sqlair.sb 3.7.12.1 Bentley 350000 Mercedes 57127 Audi 52642 Hummer 41400 Volvo 29000 Volkswagen 21600 Citroen 21000 Skoda 9000 real 0m1.232s user 0m0.001s sys 0m0.010s jrs@laptop:~/sb/sb22/test$

Title: Re: Apple Swift on Ubuntu
Post by: John on December 14, 2015, 10:34:20 AM

Quote

By building on the CSQlite3 module I created.

@AIR - I can't seem to figure out how to get a module built that I can import.

What's the trick?

Ideally I would like to do something like this.

Code: Text

    import Foundation
    import Glibc
    import SQLite     
     
    var db: COpaquePointer = nil
    var stmt: COpaquePointer = nil
     
    print(sqlVersion(),"\n")
     
    sqlOpen("test.db", database: &db)
     
    var sql =       "DROP TABLE IF EXISTS Cars;" +
                "CREATE TABLE Cars(Id INT, Name TEXT, Price INT);" +
                "INSERT INTO Cars VALUES(1, 'Audi', 52642);" +
                "INSERT INTO Cars VALUES(2, 'Mercedes', 57127);" +
                "INSERT INTO Cars VALUES(3, 'Skoda', 9000);" +
                "INSERT INTO Cars VALUES(4, 'Volvo', 29000);" +
                "INSERT INTO Cars VALUES(5, 'Bentley', 350000);" +
                "INSERT INTO Cars VALUES(6, 'Citroen', 21000);" +
                "INSERT INTO Cars VALUES(7, 'Hummer', 41400);" +
                "INSERT INTO Cars VALUES(8, 'Volkswagen', 21600);"
     
    sqlExec(db, query: sql)
     
    sql = "SELECT Name,Price FROM Cars Order By Price DESC"
     
    sqlPrepare(db, query: sql, statement: &stmt)
     
    while sqlStep(stmt) == SQLITE_ROW {
            var make  = sqlColumnText(stmt, column: 0)
            var price = sqlColumnText(stmt, column: 1)
            print(make,price)
     
    }    
     
    sqlClose(db)
 

swiftc airlite.swift -o airlite

Title: Re: Apple Swift on Ubuntu
Post by: John on December 14, 2015, 09:30:21 PM

Quote from: AIR

People use Swift because a huge (<--cue Donald Trump Accent) company is behind it. Kind of like how Objective C became popular.

Watch how Apple’s Swift evolved into an open source powerhouse (http://thenextweb.com/dd/2015/12/14/watch-how-apples-swift-evolved-into-an-open-source-powerhouse/)

Quote from: AIR

At least with Objective C, I can drop straight C into it without having to jump through crazy hoops to get shit to work.

That's how I feel about Script BASIC. If all I'm interested is in getting something done or test a proof of concept, SB works for me. If it's not a one off project and will be distributed, then I'll take another look what is the best solution for that environment.

@AIR - Thanks for the nudge! I will take another look at NIM.

Title: Re: Apple Swift on RPi
Post by: John on November 17, 2019, 05:01:58 PM

AIR,

I'm trying to build your SQLite3 example on my RPi 4B. I'm getting this error trying to to build the package.

Code: Bash

pi@RPi4B:~/swift-dev/sqldemo $ swift build
 
/home/pi/swift-dev/sqldemo: error: package at '/home/pi/swift-dev/sqldemo' is using Swift tools version 3.1.0 which is no longer supported; consider using '// swift-tools-version:5.1' to specify the current tools version
pi@RPi4B:~/swift-dev/sqldemo $ 
 

I tried // swift-tools-version:5.1 in the package .swift but no luck. Any ideas?

Title: Re: Apple Swift on RPi
Post by: John on November 17, 2019, 06:29:57 PM

I was able to update the package tools version with this command.

swift package tools-version --set-current

Now I'm stuck resolving this.

Code: Bash

pi@RPi4B:~/swift-dev/sqldemo $ swift build
 
/home/pi/swift-dev/sqldemo: error: manifest parse error(s):
/home/pi/swift-dev/sqldemo/Package.swift:7:10: error: type 'Package.Dependency' has no member 'Package'
        .Package(url: "./Sqlite3", majorVersion: 1)
        ~^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
pi@RPi4B:~/swift-dev/sqldemo $ 
 

Title: Re: Apple Swift on Ubuntu
Post by: AIR on November 17, 2019, 09:30:27 PM

I don't so Swift, and the original code I wrote is like 5 years old. A lot has changed since then.

Maybe do sqlite with: https://perfect.org/docs/SQLite.html

Title: Re: Apple Swift on RPi
Post by: John on November 17, 2019, 09:52:23 PM

Thanks AIR!

That link allowed me to build their getting started example package.

If seems that Swift doesn't waste anytime deprecating code.

Code: Bash

pi@RPi4B:~/swift-dev $ mkdir  perfect
pi@RPi4B:~/swift-dev $ cd perfect
pi@RPi4B:~/swift-dev/perfect $ git clone https://github.com/PerfectlySoft/PerfectTemplate.git
Cloning into 'PerfectTemplate'...
remote: Enumerating objects: 3, done.
remote: Counting objects: 100% (3/3), done.
remote: Compressing objects: 100% (3/3), done.
remote: Total 285 (delta 0), reused 1 (delta 0), pack-reused 282
Receiving objects: 100% (285/285), 62.89 KiB | 2.62 MiB/s, done.
Resolving deltas: 100% (141/141), done.
pi@RPi4B:~/swift-dev/perfect $ cd PerfectTemplate
pi@RPi4B:~/swift-dev/perfect/PerfectTemplate $ swift build
Fetching https://github.com/PerfectlySoft/Perfect-HTTPServer.git
Fetching https://github.com/PerfectlySoft/Perfect-Net.git
Fetching https://github.com/PerfectlySoft/Perfect-HTTP.git
Fetching https://github.com/PerfectlySoft/Perfect-CZlib-src.git
Fetching https://github.com/PerfectlySoft/Perfect-Crypto.git
Fetching https://github.com/PerfectlySoft/Perfect-LinuxBridge.git
Fetching https://github.com/PerfectlySoft/Perfect-Thread.git
Fetching https://github.com/PerfectlySoft/PerfectLib.git
Fetching https://github.com/PerfectlySoft/Perfect-COpenSSL-Linux.git
Completed resolution in 26.70s
Cloning https://github.com/PerfectlySoft/Perfect-HTTPServer.git
Resolving https://github.com/PerfectlySoft/Perfect-HTTPServer.git at 3.0.23
Cloning https://github.com/PerfectlySoft/Perfect-COpenSSL-Linux.git
Resolving https://github.com/PerfectlySoft/Perfect-COpenSSL-Linux.git at 4.0.1
Cloning https://github.com/PerfectlySoft/Perfect-Net.git
Resolving https://github.com/PerfectlySoft/Perfect-Net.git at 3.3.0
Cloning https://github.com/PerfectlySoft/Perfect-CZlib-src.git
Resolving https://github.com/PerfectlySoft/Perfect-CZlib-src.git at 0.0.4
Cloning https://github.com/PerfectlySoft/Perfect-HTTP.git
Resolving https://github.com/PerfectlySoft/Perfect-HTTP.git at 3.3.0
Cloning https://github.com/PerfectlySoft/Perfect-LinuxBridge.git
Resolving https://github.com/PerfectlySoft/Perfect-LinuxBridge.git at 3.1.0
Cloning https://github.com/PerfectlySoft/Perfect-Thread.git
Resolving https://github.com/PerfectlySoft/Perfect-Thread.git at 3.0.7
Cloning https://github.com/PerfectlySoft/PerfectLib.git
Resolving https://github.com/PerfectlySoft/PerfectLib.git at 3.1.4
Cloning https://github.com/PerfectlySoft/Perfect-Crypto.git
Resolving https://github.com/PerfectlySoft/Perfect-Crypto.git at 3.2.0
/home/pi/swift-dev/perfect/PerfectTemplate/.build/checkouts/PerfectLib/Sources/PerfectLib/Dir.swift:129:16: warning: 'readdir_r' is deprecated
        return readdir_r(d, &dirEnt, endPtr)
               ^
/home/pi/swift-dev/perfect/PerfectTemplate/.build/checkouts/PerfectLib/Sources/PerfectLib/Dir.swift:129:16: warning: 'readdir_r' is deprecated
        return readdir_r(d, &dirEnt, endPtr)
               ^
/home/pi/swift-dev/perfect/PerfectTemplate/.build/checkouts/PerfectLib/Sources/PerfectLib/Dir.swift:129:16: warning: 'readdir_r' is deprecated
        return readdir_r(d, &dirEnt, endPtr)
               ^
/home/pi/swift-dev/perfect/PerfectTemplate/.build/checkouts/Perfect-Net/Sources/PerfectNet/NetUDP.swift:52:7: warning: variable 'a' was never mutated; consider changing to 'let' constant
                var a = [UInt8](repeating: 0, count: count)
                ~~~ ^
                let
/home/pi/swift-dev/perfect/PerfectTemplate/.build/checkouts/Perfect-Net/Sources/PerfectNet/NetTCPSSL.swift:219:42: warning: 'TLSv1_2_method()' is deprecated
                case .tlsV1_2: newSslCtx = SSL_CTX_new(TLSv1_2_method())
                                                       ^
/home/pi/swift-dev/perfect/PerfectTemplate/.build/checkouts/Perfect-Net/Sources/PerfectNet/NetTCPSSL.swift:220:42: warning: 'TLSv1_1_method()' is deprecated
                case .tlsV1_1: newSslCtx = SSL_CTX_new(TLSv1_1_method())
                                                       ^
/home/pi/swift-dev/perfect/PerfectTemplate/.build/checkouts/Perfect-Net/Sources/PerfectNet/NetTCPSSL.swift:221:40: warning: 'TLSv1_method()' is deprecated
                case .tlsV1: newSslCtx = SSL_CTX_new(TLSv1_method())
                                                     ^
/home/pi/swift-dev/perfect/PerfectTemplate/.build/checkouts/Perfect-Net/Sources/PerfectNet/NetTCPSSL.swift:219:42: warning: 'TLSv1_2_method()' is deprecated
                case .tlsV1_2: newSslCtx = SSL_CTX_new(TLSv1_2_method())
                                                       ^
/home/pi/swift-dev/perfect/PerfectTemplate/.build/checkouts/Perfect-Net/Sources/PerfectNet/NetTCPSSL.swift:220:42: warning: 'TLSv1_1_method()' is deprecated
                case .tlsV1_1: newSslCtx = SSL_CTX_new(TLSv1_1_method())
                                                       ^
/home/pi/swift-dev/perfect/PerfectTemplate/.build/checkouts/Perfect-Net/Sources/PerfectNet/NetTCPSSL.swift:221:40: warning: 'TLSv1_method()' is deprecated
                case .tlsV1: newSslCtx = SSL_CTX_new(TLSv1_method())
                                                     ^
/home/pi/swift-dev/perfect/PerfectTemplate/.build/checkouts/Perfect-HTTP/Sources/PerfectHTTP/HTTPHeaders.swift:41:15: warning: 'Hashable.hashValue' is deprecated as a protocol requirement; conform type 'HTTPRequestHeader.Name' to 'Hashable' by implementing 'hash(into:)' instead
                        public var hashValue: Int {
                                   ^
/home/pi/swift-dev/perfect/PerfectTemplate/.build/checkouts/Perfect-HTTP/Sources/PerfectHTTP/HTTPHeaders.swift:242:15: warning: 'Hashable.hashValue' is deprecated as a protocol requirement; conform type 'HTTPResponseHeader.Name' to 'Hashable' by implementing 'hash(into:)' instead
                        public var hashValue: Int {
                                   ^
/home/pi/swift-dev/perfect/PerfectTemplate/.build/checkouts/Perfect-HTTP/Sources/PerfectHTTP/HTTPMethod.swift:67:14: warning: 'Hashable.hashValue' is deprecated as a protocol requirement; conform type 'HTTPMethod' to 'Hashable' by implementing 'hash(into:)' instead
                public var hashValue: Int {
                           ^
/home/pi/swift-dev/perfect/PerfectTemplate/.build/checkouts/Perfect-HTTP/Sources/PerfectHTTP/HTTPHeaders.swift:41:15: warning: 'Hashable.hashValue' is deprecated as a protocol requirement; conform type 'HTTPRequestHeader.Name' to 'Hashable' by implementing 'hash(into:)' instead
                        public var hashValue: Int {
                                   ^
/home/pi/swift-dev/perfect/PerfectTemplate/.build/checkouts/Perfect-HTTP/Sources/PerfectHTTP/HTTPHeaders.swift:242:15: warning: 'Hashable.hashValue' is deprecated as a protocol requirement; conform type 'HTTPResponseHeader.Name' to 'Hashable' by implementing 'hash(into:)' instead
                        public var hashValue: Int {
                                   ^
/home/pi/swift-dev/perfect/PerfectTemplate/.build/checkouts/Perfect-HTTP/Sources/PerfectHTTP/HTTPMethod.swift:67:14: warning: 'Hashable.hashValue' is deprecated as a protocol requirement; conform type 'HTTPMethod' to 'Hashable' by implementing 'hash(into:)' instead
                public var hashValue: Int {
                           ^
/home/pi/swift-dev/perfect/PerfectTemplate/.build/checkouts/Perfect-HTTP/Sources/PerfectHTTP/HTTPHeaders.swift:41:15: warning: 'Hashable.hashValue' is deprecated as a protocol requirement; conform type 'HTTPRequestHeader.Name' to 'Hashable' by implementing 'hash(into:)' instead
                        public var hashValue: Int {
                                   ^
/home/pi/swift-dev/perfect/PerfectTemplate/.build/checkouts/Perfect-HTTP/Sources/PerfectHTTP/HTTPHeaders.swift:242:15: warning: 'Hashable.hashValue' is deprecated as a protocol requirement; conform type 'HTTPResponseHeader.Name' to 'Hashable' by implementing 'hash(into:)' instead
                        public var hashValue: Int {
                                   ^
/home/pi/swift-dev/perfect/PerfectTemplate/.build/checkouts/Perfect-HTTP/Sources/PerfectHTTP/HTTPMethod.swift:67:14: warning: 'Hashable.hashValue' is deprecated as a protocol requirement; conform type 'HTTPMethod' to 'Hashable' by implementing 'hash(into:)' instead
                public var hashValue: Int {
                           ^
/home/pi/swift-dev/perfect/PerfectTemplate/.build/checkouts/Perfect-HTTP/Sources/PerfectHTTP/HTTPMethod.swift:67:14: warning: 'Hashable.hashValue' is deprecated as a protocol requirement; conform type 'HTTPMethod' to 'Hashable' by implementing 'hash(into:)' instead
                public var hashValue: Int {
                           ^
/home/pi/swift-dev/perfect/PerfectTemplate/.build/checkouts/Perfect-HTTP/Sources/PerfectHTTP/HTTPMethod.swift:67:14: warning: 'Hashable.hashValue' is deprecated as a protocol requirement; conform type 'HTTPMethod' to 'Hashable' by implementing 'hash(into:)' instead
                public var hashValue: Int {
                           ^
/home/pi/swift-dev/perfect/PerfectTemplate/.build/checkouts/Perfect-HTTPServer/Sources/PerfectHTTPServer/HTTP2/HTTP2Session.swift:73:7: warning: 'Hashable.hashValue' is deprecated as a protocol requirement; conform type 'HTTP2Session' to 'Hashable' by implementing 'hash(into:)' instead
                var hashValue: Int { return Int(net.fd.fd) }
                    ^
/home/pi/swift-dev/perfect/PerfectTemplate/.build/checkouts/Perfect-HTTPServer/Sources/PerfectHTTPServer/HTTP2/HTTP2Session.swift:73:7: warning: 'Hashable.hashValue' is deprecated as a protocol requirement; conform type 'HTTP2Session' to 'Hashable' by implementing 'hash(into:)' instead
                var hashValue: Int { return Int(net.fd.fd) }
                    ^
/home/pi/swift-dev/perfect/PerfectTemplate/.build/checkouts/Perfect-HTTPServer/Sources/PerfectHTTPServer/HTTP2/HTTP2Session.swift:73:7: warning: 'Hashable.hashValue' is deprecated as a protocol requirement; conform type 'HTTP2Session' to 'Hashable' by implementing 'hash(into:)' instead
                var hashValue: Int { return Int(net.fd.fd) }
                    ^
/home/pi/swift-dev/perfect/PerfectTemplate/.build/checkouts/Perfect-HTTPServer/Sources/PerfectHTTPServer/HTTP2/HTTP2Session.swift:73:7: warning: 'Hashable.hashValue' is deprecated as a protocol requirement; conform type 'HTTP2Session' to 'Hashable' by implementing 'hash(into:)' instead
                var hashValue: Int { return Int(net.fd.fd) }
                    ^
/home/pi/swift-dev/perfect/PerfectTemplate/.build/checkouts/Perfect-HTTPServer/Sources/PerfectHTTPServer/HTTP2/HTTP2Session.swift:73:7: warning: 'Hashable.hashValue' is deprecated as a protocol requirement; conform type 'HTTP2Session' to 'Hashable' by implementing 'hash(into:)' instead
                var hashValue: Int { return Int(net.fd.fd) }
                    ^
/home/pi/swift-dev/perfect/PerfectTemplate/.build/checkouts/Perfect-HTTPServer/Sources/PerfectHTTPServer/HTTP2/HTTP2Session.swift:73:7: warning: 'Hashable.hashValue' is deprecated as a protocol requirement; conform type 'HTTP2Session' to 'Hashable' by implementing 'hash(into:)' instead
                var hashValue: Int { return Int(net.fd.fd) }
                    ^
/home/pi/swift-dev/perfect/PerfectTemplate/.build/checkouts/Perfect-HTTPServer/Sources/PerfectHTTPServer/HTTP2/HTTP2Session.swift:73:7: warning: 'Hashable.hashValue' is deprecated as a protocol requirement; conform type 'HTTP2Session' to 'Hashable' by implementing 'hash(into:)' instead
                var hashValue: Int { return Int(net.fd.fd) }
                    ^
/home/pi/swift-dev/perfect/PerfectTemplate/.build/checkouts/Perfect-HTTPServer/Sources/PerfectHTTPServer/HTTP2/HTTP2Session.swift:73:7: warning: 'Hashable.hashValue' is deprecated as a protocol requirement; conform type 'HTTP2Session' to 'Hashable' by implementing 'hash(into:)' instead
                var hashValue: Int { return Int(net.fd.fd) }
                    ^
/home/pi/swift-dev/perfect/PerfectTemplate/.build/checkouts/Perfect-HTTPServer/Sources/PerfectHTTPServer/HTTP2/HTTP2Session.swift:73:7: warning: 'Hashable.hashValue' is deprecated as a protocol requirement; conform type 'HTTP2Session' to 'Hashable' by implementing 'hash(into:)' instead
                var hashValue: Int { return Int(net.fd.fd) }
                    ^
/home/pi/swift-dev/perfect/PerfectTemplate/.build/checkouts/Perfect-HTTPServer/Sources/PerfectHTTPServer/HTTP2/HTTP2Session.swift:73:7: warning: 'Hashable.hashValue' is deprecated as a protocol requirement; conform type 'HTTP2Session' to 'Hashable' by implementing 'hash(into:)' instead
                var hashValue: Int { return Int(net.fd.fd) }
                    ^
/home/pi/swift-dev/perfect/PerfectTemplate/.build/checkouts/Perfect-HTTPServer/Sources/PerfectHTTPServer/HTTP2/HTTP2Session.swift:73:7: warning: 'Hashable.hashValue' is deprecated as a protocol requirement; conform type 'HTTP2Session' to 'Hashable' by implementing 'hash(into:)' instead
                var hashValue: Int { return Int(net.fd.fd) }
                    ^
/home/pi/swift-dev/perfect/PerfectTemplate/.build/checkouts/Perfect-HTTPServer/Sources/PerfectHTTPServer/HTTP2/HTTP2Session.swift:73:7: warning: 'Hashable.hashValue' is deprecated as a protocol requirement; conform type 'HTTP2Session' to 'Hashable' by implementing 'hash(into:)' instead
                var hashValue: Int { return Int(net.fd.fd) }
                    ^
/home/pi/swift-dev/perfect/PerfectTemplate/.build/checkouts/Perfect-HTTPServer/Sources/PerfectHTTPServer/HTTP2/HTTP2Session.swift:73:7: warning: 'Hashable.hashValue' is deprecated as a protocol requirement; conform type 'HTTP2Session' to 'Hashable' by implementing 'hash(into:)' instead
                var hashValue: Int { return Int(net.fd.fd) }
                    ^
[80/80] Linking PerfectTemplate
pi@RPi4B:~/swift-dev/perfect/PerfectTemplate $ .build/debug/PerfectTemplate
[INFO] Starting HTTP server localhost on :::8181
 

This is the new format of the Package.swift file.

Code: Text

import PackageDescription
 
let package = Package(
    name: "PerfectTemplate",
    targets: [],
    dependencies: [
        .Package(url: "https://github.com/PerfectlySoft/Perfect-HTTPServer.git",
            majorVersion: 3),
        .Package(url: "https://github.com/PerfectlySoft/Perfect-Mustache.git",
            majorVersion: 3)
    ]
)
 

Title: Re: Apple Swift on RPi
Post by: John on November 18, 2019, 10:41:38 PM

AIR,

I don't seem to have a problem building packages from the PerfectSoft site. What isn't obvious is how to install them so when I run the test scripts it finds the package based on the IMPORT statement. I have searched the PerfectSoft site and Google and the topic seems to elude me. :-\

I know you're not a Swift fan but your Apple roots give you a huge knowledge advantage,

A question I hear over and over on the RPi forum about Swift is can apps be built on the RPi and used on the iPhone?

Any guidance would be appreciated. I think I'm close to using Swift on the RPi.

Title: Re: Apple Swift on RPi
Post by: John on November 19, 2019, 05:57:54 PM

AIR,

I may have found the answer.

Quote

Now that we’ve built and tested our command line tool, let’s install it to enable it to be run from anywhere on the command line. To do that, build the tool using the release configuration, and then move the compiled binary to /usr/local/bin:

$ swift build -c release
$ cd .build/release
$ cp -f CommandLineTool /usr/local/bin/commandlinetool

Title: Re: Apple Swift on RPi
Post by: John on November 20, 2019, 11:22:19 AM

I guess that doesn't work for shared object based packages. You would think installing these modules would be an important step.

Title: Re: Apple Swift on Ubuntu
Post by: AIR on November 23, 2019, 09:22:59 PM

Now you know another reason why I don't do swift.

Title: Re: Apple Swift on Ubuntu
Post by: John on November 23, 2019, 11:46:16 PM

A real mystery. I sent a message to the CTO of PerfectSoft asking how to install C library packages so the IMPORT will work with your scripts. Still waiting for an answer.

AllBASIC

BASIC Developer & Support Resources => Compilers => Topic started by: John on December 03, 2015, 08:11:04 PM