| /* |
| * HAL devices support |
| * |
| * Copyright 2006 Alexandre Julliard |
| * |
| * This library is free software; you can redistribute it and/or |
| * modify it under the terms of the GNU Lesser General Public |
| * License as published by the Free Software Foundation; either |
| * version 2.1 of the License, or (at your option) any later version. |
| * |
| * This library 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 |
| * Lesser General Public License for more details. |
| * |
| * You should have received a copy of the GNU Lesser General Public |
| * License along with this library; if not, write to the Free Software |
| * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA |
| */ |
| |
| #include "config.h" |
| #include "wine/port.h" |
| |
| #include <assert.h> |
| #include <errno.h> |
| #include <stdarg.h> |
| #include <stdio.h> |
| #include <sys/time.h> |
| |
| #include "windef.h" |
| #include "winbase.h" |
| #include "winreg.h" |
| #include "winuser.h" |
| #include "dbt.h" |
| #include "excpt.h" |
| |
| #include "wine/library.h" |
| #include "wine/list.h" |
| #include "wine/exception.h" |
| #include "wine/debug.h" |
| |
| WINE_DEFAULT_DEBUG_CHANNEL(explorer); |
| |
| #ifdef HAVE_LIBHAL |
| |
| #include <dbus/dbus.h> |
| #include <hal/libhal.h> |
| |
| struct dos_drive |
| { |
| struct list entry; |
| char *udi; |
| int drive; |
| }; |
| |
| static struct list drives_list = LIST_INIT(drives_list); |
| |
| |
| #define DBUS_FUNCS \ |
| DO_FUNC(dbus_bus_get); \ |
| DO_FUNC(dbus_connection_close); \ |
| DO_FUNC(dbus_connection_read_write_dispatch); \ |
| DO_FUNC(dbus_error_init); \ |
| DO_FUNC(dbus_error_free); \ |
| DO_FUNC(dbus_error_is_set) |
| |
| #define HAL_FUNCS \ |
| DO_FUNC(libhal_ctx_free); \ |
| DO_FUNC(libhal_ctx_init); \ |
| DO_FUNC(libhal_ctx_new); \ |
| DO_FUNC(libhal_ctx_set_dbus_connection); \ |
| DO_FUNC(libhal_ctx_set_device_added); \ |
| DO_FUNC(libhal_ctx_set_device_property_modified); \ |
| DO_FUNC(libhal_ctx_set_device_removed); \ |
| DO_FUNC(libhal_ctx_shutdown); \ |
| DO_FUNC(libhal_device_get_property_bool); \ |
| DO_FUNC(libhal_device_get_property_string); \ |
| DO_FUNC(libhal_device_add_property_watch); \ |
| DO_FUNC(libhal_device_remove_property_watch); \ |
| DO_FUNC(libhal_free_string); \ |
| DO_FUNC(libhal_free_string_array); \ |
| DO_FUNC(libhal_get_all_devices) |
| |
| #define DO_FUNC(f) static typeof(f) * p_##f |
| DBUS_FUNCS; |
| HAL_FUNCS; |
| #undef DO_FUNC |
| |
| static BOOL load_functions(void) |
| { |
| void *dbus_handle, *hal_handle; |
| char error[128]; |
| |
| if (!(dbus_handle = wine_dlopen(SONAME_LIBDBUS_1, RTLD_NOW, error, sizeof(error)))) goto failed; |
| if (!(hal_handle = wine_dlopen(SONAME_LIBHAL, RTLD_NOW, error, sizeof(error)))) goto failed; |
| |
| #define DO_FUNC(f) if (!(p_##f = wine_dlsym( dbus_handle, #f, error, sizeof(error) ))) goto failed |
| DBUS_FUNCS; |
| #undef DO_FUNC |
| |
| #define DO_FUNC(f) if (!(p_##f = wine_dlsym( hal_handle, #f, error, sizeof(error) ))) goto failed |
| HAL_FUNCS; |
| #undef DO_FUNC |
| |
| return TRUE; |
| |
| failed: |
| WINE_WARN( "failed to load HAL support: %s\n", error ); |
| return FALSE; |
| } |
| |
| static WINE_EXCEPTION_FILTER(assert_fault) |
| { |
| if (GetExceptionCode() == EXCEPTION_WINE_ASSERTION) return EXCEPTION_EXECUTE_HANDLER; |
| return EXCEPTION_CONTINUE_SEARCH; |
| } |
| |
| /* send notification about a change to a given drive */ |
| static void send_notify( int drive, int code ) |
| { |
| DWORD_PTR result; |
| DEV_BROADCAST_VOLUME info; |
| |
| info.dbcv_size = sizeof(info); |
| info.dbcv_devicetype = DBT_DEVTYP_VOLUME; |
| info.dbcv_reserved = 0; |
| info.dbcv_unitmask = 1 << drive; |
| info.dbcv_flags = DBTF_MEDIA; |
| SendMessageTimeoutW( HWND_BROADCAST, WM_DEVICECHANGE, code, (LPARAM)&info, |
| SMTO_ABORTIFHUNG, 0, &result ); |
| } |
| |
| static char *get_dosdevices_path(void) |
| { |
| const char *config_dir = wine_get_config_dir(); |
| size_t len = strlen(config_dir) + sizeof("/dosdevices/a::"); |
| char *path = HeapAlloc( GetProcessHeap(), 0, len ); |
| if (path) |
| { |
| strcpy( path, config_dir ); |
| strcat( path, "/dosdevices/a::" ); |
| } |
| return path; |
| } |
| |
| /* find or create a DOS drive for the corresponding device */ |
| static int add_drive( const char *device, const char *type ) |
| { |
| char *path, *p; |
| char in_use[26]; |
| struct stat dev_st, drive_st; |
| int drive, first, last, avail = 0; |
| |
| if (stat( device, &dev_st ) == -1 || !S_ISBLK( dev_st.st_mode )) return -1; |
| |
| if (!(path = get_dosdevices_path())) return -1; |
| p = path + strlen(path) - 3; |
| |
| memset( in_use, 0, sizeof(in_use) ); |
| |
| first = 2; |
| last = 26; |
| if (type && !strcmp( type, "floppy" )) |
| { |
| first = 0; |
| last = 2; |
| } |
| |
| while (avail != -1) |
| { |
| avail = -1; |
| for (drive = first; drive < last; drive++) |
| { |
| if (in_use[drive]) continue; /* already checked */ |
| *p = 'a' + drive; |
| if (stat( path, &drive_st ) == -1) |
| { |
| if (lstat( path, &drive_st ) == -1 && errno == ENOENT) /* this is a candidate */ |
| { |
| if (avail == -1) |
| { |
| p[2] = 0; |
| /* if mount point symlink doesn't exist either, it's available */ |
| if (lstat( path, &drive_st ) == -1 && errno == ENOENT) avail = drive; |
| p[2] = ':'; |
| } |
| } |
| else in_use[drive] = 1; |
| } |
| else |
| { |
| in_use[drive] = 1; |
| if (!S_ISBLK( drive_st.st_mode )) continue; |
| if (dev_st.st_rdev == drive_st.st_rdev) goto done; |
| } |
| } |
| if (avail != -1) |
| { |
| /* try to use the one we found */ |
| drive = avail; |
| *p = 'a' + drive; |
| if (symlink( device, path ) != -1) goto done; |
| /* failed, retry the search */ |
| } |
| } |
| drive = -1; |
| |
| done: |
| HeapFree( GetProcessHeap(), 0, path ); |
| return drive; |
| } |
| |
| static void set_mount_point( struct dos_drive *drive, const char *mount_point ) |
| { |
| char *path, *p; |
| struct stat path_st, mnt_st; |
| |
| if (drive->drive == -1) return; |
| if (!(path = get_dosdevices_path())) return; |
| p = path + strlen(path) - 3; |
| *p = 'a' + drive->drive; |
| p[2] = 0; |
| |
| if (mount_point[0]) |
| { |
| /* try to avoid unlinking if already set correctly */ |
| if (stat( path, &path_st ) == -1 || stat( mount_point, &mnt_st ) == -1 || |
| path_st.st_dev != mnt_st.st_dev || path_st.st_ino != mnt_st.st_ino) |
| { |
| unlink( path ); |
| symlink( mount_point, path ); |
| } |
| } |
| else unlink( path ); |
| |
| HeapFree( GetProcessHeap(), 0, path ); |
| } |
| |
| static void add_dos_device( const char *udi, const char *device, |
| const char *mount_point, const char *type ) |
| { |
| struct dos_drive *drive; |
| |
| /* first check if it already exists */ |
| LIST_FOR_EACH_ENTRY( drive, &drives_list, struct dos_drive, entry ) |
| { |
| if (!strcmp( udi, drive->udi )) goto found; |
| } |
| |
| if (!(drive = HeapAlloc( GetProcessHeap(), 0, sizeof(*drive) ))) return; |
| if (!(drive->udi = HeapAlloc( GetProcessHeap(), 0, strlen(udi)+1 ))) |
| { |
| HeapFree( GetProcessHeap(), 0, drive ); |
| return; |
| } |
| strcpy( drive->udi, udi ); |
| list_add_tail( &drives_list, &drive->entry ); |
| |
| found: |
| drive->drive = add_drive( device, type ); |
| if (drive->drive != -1) |
| { |
| HKEY hkey; |
| |
| set_mount_point( drive, mount_point ); |
| |
| WINE_TRACE( "added device %c: udi %s for %s on %s type %s\n", |
| 'a' + drive->drive, wine_dbgstr_a(udi), wine_dbgstr_a(device), |
| wine_dbgstr_a(mount_point), wine_dbgstr_a(type) ); |
| |
| /* hack: force the drive type in the registry */ |
| if (!RegCreateKeyA( HKEY_LOCAL_MACHINE, "Software\\Wine\\Drives", &hkey )) |
| { |
| char name[3] = "a:"; |
| name[0] += drive->drive; |
| if (!type || strcmp( type, "cdrom" )) type = "floppy"; /* FIXME: default to floppy */ |
| RegSetValueExA( hkey, name, 0, REG_SZ, (const BYTE *)type, strlen(type) + 1 ); |
| RegCloseKey( hkey ); |
| } |
| |
| send_notify( drive->drive, DBT_DEVICEARRIVAL ); |
| } |
| } |
| |
| static void remove_dos_device( struct dos_drive *drive ) |
| { |
| HKEY hkey; |
| |
| if (drive->drive != -1) |
| { |
| set_mount_point( drive, "" ); |
| |
| /* clear the registry key too */ |
| if (!RegOpenKeyA( HKEY_LOCAL_MACHINE, "Software\\Wine\\Drives", &hkey )) |
| { |
| char name[3] = "a:"; |
| name[0] += drive->drive; |
| RegDeleteValueA( hkey, name ); |
| RegCloseKey( hkey ); |
| } |
| |
| send_notify( drive->drive, DBT_DEVICEREMOVECOMPLETE ); |
| } |
| |
| list_remove( &drive->entry ); |
| HeapFree( GetProcessHeap(), 0, drive->udi ); |
| HeapFree( GetProcessHeap(), 0, drive ); |
| } |
| |
| /* HAL callback for new device */ |
| static void new_device( LibHalContext *ctx, const char *udi ) |
| { |
| DBusError error; |
| char *parent, *mount_point, *device, *type; |
| |
| p_dbus_error_init( &error ); |
| |
| if (!(device = p_libhal_device_get_property_string( ctx, udi, "block.device", &error ))) |
| goto done; |
| |
| if (!(mount_point = p_libhal_device_get_property_string( ctx, udi, "volume.mount_point", &error ))) |
| goto done; |
| |
| if (!(parent = p_libhal_device_get_property_string( ctx, udi, "info.parent", &error ))) |
| goto done; |
| |
| if (!p_libhal_device_get_property_bool( ctx, parent, "storage.removable", &error )) |
| goto done; |
| |
| if (!(type = p_libhal_device_get_property_string( ctx, parent, "storage.drive_type", &error ))) |
| p_dbus_error_free( &error ); /* ignore error */ |
| |
| add_dos_device( udi, device, mount_point, type ); |
| |
| if (type) p_libhal_free_string( type ); |
| p_libhal_free_string( parent ); |
| p_libhal_free_string( device ); |
| p_libhal_free_string( mount_point ); |
| |
| /* add property watch for mount point */ |
| p_libhal_device_add_property_watch( ctx, udi, &error ); |
| |
| done: |
| p_dbus_error_free( &error ); |
| } |
| |
| /* HAL callback for removed device */ |
| static void removed_device( LibHalContext *ctx, const char *udi ) |
| { |
| DBusError error; |
| struct dos_drive *drive; |
| |
| WINE_TRACE( "removed %s\n", wine_dbgstr_a(udi) ); |
| |
| LIST_FOR_EACH_ENTRY( drive, &drives_list, struct dos_drive, entry ) |
| { |
| if (strcmp( udi, drive->udi )) continue; |
| p_dbus_error_init( &error ); |
| p_libhal_device_remove_property_watch( ctx, udi, &error ); |
| remove_dos_device( drive ); |
| p_dbus_error_free( &error ); |
| return; |
| } |
| } |
| |
| /* HAL callback for property changes */ |
| static void property_modified (LibHalContext *ctx, const char *udi, |
| const char *key, dbus_bool_t is_removed, dbus_bool_t is_added) |
| { |
| WINE_TRACE( "udi %s key %s %s\n", wine_dbgstr_a(udi), wine_dbgstr_a(key), |
| is_added ? "added" : is_removed ? "removed" : "modified" ); |
| |
| if (!strcmp( key, "volume.mount_point" )) new_device( ctx, udi ); |
| } |
| |
| |
| static DWORD WINAPI hal_thread( void *arg ) |
| { |
| DBusError error; |
| DBusConnection *dbc; |
| LibHalContext *ctx; |
| int i, num; |
| char **list; |
| |
| if (!(ctx = p_libhal_ctx_new())) return 1; |
| |
| p_dbus_error_init( &error ); |
| if (!(dbc = p_dbus_bus_get( DBUS_BUS_SYSTEM, &error ))) |
| { |
| WINE_WARN( "failed to get system dbus connection: %s\n", error.message ); |
| p_dbus_error_free( &error ); |
| return 1; |
| } |
| |
| p_libhal_ctx_set_dbus_connection( ctx, dbc ); |
| p_libhal_ctx_set_device_added( ctx, new_device ); |
| p_libhal_ctx_set_device_removed( ctx, removed_device ); |
| p_libhal_ctx_set_device_property_modified( ctx, property_modified ); |
| |
| if (!p_libhal_ctx_init( ctx, &error )) |
| { |
| WINE_WARN( "HAL context init failed: %s\n", error.message ); |
| p_dbus_error_free( &error ); |
| return 1; |
| } |
| |
| /* retrieve all existing devices */ |
| if (!(list = p_libhal_get_all_devices( ctx, &num, &error ))) p_dbus_error_free( &error ); |
| else |
| { |
| for (i = 0; i < num; i++) new_device( ctx, list[i] ); |
| p_libhal_free_string_array( list ); |
| } |
| |
| __TRY |
| { |
| while (p_dbus_connection_read_write_dispatch( dbc, -1 )) /* nothing */ ; |
| } |
| __EXCEPT( assert_fault ) |
| { |
| WINE_WARN( "dbus assertion failure, disabling HAL support\n" ); |
| return 1; |
| } |
| __ENDTRY; |
| |
| p_libhal_ctx_shutdown( ctx, &error ); |
| p_dbus_error_free( &error ); /* just in case */ |
| p_dbus_connection_close( dbc ); |
| p_libhal_ctx_free( ctx ); |
| return 0; |
| } |
| |
| void initialize_hal(void) |
| { |
| HANDLE handle; |
| |
| if (!load_functions()) return; |
| if (!(handle = CreateThread( NULL, 0, hal_thread, NULL, 0, NULL ))) return; |
| CloseHandle( handle ); |
| } |
| |
| #else /* HAVE_LIBHAL */ |
| |
| void initialize_hal(void) |
| { |
| WINE_WARN( "HAL support not compiled in\n" ); |
| } |
| |
| #endif /* HAVE_LIBHAL */ |