src/libcaptive/client/init.c

   1 /* $Id$
   2  * Init and cleanup code of libcaptive to be called by client application
   3  * Copyright (C) 2002 Jan Kratochvil <project-captive@jankratochvil.net>
   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; exactly version 2 of June 1991 is required
   8  *
   9  * This program 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
  12  * GNU 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  02111-1307  USA
  17  */
  18
  19
  20 #include "config.h"
  21
  22 #include "captive/client.h"     /* self */
  23 #include "captive/ldr.h"
  24 #include "captive/ldr_exports.h"
  25 #include "captive/unicode.h"
  26 #include "captive/rtl-file.h"
  27 #include <glib/gtypes.h>
  28 #include <glib/gmessages.h>
  29 #include "reactos/internal/ldr.h"
  30 #include "reactos/napi/types.h"
  31 #include "reactos/internal/kd.h"        /* for KDB_LOADDRIVER_HOOK */
  32 #include <fcntl.h>
  33 #include <sys/mman.h>   /* for PROT_READ, MAP_SHARED */
  34 #include "reactos/ddk/kefuncs.h"        /* for KeInitializeSpinLock() */
  35 #include "reactos/internal/ntoskrnl.h"  /* for RtlpInitNlsTables() and IoInit() */
  36 #include "reactos/internal/ps.h"        /* for PsInitProcessManagment() and PsInitThreadManagment() */
  37 #include "reactos/ddk/iofuncs.h"        /* for IoCreateFile() */
  38 #include "captive/storage.h"
  39 #include "captive/signal.h"     /* for captive_signal_init() */
  40 #include "reactos/ddk/psfuncs.h"        /* for PsGetCurrentThread() */
  41 #include <stdio.h>
  42 #include <popt.h>
  43 #include <glib/gstrfuncs.h>
  44 #include <glib/glist.h>
  45 #include <glib/gutils.h>        /* for g_atexit() */
  46 #include "giochannel-blind.h"
  47 #include <glib-object.h>
  48 #include "reactos/internal/se.h"        /* for SeInit2() */
  49
  50
  51 /* Are we initialized? */
  52 static gboolean active;
  53
  54 /* Module of fs module itself loaded by captive_w32_init() */
  55 static PMODULE_OBJECT ModuleObject;
  56
  57 /* Driver in fs module loaded by captive_w32_init() */
  58 DRIVER_OBJECT captive_DriverObject;
  59 PDRIVER_REINITIALIZE captive_DriverObject_ReinitRoutine;
  60 PVOID captive_DriverObject_ReinitRoutine_Context;
  61
  62 /* Structure holding the pointer to the toplevel IRP */
  63 static TOP_LEVEL_IRP TopLevelIrp;       /* TODO:thread */
  64
  65
  66 gchar *captive_option_filesystem;
  67 enum captive_option_rwmode captive_option_rwmode=CAPTIVE_OPTION_RWMODE_BLIND;
  68 enum captive_option_media captive_option_media=CAPTIVE_OPTION_MEDIA_DISK;
  69 gboolean captive_debug_messages=FALSE;
  70 GIOChannel *captive_image_iochannel;
  71 /* Non-blinded original GIOChannel for flushing during shutdown. */
  72 static GIOChannel *captive_image_iochannel_orig;
  73 guint64 captive_image_size;
  74 static GList *captive_load_module;
  75
  76
  77 static gchar *captive_popt_optarg;
  78
  79
  80 static void arg_filesystem(void)
  81 {
  82         g_free(captive_option_filesystem);
  83         captive_option_filesystem=g_strdup(captive_popt_optarg);
  84 }
  85
  86 static void arg_load_module(void)
  87 {
  88         captive_load_module=g_list_append(captive_load_module,g_strdup(captive_popt_optarg));
  89 }
  90
  91 static void arg_ro(void)
  92 {
  93         captive_option_rwmode=CAPTIVE_OPTION_RWMODE_RO;
  94 }
  95 static void arg_blind(void)
  96 {
  97         captive_option_rwmode=CAPTIVE_OPTION_RWMODE_BLIND;
  98 }
  99 static void arg_rw(void)
 100 {
 101         captive_option_rwmode=CAPTIVE_OPTION_RWMODE_RW;
 102 }
 103
 104 static void arg_cdrom(void)
 105 {
 106         captive_option_media=CAPTIVE_OPTION_MEDIA_CDROM;
 107 }
 108 static void arg_disk(void)
 109 {
 110         captive_option_media=CAPTIVE_OPTION_MEDIA_DISK;
 111 }
 112
 113 static void arg_debug_messages(void)
 114 {
 115         captive_debug_messages=TRUE;
 116 }
 117
 118
 119 static void captive_popt_callback
 120                 (poptContext con,enum poptCallbackReason reason,const struct poptOption *opt,const char *arg,const void *data);
 121
 122 const struct poptOption captive_popt[]={
 123                 { argInfo:POPT_ARG_INTL_DOMAIN, arg:(void *)PACKAGE },
 124                 { argInfo:POPT_ARG_CALLBACK,    arg:(void *)captive_popt_callback },
 125 #define POPT_OFFSET 2
 126 #define CAPTIVE_POPT(longname,argInfoP,argP,descripP,argDescripP) \
 127                 { \
 128                         longName: (longname), \
 129                         shortName: 0, \
 130                         argInfo: (argInfoP), \
 131                         arg: (void *)argP, \
 132                         val: 0, \
 133                         descrip: (descripP), \
 134                         argDescrip: (argDescripP), \
 135                 }
 136 #define CAPTIVE_POPT_STRING(longname,descripP,argDescripP) \
 137                 CAPTIVE_POPT(longname,POPT_ARG_STRING,&captive_popt_optarg,descripP,argDescripP)
 138 #define CAPTIVE_POPT_NONE(longname,descripP) \
 139                 CAPTIVE_POPT(longname,POPT_ARG_NONE  ,NULL                ,descripP,NULL       )
 140
 141                 CAPTIVE_POPT_STRING("filesystem"    ,N_("Path to .sys or .so filesystem module file"),N_("pathname")),
 142                 CAPTIVE_POPT_STRING("load-module"   ,N_("Path to any W32 module to load w/o initialization"),N_("pathname")),
 143                 CAPTIVE_POPT_NONE(  "ro"            ,N_("Read/write mode: Any write access will be forbidden")),
 144                 CAPTIVE_POPT_NONE(  "blind"         ,N_("Read/write mode: All writes are just simulated in memory (default)")),
 145                 CAPTIVE_POPT_NONE(  "rw"            ,N_("Read/write mode: Write directly to the image file/device")),
 146                 CAPTIVE_POPT_NONE(  "cdrom"         ,N_("Media type: CD-ROM")),
 147                 CAPTIVE_POPT_NONE(  "disk"          ,N_("Media type: Disk (default)")),
 148                 CAPTIVE_POPT_NONE(  "debug-messages",N_("Turn on debugging messages")),
 149
 150 #undef CAPTIVE_POPT_NONE
 151 #undef CAPTIVE_POPT_STRING
 152 #undef CAPTIVE_POPT
 153                 POPT_TABLEEND
 154                 };
 155
 156 static const struct poptOption captive_popt_standalone[]={
 157                 CAPTIVE_POPT_INCLUDE,
 158                 POPT_AUTOHELP
 159                 POPT_TABLEEND
 160                 };
 161
 162
 163 static void (*const popt_func_table[])(void)={
 164                 arg_filesystem,
 165                 arg_load_module,
 166                 arg_ro,
 167                 arg_blind,
 168                 arg_rw,
 169                 arg_cdrom,
 170                 arg_disk,
 171                 arg_debug_messages,
 172                 };
 173
 174
 175 /* poptCallbackType captive_popt_callback */
 176 static void captive_popt_callback
 177                 (poptContext con,enum poptCallbackReason reason,const struct poptOption *opt,const char *arg,const void *data)
 178 {
 179 gint funci;
 180
 181         g_return_if_fail(reason==POPT_CALLBACK_REASON_OPTION);
 182
 183         funci=(opt-(captive_popt+POPT_OFFSET));
 184         g_return_if_fail(funci>=0);
 185         g_return_if_fail(funci<(gint)G_N_ELEMENTS(popt_func_table));
 186         if (popt_func_table[funci])
 187                 (*popt_func_table[funci])();
 188         free(captive_popt_optarg);
 189         captive_popt_optarg=NULL;       /* sanity, shouldn't be needed */
 190 }
 191
 192
 193 static gboolean captive_w32_init(void)
 194 {
 195 NTSTATUS err;
 196 gboolean errbool;
 197 GIOStatus erriostatus;
 198
 199         g_return_val_if_fail(captive_option_filesystem!=NULL,FALSE);
 200
 201         erriostatus=g_io_channel_set_encoding(captive_image_iochannel,
 202                         NULL,   /* encoding; force binary data */
 203                         NULL);  /* error */
 204         g_assert(erriostatus==G_IO_STATUS_NORMAL);
 205
 206         /* captive_giochannel_size() only _after_ g_io_channel_set_encoding() ! */
 207         captive_image_size=captive_giochannel_size(captive_image_iochannel);
 208         g_return_val_if_fail(captive_image_size>0,FALSE);
 209
 210         /* Part of reactos/ntoskrnl/ke/main.c/KiSystemStartup() begins. */
 211         /* ExpInitializeExecutive(); */
 212                 /* Part of reactos/ntoskrnl/ke/main.c/ExpInitializeExecutive() begins
 213                  * here as the rest of the function does a lot of hardware initializations.
 214                  */
 215                 /* LdrInit1(); */
 216                         /* Part of reactos/ntoskrnl/ldr/loader.c/LdrInit1() begins. */
 217                         InitializeListHead(&ModuleTextListHead);
 218                         /* Part of reactos/ntoskrnl/ldr/loader.c/LdrInit1() ends. */
 219                 KeLowerIrql(DISPATCH_LEVEL);
 220                 /*...*/
 221                 /* create default nls tables */
 222                 RtlpInitNlsTables();
 223                 /*...*/
 224                 /* KeInit2() */
 225                         /*...*/
 226                         KeInitializeDispatcher();
 227                         /*...*/
 228                 KeLowerIrql(PASSIVE_LEVEL);
 229                 errbool=SeInit1();
 230                 g_assert(errbool==TRUE);
 231                 ObInit();
 232                 errbool=SeInit2();
 233                 g_assert(errbool==TRUE);
 234                 /* PiInitProcessManager(); */
 235                         /* Part of reactos/ntoskrnl/ps/psmgr.c/PiInitProcessManager() begins. */
 236                         PsInitProcessManagment();
 237                         PsInitThreadManagment();
 238                         /* Part of reactos/ntoskrnl/ps/psmgr.c/PiInitProcessManager() ends. */
 239                 /*...*/
 240                 IoInit();
 241                 /*...*/
 242                 /* LdrInitModuleManagement(); */
 243                         /* Part of reactos/ntoskrnl/ldr/loader.c/LdrInitModuleManagement() begins
 244                          * here as the rest "Create module object for {NTOSKRNL,HAL}"
 245                          * is dependent on {NTOSKRNL,HAL} PE image headers not provided by libcaptive.
 246                          */
 247                         /* Initialize the module list and spinlock */
 248                         InitializeListHead(&ModuleListHead);
 249                         KeInitializeSpinLock(&ModuleListLock);
 250                         /* Part of reactos/ntoskrnl/ldr/loader.c/LdrInitModuleManagement ends. */
 251                 /*...*/
 252                 /* Ntinit(); */
 253                         NtInitializeEventImplementation();
 254                         /*...*/
 255                 /* Part of reactos/ntoskrnl/ke/main.c/ExpInitializeExecutive() ends. */
 256         /* Part of reactos/ntoskrnl/ke/main.c/KiSystemStartup() ends. */
 257
 258         /* Simulate our PE headers and export the symbols of our complete libraries */
 259         captive_kernel_exports();
 260
 261         errbool=captive_cdrom_init();
 262         g_return_val_if_fail(errbool==TRUE,FALSE);
 263         errbool=captive_disk_init();
 264         g_return_val_if_fail(errbool==TRUE,FALSE);
 265
 266         while (captive_load_module) {
 267 gchar *modulename=captive_load_module->data;
 268 PMODULE_OBJECT ModuleObject_tmp;
 269 NTSTATUS err;
 270
 271                 /* load the module */
 272                 err=LdrLoadModule(
 273                                 captive_utf8_to_UnicodeString_alloca(modulename),       /* ModuleName */
 274                                 &ModuleObject_tmp);     /* ModuleObjectp */
 275                 g_return_val_if_fail(NT_SUCCESS(err),FALSE);
 276
 277                 captive_load_module=g_list_remove(captive_load_module,modulename);
 278                 }
 279
 280         /* Patch 'ntoskrnl.exe' loaded by 'captive_load_module' above. */
 281         captive_kernel_patches();
 282
 283         /* Initialize 'FsRtlLegalAnsiCharacterArray'.
 284          * It requires 'ntoskrnl.exe' loaded by 'captive_load_module' above;
 285          * captive_kernel_patches() should not be needed.
 286          */
 287         captive_FsRtlLegalAnsiCharacterArray_init();
 288
 289         /* set TopLevelIrp() - FIXME: where is it set by native reactos? */
 290         PsGetCurrentThread()->TopLevelIrp=&TopLevelIrp; /* otherwise Io{Get,Set}TopLevelIrp() would SIGSEGV */
 291
 292         /* Begin possible handling of foreign W32 binary code here */
 293         /* If you want to disable SIGSEGV handler if not needed:
 294          *      if (ModuleObject->Flags & MODULE_FLAG_PE)
 295          */
 296         captive_signal_init();
 297
 298         /* You must have already captive_signal_init() passed here as the module may
 299          * call some functions from W32 ntoskrnl.exe.
 300          */
 301         captive_DriverObject_ReinitRoutine=NULL;
 302         err=captive_LdrpLoadAndCallImage(
 303                         &ModuleObject,  /* ModuleObjectp */
 304                         captive_utf8_to_UnicodeString_alloca(captive_option_filesystem),        /* ModuleName */
 305                         &captive_DriverObject,  /* DriverEntry_DriverObject */
 306                         captive_utf8_to_UnicodeString_alloca("\\captive\\filesystem")); /* DriverEntry_RegistryPath */
 307         g_return_val_if_fail(NT_SUCCESS(err),FALSE);
 308         if (captive_DriverObject_ReinitRoutine) {
 309                 (*captive_DriverObject_ReinitRoutine)(
 310                                 &captive_DriverObject,  /* DriverObject */
 311                                 captive_DriverObject_ReinitRoutine_Context,     /* Context */
 312                                 1);     /* Count: # of calls of ReinitRoutine incl. the current one */
 313                 }
 314
 315         return TRUE;
 316 }
 317
 318
 319 static void captive_shutdown_atexit(void);
 320
 321
 322 static void     log_discard_func(const gchar *log_domain,GLogLevelFlags log_level,const gchar *message,gpointer user_data)
 323 {
 324         /* NOP */
 325 }
 326
 327
 328 /**
 329  * captive_init:
 330  * @captive_args: String with possible options to parse by popt.
 331  * %NULL value is permitted.
 332  * @image_iochannel: Host OS file of the disk image to mount.
 333  * %NULL value is permitted (initialization would not apply in such case).
 334  *
 335  * Initializes %libcaptive and loads the specified filesystem.
 336  * You can supply %NULL value for @image_iochannel - in such case no library
 337  * initialization is done; only passed @captive_args are parsed. Function
 338  * will return you %FALSE value as it is not yet initializied.
 339  *
 340  * You should supply only @captive_args with %NULL @image_iochannel if you
 341  * need to parse+examine the arguments to properly initialize @image_iochannel.
 342  *
 343  * Returns: %TRUE if successfuly initialized.
 344  */
 345 gboolean captive_init(const gchar *captive_args,GIOChannel *image_iochannel)
 346 {
 347 gboolean errbool;
 348 int errint;
 349
 350 #ifdef MAINTAINER_MODE
 351         g_log_set_always_fatal(~(0
 352                         |G_LOG_LEVEL_MESSAGE
 353                         |G_LOG_LEVEL_INFO
 354                         |G_LOG_LEVEL_DEBUG
 355                         ));
 356 #endif
 357
 358         g_return_val_if_fail(active==FALSE,FALSE);
 359
 360         /* Initialize GObject subsystem of GLib. */
 361         g_type_init();
 362
 363         /* (optionally) parse the given 'captive_args' string */
 364         if (captive_args) {
 365 int captive_args_argc;
 366 const char **captive_args_argv=NULL;
 367 poptContext context;
 368 gboolean r=FALSE;
 369
 370                 errint=poptParseArgvString(captive_args,&captive_args_argc,&captive_args_argv);
 371                 if (errint!=0) {
 372                         g_assert_not_reached(); /* argument parsing args_error */
 373                         goto args_err;
 374                         }
 375                 context=poptGetContext(
 376                                 PACKAGE,        /* name */
 377                                 captive_args_argc,captive_args_argv,    /* argc,argv */
 378                                 captive_popt_standalone,        /* options */
 379                                 POPT_CONTEXT_KEEP_FIRST);
 380                 if (context==NULL) {
 381                         g_assert_not_reached(); /* argument recognization args_error */
 382                         goto args_err_argv;
 383                         }
 384                 errint=poptReadDefaultConfig(context,
 385                                 TRUE);  /* useEnv */
 386                 if (errint!=0) {
 387                         g_assert_not_reached(); /* argument recognization args_error */
 388                         goto args_err_context;
 389                         }
 390                 errint=poptGetNextOpt(context);
 391                 if (errint!=-1) {
 392                         g_assert_not_reached(); /* some non-callbacked argument reached */
 393                         goto args_err_context;
 394                         }
 395                 if (poptPeekArg(context)) {
 396                         g_assert_not_reached(); /* some non-"--"-prefixed argument reached */
 397                         goto args_err_context;
 398                         }
 399                 r=TRUE; /* success */
 400 args_err_context:
 401                 poptFreeContext(context);
 402 args_err_argv:
 403                 free(captive_args_argv);        /* may be NULL here */
 404 args_err:
 405                 if (!r) {
 406                         puts("FIXME: HELP HERE");
 407                         g_return_val_if_reached(r);
 408                         }
 409                 }
 410
 411         /* If we were just requested to parse the arguments. */
 412         if (!image_iochannel)
 413                 return FALSE;
 414
 415         if (!captive_debug_messages) {
 416                 g_log_set_handler(
 417                                 G_LOG_DOMAIN,   /* log_domain; "Captive" */
 418                                 0       /* log_levels */
 419                                                 | G_LOG_FLAG_RECURSION
 420                                                 | G_LOG_FLAG_FATAL
 421                                                 | G_LOG_LEVEL_MESSAGE
 422                                                 | G_LOG_LEVEL_INFO
 423                                                 | G_LOG_LEVEL_DEBUG,
 424                                 log_discard_func,       /* log_func */
 425                                 NULL);  /* user_data */
 426                 }
 427
 428         if (captive_option_rwmode==CAPTIVE_OPTION_RWMODE_BLIND)
 429                 captive_image_iochannel=(GIOChannel *)captive_giochannel_blind_new(image_iochannel);
 430         else
 431                 captive_image_iochannel=image_iochannel;
 432         captive_image_iochannel_orig=image_iochannel;
 433
 434         /* Do not initialize 'captive_image_size' by captive_giochannel_size() here
 435          * as we yet need to do g_io_channel_set_encoding().
 436          */
 437
 438         errbool=captive_w32_init();
 439         g_return_val_if_fail(errbool==TRUE,FALSE);
 440
 441         g_atexit(captive_shutdown_atexit);
 442
 443         active=TRUE;
 444         return TRUE;
 445 }
 446
 447
 448 /**
 449  * captive_shutdown:
 450  *
 451  * Closes down %libcaptive. It should flush all pending buffers and successfuly
 452  * close the filesystem. Variable #captive_image_iochannel will be set to %NULL,
 453  * you should close such channel yourself.
 454  *
 455  * Returns: %TRUE if successfuly shutdown.
 456  */
 457 gboolean captive_shutdown(void)
 458 {
 459 GIOStatus erriostatus;
 460
 461         g_return_val_if_fail(active==TRUE,FALSE);
 462         g_return_val_if_fail(captive_image_iochannel!=NULL,FALSE);
 463
 464         captive_PoQueueShutdownWorkItem_hooklist_invoke();
 465
 466         /* FIXME: ntoskrnl/ex/power.c/NtShutdownSystem() does
 467          * IoShutdownRegistered{Devices,FileSystems} order; is it correct?
 468          */
 469         IoShutdownRegisteredFileSystems();
 470         IoShutdownRegisteredDevices();
 471
 472         /* libcaptive is not authorized to shutdown 'captive_image_channel'. */
 473         erriostatus=g_io_channel_flush(
 474                         captive_image_iochannel,        /* channel */
 475                         NULL);  /* error */
 476         g_assert(erriostatus==G_IO_STATUS_NORMAL);
 477
 478         /* 'captive_image_iochannel' may be blinded wrapper. */
 479         if (captive_image_iochannel!=captive_image_iochannel_orig) {
 480                 erriostatus=g_io_channel_flush(
 481                                 captive_image_iochannel_orig,   /* channel */
 482                                 NULL);  /* error */
 483                 g_assert(erriostatus==G_IO_STATUS_NORMAL);
 484                 }
 485
 486         captive_image_iochannel=NULL;
 487
 488         active=FALSE;
 489         return TRUE;
 490 }
 491
 492
 493 static void captive_shutdown_atexit(void)
 494 {
 495         if (active)
 496                 captive_shutdown();
 497 }