]> Savannah Git Hosting - gnulib.git/commitdiff
getprogname: port to IRIX
authorPaul Eggert <eggert@cs.ucla.edu>
Sat, 7 Jan 2017 00:14:21 +0000 (16:14 -0800)
committerPaul Eggert <eggert@cs.ucla.edu>
Sat, 7 Jan 2017 00:15:05 +0000 (16:15 -0800)
* lib/getprogname.c (getprogname): Port to IRIX.
Based on an idea by Bastien Roucariès at:
http://lists.gnu.org/archive/html/bug-gnulib/2010-12/msg00096.html
via code from Bruno Haible at:
https://lists.gnu.org/archive/html/bug-gnulib/2010-12/msg00249.html

ChangeLog
lib/getprogname.c

index 25db030a81498f24f56bfd027164402abbb3136c..d51ed8452e274b97cd05f74dacd065ecdec95edf 100644 (file)
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,5 +1,12 @@
 2017-01-06  Paul Eggert  <eggert@cs.ucla.edu>
 
+       getprogname: port to IRIX
+       * lib/getprogname.c (getprogname): Port to IRIX.
+       Based on an idea by Bastien Roucariès at:
+       http://lists.gnu.org/archive/html/bug-gnulib/2010-12/msg00096.html
+       via code from Bruno Haible at:
+       https://lists.gnu.org/archive/html/bug-gnulib/2010-12/msg00249.html
+
        localename-tests: port to NetBSD 7
        Problem reported by Nelson H. F. Beebe.
        * tests/test-localename.c:
index fb6d8b8101a8087b871edcae251cd1105cc7f312..729f01ed546617493dd256152334f3531ff440e1 100644 (file)
 # include <string.h>
 #endif
 
+#ifdef __sgi
+# include <string.h>
+# include <unistd.h>
+# include <stdio.h>
+# include <fcntl.h>
+# include <sys/procfs.h>
+#endif
+
 #include "dirname.h"
 
 #ifndef HAVE_GETPROGNAME             /* not Mac OS X, FreeBSD, NetBSD, OpenBSD >= 5.4, Cygwin */
@@ -143,6 +151,29 @@ getprogname (void)
       free (buf.ps_pathptr);
     }
   return p;
+# elif defined __sgi                                        /* IRIX */
+  char filename[50];
+  int fd;
+
+  sprintf (filename, "/proc/pinfo/%d", (int) getpid ());
+  fd = open (filename, O_RDONLY);
+  if (0 <= fd)
+    {
+      prpsinfo_t buf;
+      int ioctl_ok = 0 <= ioctl (fd, PIOCPSINFO, &buf);
+      close (fd);
+      if (ioctl_ok)
+        {
+          char *name = buf.pr_fname;
+          char *namesize = sizeof buf.pr_fname;
+          char *namenul = memchr (name, '\0', namesize);
+          size_t namelen = namenul ? namenul - name : namesize;
+          char *namecopy = malloc (namelen + 1);
+          namecopy[namelen] = 0;
+          return memcpy (namecopy, name, namelen);
+        }
+    }
+  return NULL;
 # else
 #  error "getprogname module not ported to this OS"
 # endif