Changeset 13394 for branches/kapa-mods-2007-05/Ohana/src/opihi/lib.data/open_kapa.c

Timestamp:

May 15, 2007, 5:42:03 PM (19 years ago)

Author:

eugene

Message:

various fixes; added optional zoom, etc

File:

• branches/kapa-mods-2007-05/Ohana/src/opihi/lib.data/open_kapa.c (modified) (3 diffs)

branches/kapa-mods-2007-05/Ohana/src/opihi/lib.data/open_kapa.c

@@ -50 +50 @@
   N = FindKapaDevice (name);
   if (N == -1) return (FALSE);
+
   if (Socket[N] != -1) close (Socket[N]);
   free (Device[N]);
   for (i = N; i < Ndevice - 1; i++) {
-    Device[N] = Device[N+1];
-    Socket[N] = Socket[N+1];
-  }
+    Device[i] = Device[i+1];
+    Socket[i] = Socket[i+1];
+  }
+
+  if (N == Active) {
+    Active = -1;
+  }
+
   Ndevice --;
   REALLOCATE (Device, char *, Ndevice);
   REALLOCATE (Socket, int, Ndevice);
+
   return (TRUE);
 }
@@ -66 +73 @@
 
   int i;
+
+  if (name == NULL) return (-1); 
 
   for (i = 0; i < Ndevice; i++) {
@@ -255 +264 @@
   *range = Xrange;
 }
+
+int close_kapa (char *name) {
+
+  int N;
+
+  N = FindKapaDevice (name);
+  if (N == -1) {
+    if (Active < 0) return (FALSE);
+    name = Device[Active];
+  }
+  DelKapaDevice (name);
+  return (TRUE);
+}
+
+void QuitKapa () {
+
+  int i;
+  
+  for (i = 0; i < Ndevice; i++) {
+    if (Socket[i] != -1) close (Socket[i]);
+    if (Device[i] != NULL) free (Device[i]);
+  }
+  REALLOCATE (Socket, int, 1);
+  REALLOCATE (Device, char *, 1);
+
+  Ndevice = 0;
+  Active = -1;
+}