Coded by Chris Simmons
git-svn-id: file:///srv/svn/repos/haiku/trunk/current@6009 a95241bf-73f2-0310-859d-f6bbb57e9c96
This commit is contained in:
Phil Greenway
@@ -0,0 +1,319 @@
|
|||||||
|
/*
|
||||||
|
** Copyright (c) 2004 OBOS
|
||||||
|
** Permission is hereby granted, free of charge, to any person obtaining a copy
|
||||||
|
** of this software and associated documentation files (the "Software"), to deal
|
||||||
|
** in the Software without restriction, including without limitation the rights
|
||||||
|
** to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
|
||||||
|
** copies of the Software, and to permit persons to whom the Software is
|
||||||
|
** furnished to do so, subject to the following conditions:
|
||||||
|
**
|
||||||
|
** The above copyright notice and this permission notice shall be included in all
|
||||||
|
** copies or substantial portions of the Software.
|
||||||
|
**
|
||||||
|
** THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
|
||||||
|
** IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
|
||||||
|
** FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
|
||||||
|
** AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
|
||||||
|
** LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
|
||||||
|
** OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE
|
||||||
|
** SOFTWARE.
|
||||||
|
*/
|
||||||
|
|
||||||
|
|
||||||
|
/*
|
||||||
|
** Thanks go to:
|
||||||
|
** Eli Dayan, Jeremy Friesner, Jonathan Thompson,
|
||||||
|
** Matthijs Hollemans, Jack Burton, and more.
|
||||||
|
*/
|
||||||
|
|
||||||
|
|
||||||
|
#include <ctype.h>
|
||||||
|
#include <errno.h>
|
||||||
|
#include <getopt.h>
|
||||||
|
#include <ktypes.h>
|
||||||
|
#include <math.h>
|
||||||
|
#include <stdio.h>
|
||||||
|
#include <stdlib.h>
|
||||||
|
#include <String.h>
|
||||||
|
|
||||||
|
|
||||||
|
static int char_to_int(char in);
|
||||||
|
static uint64 to_uint64(char *input);
|
||||||
|
static int Process(char *FromString);
|
||||||
|
static int Factor(uint64 BigNumber, uint64 FactorBy);
|
||||||
|
static int SuggestHelpMessage();
|
||||||
|
static int WarnNotValid(char *NotValidString);
|
||||||
|
static int usage(void);
|
||||||
|
static int version(void);
|
||||||
|
|
||||||
|
#define MAX_INT_CALCULATED "18446744073709551615" // a fairly big number, 2^64 minus 1
|
||||||
|
#define MAX_TOKEN_LENGTH 20 // Hopefully we can change this upper limit in the future. ;)
|
||||||
|
|
||||||
|
char* prog_name;
|
||||||
|
bool SuggestHelp = false;
|
||||||
|
|
||||||
|
|
||||||
|
static int
|
||||||
|
char_to_int (char in)
|
||||||
|
{
|
||||||
|
if (in >= '0' && in <= '9')
|
||||||
|
return in - '0';
|
||||||
|
|
||||||
|
return(0);
|
||||||
|
}
|
||||||
|
|
||||||
|
|
||||||
|
static uint64
|
||||||
|
to_uint64 (char *input)
|
||||||
|
{
|
||||||
|
uint64 output = 0;
|
||||||
|
while (*input && isdigit (*input)) {
|
||||||
|
output = output * 10 + char_to_int (*input++);
|
||||||
|
}
|
||||||
|
return output;
|
||||||
|
}
|
||||||
|
|
||||||
|
|
||||||
|
static int
|
||||||
|
readline(char *buf, int len)
|
||||||
|
{
|
||||||
|
int i = 0;
|
||||||
|
char ch;
|
||||||
|
|
||||||
|
while (true) {
|
||||||
|
ch = getchar();
|
||||||
|
switch (ch) {
|
||||||
|
|
||||||
|
// backspace, erase the last character written
|
||||||
|
case '\b':
|
||||||
|
if (i > 0) {
|
||||||
|
printf("\b");
|
||||||
|
--i;
|
||||||
|
}
|
||||||
|
break;
|
||||||
|
|
||||||
|
// enter key pressed
|
||||||
|
case '\n':
|
||||||
|
buf[i] = 0;
|
||||||
|
return(i);
|
||||||
|
|
||||||
|
default:
|
||||||
|
buf[i] = ch;
|
||||||
|
i++;
|
||||||
|
break;
|
||||||
|
}
|
||||||
|
}
|
||||||
|
return(0);
|
||||||
|
}
|
||||||
|
|
||||||
|
|
||||||
|
static int
|
||||||
|
Process(char *FromString)
|
||||||
|
{
|
||||||
|
char *TestForChar;
|
||||||
|
bool FoundChar = false;
|
||||||
|
uint64 NumberToFactor;
|
||||||
|
int BaseFactor = 2;
|
||||||
|
char str[1024];
|
||||||
|
char *Token;
|
||||||
|
const char *Tokens = " \t";
|
||||||
|
bool factorNumber = true;
|
||||||
|
int i;
|
||||||
|
|
||||||
|
char maxint[] = MAX_INT_CALCULATED;
|
||||||
|
BString chrptr; // predefined character pointer
|
||||||
|
BString usrptr; // user submitted pointer
|
||||||
|
|
||||||
|
strcpy(str,FromString);
|
||||||
|
Token = strtok(str, Tokens);
|
||||||
|
|
||||||
|
while (1) {
|
||||||
|
TestForChar = Token;
|
||||||
|
FoundChar = false;
|
||||||
|
|
||||||
|
while (*TestForChar) {
|
||||||
|
if (! isdigit (*TestForChar) ) {
|
||||||
|
FoundChar = true;
|
||||||
|
break;
|
||||||
|
}
|
||||||
|
*TestForChar++;
|
||||||
|
}
|
||||||
|
|
||||||
|
if (FoundChar) {
|
||||||
|
WarnNotValid(Token);
|
||||||
|
} else {
|
||||||
|
if ( strlen(Token) >= MAX_TOKEN_LENGTH ) {
|
||||||
|
|
||||||
|
for(i=0; i < MAX_TOKEN_LENGTH; i++) {
|
||||||
|
chrptr << maxint[i];
|
||||||
|
usrptr << Token[i];
|
||||||
|
|
||||||
|
if ( usrptr > chrptr ) {
|
||||||
|
WarnNotValid(Token);
|
||||||
|
SuggestHelp = true;
|
||||||
|
factorNumber = false;
|
||||||
|
break;
|
||||||
|
|
||||||
|
}
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
if ( factorNumber ) {
|
||||||
|
NumberToFactor = to_uint64(Token);
|
||||||
|
(void)fprintf(stdout, "%Lu:", NumberToFactor);
|
||||||
|
Factor(NumberToFactor, BaseFactor);
|
||||||
|
(void)printf("\n");
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
Token = strtok(NULL, Tokens);
|
||||||
|
|
||||||
|
if (Token == NULL)
|
||||||
|
break;
|
||||||
|
}
|
||||||
|
|
||||||
|
return(0);
|
||||||
|
}
|
||||||
|
|
||||||
|
|
||||||
|
static int
|
||||||
|
Factor(uint64 BigNumber, uint64 FactorBy)
|
||||||
|
{
|
||||||
|
if ( ( BigNumber == 1 ) || ( BigNumber == 0 ) ) {
|
||||||
|
if ( BigNumber == 1 )
|
||||||
|
(void)fprintf(stdout, " %d", 1);
|
||||||
|
return(0);
|
||||||
|
}
|
||||||
|
|
||||||
|
uint64 RootNumber = (uint64)sqrt(BigNumber) + 1 ;
|
||||||
|
|
||||||
|
while ( FactorBy <= RootNumber ) {
|
||||||
|
if ( (BigNumber % FactorBy) == 0 ) {
|
||||||
|
(void)fprintf(stdout, " %Lu", FactorBy);
|
||||||
|
break;
|
||||||
|
}
|
||||||
|
FactorBy++;
|
||||||
|
}
|
||||||
|
|
||||||
|
if ( FactorBy > RootNumber ) {
|
||||||
|
(void)fprintf(stdout, " %Lu", BigNumber);
|
||||||
|
return(0);
|
||||||
|
}
|
||||||
|
Factor(BigNumber/FactorBy, FactorBy);
|
||||||
|
return(0);
|
||||||
|
}
|
||||||
|
|
||||||
|
|
||||||
|
static int
|
||||||
|
SuggestHelpMessage()
|
||||||
|
{
|
||||||
|
(void)fprintf(stdout, "Try `%s --help' for more information.\n", prog_name);
|
||||||
|
return(0);
|
||||||
|
}
|
||||||
|
|
||||||
|
|
||||||
|
static int
|
||||||
|
WarnNotValid(char *NotValidString)
|
||||||
|
{
|
||||||
|
(void)fprintf(stdout, "%s: `%s' is not a valid positive integer\n", prog_name, NotValidString);
|
||||||
|
return(0);
|
||||||
|
}
|
||||||
|
|
||||||
|
|
||||||
|
static int
|
||||||
|
usage(void)
|
||||||
|
{
|
||||||
|
(void)fprintf(stdout, "factor OBOS (http://www.openbeos.org/)
|
||||||
|
|
||||||
|
Usage: %s [NUMBER]...
|
||||||
|
or: %s OPTION
|
||||||
|
|
||||||
|
--help\t\tdisplay this help and exit
|
||||||
|
--version\tdisplay version information and exit
|
||||||
|
|
||||||
|
Print the prime factors of all specified positive integer NUMBERs.
|
||||||
|
If no NUMBERS are specified on the command line, they are read from standard input.
|
||||||
|
|
||||||
|
You may use a delimiter characters such as space and tab to separate NUMBERS.
|
||||||
|
|
||||||
|
", prog_name, prog_name );
|
||||||
|
return(0);
|
||||||
|
}
|
||||||
|
|
||||||
|
|
||||||
|
static int
|
||||||
|
version(void)
|
||||||
|
{
|
||||||
|
(void)fprintf(stdout, "%s OBOS (http://www.openbeos.org/)\n", prog_name);
|
||||||
|
return(0);
|
||||||
|
}
|
||||||
|
|
||||||
|
|
||||||
|
int
|
||||||
|
main(int argc, char *argv[])
|
||||||
|
{
|
||||||
|
int argOption;
|
||||||
|
int indexptr = 0;
|
||||||
|
char * const * optargv = argv;
|
||||||
|
bool Processed = false;
|
||||||
|
int i;
|
||||||
|
char buf[1024];
|
||||||
|
|
||||||
|
prog_name = argv[0];
|
||||||
|
|
||||||
|
struct option help_opt = { "help", no_argument, 0, 1 } ;
|
||||||
|
struct option version_opt = { "version", no_argument, 0, 2 } ;
|
||||||
|
|
||||||
|
struct option options[] = {
|
||||||
|
help_opt, version_opt, 0
|
||||||
|
};
|
||||||
|
|
||||||
|
for ( i=1; i<argc; i++ ) {
|
||||||
|
if ((argv[i][0] >= '0') && (argv[i][0] <= '9')) {
|
||||||
|
Processed = true;
|
||||||
|
Process(argv[i]);
|
||||||
|
} else {
|
||||||
|
if ( ( argv[i][0] == '-' ) && (argv[i][1] >= '0') && (argv[i][1] <= '9') ) {
|
||||||
|
Processed = true;
|
||||||
|
WarnNotValid(argv[i]);
|
||||||
|
SuggestHelp = true;
|
||||||
|
}
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
if ( SuggestHelp == true ) {
|
||||||
|
SuggestHelpMessage();
|
||||||
|
exit(0);
|
||||||
|
}
|
||||||
|
|
||||||
|
while ((argOption = getopt_long(argc, optargv, "", options, &indexptr)) != -1) {
|
||||||
|
switch (argOption) {
|
||||||
|
default:
|
||||||
|
switch (options[indexptr].val) {
|
||||||
|
case 1: // help
|
||||||
|
usage();
|
||||||
|
exit(0);
|
||||||
|
case 2: // version
|
||||||
|
version();
|
||||||
|
exit(0);
|
||||||
|
default:
|
||||||
|
break;
|
||||||
|
}
|
||||||
|
break;
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
argc -= optind;
|
||||||
|
|
||||||
|
if ( (argc == 0) || (Processed == false) ) {
|
||||||
|
|
||||||
|
// read stdin
|
||||||
|
for (;;) {
|
||||||
|
int chars_read;
|
||||||
|
chars_read = readline(buf, sizeof(buf));
|
||||||
|
if (chars_read > 0)
|
||||||
|
Process(buf);
|
||||||
|
}
|
||||||
|
}
|
||||||
|
return B_NO_ERROR;
|
||||||
|
}
|
||||||
Reference in New Issue
Block a user