List all files in a directory

Posted: 2002-06-01
By: ArchiveBot
Viewed: 98

Filed Under:

ASP/ HTML

No attachments for this post

Uses the new file FileSystemObject in the scripting library to list all the files in the c:inetpubscripts directory with a link to them. You can modify this code to list all the files in any directory.

Original Author: Ian Ippolito (vWorker)

Code

#include
#include
/* Binary Tree Structure Template */
typedef struct binary_tree
{
char letter;
  struct binary_tree *left;
  struct binary_tree *right;
} TREE;
/* Function declarations */
TREE *fillTree(TREE *);
void insert(char, TREE **);
void menu(TREE *);
void displayInfo();
void inorder(TREE *);
void preorder(TREE *);
void postorder(TREE *);
int search(TREE *, char, int);
void freeTree(TREE *);
int deleteNode(TREE *, char);
/* Begin main function */
void main()
{
  TREE *root=NULL;            /* Create the root pointer */
root=fillTree(root);          /* Fill the tree */
  menu(root);              /* Pass menu root, and enjoy */
}
/* Begin fillTree function */
TREE *fillTree(TREE *root)
{
  FILE *fin=fopen("btree.dat","r");   /* Open data file & create FILE ptr */
  char letter;
  while(fscanf(fin,"%c",&letter)!=EOF)  /* Fill tree letter by letter */
  insert(letter, &root);
  return root;
}
/* Begin insert function */
void insert(char newLetter, TREE **root)
{
TREE *process;
  if(*root == NULL){
  process = (TREE *)malloc(sizeof(TREE));
   if(process!= NULL){
    process->letter = newLetter;
     process->left = NULL;
     process->right = NULL;
     *root = process;
   }
   else
    printf("Out of memory, can't insert letter. ");
}
  else{
  if(newLetter < (*root)->letter) insert(newLetter, &((*root)->left));
   else insert(newLetter, &((*root)->right));
  }
}
/* Begin menu function */
void menu(TREE *root)
{
int choice, result, count;
  char target, process;
  displayInfo();
  while((scanf("%d",&choice)!=8)){
  switch(choice){
    case 1:         /* Traverse BST inorder */
      puts("");
     inorder(root);
      displayInfo();
      break;
     case 2:         /* Traverse BST in preorder */
      puts("");
     preorder(root);
      displayInfo();
      break;
     case 3:         /* Traverse BST in postorder */
      puts("");
     postorder(root);
      displayInfo();
      break;
     case 4:         /* Search BST for a node */
     count=0;
      puts("");
      printf(" Enter target to search for: ");
    flushall();     /* Clear input buffer */
    scanf("%c",&target);
    result=search(root, target, count);
    if(result==-1) printf(" Target does not exist.");
    else
     printf(" Target %c found in %2d searches. ", target, result);
    displayInfo();
    break;
   case 5:         /* Count height of a node */
    count=0;
    puts("");
    printf(" Enter character to count height of: ");
    flushall();     /* Clear input buffer */
    scanf("%c",&target);
    result=search(root, target, count);
    if(result==-1) printf(" Target does not exist.");
    else
     printf(" Character %c has a height of %2d.", target, result-1);
    displayInfo();
    break;
   case 6:         /* Insert node into BST */
    puts("");
    printf(" Enter character to insert into binary search tree: ");
    flushall();     /* Clear input buffer */
    scanf("%c",&process);
    insert(process,&root);
    printf(" The character %c was inserted.", process);
    displayInfo();
    break;
     case 7:         /* Delete node from BST */
      puts("");
      printf(" Enter character to delete from binary search tree: ");
    flushall();     /* Clear input buffer */
    scanf("%c",&process);
      result=deleteNode(root, process);
      if(result==0) printf(" Character doesn't exist.");
    else printf(" Character %c deleted.", process);
      displayInfo();
      break;
   case 8:         /* Au Revoir! */
    printf(" Have a nice day. Goodbye.");
    freeTree(root);
    break;
   default:        /* Let user know they made an invalid choice */
    puts("");
    printf("Invalid selection ");
    displayInfo();
    break;
  } /* End switch */
}  /* End while */
}
/* Begin displayInfo function */
void displayInfo()
{
printf(" ");
puts("--------------------------------------------------");
puts("     Binary Search Tree Menu Options     ");
puts("--------------------------------------------------");
printf(" ");
printf(" 1 Display inorder traversal ");
printf(" 2 Display preorder traversal ");
printf(" 3 Display postorder traversal ");
printf(" 4 Search for a given node ");
printf(" 5 Count the height of a given node ");
printf(" 6 Insert a node onto the tree ");
printf(" 7 Delete a node from the tree ");
printf(" 8 Quit program ");
printf(" ");
printf("Enter your selection: ");
}
/* Begin inorder function */
void inorder(TREE *root)
{
if(root->left!=NULL) inorder(root->left);
printf("%c",root->letter);
if(root->right!=NULL) inorder(root->right);
}
/* Begin preorder function */
void preorder(TREE *root)
{
printf("%c",root->letter);
if(root->left!=NULL) preorder(root->left);
if(root->right!=NULL) preorder(root->right);
}
/* Begin postorder function */
void postorder(TREE *root)
{
if(root->left!=NULL) postorder(root->left);
if(root->right!=NULL) postorder(root->right);
printf("%c",root->letter);
}
/* Begin search function */
int search(TREE *root, char target, int count)
{
  if(root==NULL) return -1;         /* Target doesn't exist */
count++;
if(root->letter==target) return count;  /* Target found */
if(target > root->letter)
  return search(root->right, target, count);
if(target < root->letter)
  return search(root->left, target, count);
return 007;                /* Bond, James Bond */
}
/* Begin freeTempTree function */
void freeTree(TREE *root)
{
if(root!=NULL){        /* As long as root isn't null, recursively */
  freeTree(root->left);   /* travel tree in postorder freeing the   */
   freeTree(root->right);   /* nodes as you go.             */
   free(root);
  }
}
/* Begin deleteNode function */
int deleteNode(TREE *T_ptr, char target)
{
  int  rt_child = 0, lft_child = 0;
  TREE *ptr = T_ptr, *parent = T_ptr, *S = T_ptr, *save = T_ptr;
/*-----------------------------------------------+
  |        Find the node
  +-----------------------------------------------*/
  while (ptr != NULL && ptr->letter != target) {
   parent = ptr;
   if (target < ptr->letter) ptr = ptr->left;
   else ptr = ptr->right;
  }
  if (ptr == NULL) return 0;  /* Nothing to delete */
  else if (S->letter == target && (S->left == NULL || S->right == NULL))
   S = (S->left == NULL) ? S->right : S->left;
  else
   /*-----------------------------------------------+
   |   Delete a node without a left child
   +-----------------------------------------------*/
   if (ptr->left == NULL)
     if (target < parent->letter) parent->left = ptr->right;
     else parent->right = ptr->right;
   /*-----------------------------------------------+
   |   Delete a node without a right child
   +-----------------------------------------------*/
   else if (ptr->right == NULL)
     if (target < parent->letter) parent->left = ptr->left;
     else parent->right = ptr->left;
   /*--------------------------------------------------------------+
   |   Delete a node with both chidren--use RsmallestS subtree.
   +--------------------------------------------------------------*/
   else {
     save = ptr;
     parent = ptr;
     if ((ptr->left) >= (ptr->right)) {
      ptr = ptr->left;       /* Delete from left subtree.*/
      while (ptr->right != NULL) {
        rt_child = 1;
        parent = ptr;
        ptr = ptr->right;
      }
      save->letter = ptr->letter;
      if (rt_child) parent->right = ptr->left;
      else parent->left = ptr->left;
     }
     else {             /* Delete from right subtree.*/
      ptr = ptr->right;
      while (ptr->left != NULL) {
        lft_child = 1;
        parent = ptr;
        ptr = ptr->left;
      }
      save->letter = ptr->letter;
      if (lft_child) parent->left = ptr->right;
      else parent->right = ptr->right;
     }
   }
   free(ptr);
   return 1;         /* Indicates successful deletion */
  }


Comments on this post

No comments have been added for this post.

You must be logged in to make a comment.