src/pulsecore/proplist-util.c

   1 /***
   2   This file is part of PulseAudio.
   3
   4   Copyright 2008 Lennart Poettering
   5
   6   PulseAudio is free software; you can redistribute it and/or modify
   7   it under the terms of the GNU Lesser General Public License as
   8   published by the Free Software Foundation; either version 2.1 of the
   9   License, or (at your option) any later version.
  10
  11   PulseAudio is distributed in the hope that it will be useful, but
  12   WITHOUT ANY WARRANTY; without even the implied warranty of
  13   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
  14   Lesser General Public License for more details.
  15
  16   You should have received a copy of the GNU Lesser General Public
  17   License along with PulseAudio; if not, write to the Free Software
  18   Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307
  19   USA.
  20 ***/
  21
  22 #ifdef HAVE_CONFIG_H
  23 #include <config.h>
  24 #endif
  25
  26 #include <string.h>
  27 #include <locale.h>
  28
  29 #include <pulse/proplist.h>
  30 #include <pulse/utf8.h>
  31 #include <pulse/xmalloc.h>
  32 #include <pulse/util.h>
  33
  34 #include <pulsecore/core-util.h>
  35
  36 #include "proplist-util.h"
  37
  38 void pa_init_proplist(pa_proplist *p) {
  39     int a, b;
  40 #if !HAVE_DECL_ENVIRON
  41     extern char **environ;
  42 #endif
  43     char **e;
  44
  45     pa_assert(p);
  46
  47     if (environ) {
  48
  49         /* Some applications seem to reset environ to NULL for various
  50          * reasons, hence we need to check for this explicitly. See
  51          * rhbz #473080 */
  52
  53         for (e = environ; *e; e++) {
  54
  55             if (pa_startswith(*e, "PULSE_PROP_")) {
  56                 size_t kl = strcspn(*e+11, "=");
  57                 char *k;
  58
  59                 if ((*e)[11+kl] != '=')
  60                     continue;
  61
  62                 if (!pa_utf8_valid(*e+11+kl+1))
  63                     continue;
  64
  65                 k = pa_xstrndup(*e+11, kl);
  66
  67                 if (pa_proplist_contains(p, k)) {
  68                     pa_xfree(k);
  69                     continue;
  70                 }
  71
  72                 pa_proplist_sets(p, k, *e+11+kl+1);
  73                 pa_xfree(k);
  74             }
  75         }
  76     }
  77
  78     if (!pa_proplist_contains(p, PA_PROP_APPLICATION_PROCESS_ID)) {
  79         char t[32];
  80         pa_snprintf(t, sizeof(t), "%lu", (unsigned long) getpid());
  81         pa_proplist_sets(p, PA_PROP_APPLICATION_PROCESS_ID, t);
  82     }
  83
  84     if (!pa_proplist_contains(p, PA_PROP_APPLICATION_PROCESS_USER)) {
  85         char t[64];
  86         if (pa_get_user_name(t, sizeof(t))) {
  87             char *c = pa_utf8_filter(t);
  88             pa_proplist_sets(p, PA_PROP_APPLICATION_PROCESS_USER, c);
  89             pa_xfree(c);
  90         }
  91     }
  92
  93     if (!pa_proplist_contains(p, PA_PROP_APPLICATION_PROCESS_HOST)) {
  94         char t[64];
  95         if (pa_get_host_name(t, sizeof(t))) {
  96             char *c = pa_utf8_filter(t);
  97             pa_proplist_sets(p, PA_PROP_APPLICATION_PROCESS_HOST, c);
  98             pa_xfree(c);
  99         }
 100     }
 101
 102     a = pa_proplist_contains(p, PA_PROP_APPLICATION_PROCESS_BINARY);
 103     b = pa_proplist_contains(p, PA_PROP_APPLICATION_NAME);
 104
 105     if (!a || !b) {
 106         char t[PATH_MAX];
 107         if (pa_get_binary_name(t, sizeof(t))) {
 108             char *c = pa_utf8_filter(t);
 109
 110             if (!a)
 111                 pa_proplist_sets(p, PA_PROP_APPLICATION_PROCESS_BINARY, c);
 112             if (!b)
 113                 pa_proplist_sets(p, PA_PROP_APPLICATION_NAME, c);
 114
 115             pa_xfree(c);
 116         }
 117     }
 118
 119     if (!pa_proplist_contains(p, PA_PROP_APPLICATION_LANGUAGE)) {
 120         const char *l;
 121
 122         if ((l = setlocale(LC_MESSAGES, NULL)))
 123             pa_proplist_sets(p, PA_PROP_APPLICATION_LANGUAGE, l);
 124     }
 125 }