jackaudio
/
jack2
mirror of https://github.com/jackaudio/jack2
1
0
Fork 0
Code Releases 45 Activity
jack2 codebase
You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
1077 Commits
8 Branches
67MB
Tree: dcbaa4ed70
Branches Tags
${ item.name }
Create branch ${ searchTerm }
from 'dcbaa4ed70'
${ noResults }
jack2/common/JackDriverLoader.cpp

659 lines
20KB
Raw Blame History 

  1. /*

  2. Copyright (C) 2001-2005 Paul Davis

  3. Copyright (C) 2004-2008 Grame

  4. 

  5. This program is free software; you can redistribute it and/or modify

  6. it under the terms of the GNU General Public License as published by

  7. the Free Software Foundation; either version 2 of the License, or

  8. (at your option) any later version.

  9. 

  10. This program is distributed in the hope that it will be useful,

  11. but WITHOUT ANY WARRANTY; without even the implied warranty of

  12. MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the

  13. GNU General Public License for more details.

  14. 

  15. You should have received a copy of the GNU General Public License

  16. along with this program; if not, write to the Free Software

  17. Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.

  18. 

  19. */

  20. 

  21. #if defined(HAVE_CONFIG_H)

  22. #include "config.h"

  23. #endif

  24. 

  25. #ifdef WIN32

  26. #pragma warning (disable : 4786)

  27. #endif

  28. 

  29. #ifndef WIN32

  30. #ifndef ADDON_DIR

  31. #include "config.h"

  32. #endif

  33. #endif

  34. 

  35. #include "JackDriverLoader.h"

  36. #include "JackConstants.h"

  37. #include "JackError.h"

  38. #include <getopt.h>

  39. #include <stdio.h>

  40. 

  41. #ifndef WIN32

  42. #include <dirent.h>

  43. #endif

  44. 

  45. #include <errno.h>

  46. 

  47. jack_driver_desc_t * jackctl_driver_get_desc(jackctl_driver_t * driver);

  48. 

  49. static void

  50. jack_print_driver_options (jack_driver_desc_t * desc, FILE *file)

  51. {

  52.     unsigned long i;

  53.     char arg_default[JACK_DRIVER_PARAM_STRING_MAX + 1];

  54. 

  55.     for (i = 0; i < desc->nparams; i++) {

  56.         switch (desc->params[i].type) {

  57.             case JackDriverParamInt:

  58.                 sprintf (arg_default, "%" "i", desc->params[i].value.i);

  59.                 break;

  60.             case JackDriverParamUInt:

  61.                 sprintf (arg_default, "%" "u", desc->params[i].value.ui);

  62.                 break;

  63.             case JackDriverParamChar:

  64.                 sprintf (arg_default, "%c", desc->params[i].value.c);

  65.                 break;

  66.             case JackDriverParamString:

  67.                 if (desc->params[i].value.str && strcmp (desc->params[i].value.str, "") != 0)

  68.                     sprintf (arg_default, "%s", desc->params[i].value.str);

  69.                 else

  70.                     sprintf (arg_default, "none");

  71.                 break;

  72.             case JackDriverParamBool:

  73.                 sprintf (arg_default, "%s", desc->params[i].value.i ? "true" : "false");

  74.                 break;

  75.         }

  76. 

  77.         fprintf (file, "\t-%c, --%s \t%s (default: %s)\n",

  78.                  desc->params[i].character,

  79.                  desc->params[i].name,

  80.                  desc->params[i].short_desc,

  81.                  arg_default);

  82.     }

  83. }

  84. 

  85. static void

  86. jack_print_driver_param_usage (jack_driver_desc_t * desc, unsigned long param, FILE *file)

  87. {

  88.     fprintf (file, "Usage information for the '%s' parameter for driver '%s':\n",

  89.              desc->params[param].name, desc->name);

  90.     fprintf (file, "%s\n", desc->params[param].long_desc);

  91. }

  92. 

  93. int

  94. jack_parse_driver_params (jack_driver_desc_t * desc, int argc, char* argv[], JSList ** param_ptr)

  95. {

  96.     struct option * long_options;

  97.     char * options, * options_ptr;

  98.     unsigned long i;

  99.     int opt;

  100.     unsigned int param_index;

  101.     JSList * params = NULL;

  102.     jack_driver_param_t * driver_param;

  103. 

  104.     if (argc <= 1) {

  105.         *param_ptr = NULL;

  106.         return 0;

  107.     }

  108. 

  109.     /* check for help */

  110.     if (strcmp (argv[1], "-h") == 0 || strcmp (argv[1], "--help") == 0) {

  111.         if (argc > 2) {

  112.             for (i = 0; i < desc->nparams; i++) {

  113.                 if (strcmp (desc->params[i].name, argv[2]) == 0) {

  114.                     jack_print_driver_param_usage (desc, i, stdout);

  115.                     return 1;

  116.                 }

  117.             }

  118. 

  119.             fprintf (stderr, "jackd: unknown option '%s' "

  120.                      "for driver '%s'\n", argv[2],

  121.                      desc->name);

  122.         }

  123. 

  124.         printf ("Parameters for driver '%s' (all parameters are optional):\n", desc->name);

  125.         jack_print_driver_options (desc, stdout);

  126.         return 1;

  127.     }

  128. 

  129.     /* set up the stuff for getopt */

  130.     options = (char*)calloc (desc->nparams * 3 + 1, sizeof (char));

  131.     long_options = (option*)calloc (desc->nparams + 1, sizeof (struct option));

  132. 

  133.     options_ptr = options;

  134.     for (i = 0; i < desc->nparams; i++) {

  135.         sprintf (options_ptr, "%c::", desc->params[i].character);

  136.         options_ptr += 3;

  137.         long_options[i].name = desc->params[i].name;

  138.         long_options[i].flag = NULL;

  139.         long_options[i].val = desc->params[i].character;

  140.         long_options[i].has_arg = optional_argument;

  141.     }

  142. 

  143.     /* create the params */

  144.     optind = 0;

  145.     opterr = 0;

  146.     while ((opt = getopt_long(argc, argv, options, long_options, NULL)) != -1) {

  147. 

  148.         if (opt == ':' || opt == '?') {

  149.             if (opt == ':') {

  150.                 fprintf (stderr, "Missing option to argument '%c'\n", optopt);

  151.             } else {

  152.                 fprintf (stderr, "Unknownage with option '%c'\n", optopt);

  153.             }

  154. 

  155.             fprintf (stderr, "Options for driver '%s':\n", desc->name);

  156.             jack_print_driver_options (desc, stderr);

  157.             exit (1);

  158.         }

  159. 

  160.         for (param_index = 0; param_index < desc->nparams; param_index++) {

  161.             if (opt == desc->params[param_index].character) {

  162.                 break;

  163.             }

  164.         }

  165. 

  166.         driver_param = (jack_driver_param_t*)calloc (1, sizeof (jack_driver_param_t));

  167.         driver_param->character = desc->params[param_index].character;

  168. 

  169.         if (!optarg && optind < argc &&

  170.                 strlen(argv[optind]) &&

  171.                 argv[optind][0] != '-') {

  172.             optarg = argv[optind];

  173.         }

  174. 

  175.         if (optarg) {

  176.             switch (desc->params[param_index].type) {

  177.                 case JackDriverParamInt:

  178.                     driver_param->value.i = atoi (optarg);

  179.                     break;

  180.                 case JackDriverParamUInt:

  181.                     driver_param->value.ui = strtoul (optarg, NULL, 10);

  182.                     break;

  183.                 case JackDriverParamChar:

  184.                     driver_param->value.c = optarg[0];

  185.                     break;

  186.                 case JackDriverParamString:

  187.                     strncpy (driver_param->value.str, optarg, JACK_DRIVER_PARAM_STRING_MAX);

  188.                     break;

  189.                 case JackDriverParamBool:

  190. 

  191.                     /*

  192.                                 if (strcasecmp ("false", optarg) == 0 ||

  193.                                         strcasecmp ("off", optarg) == 0 ||

  194.                                         strcasecmp ("no", optarg) == 0 ||

  195.                                         strcasecmp ("0", optarg) == 0 ||

  196.                                         strcasecmp ("(null)", optarg) == 0 ) {

  197.                     */

  198.                     // steph

  199.                     if (strcmp ("false", optarg) == 0 ||

  200.                             strcmp ("off", optarg) == 0 ||

  201.                             strcmp ("no", optarg) == 0 ||

  202.                             strcmp ("0", optarg) == 0 ||

  203.                             strcmp ("(null)", optarg) == 0 ) {

  204.                         driver_param->value.i = false;

  205. 

  206.                     } else {

  207. 

  208.                         driver_param->value.i = true;

  209. 

  210.                     }

  211.                     break;

  212.             }

  213.         } else {

  214.             if (desc->params[param_index].type == JackDriverParamBool) {

  215.                 driver_param->value.i = true;

  216.             } else {

  217.                 driver_param->value = desc->params[param_index].value;

  218.             }

  219.         }

  220. 

  221.         params = jack_slist_append (params, driver_param);

  222.     }

  223. 

  224.     free (options);

  225.     free (long_options);

  226. 

  227.     if (param_ptr)

  228.         *param_ptr = params;

  229. 

  230.     return 0;

  231. }

  232. 

  233. EXPORT int

  234. jackctl_parse_driver_params (jackctl_driver *driver_ptr, int argc, char* argv[])

  235. {

  236.     struct option * long_options;

  237.     char * options, * options_ptr;

  238.     unsigned long i;

  239.     int opt;

  240.     JSList * node_ptr;

  241.     jackctl_parameter_t * param = NULL;

  242.     union jackctl_parameter_value value;

  243. 

  244.     if (argc <= 1)

  245.         return 0;

  246. 

  247.     const JSList * driver_params = jackctl_driver_get_parameters(driver_ptr);

  248.     if (driver_params == NULL)

  249.         return 1;

  250. 

  251.     jack_driver_desc_t * desc = jackctl_driver_get_desc(driver_ptr);

  252. 

  253.     /* check for help */

  254.     if (strcmp (argv[1], "-h") == 0 || strcmp (argv[1], "--help") == 0) {

  255.         if (argc > 2) {

  256.             for (i = 0; i < desc->nparams; i++) {

  257.                 if (strcmp (desc->params[i].name, argv[2]) == 0) {

  258.                     jack_print_driver_param_usage (desc, i, stdout);

  259.                     return 1;

  260.                 }

  261.             }

  262. 

  263.             fprintf (stderr, "jackd: unknown option '%s' "

  264.                      "for driver '%s'\n", argv[2],

  265.                      desc->name);

  266.         }

  267. 

  268.         printf ("Parameters for driver '%s' (all parameters are optional):\n", desc->name);

  269.         jack_print_driver_options (desc, stdout);

  270.         return 1;

  271.     }

  272. 

  273.    /* set up the stuff for getopt */

  274.     options = (char*)calloc (desc->nparams * 3 + 1, sizeof (char));

  275.     long_options = (option*)calloc (desc->nparams + 1, sizeof (struct option));

  276. 

  277.     options_ptr = options;

  278.     for (i = 0; i < desc->nparams; i++) {

  279.         sprintf (options_ptr, "%c::", desc->params[i].character);

  280.         options_ptr += 3;

  281.         long_options[i].name = desc->params[i].name;

  282.         long_options[i].flag = NULL;

  283.         long_options[i].val = desc->params[i].character;

  284.         long_options[i].has_arg = optional_argument;

  285.     }

  286. 

  287.     /* create the params */

  288.     optind = 0;

  289.     opterr = 0;

  290.     while ((opt = getopt_long(argc, argv, options, long_options, NULL)) != -1) {

  291. 

  292.         if (opt == ':' || opt == '?') {

  293.             if (opt == ':') {

  294.                 fprintf (stderr, "Missing option to argument '%c'\n", optopt);

  295.             } else {

  296.                 fprintf (stderr, "Unknownage with option '%c'\n", optopt);

  297.             }

  298. 

  299.             fprintf (stderr, "Options for driver '%s':\n", desc->name);

  300.             jack_print_driver_options(desc, stderr);

  301.             return 1;

  302.         }

  303. 

  304.         node_ptr = (JSList *)driver_params;

  305.        	while (node_ptr) {

  306.             param = (jackctl_parameter_t*)node_ptr->data;

  307.             if (opt == jackctl_parameter_get_id(param)) {

  308.                 break;

  309.             }

  310.             node_ptr = node_ptr->next;

  311.         }

  312. 

  313.         if (!optarg && optind < argc &&

  314.             strlen(argv[optind]) &&

  315.             argv[optind][0] != '-') {

  316.             optarg = argv[optind];

  317.         }

  318. 

  319.         if (optarg) {

  320.             switch (jackctl_parameter_get_type(param)) {

  321.                 case JackDriverParamInt:

  322.                     value.i = atoi (optarg);

  323.                     jackctl_parameter_set_value(param, &value);

  324.                     break;

  325.                 case JackDriverParamUInt:

  326.                     value.ui = strtoul (optarg, NULL, 10);

  327.                     jackctl_parameter_set_value(param, &value);

  328.                     break;

  329.                 case JackDriverParamChar:

  330.                     value.c = optarg[0];

  331.                     jackctl_parameter_set_value(param, &value);

  332.                     break;

  333.                 case JackDriverParamString:

  334.                     strncpy (value.str, optarg, JACK_DRIVER_PARAM_STRING_MAX);

  335.                     jackctl_parameter_set_value(param, &value);

  336.                     break;

  337.                 case JackDriverParamBool:

  338.                     /*

  339.                      if (strcasecmp ("false", optarg) == 0 ||

  340.                          strcasecmp ("off", optarg) == 0 ||

  341.                          strcasecmp ("no", optarg) == 0 ||

  342.                          strcasecmp ("0", optarg) == 0 ||

  343.                          strcasecmp ("(null)", optarg) == 0 ) {

  344.                     */

  345.                     // steph

  346.                     if (strcmp ("false", optarg) == 0 ||

  347.                         strcmp ("off", optarg) == 0 ||

  348.                         strcmp ("no", optarg) == 0 ||

  349.                         strcmp ("0", optarg) == 0 ||

  350.                         strcmp ("(null)", optarg) == 0 ) {

  351.                         value.i = false;

  352.                     } else {

  353.                         value.i = true;

  354.                     }

  355.                     jackctl_parameter_set_value(param, &value);

  356.                     break;

  357.             }

  358.         } else {

  359.             if (jackctl_parameter_get_type(param) == JackParamBool) {

  360.                 value.i = true;

  361.             } else {

  362.                 value = jackctl_parameter_get_default_value(param);

  363.             }

  364.             jackctl_parameter_set_value(param, &value);

  365.         }

  366.     }

  367. 

  368.     free(options);

  369.     free(long_options);

  370.     return 0;

  371. }

  372. 

  373. jack_driver_desc_t *

  374. jack_find_driver_descriptor (JSList * drivers, const char * name)

  375. {

  376.     jack_driver_desc_t * desc = 0;

  377.     JSList * node;

  378. 

  379.     for (node = drivers; node; node = jack_slist_next (node)) {

  380.         desc = (jack_driver_desc_t *) node->data;

  381. 

  382.         if (strcmp (desc->name, name) != 0) {

  383.             desc = NULL;

  384.         } else {

  385.             break;

  386.         }

  387.     }

  388. 

  389.     return desc;

  390. }

  391. 

  392. jack_driver_desc_t *

  393. jack_drivers_get_descriptor (JSList * drivers, const char * sofile)

  394. {

  395.     jack_driver_desc_t * descriptor, * other_descriptor;

  396.     JackDriverDescFunction so_get_descriptor = NULL;

  397.     JSList * node;

  398.     void * dlhandle;

  399.     char * filename;

  400. #ifdef WIN32

  401.     int dlerr;

  402. #else

  403.     const char * dlerr;

  404. #endif

  405. 

  406.     int err;

  407.     const char* driver_dir;

  408. 

  409.     if ((driver_dir = getenv("JACK_DRIVER_DIR")) == 0) {

  410.         // for WIN32 ADDON_DIR is defined in JackConstants.h as relative path

  411.         // for posix systems, it is absolute path of default driver dir

  412. #ifdef WIN32

  413.         char temp_driver_dir1[512];

  414.         char temp_driver_dir2[512];

  415.         GetCurrentDirectory(512, temp_driver_dir1);

  416.         sprintf(temp_driver_dir2, "%s/%s", temp_driver_dir1, ADDON_DIR);

  417.         driver_dir = temp_driver_dir2;

  418. #else

  419.         driver_dir = ADDON_DIR;

  420. #endif

  421.     }

  422. 

  423.     filename = (char *)malloc(strlen (driver_dir) + 1 + strlen(sofile) + 1);

  424.     sprintf (filename, "%s/%s", driver_dir, sofile);

  425. 

  426.     if ((dlhandle = LoadDriverModule(filename)) == NULL) {

  427. #ifdef WIN32

  428.         jack_error ("could not open driver .dll '%s': %ld\n", filename, GetLastError());

  429. #else

  430.         jack_error ("could not open driver .so '%s': %s\n", filename, dlerror());

  431. #endif

  432. 

  433.         free(filename);

  434.         return NULL;

  435.     }

  436. 

  437.     so_get_descriptor = (JackDriverDescFunction)

  438.                         GetProc(dlhandle, "driver_get_descriptor");

  439. 

  440. #ifdef WIN32

  441.     if ((so_get_descriptor == NULL) && (dlerr = GetLastError()) != 0) {

  442.         jack_log("Jack::jack_drivers_get_descriptor : dll is not a driver, error ld", dlerr);

  443. #else

  444.     if ((so_get_descriptor == NULL) && (dlerr = dlerror ()) != NULL) {

  445.         jack_error("%s", dlerr);

  446. #endif

  447. 

  448.         UnloadDriverModule(dlhandle);

  449.         free(filename);

  450.         return NULL;

  451.     }

  452. 

  453.     if ((descriptor = so_get_descriptor ()) == NULL) {

  454.         jack_error("driver from '%s' returned NULL descriptor\n", filename);

  455.         UnloadDriverModule(dlhandle);

  456.         free(filename);

  457.         return NULL;

  458.     }

  459. 

  460. #ifdef WIN32

  461.     if ((err = UnloadDriverModule(dlhandle)) == 0) {

  462.         jack_error ("error closing driver .so '%s': %ld\n", filename, GetLastError ());

  463.     }

  464. #else

  465.     if ((err = UnloadDriverModule(dlhandle)) != 0) {

  466.         jack_error ("error closing driver .so '%s': %s\n", filename, dlerror ());

  467.     }

  468. #endif

  469. 

  470.     /* check it doesn't exist already */

  471.     for (node = drivers; node; node = jack_slist_next (node)) {

  472.         other_descriptor = (jack_driver_desc_t *) node->data;

  473. 

  474.         if (strcmp(descriptor->name, other_descriptor->name) == 0) {

  475.             jack_error("the drivers in '%s' and '%s' both have the name '%s'; using the first\n",

  476.                        other_descriptor->file, filename, other_descriptor->name);

  477.             /* FIXME: delete the descriptor */

  478.             free(filename);

  479.             return NULL;

  480.         }

  481.     }

  482. 

  483.     strncpy(descriptor->file, filename, PATH_MAX);

  484.     free(filename);

  485.     return descriptor;

  486. }

  487. 

  488. #ifdef WIN32

  489. 

  490. JSList *

  491. jack_drivers_load (JSList * drivers) {

  492.     char * driver_dir;

  493.     char driver_dir_storage[512];

  494.     char dll_filename[512];

  495.     WIN32_FIND_DATA filedata;

  496.     HANDLE file;

  497.     const char * ptr = NULL;

  498.     JSList * driver_list = NULL;

  499.     jack_driver_desc_t * desc;

  500. 

  501.     if ((driver_dir = getenv("JACK_DRIVER_DIR")) == 0) {

  502.         // for WIN32 ADDON_DIR is defined in JackConstants.h as relative path

  503.         GetCurrentDirectory(512, driver_dir_storage);

  504.         strcat(driver_dir_storage, "/");

  505.         strcat(driver_dir_storage, ADDON_DIR);

  506.         driver_dir = driver_dir_storage;

  507.     }

  508. 

  509.     sprintf(dll_filename, "%s/*.dll", driver_dir);

  510. 

  511.     file = (HANDLE )FindFirstFile(dll_filename, &filedata);

  512. 

  513.     if (file == INVALID_HANDLE_VALUE) {

  514.         jack_error("error");

  515.         return NULL;

  516.     }

  517. 

  518.     do {

  519.         ptr = strrchr (filedata.cFileName, '.');

  520.         if (!ptr) {

  521.             continue;

  522.         }

  523.         ptr++;

  524.         if (strncmp ("dll", ptr, 3) != 0) {

  525.             continue;

  526.         }

  527. 

  528.         desc = jack_drivers_get_descriptor (drivers, filedata.cFileName);

  529.         if (desc) {

  530.             driver_list = jack_slist_append (driver_list, desc);

  531.         }

  532. 

  533.     } while (FindNextFile(file, &filedata));

  534. 

  535.     if (!driver_list) {

  536.         jack_error ("could not find any drivers in %s!\n", driver_dir);

  537.         return NULL;

  538.     }

  539. 

  540.     return driver_list;

  541. }

  542. 

  543. #else

  544. 

  545. JSList *

  546. jack_drivers_load (JSList * drivers) {

  547.     struct dirent * dir_entry;

  548.     DIR * dir_stream;

  549.     const char * ptr;

  550.     int err;

  551.     JSList * driver_list = NULL;

  552.     jack_driver_desc_t * desc;

  553. 

  554.     const char* driver_dir;

  555.     if ((driver_dir = getenv("JACK_DRIVER_DIR")) == 0) {

  556.         driver_dir = ADDON_DIR;

  557.     }

  558. 

  559.     /* search through the driver_dir and add get descriptors

  560.     from the .so files in it */

  561.     dir_stream = opendir (driver_dir);

  562.     if (!dir_stream) {

  563.         jack_error ("could not open driver directory %s: %s\n",

  564.                     driver_dir, strerror (errno));

  565.         return NULL;

  566.     }

  567. 

  568.     while ((dir_entry = readdir(dir_stream))) {

  569. 

  570.         /* check the filename is of the right format */

  571.         if (strncmp ("jack_", dir_entry->d_name, 5) != 0) {

  572.             continue;

  573.         }

  574. 

  575.         ptr = strrchr (dir_entry->d_name, '.');

  576.         if (!ptr) {

  577.             continue;

  578.         }

  579.         ptr++;

  580.         if (strncmp ("so", ptr, 2) != 0) {

  581.             continue;

  582.         }

  583. 

  584.         desc = jack_drivers_get_descriptor (drivers, dir_entry->d_name);

  585.         if (desc) {

  586.             driver_list = jack_slist_append (driver_list, desc);

  587.         }

  588.     }

  589. 

  590.     err = closedir (dir_stream);

  591.     if (err) {

  592.         jack_error ("error closing driver directory %s: %s\n",

  593.                     driver_dir, strerror (errno));

  594.     }

  595. 

  596.     if (!driver_list) {

  597.         jack_error ("could not find any drivers in %s!\n", driver_dir);

  598.         return NULL;

  599.     }

  600. 

  601.     return driver_list;

  602. }

  603. 

  604. #endif

  605. 

  606. jack_driver_info_t *

  607. jack_load_driver (jack_driver_desc_t * driver_desc) {

  608. #ifdef WIN32

  609.     int errstr;

  610. #else

  611.     const char * errstr;

  612. #endif

  613. 

  614.     jack_driver_info_t *info;

  615. 

  616.     info = (jack_driver_info_t *) calloc (1, sizeof (*info));

  617.     info->handle = LoadDriverModule (driver_desc->file);

  618. 

  619.     if (info->handle == NULL) {

  620. #ifdef WIN32

  621.         if ((errstr = GetLastError ()) != 0) {

  622.             jack_error ("can't load \"%s\": %ld", driver_desc->file,

  623.                         errstr);

  624. #else

  625.         if ((errstr = dlerror ()) != 0) {

  626.             jack_error ("can't load \"%s\": %s", driver_desc->file,

  627.                         errstr);

  628. #endif

  629. 

  630.         } else {

  631.             jack_error ("bizarre error loading driver shared "

  632.                         "object %s", driver_desc->file);

  633.         }

  634.         goto fail;

  635.     }

  636. 

  637.     info->initialize = (initialize)GetProc(info->handle, "driver_initialize");

  638. 

  639. #ifdef WIN32

  640.     if ((info->initialize == NULL) && (errstr = GetLastError ()) != 0) {

  641. #else

  642.     if ((info->initialize == NULL) && (errstr = dlerror ()) != 0) {

  643. #endif

  644.         jack_error ("no initialize function in shared object %s\n",

  645.                     driver_desc->file);

  646.         goto fail;

  647.     }

  648. 

  649.     return info;

  650. 

  651. fail:

  652.     if (info->handle) {

  653.         UnloadDriverModule(info->handle);

  654.     }

  655.     free (info);

  656.     return NULL;

  657. }