Merge pull request #101 from markuspf/dragonfly-support

Dragonfly support

6 files changed, 646 insertions, 69 deletions

diff --git a/config.rpath b/config.rpath
index c492a93..a94bc9f 100644
--- a/config.rpath
+++ b/config.rpath
@@ -359,7 +359,11 @@ else
       hardcode_direct=yes
       hardcode_minus_L=yes
       ;;
-    freebsd* | kfreebsd*-gnu | dragonfly*)
+    freebsd* | kfreebsd*-gnu) 
+      hardcode_libdir_flag_spec='-R$libdir'
+      hardcode_direct=yes
+      ;;
+    dragonfly*)
       hardcode_libdir_flag_spec='-R$libdir'
       hardcode_direct=yes
       ;;
diff --git a/configure.ac b/configure.ac
index 73b203a..d7cda19 100644
--- a/configure.ac
+++ b/configure.ac
@@ -196,7 +196,7 @@ case "$host" in
                 KVM_LIBS="-lkvm"
         fi
         ;;
-        *-*-freebsd* | *-*-kfreebsd*-gnu | *-*-dragonfly*)
+        *-*-freebsd* | *-*-kfreebsd*-gnu )
         CK_BACKEND="freebsd"
         AC_CHECK_LIB(kvm, kvm_openfiles, have_kvm=yes,
                 AC_MSG_ERROR([Unable to find libkvm which is needed on FreeBSD/DragonflyBSD]))
@@ -209,6 +209,19 @@ case "$host" in
                 KVM_LIBS="${KVM_LIBS} -lprocstat"
         fi
         ;;
+        *-*-dragonfly*)
+        CK_BACKEND="dragonfly"
+        AC_CHECK_LIB(kvm, kvm_openfiles, have_kvm=yes,
+        AC_MSG_ERROR([Unable to find libkvm which is needed on DragonflyBSD]))
+        if test "x$have_kvm" = "xyes"; then
+        KVM_LIBS="-lkvm"
+        fi
+	      AC_CHECK_LIB(procstat, procstat_open_sysctl, have_procstat=yes,
+        AC_MSG_WARN([Unable to find libprocstat which is used on FreeBSD]))
+	      if test "x$have_procstat" = "xyes"; then
+        KVM_LIBS="${KVM_LIBS} -lprocstat"
+        fi
+        ;;
         *-*-netbsd*)
         CK_BACKEND="netbsd"
         AC_CHECK_LIB(kvm, kvm_openfiles, have_kvm=yes,
@@ -235,6 +248,7 @@ AC_SUBST(KVM_LIBS)
 
 AM_CONDITIONAL(CK_COMPILE_LINUX, test x$CK_BACKEND = xlinux, [Compiling for Linux])
 AM_CONDITIONAL(CK_COMPILE_FREEBSD, test x$CK_BACKEND = xfreebsd, [Compiling for FreeBSD])
+AM_CONDITIONAL(CK_COMPILE_DRAGONFLY, test x$CK_BACKEND = xdragonfly, [Compiling for DragonFly])
 AM_CONDITIONAL(CK_COMPILE_NETBSD, test x$CK_BACKEND = xnetbsd, [Compiling for NetBSD])
 AM_CONDITIONAL(CK_COMPILE_OPENBSD, test x$CK_BACKEND = xopenbsd, [Compiling for OpenBSD])
 AM_CONDITIONAL(CK_COMPILE_SOLARIS, test x$CK_BACKEND = xsolaris, [Compiling for Solaris])
diff --git a/src/Makefile.am b/src/Makefile.am
index bb7d54f..3bad491 100644
--- a/src/Makefile.am
+++ b/src/Makefile.am
@@ -84,6 +84,12 @@ libck_la_SOURCES +=		\
 	$(NULL)
 libck_la_LIBADD += $(KVM_LIBS)
 endif
+if CK_COMPILE_DRAGONFLY
+libck_la_SOURCES +=		\
+	ck-sysdeps-dragonfly.c	\
+	$(NULL)
+libck_la_LIBADD += $(KVM_LIBS)
+endif
 if CK_COMPILE_OPENBSD
 libck_la_SOURCES +=		\
 	ck-sysdeps-openbsd.c	\
diff --git a/src/ck-sysdeps-dragonfly.c b/src/ck-sysdeps-dragonfly.c
new file mode 100644
index 0000000..b43de38
--- /dev/null
+++ b/src/ck-sysdeps-dragonfly.c
@@ -0,0 +1,602 @@
+/* -*- Mode: C; tab-width: 8; indent-tabs-mode: nil; c-basic-offset: 8 -*-
+ *
+ * Copyright (C) 2006 William Jon McCann <mccann@jhu.edu>
+ * Copyright (C) 2007 Joe Marcus Clarke <marcus@FreeBSD.org>
+ *
+ * This program is free software; you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 2 of the License, or
+ * (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program; if not, write to the Free Software
+ * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
+ *
+ */
+
+#include "config.h"
+
+#include <stdlib.h>
+#include <stdio.h>
+#include <fcntl.h>
+#include <unistd.h>
+#include <string.h>
+#include <errno.h>
+#include <glob.h>
+#include <paths.h>
+#include <ttyent.h>
+#include <kvm.h>
+#include <sys/param.h>
+#include <sys/types.h>
+#include <sys/stat.h>
+#include <sys/sysctl.h>
+#include <sys/user.h>
+#include <sys/ioctl.h>
+#ifdef HAVE_SYS_WAIT_H
+#include <sys/wait.h>
+#endif
+#ifdef HAVE_SYS_RESOURCE_H
+#include <sys/resource.h>
+#endif
+#include <sys/consio.h>
+
+#ifdef HAVE_SYS_MOUNT_H
+#include <sys/mount.h>
+#endif
+
+#ifdef HAVE_SYS_PARAM_H
+#include <sys/param.h>
+#endif
+
+
+#define DEV_ENCODE(M,m) ( \
+  ( (M&0xfff) << 8) | ( (m&0xfff00) << 12) | (m&0xff) \
+)
+
+#include "ck-sysdeps.h"
+
+#ifndef ERROR
+#define ERROR -1
+#endif
+
+/* adapted from procps */
+struct _CkProcessStat
+{
+        int pid;
+        int ppid;                       /* stat,status     pid of parent process */
+        char state;                     /* stat,status     single-char code for process state (S=sleeping) */
+        char cmd[16];                   /* stat,status     basename of executable file in call to exec(2) */
+        unsigned long long utime;       /* stat            user-mode CPU time accumulated by process */
+        unsigned long long stime;       /* stat            kernel-mode CPU time accumulated by process */
+        unsigned long long cutime;      /* stat            cumulative utime of process and reaped children */
+        unsigned long long cstime;      /* stat            cumulative stime of process and reaped children */
+        unsigned long long start_time;  /* stat            start time of process -- seconds since 1-1-70 */
+        unsigned long start_code;       /* stat            address of beginning of code segment */
+        unsigned long end_code;         /* stat            address of end of code segment */
+        unsigned long start_stack;      /* stat            address of the bottom of stack for the process */
+        unsigned long kstk_esp;         /* stat            kernel stack pointer */
+        unsigned long kstk_eip;         /* stat            kernel instruction pointer */
+        unsigned long wchan;            /* stat (special)  address of kernel wait channel proc is sleeping in */
+        long priority;                  /* stat            kernel scheduling priority */
+        long nice;                      /* stat            standard unix nice level of process */
+        long rss;                       /* stat            resident set size from /proc/#/stat (pages) */
+        long alarm;                     /* stat            ? */
+        unsigned long rtprio;           /* stat            real-time priority */
+        unsigned long sched;            /* stat            scheduling class */
+        unsigned long vsize;            /* stat            number of pages of virtual memory ... */
+        unsigned long rss_rlim;         /* stat            resident set size limit? */
+        unsigned long flags;            /* stat            kernel flags for the process */
+        unsigned long min_flt;          /* stat            number of minor page faults since process start */
+        unsigned long maj_flt;          /* stat            number of major page faults since process start */
+        unsigned long cmin_flt;         /* stat            cumulative min_flt of process and child processes */
+        unsigned long cmaj_flt;         /* stat            cumulative maj_flt of process and child processes */
+        int     pgrp;                   /* stat            process group id */
+        int session;                    /* stat            session id */
+        int nlwp;                       /* stat    number of threads, or 0 if no clue */
+        int tty;                        /* stat            full device number of controlling terminal */
+        int tpgid;                      /* stat            terminal process group id */
+        int exit_signal;                /* stat            might not be SIGCHLD */
+        int processor;                  /* stat            current (or most recent?) CPU */
+        uintptr_t penv;                 /* stat            address of initial environment vector */
+        char tty_text[16];              /* stat            device name */
+
+};
+
+pid_t
+ck_process_stat_get_ppid (CkProcessStat *stat)
+{
+        g_return_val_if_fail (stat != NULL, -1);
+
+        return stat->ppid;
+}
+
+char *
+ck_process_stat_get_cmd (CkProcessStat *stat)
+{
+        g_return_val_if_fail (stat != NULL, NULL);
+
+        return g_strdup (stat->cmd);
+}
+
+char *
+ck_process_stat_get_tty (CkProcessStat *stat)
+{
+        g_return_val_if_fail (stat != NULL, NULL);
+
+        return g_strdup_printf ("/dev/%s", stat->tty_text);
+}
+
+static gboolean
+get_kinfo_proc (pid_t pid,
+                struct kinfo_proc *p)
+{
+        int    mib[4];
+        size_t len;
+
+        len = 4;
+        sysctlnametomib ("kern.proc.pid", mib, &len);
+
+        len = sizeof(struct kinfo_proc);
+        mib[3] = pid;
+
+        if (sysctl (mib, 4, p, &len, NULL, 0) == -1) {
+                return FALSE;
+        }
+
+        return TRUE;
+}
+
+/* return 1 if it works, or 0 for failure */
+static gboolean
+stat2proc (pid_t        pid,
+           CkProcessStat *P)
+{
+        struct kinfo_proc p;
+        char              *ttname;
+        int               num;
+        int               tty_maj;
+        int               tty_min;
+
+        if (! get_kinfo_proc (pid, &p)) {
+                return FALSE;
+        }
+
+        num = MAXCOMLEN;
+        if (num >= sizeof P->cmd) {
+                num = sizeof P->cmd - 1;
+        }
+
+        memcpy (P->cmd, p.kp_comm, num);
+
+        P->cmd[num]   = '\0';
+        P->pid        = p.kp_pid;
+        P->ppid       = p.kp_ppid;
+        P->pgrp       = p.kp_pgid;
+        P->session    = p.kp_sid;
+        P->rss        = p.kp_vm_rssize;
+        P->vsize      = p.kp_vm_map_size;
+        P->start_time = p.kp_start.tv_sec;
+        P->wchan      = (unsigned long) p.kp_lwp.kl_wchan;
+        P->state      = p.kp_stat;
+        P->nice       = p.kp_nice;
+        P->flags      = p.kp_flags;
+        P->tpgid      = p.kp_tpgid;
+        P->processor  = p.kp_lwp.kl_cpuid;
+        P->nlwp       = p.kp_nthreads;
+
+        /* we like it Linux-encoded :-) */
+        tty_maj = major (p.kp_tdev);
+        tty_min = minor (p.kp_tdev);
+        P->tty = DEV_ENCODE (tty_maj,tty_min);
+
+        snprintf (P->tty_text, sizeof P->tty_text, "%3d,%-3d", tty_maj, tty_min);
+
+        if (p.kp_tdev != NODEV && (ttname = devname (p.kp_tdev, S_IFCHR)) != NULL) {
+                memcpy (P->tty_text, ttname, sizeof (P->tty_text));
+        }
+
+        if (p.kp_tdev == NODEV) {
+                memcpy (P->tty_text, "   ?   ", sizeof (P->tty_text));
+        }
+
+        if (P->pid != pid) {
+                return FALSE;
+        }
+
+        return TRUE;
+}
+
+gboolean
+ck_process_stat_new_for_unix_pid (pid_t           pid,
+                                  CkProcessStat **stat,
+                                  GError        **error)
+{
+        gboolean       res;
+        CkProcessStat *proc;
+
+        g_return_val_if_fail (pid > 1, FALSE);
+
+        if (stat == NULL) {
+                return FALSE;
+        }
+
+        proc = g_new0 (CkProcessStat, 1);
+        proc->pid = pid;
+        res = stat2proc (pid, proc);
+        if (res) {
+                *stat = proc;
+        } else {
+                *stat = NULL;
+        }
+
+        return res;
+}
+
+void
+ck_process_stat_free (CkProcessStat *stat)
+{
+        g_free (stat);
+}
+
+GHashTable *
+ck_unix_pid_get_env_hash (pid_t pid)
+{
+        GHashTable       *hash = NULL;
+        char            **penv;
+        char              errbuf[_POSIX2_LINE_MAX];
+        kvm_t            *kd;
+        struct kinfo_proc p;
+        int               i;
+
+        kd = kvm_openfiles (_PATH_DEVNULL, _PATH_DEVNULL, NULL, O_RDONLY, errbuf);
+        if (kd == NULL) {
+                g_warning ("kvm_openfiles failed: %s", errbuf);
+                return NULL;
+        }
+
+        if (! get_kinfo_proc (pid, &p)) {
+                g_warning ("get_kinfo_proc failed: %s", g_strerror (errno));
+                goto fail;
+        }
+
+        penv = kvm_getenvv (kd, &p, 0);
+        if (penv == NULL) {
+                g_warning ("kvm_getenvv failed: %s", kvm_geterr (kd));
+                goto fail;
+        }
+
+        hash = g_hash_table_new_full (g_str_hash,
+                                      g_str_equal,
+                                      g_free,
+                                      g_free);
+
+        for (i = 0; penv[i] != NULL; i++) {
+                char **vals;
+
+                if (!penv[i][0]) continue;
+
+                vals = g_strsplit (penv[i], "=", 2);
+                if (vals != NULL) {
+                        g_hash_table_insert (hash,
+                                             g_strdup (vals[0]),
+                                             g_strdup (vals[1]));
+                        g_strfreev (vals);
+                }
+        }
+
+fail:
+        kvm_close (kd);
+
+        return hash;
+}
+
+char *
+ck_unix_pid_get_env (pid_t       pid,
+                     const char *var)
+{
+        GHashTable *hash;
+        char       *val = NULL;
+
+        /*
+         * Would probably be more efficient to just loop through the
+         * environment and return the value, avoiding building the hash
+         * table, but this works for now.
+         */
+        hash = ck_unix_pid_get_env_hash (pid);
+        if (hash == NULL)
+                return val;
+        val  = g_strdup (g_hash_table_lookup (hash, var));
+        g_hash_table_destroy (hash);
+
+        return val;
+}
+
+uid_t
+ck_unix_pid_get_uid (pid_t pid)
+{
+        uid_t             uid;
+        gboolean          res;
+        struct kinfo_proc p;
+
+        g_return_val_if_fail (pid > 1, 0);
+
+        uid = -1;
+
+        res = get_kinfo_proc (pid, &p);
+
+        if (res) {
+                uid = p.kp_uid;
+        }
+
+        return uid;
+}
+
+gboolean
+ck_unix_pid_get_login_session_id (pid_t  pid,
+                                  char **idp)
+{
+        g_return_val_if_fail (pid > 1, FALSE);
+
+        return FALSE;
+}
+
+gboolean
+ck_get_max_num_consoles (guint *num)
+{
+        guint    max_consoles;
+        guint    i;
+        glob_t   g;
+
+        max_consoles = 0;
+
+        g.gl_offs = 0;
+        glob ("/dev/ttyv*", GLOB_DOOFFS | GLOB_NOSORT, NULL, &g);
+        for (i = 0; i < g.gl_pathc && g.gl_pathv[i] != NULL; i++) {
+                struct stat sb;
+                char *cdev;
+
+                cdev = g.gl_pathv[i];
+                if (stat (cdev, &sb) > -1 && S_ISCHR (sb.st_mode)) {
+                        max_consoles++;
+                } else {
+                        break;
+                }
+        }
+
+        globfree (&g);
+
+        /*
+         * Increment one more so that all consoles are properly counted
+         * this is arguable a bug in vt_add_watches().
+         */
+        max_consoles++;
+
+        if (num != NULL) {
+                *num = max_consoles;
+        }
+
+        return TRUE;
+}
+
+gboolean
+ck_supports_activatable_consoles (void)
+{
+        return TRUE;
+}
+
+char *
+ck_get_console_device_for_num (guint num)
+{
+        char *device;
+
+        /* The device number is always one less than the VT number. */
+        num--;
+
+        if (num < 10)
+                device = g_strdup_printf ("/dev/ttyv%i", num);
+        else if (num < 32)
+                device = g_strdup_printf ("/dev/ttyv%c", num - 10 + 'a');
+        else
+                device = NULL;
+
+        return device;
+}
+
+gboolean
+ck_get_console_num_from_device (const char *device,
+                                guint      *num)
+{
+        guint    n;
+        char     c;
+        gboolean ret;
+
+        n = 0;
+        ret = FALSE;
+
+        if (device == NULL) {
+                return FALSE;
+        }
+
+        if (sscanf (device, "/dev/ttyv%c", &c) == 1) {
+                if (c < 58)
+                        n = c - 48;
+                else
+                        n = c - 'a' + 10;
+                /* The VT number is always one more than the device number. */
+                n++;
+                ret = TRUE;
+        }
+
+        if (num != NULL) {
+                *num = n;
+        }
+
+        return ret;
+}
+
+gboolean
+ck_get_active_console_num (int    console_fd,
+                           guint *num)
+{
+        gboolean ret;
+        int      res;
+        int      active;
+        char     ttyn;
+
+        g_assert (console_fd != -1);
+
+        active = 0;
+        ret = FALSE;
+
+        res = ioctl (console_fd, VT_GETACTIVE, &active);
+        if (res == ERROR) {
+                perror ("ioctl VT_GETACTIVE");
+                goto out;
+        }
+
+        if (active - 1 < 10)
+                ttyn = active - 1 + '0';
+        else
+                ttyn = active - 11 + 'a';
+
+        g_debug ("Active VT is: %d (ttyv%c)", active, ttyn);
+        ret = TRUE;
+
+ out:
+        if (num != NULL) {
+                *num = active;
+        }
+
+        return ret;
+}
+
+static gchar *
+get_string_sysctl (GError **err, const gchar *format, ...)
+{
+        va_list args;
+        gchar *name;
+        size_t value_len;
+        gchar *str = NULL;
+
+        g_return_val_if_fail(format != NULL, FALSE);
+
+        va_start (args, format);
+        name = g_strdup_vprintf (format, args);
+        va_end (args);
+
+        if (sysctlbyname (name, NULL, &value_len, NULL, 0) == 0) {
+                str = g_new (char, value_len + 1);
+                if (sysctlbyname (name, str, &value_len, NULL, 0) == 0) {
+                        str[value_len] = 0;
+                } else {
+                        g_free (str);
+                        str = NULL;
+                }
+        }
+
+        if (!str)
+                g_set_error (err, 0, 0, "%s", g_strerror(errno));
+
+        g_free(name);
+        return str;
+}
+
+static gboolean
+freebsd_supports_sleep_state (const gchar *state)
+{
+        gboolean ret = FALSE;
+        gchar *sleep_states;
+
+        sleep_states = get_string_sysctl (NULL, "hw.acpi.supported_sleep_state");
+        if (sleep_states != NULL) {
+                if (strstr (sleep_states, state) != NULL)
+                        ret = TRUE;
+        }
+
+        g_free (sleep_states);
+
+        return ret;
+}
+
+gboolean
+ck_system_can_suspend (void)
+{
+        return freebsd_supports_sleep_state ("S3");
+}
+
+gboolean
+ck_system_can_hibernate (void)
+{
+        return freebsd_supports_sleep_state ("S4");
+}
+
+gboolean
+ck_system_can_hybrid_sleep (void)
+{
+        /* TODO: not implemented */
+        return FALSE;
+}
+
+gboolean
+ck_make_tmpfs (guint uid, guint gid, const gchar *dest)
+{
+#ifdef HAVE_SYS_MOUNT_H
+        gchar        *opts;
+        int           result;
+
+        TRACE ();
+
+        opts = g_strdup_printf ("mode=0700,uid=%d", uid);
+
+        result = mount("tmpfs", dest, 0, opts);
+
+        g_free (opts);
+
+        if (result == 0) {
+                return TRUE;
+        } else {
+                g_info ("Failed to create tmpfs mount, reason was: %s", strerror(errno));
+                errno = 0;
+                return FALSE;
+        }
+#endif
+
+        return FALSE;
+}
+
+gboolean
+ck_remove_tmpfs (guint uid, const gchar *dest)
+{
+#ifdef HAVE_SYS_MOUNT_H
+        int           result;
+
+        TRACE ();
+
+        result = unmount(dest, 0);
+
+        if (result == 0) {
+                return TRUE;
+        }
+
+        g_info ("Failed to unmount tmpfs mount, reason was: %s", strerror(errno));
+        errno = 0;
+#endif
+
+        return FALSE;
+}
+
+gboolean
+ck_sysdeps_init (void)
+{
+        return TRUE;
+}
+
+void
+ck_sysdeps_fini (void)
+{
+}
diff --git a/src/ck-sysdeps-freebsd.c b/src/ck-sysdeps-freebsd.c
index 66babdd..c71faa8 100644
--- a/src/ck-sysdeps-freebsd.c
+++ b/src/ck-sysdeps-freebsd.c
@@ -151,67 +151,6 @@ get_kinfo_proc (pid_t pid,
         return TRUE;
 }
 
-#ifdef __DragonFly__
-/* return 1 if it works, or 0 for failure */
-static gboolean
-stat2proc (pid_t        pid,
-           CkProcessStat *P)
-{
-        struct kinfo_proc p;
-        char              *ttname;
-        int               num;
-        int               tty_maj;
-        int               tty_min;
-
-        if (! get_kinfo_proc (pid, &p)) {
-                return FALSE;
-        }
-
-        num = MAXCOMLEN;
-        if (num >= sizeof P->cmd) {
-                num = sizeof P->cmd - 1;
-        }
-
-        memcpy (P->cmd, p.kp_comm, num);
-
-        P->cmd[num]   = '\0';
-        P->pid        = p.kp_pid;
-        P->ppid       = p.kp_ppid;
-        P->pgrp       = p.kp_pgid;
-        P->session    = p.kp_sid;
-        P->rss        = p.kp_vm_rssize;
-        P->vsize      = p.kp_vm_map_size;
-        P->start_time = p.kp_start.tv_sec;
-        P->wchan      = (unsigned long) p.kp_lwp.kl_wchan;
-        P->state      = p.kp_stat;
-        P->nice       = p.kp_nice;
-        P->flags      = p.kp_flags;
-        P->tpgid      = p.kp_tpgid;
-        P->processor  = p.kp_lwp.kl_cpuid;
-        P->nlwp       = p.kp_nthreads;
-
-        /* we like it Linux-encoded :-) */
-        tty_maj = major (p.kp_tdev);
-        tty_min = minor (p.kp_tdev);
-        P->tty = DEV_ENCODE (tty_maj,tty_min);
-
-        snprintf (P->tty_text, sizeof P->tty_text, "%3d,%-3d", tty_maj, tty_min);
-
-        if (p.kp_tdev != NODEV && (ttname = devname (p.kp_tdev, S_IFCHR)) != NULL) {
-                memcpy (P->tty_text, ttname, sizeof (P->tty_text));
-        }
-
-        if (p.kp_tdev == NODEV) {
-                memcpy (P->tty_text, "   ?   ", sizeof (P->tty_text));
-        }
-
-        if (P->pid != pid) {
-                return FALSE;
-        }
-
-        return TRUE;
-}
-#else /* __DragonFly__ */
 /* return 1 if it works, or 0 for failure */
 static gboolean
 stat2proc (pid_t        pid,
@@ -271,7 +210,6 @@ stat2proc (pid_t        pid,
 
         return TRUE;
 }
-#endif /* __DragonFly__ */
 
 gboolean
 ck_process_stat_new_for_unix_pid (pid_t           pid,
@@ -392,11 +330,7 @@ ck_unix_pid_get_uid (pid_t pid)
         res = get_kinfo_proc (pid, &p);
 
         if (res) {
-#ifdef __DragonFly__
-                uid = p.kp_uid;
-#else
                 uid = p.ki_uid;
-#endif
         }
 
         return uid;
diff --git a/src/ck-sysdeps-unix.c b/src/ck-sysdeps-unix.c
index a1043ba..a7814aa 100644
--- a/src/ck-sysdeps-unix.c
+++ b/src/ck-sysdeps-unix.c
@@ -165,7 +165,7 @@ ck_get_socket_peer_credentials   (int      socket_fd,
                 g_warning ("Failed to getpeereid() credentials: %s\n",
                            g_strerror (errno));
         }
-#ifdef __FreeBSD__
+#if defined(__FreeBSD__)
         kd = kvm_openfiles (NULL, _PATH_DEVNULL, NULL, O_RDONLY, errbuf);
         if (kd == NULL) {
                 g_warning ("kvm_openfiles failed: %s", errbuf);
@@ -182,6 +182,23 @@ ck_get_socket_peer_credentials   (int      socket_fd,
 
         kvm_close(kd);
 #endif /* __FreeBSD__ */
+#if defined(__DragonFly__)
+        kd = kvm_openfiles (NULL, _PATH_DEVNULL, NULL, O_RDONLY, errbuf);
+        if (kd == NULL) {
+                g_warning ("kvm_openfiles failed: %s", errbuf);
+                return FALSE;
+        }
+
+        prc = kvm_getprocs (kd, KERN_PROC_UID, uid_read, &cnt);
+        for (int i = 0; i < cnt; i++) {
+                if(strncmp (prc[i].kp_comm, "Xorg", 4) == 0) {
+                        pid_read = prc[i].kp_pid;
+                        break;
+                }
+        }
+
+        kvm_close(kd);
+#endif /* DragonFly */
 #else /* !SO_PEERCRED && !HAVE_GETPEERUCRED */
         g_warning ("Socket credentials not supported on this OS\n");
 #endif