Sign Up
Log In
Log In
or
Sign Up
Places
All Projects
Status Monitor
Collapse sidebar
home:Ledest:erlang:20
erlang
0994-erts-Remove-trailing-whitespaces-in-erlexe...
Overview
Repositories
Revisions
Requests
Users
Attributes
Meta
File 0994-erts-Remove-trailing-whitespaces-in-erlexec.patch of Package erlang
From 849ce6220cd375143aaf704c2346fd9ce937ee47 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?J=C3=A9r=C3=B4me=20de=20Bretagne?= <jerome.debretagne@gmail.com> Date: Fri, 1 Nov 2019 15:21:06 +0100 Subject: [PATCH 3/3] erts: Remove trailing whitespaces in erlexec --- erts/etc/common/erlexec.c | 96 +++++++++++++++++++++++------------------------ 1 file changed, 48 insertions(+), 48 deletions(-) diff --git a/erts/etc/common/erlexec.c b/erts/etc/common/erlexec.c index 4dd996b883..cfefde40b2 100644 --- a/erts/etc/common/erlexec.c +++ b/erts/etc/common/erlexec.c @@ -219,7 +219,7 @@ static void get_start_erl_data(char *); static char* get_value(HKEY key, char* value_name, BOOL mustExit); static char* possibly_quote(char* arg); -/* +/* * Functions from win_erlexec.c */ int start_win_emulator(char* emu, char *startprog,char** argv, int start_detached); @@ -431,7 +431,7 @@ int main(int argc, char **argv) #ifdef __WIN32__ this_module_handle = module; run_werl = windowed; - /* if we started this erl just to get a detached emulator, + /* if we started this erl just to get a detached emulator, * the arguments are already prepared for beam, so we skip * directly to start_emulator */ s = get_env("ERL_CONSOLE_MODE"); @@ -449,7 +449,7 @@ int main(int argc, char **argv) emu = argv[0]; start_emulator_program = strsave(argv[0]); goto skip_arg_massage; - } + } free_env_val(s); #else int reset_cerl_detached = 0; @@ -480,7 +480,7 @@ int main(int argc, char **argv) #endif get_parameters(argc, argv); - + /* * Construct the path of the executable. */ @@ -596,7 +596,7 @@ int main(int argc, char **argv) free_env_val(s); set_env("PATH", tmpStr); - + i = 1; get_home(); @@ -695,7 +695,7 @@ int main(int argc, char **argv) usage("-env"); set_env(argv[i+1], argv[i+2]); i += 2; - } else if (strcmp(argv[i], "-epmd") == 0) { + } else if (strcmp(argv[i], "-epmd") == 0) { if (i+1 >= argc) usage("-epmd"); epmd_prog = argv[i+1]; @@ -739,7 +739,7 @@ int main(int argc, char **argv) if (strcmp(argv[i], "-name") == 0) { /* -name NAME */ if (i+1 >= argc) usage("-name"); - + /* * Note: Cannot use add_args() here, due to non-defined * evaluation order. @@ -776,7 +776,7 @@ int main(int argc, char **argv) add_arg(argv[i]); add_arg(argv[i+1]); i++; - } + } else if (strcmp(argv[i], "-start_erl") == 0) { if (i+1 < argc && argv[i+1][0] != '-') { get_start_erl_data(argv[i+1]); @@ -898,7 +898,7 @@ int main(int argc, char **argv) if (argv[i][2] != '\0') { if ((argv[i][2] != 'i') && (argv[i][2] != 'c') && - (argv[i][2] != 'd')) { + (argv[i][2] != 'd')) { usage(argv[i]); } else { add_Eargs(argv[i]); @@ -1030,7 +1030,7 @@ int main(int argc, char **argv) add_Eargs(argv[i]); } break; - + default: add_arg(argv[i]); } /* switch(argv[i][0] */ @@ -1048,7 +1048,7 @@ int main(int argc, char **argv) if (haltAfterwards) { add_args("-s", "erlang", "halt", NULL); } - + if (isdistributed && !no_epmd) start_epmd(epmd_prog); @@ -1057,8 +1057,8 @@ int main(int argc, char **argv) /* Start the emulator within an xterm. * Move up all arguments and insert * "xterm -e " first. - * The path must be searched for this - * to work, i.e execvp() must be used. + * The path must be searched for this + * to work, i.e execvp() must be used. */ ensure_EargsSz(EargsCnt+2); for (i = EargsCnt; i > 0; i--) @@ -1066,9 +1066,9 @@ int main(int argc, char **argv) EargsCnt += 2; /* Two args to insert */ Eargsp[0] = emu = "xterm"; Eargsp[1] = "-e"; - } + } #endif - + add_Eargs("--"); add_Eargs("-root"); add_Eargs(rootdir); @@ -1079,7 +1079,7 @@ int main(int argc, char **argv) for (i = 0; i < argsCnt; i++) Eargsp[EargsCnt++] = argsp[i]; Eargsp[EargsCnt] = NULL; - + if (print_qouted_cmd_exit) { printf("\"%s\" ", emu); for (i = 1; i < EargsCnt; i++) @@ -1104,7 +1104,7 @@ int main(int argc, char **argv) #ifdef __WIN32__ if (EargsSz != EargsCnt + 1) - Eargsp = (char **) erealloc((void *) Eargsp, (EargsCnt + 1) * + Eargsp = (char **) erealloc((void *) Eargsp, (EargsCnt + 1) * sizeof(char *)); efree((void *) argsp); @@ -1170,7 +1170,7 @@ int main(int argc, char **argv) #ifdef DEBUG execvp(emu, Eargsp); /* "xterm ..." needs to search the path */ #endif - } + } #ifdef DEBUG else #endif @@ -1250,7 +1250,7 @@ start_epmd(char *epmd) #else erts_snprintf(epmd_cmd, sizeof(epmd_cmd), "\"%s" DIRSEP "epmd\" -daemon", bindir); #endif - } + } #ifdef __WIN32__ if (arg1 != NULL) { strcat(epmd, " "); @@ -1264,7 +1264,7 @@ start_epmd(char *epmd) start.cb = sizeof (start); MultiByteToWideChar(CP_UTF8, 0, epmd, -1, wcepmd, MAXPATHLEN+100); - if (!CreateProcessW(NULL, wcepmd, NULL, NULL, FALSE, + if (!CreateProcessW(NULL, wcepmd, NULL, NULL, FALSE, CREATE_DEFAULT_ERROR_MODE | DETACHED_PROCESS, NULL, NULL, &start, &pi)) result = -1; @@ -1294,7 +1294,7 @@ add_args(char *first_arg, ...) { va_list ap; char* arg; - + add_arg(first_arg); va_start(ap, first_arg); while ((arg = va_arg(ap, char *)) != NULL) { @@ -1353,7 +1353,7 @@ erealloc(void *p, size_t size) } static void -efree(void *p) +efree(void *p) { free(p); } @@ -1400,7 +1400,7 @@ static void get_start_erl_data(char *file) char* reldir; char* otpstring; char* tprogname; - if (boot_script) + if (boot_script) error("Conflicting -start_erl and -boot options"); if (config_scripts) error("Conflicting -start_erl and -config options"); @@ -1457,12 +1457,12 @@ static void get_start_erl_data(char *file) erts_snprintf(a_config_script, 512, "%s/%s/sys", reldir, otpstring); config_scripts = &a_config_script; config_script_cnt = 1; - + got_start_erl = 1; } -static wchar_t *replace_filename(wchar_t *path, wchar_t *new_base) +static wchar_t *replace_filename(wchar_t *path, wchar_t *new_base) { int plen = wcslen(path); wchar_t *res = (wchar_t *) emalloc((plen+wcslen(new_base)+1)*sizeof(wchar_t)); @@ -1485,8 +1485,8 @@ static char *path_massage(wchar_t *long_path) WideCharToMultiByte(CP_UTF8, 0, long_path, -1, p, len, NULL, NULL); return p; } - -static char *do_lookup_in_section(InitSection *inis, char *name, + +static char *do_lookup_in_section(InitSection *inis, char *name, char *section, wchar_t *filename, int is_path) { char *p = lookup_init_entry(inis, name); @@ -1505,8 +1505,8 @@ static void get_parameters(int argc, char** argv) wchar_t *p; wchar_t buffer[MAX_PATH]; wchar_t *ini_filename; - HANDLE module = GetModuleHandle(NULL); /* This might look strange, but we want the erl.ini - that resides in the same dir as erl.exe, not + HANDLE module = GetModuleHandle(NULL); /* This might look strange, but we want the erl.ini + that resides in the same dir as erl.exe, not an erl.ini in our directory */ InitFile *inif; InitSection *inis; @@ -1555,9 +1555,9 @@ static void get_parameters(int argc, char** argv) } bindir = do_lookup_in_section(inis, "Bindir", INI_SECTION, ini_filename,1); - rootdir = do_lookup_in_section(inis, "Rootdir", INI_SECTION, + rootdir = do_lookup_in_section(inis, "Rootdir", INI_SECTION, ini_filename,1); - progname = do_lookup_in_section(inis, "Progname", INI_SECTION, + progname = do_lookup_in_section(inis, "Progname", INI_SECTION, ini_filename,0); free_init_file(inif); } @@ -1992,7 +1992,7 @@ get_file_args(char *filename, argv_buf *abp, argv_buf *xabp) i = 0; argv = read_args_file(filename); - + while (argv) { while (argv[i]) { @@ -2095,7 +2095,7 @@ initial_argv_massage(int *argc, char ***argv) build_new_argv: save_arg(&ab, (*argv)[0]); - + vix = 0; while (avv[vix].argv) { ac = avv[vix].argc; @@ -2187,12 +2187,12 @@ possibly_quote(char* arg) * Unicode helpers to handle environment and command line parameters on * Windows. We internally handle all environment variables in UTF8, * but put and get the environment using the WCHAR (limited UTF16) interface - * - * These are simplified to only handle Unicode characters that can fit in + * + * These are simplified to only handle Unicode characters that can fit in * Windows simplified UTF16, i.e. characters that fit in 16 bits. */ -static int utf8_len(unsigned char first) +static int utf8_len(unsigned char first) { if ((first & ((unsigned char) 0x80)) == 0) { return 1; @@ -2202,7 +2202,7 @@ static int utf8_len(unsigned char first) return 3; } else if ((first & ((unsigned char) 0xF8)) == 0xF0) { return 4; - } + } return 1; /* will be a '?' */ } @@ -2212,7 +2212,7 @@ static WCHAR *utf8_to_utf16(unsigned char *bytes) unsigned char *tmp = bytes; WCHAR *target, *res; int num = 0; - + while (*tmp) { num++; tmp += utf8_len(*tmp); @@ -2261,9 +2261,9 @@ static int put_utf8(WCHAR ch, unsigned char *target, int sz, int *pos) if (((*pos) + 1) >= sz) { return -1; } - target[(*pos)++] = (((unsigned char) (x >> 6)) | + target[(*pos)++] = (((unsigned char) (x >> 6)) | ((unsigned char) 0xC0)); - target[(*pos)++] = (((unsigned char) (x & 0x3F)) | + target[(*pos)++] = (((unsigned char) (x & 0x3F)) | ((unsigned char) 0x80)); } else { if ((x >= 0xD800 && x <= 0xDFFF) || @@ -2275,11 +2275,11 @@ static int put_utf8(WCHAR ch, unsigned char *target, int sz, int *pos) return -1; } - target[(*pos)++] = (((unsigned char) (x >> 12)) | + target[(*pos)++] = (((unsigned char) (x >> 12)) | ((unsigned char) 0xE0)); - target[(*pos)++] = ((((unsigned char) (x >> 6)) & 0x3F) | + target[(*pos)++] = ((((unsigned char) (x >> 6)) & 0x3F) | ((unsigned char) 0x80)); - target[(*pos)++] = (((unsigned char) (x & 0x3F)) | + target[(*pos)++] = (((unsigned char) (x & 0x3F)) | ((unsigned char) 0x80)); } return 0; @@ -2291,7 +2291,7 @@ static int need_bytes_for_utf8(WCHAR x) return 1; else if (x < 0x800) return 2; - else + else return 3; } @@ -2306,7 +2306,7 @@ static WCHAR *latin1_to_utf16(char *str) return wstr; } -static char *utf16_to_utf8(WCHAR *wstr) +static char *utf16_to_utf8(WCHAR *wstr) { int len = wcslen(wstr); char *result; @@ -2325,5 +2325,5 @@ static char *utf16_to_utf8(WCHAR *wstr) result[pos] = '\0'; return result; } - + #endif -- 2.16.4
Locations
Projects
Search
Status Monitor
Help
OpenBuildService.org
Documentation
API Documentation
Code of Conduct
Contact
Support
@OBShq
Terms
openSUSE Build Service is sponsored by
The Open Build Service is an
openSUSE project
.
Sign Up
Log In
Places
Places
All Projects
Status Monitor