Spriggsy's API Collection

[SpriggsySpriggs]

Updated 11/01/2020 at 5:49 PM

Updated pipecom library code with WinAPI calls to simulate popen without a console window appearing.

[SpriggsySpriggs]

Updated 04:17 PM on 11/03/2020

Fixed bug in pipecom which caused duplication of data between calls in Windows due to the buffer not being cleared.

[SpriggsySpriggs]

Updated 11:15 AM on 11/05/2020

Updated pipecom library and added CryptBinaryToString and CryptStringToBinary from Crypt32 WinAPI DLL. The code is found in "Base64 Multiplatform.bas". The code also contains usage for the built-in base64 command for Mac and Linux.

See here for a dedicated post on the library: https://www.qb64.org/forum/index.php?topic=3214.0

[SpriggsySpriggs]

Updated 06:17 PM on 11/17/2020

Added a huge FTP library using WinAPI's Wininet DLL. Took me several days to make it this complete. Probably one of my most complex and certainly my largest library so far. This library has functions for downloading, uploading, directory listing, changing directory, deleting files, deleting directories, and making directories. It's a big one and one that will be updated as time goes on. Since this one uses functions from a previous FTP example in my 7-zip folder I have removed the previous example and replaced it with this. The file is named "FTP WinAPI.bas". Below are some screenshots showing an example FTP listing generated with the library:

 

 

[SpriggsySpriggs]

Updated the "dir" style listing as well as added a new function. Both accept a file extension filter.

Screenshot of the filtered listing:

 

[SpriggsySpriggs]

08:23 AM 11/28/2020

Updated the XInput library to show pressure on the triggers of the gamepad.

See video for demonstration:

[FellippeHeitor]

❤️

[SMcNeill]

Is there some requirement for XINPUT to work properly for us?  I ran the test code in your API bundle last night, and the program would never detect my joystick at all.  I even went in and swapped it to check for all 4 of the available channels (0 to 3), wondering if perhaps mine was on something other than the default 0, but it was all no good.  _DEVICES found and identified the gamepad properly, but the XINPUT application didn't.

Does this require DirectX9?  DirectX11?  Some other version?  As this PC is new, I don't think it has anything except DirectX12 installed on it.  Are older packages required for this to work properly?

Edit:  Reading on the XInput information gives this info:

XInput Limitations
XInput only supports "next generation" controllers. This limits it basically to controllers for the Xbox 360 that also have Windows drivers. Legacy Windows controllers, joysticks and generalized haptic feedback devices are not supported.

I'm guessing that my poor old gamepad is probably not one of the "next generation" models.  Looks like testing this code will have to wait as well, for me to get a new controller. 

[SpriggsySpriggs]

@SMcNeill
Yeah, I wasn't sure what sort of drivers your controller used so I couldn't be sure if it would work or not. It would be neat if your new one did!

[SpriggsySpriggs]

1:01 AM 11/29/2020

Updated UUID Creation library by making it cleaner; e.g., getting rid of unnecessary CONST values, breaking some repetitive actions into new functions and subs, and adding the ability to compare two GUID/UUID values to check if they are greater, less, or equal using UuidCompare. If UUID1 is greater than UUID2 then the return is -1. 0 for equal and 1 for UUID1 less than UUID2.

[SpriggsySpriggs]

2:05 AM 11/29/2020

Fixed bug in the FTP library that would cause print statements after FTPUpload and FTPDownload to not appear because of the usage of _DISPLAY in the download loop. _AUTODISPLAY has been added after the loop execution so that printing can resume normally.

[SpriggsySpriggs]

Updated 03:15 PM on 12/07/2020

Added hidapi; a library that is a wrapper for WinAPI HID functions. The source code included is a test program designed to interface with a Nintendo Switch Pro Controller over Bluetooth HID using an InForm-based application that is similar to the XInput tester. The DLL included is for 64 bit only (see original post for clarification) but anyone can retrieve the 32 bit version themselves by following this link (https://github.com/libusb/hidapi/releases) and downloading the hidapi-win.zip file.

A video demonstrating the test program:

[SpriggsySpriggs]

Fixed bug in my Base 64 code that Steve (@SMcNeill) pointed out. A trailing null character was left behind due to my habit of null-terminated strings in WinAPI functions.

 

[SpriggsySpriggs]

Updated 12/20/2020 @ 9:17 PM

Added mappedvar, a header file I wrote (Windows, Mac, and Linux), which allows you to create and assign values to named variables on the fly rather than creating the variables beforehand in the source. This allows you to have generic variables (strings only. Can be modified quite easily for other types) and works quite nicely. It's a small file but I believe it will lead to much power in future QB64 programs. Enjoy having generics!

Updated 12/20/2020 @ 9:48 PM

Added some trim functions to the library in order to verify that the name for the variable would not begin, end, or solely contain, whitespace.

[SpriggsySpriggs]

Updated 12/21/2020 @ 1:19 PM

Added two new SUBs to my mappedvar header library: freemappedvar and freemap. freemappedvar erases the referenced mapped variable from the map. freemap erases the map entirely, freeing that portion of memory.

Updated 12/21/2020 @ 4:33 PM

Fixed problem of freemappedvar not actually being freed from memory due to wrong function being used. The code is now fixed and updated in the zip.

Code: QB64: [Select]

1. OPTION _EXPLICIT
2. $CONSOLE:ONLY
3. _DEST _CONSOLE
4.  
5. $IF WIN THEN
6.     DECLARE LIBRARY ".\mappedvar"
7.     $ELSE
8.     DECLARE LIBRARY "./mappedvar"
9.     $END IF
10.     FUNCTION mapvar% (name AS STRING, value AS STRING)
11.     FUNCTION getmappedvalue$ (name AS STRING)
12.     SUB freemappedvar (name AS STRING)
13.     SUB freemap ()
14.     FUNCTION mapsize%& ()
15. END DECLARE
16.  
17. DIM a AS INTEGER
18.  
19. a = mapvar("test1", "this is a test")
20. a = mapvar("test2", "this is also a test")
21. PRINT getmappedvalue("test1"), getmappedvalue("test2")
22. PRINT "Map is currently"; mapsize; "elements"
23. freemappedvar "test1"
24. PRINT "Map is currently"; mapsize; "elements"
25. a = mapvar("test3", "not sure how big it is now")
26. PRINT "Map is currently"; mapsize; "elements"
27. freemap
28. PRINT "Map is currently"; mapsize; "elements"
29. SLEEP