artin/llama2.c
1
0
Fork 0
mirror of https://github.com/trholding/llama2.c.git synced 2026-02-06 11:26:53 +00:00
Code Issues Packages Projects Releases Wiki Activity
ae8ea66eda
llama2.c/l2e_boot/l2e_sources/l2e/init.c
Vulcan ae8ea66eda L2E OS v0.1 "Temple DOS" Release + Various Improvements 
L2E OS v0.1 "Temple DOS" Release.
Various Improvements.
Major Makefile overhaul.
2023-10-02 19:03:18 +05:30

499 lines
14 KiB
C
Raw Blame History

#define _XOPEN_SOURCE 700
#include <math.h>
#include <ctype.h>
#include <err.h>
#include <errno.h>
#include <locale.h>
#include <signal.h>
#include <stdint.h>
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <sys/sysinfo.h>
#include <sys/time.h>
#include <sys/wait.h>
#include <time.h>
#include <unistd.h>
#include <wchar.h>
// PRINT LOGO TEXT
static char *infotext =
"\n"
" ..**********************************************.. \n"
" .*%%%%%%*******************************************%%%%%*. \n"
" .*%%%*. .*%%%*. \n"
" .%%%*. *%%% %%%%%%%%%%%%%%%%%%%%%%%%%* *%%%%%%%%%%%* *%%%* \n"
" .%%%. %%%% *%%%%%%%%%%%%%%%%%%%%%%%% *%%%%%%%%%%%%%. .%%%. \n"
" %%%* %%%% %%%% *%%% \n"
" .%%%. %%%% ******%%%%%%%%% %%%%%%%%%%%%%*. .%%%.\n"
" .%%%. %%%% %%%%%%%%%****** %%%%%%%%%%%***. .%%%.\n"
" %%%* %%%%* %%%% *%%% \n"
" .%%%*. %%%%%%%%%%%%%% %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%. .%%%. \n"
" .%%%* *%%%%%%%%%%%%* *%%%%%%%%%%%%%%%%%%%%%%%%%%%%* .*%%%. \n"
" .*%%%*. .*%%%*. \n"
" .*%%%%%%*******************************************%%%%%*. \n"
" ..**********************************************.. \n"
"\n"
" so much depends glazed with rain \n"
" upon water \n"
"\n"
" a red wheel beside the white \n"
" barrow chickens \n"
"\n"
" *** The Red Wheelbarrow Init - L2E OS v0.1 \"TEMPLE DOS\" \n"
" *** (c) 2023 Vulcan Ignis \n"
"\n";
/* START RAINBOWCOLORS*/
/* Contains Rainbow Color Codes from "lolcat" by jaseg
* "lolcat" is Copyright (C) 2020 jaseg <github@jaseg.net>
* and distributed under "DO WHAT THE FUCK YOU WANT TO PUBLIC LICENSE
* Version 2, December 2004"
*/
char *rainbowbuffer = "";
#define ARRAY_SIZE(foo) (sizeof(foo) / sizeof(foo[0]))
const unsigned char codes[] = {39, 38, 44, 43, 49, 48, 84, 83, 119, 118,
154, 148, 184, 178, 214, 208, 209, 203, 204, 198,
199, 163, 164, 128, 129, 93, 99, 63, 69, 33};
static void find_escape_sequences(wint_t c, int *state) {
if (c == '\033') {
*state = 1;
} else if (*state == 1) {
if (('a' <= c && c <= 'z') || ('A' <= c && c <= 'Z'))
*state = 2;
} else {
*state = 0;
}
}
static wint_t color_hack(FILE *_ignored) {
(void)_ignored;
static size_t idx = 0;
char c = rainbowbuffer[idx++];
if (c)
return c;
idx = 0;
return WEOF;
}
int rainbow(double hf, double vf, int fc, int fl, int rd, int tc, int cs,
double co, char *message) {
rainbowbuffer = message;
int cc = -1, i, l = 0;
wint_t c;
int colors = isatty(STDOUT_FILENO);
int force_locale = 1;
int random = 0;
int start_color = 0;
int rgb = 0;
double freq_h = 0.23, freq_v = 0.1;
int rand_offset = 0;
struct timeval tv;
gettimeofday(&tv, NULL);
double offx = 0;
if (co >= 0) {
offx = co;
} else {
offx = (tv.tv_sec % 300) / 300.0;
}
if (hf >= 0) {
freq_h = hf;
}
if (vf >= 0) {
freq_v = vf;
}
if (fc == 1) {
colors = 1;
}
if (fl == 1) {
force_locale = 0;
}
if (rd == 1) {
random = 1;
}
if (cs >= 0) {
start_color = cs;
}
if (tc == 1) {
rgb = 1;
}
if (random) {
srand(time(NULL));
rand_offset = rand();
}
char *env_lang = getenv("LANG");
if (force_locale && env_lang && !strstr(env_lang, "UTF-8")) {
if (!setlocale(LC_ALL, "C.UTF-8")) {
/* C.UTF-8 may not be available on all platforms */
setlocale(LC_ALL, "");
/* Let's hope for the best */
}
} else {
setlocale(LC_ALL, "");
}
i = 0;
wint_t (*this_file_read_wchar)(FILE *);
FILE *f;
int escape_state = 0;
this_file_read_wchar = &color_hack;
f = 0;
while ((c = this_file_read_wchar(f)) != WEOF) {
if (colors) {
find_escape_sequences(c, &escape_state);
if (!escape_state) {
if (c == '\n') {
l++;
i = 0;
} else {
if (rgb) {
i += wcwidth(c);
float theta =
i * freq_h / 5.0f + l * freq_v +
(offx + 2.0f * (rand_offset + start_color) / (float)RAND_MAX) *
M_PI;
float offset = 0.1;
uint8_t red = lrintf(
(offset + (1.0f - offset) * (0.5f + 0.5f * sin(theta + 0))) *
255.0f);
uint8_t green = lrintf(
(offset +
(1.0f - offset) * (0.5f + 0.5f * sin(theta + 2 * M_PI / 3))) *
255.0f);
uint8_t blue = lrintf(
(offset +
(1.0f - offset) * (0.5f + 0.5f * sin(theta + 4 * M_PI / 3))) *
255.0f);
wprintf(L"\033[38;2;%d;%d;%dm", red, green, blue);
} else {
int ncc = offx * ARRAY_SIZE(codes) +
(int)((i += wcwidth(c)) * freq_h + l * freq_v);
if (cc != ncc)
wprintf(L"\033[38;5;%hhum",
codes[(rand_offset + start_color + (cc = ncc)) %
ARRAY_SIZE(codes)]);
}
}
}
}
putwchar(c);
/* implies "colors" */
if (escape_state == 2)
wprintf(L"\033[38;5;%hhum",
codes[(rand_offset + start_color + cc) % ARRAY_SIZE(codes)]);
}
if (colors) {
wprintf(L"\033[0m");
}
return 0;
}
int rainbowprint(char *message) {
rainbow(-1, -1, -1, -1, -1, 1, -1, -1, message);
return 0;
}
/* END RAINBOW COLORS*/
int main() {
struct sysinfo sys_info;
if (sysinfo(&sys_info) != 0) {
perror("sysinfo");
}
sigset_t set;
int status;
if (getpid() != 1) {
rainbowprint(infotext);
fprintf(stderr, " *******************************************\n"
" *** Guru Meditation >>> ERROR 01 <<< ***\n"
" *** Not PID 1. You are not special! ***\n"
" *******************************************\n");
rainbowprint(" *** Reference >>> ");
printf("%ld", sys_info.uptime %60);
rainbowprint("s <<< into boot... ***\n");
rainbowprint(" *******************************************\n");
return 1;
}
sigfillset(&set);
sigprocmask(SIG_BLOCK, &set, 0);
if (fork())
for (;;)
wait(&status);
sigprocmask(SIG_UNBLOCK, &set, 0);
setsid();
setpgid(0, 0);
//char *argv[] = {"/bin/sh", NULL};
char *argv[] = {"/bin/busybox", "setsid", "-c", "/bin/busybox", "ash", NULL};
char *envp[] = {"HOME=/root/", "TERM=linux", "PATH=/:/bin", "TZ=UTC0", "USER=root",
"LOGNAME=[l2e_init]", "ENV=/.fsociety/shellcode.sh", "PS1=TEMPLE DOS #| ", NULL};
pid_t child;
char *createuserspace[] = {"/bin/busybox", "--install", "-s", "/bin", NULL};
char *mountrun[] = {"/bin/mount", "/run", NULL};
char *mountdev[] = {"/bin/busybox", "mount", "devtmpfs", "-t", "devtmpfs", "-o", "mode=0755,nosuid", "/dev", NULL};
char *mountproc[] = {"/bin/busybox", "mount", "proc", "-t", "proc", "-o", "nosuid,noexec,nodev", "/proc", NULL};
char *mountsys[] = {"/bin/busybox", "mount", "sysfs", "-t", "sysfs", "-o", "nosuid,noexec,nodev", "/sys", NULL};
//char *mklock[] = {"/bin/mkdir", "-p", "/run/lock", "/run/shm", NULL};
//char *mkchmod[] = {"/bin/chmod", "1777", "/run/lock", "/run/shm", NULL};
//char *mklinkshm[] = {"/bin/ln", "-sfn", "/run/shm", "/dev/shm", NULL};
//char *mklinkrun[] = {"/bin/ln", "-sfv", "/run", "/var/run", NULL};
//char *mklinklock[] = {"/bin/ln", "-sfv", "/run/lock", "/var/lock", NULL};
//char *initscripts[] = {"/bin/ash", "-c", "/????.sh", NULL};
int childstatus;
rainbowprint(" *** Info: Kernel bro handed the castle to me...\n");
rainbowprint(" *** Action: Transcending boot...\n");
rainbowprint(" *** Info: The Guru awakened...\n");
// USERSPACE CREATION
rainbowprint(" *** Info: Create Userspace\n");
child = fork();
if (child == -1) {
fprintf(stderr, " *** Userspace creation failed! ***\n");
}
if (child == 0) {
rainbowprint(" *** Action: Create Userspace...\n");
if (execve(createuserspace[0], createuserspace, envp)) {
fprintf(stderr, " *** Userspace creation failed! ***\n");
return (-1);
}
}
// USERSPACE CREATION END
/*
// DO MOUNTS
rainbowprint(" *** Info: Mounts\n");
child = fork();
if (child == -1) {
fprintf(stderr, " *** Mounting failed! ***\n");
}
if (child == 0) {
rainbowprint(" *** Action: Mounting run\n");
if (execve(mountrun[0], mountrun, envp)) {
fprintf(stderr, " *** Mounting run failed! ***\n");
return (-1);
}
}
// DEVTEMPFS
child = fork();
if (child == -1) {
fprintf(stderr, " *** Mounting failed! ***\n");
}
if (child == 0) {
rainbowprint(" *** Action: Mounting devtmpfs");
if (execve(mountdev[0], mountdev, envp)) {
fprintf(stderr, " *** Mounting devtmpfs failed! ***\n");
return (-1);
}
}
// END DEVTEMPFS
*/
child = fork();
if (child == -1) {
fprintf(stderr, " *** Mounting failed! ***\n");
}
if (child == 0) {
rainbowprint(" *** Action: Mounting procfs\n");
if (execve(mountproc[0], mountproc, envp)) {
fprintf(stderr, " *** Mounting procfs failed! ***\n");
return (-1);
}
}
child = fork();
if (child == -1) {
fprintf(stderr, " *** Mounting failed! ***\n");
}
if (child == 0) {
rainbowprint(" *** Action: Mounting sysfs\n");
if (execve(mountsys[0], mountsys, envp)) {
fprintf(stderr, " *** Mounting sysfs failed! ***\n");
return (-1);
}
}
if (child > 0) {
while ((child = wait(&childstatus)) > 0)
;
if (childstatus == 0) {
rainbowprint(" *** Success: All actions succeeded!\n");
} else {
fprintf(stderr, " *** Actions failed! ***\n");
// return (childstatus);
}
}
/*
// CREATE LOCK DIR
rainbowprint(" *** Info: Directories\n");
child = fork();
if (child == -1) {
fprintf(stderr, " *** Directory creation failed! ***\n");
}
if (child == 0) {
rainbowprint(" *** Action: Directory creation\n");
if (execve(mklock[0], mklock, envp)) {
fprintf(stderr, " *** Directory creation failed! ***\n");
return (-1);
}
}
if (child > 0) {
while ((child = wait(&childstatus)) > 0)
;
if (childstatus == 0) {
rainbowprint(" *** Success: Directory creation succeeded!\n");
} else {
fprintf(stderr, " *** Directory creation failed! ***\n");
// return (childstatus);
}
}
// CHANGE LOCK DIR PERM
rainbowprint(" *** Action: Permissions\n");
child = fork();
if (child == -1) {
fprintf(stderr, " *** Changing directory permissions failed! ***\n");
}
if (child == 0) {
rainbowprint(" *** Action: Changing directory permissions\n");
if (execve(mkchmod[0], mkchmod, envp)) {
fprintf(stderr, " *** Changing directory permissions failed! ***\n");
return (-1);
}
}
if (child > 0) {
while ((child = wait(&childstatus)) > 0)
;
if (childstatus == 0) {
rainbowprint(" *** Success: Permission change succeeded!\n");
} else {
fprintf(stderr, " *** Permission change failed! ***\n");
// return (childstatus);
}
}
// LINKING
rainbowprint(" *** Action: Links\n");
child = fork();
if (child == -1) {
fprintf(stderr, " *** Linking shm failed! ***\n");
}
if (child == 0) {
rainbowprint(" *** Action: Linking shm\n");
if (execve(mklinkshm[0], mklinkshm, envp)) {
fprintf(stderr, " *** Linking shm failed! ***\n");
return (-1);
}
}
child = fork();
if (child == -1) {
fprintf(stderr, " *** Linking run failed! ***\n");
}
if (child == 0) {
rainbowprint(" *** Action: Linking run\n");
if (execve(mklinkrun[0], mklinkrun, envp)) {
fprintf(stderr, " *** Linking run failed! ***\n");
return (-1);
}
}
child = fork();
if (child == -1) {
fprintf(stderr, " *** Linking lock failed! ***\n");
}
if (child == 0) {
rainbowprint(" *** Action: Linking lock\n");
if (execve(mklinklock[0], mklinklock, envp)) {
fprintf(stderr, " *** Linking lock failed! ***\n");
return (-1);
}
}
if (child > 0) {
while ((child = wait(&childstatus)) > 0)
;
if (childstatus == 0) {
rainbowprint(" *** Success: All links succeeded!\n");
} else {
fprintf(stderr, " *** Links failed! ***\n");
// return (childstatus);
}
}
*/
/*
// RUN INITSCRIPT
rainbowprint(" *** Action: uInit Script");
child = fork();
if (child == -1) {
fprintf(stderr, " *** uInit Script failed! ***\n");
}
if (child == 0) {
rainbowprint(" *** Action: Running uInit Script");
if (execve(initscripts[0], initscripts, envp)) {
fprintf(stderr, " *** uInit Script failed! ***\n");
return (-1);
}
}
if (child > 0) {
while ((child = wait(&childstatus)) > 0)
;
if (childstatus == 0) {
rainbowprint(" *** Success: uInit Script succeeded!");
} else {
fprintf(stderr, " *** Init uScript failed! ***\n");
// return (childstatus);
}
}
// RUN INITSCRIPT END
*/
// BOOT INFO
rainbowprint(infotext);
rainbowprint(" *** Booted in >>> ");
printf("%ld", sys_info.uptime % 60);
rainbowprint(" <<< seconds ***\n");
rainbowprint(" *** Note: Trancended Boot. Dropping to Temple DOS Shell...\n");
rainbowprint(" *** Info: Load High Speed Stopwatch CLI by typing l2e\n");
rainbowprint(" *** Info: Load LAIRS After Egypt GUI by typing l2eterm\n");
rainbowprint(" *** Note: We are not auto loading l2e/l2eterm as we are auto\n");
rainbowprint(" *** killing the l2e process started by kernel module\n");
rainbowprint(" *** See module status with \"astu call_trans_opt\" \n");
rainbowprint(" *** Info: CTRL+F & CTRL+G get's you out if in qemu...\n\n");
// HAND OFF
if (execve(argv[0], &argv[0], envp) == -1) {
fprintf(stderr, " *** IF YOU ARE SEEING THIS, SOMETHING IS AWRY ***\n");
fprintf(stderr, " *** GURU MEDITATION! YOGA MAT ON FIRE! GURU DEMOTED TO FAKIR... BED OF NAILS TOO HOT... PANIC! DRAMA! ***\n");
return 1;
}
}
Reference in New Issue View Git Blame Copy Permalink