path: root/plugins/wmpa/wmperroritem.h

#if !defined(AFX_WMPERRORITEM_H__9399BDE5_C96D_43D3_BF02_E7A5850421B4__INCLUDED_)
#define AFX_WMPERRORITEM_H__9399BDE5_C96D_43D3_BF02_E7A5850421B4__INCLUDED_

#if _MSC_VER > 1000
#pragma once
#endif // _MSC_VER > 1000
// Machine generated IDispatch wrapper class(es) created by Microsoft Visual C++

// NOTE: Do not modify the contents of this file.  If this class is regenerated by
//  Microsoft Visual C++, your modifications will be overwritten.

/////////////////////////////////////////////////////////////////////////////
// CWMPErrorItem wrapper class

class CWMPErrorItem : public COleDispatchDriver
{
public:
	CWMPErrorItem() {}		// Calls COleDispatchDriver default constructor
	CWMPErrorItem(LPDISPATCH pDispatch) : COleDispatchDriver(pDispatch) {}
	CWMPErrorItem(const CWMPErrorItem& dispatchSrc) : COleDispatchDriver(dispatchSrc) {}

// Attributes
public:

// Operations
public:
	long GetErrorCode();
	CString GetErrorDescription();
	VARIANT GetErrorContext();
	long GetRemedy();
	CString GetCustomUrl();
};

//{{AFX_INSERT_LOCATION}}
// Microsoft Visual C++ will insert additional declarations immediately before the previous line.

#endif // !defined(AFX_WMPERRORITEM_H__9399BDE5_C96D_43D3_BF02_E7A5850421B4__INCLUDED_)

 class="k">sub get_inputbox {
	my $widget = Glib::Object->new_from_pointer( get_info( "win_ptr" ), 0 );
	my $input_box;

	my @containers = ($widget);

	while( @containers ) {
		my $container = shift @containers;

		for my $child ( $container->get_children ) {
			if( $child->get( "name" ) eq 'xchat-inputbox' ) {
				$input_box = $child;
				last;
			} elsif( $child->isa( "Gtk2::Container" ) ) {
				push @containers, $child;
			}
		}
	}
	return $input_box;
}

sub get_hbox {
	my $widget = shift;
	my $hbox;

	while( $widget->parent ) {
		if( $widget->parent->isa( "Gtk2::HBox" ) ) {
			return $widget->parent;
		}
		$widget = $widget->parent;
	}

}

my $input_box = get_inputbox();

if( $input_box ) {
	my $hbox = get_hbox( $input_box );
	if( $hbox ) {
		my $label = Gtk2::Label->new();
		$label->set_alignment( 0.5, ($label->get_alignment)[1] );
		$hbox->pack_end( $label, 0, 0, 5 );
		$label->show();

		my $update_label = sub {
			my $ctx_type = context_info->{"type"};
			hook_timer( 0, sub {
				if( $ctx_type == 2 || $ctx_type == 3 ) {
					my $count = length get_info "inputbox";
					$label->set_text( $count ? $count : "" );
				} else {
					$label->set_text( "" );
				}
				return REMOVE;
			});
			return EAT_NONE;
		};

		hook_print( "Key Press", $update_label );
		hook_print( "Focus Tab", $update_label );
		hook_print( "Focus Window", $update_label );
		hook_command( "",
			sub {
				$label->set_text( "" );
				return EAT_NONE;
			}
		);

		my @handlers;
		my $buffer = $input_box->get_buffer;
		my $handler = sub { $update_label->(); return TRUE };

		if( $buffer->isa( "Gtk2::TextBuffer" ) ) {
			push @handlers, $buffer->signal_connect( "changed", $handler );
		} elsif( $buffer->isa( "Gtk2::EntryBuffer" ) ) {
			push @handlers,
				$buffer->signal_connect( "deleted-text", $handler );
				$buffer->signal_connect( "inserted-text", $handler );
		}

		register( "Character Counter", "1.0.0",
			"Display the number of characters in the inputbox",
			sub {
				$hbox->remove( $label );
				$buffer->signal_handler_disconnect( $_ ) for @handlers;
			}
		);
	} else {
		prnt "Counldn't find hbox";
	}

} else {
	prnt "Couldn't fint input box";
}