+++ /dev/null
-/*
- * Acess 2 Kernel
- * - By John Hodge (thePowersGang)
- * system.c
- * - Architecture Independent System Init
- */
-#define DEBUG 0
-#include <acess.h>
-
-// === IMPORTS ===
-extern void Arch_LoadBootModules(void);
-extern int Modules_LoadBuiltins(void);
-extern void Modules_SetBuiltinParams(char *Name, char *ArgString);
-extern void Debug_SetKTerminal(const char *File);
-
-// === PROTOTYPES ===
-void System_Init(char *Commandline);
-void System_ParseCommandLine(char *ArgString);
-void System_ExecuteCommandLine(void);
-void System_ParseVFS(char *Arg);
-void System_ParseModuleArgs(char *Arg);
-void System_ParseSetting(char *Arg);
-
-// === GLOBALS ===
-const char *gsInitBinary = "/Acess/SBin/init";
-char *argv[32];
- int argc;
-
-// === CODE ===
-void System_Init(char *CommandLine)
-{
- // Parse Kernel's Command Line
- System_ParseCommandLine(CommandLine);
-
- // Initialise modules
- Log_Log("Config", "Initialising builtin modules...");
- Modules_LoadBuiltins();
- Arch_LoadBootModules();
-
- System_ExecuteCommandLine();
-
- // - Execute the Config Script
- Log_Log("Config", "Spawning init '%s'", gsInitBinary);
- Proc_Spawn(gsInitBinary);
-
- // Set the debug to be echoed to the terminal
- Log_Log("Config", "Kernel now echoes to VT7 (Ctrl-Alt-F8)");
- Debug_SetKTerminal("/Devices/VTerm/7");
-}
-
-/**
- * \fn void System_ParseCommandLine(char *ArgString)
- * \brief Parses the kernel's command line and sets the environment
- */
-void System_ParseCommandLine(char *ArgString)
-{
- int i;
- char *str;
-
- Log_Log("Config", "Kernel Invocation (%p) \"%s\"", ArgString, ArgString);
-
- // --- Get Arguments ---
- str = ArgString;
- for( argc = 0; argc < 32; argc++ )
- {
- // Eat Whitespace
- while(*str == ' ') str++;
- // Check for the end of the string
- if(*str == '\0') { argc--; break;}
- argv[argc] = str;
- if(*str == '"') {
- while(*str && !(*str == '"' && str[-1] != '\\'))
- str ++;
- }
- else {
- while(*str && *str != ' ')
- str++;
- }
- if(*str == '\0') break; // Check for EOS
- *str = '\0'; // Cap off argument string
- str ++; // and increment the string pointer
- }
- if(argc < 32)
- argc ++; // Count last argument
-
- // --- Parse Arguments (Pass 1) ---
- for( i = 1; i < argc; i++ )
- {
- switch(argv[i][0])
- {
- // --- VFS ---
- // Ignored on this pass
- case '/':
- break;
-
- // --- Module Paramaters ---
- // -VTerm:Width=640,Height=480,Scrollback=2
- case '-':
- System_ParseModuleArgs( argv[i] );
- break;
- // --- Config Options ---
- // SCRIPT=/Acess/Conf/BootConf.cfg
- default:
- System_ParseSetting( argv[i] );
- break;
- }
- }
-}
-
-void System_ExecuteCommandLine(void)
-{
- int i;
- if(argc > 0)
- LOG("Invocation '%s'", argv[0]);
- for( i = 1; i < argc; i++ )
- {
- LOG("argv[%i] = '%s'", i, argv[i]);
- switch(argv[i][0])
- {
- // --- VFS ---
- // Mount /System=ext2:/Devices/ATA/A1
- // Symlink /Acess=/System/Acess2
- case '/':
- System_ParseVFS( argv[i] );
- break;
- }
- }
-}
-
-/**
- * \fn void System_ParseVFS(char *Arg)
- */
-void System_ParseVFS(char *Arg)
-{
- char *value;
- int fd;
-
- value = Arg;
- // Search for the '=' token
- while( *value && *value != '=' )
- value++;
-
- // Check if the equals was found
- if( *value == '\0' ) {
- Log_Warning("Config", "Expected '=' in the string '%s'", Arg);
- return ;
- }
-
- // Edit string
- *value = '\0'; value ++;
-
- // Check assignment type
- // - Symbolic Link <link>=<destination>
- if(value[0] == '/')
- {
- Log_Log("Config", "Symbolic link '%s' pointing to '%s'", Arg, value);
- VFS_Symlink(Arg, value);
- }
- // - Mount <mountpoint>=<fs>:<device>
- else
- {
- char *dev = value;
- // Find colon
- while(*dev && *dev != ':') dev++;
- if(*dev) {
- *dev = '\0';
- dev++; // Eat ':'
- }
- // Create Mountpoint
- if( (fd = VFS_Open(Arg, 0)) == -1 ) {
- Log_Log("Config", "Creating directory '%s'", Arg, value);
- VFS_MkDir( Arg );
- } else {
- VFS_Close(fd);
- }
- // Mount
- Log_Log("Config", "Mounting '%s' to '%s' ('%s')", dev, Arg, value);
- VFS_Mount(dev, Arg, value, "");
- }
-}
-
-/**
- * \brief Parse a module argument string
- * \param Arg Argument string
- */
-void System_ParseModuleArgs(char *Arg)
-{
- char *name, *args;
- int i;
-
- // Remove '-'
- name = Arg + 1;
-
- // Find the start of the args
- i = strpos(name, ':');
- if( i == -1 ) {
- Log_Warning("Config", "Module spec with no arguments");
- #if 1
- return ;
- #else
- i = strlen(name);
- args = name + i;
- #endif
- }
- else {
- name[i] = '\0';
- args = name + i + 1;
- }
-
- Log_Log("Config", "Setting boot parameters for '%s' to '%s'", name, args);
- Modules_SetBuiltinParams(name, args);
-}
-
-/**
- * \fn void System_ParseSetting(char *Arg)
- */
-void System_ParseSetting(char *Arg)
-{
- char *value;
- value = Arg;
-
- // Search for the '=' token
- while( *value && *value != '=' )
- value++;
-
- // Check for boolean/flag (no '=')
- if(*value == '\0')
- {
- //if(strcmp(Arg, "") == 0) {
- //} else {
- Log_Warning("Config", "Kernel flag '%s' is not recognised", Arg);
- //}
- }
- else
- {
- *value = '\0'; // Remove '='
- value ++; // and eat it's position
-
- if(strcmp(Arg, "INIT") == 0) {
- Log_Log("Config", "Init binary: '%s'", value);
- if(strlen(value) == 0)
- gsInitBinary = NULL;
- else
- gsInitBinary = value;
- }
- else {
- Log_Warning("Config", "Kernel config setting '%s' is not recognised", Arg);
- }
-
- }
-}
-
git.ucc.asn.au / tpg / acess2.git / blobdiff
UCC git Repository :: git.ucc.asn.au