--- freem/src/ssvn_device.c	2025/01/19 02:04:04	1.1
+++ freem/src/ssvn_device.c	2025/04/13 04:22:43	1.6
@@ -1,23 +1,11 @@
 /*
- *                            *
- *                           * *
- *                          *   *
- *                     ***************
- *                      * *       * *
- *                       *  MUMPS  *
- *                      * *       * *
- *                     ***************
- *                          *   *
- *                           * *
- *                            *
- *
- *   ssvn_device.c
- *    ^$DEVICE ssv
+ *   $Id: ssvn_device.c,v 1.6 2025/04/13 04:22:43 snw Exp $
+ *    ^$DEVICE ssvn
  *
  *  
- *   Author: Serena Willis <jpw@coherent-logic.com>
+ *   Author: Serena Willis <snw@coherent-logic.com>
  *    Copyright (C) 1998 MUG Deutschland
- *    Copyright (C) 2020 Coherent Logic Development LLC
+ *    Copyright (C) 2020, 2025 Coherent Logic Development LLC
  *
  *
  *   This file is part of FreeM.
@@ -60,6 +48,8 @@ void ssvn_device(short action, char *key
     freem_ref_t *r;
     char *dbuf;
     char *envbuf;
+
+    fd = -1;
     
     r = (freem_ref_t *) malloc (sizeof (freem_ref_t));
     NULLPTRCHK(r,"ssvn_device");
@@ -114,10 +104,10 @@ void ssvn_device(short action, char *key
                 if (strcmp (r->subscripts[1], "$DEVICE") == 0) {
 
                     if (devstat[channel].mdc_err == 0) {
-                        snprintf (data, 3, "0\201\0");
+                        sprintf (data, "0\201\0");
                     }
                     else {
-                        snprintf (data, 120, "%d,%d,%s\201\0", devstat[channel].mdc_err, devstat[channel].frm_err, devstat[channel].err_txt);
+                        sprintf (data, "%d,%d,%s\201\0", devstat[channel].mdc_err, devstat[channel].frm_err, devstat[channel].err_txt);
                     }
 
                     break;
@@ -197,7 +187,7 @@ void ssvn_device(short action, char *key
                     break;
                 }
                 else if (strcmp (r->subscripts[1], "NAME") == 0) {
-                    sprintf (data, dev[channel]);
+                    sprintf (data, "%s", dev[channel]);
                     break;
                 }
                 else if (strcmp (r->subscripts[1], "TYPE") == 0) {
@@ -223,7 +213,7 @@ void ssvn_device(short action, char *key
                     fstat (fd, &s);
                     siz = s.st_size;
                     
-                    sprintf (data, "%ld\201", siz);  
+                    sprintf (data, "%ld\201", (long) siz);  
 
                     break;