FilesExpand file tree

 basic_repl_error_reporting

/

getopt.c

Copy path

Blame

More file actions

Blame

More file actions

Latest commit

 

History

History

History

163 lines (139 loc) · 4.56 KB

 basic_repl_error_reporting

/

getopt.c

Copy path

Top

File metadata and controls

• Code
• Blame

163 lines (139 loc) · 4.56 KB

Raw

Copy raw file

Download raw file

Open symbols panel

Edit and raw actions

1

2

3

4

5

6

7

8

9

10

11

12

13

14

15

16

17

18

19

20

21

22

23

24

25

26

27

28

29

30

31

32

33

34

35

36

37

38

39

40

41

42

43

44

45

46

47

48

49

50

51

52

53

54

55

56

57

58

59

60

61

62

63

64

65

66

67

68

69

70

71

72

73

74

75

76

77

78

79

80

81

82

83

84

85

86

87

88

89

90

91

92

93

94

95

96

97

98

99

100

101

102

103

104

105

106

107

108

109

110

111

112

113

114

115

116

117

118

119

120

121

122

123

124

125

126

127

128

129

130

131

132

133

134

135

136

137

138

139

140

141

142

143

144

145

146

147

148

149

150

151

152

153

154

155

156

157

158

159

160

161

162

163

/*---------------------------------------------------------------------------*

* <RCS keywords>

*

* C++ Library

*

* Copyright 1992-1994, David Gottner

*

* All Rights Reserved

*

* Permission to use, copy, modify, and distribute this software and its

* documentation for any purpose and without fee is hereby granted,

* provided that the above copyright notice, this permission notice and

* the following disclaimer notice appear unmodified in all copies.

*

* I DISCLAIM ALL WARRANTIES WITH REGARD TO THIS SOFTWARE, INCLUDING ALL

* IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL I

* BE LIABLE FOR ANY SPECIAL, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY

* DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE, DATA, OR PROFITS, WHETHER

* IN AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT

* OF OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.

*---------------------------------------------------------------------------*/

/* Modified to support --help and --version, as well as /? on Windows

* by Georg Brandl. */

#include <Python.h>

#include <stdio.h>

#include <string.h>

#include <wchar.h>

#include "pycore_getopt.h"

int _PyOS_opterr = 1; /* generate error messages */

Py_ssize_t _PyOS_optind = 1; /* index into argv array */

const wchar_t *_PyOS_optarg = NULL; /* optional argument */

static const wchar_t *opt_ptr = L"";

/* Python command line short and long options */

#define SHORT_OPTS L"bBc:dEhiIm:OPqRsStuvVW:xX:?"

static const _PyOS_LongOption longopts[] = {

/* name, has_arg, val (used in switch in initconfig.c) */

{L"check-hash-based-pycs", 1, 0},

{L"help-all", 0, 1},

{L"help-env", 0, 2},

{L"help-xoptions", 0, 3},

{NULL, 0, -1}, /* sentinel */

};

void _PyOS_ResetGetOpt(void)

{

_PyOS_opterr = 1;

_PyOS_optind = 1;

_PyOS_optarg = NULL;

opt_ptr = L"";

}

int _PyOS_GetOpt(Py_ssize_t argc, wchar_t * const *argv, int *longindex)

{

wchar_t *ptr;

wchar_t option;

if (*opt_ptr == '\0') {

if (_PyOS_optind >= argc)

return -1;

#ifdef MS_WINDOWS

else if (wcscmp(argv[_PyOS_optind], L"/?") == 0) {

++_PyOS_optind;

return 'h';

}

#endif

else if (argv[_PyOS_optind][0] != L'-' ||

argv[_PyOS_optind][1] == L'\0' /* lone dash */ )

return -1;

else if (wcscmp(argv[_PyOS_optind], L"--") == 0) {

++_PyOS_optind;

return -1;

}

else if (wcscmp(argv[_PyOS_optind], L"--help") == 0) {

++_PyOS_optind;

return 'h';

}

else if (wcscmp(argv[_PyOS_optind], L"--version") == 0) {

++_PyOS_optind;

return 'V';

}

opt_ptr = &argv[_PyOS_optind++][1];

}

if ((option = *opt_ptr++) == L'\0')

return -1;

if (option == L'-') {

// Parse long option.

if (*opt_ptr == L'\0') {

if (_PyOS_opterr) {

fprintf(stderr, "Expected long option\n");

}

return -1;

}

*longindex = 0;

const _PyOS_LongOption *opt;

for (opt = &longopts[*longindex]; opt->name; opt = &longopts[++(*longindex)]) {

if (!wcscmp(opt->name, opt_ptr))

break;

}

if (!opt->name) {

if (_PyOS_opterr) {

fprintf(stderr, "Unknown option: %ls\n", argv[_PyOS_optind - 1]);

}

return '_';

}

opt_ptr = L"";

if (!opt->has_arg) {

return opt->val;

}

if (_PyOS_optind >= argc) {

if (_PyOS_opterr) {

fprintf(stderr, "Argument expected for the %ls options\n",

argv[_PyOS_optind - 1]);

}

return '_';

}

_PyOS_optarg = argv[_PyOS_optind++];

return opt->val;

}

if ((ptr = wcschr(SHORT_OPTS, option)) == NULL) {

if (_PyOS_opterr) {

fprintf(stderr, "Unknown option: -%c\n", (char)option);

}

return '_';

}

if (*(ptr + 1) == L':') {

if (*opt_ptr != L'\0') {

_PyOS_optarg = opt_ptr;

opt_ptr = L"";

}

else {

if (_PyOS_optind >= argc) {

if (_PyOS_opterr) {

fprintf(stderr,

"Argument expected for the -%c option\n", (char)option);

}

return '_';

}

_PyOS_optarg = argv[_PyOS_optind++];

}

}

return option;

}