Re: QIBM_QTG_DEVINIT

Well, I'd say you're doing something wrong... :p

Show the DS definition and how it's being loaded...

A quick glance at the docs,
https://www.ibm.com/docs/en/i/7.4.0?topic=program-init0100-format-connection-description-information

and I see that the IP address field is actually another DS...
Name
Size
Description
sin_len CHAR(1) Size of the sockaddr_in structure
sin_family CHAR(1) Protocol family IP (Version 4) is hex 02
sin_port CHAR(2) 16-bit unsigned port number
sin_addr CHAR(16) 4-byte unsigned
An RPG DS would be
dcl-ds ipAddr;
  len int(3);
  family int(3);
  port uint(5);
  addr uint(10);
  *n   char(12)
end-ds;

Little confused about the sin_addr being defined as char(16) yet the
description is "4-byte unsigned"..

I'm assuming that there's 12 bytes of filler...which looks to be the case
from what you posted...

HTH,
Charles


On Fri, Aug 22, 2025 at 10:57 AM Jay Vaughn <[email protected]>
wrote:

> has anyone worked with this exit point before.
>
> My exit pgm is coded and my parms are coming in correctly aligned however
> some of the data is non legible and look like the following...
> 12:54 PM (0 minutes ago)
> to me
>
> > EVAL ds_connect
>
>   DS_CONNECT.LENCONNDSC = 132
>
>   DS_CONNECT.IP4ADDRESSCLIENT = '██ÉC█Õ█P            '
>
>   DS_CONNECT.CLIENTPWVALIDATED = '0'
>
>   DS_CONNECT.WORKSTATIONTYPE = 'IBM-3477-FC   '
>
>   DS_CONNECT.SSLCONNECTION = '1'
>
>   DS_CONNECT.IP4ADDRESSSERVER = '███\█À██            '
>
>   DS_CONNECT.CLIENTAUTHLEVEL = '0'
>
>   DS_CONNECT.RESERVED01 = '   '
>
>   DS_CONNECT.CLIENTCERTVALID = 0
>
>   DS_CONNECT.OFFSETCLIENTCERT = 1362
>
>   DS_CONNECT.CLIENTCERTLEN = 0
>
>   DS_CONNECT.IP6ADDRESSCLIENT = '██ÉC              ███Õ█P    '
>
>   DS_CONNECT.IP6ADDRESSSERVER = '███\              ███À██    '
>
>
> I have tried ccsid(*utf8) for the first ip4 address variable but no luck.
>
>
> Any idea why these are not coming through legible?
>
>
> tia
>
>
> Jay
> --
> This is the RPG programming on IBM i (RPG400-L) mailing list
> To post a message email: [email protected]
> To subscribe, unsubscribe, or change list options,
> visit: https://lists.midrange.com/mailman/listinfo/rpg400-l
> or email: [email protected]
> Before posting, please take a moment to review the archives
> at https://archive.midrange.com/rpg400-l.
>
> Please contact [email protected] for any subscription related
> questions.
>
>
-- 
This is the RPG programming on IBM i (RPG400-L) mailing list
To post a message email: [email protected]
To subscribe, unsubscribe, or change list options,
visit: https://lists.midrange.com/mailman/listinfo/rpg400-l
or email: [email protected]
Before posting, please take a moment to review the archives
at https://archive.midrange.com/rpg400-l.

Please contact [email protected] for any subscription related questions.