]> arthur.barton.de Git - netatalk.git/blobdiff - etc/papd/main.c
- merge branch-netatalk-afp-3x-dev, HEAD was tagged before
[netatalk.git] / etc / papd / main.c
index b5e4c35786252a492ee532813f7b8acdd190a424..48723df01f031f16c812f6d616cfa2087394c028 100644 (file)
@@ -1,14 +1,16 @@
 /*
- * $Id: main.c,v 1.11 2001-09-06 20:00:59 rufustfirefly Exp $
+ * $Id: main.c,v 1.19 2005-04-28 20:49:49 bfernhomberg Exp $
  *
  * Copyright (c) 1990,1995 Regents of The University of Michigan.
  * All Rights Reserved.  See COPYRIGHT.
  */
 
 #ifdef HAVE_CONFIG_H
-#include "config.h"
+#include <config.h>
 #endif /* HAVE_CONFIG_H */
 
+#include <string.h>
+
 #include <sys/param.h>
 #include <sys/time.h>
 #include <sys/uio.h>
@@ -18,7 +20,7 @@
 #include <sys/file.h>
 #endif /* sun && __svr4__ */
 #include <sys/socket.h>
-#include <sys/syslog.h>
+#include <atalk/logger.h>
 
 /* POSIX.1 sys/wait.h check */
 #include <sys/types.h>
@@ -66,11 +68,13 @@ char *strchr (), *strrchr ();
 #include <atalk/paths.h>
 #include <atalk/util.h>
 #include <atalk/nbp.h>
+#include <atalk/unicode.h>
 
 #include "printer.h"
 #include "printcap.h"
 #include "session.h"
 #include "uam_auth.h"
+#include "print_cups.h"
 
 #define _PATH_PAPDPPDFILE      ".ppd"
 
@@ -80,13 +84,13 @@ struct printer      defprinter;
 struct printer *printers = NULL;
 
 int            debug = 0;
-char           *conffile = _PATH_PAPDCONF;
+static char    *conffile = _PATH_PAPDCONF;
 char           *printcap = _PATH_PAPDPRINTCAP;
 unsigned char  connid, quantum, sock, oquantum = PAP_MAXQUANTUM;
 char           *cannedstatus = PIPED_STATUS;
 struct printer *printer = NULL;
 char           *version = VERSION;
-static char      *pidfile = _PATH_PAPDLOCK;
+static char    *pidfile = _PATH_PAPDLOCK;
 
 char           *uamlist;
 char           *uampath = _PATH_PAPDUAMPATH;
@@ -94,7 +98,7 @@ char          *uampath = _PATH_PAPDUAMPATH;
 /* Prototypes for locally used functions */
 int getstatus( struct printer *pr, char *buf );
 int rprintcap( struct printer *pr );
-void getprinters( char *cf );
+static void getprinters( char *cf );
 
 
 /* this only needs to be used by the server process */
@@ -119,13 +123,20 @@ die( n )
     for ( pr = printers; pr; pr = pr->p_next ) {
        if ( pr->p_flags & P_REGISTERED ) {
            if ( nbp_unrgstr( pr->p_name, pr->p_type, pr->p_zone, &addr ) < 0 ) {
-               syslog( LOG_ERR, "can't unregister %s:%s@%s\n", pr->p_name,
+               LOG(log_error, logtype_papd, "can't unregister %s:%s@%s", pr->p_name,
                        pr->p_type, pr->p_zone );
                papd_exit( n + 1 );
            }
-           syslog( LOG_ERR, "unregister %s:%s@%s\n", pr->p_name, pr->p_type,
+           LOG(log_info, logtype_papd, "unregister %s:%s@%s", pr->p_name, pr->p_type,
                    pr->p_zone );
        }
+#ifdef HAVE_CUPS
+       if ( pr->p_flags & P_SPOOLED && pr->p_flags & P_CUPS_PPD ) {
+               LOG(log_info, logtype_papd, "Deleting CUPS temp PPD file for %s (%s)", pr->p_name, pr->p_ppdfile);
+               unlink (pr->p_ppdfile);
+       }
+#endif /* HAVE_CUPS */
+
     }
     papd_exit( n );
 }
@@ -141,17 +152,17 @@ reap()
     while (( pid = wait3( &status, WNOHANG, 0 )) > 0 ) {
        if ( WIFEXITED( status )) {
            if ( WEXITSTATUS( status )) {
-               syslog( LOG_ERR, "child %d exited with %d", pid,
+               LOG(log_error, logtype_papd, "child %d exited with %d", pid,
                        WEXITSTATUS( status ));
            } else {
-               syslog( LOG_INFO, "child %d done", pid );
+               LOG(log_info, logtype_papd, "child %d done", pid );
            }
        } else {
            if ( WIFSIGNALED( status )) {
-               syslog( LOG_ERR, "child %d killed with %d", pid,
+               LOG(log_error, logtype_papd, "child %d killed with %d", pid,
                        WTERMSIG( status ));
            } else {
-               syslog( LOG_ERR, "child %d died", pid );
+               LOG(log_error, logtype_papd, "child %d died", pid );
            }
        }
     }
@@ -176,6 +187,7 @@ int main( ac, av )
     char               *p, hostname[ MAXHOSTNAMELEN ];
     char               cbuf[ 8 ];
     int                        c;
+    char               *atname;
 
     if ( gethostname( hostname, sizeof( hostname )) < 0 ) {
        perror( "gethostname" );
@@ -211,7 +223,7 @@ int main( ac, av )
     defprinter.p_pagecost_msg = NULL;
     defprinter.p_lock = "lock";
 
-    while (( c = getopt( ac, av, "adf:p:P:" )) != EOF ) {
+    while (( c = getopt( ac, av, "adf:p:P:v" )) != EOF ) {
        switch ( c ) {
        case 'a' :              /* for compatibility with old papd */
            break;
@@ -232,6 +244,11 @@ int main( ac, av )
            pidfile = optarg;
            break;
 
+       case 'v' :              /* version */
+           printf( "papd (version %s)\n", VERSION );
+           exit ( 1 );
+           break;
+
        default :
            fprintf( stderr,
                    "Usage:\t%s [ -d ] [ -f conffile ] [ -p printcap ]\n",
@@ -240,7 +257,6 @@ int main( ac, av )
        }
     }
 
-    getprinters( conffile );
 
     switch (server_lock("papd", pidfile, debug)) {
     case 0: /* open a couple things again in the child */
@@ -255,6 +271,10 @@ int main( ac, av )
       exit(0);
     }      
 
+#ifdef DEBUG1
+    fault_setup(NULL);
+#endif
+
     /*
      * Start logging.
      */
@@ -266,32 +286,46 @@ int main( ac, av )
 #ifdef ultrix
     openlog( p, LOG_PID );
 #else /* ultrix */
-    openlog( p, LOG_NDELAY|LOG_PID, LOG_LPR );
+    set_processname(p);
+    syslog_setup(log_debug, logtype_default, logoption_ndelay|logoption_pid, logfacility_lpr );
 #endif /* ultrix */
 
-    syslog( LOG_INFO, "restart (%s)", version );
+    LOG(log_info, logtype_papd, "restart (%s)", version );
+#ifdef HAVE_CUPS
+    LOG(log_info, logtype_papd, "CUPS support enabled (%s)", CUPS_API_VERSION );
+#endif
+
+    getprinters( conffile );
 
     for ( pr = printers; pr; pr = pr->p_next ) {
        if (( pr->p_flags & P_SPOOLED ) && rprintcap( pr ) < 0 ) {
-           syslog( LOG_ERR, "printcap problem: %s", pr->p_printer );
+           LOG(log_error, logtype_papd, "printcap problem: %s", pr->p_printer );
        }
+
+       if (!(pr->p_flags & P_CUPS)) {
+               if ((size_t)-1 != convert_string_allocate(CH_UNIX, CH_MAC, pr->p_name, strlen(pr->p_name), &atname)) {
+                       pr->p_u_name = pr->p_name;
+                       pr->p_name = atname;
+               }
+       }
+                       
        if (( pr->p_atp = atp_open( ATADDR_ANYPORT, &pr->p_addr )) == NULL ) {
-           syslog( LOG_ERR, "atp_open: %m" );
+           LOG(log_error, logtype_papd, "atp_open: %m" );
            papd_exit( 1 );
        }
        if ( nbp_rgstr( atp_sockaddr( pr->p_atp ), pr->p_name, pr->p_type,
                pr->p_zone ) < 0 ) {
-           syslog( LOG_ERR, "can't register %s:%s@%s", pr->p_name, pr->p_type,
+           LOG(log_error, logtype_papd, "can't register %s:%s@%s", pr->p_u_name, pr->p_type,
                    pr->p_zone );
            die( 1 );
        }
        if ( pr->p_flags & P_AUTH ) {
-               syslog( LOG_INFO, "Authentication enabled: %s", pr->p_name );
+               LOG(log_info, logtype_papd, "Authentication enabled: %s", pr->p_u_name );
        }
        else {
-               syslog( LOG_INFO, "Authentication disabled: %s", pr->p_name );
+               LOG(log_info, logtype_papd, "Authentication disabled: %s", pr->p_u_name );
        }
-       syslog( LOG_INFO, "register %s:%s@%s", pr->p_name, pr->p_type,
+       LOG(log_info, logtype_papd, "register %s:%s@%s", pr->p_u_name, pr->p_type,
                pr->p_zone );
        pr->p_flags |= P_REGISTERED;
     }
@@ -301,7 +335,7 @@ int main( ac, av )
     sigemptyset( &sv.sa_mask );
     sv.sa_flags = SA_RESTART;
     if ( sigaction( SIGTERM, &sv, 0 ) < 0 ) {
-       syslog( LOG_ERR, "sigaction: %m" );
+       LOG(log_error, logtype_papd, "sigaction: %m" );
        papd_exit( 1 );
     }
 
@@ -309,7 +343,7 @@ int main( ac, av )
     sigemptyset( &sv.sa_mask );
     sv.sa_flags = SA_RESTART;
     if ( sigaction( SIGCHLD, &sv, 0 ) < 0 ) {
-       syslog( LOG_ERR, "sigaction: %m" );
+       LOG(log_error, logtype_papd, "sigaction: %m" );
        papd_exit( 1 );
     }
 
@@ -330,7 +364,7 @@ int main( ac, av )
            if ( errno == EINTR ) {
                continue;
            }
-           syslog( LOG_ERR, "select: %m" );
+           LOG(log_error, logtype_papd, "select: %m" );
            papd_exit( 1 );
        }
 
@@ -354,7 +388,7 @@ int main( ac, av )
                atpb.atp_rreqdata = cbuf;
                atpb.atp_rreqdlen = sizeof( cbuf );
                if ( atp_rreq( pr->p_atp, &atpb ) < 0 ) {
-                   syslog( LOG_ERR, "atp_rreq: %m" );
+                   LOG(log_error, logtype_papd, "atp_rreq: %m" );
                    continue;
                }
 
@@ -370,12 +404,29 @@ int main( ac, av )
                    rbuf[ 2 ] = rbuf[ 3 ] = 0;
 
                    if (( pr->p_flags & P_SPOOLED ) && rprintcap( pr ) != 0 ) {
-                       syslog( LOG_ERR, "printcap problem: %s",
+                       LOG(log_error, logtype_papd, "printcap problem: %s",
                                pr->p_printer );
                        rbuf[ 2 ] = rbuf[ 3 ] = 0xff;
                        err = 1;
                    }
 
+#ifdef HAVE_CUPS
+                  /*
+                   * If cups is not accepting jobs, we return
+                   * 0xffff to indicate we're busy
+                   */
+#ifdef DEBUG
+                    LOG(log_debug, logtype_papd, "CUPS: PAP_OPEN");
+#endif
+                   if ( (pr->p_flags & P_SPOOLED) && (cups_get_printer_status ( pr ) == 0)) {
+                        LOG(log_error, logtype_papd, "CUPS_PAP_OPEN: %s is not accepting jobs",
+                                pr->p_printer );
+                        rbuf[ 2 ] = rbuf[ 3 ] = 0xff;
+                        err = 1;
+                    }
+#endif /* HAVE_CUPS */
+
+
                    /*
                     * If this fails, we've run out of sockets. Rather than
                     * just die(), let's try to continue. Maybe some sockets
@@ -383,7 +434,7 @@ int main( ac, av )
                     */
                    if (( atp = atp_open( ATADDR_ANYPORT, 
                                          &pr->p_addr)) == NULL ) {
-                       syslog( LOG_ERR, "atp_open: %m" );
+                       LOG(log_error, logtype_papd, "atp_open: %m" );
                        rbuf[ 2 ] = rbuf[ 3 ] = 0xff;
                        err = 1;
                    }
@@ -399,7 +450,7 @@ int main( ac, av )
                     * This may error out if we lose a route, so we won't die().
                     */
                    if ( atp_sresp( pr->p_atp, &atpb ) < 0 ) {
-                       syslog( LOG_ERR, "atp_sresp: %m" );
+                       LOG(log_error, logtype_papd, "atp_sresp: %m" );
                        continue;
                    }
 
@@ -409,23 +460,32 @@ int main( ac, av )
 
                    switch ( c = fork()) {
                    case -1 :
-                       syslog( LOG_ERR, "fork: %m" );
+                       LOG(log_error, logtype_papd, "fork: %m" );
                        continue;
 
                    case 0 : /* child */
                        printer = pr;
 
+                       #ifndef HAVE_CUPS
                        if (( printer->p_flags & P_SPOOLED ) &&
                                chdir( printer->p_spool ) < 0 ) {
-                           syslog( LOG_ERR, "chdir %s: %m", printer->p_spool );
+                           LOG(log_error, logtype_papd, "chdir %s: %m", printer->p_spool );
+                           exit( 1 );
+                       }
+                       #else
+                       if (( printer->p_flags & P_SPOOLED ) &&
+                               chdir( SPOOLDIR ) < 0 ) {
+                           LOG(log_error, logtype_papd, "chdir %s: %m", SPOOLDIR );
                            exit( 1 );
                        }
 
+                       #endif
+
                        sv.sa_handler = SIG_DFL;
                        sigemptyset( &sv.sa_mask );
                        sv.sa_flags = SA_RESTART;
                        if ( sigaction( SIGTERM, &sv, 0 ) < 0 ) {
-                           syslog( LOG_ERR, "sigaction: %m" );
+                           LOG(log_error, logtype_papd, "sigaction: %m" );
                            exit( 1 );
                        }
 
@@ -434,14 +494,14 @@ int main( ac, av )
                        }
                        sat.sat_port = sock;
                        if ( session( atp, &sat ) < 0 ) {
-                           syslog( LOG_ERR, "bad session" );
+                           LOG(log_error, logtype_papd, "bad session" );
                            exit( 1 );
                        }
                        exit( 0 );
                        break;
 
                    default : /* parent */
-                       syslog( LOG_INFO, "child %d for \"%s\" from %u.%u",
+                       LOG(log_info, logtype_papd, "child %d for \"%s\" from %u.%u",
                                c, pr->p_name, ntohs( sat.sat_addr.s_net ),
                                sat.sat_addr.s_node);
                        atp_close( atp );
@@ -463,12 +523,12 @@ int main( ac, av )
                     * This may error out if we lose a route, so we won't die().
                     */
                    if ( atp_sresp( pr->p_atp, &atpb ) < 0 ) {
-                       syslog( LOG_ERR, "atp_sresp: %m" );
+                       LOG(log_error, logtype_papd, "atp_sresp: %m" );
                    }
                    break;
 
                default :
-                   syslog( LOG_ERR, "Bad request from %u.%u!",
+                   LOG(log_error, logtype_papd, "Bad request from %u.%u!",
                            ntohs( sat.sat_addr.s_net ), sat.sat_addr.s_node );
                    continue;
                    break;
@@ -488,7 +548,7 @@ int main( ac, av )
                 * This may error out if we lose a route, so we won't die().
                 */
                if ( atp_sresp( pr->p_atp, &atpb ) < 0 ) {
-                   syslog( LOG_ERR, "atp_sresp: %m" );
+                   LOG(log_error, logtype_papd, "atp_sresp: %m" );
                }
 #endif /* notdef */
            }
@@ -505,6 +565,20 @@ int getstatus( pr, buf )
     struct printer     *pr;
     char               *buf;
 {
+
+#ifdef HAVE_CUPS
+    if ( pr->p_flags & P_PIPED ) {
+       *buf = strlen( cannedstatus );
+       strncpy( &buf[ 1 ], cannedstatus, *buf );
+       return( *buf + 1 );
+    } else {
+       cups_get_printer_status( pr );
+       *buf = strlen ( pr->p_status );
+       strncpy ( &buf[1], pr->p_status, *buf);
+       return ( *buf + 1);
+    }
+#else
+
     char               path[ MAXPATHLEN ];
     int                        fd = -1, rc;
 
@@ -529,24 +603,27 @@ int getstatus( pr, buf )
        *buf = rc;
        return( rc + 1 );
     }
+#endif /* HAVE_CUPS */
 }
 
 char   *pgetstr();
-char   *getpname();
+char   *getpname(char **area, int bufsize);
+
+#define PF_CONFBUFFER  1024
 
-void getprinters( cf )
+static void getprinters( cf )
     char       *cf;
 {
-    char               buf[ 1024 ], area[ 1024 ], *a, *p, *name, *type, *zone;
+    char               buf[ PF_CONFBUFFER ], area[ PF_CONFBUFFER ], *a, *p, *name, *type, *zone;
     struct printer     *pr;
     int                        c;
 
-    while (( c = getprent( cf, buf )) > 0 ) {
+    while (( c = getprent( cf, buf, PF_CONFBUFFER )) > 0 ) {
        a = area;
        /*
         * Get the printer's nbp name.
         */
-       if (( p = getpname( &a )) == NULL ) {
+       if (( p = getpname( &a, PF_CONFBUFFER )) == NULL ) {
            fprintf( stderr, "No printer name\n" );
            exit( 1 );
        }
@@ -679,8 +756,42 @@ void getprinters( cf )
        else 
            atalk_aton(p, &pr->p_addr);
 
-       pr->p_next = printers;
-       printers = pr;
+#ifdef HAVE_CUPS
+       if ((p = pgetstr("co", &a)) != NULL ) {
+            pr->p_cupsoptions = strdup(p);
+            LOG (log_error, logtype_papd, "enabling cups-options for %s: %s", pr->p_name, pr->p_cupsoptions);
+       }
+#endif
+
+       /* convert line endings for setup sections.
+           real ugly work around for foomatic deficiencies,
+          need to get rid of this */
+       if ( pgetflag("fo") == 1 ) {
+            pr->p_flags |= P_FOOMATIC_HACK;
+            LOG (log_error, logtype_papd, "enabling foomatic hack for %s", pr->p_name);
+       }
+
+       if (strncasecmp (pr->p_name, "cupsautoadd", 11) == 0)
+       {
+#ifdef HAVE_CUPS
+               pr = cups_autoadd_printers (pr, printers);
+               printers = pr;
+#else
+               LOG (log_error, logtype_papd, "cupsautoadd: Cups support not compiled in");
+#endif /* HAVE_CUPS */
+       }
+       else {
+#ifdef HAVE_CUPS
+               if ( cups_check_printer ( pr, printers, 1) == 0)
+               {
+                       pr->p_next = printers;
+                       printers = pr;
+               }
+#else
+               pr->p_next = printers;
+               printers = pr;
+#endif /* HAVE_CUPS */
+       }
     }
     if ( c == 0 ) {
        endprent();
@@ -692,6 +803,37 @@ void getprinters( cf )
 int rprintcap( pr )
     struct printer     *pr;
 {
+
+#ifdef HAVE_CUPS
+
+    char               *p;
+
+    if ( pr->p_flags & P_SPOOLED && !(pr->p_flags & P_CUPS_AUTOADDED) ) { /* Skip check if autoadded */
+       if ( cups_printername_ok ( pr->p_printer ) != 1) {
+           LOG(log_error, logtype_papd, "No such CUPS printer: '%s'", pr->p_printer );
+           return( -1 );
+       }
+    }
+
+    /*
+     * Check for ppd file, moved here because of cups_autoadd we cannot check at the usual location
+     */
+
+    if ( pr->p_ppdfile == defprinter.p_ppdfile ) {
+       if ( (p = (char *) cups_get_printer_ppd ( pr->p_printer )) != NULL ) {
+           if (( pr->p_ppdfile = (char *)malloc( strlen( p ) + 1 )) == NULL ) {
+               LOG(log_error, logtype_papd, "malloc: %m" );
+               exit( 1 );
+           }
+           strcpy( pr->p_ppdfile, p );
+           pr->p_flags |= P_CUPS_PPD;
+           /*LOG(log_info, logtype_papd, "PPD File for %s set to %s", pr->p_printer, pr->p_ppdfile );*/
+       }
+    }
+
+
+#else
+
     char               buf[ 1024 ], area[ 1024 ], *a, *p;
     int                        c;
 
@@ -700,7 +842,7 @@ int rprintcap( pr )
      */
     if ( pr->p_flags & P_SPOOLED ) {
        if ( pgetent( printcap, buf, pr->p_printer ) != 1 ) {
-           syslog( LOG_ERR, "No such printer: %s", pr->p_printer );
+           LOG(log_error, logtype_papd, "No such printer: %s", pr->p_printer );
            return( -1 );
        }
 
@@ -715,7 +857,7 @@ int rprintcap( pr )
            pr->p_spool = defprinter.p_spool;
        } else {
            if (( pr->p_spool = (char *)malloc( strlen( p ) + 1 )) == NULL ) {
-               syslog( LOG_ERR, "malloc: %m" );
+               LOG(log_error, logtype_papd, "malloc: %m" );
                exit( 1 );
            }
            strcpy( pr->p_spool, p );
@@ -739,7 +881,7 @@ int rprintcap( pr )
            } else {
                if (( pr->p_role =
                        (char *)malloc( strlen( p ) + 1 )) == NULL ) {
-                   syslog( LOG_ERR, "malloc: %m" );
+                   LOG(log_error, logtype_papd, "malloc: %m" );
                    exit( 1 );
                }
                strcpy( pr->p_role, p );
@@ -765,7 +907,7 @@ int rprintcap( pr )
        if (( p = pgetstr( "pc", &a )) != NULL ) {
            if (( pr->p_pagecost_msg =
                    (char *)malloc( strlen( p ) + 1 )) == NULL ) {
-               syslog( LOG_ERR, "malloc: %m" );
+               LOG(log_error, logtype_papd, "malloc: %m" );
                exit( 1 );
            }
            strcpy( pr->p_pagecost_msg, p );
@@ -790,7 +932,7 @@ int rprintcap( pr )
            pr->p_lock = defprinter.p_lock;
        } else {
            if (( pr->p_lock = (char *)malloc( strlen( p ) + 1 )) == NULL ) {
-               syslog( LOG_ERR, "malloc: %m" );
+               LOG(log_error, logtype_papd, "malloc: %m" );
                exit( 1 );
            }
            strcpy( pr->p_lock, p );
@@ -809,6 +951,7 @@ int rprintcap( pr )
 
        endprent();
     }
+#endif /* HAVE_CUPS */
 
     return( 0 );
 }