Program to Sort text data by soundex value

#include "stdio.h"
#include "ctype.h"
#include "stdlib.h"
#include "string.h"
#include "getopt.h"

#define PACKAGE "sndsort"
#define VERSION "0.0.2"
#define MAXLINE 1024

struct lnode
{
char *str;
int sndval;
struct lnode *next;
};

struct lnode *insert(char *data, int val, struct lnode *list);
char *soundex(char *str);
void free_list(struct lnode *list);
void print_list(struct lnode *list, int x);
void print_help(int exval);

int main(int argc, char *argv[]) {
FILE *fp = stdin; /* read input from... (default is stdin) */
struct lnode *list; /* linked list */
char line[MAXLINE]; /* buff for fgets() */
int sval = 0; /* return value from soundex() */
int len = 0; /* initial line length */
int opt = 0; /* holds getopt option nr ... */
int min_len = 2; /* ignore lines Shorter as length (default=2) */
int max_len = 20; /* ignore lines Longer as length (default=20) */
int out_sndx_flag = 0; /* output the `soundex value' for each string */
int strip_nl_flag = 0; /* strip trailing newlines from input */

while((opt = getopt(argc, argv, "hvxsn:N:f:")) != -1) {
switch(opt) {
case 'h':
print_help(0);
break;
case 'v':
exit(0);
break;
case 'x':
out_sndx_flag = 1;
break;
case 's':
strip_nl_flag = 1;
break;
case 'n':
min_len = atoi(optarg);
break;
case 'N':
max_len = atoi(optarg);
break;
case 'f':
if(freopen(optarg, "r", fp) == NULL) {
fprintf(stderr, "%s: Error - opening `%s'\n", PACKAGE, optarg);
return 1;
}
break;
case ':':
fprintf(stderr, "%s: Error - Option `%c' needs an argument\n\n", PACKAGE, optopt);
print_help(1);
case '?':
fprintf(stderr, "%s: Error - No such option: `%c'\n\n", PACKAGE, optopt);
print_help(1);
} /* switch */
} /* while */

list = NULL;
while((fgets(line, MAXLINE, stdin)) != NULL) {
len = strlen(line);

/* skip lines shorter as ``min_len'' in length */
if(len <> max_len) continue;

/* strip trailing newlines */
if(strip_nl_flag == 1 && line[len - 1] == '\n')
line[len - 1] = '\0';

/* reverse line[] buffer */
sval = atoi(soundex(line));
/* insert line in the linked list */
list = insert(line, sval, list);
}

print_list(list, out_sndx_flag);
free_list(list);

fclose(fp);
return 0;
}

struct lnode *insert(char *data, int sval, struct lnode *list) {
struct lnode *p;
struct lnode *q;

/* create a new node */
p = (struct lnode *)malloc(sizeof(struct lnode));
/* save data into new node */
p->str = strdup(data);
p->sndval = sval;

/* first, we handle the case where `data' should be the first element */
if(list == NULL || list->sndval > sval) {
/* apperently this !IS! the first element */
/* now data should [be|becomes] the first element */
p->next = list;
return p;
} else {
/* search the linked list for the right location */
q = list;
while(q->next != NULL && q->next->sndval < sval) {
q = q->next;
}
p->next = q->next;
q->next = p;
return list;
}
}

void free_list(struct lnode *list) {
struct lnode *p;

while(list != NULL) {
p = list->next;
free(list->str);
free(list);
list = p;
}
}

void print_list(struct lnode *list, int x) {
struct lnode *p;

for(p = list; p != NULL; p = p->next)
if(x == 1)
printf("%8d %s\n", p->sndval, p->str);
else
printf("%s\n", p->str);
}

/* get soundex code for a string */
char *soundex(char *str) {
static char soundexbuf[81];
/*
// basicly ripped this piece of the code straight
// from the book... ehum.. sorry...
*/
char *table = "01230120022455012623010202";
char *sdx = soundexbuf, lastchr = ' ';

while(*str) {
if(isalpha(*str) && (*str != lastchr)) {
*sdx = *(table + toupper(*str) - 'A');
if((*sdx != '0') && (*sdx != lastchr))
lastchr = *sdx++;
}
str++;
}

*sdx = '\0';
return &soundexbuf[0];
}

void print_help(int exval) {
printf("%s,%s sort text data by soundex value\n", PACKAGE, VERSION);
printf("Usage: %s [-h] [-v] [-x] [-s] [-n INT] [-N INT] [-f FILE]\n\n", PACKAGE);

printf(" -h print this help and exit\n");
printf(" -v print version and exit\n\n");

printf(" -x output the `soundex value' with each string\n");
printf(" -s strip trailing newlines\n");
printf(" -n INT ignore lines Shorter as `INT' (default=2)\n");
printf(" -N INT ignore lines Longer as `INT' (default=20)\n");
printf(" -f FILE read input from `FILE' (default=stdin)\n\n");
exit(exval);
}

Related Links :

No comments:

Post a Comment


If you face any Problem in viewing code such as Incomplete "For Loops" or "Incorrect greater than or smaller" than equal to signs then please collect from My Web Site CLICK HERE


More Useful Topics...

 

History Of C..

In the beginning was Charles Babbage and his Analytical Engine, a machine
he built in 1822 that could be programmed to carry out different computations.
Move forward more than 100 years, where the U.S. government in
1942 used concepts from Babbage’s engine to create the ENIAC, the first
modern computer.
Meanwhile, over at the AT&T Bell Labs, in 1972 Dennis Ritchie was working
with two languages: B (for Bell) and BCPL (Basic Combined Programming
Language). Inspired by Pascal, Mr. Ritchie developed the C programming
language.

My 1st Program...


#include
#include
void main ()
{
clrscr ();
printf ("\n\n\n\n");
printf ("\t\t\t*******Pankaj *******\n");
printf ("\t\t\t********************************\n");
printf ("\t\t\t\"Life is Good...\"\n");
printf ("\t\t\t********************************");
getch ();
}

Next Step...


#include
#include

void main ()
{
clrscr ();
printf ("\n\n\n\n\n\n\n\n");
printf ("\t\t\t --------------------------- \n\n");

printf ("\t\t\t | IGCT, Info Computers, INDIA | \n\n");
printf ("\t\t\t --------------------------- ");

getch ();

}

Hits!!!