; Span 1: WCTDM/0 "Wildcard TDM2400P Board 1" (MASTER)
;;; line="1 WCTDM/0/0 FXSKS"
signalling=fxs_ks
callerid=asreceived
group=0
context=company-1
echocancel=256
channel => 1
;;; line="2 WCTDM/0/1 FXSKS"
signalling=fxs_ks
callerid=asreceived
group=0
context=company-2
echocancel=256
channel => 2
[01001]
cid_number = 001
secret = password1
context=company-1
[02001]
cid_number = 001
secret = password2
context=company-2
[company-1]
exten => _XXX,1,Dial(SIP/01${EXTEN})
exten => _XXXX!,1,Dial(DAHDI/1/${EXTEN})
[company-2]
exten => _XXX,1,Dial(SIP/02${EXTEN})
exten => _XXXX!,1,Dial(DAHDI/2/${EXTEN})
_ [a-z] [0-9] [=] ¬
s0 s1 s2 ok end
s1 s1 s1 ok ok
s2 ok s2 ok ok
_ in == ['a'-'z'] in == ['0'-'9'] in == ['='] ¬
s0 val := in; next; s1 val := in-'0'; next; s2 next; ret(ASSIGN) ret(EOT)
s1 val := concat(val, in); next; s1 val := concat(val, in); next; s1 ret(IDENT, val) ret(IDENT, val)
s2 ret(INTEGER, val) val := val*10+in-'0'; next; s2 ret(INTEGER, val) ret(INTEGER, val)
s0 ('a') -> val := 'a'; next; s1
s1 ('1') -> val := 'a1'; next; s1
s1 ('=') -> ret(IDENT, 'a1')
s0 ('=') -> next; ret(ASSIGN)
s0 ('9') -> val := 9; next; s2
s2 ('5') -> val := 95; next; s2
s2 (¬) -> ret(INTEGER, 95)
s0 (¬) -> ret(EOT)
@_main proc near
push ebp
mov ebp,esp
add esp,-12
mov dword ptr [ebp-4],1998
mov dword ptr [ebp-8],2000
mov dword ptr [ebp-12],5
call @__getch
mov esp,ebp
pop ebp
ret
@_main endp
// $text - разбираемый текст
$num = -1;
$data = array();
foreach (preg_split("/^\s*(\d+)\.\s+Status\s+/m", $text, -1, PREG_SPLIT_DELIM_CAPTURE | PREG_SPLIT_NO_EMPTY) as $part) {
if (preg_match("/^\d+$/", $part))
$num = $part;
if (preg_match("/\((.*?)\)\s*$\s*Date\/time:\s+(.*?)\s*$\s*Number:\s+(.*?)\s+Number2:\s+(.*?)\s*$\s*Text:\s*$(.*)/sm", $part, $res)) {
$data[$num]['status'] = $res[1];
$data[$num]['date'] = $res[2];
$data[$num]['number'] = $res[3];
$data[$num]['number2'] = $res[4];
$data[$num]['text'] = $res[5];
}
}
var_dump($data);
Исключительное право на результат интеллектуальной деятельности, созданный творческим трудом, первоначально возникает у его автора. Это право может быть передано автором другому лицу по договору, а также может перейти к другим лицам по иным основаниям, установленным законом.
Договор об отчуждении исключительного права заключается в письменной форме и подлежит государственной регистрации в случаях, предусмотренных пунктом 2 статьи 1232 настоящего Кодекса [ГК РФ]. Несоблюдение письменной формы или требования о государственной регистрации влечет недействительность договора.