*** empty log message ***

1 files changed, 221 insertions, 19 deletions

diff --git a/src/lockfile.c b/src/lockfile.c
index 9dd2925..cc0ad42 100644
--- a/src/lockfile.c
+++ b/src/lockfile.c
@@ -10,6 +10,9 @@ static char rcsid[] = "$Id$";
 
 /*
  * $Log$
+ * Revision 1.3  2008/02/15 18:16:35  james
+ * *** empty log message ***
+ *
  * Revision 1.2  2008/02/15 16:48:56  james
  * *** empty log message ***
  *
@@ -21,13 +24,88 @@ static char rcsid[] = "$Id$";
 #define LOCK_ASCII
 #undef LOCK_BINARY
 
+#include <stdio.h>
+#include <sys/types.h>
+#include <sys/stat.h>
+#include <malloc.h>
+#include <unistd.h>
+#include <string.h>
+#include <strings.h>
+#include <stdlib.h>
+#include <pwd.h>
+#include <fcntl.h>
+#include <dirent.h>
+
+#include "lockfile.h"
+
+Filelist *
+filelist_new (void)
+{
+  Filelist *fl = (Filelist *) malloc (sizeof (Filelist));
+
+  fl->head = NULL;
+
+  return fl;
+}
+
+void
+filelist_remove (Filelist * fl, Filelist_ent * fle)
+{
+  Filelist_ent **ep;
+
+  for (ep = &fl->head; *ep; ep = &((*ep)->next))
+    if (fle == *ep)
+      break;
 
-Filelist *filelist_new(void)
+
+  if (!*ep)
+    return;
+
+  *ep = fle->next;
+
+  free (fle);
+}
+
+void
+filelist_add (Filelist * fl, char *fn)
 {
+  Filelist_ent *fle;
+  int i = strlen (fn);
+
+  if (i >= FILE_LIST_MAX_LEN)
+    return;
+
+  for (fle=fl->head;fle;fle=fle->next) 
+	if (!strcmp(fle->name,fn)) return;
+
+  fle = malloc (sizeof (Filelist_ent));
+
+  strcpy (fle->name, fn);
 
+  fle->next = fl->head;
+  fl->head = fle;
+}
 
+void
+filelist_free (Filelist * fl)
+{
+  while (fl->head)
+    filelist_remove (fl, fl->head);
+  free (fl);
+}
 
+void filelist_print(Filelist *fl,FILE *f)
+{
+Filelist_ent *fle;
+if (!fl) {
+  fprintf(f,"(empty list)\n");
+  return;
 }
+  for (fle=fl->head;fle;fle=fle->next) 
+  fprintf(f,"%s\n",fle->name);
+}
+
+
 
 
 static int
@@ -53,7 +131,7 @@ chown_uucp (fd)
 }
 
 int
-lockfile_make
+lockfile_make (char *name)
 {
   char buf[1024], tmpfn[1024];
   char *ptr;
@@ -73,6 +151,7 @@ lockfile_make
 
   i = sprintf (buf, "%10d\n", getpid ());
 
+  unlink (tmpfn);
   fd = open (tmpfn, O_WRONLY | O_CREAT | O_TRUNC, 0444);
   if (fd < 0)
     {
@@ -102,29 +181,111 @@ lockfile_make
 }
 
 
+void
+lockfile_add_places (Filelist * fl, char *leaf)
+{
+  char buf[1024];
+  struct stat stbuf;
+  char *lock_dirs[] =
+    { "/var/lock/uucp", "/var/spool/lock", "/var/spool/uucp", "/etc/locks",
+    "/usr/spool/uucp", "/var/spool/locks", "/usr/spool/lock",
+      "/usr/spool/locks",
+    "/usr/spool/uucp/LCK"
+  };
+  int i;
+
+  for (i = 0; i < (sizeof (lock_dirs) / sizeof (char *)); ++i)
+    {
+      if (stat (lock_dirs[i], &stbuf))
+        continue;
+      strcpy (buf, lock_dirs[i]);
+      strcat (buf, "/");
+      strcat (buf, leaf);
+      filelist_add (fl, buf);
+    }
+}
+
+
+static void
+do_tedious_mangling (Filelist * fl, char *buf, char *ptr, char inv, int lower)
+{
+  while (*ptr)
+    {
+      if (lower && (*ptr >= 'A') && (*ptr <= 'Z'))
+        *ptr |= 32;
+      if (*ptr == '/')
+        *ptr = inv;
+      ptr++;
+    }
+
+  lockfile_add_places (fl, buf);
+}
+
+
+void
+lockfile_regularize_and_add (Filelist * fl, char *leaf)
+{
+  char buf[1024] = "LCK..";
+  char *ptr;
+
+  if (*leaf == '/')
+    leaf++;
+
+  ptr = buf;
+  while (*ptr)
+    ptr++;
+
+  strcpy (ptr, leaf);
+  do_tedious_mangling (fl, buf, ptr, '_', 0);
+  strcpy (ptr, leaf);
+  do_tedious_mangling (fl, buf, ptr, '_', 1);
+  strcpy (ptr, leaf);
+  do_tedious_mangling (fl, buf, ptr, '.', 0);
+  strcpy (ptr, leaf);
+  do_tedious_mangling (fl, buf, ptr, '.', 1);
+}
 
 void
-lockfile_add_name_from_path (File_list *fl,char *ptr)
+lockfile_add_name_from_path (Filelist * fl, char *file)
 {
-  printf ("lock by file %s\n", ptr);
+  char *ptr = file;
+
+
+  if (*ptr == '/')
+    ptr++;
+  lockfile_regularize_and_add (fl, ptr);
+
+  if (!strncmp (ptr, "dev/", 4))
+    {
+      ptr += 4;
+      lockfile_regularize_and_add (fl, ptr);
+    }
+
 }
 
 void
-lockfile_add_name_from_dev (File_list *fl,dev_t dev)
+lockfile_add_name_from_dev (Filelist * fl, dev_t dev)
 {
-  printf ("lock by dev %x\n", dev);
+  char buf[1024];
+  sprintf (buf, "LCK.%03d.%03d", major (dev), minor (dev));
+  lockfile_add_places (fl, buf);
 }
 
-void lockfile_check_dir_for_dev(File_list *fl,char *dir,dev_t dev)
+void
+lockfile_check_dir_for_dev (Filelist * fl, char *dir, dev_t dev)
 {
   char buf[1024];
   struct stat ent_stat;
   struct dirent *de;
   DIR *d;
 
-  for (d = opendir (DEV); (de = readdir (d));)
+  d = opendir (dir);
+
+  if (!d) return;
+
+   while ((de = readdir (d)))
     {
-      strcpy (buf, DEV);
+      strcpy (buf, dir);
       strcat (buf, de->d_name);
 
       if (stat (buf, &ent_stat))
@@ -134,17 +295,17 @@ void lockfile_check_dir_for_dev(File_list *fl,char *dir,dev_t dev)
       if (ent_stat.st_rdev != dev)
         continue;
 
-      lockfile_add_name_from_path (fl,buf);
+      lockfile_add_name_from_path (fl, buf);
 
     }
   closedir (d);
 }
 
-File_list *
-construct_possible_lock_files (char *device)
+Filelist *
+lockfile_make_list(char *device)
 {
   struct stat dev_stat;
-  File_list *ret=NULL;
+  Filelist *ret = NULL;
 
 
   if (stat (device, &dev_stat))
@@ -152,18 +313,59 @@ construct_possible_lock_files (char *device)
   if (!S_ISCHR (dev_stat.st_mode))
     return ret;
 
-  ret=filelist_new();
+  ret = filelist_new ();
 
-  lockfile_add_name_from_dev (ret,dev_stat.st_rdev);
+  lockfile_add_name_from_dev (ret, dev_stat.st_rdev);
 
-  lockfile_add_name_from_path (ret,device);
+  lockfile_add_name_from_path (ret, device);
 
-  lockfile_check_dir_for_dev(ret,"/dev/",dev_stat.st_rdev);
-  lockfile_check_dir_for_dev(ret,"/dev/usb/",dev_stat.st_rdev);
-  lockfile_check_dir_for_dev(ret,"/dev/tts/",dev_stat.st_rdev);
+  lockfile_check_dir_for_dev (ret, "/dev/", dev_stat.st_rdev);
+  lockfile_check_dir_for_dev (ret, "/dev/usb/", dev_stat.st_rdev);
+  lockfile_check_dir_for_dev (ret, "/dev/tts/", dev_stat.st_rdev);
 
   return ret;
 }
 
+void lockfile_remove_stale(Filelist *fl)
+{
+
+
+}
+
+
+Filelist *lockfile_lock(Filelist *fl)
+{
+Filelist *ret;
+Filelist_ent *fle;
+
+ret=filelist_new();
+
+lockfile_remove_stale(fl);
+
+for (fle=fl->head;fle;fle=fle->next) {
+	if (lockfile_make(fle->name)) {
+		fprintf(stderr,"Failed to get lockfile %s\n",fle->name);
+		filelist_free(ret);
+		return NULL;
+	}
+	filelist_add(ret,fle->name);
+}
+
+return ret;
+}
+
+#if 1
+int main(int argc,char *argv[])
+{
+Filelist *fl=lockfile_make_list("/dev/ttyS0");
+Filelist *fll;
+Filelist_ent *fle;
+
+filelist_print(fl,stdout);
 
+fll=lockfile_lock(fl);
+
+filelist_print(fll,stdout);
+}
+#endif