wok-6.x annotate linld/stuff/src/LINLD.CPP @ rev 20528

linld: pascal convention calls
author Pascal Bellard <pascal.bellard@slitaz.org>
date Fri Nov 09 16:37:55 2018 +0100 (2018-11-09)
parents 46b511e941a7
children ab907169f156
rev   line source
pascal@19515 1 // This file is distributed under GPL
pascal@19515 2 //
pascal@19515 3 // LINLD main() lives here
pascal@19515 4
pascal@19515 5 #include "crtl.h"
pascal@19515 6 #include "common.h"
pascal@19515 7
pascal@19515 8 const char* kernel_name = "bzImage";
pascal@19515 9 const char* initrd_name;
pascal@19515 10 const char* cmdline = "auto";
pascal@20528 11 u32 root_dev;
pascal@20528 12 u32 vid_mode; // -3 = ask
pascal@20528 13 // -2 = Extended VGA
pascal@20528 14 // -1 = Normal VGA
pascal@20528 15 // n = as "n" was pressed
pascal@20528 16 u32 topmem;
pascal@19515 17
pascal@19515 18 inline void syntax() {
pascal@19515 19 die("Syntax:" NL
pascal@19515 20 "LINLD [image=file] [initrd=files] [vga=mode] [root=num] [mem=max] [cl=cmdline]" NL
pascal@19515 21 "vga mode: ask,extended,normal or dec/oct/hex number" NL
pascal@19538 22 "-f force" NL
pascal@19515 23 "Defaults:" NL
pascal@19515 24 "\timage=bzImage" NL
pascal@19515 25 "\tinitrd,vga,root=(void)" NL
pascal@19515 26 "\tmem=256m" NL
pascal@19515 27 "\tcl=auto" NL
pascal@19580 28 "\t-b 1088k" NL
pascal@19515 29 "Use quotes: \"cl=...\" if you need spaces in cmdline" NL
pascal@19538 30 "Use cl=@filename to get it from a file"
pascal@19515 31 #if 1
pascal@19515 32 NL NL "Examples:" NL
pascal@20451 33 "\tLINLD -f -b 64m initrd=rootfs4.gz,rootfs3.gz,rootfs2.gz,rootfs1.gz \"cl=rw root=/dev/null video=-32\""
pascal@20451 34 NL NL "\tLINLD image=memtest"
pascal@19515 35 #endif
pascal@19515 36 );
pascal@19515 37 }
pascal@19515 38
pascal@20453 39 static char buf_cmdline[128];
pascal@19515 40 int main(int argc, char *argv[]) {
pascal@19571 41
pascal@19571 42 (void) argc;
pascal@19571 43
pascal@19515 44 // Believe it or not - this enables A20
pascal@19515 45 // on my box! Must be DOS in HMA... -vda
pascal@19515 46 puts("LINLD v" VERSION_STR "+");
pascal@19515 47
pascal@19538 48 // Parse command line
pascal@19571 49 if (argv[1]) {for (char i=0;;) {
pascal@19571 50 char *s;
pascal@19580 51 next:
pascal@19571 52 argv++;
pascal@19571 53 s=*argv;
pascal@19538 54 i++;
pascal@19538 55 if (!s) {
pascal@19538 56 puts(load_kernel());
pascal@19538 57 load_initrd();
pascal@19538 58 boot_kernel();
pascal@19538 59 }
pascal@19515 60 if(strhead(s,"image=") == 0) {
pascal@19538 61 s+=6;
pascal@19825 62 set_kernel_name:
pascal@19538 63 kernel_name=s;
pascal@19515 64 }
pascal@19515 65 else if(strhead(s,"initrd=") == 0) {
pascal@19538 66 s+=7;
pascal@19538 67 initrd_name=s;
pascal@19538 68 }
pascal@19538 69 else if(strhead(s,"vga=") == 0) {
pascal@19538 70 s+=4;
pascal@19538 71 vid_mode = strtol(s); // support normal, extended & ask
pascal@19515 72 }
pascal@19580 73 else switch (*(u16 *)s|0x2002) {
pascal@19580 74 case 0x662F: // -F /f
pascal@19580 75 skip_alloc++;
pascal@19580 76 goto next;
pascal@19580 77 case 0x622F: // -B /b
pascal@19580 78 argv++;
pascal@19580 79 base_himem = strtol(*argv);
pascal@19580 80 goto next;
pascal@19580 81 default:
pascal@19580 82 if(strhead(s,"cl=") == 0) {
pascal@19538 83 cmdline=s+=3;
pascal@19538 84 if (*s == '@') {
pascal@19538 85 static struct image_himem image;
pascal@19538 86 char c;
pascal@19538 87
pascal@19538 88 s++;
pascal@19538 89 image.errmsg = "Error in cl=@file";
pascal@19538 90 open_image(s, &image);
pascal@19538 91 cmdline=s=(char *)malloc_or_die(image.size);
pascal@19538 92 s+=image.size;
pascal@19538 93 read(image.fd, (void *)cmdline, image.size);
pascal@19538 94 // Strip any trailing cr/lf
pascal@19538 95 c='\0';
pascal@19538 96 do {
pascal@19538 97 // Replace all other cr/lfs with spaces
pascal@19538 98 s--;
pascal@19538 99 if(*s>=' ') c=' ';
pascal@19538 100 else *s = c;
pascal@19538 101 } while (s>cmdline);
pascal@19515 102 puts("Kernel command line:");
pascal@19515 103 puts(cmdline);
pascal@19515 104 }
pascal@19515 105 }
pascal@19515 106 else if(strhead(s,"root=") == 0) {
pascal@19538 107 s+=5;
pascal@19538 108 root_dev = strtol(s);
pascal@19538 109 goto addincmdline;
pascal@19515 110 }
pascal@19515 111 else if(strhead(s,"mem=") == 0) {
pascal@19538 112 s+=4;
pascal@19538 113 topmem = strtol(s);
pascal@19538 114 goto addincmdline;
pascal@19515 115 }
pascal@20453 116 else if(cmdline == (const char *) buf_cmdline + 1) {
pascal@19538 117 addincmdline:
pascal@20453 118 strcatb(buf_cmdline,*argv);
pascal@19515 119 }
pascal@19538 120 else if(i == 1 && fileattr(s) != -1) {
pascal@20453 121 cmdline = (const char *) buf_cmdline + 1;
pascal@19825 122 goto set_kernel_name;
pascal@19538 123 }
pascal@19538 124 else
pascal@19571 125 break;
pascal@19580 126 }
pascal@19515 127 }}
pascal@19571 128 syntax();
pascal@19515 129
pascal@19515 130 // Let compiler be happy
pascal@19571 131 return _AX;
pascal@19515 132 }