programs/net/net.c

   1 /*
   2  * Copyright 2007 Tim Schwartz
   3  *
   4  * This library is free software; you can redistribute it and/or
   5  * modify it under the terms of the GNU Lesser General Public
   6  * License as published by the Free Software Foundation; either
   7  * version 2.1 of the License, or (at your option) any later version.
   8  *
   9  * This library is distributed in the hope that it will be useful,
  10  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  11  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  12  * Lesser General Public License for more details.
  13  *
  14  * You should have received a copy of the GNU Lesser General Public
  15  * License along with this library; if not, write to the Free Software
  16  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
  17  */
  18
  19 #include <windows.h>
  20 #include <lm.h>
  21 #include <wine/debug.h>
  22
  23 #include "resources.h"
  24
  25 WINE_DEFAULT_DEBUG_CHANNEL(net);
  26
  27 #define NET_START 0001
  28 #define NET_STOP  0002
  29
  30 static int output_write(const WCHAR* str, int len)
  31 {
  32     DWORD ret, count;
  33     ret = WriteConsoleW(GetStdHandle(STD_OUTPUT_HANDLE), str, len, &count, NULL);
  34     if (!ret)
  35     {
  36         DWORD lenA;
  37         char* strA;
  38
  39         /* On Windows WriteConsoleW() fails if the output is redirected. So fall
  40          * back to WriteFile(), assuming the console encoding is still the right
  41          * one in that case.
  42          */
  43         lenA = WideCharToMultiByte(GetConsoleOutputCP(), 0, str, len,
  44                                    NULL, 0, NULL, NULL);
  45         strA = HeapAlloc(GetProcessHeap(), 0, lenA);
  46         if (!strA)
  47             return 0;
  48
  49         WideCharToMultiByte(GetConsoleOutputCP(), 0, str, len, strA, lenA,
  50                             NULL, NULL);
  51         WriteFile(GetStdHandle(STD_OUTPUT_HANDLE), strA, lenA, &count, FALSE);
  52         HeapFree(GetProcessHeap(), 0, strA);
  53     }
  54     return count;
  55 }
  56
  57 static int output_vprintf(const WCHAR* fmt, __ms_va_list va_args)
  58 {
  59     WCHAR str[8192];
  60     int len;
  61
  62     SetLastError(NO_ERROR);
  63     len = FormatMessageW(FORMAT_MESSAGE_FROM_STRING, fmt, 0, 0, str, ARRAY_SIZE(str), &va_args);
  64     if (len == 0 && GetLastError() != NO_ERROR)
  65         WINE_FIXME("Could not format string: le=%u, fmt=%s\n", GetLastError(), wine_dbgstr_w(fmt));
  66     else
  67         output_write(str, len);
  68     return 0;
  69 }
  70
  71 static int WINAPIV output_printf(const WCHAR* fmt, ...)
  72 {
  73     __ms_va_list arguments;
  74
  75     __ms_va_start(arguments, fmt);
  76     output_vprintf(fmt, arguments);
  77     __ms_va_end(arguments);
  78     return 0;
  79 }
  80
  81 static int WINAPIV output_string(int msg, ...)
  82 {
  83     WCHAR fmt[8192];
  84     __ms_va_list arguments;
  85
  86     LoadStringW(GetModuleHandleW(NULL), msg, fmt, ARRAY_SIZE(fmt));
  87     __ms_va_start(arguments, msg);
  88     output_vprintf(fmt, arguments);
  89     __ms_va_end(arguments);
  90     return 0;
  91 }
  92
  93 static BOOL output_error_string(DWORD error)
  94 {
  95     LPWSTR pBuffer;
  96     if (FormatMessageW(FORMAT_MESSAGE_FROM_SYSTEM |
  97             FORMAT_MESSAGE_IGNORE_INSERTS | FORMAT_MESSAGE_ALLOCATE_BUFFER,
  98             NULL, error, 0, (LPWSTR)&pBuffer, 0, NULL))
  99     {
 100         output_write(pBuffer, lstrlenW(pBuffer));
 101         LocalFree(pBuffer);
 102         return TRUE;
 103     }
 104     return FALSE;
 105 }
 106
 107 static BOOL net_use(int argc, const WCHAR* argv[])
 108 {
 109     USE_INFO_2 *buffer, *connection;
 110     DWORD read, total, resume_handle, rc, i;
 111     WCHAR* status[STRING_RECONN-STRING_OK+1];
 112     resume_handle = 0;
 113     buffer = NULL;
 114
 115     if(argc<3)
 116     {
 117         HMODULE hmod = GetModuleHandleW(NULL);
 118
 119         /* Load the status strings */
 120         for (i = 0; i < ARRAY_SIZE(status); i++)
 121         {
 122             status[i] = HeapAlloc(GetProcessHeap(), 0, 1024 * sizeof(**status));
 123             LoadStringW(hmod, STRING_OK+i, status[i], 1024);
 124         }
 125
 126         do {
 127             rc = NetUseEnum(NULL, 2, (BYTE **) &buffer, 2048, &read, &total, &resume_handle);
 128             if (rc != ERROR_MORE_DATA && rc != ERROR_SUCCESS)
 129             {
 130                 break;
 131             }
 132
 133             if(total == 0)
 134             {
 135                 output_string(STRING_NO_ENTRIES);
 136                 break;
 137             }
 138
 139             output_string(STRING_USE_HEADER);
 140             for (i = 0, connection = buffer; i < read; ++i, ++connection)
 141                 output_string(STRING_USE_ENTRY, status[connection->ui2_status], connection->ui2_local,
 142                                 connection->ui2_remote, connection->ui2_refcount);
 143
 144             if (buffer != NULL) NetApiBufferFree(buffer);
 145         } while (rc == ERROR_MORE_DATA);
 146
 147         /* Release the status strings */
 148         for (i = 0; i < ARRAY_SIZE(status); i++)
 149             HeapFree(GetProcessHeap(), 0, status[i]);
 150
 151         return TRUE;
 152     }
 153
 154     return FALSE;
 155 }
 156
 157 static BOOL net_enum_services(void)
 158 {
 159     static const WCHAR runningW[]={' ',' ',' ',' ','%','1','\n',0};
 160     SC_HANDLE SCManager;
 161     LPENUM_SERVICE_STATUS_PROCESSW services;
 162     DWORD size, i, count, resume;
 163     BOOL success = FALSE;
 164
 165     SCManager = OpenSCManagerW(NULL, NULL, SC_MANAGER_ALL_ACCESS);
 166     if(!SCManager)
 167     {
 168         output_string(STRING_NO_SCM);
 169         return FALSE;
 170     }
 171
 172     EnumServicesStatusExW(SCManager, SC_ENUM_PROCESS_INFO, SERVICE_WIN32, SERVICE_ACTIVE, NULL, 0, &size, &count, NULL, NULL);
 173     if(GetLastError() != ERROR_MORE_DATA)
 174     {
 175         output_error_string(GetLastError());
 176         goto end;
 177     }
 178     services = HeapAlloc(GetProcessHeap(), 0, size);
 179     resume = 0;
 180     if(!EnumServicesStatusExW(SCManager, SC_ENUM_PROCESS_INFO, SERVICE_WIN32, SERVICE_ACTIVE, (LPBYTE)services, size, &size, &count, &resume, NULL))
 181     {
 182         output_error_string(GetLastError());
 183         goto end;
 184     }
 185     output_string(STRING_RUNNING_HEADER);
 186     for(i = 0; i < count; i++)
 187     {
 188         output_printf(runningW, services[i].lpDisplayName);
 189         WINE_TRACE("service=%s state=%d controls=%x\n",
 190                    wine_dbgstr_w(services[i].lpServiceName),
 191                    services[i].ServiceStatusProcess.dwCurrentState,
 192                    services[i].ServiceStatusProcess.dwControlsAccepted);
 193     }
 194     success = TRUE;
 195
 196  end:
 197     CloseServiceHandle(SCManager);
 198     return success;
 199 }
 200
 201 static BOOL StopService(SC_HANDLE SCManager, SC_HANDLE serviceHandle)
 202 {
 203     LPENUM_SERVICE_STATUSW dependencies = NULL;
 204     DWORD buffer_size = 0;
 205     DWORD count = 0, counter;
 206     BOOL result;
 207     SC_HANDLE dependent_serviceHandle;
 208     SERVICE_STATUS_PROCESS ssp;
 209
 210     result = EnumDependentServicesW(serviceHandle, SERVICE_ACTIVE, dependencies, buffer_size, &buffer_size, &count);
 211
 212     if(!result && (GetLastError() == ERROR_MORE_DATA))
 213     {
 214         dependencies = HeapAlloc(GetProcessHeap(), 0, buffer_size);
 215         if(EnumDependentServicesW(serviceHandle, SERVICE_ACTIVE, dependencies, buffer_size, &buffer_size, &count))
 216         {
 217             for(counter = 0; counter < count; counter++)
 218             {
 219                 output_string(STRING_STOP_DEP, dependencies[counter].lpDisplayName);
 220                 dependent_serviceHandle = OpenServiceW(SCManager, dependencies[counter].lpServiceName, SC_MANAGER_ALL_ACCESS);
 221                 if(dependent_serviceHandle)
 222                 {
 223                     result = StopService(SCManager, dependent_serviceHandle);
 224                     CloseServiceHandle(dependent_serviceHandle);
 225                 }
 226                 if(!result) output_string(STRING_CANT_STOP, dependencies[counter].lpDisplayName);
 227            }
 228         }
 229     }
 230
 231     if(result) result = ControlService(serviceHandle, SERVICE_CONTROL_STOP, (LPSERVICE_STATUS)&ssp);
 232     HeapFree(GetProcessHeap(), 0, dependencies);
 233     return result;
 234 }
 235
 236 static BOOL net_service(int operation, const WCHAR* service_name)
 237 {
 238     SC_HANDLE SCManager, serviceHandle;
 239     BOOL result = FALSE;
 240     WCHAR service_display_name[4096];
 241     DWORD buffer_size;
 242
 243     SCManager = OpenSCManagerW(NULL, NULL, SC_MANAGER_ALL_ACCESS);
 244     if(!SCManager)
 245     {
 246         output_string(STRING_NO_SCM);
 247         return FALSE;
 248     }
 249     serviceHandle = OpenServiceW(SCManager, service_name, SC_MANAGER_ALL_ACCESS);
 250     if(!serviceHandle)
 251     {
 252         output_string(STRING_NO_SVCHANDLE);
 253         CloseServiceHandle(SCManager);
 254         return FALSE;
 255     }
 256
 257     buffer_size = ARRAY_SIZE(service_display_name);
 258     GetServiceDisplayNameW(SCManager, service_name, service_display_name, &buffer_size);
 259     if (!service_display_name[0]) lstrcpyW(service_display_name, service_name);
 260
 261     switch(operation)
 262     {
 263     case NET_START:
 264         output_string(STRING_START_SVC, service_display_name);
 265         result = StartServiceW(serviceHandle, 0, NULL);
 266
 267         if(result) output_string(STRING_START_SVC_SUCCESS, service_display_name);
 268         else
 269         {
 270             if (!output_error_string(GetLastError()))
 271                 output_string(STRING_START_SVC_FAIL, service_display_name);
 272         }
 273         break;
 274     case NET_STOP:
 275         output_string(STRING_STOP_SVC, service_display_name);
 276         result = StopService(SCManager, serviceHandle);
 277
 278         if(result) output_string(STRING_STOP_SVC_SUCCESS, service_display_name);
 279         else
 280         {
 281             if (!output_error_string(GetLastError()))
 282                 output_string(STRING_STOP_SVC_FAIL, service_display_name);
 283         }
 284         break;
 285     }
 286
 287     CloseServiceHandle(serviceHandle);
 288     CloseServiceHandle(SCManager);
 289     return result;
 290 }
 291
 292 static BOOL arg_is(const WCHAR* str1, const WCHAR* str2)
 293 {
 294     return CompareStringW(LOCALE_USER_DEFAULT, NORM_IGNORECASE, str1, -1, str2, -1) == CSTR_EQUAL;
 295 }
 296
 297 int __cdecl wmain(int argc, const WCHAR* argv[])
 298 {
 299     static const WCHAR helpW[]={'h','e','l','p',0};
 300     static const WCHAR shelpW[]={'/','h','e','l','p',0};
 301     static const WCHAR startW[]={'s','t','a','r','t',0};
 302     static const WCHAR stopW[]={'s','t','o','p',0};
 303     static const WCHAR useW[]={'u','s','e',0};
 304
 305     if (argc < 2)
 306     {
 307         output_string(STRING_USAGE);
 308         return 1;
 309     }
 310
 311     if(arg_is(argv[1], helpW))
 312     {
 313         if(argc > 3)
 314         {
 315             output_string(STRING_USAGE);
 316             return 1;
 317         }
 318         if(argc == 2)
 319             output_string(STRING_USAGE);
 320         else if(arg_is(argv[2], startW))
 321             output_string(STRING_START_USAGE);
 322         else if(arg_is(argv[2], stopW))
 323             output_string(STRING_STOP_USAGE);
 324         else
 325             output_string(STRING_USAGE);
 326     }
 327     else if(arg_is(argv[1], startW))
 328     {
 329         if(argc > 3)
 330         {
 331             output_string(STRING_START_USAGE);
 332             return 1;
 333         }
 334         if (argc == 2)
 335         {
 336             if (!net_enum_services())
 337                 return 1;
 338         }
 339         else if(arg_is(argv[2], shelpW))
 340             output_string(STRING_START_USAGE);
 341         else if(!net_service(NET_START, argv[2]))
 342             return 1;
 343     }
 344     else if(arg_is(argv[1], stopW))
 345     {
 346         if(argc != 3)
 347         {
 348             output_string(STRING_STOP_USAGE);
 349             return 1;
 350         }
 351         if(arg_is(argv[2], shelpW))
 352             output_string(STRING_STOP_USAGE);
 353         else if(!net_service(NET_STOP, argv[2]))
 354             return 1;
 355     }
 356     else if(arg_is(argv[1], useW))
 357     {
 358         if(!net_use(argc, argv)) return 1;
 359     }
 360     else
 361         output_string(STRING_USAGE);
 362
 363     return 0;
 364 }