require '_h2ph_pre.ph';

no warnings 'redefine';

unless(defined(&_LINUX_LIST_H)) {
    eval 'sub _LINUX_LIST_H () {1;}' unless defined(&_LINUX_LIST_H);
    if(defined(&__KERNEL__)) {
	require 'linux/stddef.ph';
	require 'linux/poison.ph';
	require 'linux/prefetch.ph';
	require 'asm/system.ph';
	eval 'sub LIST_HEAD_INIT {
	    my($name) = @_;
    	    eval q({ ($name), ($name) });
	}' unless defined(&LIST_HEAD_INIT);
	eval 'sub LIST_HEAD {
	    my($name) = @_;
    	    eval q(1;
	}' unless defined(&LIST_HEAD);
	eval 'sub INIT_LIST_HEAD {
	    my($list) = @_;
    	    eval q({  ($list->{next}) = $list;  ($list->{prev}) = $list; });
	}' unless defined(&INIT_LIST_HEAD);
	eval 'sub list_replace_init {
	    my($old,$new) = @_;
    	    eval q({  &list_replace($old, $new);  &INIT_LIST_HEAD($old); });
	}' unless defined(&list_replace_init);
	eval 'sub __list_splice {
	    my($list,$head) = @_;
    	    eval q({ 1; 1; 1;  ($first->{prev}) = $head;  ($head->{next}) =  &first;  ($last->{next}) =  &at;  ($at->{prev}) =  &last; });
	}' unless defined(&__list_splice);
	eval 'sub list_entry {
	    my($ptr, $type, $member) = @_;
    	    eval q( &container_of($ptr, $type, $member));
	}' unless defined(&list_entry);
	eval 'sub list_for_each {
	    my($pos, $head) = @_;
    	    eval q( &for ($pos = ($head)-> &next;  &prefetch( ($pos->{next})), $pos != ($head); $pos =  ($pos->{next})));
	}' unless defined(&list_for_each);
	eval 'sub __list_for_each {
	    my($pos, $head) = @_;
    	    eval q( &for ($pos = ($head)-> &next; $pos != ($head); $pos =  ($pos->{next})));
	}' unless defined(&__list_for_each);
	eval 'sub list_for_each_prev {
	    my($pos, $head) = @_;
    	    eval q( &for ($pos = ($head)-> &prev;  &prefetch( ($pos->{prev})), $pos != ($head); $pos =  ($pos->{prev})));
	}' unless defined(&list_for_each_prev);
	eval 'sub list_for_each_safe {
	    my($pos, $n, $head) = @_;
    	    eval q( &for ($pos = ($head)-> &next, $n =  ($pos->{next}); $pos != ($head); $pos = $n, $n =  ($pos->{next})));
	}' unless defined(&list_for_each_safe);
	eval 'sub list_for_each_entry {
	    my($pos, $head, $member) = @_;
    	    eval q( &for ($pos =  &list_entry(($head)-> &next,  &typeof(*$pos), $member);  &prefetch( ($pos->{member}->{next})),  ($pos->{member}) != ($head); $pos =  &list_entry( ($pos->{member}->{next}),  &typeof(*$pos), $member)));
	}' unless defined(&list_for_each_entry);
	eval 'sub list_for_each_entry_reverse {
	    my($pos, $head, $member) = @_;
    	    eval q( &for ($pos =  &list_entry(($head)-> &prev,  &typeof(*$pos), $member);  &prefetch( ($pos->{member}->{prev})),  ($pos->{member}) != ($head); $pos =  &list_entry( ($pos->{member}->{prev}),  &typeof(*$pos), $member)));
	}' unless defined(&list_for_each_entry_reverse);
	eval 'sub list_prepare_entry {
	    my($pos, $head, $member) = @_;
    	    eval q((($pos) ? :  &list_entry($head,  &typeof(*$pos), $member)));
	}' unless defined(&list_prepare_entry);
	eval 'sub list_for_each_entry_continue {
	    my($pos, $head, $member) = @_;
    	    eval q( &for ($pos =  &list_entry( ($pos->{member}->{next}),  &typeof(*$pos), $member);  &prefetch( ($pos->{member}->{next})),  ($pos->{member}) != ($head); $pos =  &list_entry( ($pos->{member}->{next}),  &typeof(*$pos), $member)));
	}' unless defined(&list_for_each_entry_continue);
	eval 'sub list_for_each_entry_from {
	    my($pos, $head, $member) = @_;
    	    eval q( &for (;  &prefetch( ($pos->{member}->{next})),  ($pos->{member}) != ($head); $pos =  &list_entry( ($pos->{member}->{next}),  &typeof(*$pos), $member)));
	}' unless defined(&list_for_each_entry_from);
	eval 'sub list_for_each_entry_safe {
	    my($pos, $n, $head, $member) = @_;
    	    eval q( &for ($pos =  &list_entry(($head)-> &next,  &typeof(*$pos), $member), $n =  &list_entry( ($pos->{member}->{next}),  &typeof(*$pos), $member);  ($pos->{member}) != ($head); $pos = $n, $n =  &list_entry( ($n->{member}->{next}),  &typeof(*$n), $member)));
	}' unless defined(&list_for_each_entry_safe);
	eval 'sub list_for_each_entry_safe_continue {
	    my($pos, $n, $head, $member) = @_;
    	    eval q( &for ($pos =  &list_entry( ($pos->{member}->{next}),  &typeof(*$pos), $member), $n =  &list_entry( ($pos->{member}->{next}),  &typeof(*$pos), $member);  ($pos->{member}) != ($head); $pos = $n, $n =  &list_entry( ($n->{member}->{next}),  &typeof(*$n), $member)));
	}' unless defined(&list_for_each_entry_safe_continue);
	eval 'sub list_for_each_entry_safe_from {
	    my($pos, $n, $head, $member) = @_;
    	    eval q( &for ($n =  &list_entry( ($pos->{member}->{next}),  &typeof(*$pos), $member);  ($pos->{member}) != ($head); $pos = $n, $n =  &list_entry( ($n->{member}->{next}),  &typeof(*$n), $member)));
	}' unless defined(&list_for_each_entry_safe_from);
	eval 'sub list_for_each_entry_safe_reverse {
	    my($pos, $n, $head, $member) = @_;
    	    eval q( &for ($pos =  &list_entry(($head)-> &prev,  &typeof(*$pos), $member), $n =  &list_entry( ($pos->{member}->{prev}),  &typeof(*$pos), $member);  ($pos->{member}) != ($head); $pos = $n, $n =  &list_entry( ($n->{member}->{prev}),  &typeof(*$n), $member)));
	}' unless defined(&list_for_each_entry_safe_reverse);
	eval 'sub list_for_each_rcu {
	    my($pos, $head) = @_;
    	    eval q( &for ($pos = ($head)-> &next;  &prefetch( &rcu_dereference($pos)-> &next), $pos != ($head); $pos =  ($pos->{next})));
	}' unless defined(&list_for_each_rcu);
	eval 'sub __list_for_each_rcu {
	    my($pos, $head) = @_;
    	    eval q( &for ($pos = ($head)-> &next;  &rcu_dereference($pos) != ($head); $pos =  ($pos->{next})));
	}' unless defined(&__list_for_each_rcu);
	eval 'sub list_for_each_safe_rcu {
	    my($pos, $n, $head) = @_;
    	    eval q( &for ($pos = ($head)-> &next; $n =  &rcu_dereference($pos)-> &next, $pos != ($head); $pos = $n));
	}' unless defined(&list_for_each_safe_rcu);
	eval 'sub list_for_each_entry_rcu {
	    my($pos, $head, $member) = @_;
    	    eval q( &for ($pos =  &list_entry(($head)-> &next,  &typeof(*$pos), $member);  &prefetch( &rcu_dereference($pos)-> ($member->{next})),  ($pos->{member}) != ($head); $pos =  &list_entry( ($pos->{member}->{next}),  &typeof(*$pos), $member)));
	}' unless defined(&list_for_each_entry_rcu);
	eval 'sub list_for_each_continue_rcu {
	    my($pos, $head) = @_;
    	    eval q( &for (($pos) = ($pos)-> &next;  &prefetch( &rcu_dereference(($pos))-> &next), ($pos) != ($head); ($pos) = ($pos)-> &next));
	}' unless defined(&list_for_each_continue_rcu);
	eval 'sub HLIST_HEAD_INIT () {{ . &first =  &NULL };}' unless defined(&HLIST_HEAD_INIT);
	eval 'sub HLIST_HEAD {
	    my($name) = @_;
    	    eval q(1;
	}' unless defined(&HLIST_HEAD);
	eval 'sub INIT_HLIST_HEAD {
	    my($ptr) = @_;
    	    eval q((($ptr)-> &first =  &NULL));
	}' unless defined(&INIT_HLIST_HEAD);
	eval 'sub INIT_HLIST_NODE {
	    my($h) = @_;
    	    eval q({  ($h->{next}) =  &NULL;  ($h->{pprev}) =  &NULL; });
	}' unless defined(&INIT_HLIST_NODE);
	eval 'sub hlist_unhashed {
	    my($h) = @_;
    	    eval q({ ! ($h->{pprev}); });
	}' unless defined(&hlist_unhashed);
	eval 'sub hlist_empty {
	    my($h) = @_;
    	    eval q({ ! ($h->{first}); });
	}' unless defined(&hlist_empty);
	eval 'sub __hlist_del {
	    my($n) = @_;
    	    eval q({ 1; 1; * &pprev =  &next;  &if ( &next)  ($next->{pprev}) =  &pprev; });
	}' unless defined(&__hlist_del);
	eval 'sub hlist_del {
	    my($n) = @_;
    	    eval q({  &__hlist_del($n);  ($n->{next}) =  &LIST_POISON1;  ($n->{pprev}) =  &LIST_POISON2; });
	}' unless defined(&hlist_del);
	eval 'sub hlist_del_init {
	    my($n) = @_;
    	    eval q({  &if (! &hlist_unhashed($n)) {  &__hlist_del($n);  &INIT_HLIST_NODE($n); } });
	}' unless defined(&hlist_del_init);
	eval 'sub hlist_add_head {
	    my($n,$h) = @_;
    	    eval q({ 1;  ($n->{next}) =  &first;  &if ( &first)  ($first->{pprev}) =  ($n->{next});  ($h->{first}) = $n;  ($n->{pprev}) =  ($h->{first}); });
	}' unless defined(&hlist_add_head);
	eval 'sub hlist_add_after {
	    my($n,$next) = @_;
    	    eval q({  ($next->{next}) =  ($n->{next});  ($n->{next}) = $next;  ($next->{pprev}) =  ($n->{next});  &if( ($next->{next}))  ($next->{next}->{pprev})  =  ($next->{next}); });
	}' unless defined(&hlist_add_after);
	eval 'sub hlist_entry {
	    my($ptr, $type, $member) = @_;
    	    eval q( &container_of($ptr,$type,$member));
	}' unless defined(&hlist_entry);
	eval 'sub hlist_for_each {
	    my($pos, $head) = @_;
    	    eval q( &for ($pos = ($head)-> &first; $pos  && ({  &prefetch( ($pos->{next})); 1; }); $pos =  ($pos->{next})));
	}' unless defined(&hlist_for_each);
	eval 'sub hlist_for_each_safe {
	    my($pos, $n, $head) = @_;
    	    eval q( &for ($pos = ($head)-> &first; $pos  && ({ $n =  ($pos->{next}); 1; }); $pos = $n));
	}' unless defined(&hlist_for_each_safe);
	eval 'sub hlist_for_each_entry {
	    my($tpos, $pos, $head, $member) = @_;
    	    eval q( &for ($pos = ($head)-> &first; $pos  && ({  &prefetch( ($pos->{next})); 1;})  && ({ $tpos =  &hlist_entry($pos,  &typeof(*$tpos), $member); 1;}); $pos =  ($pos->{next})));
	}' unless defined(&hlist_for_each_entry);
	eval 'sub hlist_for_each_entry_continue {
	    my($tpos, $pos, $member) = @_;
    	    eval q( &for ($pos = ($pos)-> &next; $pos  && ({  &prefetch( ($pos->{next})); 1;})  && ({ $tpos =  &hlist_entry($pos,  &typeof(*$tpos), $member); 1;}); $pos =  ($pos->{next})));
	}' unless defined(&hlist_for_each_entry_continue);
	eval 'sub hlist_for_each_entry_from {
	    my($tpos, $pos, $member) = @_;
    	    eval q( &for (; $pos  && ({  &prefetch( ($pos->{next})); 1;})  && ({ $tpos =  &hlist_entry($pos,  &typeof(*$tpos), $member); 1;}); $pos =  ($pos->{next})));
	}' unless defined(&hlist_for_each_entry_from);
	eval 'sub hlist_for_each_entry_safe {
	    my($tpos, $pos, $n, $head, $member) = @_;
    	    eval q( &for ($pos = ($head)-> &first; $pos  && ({ $n =  ($pos->{next}); 1; })  && ({ $tpos =  &hlist_entry($pos,  &typeof(*$tpos), $member); 1;}); $pos = $n));
	}' unless defined(&hlist_for_each_entry_safe);
	eval 'sub hlist_for_each_entry_rcu {
	    my($tpos, $pos, $head, $member) = @_;
    	    eval q( &for ($pos = ($head)-> &first;  &rcu_dereference($pos)  && ({  &prefetch( ($pos->{next})); 1;})  && ({ $tpos =  &hlist_entry($pos,  &typeof(*$tpos), $member); 1;}); $pos =  ($pos->{next})));
	}' unless defined(&hlist_for_each_entry_rcu);
    } else {
    }
}
1;