Prusa Slicer 2.6.0
Loading...
Searching...
No Matches
getopt.c File Reference
#include <stdio.h>
#include "getopt.h"
#include <strings.h>
+ Include dependency graph for getopt.c:

Go to the source code of this file.

Macros

#define _NO_PROTO
 
#define const
 
#define GETOPT_INTERFACE_VERSION   2
 
#define _(msgid)   (msgid)
 
#define SWAP_FLAGS(ch1, ch2)
 
#define NONOPTION_P   (argv[optind][0] != '-' || argv[optind][1] == '\0')
 

Enumerations

enum  { REQUIRE_ORDER , PERMUTE , RETURN_IN_ORDER }
 

Functions

char * getenv ()
 
static char * my_index (char *str, int chr) const
 
static void exchange (char **argv)
 
static const char * _getopt_initialize (int argc, char *const *argv, const char *optstring)
 
int _getopt_internal (int argc, char *const *argv, const char *optstring, const struct option *longopts, int *longind, int long_only)
 
int getopt (int argc, char *const *argv, const char *optstring)
 

Variables

char * optarg
 
int optind = 1
 
int __getopt_initialized
 
static char * nextchar
 
int opterr = 1
 
int optopt = '?'
 
static enum { ... }  ordering
 
static char * posixly_correct
 
static int first_nonopt
 
static int last_nonopt
 

Macro Definition Documentation

◆ _

#define _ (   msgid)    (msgid)

◆ _NO_PROTO

#define _NO_PROTO

◆ const

#define const

◆ GETOPT_INTERFACE_VERSION

#define GETOPT_INTERFACE_VERSION   2

◆ NONOPTION_P

#define NONOPTION_P   (argv[optind][0] != '-' || argv[optind][1] == '\0')

◆ SWAP_FLAGS

#define SWAP_FLAGS (   ch1,
  ch2 
)

Enumeration Type Documentation

◆ anonymous enum

anonymous enum
Enumerator
REQUIRE_ORDER 
PERMUTE 
RETURN_IN_ORDER 
189{
191} ordering;
static enum @17 ordering
@ REQUIRE_ORDER
Definition getopt.c:190
@ RETURN_IN_ORDER
Definition getopt.c:190
@ PERMUTE
Definition getopt.c:190

Function Documentation

◆ _getopt_initialize()

static const char * _getopt_initialize ( int  argc,
char *const argv,
const char *  optstring 
)
static
391{
392 /* Start processing options with ARGV-element 1 (since ARGV-element 0
393 is the program name); the sequence of previously skipped
394 non-option ARGV-elements is empty. */
395
397
398 nextchar = NULL;
399
400 posixly_correct = getenv ("POSIXLY_CORRECT");
401
402 /* Determine how to handle the ordering of options and nonoptions. */
403
404 if (optstring[0] == '-')
405 {
407 ++optstring;
408 }
409 else if (optstring[0] == '+')
410 {
412 ++optstring;
413 }
414 else if (posixly_correct != NULL)
416 else
418
419#if defined _LIBC && defined USE_NONOPTION_FLAGS
420 if (posixly_correct == NULL
421 && argc == __libc_argc && argv == __libc_argv)
422 {
423 if (nonoption_flags_max_len == 0)
424 {
425 if (__getopt_nonoption_flags == NULL
426 || __getopt_nonoption_flags[0] == '\0')
427 nonoption_flags_max_len = -1;
428 else
429 {
430 const char *orig_str = __getopt_nonoption_flags;
431 int len = nonoption_flags_max_len = strlen (orig_str);
432 if (nonoption_flags_max_len < argc)
433 nonoption_flags_max_len = argc;
434 __getopt_nonoption_flags =
435 (char *) malloc (nonoption_flags_max_len);
436 if (__getopt_nonoption_flags == NULL)
437 nonoption_flags_max_len = -1;
438 else
439 memset (__mempcpy (__getopt_nonoption_flags, orig_str, len),
440 '\0', nonoption_flags_max_len - len);
441 }
442 }
443 nonoption_flags_len = nonoption_flags_max_len;
444 }
445 else
446 nonoption_flags_len = 0;
447#endif
448
449 return optstring;
450}
void * malloc(YYSIZE_T)
static char * nextchar
Definition getopt.c:146
static int last_nonopt
Definition getopt.c:253
static int first_nonopt
Definition getopt.c:252
char * getenv()
static char * posixly_correct
Definition getopt.c:194
int optind
Definition getopt.c:131

References first_nonopt, getenv(), last_nonopt, malloc(), nextchar, optind, ordering, PERMUTE, posixly_correct, REQUIRE_ORDER, and RETURN_IN_ORDER.

Referenced by _getopt_internal().

+ Here is the call graph for this function:
+ Here is the caller graph for this function:

◆ _getopt_internal()

int _getopt_internal ( int  argc,
char *const argv,
const char *  optstring,
const struct option longopts,
int *  longind,
int  long_only 
)
516{
517 int print_errors = opterr;
518 if (optstring[0] == ':')
519 print_errors = 0;
520
521 if (argc < 1)
522 return -1;
523
524 optarg = NULL;
525
526 if (optind == 0 || !__getopt_initialized)
527 {
528 if (optind == 0)
529 optind = 1; /* Don't scan ARGV[0], the program name. */
530 optstring = _getopt_initialize (argc, argv, optstring);
532 }
533
534 /* Test whether ARGV[optind] points to a non-option argument.
535 Either it does not have option syntax, or there is an environment flag
536 from the shell indicating it is not an option. The later information
537 is only used when the used in the GNU libc. */
538#if defined _LIBC && defined USE_NONOPTION_FLAGS
539# define NONOPTION_P (argv[optind][0] != '-' || argv[optind][1] == '\0' \
540 || (optind < nonoption_flags_len \
541 && __getopt_nonoption_flags[optind] == '1'))
542#else
543# define NONOPTION_P (argv[optind][0] != '-' || argv[optind][1] == '\0')
544#endif
545
546 if (nextchar == NULL || *nextchar == '\0')
547 {
548 /* Advance to the next ARGV-element. */
549
550 /* Give FIRST_NONOPT and LAST_NONOPT rational values if OPTIND has been
551 moved back by the user (who may also have changed the arguments). */
552 if (last_nonopt > optind)
554 if (first_nonopt > optind)
556
557 if (ordering == PERMUTE)
558 {
559 /* If we have just processed some options following some non-options,
560 exchange them so that the options come first. */
561
563 exchange ((char **) argv);
564 else if (last_nonopt != optind)
566
567 /* Skip any additional non-options
568 and extend the range of non-options previously skipped. */
569
570 while (optind < argc && NONOPTION_P)
571 optind++;
573 }
574
575 /* The special ARGV-element `--' means premature end of options.
576 Skip it like a null option,
577 then exchange with previous non-options as if it were an option,
578 then skip everything else like a non-option. */
579
580 if (optind != argc && !strcmp (argv[optind], "--"))
581 {
582 optind++;
583
585 exchange ((char **) argv);
586 else if (first_nonopt == last_nonopt)
588 last_nonopt = argc;
589
590 optind = argc;
591 }
592
593 /* If we have done all the ARGV-elements, stop the scan
594 and back over any non-options that we skipped and permuted. */
595
596 if (optind == argc)
597 {
598 /* Set the next-arg-index to point at the non-options
599 that we previously skipped, so the caller will digest them. */
602 return -1;
603 }
604
605 /* If we have come to a non-option and did not permute it,
606 either stop the scan or describe it to the caller and pass it by. */
607
608 if (NONOPTION_P)
609 {
610 if (ordering == REQUIRE_ORDER)
611 return -1;
612 optarg = argv[optind++];
613 return 1;
614 }
615
616 /* We have found another option-ARGV-element.
617 Skip the initial punctuation. */
618
619 nextchar = (argv[optind] + 1
620 + (longopts != NULL && argv[optind][1] == '-'));
621 }
622
623 /* Decode the current option-ARGV-element. */
624
625 /* Check whether the ARGV-element is a long option.
626
627 If long_only and the ARGV-element has the form "-f", where f is
628 a valid short option, don't consider it an abbreviated form of
629 a long option that starts with f. Otherwise there would be no
630 way to give the -f short option.
631
632 On the other hand, if there's a long option "fubar" and
633 the ARGV-element is "-fu", do consider that an abbreviation of
634 the long option, just like "--fu", and not "-f" with arg "u".
635
636 This distinction seems to be the most useful approach. */
637
638 if (longopts != NULL
639 && (argv[optind][1] == '-'
640 || (long_only && (argv[optind][2] || !my_index (optstring, argv[optind][1])))))
641 {
642 char *nameend;
643 const struct option *p;
644 const struct option *pfound = NULL;
645 int exact = 0;
646 int ambig = 0;
647 int indfound = -1;
648 int option_index;
649
650 for (nameend = nextchar; *nameend && *nameend != '='; nameend++)
651 /* Do nothing. */ ;
652
653 /* Test all long options for either exact match
654 or abbreviated matches. */
655 for (p = longopts, option_index = 0; p->name; p++, option_index++)
656 if (!strncmp (p->name, nextchar, nameend - nextchar))
657 {
658 if ((unsigned int) (nameend - nextchar)
659 == (unsigned int) strlen (p->name))
660 {
661 /* Exact match found. */
662 pfound = p;
663 indfound = option_index;
664 exact = 1;
665 break;
666 }
667 else if (pfound == NULL)
668 {
669 /* First nonexact match found. */
670 pfound = p;
671 indfound = option_index;
672 }
673 else if (long_only
674 || pfound->has_arg != p->has_arg
675 || pfound->flag != p->flag
676 || pfound->val != p->val)
677 /* Second or later nonexact match found. */
678 ambig = 1;
679 }
680
681 if (ambig && !exact)
682 {
683 if (print_errors)
684 {
685#if defined _LIBC && defined USE_IN_LIBIO
686 char *buf;
687
688 __asprintf (&buf, _("%s: option `%s' is ambiguous\n"),
689 argv[0], argv[optind]);
690
691 if (_IO_fwide (stderr, 0) > 0)
692 __fwprintf (stderr, L"%s", buf);
693 else
694 fputs (buf, stderr);
695
696 free (buf);
697#else
698 fprintf (stderr, _("%s: option `%s' is ambiguous\n"),
699 argv[0], argv[optind]);
700#endif
701 }
702 nextchar += strlen (nextchar);
703 optind++;
704 optopt = 0;
705 return '?';
706 }
707
708 if (pfound != NULL)
709 {
710 option_index = indfound;
711 optind++;
712 if (*nameend)
713 {
714 /* Don't test has_arg with >, because some C compilers don't
715 allow it to be used on enums. */
716 if (pfound->has_arg)
717 optarg = nameend + 1;
718 else
719 {
720 if (print_errors)
721 {
722#if defined _LIBC && defined USE_IN_LIBIO
723 char *buf;
724#endif
725
726 if (argv[optind - 1][1] == '-')
727 {
728 /* --option */
729#if defined _LIBC && defined USE_IN_LIBIO
730 __asprintf (&buf, _("\
731%s: option `--%s' doesn't allow an argument\n"),
732 argv[0], pfound->name);
733#else
734 fprintf (stderr, _("\
735%s: option `--%s' doesn't allow an argument\n"),
736 argv[0], pfound->name);
737#endif
738 }
739 else
740 {
741 /* +option or -option */
742#if defined _LIBC && defined USE_IN_LIBIO
743 __asprintf (&buf, _("\
744%s: option `%c%s' doesn't allow an argument\n"),
745 argv[0], argv[optind - 1][0],
746 pfound->name);
747#else
748 fprintf (stderr, _("\
749%s: option `%c%s' doesn't allow an argument\n"),
750 argv[0], argv[optind - 1][0], pfound->name);
751#endif
752 }
753
754#if defined _LIBC && defined USE_IN_LIBIO
755 if (_IO_fwide (stderr, 0) > 0)
756 __fwprintf (stderr, L"%s", buf);
757 else
758 fputs (buf, stderr);
759
760 free (buf);
761#endif
762 }
763
764 nextchar += strlen (nextchar);
765
766 optopt = pfound->val;
767 return '?';
768 }
769 }
770 else if (pfound->has_arg == 1)
771 {
772 if (optind < argc)
773 optarg = argv[optind++];
774 else
775 {
776 if (print_errors)
777 {
778#if defined _LIBC && defined USE_IN_LIBIO
779 char *buf;
780
781 __asprintf (&buf,
782 _("%s: option `%s' requires an argument\n"),
783 argv[0], argv[optind - 1]);
784
785 if (_IO_fwide (stderr, 0) > 0)
786 __fwprintf (stderr, L"%s", buf);
787 else
788 fputs (buf, stderr);
789
790 free (buf);
791#else
792 fprintf (stderr,
793 _("%s: option `%s' requires an argument\n"),
794 argv[0], argv[optind - 1]);
795#endif
796 }
797 nextchar += strlen (nextchar);
798 optopt = pfound->val;
799 return optstring[0] == ':' ? ':' : '?';
800 }
801 }
802 nextchar += strlen (nextchar);
803 if (longind != NULL)
804 *longind = option_index;
805 if (pfound->flag)
806 {
807 *(pfound->flag) = pfound->val;
808 return 0;
809 }
810 return pfound->val;
811 }
812
813 /* Can't find it as a long option. If this is not getopt_long_only,
814 or the option starts with '--' or is not a valid short
815 option, then it's an error.
816 Otherwise interpret it as a short option. */
817 if (!long_only || argv[optind][1] == '-'
818 || my_index (optstring, *nextchar) == NULL)
819 {
820 if (print_errors)
821 {
822#if defined _LIBC && defined USE_IN_LIBIO
823 char *buf;
824#endif
825
826 if (argv[optind][1] == '-')
827 {
828 /* --option */
829#if defined _LIBC && defined USE_IN_LIBIO
830 __asprintf (&buf, _("%s: unrecognized option `--%s'\n"),
831 argv[0], nextchar);
832#else
833 fprintf (stderr, _("%s: unrecognized option `--%s'\n"),
834 argv[0], nextchar);
835#endif
836 }
837 else
838 {
839 /* +option or -option */
840#if defined _LIBC && defined USE_IN_LIBIO
841 __asprintf (&buf, _("%s: unrecognized option `%c%s'\n"),
842 argv[0], argv[optind][0], nextchar);
843#else
844 fprintf (stderr, _("%s: unrecognized option `%c%s'\n"),
845 argv[0], argv[optind][0], nextchar);
846#endif
847 }
848
849#if defined _LIBC && defined USE_IN_LIBIO
850 if (_IO_fwide (stderr, 0) > 0)
851 __fwprintf (stderr, L"%s", buf);
852 else
853 fputs (buf, stderr);
854
855 free (buf);
856#endif
857 }
858 nextchar = (char *) "";
859 optind++;
860 optopt = 0;
861 return '?';
862 }
863 }
864
865 /* Look at and handle the next short option-character. */
866
867 {
868 char c = *nextchar++;
869 char *temp = my_index (optstring, c);
870
871 /* Increment `optind' when we start to process its last character. */
872 if (*nextchar == '\0')
873 ++optind;
874
875 if (temp == NULL || c == ':')
876 {
877 if (print_errors)
878 {
879#if defined _LIBC && defined USE_IN_LIBIO
880 char *buf;
881#endif
882
883 if (posixly_correct)
884 {
885 /* 1003.2 specifies the format of this message. */
886#if defined _LIBC && defined USE_IN_LIBIO
887 __asprintf (&buf, _("%s: illegal option -- %c\n"),
888 argv[0], c);
889#else
890 fprintf (stderr, _("%s: illegal option -- %c\n"), argv[0], c);
891#endif
892 }
893 else
894 {
895#if defined _LIBC && defined USE_IN_LIBIO
896 __asprintf (&buf, _("%s: invalid option -- %c\n"),
897 argv[0], c);
898#else
899 fprintf (stderr, _("%s: invalid option -- %c\n"), argv[0], c);
900#endif
901 }
902
903#if defined _LIBC && defined USE_IN_LIBIO
904 if (_IO_fwide (stderr, 0) > 0)
905 __fwprintf (stderr, L"%s", buf);
906 else
907 fputs (buf, stderr);
908
909 free (buf);
910#endif
911 }
912 optopt = c;
913 return '?';
914 }
915 /* Convenience. Treat POSIX -W foo same as long option --foo */
916 if (temp[0] == 'W' && temp[1] == ';')
917 {
918 char *nameend;
919 const struct option *p;
920 const struct option *pfound = NULL;
921 int exact = 0;
922 int ambig = 0;
923 int indfound = 0;
924 int option_index;
925
926 /* This is an option that requires an argument. */
927 if (*nextchar != '\0')
928 {
930 /* If we end this ARGV-element by taking the rest as an arg,
931 we must advance to the next element now. */
932 optind++;
933 }
934 else if (optind == argc)
935 {
936 if (print_errors)
937 {
938 /* 1003.2 specifies the format of this message. */
939#if defined _LIBC && defined USE_IN_LIBIO
940 char *buf;
941
942 __asprintf (&buf, _("%s: option requires an argument -- %c\n"),
943 argv[0], c);
944
945 if (_IO_fwide (stderr, 0) > 0)
946 __fwprintf (stderr, L"%s", buf);
947 else
948 fputs (buf, stderr);
949
950 free (buf);
951#else
952 fprintf (stderr, _("%s: option requires an argument -- %c\n"),
953 argv[0], c);
954#endif
955 }
956 optopt = c;
957 if (optstring[0] == ':')
958 c = ':';
959 else
960 c = '?';
961 return c;
962 }
963 else
964 /* We already incremented `optind' once;
965 increment it again when taking next ARGV-elt as argument. */
966 optarg = argv[optind++];
967
968 /* optarg is now the argument, see if it's in the
969 table of longopts. */
970
971 for (nextchar = nameend = optarg; *nameend && *nameend != '='; nameend++)
972 /* Do nothing. */ ;
973
974 /* Test all long options for either exact match
975 or abbreviated matches. */
976 for (p = longopts, option_index = 0; p->name; p++, option_index++)
977 if (!strncmp (p->name, nextchar, nameend - nextchar))
978 {
979 if ((unsigned int) (nameend - nextchar) == strlen (p->name))
980 {
981 /* Exact match found. */
982 pfound = p;
983 indfound = option_index;
984 exact = 1;
985 break;
986 }
987 else if (pfound == NULL)
988 {
989 /* First nonexact match found. */
990 pfound = p;
991 indfound = option_index;
992 }
993 else
994 /* Second or later nonexact match found. */
995 ambig = 1;
996 }
997 if (ambig && !exact)
998 {
999 if (print_errors)
1000 {
1001#if defined _LIBC && defined USE_IN_LIBIO
1002 char *buf;
1003
1004 __asprintf (&buf, _("%s: option `-W %s' is ambiguous\n"),
1005 argv[0], argv[optind]);
1006
1007 if (_IO_fwide (stderr, 0) > 0)
1008 __fwprintf (stderr, L"%s", buf);
1009 else
1010 fputs (buf, stderr);
1011
1012 free (buf);
1013#else
1014 fprintf (stderr, _("%s: option `-W %s' is ambiguous\n"),
1015 argv[0], argv[optind]);
1016#endif
1017 }
1018 nextchar += strlen (nextchar);
1019 optind++;
1020 return '?';
1021 }
1022 if (pfound != NULL)
1023 {
1024 option_index = indfound;
1025 if (*nameend)
1026 {
1027 /* Don't test has_arg with >, because some C compilers don't
1028 allow it to be used on enums. */
1029 if (pfound->has_arg)
1030 optarg = nameend + 1;
1031 else
1032 {
1033 if (print_errors)
1034 {
1035#if defined _LIBC && defined USE_IN_LIBIO
1036 char *buf;
1037
1038 __asprintf (&buf, _("\
1039%s: option `-W %s' doesn't allow an argument\n"),
1040 argv[0], pfound->name);
1041
1042 if (_IO_fwide (stderr, 0) > 0)
1043 __fwprintf (stderr, L"%s", buf);
1044 else
1045 fputs (buf, stderr);
1046
1047 free (buf);
1048#else
1049 fprintf (stderr, _("\
1050%s: option `-W %s' doesn't allow an argument\n"),
1051 argv[0], pfound->name);
1052#endif
1053 }
1054
1055 nextchar += strlen (nextchar);
1056 return '?';
1057 }
1058 }
1059 else if (pfound->has_arg == 1)
1060 {
1061 if (optind < argc)
1062 optarg = argv[optind++];
1063 else
1064 {
1065 if (print_errors)
1066 {
1067#if defined _LIBC && defined USE_IN_LIBIO
1068 char *buf;
1069
1070 __asprintf (&buf, _("\
1071%s: option `%s' requires an argument\n"),
1072 argv[0], argv[optind - 1]);
1073
1074 if (_IO_fwide (stderr, 0) > 0)
1075 __fwprintf (stderr, L"%s", buf);
1076 else
1077 fputs (buf, stderr);
1078
1079 free (buf);
1080#else
1081 fprintf (stderr,
1082 _("%s: option `%s' requires an argument\n"),
1083 argv[0], argv[optind - 1]);
1084#endif
1085 }
1086 nextchar += strlen (nextchar);
1087 return optstring[0] == ':' ? ':' : '?';
1088 }
1089 }
1090 nextchar += strlen (nextchar);
1091 if (longind != NULL)
1092 *longind = option_index;
1093 if (pfound->flag)
1094 {
1095 *(pfound->flag) = pfound->val;
1096 return 0;
1097 }
1098 return pfound->val;
1099 }
1100 nextchar = NULL;
1101 return 'W'; /* Let the application handle it. */
1102 }
1103 if (temp[1] == ':')
1104 {
1105 if (temp[2] == ':')
1106 {
1107 /* This is an option that accepts an argument optionally. */
1108 if (*nextchar != '\0')
1109 {
1110 optarg = nextchar;
1111 optind++;
1112 }
1113 else
1114 optarg = NULL;
1115 nextchar = NULL;
1116 }
1117 else
1118 {
1119 /* This is an option that requires an argument. */
1120 if (*nextchar != '\0')
1121 {
1122 optarg = nextchar;
1123 /* If we end this ARGV-element by taking the rest as an arg,
1124 we must advance to the next element now. */
1125 optind++;
1126 }
1127 else if (optind == argc)
1128 {
1129 if (print_errors)
1130 {
1131 /* 1003.2 specifies the format of this message. */
1132#if defined _LIBC && defined USE_IN_LIBIO
1133 char *buf;
1134
1135 __asprintf (&buf,
1136 _("%s: option requires an argument -- %c\n"),
1137 argv[0], c);
1138
1139 if (_IO_fwide (stderr, 0) > 0)
1140 __fwprintf (stderr, L"%s", buf);
1141 else
1142 fputs (buf, stderr);
1143
1144 free (buf);
1145#else
1146 fprintf (stderr,
1147 _("%s: option requires an argument -- %c\n"),
1148 argv[0], c);
1149#endif
1150 }
1151 optopt = c;
1152 if (optstring[0] == ':')
1153 c = ':';
1154 else
1155 c = '?';
1156 }
1157 else
1158 /* We already incremented `optind' once;
1159 increment it again when taking next ARGV-elt as argument. */
1160 optarg = argv[optind++];
1161 nextchar = NULL;
1162 }
1163 }
1164 return c;
1165 }
1166}
void free(void *)
int __getopt_initialized
Definition getopt.c:137
static void exchange(char **argv)
Definition getopt.c:302
int optopt
Definition getopt.c:157
static const char * _getopt_initialize(int argc, char *const *argv, const char *optstring)
Definition getopt.c:387
#define NONOPTION_P
#define _(msgid)
Definition getopt.c:87
static char * my_index(char *str, int chr) const
Definition getopt.c:219
char * optarg
Definition getopt.c:116
int opterr
Definition getopt.c:151
int val
Definition getopt.h:112
int has_arg
Definition getopt.h:110
char * name
Definition getopt.h:106
int * flag
Definition getopt.h:111
Definition getopt.h:102
#define L(s)
Definition I18N.hpp:18

References _, __getopt_initialized, _getopt_initialize(), exchange(), first_nonopt, option::flag, free(), option::has_arg, L, last_nonopt, my_index(), option::name, nextchar, NONOPTION_P, optarg, opterr, optind, optopt, ordering, PERMUTE, posixly_correct, REQUIRE_ORDER, and option::val.

+ Here is the call graph for this function:

◆ exchange()

static void exchange ( char **  argv)
static
304{
305 int bottom = first_nonopt;
306 int middle = last_nonopt;
307 int top = optind;
308 char *tem;
309
310 /* Exchange the shorter segment with the far end of the longer segment.
311 That puts the shorter segment into the right place.
312 It leaves the longer segment in the right place overall,
313 but it consists of two parts that need to be swapped next. */
314
315#if defined _LIBC && defined USE_NONOPTION_FLAGS
316 /* First make sure the handling of the `__getopt_nonoption_flags'
317 string can work normally. Our top argument must be in the range
318 of the string. */
319 if (nonoption_flags_len > 0 && top >= nonoption_flags_max_len)
320 {
321 /* We must extend the array. The user plays games with us and
322 presents new arguments. */
323 char *new_str = malloc (top + 1);
324 if (new_str == NULL)
325 nonoption_flags_len = nonoption_flags_max_len = 0;
326 else
327 {
328 memset (__mempcpy (new_str, __getopt_nonoption_flags,
329 nonoption_flags_max_len),
330 '\0', top + 1 - nonoption_flags_max_len);
331 nonoption_flags_max_len = top + 1;
332 __getopt_nonoption_flags = new_str;
333 }
334 }
335#endif
336
337 while (top > middle && middle > bottom)
338 {
339 if (top - middle > middle - bottom)
340 {
341 /* Bottom segment is the short one. */
342 int len = middle - bottom;
343 register int i;
344
345 /* Swap it with the top part of the top segment. */
346 for (i = 0; i < len; i++)
347 {
348 tem = argv[bottom + i];
349 argv[bottom + i] = argv[top - (middle - bottom) + i];
350 argv[top - (middle - bottom) + i] = tem;
351 SWAP_FLAGS (bottom + i, top - (middle - bottom) + i);
352 }
353 /* Exclude the moved bottom segment from further swapping. */
354 top -= len;
355 }
356 else
357 {
358 /* Top segment is the short one. */
359 int len = top - middle;
360 register int i;
361
362 /* Swap it with the bottom part of the bottom segment. */
363 for (i = 0; i < len; i++)
364 {
365 tem = argv[bottom + i];
366 argv[bottom + i] = argv[middle + i];
367 argv[middle + i] = tem;
368 SWAP_FLAGS (bottom + i, middle + i);
369 }
370 /* Exclude the moved top segment from further swapping. */
371 bottom += len;
372 }
373 }
374
375 /* Update records for the slots the non-options now occupy. */
376
379}
#define SWAP_FLAGS(ch1, ch2)
Definition getopt.c:285

References first_nonopt, last_nonopt, malloc(), optind, and SWAP_FLAGS.

Referenced by _getopt_internal().

+ Here is the call graph for this function:
+ Here is the caller graph for this function:

◆ getenv()

char * getenv ( )

Referenced by Slic3r::CurlGlobalInit::CurlGlobalInit(), _getopt_initialize(), Slic3r::detect_platform(), run_script(), and Slic3r::Http::tls_system_cert_store().

+ Here is the caller graph for this function:

◆ getopt()

int getopt ( int  argc,
char *const argv,
const char *  optstring 
)
1173{
1174 return _getopt_internal (argc, argv, optstring,
1175 (const struct option *) 0,
1176 (int *) 0,
1177 0);
1178}
int _getopt_internal()

References _getopt_internal().

+ Here is the call graph for this function:

◆ my_index()

static char * my_index ( char *  str,
int  chr 
) const
static
222{
223 while (*str)
224 {
225 if (*str == chr)
226 return (char *) str;
227 str++;
228 }
229 return 0;
230}

Referenced by _getopt_internal().

+ Here is the caller graph for this function:

Variable Documentation

◆ __getopt_initialized

int __getopt_initialized

Referenced by _getopt_internal().

◆ first_nonopt

int first_nonopt
static

◆ last_nonopt

int last_nonopt
static

◆ nextchar

char* nextchar
static

◆ optarg

char* optarg

Referenced by _getopt_internal(), and avrdude_main().

◆ opterr

int opterr = 1

Referenced by _getopt_internal().

◆ optind

int optind = 1

◆ optopt

int optopt = '?'

Referenced by _getopt_internal().

◆ []

◆ posixly_correct

char* posixly_correct
static