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                 KeLowerIrql(PASSIVE_LEVEL);
 225                 errbool=SeInit1();
 226                 g_assert(errbool==TRUE);
 227                 ObInit();
 228                 errbool=SeInit2();
 229                 g_assert(errbool==TRUE);
 230                 /* PiInitProcessManager(); */
 231                         /* Part of reactos/ntoskrnl/ps/psmgr.c/PiInitProcessManager() begins. */
 232                         PsInitProcessManagment();
 233                         PsInitThreadManagment();
 234                         /* Part of reactos/ntoskrnl/ps/psmgr.c/PiInitProcessManager() ends. */
 235                 /*...*/
 236                 IoInit();
 237                 /*...*/
 238                 /* LdrInitModuleManagement(); */
 239                         /* Part of reactos/ntoskrnl/ldr/loader.c/LdrInitModuleManagement() begins
 240                          * here as the rest "Create module object for {NTOSKRNL,HAL}"
 241                          * is dependent on {NTOSKRNL,HAL} PE image headers not provided by libcaptive.
 242                          */
 243                         /* Initialize the module list and spinlock */
 244                         InitializeListHead(&ModuleListHead);
 245                         KeInitializeSpinLock(&ModuleListLock);
 246                         /* Part of reactos/ntoskrnl/ldr/loader.c/LdrInitModuleManagement ends. */
 247                 /* Part of reactos/ntoskrnl/ke/main.c/ExpInitializeExecutive() ends. */
 248         /* Part of reactos/ntoskrnl/ke/main.c/KiSystemStartup() ends. */
 249
 250         /* Simulate our PE headers and export the symbols of our complete libraries */
 251         captive_kernel_exports();
 252
 253         errbool=captive_cdrom_init();
 254         g_return_val_if_fail(errbool==TRUE,FALSE);
 255         errbool=captive_disk_init();
 256         g_return_val_if_fail(errbool==TRUE,FALSE);
 257
 258         while (captive_load_module) {
 259 gchar *modulename=captive_load_module->data;
 260 PMODULE_OBJECT ModuleObject_tmp;
 261 NTSTATUS err;
 262
 263                 /* load the module */
 264                 err=LdrLoadModule(
 265                                 captive_utf8_to_UnicodeString_alloca(modulename),       /* ModuleName */
 266                                 &ModuleObject_tmp);     /* ModuleObjectp */
 267                 g_return_val_if_fail(NT_SUCCESS(err),FALSE);
 268
 269                 captive_load_module=g_list_remove(captive_load_module,modulename);
 270                 }
 271
 272         /* Patch 'ntoskrnl.exe' loaded by 'captive_load_module' above. */
 273         captive_kernel_patches();
 274
 275         /* Initialize 'FsRtlLegalAnsiCharacterArray'.
 276          * It requires 'ntoskrnl.exe' loaded by 'captive_load_module' above;
 277          * captive_kernel_patches() should not be needed.
 278          */
 279         captive_FsRtlLegalAnsiCharacterArray_init();
 280
 281         /* set TopLevelIrp() - FIXME: where is it set by native reactos? */
 282         PsGetCurrentThread()->TopLevelIrp=&TopLevelIrp; /* otherwise Io{Get,Set}TopLevelIrp() would SIGSEGV */
 283
 284         /* Begin possible handling of foreign W32 binary code here */
 285         /* If you want to disable SIGSEGV handler if not needed:
 286          *      if (ModuleObject->Flags & MODULE_FLAG_PE)
 287          */
 288         captive_signal_init();
 289
 290         /* You must have already captive_signal_init() passed here as the module may
 291          * call some functions from W32 ntoskrnl.exe.
 292          */
 293         captive_DriverObject_ReinitRoutine=NULL;
 294         err=captive_LdrpLoadAndCallImage(
 295                         &ModuleObject,  /* ModuleObjectp */
 296                         captive_utf8_to_UnicodeString_alloca(captive_option_filesystem),        /* ModuleName */
 297                         &captive_DriverObject,  /* DriverEntry_DriverObject */
 298                         captive_utf8_to_UnicodeString_alloca("\\captive\\filesystem")); /* DriverEntry_RegistryPath */
 299         g_return_val_if_fail(NT_SUCCESS(err),FALSE);
 300         if (captive_DriverObject_ReinitRoutine) {
 301                 (*captive_DriverObject_ReinitRoutine)(
 302                                 &captive_DriverObject,  /* DriverObject */
 303                                 captive_DriverObject_ReinitRoutine_Context,     /* Context */
 304                                 1);     /* Count: # of calls of ReinitRoutine incl. the current one */
 305                 }
 306
 307         return TRUE;
 308 }
 309
 310
 311 static void captive_shutdown_atexit(void);
 312
 313
 314 static void     log_discard_func(const gchar *log_domain,GLogLevelFlags log_level,const gchar *message,gpointer user_data)
 315 {
 316         /* NOP */
 317 }
 318
 319
 320 /**
 321  * captive_init:
 322  * @captive_args: String with possible options to parse by popt.
 323  * %NULL value is permitted.
 324  * @image_iochannel: Host OS file of the disk image to mount.
 325  * %NULL value is permitted (initialization would not apply in such case).
 326  *
 327  * Initializes %libcaptive and loads the specified filesystem.
 328  * You can supply %NULL value for @image_iochannel - in such case no library
 329  * initialization is done; only passed @captive_args are parsed. Function
 330  * will return you %FALSE value as it is not yet initializied.
 331  *
 332  * You should supply only @captive_args with %NULL @image_iochannel if you
 333  * need to parse+examine the arguments to properly initialize @image_iochannel.
 334  *
 335  * Returns: %TRUE if successfuly initialized.
 336  */
 337 gboolean captive_init(const gchar *captive_args,GIOChannel *image_iochannel)
 338 {
 339 gboolean errbool;
 340 int errint;
 341
 342 #ifdef MAINTAINER_MODE
 343         g_log_set_always_fatal(~(0
 344                         |G_LOG_LEVEL_MESSAGE
 345                         |G_LOG_LEVEL_INFO
 346                         |G_LOG_LEVEL_DEBUG
 347                         ));
 348 #endif
 349
 350         g_return_val_if_fail(active==FALSE,FALSE);
 351
 352         /* Initialize GObject subsystem of GLib. */
 353         g_type_init();
 354
 355         /* (optionally) parse the given 'captive_args' string */
 356         if (captive_args) {
 357 int captive_args_argc;
 358 const char **captive_args_argv=NULL;
 359 poptContext context;
 360 gboolean r=FALSE;
 361
 362                 errint=poptParseArgvString(captive_args,&captive_args_argc,&captive_args_argv);
 363                 if (errint!=0) {
 364                         g_assert_not_reached(); /* argument parsing args_error */
 365                         goto args_err;
 366                         }
 367                 context=poptGetContext(
 368                                 PACKAGE,        /* name */
 369                                 captive_args_argc,captive_args_argv,    /* argc,argv */
 370                                 captive_popt_standalone,        /* options */
 371                                 POPT_CONTEXT_KEEP_FIRST);
 372                 if (context==NULL) {
 373                         g_assert_not_reached(); /* argument recognization args_error */
 374                         goto args_err_argv;
 375                         }
 376                 errint=poptReadDefaultConfig(context,
 377                                 TRUE);  /* useEnv */
 378                 if (errint!=0) {
 379                         g_assert_not_reached(); /* argument recognization args_error */
 380                         goto args_err_context;
 381                         }
 382                 errint=poptGetNextOpt(context);
 383                 if (errint!=-1) {
 384                         g_assert_not_reached(); /* some non-callbacked argument reached */
 385                         goto args_err_context;
 386                         }
 387                 if (poptPeekArg(context)) {
 388                         g_assert_not_reached(); /* some non-"--"-prefixed argument reached */
 389                         goto args_err_context;
 390                         }
 391                 r=TRUE; /* success */
 392 args_err_context:
 393                 poptFreeContext(context);
 394 args_err_argv:
 395                 free(captive_args_argv);        /* may be NULL here */
 396 args_err:
 397                 if (!r) {
 398                         puts("FIXME: HELP HERE");
 399                         g_return_val_if_reached(r);
 400                         }
 401                 }
 402
 403         /* If we were just requested to parse the arguments. */
 404         if (!image_iochannel)
 405                 return FALSE;
 406
 407         if (!captive_debug_messages) {
 408                 g_log_set_handler(
 409                                 G_LOG_DOMAIN,   /* log_domain; "Captive" */
 410                                 0       /* log_levels */
 411                                                 | G_LOG_FLAG_RECURSION
 412                                                 | G_LOG_FLAG_FATAL
 413                                                 | G_LOG_LEVEL_MESSAGE
 414                                                 | G_LOG_LEVEL_INFO
 415                                                 | G_LOG_LEVEL_DEBUG,
 416                                 log_discard_func,       /* log_func */
 417                                 NULL);  /* user_data */
 418                 }
 419
 420         if (captive_option_rwmode==CAPTIVE_OPTION_RWMODE_BLIND)
 421                 captive_image_iochannel=(GIOChannel *)captive_giochannel_blind_new(image_iochannel);
 422         else
 423                 captive_image_iochannel=image_iochannel;
 424         captive_image_iochannel_orig=image_iochannel;
 425
 426         /* Do not initialize 'captive_image_size' by captive_giochannel_size() here
 427          * as we yet need to do g_io_channel_set_encoding().
 428          */
 429
 430         errbool=captive_w32_init();
 431         g_return_val_if_fail(errbool==TRUE,FALSE);
 432
 433         g_atexit(captive_shutdown_atexit);
 434
 435         active=TRUE;
 436         return TRUE;
 437 }
 438
 439
 440 /**
 441  * captive_shutdown:
 442  *
 443  * Closes down %libcaptive. It should flush all pending buffers and successfuly
 444  * close the filesystem. Variable #captive_image_iochannel will be set to %NULL,
 445  * you should close such channel yourself.
 446  *
 447  * Returns: %TRUE if successfuly shutdown.
 448  */
 449 gboolean captive_shutdown(void)
 450 {
 451 GIOStatus erriostatus;
 452
 453         g_return_val_if_fail(active==TRUE,FALSE);
 454         g_return_val_if_fail(captive_image_iochannel!=NULL,FALSE);
 455
 456         captive_PoQueueShutdownWorkItem_hooklist_invoke();
 457
 458         /* FIXME: ntoskrnl/ex/power.c/NtShutdownSystem() does
 459          * IoShutdownRegistered{Devices,FileSystems} order; is it correct?
 460          */
 461         IoShutdownRegisteredFileSystems();
 462         IoShutdownRegisteredDevices();
 463
 464         /* libcaptive is not authorized to shutdown 'captive_image_channel'. */
 465         erriostatus=g_io_channel_flush(
 466                         captive_image_iochannel,        /* channel */
 467                         NULL);  /* error */
 468         g_assert(erriostatus==G_IO_STATUS_NORMAL);
 469
 470         /* 'captive_image_iochannel' may be blinded wrapper. */
 471         if (captive_image_iochannel!=captive_image_iochannel_orig) {
 472                 erriostatus=g_io_channel_flush(
 473                                 captive_image_iochannel_orig,   /* channel */
 474                                 NULL);  /* error */
 475                 g_assert(erriostatus==G_IO_STATUS_NORMAL);
 476                 }
 477
 478         captive_image_iochannel=NULL;
 479
 480         active=FALSE;
 481         return TRUE;
 482 }
 483
 484
 485 static void captive_shutdown_atexit(void)
 486 {
 487         if (active)
 488                 captive_shutdown();
 489 }