Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP

Loading…

win32 support for fping #43

Open
wants to merge 5 commits into from

4 participants

@liudongmiao

No description provided.

@liudongmiao liudongmiao commented on the diff
src/fping.c
@@ -390,6 +533,12 @@ int main( int argc, char **argv )
#endif
HOST_ENTRY *cursor;
+#ifdef _WIN32

microsoft particular code for socket.

Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment
@liudongmiao liudongmiao commented on the diff
src/fping.c
@@ -645,8 +794,13 @@ int main( int argc, char **argv )
case 'S':
#ifndef IPV6
+#ifndef _WIN32

inet_pton is not for windows xp

Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment
@liudongmiao liudongmiao commented on the diff
src/fping.c
@@ -1028,8 +1182,12 @@ void add_cidr(char *addr)
struct in_addr in_addr_tmp;
char buffer[20];
in_addr_tmp.s_addr = htonl(net_addr);
+#ifndef _WIN32

inet_ntop is not for windows xp.

Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment
@liudongmiao liudongmiao commented on the diff
src/getopt.c
@@ -0,0 +1,567 @@

copy from android, bionic's libc/unistd/getopt_long.c

Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment
@schweikert schweikert commented on the diff
src/fping.c
@@ -37,6 +37,147 @@
/* if compiling for Windows, use this separate set
(too difficult to ifdef all the autoconf defines) */
+#ifdef _WIN32
+#define WIN32
+#undef UNICODE
+#include <winsock2.h>
+#include <ws2tcpip.h>
+#include <stdio.h>
@schweikert Owner

While I really appreciate the effort, this really doesn't seem right. Win32 support should be added in the autoconf scripts. It's more work, but it's the right way.

Er, er, just as the original comment:
if compiling for Windows, use this separate set
(too difficult to ifdef all the autoconf defines)

For windows, or Android (yes, its linux), there is no necessary to run configure.
As for windows or android, usually there is no autoconf, no way to run configure.
There is NMakefile, windows users can just run `nmake', which is part of Microsoft Visual Studio.
In that days I even wanted to provided a Microsoft Visual Studio project file, however, I didn't.

And when I check the original fping, there is linux.h.
So it should be better to split them from fping.c to win32.h, just as:
liudongmiao/fping-win32@9d226a5

However, currently autoconf/configure is used to generate version number too.
So there should somewhere to define version number if we dont want to autoconf.
// actually, there is predefine version number in autoconf/configure too.

Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment
@Wintereise

Did this ever end up going anywhere?

@liudongmiao

After schweikert's idea, i just use another project, fping-win32, http://github.com/liudongmiao/fping-win32, based on the original source code, only add win32 support. However, I'm not using win32.

@Wintereise
@shadowclaw

just found the fping-win32 project, compiled using nmake from visual studio. Thank you for this, all the other win32 fping.exe programs I've found don't have the easy to parse output like this and the linux version do. Saved me a lot of time.

Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment
This page is out of date. Refresh to see the latest.
Showing with 818 additions and 0 deletions.
  1. +13 −0 src/NMakefile
  2. +238 −0 src/fping.c
  3. +567 −0 src/getopt.c
View
13 src/NMakefile
@@ -0,0 +1,13 @@
+default: fping.exe
+
+LINK = link
+
+.c.obj:
+ $(CC) /c $(CFLAGS) /DSUPPORTXP /W4 /nologo $*.c
+
+fping.exe: fping.obj getopt.obj
+ $(LINK) /nologo /OUT:$@ $**
+ -del *.obj
+
+clean:
+ -del /s /q *.obj fping.exe >NUL 2>NUL
View
238 src/fping.c
@@ -37,6 +37,147 @@ extern "C"
/* if compiling for Windows, use this separate set
(too difficult to ifdef all the autoconf defines) */
+#ifdef _WIN32
+#define WIN32
+#undef UNICODE
+#include <winsock2.h>
+#include <ws2tcpip.h>
+#include <stdio.h>
@schweikert Owner

While I really appreciate the effort, this really doesn't seem right. Win32 support should be added in the autoconf scripts. It's more work, but it's the right way.

Er, er, just as the original comment:
if compiling for Windows, use this separate set
(too difficult to ifdef all the autoconf defines)

For windows, or Android (yes, its linux), there is no necessary to run configure.
As for windows or android, usually there is no autoconf, no way to run configure.
There is NMakefile, windows users can just run `nmake', which is part of Microsoft Visual Studio.
In that days I even wanted to provided a Microsoft Visual Studio project file, however, I didn't.

And when I check the original fping, there is linux.h.
So it should be better to split them from fping.c to win32.h, just as:
liudongmiao/fping-win32@9d226a5

However, currently autoconf/configure is used to generate version number too.
So there should somewhere to define version number if we dont want to autoconf.
// actually, there is predefine version number in autoconf/configure too.

Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment
+#include <errno.h>
+#include <signal.h>
+#include <stddef.h>
+#include <time.h>
+
+#define VERSION "3.4"
+#pragma comment(lib, "ws2_32.lib")
+
+#define snprintf _snprintf
+#define getpid GetCurrentThreadId
+#define h_errno WSAGetLastError()
+#define srandom srand
+#define random rand
+
+struct timezone {
+ int tz_minuteswest;
+ int tz_dsttime;
+};
+static int gettimeofday(struct timeval* tv, struct timezone *tz);
+
+/* copy from mac os x */
+#define LITTLE_ENDIAN 1234
+#define BIG_ENDIAN 3421
+#define BYTE_ORDER LITTLE_ENDIAN
+
+typedef unsigned short n_short;
+typedef unsigned short u_int16_t;
+typedef unsigned int n_time;
+typedef unsigned int u_int32_t;
+typedef unsigned int uid_t;
+
+struct ip {
+#ifdef _IP_VHL
+ u_char ip_vhl; /* version << 4 | header length >> 2 */
+#else
+#if BYTE_ORDER == LITTLE_ENDIAN
+ u_int ip_hl:4, /* header length */
+ ip_v:4; /* version */
+#endif
+#if BYTE_ORDER == BIG_ENDIAN
+ u_int ip_v:4, /* version */
+ ip_hl:4; /* header length */
+#endif
+#endif /* not _IP_VHL */
+ u_char ip_tos; /* type of service */
+ u_short ip_len; /* total length */
+ u_short ip_id; /* identification */
+ u_short ip_off; /* fragment offset field */
+#define IP_RF 0x8000 /* reserved fragment flag */
+#define IP_DF 0x4000 /* dont fragment flag */
+#define IP_MF 0x2000 /* more fragments flag */
+#define IP_OFFMASK 0x1fff /* mask for fragmenting bits */
+ u_char ip_ttl; /* time to live */
+ u_char ip_p; /* protocol */
+ u_short ip_sum; /* checksum */
+ struct in_addr ip_src,ip_dst; /* source and dest address */
+};
+
+struct icmp {
+ u_char icmp_type; /* type of message, see below */
+ u_char icmp_code; /* type sub code */
+ u_short icmp_cksum; /* ones complement cksum of struct */
+ union {
+ u_char ih_pptr; /* ICMP_PARAMPROB */
+ struct in_addr ih_gwaddr; /* ICMP_REDIRECT */
+ struct ih_idseq {
+ n_short icd_id;
+ n_short icd_seq;
+ } ih_idseq;
+ int ih_void;
+
+ /* ICMP_UNREACH_NEEDFRAG -- Path MTU Discovery (RFC1191) */
+ struct ih_pmtu {
+ n_short ipm_void;
+ n_short ipm_nextmtu;
+ } ih_pmtu;
+
+ struct ih_rtradv {
+ u_char irt_num_addrs;
+ u_char irt_wpa;
+ u_int16_t irt_lifetime;
+ } ih_rtradv;
+ } icmp_hun;
+#define icmp_pptr icmp_hun.ih_pptr
+#define icmp_gwaddr icmp_hun.ih_gwaddr
+#define icmp_id icmp_hun.ih_idseq.icd_id
+#define icmp_seq icmp_hun.ih_idseq.icd_seq
+#define icmp_void icmp_hun.ih_void
+#define icmp_pmvoid icmp_hun.ih_pmtu.ipm_void
+#define icmp_nextmtu icmp_hun.ih_pmtu.ipm_nextmtu
+#define icmp_num_addrs icmp_hun.ih_rtradv.irt_num_addrs
+#define icmp_wpa icmp_hun.ih_rtradv.irt_wpa
+#define icmp_lifetime icmp_hun.ih_rtradv.irt_lifetime
+ union {
+ struct id_ts {
+ n_time its_otime;
+ n_time its_rtime;
+ n_time its_ttime;
+ } id_ts;
+ struct id_ip {
+ struct ip idi_ip;
+ /* options and then 64 bits of data */
+ } id_ip;
+ // struct icmp_ra_addr id_radv;
+ u_int32_t id_mask;
+ char id_data[1];
+ } icmp_dun;
+#define icmp_otime icmp_dun.id_ts.its_otime
+#define icmp_rtime icmp_dun.id_ts.its_rtime
+#define icmp_ttime icmp_dun.id_ts.its_ttime
+#define icmp_ip icmp_dun.id_ip.idi_ip
+#define icmp_radv icmp_dun.id_radv
+#define icmp_mask icmp_dun.id_mask
+#define icmp_data icmp_dun.id_data
+};
+
+#define ICMP_MINLEN 8
+#define ICMP_ECHOREPLY 0 /* echo reply */
+#define ICMP_UNREACH 3 /* dest unreachable, codes: */
+#define ICMP_SOURCEQUENCH 4 /* packet lost, slow down */
+#define ICMP_REDIRECT 5 /* shorter route, codes: */
+#define ICMP_ALTHOSTADDR 6 /* alternate host address */
+#define ICMP_ECHO 8 /* echo service */
+#define ICMP_ROUTERADVERT 9 /* router advertisement */
+#define ICMP_ROUTERSOLICIT 10 /* router solicitation */
+#define ICMP_TIMXCEED 11 /* time exceeded, code: */
+#define ICMP_PARAMPROB 12 /* ip header bad */
+#define ICMP_TSTAMP 13 /* timestamp request */
+#define ICMP_TSTAMPREPLY 14 /* timestamp reply */
+#define ICMP_IREQ 15 /* information request */
+#define ICMP_IREQREPLY 16 /* information reply */
+#define ICMP_MASKREQ 17 /* address mask request */
+#define ICMP_MASKREPLY 18 /* address mask reply */
+#endif
+
#ifdef WIN32
/*** Windows includes ***/
@@ -102,7 +243,9 @@ extern "C"
extern char *optarg;
extern int optind,opterr;
+#ifndef _WIN32
extern int h_errno;
+#endif
#ifdef __cplusplus
}
@@ -390,6 +533,12 @@ int main( int argc, char **argv )
#endif
HOST_ENTRY *cursor;
+#ifdef _WIN32

microsoft particular code for socket.

Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment
+ WSADATA wsaData;
+ if (0 != WSAStartup(MAKEWORD(2, 2), &wsaData)) {
+ errno_crash_and_burn( "can't wsastartup" );
+ }
+#endif
prog = argv[0];
/* confirm that ICMP is available on this machine */
@@ -645,8 +794,13 @@ int main( int argc, char **argv )
case 'S':
#ifndef IPV6
+#ifndef _WIN32

inet_pton is not for windows xp

Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment
if( ! inet_pton( AF_INET, optarg, &src_addr ) )
#else
+ src_addr.s_addr = inet_addr( optarg );
+ if ( src_addr.s_addr == INADDR_NONE || src_addr.s_addr == INADDR_ANY )
+#endif
+#else
if( ! inet_pton( AF_INET6, optarg, &src_addr ) )
#endif
usage(1);
@@ -1028,8 +1182,12 @@ void add_cidr(char *addr)
struct in_addr in_addr_tmp;
char buffer[20];
in_addr_tmp.s_addr = htonl(net_addr);
+#ifndef _WIN32

inet_ntop is not for windows xp.

Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment
inet_ntop(AF_INET, &in_addr_tmp, buffer, sizeof(buffer));
add_name(buffer);
+#else
+ add_name(inet_ntoa(in_addr_tmp));
+#endif
}
freeaddrinfo(addr_res);
@@ -1078,8 +1236,12 @@ void add_range(char *start, char *end)
struct in_addr in_addr_tmp;
char buffer[20];
in_addr_tmp.s_addr = htonl(start_long);
+#ifndef _WIN32
inet_ntop(AF_INET, &in_addr_tmp, buffer, sizeof(buffer));
add_name(buffer);
+#else
+ add_name(inet_ntoa(in_addr_tmp));
+#endif
start_long++;
}
}
@@ -2839,3 +3001,79 @@ void usage(int is_error)
fprintf(out, "\n");
exit(is_error);
} /* usage() */
+
+#ifdef _WIN32
+
+#ifndef SUPPORTXP
+/*
+ * GetSystemTimeAsFileTime under windows xp has a accuracy of 10-16ms.
+ */
+static int gettimeofday(struct timeval* tv, struct timezone *tz)
+{
+ FILETIME ft;
+ ULARGE_INTEGER epoch, ts;
+
+ // 100-nanosecond since January 1, 1601 (UTC).
+ GetSystemTimeAsFileTime(&ft);
+
+ // Jan 1, 1970 (UTC).
+ epoch.LowPart = 0xD53E8000;
+ epoch.HighPart = 0x19DB1DE;
+
+ ts.LowPart = ft.dwLowDateTime;
+ ts.HighPart = ft.dwHighDateTime;
+ ts.QuadPart -= epoch.QuadPart;
+
+ tv->tv_usec = (ts.QuadPart / 10) % 1000000;
+ tv->tv_sec = (long)(ts.QuadPart / 10000000);
+ return 0;
+}
+#else
+/*
+ * As GetSystemTimeAsFileTime under windows xp has a accuracy of 10-16ms,
+ * so I decides to use QueryPerformanceCounter/QueryPerformanceFrequency.
+ * */
+static int gettimeofday(struct timeval* tv, struct timezone *tz)
+{
+ ULONGLONG usec;
+ LARGE_INTEGER now;
+ static LARGE_INTEGER start, time = {0}, freq = {0};
+
+ while (freq.QuadPart == 0) {
+ QueryPerformanceFrequency(&freq);
+ QueryPerformanceCounter(&start);
+ {
+ FILETIME ft;
+ ULARGE_INTEGER epoch, ts;
+
+ // 100-nanosecond since January 1, 1601 (UTC).
+ GetSystemTimeAsFileTime(&ft);
+
+ // Jan 1, 1970 (UTC).
+ epoch.LowPart = 0xD53E8000;
+ epoch.HighPart = 0x19DB1DE;
+
+ ts.LowPart = ft.dwLowDateTime;
+ ts.HighPart = ft.dwHighDateTime;
+ time.QuadPart = ts.QuadPart - epoch.QuadPart;
+ }
+ }
+
+ QueryPerformanceCounter(&now);
+ usec = time.QuadPart + 10000000 * (now.QuadPart - start.QuadPart) / freq.QuadPart;
+ tv->tv_usec = (usec / 10) % 1000000;
+ tv->tv_sec = (long)(usec / 10000000);
+ return 0;
+}
+#endif
+
+static int getuid()
+{
+ return 0;
+}
+
+static int seteuid(uid_t euid)
+{
+ return 0;
+}
+#endif
View
567 src/getopt.c
@@ -0,0 +1,567 @@
+/* $OpenBSD: getopt_long.c,v 1.20 2005/10/25 15:49:37 jmc Exp $ */
+/* $NetBSD: getopt_long.c,v 1.15 2002/01/31 22:43:40 tv Exp $ */
+
+/*
+ * Copyright (c) 2002 Todd C. Miller <Todd.Miller@courtesan.com>
+ *
+ * Permission to use, copy, modify, and distribute this software for any
+ * purpose with or without fee is hereby granted, provided that the above
+ * copyright notice and this permission notice appear in all copies.
+ *
+ * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
+ * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
+ * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
+ * ANY SPECIAL, DIRECT, 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.
+ *
+ * Sponsored in part by the Defense Advanced Research Projects
+ * Agency (DARPA) and Air Force Research Laboratory, Air Force
+ * Materiel Command, USAF, under agreement number F39502-99-1-0512.
+ */
+/*-
+ * Copyright (c) 2000 The NetBSD Foundation, Inc.
+ * All rights reserved.
+ *
+ * This code is derived from software contributed to The NetBSD Foundation
+ * by Dieter Baron and Thomas Klausner.
+ *
+ * Redistribution and use in source and binary forms, with or without
+ * modification, are permitted provided that the following conditions
+ * are met:
+ * 1. Redistributions of source code must retain the above copyright
+ * notice, this list of conditions and the following disclaimer.
+ * 2. Redistributions in binary form must reproduce the above copyright
+ * notice, this list of conditions and the following disclaimer in the
+ * documentation and/or other materials provided with the distribution.
+ * 3. All advertising materials mentioning features or use of this software
+ * must display the following acknowledgement:
+ * This product includes software developed by the NetBSD
+ * Foundation, Inc. and its contributors.
+ * 4. Neither the name of The NetBSD Foundation nor the names of its
+ * contributors may be used to endorse or promote products derived
+ * from this software without specific prior written permission.
+ *
+ * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
+ * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
+ * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
+ * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
+ * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
+ * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
+ * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
+ * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
+ * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
+ * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
+ * POSSIBILITY OF SUCH DAMAGE.
+ */
+
+#ifdef _WIN32
+#if 0
+#include <err.h>
+#include <errno.h>
+#include <getopt.h>
+#include <stdlib.h>
+#include <string.h>
+#endif
+#include <stdio.h>
+
+#define REPLACE_GETOPT /* use this getopt as the system getopt(3) */
+
+#ifdef REPLACE_GETOPT
+int opterr = 1; /* if error message should be printed */
+int optind = 1; /* index into parent argv vector */
+int optopt = '?'; /* character checked for validity */
+char *optarg; /* argument associated with option */
+#endif
+int optreset; /* reset getopt */
+
+#define PRINT_ERROR ((opterr) && (*options != ':'))
+
+#define FLAG_PERMUTE 0x01 /* permute non-options to the end of argv */
+#define FLAG_ALLARGS 0x02 /* treat non-options as args to option "-1" */
+#define FLAG_LONGONLY 0x04 /* operate as getopt_long_only */
+
+/* return values */
+#define BADCH (int)'?'
+#define BADARG ((*options == ':') ? (int)':' : (int)'?')
+#define INORDER (int)1
+
+#define EMSG ""
+
+static int getopt_internal(int, char * const *, const char *,
+ const struct option *, int *, int);
+static int parse_long_options(char * const *, const char *,
+ const struct option *, int *, int);
+static int gcd(int, int);
+static void permute_args(int, int, int, char * const *);
+
+static char *place = EMSG; /* option letter processing */
+
+/* XXX: set optreset to 1 rather than these two */
+static int nonopt_start = -1; /* first non option argument (for permute) */
+static int nonopt_end = -1; /* first option after non options (for permute) */
+
+/* Error messages */
+static const char recargchar[] = "option requires an argument -- %c";
+static const char recargstring[] = "option requires an argument -- %s";
+static const char ambig[] = "ambiguous option -- %.*s";
+static const char noarg[] = "option doesn't take an argument -- %.*s";
+static const char illoptchar[] = "unknown option -- %c";
+static const char illoptstring[] = "unknown option -- %s";
+
+#define no_argument 0
+#define required_argument 1
+#define optional_argument 2
+
+struct option {
+ /* name of long option */
+ const char *name;
+ /*
+ * one of no_argument, required_argument, and optional_argument:
+ * whether option takes an argument
+ */
+ int has_arg;
+ /* if not NULL, set *flag to val when option found */
+ int *flag;
+ /* if flag not NULL, value to set *flag to; else return value */
+ int val;
+};
+
+/*
+ * Compute the greatest common divisor of a and b.
+ */
+static int
+gcd(int a, int b)
+{
+ int c;
+
+ c = a % b;
+ while (c != 0) {
+ a = b;
+ b = c;
+ c = a % b;
+ }
+
+ return (b);
+}
+
+/*
+ * Exchange the block from nonopt_start to nonopt_end with the block
+ * from nonopt_end to opt_end (keeping the same order of arguments
+ * in each block).
+ */
+static void
+permute_args(int panonopt_start, int panonopt_end, int opt_end,
+ char * const *nargv)
+{
+ int cstart, cyclelen, i, j, ncycle, nnonopts, nopts, pos;
+ char *swap;
+
+ /*
+ * compute lengths of blocks and number and size of cycles
+ */
+ nnonopts = panonopt_end - panonopt_start;
+ nopts = opt_end - panonopt_end;
+ ncycle = gcd(nnonopts, nopts);
+ cyclelen = (opt_end - panonopt_start) / ncycle;
+
+ for (i = 0; i < ncycle; i++) {
+ cstart = panonopt_end+i;
+ pos = cstart;
+ for (j = 0; j < cyclelen; j++) {
+ if (pos >= panonopt_end)
+ pos -= nnonopts;
+ else
+ pos += nopts;
+ swap = nargv[pos];
+ /* LINTED const cast */
+ ((char **) nargv)[pos] = nargv[cstart];
+ /* LINTED const cast */
+ ((char **)nargv)[cstart] = swap;
+ }
+ }
+}
+
+#ifdef LONGOPT
+/*
+ * parse_long_options --
+ * Parse long options in argc/argv argument vector.
+ * Returns -1 if short_too is set and the option does not match long_options.
+ */
+static int
+parse_long_options(char * const *nargv, const char *options,
+ const struct option *long_options, int *idx, int short_too)
+{
+ char *current_argv, *has_equal;
+ size_t current_argv_len;
+ int i, match;
+
+ current_argv = place;
+ match = -1;
+
+ optind++;
+
+ if ((has_equal = strchr(current_argv, '=')) != NULL) {
+ /* argument found (--option=arg) */
+ current_argv_len = has_equal - current_argv;
+ has_equal++;
+ } else
+ current_argv_len = strlen(current_argv);
+
+ for (i = 0; long_options[i].name; i++) {
+ /* find matching long option */
+ if (strncmp(current_argv, long_options[i].name,
+ current_argv_len))
+ continue;
+
+ if (strlen(long_options[i].name) == current_argv_len) {
+ /* exact match */
+ match = i;
+ break;
+ }
+ /*
+ * If this is a known short option, don't allow
+ * a partial match of a single character.
+ */
+ if (short_too && current_argv_len == 1)
+ continue;
+
+ if (match == -1) /* partial match */
+ match = i;
+ else {
+ /* ambiguous abbreviation */
+ if (PRINT_ERROR)
+ fprintf(stderr,
+ ambig, (int)current_argv_len,
+ current_argv);
+ optopt = 0;
+ return (BADCH);
+ }
+ }
+ if (match != -1) { /* option found */
+ if (long_options[match].has_arg == no_argument
+ && has_equal) {
+ if (PRINT_ERROR)
+ fprintf(stderr,
+ noarg, (int)current_argv_len,
+ current_argv);
+ /*
+ * XXX: GNU sets optopt to val regardless of flag
+ */
+ if (long_options[match].flag == NULL)
+ optopt = long_options[match].val;
+ else
+ optopt = 0;
+ return (BADARG);
+ }
+ if (long_options[match].has_arg == required_argument ||
+ long_options[match].has_arg == optional_argument) {
+ if (has_equal)
+ optarg = has_equal;
+ else if (long_options[match].has_arg ==
+ required_argument) {
+ /*
+ * optional argument doesn't use next nargv
+ */
+ optarg = nargv[optind++];
+ }
+ }
+ if ((long_options[match].has_arg == required_argument)
+ && (optarg == NULL)) {
+ /*
+ * Missing argument; leading ':' indicates no error
+ * should be generated.
+ */
+ if (PRINT_ERROR)
+ fprintf(stderr,
+ recargstring,
+ current_argv);
+ /*
+ * XXX: GNU sets optopt to val regardless of flag
+ */
+ if (long_options[match].flag == NULL)
+ optopt = long_options[match].val;
+ else
+ optopt = 0;
+ --optind;
+ return (BADARG);
+ }
+ } else { /* unknown option */
+ if (short_too) {
+ --optind;
+ return (-1);
+ }
+ if (PRINT_ERROR)
+ fprintf(stderr, illoptstring, current_argv);
+ optopt = 0;
+ return (BADCH);
+ }
+ if (idx)
+ *idx = match;
+ if (long_options[match].flag) {
+ *long_options[match].flag = long_options[match].val;
+ return (0);
+ } else
+ return (long_options[match].val);
+}
+#endif
+
+/*
+ * getopt_internal --
+ * Parse argc/argv argument vector. Called by user level routines.
+ */
+static int
+getopt_internal(int nargc, char * const *nargv, const char *options,
+ const struct option *long_options, int *idx, int flags)
+{
+ char *oli; /* option letter list index */
+ int optchar, short_too;
+ static int posixly_correct = -1;
+
+ if (options == NULL)
+ return (-1);
+
+ /*
+ * Disable GNU extensions if POSIXLY_CORRECT is set or options
+ * string begins with a '+'.
+ */
+ if (posixly_correct == -1)
+ posixly_correct = (getenv("POSIXLY_CORRECT") != NULL);
+ if (posixly_correct || *options == '+')
+ flags &= ~FLAG_PERMUTE;
+ else if (*options == '-')
+ flags |= FLAG_ALLARGS;
+ if (*options == '+' || *options == '-')
+ options++;
+
+ /*
+ * XXX Some GNU programs (like cvs) set optind to 0 instead of
+ * XXX using optreset. Work around this braindamage.
+ */
+ if (optind == 0)
+ optind = optreset = 1;
+
+ optarg = NULL;
+ if (optreset)
+ nonopt_start = nonopt_end = -1;
+start:
+ if (optreset || !*place) { /* update scanning pointer */
+ optreset = 0;
+ if (optind >= nargc) { /* end of argument vector */
+ place = EMSG;
+ if (nonopt_end != -1) {
+ /* do permutation, if we have to */
+ permute_args(nonopt_start, nonopt_end,
+ optind, nargv);
+ optind -= nonopt_end - nonopt_start;
+ }
+ else if (nonopt_start != -1) {
+ /*
+ * If we skipped non-options, set optind
+ * to the first of them.
+ */
+ optind = nonopt_start;
+ }
+ nonopt_start = nonopt_end = -1;
+ return (-1);
+ }
+ if (*(place = nargv[optind]) != '-' ||
+ (place[1] == '\0' && strchr(options, '-') == NULL)) {
+ place = EMSG; /* found non-option */
+ if (flags & FLAG_ALLARGS) {
+ /*
+ * GNU extension:
+ * return non-option as argument to option 1
+ */
+ optarg = nargv[optind++];
+ return (INORDER);
+ }
+ if (!(flags & FLAG_PERMUTE)) {
+ /*
+ * If no permutation wanted, stop parsing
+ * at first non-option.
+ */
+ return (-1);
+ }
+ /* do permutation */
+ if (nonopt_start == -1)
+ nonopt_start = optind;
+ else if (nonopt_end != -1) {
+ permute_args(nonopt_start, nonopt_end,
+ optind, nargv);
+ nonopt_start = optind -
+ (nonopt_end - nonopt_start);
+ nonopt_end = -1;
+ }
+ optind++;
+ /* process next argument */
+ goto start;
+ }
+ if (nonopt_start != -1 && nonopt_end == -1)
+ nonopt_end = optind;
+
+ /*
+ * If we have "-" do nothing, if "--" we are done.
+ */
+ if (place[1] != '\0' && *++place == '-' && place[1] == '\0') {
+ optind++;
+ place = EMSG;
+ /*
+ * We found an option (--), so if we skipped
+ * non-options, we have to permute.
+ */
+ if (nonopt_end != -1) {
+ permute_args(nonopt_start, nonopt_end,
+ optind, nargv);
+ optind -= nonopt_end - nonopt_start;
+ }
+ nonopt_start = nonopt_end = -1;
+ return (-1);
+ }
+ }
+
+#ifdef LONGOPT
+ /*
+ * Check long options if:
+ * 1) we were passed some
+ * 2) the arg is not just "-"
+ * 3) either the arg starts with -- we are getopt_long_only()
+ */
+ if (long_options != NULL && place != nargv[optind] &&
+ (*place == '-' || (flags & FLAG_LONGONLY))) {
+ short_too = 0;
+ if (*place == '-')
+ place++; /* --foo long option */
+ else if (*place != ':' && strchr(options, *place) != NULL)
+ short_too = 1; /* could be short option too */
+
+ optchar = parse_long_options(nargv, options, long_options,
+ idx, short_too);
+ if (optchar != -1) {
+ place = EMSG;
+ return (optchar);
+ }
+ }
+#endif
+
+ if (((optchar = (int)*place++) == (int)':') ||
+ (optchar == (int)'-' && *place != '\0') ||
+ (oli = strchr(options, optchar)) == NULL) {
+ /*
+ * If the user specified "-" and '-' isn't listed in
+ * options, return -1 (non-option) as per POSIX.
+ * Otherwise, it is an unknown option character (or ':').
+ */
+ if (optchar == (int)'-' && *place == '\0')
+ return (-1);
+ if (!*place)
+ ++optind;
+ if (PRINT_ERROR)
+ fprintf(stderr, illoptchar, optchar);
+ optopt = optchar;
+ return (BADCH);
+ }
+#ifdef LONGOPT
+ if (long_options != NULL && optchar == 'W' && oli[1] == ';') {
+ /* -W long-option */
+ if (*place) /* no space */
+ /* NOTHING */;
+ else if (++optind >= nargc) { /* no arg */
+ place = EMSG;
+ if (PRINT_ERROR)
+ fprintf(stderr, recargchar, optchar);
+ optopt = optchar;
+ return (BADARG);
+ } else /* white space */
+ place = nargv[optind];
+ optchar = parse_long_options(nargv, options, long_options,
+ idx, 0);
+ place = EMSG;
+ return (optchar);
+ }
+#endif
+ if (*++oli != ':') { /* doesn't take argument */
+ if (!*place)
+ ++optind;
+ } else { /* takes (optional) argument */
+ optarg = NULL;
+ if (*place) /* no white space */
+ optarg = place;
+ /* XXX: disable test for :: if PC? (GNU doesn't) */
+ else if (oli[1] != ':') { /* arg not optional */
+ if (++optind >= nargc) { /* no arg */
+ place = EMSG;
+ if (PRINT_ERROR)
+ fprintf(stderr, recargchar, optchar);
+ optopt = optchar;
+ return (BADARG);
+ } else
+ optarg = nargv[optind];
+ } else if (!(flags & FLAG_PERMUTE)) {
+ /*
+ * If permutation is disabled, we can accept an
+ * optional arg separated by whitespace so long
+ * as it does not start with a dash (-).
+ */
+ if (optind + 1 < nargc && *nargv[optind + 1] != '-')
+ optarg = nargv[++optind];
+ }
+ place = EMSG;
+ ++optind;
+ }
+ /* dump back option letter */
+ return (optchar);
+}
+
+#ifdef REPLACE_GETOPT
+/*
+ * getopt --
+ * Parse argc/argv argument vector.
+ *
+ * [eventually this will replace the BSD getopt]
+ */
+int
+getopt(int nargc, char * const *nargv, const char *options)
+{
+
+ /*
+ * We don't pass FLAG_PERMUTE to getopt_internal() since
+ * the BSD getopt(3) (unlike GNU) has never done this.
+ *
+ * Furthermore, since many privileged programs call getopt()
+ * before dropping privileges it makes sense to keep things
+ * as simple (and bug-free) as possible.
+ */
+ return (getopt_internal(nargc, nargv, options, NULL, NULL, 0));
+}
+#endif /* REPLACE_GETOPT */
+
+#ifdef LONGOPT
+/*
+ * getopt_long --
+ * Parse argc/argv argument vector.
+ */
+int
+getopt_long(int nargc, char * const *nargv, const char *options,
+ const struct option *long_options, int *idx)
+{
+
+ return (getopt_internal(nargc, nargv, options, long_options, idx,
+ FLAG_PERMUTE));
+}
+
+/*
+ * getopt_long_only --
+ * Parse argc/argv argument vector.
+ */
+int
+getopt_long_only(int nargc, char * const *nargv, const char *options,
+ const struct option *long_options, int *idx)
+{
+
+ return (getopt_internal(nargc, nargv, options, long_options, idx,
+ FLAG_PERMUTE|FLAG_LONGONLY));
+}
+#endif
+#endif
Something went wrong with that request. Please try again.