Pike-devel May 2021

pike-devel@lists.lysator.liu.se

4 participants
11 discussions

negative indices in array ranges
by Martin Baehr 14 Aug '26

14 Aug '26

hi, instead of having to do: reverse(reverse(foo/"/")[1..]); i'd very much prefer: (foo/"/")[..-2]; are there any reasons that speak against supporting this other than me not being able to offer a patch? greetings, martin.

13 51

negative indices in array ranges
by Mirar ＠ Pike developers forum 14 Aug '26

14 Aug '26

levels might possibly be from -1 and up, -1 meaning infinite.

10 25

pike_frame->fun = FUNCTION_BUILTIN
by Arne Goedeke 16 Apr '26

16 Apr '26

In INIT, EXIT and some gc callbacks the fun in Pike_fp is set to FUNCTION_BUILTIN. there are some places in the code (e.g. ADT.List()->_get_iterator) where ->fun is used in INHERIT_FROM_INT et al, which segfaults (except with PIKE_DEBUG). I am not sure where to fix this. Should the *_FROM_INT macros check for FUNCTION_BUILTIN or is this better to be handled in the individual INIT/EXIT methods ? does anyone object to making ADT.Stack and ADT.Queue inherit ADT.List? arne

3 2

managing comport settings in linux
by Henrik Grubbstr�m (Lysator) ＠ Pike (-) developers forum 09 Apr '26

09 Apr '26

Not a good idea; the design philosophy of Pike is that Pike-level code should never be able to cause memory corruption at C-level. With ioctls there's no way to know what data a specific ioctl wants without reading the documentation for that specific ioctl for that specific OS. ioctls and fcntls are a way for device handlers to hook in APIs that aren't standard across all filedescriptors. / Henrik Grubbström (Lysator) Previous text: >2004-08-17 13:32: >Subject: managing comport settings in linux >-------------------------------------------------------------------- >What would be nice, is a way to define ioctl methods in >Pike. Perhaps something like > >object i = Stdio.IOCTL(4242 /* request_id */ ); >i->add_int_parameter(); >i->add_string_parameter(); >i->set_return_type(STRING); > >string ret = i(fd, 1, "somestring"); > > >That ought to be possible, or..? > > / Marcus Agehall (PacketFront) >

4 3

Re: Playing music using pike and SDL.
by Martin Nilsson (lvl 60) ＠ Pike (-) developers forum 13 Mar '26

13 Mar '26

Were you not able to get any C code to play through SDL either? Does your SDL library have a mixer compiled in it (I think it is optional)?

5 4

full MySQL 4.x support. or pike roadmap
by thomas.gusenleitner＠com-bet.com ＠ Pike developers forum 01 Mar '26

01 Mar '26

HI to all! mysql 4.x support works only with a mysql CFLAGS=-DUSE_OLD_FUNCTIONS is this correct ? are there plans to make a full 4.x support ? bye, thomas

4 4

Pike Meet-up 2018-Q1
by Henrik Grubbstr�m (Lysator) ＠ Pike (-) developers forum 20 Oct '21

20 Oct '21

Hi. At Pike Conference 2017 it was decided that we ought to hold a more informal meeting in Linköping ~ once every quarter. As the three month mark from the conference is coming up soon, it seems time to announce the first such meeting for 2018: Pike Meet-up 2018-Q1 Date: 2018-02-03 (Sat) Time: 10:00 - afternoon/evening Place: Roxen IS AB S:t Larsgatan 22A Linköping Welcome! /grubba

2 13

hapcanmonitor in Pike
by Stephen R. van den Berg 24 May '21

24 May '21

It's still work in progress, but in case anyone is looking for something to run devices off and is programmed in Pike. I bought some equipment from www.hapcan.com and then programmed a hapcanmonitor daemon. The system is successfully running my house. A quick rundown on the source: - hapcanmonitor + hapcanmonitor.pike (40 KB), the full hapcan core communication driver. + www/x/wildcard.pike (7 KB), the REST/JSON api to the core communication driver. - spike (55 KB), the webserver daemon. hapcanmonitor source: git://devel2.cuci.nl/hapcanmonitor SPike daemon source: git://devel2.cuci.nl/spike -- Stephen.

1 0

HTTP server regression
by Martin Nilsson (Coppermist) ＠ Pike (-) developers forum 10 May '21

10 May '21

Looks like the Protocols.HTTP.Server is broken, though I don't know how recently as it was a while ago I installed the previous Pike 8.1. It's never the first request that fails, so I'm suspecting something like keep-alive, though it could be inside the SSL state (tickets?) things are messed up. The problem appears to be writes after finished() has been called. As I said the code used to work in 8.1 and works in 8.0. Anyone got any obvious idea? Indexing the NULL value with "output_to". /usr/local/pike/8.1.13/lib/modules/Protocols.pmod/HTTP.pmod/Server.pmod/Request.pike:929: Protocols.HTTP.Server.Request("GET" "/test.html")->send_write() /usr/local/pike/8.1.13/lib/modules/SSL.pmod/File.pike:1315: SSL.File(Stdio.File("socket", "85.228.101.175 55103", 777 /* fd=14 */), SSL.ServerConnection(ready))->internal_poll() -:1: Pike.Backend(0)->`()(3600.0)

2 9

Generic async DNS calls with multiple results
by Stephen R. van den Berg 09 May '21

09 May '21

I'm writing a generic HTTP server and will probably be writing a full-fledged SMTP server as well (queueing messages in a database, automatic DKIM signage, full MX-DNS support with retries and automatic fallback/backoff for recipient servers that don't allow many recipients or many connections or many messages per second). For the HTTP server I need multiple IP addresses per domainquery (I need to bind to all interfaces), and for the SMTP server I need to query multiple TXT records (SPF validation) and need to get back preference-sorted MX records, of which I then need multiple IP addresses again to try and connect to all IP addresses. For the both servers I need to know the difference between a (possibly temporary) failure of the query and a definitive result that says the record does not exist. For this purpose I created a small generic dnsquery() function (see below). Is it something worth including in the Protocols.DNS module, or is it better left outside? The problem was/is, none of the existing convenience functions seems to allow me to do this. Protocols.DNS.async_client dnsclient = Protocols.DNS.async_client(); private void dnscb(string domain, mapping res, function(array, array:void) cb, array restargs) { array an = res->an; switch (res->rcode) { case Protocols.DNS.SERVFAIL: case Protocols.DNS.NOTIMP: case Protocols.DNS.REFUSED: case Protocols.DNS.YXDOMAIN: case Protocols.DNS.YXRRSET: case Protocols.DNS.NXRRSET: case Protocols.DNS.NOTZONE: if (!sizeof(an)) { cb(0, restargs); return; } } sort(an->preference, an); cb(an->aaaa + an->a + an->mx + an->txt - ({ 0 }), restargs); } private mapping dnstypetonum = ([ "A": Protocols.DNS.T_A, "MX": Protocols.DNS.T_MX, "TXT": Protocols.DNS.T_TXT, "AAAA": Protocols.DNS.T_AAAA, ]); private void collect2aaaa(array|zero results, array restargs) { array|zero prevresults = restargs[1]; if (results) { if (prevresults) results -= prevresults; else prevresults = ({}); prevresults += results; } if (--restargs[0]) restargs[1] = prevresults; else restargs[2](prevresults, restargs[3..]); } //! Asynchronous DNS query with multiple results and a distinction //! between failure and empty results. //! //! @param type //! DNS query type (case sensitive). Currently supported: A, MX, TXT, AAAA. //! Querying for AAAA gives both IPv4 and IPv6 results. //! //! @param domain //! The domain name we are querying. //! //! @param result_cb //! The callback function that receives the result of the DNS query. //! It is called as follows: //! @expr{void result_cb(array(string)|zero results,array restargs);@} //! If the request fails it will return @expr{zero@} for @expr{results@}. //! @expr{restargs@} is passed unaltered to the callback function. //! //! @note //! There is a notable difference between @expr{results@} equal //! to @expr{zero@} (= request failed and can be retried) and //! @expr{({})@} (= request definitively answered the record //! does not exist; retries are pointless). void dnsquery(string type, string domain, function(array(string)|zero, array:void) result_cb, array restargs) { int itype = dnstypetonum[type]; if (!itype) { result_cb(0, restargs); return; } if (type == "AAAA") { restargs = ({ 2, 0, result_cb }) + restargs; dnsclient->do_query(domain, Protocols.DNS.C_IN, dnstypetonum["A"], dnscb, collect2aaaa, restargs); result_cb = collect2aaaa; } dnsclient->do_query(domain, Protocols.DNS.C_IN, itype, dnscb, result_cb, restargs); } -- Stephen.

1 0

2026

2025

2024

2023

2022

2021

2020

2019

2018

2017

2016

2015

2014

2013

2012

2011

2010

2009

2008

2007

2006

2005

2004

2003

2002

Pike-devel May 2021