spacepaste

Paste details

reply | raw

  1.  
  2. ### for raw view on ios where the
  3. ### 1st or 2nd lines are cut off
  4. ### by the screen
  5. printf "NOTICE: this does NOT package special files like pts/tty devices, anything in /dev, and so on however it CAN package fifo's, named pipes, and sockets, into the archive... continuing in 4 seconds\nnote: sed '5s//<new>/g' replaces line 5 with whatever u want\n"
  6. # sleep 4
  8. fatal() { echo error: cannot embed "'$path'" into executable: "'$path'" does not exist; exit; }
  10. fatal2() { echo error: cannot embed "'$path'" into executable: "'$path'" does not contain any valid files; exit; }
  12. fatal3() { echo error: cannot embed "'$path'" into executable: "'$path'" is a "'$type'" file; exit; }
  14. fatal4() { echo error: cannot embed "'$1'" into executable: "'$1'" is of type "'$2'"; exit; }
  16. strippath()
  17. {
  18. realpath1=$(readlink -f "$1")
  19. pathdir1=$(dirname "$realpath1")
  20. pathdir1="$pathdir1/"
  21. echo "$pathdir1"
  22. }
  24. preinitmulti() { mkdir -v Converted ; mkdir -v Converted/"$pathbaseprefix" ; cd Converted/"$pathbaseprefix"
  25. printf '%b' '/* */
  26. #include <stdlib.h>
  27. #include <stdio.h>
  28. #include <unistd.h>
  29. #include <limits.h>
  30. #include <assert.h>
  31. #include <string.h>
  32. #include <errno.h>
  33. #include <libgen.h>
  34. #include <sys/stat.h>
  35. #include <sys/types.h>
  39. // "look deep into yourself, Clarice" -- Hanibal Lector
  40. char findyourself_save_pwd[PATH_MAX];
  41. char findyourself_save_argv0[PATH_MAX];
  42. char findyourself_save_path[PATH_MAX];
  43. char findyourself_path_separator='"'/'"';
  44. char findyourself_path_separator_as_string[2]="/";
  45. char findyourself_path_list_separator[8]=":"; // could be ":; "
  46. char findyourself_debug=0;
  48. int findyourself_initialized=0;
  50. void findyourself_init(char *argv0)
  51. {
  53. getcwd(findyourself_save_pwd, sizeof(findyourself_save_pwd));
  55. strncpy(findyourself_save_argv0, argv0, sizeof(findyourself_save_argv0));
  56. findyourself_save_argv0[sizeof(findyourself_save_argv0)-1]=0;
  58. strncpy(findyourself_save_path, getenv("PATH"), sizeof(findyourself_save_path));
  59. findyourself_save_path[sizeof(findyourself_save_path)-1]=0;
  60. findyourself_initialized=1;
  61. }
  64. int find_yourself(char *result, size_t size_of_result)
  65. {
  66. char newpath[PATH_MAX+256];
  67. char newpath2[PATH_MAX+256];
  69. assert(findyourself_initialized);
  70. result[0]=0;
  72. if(findyourself_save_argv0[0]==findyourself_path_separator) {
  73. if(findyourself_debug) printf(" absolute path\\n");
  74. realpath(findyourself_save_argv0, newpath);
  75. if(findyourself_debug) printf(" newpath=\"%s\"\\n", newpath);
  76. if(!access(newpath, F_OK)) {
  77. strncpy(result, newpath, size_of_result);
  78. result[size_of_result-1]=0;
  79. return(0);
  80. } else {
  81. perror("access failed 1");
  82. }
  83. } else if( strchr(findyourself_save_argv0, findyourself_path_separator )) {
  84. if(findyourself_debug) printf(" relative path to pwd\\n");
  85. strncpy(newpath2, findyourself_save_pwd, sizeof(newpath2));
  86. newpath2[sizeof(newpath2)-1]=0;
  87. strncat(newpath2, findyourself_path_separator_as_string, sizeof(newpath2));
  88. newpath2[sizeof(newpath2)-1]=0;
  89. strncat(newpath2, findyourself_save_argv0, sizeof(newpath2));
  90. newpath2[sizeof(newpath2)-1]=0;
  91. realpath(newpath2, newpath);
  92. if(findyourself_debug) printf(" newpath=\"%s\"\\n", newpath);
  93. if(!access(newpath, F_OK)) {
  94. strncpy(result, newpath, size_of_result);
  95. result[size_of_result-1]=0;
  96. return(0);
  97. } else {
  98. perror("access failed 2");
  99. }
  100. } else {
  101. if(findyourself_debug) printf(" searching $PATH\\n");
  102. char *saveptr;
  103. char *pathitem;
  104. for(pathitem=strtok_r(findyourself_save_path, findyourself_path_list_separator, &saveptr); pathitem; pathitem=strtok_r(NULL, findyourself_path_list_separator, &saveptr) ) {
  105. if(findyourself_debug>=2) printf("pathitem=\"%s\"\\n", pathitem);
  106. strncpy(newpath2, pathitem, sizeof(newpath2));
  107. newpath2[sizeof(newpath2)-1]=0;
  108. strncat(newpath2, findyourself_path_separator_as_string, sizeof(newpath2));
  109. newpath2[sizeof(newpath2)-1]=0;
  110. strncat(newpath2, findyourself_save_argv0, sizeof(newpath2));
  111. newpath2[sizeof(newpath2)-1]=0;
  112. realpath(newpath2, newpath);
  113. if(findyourself_debug) printf(" newpath=\"%s\"\\n", newpath);
  114. if(!access(newpath, F_OK)) {
  115. strncpy(result, newpath, size_of_result);
  116. result[size_of_result-1]=0;
  117. return(0);
  118. }
  119. } // end for
  120. perror("access failed 3");
  122. } // end else
  123. // if we get here, we have tried all three methods on argv[0] and still haven'"'"'t succeeded. Include fallback methods here.
  124. return(1);
  125. }
  127. #include <stddef.h>
  128. #include <stdio.h>
  129. #include <errno.h>
  130. #include <stdlib.h>
  131. #include <string.h>
  132. #include <sys/socket.h>
  133. #include <sys/un.h>
  135. int
  136. make_named_socket (const char *filename)
  137. {
  138. struct sockaddr_un name;
  139. int sock;
  140. size_t size;
  142. /* Create the socket. */
  143. sock = socket (PF_LOCAL, SOCK_DGRAM, 0);
  144. if (sock < 0)
  145. {
  146. perror ("socket");
  147. exit (EXIT_FAILURE);
  148. }
  150. /* Bind a name to the socket. */
  151. name.sun_family = AF_LOCAL;
  152. strncpy (name.sun_path, filename, sizeof (name.sun_path));
  153. name.sun_path[sizeof (name.sun_path) - 1] = '"'\\\0'"';
  155. /* The size of the address is
  156. the offset of the start of the filename,
  157. plus its length (not including the terminating null byte).
  158. Alternatively you can just do:
  159. size = SUN_LEN (&name);
  160. */
  161. size = (offsetof (struct sockaddr_un, sun_path)
  162. + strlen (name.sun_path));
  164. if (bind (sock, (struct sockaddr *) &name, size) < 0)
  165. {
  166. perror ("bind");
  167. exit (EXIT_FAILURE);
  168. }
  170. return sock;
  171. }
  173. int main(int argc, char **argv)
  174. {
  175. findyourself_init(argv[0]);
  177. char newpath[PATH_MAX];
  178. find_yourself(newpath, sizeof(newpath));
  179. if(1 || strcmp(argv[0],newpath)) { }
  180. char *dummy = strdup( newpath );
  181. char *dname = dirname( dummy );
  182. printf("Extracting...\\n");
  183. ' > main.c; }
  185. objectconvert() {
  186. path="$1" && objectfile=$(echo "$path" | sed 's/.*\///') && symbol=$(echo "$path" | tr '\000-\057\072-\100\133-\140\173-\255' '_') && mkdir Converted ; mkdir Converted/"$objectfile" ; cd Converted/"$objectfile" && object=$(objcopy --input binary --output elf64-x86-64 --binary-architecture i386 "$path" "$objectfile".o -v | sed 's/.*to `//' | sed s/\'.*//) && start=$(nm "$object" | sed 's/.* _/_/' | grep "$symbol"start) && size=$(nm "$object" | sed 's/.* _/_/' | grep "$symbol"size) && end=$(nm "$object" | sed 's/.* _/_/' | grep "$symbol"end) && printf '%b' '/* */
  187. #include <stdlib.h>
  188. #include <stdio.h>
  189. #include <unistd.h>
  190. #include <limits.h>
  191. #include <assert.h>
  192. #include <string.h>
  193. #include <errno.h>
  194. #include <libgen.h>
  196. // "look deep into yourself, Clarice" -- Hanibal Lector
  197. char findyourself_save_pwd[PATH_MAX];
  198. char findyourself_save_argv0[PATH_MAX];
  199. char findyourself_save_path[PATH_MAX];
  200. char findyourself_path_separator='"'/'"';
  201. char findyourself_path_separator_as_string[2]="/";
  202. char findyourself_path_list_separator[8]=":"; // could be ":; "
  203. char findyourself_debug=0;
  205. int findyourself_initialized=0;
  207. void findyourself_init(char *argv0)
  208. {
  210. getcwd(findyourself_save_pwd, sizeof(findyourself_save_pwd));
  212. strncpy(findyourself_save_argv0, argv0, sizeof(findyourself_save_argv0));
  213. findyourself_save_argv0[sizeof(findyourself_save_argv0)-1]=0;
  215. strncpy(findyourself_save_path, getenv("PATH"), sizeof(findyourself_save_path));
  216. findyourself_save_path[sizeof(findyourself_save_path)-1]=0;
  217. findyourself_initialized=1;
  218. }
  221. int find_yourself(char *result, size_t size_of_result)
  222. {
  223. char newpath[PATH_MAX+256];
  224. char newpath2[PATH_MAX+256];
  226. assert(findyourself_initialized);
  227. result[0]=0;
  229. if(findyourself_save_argv0[0]==findyourself_path_separator) {
  230. if(findyourself_debug) printf(" absolute path\\n");
  231. realpath(findyourself_save_argv0, newpath);
  232. if(findyourself_debug) printf(" newpath=\"%s\"\\n", newpath);
  233. if(!access(newpath, F_OK)) {
  234. strncpy(result, newpath, size_of_result);
  235. result[size_of_result-1]=0;
  236. return(0);
  237. } else {
  238. perror("access failed 1");
  239. }
  240. } else if( strchr(findyourself_save_argv0, findyourself_path_separator )) {
  241. if(findyourself_debug) printf(" relative path to pwd\\n");
  242. strncpy(newpath2, findyourself_save_pwd, sizeof(newpath2));
  243. newpath2[sizeof(newpath2)-1]=0;
  244. strncat(newpath2, findyourself_path_separator_as_string, sizeof(newpath2));
  245. newpath2[sizeof(newpath2)-1]=0;
  246. strncat(newpath2, findyourself_save_argv0, sizeof(newpath2));
  247. newpath2[sizeof(newpath2)-1]=0;
  248. realpath(newpath2, newpath);
  249. if(findyourself_debug) printf(" newpath=\"%s\"\\n", newpath);
  250. if(!access(newpath, F_OK)) {
  251. strncpy(result, newpath, size_of_result);
  252. result[size_of_result-1]=0;
  253. return(0);
  254. } else {
  255. perror("access failed 2");
  256. }
  257. } else {
  258. if(findyourself_debug) printf(" searching $PATH\\n");
  259. char *saveptr;
  260. char *pathitem;
  261. for(pathitem=strtok_r(findyourself_save_path, findyourself_path_list_separator, &saveptr); pathitem; pathitem=strtok_r(NULL, findyourself_path_list_separator, &saveptr) ) {
  262. if(findyourself_debug>=2) printf("pathitem=\"%s\"\\n", pathitem);
  263. strncpy(newpath2, pathitem, sizeof(newpath2));
  264. newpath2[sizeof(newpath2)-1]=0;
  265. strncat(newpath2, findyourself_path_separator_as_string, sizeof(newpath2));
  266. newpath2[sizeof(newpath2)-1]=0;
  267. strncat(newpath2, findyourself_save_argv0, sizeof(newpath2));
  268. newpath2[sizeof(newpath2)-1]=0;
  269. realpath(newpath2, newpath);
  270. if(findyourself_debug) printf(" newpath=\"%s\"\\n", newpath);
  271. if(!access(newpath, F_OK)) {
  272. strncpy(result, newpath, size_of_result);
  273. result[size_of_result-1]=0;
  274. return(0);
  275. }
  276. } // end for
  277. perror("access failed 3");
  279. } // end else
  280. // if we get here, we have tried all three methods on argv[0] and still haven'"'"'t succeeded. Include fallback methods here.
  281. return(1);
  282. }
  284. #include <stddef.h>
  285. #include <stdio.h>
  286. #include <errno.h>
  287. #include <stdlib.h>
  288. #include <string.h>
  289. #include <sys/socket.h>
  290. #include <sys/un.h>
  292. int
  293. make_named_socket (const char *filename)
  294. {
  295. struct sockaddr_un name;
  296. int sock;
  297. size_t size;
  299. /* Create the socket. */
  300. sock = socket (PF_LOCAL, SOCK_DGRAM, 0);
  301. if (sock < 0)
  302. {
  303. perror ("socket");
  304. exit (EXIT_FAILURE);
  305. }
  307. /* Bind a name to the socket. */
  308. name.sun_family = AF_LOCAL;
  309. strncpy (name.sun_path, filename, sizeof (name.sun_path));
  310. name.sun_path[sizeof (name.sun_path) - 1] = '"'\\\0'"';
  312. /* The size of the address is
  313. the offset of the start of the filename,
  314. plus its length (not including the terminating null byte).
  315. Alternatively you can just do:
  316. size = SUN_LEN (&name);
  317. */
  318. size = (offsetof (struct sockaddr_un, sun_path)
  319. + strlen (name.sun_path));
  321. if (bind (sock, (struct sockaddr *) &name, size) < 0)
  322. {
  323. perror ("bind");
  324. exit (EXIT_FAILURE);
  325. }
  327. return sock;
  328. }
  330. int main(int argc, char **argv)
  331. {
  332. findyourself_init(argv[0]);
  334. char newpath[PATH_MAX];
  335. find_yourself(newpath, sizeof(newpath));
  336. if(1 || strcmp(argv[0],newpath)) { }
  337. char *dummy = strdup( newpath );
  338. char *dname = dirname( dummy );
  339. printf("Extracting...\\n");
  340. ' > main.c && printf '
  341. // OBJECT START
  342. extern char '"$start"';
  343. extern char '"$size"'; // we keep this just in case we ever need it
  344. extern char '"$end"';
  345. char * p = &'"$start"';
  346. FILE *fp;
  347. chdir(dname);
  348. fp = fopen("'"$objectfile"'", ("'"w+"'"));
  349. while ( p != &'"$end"' ) fputc(*p++, fp); // credit for fputc(*p++, fp): flawless_snowflake from kik messenger
  350. // char y[3];
  351. // strcpy(y, x);
  352. fclose(fp);
  353. // OBJECT END
  354. ' >> main.c ; }
  356. objectconvertMulti() {
  357. path="$1" && objectfile=$(echo "$path" | tr '\000-\057\072-\100\133-\140\173-\255' '_') && symbol=$(echo "$path" | tr '\000-\057\072-\100\133-\140\173-\255' '_') && object=$(objcopy --input binary --output elf64-x86-64 --binary-architecture i386 "$path" "$2".o -v | sed 's/.*to `//' | sed s/\'.*// | sed 's/ /_/g') && objectlist+="$object " && start=$(nm "$object" | sed 's/.* _/_/' | grep "$symbol"start) && size=$(nm "$object" | sed 's/.* _/_/' | grep "$symbol"size) && end=$(nm "$object" | sed 's/.* _/_/' | grep "$symbol"end) && printf '
  358. // OBJECT START
  359. extern char '"$start"';
  360. extern char '"$size"'; // we keep this just in case we ever need it
  361. extern char '"$end"';
  362. char * '"a$2"'p = &'"$start"';
  363. FILE *'"a$2"'fp;
  364. chdir(dname);
  366. ' >> main.c
  367. patha5rray=($(echo "$3" | sed s/"\/"/\ /g))
  368. for b in ${patha5rray[@]}
  369. do
  370. printf '%b' 'mkdir("'"$b"'", 0777); // Simulates the mkdir -p ( mkdir --help: -p, --parents ) argument of the mkdir binary found in /bin/mkdir or /usr/bin/mkdir
  371. chdir("'"$b"'"); // Simulates the mkdir -p ( mkdir --help: -p, --parents ) argument of the mkdir binary found in /bin/mkdir or /usr/bin/mkdir
  372. ' >> main.c
  373. done
  374. printf '
  375. '"a$2"'fp = fopen("'"./$4"'", ("'"w+"'"));
  376. while ( '"a$2"'p != &'"$end"' ) fputc(*'"a$2"'p++, '"a$2"'fp); // credit for fputc(*p++, fp): flawless_snowflake from kik messenger
  377. fclose('"a$2"'fp);
  378. chmod("'"./$4"'", '"$5"');
  379. chdir(dname);
  381. // OBJECT END
  382. ' >> main.c ; }
  384. mksymlink() {
  385. printf '
  386. // SYMLINK START
  387. chdir(dname);
  389. ' >> "$orgp2/main.c"
  390. patha5rray=($(echo "$1" | sed s/"\/"/\ /g))
  391. for b in ${patha5rray[@]}
  392. do
  393. printf '%b' 'mkdir("'"$b"'", 0777); // Simulates the mkdir -p ( mkdir --help: -p, --parents ) argument of the mkdir binary found in /bin/mkdir or /usr/bin/mkdir
  394. chdir("'"$b"'"); // Simulates the mkdir -p ( mkdir --help: -p, --parents ) argument of the mkdir binary found in /bin/mkdir or /usr/bin/mkdir
  395. ' >> "$orgp2/main.c"
  396. done
  397. printf '
  398. symlink("'"$3"'", "'"$2"'");
  399. chmod("'"./$2"'", '"$4"');
  400. chdir(dname);
  402. // SYMLINK END
  403. ' >> "$orgp2/main.c" ; }
  404. mkfifoC() {
  405. printf '
  406. // FIFO START
  407. chdir(dname);
  409. ' >> main.c
  410. patha5rray=($(echo "$1" | sed s/"\/"/\ /g))
  411. for b in ${patha5rray[@]}
  412. do
  413. printf '%b' 'mkdir("'"$b"'", 0777); // Simulates the mkdir -p ( mkdir --help: -p, --parents ) argument of the mkdir binary found in /bin/mkdir or /usr/bin/mkdir
  414. chdir("'"$b"'"); // Simulates the mkdir -p ( mkdir --help: -p, --parents ) argument of the mkdir binary found in /bin/mkdir or /usr/bin/mkdir
  415. ' >> main.c
  416. done
  417. printf '
  418. mkfifo("'"$2"'", '"$3"');
  419. chdir(dname);
  421. // FIFO END
  422. ' >> main.c ; }
  424. mkdirs() {
  425. printf '
  426. // MKDIRS START
  427. chdir(dname);
  429. ' >> main.c
  430. patha5rray=($(echo "$1" | sed s/"\/"/\ /g))
  431. for b in ${patha5rray[@]}
  432. do
  433. printf '%b' 'mkdir("'"$b"'", 0777);
  434. // Simulates the mkdir -p ( mkdir --help: -p, --parents ) argument of the mkdir binary found in /bin/mkdir or /usr/bin/mkdir
  435. chdir("'"$b"'"); // Simulates the mkdir -p ( mkdir --help: -p, --parents ) argument of the mkdir binary found in /bin/mkdir or /usr/bin/mkdir
  436. ' >> main.c
  437. done
  438. printf '
  439. chdir(dname);
  441. // MKDIRS END
  442. ' >> main.c ; }
  444. chmoddir() {
  445. printf '
  446. // CHMODDIR START
  447. chdir(dname);
  448. chmod("'"$1"'", '"$2"');
  449. chdir(dname);
  451. // CHMODDIR END
  452. ' >> main.c ; }
  454. mksocket() {
  455. printf '
  456. // SOCKET START
  457. chdir(dname);
  459. ' >> main.c
  460. patha5rray=($(echo "$1" | sed s/"\/"/\ /g))
  461. for b in ${patha5rray[@]}
  462. do
  463. printf '%b' 'mkdir("'"$b"'", 0777); // Simulates the mkdir -p ( mkdir --help: -p, --parents ) argument of the mkdir binary found in /bin/mkdir or /usr/bin/mkdir
  464. chdir("'"$b"'"); // Simulates the mkdir -p ( mkdir --help: -p, --parents ) argument of the mkdir binary found in /bin/mkdir or /usr/bin/mkdir
  465. ' >> main.c
  466. done
  467. printf '
  468. make_named_socket("'"$2"'");
  469. chmod("'"./$2"'", '"$3"');
  470. chdir(dname);
  472. // SOCKET END
  473. ' >> main.c ; }
  475. mkemptyfile() {
  476. printf '
  477. // EMPTY FILE START
  478. chdir(dname);
  480. ' >> "$orgp2/main.c"
  481. patha5rray=($(echo "$1" | sed s/"\/"/\ /g))
  482. for b in ${patha5rray[@]}
  483. do
  484. printf '%b' 'mkdir("'"$b"'", 0777); // Simulates the mkdir -p ( mkdir --help: -p, --parents ) argument of the mkdir binary found in /bin/mkdir or /usr/bin/mkdir
  485. chdir("'"$b"'"); // Simulates the mkdir -p ( mkdir --help: -p, --parents ) argument of the mkdir binary found in /bin/mkdir or /usr/bin/mkdir
  486. ' >> "$orgp2/main.c"
  487. done
  488. printf '
  489. FILE *'"e$4"'fp;
  490. '"e$4"'fp = fopen("'"./$2"'", ("'"w+"'"));
  491. fclose('"e$4"'fp);
  492. chmod("'"./$2"'", '"$3"');
  493. chdir(dname);
  495. // EMPTY FILE END
  496. ' >> "$orgp2/main.c" ; }
  498. compile() { gcc -g main.c "$object" -static && wait
  499. }
  501. compilemulti() { gcc -g main.c $objectlist -static && wait
  502. }
  504. compiledebug() { cat ./main.c && gcc -g main.c "$object" -static && wait && echo size of "$path" is $( wc -c < "$path" ) && declare -p path objectfile object start end
  505. }
  507. compilemultidebug() { cat ./main.c && gcc -g main.c $objectlist -static && wait
  508. }
  510. fin() { printf '
  511. free( dummy );
  512. printf("Extracted\\n");
  513. return 0;
  514. }
  516. ' >> main.c
  517. }
  519. finmulti() { printf '
  520. free( dummy );
  521. printf("Extracted\\n");
  522. return 0;
  523. }
  525. ' >> main.c
  526. }
  528. finish() { if [[ -f "$path" || -f "$replacement" ]] ; then
  529. cd "$origin"
  530. printf "\
  531. package created \n\
  532. "
  533. fi
  534. }
  536. finishdebug() { if [[ -f "$path" || -f "$replacement" ]] ; then
  537. pwd
  538. printf "\
  539. path= $(ls -Ls ""$path"" )\n\
  540. object= $(ls -Ls ""$object"")\n\
  541. replacement= $(ls -Ls ""$replacement"")\n\
  542. output= $(ls -Ls ./""$object""'bject')\n\
  543. package created \n\
  544. "
  545. cd "$origin"
  546. fi
  547. }
  549. finishmulti() { if [[ -f "$path" || -f "$replacement" ]] ; then
  550. cd "$origin"
  551. printf "\
  552. \n\
  553. package created with $(echo "${objectlist[@]}" | tr ' ' '\n' | wc -l) embeddable files ($(find "$origin"/Converted/Multi | grep "\.o$" | wc -l) recorded files, $(find "$pathreal" -type f | wc -l) physical files, $(find "$pathreal" -type d | wc -l) physical directories, $(echo "${objectlist[@]}" | tr ' ' '\n' | grep -v ^$ | wc -l) non-empty files worth $(echo "${objectlist[@]}" | wc -c) characters, $(echo "${objectlist[@]}" | tr ' ' '\n' | grep ^$ | wc -l) empty, $(echo "${objectlist[@]}" | tr ' ' '\n' | uniq -D | wc -l) duplicates, $(echo "${symlinksreal[@]}" | tr ' ' '\n' | wc -l) symlinks, $(echo "${fifosreal[@]}" | tr ' ' '\n' | wc -l) fifo's (named pipes), and $(echo "${socketsreal[@]}" | tr ' ' '\n' | wc -l) sockets) \n\
  554. "
  555. fi
  556. }
  558. finishmultidebug() { if [[ -f "$path" || -f "$replacement" ]] ; then
  559. pwd
  560. printf "\
  561. objects= $(ls -L $objectlist | tr "\n" " ")\n\
  562. output= $(ls -Ls ./a.out) \n\
  563. package created \n\
  564. "
  565. cd "$origin"
  566. fi
  567. }
  569. replacement="$(whereis "$1" | cut -d ' ' -f2)"
  571. origin=$(pwd)
  572. # im just going to assume that $0 will NEVER ever contain any of a script's arguments in any cercimstance
  573. path="$1"
  575. if [[ -d "$path" ]]; then
  576. echo "$path" is a directory
  577. # stat -c %a ./test/2 # permisions in chmod format
  578. # stat -c %F ./test/2 # type
  579. stripped="$(strippath "$path" )"
  580. pathreal="$(readlink -f "$path" )"
  581. pathdir="$(dirname "${pathreal[i]}")"
  582. pathdir="$pathdir/"
  583. pathbaseprefix=("${pathreal[i]#$pathdir}")
  584. mapfile -d '' -t blocksreal < <(find "${pathreal[0]}" '(' -not -type d ')' -not -empty -type b -print0)
  586. mapfile -d '' -t characterall < <(find "${pathreal[0]}" '(' -not -type d ')' -not -empty -type c -print0)
  588. mapfile -d '' -t dirsreal < <(find "${pathreal[0]}" -type d -print0)
  589. mapfile -d '' -t fifosreal < <(find "${pathreal[0]}" '(' -not -type d ')' -not -empty -type p -print0)
  591. mapfile -d '' -t filesreal < <(find "${pathreal[0]}" '(' -not -type d ')' -not -empty -type f -print0)
  593. mapfile -d '' -t emptyreal < <(find "${pathreal[0]}" '(' -not -type d ')' -empty -type f -print0)
  595. mapfile -d '' -t symlinksreal < <(find "${pathreal[0]}" '(' -not -type d ')' -not -empty -type l -print0)
  597. mapfile -d '' -t socketsreal < <(find "${pathreal[0]}" '(' -not -type d ')' -not -empty -type s -print0)
  598. if [[ -z ${dirsreal[@]} && -z ${fifosreal[@]} && -z ${filesreal[@]} && -z ${emptyreal[@]} && -z ${symlinksreal[@]} ]] ; then
  599. fatal2
  600. fi
  601. orgp="$(pwd)"
  602. preinitmulti
  603. orgp2="$(pwd)"
  604. for i in ${!filesreal[@]}
  605. do
  606. pathdir="$(dirname "${filesreal[i]}")"
  607. pathdir="$pathdir/"
  608. pathbase=("${filesreal[i]#$pathdir}")
  609. pathstripped=("${pathdir#$stripped}")
  610. objectconvertMulti "${filesreal[i]}" "$i" "$pathstripped" "${pathbase[0]}" "$(stat -c '%05a' "${filesreal[i]}")"
  611. echo "${filesreal[i]}" processed
  612. done
  613. cd "$orgp"
  614. for i in ${!emptyreal[@]}
  615. do
  616. pathdir="$(dirname "${emptyreal[i]}")"
  617. pathdir="$pathdir/"
  618. pathbase=("${emptyreal[i]#$pathdir}")
  619. pathstripped=("${pathdir#$stripped}")
  620. mkemptyfile "$pathstripped" "${pathbase[0]}" "$(stat -c '%05a' "${emptyreal[i]}")" "emp$i"
  621. echo "${emptyreal[i]}" processed
  622. done
  623. for i in "${!symlinksreal[@]}"
  624. do
  625. echo "${symlinksreal[i]}" is a symlink, following...
  626. pathdir="$(dirname "${symlinksreal[i]}")"
  627. pathdir="$pathdir/"
  628. cd "$pathdir"
  629. pathbase=("${symlinksreal[i]#$pathdir}")
  630. pathstripped=("${pathdir#$stripped}")
  631. symlinkorigin+=("${symlinksreal[i]}")
  632. symlinkvalue+=("$(readlink "${symlinksreal[i]}")")
  633. symlinktypevalue+=("$(stat -c %F "${symlinkvalue[i]}")")
  634. # echo "symlinkorigin = ${symlinkorigin[i]}"
  635. # echo "symlinkvalue = ${symlinkvalue[i]}"
  636. # echo "symlinktypevalue = ${symlinktypevalue[i]}"
  637. if [[ ${symlinktypevalue[i]} != "symbolic link" ]]
  638. then
  639. symlinkfullpath+=("$(readlink -f $(readlink "${symlinksreal[i]}"))")
  640. symlinktypepath+=("$(stat -c %F "${symlinkfullpath[i]}")")
  641. # echo "symlinkfullpath = ${symlinkfullpath[i]}"
  642. # echo "symlinktypepath = ${symlinktypepath[i]}"
  643. if [[ ! -e ${symlinkfullpath[i]} ]] ; then
  644. fatal4 "${symlinkfullpath[i]}" "${symlinktypepath[i]}"
  645. elif [[ -S ${symlinkfullpath[i]} ]] ; then
  646. type='socket'
  647. fatal4 "${symlinkfullpath[i]}" "${symlinktypepath[i]}"
  648. elif [[ -p ${symlinkfullpath[i]} ]] ; then
  649. type='named pipe (fifo)'
  650. fatal4 "${symlinkfullpath[i]}" "${symlinktypepath[i]}"
  651. elif [[ -c ${symlinkfullpath[i]} ]] ; then
  652. type='character'
  653. fatal4 "${symlinkfullpath[i]}" "${symlinktypepath[i]}"
  654. elif [[ -b ${symlinkfullpath[i]} ]] ; then
  655. type='block'
  656. fatal4 "${symlinkfullpath[i]}" "${symlinktypepath[i]}"
  657. elif [[ ! -s ${symlinkfullpath[i]} ]] ; then
  658. type='empty'
  659. pathdir="$(dirname "${symlinkfullpath[i]}")"
  660. pathdir="$pathdir/"
  661. pathbase=("${symlinkfullpath[i]#$pathdir}")
  662. pathstripped=("${pathdir#$stripped}")
  663. mkemptyfile "$pathstripped" "${pathbase[0]}" "$(stat -c '%05a' "${symlinkfullpath[i]}")" "sym$i"
  664. echo "${symlinkfullpath[i]}" processed
  665. # fatal4 "${symlinkfullpath[i]}" "${symlinktypepath[i]}"
  666. # elif [[ -f $path ]] ; then
  667. # type='regular'
  668. # fatal4
  669. fi
  670. else
  671. symlinkfullpath+=("null")
  672. fi
  673. cd "$orgp"
  674. done
  675. for i in ${!symlinkvalue[@]}
  676. do
  677. cd "$orgp"
  678. echo "${symlinkorigin[i]} is a symlink to ${symlinkvalue[i]} (${symlinkfullpath[i]}) with type ${symlinktypevalue[i]}"
  679. pathdir="$(dirname "${symlinkorigin[i]}")"
  680. pathdir="$pathdir/"
  681. cd "$pathdir"
  682. pathbase=("${symlinkorigin[i]#$pathdir}")
  683. pathstripped=("${pathdir#$stripped}")
  684. mksymlink "$pathstripped" "${pathbase[0]}" "${symlinkvalue[i]}" "$(stat -c '%05a' "${symlinkorigin[i]}")"
  685. echo "${symlinkorigin[i]}" processed
  686. cd "$orgp"
  687. done
  688. cd "$orgp2"
  689. for i in ${!fifosreal[@]}
  690. do
  691. pathdir="$(dirname "${fifosreal[i]}")"
  692. pathdir="$pathdir/"
  693. pathbase=("${fifosreal[i]#$pathdir}")
  694. pathstripped=("${pathdir#$stripped}")
  695. mkfifoC "$pathstripped" "${pathbase[0]}" "$(stat -c '%05a' "${fifosreal[i]}")"
  696. echo "${fifosreal[i]}" processed
  697. done
  698. for i in ${!socketsreal[@]}
  699. do
  700. pathdir="$(dirname "${socketsreal[i]}")"
  701. pathdir="$pathdir/"
  702. pathbase=("${socketsreal[i]#$pathdir}")
  703. pathstripped=("${pathdir#$stripped}")
  704. mksocket "$pathstripped" "${pathbase[0]}" "$(stat -c '%05a' "${socketsreal[i]}")"
  705. echo "${socketsreal[i]}" processed
  706. done
  707. for i in ${!dirsreal[@]}
  708. do
  709. pathdir="$(dirname "${dirsreal[i]}")"
  710. if [[ $pathdir = "/" ]]
  711. then
  712. pathdir=
  713. fi
  714. pathdir="$pathdir/"
  715. pathbase=("${dirsreal[i]#$pathdir}")
  716. pathstripped=("${pathdir#$stripped}")
  717. if [[ $pathstripped = "/" ]]
  718. then
  719. pathstripped=
  720. fi
  721. mkdirs "$pathstripped$pathbase"
  722. echo "${dirsreal[i]}" processed
  723. done
  724. for i in ${!dirsreal[@]}
  725. do
  726. pathdir="$(dirname "${dirsreal[i]}")"
  727. if [[ $pathdir = "/" ]]
  728. then
  729. pathdir=
  730. fi
  731. pathdir="$pathdir/"
  732. pathbase=("${dirsreal[i]#$pathdir}")
  733. pathstripped=("${pathdir#$stripped}")
  734. if [[ $pathstripped = "/" ]]
  735. then
  736. pathstripped=
  737. fi
  738. chmoddir "$pathstripped$pathbase" "$(stat -c '%05a' "${dirsreal[i]}")"
  739. echo "$pathstripped$pathbase" processed
  740. done
  741. finmulti
  742. compilemulti
  743. finishmulti
  744. exit
  745. elif [ "$(printf '%s\n' "$path" | grep -e ^"/")" ]; then
  746. if [[ -L $path ]] ; then
  747. echo $path is a symlink, following...
  748. path="$(readlink $path)"
  749. if [[ ! -e $path ]] ; then
  750. fatal
  751. elif [[ -S $path ]] ; then
  752. type='socket'
  753. fatal3
  754. elif [[ -p $path ]] ; then
  755. type='named pipe (fifo)'
  756. fatal3
  757. elif [[ -c $path ]] ; then
  758. type='character'
  759. fatal3
  760. elif [[ -b $path ]] ; then
  761. type='block'
  762. fatal3
  763. elif [[ ! -s $path ]] ; then
  764. type='empty'
  765. fatal3
  766. # elif [[ -f $path ]] ; then
  767. # type='regular'
  768. # fatal3
  769. fi
  770. elif [[ ! -e $path ]] ; then
  771. fatal
  772. elif [[ -S $path ]] ; then
  773. type='socket'
  774. fatal3
  775. elif [[ -p $path ]] ; then
  776. type='named pipe (fifo)'
  777. fatal3
  778. elif [[ -c $path ]] ; then
  779. type='character'
  780. fatal3
  781. elif [[ -b $path ]] ; then
  782. type='block'
  783. fatal3
  784. elif [[ ! -s $path ]] ; then
  785. type='empty'
  786. fatal3
  787. # elif [[ -f $path ]] ; then
  788. # type='regular'
  789. # fatal3
  790. fi
  791. path="$path"
  792. elif [ "$(printf '%s\n' "$path" | grep -e ^"./" -e ^"../")" ]; then
  793. if [[ -L $path ]] ; then
  794. echo $path is a symlink, following...
  795. symlinkvalue="$(readlink $path)"
  796. symlinkfullpath="$(readlink -f "$(readlink $path)")"
  797. stat -c %F "$symlinkfullpath"
  798. declare -p symlinkfullpath symlinkvalue
  799. path=$symlinkfullpath
  800. if [[ ! -e $path ]] ; then
  801. fatal
  802. elif [[ -S $path ]] ; then
  803. type='socket'
  804. fatal3
  805. elif [[ -p $path ]] ; then
  806. type='named pipe (fifo)'
  807. fatal3
  808. elif [[ -c $path ]] ; then
  809. type='character'
  810. fatal3
  811. elif [[ -b $path ]] ; then
  812. type='block'
  813. fatal3
  814. elif [[ ! -s $path ]] ; then
  815. type='empty'
  816. fatal3
  817. # elif [[ -f $path ]] ; then
  818. # type='regular'
  819. # fatal3
  820. fi
  821. elif [[ ! -e $path ]] ; then
  822. fatal
  823. elif [[ -S $path ]] ; then
  824. type='socket'
  825. fatal3
  826. elif [[ -p $path ]] ; then
  827. type='named pipe (fifo)'
  828. fatal3
  829. elif [[ -c $path ]] ; then
  830. type='character'
  831. fatal3
  832. elif [[ -b $path ]] ; then
  833. type='block'
  834. fatal3
  835. elif [[ ! -s $path ]] ; then
  836. type='empty'
  837. fatal3
  838. # elif [[ -f $path ]] ; then
  839. # type='regular'
  840. # fatal3
  841. fi
  842. echo converting "$path" to absolute path
  843. pathfile=("$(find "$path" -type f)")
  844. pathfilefull+=("$(readlink -f "${pathfile[i]}")")
  845. echo converted to absolute path
  846. path="$pathfilefull"
  847. elif [[ -f "$replacement" ]]; then
  848. : > /dev/null
  849. else
  850. fatal
  851. fi
  853. if [[ -f "$path" ]] ; then
  854. objectconvert "$path"
  855. fin
  856. compile
  857. finish
  858. exit
  859. elif [[ -f "$replacement" ]] ; then
  860. echo Warning: "$path" does not exist however "$replacement" does, using "$replacement"
  861. objectconvert "$replacement"
  862. fin
  863. compile
  864. finish
  865. exit
  866. else
  867. fatal
  868. fi
  869.  
Powered by spacepaste. Paste removal.