output.c

   1 /*
   2  * Copyright 2004-2006 Timo Hirvonen
   3  *
   4  * This program is free software; you can redistribute it and/or
   5  * modify it under the terms of the GNU General Public License as
   6  * published by the Free Software Foundation; either version 2 of the
   7  * License, or (at your option) any later version.
   8  *
   9  * This program is distributed in the hope that it will be useful, but
  10  * WITHOUT ANY WARRANTY; without even the implied warranty of
  11  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  12  * General Public License for more details.
  13  *
  14  * You should have received a copy of the GNU General Public License
  15  * along with this program; if not, write to the Free Software
  16  * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA
  17  * 02111-1307, USA.
  18  */
  19
  20 #include "output.h"
  21 #include "op.h"
  22 #include "mixer.h"
  23 #include "sf.h"
  24 #include "prog.h"
  25 #include "utils.h"
  26 #include "xmalloc.h"
  27 #include "list.h"
  28 #include "debug.h"
  29 #include "config/libdir.h"
  30
  31 #include <string.h>
  32 #include <stdlib.h>
  33 #include <sys/types.h>
  34 #include <dirent.h>
  35 #include <dlfcn.h>
  36
  37 struct output_plugin {
  38         struct list_head node;
  39         char *name;
  40         void *handle;
  41
  42         const struct output_plugin_ops *pcm_ops;
  43         const struct mixer_plugin_ops *mixer_ops;
  44         const char * const *pcm_options;
  45         const char * const *mixer_options;
  46         int priority;
  47
  48         unsigned int pcm_initialized : 1;
  49         unsigned int mixer_initialized : 1;
  50         unsigned int mixer_open : 1;
  51 };
  52
  53 static const char * const plugin_dir = LIBDIR "/cmus/op";
  54 static LIST_HEAD(op_head);
  55 static struct output_plugin *op = NULL;
  56
  57 int soft_vol;
  58 int soft_vol_l = 100;
  59 int soft_vol_r = 100;
  60
  61 /* volume is between 0 and volume_max */
  62 int volume_max = 0;
  63
  64 static void add_plugin(struct output_plugin *plugin)
  65 {
  66         struct list_head *item = op_head.next;
  67
  68         while (item != &op_head) {
  69                 struct output_plugin *o = container_of(item, struct output_plugin, node);
  70
  71                 if (plugin->priority < o->priority)
  72                         break;
  73                 item = item->next;
  74         }
  75
  76         /* add before item */
  77         list_add_tail(&plugin->node, item);
  78 }
  79
  80 void op_load_plugins(void)
  81 {
  82         DIR *dir;
  83         struct dirent *d;
  84
  85         dir = opendir(plugin_dir);
  86         if (dir == NULL) {
  87                 warn("couldn't open directory `%s': %s\n", plugin_dir, strerror(errno));
  88                 return;
  89         }
  90         while ((d = readdir(dir)) != NULL) {
  91                 char filename[256];
  92                 struct output_plugin *plug;
  93                 void *so, *symptr;
  94                 char *ext;
  95                 const char *sym;
  96
  97                 if (d->d_name[0] == '.')
  98                         continue;
  99                 ext = strrchr(d->d_name, '.');
 100                 if (ext == NULL)
 101                         continue;
 102                 if (strcmp(ext, ".so"))
 103                         continue;
 104
 105                 snprintf(filename, sizeof(filename), "%s/%s", plugin_dir, d->d_name);
 106
 107                 so = dlopen(filename, RTLD_NOW);
 108                 if (so == NULL) {
 109                         warn("%s\n", dlerror());
 110                         continue;
 111                 }
 112
 113                 plug = xnew(struct output_plugin, 1);
 114
 115                 sym = "op_pcm_ops";
 116                 if (!(plug->pcm_ops = dlsym(so, sym)))
 117                         goto sym_err;
 118
 119                 sym = "op_pcm_options";
 120                 if (!(plug->pcm_options = dlsym(so, sym)))
 121                         goto sym_err;
 122
 123                 sym = "op_priority";
 124                 symptr = dlsym(so, sym);
 125                 if (symptr == NULL)
 126                         goto sym_err;
 127                 plug->priority = *(int *)symptr;
 128
 129                 plug->mixer_ops = dlsym(so, "op_mixer_ops");
 130                 plug->mixer_options = dlsym(so, "op_mixer_options");
 131
 132                 if (plug->mixer_ops == NULL || plug->mixer_options == NULL) {
 133                         plug->mixer_ops = NULL;
 134                         plug->mixer_options = NULL;
 135                 }
 136
 137                 plug->name = xstrndup(d->d_name, ext - d->d_name);
 138                 plug->handle = so;
 139                 plug->pcm_initialized = 0;
 140                 plug->mixer_initialized = 0;
 141                 plug->mixer_open = 0;
 142
 143                 add_plugin(plug);
 144                 continue;
 145 sym_err:
 146                 warn("%s: symbol %s not found\n", filename, sym);
 147                 free(plug);
 148                 dlclose(so);
 149         }
 150         closedir(dir);
 151 }
 152
 153 static void init_plugin(struct output_plugin *o)
 154 {
 155         if (!o->mixer_initialized && o->mixer_ops) {
 156                 if (o->mixer_ops->init() == 0) {
 157                         d_print("initialized mixer for %s\n", o->name);
 158                         o->mixer_initialized = 1;
 159                 } else {
 160                         d_print("could not initialize mixer `%s'\n", o->name);
 161                 }
 162         }
 163         if (!o->pcm_initialized) {
 164                 if (o->pcm_ops->init() == 0) {
 165                         d_print("initialized pcm for %s\n", o->name);
 166                         o->pcm_initialized = 1;
 167                 } else {
 168                         d_print("could not initialize pcm `%s'\n", o->name);
 169                 }
 170         }
 171 }
 172
 173 void op_exit_plugins(void)
 174 {
 175         struct output_plugin *o;
 176
 177         list_for_each_entry(o, &op_head, node) {
 178                 if (o->mixer_initialized && o->mixer_ops)
 179                         o->mixer_ops->exit();
 180                 if (o->pcm_initialized)
 181                         o->pcm_ops->exit();
 182         }
 183 }
 184
 185 static void close_mixer(void)
 186 {
 187         volume_max = 0;
 188         if (op && op->mixer_open) {
 189                 BUG_ON(op->mixer_ops == NULL);
 190                 op->mixer_ops->close();
 191                 op->mixer_open = 0;
 192         }
 193 }
 194
 195 static void open_mixer(void)
 196 {
 197         if (soft_vol) {
 198                 volume_max = 100;
 199                 return;
 200         }
 201
 202         if (op == NULL)
 203                 return;
 204
 205         BUG_ON(op->mixer_open);
 206         if (op->mixer_ops && op->mixer_initialized) {
 207                 int rc;
 208
 209                 rc = op->mixer_ops->open(&volume_max);
 210                 if (rc == 0) {
 211                         op->mixer_open = 1;
 212                 } else {
 213                         volume_max = 0;
 214                 }
 215         }
 216 }
 217
 218 static int select_plugin(struct output_plugin *o)
 219 {
 220         /* try to initialize if not initialized yet */
 221         init_plugin(o);
 222
 223         if (!o->pcm_initialized)
 224                 return -OP_ERROR_NOT_INITIALIZED;
 225
 226         close_mixer();
 227         op = o;
 228         open_mixer();
 229         return 0;
 230 }
 231
 232 int op_select(const char *name)
 233 {
 234         struct output_plugin *o;
 235
 236         list_for_each_entry(o, &op_head, node) {
 237                 if (strcasecmp(name, o->name) == 0)
 238                         return select_plugin(o);
 239         }
 240         return -OP_ERROR_NO_PLUGIN;
 241 }
 242
 243 int op_select_any(void)
 244 {
 245         struct output_plugin *o;
 246         int rc = -OP_ERROR_NO_PLUGIN;
 247
 248         list_for_each_entry(o, &op_head, node) {
 249                 rc = select_plugin(o);
 250                 if (rc == 0)
 251                         break;
 252         }
 253         return rc;
 254 }
 255
 256 int op_open(sample_format_t sf)
 257 {
 258         if (op == NULL)
 259                 return -OP_ERROR_NOT_INITIALIZED;
 260         return op->pcm_ops->open(sf);
 261 }
 262
 263 int op_drop(void)
 264 {
 265         if (op->pcm_ops->drop == NULL)
 266                 return -OP_ERROR_NOT_SUPPORTED;
 267         return op->pcm_ops->drop();
 268 }
 269
 270 int op_close(void)
 271 {
 272         return op->pcm_ops->close();
 273 }
 274
 275 int op_write(const char *buffer, int count)
 276 {
 277         int rc;
 278
 279         rc = op->pcm_ops->write(buffer, count);
 280         return rc;
 281 }
 282
 283 int op_pause(void)
 284 {
 285         if (op->pcm_ops->pause == NULL)
 286                 return 0;
 287         return op->pcm_ops->pause();
 288 }
 289
 290 int op_unpause(void)
 291 {
 292         if (op->pcm_ops->unpause == NULL)
 293                 return 0;
 294         return op->pcm_ops->unpause();
 295 }
 296
 297 int op_buffer_space(void)
 298 {
 299         int rc;
 300
 301         rc = op->pcm_ops->buffer_space();
 302         return rc;
 303 }
 304
 305 int op_set_volume(int left, int right)
 306 {
 307         if (soft_vol) {
 308                 soft_vol_l = left;
 309                 soft_vol_r = right;
 310                 return 0;
 311         }
 312         if (op == NULL)
 313                 return -OP_ERROR_NOT_INITIALIZED;
 314         if (!op->mixer_open)
 315                 return -OP_ERROR_NOT_SUPPORTED;
 316         return op->mixer_ops->set_volume(left, right);
 317 }
 318
 319 int op_get_volume(int *left, int *right)
 320 {
 321         if (soft_vol) {
 322                 *left = soft_vol_l;
 323                 *right = soft_vol_r;
 324                 return 0;
 325         }
 326         if (op == NULL)
 327                 return -OP_ERROR_NOT_INITIALIZED;
 328         if (!op->mixer_open)
 329                 return -OP_ERROR_NOT_SUPPORTED;
 330         return op->mixer_ops->get_volume(left, right);
 331 }
 332
 333 void op_set_soft_vol(int soft)
 334 {
 335         close_mixer();
 336         soft_vol = soft;
 337         open_mixer();
 338 }
 339
 340 #define OP_OPT_ID(plugin_idx, is_mixer, option_idx) \
 341         (((plugin_idx) << 16) | ((is_mixer) << 15) | (option_idx))
 342
 343 static struct output_plugin *find_plugin(int idx)
 344 {
 345         struct output_plugin *o;
 346
 347         list_for_each_entry(o, &op_head, node) {
 348                 if (idx == 0)
 349                         return o;
 350                 idx--;
 351         }
 352         return NULL;
 353 }
 354
 355 int op_set_option(unsigned int id, const char *val)
 356 {
 357         unsigned int pid = id >> 16;
 358         unsigned int mix = id & 0x8000;
 359         unsigned int oid = id & 0x7fff;
 360         const struct output_plugin *o = find_plugin(pid);
 361
 362         if (o == NULL)
 363                 return -OP_ERROR_NOT_OPTION;
 364
 365         if (mix) {
 366                 const struct mixer_plugin_ops *mo = o->mixer_ops;
 367                 int rc = mo->set_option(oid, val);
 368
 369                 if (rc == 0 && op && op->mixer_ops == mo) {
 370                         /* option of the current op was set
 371                          * try to reopen the mixer */
 372                         close_mixer();
 373                         open_mixer();
 374                 }
 375                 return rc;
 376         }
 377         return o->pcm_ops->set_option(oid, val);
 378 }
 379
 380 int op_get_option(unsigned int id, char **val)
 381 {
 382         unsigned int pid = id >> 16;
 383         unsigned int mix = id & 0x8000;
 384         unsigned int oid = id & 0x7fff;
 385         const struct output_plugin *o = find_plugin(pid);
 386
 387         if (o == NULL)
 388                 return -OP_ERROR_NOT_OPTION;
 389
 390         if (mix)
 391                 return o->mixer_ops->get_option(oid, val);
 392         return o->pcm_ops->get_option(oid, val);
 393 }
 394
 395 int op_for_each_option(void (*cb)(unsigned int id, const char *key))
 396 {
 397         struct output_plugin *o;
 398         unsigned int pid, oid;
 399         char key[64];
 400
 401         pid = -1;
 402         list_for_each_entry(o, &op_head, node) {
 403                 pid++;
 404
 405                 for (oid = 0; o->pcm_options[oid]; oid++) {
 406                         snprintf(key, sizeof(key), "dsp.%s.%s",
 407                                         o->name,
 408                                         o->pcm_options[oid]);
 409                         cb(OP_OPT_ID(pid, 0, oid), key);
 410                 }
 411                 if (o->mixer_ops == NULL)
 412                         continue;
 413                 for (oid = 0; o->mixer_options[oid]; oid++) {
 414                         snprintf(key, sizeof(key), "mixer.%s.%s",
 415                                         o->name,
 416                                         o->mixer_options[oid]);
 417                         cb(OP_OPT_ID(pid, 1, oid), key);
 418                 }
 419         }
 420         return 0;
 421 }
 422
 423 char *op_get_error_msg(int rc, const char *arg)
 424 {
 425         char buffer[1024];
 426
 427         switch (-rc) {
 428         case OP_ERROR_ERRNO:
 429                 snprintf(buffer, sizeof(buffer), "%s: %s", arg, strerror(errno));
 430                 break;
 431         case OP_ERROR_NO_PLUGIN:
 432                 snprintf(buffer, sizeof(buffer),
 433                                 "%s: no such plugin", arg);
 434                 break;
 435         case OP_ERROR_NOT_INITIALIZED:
 436                 snprintf(buffer, sizeof(buffer),
 437                                 "%s: couldn't initialize required output plugin", arg);
 438                 break;
 439         case OP_ERROR_NOT_SUPPORTED:
 440                 snprintf(buffer, sizeof(buffer),
 441                                 "%s: function not supported", arg);
 442                 break;
 443         case OP_ERROR_SAMPLE_FORMAT:
 444                 snprintf(buffer, sizeof(buffer),
 445                                 "%s: sample format not supported", arg);
 446                 break;
 447         case OP_ERROR_NOT_OPTION:
 448                 snprintf(buffer, sizeof(buffer),
 449                                 "%s: no such option", arg);
 450                 break;
 451         case OP_ERROR_INTERNAL:
 452                 snprintf(buffer, sizeof(buffer), "%s: internal error", arg);
 453                 break;
 454         case OP_ERROR_SUCCESS:
 455         default:
 456                 snprintf(buffer, sizeof(buffer),
 457                                 "%s: this is not an error (%d), this is a bug",
 458                                 arg, rc);
 459                 break;
 460         }
 461         return xstrdup(buffer);
 462 }
 463
 464 void op_dump_plugins(void)
 465 {
 466         struct output_plugin *o;
 467
 468         printf("\nOutput Plugins: %s\n", plugin_dir);
 469         list_for_each_entry(o, &op_head, node) {
 470                 printf("  %s\n", o->name);
 471         }
 472 }
 473
 474 char *op_get_current(void)
 475 {
 476         if (op)
 477                 return xstrdup(op->name);
 478         return NULL;
 479 }