Move Pod::Parser from lib (and t/pod) to ext.
[p5sagit/p5-mst-13.2.git] / pod / perltodo.pod
CommitLineData
7711098a 1=head1 NAME
2
3perltodo - Perl TO-DO List
4
5=head1 DESCRIPTION
e50bb9a1 6
049aabcb 7This is a list of wishes for Perl. The most up to date version of this file
8is at http://perl5.git.perl.org/perl.git/blob_plain/HEAD:/pod/perltodo.pod
9
10The tasks we think are smaller or easier are listed first. Anyone is welcome
11to work on any of these, but it's a good idea to first contact
12I<perl5-porters@perl.org> to avoid duplication of effort, and to learn from
13any previous attempts. By all means contact a pumpking privately first if you
14prefer.
e50bb9a1 15
0bdfc961 16Whilst patches to make the list shorter are most welcome, ideas to add to
17the list are also encouraged. Check the perl5-porters archives for past
18ideas, and any discussion about them. One set of archives may be found at:
e50bb9a1 19
0bdfc961 20 http://www.xray.mpe.mpg.de/mailing-lists/perl5-porters/
938c8732 21
617eabfa 22What can we offer you in return? Fame, fortune, and everlasting glory? Maybe
23not, but if your patch is incorporated, then we'll add your name to the
24F<AUTHORS> file, which ships in the official distribution. How many other
25programming languages offer you 1 line of immortality?
938c8732 26
0bdfc961 27=head1 Tasks that only need Perl knowledge
e50bb9a1 28
1841b798 29=head2 Remove macperl references from tests
30
31MacPerl is gone. The tests don't need to be there.
32
5a176cbc 33=head2 Remove duplication of test setup.
34
35Schwern notes, that there's duplication of code - lots and lots of tests have
36some variation on the big block of C<$Is_Foo> checks. We can safely put this
37into a file, change it to build an C<%Is> hash and require it. Maybe just put
38it into F<test.pl>. Throw in the handy tainting subroutines.
39
87a942b1 40=head2 POD -E<gt> HTML conversion in the core still sucks
e50bb9a1 41
938c8732 42Which is crazy given just how simple POD purports to be, and how simple HTML
adebf063 43can be. It's not actually I<as> simple as it sounds, particularly with the
44flexibility POD allows for C<=item>, but it would be good to improve the
45visual appeal of the HTML generated, and to avoid it having any validation
46errors. See also L</make HTML install work>, as the layout of installation tree
47is needed to improve the cross-linking.
938c8732 48
dc0fb092 49The addition of C<Pod::Simple> and its related modules may make this task
50easier to complete.
51
0befdfba 52=head2 Make ExtUtils::ParseXS use strict;
53
54F<lib/ExtUtils/ParseXS.pm> contains this line
55
56 # use strict; # One of these days...
57
58Simply uncomment it, and fix all the resulting issues :-)
59
60The more practical approach, to break the task down into manageable chunks, is
61to work your way though the code from bottom to top, or if necessary adding
62extra C<{ ... }> blocks, and turning on strict within them.
63
aa237293 64=head2 Parallel testing
65
b2e2905c 66(This probably impacts much more than the core: also the Test::Harness
02f21748 67and TAP::* modules on CPAN.)
68
c707cc00 69All of the tests in F<t/> can now be run in parallel, if C<$ENV{TEST_JOBS}>
70is set. However, tests within each directory in F<ext> and F<lib> are still
71run in series, with directories run in parallel. This is an adequate
72heuristic, but it might be possible to relax it further, and get more
73throughput. Specifically, it would be good to audit all of F<lib/*.t>, and
74make them use C<File::Temp>.
aa237293 75
0bdfc961 76=head2 Make Schwern poorer
e50bb9a1 77
613bd4f7 78We should have tests for everything. When all the core's modules are tested,
0bdfc961 79Schwern has promised to donate to $500 to TPF. We may need volunteers to
80hold him upside down and shake vigorously in order to actually extract the
81cash.
3958b146 82
0bdfc961 83=head2 Improve the coverage of the core tests
e50bb9a1 84
02f21748 85Use Devel::Cover to ascertain the core modules's test coverage, then add
86tests that are currently missing.
30222c0f 87
0bdfc961 88=head2 test B
e50bb9a1 89
0bdfc961 90A full test suite for the B module would be nice.
e50bb9a1 91
0bdfc961 92=head2 A decent benchmark
e50bb9a1 93
617eabfa 94C<perlbench> seems impervious to any recent changes made to the perl core. It
0bdfc961 95would be useful to have a reasonable general benchmarking suite that roughly
96represented what current perl programs do, and measurably reported whether
97tweaks to the core improve, degrade or don't really affect performance, to
98guide people attempting to optimise the guts of perl. Gisle would welcome
99new tests for perlbench.
6168cf99 100
0bdfc961 101=head2 fix tainting bugs
6168cf99 102
0bdfc961 103Fix the bugs revealed by running the test suite with the C<-t> switch (via
104C<make test.taintwarn>).
e50bb9a1 105
0bdfc961 106=head2 Dual life everything
e50bb9a1 107
0bdfc961 108As part of the "dists" plan, anything that doesn't belong in the smallest perl
109distribution needs to be dual lifed. Anything else can be too. Figure out what
110changes would be needed to package that module and its tests up for CPAN, and
111do so. Test it with older perl releases, and fix the problems you find.
e50bb9a1 112
a393eb28 113To make a minimal perl distribution, it's useful to look at
114F<t/lib/commonsense.t>.
115
c2aba5b8 116=head2 Bundle dual life modules in ext/
117
118For maintenance (and branch merging) reasons, it would be useful to move
119some architecture-independent dual-life modules from lib/ to ext/, if this
120has no negative impact on the build of perl itself.
121
764e6bc7 122As part of this, we need to move F<pod/*.PL> into their respective directories
123in F<ext/>. They're referenced by (at least) C<plextract> in F<Makefile.SH>
124and C<utils> in F<win32/Makefile> and F<win32/makefile.ml>, and listed
125explicitly in F<win32/pod.mak>, F<vms/descrip_mms.template> and F<utils.lst>
126
0bdfc961 127=head2 POSIX memory footprint
e50bb9a1 128
0bdfc961 129Ilya observed that use POSIX; eats memory like there's no tomorrow, and at
130various times worked to cut it down. There is probably still fat to cut out -
131for example POSIX passes Exporter some very memory hungry data structures.
e50bb9a1 132
eed36644 133=head2 embed.pl/makedef.pl
134
135There is a script F<embed.pl> that generates several header files to prefix
136all of Perl's symbols in a consistent way, to provide some semblance of
137namespace support in C<C>. Functions are declared in F<embed.fnc>, variables
907b3e23 138in F<interpvar.h>. Quite a few of the functions and variables
eed36644 139are conditionally declared there, using C<#ifdef>. However, F<embed.pl>
140doesn't understand the C macros, so the rules about which symbols are present
141when is duplicated in F<makedef.pl>. Writing things twice is bad, m'kay.
142It would be good to teach C<embed.pl> to understand the conditional
143compilation, and hence remove the duplication, and the mistakes it has caused.
e50bb9a1 144
801de10e 145=head2 use strict; and AutoLoad
146
147Currently if you write
148
149 package Whack;
150 use AutoLoader 'AUTOLOAD';
151 use strict;
152 1;
153 __END__
154 sub bloop {
155 print join (' ', No, strict, here), "!\n";
156 }
157
158then C<use strict;> isn't in force within the autoloaded subroutines. It would
159be more consistent (and less surprising) to arrange for all lexical pragmas
160in force at the __END__ block to be in force within each autoloaded subroutine.
161
773b3597 162There's a similar problem with SelfLoader.
163
91d0cbf6 164=head2 profile installman
165
166The F<installman> script is slow. All it is doing text processing, which we're
167told is something Perl is good at. So it would be nice to know what it is doing
168that is taking so much CPU, and where possible address it.
169
170
0bdfc961 171=head1 Tasks that need a little sysadmin-type knowledge
e50bb9a1 172
0bdfc961 173Or if you prefer, tasks that you would learn from, and broaden your skills
174base...
e50bb9a1 175
cd793d32 176=head2 make HTML install work
e50bb9a1 177
adebf063 178There is an C<installhtml> target in the Makefile. It's marked as
179"experimental". It would be good to get this tested, make it work reliably, and
180remove the "experimental" tag. This would include
181
182=over 4
183
184=item 1
185
186Checking that cross linking between various parts of the documentation works.
187In particular that links work between the modules (files with POD in F<lib/>)
188and the core documentation (files in F<pod/>)
189
190=item 2
191
617eabfa 192Work out how to split C<perlfunc> into chunks, preferably one per function
193group, preferably with general case code that could be used elsewhere.
194Challenges here are correctly identifying the groups of functions that go
195together, and making the right named external cross-links point to the right
196page. Things to be aware of are C<-X>, groups such as C<getpwnam> to
197C<endservent>, two or more C<=items> giving the different parameter lists, such
198as
adebf063 199
200 =item substr EXPR,OFFSET,LENGTH,REPLACEMENT
adebf063 201 =item substr EXPR,OFFSET,LENGTH
adebf063 202 =item substr EXPR,OFFSET
203
204and different parameter lists having different meanings. (eg C<select>)
205
206=back
3a89a73c 207
0bdfc961 208=head2 compressed man pages
209
210Be able to install them. This would probably need a configure test to see how
211the system does compressed man pages (same directory/different directory?
212same filename/different filename), as well as tweaking the F<installman> script
213to compress as necessary.
214
30222c0f 215=head2 Add a code coverage target to the Makefile
216
217Make it easy for anyone to run Devel::Cover on the core's tests. The steps
218to do this manually are roughly
219
220=over 4
221
222=item *
223
224do a normal C<Configure>, but include Devel::Cover as a module to install
225(see F<INSTALL> for how to do this)
226
227=item *
228
229 make perl
230
231=item *
232
233 cd t; HARNESS_PERL_SWITCHES=-MDevel::Cover ./perl -I../lib harness
234
235=item *
236
237Process the resulting Devel::Cover database
238
239=back
240
241This just give you the coverage of the F<.pm>s. To also get the C level
242coverage you need to
243
244=over 4
245
246=item *
247
248Additionally tell C<Configure> to use the appropriate C compiler flags for
249C<gcov>
250
251=item *
252
253 make perl.gcov
254
255(instead of C<make perl>)
256
257=item *
258
259After running the tests run C<gcov> to generate all the F<.gcov> files.
260(Including down in the subdirectories of F<ext/>
261
262=item *
263
264(From the top level perl directory) run C<gcov2perl> on all the C<.gcov> files
265to get their stats into the cover_db directory.
266
267=item *
268
269Then process the Devel::Cover database
270
271=back
272
273It would be good to add a single switch to C<Configure> to specify that you
274wanted to perform perl level coverage, and another to specify C level
275coverage, and have C<Configure> and the F<Makefile> do all the right things
276automatically.
277
02f21748 278=head2 Make Config.pm cope with differences between built and installed perl
0bdfc961 279
280Quite often vendors ship a perl binary compiled with their (pay-for)
281compilers. People install a free compiler, such as gcc. To work out how to
282build extensions, Perl interrogates C<%Config>, so in this situation
283C<%Config> describes compilers that aren't there, and extension building
284fails. This forces people into choosing between re-compiling perl themselves
285using the compiler they have, or only using modules that the vendor ships.
286
287It would be good to find a way teach C<Config.pm> about the installation setup,
288possibly involving probing at install time or later, so that the C<%Config> in
289a binary distribution better describes the installed machine, when the
290installed machine differs from the build machine in some significant way.
291
728f4ecd 292=head2 linker specification files
293
294Some platforms mandate that you provide a list of a shared library's external
295symbols to the linker, so the core already has the infrastructure in place to
296do this for generating shared perl libraries. My understanding is that the
297GNU toolchain can accept an optional linker specification file, and restrict
298visibility just to symbols declared in that file. It would be good to extend
299F<makedef.pl> to support this format, and to provide a means within
300C<Configure> to enable it. This would allow Unix users to test that the
301export list is correct, and to build a perl that does not pollute the global
302namespace with private symbols.
303
a229ae3b 304=head2 Cross-compile support
305
306Currently C<Configure> understands C<-Dusecrosscompile> option. This option
307arranges for building C<miniperl> for TARGET machine, so this C<miniperl> is
308assumed then to be copied to TARGET machine and used as a replacement of full
309C<perl> executable.
310
d1307786 311This could be done little differently. Namely C<miniperl> should be built for
a229ae3b 312HOST and then full C<perl> with extensions should be compiled for TARGET.
d1307786 313This, however, might require extra trickery for %Config: we have one config
87a942b1 314first for HOST and then another for TARGET. Tools like MakeMaker will be
315mightily confused. Having around two different types of executables and
316libraries (HOST and TARGET) makes life interesting for Makefiles and
317shell (and Perl) scripts. There is $Config{run}, normally empty, which
318can be used as an execution wrapper. Also note that in some
319cross-compilation/execution environments the HOST and the TARGET do
320not see the same filesystem(s), the $Config{run} may need to do some
321file/directory copying back and forth.
0bdfc961 322
8537f021 323=head2 roffitall
324
325Make F<pod/roffitall> be updated by F<pod/buildtoc>.
326
98fca0e8 327=head2 Split "linker" from "compiler"
328
329Right now, Configure probes for two commands, and sets two variables:
330
331=over 4
332
b91dd380 333=item * C<cc> (in F<cc.U>)
98fca0e8 334
335This variable holds the name of a command to execute a C compiler which
336can resolve multiple global references that happen to have the same
337name. Usual values are F<cc> and F<gcc>.
338Fervent ANSI compilers may be called F<c89>. AIX has F<xlc>.
339
b91dd380 340=item * C<ld> (in F<dlsrc.U>)
98fca0e8 341
342This variable indicates the program to be used to link
343libraries for dynamic loading. On some systems, it is F<ld>.
344On ELF systems, it should be C<$cc>. Mostly, we'll try to respect
345the hint file setting.
346
347=back
348
8d159ec1 349There is an implicit historical assumption from around Perl5.000alpha
350something, that C<$cc> is also the correct command for linking object files
351together to make an executable. This may be true on Unix, but it's not true
352on other platforms, and there are a maze of work arounds in other places (such
353as F<Makefile.SH>) to cope with this.
98fca0e8 354
355Ideally, we should create a new variable to hold the name of the executable
356linker program, probe for it in F<Configure>, and centralise all the special
357case logic there or in hints files.
358
359A small bikeshed issue remains - what to call it, given that C<$ld> is already
8d159ec1 360taken (arguably for the wrong thing now, but on SunOS 4.1 it is the command
361for creating dynamically-loadable modules) and C<$link> could be confused with
362the Unix command line executable of the same name, which does something
363completely different. Andy Dougherty makes the counter argument "In parrot, I
364tried to call the command used to link object files and libraries into an
365executable F<link>, since that's what my vaguely-remembered DOS and VMS
366experience suggested. I don't think any real confusion has ensued, so it's
367probably a reasonable name for perl5 to use."
98fca0e8 368
369"Alas, I've always worried that introducing it would make things worse,
370since now the module building utilities would have to look for
371C<$Config{link}> and institute a fall-back plan if it weren't found."
8d159ec1 372Although I can see that as confusing, given that C<$Config{d_link}> is true
373when (hard) links are available.
98fca0e8 374
75585ce3 375=head2 Configure Windows using PowerShell
376
377Currently, Windows uses hard-coded config files based to build the
378config.h for compiling Perl. Makefiles are also hard-coded and need to be
379hand edited prior to building Perl. While this makes it easy to create a perl.exe
380that works across multiple Windows versions, being able to accurately
381configure a perl.exe for a specific Windows versions and VS C++ would be
382a nice enhancement. With PowerShell available on Windows XP and up, this
383may now be possible. Step 1 might be to investigate whether this is possible
384and use this to clean up our current makefile situation. Step 2 would be to
385see if there would be a way to use our existing metaconfig units to configure a
386Windows Perl or whether we go in a separate direction and make it so. Of
387course, we all know what step 3 is.
388
ab45a0fa 389=head2 decouple -g and -DDEBUGGING
390
391Currently F<Configure> automatically adds C<-DDEBUGGING> to the C compiler
392flags if it spots C<-g> in the optimiser flags. The pre-processor directive
393C<DEBUGGING> enables F<perl>'s command line <-D> options, but in the process
394makes F<perl> slower. It would be good to disentangle this logic, so that
395C-level debugging with C<-g> and Perl level debugging with C<-D> can easily
396be enabled independently.
397
0bdfc961 398=head1 Tasks that need a little C knowledge
399
400These tasks would need a little C knowledge, but don't need any specific
401background or experience with XS, or how the Perl interpreter works
402
3d826b29 403=head2 Weed out needless PERL_UNUSED_ARG
404
405The C code uses the macro C<PERL_UNUSED_ARG> to stop compilers warning about
406unused arguments. Often the arguments can't be removed, as there is an
407external constraint that determines the prototype of the function, so this
408approach is valid. However, there are some cases where C<PERL_UNUSED_ARG>
409could be removed. Specifically
410
411=over 4
412
413=item *
414
415The prototypes of (nearly all) static functions can be changed
416
417=item *
418
419Unused arguments generated by short cut macros are wasteful - the short cut
420macro used can be changed.
421
422=back
423
fbf638cb 424=head2 Modernize the order of directories in @INC
425
426The way @INC is laid out by default, one cannot upgrade core (dual-life)
427modules without overwriting files. This causes problems for binary
3d14fd97 428package builders. One possible proposal is laid out in this
429message:
430L<http://www.xray.mpe.mpg.de/mailing-lists/perl5-porters/2002-04/msg02380.html>.
fbf638cb 431
bcbaa2d5 432=head2 -Duse32bit*
433
434Natively 64-bit systems need neither -Duse64bitint nor -Duse64bitall.
435On these systems, it might be the default compilation mode, and there
436is currently no guarantee that passing no use64bitall option to the
437Configure process will build a 32bit perl. Implementing -Duse32bit*
438options would be nice for perl 5.12.
439
fee0a0f7 440=head2 Profile Perl - am I hot or not?
62403a3c 441
fee0a0f7 442The Perl source code is stable enough that it makes sense to profile it,
443identify and optimise the hotspots. It would be good to measure the
444performance of the Perl interpreter using free tools such as cachegrind,
445gprof, and dtrace, and work to reduce the bottlenecks they reveal.
446
447As part of this, the idea of F<pp_hot.c> is that it contains the I<hot> ops,
448the ops that are most commonly used. The idea is that by grouping them, their
449object code will be adjacent in the executable, so they have a greater chance
450of already being in the CPU cache (or swapped in) due to being near another op
451already in use.
62403a3c 452
453Except that it's not clear if these really are the most commonly used ops. So
fee0a0f7 454as part of exercising your skills with coverage and profiling tools you might
455want to determine what ops I<really> are the most commonly used. And in turn
456suggest evictions and promotions to achieve a better F<pp_hot.c>.
62403a3c 457
91d0cbf6 458One piece of Perl code that might make a good testbed is F<installman>.
459
98fed0ad 460=head2 Allocate OPs from arenas
461
462Currently all new OP structures are individually malloc()ed and free()d.
463All C<malloc> implementations have space overheads, and are now as fast as
464custom allocates so it would both use less memory and less CPU to allocate
465the various OP structures from arenas. The SV arena code can probably be
466re-used for this.
467
539f2c54 468Note that Configuring perl with C<-Accflags=-DPL_OP_SLAB_ALLOC> will use
469Perl_Slab_alloc() to pack optrees into a contiguous block, which is
470probably superior to the use of OP arenas, esp. from a cache locality
471standpoint. See L<Profile Perl - am I hot or not?>.
472
a229ae3b 473=head2 Improve win32/wince.c
0bdfc961 474
a229ae3b 475Currently, numerous functions look virtually, if not completely,
02f21748 476identical in both C<win32/wince.c> and C<win32/win32.c> files, which can't
6d71adcd 477be good.
478
c5b31784 479=head2 Use secure CRT functions when building with VC8 on Win32
480
481Visual C++ 2005 (VC++ 8.x) deprecated a number of CRT functions on the basis
482that they were "unsafe" and introduced differently named secure versions of
483them as replacements, e.g. instead of writing
484
485 FILE* f = fopen(__FILE__, "r");
486
487one should now write
488
489 FILE* f;
490 errno_t err = fopen_s(&f, __FILE__, "r");
491
492Currently, the warnings about these deprecations have been disabled by adding
493-D_CRT_SECURE_NO_DEPRECATE to the CFLAGS. It would be nice to remove that
494warning suppressant and actually make use of the new secure CRT functions.
495
496There is also a similar issue with POSIX CRT function names like fileno having
497been deprecated in favour of ISO C++ conformant names like _fileno. These
26a6faa8 498warnings are also currently suppressed by adding -D_CRT_NONSTDC_NO_DEPRECATE. It
c5b31784 499might be nice to do as Microsoft suggest here too, although, unlike the secure
500functions issue, there is presumably little or no benefit in this case.
501
038ae9a4 502=head2 Fix POSIX::access() and chdir() on Win32
503
504These functions currently take no account of DACLs and therefore do not behave
505correctly in situations where access is restricted by DACLs (as opposed to the
506read-only attribute).
507
508Furthermore, POSIX::access() behaves differently for directories having the
509read-only attribute set depending on what CRT library is being used. For
510example, the _access() function in the VC6 and VC7 CRTs (wrongly) claim that
511such directories are not writable, whereas in fact all directories are writable
512unless access is denied by DACLs. (In the case of directories, the read-only
513attribute actually only means that the directory cannot be deleted.) This CRT
514bug is fixed in the VC8 and VC9 CRTs (but, of course, the directory may still
515not actually be writable if access is indeed denied by DACLs).
516
517For the chdir() issue, see ActiveState bug #74552:
518http://bugs.activestate.com/show_bug.cgi?id=74552
519
520Therefore, DACLs should be checked both for consistency across CRTs and for
521the correct answer.
522
523(Note that perl's -w operator should not be modified to check DACLs. It has
524been written so that it reflects the state of the read-only attribute, even
525for directories (whatever CRT is being used), for symmetry with chmod().)
526
16815324 527=head2 strcat(), strcpy(), strncat(), strncpy(), sprintf(), vsprintf()
528
529Maybe create a utility that checks after each libperl.a creation that
530none of the above (nor sprintf(), vsprintf(), or *SHUDDER* gets())
531ever creep back to libperl.a.
532
533 nm libperl.a | ./miniperl -alne '$o = $F[0] if /:$/; print "$o $F[1]" if $F[0] eq "U" && $F[1] =~ /^(?:strn?c(?:at|py)|v?sprintf|gets)$/'
534
535Note, of course, that this will only tell whether B<your> platform
536is using those naughty interfaces.
537
de96509d 538=head2 -D_FORTIFY_SOURCE=2, -fstack-protector
539
540Recent glibcs support C<-D_FORTIFY_SOURCE=2> and recent gcc
541(4.1 onwards?) supports C<-fstack-protector>, both of which give
542protection against various kinds of buffer overflow problems.
543These should probably be used for compiling Perl whenever available,
544Configure and/or hints files should be adjusted to probe for the
545availability of these features and enable them as appropriate.
16815324 546
8964cfe0 547=head2 Arenas for GPs? For MAGIC?
548
549C<struct gp> and C<struct magic> are both currently allocated by C<malloc>.
550It might be a speed or memory saving to change to using arenas. Or it might
551not. It would need some suitable benchmarking first. In particular, C<GP>s
552can probably be changed with minimal compatibility impact (probably nothing
553outside of the core, or even outside of F<gv.c> allocates them), but they
554probably aren't allocated/deallocated often enough for a speed saving. Whereas
555C<MAGIC> is allocated/deallocated more often, but in turn, is also something
556more externally visible, so changing the rules here may bite external code.
557
3880c8ec 558=head2 Shared arenas
559
560Several SV body structs are now the same size, notably PVMG and PVGV, PVAV and
561PVHV, and PVCV and PVFM. It should be possible to allocate and return same
562sized bodies from the same actual arena, rather than maintaining one arena for
563each. This could save 4-6K per thread, of memory no longer tied up in the
564not-yet-allocated part of an arena.
565
8964cfe0 566
6d71adcd 567=head1 Tasks that need a knowledge of XS
568
569These tasks would need C knowledge, and roughly the level of knowledge of
570the perl API that comes from writing modules that use XS to interface to
571C.
572
318bf708 573=head2 Remove the use of SVs as temporaries in dump.c
574
575F<dump.c> contains debugging routines to dump out the contains of perl data
576structures, such as C<SV>s, C<AV>s and C<HV>s. Currently, the dumping code
577B<uses> C<SV>s for its temporary buffers, which was a logical initial
578implementation choice, as they provide ready made memory handling.
579
580However, they also lead to a lot of confusion when it happens that what you're
581trying to debug is seen by the code in F<dump.c>, correctly or incorrectly, as
582a temporary scalar it can use for a temporary buffer. It's also not possible
583to dump scalars before the interpreter is properly set up, such as during
584ithreads cloning. It would be good to progressively replace the use of scalars
585as string accumulation buffers with something much simpler, directly allocated
586by C<malloc>. The F<dump.c> code is (or should be) only producing 7 bit
587US-ASCII, so output character sets are not an issue.
588
589Producing and proving an internal simple buffer allocation would make it easier
590to re-write the internals of the PerlIO subsystem to avoid using C<SV>s for
591B<its> buffers, use of which can cause problems similar to those of F<dump.c>,
592at similar times.
593
5d96f598 594=head2 safely supporting POSIX SA_SIGINFO
595
596Some years ago Jarkko supplied patches to provide support for the POSIX
597SA_SIGINFO feature in Perl, passing the extra data to the Perl signal handler.
598
599Unfortunately, it only works with "unsafe" signals, because under safe
600signals, by the time Perl gets to run the signal handler, the extra
601information has been lost. Moreover, it's not easy to store it somewhere,
602as you can't call mutexs, or do anything else fancy, from inside a signal
603handler.
604
605So it strikes me that we could provide safe SA_SIGINFO support
606
607=over 4
608
609=item 1
610
611Provide global variables for two file descriptors
612
613=item 2
614
615When the first request is made via C<sigaction> for C<SA_SIGINFO>, create a
616pipe, store the reader in one, the writer in the other
617
618=item 3
619
620In the "safe" signal handler (C<Perl_csighandler()>/C<S_raise_signal()>), if
621the C<siginfo_t> pointer non-C<NULL>, and the writer file handle is open,
622
623=over 8
624
625=item 1
626
627serialise signal number, C<struct siginfo_t> (or at least the parts we care
628about) into a small auto char buff
629
630=item 2
631
632C<write()> that (non-blocking) to the writer fd
633
634=over 12
635
636=item 1
637
638if it writes 100%, flag the signal in a counter of "signals on the pipe" akin
639to the current per-signal-number counts
640
641=item 2
642
643if it writes 0%, assume the pipe is full. Flag the data as lost?
644
645=item 3
646
647if it writes partially, croak a panic, as your OS is broken.
648
649=back
650
651=back
652
653=item 4
654
655in the regular C<PERL_ASYNC_CHECK()> processing, if there are "signals on
656the pipe", read the data out, deserialise, build the Perl structures on
657the stack (code in C<Perl_sighandler()>, the "unsafe" handler), and call as
658usual.
659
660=back
661
662I think that this gets us decent C<SA_SIGINFO> support, without the current risk
663of running Perl code inside the signal handler context. (With all the dangers
664of things like C<malloc> corruption that that currently offers us)
665
666For more information see the thread starting with this message:
667http://www.xray.mpe.mpg.de/mailing-lists/perl5-porters/2008-03/msg00305.html
668
6d71adcd 669=head2 autovivification
670
671Make all autovivification consistent w.r.t LVALUE/RVALUE and strict/no strict;
672
673This task is incremental - even a little bit of work on it will help.
674
675=head2 Unicode in Filenames
676
677chdir, chmod, chown, chroot, exec, glob, link, lstat, mkdir, open,
678opendir, qx, readdir, readlink, rename, rmdir, stat, symlink, sysopen,
679system, truncate, unlink, utime, -X. All these could potentially accept
680Unicode filenames either as input or output (and in the case of system
681and qx Unicode in general, as input or output to/from the shell).
682Whether a filesystem - an operating system pair understands Unicode in
683filenames varies.
684
685Known combinations that have some level of understanding include
686Microsoft NTFS, Apple HFS+ (In Mac OS 9 and X) and Apple UFS (in Mac
687OS X), NFS v4 is rumored to be Unicode, and of course Plan 9. How to
688create Unicode filenames, what forms of Unicode are accepted and used
689(UCS-2, UTF-16, UTF-8), what (if any) is the normalization form used,
690and so on, varies. Finding the right level of interfacing to Perl
691requires some thought. Remember that an OS does not implicate a
692filesystem.
693
694(The Windows -C command flag "wide API support" has been at least
695temporarily retired in 5.8.1, and the -C has been repurposed, see
696L<perlrun>.)
697
87a942b1 698Most probably the right way to do this would be this:
699L</"Virtualize operating system access">.
700
6d71adcd 701=head2 Unicode in %ENV
702
703Currently the %ENV entries are always byte strings.
87a942b1 704See L</"Virtualize operating system access">.
6d71adcd 705
1f2e7916 706=head2 Unicode and glob()
707
708Currently glob patterns and filenames returned from File::Glob::glob()
87a942b1 709are always byte strings. See L</"Virtualize operating system access">.
1f2e7916 710
dbb0c492 711=head2 Unicode and lc/uc operators
712
713Some built-in operators (C<lc>, C<uc>, etc.) behave differently, based on
714what the internal encoding of their argument is. That should not be the
715case. Maybe add a pragma to switch behaviour.
716
6d71adcd 717=head2 use less 'memory'
718
719Investigate trade offs to switch out perl's choices on memory usage.
720Particularly perl should be able to give memory back.
721
722This task is incremental - even a little bit of work on it will help.
723
724=head2 Re-implement C<:unique> in a way that is actually thread-safe
725
726The old implementation made bad assumptions on several levels. A good 90%
727solution might be just to make C<:unique> work to share the string buffer
728of SvPVs. That way large constant strings can be shared between ithreads,
729such as the configuration information in F<Config>.
730
731=head2 Make tainting consistent
732
733Tainting would be easier to use if it didn't take documented shortcuts and
734allow taint to "leak" everywhere within an expression.
735
736=head2 readpipe(LIST)
737
738system() accepts a LIST syntax (and a PROGRAM LIST syntax) to avoid
739running a shell. readpipe() (the function behind qx//) could be similarly
740extended.
741
6d71adcd 742=head2 Audit the code for destruction ordering assumptions
743
744Change 25773 notes
745
746 /* Need to check SvMAGICAL, as during global destruction it may be that
747 AvARYLEN(av) has been freed before av, and hence the SvANY() pointer
748 is now part of the linked list of SV heads, rather than pointing to
749 the original body. */
750 /* FIXME - audit the code for other bugs like this one. */
751
752adding the C<SvMAGICAL> check to
753
754 if (AvARYLEN(av) && SvMAGICAL(AvARYLEN(av))) {
755 MAGIC *mg = mg_find (AvARYLEN(av), PERL_MAGIC_arylen);
756
757Go through the core and look for similar assumptions that SVs have particular
758types, as all bets are off during global destruction.
759
749904bf 760=head2 Extend PerlIO and PerlIO::Scalar
761
762PerlIO::Scalar doesn't know how to truncate(). Implementing this
763would require extending the PerlIO vtable.
764
765Similarly the PerlIO vtable doesn't know about formats (write()), or
766about stat(), or chmod()/chown(), utime(), or flock().
767
768(For PerlIO::Scalar it's hard to see what e.g. mode bits or ownership
769would mean.)
770
771PerlIO doesn't do directories or symlinks, either: mkdir(), rmdir(),
772opendir(), closedir(), seekdir(), rewinddir(), glob(); symlink(),
773readlink().
774
94da6c29 775See also L</"Virtualize operating system access">.
776
3236f110 777=head2 -C on the #! line
778
779It should be possible to make -C work correctly if found on the #! line,
780given that all perl command line options are strict ASCII, and -C changes
781only the interpretation of non-ASCII characters, and not for the script file
782handle. To make it work needs some investigation of the ordering of function
783calls during startup, and (by implication) a bit of tweaking of that order.
784
d6c1e11f 785=head2 Organize error messages
786
787Perl's diagnostics (error messages, see L<perldiag>) could use
a8d0aeb9 788reorganizing and formalizing so that each error message has its
d6c1e11f 789stable-for-all-eternity unique id, categorized by severity, type, and
790subsystem. (The error messages would be listed in a datafile outside
c4bd451b 791of the Perl source code, and the source code would only refer to the
792messages by the id.) This clean-up and regularizing should apply
d6c1e11f 793for all croak() messages.
794
795This would enable all sorts of things: easier translation/localization
796of the messages (though please do keep in mind the caveats of
797L<Locale::Maketext> about too straightforward approaches to
798translation), filtering by severity, and instead of grepping for a
799particular error message one could look for a stable error id. (Of
800course, changing the error messages by default would break all the
801existing software depending on some particular error message...)
802
803This kind of functionality is known as I<message catalogs>. Look for
804inspiration for example in the catgets() system, possibly even use it
805if available-- but B<only> if available, all platforms will B<not>
de96509d 806have catgets().
d6c1e11f 807
808For the really pure at heart, consider extending this item to cover
809also the warning messages (see L<perllexwarn>, C<warnings.pl>).
3236f110 810
0bdfc961 811=head1 Tasks that need a knowledge of the interpreter
3298bd4d 812
0bdfc961 813These tasks would need C knowledge, and knowledge of how the interpreter works,
814or a willingness to learn.
3298bd4d 815
de6375e3 816=head2 truncate() prototype
817
818The prototype of truncate() is currently C<$$>. It should probably
819be C<*$> instead. (This is changed in F<opcode.pl>)
820
2d0587d8 821=head2 decapsulation of smart match argument
822
823Currently C<$foo ~~ $object> will die with the message "Smart matching a
824non-overloaded object breaks encapsulation". It would be nice to allow
825to bypass this by using explictly the syntax C<$foo ~~ %$object> or
826C<$foo ~~ @$object>.
827
565590b5 828=head2 error reporting of [$a ; $b]
829
830Using C<;> inside brackets is a syntax error, and we don't propose to change
831that by giving it any meaning. However, it's not reported very helpfully:
832
833 $ perl -e '$a = [$b; $c];'
834 syntax error at -e line 1, near "$b;"
835 syntax error at -e line 1, near "$c]"
836 Execution of -e aborted due to compilation errors.
837
838It should be possible to hook into the tokeniser or the lexer, so that when a
839C<;> is parsed where it is not legal as a statement terminator (ie inside
840C<{}> used as a hashref, C<[]> or C<()>) it issues an error something like
841I<';' isn't legal inside an expression - if you need multiple statements use a
842do {...} block>. See the thread starting at
843http://www.xray.mpe.mpg.de/mailing-lists/perl5-porters/2008-09/msg00573.html
844
718140ec 845=head2 lexicals used only once
846
847This warns:
848
849 $ perl -we '$pie = 42'
850 Name "main::pie" used only once: possible typo at -e line 1.
851
852This does not:
853
854 $ perl -we 'my $pie = 42'
855
856Logically all lexicals used only once should warn, if the user asks for
d6f4ea2e 857warnings. An unworked RT ticket (#5087) has been open for almost seven
858years for this discrepancy.
718140ec 859
a3d15f9a 860=head2 UTF-8 revamp
861
862The handling of Unicode is unclean in many places. For example, the regexp
863engine matches in Unicode semantics whenever the string or the pattern is
864flagged as UTF-8, but that should not be dependent on an internal storage
865detail of the string. Likewise, case folding behaviour is dependent on the
866UTF8 internal flag being on or off.
867
868=head2 Properly Unicode safe tokeniser and pads.
869
870The tokeniser isn't actually very UTF-8 clean. C<use utf8;> is a hack -
871variable names are stored in stashes as raw bytes, without the utf-8 flag
872set. The pad API only takes a C<char *> pointer, so that's all bytes too. The
873tokeniser ignores the UTF-8-ness of C<PL_rsfp>, or any SVs returned from
874source filters. All this could be fixed.
875
636e63cb 876=head2 state variable initialization in list context
877
878Currently this is illegal:
879
880 state ($a, $b) = foo();
881
a2874905 882In Perl 6, C<state ($a) = foo();> and C<(state $a) = foo();> have different
a8d0aeb9 883semantics, which is tricky to implement in Perl 5 as currently they produce
a2874905 884the same opcode trees. The Perl 6 design is firm, so it would be good to
a8d0aeb9 885implement the necessary code in Perl 5. There are comments in
a2874905 886C<Perl_newASSIGNOP()> that show the code paths taken by various assignment
887constructions involving state variables.
636e63cb 888
4fedb12c 889=head2 Implement $value ~~ 0 .. $range
890
891It would be nice to extend the syntax of the C<~~> operator to also
892understand numeric (and maybe alphanumeric) ranges.
a393eb28 893
894=head2 A does() built-in
895
896Like ref(), only useful. It would call the C<DOES> method on objects; it
897would also tell whether something can be dereferenced as an
898array/hash/etc., or used as a regexp, etc.
899L<http://www.xray.mpe.mpg.de/mailing-lists/perl5-porters/2007-03/msg00481.html>
900
901=head2 Tied filehandles and write() don't mix
902
903There is no method on tied filehandles to allow them to be called back by
904formats.
4fedb12c 905
53967bb9 906=head2 Propagate compilation hints to the debugger
907
908Currently a debugger started with -dE on the command-line doesn't see the
909features enabled by -E. More generally hints (C<$^H> and C<%^H>) aren't
910propagated to the debugger. Probably it would be a good thing to propagate
911hints from the innermost non-C<DB::> scope: this would make code eval'ed
912in the debugger see the features (and strictures, etc.) currently in
913scope.
914
d10fc472 915=head2 Attach/detach debugger from running program
1626a787 916
cd793d32 917The old perltodo notes "With C<gdb>, you can attach the debugger to a running
918program if you pass the process ID. It would be good to do this with the Perl
0bdfc961 919debugger on a running Perl program, although I'm not sure how it would be
920done." ssh and screen do this with named pipes in /tmp. Maybe we can too.
1626a787 921
0bdfc961 922=head2 LVALUE functions for lists
923
924The old perltodo notes that lvalue functions don't work for list or hash
925slices. This would be good to fix.
926
0bdfc961 927=head2 regexp optimiser optional
928
929The regexp optimiser is not optional. It should configurable to be, to allow
930its performance to be measured, and its bugs to be easily demonstrated.
931
02f21748 932=head2 delete &function
933
934Allow to delete functions. One can already undef them, but they're still
935in the stash.
936
ef36c6a7 937=head2 C</w> regex modifier
938
939That flag would enable to match whole words, and also to interpolate
940arrays as alternations. With it, C</P/w> would be roughly equivalent to:
941
942 do { local $"='|'; /\b(?:P)\b/ }
943
944See L<http://www.xray.mpe.mpg.de/mailing-lists/perl5-porters/2007-01/msg00400.html>
945for the discussion.
946
0bdfc961 947=head2 optional optimizer
948
949Make the peephole optimizer optional. Currently it performs two tasks as
950it walks the optree - genuine peephole optimisations, and necessary fixups of
951ops. It would be good to find an efficient way to switch out the
952optimisations whilst keeping the fixups.
953
954=head2 You WANT *how* many
955
956Currently contexts are void, scalar and list. split has a special mechanism in
957place to pass in the number of return values wanted. It would be useful to
958have a general mechanism for this, backwards compatible and little speed hit.
959This would allow proposals such as short circuiting sort to be implemented
960as a module on CPAN.
961
962=head2 lexical aliases
963
964Allow lexical aliases (maybe via the syntax C<my \$alias = \$foo>.
965
966=head2 entersub XS vs Perl
967
968At the moment pp_entersub is huge, and has code to deal with entering both
969perl and XS subroutines. Subroutine implementations rarely change between
970perl and XS at run time, so investigate using 2 ops to enter subs (one for
971XS, one for perl) and swap between if a sub is redefined.
2810d901 972
de535794 973=head2 Self-ties
2810d901 974
de535794 975Self-ties are currently illegal because they caused too many segfaults. Maybe
a8d0aeb9 976the causes of these could be tracked down and self-ties on all types
de535794 977reinstated.
0bdfc961 978
979=head2 Optimize away @_
980
981The old perltodo notes "Look at the "reification" code in C<av.c>".
982
87a942b1 983=head2 Virtualize operating system access
984
985Implement a set of "vtables" that virtualizes operating system access
986(open(), mkdir(), unlink(), readdir(), getenv(), etc.) At the very
987least these interfaces should take SVs as "name" arguments instead of
988bare char pointers; probably the most flexible and extensible way
e1a3d5d1 989would be for the Perl-facing interfaces to accept HVs. The system
990needs to be per-operating-system and per-file-system
991hookable/filterable, preferably both from XS and Perl level
87a942b1 992(L<perlport/"Files and Filesystems"> is good reading at this point,
993in fact, all of L<perlport> is.)
994
e1a3d5d1 995This has actually already been implemented (but only for Win32),
996take a look at F<iperlsys.h> and F<win32/perlhost.h>. While all Win32
997variants go through a set of "vtables" for operating system access,
998non-Win32 systems currently go straight for the POSIX/UNIX-style
999system/library call. Similar system as for Win32 should be
1000implemented for all platforms. The existing Win32 implementation
1001probably does not need to survive alongside this proposed new
1002implementation, the approaches could be merged.
87a942b1 1003
1004What would this give us? One often-asked-for feature this would
94da6c29 1005enable is using Unicode for filenames, and other "names" like %ENV,
1006usernames, hostnames, and so forth.
1007(See L<perlunicode/"When Unicode Does Not Happen">.)
1008
1009But this kind of virtualization would also allow for things like
1010virtual filesystems, virtual networks, and "sandboxes" (though as long
1011as dynamic loading of random object code is allowed, not very safe
1012sandboxes since external code of course know not of Perl's vtables).
1013An example of a smaller "sandbox" is that this feature can be used to
1014implement per-thread working directories: Win32 already does this.
1015
1016See also L</"Extend PerlIO and PerlIO::Scalar">.
87a942b1 1017
ac6197af 1018=head2 Investigate PADTMP hash pessimisation
1019
9a2f2e6b 1020The peephole optimiser converts constants used for hash key lookups to shared
057163d7 1021hash key scalars. Under ithreads, something is undoing this work.
ac6197af 1022See http://www.xray.mpe.mpg.de/mailing-lists/perl5-porters/2007-09/msg00793.html
1023
057163d7 1024=head2 Store the current pad in the OP slab allocator
1025
1026=for clarification
1027I hope that I got that "current pad" part correct
1028
1029Currently we leak ops in various cases of parse failure. I suggested that we
1030could solve this by always using the op slab allocator, and walking it to
1031free ops. Dave comments that as some ops are already freed during optree
1032creation one would have to mark which ops are freed, and not double free them
1033when walking the slab. He notes that one problem with this is that for some ops
1034you have to know which pad was current at the time of allocation, which does
1035change. I suggested storing a pointer to the current pad in the memory allocated
1036for the slab, and swapping to a new slab each time the pad changes. Dave thinks
1037that this would work.
1038
52960e22 1039=head2 repack the optree
1040
1041Repacking the optree after execution order is determined could allow
057163d7 1042removal of NULL ops, and optimal ordering of OPs with respect to cache-line
1043filling. The slab allocator could be reused for this purpose. I think that
1044the best way to do this is to make it an optional step just before the
1045completed optree is attached to anything else, and to use the slab allocator
1046unchanged, so that freeing ops is identical whether or not this step runs.
1047Note that the slab allocator allocates ops downwards in memory, so one would
1048have to actually "allocate" the ops in reverse-execution order to get them
1049contiguous in memory in execution order.
1050
1051See http://www.nntp.perl.org/group/perl.perl5.porters/2007/12/msg131975.html
1052
1053Note that running this copy, and then freeing all the old location ops would
1054cause their slabs to be freed, which would eliminate possible memory wastage if
1055the previous suggestion is implemented, and we swap slabs more frequently.
52960e22 1056
12e06b6f 1057=head2 eliminate incorrect line numbers in warnings
1058
1059This code
1060
1061 use warnings;
1062 my $undef;
1063
1064 if ($undef == 3) {
1065 } elsif ($undef == 0) {
1066 }
1067
18a16cc5 1068used to produce this output:
12e06b6f 1069
1070 Use of uninitialized value in numeric eq (==) at wrong.pl line 4.
1071 Use of uninitialized value in numeric eq (==) at wrong.pl line 4.
1072
18a16cc5 1073where the line of the second warning was misreported - it should be line 5.
1074Rafael fixed this - the problem arose because there was no nextstate OP
1075between the execution of the C<if> and the C<elsif>, hence C<PL_curcop> still
1076reports that the currently executing line is line 4. The solution was to inject
1077a nextstate OPs for each C<elsif>, although it turned out that the nextstate
1078OP needed to be a nulled OP, rather than a live nextstate OP, else other line
1079numbers became misreported. (Jenga!)
12e06b6f 1080
1081The problem is more general than C<elsif> (although the C<elsif> case is the
1082most common and the most confusing). Ideally this code
1083
1084 use warnings;
1085 my $undef;
1086
1087 my $a = $undef + 1;
1088 my $b
1089 = $undef
1090 + 1;
1091
1092would produce this output
1093
1094 Use of uninitialized value $undef in addition (+) at wrong.pl line 4.
1095 Use of uninitialized value $undef in addition (+) at wrong.pl line 7.
1096
1097(rather than lines 4 and 5), but this would seem to require every OP to carry
1098(at least) line number information.
1099
1100What might work is to have an optional line number in memory just before the
1101BASEOP structure, with a flag bit in the op to say whether it's present.
1102Initially during compile every OP would carry its line number. Then add a late
1103pass to the optimiser (potentially combined with L</repack the optree>) which
1104looks at the two ops on every edge of the graph of the execution path. If
1105the line number changes, flags the destination OP with this information.
1106Once all paths are traced, replace every op with the flag with a
1107nextstate-light op (that just updates C<PL_curcop>), which in turn then passes
1108control on to the true op. All ops would then be replaced by variants that
1109do not store the line number. (Which, logically, why it would work best in
1110conjunction with L</repack the optree>, as that is already copying/reallocating
1111all the OPs)
1112
18a16cc5 1113(Although I should note that we're not certain that doing this for the general
1114case is worth it)
1115
52960e22 1116=head2 optimize tail-calls
1117
1118Tail-calls present an opportunity for broadly applicable optimization;
1119anywhere that C<< return foo(...) >> is called, the outer return can
1120be replaced by a goto, and foo will return directly to the outer
1121caller, saving (conservatively) 25% of perl's call&return cost, which
1122is relatively higher than in C. The scheme language is known to do
1123this heavily. B::Concise provides good insight into where this
1124optimization is possible, ie anywhere entersub,leavesub op-sequence
1125occurs.
1126
1127 perl -MO=Concise,-exec,a,b,-main -e 'sub a{ 1 }; sub b {a()}; b(2)'
1128
1129Bottom line on this is probably a new pp_tailcall function which
1130combines the code in pp_entersub, pp_leavesub. This should probably
1131be done 1st in XS, and using B::Generate to patch the new OP into the
1132optrees.
1133
0bdfc961 1134=head1 Big projects
1135
1136Tasks that will get your name mentioned in the description of the "Highlights
87a942b1 1137of 5.12"
0bdfc961 1138
1139=head2 make ithreads more robust
1140
4e577f8b 1141Generally make ithreads more robust. See also L</iCOW>
0bdfc961 1142
1143This task is incremental - even a little bit of work on it will help, and
1144will be greatly appreciated.
1145
6c047da7 1146One bit would be to write the missing code in sv.c:Perl_dirp_dup.
1147
59c7f7d5 1148Fix Perl_sv_dup, et al so that threads can return objects.
1149
0bdfc961 1150=head2 iCOW
1151
1152Sarathy and Arthur have a proposal for an improved Copy On Write which
1153specifically will be able to COW new ithreads. If this can be implemented
1154it would be a good thing.
1155
1156=head2 (?{...}) closures in regexps
1157
1158Fix (or rewrite) the implementation of the C</(?{...})/> closures.
1159
1160=head2 A re-entrant regexp engine
1161
1162This will allow the use of a regex from inside (?{ }), (??{ }) and
1163(?(?{ })|) constructs.
6bda09f9 1164
6bda09f9 1165=head2 Add class set operations to regexp engine
1166
1167Apparently these are quite useful. Anyway, Jeffery Friedl wants them.
1168
1169demerphq has this on his todo list, but right at the bottom.
44a7a252 1170
1171
1172=head1 Tasks for microperl
1173
1174
1175[ Each and every one of these may be obsolete, but they were listed
1176 in the old Todo.micro file]
1177
1178
1179=head2 make creating uconfig.sh automatic
1180
1181=head2 make creating Makefile.micro automatic
1182
1183=head2 do away with fork/exec/wait?
1184
1185(system, popen should be enough?)
1186
1187=head2 some of the uconfig.sh really needs to be probed (using cc) in buildtime:
1188
1189(uConfigure? :-) native datatype widths and endianness come to mind
1190