Some obscure Segmentation fault on a long file

I still haven't exactly figured out why but here is some debug info nevertheless:

2117462 <1];%ne> <xtern char>   |493641|  1269:SUSPEND(1291)
2117462 <1];%ne> <xtern char>   |493642|   1271:CURLYN[62]{0,INFTY}(1289)
                             |493642|   ANYOF[0-9@A-Z_a-z] can match 5 times out of 2147483647...
2117467 <xtern> < char s_zo>    |493643|    1289:SUCCEED(0)
                             |493643|    SUCCEED: subpattern success...
2117467 <xtern> < char s_zo>    |493641|  1291:SUCCEED(0)
                             |493641|  SUCCEED: subpattern success...
2117467 <xtern> < char s_zo>    |493640| 1293:BOUND(1294)
2117467 <xtern> < char s_zo>    |493640| 1294:CLOSE61 'identifierpure'(1296)
                             |493640| END: EVAL trying tail ... (cur_eval=1a8a38ee0)
2117467 <xtern> < char s_zo>    |493641|  4017:CLOSE190 'identf'(4019)
2117467 <xtern> < char s_zo>    |493641|  4019:LOGICAL[2](4020)
2117467 <xtern> < char s_zo>    |493641|  4020:EVAL(4023)
EVAL/GOSUB: Matching embedded REx "" against " char s_zone5_master__trigger_17_0018552c[1];%nextern char s"...
2117467 <xtern> < char s_zo>    |493642|   1:NOTHING(2)
2117467 <xtern> < char s_zo>    |493642|   2:END(0)
                             |493642|   END: EVAL trying tail ... (cur_eval=1a8a38ee0)
2117467 <xtern> < char s_zo>    |493643|    4023:SUSPEND(4029)
2117467 <xtern> < char s_zo>    |493644|     4025:STAR(4027)
                             |493644|     POSIXD[\s] can match 1 times out of 2147483647...
2117468 <tern > <char s_zon>    |493645|      4027:SUCCEED(0)
                             |493645|      SUCCEED: subpattern success...
2117468 <tern > <char s_zon>    |493643|    4029:CLOSE189 'identiiferfast'(4031)
                             |493643|    END: EVAL trying tail ... (cur_eval=1a8a32fa0)
2117468 <tern > <char s_zon>    |493644|     4037:LOGICAL[1](4038)
2117468 <tern > <char s_zon>    |493644|     4038:EVAL(4041)
2117468 <tern > <char s_zon>    |493645|      4041:IFTHEN(4151)
2117468 <tern > <char s_zon>    |493645|      4151:CLOSE191 'identifiercompositefast'(4153)
                             |493645|      END: EVAL trying tail ... (cur_eval=100495630)
2117468 <tern > <char s_zon>    |493646|       4162:WHILEM[6/15](0)
                             |493646|       WHILEM: matched 55381 out of 0..65535
2117468 <tern > <char s_zon>    |493647|        4159:GOSUB191[-128:4031] 'identifiercompositefast'(4162)
2117468 <tern > <char s_zon>    |493648|         4031:OPEN191 'identifiercompositefast'(4033)
2117468 <tern > <char s_zon>    |493648|         4033:BRANCH(4080)
2117468 <tern > <char s_zon>    |493649|          4034:GOSUB189[-30:4004] 'identiiferfast'(4037)
2117468 <tern > <char s_zon>    |493650|           4004:OPEN189 'identiiferfast'(4006)
2117468 <tern > <char s_zon>    |493650|           4006:SUSPEND(4012)
2117468 <tern > <char s_zon>    |493651|            4008:STAR(4010)
                             |493651|            POSIXD[\s] can match 0 times out of 2147483647...
2117468 <tern > <char s_zon>    |493652|             4010:SUCCEED(0)
                             |493652|             SUCCEED: subpattern success...
2117468 <tern > <char s_zon>    |493650|           4012:OPEN190 'identf'(4014)
2117468 <tern > <char s_zon>    |493650|           4014:GOSUB61[-2760:1254] 'identifierpure'(4017)
2117468 <tern > <char s_zon>    |493651|            1254:OPEN61 'identifierpure'(1256)
2117468 <tern > <char s_zon>    |493651|            1256:BOUND(1257)
2117468 <tern > <char s_zon>    |493651|            1257:SUSPEND(1293)
2117468 <tern > <char s_zon>    |493652|             1259:ANYOF[A-Z_a-z](1269)
2117469 <ern c> <har s_zone>    |493652|             1269:SUSPEND(1291)
2117469 <ern c> <har s_zone>    |493653|              1271:CURLYN[62]{0,INFTY}(1289)
                             |493653|              ANYOF[0-9@A-Z_a-z] can match 3 times out of 2147483647...
2117472 < char> < s_zone5_m>    |493654|               1289:SUCCEED(0)
                             |493654|               SUCCEED: subpattern success...
2117472 < char> < s_zone5_m>    |493652|             1291:SUCCEED(0)
                             |493652|             SUCCEED: subpattern success...
2117472 < char> < s_zone5_m>    |493651|            1293:BOUND(1294)
2117472 < char> < s_zone5_m>    |493651|            1294:CLOSE61 'identifierpure'(1296)
                             |493651|            END: EVAL trying tail ... (cur_eval=1a8a39510)
2117472 < char> < s_zone5_m>    |493652|             4017:CLOSE190 'identf'(4019)
2117472 < char> < s_zone5_m>    |493652|             4019:LOGICAL[2](4020)
2117472 < char> < s_zone5_m>    |493652|             4020:EVAL(4023)

Program received signal SIGSEGV, Segmentation fault.
0x000000010012e294 in S_save_magic_flags (flags=14680064, sv=0x1a8a38690, mgs_ix=<optimized out>, my_perl=<optimized out>) at mg.c:113
113	    mgs->mgs_sv = sv;

The above is on commit:

commit 8290d9dfc2f9409fe4a688c355052cd2bd7ffcdb
Author: Karl Williamson <[email protected]>
Date:   Tue Jul 26 15:48:28 2022 -0600

    APItest:locale.t: Use proper test for LC_ALL presence
    
    If no LC_ALL, there won't be an LC_ALL() sub.  Instead use the string
    'LC_ALL" and an explicit check to see if it is there.

Plus my optimisation patch (which btw still cuts around half of the execution time - just FYI)

But it was crashing without it as well (and on blead).

The regex is (the executed part at least):

(?<parens>\s*+(?<openparenf>[(\[])(?<inparen>((?&parens)|(?&stringlit)|[^()\[\]"'])*+)(?&inparen)?+(?(?{$+{openparenf} eq '('})\)|\])\s*+)

(?<brackets>\s*+\{(?<inbrackets>((?&brackets)|(?&stringlit)|[^{}"'])*+)(?&inbrackets)?+\}\s*+)

(?<identiiferfast>\s*+(?<identf>(?&identifierpure))(??{checkfastident})\s*+)

(?<identifiercompositefast>(?&identiiferfast)(?(?{$istaggable})\s*+(?&identifierpure)?+\s*+(?&brackets)?+)|[^\w\[\]\(\){=;]|(?&parens)
    |(?=(?<tok>[{=;]))(?{registerfnorobj})(?(?{$+{tok} eq '{'})(?&brackets)
    |(?(?{$+{tok} eq '='})=.*?;|;)))

(?<declsfast>(?&identifiercompositefast)*+(?&declsfast)?+)

perl -V:

perl: warning: Setting locale failed.
perl: warning: Please check that your locale settings:
	LANGUAGE = (unset),
	LC_ALL = (unset),
	LC_CTYPE = "UTF-8",
	LANG = "C.UTF8"
    are supported and installed on your system.
perl: warning: Falling back to a fallback locale ("C.UTF8").
Summary of my perl5 (revision 5 version 37 subversion 5) configuration:
  Commit id: 86afe6b06de7f1c961f08890ea7dad6c1acbb0d8
  Platform:
    osname=linux
    osvers=6.0.0-g1501278bb7ba
    archname=ppc64-linux-thread-multi
    uname='linux localhost 6.0.0-g1501278bb7ba #9 smp sun oct 16 14:51:46 -00 2022 ppc64 ppc970mp, altivec supported powermac11,2 gnulinux '
    config_args=''
    hint=recommended
    useposix=true
    d_sigaction=define
    useithreads=define
    usemultiplicity=define
    use64bitint=define
    use64bitall=define
    uselongdouble=undef
    usemymalloc=n
    default_inc_excludes_dot=define
  Compiler:
    cc='cc'
    ccflags ='-D_REENTRANT -D_GNU_SOURCE -fwrapv -fno-strict-aliasing -pipe -fstack-protector-strong -I/usr/local/include -D_LARGEFILE_SOURCE -D_FILE_OFFSET_BITS=64'
    optimize='-g -O2'
    cppflags='-D_REENTRANT -D_GNU_SOURCE -fwrapv -fno-strict-aliasing -pipe -fstack-protector-strong -I/usr/local/include'
    ccversion=''
    gccversion='12.2.0'
    gccosandvers=''
    intsize=4
    longsize=8
    ptrsize=8
    doublesize=8
    byteorder=87654321
    doublekind=4
    d_longlong=define
    longlongsize=8
    d_longdbl=define
    longdblsize=16
    longdblkind=6
    ivtype='long'
    ivsize=8
    nvtype='double'
    nvsize=8
    Off_t='off_t'
    lseeksize=8
    alignbytes=8
    prototype=define
  Linker and Libraries:
    ld='cc'
    ldflags =' -fstack-protector-strong -L/usr/local/lib'
    libpth=/usr/local/lib /usr/lib /lib64 /usr/lib64 /lib /usr/local/lib64
    libs=-lpthread -lgdbm -ldl -lm -lcrypt -lutil -lc -lgdbm_compat
    perllibs=-lpthread -ldl -lm -lcrypt -lutil -lc
    libc=/lib/../lib64/libc.so.6
    so=so
    useshrplib=false
    libperl=libperl.a
    gnulibc_version='2.36'
  Dynamic Linking:
    dlsrc=dl_dlopen.xs
    dlext=so
    d_dlsymun=undef
    ccdlflags='-Wl,-E'
    cccdlflags='-fPIC'
    lddlflags='-shared -g -O2 -L/usr/local/lib -fstack-protector-strong'


Characteristics of this binary (from libperl): 
  Compile-time options:
    HAS_TIMES
    MULTIPLICITY
    PERLIO_LAYERS
    PERL_COPY_ON_WRITE
    PERL_DONT_CREATE_GVSV
    PERL_HASH_FUNC_SIPHASH13
    PERL_HASH_USE_SBOX32
    PERL_MALLOC_WRAP
    PERL_OP_PARENT
    PERL_PRESERVE_IVUV
    PERL_USE_SAFE_PUTENV
    USE_64_BIT_ALL
    USE_64_BIT_INT
    USE_ITHREADS
    USE_LARGE_FILES
    USE_LOCALE
    USE_LOCALE_COLLATE
    USE_LOCALE_CTYPE
    USE_LOCALE_NUMERIC
    USE_LOCALE_TIME
    USE_PERLIO
    USE_PERL_ATOF
    USE_REENTRANT_API
    USE_THREAD_SAFE_LOCALE
  Built under linux
  Compiled at Oct 18 2022 23:10:24
  @INC:
    /usr/local/lib/perl5/site_perl/5.37.5/ppc64-linux-thread-multi
    /usr/local/lib/perl5/site_perl/5.37.5
    /usr/local/lib/perl5/5.37.5/ppc64-linux-thread-multi
    /usr/local/lib/perl5/5.37.5
    /usr/local/lib/perl5/site_perl/5.37.3
    /usr/local/lib/perl5/site_perl

It's not my RAM running out because I've 23 GBs

Some more info (with -O0 build):

Program received signal SIGSEGV, Segmentation fault.
0x000000010019c4b8 in S_save_magic_flags (my_perl=0x1005002a0, mgs_ix=-2147452408, sv=0x1071fe810, flags=14680064) at mg.c:113
113	    mgs->mgs_sv = sv;
(gdb) p mgs
$1 = (MGS *) 0x7ffe36547a18
(gdb) p *mgs
Cannot access memory at address 0x7ffe36547a18

Provide feedback

Saved searches

Use saved searches to filter your results more quickly

Uh oh!

Some obscure Segmentation fault on a long file #20411

Metadata

Assignees

Labels

Type

Projects

Milestone

Relationships

Development

Some obscure Segmentation fault on a long file #20411

Description

Metadata

Metadata

Assignees

Labels

Type

Projects

Milestone

Relationships

Development

Issue actions