gprof shouldn't assume names are less than 500 bytes

*** 22,31 ****
--- 22,32 ----
  /*
   * Copyright 2008 Sun Microsystems, Inc.  All rights reserved.
   * Use is subject to license terms.
   *
   * Copyright 2018 Jason King
+  * Copyright 2018, Joyent, Inc.
   */
  
  #include <ctype.h>
  #include <string.h>
  #include <sys/param.h>
*** 32,42 ****
  #include <stdlib.h>
  #include "conv.h"
  #include "gprof.h"
  
  void print_demangled_name(int, nltype *);
! void striped_name(char *, nltype **);
  
  extern long hz;
  
  /*
   * Symbols that must never be printed, no matter what.
--- 33,43 ----
  #include <stdlib.h>
  #include "conv.h"
  #include "gprof.h"
  
  void print_demangled_name(int, nltype *);
! static void stripped_name(char **, size_t *, nltype **);
  
  extern long hz;
  
  /*
   * Symbols that must never be printed, no matter what.
*** 859,893 ****
                  (void) putchar(input);
  
          (void) fclose(blurbfile);
  }
  
- char *s1, *s2;
- 
  static int
  namecmp(const void *arg1, const void *arg2)
  {
          nltype **npp1 = (nltype **)arg1;
          nltype **npp2 = (nltype **)arg2;
  
          if (!Cflag)
                  return (strcmp((*npp1)->name, (*npp2)->name));
          else {
!                 striped_name(s1, npp1);
!                 striped_name(s2, npp2);
                  return (strcmp(s1, s2));
          }
  }
  
! void
! striped_name(char *s, nltype **npp)
  {
          const char *name, *d;
          char *c;
  
-         c = (char *)s;
          name = d = demangled_name(*npp);
  
          while ((*d != '(') && (*d != '\0')) {
                  if (*d != ':')
                          *c++ = *d++;
                  else
--- 860,922 ----
                  (void) putchar(input);
  
          (void) fclose(blurbfile);
  }
  
  static int
  namecmp(const void *arg1, const void *arg2)
  {
          nltype **npp1 = (nltype **)arg1;
          nltype **npp2 = (nltype **)arg2;
  
          if (!Cflag)
                  return (strcmp((*npp1)->name, (*npp2)->name));
          else {
!                 static char *s1 = NULL, *s2 = NULL;
!                 static size_t s1len = 0, s2len = 0;
! 
!                 stripped_name(&s1, &s1len, npp1);
!                 stripped_name(&s2, &s2len, npp2);
                  return (strcmp(s1, s2));
          }
  }
  
! #define NAME_CHUNK 512
! #define ROUNDLEN(x) (((x) + NAME_CHUNK - 1) / NAME_CHUNK * NAME_CHUNK)
! static void
! adjust_size(char **pp, size_t *lenp, const char *name)
  {
+         void *newp;
+         size_t nlen = strlen(name);
+         size_t buflen;
+ 
+         if (*lenp > nlen) {
+                 (void) memset(*pp, '\0', *lenp);
+                 return;
+         }
+ 
+         buflen = ROUNDLEN(nlen + 1);
+         if ((newp = realloc(*pp, buflen)) == NULL) {
+                 (void) fprintf(stderr,
+                     "gprof: out of memory comparing names\n");
+                 exit(EXIT_FAILURE);
+         }
+         (void) memset(newp, '\0', buflen);
+ 
+         *lenp = buflen;
+         *pp = newp;
+ }
+ 
+ static void
+ stripped_name(char **sp, size_t *slenp, nltype **npp)
+ {
          const char *name, *d;
          char *c;
  
          name = d = demangled_name(*npp);
+         adjust_size(sp, slenp, name);
+         c = *sp;
  
          while ((*d != '(') && (*d != '\0')) {
                  if (*d != ':')
                          *c++ = *d++;
                  else
*** 972,986 ****
  
                          namesortnlp[nnames++] = &(mi->nl[index]);
                  }
          }
  
-         if (Cflag) {
-                 s1 = malloc(500 * sizeof (char));
-                 s2 = malloc(500 * sizeof (char));
-         }
- 
          qsort(namesortnlp, nnames, sizeof (nltype *), namecmp);
  
          for (index = 1, todo = nnames; index <= ncycle; index++)
                  namesortnlp[todo++] = &cyclenl[index];
  
--- 1001,1010 ----