← Back to branch summary

~ubuntu-branches/ubuntu/maverick/znc/maverick

« back to all changes in this revision

Viewing changes to modules/modperl.cpp

  • Committer: Bazaar Package Importer
  • Author(s): Patrick Matthäi
  • Date: 2010-05-24 18:05:44 UTC
  • mfrom: (1.3.5 upstream)
  • Revision ID: james.westby@ubuntu.com-20100524180544-8e4s3f4nj0lhyw7n
Tags: 0.090~rc1-1
* New upstream release candidate.
  - Drop znc-webadmin package. It is now provided in the core source code.
  - Rename discon_kick module to disconkick.
  - Add charset and notes module.
* Add missing dependency on libc-ares-dev to znc-dev.

Show diffs side-by-side

added added

removed removed

Lines of Context:
modules/modperl.cpp
89
89
        }
90
90
 
91
91
private:
92
 
        EType   m_eType;
 
92
        EType m_eType;
93
93
};
94
94
 
95
95
 
157
157
// # OnDisconnect($sockhandle)
158
158
        virtual void Disconnected();
159
159
// # OnData($sockhandle, $bytes, $length)
160
 
        virtual void ReadData(const char *data, int len);
 
160
        virtual void ReadData(const char *data, size_t len);
161
161
// # OnReadLine($sockhandle, $line)
162
162
        virtual void ReadLine(const CS_STRING & sLine);
163
163
 
164
164
 
165
165
private:
166
 
        CString         m_sModuleName;
167
 
        CString         m_sUsername;    // NEED these so we can send the signal to the right guy
168
 
        int                     m_iParentFD;
169
 
        VPString        m_vArgs;
 
166
        CString  m_sModuleName;
 
167
        CString  m_sUsername; // NEED these so we can send the signal to the right guy
 
168
        int      m_iParentFD;
 
169
        VPString m_vArgs;
170
170
 
171
171
        void SetupArgs()
172
172
        {
198
198
protected:
199
199
        virtual void RunJob();
200
200
 
201
 
        CString         m_sFuncName;
202
 
        CString         m_sUserName;
203
 
        CString         m_sModuleName;
 
201
        CString m_sFuncName;
 
202
        CString m_sUserName;
 
203
        CString m_sModuleName;
204
204
};
205
205
 
206
206
class CModPerl : public CGlobalModule
424
424
 
425
425
        enum ECBTYPES
426
426
        {
427
 
                CB_LOCAL        = 1,
428
 
                CB_ONHOOK       = 2,
429
 
                CB_TIMER        = 3,
430
 
                CB_SOCK         = 4
 
427
                CB_LOCAL  = 1,
 
428
                CB_ONHOOK = 2,
 
429
                CB_TIMER  = 3,
 
430
                CB_SOCK   = 4
431
431
        };
432
432
 
433
433
        EModRet CallBack(const PString & sHookName, const VPString & vsArgs,
503
503
        void UnloadPerlMod(const CString & sModule);
504
504
 
505
505
private:
506
 
        PerlInterpreter *m_pPerl;
 
506
        PerlInterpreter *m_pPerl;
507
507
 
508
508
};
509
509
 
1196
1196
        SOCKCB("OnDisconnect");
1197
1197
}
1198
1198
// # OnData($sockhandle, $bytes, $length)
1199
 
void CPerlSock::ReadData(const char *data, int len)
 
1199
void CPerlSock::ReadData(const char *data, size_t len)
1200
1200
{
1201
1201
        SetupArgs();
1202
1202
        PString sData;