How could I modify the wrappers C2HS generated?

For example, I want some fun hooks to generate wrappers wrapped by `liftIO`.
From
```
{#fun c_fun { `Int' } -> `Int'#}
```
to
```
c_fun i = liftIO $
{#c2hs original codes#}
```

How could I do it? Manually writing wrappers on C2HS' wrappers seems like a pain. Does C2HS support some kind of programmable hooks?

On a big picture thinking, could C2HS be exposed as a lib and be used in Cabal custom-setup? So above task can be done without heavily changing C2HS source.