From 8c4e8dd35fdefa767401aecd049ea7d1d0a88e58 Mon Sep 17 00:00:00 2001
From: Marty Kraimer <mrkraimer@comcast.net>
Date: Mon, 5 Apr 2004 16:06:06 +0000
Subject: [PATCH] ascar is new

---
 src/as/asCa.c | 24 +++++++++++++-----------
 src/as/asCa.h |  1 +
 2 files changed, 14 insertions(+), 11 deletions(-)

diff --git a/src/as/asCa.c b/src/as/asCa.c
index 81cda63bd..dffb2f0d7 100644
--- a/src/as/asCa.c
+++ b/src/as/asCa.c
@@ -260,14 +260,16 @@ void epicsShareAPI asCaStop(void)
     epicsMutexUnlock(asCaTaskLock);
 }
 
-int epicsShareAPI ascar(int level)
+int epicsShareAPI ascar(int level) {return ascarFP(stdout,level);}
+
+int epicsShareAPI ascarFP(FILE *fp,int level)
 {
     ASG                *pasg;
     int  n=0,nbad=0;
     enum channel_state state;
 
     if(!pasbase) {
-        printf("access security not started\n");
+        fprintf(fp,"access security not started\n");
         return(0);
     }
     pasg = (ASG *)ellFirst(&pasbase->asgList);
@@ -282,21 +284,21 @@ int epicsShareAPI ascar(int level)
             state = ca_state(chid);
             if(state!=cs_conn) ++nbad;
             if(level>1 || (level==1 && state!=cs_conn)) {
-                printf("connected:");
-                if(state==cs_never_conn) printf("never ");
-                else if(state==cs_prev_conn) printf("prev  ");
-                else if(state==cs_conn) printf("yes   ");
-                else if(state==cs_closed) printf("closed");
-                else printf("unknown");
-                printf(" read:%s write:%s",
+                fprintf(fp,"connected:");
+                if(state==cs_never_conn) fprintf(fp,"never ");
+                else if(state==cs_prev_conn) fprintf(fp,"prev  ");
+                else if(state==cs_conn) fprintf(fp,"yes   ");
+                else if(state==cs_closed) fprintf(fp,"closed");
+                else fprintf(fp,"unknown");
+                fprintf(fp," read:%s write:%s",
                     (ca_read_access(chid) ? "yes" : "no "),
                     (ca_write_access(chid) ? "yes" : "no "));
-                printf(" %s %s\n", ca_name(chid),ca_host_name(chid));
+                fprintf(fp," %s %s\n", ca_name(chid),ca_host_name(chid));
             }
             pasginp = (ASGINP *)ellNext((ELLNODE *)pasginp);
         }
         pasg = (ASG *)ellNext((ELLNODE *)pasg);
     }
-    printf("%d channels %d not connected\n",n,nbad);
+    fprintf(fp,"%d channels %d not connected\n",n,nbad);
     return(0);
 }
diff --git a/src/as/asCa.h b/src/as/asCa.h
index 8ca2644a8..1a4128b5b 100644
--- a/src/as/asCa.h
+++ b/src/as/asCa.h
@@ -21,6 +21,7 @@ extern "C" {
 epicsShareFunc void epicsShareAPI asCaStart(void);
 epicsShareFunc void epicsShareAPI asCaStop(void);
 epicsShareFunc int epicsShareAPI ascar(int level);
+epicsShareFunc int epicsShareAPI ascarFP(FILE *fp, int level);
 
 #ifdef __cplusplus
 }