Differences

This shows you the differences between two versions of the page.

--- userspace:cups_printer_installation [2012/09/19 14:47] – created bhubal
+++ userspace:cups_printer_installation [2021/08/23 10:37] (current) – external edit 127.0.0.1
@@ Line 7: / Line 7: @@
 description: Installiert auf dem Server verfuegbare Drucker als CUPS-Postscript-Drucker\\
 advice: Ueber CUPS neu angelegte Drucker werden erst nach etwa 10 Minuten erfolgreich erkannt.
+full package: http://download.uib.de/opsi4.0/products/contribute/
 ==== cupsprinter.ins ====
@@ Line 268: / Line 270: @@
 echo del "C:\Dokumente und Einstellungen\username\Startm~1\Programme\Autostart\cups.lnk" > c:\windows\temp\cups.cmd
 echo rundll32 printui.dll,PrintUIEntry /y /n "$DefaultPrinterName$" >> c:\windows\temp\cups.cmd
+</code>
+==== delcupsprinter.ins ====
+<code winst>
+[Initial]
+; NOTE:
+;   If a new cups printer is added, it will take some time
+;   before the printer is published by samba (default 750s)
+;   use smb.conf paramter "printcap cache time" to change printer reload interval
+;
+; Message at install time:
+Message=Deinstalliere CUPS-Drucker ...
+LogLevel=2
+;  Log Errors in Logfile but don't abort:
+ExitOnError=false
+; Show syntax errors in the script:
+ScriptErrorMessages=on
+; Dont trace step by step through the script:
+TraceMode=off
+; let started programs run in front of the winst window
+StayOnTop=false
+[Aktionen]
+DefVar $ProductId$
+Set $ProductId$ = "cupsprinter"
+DefStringlist $list1$
+DefStringlist $list2$
+DefStringlist $list3$
+DefVar $WindowsPrinterName$
+DefVar $PrintServerName$
+set $PrintServerName$ = "server"
+if ( GetOS = "Windows_NT")
+   ; - - - - - - - - - - - - - - - - - - - - - - -
+   ; -   show product picture                    -
+   ; - - - - - - - - - - - - - - - - - - - - - - -
+   ShowBitmap /3 "%scriptpath%\"+$ProductId$+".bmp" $ProductId$
+   set $PrintServerName$ = IniVar('printserver')
+   ; - - - - - - - - - - - - - - - - - - - - - - -
+   ; -   uninstall                               -
+   ; - - - - - - - - - - - - - - - - - - - - - - -
+   Message=Deinstalliere CUPS-Drucker ...
+   set $list1$ = getOutStreamFromSection ('DosInAnIcon_list_installed_server_printers')
+   for $a$ in $list1$ do sub_delete_installed_server_printers
+endif
+[sub_delete_installed_server_printers]
+set $list2$ = splitStringOnWhitespace ("$a$")
+if takestring(0, $list2$) = "Druckername"
+   set $list3$ = splitString("$a$", "Druckername ")
+   set $WindowsPrinterName$ = takestring(1, $list3$)
+endif
+if takestring(0, $list2$) = "Anschlussname"
+   set $list3$ = splitString (takestring(1, $list2$), "/")
+   ; CUPS printer
+   if takestring(0, $list3$) = "http:"
+      DosInAnIcon_delete_printer
+   endif
+   set $list3$ = splitString (takestring(1, $list2$), "\")
+   ; Samba printer on server (\\server\xyz)
+   if takestring(2, $list3$) = $PrintServerName$
+      DosInAnIcon_delete_printer
+   endif
+endif
+[DosInAnIcon_list_installed_server_printers]
+@echo off
+cscript c:\windows\system32\prnmngr.vbs -l
+[DosInAnIcon_delete_printer]
+rundll32 printui.dll,PrintUIEntry /q /dl /n "$WindowsPrinterName$"
 </code>