diff options
Diffstat (limited to 'apps/plugins/mikmod/load_uni.c')
| -rw-r--r-- | apps/plugins/mikmod/load_uni.c | 717 |
1 files changed, 717 insertions, 0 deletions
diff --git a/apps/plugins/mikmod/load_uni.c b/apps/plugins/mikmod/load_uni.c new file mode 100644 index 0000000000..3140336b94 --- /dev/null +++ b/apps/plugins/mikmod/load_uni.c @@ -0,0 +1,717 @@ +/* MikMod sound library + (c) 1998, 1999, 2000, 2001, 2002 Miodrag Vallat and others - see file + AUTHORS for complete list. + + This library is free software; you can redistribute it and/or modify + it under the terms of the GNU Library General Public License as + published by the Free Software Foundation; either version 2 of + the License, or (at your option) any later version. + + This program is distributed in the hope that it will be useful, + but WITHOUT ANY WARRANTY; without even the implied warranty of + MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + GNU Library General Public License for more details. + + You should have received a copy of the GNU Library General Public + License along with this library; if not, write to the Free Software + Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA + 02111-1307, USA. +*/ + +/*============================================================================== + + $Id: load_uni.c,v 1.3 2005/04/07 19:57:38 realtech Exp $ + + UNIMOD (libmikmod's and APlayer's internal module format) loader + +==============================================================================*/ + +#ifdef HAVE_CONFIG_H +#include "config.h" +#endif + +#ifdef HAVE_UNISTD_H +#include <unistd.h> +#endif + +#include <stdio.h> +#ifdef HAVE_MEMORY_H +#include <memory.h> +#endif +#include <string.h> + +#include "mikmod_internals.h" + +#ifdef SUNOS +extern int fprintf(FILE *, const char *, ...); +#endif + +/*========== Module structure */ + +typedef struct UNIHEADER { + CHAR id[4]; + UBYTE numchn; + UWORD numpos; + UWORD reppos; + UWORD numpat; + UWORD numtrk; + UWORD numins; + UWORD numsmp; + UBYTE initspeed; + UBYTE inittempo; + UBYTE initvolume; + UWORD flags; + UBYTE numvoices; + UWORD bpmlimit; + + UBYTE positions[256]; + UBYTE panning[32]; +} UNIHEADER; + +typedef struct UNISMP05 { + UWORD c2spd; + UWORD transpose; + UBYTE volume; + UBYTE panning; + ULONG length; + ULONG loopstart; + ULONG loopend; + UWORD flags; + CHAR* samplename; + UBYTE vibtype; + UBYTE vibsweep; + UBYTE vibdepth; + UBYTE vibrate; +} UNISMP05; + +/*========== Loader variables */ + +static UWORD universion; +static UNIHEADER mh; + +#define UNI_SMPINCR 64 +static UNISMP05 *wh=NULL,*s=NULL; + +/*========== Loader code */ + +static char* readstring(void) +{ + char *s=NULL; + UWORD len; + + len=_mm_read_I_UWORD(modreader); + if(len) { + s=MikMod_malloc(len+1); + _mm_read_UBYTES(s,len,modreader); + s[len]=0; + } + return s; +} + +int UNI_Test(void) +{ + char id[6]; + + if(!_mm_read_UBYTES(id,6,modreader)) return 0; + + /* UNIMod created by MikCvt */ + if(!(memcmp(id,"UN0",3))) { + if((id[3]>='4')&&(id[3]<='6')) return 1; + } + /* UNIMod created by APlayer */ + if(!(memcmp(id,"APUN\01",5))) { + if((id[5]>=1)&&(id[5]<=6)) return 1; + } + return 0; +} + +int UNI_Init(void) +{ + return 1; +} + +void UNI_Cleanup(void) +{ + MikMod_free(wh); + s=NULL; +} + +static UBYTE* readtrack(void) +{ + UBYTE *t; + UWORD len; + int cur=0,chunk; + + if(universion>=6) + len=_mm_read_M_UWORD(modreader); + else + len=_mm_read_I_UWORD(modreader); + + if(!len) return NULL; + if(!(t=MikMod_malloc(len))) return NULL; + _mm_read_UBYTES(t,len,modreader); + + /* Check if the track is correct */ + while(1) { + chunk=t[cur++]; + if(!chunk) break; + chunk=(chunk&0x1f)-1; + while(chunk>0) { + int opcode,oplen; + + if(cur>=len) { + MikMod_free(t); + return NULL; + } + opcode=t[cur]; + + /* Remap opcodes */ + if (universion <= 5) { + if (opcode > 29) { + MikMod_free(t); + return NULL; + } + switch (opcode) { + /* UNI_NOTE .. UNI_S3MEFFECTQ are the same */ + case 25: + opcode = UNI_S3MEFFECTT; + break; + case 26: + opcode = UNI_XMEFFECTA; + break; + case 27: + opcode = UNI_XMEFFECTG; + break; + case 28: + opcode = UNI_XMEFFECTH; + break; + case 29: + opcode = UNI_XMEFFECTP; + break; + } + } else { + /* APlayer < 1.05 does not have XMEFFECT6 */ + if (opcode >= UNI_XMEFFECT6 && universion < 0x105) + opcode++; + /* APlayer < 1.03 does not have ITEFFECTT */ + if (opcode >= UNI_ITEFFECTT && universion < 0x103) + opcode++; + /* APlayer < 1.02 does not have ITEFFECTZ */ + if (opcode >= UNI_ITEFFECTZ && universion < 0x102) + opcode++; + } + + if((!opcode)||(opcode>=UNI_LAST)) { + MikMod_free(t); + return NULL; + } + t[cur]=opcode; + oplen=unioperands[opcode]+1; + cur+=oplen; + chunk-=oplen; + } + if((chunk<0)||(cur>=len)) { + MikMod_free(t); + return NULL; + } + } + return t; +} + +static int loadsmp6(void) +{ + int t; + SAMPLE *s; + + s=of.samples; + for(t=0;t<of.numsmp;t++,s++) { + int flags; + + flags = _mm_read_M_UWORD(modreader); + s->flags=0; + if(flags&0x0004) s->flags|=SF_STEREO; + if(flags&0x0002) s->flags|=SF_SIGNED; + if(flags&0x0001) s->flags|=SF_16BITS; + /* convert flags */ + if(universion>=0x104) { + if(flags&0x2000) s->flags|=SF_UST_LOOP; + if(flags&0x1000) s->flags|=SF_OWNPAN; + if(flags&0x0800) s->flags|=SF_SUSTAIN; + if(flags&0x0400) s->flags|=SF_REVERSE; + if(flags&0x0200) s->flags|=SF_BIDI; + if(flags&0x0100) s->flags|=SF_LOOP; + if(flags&0x0020) s->flags|=SF_ITPACKED; + if(flags&0x0010) s->flags|=SF_DELTA; + if(flags&0x0008) s->flags|=SF_BIG_ENDIAN; + } else if(universion>=0x102) { + if(flags&0x0800) s->flags|=SF_UST_LOOP; + if(flags&0x0400) s->flags|=SF_OWNPAN; + if(flags&0x0200) s->flags|=SF_SUSTAIN; + if(flags&0x0100) s->flags|=SF_REVERSE; + if(flags&0x0080) s->flags|=SF_BIDI; + if(flags&0x0040) s->flags|=SF_LOOP; + if(flags&0x0020) s->flags|=SF_ITPACKED; + if(flags&0x0010) s->flags|=SF_DELTA; + if(flags&0x0008) s->flags|=SF_BIG_ENDIAN; + } else { + if(flags&0x400) s->flags|=SF_UST_LOOP; + if(flags&0x200) s->flags|=SF_OWNPAN; + if(flags&0x100) s->flags|=SF_REVERSE; + if(flags&0x080) s->flags|=SF_SUSTAIN; + if(flags&0x040) s->flags|=SF_BIDI; + if(flags&0x020) s->flags|=SF_LOOP; + if(flags&0x010) s->flags|=SF_BIG_ENDIAN; + if(flags&0x008) s->flags|=SF_DELTA; + } + + s->speed = _mm_read_M_ULONG(modreader); + s->volume = _mm_read_UBYTE(modreader); + s->panning = _mm_read_M_UWORD(modreader); + s->length = _mm_read_M_ULONG(modreader); + s->loopstart = _mm_read_M_ULONG(modreader); + s->loopend = _mm_read_M_ULONG(modreader); + s->susbegin = _mm_read_M_ULONG(modreader); + s->susend = _mm_read_M_ULONG(modreader); + s->globvol = _mm_read_UBYTE(modreader); + s->vibflags = _mm_read_UBYTE(modreader); + s->vibtype = _mm_read_UBYTE(modreader); + s->vibsweep = _mm_read_UBYTE(modreader); + s->vibdepth = _mm_read_UBYTE(modreader); + s->vibrate = _mm_read_UBYTE(modreader); + + s->samplename=readstring(); + + if(_mm_eof(modreader)) { + _mm_errno = MMERR_LOADING_SAMPLEINFO; + return 0; + } + } + return 1; +} + +static int loadinstr6(void) +{ + int t,w; + INSTRUMENT *i; + + i=of.instruments; + for(t=0;t<of.numins;t++,i++) { + i->flags = _mm_read_UBYTE(modreader); + i->nnatype = _mm_read_UBYTE(modreader); + i->dca = _mm_read_UBYTE(modreader); + i->dct = _mm_read_UBYTE(modreader); + i->globvol = _mm_read_UBYTE(modreader); + i->panning = _mm_read_M_UWORD(modreader); + i->pitpansep = _mm_read_UBYTE(modreader); + i->pitpancenter = _mm_read_UBYTE(modreader); + i->rvolvar = _mm_read_UBYTE(modreader); + i->rpanvar = _mm_read_UBYTE(modreader); + i->volfade = _mm_read_M_UWORD(modreader); + +#if defined __STDC__ || defined _MSC_VER || defined MPW_C +#define UNI_LoadEnvelope6(name) \ + i-> name##flg=_mm_read_UBYTE(modreader); \ + i-> name##pts=_mm_read_UBYTE(modreader); \ + i-> name##susbeg=_mm_read_UBYTE(modreader); \ + i-> name##susend=_mm_read_UBYTE(modreader); \ + i-> name##beg=_mm_read_UBYTE(modreader); \ + i-> name##end=_mm_read_UBYTE(modreader); \ + for(w=0;w<(universion>=0x100?32:i-> name##pts);w++) { \ + i-> name##env[w].pos=_mm_read_M_SWORD(modreader); \ + i-> name##env[w].val=_mm_read_M_SWORD(modreader); \ + } +#else +#define UNI_LoadEnvelope6(name) \ + i-> name/**/flg=_mm_read_UBYTE(modreader); \ + i-> name/**/pts=_mm_read_UBYTE(modreader); \ + i-> name/**/susbeg=_mm_read_UBYTE(modreader); \ + i-> name/**/susend=_mm_read_UBYTE(modreader); \ + i-> name/**/beg=_mm_read_UBYTE(modreader); \ + i-> name/**/end=_mm_read_UBYTE(modreader); \ + for (w=0;w<(universion>=0x100?32:i-> name/**/pts);w++) { \ + i-> name/**/env[w].pos=_mm_read_M_SWORD(modreader); \ + i-> name/**/env[w].val=_mm_read_M_SWORD(modreader); \ + } +#endif + + UNI_LoadEnvelope6(vol); + UNI_LoadEnvelope6(pan); + UNI_LoadEnvelope6(pit); +#undef UNI_LoadEnvelope6 + + if(universion>=0x103) + _mm_read_M_UWORDS(i->samplenumber,120,modreader); + else + for(w=0;w<120;w++) + i->samplenumber[w]=_mm_read_UBYTE(modreader); + _mm_read_UBYTES(i->samplenote,120,modreader); + + i->insname=readstring(); + + if(_mm_eof(modreader)) { + _mm_errno = MMERR_LOADING_SAMPLEINFO; + return 0; + } + } + return 1; +} + +static int loadinstr5(void) +{ + INSTRUMENT *i; + int t; + UWORD wavcnt=0; + UBYTE vibtype,vibsweep,vibdepth,vibrate; + + i=of.instruments; + for(of.numsmp=t=0;t<of.numins;t++,i++) { + int u,numsmp; + + numsmp=_mm_read_UBYTE(modreader); + + memset(i->samplenumber,0xff,INSTNOTES*sizeof(UWORD)); + for(u=0;u<96;u++) + i->samplenumber[u]=of.numsmp+_mm_read_UBYTE(modreader); + +#if defined __STDC__ || defined _MSC_VER || defined MPW_C +#define UNI_LoadEnvelope5(name) \ + i-> name##flg=_mm_read_UBYTE(modreader); \ + i-> name##pts=_mm_read_UBYTE(modreader); \ + i-> name##susbeg=_mm_read_UBYTE(modreader); \ + i-> name##susend=i-> name##susbeg; \ + i-> name##beg=_mm_read_UBYTE(modreader); \ + i-> name##end=_mm_read_UBYTE(modreader); \ + for(u=0;u<12;u++) { \ + i-> name##env[u].pos=_mm_read_I_SWORD(modreader); \ + i-> name##env[u].val=_mm_read_I_SWORD(modreader); \ + } +#else +#define UNI_LoadEnvelope5(name) \ + i-> name/**/flg=_mm_read_UBYTE(modreader); \ + i-> name/**/pts=_mm_read_UBYTE(modreader); \ + i-> name/**/susbeg=_mm_read_UBYTE(modreader); \ + i-> name/**/susend=i-> name/**/susbeg; \ + i-> name/**/beg=_mm_read_UBYTE(modreader); \ + i-> name/**/end=_mm_read_UBYTE(modreader); \ + for(u=0;u<12;u++) { \ + i-> name/**/env[u].pos=_mm_read_I_SWORD(modreader); \ + i-> name/**/env[u].val=_mm_read_I_SWORD(modreader); \ + } +#endif + + UNI_LoadEnvelope5(vol); + UNI_LoadEnvelope5(pan); +#undef UNI_LoadEnvelope5 + + vibtype =_mm_read_UBYTE(modreader); + vibsweep =_mm_read_UBYTE(modreader); + vibdepth =_mm_read_UBYTE(modreader); + vibrate =_mm_read_UBYTE(modreader); + + i->volfade=_mm_read_I_UWORD(modreader); + i->insname=readstring(); + + for(u=0;u<numsmp;u++,s++,of.numsmp++) { + /* Allocate more room for sample information if necessary */ + if(of.numsmp+u==wavcnt) { + wavcnt+=UNI_SMPINCR; + if(!(wh=MikMod_realloc(wh,wavcnt*sizeof(UNISMP05)))) { + _mm_errno=MMERR_OUT_OF_MEMORY; + return 0; + } + s=wh+(wavcnt-UNI_SMPINCR); + } + + s->c2spd =_mm_read_I_UWORD(modreader); + s->transpose=_mm_read_SBYTE(modreader); + s->volume =_mm_read_UBYTE(modreader); + s->panning =_mm_read_UBYTE(modreader); + s->length =_mm_read_I_ULONG(modreader); + s->loopstart=_mm_read_I_ULONG(modreader); + s->loopend =_mm_read_I_ULONG(modreader); + s->flags =_mm_read_I_UWORD(modreader); + s->samplename=readstring(); + + s->vibtype =vibtype; + s->vibsweep=vibsweep; + s->vibdepth=vibdepth; + s->vibrate =vibrate; + + if(_mm_eof(modreader)) { + MikMod_free(wh);wh=NULL; + _mm_errno=MMERR_LOADING_SAMPLEINFO; + return 0; + } + } + } + + /* sanity check */ + if(!of.numsmp) { + if(wh) { MikMod_free(wh);wh=NULL; } + _mm_errno=MMERR_LOADING_SAMPLEINFO; + return 0; + } + return 1; +} + +static int loadsmp5(void) +{ + int t,u; + SAMPLE *q; + INSTRUMENT *d; + + q=of.samples;s=wh; + for(u=0;u<of.numsmp;u++,q++,s++) { + q->samplename=s->samplename; + + q->length =s->length; + q->loopstart=s->loopstart; + q->loopend =s->loopend; + q->volume =s->volume; + q->speed =s->c2spd; + q->panning =s->panning; + q->vibtype =s->vibtype; + q->vibsweep =s->vibsweep; + q->vibdepth =s->vibdepth; + q->vibrate =s->vibrate; + + /* convert flags */ + q->flags=0; + if(s->flags&128) q->flags|=SF_REVERSE; + if(s->flags& 64) q->flags|=SF_SUSTAIN; + if(s->flags& 32) q->flags|=SF_BIDI; + if(s->flags& 16) q->flags|=SF_LOOP; + if(s->flags& 8) q->flags|=SF_BIG_ENDIAN; + if(s->flags& 4) q->flags|=SF_DELTA; + if(s->flags& 2) q->flags|=SF_SIGNED; + if(s->flags& 1) q->flags|=SF_16BITS; + } + + d=of.instruments;s=wh; + for(u=0;u<of.numins;u++,d++) + for(t=0;t<INSTNOTES;t++) + d->samplenote[t]=(d->samplenumber[t]>=of.numsmp)? + 255:(t+s[d->samplenumber[t]].transpose); + + MikMod_free(wh);wh=NULL; + + return 1; +} + +int UNI_Load(int curious) +{ + int t; + char *modtype,*oldtype=NULL; + INSTRUMENT *d; + SAMPLE *q; + + /* read module header */ + _mm_read_UBYTES(mh.id,4,modreader); + if(mh.id[3]!='N') + universion=mh.id[3]-'0'; + else + universion=0x100; + + if(universion>=6) { + if (universion==6) + _mm_read_UBYTE(modreader); + else + universion=_mm_read_M_UWORD(modreader); + + mh.flags =_mm_read_M_UWORD(modreader); + mh.numchn =_mm_read_UBYTE(modreader); + mh.numvoices =_mm_read_UBYTE(modreader); + mh.numpos =_mm_read_M_UWORD(modreader); + mh.numpat =_mm_read_M_UWORD(modreader); + mh.numtrk =_mm_read_M_UWORD(modreader); + mh.numins =_mm_read_M_UWORD(modreader); + mh.numsmp =_mm_read_M_UWORD(modreader); + mh.reppos =_mm_read_M_UWORD(modreader); + mh.initspeed =_mm_read_UBYTE(modreader); + mh.inittempo =_mm_read_UBYTE(modreader); + mh.initvolume=_mm_read_UBYTE(modreader); + /* I expect this to show up soon in APlayer 1.06 format */ + if (universion >= 0x106) + mh.bpmlimit=_mm_read_M_UWORD(modreader); + else + mh.bpmlimit=32; + + mh.flags &= UF_XMPERIODS | UF_LINEAR | UF_INST | UF_NNA; + mh.flags |= UF_PANNING; + } else { + mh.numchn =_mm_read_UBYTE(modreader); + mh.numpos =_mm_read_I_UWORD(modreader); + mh.reppos =(universion==5)?_mm_read_I_UWORD(modreader):0; + mh.numpat =_mm_read_I_UWORD(modreader); + mh.numtrk =_mm_read_I_UWORD(modreader); + mh.numins =_mm_read_I_UWORD(modreader); + mh.initspeed =_mm_read_UBYTE(modreader); + mh.inittempo =_mm_read_UBYTE(modreader); + _mm_read_UBYTES(mh.positions,256,modreader); + _mm_read_UBYTES(mh.panning,32,modreader); + mh.flags =_mm_read_UBYTE(modreader); + mh.bpmlimit =32; + + mh.flags &= UF_XMPERIODS | UF_LINEAR; + mh.flags |= UF_INST | UF_NOWRAP | UF_PANNING; + } + + /* set module parameters */ + of.flags =mh.flags; + of.numchn =mh.numchn; + of.numpos =mh.numpos; + of.numpat =mh.numpat; + of.numtrk =mh.numtrk; + of.numins =mh.numins; + of.reppos =mh.reppos; + of.initspeed =mh.initspeed; + of.inittempo =mh.inittempo; + if(mh.bpmlimit) + of.bpmlimit=mh.bpmlimit; + else + /* be bug-compatible with older releases */ + of.bpmlimit=32; + + of.songname=readstring(); + if(universion<0x102) + oldtype=readstring(); + if(oldtype) { + size_t len=strlen(oldtype)+20; + if(!(modtype=MikMod_malloc(len))) return 0; +#ifdef HAVE_SNPRINTF + snprintf(modtype,len,"%s (was %s)",(universion>=0x100)?"APlayer":"MikCvt2",oldtype); +#else + sprintf(modtype,"%s (was %s)",(universion>=0x100)?"APlayer":"MikCvt2",oldtype); +#endif + } else { + if(!(modtype=MikMod_malloc(10))) return 0; +#ifdef HAVE_SNPRINTF + snprintf(modtype,10,"%s",(universion>=0x100)?"APlayer":"MikCvt3"); +#else + sprintf(modtype,"%s",(universion>=0x100)?"APlayer":"MikCvt3"); +#endif + } + of.modtype=StrDup(modtype); + MikMod_free(modtype);MikMod_free(oldtype); + of.comment=readstring(); + + if(universion>=6) { + of.numvoices=mh.numvoices; + of.initvolume=mh.initvolume; + } + + if(_mm_eof(modreader)) { + _mm_errno=MMERR_LOADING_HEADER; + return 0; + } + + /* positions */ + if(!AllocPositions(of.numpos)) return 0; + if(universion>=6) { + if(universion>=0x100) + _mm_read_M_UWORDS(of.positions,of.numpos,modreader); + else + for(t=0;t<of.numpos;t++) of.positions[t]=_mm_read_UBYTE(modreader); + _mm_read_M_UWORDS(of.panning,of.numchn,modreader); + _mm_read_UBYTES(of.chanvol,of.numchn,modreader); + } else { + if((mh.numpos>256)||(mh.numchn>32)) { + _mm_errno=MMERR_LOADING_HEADER; + return 0; + } + for(t=0;t<of.numpos;t++) of.positions[t]=mh.positions[t]; + for(t=0;t<of.numchn;t++) of.panning[t]=mh.panning[t]; + } + /* convert the ``end of song'' pattern code if necessary */ + if(universion<0x106) + for(t=0;t<of.numpos;t++) + if(of.positions[t]==255) of.positions[t]=LAST_PATTERN; + + /* instruments and samples */ + if(universion>=6) { + of.numsmp=mh.numsmp; + if(!AllocSamples()) return 0; + if(!loadsmp6()) return 0; + + if(of.flags&UF_INST) { + if(!AllocInstruments()) return 0; + if(!loadinstr6()) return 0; + } + } else { + if(!AllocInstruments()) return 0; + if(!loadinstr5()) return 0; + if(!AllocSamples()) { + if(wh) { MikMod_free(wh);wh=NULL; } + return 0; + } + if(!loadsmp5()) return 0; + + /* check if the original file had no instruments */ + if(of.numsmp==of.numins) { + for(t=0,d=of.instruments;t<of.numins;t++,d++) { + int u; + + if((d->volpts)||(d->panpts)||(d->globvol!=64)) break; + for(u=0;u<96;u++) + if((d->samplenumber[u]!=t)||(d->samplenote[u]!=u)) break; + if(u!=96) break; + } + if(t==of.numins) { + of.flags&=~UF_INST; + of.flags&=~UF_NOWRAP; + for(t=0,d=of.instruments,q=of.samples;t<of.numins;t++,d++,q++) { + q->samplename=d->insname; + d->insname=NULL; + } + } + } + } + + /* patterns */ + if(!AllocPatterns()) return 0; + if(universion>=6) { + _mm_read_M_UWORDS(of.pattrows,of.numpat,modreader); + _mm_read_M_UWORDS(of.patterns,of.numpat*of.numchn,modreader); + } else { + _mm_read_I_UWORDS(of.pattrows,of.numpat,modreader); + _mm_read_I_UWORDS(of.patterns,of.numpat*of.numchn,modreader); + } + + /* tracks */ + if(!AllocTracks()) return 0; + for(t=0;t<of.numtrk;t++) + if(!(of.tracks[t]=readtrack())) { + _mm_errno=MMERR_LOADING_TRACK; + return 0; + } + + return 1; +} + +CHAR *UNI_LoadTitle(void) +{ + UBYTE ver; + int posit[3]={304,306,26}; + + _mm_fseek(modreader,3,SEEK_SET); + ver=_mm_read_UBYTE(modreader); + if(ver=='N') ver='6'; + + _mm_fseek(modreader,posit[ver-'4'],SEEK_SET); + return readstring(); +} + +/*========== Loader information */ + +MIKMODAPI MLOADER load_uni={ + NULL, + "UNI", + "APUN (APlayer) and UNI (MikMod)", + UNI_Init, + UNI_Test, + UNI_Load, + UNI_Cleanup, + UNI_LoadTitle +}; + +/* ex:set ts=4: */ |