Changeset 14

Timestamp:

May 3, 2013, 7:18:10 PM (12 years ago)

Author:

Alex Taylor

Message:

Added RPUPortInfo function.

Location:

rxprtutl/trunk

Files:

• notes (modified) (2 diffs)
• rxprtutl.c (modified) (4 diffs)
• rxprtutl.def (modified) (2 diffs)

rxprtutl/trunk/notes ¶

@@ -18 +18 @@
       To convert <number> to USHORT:  ushort = REVERSE( X2C( D2X( number, 4 )))
       To convert <number> to ULONG:   ulong  = REVERSE( X2C( D2X( number, 8 )))
+
+      Fixed-length string (character array) fields MUST append a 0 byte to
+      the end of the string value, and SHOULD pad the rest of the array (up
+      to the defined length) with 0 bytes as well.
 
 
@@ -183 +187 @@
   END
 
+(At least version 1.03 of SMB.PDR is required.)
+

rxprtutl/trunk/rxprtutl.c ¶

@@ -132 +132 @@
     "RPUPortDelete",
     "RPUPortDialog",
+    "RPUPortInfo",
     "RPUPortInstall",
     "RPUPortQuery",
@@ -155 +156 @@
 RexxFunctionHandler RPUPortDelete;
 RexxFunctionHandler RPUPortDialog;
+RexxFunctionHandler RPUPortInfo;
 RexxFunctionHandler RPUPortInstall;
 RexxFunctionHandler RPUPortQuery;
@@ -770 +772 @@
 
 /* ------------------------------------------------------------------------- *
+ * RPUPortInfo                                                               *
+ *                                                                           *
+ * Queries basic information about a local port.  This is different from     *
+ * RPUPortQuery() in that the latter returns port configuration information  *
+ * from the port driver itself, whereas this function only returns what the  *
+ * spooler itself knows about the port.                                      *
+ *                                                                           *
+ * REXX ARGUMENTS:                                                           *
+ *   1. The name of the port.                                     (REQUIRED) *
+ *   2. The name of the stem in which to return the results:      (REQUIRED) *
+ *      (stem).!name       The name of the port                              *
+ *      (stem).!driver     The name of the port driver                       *
+ *      (stem).!converter  The name of the protocol converter used           *
+ *                                                                           *
+ * REXX RETURN VALUE:                                                        *
+ *   1 on success, or 0 if an error occurred.                                *
+ * ------------------------------------------------------------------------- */
+ULONG APIENTRY RPUPortInfo( PSZ pszName, ULONG argc, RXSTRING argv[], PSZ pszQueue, PRXSTRING prsResult )
+{
+    PPRPORTINFO2 pInfo      = NULL;
+    PVOID        pbuf       = NULL;
+    ULONG        cbBuf      = 0,
+                 cbNeeded   = 0;
+    CHAR         szStem[ US_STEM_MAXZ ];   // compound variable stem name
+    PSZ          pszPortName;
+    SPLERR       rc;
+
+
+    // Reset the error indicator
+    WriteErrorCode( 0, NULL );
+
+    // Validate the REXX arguments
+    if (( argc != 2 ) ||
+        ( ! RXVALIDSTRING( argv[0] )) || ( ! RXVALIDSTRING( argv[1] )))
+        return ( 40 );
+
+    pszPortName = argv[0].strptr;
+
+    // Initialize the result stem name
+    if ( RXSTRLEN(argv[1]) > US_STEM_MAXZ ) return ( 40 );
+    if ( argv[1].strptr[ argv[1].strlength-1 ] == '.') argv[1].strlength--;
+    strncpy( szStem, argv[1].strptr, RXSTRLEN( argv[1] ));
+    szStem[ RXSTRLEN( argv[1] ) ] = '\0';
+
+
+    // Query the amount of available data
+    rc = SplQueryPort( NULL, pszPortName, 2L, NULL, 0L, &cbNeeded );
+    if (( rc != ERROR_MORE_DATA ) && ( rc != NERR_BufTooSmall ))
+    {
+        WriteErrorCode( rc, "SplQueryPort");
+        MAKERXSTRING( *prsResult, "0", 1 );
+        return ( 0 );
+    }
+
+    // Now get the actual data
+    pbuf = malloc( cbNeeded );
+    if ( !pbuf ) {
+        WriteErrorCode( ERROR_NOT_ENOUGH_MEMORY, "malloc");
+        MAKERXSTRING( *prsResult, "0", 1 );
+        return ( 0 );
+    }
+    cbBuf = cbNeeded;
+    rc = SplQueryPort( NULL, pszPortName, 2L, pbuf, cbBuf, &cbNeeded );
+    if ( rc == NO_ERROR ) {
+        pInfo = (PPRPORTINFO2) pbuf;
+        WriteCompoundVariable( szStem, "!name",      pInfo->pszPortName );
+        WriteCompoundVariable( szStem, "!driver",    pInfo->pszPortDriver );
+        WriteCompoundVariable( szStem, "!converter", pInfo->pszProtocolConverter );
+        MAKERXSTRING( *prsResult, "1", 1 );
+    }
+    else {
+        WriteErrorCode( rc, "SplQueryPort");
+        MAKERXSTRING( *prsResult, "0", 1 );
+    }
+
+    free( pbuf );
+    return ( 0 );
+}
+
+
+/* ------------------------------------------------------------------------- *
  * RPUPortInstall                                                            *
  *                                                                           *
@@ -1422 +1505 @@
 
     pszDeviceName = argv[0].strptr;
-//printf("Device: \"%s\"\n", pszDeviceName );
 
     // Initialize the result stem name

rxprtutl/trunk/rxprtutl.def ¶

@@ -1 +1 @@
 LIBRARY     RXPRTUTL INITINSTANCE TERMINSTANCE
 DATA        MULTIPLE NONSHARED
-DESCRIPTION '@#Alex Taylor:0.2.2#@##1## 1 May 2013 18:18:54      REINFORCE::::::@@REXX Printer Management Utilities'
+DESCRIPTION '@#Alex Taylor:0.2.2#@##1## 3 May 2013 12:46:17      REINFORCE::::::@@REXX Printer Management Utilities'
 
 EXPORTS     RPULoadFuncs
@@ -12 +12 @@
 RPUPortDelete
 RPUPortDialog
+RPUPortInfo
 RPUPortInstall
 RPUPortQuery